找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 1999|回复: 2
收起左侧

贪吃蛇单片机程序

[复制链接]
ID:392293 发表于 2018-9-1 16:56 | 显示全部楼层 |阅读模式
本帖最后由 123ABC456DEF 于 2018-9-1 16:58 编辑

这里有两个,大家可以自行下载
下面是代码
  1. #include <reg51.h>
  2. #define uchar unsigned char
  3. #define uint unsigned int
  4. #define SNAKE 20                 //最大长度
  5. #define TIME 50                 //显示延时时间
  6. #define SPEED 71               //速度控制
  7. //#define  keyenable 1
  8. sbit keyenable=P3^3;                           
  9. /*sbit keyx=P0^1;                                                      
  10. sbit keyy=P0^2;                                                                     

  11. sbit right=P3^6;      
  12. sbit left=P3^5;               
  13. sbit up=P3^7;            
  14. sbit down=P3^4;               
  15. sbit speak=P1^0;
  16. uchar x[SNAKE+1];
  17. uchar y[SNAKE+1];         
  18. uchar time,n,i,e;              //延时时间,当前蛇长,通用循环变量,当前速度                           
  19. char addx,addy;                //位移偏移量
  20. /********************
  21. 延时程序
  22. *********************/
  23. void delay(char MS)
  24. {
  25. char us,usn;
  26. while(MS!=0)
  27. {
  28. usn = 0;
  29. while(usn!=0)
  30. {
  31. us=0xff;
  32. while (us!=0){us--;};
  33. usn--;
  34. }
  35. MS--;
  36. }
  37. }

  38. void delay_1ms(uint xms)//延时函数,有参函数
  39. {
  40.               uint x,y;
  41.               for(x=xms;x>0;x--)
  42.               for(y=124;y>0;y--);
  43. }
  44. /*******************************************
  45. 判断碰撞
  46. *******************************************/
  47. bit knock()
  48. {bit k;
  49. k=0;
  50. if(x[1]>7||y[1]>7)k=1;                             //撞墙
  51. for(i=2;i<n;i++)if((x[1]==x[i])&(y[1]==y[i]))k=1;  //撞自己
  52. return k;
  53. }
  54. /*****************
  55. 上下左右键位处理
  56. *****************/
  57. void turnkey()// interrupt 0 using 2
  58. {//up=1;
  59. if(keyenable)
  60. {
  61. if(left){addy=0;if(addx!=1)addx=-1; else addx=1;}
  62. if(right){addy=0;if(addx!=-1)addx=1; else addx=-1;}
  63. if(up){addx=0;if(addy!=-1)addy=1; else addy=-1;}
  64. if(down){addx=0;if(addy!=1)addy=-1; else addy=1;}
  65. /*if(keyy)
  66. {addy=0;                                 
  67. if(keyx)if(addx==-1)addx=-1; else addx=1;
  68. else
  69. if(addx==1)addx=1; else addx=-1;         
  70. }
  71. else
  72. {addx=0;                                 
  73. if(keyx)if(addy==1)addy=1; else addy=-1;  
  74. else
  75. if(addy==-1)addy=-1; else addy=1;                        
  76. } */
  77. }
  78. }
  79. /*****************
  80. 乘方程序
  81. *****************/
  82. uchar mux(uchar temp)
  83. {
  84. if(temp==7)return 128;
  85. if(temp==6)return 64;
  86. if(temp==5)return 32;
  87. if(temp==4)return 16;
  88. if(temp==3)return 8;
  89. if(temp==2)return 4;
  90. if(temp==1)return 2;
  91. if(temp==0)return 1;
  92. return 0;
  93. }
  94. /*****************
  95. 显示时钟 显示程序
  96. *****************/
  97. void timer0(uchar k)
  98. {while(k--)
  99. {for(i=0;i<SNAKE+1;i++)
  100. {P2=mux(x[i]);P0=255-mux(y[i]);
  101. turnkey();                     //上下左右键位处理
  102. delay(TIME);                   //显示延迟
  103. P2=0x00;P0=0xff;
  104. }}
  105. }
  106. /*****************
  107. 主程序
  108. *****************/            
  109. void main(void)
  110. {e=SPEED;
  111. P1=0x01;
  112. P0=0xff;
  113. P2=0x00;
  114. P3=0x00;
  115. while(1)      
  116. {if(keyenable==1){P1=0x00;P2=0xff;}else{P1=0xff;P2=0x00;}
  117. for(i=3;i<SNAKE+1;i++)x[i]=100;for(i=3;i<SNAKE+1;i++)y[i]=100;//初始化
  118. x[0]=4;y[0]=4;                                                //果子                           
  119. n=3;                                                          //蛇长 n=-1
  120. x[1]=1;y[1]=0;                                                //蛇头
  121. x[2]=0;y[2]=0;                                                //蛇尾1
  122. addx=0;addy=0;                                                //位移偏移
  123. //k=1;
  124. while(1){if(keyenable)break;timer0(1);}
  125. while(1)        
  126.   {timer0(e);
  127.    if(knock()){e=SPEED;speak=0;delay_1ms(500);speak=1;break;}                          //判断碰撞
  128.         if((x[0]==x[1]+addx)&(y[0]==y[1]+addy))         //是否吃东西
  129.            {n++;
  130.                                if(n==SNAKE+1)
  131.                                {n=3;e=e-10;
  132.                                for(i=3;i<SNAKE+1;i++)x[i]=100;
  133.            for(i=3;i<SNAKE+1;i++)y[i]=100;
  134.                                }
  135.            x[0]=x[n-2];
  136.            y[0]=y[n-2];
  137.            }
  138.     for(i=n-1;i>1;i--){x[i]=x[i-1];y[i]=y[i-1];}      
  139.     x[n-1]=x[2];y[n-1]=y[2];
  140.     x[1]=x[2]+addx;y[1]=y[2]+addy;                     //移动
  141.   }                                                                                   
  142. }                                         
  143. }
复制代码

贪吃蛇程序.zip

3.75 KB, 下载次数: 6, 下载积分: 黑币 -5

里面有两个哦

回复

使用道具 举报

ID:1 发表于 2018-9-1 17:23 | 显示全部楼层
补全原理图或者详细说明一下电路连接即可获得100+黑币
回复

使用道具 举报

ID:392293 发表于 2018-9-8 19:40 | 显示全部楼层
这是电路图

电路图

电路图
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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