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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 单片机俄罗斯方块游戏Proteus仿真程序
返回列表 发新帖
查看: 2576|回复: 0
打印 上一主题 下一主题
收起左侧

单片机俄罗斯方块游戏Proteus仿真程序

[复制链接]
跳转到指定楼层
楼主
ID:727862 发表于 2020-4-15 10:54 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
俄罗斯方块仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）


单片机源程序如下:
  1. //描　述:                                                                   //
  2. //      1、功能完整，直接使用                                               //
  3. //      2、模块独立性强，移植方便，外部仅init和move函数，修改显示和输入即可 //
  4. //      3、对减少内存占用、尽量减少屏幕操作进行适当优化                     //
  5. //      4、新方块生成高度随机，绝对无规律                                   //
  6. //      5、仿真环境为Keil7.5+Proteus6.5,可以联机也可脱机运行                //
  7. //      CODE SIZE        =   1845    ----                                   //
  8. //      CONSTANT SIZE    =    326    ----                                   //
  9. //      DATA SIZE        =     16      19                                   //
  10. //      IDATA SIZE       =     50    ----                                   //
  11. //      BIT SIZE         =      1       1                                   //
  12. //--------------------------------------------------------------------------//
  13. #include <stdlib.h>
  14. #include "xwj_lcd16.h"                                 // 字符液晶控制函数声明    //
  15. #include "xwj_lcd6963.h"                        // T6963C 公用函数
  16. #include "xwj_hlkey.h"                                //  P1口行列式键盘  //
  17. #include "xwj_serial.h"                                //串口函数集
  18. #include "change.h"                                        //数制转换
  19. #include "xwj_fk.h"                                        //俄罗斯方块程序

  21. #define ulong                unsigned long
  22. #define uint                unsigned int
  23. #define uchar                unsigned char

  25. extern void delay(unsigned int x);
  26. //----------------俄罗斯方块内部函数----------------------------------------//
  27. void fk_dot(uchar x,uchar y);                //显示1个方块点
  28. void fk_cldot(uchar x,uchar y);                //清除1个方块点
  29. void fk_show(void);                                        //显示分数
  30. void fk_reffk(void);                                //刷新方块
  31. void fk_refnew(void);                                //刷新预览方块
  32. void fk_refline(yy);                                //刷新1行背景
  33. bit  fk_chk(void);                                        //冲突检查
  34. void fk_new(void);                                        //产生新方块
  35. void fk_add(void);                                        //方块合并

  37. /*
  38. //-----------------俄罗斯方块公用函数--------------------------------------//
  39. void fk_init(void);                                                //方块初始化
  40. void fk_move(unsigned char mode);                //移动方块
  41. */

  43. //-------------------------------------------------------------------------//
  44. #define FULLMAP        0x0fff                                /*掩码*/
  45. #define LINEGUAN        20                                /*20行过一关*/
  46. #define NEWX        15                                        /*预览方块X位置*/
  47. #define NEWY        12                                        /*预览方块Y位置*/
  48. #define LINEMAX        21                                        /*屏幕最高21行*/
  49. uint idata fk_map[LINEMAX+4];                //背景映象
  50. uchar  fk_x,fk_y,fk_r;                                //方块左右、高度、方向
  51. uchar fk_type;                                                //方块形状
  52. uchar  fk_oldx,fk_oldy,fk_oldr;                //方块上次左右、高度、方向
  53. uchar  fk_newtype,fk_newr;                        //新方块形状、方向
  54. uint score;                                                        //总分
  55. uint line;                                                        //总行数        
  56. uchar speed;                                                //速度
  57. uchar moven;                                                //速度相关计数器
  58. uchar automapn;                                                //随机方块的行数
  59. bit fk_run;                                                        //俄罗斯方坑蜗吩诵?
  60.         
  61. uchar code fk_mod[][4][4]={                        //方块模型号,4个方向,4行
  62.         0,0,7,2,0,1,3,1,0,0,2,7,0,2,3,2,        //_|_
  63.         0,0,6,3,0,1,3,2,0,0,6,3,0,1,3,2,        //_|~
  64.         0,0,3,6,0,2,3,1,0,0,3,6,0,2,3,1,        //~|_
  65.         0,0,7,4,0,3,1,1,0,0,1,7,0,2,2,3,        //|__
  66.         0,0,7,1,0,1,1,3,0,0,4,7,0,3,2,2,        //__|
  67.         0,0,0,15,1,1,1,1,0,0,0,15,1,1,1,1,        //____
  68.         0,0,3,3,0,0,3,3,0,0,3,3,0,0,3,3,        //田字
  69. };

  71. uchar code strmap[4][9]={
  72.         "不错！  ","真棒！  ","好极啦！","太棒了！",
  73. };

  75. //--------------------------------------------------------------------------//
  76. void fk_dot(uchar x,uchar y)                //显示1个方块点
  77. {
  78.         printat(x*3+1, 241-(y-4)*12,"■");
  79. }

  81. //--------------------------------------------------------------------------//
  82. void fk_cldot(uchar x,uchar y)                //清除1个方块点
  83. {
  84. //        printat(x*3+1, 241-(y-4)*12,"□");
  85.         printat(x*3+1, 241-(y-4)*12,"┘");
  86. }

  88. //--------------------------------------------------------------------------//
  89. void fk_show(void)                                        //显示分数
  90. {
  91.         printat(50, 12,chnint(score,1));
  92.         printat(60, 12,"00");
  93.         printat(40, 12,"得分:");
  94.         printat(54,36,chnint(line,1));
  95.         printat(40, 36,"行数:");
  96.         printat(54,60,chnchar(speed,1));
  97.         printat(40,60,"速度:");
  98.         printat(54,84,chnchar(automapn,1));
  99.         printat(40,84,"关数:");               
  100. }

  102. //--------------------------------------------------------------------------//
  103. void fk_reffk(void)                                        //刷新方块
  104. {
  105.         uchar i,j;
  106.         uchar temp;
  107.         //----------------------------------------------//清除原来的方块
  108.         for (i=0;i<4;i++)
  109.         {
  110.                 temp=(fk_mod[fk_type][fk_oldr][i]);
  111.                 for (j=fk_oldx;j<fk_oldx+4;j++)
  112.                 {
  113.                         if(temp&0x01)
  114.                         {
  115.                                 fk_cldot(j,fk_oldy+i);
  116.                         }
  117.                         temp>>=1;
  118.                 }
  119.         }
  120.         //----------------------------------------------//显示新的方块
  121.         for (i=0;i<4;i++)
  122.         {
  123.                 temp=(fk_mod[fk_type][fk_r][i]);
  124.                 for (j=fk_x;j<fk_x+4;j++)
  125.                 {
  126.                         if(temp&0x01)
  127.                         {
  128.                                 fk_dot(j,fk_y+i);
  129.                         }
  130.                         temp>>=1;
  131.                 }
  132.         }
  133.         fk_oldx=fk_x;fk_oldy=fk_y;fk_oldr=fk_r;        //保存新方块位置
  134. }

  136. //--------------------------------------------------------------------------//
  137. void fk_refnew(void)                                //刷新预览方块
  138. {
  139.         uchar i,j;
  140.         uchar temp;
  141.         //----------------------------------------------//预览方块
  142.         for (i=0;i<4;i++)
  143.         {
  144.                 temp=(fk_mod[fk_newtype][fk_newr][i]);
  145.                 for (j=NEWX;j<NEWX+4;j++)
  146.                 {
  147.                         if(temp&0x01)
  148.                         {
  149.                                 fk_dot(j,NEWY+i);
  150.                         }
  151.                         else
  152.                         {
  153.                                 fk_cldot(j,NEWY+i);
  154.                         }
  155.                         temp>>=1;
  156.                 }
  157.         }
  158. }

  160. //--------------------------------------------------------------------------//
  161. void fk_refline(yy)                                        //刷新1行背景
  162. {
  163.         uchar i;
  164.         uint temp;
  165.         if (yy>=4)
  166.         {
  167.                 temp=fk_map[yy];
  168.                 for (i=0;i<12;i++)
  169.                 {
  170.                         if ((temp&0x01) !=0)
  171.                                 fk_dot(i,yy);
  172.                         else
  173.                                 fk_cldot(i,yy);
  174.                         temp >>= 1;
  175.                 }
  176.         }
  177. }

  179. //--------------------------------------------------------------------------//
  180. bit fk_chk(void)                                        //冲突检查
  181. {
  182.         uchar i;
  183.         bit neq=0;
  184.         for (i=0;i<4;i++)
  185.         {
  186.                 if ( (((fk_mod[fk_type][fk_r][i])<<fk_x)+(fk_map[fk_y+i])) != (((fk_mod[fk_type][fk_r][i])<<fk_x)|(fk_map[fk_y+i])) )
  187.                         neq=1;
  188.         }
  189.         return(neq);
  190. }

  192. //--------------------------------------------------------------------------//
  193. void fk_new(void)                                                //产生新方块
  194. {
  195.         srand(rand()+fk_x+fk_y+fk_r);
  196.         fk_oldx=fk_x=5;
  197.         fk_oldy=fk_y=LINEMAX;
  198.     fk_type = fk_newtype;
  199.         fk_oldr=fk_newr;
  200.     fk_newtype = rand()%7;
  201.         fk_newr=rand()%4;
  202.         fk_refnew();                        //刷新预览方块
  203.         if (fk_run)
  204.                 fk_reffk();        //刷新显示
  205. }

  207. //--------------------------------------------------------------------------//
  208. void fk_add(void)                                        //方块合并
  209. {
  210.         uchar i,j;
  211.         uchar full=0x00;
  212.         uchar fulltemp;
  213.         uchar fullline=0x00;
  214.         for (i=0;i<4;i++)        //方块合并
  215.         {
  216.                 fk_map[fk_y+i] |= (fk_mod[fk_type][fk_r][i])<<fk_x;
  217.                 full <<= 1;
  218.                 if ((fk_y+i >= 4) && (fk_map[fk_y+i] == 0xffff))                //满行
  219.                 {
  220.                         full |= 0x01;
  221.                 }
  222.         }
  223.         if (full != 0)                //有满行
  224.         {
  225.                 for (j=0;j<3;j++)                //消行闪烁3次
  226.                 {
  227.                         delay(300);
  228.                         fulltemp=full;
  229.                         for (i=0;i<4;i++)        //4行
  230.                         {
  231.                                 if ((fulltemp&0x08) != 0)
  232.                                 {
  233.                                         fk_map[fk_y+i] ^= FULLMAP;
  234.                                 }
  235.                                 fk_refline(fk_y+i);
  236.                                 fulltemp <<= 1;
  237.                         }
  238.                 }
  239.                 fulltemp=full;
  240.                 for (i=fk_y;i<LINEMAX+4+fullline;i++)        //上面行下移
  241.                 {
  242.                         if ((i < LINEMAX+4)&&(fk_map[i-fullline]!=fk_map[i]))
  243.                         {
  244.                                 fk_map[i-fullline]=fk_map[i];
  245.                                 fk_refline(i-fullline);
  246.                         }
  247.                         if ((i >= LINEMAX+4)&&(fk_map[i-fullline]!=~FULLMAP))
  248.                         {
  249.                                 fk_map[i-fullline]=~FULLMAP;        //背景映象
  250.                                 fk_refline(i-fullline);
  251.                         }
  252.                         if ((fulltemp&0x08) != 0)
  253.                         {
  254.                                 fullline++;
  255.                         }
  256.                         fulltemp <<= 1;
  257.                 }
  258.                 if (((line+fullline)/LINEGUAN) != (line/LINEGUAN))//每20行速度+1
  259.                         speed ++;
  260.                 line += fullline;                                //更新分数、行数
  261.                 score += (1<<fullline)-1;
  262.                 printat(46,180,strmap[fullline-1]);        //夸奖
  263.                 fk_show();                                                //显示分数
  264.                 fk_new();                        //产生新方块
  265.         }
  266.         else
  267.         {
  268.                 if (fk_y > LINEMAX-10)        //在最高位置碰撞且不能消行则游戏结束
  269.                         printat(46,180,"加油啊！");                //加油啊
  270.                 if (fk_y > LINEMAX-6)        //在最高位置碰撞且不能消行则游戏结束
  271.                         printat(46,180,"糟糕了！");                //糟糕了

  273.                 if (fk_y==LINEMAX)                //在最高位置碰撞且不能消行则游戏结束
  274.                         fk_run=0;        //方块初始化
  275.                 else
  276.                         fk_new();        //产生新方块
  277.         }
  278. }

  280. //--------------------------------------------------------------------------//
  281. void fk_init(void)                                        //方块初始化
  282. {
  283.         uchar i;
  284.         fk_run = 0;
  285.         moven=0;
  286.         Lcd6963Cls();
  287.         Lcd6963Rec(0,0,152,255);
  288.         Lcd6963ChHz(0);                                        //切换到16X16点阵
  289.         printat(2, 16,"欢迎光临文君阁");
  290.         printat(2, 48,"请按键选择：");
  291.         printat(2, 80,"-----------------");
  292.         printat(2, 96,"7左旋 8右旋 9右旋");
  293.         printat(2, 112,"4左移 5右旋 6右移");
  294.         printat(2, 128,"4速度 5开始 6关数");
  295.         printat(2, 144,"1左移 2下移 3右移");
  296.         printat(2, 160,"-----------------");
  297.         Lcd6963ChHz(1);                                        //切换到12X12点阵
  298.         printat(46,180,"欢迎使用");
  299.         fk_show();                                                //显示分数
  300.         while (~fk_run)
  301.         {
  302.                 fk_move();                                        //等待设置速度关数开始
  303.                 delay(10);
  304.         }
  305.         for (i=0;i<4;i++)
  306.         {
  307.                 fk_map[i]=0xffff;        //背景映象
  308.         }        delay(3000);
  309.         for (i=4;i<LINEMAX+4;i++)
  310.         {
  311.                 if (i<(automapn+4))
  312.                         fk_map[i]=rand()-1|~FULLMAP; //背景映象
  313.                 else
  314.                         fk_map[i]=~FULLMAP;                //背景映象
  315.                 fk_refline(i);                                //刷新1行背景
  316.         }
  317.         fk_show();                                                //显示分数
  318. //        fk_new();                                                //产生新方块
  319. }   

  321. //--------------------------------------------------------------------------//
  322. void fk_move(void)                                                //移动方块
  323. {
  324.         unsigned char temp;
  325.         if(KeyTest())                                        //检查有无按键
  326.         {
  327.                 putinbuf(KeyGetCode());                //按键码输入接收缓冲区
  328.         }
  329.         if (checkin())
  330.         {
  331.                 temp=getbyte();
  332.                 if (temp!=0) Lcd16WrCharhh(12,0,temp);
  333.                 if (temp!=0) Lcd16WrChar(15,0,temp);
  334.                 putchar(temp);
  335.         }
  336.         else
  337.                 temp=0xff;                                        //无键设为无效键用于下移方块
  338.         temp -= '0';
  339.         switch(temp)
  340.         {
  341.         default:
  342.                 if (--moven)                                //游戏难度
  343.                         break;
  344.                 else
  345.                 {
  346.                         moven=(252>>speed)+2;
  347.                 }
  348.         case 2:                //下移
  349.                 if (fk_run)                                        //游戏中下移
  350.                 {
  351.                         if(fk_y>0)
  352.                         {
  353.                                 fk_y--;
  354.                                 if(fk_chk())
  355.                                 {
  356.                                         fk_y++;                //有冲突取消操作,执行碰撞组合
  357.                                         fk_add();        //方块合并        //产生新方块
  358.                                 }
  359.                         }
  360.                         else                                //方块到底也执行碰撞组合
  361.                         {
  362.                                 fk_add();                //方块合并
  363.                         }
  364.                 }
  365.                 else                                                //初始化时
  366.                 {
  367.                         fk_new();                                //产生新方块
  368.                 }
  369.                 break;
  370.         case 0:                //下移到底
  371.                 while((fk_y>0)&&~(fk_chk())) //一直下移直到冲突
  372.                 {
  373.                         fk_y--;
  374.                 }
  375.                 moven=1;
  376.                 fk_y++;                                //恢复到未冲突位置
  377.                 break;
  378.         case 3:                //右移
  379.         case 6:                //右移
  380.                 if (fk_run)                                        //游戏中右移
  381.                 {
  382.                         if(fk_x<12)
  383.                         {
  384.                                 fk_x++;
  385.                                 if(fk_chk())
  386.                                         fk_x--;//有冲突取消操作
  387.                         }
  388.                 }
  389.                 else                                                        //初始化时
  390.                 {
  391.                         automapn++;
  392.                         automapn &= 0x0f;
  393.                         fk_show();                                        //显示分数
  394.                 }
  395.                 break;
  396.         case 1:                //左移
  397.         case 4:                //移
  398.                 if (fk_run)                                                //游戏中左移
  399.                 {
  400.                         if(fk_x>0)
  401.                         {
  402.                                 fk_x--;
  403.                                 if(fk_chk())
  404.                                         fk_x++;//有冲突取消操作
  405.                         }
  406.                 }
  407.                 else                                                        //初始化时
  408.                 {
  409.                         speed++;
  410.                         speed &= 0x07;
  411.                         fk_show();                                        //显示分数
  412.                 }
  413.                 break;
  414.         case 9:                //右转
  415.         case 8:                //右转
  416.         case 5:                //右转
  417.                 if (fk_run)                                                //游戏中右转
  418.                 {
  419.                         fk_r++;
  420.                         if(fk_chk())
  421.                                 fk_r--;                                        //有冲突取消操作
  422.                         fk_r &= 0x03;
  423.                 }
  424.                 else                                                        //初始化时
  425.                 {
  426.                         fk_run = 1;
  427.                 }
  428.                 break;
  429.         case 7:                //左转
  430.                 if (fk_run)                                                //游戏中右转
  431.                 {
  432.                         fk_r--;
  433.                         if(fk_chk())
  434.                                 fk_r++;                                //有冲突取消操作
  435.                         fk_r &= 0x03;
  436.                 }
  437.                 else                                                        //初始化时
  438.                 {
  439.                         fk_run = 1;
  440.                 }
  441.                 break;
  442.         }
  443.         if((fk_run)&& ((fk_x!=fk_oldx)||(fk_y!=fk_oldy)||(fk_r!=fk_oldr)) )
  444.         {
  445.                 fk_reffk();        //刷新显示
  446.         }
  447.         rand();
  448. }

  450. /*
  451. // ---------------------------------------------- //        32字节
  452. void delay(uint x)
  453. {
  454.    uint i,j;
  455.    for (i=0; i<x;i++) {
  456.       for (j=0;j<102; j++) ;
  457.    }
  458. }

  460. //--------------------------------------------------------------------------//
  461. void main(void)                                                // 测试用
  462. {
  463.         serial_init();
  464.         Lcd6963Init();                                        //Lcd6963复位
  465.         Lcd16Reset();                                        //Lcd16复位
  466.         Serial_main();                                        //        串口测试用主函数  
  467.         Lcd16main();                                        //Lcd16临时测试主程序
  468.         Lcd6963main();                                        //Lcd6963测试用
  469.         fk_init();                                                //方块初始化
  470.         while(1)
  471.         {
  472.                 if (~fk_run)
  473.                         fk_init();                                                //方块初始化
  474.                 fk_move();                                        //移动方块
  475.                 delay(10);
  476.         }
  477. }
  478. */
复制代码

全部资料51hei下载地址：
20项目二十 俄罗斯方块游戏.7z (312.71 KB, 下载次数: 28)

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励！

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏1 分享淘帖 顶顶 踩踩
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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