贪吃蛇+俄罗斯方块+万年历 Proteus仿真单片机程序

原理图

1. #include <at89x51.h>
   
2. #include "18b20.h"
   
3. #include "1302.h"
   
4. #include "12864.h"
   
5. #include "zifu.h"
   
6. uchar k,direction;
   
7. bit flag;
   
8. bit flag5=0;                           //flag5是外部中断1的标志位 flag1是步进标志
   
9. uchar p,dengji;               //定时次数
   
10. bit flag1=0;
    
11. systemtime realtime;
    
12. bit first=1;                                   //中断次数控制
    
13. void dingshi() interrupt 1  using 1  //定时程序.产生步进时间
    
14. {
    
15.    if(p--)
    
16.    {
    
17.     TL0=0;
    
18.         TH0=0xa0;
    
19.         flag1=0;
    
20.    }
    
21.    else
    
22.    {
    
23.      flag1=1;
    
24.          TL0=0;
    
25.          TH0=0x00;
    
26.          p=20-(dengji>>1);
    
27.    }
    
28. }
    
29. /*开始确认暂停键的判断*/
    
30. void zhongduan1() interrupt 2 using 2
    
31. {
    
32.    if(!flag5)
    
33.    {
    
34.      flag5=1;
    
35.    }
    
36.    else
    
37.    {
    
38.      flag5=0;
    
39.    }
    
40. }
    
41. void zhongduan() interrupt 0 using 0
    
42.   {
    
43.     uchar i=0;
    
44.         if(first)               //FIRST=1;打开方向按键判断标志
    
45.         {
    
46.         first=0;            
    
47.         k=(P2>>6);           
    
48.         k=k&0x03;                                
    
49.         if(flag)
    
50.           {
    
51.             if(k==1)     direction=3;//左
    
52.             if(k==2)         direction=1;//右
    
53.              }
    
54.           else
    
55.            {
    
56.             if(k==0)         direction=4;//上
    
57.             if(k==3)         direction=2;//下
    
58.              }
    
59.         }
    
60.   }
    
61. /*显示四个小格的方块*/
    
62. void playbuf(uchar buff,char offsetx,char offsety)         
    
63. {
    
64.   //i=(moxing+((dat&0xf0)|((dat&0x0f)<<2)));
    
65.   change1((((*(moxing+((buff&0xf0)+((buff&0x0f)<<2))))&0xf0)>>4)+offsetx,((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))))&0x0f)+offsety);
    
66.   change1((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx,((*(((moxing+((buff&0xf0)|((buff&0x0f)<<2))))+1))&0x0f)+offsety);
    
67.   change1((((*(((moxing+((buff&0xf0)|((buff&0x0f)<<2))))+2))&0xf0)>>4)+offsetx,((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0x0f)+offsety);
    
68.   change1((((*(((moxing+((buff&0xf0)|((buff&0x0f)<<2))))+3))&0xf0)>>4)+offsetx,((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0x0f)+offsety);
    
69. 
    
70. }
    
71. /*判断方块停止向下运动*/
    
72. bit tingzhixia(uchar buff,char offsetx,char offsety)
    
73. {
    
74.    char x0,y0,x1,y1,x2,y2,x3,y3;
    
75.    bit tz=0;
    
76.    x0=(((*(moxing+((buff&0xf0)|((buff&0x0f)<<2))))&0xf0)>>4)+offsetx;
    
77.    x1=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx;
    
78.    x2=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0xf0)>>4)+offsetx;
    
79.    x3=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0xf0)>>4)+offsetx;
    
80.    y2=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0x0f)+offsety;
    
81.    y3=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0x0f)+offsety;
    
82.    y0=((*(moxing+((buff&0xf0)|((buff&0x0f)<<2))))&0x0f)+offsety;
    
83.    y1=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+1))&0x0f)+offsety;
    
84.    
    
85.    if(readfk(x0+1,y0))
    
86.    {
    
87.       if(!((((x0+1)==x1)&&(y0==y1))|(((x0+1)==x2)&&(y0==y2))|(((x0+1)==x3)&&(y0==y3))))
    
88.          {
    
89.           tz=1;
    
90.           }
    
91.    }
    
92.     if(readfk(x1+1,y1))
    
93.    {
    
94.       if(!((((x1+1)==x0)&&(y1==y0))|(((x1+1)==x2)&&(y1==y2))|(((x1+1)==x3)&&(y1==y3))))
    
95.          {
    
96.           tz=1;
    
97.          }
    
98.    }
    
99.    if(readfk(x2+1,y2))
    
100.    {
     
101.       if(!((((x2+1)==x0)&&(y2==y0))|(((x2+1)==x1)&&(y2==y1))|(((x2+1)==x3)&&(y2==y3))))
     
102.           {
     
103.            tz=1;
     
104.           }
     
105.    }
     
106.    if(readfk(x3+1,y3))
     
107.    {
     
108.       if(!((((x3+1)==x0)&&(y3==y0))|(((x3+1)==x1)&&(y3==y1))|(((x3+1)==x2)&&(y3==y2))))
     
109.           {
     
110.            tz=1;
     
111.           }
     
112.    }
     
113.    return(tz);
     
114. }
     
115. /*判断一行是否可以消除*/
     
116. bit hangman(uchar x)
     
117. {
     
118. uchar i;
     
119. bit   man=1;
     
120. for(i=0;i<15;i++)
     
121. {
     
122.          man=man&(readfk(x,i));
     
123.         if(!man)
     
124.         break;
     
125. }
     
126. return(man);
     
127. }
     
128. /*消除一行*/
     
129. void xiaohang(uchar x)
     
130. {
     
131.   uchar i,j;
     
132.   for(i=0;i<15;i++)
     
133.   {
     
134.     clear1(x,i);
     
135.   }
     
136.   for(i=1;i<=x;i++)
     
137.   {
     
138.    for(j=0;j<15;j++)
     
139.    {
     
140.      if(readfk(x-i,j))
     
141.          {
     
142.           change1(x-i+1,j);
     
143.           clear1(x-i,j);
     
144.          }
     
145.    }
     
146.   }
     
147. }
     
148. /*判断是否停止向右*/
     
149. bit tingzhiyou(uchar buff,char offsetx,char offsety)
     
150. {
     
151.    char x0,y0,x1,y1,x2,y2,x3,y3;
     
152.    bit tz=0;
     
153.    x0=(((*(moxing+((buff&0xf0)|((buff&0x0f)<<2))))&0xf0)>>4)+offsetx;
     
154.    x1=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx;
     
155.    x2=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0xf0)>>4)+offsetx;
     
156.    x3=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0xf0)>>4)+offsetx;
     
157.    y2=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0x0f)+offsety;
     
158.    y3=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0x0f)+offsety;
     
159.    y0=((*(moxing+((buff&0xf0)|((buff&0x0f)<<2))))&0x0f)+offsety;
     
160.    y1=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+1))&0x0f)+offsety;
     
161.    if(readfk(x0,y0-1))
     
162.    {
     
163.       if(!(((x0==x1)&&((y0-1)==y1))|((x0==x2)&&((y0-1)==y2))|((x0==x3)&&((y0-1)==y3))))
     
164.          {
     
165.            tz=1;
     
166.           }
     
167.    }
     
168.    if(readfk(x1,y1-1))
     
169.      {
     
170.       if(!(((x1==x0)&&((y1-1)==y0))|((x1==x2)&&((y1-1)==y2))|((x1==x3)&&((y1-1)==y3))))
     
171.          {
     
172.           tz=1;           
     
173.          }
     
174. }
     
175.     if(readfk(x2,y2-1))
     
176.    {
     
177.       if(!(((x2==x0)&&((y2-1)==y0))|((x2==x1)&&((y2-1)==y1))|((x2==x3)&&((y2-1)==y3))))
     
178.           {
     
179.            tz=1;
     
180.           }
     
181.    }
     
182.       if(readfk(x3,y3-1))
     
183.    {
     
184.       if(!(((x3==x0)&&((y3-1)==y0))|((x3==x1)&&((y3-1)==y1))|((x3==x2)&&((y3-1)==y2))))
     
185.           {
     
186.            tz=1;
     
187.           }
     
188.    }
     
189.    return(tz);
     
190. }
     
191. /*判断是否停止向左*/
     
192. bit tingzhizuo(uchar buff,char offsetx,char offsety)
     
193. {
     
194.    char x0,y0,x1,y1,x2,y2,x3,y3;
     
195.    bit tz=0;
     
196.    x0=(((*(moxing+((buff&0xf0)|((buff&0x0f)<<2))))&0xf0)>>4)+offsetx;
     
197.    x1=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx;
     
198.    x2=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0xf0)>>4)+offsetx;
     
199.    x3=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0xf0)>>4)+offsetx;
     
200.    y2=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0x0f)+offsety;
     
201.    y3=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0x0f)+offsety;
     
202.    y0=((*(moxing+((buff&0xf0)|((buff&0x0f)<<2))))&0x0f)+offsety;
     
203.    y1=((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+1))&0x0f)+offsety;
     
204.    if(readfk(x0,y0+1))
     
205.    {
     
206.       if(!(((x0==x1)&&((y0+1)==y1))|((x0==x2)&&((y0+1)==y2))|((x0==x3)&&((y0+1)==y3))))
     
207.          {
     
208.            tz=1;
     
209.           }
     
210.    }
     
211.    if(readfk(x1,y1+1))
     
212.      {
     
213.       if(!(((x1==x0)&&((y1+1)==y0))|((x1==x2)&&((y1+1)==y2))|((x1==x3)&&((y1+1)==y3))))
     
214.          {
     
215.           tz=1;           
     
216.          }
     
217. }
     
218.     if(readfk(x2,y2+1))
     
219.    {
     
220.       if(!(((x2==x0)&&((y2+1)==y0))|((x2==x1)&&((y2+1)==y1))|((x2==x3)&&((y2+1)==y3))))
     
221.           {
     
222.            tz=1;
     
223.           }
     
224.    }
     
225.       if(readfk(x3,y3+1))
     
226.    {
     
227.       if(!(((x3==x0)&&((y3+1)==y0))|((x3==x1)&&((y3+1)==y1))|((x3==x2)&&((y3+1)==y2))))
     
228.           {
     
229.            tz=1;
     
230.           }
     
231.    }
     
232.    return(tz);
     
233. }
     
234. /*清除一个方块*/
     
235. void clearbuf(uchar dat,char setx,char sety)
     
236. {
     
237.   uchar *i;
     
238.   i=(moxing+((dat&0xf0)|((dat&0x0f)<<2)));
     
239.   clear1(((((*i)&0xf0)>>4)+setx),(((*i)&0x0f)+sety));
     
240.   clear1(((((*(i+1))&0xf0)>>4)+setx),(((*(i+1))&0x0f)+sety));
     
241.   clear1(((((*(i+2))&0xf0)>>4)+setx),(((*(i+2))&0x0f)+sety));
     
242.   clear1(((((*(i+3))&0xf0)>>4)+setx),(((*(i+3))&0x0f)+sety));  
     
243. }
     
244. /*俄罗斯方块子程序*/
     
245. void fangkuai(void)
     
246. {
     
247.   uchar fenshu=0;
     
248.   char offsety,offsetx;
     
249.   char offsety_buff,offsetx_buff;
     
250.   uchar buff=0x10;                 
     
251.   bit ting=0;                                                               
     
252.   uchar i;
     
253.   //flag5=1;
     
254.   TMOD=1;          //定时器工作方式
     
255.   IT0=1;          //边延有效
     
256.   IT1=1;
     
257.   EA=1;                  //开CPU中断
     
258.   ET0=1;          //开定时器中断
     
259.   EX0=1;          //开外部中断
     
260.   EX1=1;
     
261.   TL0=0x00;
     
262.   TH0=0x00;          //定时器初值
     
263.   TR0=1;          //启动定时器
     
264.   k=5;
     
265.   choose12864(2);
     
266.   clear12864();
     
267.   play16(0,0,0,els);
     
268.   play16(0,0,1,els+32);
     
269.   play16(0,0,2,els+64);
     
270.   play16(0,2,0,els+96);
     
271.   play16(0,2,1,els+128);
     
272.   play8(0,0,3,shu0);
     
273.   play8(0,1,3,shu0);
     
274.   vertical(1,60,30);
     
275.   vertical(1,60,127);
     
276.   for(i=0;i<98;i++)
     
277.   {
     
278.     dot(30+i,1);
     
279.         dot(30+i,62);
     
280.   }
     
281.   offsety=7;
     
282.   offsetx=-3;
     
283.   for(;;)
     
284. {
     
285.    if(P3&0x04)
     
286.    first=1;
     
287.    if((k==0x02)&&((P3&0x04)==0x04))
     
288.    {
     
289.      offsety_buff=offsety;
     
290.          ting=tingzhiyou(buff,offsetx,offsety);
     
291.         if(!ting)
     
292.          {
     
293.           if(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0x0f)+offsety)
     
294.       offsety--;
     
295.           clearbuf(buff,offsetx_buff,offsety_buff);
     
296.           playbuf(buff,offsetx,offsety);
     
297.           offsety_buff=offsety;
     
298.          
     
299.     }
     
300.           k=5;
     
301.    }
     
302.    if((k==0x01)&&((P3&0x04)==0x04))
     
303.    {
     
304. 
     
305.      offsety_buff=offsety;
     
306.          ting=tingzhizuo(buff,offsetx,offsety);
     
307.          if(!ting)
     
308.         {
     
309.           if(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0x0f)+offsety<=13)
     
310.      offsety++;
     
311.          k=5;
     
312.          clearbuf(buff,offsetx_buff,offsety_buff);
     
313.          playbuf(buff,offsetx,offsety);
     
314.          offsety_buff=offsety;
     
315.         }
     
316.    }
     
317.    if((k==0x03)&&((P3&0x04)==0x04))
     
318.    {
     
319.      dengji=36;/////////////
     
320.          k=5;
     
321.    }
     
322.    if((k==0x00)&&((P3&0x04)==0x04))
     
323.    {
     
324.       uchar i;
     
325.           k=5;
     
326.           i=buff;
     
327.           buff++;
     
328.           if((buff&0x0f)>=4)
     
329.           buff=buff&0xf0;
     
330.          
     
331.           //change1(0,14);
     
332.       if(((*(((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0x0f)+offsety)>14)
     
333.        {
     
334.              do
     
335.                   {
     
336.                           offsety--;
     
337.                   }while((((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0x0f)+offsety)>14);
     
338.                  
     
339.            }
     
340.           if(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0x0f)+offsety<0)
     
341.           {
     
342.             do
     
343.                 {
     
344.                   offsety++;
     
345.                 }while(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0x0f)+offsety);
     
346.           }
     
347.           clearbuf(i,offsetx_buff,offsety_buff);
     
348.           playbuf(buff,offsetx,offsety);
     
349.    }
     
350.    ting=tingzhixia(buff,offsetx,offsety);
     
351.    while(flag5);
     
352.    if(flag1)
     
353.    {
     
354.      offsetx_buff=offsetx;
     
355.          offsety_buff=offsety;
     
356.      offsetx++;
     
357.          clearbuf(buff,offsetx_buff,offsety_buff);
     
358.          playbuf(buff,offsetx,offsety);
     
359.      offsetx_buff=offsetx;
     
360.          flag1=0;
     
361.     }
     
362.    if((((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx)>22)|ting)
     
363.    {
     
364.     uchar i=0;
     
365.         if(hangman((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx))
     
366.         {xiaohang((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx);fenshu++;i++;}
     
367.    
     
368.         if((((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0xf0)>>4)+offsetx>=(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0xf0)>>4)+offsetx)         //x2>=x3
     
369.         {
     
370.          if((((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0xf0)>>4)+offsetx<(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx)        //x2<x1
     
371.          {
     
372.            if(hangman((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+2)))&0xf0)>>4)+offsetx+i))
     
373.            {xiaohang((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+2)))&0xf0)>>4)+offsetx+i);fenshu++;i++;}
     
374.          }
     
375.          if((((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0xf0)>>4)+offsetx<(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0xf0)>>4)+offsetx)         //x3<x2
     
376.           {
     
377.            if(hangman((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+3)))&0xf0)>>4)+offsetx+i))
     
378.            {xiaohang((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+3)))&0xf0)>>4)+offsetx+i);fenshu++;i++;}
     
379.           }
     
380.          if((((*(moxing+((buff&0xf0)|((buff&0x0f)<<2))))&0xf0)>>4)+offsetx<(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0xf0)>>4)+offsetx)         //x0<x3
     
381.          {
     
382.            if(hangman((((*(moxing+((buff&0xf0)+((buff&0x0f)<<2))))&0xf0)>>4)+offsetx+i))
     
383.            {xiaohang((((*(moxing+((buff&0xf0)+((buff&0x0f)<<2))))&0xf0)>>4)+offsetx+i);fenshu++;i++;}
     
384.          }
     
385.         }
     
386.         if((((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0xf0)>>4)+offsetx<(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0xf0)>>4)+offsetx) //x2<x3
     
387.         {
     
388.            if((((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+3))&0xf0)>>4)+offsetx<(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2))+1)))&0xf0)>>4)+offsetx)
     
389.            {
     
390.              if(hangman((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+3)))&0xf0)>>4)+offsetx+i))
     
391.              {xiaohang((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+3)))&0xf0)>>4)+offsetx+i);fenshu++;i++;}
     
392.            }
     
393.            if(hangman((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+2)))&0xf0)>>4)+offsetx+i))
     
394.            {xiaohang((((*((moxing+((buff&0xf0)+((buff&0x0f)<<2))+2)))&0xf0)>>4)+offsetx+i);fenshu++;i++;}
     
395.            if((((*(moxing+((buff&0xf0)|((buff&0x0f)<<2))))&0xf0)>>4)+offsetx<(((*((moxing+((buff&0xf0)|((buff&0x0f)<<2)))+2))&0xf0)>>4)+offsetx)
     
396.            {
     
397.              if(hangman((((*(moxing+((buff&0xf0)+((buff&0x0f)<<2))))&0xf0)>>4)+offsetx+i))
     
398.              {xiaohang((((*(moxing+((buff&0xf0)+((buff&0x0f)<<2))))&0xf0)>>4)+offsetx+i);fenshu++;i++;}
     
399.            }
     
400.         }
     
401.          
     
402.         play8(0,0,3,shu0+((fenshu/10)<<4));
     
403.         play8(0,1,3,shu0+((fenshu%10)<<4));
     
404.         dengji=fenshu/5;
     
405.         if(((((*(moxing+((buff&0xf0)+((buff&0x0f)<<2))))&0xf0)>>4)+offsetx)<1)
     
406.         {
     
407. 
     
408.           delay1ms(450);
     
409.       delay1ms(450);
     
410.       choose12864(2);
     
411.       clear12864();
     
412.       play16(0,4,1,over);
     
413.       play16(0,6,1,over+32);
     
414.       play16(1,0,1,over+64);
     
415.       play16(1,2,1,over+96);
     
416.       delay1ms(450);
     
417.       delay1ms(450);
     
418.       break;
     
419.         }        
     
420.         buff=(((TL0%7)<<4)|(TH0%4));
     
421.         //buff=0x11;
     
422.     offsety=7;
     
423.     offsetx=-3;
     
424.         offsetx_buff=-9;
     
425.         offsety_buff=-9;
     
426.         }
     
427. }
     
428. 
     
429. }                                          
     
430. 
     
431. 
     
432. /*万年历子程序*/                                          
     
433. void wannianli(void)
     
434. {
     
435.   uchar i;
     
436.   uchar count1=0;
     
437.   k=0;
     
438.   choose12864(2);
     
439.   init12864();
     
440.   clear12864();
     
441.   play8(0,0,0,shu2);                 //屏，列，页，地址
     
442.   play8(0,1,0,shu0);
     
443.   play16(0,4,0,nian);
     
444.   play16(1,0,0,yue);
     
445.   play16(1,4,0,ri);
     
446.   play16(0,2,1,shi);
     
447.   play16(0,6,1,fen);
     
448.   play16(1,2,1,miao);
     
449.   
     
450.   play16(1,0,2,xing);
     
451.   play16(1,2,2,qi);
     
452.   vertical(3,63,127);
     
453.   vertical(3,63,126);
     
454.   vertical(3,63,122);
     
455.   vertical(3,63,121);
     
456.    for(i=0;i<7;i++)
     
457.   {
     
458.     dot(121+i,3);
     
459.         dot(121+i,63);
     
460.   }
     
461.   for(i=0;i<12;i++)
     
462.   {
     
463.     dot(123,8+5*i);
     
464.   }
     
465.   for(i=0;i<7;i++)
     
466.   {
     
467.     if(i<4)
     
468.         {
     
469.           play16(0,i<<1,3,yanyu+(i<<5));
     
470.         }
     
471.         if(i>=4)
     
472.         {
     
473.           play16(1,(i-4)<<1,3,yanyu+(i<<5));
     
474.         }
     
475.   }
     
476.   init_ds1302();
     
477.   init_time();
     
478.   flag5=0;
     
479.   do
     
480.   {
     
481.      if(P3&0x04)
     
482.      first=1;
     
483.      init_ds1302();
     
484.      gettime(&realtime);
     
485.          play8(0,2,0,(shu0+(datastring[0]<<4)));
     
486.          play8(0,3,0,(shu0+(datastring[1]<<4)));
     
487.          play8(0,6,0,(shu0+(datastring[2]<<4)));
     
488.          play8(0,7,0,(shu0+(datastring[3]<<4)));
     
489.          play8(1,2,0,(shu0+(datastring[4]<<4)));
     
490.          play8(1,3,0,(shu0+(datastring[5]<<4)));
     
491.          play8(0,0,1,(shu0+(datastring[6]<<4)));
     
492.          play8(0,1,1,(shu0+(datastring[7]<<4)));
     
493.          play8(0,4,1,(shu0+(datastring[8]<<4)));
     
494.          play8(0,5,1,(shu0+(datastring[9]<<4)));
     
495.          play8(1,0,1,(shu0+(datastring[10]<<4)));
     
496.          play8(1,1,1,(shu0+(datastring[11]<<4)));
     
497.          play16(1,4,2,(yi+((datastring[12]-2)<<5)));
     
498.          gettemperature();
     
499.          if(flagg)
     
500.          {
     
501.            play8(0,0,2,fu);
     
502.            play8(1,6,3,fu);
     
503.          }
     
504.          else
     
505.           {
     
506.             clear8(6,4,0);
     
507.                 play8(1,6,3,zheng);
     
508.           }
     
509.          play8(0,4+flagg,2,dian);
     
510.      play8(0,5+flagg,2,C);
     
511.          play8(0,0+flagg,2,(shu0+(temp[0]<<4)));
     
512.          play8(0,1+flagg,2,(shu0+(temp[1]<<4)));
     
513.          play8(0,2+flagg,2,xiao);
     
514.          play8(0,3+flagg,2,(shu0+(temp[2]<<4)));
     
515.          play();
     
516.          dot(124,3);
     
517.          if((k==0x02)&&((P3&0x04)==0x04))
     
518.          {
     
519.            count1++;
     
520.            if(count1==7)
     
521.            count1=0;
     
522.            switch (count1)
     
523.            {
     
524.              case 0:
     
525.                         {
     
526.                   play16(1,0,2,xing);
     
527.                   play16(1,2,2,qi);
     
528.                                   k=0;break;
     
529.                                 }
     
530.          
     
531.              case 1:
     
532.                         {
     
533.                                   play16_fb(0,4,0);                        
     
534.                                   k=0; break;
     
535.                                 }
     
536.                 case 2:
     
537.                         {
     
538.                   play16(0,4,0,nian);
     
539.                   play16_fb(1,0,0);
     
540.                                   k=0;break;                                 
     
541.                                 }
     
542.             case 3:
     
543.                         {
     
544.                                   play16(1,0,0,yue);
     
545.                   play16_fb(1,4,0);
     
546.                                   k=0;break;
     
547.                                 }  
     
548.                 case 4:
     
549.                         {
     
550.                                   play16(1,4,0,ri);
     
551.                   play16_fb(0,2,1);
     
552.                                   k=0;break;
     
553.                                 }
     
554.                 case 5:
     
555.                         {
     
556.                                   play16(0,2,1,shi);
     
557.                   play16_fb(0,6,1);
     
558.                                   k=0;break;
     
559.                                 }
     
560.                 case 6:
     
561.                         {
     
562.                                    play16(0,6,1,fen);
     
563.                                    play16_fb(1,0,2);
     
564.                    play16_fb(1,2,2);
     
565.                                    k=0;break;
     
566.                                 }
     
567.                 default:k=0;break;
     
568.            }
     
569.          }
     
570.          if((k==0x03)&&((P3&0x04)==0x04))
     
571.          {
     
572.            switch(count1)
     
573.            {
     
574.              case 1:
     
575.                          {
     
576.                                    setjia(ds1302_year);k=0;break;
     
577.                                  }
     
578.                  case 2:
     
579.                                  {
     
580.                                    setjia(ds1302_month);k=0;break;
     
581.                                  }
     
582.                  case 3:
     
583.                                  {
     
584.                                    setjia(ds1302_day);k=0;break;
     
585.                                  }
     
586.                     case 4:
     
587.                                  {
     
588.                                    setjia(ds1302_hour);k=0;break;
     
589.                                  }
     
590.                  case 5:
     
591.                                  {
     
592.                                    setjia(ds1302_minute);k=0;break;
     
593.                                  }
     
594.                  case 6:
     
595.                                  {
     
596.                                   setjia(ds1302_week);k=0;break;
     
597.                                  }
     
598.            }
     
599.          }
     
600.          if((k==0x01)&&((P3&0x04)==0x04))
     
601.          {
     
602.            switch(count1)
     
603.            {
     
604.              case 1:
     
605.                          {
     
606.                                    setjian(ds1302_year);k=0;break;
     
607.                                  }
     
608.                  case 2:
     
609.                                  {
     
610.                                    setjian(ds1302_month);k=0;break;
     
611.                                  }
     
612.                  case 3:
     
613.                                  {
     
614.                                    setjian(ds1302_day);k=0;break;
     
615.                                  }
     
616.                     case 4:
     
617.                                  {
     
618.                                    setjian(ds1302_hour);k=0;break;
     
619.                                  }
     
620.                  case 5:
     
621.                                  {
     
622.                                    setjian(ds1302_minute);k=0;break;
     
623.                                  }
     
624.                  case 6:
     
625.                                  {
     
626.                                    setjian(ds1302_week);k=0;break;
     
627.                                  }
     
628.            }
     
629.         }
     
630.   }        while(!flag5);
     
631. }
     
632. /*贪吃蛇子程序*/
     
633. void tanchishe(void)                                                                                                           
     
634. {           
     
635.   uchar xdata length[102]={0,8,1,8};         //存放蛇身的数组;
     
636.   uchar food[2]={12,8};
     
637.   uchar i,x,y;
     
638.   bit flag2,flag3,flag4;
     
639.   TMOD=1;          //定时器工作方式
     
640.   IT0=1;          //边延有效
     
641.   IT1=1;
     
642.   EA=1;                  //开CPU中断
     
643.   ET0=1;          //开定时器中断
     
644.   EX0=1;          //开外部中断
     
645.   EX1=1;
     
646.   TL0=0x00;
     
647.   TH0=0x00;          //定时器初值
     
648.   TR0=1;          //启动定时器
     
649. 
     
650.   dengji=2;
     
651.   p=20;
     
652.   direction=1;
     
653.   flag5=0;
     
654.   
     
655.   choose12864(2);
     
656.   clear12864();        
     
657.   vertical(1,61,30);
     
658.   vertical(1,61,127);
     
659.   for(i=0;i<98;i++)
     
660.   {
     
661.     dot(30+i,1);
     
662.         dot(30+i,62);
     
663.   }
     
664.   play16(0,0,0,tan);
     
665.   play16(0,0,1,chi);
     
666.   play16(0,0,2,she);
     
667.   change(length,(length+1));
     
668.   change((length+2),(length+3));
     
669.   change(food,food+1);
     
670.   for(;;)
     
671.   {
     
672.     do
     
673.    {
     
674.     first=1;
     
675.     while(flag5|!flag1);
     
676.     x=*(length);                              
     
677.     y=*(length+1);
     
678.     switch(direction)                           //右
     
679.         {
     
680.           case 1:
     
681.             {
     
682.               for(i=0;i<dengji-1;i++)
     
683.                {
     
684.                  *(length+(i<<1))=*(length+(i<<1)+2);
     
685.                      *(length+(i<<1)+1)=*(length+(i<<1)+3);
     
686.                }
     
687.                (*(length+(dengji<<1)-2))++;
     
688.                    flag=0;
     
689.                    break;
     
690.               }
     
691.                    case 2:                                          //下
     
692.                  {
     
693.               for(i=0;i<dengji-1;i++)
     
694.                {
     
695.                  *(length+(i<<1))=*(length+(i<<1)+2);
     
696.                      *(length+(i<<1)+1)=*(length+(i<<1)+3);
     
697.                }
     
698.                     (*(length+(dengji<<1)-1))++;
     
699.                         flag=1;
     
700.                         break;
     
701.                   }
     
702.                 case 3:                                        //左
     
703.                  {
     
704.                for(i=0;i<dengji-1;i++)
     
705.                {
     
706.                  *(length+(i<<1))=*(length+(i<<1)+2);
     
707.                      *(length+(i<<1)+1)=*(length+(i<<1)+3);
     
708.                }
     
709.                (*(length+(dengji<<1)-2))--;
     
710.                    flag=0;
     
711.                    break;
     
712.                  }
     
713.                 case 4:
     
714.                  {                        //上
     
715.                  for(i=0;i<dengji-1;i++)
     
716.                {
     
717.                  *(length+(i<<1))=*(length+(i<<1)+2);
     
718.                      *(length+(i<<1)+1)=*(length+(i<<1)+3);
     
719.                }
     
720.                     (*(length+(dengji<<1)-1))--;
     
721.                         flag=1;
     
722.                         break;
     
723.                  }
     
724.          }
     
725.          flag4=((*(length+(dengji<<1)-2))==food[0])&&((*(length+(dengji<<1)-1))==food[1]);
     
726.          if(flag4)        //
     
727.          {
     
728.                 for(i=dengji;i>0;i--)
     
729.                 {
     
730.                   *(length+(i<<1))=*(length+(i<<1)-2);
     
731.                   *(length+(i<<1)+1)=*(length+(i<<1)-1);
     
732.                 }
     
733.                 *length=x;
     
734.                 *(length+1)=y;
     
735.                 dengji++;
     
736.                 do
     
737.                 {
     
738.                   flag3=0;
     
739.                   food[0]=TL0%24;
     
740.               food[1]=TL0%15;
     
741.                   for(i=0;i<dengji-1;i++)         //食物是否在蛇身身上
     
742.                   {
     
743.                     if((*(length+(i<<1)))==food[0]&&((*(length+(i<<1)+1))==food[1]))
     
744.                         {
     
745.                           flag3=1;
     
746.                           break;
     
747.                          }
     
748.                   }
     
749.                 }while(flag3);
     
750.                 change(food,food+1);
     
751.          }
     
752.      flag2=1;          //蛇头没有遇到蛇身
     
753.          for(i=0;i<dengji-1;i++)
     
754.         {
     
755.                    if(*(length+(i<<1))==*(length+(dengji<<1)-2)&&(*(length+(i<<1)+1)==*(length+(dengji<<1)-1)))
     
756.                    {
     
757.                      flag2=0;
     
758.                          break;
     
759.                         }
     
760.                 }
     
761.           flag2=flag2&&*(length+(dengji<<1)-2)>=0&&*(length+(dengji<<1)-2)<24;//蛇头是否出边界
     
762.           flag2=flag2&&*(length+(dengji<<1)-1)>=0&&*(length+(dengji<<1)-1)<15;
     
763.           if(flag2)
     
764.            {
     
765.             clear(&x,&y);
     
766.                
     
767.             
     
768.              {
     
769.                change(length+(dengji<<1)-2,length+(dengji<<1)-1);
     
770.              }
     
771.                  if(flag4)
     
772.                  {
     
773.                    change(&x,&y);
     
774.                   }
     
775.             flag1=0;
     
776.             play8(0,0,3,shu0+((dengji/10)<<4));
     
777.             play8(0,1,3,shu0+(((dengji)%10)<<4));
     
778.            }
     
779.    }
     
780.    while(flag2);
     
781.    delay1ms(450);
     
782.    delay1ms(450);
     
783.    choose12864(2);
     
784.    clear12864();
     
785.    play16(0,4,1,over);
     
786.    play16(0,6,1,over+32);
     
787.    play16(1,0,1,over+64);
     
788.    play16(1,2,1,over+96);
     
789.    delay1ms(450);
     
790.    delay1ms(450);
     
791.    break;
     
792.   }
     
793. }
     
794. //////////////////////////////
     
795. main(void)
     
796. {
     
797. uchar i;
     
798. uchar count=0;
     
799. P2=0xff;
     
800.   EA=1;                  //开CPU中断
     
801.   //ET0=1;          //开定时器中断
     
802.   EX0=1;          //开外部中断
     
803.   EX1=1;
     
804. choose12864(2);
     
805. init12864();
     
806. clear12864();
     
807. ////////////////////
     
808. play16(0,4,0,tan);
     
809. play16(0,6,0,chi);
     
810. play16(1,0,0,she);
     
811. ///////////////////
     
812. play16(0,4,1,els);
     
813. play16(0,6,1,els+32);
     
814. for(i=0;i<3;i++)
     
815. {
     
816.    play16(1,i<<1,1,(els+64+(i<<5)));
     
817. }
     
818. //////////////////
     
819. 
     
820. play16(0,4,2,wnl);
     
821. play16(0,6,2,wnl+32);
     
822. play16(1,0,2,wnl+64);
     
823. 
     
824. //////////////////
     
825. for(;;)
     
826.   {
     
827.     if((k==0x03)&&((P3&0x04)==0x04))
     
828.    {
     
829.         count++;
     
830.         k=0;
     
831.         if(count==4)
     
832.         count=1;
     
833.         switch(count)
     
834.         {
     
835.           case 1:
     
836.                  {
     
837.                             play16(0,4,2,wnl);
     
838.                 play16(0,6,2,wnl+32);
     
839.                 play16(1,0,2,wnl+64);
     
840.                                 play16_fb(0,4,0);
     
841.                 play16_fb(0,6,0);
     
842.                 play16_fb(1,0,0);
     
843.                          };break;
     
844.           case 2: {
     
845.                                       play16(0,4,0,tan);
     
846.                  play16(0,6,0,chi);
     
847.                  play16(1,0,0,she);
     
848.                                  play16_fb(0,4,1);
     
849.                  play16_fb(0,6,1);
     
850.                  for(i=0;i<3;i++)
     
851.                  {
     
852.                    play16_fb(1,i<<1,1);
     
853.                   }
     
854.                     };break;
     
855.           case 3:
     
856.                   {
     
857.                     
     
858.                                  play16(0,4,1,els);
     
859.                  play16(0,6,1,els+32);
     
860.                  for(i=0;i<3;i++)
     
861.                  {
     
862.                    play16(1,i<<1,1,(els+64+(i<<5)));
     
863.                  }
     
864.                                  play16_fb(0,4,2);
     
865.                  play16_fb(0,6,2);
     
866.                  play16_fb(1,0,2);
     
867.                   };break;
     
868.         default:break;
     
869.         }
     
870.   }
     
871.   if(P3&0x04)
     
872.   first=1;
     
873.   if(flag5)
     
874.   {
     
875.     switch(count)
     
876.         {
     
877.           case 1:flag5=0;tanchishe();count=0;flag5=0;k=0;break;
     
878.           case 2:flag5=0;fangkuai();count=0;flag5=0; k=0;break;
     
879.           case 3:flag5=0;wannianli();count=0;flag5=0;k=0;break;
     
880.           default:count=0;k=3;flag5=0;break;
     
881.         }
     
882.          choose12864(2);
     
883.      init12864();
     
884.      clear12864();
     
885. ////////////////////
     
886.      play16(0,4,0,tan);
     
887.      play16(0,6,0,chi);
     
888.      play16(1,0,0,she);
     
889. ///////////////////
     
890.      play16(0,4,1,els);
     
891.      play16(0,6,1,els+32);
     
892.      for(i=0;i<3;i++)
     
893.      {
     
894.        play16(1,i<<1,1,(els+64+(i<<5)));
     
895.      }
     
896. //////////////////
     
897. 
     
898.      play16(0,4,2,wnl);
     
899.      play16(0,6,2,wnl+32);
     
900.      play16(1,0,2,wnl+64);
     
901. //////////////////
     

复制代码