eluosi.txt

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

 简明易懂的C语言俄罗斯方块  
 /*-------------------------------------------------------*/ 
/*  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; 
 
 
  
 作者： sunnisdu  2005-3-26 11:05 　 回复此发言    
 
--------------------------------------------------------------------------------
 
2 简明易懂的C语言俄罗斯方块  
  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                              */