简明易懂的C语言俄罗斯方块_c语言吧

sunnisdu
2位粉丝

1楼

/*-------------------------------------------------------*/
/*  sunwise 整理于 2002/5/27/14:35  Original 1999   */
/*                                                       */
/*-------------------------------------------------------*/

/*-------------  Compile  ------------------------------ */
/*        [in os mode:]                                  */
/*            bgiobj  egavga                             */
/*            tlib    lib\graphics.lib+egavga            */
/*        [in TC: ]      */
/*       make exe      */
/*-------------------------------------------------------*/
#include <stdlib.h>
#include <graphics.h>
#include <bios.h>
#define mDRAW     5
#define mLINE     6
#define mADOWN    7
#define mGEN      8
#define mLEFT     75
#define mRIGHT    77
#define mSPACE    57
#define mDOWN     80
#define mESC      1
#define TIMEINT   2
#define MAXX      9
#define MAXY   30
#define BACKCOLOR BLACK
#define WINX      50
#define WINY      470
#define GAP       6
#define AREAX     (WINX+GAP)
#define AREAY     (WINY-GAP)
#define BOXW      15

int oldarea[MAXY+1][MAXX];
int area[MAXY+1][MAXX];
int actW,actH,actX,actY;
int curX,curY,curColor,curW,curH;
int newX,newY,newColor,newW,newH;
int active;
int box[4][4];
int FORCOLOR;
int MESSAGE;
int BOX[7][4][4]={
{
  {1,1,1,1},
  {0,0,0,0},
  {0,0,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}
}
};

void init();
void draw();
int genBox();
int getKey();
void lineFull();
int moveLeft();
int moveRight();
int moveDown();
int rotate();
int getW();
int getH();
void clearOldBox();
void putNewBox();
int collisionRotate(int box[][4]);
void getMessage();
void dispatchMessage();
int timeCome();
void fallDown();
int gameOver();

main()
{
int i;
init();
do
{
  getMessage();
  dispatchMessage();
}
while(!gameOver());

getch();
closegraph();
}

void getMessage()
{
if(MESSAGE) return;
if(timeCome())
{
  MESSAGE=mADOWN;
  return;
}
if(bioskey(1))
{
  MESSAGE=bioskey(0)>>8;
  return;
}
}

void dispatchMessage()
{
switch(MESSAGE)
{
  case mLEFT:  moveLeft();break;
  case mRIGHT: moveRight();break;
  case mADOWN: moveDown();break;
  case mSPACE: rotate();break;
  case mDOWN:  fallDown(); break;
  case mDRAW:  draw();break;
  case mLINE:  lineFull();break;
  case mGEN:   genBox();break;
  case mESC:   closegraph(); exit(0);
  default:     MESSAGE=0;
}
}

void fallDown()
{
while(active)
{
  moveDown(); draw();
}

MESSAGE=mLINE;
}

int timeCome()
{

static long tm, old;
tm=biostime(0,tm);
if(tm-old<TIMEINT) return 0;
else
{
  old=tm; return 1;
}
}

void init()
{
int i,j,x1,y1,x2,y2;
int driver=DETECT, mode=0;

2005-3-26 11:05
回复

sunnisdu
2位粉丝

2楼

randomize();
registerbgidriver(EGAVGA_driver);
initgraph(&driver,&mode,"");
cleardevice();
setfillstyle(SOLID_FILL,BLUE);
bar(0,0,639,479);
x1=AREAX;
y1=AREAY-BOXW*MAXY;
x2=AREAX+MAXX*BOXW;
y2=AREAY;
rectangle(--x1,--y1,++x2,++y2);
setfillstyle(SOLID_FILL,BLACK);
bar(++x1,++y1,--x2,--y2);
y1=AREAY-MAXY*BOXW; y2=AREAY;
setcolor(DARKGRAY);
for(i=0;i<MAXX;i++)
{
  x1=AREAX+i*BOXW;
  line(x1,y1,x1,y2);
}

x1=AREAX; x2=x1+MAXX*BOXW;
for(j=0;j<MAXY;j++)
{
  y1=AREAY-j*BOXW;
  line(x1,y1,x2,y1);
}
for(j=0;j<MAXY;j++)
  for(i=0;i<MAXX;i++)
   area[j][i]=oldarea[j][i]=0;
actX=0; actY=0; actW=MAXX-1; actH=MAXY-1;
draw();
MESSAGE=mGEN;
}

int genBox()
{
int i,j,boxidx;
boxidx=random(7); FORCOLOR=random(7)+1;
for(j=0;j<4;j++)
  for(i=0;i<4;i++)
   box[j][i]=BOX[boxidx][j][i];
curW=getW(); curH=getH();
curX=(MAXX+curW)/2;
if(curX+curW>=MAXX)curX=MAXX-1-curW;
curY=MAXY-1-curH;
newX=curX; newY=curY; actX=curX;actY=curY;
actW=newW=curW; actH=newH=curH;
active=1;
if(collision(box)) return 0;
putNewBox();
draw(); MESSAGE=0;
return 1;
}

void lineFull()
{
int row,col, rowEnd,full,i,j;
rowEnd=newY+newH;
if(rowEnd>=MAXY-1) rowEnd=MAXY-2;
for(row=newY; row<=rowEnd;)
{
  full=1;
  for(col=0;col<MAXX;col++)
   if(!area[row][col]){full=0; break;}
  if(!full){++row; continue;}
  for(j=row; j<MAXY-1;j++)
   for(i=0;i<MAXX;i++)
    area[j][i]=area[j+1][i];
  actX=0;actY=row; actW=MAXX-1; actH=MAXY-1-row;
  draw(); rowEnd--;
}
MESSAGE=mGEN;
}

void draw()
{
int row,col,x1,y1,x2,y2;
for(row=actY;row<=actY+actH;row++)
  for(col=actX;col<=actX+actW;col++)
   if(area[row][col]!=oldarea[row][col])
   {
    if(area[row][col]==0)
     setfillstyle(SOLID_FILL,BACKCOLOR);
    else
     setfillstyle(SOLID_FILL,FORCOLOR);

    x1=AREAX+col*BOXW; x2=x1+BOXW;
    y1=AREAY-(row+1)*BOXW; y2=y1+BOXW;
    bar(++x1,++y1,--x2,--y2);
    oldarea[row][col]=area[row][col];
   }

MESSAGE=0;
}

int moveLeft()
{
newX=curX-1; clearOldBox();
if(collision(box))
{
  newX=curX;
  putNewBox();
  MESSAGE=0;
  return 0;
}
putNewBox();
actW=curW+1; actX=curX=newX;
MESSAGE=mDRAW;
return 1;
}

int moveRight()
{
newX=curX+1; clearOldBox();
if(collision(box))
{
  newX=curX;
  putNewBox();
  MESSAGE=0;
  return 0;
}
putNewBox();
actW=curW+1; actX=curX; curX=newX;
MESSAGE=mDRAW;
return 1;
}

int moveDown()
{
int i,j;
newY=curY-1;
clearOldBox();
if(collision(box))
{
  newY=curY;
  putNewBox();
  active=0;
  MESSAGE=mLINE;
  return 0;
}
putNewBox();
actH=curH+1; actY=newY; curY=newY;
MESSAGE=mDRAW;
return 1;
}

int rotate()
{
int newBox[4][4];
int i,j;
clearOldBox();

for(j=0;j<4;j++)
  for(i=0;i<4;i++)
   newBox[j][i]=0;

for(j=0;j<4;j++)
  for(i=0;i<4;i++)
   newBox[curW-i][j]=box[j][i];
newW=curH; newH=curW;
if(collisionRotate(newBox))
{
  newW=curW; newH=curH; newX=curX; newY=curY;
  putNewBox();
  MESSAGE=0;
  return 0;
}

for(j=0;j<4;j++)
  for(i=0;i<4;i++)
   box[j][i]=newBox[j][i];
putNewBox();
actH=newH>curH? newH:curH;
actW=curX+actH-newX;
actX=newX; actY=newY; curX=newX;
curY=newY; curW=newW; curH=newH;
MESSAGE=mDRAW;
return 1;
}

int getW()
{
int i,j;
for(i=3;i>0;i--)
  for(j=0;j<4;j++)
   if(box[j][i]) return i;
return 0;
}

int getH()
{
int i,j;
for(j=3;j>0;j--)
  for(i=0;i<4;i++)
   if(box[j][i]) return j;
return 0;
}

void clearOldBox()
{
int i,j;
for(j=0;j<=curH; j++)
  for(i=0;i<=curW; i++)
   if(box[j][i])
    area[curY+j][curX+i]=0;
}

void putNewBox()
{
int i,j;
for(j=0;j<=newH;j++)
  for(i=0;i<=newW;i++)
   if(box[j][i])
    area[newY+j][newX+i]=FORCOLOR;
}

int collision(int cbox[][4])
{
int i,j;
if(newX<0) return 1;
if(newX+newW>=MAXX) return 1;
if(newY<0) return 1;
for(j=0;j<=newH;j++)
  for(i=0;i<=newW;i++)
   if(area[newY+j][newX+i]&&cbox[j][i]) return 1;
return 0;
}

int collisionRotate(int cbox[][4])
{
int i,j;
if(newX+newW>=MAXX) newX=MAXX-1-newW;
if(newY+newH>=MAXY) newY=MAXY-1-newH;
if(collision(cbox)) return 1;
for(i=0;i<=newW;i++)
  for(j=0;j<=newH;j++)
   if(area[newY+j][newX+i])
   {
    newX-=newW-i+1; goto L;
   }
L: return collision(cbox);
}

int gameOver()
{
if(!active &&(curY+curH>MAXY-3)) return 1;
else return 0;
}

/*                  the end                              */

2005-3-26 11:05
回复

218.19.34.*	3楼不错，不足8K就完成了该有的功能.
2005-3-26 18:51 回复

水流星007 0位粉丝	4楼太长，晕啊
2005-3-27 10:13 回复

面壁十年图破壁 0位粉丝	5楼你发这么长的有几个有耐心看下去呀还是给他们发点短的吧
2005-3-27 10:58 回复

hakewei 0位粉丝	6楼我是初学的哈! 好长,! 不过我拿在tc里编译还没一个错的!就是不能连接!
2005-3-27 20:39 回复

hakewei 0位粉丝	7楼佩服!厉害!
2005-3-27 20:39 回复

sunnisdu 2位粉丝	8楼你要先进TC的File菜单中的 OS shell 菜单,在里面打入以下命令 bgiobj egavga tlib lib\graphics.lib+egavga 这是因为程序中用到图像驱动程序，上面的命令可以把驱动程序打包到可执行文件中，否则的话，编译好的程序放在别的地方不易的能用。这也是程序中为什么用到 registerbgidriver函数的原因。
2005-3-27 21:41 回复

sunnisdu 2位粉丝	9楼直接把程序中的 registerbgidriver 那一行去掉也可以
2005-3-27 22:06 回复

194.138.240.*	10楼要是有流程图就好了
2005-3-29 16:30 回复

61.191.25.*	11楼时间太快了。，谁能告诉我把时间调慢点?调什么啊？
2005-3-29 18:27 回复

sunnisdu 2位粉丝	12楼 #define TIMEINT 2 这一句中的2改大点就慢了.
2005-3-29 19:42 回复

219.133.136.*	13楼怎么我把程序复制下来，在tc3运行不起来？按照8、9楼的朋友方法都不行！求救～～～
2005-4-14 10:42 回复

202.194.196.*	14楼可能 TC3没有相应的图形驱动程序，你把 TC2里的 egavga.bgi 拷贝的TC3目录试试。
2005-4-15 12:00 回复

218.24.137.*	15楼我用的win tc 可以玩
2005-5-16 10:02 回复

222.183.120.*	16楼我在天极写过注释。
2005-5-16 11:29 回复

218.80.163.*	17楼请问上面程序的注释在哪？如何才能搜索到？哪位能告诉我！拜托了！
2005-5-23 16:06 回复

本不认命 0位粉丝	18楼师兄啊运行的时候出错了 BGI Error:Graphics not initailzed (use"initgraph") 什么意思啊？？？？？？
2005-5-23 19:58 回复

203.118.142.*	19楼注释太少,虽然看的懂但是对新人来说不是很好
2005-6-11 10:32 回复

221.4.182.*	20楼 e:\r.c(14) : fatal error C1083: Cannot open include file: 'graphics.h': No such file or directory Error executing cl.exe. r.obj - 1 error(s), 0 warning(s)
2005-6-21 09:39 回复

219.243.12.*	21楼 jjjh
2005-7-2 18:21 回复

221.203.5.*	22楼需要注释................
2005-7-21 11:04 回复

221.217.185.*	23楼帅气
2005-8-7 22:04 回复

202.103.10.*	24楼比我写的好啊
2005-9-1 11:32 回复

211.162.140.*	25楼 error C1083: 无法打开包含文件:“graphics.h”: No such file or directory
2005-9-24 01:02 回复

222.195.231.*	26楼注释注释注释注释注释注释注释注释注释注释注释注释注释注释注释注释注释注释注释注释注释注释注释注释注释注释注释注释注释注释注释注释注释注释注释注释
2005-10-20 20:50 回复

众里鲟 2位粉丝	27楼牛人。。。俺初学，拷下来慢慢读。。。
2005-10-21 00:04 回复

丹果皮 0位粉丝	28楼有没办法更改你这个的游戏速度,啊哦,太长了,不愿意看玩起来好快呀,我根本就反映不过来
2005-10-21 19:06 回复

bohajiyu 0位粉丝	29楼我也是晕啊,还简单,我,抄代码抄的头都大了,能不能把代码直接COPY到TC中啊,我的机器太老,跑不了VC,所以不能COPY 到VC中,
2005-10-23 09:58 回复

61.167.60.*	30楼运行不起来,有一个错误,怎么回事?
2005-10-23 10:18 回复



内　容:
用户名:
验证码:	请点击后输入验证码，加入会员后本吧发贴免验证码。

简明易懂的C语言俄罗斯方块

发表回复