俄罗斯方块编程(3)

［5］段钢 编著 加密与解密（第三版）.电子工业出版社.2009年8月 ［6］ 潘锦平.软件系统开发技术.西安：西安电子科技大学出版社, 1997年

附录（源程序代码）

#include #include #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 /* 每当玩家打到一万分等级加一级*/ /* 按键码*/

#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

/* 定义俄罗斯方块的方向（我定义他为4种）*/ #define F_DONG 0 #define F_NAN 1 #define F_XI 2 #define F_BEI 3

#define NEXTCOL 20 /* 要出的下一个方块的纵坐标*/ #define NEXTROW 12 /* 要出的下一个方块的横从标*/ #define MAXROW 14 /* 游戏屏幕大小*/ #define MAXCOL 20

#define SCCOL 100 /*游戏屏幕大显示器上的相对位置*/ #define SCROW 60

int gril[22][16]; /* 游戏屏幕坐标*/

int col=1,row=7; /* 当前方块的横纵坐标*/

int boxfx=0,boxgs=0; /* 当前寺块的形壮和方向*/

int nextboxfx=0,nextboxgs=0,maxcol=22;/*下一个方块的形壮和方向*/ int minboxcolor=6,nextminboxcolor=6; int num=0; /*游戏分*/

int dj=0,gamedj[10]={18,16,14,12,10,8,6,4,2,1};/* 游戏等级*/ /* 以下我用了一个3维数组来纪录方块的最初形状和方向*/ int boxstr[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(){

minboxcolor=nextminboxcolor; boxgs=nextboxgs; boxfx=nextboxfx;

nextminboxcolor=random(14)+1;

if(nextminboxcolor==4||nextminboxcolor==7||nextminboxcolor==8) nextminboxcolor=9; nextboxfx=F_DONG; nextboxgs=random(7); }

/*初始化图形模试*/

void init(int gdrive,int gmode){ int errorcode;

initgraph(&gdrive,&gmode,\ errorcode=graphresult(); if(errorcode!=grOk){

printf(\ 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 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(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 txt(int a,int b,char *txt,int font,int color){ setcolor(color);

settextstyle(0,0,font); outtextxy(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); }

/* 当前方块的绘制*/

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]=boxstr[boxgs][boxfx][i]; for(i=0;i<4;i++) for(j=0;j<4;j++) if(boxz[i][j]==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 boxz[4][4]; for(i=0;i<16;i++)

boxz[i/4][i%4]=boxstr[nextboxgs][nextboxfx][i]; for(i=0;i<4;i++) for(j=0;j<4;j++) if(boxz[i][j]==1)

minbox((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++){

minbox(j*MINBOXSIZE,i*MINBOXSIZE,BGCOLOR,BGCOLOR); gril[i][j]=gril[i-1][j]; if(gril[i][j]==1)

minbox(j*MINBOXSIZE,i*MINBOXSIZE,minboxcolor,0); } }

/*消掉所有都有最小方块的行*/ void delete(){

int i,j,zero,delgx=0; char *nm=\ for(i=1;i<21;i++){ zero=0;

for(j=1;j<15;j++) if(gril[j]==0) zero=1;

if(zero==0){ delcol(i); delgx++; } }

num=num+delgx*delgx*10; dj=num/10000;

sprintf(nm,\ clscr(456,173,500,200,4); txt(456,173,\ txt(456,193,nm,1,15); }

/*时间中断结束*/