俄罗斯方块C语言代码.docx
《俄罗斯方块C语言代码.docx》由会员分享，可在线阅读，更多相关《俄罗斯方块C语言代码.docx（11页珍藏版）》请在冰点文库上搜索。
俄罗斯方块C语言代码
#include
#include
#include
#include
#include
#ifdef__cplusplus
#define__CPPARGS...
#else
#define__CPPARGS
#endif
#defineMINBOXSIZE15/*最小方块的尺寸*/
#defineBGCOLOR7/*背景着色*/
#defineGX200
#defineGY10
#defineSJNUM10000/*每当玩家打到一万分等级加一级*/
/*按键码*/
#defineVK_LEFT0x4b00
#defineVK_RIGHT0x4d00
#defineVK_DOWN0x5000
#defineVK_UP0x4800
#defineVK_HOME0x4700
#defineVK_END0x4f00
#defineVK_SPACE0x3920
#defineVK_ESC0x011b
#defineVK_ENTER0x1c0d
/*定义俄罗斯方块的方向（我定义他为4种）*/
#defineF_DONG0
#defineF_NAN1
#defineF_XI2
#defineF_BEI3
#defineNEXTCOL20/*要出的下一个方块的纵坐标*/
#defineNEXTROW12/*要出的下一个方块的横从标*/
#defineMAXROW14/*游戏屏幕大小*/
#defineMAXCOL20
#defineSCCOL100/*游戏屏幕大显示器上的相对位置*/
#defineSCROW60
intgril[22][16];/*游戏屏幕坐标*/
intcol=1,row=7;/*当前方块的横纵坐标*/
intboxfx=0,boxgs=0;/*当前寺块的形壮和方向*/
intnextboxfx=0,nextboxgs=0,maxcol=22;/*下一个方块的形壮和方向*/
intminboxcolor=6,nextminboxcolor=6;
intnum=0;/*游戏分*/
intdj=0,gamedj[10]={18,16,14,12,10,8,6,4,2,1};/*游戏等级*/
/*以下我用了一个3维数组来纪录方块的最初形状和方向*/
intboxstr[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}}
};
/*随机得到当前方块和下一个方块的形状和方向*/
voidboxrad（）{
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）;
}
/*初始化图形模试*/
voidinit（intgdrive,intgmode）{
interrorcode;
initgraph（&gdrive,&gmode,"e:
\\tc"）;
errorcode=graphresult（）;
if（errorcode!
=grOk）{
printf（"errorof:
%s",grapherrormsg（errorcode））;
exit
（1）;
}
}
/*在图形模式下的清屏*/
voidcls（）
{
setfillstyle（SOLID_FILL,0）;
setcolor（0）;
bar（0,0,640,480）;
}
/*在图形模式下的高级清屏*/
voidclscr（inta,intb,intc,intd,intcolor）{
setfillstyle（SOLID_FILL,color）;
setcolor（color）;
bar（a,b,c,d）;
}
/*最小方块的绘制*/
voidminbox（intasc,intbsc,intcolor,intbdcolor）{
inta=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）;
}
}
/*游戏中出现的文字*/
voidtxt（inta,intb,char*txt,intfont,intcolor）{
setcolor（color）;
settextstyle（0,0,font）;
outtextxy（a,b,txt）;
}
/*windows绘制*/
voidwin（inta,intb,intc,intd,intbgcolor,intbordercolor）{
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）;
}
/*当前方块的绘制*/
voidfunbox（inta,intb,intcolor,intbdcolor）{
inti,j;
intboxz[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）;
}
/*下一个方块的绘制*/
voidnextfunbox（inta,intb,intcolor,intbdcolor）{
inti,j;
intboxz[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）;
}
/*时间中断定义*/
#defineTIMER0x1c
intTimerCounter=0;
voidinterrupt（*oldhandler）（__CPPARGS）;
voidinterruptnewhandler（__CPPARGS）{
TimerCounter++;
oldhandler（）;
}
voidSetTimer（voidinterrupt（*IntProc）（__CPPARGS））{
oldhandler=getvect（TIMER）;
disable（）;
setvect（TIMER,IntProc）;
enable（）;
}
/*由于游戏的规则，消掉都有最小方块的一行*/
voiddelcol（inta）{
inti,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）;
}
}
/*消掉所有都有最小方块的行*/
voiddelete（）{
inti,j,zero,delgx=0;
char*nm="00000";
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,"%d",num）;
clscr（456,173,500,200,4）;
txt（456,173,"Number:
",1,15）;
txt（456,193,nm,1,15）;
}
/*时间中断结束*/
voidKillTimer（）{
disable（）;
setvect（TIMER,oldhandler）;
enable（）;
}
/*测试当前方块是否可以向下落*/
intdownok（）{
inti,j,k=1,a[4][4];
for（i=0;i<16;i++）
a[i/4][i%4]=boxstr[boxgs][boxfx][i];
for（i=0;i<4;i++）
for（j=0;j<4;j++）
if（a[j]&&gril[col+i+1][row+j]）
k=0;
return（k）;
}
/*测试当前方块是否可以向左行*/
intleftok（）{
inti,j,k=1,a[4][4];
for（i=0;i<16;i++）
a[i/4][i%4]=boxstr[boxgs][boxfx][i];
for（i=0;i<4;i++）
for（j=0;j<4;j++）
if（a[j]&&gril[col+i][row+j-1]）
k=0;
return（k）;
}
/*测试当前方块是否可以向右行*/
intrightok（）{
inti,j,k=1,a[4][4];
for（i=0;i<16;i++）
a[i/4][i%4]=boxstr[boxgs][boxfx][i];
for（i=0;i<4;i++）
for（j=0;j<4;j++）
if（a[j]&&gril[col+i][row+j+1]）
k=0;
return（k）;
}
/*测试当前方块是否可以变形*/
intupok（）{
inti,j,k=1,a[4][4];
for（i=0;i<4;i++）
for（i=0;i<16;i++）
a[i/4][i%4]=boxstr[boxgs][boxfx+1][i];
for（i=3;i>=0;i--）
for（j=3;j>=0;j--）
if（a[j]&&gril[col+i][row+j]）
k=0;
return（k）;
}
/*当前方块落下之后，给屏幕坐标作标记*/
voidsetgril（）{
inti,j,a[4][4];
funbox（0,0,minboxcolor,0）;
for（i=0;i<16;i++）
a[i/4][i%4]=boxstr[boxgs][boxfx][i];
for（i=0;i<4;i++）
for（j=0;j<4;j++）
if（a[j]）
gril[col+i][row+j]=1;
col=1;row=7;
}
/*游戏结束*/
voidgameover（）{
inti,j;
for（i=20;i>0;i--）
for（j=1;j<15;j++）
minbox（j*MINBOXSIZE,i*MINBOXSIZE,2,0）;
txt（103,203,"GameOver",3,10）;
}
/*按键的设置*/
voidcall_key（intkeyx）{
switch（keyx）{
caseVK_DOWN:
{/*下方向键，横坐标加一。
*/
if（downok（））{
col++;
funbox（0,0,minboxcolor,0）;}
else{
funbox（0,0,minboxcolor,0）;
setgril（）;
nextfunbox（NEXTCOL,NEXTROW,4,4）;
boxrad（）;
nextfunbox（NEXTCOL,NEXTROW,nextminboxcolor,0）;
delete（）;
}
break;
}
caseVK_UP:
{/*上方向键，方向形状旋转90度*/
if（upok（））
boxfx++;
if（boxfx>3）
boxfx=0;
funbox（0,0,minboxcolor,0）;
break;
}
caseVK_LEFT:
{/*左方向键，纵坐标减一*/
if（leftok（））
row--;
funbox（0,0,minboxcolor,0）;
break;
}
caseVK_RIGHT:
{/*右方向键，纵坐标加一*/
if（rightok（））
row++;
funbox（0,0,minboxcolor,0）;
break;
}
caseVK_SPACE:
/*空格键，直接落到最后可以落到的们置*/
while（downok（））
col++;
funbox（0,0,minboxcolor,0）;
setgril（）;
nextfunbox（NEXTCOL,NEXTROW,4,4）;
boxrad（）;
nextfunbox（NEXTCOL,NEXTROW,nextminboxcolor,0）;
delete（）;
break;
default:
{
txt（423,53,"worngkey!
",1,4）;
txt（428,80,"PleseEnterAnlyKeyAG!
",1,4）;
getch（）（）;
clscr（420,50,622,97,BGCOLOR）;
}
}
}
/*时间中断开始*/
voidtimezd（void）{
intkey;
SetTimer（newhandler）;
boxrad（）;
nextfunbox（NEXTCOL,NEXTROW,nextminboxcolor,0）;
for（;;）{
if（bioskey
（1））{
key=bioskey（0）;
funbox（0,0,BGCOLOR,BGCOLOR）;
if（key==VK_ESC）
break;
call_key（key）;
}
if（TimerCounter>gamedj[dj]）{
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）;
}
}
}
}
/*主程序开始*/
voidmain（void）{
inti,j;
char*nm="00000";
init（VGA,VGAHI）;
cls（）;
/*屏幕坐标初始化*/
for（i=0;i<=MAXCOL+1;i++）
for（j=0;j<=MAXROW+1;j++）
gril[i][j]=0;
for（i=0;i<=MAXCOL+1;i++）{
gril[i][0]=1;
gril[i][15]=1;
}
for（j=1;j<=MAXROW;j++）{
gril[0][j]=1;
gril[21][j]=1;
}
clscr（0,0,640,480,15）;
win（1,1,639,479,4,15）;
win（SCCOL+MINBOXSIZE-2,SCROW+MINBOXSIZE-2,SCCOL+15*MINBOXSIZE+2,SCROW+21*MINBOXSIZE+2,BGCOLOR,0）;
nextboxgs=random（8）;
nextboxfx=random（4）;
sprintf（nm,"%d",num）;
txt（456,173,"Number:
",1,15）;
txt（456,193,nm,1,15）;
txt（456,243,"NextBox:
",1,15）;
timezd（）;
KillTimer（）;
closegraph（）;
getch（）（）;
}
升级会员 