c语言俄罗斯方块代码

1、#include#include#include#include/* 下面定义了一些控制命令*/* 重画界面命令 */#define CMDDRAW5/* 消去一个满行的命令 */#define CMDDELLINE6/* 自动下移一行的命令 */#define CMDAOTODOWN7/* 生产新的方块 */#define CMDGEN8/* 向左移动的命令，以左箭头控制，它的 ASCII码值是 77*/ #define CMDRINGHTMOVE 77/* 旋转方块的命令，以空格来控制*/#define CMDROTATE57/* 向下移动的命令，以向下的箭头控制，它的ASCII码值是 8

2、0*/#define CMDDOWNMOVE801/21/* 退出游戏的控制命令，以esc键控制，它的 ASCII码值是 1*/#define CMDESC1/* 定义了方块下降的时间间隔*/#define TIMEINTERVAL4/* 下面定义了游戏区的大小*/#define MAXWIDTH15#define MAXHEIGHT30/* 组成方块的小格子的宽度*/#define BOXWIDTH15/* 用两个数组来表示新旧两个矩形游戏区*/int oldareaMAXHEIGHT+1MAXWIDTH;int areaMAXHEIGHT+1MAXWIDTH;/* 定义一个需要改变的屏幕区

3、域，初次之外的区域不用进行重绘*/int actW,actH,actX,actY;/* 当前方块的一些属性（坐标，颜色，高，宽）*/int curX,curY,curColor,curW,curH;/* 新的方块的一些属性（坐标，颜色，高，宽）*/int newX,newY,newColor,newW,newH;/* 制定方块的状态 */int active;/* 存储当前方块的数组 */2/21int box44;/* 当前方块的颜色 */int BOXCOLOR;/* 控制命令 */int CMD;/* 定义七种基本的方块形状*/int BOX744=1,1,1,1,0,0,0,0,0,0

4、,0,0,0,0,0,0,1,1,1,0,1,0,0,0,0,0,0,0,0,0,0,0,1,1,1,0,0,0,1,0,0,0,0,0,0,0,0,0,1,1,1,0,0,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,1,1,0,0,0,0,0,0,0,0,0,0,1,1,0,0,1,1,0,0,0,0,0,0,0,0,0,0;/* 得到方块的宽度，即从右向左第一个不空的列*/int GetWidth()int i,j;for(i=3;i0;i-)for(j=0;j0;j-)for(i=0;i4;i+)if(box

5、ji) return j;return 0;/* 清除原有的方块占有的空间*/void ClearOldspace()int i,j;for(j=0;j=curH; j+)for(i=0;i=curW; i+)if(boxji)areacurY+jcurX+i=0;4/21/* 置位新方块的位置 */void PutNewspace()int i,j;for(j=0;j=newH;j+)for(i=0;i=newW;i+)if(boxji)areanewY+jnewX+i=BOXCOLOR;/* 判断方块的移动是否造成区域冲突*/int MoveCollision(int box4)int i

6、,j;if(newX=MAXWIDTH) return 1;if(newY0) return 1;for(j=0;j=newH;j+)for(i=0;i=MAXWIDTH) newX=MAXWIDTH-1-newW; if(newY+newH=MAXHEIGHT) newY=MAXHEIGHT-1-newH;if(MoveCollision(box) return 1;for(i=0;i=newW;i+)for(j=0;jMAXHEIGHT-3)return 1;else6/21return 0;/* 判断是否超时，即是否超过允许的时间间隔*/int TimeOut()static long

7、tm,old;tm=biostime(0,tm);if(tm-oldTIMEINTERVAL)return 0;elseold=tm;return 1;/* 重绘游戏区 */void DrawSpace()int row,col,x1,y1,x2,y2;for(row=actY;row=actY+actH;row+)for(col=actX;col=MAXHEIGHT-1)8/21rowEnd=MAXHEIGHT-2;for(row=newY; row=rowEnd;)full=1;for(col=0;colMAXWIDTH;col+)if(!arearowcol)full=0; break;

8、if(!full)+row;continue;for(j=row; jMAXHEIGHT-1;j+)for(i=0;iMAXWIDTH;i+)areaji=areaj+1i;actX=0;actY=row;actW=MAXWIDTH-1;actH=MAXHEIGHT-1-row;DrawSpace();rowEnd-;9/21CMD=CMDGEN;/* 向左移动方块 */int MoveLeft()newX=curX-1;ClearOldspace();if(MoveCollision(box)newX=curX;PutNewspace();CMD=0;return 0;PutNewspace

9、();actW=curW+1;actX=curX=newX;CMD=CMDDRAW;return 1;10/21/* 向右移动方块 */int MoveRight()newX=curX+1; ClearOldspace();if(MoveCollision(box)newX=curX;PutNewspace();CMD=0;return 0;PutNewspace();actW=curW+1;actX=curX;curX=newX;CMD=CMDDRAW;return 1;/* 向下移动方块 */int MoveDown()11/21int i,j;newY=curY-1;ClearOldsp

10、ace();if(MoveCollision(box)newY=curY;PutNewspace();active=0;CMD=CMDDELLINE;return 0;PutNewspace();actH=curH+1;actY=newY;curY=newY;CMD=CMDDRAW;return 1;/* 按加速键后方块迅速下落到底*/void MoveBottom()12/21while(active)MoveDown();DrawSpace();CMD=CMDDELLINE;/* 初始化 */void InitialGame()int i,j,x1,y1,x2,y2;int driver=

11、DETECT, mode=0;initgraph(&driver,&mode,e:tc);cleardevice();randomize();setfillstyle(SOLID_FILL,BLUE);bar(0,0,639,479);x1=56;y1=464-BOXWIDTH*MAXHEIGHT;x2=56+MAXWIDTH*BOXWIDTH;y2=464;13/21rectangle(-x1,-y1,+x2,+y2);setfillstyle(SOLID_FILL,BLACK); bar(+x1,+y1,-x2,-y2); y1=464-MAXHEIGHT*BOXWIDTH; y2=464

12、; setcolor(DARKGRAY);for(i=0;iMAXWIDTH;i+)x1=56+i*BOXWIDTH;line(x1,y1,x1,y2);x1=56; x2=x1+MAXWIDTH*BOXWIDTH;for(j=0;jMAXHEIGHT;j+)y1=464-j*BOXWIDTH;line(x1,y1,x2,y1);for(j=0;jMAXHEIGHT;j+)for(i=0;i8;return;/* 生成一个新的方块 */int GenerateNewbox()int i,j,boxidx;15/21boxidx=random(7); BOXCOLOR=random(7)+1;

13、for(j=0;j4;j+)for(i=0;i=MAXWIDTH)curX=MAXWIDTH-1-curW; curY=MAXHEIGHT-1-curH;newX=curX; newY=curY; actX=curX;actY=curY; actW=newW=curW; actH=newH=curH;active=1;if(MoveCollision(box) return 0;PutNewspace();DrawSpace(); CMD=0;return 1;/* 翻转方块 */int RotateBox()int newBox44;int i,j;16/21ClearOldspace();

14、for(j=0;j4;j+)for(i=0;i4;i+)newBoxji=0;for(j=0;j4;j+)for(i=0;i4;i+)newBoxcurW-ij=boxji;newW=curH;newH=curW;if(RotateBoxCollision(newBox)newW=curW;newH=curH;newX=curX;newY=curY;PutNewspace();CMD=0;return 0;for(j=0;j4;j+)for(i=0;icurH? newH:curH;actW=curX+actH-newX;actX=newX;actY=newY;curX=newX;curY=n

15、ewY;curW=newW;curH=newH;CMD=CMDDRAW;return 1;/* 根据获得的命令来执行不同的操作*/void ExecuteCMD()switch(CMD)case CMDLEFTMOVE:MoveLeft();break;18/21case CMDRINGHTMOVE:MoveRight();break;case CMDAOTODOWN:MoveDown();break;case CMDROTATE:RotateBox();break;case CMDDOWNMOVE:MoveBottom();break;case CMDDRAW:DrawSpace();break;case CMDDE