标题: [原创]开源采用vb上位机串口对时的单片机16*64LED条屏仿真程序 [打印本页]

---

作者: psuxaog    时间: 2018-10-10 20:48
标题: [原创]开源采用vb上位机串口对时的单片机16*64LED条屏仿真程序
附件内有上位机VB源码和上位机安装程序，图片左上角的小界面是上位机程序，可获取电脑的时间和日期发送到16*64LED上显示（需要安装虚拟串口）。

单片机16*64LED条屏仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）




单片机源程序如下:

1. #include "reg51.h"                                                         //包含51单片机的端口和内部寄存器定义的头文件
   
2. typedef unsigned char uint8;                                                               //定义字符型
   
3. typedef unsigned int  uint16;                                                              //定义整型
   
4. typedef unsigned long uint32;                                                              //定义长整型
   
5. uint32  dx,dxx;                                                                                      //字符显示偏移量
   
6. uint8  brk,flag;
   
7. uint8 BUFFER[22];
   
8. sbit RTC_RST     =                P3^5;
   
9. sbit RTC_SCLK         =                 P3^6;
   
10. sbit RTC_IO                 =                P3^7;
    
11. uint8 bdata AA;                                                                                               //brk延时用
    
12. uint8 const code dat_bit_up[]={0xF7,0xFB,0xFD,0xFE,0x7F,0xBF,0xDF,0xEF};   //列高位扫描数据
    
13. uint8 const code dat_bit_down[]={0xFE,0xFD,0xFB,0xF7,0xEF,0xDF,0xBF,0x7F}; //列低位扫描数据
    
14. sbit AA7 = AA^7;
    
15. #define READ_SECOND     0x81
    
16. #define WRITE_SECOND    0x80
    
17. #define READ_MINE       0x83
    
18. #define WRITE_MINE      0x82
    
19. #define READ_HOUR       0x85
    
20. #define WRITE_HOUR                 0x84
    
21. #define READ_DAY                0x87
    
22. #define WRITE_DAY                0x86
    
23. #define READ_MONTH                0x89
    
24. #define WRITE_MONTH                0x88
    
25. #define READ_WEEK                0x8b
    
26. #define WRITE_WEEK                0x8a
    
27. #define READ_YEAR       0x8d
    
28. #define WRITE_YEAR                0x8c
    
29. uint8 const code NUM[][16]=
    
30. {
    
31. 
    
32. {0x00,0x00,0x18,0x24,0x42,0x42,0x42,0x42,0x42,0x42,0x42,0x24,0x18,0x00,0x00,0x00},/*"0",0*/
    
33. …………
    
34. …………
    
35. …………限于本文篇幅 余下代码请从51黑下载附件…………
    
36. 
    
37. {0x00,0x00,0x10,0x81,0x28,0xC2,0x21,0x44,0x21,0x24,0x22,0x00,0x3E,0xFF,0x22,0x44,0x22,0x44,0x22,0x7C,0x3E,0x44,0x22,0x7C,0x22,0x44,0x22,0xFE,0x3E,0x44,0x00,0x44},/*"期",4*/
    
38. 
    
39. {0x00,0x00,0x18,0x18,0x00,0x00,0x00,0x00,0x18,0x18,0x00,0x00,0x00,0x00,0x00,0x00},/*":",0*/
    
40. 
    
41. 
    
42. 
    
43. };
    
44. /*****************************************************************************************************************************
    
45. /     端口定义
    
46. ******************************************************************************************************************************/
    
47. 
    
48. 
    
49. #define LED_PORTH P0          //列高位
    
50. #define LED_PORTL P2          //列低位
    
51. sbit SER_CP=P3^4;             //串行时钟线
    
52. sbit SER_SDA=P3^3;            //串行数据线
    
53. sbit SER_EN=P3^2;             //74595数据有效线
    
54. /*****************************************************************************************************************************
    
55. /   函数名称:Delay
    
56. /   作用: 延时子程序主要用于LED的消隐
    
57. ******************************************************************************************************************************/
    
58. 
    
59. void Delay()                  //延时子程序
    
60. {
    
61.     uint16  i,j;
    
62.     for(i=0;i<0x14;i++)
    
63.     for(j=0;j<0x05;j++);
    
64. }
    
65. /*****************************************************************************************************************************
    
66. /   函数名称:LED_Ser
    
67. /   作用: 发送串行数据到74LS595
    
68. /   入口参数:dat 为要发送的数据8位
    
69. ******************************************************************************************************************************/
    
70. 
    
71. void LED_Ser(uint16 dat)
    
72. {
    
73.     uint8 i;
    
74.     for(i=0;i<16;i++)          //共8BYTE
    
75.     {
    
76.         SER_SDA=dat&0x01;     //把数据的最后一位放在数据线上
    
77.         dat>>=1;              //向右移位共8下这样可以发送8位数据
    
78.         SER_CP=0;                     //
    
79.         SER_CP=1;             //产生上升沿发送数据1BYTE
    
80.     }
    
81. }
    
82. void LED_Ser_8(uint8 dat)
    
83. {
    
84.     uint8 i;
    
85.     for(i=0;i<8;i++)          //共8BYTE
    
86.     {
    
87.         SER_SDA=dat&0x01;     //把数据的最后一位放在数据线上
    
88.         dat>>=1;              //向右移位共8下这样可以发送8位数据
    
89.         SER_CP=0;                     //
    
90.         SER_CP=1;             //产生上升沿发送数据1BYTE
    
91.     }
    
92. }
    
93. 
    
94. /*****************************************************************************************************************************
    
95. /   函数名称:LED_Ser_EN
    
96. /   作用: 用于在SER_EN口线上产生上长沿使74595发送的数据有效
    
97. ******************************************************************************************************************************/
    
98. 
    
99. void LED_Ser_EN()
    
100. {
     
101.     SER_EN=0;                         //
     
102.     SER_EN=1;                 //产生上升沿脉冲用于使74595发的数据有效
     
103. }
     
104. /*****************************************************************************************************************************
     
105. /   函数名称:LED_Disp
     
106. /   作用: 在LED上显示字符或BMP
     
107. /   入口参数:*dat 为要显示的字符或BMP的数据的首地址指针
     
108. ******************************************************************************************************************************/
     
109. 
     
110. void  LED_Disp(uint16 *dat)
     
111. {
     
112.     uint16  tmp;
     
113.         uint8  a,j,i;
     
114.     for(j=0;j<16;)
     
115.     {
     
116.         for(i=0;i<16;i++)
     
117.             {
     
118.             for(a=0;a<4;a++)   //共四个字
     
119.                 {        
     
120.                 if(dx>15){dxx+=16;dx=0;}  //dx,dxx为显示偏移量
     
121.                 tmp=((dat[i+dxx+a*16]>>dx)|(dat[i+dxx+(a+1)*16]<<(16-dx)));//移动一位最大可移动八位左
     
122.                                 if(dat[i+(a+1)*16+dxx]==0x55aa){dxx=0;tmp=0;flag=1;}
     
123.                 LED_Ser(~tmp);        //发送右
     
124.                 }        
     
125.             LED_Ser_EN();      //使发送的数据显示
     
126.             if(j<8){LED_PORTH=dat_bit_up[j];LED_PORTL=0XFF;}   //上半列扫描
     
127.             else{LED_PORTL=dat_bit_down[j-8];LED_PORTH=0XFF;}  //下半列扫描
     
128.             Delay();                                                                        //延时
     
129.             LED_PORTL=0XFF;                                                                //消隐
     
130.             LED_PORTH=0XFF;                                                                //消隐        
     
131.                         j++;
     
132.             }
     
133.     }
     
134. }
     
135. void RTC_Write(uint8 dat)
     
136. {
     
137.         uint8 i;         
     
138.         for(i=0;i<8;i++)
     
139.         {
     
140.                 RTC_IO=(bit)(dat&0x01);
     
141.                 RTC_SCLK=1;
     
142.                 RTC_SCLK=0;
     
143.                 dat>>=1;
     
144.         }
     
145. }
     
146. 
     
147. uint8 RTC_Read()                                                
     
148. {
     
149.     uint8 i;
     
150.     for(i=0; i<8; i++)
     
151.     {
     
152.         AA >>=1;                                 //相当于汇编中的 RRC
     
153.         AA7 = RTC_IO;
     
154.         RTC_SCLK = 1;
     
155.         RTC_SCLK = 0;
     
156.     }
     
157.     return AA;
     
158. }
     
159. 
     
160. void RTC_Write_Byte(uint8 addr,uint8 dat)
     
161. {
     
162.         RTC_RST=0;
     
163.         RTC_SCLK=0;
     
164.         RTC_RST=1;
     
165.         RTC_Write(addr);
     
166.         RTC_Write(dat);
     
167.         RTC_SCLK=1;
     
168.         RTC_RST=0;
     
169. }
     
170. 
     
171. uint8 RTC_Read_Byte(uint8 addr)
     
172. {
     
173.         uint8 dat;
     
174.         RTC_RST=0;
     
175.         RTC_SCLK=0;
     
176.         RTC_RST=1;
     
177.         RTC_Write(addr|0x01);
     
178.         dat=RTC_Read();
     
179.         RTC_SCLK=1;
     
180.         RTC_RST=0;
     
181.         return dat;
     
182. }
     
183. 
     
184. 
     
185. typedef struct __SYSTEMTIME__
     
186. {
     
187.         uint8  Second;
     
188.         uint8  Mine;
     
189.         uint8  Hour;
     
190.         uint8  Day;
     
191.         uint8  Month;
     
192.         uint8  Week;
     
193.         uint8  Year;
     
194. }SYSTEMTIME;
     
195. 
     
196. 
     
197. SYSTEMTIME TIMETYPE;
     
198. void CurrentTime(SYSTEMTIME *dat)
     
199. {
     
200.         uint8 TimeValue;
     
201.         TimeValue=RTC_Read_Byte(READ_SECOND);
     
202.         dat->Second=(((TimeValue&0x70)>>4)*10)+(TimeValue&0x0f);
     
203.         TimeValue=RTC_Read_Byte(READ_MINE);
     
204.         dat->Mine=  (((TimeValue&0x70)>>4)*10)+(TimeValue&0x0f);
     
205.         TimeValue=RTC_Read_Byte(READ_HOUR);
     
206.         dat->Hour=  (((TimeValue&0x70)>>4)*10)+(TimeValue&0x0f);
     
207.         TimeValue=RTC_Read_Byte(READ_DAY);
     
208.         dat->Day=        (((TimeValue&0x70)>>4)*10)+(TimeValue&0x0f);
     
209.         TimeValue=RTC_Read_Byte(READ_MONTH);
     
210.         dat->Month= (((TimeValue&0x70)>>4)*10)+(TimeValue&0x0f);
     
211.         TimeValue=RTC_Read_Byte(READ_WEEK);
     
212.         dat->Week=        (TimeValue&0x0f);
     
213.         TimeValue=RTC_Read_Byte(READ_YEAR);
     
214.         dat->Year=        (((TimeValue&0x70)>>4)*10)+(TimeValue&0x0f);
     
215. }
     
216. void  LED_Disp_Time_Year(SYSTEMTIME *dat)
     
217. {
     
218.         uint8  j,i;
     
219.     for(j=0;j<16;)
     
220.     {
     
221.         for(i=0;i<16;i++)
     
222.             {
     
223.                                 LED_Ser_8(~HZ[0][i]);        //发送右
     
224.                                 LED_Ser_8(~NUM[2][i]);        //发送右
     
225.                                 LED_Ser_8(~NUM[0][i]);        //发送右
     
226.                                 LED_Ser_8(~NUM[(dat->Year)/10][i]);        //发送右
     
227.                                 LED_Ser_8(~NUM[(dat->Year)%10][i]);        //发送右
     
228.                                 LED_Ser_8(~Date[0][i*2+1]);
     
229.                                 LED_Ser_8(~Date[0][i*2]);
     
230.                                 LED_Ser_8(~HZ[0][i]);        //发送右
     
231.                                 
     
232. 
     
233. 
     
234.             LED_Ser_EN();      //使发送的数据显示
     
235.             if(j<8){LED_PORTH=dat_bit_up[j];LED_PORTL=0XFF;}   //上半列扫描
     
236.             else{LED_PORTL=dat_bit_down[j-8];LED_PORTH=0XFF;}  //下半列扫描
     
237.             Delay();                                                                        //延时
     
238.             LED_PORTL=0XFF;                                                                //消隐
     
239.             LED_PORTH=0XFF;                                                                //消隐        
     
240.                         j++;
     
241.             }
     
242.     }
     
243. }
     
244. void  LED_Disp_Time_Month(SYSTEMTIME *dat)
     
245. {
     
246.         uint8  j,i;
     
247.     for(j=0;j<16;)
     
248.     {
     
249.         for(i=0;i<16;i++)
     
250.             {
     
251.                                 LED_Ser_8(~NUM[dat->Month/10][i]);        //发送右
     
252.                                 LED_Ser_8(~NUM[dat->Month%10][i]);        //发送右
     
253.                                 LED_Ser_8(~Date[1][i*2+1]);        //发送右
     
254.                                 LED_Ser_8(~Date[1][i*2]);        //发送右
     
255.                                 LED_Ser_8(~NUM[dat->Day/10][i]);        //发送右
     
256.                                 LED_Ser_8(~NUM[dat->Day%10][i]);
     
257.                                 LED_Ser_8(~Date[2][i*2+1]);
     
258.                                 LED_Ser_8(~Date[2][i*2]);        //发送右
     
259.                                 
     
260. 
     
261. 
     
262.             LED_Ser_EN();      //使发送的数据显示
     
263.             if(j<8){LED_PORTH=dat_bit_up[j];LED_PORTL=0XFF;}   //上半列扫描
     
264.             else{LED_PORTL=dat_bit_down[j-8];LED_PORTH=0XFF;}  //下半列扫描
     
265.             Delay();                                                                        //延时
     
266.             LED_PORTL=0XFF;                                                                //消隐
     
267.             LED_PORTH=0XFF;                                                                //消隐        
     
268.                         j++;
     
269.             }
     
270.     }
     
271. }
     
272. void  LED_Disp_Time_Week(SYSTEMTIME *dat)
     
273. {
     
274.         uint8  j,i;
     
275.     for(j=0;j<16;)
     
276.     {
     
277.         for(i=0;i<16;i++)
     
278.             {
     
279.                                 LED_Ser_8(~HZ[0][i]);        //发送右
     
280.                                 LED_Ser_8(~Date[3][i*2+1]);        //发送右
     
281.                                 LED_Ser_8(~Date[3][i*2]);        //发送右
     
282.                                 LED_Ser_8(~Date[4][i*2+1]);        //发送右
     
283.                                 LED_Ser_8(~Date[4][i*2]);        //发送右
     
284.                                 LED_Ser_8(~WEEK[dat->Week-1][i*2+1]);
     
285.                                 LED_Ser_8(~WEEK[dat->Week-1][i*2]);
     
286.                                 LED_Ser_8(~HZ[0][i]);        //发送右
     
287.                                 
     
288. 
     
289. 
     
290.             LED_Ser_EN();      //使发送的数据显示
     
291.             if(j<8){LED_PORTH=dat_bit_up[j];LED_PORTL=0XFF;}   //上半列扫描
     
292.             else{LED_PORTL=dat_bit_down[j-8];LED_PORTH=0XFF;}  //下半列扫描
     
293.             Delay();                                                                        //延时
     
294.             LED_PORTL=0XFF;                                                                //消隐
     
295.             LED_PORTH=0XFF;                                                                //消隐        
     
296.                         j++;
     
297.             }
     
298.     }
     
299. }
     
300. void  LED_Disp_Time_Time(SYSTEMTIME *dat)
     
301. {
     
302.         uint8  j,i;
     
303.     for(j=0;j<16;)
     
304.     {
     
305.         for(i=0;i<16;i++)
     
306.             {
     
307.                                 LED_Ser_8(~NUM[dat->Hour/10][i]);        //发送右
     
308.                                 LED_Ser_8(~NUM[dat->Hour%10][i]);        //发送右
     
309.                                 LED_Ser_8(~Date[5][i]);        //发送右
     
310.                                 LED_Ser_8(~NUM[dat->Mine/10][i]);        //发送右
     
311.                                 LED_Ser_8(~NUM[dat->Mine%10][i]);        //发送右
     
312.                                 LED_Ser_8(~Date[5][i]);
     
313.                                 LED_Ser_8(~NUM[dat->Second/10][i]);
     
314.                                 LED_Ser_8(~NUM[dat->Second%10][i]);        //发送右
     
315.                                 
     
316. 
     
317. 
     
318.             LED_Ser_EN();      //使发送的数据显示
     
319.             if(j<8){LED_PORTH=dat_bit_up[j];LED_PORTL=0XFF;}   //上半列扫描
     
320.             else{LED_PORTL=dat_bit_down[j-8];LED_PORTH=0XFF;}  //下半列扫描
     
321.             Delay();                                                                        //延时
     
322.             LED_PORTL=0XFF;                                                                //消隐
     
323.             LED_PORTH=0XFF;                                                                //消隐        
     
324.                         j++;
     
325.             }
     
326.     }
     
327. }               
     
328. /*****************************************************************************************************************************
     
329. /   函数名称:ET0_INT
     
330. /   作用: 定时器T0的中断服务程序用于延自加字符显示偏移量以产生字符滚动显示的效果
     
331. ******************************************************************************************************************************/
     
332. void ET0_INT() interrupt 1 using 0    //中断服务程序
     
333. {
     
334.     TH0=0x03;
     
335.     TL0=0x04;
     
336.     brk++;
     
337.     if(brk==10)
     
338.     {
     
339.         brk=0;       //brk延时用
     
340.         dx++;       //字符显示偏移量
     
341.     }
     
342. }
     
343. void Char_to_time(uint8 *dat)
     
344. {
     
345.         uint8 year,month,day,week,hour,mine;
     
346.     year=((dat[0]-'0')*16+(dat[1]-'0'));
     
347.         month=((dat[3]-'0')*16+(dat[4]-'0'));
     
348.         day=((dat[6]-'0')*16+(dat[7]-'0'));
     
349.         hour=((dat[9]-'0')*16+(dat[10]-'0'));
     
350.         mine=((dat[12]-'0')*16+(dat[13]-'0'));
     
351.         week=(dat[15]-'0');
     
352.         RTC_Write_Byte(0x8e,0x00); //写入允许
     
353.     RTC_Write_Byte(0x80,WRITE_SECOND|0x80);
     
354.         RTC_Write_Byte(0x8e,0x80); //禁止写入
     
355.         RTC_Write_Byte(0x8e,0x00); //写入允许
     
356.         RTC_Write_Byte(WRITE_YEAR,year); //写入新的秒数
     
357.         RTC_Write_Byte(WRITE_MONTH,month); //写入新的秒数
     
358.         RTC_Write_Byte(WRITE_DAY,day); //写入新的秒数
     
359.         RTC_Write_Byte(WRITE_HOUR,hour); //写入新的秒数
     
360.         RTC_Write_Byte(WRITE_MINE,mine&0x7f); //写入新的秒数
     
361.         RTC_Write_Byte(WRITE_WEEK,week); //写入新的秒数
     
362.         RTC_Write_Byte(0x8e,0x00); //写入允许
     
363.         RTC_Write_Byte(0x80,WRITE_SECOND&0x7f);
     
364.         RTC_Write_Byte(0x8E,0x80);
     
365. }
     
366.         
     
367. void Serial_int() interrupt 4 using 0
     
368. {
     
369.         uint8 i;
     
370.         for(i=0;i<17;i++)
     
371.         {
     
372.         //        RI=0;
     
373.                 while(RI==0);
     
374.                 RI=0;
     
375.                 BUFFER[i]=SBUF;
     
376.         }
     
377.         Char_to_time(BUFFER);
     
378. 
     
379. }
     
380. /*****************************************************************************************************************************
     
381. /   函数名称:main
     
382. /   作用: 主程序
     
383. ******************************************************************************************************************************/
     
384. void main()
     
385. {
     
386. //   TMOD=0x01;      //定时器方式1
     
387.     TH0=0x03;
     
388.     TL0=0x04;
     
389.                
     
390.         TMOD=0x20;
     
391.         TH1=0xfd;
     
392.         TL1=0xfd;
     
393.         SCON=0x50;
     
394.         PCON&=0xef;
     
395.         EA=1;           //开总中断
     
396.     ET0=1;          //开定时器中断
     
397.     TR0=1;          //开始定时
     
398.         ES=1;
     
399.         TR1=1;
     
400.         RI=0;
     
401. 
     
402.         while(1)
     
403.         {
     
404.                
     
405.             while(!flag)
     
406.                 {
     
407.                         LED_Disp(HZ);
     
408.                 }
     
409.                 while(dx!=0x14)
     
410.                 {
     
411.                         CurrentTime(&TIMETYPE);
     
412.                         LED_Disp_Time_Year(&TIMETYPE); //显示主程序
     
413. 
     
414.                 }
     
415.                 dx=0;
     
416.                 while(dx!=0x14)
     
417.                 {
     
418.                         CurrentTime(&TIMETYPE);
     
419.                         LED_Disp_Time_Month(&TIMETYPE);
     
420.                 }
     
421.                 dx=0;
     
422.                 while(dx!=0x14)
     
423.                 {
     
424.                         CurrentTime(&TIMETYPE);
     
425.                         LED_Disp_Time_Week(&TIMETYPE);
     
426.                 }
     
427.                 dx=0;
     
428.                 while(dx!=0x6f)
     
429.                 {
     
430.                         CurrentTime(&TIMETYPE);
     
431.                         LED_Disp_Time_Time(&TIMETYPE);
     
432.                 }
     
433.                 dx=0;
     
434.                 flag=0;
     
435.                 while(!flag)
     
436.                 {
     
437.                         LED_Disp(HZ1);
     
438.                 }
     
439.                 flag=0;
     
440.         }
     
441.    
     
442. }   
     

复制代码

所有资料51hei提供下载:
HBLED.rar (3.53 MB, 下载次数: 47)

2018-10-10 20:45 上传

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

---

作者: 无罪之宾    时间: 2018-11-12 14:29
谢谢分享！收藏了！

---

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

Powered by Discuz! X3.1