俄罗斯方块1.0版

  1 #include<graphics.h>
  2 #include"time.h"
  3 #include"math.h"
  4 #include"string.h"
  5 #include"stdlib.h"
  6 #include"stdio.h"
  7 #include"iostream.h"
  8 #include<conio.h>
  9 IMAGE img;
 10 int tem();
 11 int i2;
 12 int X=13;
 13 int Y=22;
 14 int x=4;
 15 int x_1;
 16 int y_1;
 17 int y=0;
 18 int g_x;
 19 int g_y;
 20 int c;
 21 int YN=0;
 22 int BYN;
 23 int news=1;
 24 int begin;
 25 int flge=1;
 26 int downtime=300;
 27 int luoji=0;
 28 //int cls[13][22]={1};
 29 int ql[4][4]={0};
 30 int g_b_x;
 31 int g_b_s;
 32 int g_b_z;
 33 int g_b_y;
 34 int get_b_x[13]={0};
 35 int get_g_s[13]={21,21,1,2,0,0};
 36 int b[4][4]={0}; //某类方块的值
 37 int a[13][22]={0};
 38 int a1[13][22]={0};
 39 int b1[4][4]={0}; //临时行列数列
 40 int g_tple;
 41 int g_tple1=2;
 42 int score=0;       //分数
 43 int N;              //关卡
 44 int T1[13][22]={0};
 45 int T[13][22]={0};//窗口行列数列
 46 // int T[13][17]={0,1,1,1,0,0,1,0,1,0,1};
 47 int up();
 48 int b_b1();
 49 int b1_b();
 50 int b1_a1();
 51 int bianjie();
 52   int g1_nextblock();
 53   int g_nextblock();
 54   int a_T();
 55   int aa1z();
 56   int aa1y();
 57   int a_a1();
 58   int a1_a();
 59   int T1_T();
 60   int T_T1();
 61   int run();
 62   void showa();
 63   int jiemian();
 64   int b_a();
 65   int clear();
 66   int cleara();
 67   int cleara1();
 68   int movedown();
 69   void get_fangxiang();
 70   int get_b_4();
 71   int get_g();
 72   void Make_b();
 73   void Make_T();
 74   void clear_b();
 75 
 76   int runing();
 77 #define GAME_X 600
 78 #define GAME_Y 700     
 79   int Block[][4] = 
 80     {
 81  //田字形
 82     {0, 0, 0, 0},
 83      {0, 1, 1, 0},
 84     {0, 1, 1, 0},
 85      {0, 0, 0, 0},
 86  //直线
 87     {0, 0, 0, 0},
 88     {1, 1, 1, 1},
 89     {0, 0, 0, 0},
 90     {0, 0, 0, 0},
 91  //
 92     {0, 0, 0, 0},
 93      {1, 1, 1, 0},
 94      {0, 1, 0, 0},
 95      {0, 0, 0, 0},
 96  //L
 97      {0, 1, 0, 0},
 98     {0, 1, 0, 0},
 99      {0, 1, 1, 0},
100      {0, 0, 0, 0},
101  //
102      {0, 1, 0, 0},
103     {0, 1, 0, 0},
104      {1, 1, 0, 0},
105      {0, 0, 0, 0},
106  //
107      {0, 0, 1, 0},
108      {0, 1, 1, 0},
109      {0, 1, 0, 0},
110      {0, 0, 0, 0},
111  //
112      {0, 1, 0, 0},
113      {0, 1, 1, 0},
114      {0, 0, 1, 0},
115      {0, 0, 0, 0},
116     }; 
117   //char mycolor[7][7]={‘RED‘,‘GREEN‘,‘YELLOW‘};
118   /*for(int i=0;i<28;i++)    {
119       for(int j=0;j<4;j++)
120           cout<<Block0[i][j];cout<<endl;  }    */
121   int init()
122   {
123       begin=1;N=1;
124       score=0;
125       return 0;
126   }
127 
128   int jiemian()       //主界面布局    （有全局变量GAME_X,GAME_Y
129 {
130  char mm[20]="下一块方块";
131 //int Y=700,X=600;   
132 initgraph(GAME_X,GAME_Y);
133 //setlinecolor(255);
134 HWND hwnd=GetHWnd();
135 SetWindowText(hwnd,"俄罗斯方块1.0版@www.baidu.com/p/y123456789xx98 ");
136 for(int i=0;i<GAME_X;i++)
137 {
138     setlinecolor(BLACK);
139     line(i,0,i,699);
140 }
141  setlinecolor(BLUE);
142 line(39,9,39,671);
143 line(39,671,431,671);
144 line(431,9,431,671);
145 line(39,9,431,9);
146 line(440,10,590,10);
147 line(440,400,590,400);
148 line(440,10,440,400);
149 line(590,10,590,400);    
150 setbkmode(TRANSPARENT);
151 settextcolor(RED);
152 outtextxy(450,40,mm);
153 line(440,220,590,220);
154 line(440,220,440,600);
155 line(440,600,590,600);
156 line(590,600,590,220);
157 outtextxy(450,230,"得分");
158 outtextxy(450,430,"关卡"); 
159 /*BeginBatchDraw();
160 for(i=0;i<13;i++)
161 for(int j=0;j<44;j++)
162 {
163     setlinecolor(RED);
164     fillrectangle(40+i*30,10+15*j,40+i*30,10+15*j);
165 }   EndBatchDraw();     
166 */return 0;
167 }
168   int g1_nextblock() //下一块方块存在b[][]数组中
169   {
170       for(int i1=0;i1<4;i1++){for(int j1=0;j1<4;j1++)
171       {       b[i1][j1]=Block[g_tple1*4+i1][j1];}
172       }
173       return 0;
174   }
175   int g_nextblock()      //随机产生下一块方块，放于b[4][4]中，且绘制右边（b）布局 显示得分和关卡
176   {       setlinecolor(BLUE);IMAGE img;                                     
177        //int g_tple=rand()%7;
178      int line=60,col=450;        //g_tple为方块类型
179    for(int i1=0;i1<4;i1++){for(int j1=0;j1<4;j1++)
180    { int g_block=Block[g_tple*4+i1][j1]; //b[i1][j1]=Block[g_tple*4+i1][j1];
181    //b1[i1*4+j1]=Block[g_tple*4+i1][j1];
182 setfillcolor(RED); // int i3=100000;        while(i3>0)i3--;
183 fillrectangle(col+j1*30,line+i1*30,col+j1*30+30*g_block,line+i1*30+30*g_block);}} //Sleep(500);
184 getimage( &img,450,60,120,120);
185                 char g_score[10]={0};
186                 sprintf(g_score,"%d",score);settextstyle(0,0,g_score); //得分
187                 //sprintf(score, "%d", score);
188                 outtextxy(500,230,g_score);
189                 //N=score/2+1;
190                 char g_N[10]={0};sprintf(g_N,"%d",N);settextstyle(0,0,g_N);    //关卡
191                  outtextxy(500,430,g_N);
192 
193 /*
194     setfillcolor(BLACK);setlinecolor(BLACK);
195     fillrectangle(420,60,540,180);    
196  */
197    return g_tple;
198   }
199      void clear_b()            //清除b区域
200   {
201       setfillcolor(BLACK);setlinecolor(BLACK);
202       fillrectangle(450,60,570,180);
203       fillrectangle(500,230,570,300);
204       fillrectangle(500,430,570,500);
205 
206   }
207 
208 
209   void showa() //根据a[13][22]数组绘制运行界面a
210   {        
211       //int a[13][22]={1,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,};
212       setfillcolor(RED);
213       setlinecolor(BLUE);  BeginBatchDraw();
214       for(int l=0;l<13;l++){
215           for(int h=0;h<22;h++){
216             fillrectangle(40+l*30,10+h*30,40+l*30+30*a[l][h],10+h*30+30*a[l][h]); 
217       }}EndBatchDraw();
218       //clear_b();//tem();     
219      // Sleep(10);
220 //      Make_b();
221 //   return 0;
222   }                                    
223  
224   /*int tem()    //临时测试
225   {                               
226       int tem1[100000]={0};
227       FILE *fp1;fp1=fopen("D://身份系统\\222.txt","a+");
228       //for(int i=0;i<13;i++){
229           for(int j=0;j<22;j++)
230      {tem1[j]=21;}
231      // }
232       fwrite(tem1,13,1,fp1);fclose(fp1);
233       return 0;
234   }     */
235   int b1_a1()                  //在我的调用方式下：b1为下一个方块数据因为b_b1()，a1为A区域的下一状态
236   {         if(x<0)x=0;if(x>9)x=9;
237        for(int l=0;l<4;l++)
238          for(int h=0;h<4;h++)
239             {
240             //    b[h][l]=b1[h][l];
241                 a1[x+l][y+h]=b1[h][l]; }
242     return 0;
243   }
244   int b_b1()               //将下一块的数据暂存于b1[][]中
245   {
246       for(int l=0;l<4;l++)
247         for(int h=0;h<4;h++)
248             b1[l][h]=0;
249      for(l=0;l<4;l++)
250         for(int h=0;h<4;h++)
251             b1[h][l]=b[h][l]; 
252      return 0;
253      }
254  
255   int b1_b()              //调用下一块方块时将b1[][]数据给b[][]
256   {        
257       for(int l=0;l<4;l++)
258         for(int h=0;h<4;h++)
259             b[l][h]=0;
260       for(l=0;l<4;l++)
261           for(int h=0;h<4;h++)
262           {    //if(x<0)x=0;if(x>9)x=9;
263               b[h][l]=b1[h][l];  }
264             //    a[x+l][y+h]=b[h][l]; }
265     return 0;
266   }
267   int up()                       //变形  每次图形在4*4矩阵中逆时针旋转（可考虑中心旋转）
268   {
269       for(int l=0;l<4;l++)
270         for(int h=0;h<4;h++)
271             b1[l][h]=0;
272 /*       for(int i=0;i<4;i++)
273            for(int j=0;j<4;j++)
274            {
275                b[i][j]=b1[i][j];
276            }
277 */       for( int i=0;i<4;i++)
278            for(int j=0;j<4;j++)
279            {
280                  b1[i][j]=b[j][3-i];
281            }
282 //           for(l=0;l<4;l++)    {
283 //               for(int h=0;h<4;h++)
284 //                   a1[x+l][y+h]=b1[h][l]; }
285 //               run();
286     /*       for(l=0;l<4;l++)
287                for(int h=0;h<4;h++)
288                {    if(x<0)x=0;if(x>9)x=9;
289                     b[h][l]=b1[h][l];
290                     a[x+l][y+h]=b[h][l]; }
291     */
292            //flge=0;
293       return 0;
294   }
295   void Make_b()               //下一状态图
296   {
297      putimage(420,60,&img);
298   }
299   void Make_T()               //类似于背景的A区域增加数据 和绘制
300   {        //      int a[13][22]={1,0,0,0,0,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,};
301       BeginBatchDraw();
302       for(int l=0;l<13;l++){
303           for(int h=0;h<22;h++){
304              setfillcolor(RED);
305              setlinecolor(BLUE); 
306              fillrectangle(40+l*30,10+h*30,40+l*30+30*T[l][h],10+h*30+30*T[l][h]); 
307       }}   EndBatchDraw();
308 //   return 0;
309   }
310   int get_g()      //获取g图形边界 与T[13][22]有关
311   {
312 /*      get_g_s[13]=21; 
313       for(int i=0;i<13;i++)    {
314           for(int j=0;j<22;j++)
315           {      
316               if(T[i][j]==1)
317               { get_g_s[i]=j;break;}
318               else
319                   get_g_s[i]=21;
320 
321           }
322       }
323 */          return 0;
324   }
325   int get_b_4()            //获取b[][]图形在4*4矩阵中与各边的距离
326   {       int g_b_x=0;        
327      for(int l=0;l<4;l++){ 
328          for(int h=0;h<4;h++)
329              if(b[h][l]==1)
330                  if(g_b_x<=h)
331                  g_b_x=h;}
332       int g_b_z=3;
333       for(l=0;l<4;l++){
334          for(int h=3;h>=0;h--)
335              if(b[l][h]==1)
336                 if(g_b_z>=h)
337                     g_b_z=h;}
338       int g_b_y=0;
339       for(l=0;l<4;l++){ 
340          for(int h=0;h<4;h++)
341              if(b[l][h]==1)if(g_b_y<=h)
342                  g_b_y=h;}
343       int g_b_s=3;
344       for(l=0;l<4;l++){
345          for(int h=3;h>=0;h--)
346              if(b[h][l]==1)
347                 if(g_b_s>=h)
348                     g_b_s=h;}
349       return 0;
350   }
351    int bianjie()      //边界修正和判断
352    {
353        if((x+g_b_z)<0)x++;
354        if((y+g_b_x)>22)y--;
355        if((x+g_b_y)>10)x--;
356        else YN=1;
357           return 0;
358   }
359    int aa1y()         //提前判断能右移动否
360    {        BYN=1;
361        for(int i=0;i<22;i++){
362             if(a[12][i]==1)
363             {    g_x=0;BYN=0;}    }
364     /*for(i=0;i<13;i++) {
365             if(a[i][21]==1)
366             {g_y=0;YN=0;}    }
367    */
368        return 0;
369    }
370                      
371    int aa1z()         //能左移动否
372    {        BYN=1;
373        for(int i=0;i<22;i++){
374             if(a[0][i]==1)
375             {    g_x=0;BYN=0;}    }
376       for(i=0;i<13;i++) {
377             if(a[i][21]==1)
378             {g_y=0;YN=0;}    }
379     
380        return 0;
381    }
382 int a_a1()                 //将操作后的a[][]数据存于a1[][]中，即a1为a的下一态
383 {         
384     for(int l=0;l<13;l++) {
385         for(int h=0;h<22;h++)
386             a1[l][h]=0;     }
387 /*    for(int i=0;i<22;i++){
388             if(a[0][i]==1||a[21][i]==1)
389             {    g_x=0;}    YN=0;    }
390     for(i=0;i<13;i++) {
391             if(a[21][i]==1)
392             {g_y=0;YN=0;}YN=0;    }
393 */    for(l=0;l<13;l++) {
394         for(int h=0;h<22;h++)
395         {    if(a[l][h]==1)
396         {a1[l+g_x][g_y+h]=a[l][h]; }
397         }           }
398         return 0;
399 }
400 int a1_a()                 //正常状态下将a1[][](上一次的下一状态)数据转移给a[][]
401 {
402     for(int l=0;l<13;l++)
403         for(int h=0;h<22;h++)
404             a[l][h]=a1[l][h];
405 return 0;
406 }
407 
408 
409 
410   int b_a()       //将b方块传递到a[13][22]中,初始位置与x,y有关
411   {         cleara();
412      for(int l=0;l<4;l++){ //g_x=0;
413          for(int h=0;h<4;h++)
414             //if(Block[g_tple*4+h][l]==1) 
415             if(b[h][l]==1)
416              {
417                  b1[h][l]=b[h][l];//g_x++;//Block[g_tple*4+h][l];
418                  a[x+l][y+h]=b1[h][l];
419              }
420               //a[x+l][y+h]=Block[g_tple*4+h][l];
421               // tem();
422      }
423     return 0;
424   }     
425   int cleara()                //a[][]数组清零
426   {
427       for(int l=0;l<13;l++){
428          for(int h=0;h<22;h++)
429          {    
430               a[l][h]=0;
431           }
432       }
433 return 0;
434   }    
435   int cleara1()                         //a1[][]数组清零
436   {
437       for(int l=0;l<13;l++){
438          for(int h=0;h<22;h++)
439          {    
440               a[l][h]=0;
441           }
442       }
443 return 0;
444   }
445 
446   int clear()        //重新绘制运行区域A
447   {BeginBatchDraw();
448                for(int i=0;i<13;i++){
449              for(int j=0;j<22;j++){
450              setfillcolor(BLACK);
451              setlinecolor(BLACK); //fillrectangle(41,11,429,699);
452              fillrectangle(40+i*30,10+j*30,40+i*30+30,10+j*30+30);
453             }}     EndBatchDraw();
454     //         fillrectangle(10,10,400,670);
455     return 0;
456     }
457   int run()                //能否继续 下降
458   {           YN=1;
459       for(int l=0;l<13;l++)
460           for(int h=0;h<22;h++)
461               if(T[l][h]==a1[l][h]&&T[l][h]==1)
462               { YN=0;goto loop1;     }
463               else
464                   YN=1;
465 loop1:;
466       return 0;
467   }
468   int movedown()            //边界运算，能否在下降
469   {      int i,YN=1;
470       for(i=0;i<13;i++)
471       {
472           if((get_g_s[i]-get_b_x[i])<=0)
473           {YN=0;break;}
474           else 
475               YN=1;                 //YN=1能下降
476       }            
477       return 0;
478   }
479   int a_T()                //将a[13][22]->T[13][22]//T[13][22]为a[13][22]的上一个稳定状态初态为全零    
480   {
481       for(int i=0;i<13;i++)
482           for(int j=0;j<22;j++)
483           {
484               T[i][j]=a[i][j];
485           }
486           flge=0;
487       return 0;
488   }
489 
490   int T_T1()                //将a[13][22]->T[13][22]//T[13][22]为a[13][22]的上一个稳定状态初态为全零    
491   {
492       for(int i=0;i<13;i++)
493           for(int j=0;j<22;j++)
494           {
495               T1[i][j]=T[i][j];
496           }
497           flge=0;
498       return 0;
499   }
500 
501    int T1_T()                //将a[13][22]->T[13][22]//T[13][22]为a[13][22]的上一个稳定状态初态为全零    
502   {
503       for(int i=0;i<13;i++)
504           for(int j=0;j<22;j++)
505           {
506               T1[i][j]=T1[i][j];
507           }
508           flge=0;
509       return 0;
510   }
511 
512 void get_fangxiang()
513 {    i2=0;
514     if(kbhit())
515        c=getch();
516 //    return 0;
517 } 
518 
519 int runing()
520 {
521   return 0;
522 }
523 
524 
525 
526 int main()
527 {     
528 
529     while(news){
530     int t[13][17]={0};
531     int g_t[4][4]={0};
532     jiemian();
533     init();
534     while(begin)            //游戏结束
535     {        x=4;    
536             y=0;
537             YN=0;
538             srand(time(0)); 
539             g_tple=rand()%7;
540             clear_b();
541         //    Sleep(100);
542             g1_nextblock();
543             g_nextblock(); YN=1;
544           flge=1;       b_a();
545 
546           IMAGE img;     //加载的图片
547     loadimage(&img,"D:\\2017\\图形文件\\方形图\\7ed6e1d3572c11df653ea107602762d0f703c232.gif",50,70);
548     putimage(500,500,&img);    
549     while(flge)                       //一个方块下落完成
550     {                       
551 /*            x=4;    
552             y=0;
553             YN=0;                
554             g_tple=rand()%7;
555             clear_b();
556             Sleep(100);    g_nextblock();
557 */            int z=1;
558         luoji=0;
559           fflush(stdin);
560         //    Sleep(500); 
561            g_y=1;y=y+g_y;
562 
563         //    while(z){ 
564         while(kbhit())
565         {    
566             c=getch();//flushall; fflush(stdin);
567             if(c)               
568             {    while(c&&YN)       
569                 switch(c)                                     
570                 {
571                     case 32:{c=getch();c=0;break;}
572                     case 72:{
573                         up();x_1=x;clear();cleara(); cleara1();b1_a1();run();if(y>18)YN=0;
574                         if(YN==1)//fflush(stdin);
575                         {
576                             b1_b();b_a();
577                             //a1_a();
578                         //    Make_T();showa();
579                         }
580                         if(YN==0)
581                             {x=x_1;b_a();
582                             //Make_T();showa();
583                             }
584                         c=0;  //c=getch();
585                         BeginBatchDraw();
586                         Make_T();showa(); EndBatchDraw();
587                         Sleep(0);//cleara(); 
588                         break;}
589                     case 77:{g_x=1;aa1y();a_a1();run();if(YN&&BYN){a_a1();a1_a();clear();BeginBatchDraw();showa();Make_T();EndBatchDraw();Sleep(0);x=x+g_x;}luoji=1;g_x=0;g_y=0;c=0;}break;
590             //    case 77:{x++;bianjie();clear();showa();cleara();c=0;break;}
591                     case 75:{g_x=-1;aa1z();a_a1();run();if(YN&&BYN){a_a1();a1_a();clear();BeginBatchDraw();showa();Make_T();EndBatchDraw();Sleep(0);x=x+g_x;}luoji=1;g_x=0;g_y=0;c=0;}break;
592             //    case 75:{x--;run();if(YN){clear();bianjie();showa();cleara();}c=0;break;}
593                     case 80:{g_y=1;aa1z();a_a1();run();if(YN){a_a1();a1_a();clear();BeginBatchDraw();showa();Make_T();EndBatchDraw();Sleep(0);y=y+g_y;}luoji=1;g_x=0;c=0;}break;
594                 //case 80:{y++;run();if(YN){bianjie();clear();showa();cleara();}c=0;break;}
595     //                case 32:Sleep(4000); 
596                     default:{c=0;break;}
597                 }
598             }
599         }     
600             clear();
601         //    g_y=1;y=y+g_y;
602             a_a1();//a1_a();
603             run();aa1z();//a_a1();
604             if(YN==1)
605             {a1_a();BeginBatchDraw();Make_T();showa();EndBatchDraw();}
606             Sleep(downtime);                                            //YN=0 一块下落完成
607             if(YN==0&&luoji==0)     
608             {
609                  for(int l=0;l<13;l++)
610                      for(int h=0;h<22;h++)
611                      {     if(a[l][h]==1)
612                          T[l][h]=a[l][h];
613                      }
614                 //b_a();
615             //    showa();
616                 BeginBatchDraw();Make_T();showa();EndBatchDraw();//Sleep(10); 
617                 flge=0;
618 //1                YN=1;// clear();     
619             }
620             if(YN==0&&luoji==1)
621             {
622                  for(int l=0;l<13;l++)
623                      for(int h=0;h<22;h++)
624                      {     if(a[l][h]==1)
625                          T[l][h]=a[l][h];
626                      }
627                 BeginBatchDraw();Make_T();showa();EndBatchDraw();//Sleep(100); 
628                 flge=0;     
629             }
630             if(YN==0)                                                     //满行消除
631             {     int i=0,k=0;//int T1[13][22]={0},T2[13][22]={0};
632                 for(int h=0;h<22;h++)
633                 {  int i=0;int T1[13][22]={0},T2[13][22]={0};
634                     for(int l=0;l<13;l++)
635                 {if(T[l][h]==1)
636                 {i++;if(i==13)
637                     {score+=10; N=score/100+1; downtime=((N)<10)?(downtime-30*N):200;  //分数关数下降速度控制
638                     for(l=0;l<13;l++)T[l][h]=0;k=h;
639                     for(int h=0;h<k;h++){for(int l=0;l<13;l++)T1[l][h+1]=T[l][h];}
640                     for(h=k+1;h<22;h++){for(int l=0;l<13;l++)T2[l][h]=T[l][h];}
641                     for(l=0;l<13;l++){for(int h=0;h<22;h++)T[l][h]=0;}
642                      for(l=0;l<13;l++){for(int h=k+1;h<22;h++)T[l][h]=T2[l][h];}
643                     for(l=0;l<13;l++){for(int h=0;h<k+1;h++)if(T1[l][h]==1)T[l][h]=T1[l][h];}
644                     }
645                 }
646                 }
647                 }
648     
649                 BeginBatchDraw();Make_T;EndBatchDraw();// Sleep(400);
650                 g_tple1=g_tple;
651                 flge=0;             //方块已到底
652                 for(int l=0;l<13;l++){if(T[l][0]==1||t[l][1]){
653                     begin=0; news=0;    }
654 
655                 }//游戏结束
656             }
657 
658     }
659     }
660     cleara();a_T();BeginBatchDraw();Make_T();EndBatchDraw();//showa();
661 //setfillcolor(BLUE);setlinecolor(BLUE);
662     char news1[10]={"游戏结束:"};
663     char news2[15]={"按ESC退出:"};
664     char news3[10]={"其他继续:"};
665 settextstyle(0,0,news1);
666 settextstyle(0,0,news2);
667 settextstyle(0,0,news3);
668 outtextxy(450,260,news1);
669 outtextxy(450,290,news2);
670 outtextxy(450,320,news3); //Sleep(5000);
671 //while(kbhit())
672 //{      
673     //getchar();
674     kbhit();
675     news=getch();
676     if(news==27)news=0;;
677 //}
678 
679          }
680     return 0;
681 }