俄羅斯方塊C語言代碼

1、#include #include #include #ifdef _cplusplus#define _CPPARGS .#else#define _CPPARGS#endif#define MINBOXSIZE 15 /* 最小方塊的尺寸 */#define BGCOLOR 7 /* 背景著色 */#define GX 200#define GY 10#define SJNUM 10000 /* 每當(dāng)玩家打到一萬分等級加一級 */ /* 按鍵碼 */ #define VK_LEFT 0x4b00#define VK_RIGHT 0x4d00 #define VK_DOWN 0x5000#d

2、efine VK_UP 0x4800#define VK_HOME 0x4700#define VK_END 0x4f00#define VK_SPACE 0x3920#define VK_ESC 0x011b#define VK_ENTER 0x1c0d/* 定義俄羅斯方塊的方向我定義他為 4 種*/#define F_DONG 0#define F_NAN 1#define F_XI 2#define F_BEI 3#define NEXTCOL 20 /* 要出的下一個方塊的縱坐標(biāo) */#define NEXTROW 12 /* 要出的下一個方塊的橫從標(biāo) */#define MAXROW

3、 14 /* 游戲屏幕大小 */#define MAXCOL 20 #define SCCOL 100 /* 游戲屏幕大顯示器上的相對位置 */#define SCROW 60 int gril2216; /* 游戲屏幕坐標(biāo) */int col=1,row=7; /* 當(dāng)前方塊的橫縱坐標(biāo) */int boxfx=0,boxgs=0; /* 當(dāng)前寺塊的形壯和方向 */int nextboxfx=0,nextboxgs=0,maxcol=22;/* 下一個方塊的形壯和方向 */int minboxcolor=6,nextminboxcolor=6;int num=0; /* 游戲分 */int d

4、j=0,gamedj10=18,16,14,12,10,8,6,4,2,1;/* 游戲等級 */* 以下我用了一個 3 維數(shù)組來紀(jì)錄方塊的最初形狀和方向 */int boxstr7416=1,1,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,0,0,1,1,0,0,1,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,0,0,1,1,0,0,1,0,0,0,0,0,0,0,0,1,1,0,1,1,0,0,0,0,0,0,0,0,0,0,1,0,0,0,1,1,0,0,0,1,0,0,0,0,0,0,0,1,1,0,1,1,0

5、,0,0,0,0,0,0,0,0,0,1,0,0,0,1,1,0,0,0,1,0,0,0,0,0,0,1,1,0,0,0,1,0,0,0,1,0,0,0,0,0,0,1,1,1,0,1,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1,1,0,0,0,0,0,0,0,0,1,0,1,1,1,0,0,0,0,0,0,0,0,0,1,1,0,0,1,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0,0,1,0,0,0,1,0,0,1,1,0,0,0,0,0,0, 1,1,1,0,0,0,1,0,0,0,0,0,

6、0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0, 1,1,0,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,1,1,0,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,0,0,0,0,1,1,1,0,0,1,0,0,0,0,0,0,1,0

7、,0,0,1,1,0,0,1,0,0,0,0,0,0,0,0,1,0,0,1,1,1,0,0,0,0,0.0,0,0,0,0,1,0,0,1,1,0,0,0,1,0,0,0,0,0,0 ;/* 隨機得到當(dāng)前方塊和下一個方塊的形狀和方向 */void boxrad()minboxcolor=nextminboxcolor;boxgs=nextboxgs;boxfx=nextboxfx;nextminboxcolor=random(14)+1;if(nextminboxcolor=4|nextminboxcolor=7|nextminboxcolor=8)nextminboxcolor=9;nex

8、tboxfx=F_DONG;nextboxgs=random(7);/* 初始化圖形模試 */void init(int gdrive,int gmode)int errorcode;initgraph(&gdrive,&gmode,e:tc);errorcode=graphresult();if(errorcode!=grOk) printf(error of: %s,grapherrormsg(errorcode);exit(1);/* 在圖形模式下的清屏 */void cls()setfillstyle(SOLID_FILL,0);setcolor(0);bar(0,0,640,480)

9、;/* 在圖形模式下的高級清屏 */void clscr(int a,int b,int c,int d,int color)setfillstyle(SOLID_FILL,color);setcolor(color);bar(a,b,c,d);/* 最小方塊的繪制 */void minbox(int asc,int bsc,int color,int bdcolor)int a=0,b=0;a=SCCOL+asc;b=SCROW+bsc;clscr(a+1,b+1,a-1+MINBOXSIZE,b-1+MINBOXSIZE,color); if(color!=BGCOLOR)setcolor

10、(bdcolor);line(a+1,b+1,a-1+MINBOXSIZE,b+1);line(a+1,b+1,a+1,b-1+MINBOXSIZE);line(a-1+MINBOXSIZE,b+1,a-1+MINBOXSIZE,b-1+MINBOXSIZE);line(a+1,b-1+MINBOXSIZE,a-1+MINBOXSIZE,b-1+MINBOXSIZE); /* 游戲中出現(xiàn)的文字 */ void txt(int a,int b,char *txt,int font,int color) setcolor(color);settextstyle(0,0,font); outtext

11、xy(a,b,txt);/*windows 繪制 */void win(int a,int b,int c,int d,int bgcolor,int bordercolor) clscr(a,b,c,d,bgcolor); setcolor(bordercolor);line(a,b,c,b);line(a,b,a,d);line(a,d,c,d); line(c,b,c,d);/* 當(dāng)前方塊的繪制 */void funbox(int a,int b,int color,int bdcolor) int i,j;int boxz44;for(i=0;i16;i+)boxzi/4i%4=box

12、strboxgsboxfxi;for(i=0;i4;i+)for(j=0;j4;j+)if(boxzij=1)minbox(j+row+a)*MINBOXSIZE,(i+col+b)*MINBOXSIZE,color,bdcolor); /* 下一個方塊的繪制 */void nextfunbox(int a,int b,int color,int bdcolor)int i,j;int boxz44;for(i=0;i16;i+) boxzi/4i%4=boxstrnextboxgsnextboxfxi; for(i=0;i4;i+) for(j=0;j1;i-)for(j=1;j15;j+)

13、minbox(j*MINBOXSIZE,i*MINBOXSIZE,BGCOLOR,BGCOLOR);grilij=grili-1j;if(grilij=1)minbox(j*MINBOXSIZE,i*MINBOXSIZE,minboxcolor,0);/* 消掉所有都有最小方塊的行 */ void delete() int i,j,zero,delgx=0;char *nm=00000;for(i=1;i21;i+)zero=0;for(j=1;j15;j+)if(grilj=0)zero=1;if(zero=0)delcol(i);delgx+;num=num+delgx*delgx*10;

14、 dj=num/10000;sprintf(nm,%d,num);clscr(456,173,500,200,4);txt(456,173,Number:,1,15);txt(456,193,nm,1,15);/* 時間中斷結(jié)束 */void KillTimer()disable();setvect(TIMER,oldhandler);enable();/* 測試當(dāng)前方塊是否可以向下落 */int downok()int i,j,k=1,a44;for(i=0;i16;i+)ai/4i%4=boxstrboxgsboxfxi;for(j=0;j4;j+)if(aj & grilcol+i+1r

15、ow+j) k=0;return(k);/* 測試當(dāng)前方塊是否可以向左行 */int leftok()int i,j,k=1,a44;for(i=0;i16;i+)ai/4i%4=boxstrboxgsboxfxi;for(i=0;i4;i+)for(j=0;j4;j+)if(aj & grilcol+irow+j-1)k=0;return(k);/* 測試當(dāng)前方塊是否可以向右行 */int rightok() int i,j,k=1,a44;for(i=0;i16;i+)ai/4i%4=boxstrboxgsboxfxi;for(i=0;i4;i+)for(j=0;j4;j+)if(aj &

16、 grilcol+irow+j+1)k=0;return(k);/* 測試當(dāng)前方塊是否可以變形 */int upok()int i,j,k=1,a44;for(i=0;i4;i+)for(i=0;i=0;i-) for(j=3;j=0;j-)if(aj & grilcol+irow+j)k=0;return(k);/* 當(dāng)前方塊落下之后，給屏幕坐標(biāo)作標(biāo)記 */void setgril()int i,j,a44;funbox(0,0,minboxcolor,0);for(i=0;i16;i+)ai/4i%4=boxstrboxgsboxfxi;for(i=0;i4;i+)for(j=0;j0;i

17、-)for(j=1;jgamedjdj)TimerCounter=0;if(downok()funbox(0,0,BGCOLOR,BGCOLOR);col+;funbox(0,0,minboxcolor,0);else if(col=1)gameover();getch() ();break;setgril();delete();funbox(0,0,minboxcolor,0);col=1;row=7;funbox(0,0,BGCOLOR,BGCOLOR); nextfunbox(NEXTCOL,NEXTROW,4,4); boxrad();nextfunbox(NEXTCOL,NEXTROW,nextminboxcolor,0); /* 主程序開始 */void main(void)int i,j;char *nm=00000;init(VGA,VGAHI);cls();/* 屏幕坐標(biāo)初始化 */for(i=0;i=MAXCOL+1;i+) for(j=0;j=MAXROW+1;j+)grilij=0;for(i=0;i=MAXCOL+1;i+) grili0=1;grili15=1;for(j=1;j=MAXROW;j+)gril0j=1;gril21j=1;clscr(0,0,640,480,15);win(1,1,639,479