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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 带农历的电子万年历 单片机软件程序与proteus仿真
返回列表 发新帖
查看: 14166|回复: 31
收起左侧

带农历的电子万年历 单片机软件程序与proteus仿真

  [复制链接]
ID:161991 发表于 2017-1-16 11:35 | 显示全部楼层 |阅读模式
电子万年历软件程序。整个软件程序分模块编写：

      1.包含主程序模块main.c

      2.日历时钟程序模块ds1302.c

      3.年历转换程序模块lunarc.c

      4.键盘处理程序模块keyinput.c

      5.液晶显示程序模块12864.h

      6.字模模块model.h

WIN_20170116_112412.JPG
0.png

单片机主程序：
  1. #include <reg52.h>
  2. #include "12864.h"
  3. #include "model.h"
  4. #include "ds1302.h"
  5. #include "lunar.h"
  6. #include "keyinput.h"

  8. #define uchar unsigned char
  9. #define uint unsigned int
  10. #define NoUpLine         1
  11. #define UpLine           0
  12. #define NoUnderLine 1
  13. #define UnderLine        0
  14. #define FALSE        0
  15. #define TRUE    1

  17. uchar dispBuf[7];
  18. uchar T0_Count=0,Tmp_Count=0;
  19. bit T0_Flag,Tmp_Flag,Flash_Flag;

  21. SYSTIME sys;                   //系统日期
  22. SPDATE SpDat;                   //农历日期

  24. bit Hour_Flag=TRUE,Min_Flag=TRUE,Sec_Flag=TRUE;           //设置时间标志
  25. bit Year_Flag=TRUE,Mon_Flag=TRUE,Day_Flag=TRUE;

  27. uchar State_Set=0;     //设置时、分、秒、日、月、年等状态

  29. bit State_Flag=FALSE,Inc_Flag=FALSE,Dec_Flag=FALSE;        //三个按键是否按下的标志

  31. uchar code Mon2[2][13]={0,31,28,31,30,31,30,31,31,30,31,30,31,
  32.                                   0,31,29,31,30,31,30,31,31,30,31,30,31};

  34. /*****************************LCD显示函数******************************
  35. 入口参数：
  36.                 cDat:                要显示的数
  37.                 X:                        行数 0~7
  38.                 Y:          列数 0~127
  39.                 show_flag:  是否反白显示，0反白，1不反白
  40.                 upline:         上划线, 0表示带上划线
  41.                 underline:  下划线, 0表示带下划线
  42. ***********************************************************************/
  43. void LCD_ShowTime(char cDat,uchar X,uchar Y,bit show_flag,bit up,bit under){
  44.         uchar s[2];
  45.            s[0]=cDat/10+'0';
  46.         s[1]=cDat%10+'0';
  47.         en_disp(X,Y,2,Asc,s,show_flag,up,under);
  48. }
  49.                                                                                                                                   
  50. void Show_YMD(){          //年、月、日、星期、显示函数
  51.         uchar uiTempDat;
  52.            uiTempDat=RDS1302(0x88|0x01);
  53.         sys.cMon=((uiTempDat&0x1f)>>4)*10+(uiTempDat&0x0f);       
  54.         LCD_ShowTime(sys.cMon,2,5,Mon_Flag,NoUpLine,NoUnderLine);       
  55.         hz_disp(4,5,1,uMod[1],1,NoUpLine,NoUnderLine);                                //月
  56.         Show16X32(2,27,ucNum3216[sys.cDay/10],Day_Flag);                        //日
  57.         Show16X32(2,43,ucNum3216[sys.cDay%10],Day_Flag);                         
  58.         hz_disp(6,8,2,ucLunar[13],1,UpLine,UnderLine);                                            
  59.         if(sys.cWeek==7)
  60.         hz_disp(6,40,1,uMod[2],1,UpLine,UnderLine);                                        //星期
  61.         else
  62.     hz_disp(6,40,1,ucLunar[sys.cWeek],1,UpLine,UnderLine);                //星期
  63.     LCD_ShowTime(20,0,9,1,UpLine,UnderLine);
  64.           LCD_ShowTime(sys.cYear,0,25,Year_Flag,UpLine,UnderLine);
  65.     hz_disp(0,41,1,uMod[0],1,UpLine,UnderLine);                                        //年

  67.         SpDat=GetSpringDay(sys.cYear,sys.cMon,sys.cDay);                        //获得农历
  68.     if(SpDat.cMon==1)                                                                                           //显示农历月
  69.           hz_disp(4,64,1,ucLunar[15],1,UpLine,NoUnderLine);                        //"正"
  70.         else if(SpDat.cMon==11)
  71.           hz_disp(4,64,1,ucLunar[16],1,UpLine,NoUnderLine);                        //"冬"
  72.         else if(SpDat.cMon==12)
  73.           hz_disp(4,64,1,ucLunar[17],1,UpLine,NoUnderLine);                        //"腊"
  74.         else
  75.           hz_disp(4,63,1,ucLunar[SpDat.cMon],1,UpLine,NoUnderLine); //"二"~"十"
  76.          if(SpDat.cDay/10==1 && SpDat.cDay%10>0)                                        //显示"十" 例如"十四"而不是"一四"
  77.          hz_disp(4,95,1,ucLunar[10],1,UpLine,NoUnderLine);
  78.          else if(SpDat.cDay/10==2 && SpDat.cDay%10>0)               //显示"廿" 例如"廿三"而不是"二四"
  79.          hz_disp(4,95,1,ucLunar[19],1,UpLine,NoUnderLine);
  80.          else
  81.          hz_disp(4,95,1,ucLunar[SpDat.cDay/10],1,UpLine,NoUnderLine);  //正常数字
  82.         if(!(SpDat.cDay%10))                                                                        //"十"
  83.          hz_disp(4,111,1,ucLunar[10],1,UpLine,NoUnderLine);
  84.         else                                                                                                                //正常数字
  85.          hz_disp(4,111,1,ucLunar[SpDat.cDay%10],1,UpLine,NoUnderLine);

  87.          hz_disp(0,104,1,SX[(uint)(2000+SpDat.cYear)%12],1,UpLine,UnderLine);   //生肖

  89.          hz_disp(2,95,1,TianGan[(uint)(2000+SpDat.cYear)%10],1,NoUpLine,NoUnderLine); //天干
  90.          hz_disp(2,111,1,DiZhi[(uint)(2000+SpDat.cYear)%12],1,NoUpLine,NoUnderLine);  //地支
  91. }

  93. void LCD_ShowWNL(){          //万年历显示函数
  94.         LCD_ShowTime(sys.cSec,6,111,Sec_Flag,UpLine,UnderLine);                 //秒，每秒钟刷新
  95.         if(!sys.cSec || State_Set)                                                                     //分，普通模式每分钟刷新
  96.         LCD_ShowTime(sys.cMin,6,87,Min_Flag,UpLine,UnderLine);                 //    设置模式每次刷新
  97.          
  98.         if(!sys.cSec && !sys.cMin || State_Set)                                                 //时，普通模式每小时刷新
  99.     LCD_ShowTime(sys.cHour,6,63,Hour_Flag,UpLine,UnderLine);     //    设置模式每次刷新
  100.        
  101.         if(!sys.cSec && !sys.cMin && !sys.cHour || State_Set ){      //公历农历的年、月、日、星期
  102.                 Show_YMD();                                                                                                 //普通模式每天刷新
  103.                 if(State_Set==7) State_Set=0;                                                         //设置模式每次刷新
  104.         }       
  105. }

  107. void CAL_Init(){        //日期初始化函数
  108.         sys.cYear=0x13;        //BCD码表示的日历时间值
  109.         sys.cMon=0x06;
  110.         sys.cDay=0x030;
  111.         sys.cHour=0x23;
  112.         sys.cMin=0x59;
  113.         sys.cSec=0x55;
  114.         sys.cWeek=GetWeekDay(sys.cYear,sys.cMon,sys.cDay);
  115. }

  117. void SFR_Init(){                 //定时器1初始化函数
  118.         Flash_Flag=FALSE;
  119.         TMOD=0x11;
  120.         ET1=1;
  121.         TH1= (-10000)/256;
  122.         TL1= (-10000)%256;
  123.         EA=1;
  124. }

  126. void GUI_Init(){         //LCD图形初始化函数
  127.          LCD12864_init();
  128.          ClearLCD();
  129.          Rect(0,0,127,63,1);   //描绘框架
  130.          Line(62,0,62,62,1);
  131.          Line(0,48,127,48,1);
  132.          Line(0,15,127,15,1);
  133.          Line(24,15,24,48,1);
  134.          Line(63,32,128,32,1);

  136.          SetTime(sys);                                   //设置时间
  137.          GetTime(&sys);                                   //获得时间
  138.          
  139.          Show_YMD();
  140.          LCD_ShowTime(sys.cSec,6,111,Sec_Flag,UpLine,UnderLine);
  141.          en_disp(6,103,1,Asc,":",1,UpLine,UnderLine);
  142.          LCD_ShowTime(sys.cMin,6,87,Min_Flag,UpLine,UnderLine);
  143.          en_disp(6,79,1,Asc,":",1,UpLine,UnderLine);         
  144.      LCD_ShowTime(sys.cHour,6,63,Hour_Flag,UpLine,UnderLine);

  146.          hz_disp(2,64,1,ucLunar[11],1,NoUpLine,NoUnderLine);           //"农"
  147.          hz_disp(2,80,1,ucLunar[12],1,NoUpLine,NoUnderLine);           //"历"
  148.          hz_disp(4,79,1,uMod[1],1,UpLine,NoUnderLine);                           //"月"
  149. }

  151. void DecToBCD(){   //二-十进制转换函数
  152.         sys.cHour=(((sys.cHour)/10)<<4)+((sys.cHour)%10);
  153.         sys.cMin=(((sys.cMin)/10)<<4)+((sys.cMin)%10);
  154.         sys.cSec=((sys.cSec/10)<<4)+((sys.cSec)%10);
  155.           sys.cYear=((sys.cYear/10)<<4)+((sys.cYear)%10);
  156.         sys.cMon=((sys.cMon/10)<<4)+((sys.cMon)%10);
  157.         sys.cDay=((sys.cDay/10)<<4)+((sys.cDay)%10);
  158. }

  160. void Time_Set(){   //时间设置函数
  161.         if(State_Flag){                                        //设置键按下
  162.                 State_Flag=FALSE;
  163.                 State_Set++;
  164.                 if(State_Set==8) State_Set=0;
  165.         }

  167.         Hour_Flag=TRUE;Min_Flag=TRUE;Sec_Flag=TRUE;
  168.     Year_Flag=TRUE;Mon_Flag=TRUE;Day_Flag=TRUE;

  170.         switch(State_Set){              //设置类型
  171.                         case 0:                 //无设置
  172.                                 break;
  173.                         case 1:                                        //设置时
  174.                                 Hour_Flag=FALSE;
  175.                                 break;
  176.                         case 2:                                           //设置分
  177.                                 Min_Flag=FALSE;
  178.                                 break;
  179.                         case 3:                                         //设置秒
  180.                                 Sec_Flag=FALSE;
  181.                                 break;
  182.                         case 4:                                        //设置天
  183.                                  Day_Flag=FALSE;
  184.                                 break;
  185.                         case 5:
  186.                                  Mon_Flag=FALSE;     //设置月
  187.                                 break;
  188.                         case 6:
  189.                                  Year_Flag=FALSE;        //设置年
  190.                             break;
  191.                         case 7:                                        //无动作，设置此值为让"年"的反白消失。
  192.                                 break;
  193.           }          
  194.           
  195.         if(Inc_Flag){                                        //加键被按下
  196.                 Inc_Flag=FALSE;
  197.                 switch(State_Set)                {
  198.                         case 0:
  199.                                 break;
  200.                         case 1:                                            //小时加
  201.                                 sys.cHour++;
  202.                                 (sys.cHour)%=24;
  203.                                 break;
  204.                         case 2:                                            //分加1
  205.                                 sys.cMin++;
  206.                                 sys.cMin%=60;
  207.                                 break;
  208.                         case 3:                                         //秒加1
  209.                             sys.cSec++;
  210.                                 sys.cSec%=60;
  211.                                 break;
  212.                         case 4:                                         //天加1
  213.                                 (sys.cDay)=(sys.cDay%Mon2[YearFlag(sys.cYear)][sys.cMon])+1;                  
  214.                                 break;
  215.                         case 5:                                         //月加1
  216.                                 sys.cMon=(sys.cMon%12)+1;
  217.                                 break;
  218.                         case 6:
  219.                                 sys.cYear++;                 //年加1
  220.                                 sys.cYear=sys.cYear%100;
  221.                         break;
  222.                   }       
  223.                 DecToBCD();                                        //转为BCD数
  224.                 sys.cWeek=GetWeekDay(sys.cYear,sys.cMon,sys.cDay);    //算出星期
  225.                 SetTime(sys);                            //存入DS1302
  226.         }

  228.         if(Dec_Flag){                                         //减键按下
  229.                 Dec_Flag=FALSE;
  230.                 switch(State_Set){
  231.                         case 0:
  232.                                 break;
  233.                         case 1:          
  234.                                 sys.cHour=(sys.cHour+23)%24;  //时减1
  235.                                 break;
  236.                         case 2:                                                            //分减1
  237.                                 sys.cMin=(sys.cMin+59)%60;
  238.                                 break;
  239.                         case 3:                                                          //秒减1
  240.                                 sys.cSec=(sys.cSec+59)%60;
  241.                                 break;
  242.                         case 4:                                                          //天减1
  243.                                 sys.cDay=((sys.cDay+Mon2[YearFlag(sys.cYear)][sys.cMon]-1)%Mon2[YearFlag(sys.cYear)][sys.cMon]);                  
  244.                                 if(sys.cDay==0) sys.cDay=Mon2[YearFlag(sys.cYear)][sys.cMon];
  245.                                 break;
  246.                         case 5:                                                          //月减1
  247.                                 sys.cMon=(sys.cMon+11)%12;
  248.                                 if(sys.cMon==0) sys.cMon=12;
  249.                                 break;
  250.                         case 6:                                                          //年减1
  251.                                 sys.cYear=(sys.cYear+99)%100;
  252.                                 break;
  253.                   }       
  254.                 DecToBCD();
  255.                 sys.cWeek=GetWeekDay(sys.cYear,sys.cMon,sys.cDay);              
  256.                 SetTime(sys);       
  257.         }
  258. }

  260. void  main(){        //主函数
  261.          SFR_Init();
  262.          CAL_Init();
  263.          GUI_Init();
  264.          TR1=1;
  265.          while(1){
  266.                 GetTime(&sys);                //获得时间
  267.                 LCD_ShowWNL();                //显示万年历
  268.                 Time_Set();         //时间设置
  269.          }       
  270. }

  272. void timer1() interrupt  3 {  //定时器1中断服务函数
  273.         TH1= (-10000)/256;
  274.         TL1= (-10000)%256;
  275.         keyinput();                                        //读取按键
  276.         if (keyvalue&0x10){       
  277.                 State_Flag=TRUE;
  278.                 keyvalue &= 0xef;                //清键值，保证一直按下只执行一次按键动作。
  279.         }       
  280.         if (keyvalue&0x20 ){                //加
  281.                 Inc_Flag=TRUE;
  282.                 keyvalue &= 0xdf;                //清键值，保证一直按下只执行一次按键动作。
  283.         }       
  284.         if (keyvalue&0x40){                        //减
  285.                 Dec_Flag=TRUE;
  286.                 keyvalue &= 0xbf;                //清键值，保证一直按下只执行一次按键动作。
  287.         }
  288.        
  289. }
复制代码

0.png

资料下载：
带农历的万年历.zip (146.45 KB, 下载次数: 399)
万年历, 软件程序, 电子, 键盘, 日历

评分

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

查看全部评分

相关帖子
回复

使用道具 举报

ID:71282 发表于 2017-2-5 18:42 | 显示全部楼层
谢谢分享，高手啊，有点小问题，12864怎么是黑的呢
回复

使用道具 举报

ID:71282 发表于 2017-2-5 18:51 | 显示全部楼层
12864引脚没有修改好，
应该是
sbit  LCD12864_EN         =P2^4;
sbit  LCD12864_RW         =P2^3;       //0:write ; 1:read
sbit  LCD12864_RS         =P2^2;           //0:the command .1:the data
sbit  LCD12864_CS_L       =P2^0;       //select the left of the lcd when 1
sbit  LCD12864_CS_R       =P2^1;  
sbit  LCD12864_RST                      =P2^5;
程序还有些问题的
回复

使用道具 举报

ID:71282 发表于 2017-2-5 18:54 | 显示全部楼层
运行效果如图
QQ截图20170205185008.jpg
回复

使用道具 举报

ID:76133 发表于 2017-11-17 11:43 | 显示全部楼层

谢谢分享，高手啊
回复

使用道具 举报

ID:252496 发表于 2017-11-26 22:34 | 显示全部楼层
讲真，要是急用就别下载了，浪费黑币，要修改的
回复

使用道具 举报

ID:329035 发表于 2018-5-13 18:33 | 显示全部楼层
学习学习
回复

使用道具 举报

ID:329308 发表于 2018-5-14 09:06 | 显示全部楼层
好东西
回复

使用道具 举报

ID:44037 发表于 2018-5-14 10:32 | 显示全部楼层
好东西  学习一下
2018-05-14_102258.jpg


2018-05-14_102529.jpg


回复

使用道具 举报

ID:350298 发表于 2018-6-12 15:34 | 显示全部楼层
谢谢大神呀，请问一下阳历农历日期是会一起变化的嘛，还是要手调呀
回复

使用道具 举报

ID:368502 发表于 2018-7-11 09:03 | 显示全部楼层
youqq 发表于 2017-2-5 18:51
12864引脚没有修改好，
应该是
sbit  LCD12864_EN         =P2^4;

你好，问一下 这段代码往哪加啊
回复

使用道具 举报

ID:368600 发表于 2018-7-12 10:52 | 显示全部楼层
哇，正好我在做这个，非常感谢
回复

使用道具 举报

ID:370060 发表于 2018-7-12 11:14 | 显示全部楼层
谢谢帮助，绝世神贴
回复

使用道具 举报

ID:360050 发表于 2018-7-25 22:12 | 显示全部楼层
有总程序嘛
回复

使用道具 举报

ID:360050 发表于 2018-7-25 22:58 | 显示全部楼层
楼主有总程序嘛
回复

使用道具 举报

ID:394197 发表于 2018-9-10 10:05 | 显示全部楼层
看不大懂LCD显示的东西
回复

使用道具 举报

ID:136393 发表于 2019-1-15 19:30 | 显示全部楼层
仿真显示屏不显示
回复

使用道具 举报

ID:454000 发表于 2019-1-16 00:48 | 显示全部楼层
不错不错，好例子！

评分

参与人数 3黑币 +65 收起 理由
钻牛尖滴刘尖尖 + 15
sheng7533967 + 15
Sawardeakar + 35

查看全部评分

回复

使用道具 举报

ID:494672 发表于 2019-5-12 15:30 | 显示全部楼层
感谢楼主分享
回复

使用道具 举报

ID:494672 发表于 2019-5-12 16:51 | 显示全部楼层
男人 发表于 2019-1-15 19:30
仿真显示屏不显示

把lcd的引脚改了 8 7 6这几个
回复

使用道具 举报

ID:316703 发表于 2019-5-13 13:13 | 显示全部楼层
改完引脚，编译完有显示了，可是内容布局等不对！
回复

使用道具 举报

ID:316703 发表于 2019-5-13 14:00 | 显示全部楼层
by64214 发表于 2018-5-14 10:32
好东西  学习一下

求高手赐教正确程序，谢谢了
回复

使用道具 举报

ID:316703 发表于 2019-5-13 14:46 | 显示全部楼层
这个程序需要改两个模块的脚定义，
一、显示模块：
1、按电路图改程序：
sbit  LCD12864_EN         =P2^4;
sbit  LCD12864_RW        =P2^3;      
sbit  LCD12864_RS         =P2^2;          
sbit  LCD12864_CS_L      =P2^1;     
sbit  LCD12864_CS_R      =P2^0;  
sbit  LCD12864_RST            =P2^5;

2.按程序修改电路图：
sbit  LCD12864_EN          =P1^2;
sbit  LCD12864_RW         =P1^1;      
sbit  LCD12864_RS          =P1^0;          
sbit  LCD12864_CS_L       =P2^0;      
sbit  LCD12864_CS_R       =P2^1;  
sbit  LCD12864_RST             =P2^5;

二、时钟模块；
1、按电路图改程序：
sbit DS1302_RST=P1^5;        
sbit DS1302_SCLK=P1^6;        

2.按程序修改电路图；
sbit DS1302_RST=P1^6;        
sbit DS1302_SCLK=P1^5;        
回复

使用道具 举报

ID:560874 发表于 2019-6-12 16:36 | 显示全部楼层
feiniao00o 发表于 2019-5-13 14:46
这个程序需要改两个模块的脚定义，
一、显示模块：
1、按电路图改程序：

请问有改完的版本吗？
回复

使用道具 举报

ID:435316 发表于 2019-6-25 22:12 | 显示全部楼层
抄袭的  
回复

使用道具 举报

ID:465318 发表于 2019-6-26 09:24 | 显示全部楼层
by64214 发表于 2018-5-14 10:32
好东西  学习一下

为什么调不动鸭
回复

使用道具 举报

ID:686729 发表于 2020-1-17 15:23 | 显示全部楼层
请问这书上是有的吗，请问书名是什么
回复

使用道具 举报

ID:165276 发表于 2020-2-1 21:09 | 显示全部楼层
casojie 发表于 2020-1-17 15:23
请问这书上是有的吗，请问书名是什么

书名《STC15增强型...》，具体忘了，是基于STC15F2K60S2写的
回复

使用道具 举报

ID:239620 发表于 2020-5-26 15:54 | 显示全部楼层
下载下来学习学习
回复

使用道具 举报

ID:1082181 发表于 2023-6-5 16:21 | 显示全部楼层
如何获得农历日期
回复

使用道具 举报

ID:1106219 发表于 2023-12-26 08:31 | 显示全部楼层
by64214 发表于 2018-5-14 10:32
好东西  学习一下

大神，该如何修改代码呢
回复

使用道具 举报

ID:34149 发表于 2023-12-27 12:04 | 显示全部楼层
12864要有串行方式的程序就更好了
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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