设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 电子技术分类讨论区 › 资料共享 › 俄罗斯方块单片机程序-已验证
返回列表 发新帖
查看: 1774|回复: 2
收起左侧

俄罗斯方块单片机程序-已验证

[复制链接]
ID:33449 发表于 2018-11-3 10:39 | 显示全部楼层 |阅读模式
俄罗斯方块程序

单片机源程序如下:
  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];//积木结构体  

  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. 伪随机数发生器
  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. 为伪随机数发生器播种
  91. ***************************************/
  92. void InitRandom(unsigned long InitVal)
  93. {  
  94. Seed=InitVal;
  95. }  
  96. //延时子程序
  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,"设置按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,"经典游戏");  
  146.        Lcd_WriteStr(3,2,"Score:");  
  147.        Lcd_WriteStr(3,3,"Level:"); }  

  149. /***********************************
  150. 游戏结束处理
  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. 根据积木图标左下坐标X，Y来画出积木图标
  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. 将积木图标值融入num数据中 也即把积木图标固定，无法再下降
  179. *********************************/
  180. FixSign(void)
  181. {  
  182. unsigned char m,n;
  183. for(m=0;m<4;m++)//行循环   
  184. for(n=0;n<4;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. 判断积木图标中方块是否与障碍方块重合
  195. *********************************/
  196. unsigned char CheckIf(void)
  197. {  
  198. unsigned char m,n;  
  199. for(m=0;m<4;m++)//行循环
  200. for(n=0;n<4;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. 判断积木图标是否可以继续下降一格
  212. ********************************/
  213. unsigned char CheckIfDown(void)
  214. {  
  215. Sign[1]=Sign[0];//  
  216. Sign[1].y+=3;//假设下降一格   
  217. return CheckIf();  
  218. }  
  219. /********************************
  220. 判断积木图标是否可以向左移动
  221. *********************************/
  222. unsigned char CheckIfLeft(void)
  223. {  
  224. Sign[1]=Sign[0];
  225. Sign[1].x-=3;  
  226. return CheckIf();
  227. }  
  228. /********************************
  229. 判断积木图标是否可以向右移动
  230. *********************************/
  231. unsigned char CheckIfRight(void)
  232. {  
  233. Sign[1]=Sign[0];  
  234. Sign[1].x+=3;  
  235. return CheckIf();
  236. }  
  237. /********************************
  238. 判断是否可以旋转
  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个满行并做消除
  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--)//积木图标的最顶行开始寻找满行比较有利于运算
  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++;//每找到一个满行，则分数加1
  280. }
  281. }  
  282. if(Flag)//为加速而设置并判断的标志，有已固定的积木有满格消行变化则重画积木界面
  283.     {  
  284.                  for(m=Temp;m<=19;m++)//为加速，不必要重第一行重画起，只需要从积木图标最下行开始往上的重画   
  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. 随机产生一个积木图标放到预产生区域并显示出来
  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. 游戏的具体过程，也是俄罗斯方块算法的关键部分
  343. *********************************/
  344. void GamePlay(void)
  345. {  
  346. unsigned char m,n;   
  347. unsigned int Temp;  
  348. SysFlag|=1<<NEWSIGNFLAG;//刚开始初始化为需要产生新的积木图标      
  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)//判是否需要产生新的积木图标   
  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++)//行循环
  364.    {   
  365. for(n=0;n<4;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. }//将积木图标出现置顶  
  373.    
  374. for(m=0;m<4;m++)//行循环
  375.     for(n=0;n<4;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;//如果产生新的积木图标中的方块与已固定好的方块重合，则死亡。游戏结束   
  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)) //翻转      
  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())//判断是否能继续下降一格
  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;//新的积木图标产生标志置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();//游戏结束  
  454. Lcd_Reset(); //初始化LCD屏  
  455. Lcd_Clear(0);//清屏   
  456.   }
复制代码

所有资料51hei提供下载:
俄罗斯方块.rar (10.92 KB, 下载次数: 15)
回复

使用道具 举报

ID:1 发表于 2018-11-3 13:25 | 显示全部楼层
补全原理图或者详细说明一下电路连接即可获得100+黑币 什么屏？
回复

使用道具 举报

ID:418731 发表于 2018-11-4 20:23 | 显示全部楼层
阿波罗可以用这个程序吗？？？
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表