Proteus仿真单片机贪食蛇改造成键盘控制，大家再也不用鼠标来点了

这个贪食蛇是在本论坛下载的，以前是按键控制的，但proteus没办法给按键做快捷键，于是我就改造了一下。
现在是用串口来控制 ，这样可以用电脑的键盘来玩了，大写的WSAD键表示上下左右


仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）


单片机源程序如下:

1. //proteus仿真论坛:proteus.5d6d.com
   
2. #include <STC15.h>
   
3. #define uchar unsigned char
   
4. #define SNAKE 20                 //最大长度
   
5. #define TIME 50                 //显示延时时间
   
6. #define SPEED 100               //速度控制
   
7. uchar x[SNAKE+1];
   
8. uchar y[SNAKE+1];         
   
9. uchar time,n,i,e;              //延时时间，当前蛇长，通用循环变量，当前速度               
   
10. char addx,addy;                //位移偏移量
    
11. /********************
    
12. 延时程序
    
13. *********************/
    
14. void delay(char MS)
    
15. {
    
16. char us,usn;
    
17. while(MS!=0)
    
18. {
    
19. usn = 0;
    
20. while(usn!=0)
    
21. {
    
22. us=0xff;
    
23. while (us!=0){us--;};
    
24. usn--;
    
25. }
    
26. MS--;
    
27. }
    
28. }
    
29. /*******************************************
    
30. 判断碰撞
    
31. *******************************************/
    
32. bit knock()
    
33. {bit k;
    
34. k=0;
    
35. if(x[1]>7||y[1]>7)k=1;                             //撞墙
    
36. for(i=2;i<n;i++)if((x[1]==x[i])&(y[1]==y[i]))k=1;  //撞自己
    
37. return k;
    
38. }
    
39. /*****************
    
40. 上下左右键位处理
    
41. *****************/
    
42. void turnkey()// interrupt 0 using 2  
    
43. {//up=1;
    
44. if(RI)
    
45. {
    
46. RI=0;
    
47. P0=SBUF;
    
48. if(SBUF=='A'){addy=0;if(addx!=1)addx=-1; else addx=1;}
    
49. if(SBUF=='D'){addy=0;if(addx!=-1)addx=1; else addx=-1;}
    
50. if(SBUF=='S'){addx=0;if(addy!=-1)addy=1; else addy=-1;}
    
51. if(SBUF=='W'){addx=0;if(addy!=1)addy=-1; else addy=1;}
    
52. }
    
53. }
    
54. /*****************
    
55. 乘方程序
    
56. *****************/
    
57. uchar mux(uchar temp)
    
58. {
    
59. if(temp==7)return 128;
    
60. if(temp==6)return 64;
    
61. if(temp==5)return 32;
    
62. if(temp==4)return 16;
    
63. if(temp==3)return 8;
    
64. if(temp==2)return 4;
    
65. if(temp==1)return 2;
    
66. if(temp==0)return 1;
    
67. return 0;
    
68. }
    
69. /*****************
    
70. 显示时钟 显示程序
    
71. *****************/
    
72. void timer0(uchar k)
    
73. {while(k--)
    
74. {for(i=0;i<SNAKE+1;i++)
    
75. {P2=mux(x[i]);P1=255-mux(y[i]);
    
76. turnkey();                     //上下左右键位处理
    
77. delay(TIME);                   //显示延迟
    
78. P2=0x00;P1=0xff;
    
79. }}
    
80. }
    
81. /*****************
    
82. 主程序
    
83. *****************/
    
84. void UartInit(void)                //57600bps@11.0592MHz
    
85. {
    
86.         SCON = 0x50;                //8位数据,可变波特率
    
87.         AUXR |= 0x40;                //定时器1时钟为Fosc,即1T
    
88.         AUXR &= 0xFE;                //串口1选择定时器1为波特率发生器
    
89.         TMOD &= 0x0F;                //设定定时器1为16位自动重装方式
    
90.         TL1 = 0xD0;                //设定定时初值
    
91.         TH1 = 0xFF;                //设定定时初值
    
92.         ET1 = 0;                //禁止定时器1中断
    
93.         TR1 = 1;                //启动定时器1
    
94.         REN = 1;
    
95. }
    
96. 
    
97. void main(void)
    
98. {e=SPEED;
    
99. P0=0xFF;
    
100. P1=0xFF;
     
101. P2=0x00;
     
102. P3=0xFF;
     
103. UartInit();
     
104. while(1)      
     
105. {//if(keyenable==1){P1=0x00;P2=0xff;}else{P1=0xff;P2=0x00;}
     
106. for(i=3;i<SNAKE+1;i++)x[i]=100;for(i=3;i<SNAKE+1;i++)y[i]=100;//初始化
     
107. x[0]=4;y[0]=4;                                                //果子                           
     
108. n=3;                                                          //蛇长 n=-1
     
109. x[1]=1;y[1]=0;                                                //蛇头
     
110. x[2]=0;y[2]=0;                                                //蛇尾1
     
111. addx=0;addy=0;                                                //位移偏移
     
112. //k=1;
     
113. while(1)         
     
114.   {timer0(e);
     
115.    if(knock()){e=SPEED;break;}                          //判断碰撞
     
116. ……………………
     
117. 
     
118. …………限于本文篇幅 余下代码请从51黑下载附件…………
     

复制代码

所有资料51hei提供下载:
8x8点阵 贪吃蛇 串口控制.zip (15.21 KB, 下载次数: 25)

2021-2-2 14:04 上传

点击文件名下载附件
下载积分: 黑币 -5

https://v.youku.com/v_show/id_XNTA5NjMzOTg4NA==.html