计算机程序课程设计_俄罗斯方块.docVIP

MFC课程设计 指导教师：孔令德 需求分析 设计题目 俄罗斯方块，包含打开、移动、变形、升级、选关、背景音乐等功能。 题目描述 制作的俄罗斯方块可以实现一下功能: 控制功能，利用键盘按键可以实现变形、左移、右移、下移，在一行堆满方块后，可以消去一行，并加分，分数会显示在控制区旁边，随分时增加，级别会不断增加，速度不断加快，如果方块对到控制区顶端时，游戏结束。 选关功能即点击“选关“菜单之后，回弹出一对话框，在对话框里键入数字（1-8）DrawBlock(int X,int Y,TColor mColor)函数产生方块，具体代码如下： void __fastcall TForm1::DrawBlock(int X,int Y,TColor mColor) { int X1,Y1,X2,Y2; X1=X*NormalWidth; X2=X1+NormalWidth; Y1=Y*NormalWidth; Y2=Y1+NormalWidth; Image1-Canvas-Brush-Color=mColor; Image1-Canvas-FillRect(Rect(X1+1,Y1+1,X2-1,Y2-1)); Image2-Canvas-Pen-Color=clAqua; Image2-Canvas-MoveTo(X1,Y1); Image2-Canvas-LineTo(X1,Y2-1); Image2-Canvas-LineTo(X2-1,Y2-1); Image2-Canvas-Pen-Color = clWhite; Image2-Canvas-LineTo(X2-1,Y1); Image2-Canvas-LineTo(X1,Y1); } 其中Image1是游戏区域，Image2是下一个方块形状的预览区域。 (2)、用DrawSmallBlock(int X, int Y,TColor mColor)和 ClearSmallBlock(int X, int Y)产生预览区域的方块形状，具体的代码如下： void __fastcall TForm1::DrawSmallBlock(int X, int Y,TColor mColor) { int X1,Y1,X2,Y2; X1=X*SmallWidth; X2=X1+SmallWidth; Y1=Y*SmallWidth; Y2=Y1+SmallWidth; Image2-Canvas-Brush-Color = mColor; Image2-Canvas-FillRect(Rect(X1+1,Y1+1,X2-1,Y2-1)); Image2-Canvas-Pen-Color = clAqua; Image2-Canvas-MoveTo(X1,Y1); Image2-Canvas-LineTo(X1,Y2-1); Image2-Canvas-LineTo(X2-1,Y2-1); Image2-Canvas-Pen-Color = clWhite; Image2-Canvas-LineTo(X2-1,Y1); Image2-Canvas-LineTo(X1,Y1); 其中DrawSmallBlock(int X, int Y,TColor mColor)是用来在预览区产生颜色为mcolour的方块形状，用ClearSmallBlock(int X, int Y)将预览区的底色设置为黑色，这样就可以在预览区看见方块的形状。 (3)、用WriteNext()函数产生下一个方块产生的形状，具体代码如下： void __fastcall TForm1::WriteNext() { NextPatn = random(5); NextRotat=random(4); NextColor=random(12); for(i=0;i4;i++) for(j=0;j4;j++) ClearSmallBlock(i,j); for(i=0;i4;i++) DrawSmallBlock(Style[NextPatn][NextRotat*10+i*2]-1, Style[NextPatn][NextRotat*10+i*2+1]-1, Colors[NextColor]);} 此函数可以随机产生下一个方块，用 NextPatn = random(5); NextRotat=random(4); NextColor=random(12);产生随机数控制下一个方块的形状与颜色。 (4)、方块自动向下移动的控制，在程序中，我们用timer1实现对程序下一得控制，具体代