標(biāo)題: 俄羅斯方塊單片機(jī)程序-已驗(yàn)證 [打印本頁]
作者: yanzeyuan333    時(shí)間: 2018-11-3 10:39
標(biāo)題: 俄羅斯方塊單片機(jī)程序-已驗(yàn)證
俄羅斯方塊程序

單片機(jī)源程序如下:
  1. #include "reg51.h"
  2. #include "eluosi.h"
  3. #define uchar unsigned char
  4. #define uint unsigned int  
  5. static unsigned long Seed = 1;
  6. #define A 48271L
  7. #define M 2147483647L
  8. #define Q (M / A)
  9. #define R (M % A)
  10. sbit K1=P3^4;
  11. sbit K2=P3^5;
  12. sbit K3=P3^6;
  13. sbit K4=P3^7;
  14. unsigned int idata num[19+2]={ 0xfff,//第1行，最下面
  15. 0x801,0x801,0x801,0x801,0x801,0x801,0x801,0x801,0x801,0x801,
  16. 0x801,0x801,0x801,0x801,0x801,0x801,0x801,0x801,0x801,//第2行到第20行共19行 0xfff//第21行，最上面  
  17. };//定義共21行，其中num[0]為下墻壁行，num[20]為上墻壁行,每行12格，最左一格為左墻壁列，最右一格為右墻壁列
  18. unsigned char code Block[28][2]={ /*
  19. *   口     口口口   口口
  20. *   口     口         口      口
  21. *   口口              口  口口口       */
  22. {0x88,0xc0},{0xe8,0x00},{0x62,0x20},{0x02,0xe0},
  23. /*
  24. *   口        口口 口口口
  25. *   口 口     口       口
  26. * 口口 口口口 口   
  27. */
  28. {0x22,0x60},{0x08,0xe0},{0xc8,0x80},{0xe2,0x00},   /*
  29. *   口
  30. *   口口         口口
  31. *     口       口口
  32. */
  33. {0x8c,0x40},{0x6c,0x00},{0x8c,0x40},{0x6c,0x00},
  34. /*
  35. *   口        口口 * 口口          口口 * 口 */
  36. {0x4c,0x80},{0xc6,0x00},{0x4c,0x80},{0xc6,0x00},  
  37. /*
  38. *          口                口
  39. *   口     口口   口口口   口口
  40. * 口口口   口       口       口
  41. */
  42. {0x04,0xe0},{0x8c,0x80},{0xe4,0x00},{0x26,0x20},
  43. /*口
  44. * 口
  45. * 口       口口口口
  46. * 口
  47. */
  48. {0x44,0x44},{0x0f,0x00},{0x44,0x44},{0x0f,0x00},  
  49. /*
  50. * 口口
  51. * 口口
  52. */   
  53. {0x06,0x60},{0x06,0x60},{0x06,0x60},{0x06,0x60}
  54. };  
  55. #define PASSSCORE 20
  56. struct Jimu
  57. {  
  58. unsigned int dat;   
  59. char x;  
  60. unsigned char y;  
  61. unsigned char type;  
  62. unsigned char change;
  63. }Sign[3];//積木結(jié)構(gòu)體  

  65. unsigned char SysFlag=0;
  66. #define NEWSIGNFLAG 0
  67. #define DEADFLAG 1
  68. #define PAUSEFLAG 2

  70. unsigned char Score=0;
  71. unsigned char Level=1;
  72. unsigned char DelayCnt=5;
  73. /*********************************************************/
  74. #define N 25
  75. /************************************
  76. 偽隨機(jī)數(shù)發(fā)生器
  77. *************************************/
  78. double Random(void)
  79. {  
  80. long TmpSeed;  
  81. TmpSeed=A*(Seed%Q)-R*(Seed/Q);
  82. if(TmpSeed>=0)   
  83.      Seed=TmpSeed;
  84. else   
  85.     Seed=TmpSeed+M;  
  86. return (double)Seed/M;
  87. }  

  89. /**************************************
  90. 為偽隨機(jī)數(shù)發(fā)生器播種
  91. ***************************************/
  92. void InitRandom(unsigned long InitVal)
  93. {  
  94. Seed=InitVal;
  95. }  
  96. //延時(shí)子程序
  97. void Delay(unsigned int t)
  98. {   
  99. unsigned int i,j;  
  100. for(i=0;i<t;i++)   
  101. for(j=0;j<10;j++);   
  102. }
  103. /*********************************
  104. 初始化MPU
  105. **********************************/
  106. void InitCpu(void)
  107. {
  108.           TMOD=0x0;
  109. TH0=0;  
  110. TL0=0;  
  111. TR0=1;  
  112. ET0=1;   
  113. EX1=1;
  114. EA=1;
  115.      TCON|=0x04;
  116. }
  117. /****************************
  118. welcome   游戲選擇界面
  119. /**********************/
  120. void welcome()
  121. {
  122. Lcd_WriteStr(0,0,"歡迎來玩");  
  123. Lcd_WriteStr(0,1,"俄羅斯方塊 ");
  124. Lcd_WriteStr(0,2,"設(shè)置按K1");
  125. Lcd_WriteStr(0,2,"開玩按K2");   
  126. }
  127. /*************
  128. 俄羅斯方塊部分
  129. /******************************
  130. 畫墻壁，初始化界面
  131. *******************************/
  132. void DrawBoard(void)
  133. {  
  134. unsigned char n;  
  135. for(n=0;n<12;n++)
  136. {   
  137. Lcd_Rectangle(3*n,0,3*n+2,2,1);   
  138. Lcd_Rectangle(3*n,60,3*n+2,62,1);
  139. }  
  140. for(n=0;n<20;n++)
  141. {   
  142. Lcd_Rectangle(0,3*n,2,3*n+2,1);   
  143. Lcd_Rectangle(33,3*n,35,3*n+2,1);   
  144.            }  
  145.        Lcd_WriteStr(4,0,"經(jīng)典游戲");  
  146.        Lcd_WriteStr(3,2,"Score:");  
  147.        Lcd_WriteStr(3,3,"Level:"); }  

  149. /***********************************
  150. 游戲結(jié)束處理
  151. ************************************/
  152. void GameOver(void)
  153. {  
  154. if((SysFlag&(1<<DEADFLAG))!=0)  
  155.    Lcd_WriteStr(3,1,"You Fail");  
  156. else  
  157.   Lcd_WriteStr(3,1,"You Pass");
  158. }
  159. unsigned int code MaskTab[16]={
  160. 0x0001,0x0002,0x0004,0x0008,0x0010,0x0020,0x0040,0x0080, 0x0100,0x0200,0x0400,0x0800,0x1000,0x2000,0x4000,0x8000
  161. };  

  163. /**********************************
  164. 根據(jù)積木圖標(biāo)左下坐標(biāo)X，Y來畫出積木圖標(biāo)
  165. ***********************************/
  166. void DrawSign(struct Jimu Temp,unsigned char DrawMode)
  167. {  
  168. unsigned char m,n;  
  169. for(m=0;m<4;m++)   
  170. for(n=0;n<4;n++)   
  171. {   
  172. if((Temp.dat&MaskTab[4*m+n])!=0)
  173.     Lcd_Rectangle(Temp.x+n*3,Temp.y-2-3*m,Temp.x+n*3+2,Temp.y-3*m,DrawMode);
  174. }   
  175.   }
  176.   
  177. /********************************
  178. 將積木圖標(biāo)值融入num數(shù)據(jù)中 也即把積木圖標(biāo)固定，無法再下降
  179. *********************************/
  180. FixSign(void)
  181. {  
  182. unsigned char m,n;
  183. for(m=0;m<4;m++)//行循環(huán)   
  184. for(n=0;n<4;n++)//列循環(huán)   
  185. {   
  186. if((Sign[0].dat&MaskTab[4*m+n])!=0)  
  187.   {     
  188. num[20-(Sign[0].y-2)/3+m]|=MaskTab[11-Sign[0].x/3-n];  
  189.   }  
  190. }
  191. }
  192.   
  193. /********************************
  194. 判斷積木圖標(biāo)中方塊是否與障礙方塊重合
  195. *********************************/
  196. unsigned char CheckIf(void)
  197. {  
  198. unsigned char m,n;  
  199. for(m=0;m<4;m++)//行循環(huán)
  200. for(n=0;n<4;n++)//列循環(huán)  
  201. {   
  202. if((Sign[1].dat&MaskTab[4*m+n])!=0)  
  203.   {     
  204. if((num[20-(Sign[1].y-2)/3+m]&MaskTab[11-Sign[1].x/3-n])!=0)                      return 0;  
  205.   }   
  206. }  
  207. return 1;
  208.    }  

  210. /********************************
  211. 判斷積木圖標(biāo)是否可以繼續(xù)下降一格
  212. ********************************/
  213. unsigned char CheckIfDown(void)
  214. {  
  215. Sign[1]=Sign[0];//  
  216. Sign[1].y+=3;//假設(shè)下降一格   
  217. return CheckIf();  
  218. }  
  219. /********************************
  220. 判斷積木圖標(biāo)是否可以向左移動(dòng)
  221. *********************************/
  222. unsigned char CheckIfLeft(void)
  223. {  
  224. Sign[1]=Sign[0];
  225. Sign[1].x-=3;  
  226. return CheckIf();
  227. }  
  228. /********************************
  229. 判斷積木圖標(biāo)是否可以向右移動(dòng)
  230. *********************************/
  231. unsigned char CheckIfRight(void)
  232. {  
  233. Sign[1]=Sign[0];  
  234. Sign[1].x+=3;  
  235. return CheckIf();
  236. }  
  237. /********************************
  238. 判斷是否可以旋轉(zhuǎn)
  239. *********************************/
  240. unsigned char CheckIfRoll(void)
  241. {  
  242. unsigned char i;  
  243. unsigned int Temp;
  244.         Sign[1]=Sign[0];  
  245. if(++Sign[1].change>3)  
  246. Sign[1].change=0;
  247. i=Sign[1].type*4+Sign[1].change;
  248. Temp=(unsigned int)Block[i][0]<<8;
  249. Temp=Temp|Block[i][1];
  250. Sign[1].dat=Temp;

  252. return CheckIf();
  253. }  

  255. /********************************
  256. 尋找滿格的行并做消除處理
  257. 最多尋找4個(gè)滿行并做消除
  258. *********************************/
  259. void DelFull(void)
  260. {
  261. unsigned char m,n;  
  262. unsigned char Temp;  
  263. unsigned char Flag=0;  
  264. Temp=(Sign[0].y-2)/3;  
  265. if(Temp>=20)//防止越過了下邊界
  266.     Temp=1;  
  267. else  
  268.     Temp=20-Temp;  
  269. for(n=Temp+3;n>=Temp;n--)//積木圖標(biāo)的最頂行開始尋找滿行比較有利于運(yùn)算
  270. {   
  271. if(num[n]==0xfff)   
  272. {   
  273. Flag=1;   
  274. for(m=n+1;m<=19;m++)   
  275. {     
  276. num[m-1]=num[m];
  277. }   
  278. num[m]=0x801;
  279. Score++;//每找到一個(gè)滿行，則分?jǐn)?shù)加1
  280. }
  281. }  
  282. if(Flag)//為加速而設(shè)置并判斷的標(biāo)志，有已固定的積木有滿格消行變化則重畫積木界面
  283.     {  
  284.                  for(m=Temp;m<=19;m++)//為加速，不必要重第一行重畫起，只需要從積木圖標(biāo)最下行開始往上的重畫   
  285.      for(n=1;n<=10;n++)   
  286.     {     
  287. if((num[m]&MaskTab[n])==0)   
  288. {      
  289.          if(Lcd_ReadPixel(30-(n-1)*3,57-(m-1)*3)!=0)//為加速而做的讀象素操作      
  290.     {      
  291. Lcd_Rectangle(30-(n-1)*3,57-(m-1)*3,30-(n-1)*3+2,57-(m-1)*3+2,0);   
  292.                }   
  293.            }      
  294. else   
  295.   {     
  296. if(Lcd_ReadPixel(30-(n-1)*3,57-(m-1)*3)==0)//為加速而做的讀象素操作               
  297. {      
  298. Lcd_Rectangle(30-(n-1)*3,57-(m-1)*3,30-(n-1)*3+2,57-(m-1)*3+2,1);      }   
  299.   }   
  300. }  
  301. }
  302. }
  303.   
  304. /*******************************
  305. 隨機(jī)產(chǎn)生一個(gè)積木圖標(biāo)放到預(yù)產(chǎn)生區(qū)域并顯示出來
  306. ********************************/
  307. void CreatSign(void)
  308. {  
  309. unsigned char n;  
  310. unsigned int Temp;  
  311. DrawSign(Sign[2],0);//先清除   
  312. n=Random()*28;  
  313. Temp=(unsigned int)Block[n][0]<<8;
  314. Temp=Temp|Block[n][1];  
  315. Sign[2].dat=Temp;
  316. Sign[2].x=45;  
  317. Sign[2].y=4*3+2;
  318. Sign[2].type=n/4;  
  319. Sign[2].change=n%4;
  320. DrawSign(Sign[2],1);//后畫出
  321. }  

  323. void PrintScore(void)
  324. {  
  325. unsigned char Str[3];  
  326. Str[0]=(Score/10)|0x30;
  327. Str[1]=(Score%10)|0x30;
  328. Str[2]=0;
  329. Lcd_WriteStr(6,2,Str);
  330. }  

  332. void PrintLevel(void)
  333. {  
  334. unsigned char Str[3];
  335. Str[0]=(Level/10)|0x30;
  336. Str[1]=(Level%10)|0x30;
  337. Str[2]=0;
  338. Lcd_WriteStr(6,3,Str);
  339. }  

  341. /********************************
  342. 游戲的具體過程，也是俄羅斯方塊算法的關(guān)鍵部分
  343. *********************************/
  344. void GamePlay(void)
  345. {  
  346. unsigned char m,n;   
  347. unsigned int Temp;  
  348. SysFlag|=1<<NEWSIGNFLAG;//剛開始初始化為需要產(chǎn)生新的積木圖標(biāo)      
  349. InitRandom(TL0);  
  350. Lcd_WriteStr(3,1,"Playing");
  351. PrintScore();  
  352. PrintLevel();  
  353. CreatSign();  
  354. while(1)
  355. {   
  356. if((SysFlag&(1<<NEWSIGNFLAG))==1)//判是否需要產(chǎn)生新的積木圖標(biāo)   
  357. {   
  358. SysFlag&=~(1<<NEWSIGNFLAG);   
  359. Sign[0]=Sign[2];   
  360. CreatSign();   
  361. Sign[0].x=12;
  362. Sign[0].y=14;
  363. for(m=0;m<4;m++)//行循環(huán)
  364.    {   
  365. for(n=0;n<4;n++)//列循環(huán)   
  366.   {      
  367. if((Sign[0].dat&MaskTab[15-m*4-n])==0)         
  368.       break;   
  369. }   
  370. if(n==4)     
  371.      Sign[0].y-=3;   
  372. }//將積木圖標(biāo)出現(xiàn)置頂  
  373.    
  374. for(m=0;m<4;m++)//行循環(huán)
  375.     for(n=0;n<4;n++)//列循環(huán)     
  376.      {  
  377.     if((Sign[0].dat&MaskTab[4*m+n])!=0)  
  378.     {      
  379. if((num[20-(Sign[0].y-2)/3+m]&MaskTab[11-Sign[0].x/3-n])!=0)               
  380.          SysFlag|=1<<DEADFLAG;     
  381. }   
  382. }
  383.    if((SysFlag&(1<<DEADFLAG))!=0)  
  384.    break;//如果產(chǎn)生新的積木圖標(biāo)中的方塊與已固定好的方塊重合，則死亡。游戲結(jié)束   
  385. DrawSign(Sign[0],1);   
  386. }      
  387. if((CheckIfLeft())&&(K3==0))  //左   
  388.     {   
  389.             DrawSign(Sign[0],0);
  390.         Sign[0].x-=3;      
  391.     DrawSign(Sign[0],1);      
  392. }      
  393.       if((CheckIfRight())&&(K4==0))   //右   
  394.    {
  395.           DrawSign(Sign[0],0);      
  396.               Sign[0].x+=3;      
  397.    DrawSign(Sign[0],1);   
  398.     }
  399.       if((CheckIfDown())&&(K2==0))//下  
  400.        {         
  401.                          DrawSign(Sign[0],0);   
  402.                       Sign[0].y+=3;   
  403.    DrawSign(Sign[0],1);
  404. }      
  405. if((CheckIfRoll())&&(K1==0)) //翻轉(zhuǎn)      
  406. {      
  407.   DrawSign(Sign[0],0);      
  408.   if(++Sign[0].change>3)   
  409.       Sign[0].change=0;  
  410. m=Sign[0].type*4+Sign[0].change;
  411. Temp=(unsigned int)Block[m][0]<<8;      
  412. Temp=Temp|Block[m][1];        
  413. Sign[0].dat=Temp;      
  414. DrawSign(Sign[0],1);
  415. }  
  416.                  if((SysFlag&(1<<PAUSEFLAG))!=0)   
  417.                          continue;  
  418. Delay(500);  
  419. if(++DelayCnt>=2*(11-Level))  
  420. {   
  421. DelayCnt=0;   
  422. if(CheckIfDown())//判斷是否能繼續(xù)下降一格
  423.    {   
  424.                          DrawSign(Sign[0],0);
  425.             Sign[0].y+=3;  
  426.                    DrawSign(Sign[0],1);
  427.    }   
  428. else   
  429. {   
  430.                  FixSign();   
  431. DelFull();   
  432. PrintScore();  
  433.                    if(Score>=PASSSCORE)   
  434.               {      
  435. SysFlag&=~(1<<DEADFLAG);
  436.      break;//跳出玩游戲過程
  437.     }   
  438. SysFlag|=1<<NEWSIGNFLAG;//新的積木圖標(biāo)產(chǎn)生標(biāo)志置1   
  439. }   
  440. }
  441. }  
  442.                  }  

  444. void Main()
  445. {  
  446.   InitCpu();//初始化CPU
  447. Lcd_Reset(); //初始化LCD屏
  448. Lcd_Clear(0);//清屏      
  449. Lcd_Reset(); //初始化LCD屏  
  450. Lcd_Clear(0);//清屏  
  451. DrawBoard();//畫界面  
  452. GamePlay();//玩游戲   
  453. GameOver();//游戲結(jié)束  
  454. Lcd_Reset(); //初始化LCD屏  
  455. Lcd_Clear(0);//清屏   
  456.   }
復(fù)制代碼

所有資料51hei提供下載:
俄羅斯方塊.rar (10.92 KB, 下載次數(shù): 16)


作者: admin    時(shí)間: 2018-11-3 13:25
補(bǔ)全原理圖或者詳細(xì)說明一下電路連接即可獲得100+黑幣 什么屏？
作者: 王孫浩    時(shí)間: 2018-11-4 20:23
阿波羅可以用這個(gè)程序嗎？？？



歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1