標(biāo)題: 單片機貪吃蛇+俄羅斯方塊+萬年歷仿真與源碼 12864顯示 [打印本頁]
作者: honortotheend    時間: 2017-11-15 19:35
標(biāo)題: 單片機貪吃蛇+俄羅斯方塊+萬年歷仿真與源碼 12864顯示
貪吃蛇俄羅斯方塊萬年歷的仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）


單片機源程序如下:
  1. //版本：V1.0
  2. //作品：貪吃蛇+萬年歷+俄羅斯方塊
  3. //作者所屬院校：南陽理工學(xué)院
  4. //作者QQ: 497259320
  5. //申明：轉(zhuǎn)載請標(biāo)明作品來源 知識產(chǎn)權(quán)歸作者本人所有！
  6. //工作之余，寫下此程序，程序、設(shè)計中有很多不足之處，風(fēng)格、命名也很亂，這是下一個版本要改進(jìn)的
  7. //在V1.1版本中還會增加矩陣鍵盤和科學(xué)計算器等功能，此程序已成功移植于AVR單片機。硬件上實現(xiàn)要修改底層驅(qū)動！
  8. #include <at89x51.h>
  9. #include "18b20.h"
  10. #include "1302.h"
  11. #include "12864.h"
  12. #include "zifu.h"
  13. uchar k,direction;
  14. bit flag;
  15. bit flag5=0;                           //flag5是外部中斷1的標(biāo)志位 flag1是步進(jìn)標(biāo)志
  16. uchar p,dengji;               //定時次數(shù)
  17. bit flag1=0;
  18. systemtime realtime;
  19. bit first=1;                                   //中斷次數(shù)控制
  20. void dingshi() interrupt 1  using 1  //定時程序.產(chǎn)生步進(jìn)時間
  21. {
  22.    if(p--)
  23.    {
  24.     TL0=0;
  25.         TH0=0xa0;
  26.         flag1=0;
  27.    }
  28.    else
  29.    {
  30.      flag1=1;
  31.          TL0=0;
  32.          TH0=0x00;
  33.          p=20-(dengji>>1);
  34.    }
  35. }
  36. /*開始確認(rèn)暫停鍵的判斷*/
  37. void zhongduan1() interrupt 2 using 2
  38. {
  39.    if(!flag5)
  40.    {
  41.      flag5=1;
  42.    }
  43.    else
  44.    {
  45.      flag5=0;
  46.    }
  47. }
  48. void zhongduan() interrupt 0 using 0
  49.   {
  50.     uchar i=0;
  51.         if(first)               //FIRST=1;打開方向按鍵判斷標(biāo)志
  52.         {
  53.         first=0;            
  54.         k=(P2>>6);          
  55.         k=k&0x03;                               
  56.         if(flag)
  57.           {
  58.             if(k==1)     direction=3;//左
  59.             if(k==2)         direction=1;//右
  60.              }
  61.           else
  62.           {
  63.             if(k==0)         direction=4;//上
  64.             if(k==3)         direction=2;//下
  65.              }
  66.         }
  67.   }
  68. /*顯示四個小格的方塊*/
  69. void playbuf(uchar buff,char offsetx,char offsety)          
  70. {
  71.   //i=(moxing+((dat&0xf0)|((dat&0x0f)<<2)));
  72.   change1((((*(moxing+((buff&0xf0)+((buff&0x0f)<<2))))&0xf0)>>4)+offsetx,((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))))&0x0f)+offsety);
  73.   change1((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx,((*(((moxing+((buff&0xf0)|((buff&0x0f)<<2))))+1))&0x0f)+offsety);
  74.   change1((((*(((moxing+((buff&0xf0)|((buff&0x0f)<<2))))+2))&0xf0)>>4)+offsetx,((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0x0f)+offsety);
  75.   change1((((*(((moxing+((buff&0xf0)|((buff&0x0f)<<2))))+3))&0xf0)>>4)+offsetx,((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0x0f)+offsety);

  77. }
  78. /*判斷方塊停止向下運動*/
  79. bit tingzhixia(uchar buff,char offsetx,char offsety)
  80. {
  81.    char x0,y0,x1,y1,x2,y2,x3,y3;
  82.    bit tz=0;
  83.    x0=(((*(moxing+((buff&0xf0)|((buff&0x0f)<<2))))&0xf0)>>4)+offsetx;
  84.    x1=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx;
  85.    x2=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0xf0)>>4)+offsetx;
  86.    x3=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0xf0)>>4)+offsetx;
  87.    y2=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0x0f)+offsety;
  88.    y3=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0x0f)+offsety;
  89.    y0=((*(moxing+((buff&0xf0)|((buff&0x0f)<<2))))&0x0f)+offsety;
  90.    y1=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+1))&0x0f)+offsety;
  91.    
  92.    if(readfk(x0+1,y0))
  93.    {
  94.       if(!((((x0+1)==x1)&&(y0==y1))|(((x0+1)==x2)&&(y0==y2))|(((x0+1)==x3)&&(y0==y3))))
  95.          {
  96.           tz=1;
  97.           }
  98.    }
  99.     if(readfk(x1+1,y1))
  100.    {
  101.       if(!((((x1+1)==x0)&&(y1==y0))|(((x1+1)==x2)&&(y1==y2))|(((x1+1)==x3)&&(y1==y3))))
  102.          {
  103.           tz=1;
  104.          }
  105.    }
  106.    if(readfk(x2+1,y2))
  107.    {
  108.       if(!((((x2+1)==x0)&&(y2==y0))|(((x2+1)==x1)&&(y2==y1))|(((x2+1)==x3)&&(y2==y3))))
  109.           {
  110.            tz=1;
  111.           }
  112.    }
  113.    if(readfk(x3+1,y3))
  114.    {
  115.       if(!((((x3+1)==x0)&&(y3==y0))|(((x3+1)==x1)&&(y3==y1))|(((x3+1)==x2)&&(y3==y2))))
  116.           {
  117.            tz=1;
  118.           }
  119.    }
  120.    return(tz);
  121. }
  122. /*判斷一行是否可以消除*/
  123. bit hangman(uchar x)
  124. {
  125. uchar i;
  126. bit   man=1;
  127. for(i=0;i<15;i++)
  128. {
  129.         man=man&(readfk(x,i));
  130.         if(!man)
  131.         break;
  132. }
  133. return(man);
  134. }
  135. /*消除一行*/
  136. void xiaohang(uchar x)
  137. {
  138.   uchar i,j;
  139.   for(i=0;i<15;i++)
  140.   {
  141.     clear1(x,i);
  142.   }
  143.   for(i=1;i<=x;i++)
  144.   {
  145.    for(j=0;j<15;j++)
  146.    {
  147.      if(readfk(x-i,j))
  148.          {
  149.           change1(x-i+1,j);
  150.           clear1(x-i,j);
  151.          }
  152.    }
  153.   }
  154. }
  155. /*判斷是否停止向右*/
  156. bit tingzhiyou(uchar buff,char offsetx,char offsety)
  157. {
  158.    char x0,y0,x1,y1,x2,y2,x3,y3;
  159.    bit tz=0;
  160.    x0=(((*(moxing+((buff&0xf0)|((buff&0x0f)<<2))))&0xf0)>>4)+offsetx;
  161.    x1=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx;
  162.    x2=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0xf0)>>4)+offsetx;
  163.    x3=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0xf0)>>4)+offsetx;
  164.    y2=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0x0f)+offsety;
  165.    y3=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0x0f)+offsety;
  166.    y0=((*(moxing+((buff&0xf0)|((buff&0x0f)<<2))))&0x0f)+offsety;
  167.    y1=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+1))&0x0f)+offsety;
  168.    if(readfk(x0,y0-1))
  169.    {
  170.       if(!(((x0==x1)&&((y0-1)==y1))|((x0==x2)&&((y0-1)==y2))|((x0==x3)&&((y0-1)==y3))))
  171.          {
  172.            tz=1;
  173.           }
  174.    }
  175.    if(readfk(x1,y1-1))
  176.      {
  177.       if(!(((x1==x0)&&((y1-1)==y0))|((x1==x2)&&((y1-1)==y2))|((x1==x3)&&((y1-1)==y3))))
  178.          {
  179.           tz=1;          
  180.          }
  181. }
  182.     if(readfk(x2,y2-1))
  183.    {
  184.       if(!(((x2==x0)&&((y2-1)==y0))|((x2==x1)&&((y2-1)==y1))|((x2==x3)&&((y2-1)==y3))))
  185.           {
  186.            tz=1;
  187.           }
  188.    }
  189.       if(readfk(x3,y3-1))
  190.    {
  191.       if(!(((x3==x0)&&((y3-1)==y0))|((x3==x1)&&((y3-1)==y1))|((x3==x2)&&((y3-1)==y2))))
  192.           {
  193.            tz=1;
  194.           }
  195.    }
  196.    return(tz);
  197. }
  198. /*判斷是否停止向左*/
  199. bit tingzhizuo(uchar buff,char offsetx,char offsety)
  200. {
  201.    char x0,y0,x1,y1,x2,y2,x3,y3;
  202.    bit tz=0;
  203.    x0=(((*(moxing+((buff&0xf0)|((buff&0x0f)<<2))))&0xf0)>>4)+offsetx;
  204.    x1=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx;
  205.    x2=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0xf0)>>4)+offsetx;
  206.    x3=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0xf0)>>4)+offsetx;
  207.    y2=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0x0f)+offsety;
  208.    y3=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0x0f)+offsety;
  209.    y0=((*(moxing+((buff&0xf0)|((buff&0x0f)<<2))))&0x0f)+offsety;
  210.    y1=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+1))&0x0f)+offsety;
  211.    if(readfk(x0,y0+1))
  212.    {
  213.       if(!(((x0==x1)&&((y0+1)==y1))|((x0==x2)&&((y0+1)==y2))|((x0==x3)&&((y0+1)==y3))))
  214.          {
  215.            tz=1;
  216.           }
  217.    }
  218.    if(readfk(x1,y1+1))
  219.      {
  220.       if(!(((x1==x0)&&((y1+1)==y0))|((x1==x2)&&((y1+1)==y2))|((x1==x3)&&((y1+1)==y3))))
  221.          {
  222.           tz=1;          
  223.          }
  224. }
  225.     if(readfk(x2,y2+1))
  226.    {
  227.       if(!(((x2==x0)&&((y2+1)==y0))|((x2==x1)&&((y2+1)==y1))|((x2==x3)&&((y2+1)==y3))))
  228.           {
  229.            tz=1;
  230.           }
  231.    }
  232.       if(readfk(x3,y3+1))
  233.    {
  234.       if(!(((x3==x0)&&((y3+1)==y0))|((x3==x1)&&((y3+1)==y1))|((x3==x2)&&((y3+1)==y2))))
  235.           {
  236.            tz=1;
  237.           }
  238.    }
  239.    return(tz);
  240. }
  241. /*清除一個方塊*/
  242. void clearbuf(uchar dat,char setx,char sety)
  243. {
  244.   uchar *i;
  245.   i=(moxing+((dat&0xf0)|((dat&0x0f)<<2)));
  246.   clear1(((((*i)&0xf0)>>4)+setx),(((*i)&0x0f)+sety));
  247.   clear1(((((*(i+1))&0xf0)>>4)+setx),(((*(i+1))&0x0f)+sety));
  248.   clear1(((((*(i+2))&0xf0)>>4)+setx),(((*(i+2))&0x0f)+sety));
  249.   clear1(((((*(i+3))&0xf0)>>4)+setx),(((*(i+3))&0x0f)+sety));  
  250. }
  251. /*俄羅斯方塊子程序*/
  252. void fangkuai(void)
  253. {
  254.   uchar fenshu=0;
  255.   char offsety,offsetx;
  256.   char offsety_buff,offsetx_buff;
  257.   uchar buff=0x10;                 
  258.   bit ting=0;                                                               
  259.   uchar i;
  260.   //flag5=1;
  261.   TMOD=1;          //定時器工作方式
  262.   IT0=1;          //邊延有效
  263.   IT1=1;
  264.   EA=1;                  //開CPU中斷
  265.   ET0=1;          //開定時器中斷
  266.   EX0=1;          //開外部中斷
  267.   EX1=1;
  268.   TL0=0x00;
  269.   TH0=0x00;          //定時器初值
  270.   TR0=1;          //啟動定時器
  271.   k=5;
  272.   choose12864(2);
  273.   clear12864();
  274.   play16(0,0,0,els);
  275.   play16(0,0,1,els+32);
  276.   play16(0,0,2,els+64);
  277.   play16(0,2,0,els+96);
  278.   play16(0,2,1,els+128);
  279.   play8(0,0,3,shu0);
  280.   play8(0,1,3,shu0);
  281.   vertical(1,60,30);
  282.   vertical(1,60,127);
  283.   for(i=0;i<98;i++)
  284.   {
  285.     dot(30+i,1);
  286.         dot(30+i,62);
  287.   }
  288.   offsety=7;
  289.   offsetx=-3;
  290.   for(;;)
  291. {
  292.    if(P3&0x04)
  293.    first=1;
  294.    if((k==0x02)&&((P3&0x04)==0x04))
  295.    {
  296.      offsety_buff=offsety;
  297.          ting=tingzhiyou(buff,offsetx,offsety);
  298.         if(!ting)
  299.          {
  300.           if(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0x0f)+offsety)
  301.       offsety--;
  302.           clearbuf(buff,offsetx_buff,offsety_buff);
  303.           playbuf(buff,offsetx,offsety);
  304.           offsety_buff=offsety;
  305.           
  306.     }
  307.           k=5;
  308.    }
  309.    if((k==0x01)&&((P3&0x04)==0x04))
  310.    {

  312.      offsety_buff=offsety;
  313.          ting=tingzhizuo(buff,offsetx,offsety);
  314.          if(!ting)
  315.         {
  316.          if(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0x0f)+offsety<=13)
  317.      offsety++;
  318.          k=5;
  319.          clearbuf(buff,offsetx_buff,offsety_buff);
  320.          playbuf(buff,offsetx,offsety);
  321.          offsety_buff=offsety;
  322.         }
  323.    }
  324.    if((k==0x03)&&((P3&0x04)==0x04))
  325.    {
  326.      dengji=36;/////////////
  327.          k=5;
  328.    }
  329.    if((k==0x00)&&((P3&0x04)==0x04))
  330.    {
  331.       uchar i;
  332.           k=5;
  333.           i=buff;
  334.           buff++;
  335.           if((buff&0x0f)>=4)
  336.           buff=buff&0xf0;
  337.           
  338.           //change1(0,14);
  339.       if(((*(((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0x0f)+offsety)>14)
  340.        {
  341.              do
  342.                   {
  343.                           offsety--;
  344.                   }while((((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0x0f)+offsety)>14);
  345.                  
  346.            }
  347.           if(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0x0f)+offsety<0)
  348.           {
  349.             do
  350.                 {
  351.                   offsety++;
  352.                 }while(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0x0f)+offsety);
  353.           }
  354.           clearbuf(i,offsetx_buff,offsety_buff);
  355.           playbuf(buff,offsetx,offsety);
  356.    }
  357.    ting=tingzhixia(buff,offsetx,offsety);
  358.    while(flag5);
  359.    if(flag1)
  360.    {
  361.      offsetx_buff=offsetx;
  362.          offsety_buff=offsety;
  363.      offsetx++;
  364.          clearbuf(buff,offsetx_buff,offsety_buff);
  365.          playbuf(buff,offsetx,offsety);
  366.      offsetx_buff=offsetx;
  367.          flag1=0;
  368.     }
  369.    if((((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx)>22)|ting)
  370.    {
  371.     uchar i=0;
  372.         if(hangman((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx))
  373.         {xiaohang((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx);fenshu++;i++;}
  374.    
  375.         if((((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0xf0)>>4)+offsetx>=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0xf0)>>4)+offsetx)         //x2>=x3
  376.         {
  377.          if((((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0xf0)>>4)+offsetx<(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx)        //x2<x1
  378.          {
  379.            if(hangman((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+2)))&0xf0)>>4)+offsetx+i))
  380.            {xiaohang((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+2)))&0xf0)>>4)+offsetx+i);fenshu++;i++;}
  381.          }
  382.          if((((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0xf0)>>4)+offsetx<(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0xf0)>>4)+offsetx)         //x3<x2
  383.           {
  384.            if(hangman((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+3)))&0xf0)>>4)+offsetx+i))
  385.            {xiaohang((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+3)))&0xf0)>>4)+offsetx+i);fenshu++;i++;}
  386.           }
  387.          if((((*(moxing+((buff&0xf0)|((buff&0x0f)<<2))))&0xf0)>>4)+offsetx<(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0xf0)>>4)+offsetx)         //x0<x3
  388.          {
  389.            if(hangman((((*(moxing+((buff&0xf0)+((buff&0x0f)<<2))))&0xf0)>>4)+offsetx+i))
  390.            {xiaohang((((*(moxing+((buff&0xf0)+((buff&0x0f)<<2))))&0xf0)>>4)+offsetx+i);fenshu++;i++;}
  391.          }
  392.         }
  393.         if((((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0xf0)>>4)+offsetx<(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0xf0)>>4)+offsetx) //x2<x3
  394.         {
  395.            if((((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0xf0)>>4)+offsetx<(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx)
  396.            {
  397.              if(hangman((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+3)))&0xf0)>>4)+offsetx+i))
  398.              {xiaohang((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+3)))&0xf0)>>4)+offsetx+i);fenshu++;i++;}
  399.            }
  400.            if(hangman((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+2)))&0xf0)>>4)+offsetx+i))
  401.            {xiaohang((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+2)))&0xf0)>>4)+offsetx+i);fenshu++;i++;}
  402.            if((((*(moxing+((buff&0xf0)|((buff&0x0f)<<2))))&0xf0)>>4)+offsetx<(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0xf0)>>4)+offsetx)
  403.            {
  404.              if(hangman((((*(moxing+((buff&0xf0)+((buff&0x0f)<<2))))&0xf0)>>4)+offsetx+i))
  405.              {xiaohang((((*(moxing+((buff&0xf0)+((buff&0x0f)<<2))))&0xf0)>>4)+offsetx+i);fenshu++;i++;}
  406.            }
  407.         }
  408.          
  409.         play8(0,0,3,shu0+((fenshu/10)<<4));
  410.         play8(0,1,3,shu0+((fenshu%10)<<4));
  411.         dengji=fenshu/5;
  412.         if(((((*(moxing+((buff&0xf0)+((buff&0x0f)<<2))))&0xf0)>>4)+offsetx)<1)
  413.         {

  415.           delay1ms(450);
  416.       delay1ms(450);
  417.       choose12864(2);
  418.       clear12864();
  419.       play16(0,4,1,over);
  420.       play16(0,6,1,over+32);
  421.       play16(1,0,1,over+64);
  422.       play16(1,2,1,over+96);
  423.       delay1ms(450);
  424.       delay1ms(450);
  425.       break;
  426.         }       
  427.         buff=(((TL0%7)<<4)|(TH0%4));
  428.         //buff=0x11;
  429.     offsety=7;
  430.     offsetx=-3;
  431.         offsetx_buff=-9;
  432.         offsety_buff=-9;
  433.         }
  434. }

  436. }                                          


  439. /*萬年歷子程序*/                                          
  440. void wannianli(void)
  441. {
  442.   uchar i;
  443.   uchar count1=0;
  444.   k=0;
  445.   choose12864(2);
  446.   init12864();
  447.   clear12864();
  448.   play8(0,0,0,shu2);                 //屏，列，頁，地址
  449.   play8(0,1,0,shu0);
  450.   
  451. ……………………

  453. …………限于本文篇幅 余下代碼請從51黑下載附件…………
復(fù)制代碼

所有資料51hei提供下載:
貪吃蛇 俄羅斯方塊 萬年歷.rar (158.82 KB, 下載次數(shù): 52)




作者: lxa0    時間: 2017-11-15 22:04
這個早在阿莫論壇里見到過~~~~~~~~~~~~~



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