标题: 51单片机农历时钟Proteus仿真图与程序 LCD12864显示 [打印本页]
作者: 彩云追月    时间: 2021-7-30 16:29
标题: 51单片机农历时钟Proteus仿真图与程序 LCD12864显示
仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）


单片机源程序如下:
  1. #include <REGX52.H>
  2. #define        uint unsigned int
  3. #define        uchar unsigned char
  4. #include <zm.h>
  5. #include <_12864.H>
  6. #include <nongLi.h>
  7. init_time0(){
  8.         TMOD=0x01;
  9.         EA=ET0=TR0=1;
  10. }
  11. char c=0,sec=0,min=0,hour=12,day=12,mon=6,year=109;
  12. char week;
  13. bit flag,newShow=1;

  15. time0()interrupt 1        //定时器0中断
  16. {
  17.         TL0=(65536-5*110592/12)%256;
  18.         TH0=(65536-5*110592/12)/256;
  19.         c++;
  20.         if(c>=20)c=0,flag=1;   //1秒时间到
  21. }
  22. //
  23. DateAdd(){
  24.         if(flag){                  //如果到1秒则执行时间更新
  25.                 flag=0;        sec++;           //秒
  26.                 if(sec==60){
  27.                         sec=0; min++;  //分
  28.                         newShow=1;                 //每秒刷新一次显示
  29.                         if(min==60){
  30.                                 min=0;hour++;  //时
  31.                                 if(hour==24){
  32.                                         hour=0;day++;         //日
  33.                                         if(day>MonArr[LeapYear(year)][mon]){
  34.                                                 day=1; mon++;        //月
  35.                                                 if(mon==13){
  36.                                                         mon=1;year++;        //年
  37.                                                 }
  38.                                         }
  39.                                 }
  40.                         }
  41.                 }
  42.         }
  43. }
  44. #include <key.h>

  46. void main(){
  47.         init_time0();
  48.         Init12864();
  49.         while(1){
  50.                 keyCom();  //按键处理
  51.                 DateAdd();         //每秒更新新时钟
  52.                 if(newShow){
  53.                         newShow=0;
  54.                         /** 农历显示 **/
  55.                         getNongLi(year,mon,day);        //获取农历日期
  56.                         //显示天干地支，生肖
  57.                         showXY(0,66,15,2,TianGan_Table[(NL.year)%10]);
  58.                         showXY(0,82,15,2,DiZhi_Table[(NL.year)%12]);
  59.                         showXY(0,110,15,2,ShengXiao_Table[(NL.year)%12]);
  60.                         //农历月份
  61.                         if(NL.mon==1)showStr(2,64,"正");
  62.                         else showXY(2,64,15,2,nlMonCode[NL.mon-1]);
  63.                         showStr(2,80,"月");
  64.                         //农历日
  65.                         if(NL.day<11)showStr(2,96,"初");          //十位
  66.                         else if(NL.day<20)showStr(2,96,"十");
  67.                         else if(NL.day<30)showStr(2,96,"廿");
  68.                         else showStr(2,96,"三");
  69.                
  70.                         if(NL.day%10==0)showStr(2,112,"十");  //个位
  71.                         else  showXY(2,112,15,2,nlMonCode[NL.day%10-1]);
  72.                         
  73.                         /** 公历显示 **/
  74.                         showXY(0,0,20,5,zm20x40_Table[day/10]);        //大字
  75.                         showXY(0,20,20,5,zm20x40_Table[day%10]);
  76.                         showStr(2,40,"日");
  77.                         showNum8x16(6,0,(1901+year)/100);        //年
  78.                         showNum8x16(6,16,(1901+year)%100);
  79.                         showStr(6,32,"年");
  80.                         showNum8x16(6,48,mon);showStr(6,64,"月"); //月

  82.                         showStr(5,80,"星期");                           //星期
  83.                         week=getWeek(year,mon,day);
  84.                         if(week==6)showStr(5,112,"日");
  85.                         else showXY(5,112,15,2,nlMonCode[week]);

  87.                         showXY(7,92,5,1,zm5x8_Table[10]);        //冒号
  88.                         showXY(7,110,5,1,zm5x8_Table[10]);
  89.                           switch(keyCount){                                   //设置时，反白处理
  90.                                 case 1:notShow(6,2,0,32);break;        //年反白
  91.                                 case 2:notShow(6,2,48,16);break;//月反白
  92.                                 case 3:notShow(0,5,0,40);break;        //日反白                        
  93.                         }
  94.                         rect(0,0,40,60); rect(34,60,35,127); //画线条
  95.                 }
  96.                 //时分秒
  97.                 if(c>15&&keyCount>3){           //设置时闪烁处理
  98.                         if(keyCount==4){
  99.                                 showXY(7,81,5,1,zm5x8_Table[11]);//时
  100.                                 showXY(7,87,5,1,zm5x8_Table[11]);
  101.                         }
  102.                         else if(keyCount==5){
  103.                                 showXY(7,99,5,1,zm5x8_Table[11]);//分
  104.                                 showXY(7,105,5,1,zm5x8_Table[11]);
  105.                         }
  106.                         else if(keyCount==6){
  107.                                 showXY(7,116,5,1,zm5x8_Table[11]);//秒
  108.                                 showXY(7,122,5,1,zm5x8_Table[11]);
  109.                         }
  110.                 }
  111.                 else {                                           //时分秒正常显示
  112.                         showNum5x8(7,81,hour);
  113.                         showNum5x8(7,99,min);
  114.                         showNum5x8(7,116,sec);
  115.                 }
  116.         }
  117. }
复制代码

Proteus7.5版本的工程文件和程序下载:
农历钟.zip (36.77 KB, 下载次数: 72)

作者: songxia8013    时间: 2021-8-1 12:21
农历部分程序有问题，2021年7月30日，农历是六月二十一！



欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1