c语言Turbo C下写的俄罗斯方块源码

#include <stdio.h> #include <dos.h> #include <conio.h> #include <graphics.h> #include <stdlib.h> #ifdef __cplusplus #define __CPPARGS ... #else #define __CPPARGS #endif #define MINBOXSIZE 15 /* 单方块的大小 */ #define BGCOLOR 7 /* 背景着色 */ #define GAMEX 200 #define GAMEY 10 #define LEVA 300 /* 每当玩家打到三百分等级加一级*/ /* 【自学去】网站收集 http://www.zixue7.com */ /* 按键码*/ #define VK_LEFT 0x4b00 #define VK_RIGHT 0x4d00 #define VK_DOWN 0x5000 #define VK_UP 0x4800 #define VK_HOME 0x4700 #define VK_END 0x4f00 #define VK_SPACE 0x3920 #define VK_ESC 0x011b #define VK_ENTER 0x1c0d /* 定义俄罗斯方块的方向*/ #define F_S 0 #define STARTCOL 20 /* 要出的下一个方块的纵坐标*/ #define STARTROW 12 /* 要出的下一个方块的横从标*/ #define WINSROW 14 /* 游戏屏幕大小*/ #define WINSCOL 20 #define LWINSCOL 100 /*游戏屏幕大显示器上的相对位置*/ #define LWINSROW 60 int gwins[22][16]; /* 游戏屏幕坐标*/ int col=1,row=7; /* 当前方块的横纵坐标*/ int nbx=0,nbs=0; /* 当前寺块的形壮和方向*/ int nextnbx=0,nextnbs=0,maxcol=22;/*下一个方块的形壮和方向*/ int minbscolor=6,nextminbscolor=6; int num=0; /*游戏分*/ int leav=0,gameleav[10]={18,16,14,12,10,8,6,4,2,1};/* 游戏等级*/ /* 以下我用了一个3维数组来纪录方块的最初形状和方向*/ int boxstastu[7][4][16]={{ {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,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,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,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}} }; /* 随机得到当前方块和下一个方块的形状和方向*/ void boxrad(){ minbscolor=nextminbscolor; nbs=nextnbs; nbx=nextnbx; nextminbscolor=random(14)+1; if(nextminbscolor==4||nextminbscolor==7||nextminbscolor==8) nextminbscolor=9; nextnbx=F_S; nextnbs=random(7); } /*初始化图形模试*/ void init(int gdrive,int gmode){ int errorcode; initgraph(&gdrive,&gmode,"c:\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); } /*在图形模式下的高级清屏*/ void clscr(int a,int b,int c,int d,int color) { setfillstyle(SOLID_FILL,color); setcolor(color); bar(a,b,c,d); } /*最小方块的绘制*/ void onebox(int asc,int bsc,int color,int bdcolor) { int a=0,b=0; a=LWINSCOL+asc; b=LWINSROW+bsc; clscr(a+1,b+1,a-1+MINBOXSIZE,b-1+MINBOXSIZE,color); if(color!=BGCOLOR) { setcolor(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); } } /*游戏中出现的文字*/ void texts(int a,int b,char *texts,int font,int color) { setcolor(color); settextstyle(0,0,font); outtextxy(a,b,texts); } /*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); } /* 当前方块的绘制*/ void funbox(int a,int b,int color,int bdcolor) { int i,j; int boxz[4][4]; for(i=0;i<16;i++) boxz[i/4][i%4]=boxstastu[nbs][nbx][i]; for(i=0;i<4;i++) for(j=0;j<4;j++) if(boxz[i][j]==1) onebox((j+row+a)*MINBOXSIZE,(i+col+b)*MINBOXSIZE,color,bdcolor); } /*下一个方块的绘制*/ void nextfunbox(int a,int b,int color,int bdcolor) { int i,j; int boxz[4][4]; for(i=0;i<16;i++) boxz[i/4][i%4]=boxstastu[nextnbs][nextnbx][i]; for(i=0;i<4;i++) for(j=0;j<4;j++) if(boxz[i][j]==1) onebox((j+a)*MINBOXSIZE,(i+b)*MINBOXSIZE,color,bdcolor); } /*时间中断定义*/ #define TIMER 0x1c int TimerCounter=0; void interrupt( *oldhandler)(__CPPARGS); void interrupt newhandler(__CPPARGS) { TimerCounter++; oldhandler(); } void SetTimer(void interrupt (*IntProc)(__CPPARGS)) { oldhandler=getvect(TIMER); disable(); setvect(TIMER,IntProc); enable(); } /*由于游戏的规则，消掉都有最小方块的一行*/ void delcol(int a) { int i,j; for(i=a;i>1;i--) for(j=1;j<15;j++) { onebox(j*MINBOXSIZE,i*MINBOXSIZE,BGCOLOR,BGCOLOR); gwins[i][j]=gwins[i-1][j]; if(gwins[i][j]==1) onebox(j*MINBOXSIZE,i*MINBOXSIZE,minbscolor,0); } } /*消掉所有都有最小方块的行*/ void delete(){ int i,j,zero,delgx=0; char *nm="00000"; for(i=1;i<21;i++){ zero=0; for(j=1;j<15;j++) if(gwins[i][j]==0) zero=1; if(zero==0){ delcol(i); delgx++; } } num=num+delgx*delgx*10; leav=num/10000; sprintf(nm,"%d",num); clscr(456,173,500,200,4); texts(456,173,"Number:",1,15); texts(456,193,nm,1,15); } /*时间中断结束*/ void KillTimer() { disable(); setvect(TIMER,oldhandler); enable(); } /* 测试当前方块是否可以向下落*/ int downok() { int i,j,k=1,a[4][4]; for(i=0;i<16;i++) a[i/4][i%4]=boxstastu[nbs][nbx][i]; for(i=0;i<4;i++) for(j=0;j<4;j++) if(a[i][j] && gwins[col+i+1][row+j]) k=0; return(k); } /* 测试当前方块是否可以向左行*/ int leftok() { int i,j,k=1,a[4][4]; for(i=0;i<16;i++) a[i/4][i%4]=boxstastu[nbs][nbx][i]; for(i=0;i<4;i++) for(j=0;j<4;j++) if(a[i][j] && gwins[col+i][row+j-1]) k=0; return(k); } /* 测试当前方块是否可以向右行*/ int rightok() { int i,j,k=1,a[4][4]; for(i=0;i<16;i++) a[i/4][i%4]=boxstastu[nbs][nbx][i]; for(i=0;i<4;i++) for(j=0;j<4;j++) if(a[i][j] && gwins[col+i][row+j+1]) k=0; return(k); } /* 测试当前方块是否可以变形*/ int upok() { int i,j,k=1,a[4][4]; for(i=0;i<4;i++) for(i=0;i<16;i++) a[i/4][i%4]=boxstastu[nbs][nbx+1][i]; for(i=3;i>=0;i--) for(j=3;j>=0;j--) if(a[i][j] && gwins[col+i][row+j]) k=0; return(k); } /*当前方块落下之后，给屏幕坐标作标记*/ void setgwins() { int i,j,a[4][4]; funbox(0,0,minbscolor,0); for(i=0;i<16;i++) a[i/4][i%4]=boxstastu[nbs][nbx][i]; for(i=0;i<4;i++) for(j=0;j<4;j++) if(a[i][j]) gwins[col+i][row+j]=1; col=1;row=7; } /*游戏结束*/ void gameover() { int i,j; for(i=20;i>0;i--) for(j=1;j<15;j++) onebox(j*MINBOXSIZE,i*MINBOXSIZE,2,0); texts(103,203,"Game Over",3,10); } /*按键的设置*/ void call_key(int keyx) { switch(keyx){ case VK_DOWN: { /*下方向键，横坐标加一。*/ if(downok()){ col++; funbox(0,0,minbscolor,0); } else{ funbox(0,0,minb