找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 3626|回复: 4
收起左侧

单片机俄罗斯方块源码 通过LCD12864实现

[复制链接]
ID:307334 发表于 2018-4-26 17:37 | 显示全部楼层 |阅读模式
俄罗斯方块通过LCD12864实现,全部源码,超清晰注释.
0.jpg

单片机源程序如下:
  1. /*******************************************************
  2. * 文件名称:Tetris.c
  3. * 单 片 机:STC89C52RC
  4. * 简    述:使用LCD12864显示的俄罗斯方块程序
  5. * 功    能:计分,下一个方块预览,欢迎结束界面,长按连续左右移,暂停(按键Left+Turn)
  6. * 作    者:刘琦
  7. * 完成日期:2015年4月21日
  8. * IO口设定:按键
  9.                         sbit key_sr_left=P3^7;
  10.                         sbit key_sr_turn=P3^6;
  11.                         sbit key_sr_right=P3^5;
  12.                         sbit key_sr_down=P3^4;
  13.                         LCD12864
  14.                         sbit RS_Port=P1^0;
  15.                         sbit RW_Port=P1^1;
  16.                         sbit E_Port=P2^5;
  17.                         sbit PSB_Port=P1^2;
  18.                         sbit RST_Port=P1^4;
  19.                         数码管锁存器
  20.                         sbit dula=P2^6;
  21.                         sbit wela=P2^7;

  22. *******************************************************/

  23. /*****************************头文件区*****************************************************/
  24. #include<reg52.h>
  25. //#include"STC15F2K60S2.h"
  26. #include"task_key.h"
  27. #include"task_activation.h"
  28. #include"12864b.h"
  29. #include"TaskBlock.h"
  30. #include"Block.h"
  31. /*****************************宏定义区*****************************************************/

  32. //需要判断是否刷新的任务总数
  33. //1KeyLeft,2KeyTurn,3KeyRight,4KeyDown,5TaskGoingDown,6KeyPause
  34. #define NUM_TASK_FLAG 7
  35. //需要定时刷新的任务总数
  36. //1TaskGoingDown,2KeyService
  37. #define NUM_TASK_REFRESH 3
  38. //刷新频率
  39. #define TIME_PER_SEC 200                                                        //每次进入中断的频率,200Hz
  40. #define TIME_CLOCK 11059200                                                        //晶振频率
  41. #define TIME_KEY_SERVICE_50HZ  TIME_PER_SEC/50          //按键服务频率,0.02s
  42. #define TIME_TASKGOINGDOWN_2HZ  TIME_PER_SEC/2          //下落频率,0.5s

  43. /******************************子函数声明区***********************************************/

  44. void initial_myself(void);   
  45. void initial_peripheral(void);
  46. void delay100ms(void);       

  47. /******************************全局变量定义区***********************************************/
  48. unsigned char uc_state=1;//状态标示:1欢迎界面,2等待开始界面,3下落界面,4死亡界面,5暂停界面
  49. enum Block{S1,S2,Z1,Z2,L1,L2,L3,L4,J1,J2,J3,J4,I1,I2,O1,T_1,T_2,T_3,T_4}enumBlock;//方块编号
  50. unsigned char ucBlockNow=0;//当前方块
  51. unsigned char ucBlockNext=0;//下一个方块

  52. unsigned char ucFlagScreenChange=1;//界面变更标志,界面更改时置1,激活task_activation

  53. unsigned char ucCoordinate[2];//方块的旋转点坐标,横H,竖S
  54. unsigned char xdata ucxMap[10][20];//整张屏幕的标记地图,用来记录未消除方块位置,有方块则为1
  55. unsigned char ucxBlockPosition[4][2];//方块的4个小方块坐标,[0][0],[0][1]为旋转点坐标H,S

  56. unsigned int uc_delay_task_cnt[NUM_TASK_REFRESH];//任务刷新延迟
  57. unsigned char uc_flag_taskrefresh[NUM_TASK_FLAG];//任务刷新标志

  58. unsigned long int ucScore=0;//得分

  59. /******************************主函数开始***********************************************/
  60. void main(void)
  61. {
  62.         unsigned char i=0;
  63.         initial_myself();
  64.         delay100ms();   
  65.     initial_peripheral();


  66.         while(1)
  67.         {
  68.                 if(ucFlagScreenChange==1)//界面变更标志为1时,进行任务激活,防止一直刷新界面
  69.                 {
  70.                         task_activation(uc_state);
  71.                         ucFlagScreenChange=0;
  72.                 }
  73.                 if(uc_delay_task_cnt[2]==0)//20HZ频率刷新key_service
  74.                 {
  75.                         task_key_service();
  76.                         ET0=0;//在中断中也有可能变化的变量在更改前时先关闭中断
  77.                         uc_delay_task_cnt[2]=TIME_KEY_SERVICE_50HZ;//延迟重置
  78.                         ET0=1;
  79.                 }
  80.                 if(uc_flag_taskrefresh[5]&&uc_delay_task_cnt[1]==0)//需要时,2HZ频率刷新TaskGoingDown
  81.                 {
  82.                         if(!TaskGoingDown())//下落失败
  83.                         {
  84.                                 //将当前方块位置写入Map
  85.                                 for(i=0;i<4;i++)
  86.                                 {
  87.                                         ucxMap[ ucxBlockPosition[i][0] ][ ucxBlockPosition[i][1] ]=1;
  88.                                 }
  89.                                 //调用消除方块函数
  90.                                 TaskClear();
  91.                         }
  92.                         ET0=0;//在中断中也有可能变化的变量在更改前时先关闭中断
  93.                         uc_delay_task_cnt[1]=TIME_TASKGOINGDOWN_2HZ;//延迟重置
  94.                         ET0=1;
  95.                 }

  96.         }
  97. }

  98. //中断函数
  99. void timer0(void) interrupt 1
  100. {
  101.         unsigned char i;
  102.         TR0=0;
  103.         TH0=255-TIME_CLOCK/TIME_PER_SEC/12/256;
  104.         TL0=255-TIME_CLOCK/TIME_PER_SEC/12%256;
  105.         //task_delay[]减到0时,相应的函数准备就绪
  106.         for(i=0;i<NUM_TASK_REFRESH;i++)
  107.         {
  108.                 if(uc_delay_task_cnt[i]!=0)//延迟不为0时才减
  109.                         {uc_delay_task_cnt[i]--;};
  110.         }
  111.         task_key_scan();//按键扫描函数,放在中断中,保证准时扫描
  112.         TR0=1;
  113. }

  114. //初始化区
  115. void initial_myself(void)//第一区 初始化单片机
  116. {
  117.         unsigned char i;
  118.         for(i=0;i<NUM_TASK_REFRESH;i++)uc_delay_task_cnt[i]=0;//初始化让所有任务就绪
  119.         TMOD=0X21; //定时器0为16位不自动重装,用来定时;定时器1为8位自动重装,用来产生随机数
  120.         TH0=255-TIME_CLOCK/TIME_PER_SEC/12/256;
  121.         TL0=255-TIME_CLOCK/TIME_PER_SEC/12%256;
  122.         TH1=0;
  123.         TL1=0;
  124. }

  125. void initial_peripheral(void) //第二区 初始化外围
  126. {
  127.         Lcd_Init();//初始化12864
  128.         EA=1;     //开总中断
  129.         ET0=1;    //允许定时器0中断,定时器1无需开启中断
  130.     TR0=1;    //启动定时器0
  131.     TR1=1;         //启动定时器1
  132. }

  133. void delay100ms(void)                //@11.0592MHz
  134. {
  135.         unsigned char i, j, k;

  136.         ;
  137.         ;
  138.         i = 5;
  139.         j = 52;
  140.         k = 195;
  141.         do
  142.         {
  143.                 do
  144.                 {
  145.                         while (--k);
  146.                 } while (--j);
  147.         } while (--i);
  148. }
复制代码
  1. /*******************************************************
  2. * 文件名称:TaskBlock.c
  3. * 单 片 机:STC89C52RC
  4. * 简    述:方块子程序,包含,下落,出新,消除,检测
  5. * 作    者:刘琦
  6. * 完成日期:2015年4月21日
  7. *******************************************************/
  8. #include<reg52.h>
  9. #include"Tetris.h"
  10. #include"Block.h"
  11. #include"tetris.h"
  12. #include"Score.h"
  13. /*******************************************************
  14. * 函 数 名:TaskCheck(void)
  15. * 功能描述:检测
  16. * 函数说明:检测左右移,下落,出新,旋转
  17. * 输入参数:无
  18. * 返 回 值:成功失败标示,ucReturn
  19. *******************************************************/
  20. unsigned char TaskCheck(void)
  21. {
  22.         unsigned char ucReturn=0;
  23.         unsigned char i=0;
  24.         //加入检测部分,包括边界检测,碰撞检测
  25.         //边界检测
  26.         for(i=0;i<4;i++)
  27.         {
  28.                 if(ucxBlockPosition[i][0]>=0&&ucxBlockPosition[i][0]<=9                        //检测左右
  29.                    &&ucxBlockPosition[i][1]>=0&&ucxBlockPosition[i][1]<=19)                //检测上下
  30.                 {
  31.                         ucReturn=1;
  32.                 }
  33.                 else
  34.                 {
  35.                         ucReturn=0;
  36.                         return ucReturn;//如果边界检测失败,就不进行下面检测,直接返回失败
  37.                 }
  38.         }
  39.         //碰撞检测
  40.         for(i=0;i<4;i++)
  41.         {
  42.                 if(ucxMap[ ucxBlockPosition[i][0] ][ ucxBlockPosition[i][1] ]!=0)//与地图标记位置进行比较
  43.                 {
  44.                         ucReturn=0;
  45.                         return ucReturn;
  46.                 }
  47.         }
  48.         return ucReturn;
  49. }
  50. /*******************************************************
  51. * 函 数 名:unsigned char TaskGoingDown(void)
  52. * 功能描述:方块下落
  53. * 函数说明:
  54. * 输入参数:无
  55. * 返 回 值:ucResult,1无碰撞,0碰撞
  56. *******************************************************/
  57. unsigned char TaskGoingDown(void)
  58. {
  59.         unsigned char ucCheck=0;
  60.         unsigned char ucResult=0;
  61.         ucCoordinate[1]++;                                //旋转点坐标,竖S+1
  62.         WriteBlockCoordinate();                        //将其他三个小方块坐标写入数组
  63.         ucCheck=TaskCheck();                        //检测碰撞
  64.         if(ucCheck)                                                //无碰撞
  65.         {
  66.                 ucCoordinate[1]--;                        //坐标复位
  67.                 ChangeBlock(0);                                //在老位置消除方块,只刷新有改变的位置,加快显示速度
  68.                 ucCoordinate[1]++;                        //坐标+1
  69.                 ChangeBlock(1);                                //在新位置画方块
  70.                 ucResult=1;
  71.         }
  72.         else                                                        //有碰撞,则不变
  73.         {
  74.                 ucCoordinate[1]--;                       
  75.                 WriteBlockCoordinate();
  76.                 ucResult=0;
  77.         }
  78.         return ucResult;
  79. }
  80. /*******************************************************
  81. * 函 数 名:unsigned char TaskComingNew(void)
  82. * 功能描述:方块出新
  83. * 函数说明:
  84. * 输入参数:无
  85. * 返 回 值:ucResult,1成功,0失败
  86. *******************************************************/
  87. unsigned char TaskComingNew(void)
  88. {
  89.         unsigned char ucCheck=0;
  90.         unsigned char ucResult=0;
  91.         //写入当前方块的相关信息
  92.         switch(ucBlockNow)                                         
  93.         {
  94.                 case 0:
  95.                                 enumBlock=S1;
  96.                                 ucCoordinate[0]=4;
  97.                                 ucCoordinate[1]=0;
  98.                 break;
  99.                 case 1:
  100.                                 enumBlock=Z1;
  101.                                 ucCoordinate[0]=4;
  102.                                 ucCoordinate[1]=0;
  103.                 break;
  104.                 case 2:
  105.                                 enumBlock=L1;
  106.                                 ucCoordinate[0]=4;
  107.                                 ucCoordinate[1]=1;
  108.                 break;
  109.                 case 3:
  110.                                 enumBlock=J1;
  111.                                 ucCoordinate[0]=4;
  112.                                 ucCoordinate[1]=1;
  113.                 break;
  114.                 case 4:
  115.                                 enumBlock=I1;
  116.                                 ucCoordinate[0]=5;
  117.                                 ucCoordinate[1]=0;
  118.                 break;
  119.                 case 5:
  120.                                 enumBlock=O1;
  121.                                 ucCoordinate[0]=5;
  122.                                 ucCoordinate[1]=0;
  123.                 break;
  124.                 case 6:
  125.                                 enumBlock=T_1;
  126.                                 ucCoordinate[0]=4;
  127.                                 ucCoordinate[1]=0;
  128.                 break;
  129.                 default:
  130.                 break;
  131.         }
  132.         //检测碰撞
  133.         WriteBlockCoordinate();       
  134.         ucCheck=TaskCheck();
  135.         if(ucCheck)                                                //成功
  136.         {
  137.                 ChangeSmallBlock(0);                //将预览的方块清除
  138.                 ucBlockNext=TL1%7;                        //产生随机数,作为预览方块
  139.                 ChangeBlock(1);                         //画新的方块
  140.                 ChangeSmallBlock(1);                //画新的预览方块
  141.                 ucBlockNow=ucBlockNext;
  142.                 ucResult=1;
  143.         }
  144.         else
  145.         {
  146.                 ucResult=0;
  147.         }

  148.         return ucResult;
  149. }
  150. /*******************************************************
  151. * 函 数 名:void TaskClear(void)
  152. * 功能描述:消除满行
  153. * 函数说明:消除满行,并出新
  154. * 输入参数:无
  155. * 返 回 值:无
  156. *******************************************************/
  157. void TaskClear(void)
  158. {
  159.         char i=0,j=0,n=0;
  160.         unsigned char m=0;
  161.         unsigned char k=0;
  162.         unsigned char flag_man=1,flag_kong=1,flag_clear=0;//满行、空行、待清除标志
  163.         unsigned char man[4],count=0;                                          //满行位置数组,满行数量
  164.         unsigned char kong=20;                                                          //空行位置
  165.         unsigned char oldkong=20;                                                  //用来储存旧的空行位置

  166.         unsigned char ucResult=0;

  167.         //标记出来满行及第一个空行
  168.         for(i=19;i>=0;i--)
  169.         {
  170.                 for(j=9;j>=0;j--)
  171.                 {
  172.                         if(ucxMap[j][i]==0)
  173.                         {
  174.                                 flag_man=0;
  175.                         }
  176.                         else
  177.                         {
  178.                                 flag_kong=0;
  179.                         }
  180.                 }
  181.                 if(flag_man==1)
  182.                 {
  183.                         flag_clear=1;//激活消除标记
  184.                         man[k]=i;//标记满行
  185.                         count++;
  186.                         k++;
  187.                 }
  188.                 else if(flag_kong==1)
  189.                 {
  190.                          kong=i;
  191.                         break;//检测到第一个空行,就退出循环
  192.                 }
  193.                 flag_man=1;//将满行标志复位
  194.                 flag_kong=1;
  195.         }

  196.         //计分
  197.         switch(count)
  198.         {
  199.                 case 0:
  200.                                 ucScore=ucScore+100;
  201.                                 break;
  202.                 case 1:
  203.                                 ucScore=ucScore+200;
  204.                                 break;
  205.                 case 2:
  206.                                 ucScore=ucScore+400;
  207.                                 break;
  208.                 case 3:
  209.                                 ucScore=ucScore+700;
  210.                                 break;
  211.                 case 4:
  212.                                 ucScore=ucScore+1100;
  213.                                 break;
  214.                 default:
  215.                                 break;
  216.         }

  217.         oldkong=kong;
  218.         //消除满行
  219.         if(flag_clear==1)
  220.         {
  221.                 while(count!=0)//至少有一个满行,才进行消除
  222.                 {
  223.                         //逐行下移
  224.                         for(m=0;m<man[count-1]-kong-1;m++)
  225.                         {
  226.                                 for(n=9;n>=0;n--)
  227. ……………………

  228. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

所有资料51hei提供下载:
俄罗斯方块全部源码.zip (147.88 KB, 下载次数: 72)

评分

参与人数 1黑币 +10 收起 理由
深蓝远景 + 10 很给力!

查看全部评分

回复

使用道具 举报

ID:362455 发表于 2018-7-2 16:17 | 显示全部楼层
谢谢分享
回复

使用道具 举报

ID:362455 发表于 2018-7-2 16:17 | 显示全部楼层
可以移植到iap15上吗
回复

使用道具 举报

ID:522661 发表于 2019-5-27 21:27 | 显示全部楼层
谢谢楼主的分享
回复

使用道具 举报

ID:573484 发表于 2019-6-27 15:40 | 显示全部楼层
感谢分享
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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