标题: stc8a8k单片机开发的方块游戏机源程序 [打印本页]

---

作者: 624353765    时间: 2021-6-11 06:09
标题: stc8a8k单片机开发的方块游戏机源程序
硬件STC8A8K64S4A12+LCD12864，只做了两个游戏（俄罗斯方块+推箱子），有兴趣的师兄可以继续写完！如需帮助点我头像加我








单片机源程序如下:

1. #include <STC8.h>
   
2. #include <stdlib.h>
   
3. #include <intrins.h>
   
4. #include "51GUI.h"
   
5. #include "ST7567.h"
   
6. #include "EEPROM.h"
   
7. #include "主菜单.h"
   
8. #include "俄罗斯方块1.h"
   
9. #include "推箱子1.h"
   
10. 
    
11. #define InitialAddress 1632
    
12. 
    
13. unsigned char module,minute,second,count,D_num;
    
14. 
    
15. void verify_eeprom(){
    
16.         p_DATA eepromdata dat;
    
17.         unsigned char a;
    
18.         unsigned int b;
    
19.         if(ED->sign!='L'){
    
20.                 for(a=1;a<38;a++)((unsigned char p_DATA*)&dat)[a]=0;
    
21.                 for(b=38;b<467;b++)((unsigned char p_DATA*)&dat)[a]=0xFF;
    
22.                 dat.sign='L';
    
23.                 EEPROM_Write(&dat);
    
24.         }
    
25. }
    
26. 
    
27. unsigned char Key_scan(){//按键扫描
    
28.         unsigned char a;
    
29.         a=P3&Bin(0011,0011);
    
30.         P3=Bin(1100,1101);
    
31.         _nop_();_nop_();_nop_();_nop_();
    
32.         a|=P3&Bin(1100,1101);
    
33.         P3=Bin(0011,0011);
    
34.         return a;
    
35. }
    
36. 
    
37. void main(){
    
38.         VOCTRL=Bin(1000,0000);
    
39.         P_SW1=Bin(0000,0100);
    
40.         SPCTL=Bin(1101,1100);
    
41.         AUXR=Bin(0001,0000);
    
42.         TH0=0x0B;
    
43.         TL0=0xDC;
    
44.         INTCLKO=Bin(0100,0000);
    
45.         IE2=Bin(0000,0100);
    
46.         IE=Bin(1000,0010);
    
47.         init_mempool(InitialAddress,8192-InitialAddress);
    
48.         GUI_Init(64,128);
    
49.         ST7567_init();
    
50.         verify_eeprom();
    
51.         for(;;)switch(module){
    
52.                 case NMM:main_menu();break;
    
53.                 case NT:tetris();break;
    
54.                 case NTG:tetris_gameover();break;
    
55.                 case NS:Sokoban();break;
    
56.                 case NSP:Sokoban_reach();break;
    
57.                 case NSSA:module=NS;break;
    
58.         }
    
59. }
    
60. 
    
61. time25ms()interrupt 1{//计时
    
62.         if(++count>40){
    
63.                 count=0;
    
64.                 if(--second==0xFF){
    
65.                         second=59;
    
66.                         --minute;
    
67.                 }
    
68.         }
    
69. }
    
70. 
    
71. delay()interrupt 12{
    
72.         D_num++;
    
73. }
    
74. 
    
75. Automatically_download()interrupt 16{
    
76.         IAP_CONTR=0x60;
    
77. }
    

复制代码

所有程序51hei提供下载:
方块游戏机.zip (308.87 KB, 下载次数: 25)

2021-6-11 06:07 上传

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

---

欢迎光临 (http://www.51hei.com/bbs/)

Powered by Discuz! X3.1