设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 单片机仿真论坛 › [原创]开源采用vb上位机串口对时的单片机16*64LED条屏仿 ...
返回列表 发新帖
查看: 3339|回复: 1
收起左侧

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

[复制链接]
ID:405708 发表于 2018-10-10 20:48 | 显示全部楼层 |阅读模式
附件内有上位机VB源码和上位机安装程序，图片左上角的小界面是上位机程序，可获取电脑的时间和日期发送到16*64LED上显示（需要安装虚拟串口）。

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

0.png

单片机源程序如下:
  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. {

  32. {0x00,0x00,0x18,0x24,0x42,0x42,0x42,0x42,0x42,0x42,0x42,0x24,0x18,0x00,0x00,0x00},/*"0",0*/
  33. …………
  34. …………
  35. …………限于本文篇幅 余下代码请从51黑下载附件…………

  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*/

  39. {0x00,0x00,0x18,0x18,0x00,0x00,0x00,0x00,0x18,0x18,0x00,0x00,0x00,0x00,0x00,0x00},/*":",0*/



  43. };
  44. /*****************************************************************************************************************************
  45. /     端口定义
  46. ******************************************************************************************************************************/


  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. ******************************************************************************************************************************/

  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. ******************************************************************************************************************************/

  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. }

  94. /*****************************************************************************************************************************
  95. /   函数名称:LED_Ser_EN
  96. /   作用: 用于在SER_EN口线上产生上长沿使74595发送的数据有效
  97. ******************************************************************************************************************************/

  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. ******************************************************************************************************************************/

  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. }

  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. }

  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. }

  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. }


  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;


  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.                                 


  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.                                 


  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.                                 


  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.                                 


  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);

  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;

  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); //显示主程序

  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. }   
复制代码
0.png

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

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励！

查看全部评分

相关帖子
回复

使用道具 举报

ID:61840 发表于 2018-11-12 14:29 | 显示全部楼层
谢谢分享！收藏了！
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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