找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 7668|回復(fù): 9
打印 上一主題 下一主題
收起左側(cè)

片盲很久以前做的萬年歷

  [復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:159269 發(fā)表于 2017-1-1 22:35 | 只看該作者 |只看大圖 回帖獎勵 |倒序瀏覽 |閱讀模式
本人是個片盲，撿到幾塊lcd12864  顯示屏，在論壇上看了一下資料，很多用來做萬年歷，果斷也想想做個萬年歷，資料都是在論壇里收的，我也忘了在那個大神哪兒下載的了。。。純屬  依葫蘆畫瓢 在此感謝這位大神的資料。   
上圖


買的成品stc89c52       這個才   9塊9
  

在一塊老板子上找到  NYM13027 看了看旁邊電路和1302 是一樣的


過程就不多說了，本來就是依葫蘆畫瓢



修改的生日提醒，一家人的全部添加進(jìn)去了，提前一天通知，有了它，爸媽在也不怕我忘掉他們生日了。




  1. /*********************************************************************************************

  3. 程序名：        帶字庫12864LCC電子鐘程序

  5. 器  件：        STC89C52,LCD12864(內(nèi)置漢字字庫),18B20溫度芯片,1302時鐘芯片        MCU晶振：12MHZ

  7. 設(shè)  計：     中國機(jī)器 （仿造杜洋萬年歷程序并增加了農(nóng)歷功能）

  9. 功  能：     顯示公歷年月日
  10.                      農(nóng)歷年月日
  11.                          星期(星期不調(diào)用DS1302內(nèi)的數(shù)據(jù)，二十根據(jù)公歷年月日推算的)
  12.                          溫度
  13.                          時分秒
  14.                          公歷重大節(jié)日
  15.                          農(nóng)歷紀(jì)念日與節(jié)日（用于提醒農(nóng)歷生日非常實用）
  16. 注：1、當(dāng)農(nóng)歷紀(jì)念日與公歷紀(jì)念日碰到同一天，則按一秒的間隔輪流顯示
  17.      2、20100226加入陽歷大小月和平閏年判斷，調(diào)日歷時自動控制每個月份的天數(shù)
  18. /*********************************************************************************************

  20. /*********************************************************************************************/

  22. //程序部分開始//
  23. /****************************************************************************/
  24. //頭文件
  25. #include <AT89X52.h>
  26. #include <string.h>
  27. /*****************************************************************************/


  30. //定做PCB板的燈與揚(yáng)聲器定義
  31. sbit        led_back = P2^7;//背光控制（V2.1程序中加入了背光控制的硬件電路）
  32. sbit        beep   = P3^1;//揚(yáng)聲器

  34. /*****************************************************************************/

  36. //定做PCB板溫度傳感器引腳定義
  37. sbit DQ = P2 ^0 ;//ds18B20*/
  38. /*****************************************************************************/

  40. //鍵盤引腳定義
  41. sbit KEY_1 = P1^7;         //退出設(shè)置鍵，顯示版本信息鍵
  42. sbit KEY_2 = P1^6;         //上調(diào)鍵
  43. sbit KEY_3 = P1^5;         //設(shè)置鍵
  44. sbit KEY_4 = P1^4;         //減，下調(diào)鍵
  45. sbit KEY_5 = P1^3;         //LED控制每次按動改變背光開關(guān)

  47. /****************************************************************************/

  49. //LCD接口定義
  50. sbit RS = P1^0;//模式位，為0輸入指令，為1輸入數(shù)據(jù)
  51. sbit RW = P1^1;//讀寫位，為0讀，為1寫
  52. sbit E = P1^2;//使能位
  53. #define Lcd_Bus P0 //數(shù)據(jù)總線
  54. /*****************************************************************************/

  56. //定義DS1302時鐘接口
  57. sbit clock_clk = P3 ^ 0;//ds1302_clk（時鐘線）
  58. sbit clock_dat = P3 ^ 6;//ds1302_dat（數(shù)據(jù)線）
  59. sbit clock_Rst = P3 ^ 7;//ds1302_Rst（復(fù)位線）
  60. /*****************************************************************************/
  61. //定義累加器A中的各位
  62. sbit a0   = ACC ^ 0;
  63. sbit a1   = ACC ^ 1;
  64. sbit a2   = ACC ^ 2;
  65. sbit a3   = ACC ^ 3;
  66. sbit a4   = ACC ^ 4;
  67. sbit a5   = ACC ^ 5;
  68. sbit a6   = ACC ^ 6;
  69. sbit a7   = ACC ^ 7;
  70. /****************************************************************************/
  71. //定義全局變量
  72. unsigned char yy,mo,dd,xq,hh,mm,ss,month_moon,day_moon,week,tiangan,dizhi,moontemp1,moontemp2;//定義時間映射全局變量（專用寄存器）
  73. bit w = 0; //調(diào)時標(biāo)志位，=0時為走時狀態(tài)，=1時為調(diào)時狀態(tài)
  74. static unsigned char menu = 0;//定義靜態(tài)小時更新用數(shù)據(jù)變量
  75. static unsigned char keys = 0;//定義靜態(tài)小時更新用數(shù)據(jù)變量
  76. static unsigned char timecount = 0;//定義靜態(tài)軟件計數(shù)器變量

  78. signed char address,item,max,mini;

  80. /****************************************************************************/
  81. void DelayM(unsigned int a){//延時函數(shù) 1MS/次        
  82.                 unsigned char i;
  83.                 while( --a != 0){               
  84.                         for(i = 0; i < 125; i++);  //一個 ; 表示空語句,CPU空轉(zhuǎn)。
  85.                 }                                      //i 從0加到125，CPU大概就耗時1毫秒
  86. }
  87. /****************************************************************************/

  89. /******************************************************************************/
  90. //LCD驅(qū)動（DY12864CBL液晶顯示屏并口驅(qū)動程序）
  91. /******************************************************************************/
  92. void chk_busy(){//檢查忙位（底層）
  93.    RS=0;
  94.    RW=1;
  95.    E=1;
  96.    Lcd_Bus=0xff;
  97.    while((Lcd_Bus&0x80)==0x80);
  98.    E=0;
  99. }
  100. /******************************************************************************/
  101. void write_com(unsigned char cmdcode){//寫命令到LCD（底層）
  102.         chk_busy();
  103.         RS=0;
  104.         RW=0;
  105.         E=1;
  106.         Lcd_Bus=cmdcode;
  107.         E=0;
  108. }
  109. /******************************************************************************/
  110. void write_data(unsigned char Dispdata){         //寫數(shù)據(jù)到LCD（底層）
  111.         chk_busy();
  112.         RS=1;
  113.         RW=0;
  114.         E=1;
  115.         Lcd_Bus=Dispdata;
  116.         E=0;
  117. }
  118. /******************************************************************************/
  119. void lcm_init(){//初始化LCD屏（被調(diào)用層）
  120.    write_com(0x30);       //選擇8bit數(shù)據(jù)流
  121.    write_com(0x0c);       //開顯示(無游標(biāo)、不反白)
  122.    write_com(0x01);       //清除顯示，并且設(shè)定地址指針為00H
  123. }
  124. /*****************************************************************************/
  125. void lcm_w_word(unsigned char *s){//向LCM發(fā)送一個字符串,長度64字符（一行）之內(nèi)。（被調(diào)用層）
  126.         while(*s>0){                                        //應(yīng)用：lcm_w_word("您好！")，直接顯示：您好！
  127.             write_data(*s);
  128.             s++;
  129.    }
  130. }
  131. /******************************************************************************/
  132. void lcm_w_test(bit i,unsigned char word){//寫指令或數(shù)據(jù)（被調(diào)用層）
  133.         if(i == 0){
  134.                 write_com(word);//寫指令或數(shù)據(jù)（0，指令）
  135.         }else{
  136.                 write_data(word);//寫指令或數(shù)據(jù)（1，數(shù)據(jù)）
  137.         }
  138. }
  139. /******************************************************************************/
  140. void lcm_clr(void){//清屏函數(shù)
  141.         lcm_w_test(0,0x01);        
  142. }
  143. /******************************************************************************/

  145. void lcm_clr2(void){//清屏上面3行（用空格填滿要清顯示的地方，因為液晶屏是靜態(tài)顯示的，所以這辦法常用）
  146.         lcm_w_test(0,0x80);//第一行
  147.         lcm_w_word("                ");
  148.             //標(biāo)尺("1234567812345678"應(yīng)該能夠顯示滿一行)
  149.    lcm_w_test(0,0x90);//第二行
  150.         lcm_w_word("                ");
  151.             //標(biāo)尺("1234567812345678"應(yīng)該能夠顯示滿一行)
  152.    lcm_w_test(0,0x88);//第一行
  153.         lcm_w_word("                ");
  154.             //標(biāo)尺("1234567812345678"應(yīng)該能夠顯示滿一行)
  155.    }

  157. /******************************************************************************/
  158. //DS18B20溫度傳感器驅(qū)動（顯示0至60度，小數(shù)點后顯示一位）
  159. /******************************************************************************/
  160. void Delay(int num){//延時函數(shù)
  161.         while(num--) ;
  162. }        
  163. /******************************************************************************/
  164. void Init_DS18B20(void){//初始化ds1820
  165.         unsigned char x=0;
  166.         DQ = 1;    //DQ復(fù)位
  167.         Delay(8);  //稍做延時
  168.         DQ = 0;    //單片機(jī)將DQ拉低
  169.         Delay(80); //精確延時 大于 480us
  170.         DQ = 1;    //拉高總線
  171.         Delay(14);
  172.         x=DQ;      //稍做延時后 如果x=0則初始化成功 x=1則初始化失敗
  173.         Delay(20);
  174. }
  175. /******************************************************************************/
  176. unsigned char ReadOneChar(void){//讀一個字節(jié)
  177.         unsigned char i=0;
  178.         unsigned char dat = 0;
  179.         for (i=8;i>0;i--){
  180.                 DQ = 0; // 給脈沖信號
  181.                 dat>>=1;
  182.                 DQ = 1; // 給脈沖信號
  183.                 if(DQ)
  184.                 dat|=0x80;
  185.                 Delay(4);
  186.         }
  187.         return(dat);
  188. }
  189. /******************************************************************************/
  190. void WriteOneChar(unsigned char dat){//寫一個字節(jié)
  191.         unsigned char i=0;
  192.         for (i=8; i>0; i--){
  193.                 DQ = 0;
  194.                 DQ = dat&0x01;
  195.                 Delay(5);
  196.                 DQ = 1;
  197.                 dat>>=1;
  198.         }
  199. }
  200. /******************************************************************************/
  201. unsigned int ReadTemperature(void){//讀取溫度，溫度值返回到此函數(shù)中，供調(diào)用
  202.         unsigned char a=0;
  203.         unsigned char b=0;
  204.         unsigned int t=0;
  205.         float tt=0;
  206.         Init_DS18B20();
  207.         WriteOneChar(0xCC); // 跳過讀序號列號的操作
  208.         WriteOneChar(0x44); // 啟動溫度轉(zhuǎn)換
  209.         Init_DS18B20();
  210.         WriteOneChar(0xCC); //跳過讀序號列號的操作
  211.         WriteOneChar(0xBE); //讀取溫度寄存器
  212.         a=ReadOneChar();  //讀低8位
  213.         b=ReadOneChar(); //讀高8位
  214.         t=b;
  215.         t<<=8;
  216.         t=t|a;
  217.         tt=t*0.0625;
  218.         t= tt*10+0.5; //放大10倍輸出并四舍五入
  219.         return(t);//t內(nèi)的溫度值，返回到子函數(shù)中，要將溫度傳輸?shù)絫emp變量，應(yīng)用temp=ReabTemperature()
  220. }
  221. /*****************************************************************************/
  222. //后面會出現(xiàn)的函數(shù)聲明（當(dāng)各函數(shù)的排列適當(dāng)時可不用聲明，加入函數(shù)聲明就不用管各個子函數(shù)出現(xiàn)的位置先后了？）
  223. void lcm_w_ss(void);//向液晶LCM中寫秒數(shù)據(jù)
  224. void lcm_w_mm(void);//向液晶LCM中寫分?jǐn)?shù)據(jù)
  225. void lcm_w_hh(void);//向液晶LCM中寫小時數(shù)據(jù)
  226. void lcm_w_dd(void);//寫日數(shù)據(jù)
  227. void lcm_w_mo(void);//寫月數(shù)據(jù)
  228. void lcm_w_yy(void);//寫年數(shù)據(jù)
  229. void lcm_w_xq(void);//星期處理并送入LCM的指定區(qū)域
  230. unsigned char clock_in(void);//DS1302逐位寫入字節(jié)（底層協(xié)議）
  231. void clock_out(unsigned char dd);//1302驅(qū)動程序逐位讀出字節(jié)（底層協(xié)議?
  232. void Init_1302(void);//-設(shè)置1302的初始時間（2007年1月1日00時00分00秒星期一）
  233. unsigned char read_clock(unsigned char ord);//DS1302讀數(shù)據(jù)（底層協(xié)議）
  234. void read_clockS(void);
  235. void Set_time(unsigned char sel);//根據(jù)選擇調(diào)整的相應(yīng)項目sel加1并寫入DS1302
  236. void write_clock(unsigned char ord, unsigned char dd);//DS1302寫數(shù)據(jù)（底層協(xié)議）
  237. void updata (void);

  239. void lcm_w_nl(void);//顯示農(nóng)歷子函數(shù)
  240. void Conversion(bit c,unsigned char year,unsigned char month,unsigned char day); //農(nóng)歷年月日計算子函數(shù)
  241. void Conver_week(bit c,unsigned char year,unsigned char month,unsigned char day);//星期計算子函數(shù)
  242. void ds_w(void);

  244. /*****************************************************************************/
  245. //設(shè)置1302的初始時間（自動初始化）
  246. void Init_1302(void){//-設(shè)置1302的初始時間（2007年1月1日00時00分00秒星期一）
  247.         unsigned char f;
  248.         if(read_clock(0xc1) != 0xaa){
  249.                 write_clock(0x8e,0x00);//允許寫操作
  250.                 write_clock(0x8c,0x07);//年
  251.                 write_clock(0x8a,0x01);//星期
  252.                 write_clock(0x88,0x01);//月
  253.                 write_clock(0x86,0x01);//日
  254.                 write_clock(0x84,0x00);//小時
  255.                 write_clock(0x82,0x00);//分鐘
  256.                 write_clock(0x80,0x00);//秒
  257.                 write_clock(0x90,0xa5);//充電        
  258.                 write_clock(0xc0,0xaa);//寫入初始化標(biāo)志RAM（第00個RAM位置）
  259.                 for(f=0;f<60;f=f+2){//清除鬧鐘RAM位為0
  260.                         write_clock(0xc2+f,0x00);
  261.                 }
  262.                 write_clock(0x8e,0x80);//禁止寫操作
  263.         }
  264. }
  265. /*****************************************************************************/
  266. //DS1302寫數(shù)據(jù)（底層協(xié)議）
  267. void write_clock(unsigned char ord, unsigned char dd){
  268.         clock_clk=0;
  269.         clock_Rst=0;
  270.         clock_Rst=1;
  271.         clock_out(ord);
  272.         clock_out(dd);
  273.         clock_Rst=0;
  274.         clock_clk=1;
  275. }
  276. /*****************************************************************************/
  277. //1302驅(qū)動程序逐位讀出字節(jié)（底層協(xié)議）
  278. void clock_out(unsigned char dd){
  279.         ACC=dd;
  280.         clock_dat=a0; clock_clk=1; clock_clk=0;
  281.         clock_dat=a1; clock_clk=1; clock_clk=0;
  282.         clock_dat=a2; clock_clk=1; clock_clk=0;
  283.         clock_dat=a3; clock_clk=1; clock_clk=0;
  284.         clock_dat=a4; clock_clk=1; clock_clk=0;
  285.         clock_dat=a5; clock_clk=1; clock_clk=0;
  286.         clock_dat=a6; clock_clk=1; clock_clk=0;
  287.         clock_dat=a7; clock_clk=1; clock_clk=0;
  288. }
  289. /*****************************************************************************/
  290. //DS1302逐位寫入字節(jié)（底層協(xié)議）
  291. unsigned char clock_in(void){
  292.         clock_dat=1;
  293.         a0=clock_dat;
  294.         clock_clk=1; clock_clk=0; a1=clock_dat;
  295.         clock_clk=1; clock_clk=0; a2=clock_dat;
  296.         clock_clk=1; clock_clk=0; a3=clock_dat;
  297.         clock_clk=1; clock_clk=0; a4=clock_dat;
  298.         clock_clk=1; clock_clk=0; a5=clock_dat;
  299.         clock_clk=1; clock_clk=0; a6=clock_dat;
  300.         clock_clk=1; clock_clk=0; a7=clock_dat;
  301.         return(ACC);
  302. }
  303. /*****************************************************************************/
  304. //DS1302讀數(shù)據(jù)（底層協(xié)議）供調(diào)用時鐘數(shù)據(jù)
  305. unsigned char read_clock(unsigned char ord){
  306.         unsigned char dd=0;
  307.         clock_clk=0;
  308.         clock_Rst=0;
  309.         clock_Rst=1;
  310.         clock_out(ord);
  311.         dd=clock_in();
  312.         clock_Rst=0;
  313.         clock_clk=1;
  314.         return(dd);
  315. }

  317. /*****************************************************************************/
  318. //揚(yáng)聲器驅(qū)動程序（鬧鐘音樂）
  319. /*****************************************************************************/        
  320. void Beep(void){//BELL-揚(yáng)聲器--整點報時
  321.         unsigned char a;//定義變量用于發(fā)聲的長度設(shè)置
  322.         for(a=60;a>0;a--){//第一個聲音的長度
  323.                 beep = ~beep;//取反揚(yáng)聲器驅(qū)動口，以產(chǎn)生音頻
  324.                 Delay(100);//音調(diào)設(shè)置延時
  325.         }
  326.         for(a=100;a>0;a--){//同上
  327.                 beep = ~beep;
  328.                 Delay(80);//
  329.         }
  330.         for(a=100;a>0;a--){//同上
  331.                 beep = ~beep;
  332.                 Delay(30);//
  333.         }
  334.         beep = 0;//音樂結(jié)束后揚(yáng)聲器輸出0關(guān)閉，因為后端用9014驅(qū)動，所以控制輸出1時蜂鳴響
  335. }
  336. /*****************************************************************************/
  337. void Beep_set(void){//BELL -揚(yáng)聲器--確定設(shè)置
  338.         unsigned char a;//定義變量用于發(fā)聲的長度設(shè)置
  339.         for(a=50;a>0;a--){//第一個聲音的長度
  340.                 beep = ~beep;//取反揚(yáng)聲器驅(qū)動口，以產(chǎn)生音頻
  341.                 Delay(100);//音調(diào)設(shè)置延時
  342.         }
  343.         for(a=100;a>0;a--){//同上
  344.                 beep = ~beep;
  345.                 Delay(50);//
  346.         }
  347.         for(a=50;a>0;a--){//同上
  348.                 beep = ~beep;
  349.                 Delay(100);//
  350.         }
  351.         beep = 0;//音樂結(jié)束后揚(yáng)聲器輸出0關(guān)閉，因為后端用9014反相驅(qū)動，所以控制輸出0時蜂鳴響
  352. }
  353. /*****************************************************************************/
  354. void Beep_key(void){//-揚(yáng)聲器--按鍵音
  355.         unsigned char a;//定義變量用于發(fā)聲的長度設(shè)置
  356.         for(a=100;a>0;a--){//聲音的長度
  357.                 beep = ~beep;
  358.                 Delay(50);//音調(diào)設(shè)置延時
  359.         }
  360.         beep = 0;//音樂結(jié)束后揚(yáng)聲器拉高關(guān)閉
  361. }               

  363. /******************************************************************************/
  364. //農(nóng)歷節(jié)日數(shù)據(jù)庫表，農(nóng)歷紀(jì)念日數(shù)據(jù)表，加上公歷的重大節(jié)日
  365. /******************************************************************************/



  369. void jie_nl(void){                    //

  371.         dd = read_clock(0x87);//日
  372.             mo = read_clock(0x89);//月
  373.         yy = read_clock(0x8d);//年
  374.         Conversion(0,yy,mo,dd);//調(diào)用公歷轉(zhuǎn)農(nóng)歷子函數(shù)
  375.   //調(diào)用函數(shù)后,原有數(shù)據(jù)不變,讀c_moon農(nóng)歷世紀(jì),year_moon農(nóng)歷年,month_moon,day_moon得出陰歷BCD數(shù)據(jù)        

  377.         
  378.       lcm_w_test(0,0x98);//在屏幕第四行顯示節(jié)日（下面的注釋行用坐標(biāo)尺，不要改動）
  379. //農(nóng)歷節(jié)日：
  380. //                                                                                                                   ----|----------------|標(biāo)尺，漢字不要對在空隙上
  381.            if ( month_moon == 0x12 && day_moon == 0x29 ){ lcm_w_word("  明天是春節(jié)��！"); }
  382.       if ( month_moon == 0x12 && day_moon == 0x30 ){ lcm_w_word("  今天是春節(jié)�。�"); }
  383.       if ( month_moon == 0x01 && day_moon == 0x01 ){ lcm_w_word("大年初一拜年啦  "); }
  384.       if ( month_moon == 0x01 && day_moon == 0x14 ){ lcm_w_word("  明天元宵節(jié)！  "); }
  385.       if ( month_moon == 0x01 && day_moon == 0x15 ){ lcm_w_word("  元宵節(jié)到啦!   "); }
  386.       if ( month_moon == 0x05 && day_moon == 0x04 ){ lcm_w_word("    明天端午    "); }
  387.            if ( month_moon == 0x05 && day_moon == 0x05 ){ lcm_w_word("    今天端午    "); }
  388.       if ( month_moon == 0x07 && day_moon == 0x06 ){ lcm_w_word("  明天七月七啦  "); }
  389.       if ( month_moon == 0x07 && day_moon == 0x07 ){ lcm_w_word("牛郎織女鵲橋相會"); }
  390.       if ( month_moon == 0x08 && day_moon == 0x14 ){ lcm_w_word("  明天仲秋節(jié)    "); }
  391.       if ( month_moon == 0x08 && day_moon == 0x15 ){ lcm_w_word("    仲秋佳節(jié)    "); }
  392.            if ( month_moon == 0x09 && day_moon == 0x08 ){ lcm_w_word("    明天重陽    "); }
  393.       if ( month_moon == 0x09 && day_moon == 0x09 ){ lcm_w_word("    今天重陽節(jié)  "); }
  394.            if ( month_moon == 0x12 && day_moon == 0x07 ){ lcm_w_word("    明天臘八    "); }
  395.            if ( month_moon == 0x12 && day_moon == 0x08 ){ lcm_w_word("    今天臘八    "); }
  396.            if ( month_moon == 0x12 && day_moon == 0x22 ){ lcm_w_word("    明日辭灶    "); }
  397.            if ( month_moon == 0x12 && day_moon == 0x23 ){ lcm_w_word("    今日辭灶    "); }
  398. /*農(nóng)歷生日：

  400.       if ( month_moon == 0x01 && day_moon == 0x03 ){ lcm_w_word("明天月月媽媽生日"); }
  401.       
  402.               if ( month_moon == 0x10 && day_moon == 0x11 ){ lcm_w_word("  明天三姨生日  "); }
  403.            if ( month_moon == 0x10 && day_moon == 0x11 ){ lcm_w_word("今天三姨生日！  "); }
  404.            
  405.          
  406. */
  407.                
  408. }


  411. void jie_gl(void){  //

  413.         dd = read_clock(0x87);//日
  414.              mo = read_clock(0x89);//月
  415.         yy = read_clock(0x8d);//年
  416.        //Conversion(0,yy,mo,dd);//調(diào)用公歷轉(zhuǎn)農(nóng)歷子函數(shù)
  417.   //調(diào)用函數(shù)后,原有數(shù)據(jù)不變,讀c_moon農(nóng)歷世紀(jì),year_moon農(nóng)歷年,month_moon,day_moon得出陰歷BCD數(shù)據(jù)        


  420.       lcm_w_test(0,0x98);//在屏幕第四行顯示節(jié)日（下面的注釋行用坐標(biāo)尺，不要改動）

  422. //下面是公歷的，有些沒意思的，就不顯示了
  423.       if ( mo == 0x01 && dd == 0x01 ){ lcm_w_word(" Happy new year!"); }
  424.     // ( mo == 0x01 && dd == 0x22 ){ lcm_w_word("    節(jié)日實驗    "); }//2010-01-22是農(nóng)歷臘八節(jié)，用于實驗輪流顯示
  425.                 if ( mo == 0x02 && dd == 0x13 ){ lcm_w_word("  明天情人節(jié)了  "); }               
  426.                 if ( mo == 0x02 && dd == 0x14 ){ lcm_w_word("  今天是情人節(jié)  "); }               
  427.                 if ( mo == 0x03 && dd == 0x08 ){ lcm_w_word("   3.8婦女節(jié)    "); }
  428.                 if ( mo == 0x03 && dd == 0x11 ){ lcm_w_word("  明天是植樹節(jié)  "); }
  429.                 if ( mo == 0x03 && dd == 0x12 ){ lcm_w_word("    植樹節(jié)      "); }
  430.            if ( mo == 0x03 && dd == 0x14 ){ lcm_w_word("明天消費(fèi)者權(quán)益日"); }        
  431.                 if ( mo == 0x03 && dd == 0x15 ){ lcm_w_word("  消費(fèi)者權(quán)益日  "); }                                
  432.                 if ( mo == 0x04 && dd == 0x01 ){ lcm_w_word("愚人節(jié)  小心上當(dāng)"); }               
  433.                 //if ( mo == 0x04 && dd == 0x07 ){ lcm_w_word("  世界衛(wèi)生日    "); }               
  434.                 if ( mo == 0x04 && dd == 0x08 ){ lcm_w_word("    復(fù)活節(jié)      "); }               
  435.                 //if ( mo == 0x04 && dd == 0x13 ){ lcm_w_word("  黑色星期五    "); }
  436.                                 
  437.                 if ( mo == 0x05 && dd == 0x01 ){ lcm_w_word("  勞動節(jié)  放假  "); }//5               
  438.            if ( mo == 0x05 && dd == 0x04 ){ lcm_w_word("    青年節(jié)      "); }               
  439.                 if ( mo == 0x05 && dd == 0x08 ){ lcm_w_word("  世界紅十字日  "); }               
  440.                 if ( mo == 0x05 && dd == 0x12 ){ lcm_w_word("  國際護(hù)士節(jié)    "); }               
  441.                 if ( mo == 0x05 && dd == 0x05 ){ lcm_w_word("近日注意母親節(jié)  "); }
  442.                 if ( mo == 0x05 && dd == 0x06 ){ lcm_w_word("近日注意母親節(jié)  "); }
  443.                 //if ( mo == 0x05 && dd == 0x15 ){ lcm_w_word("  國際家庭日    "); }
  444.                 if ( mo == 0x05 && dd == 0x31 ){ lcm_w_word("  明天兒童節(jié)    "); }               
  445.                                 
  446.                 if ( mo == 0x06 && dd == 0x01 ){ lcm_w_word("月月兒童節(jié)快樂! "); }//6
  447.            if ( mo == 0x06 && dd == 0x05 ){ lcm_w_word("  世界環(huán)境日    "); }               
  448.                 //if ( mo == 0x06 && dd == 0x26 ){ lcm_w_word("  國際禁毒日    "); }               
  449.                 //if ( mo == 0x06 && dd == 0x06 ){ lcm_w_word("  全國愛眼日    "); }               
  450.                 if ( mo == 0x06 && dd == 0x13 ){ lcm_w_word("近日注意父親節(jié)  "); }
  451.                 if ( mo == 0x06 && dd == 0x15 ){ lcm_w_word("近日注意父親節(jié)  "); }
  452.                                 
  453.                 if ( mo == 0x07 && dd == 0x01 ){ lcm_w_word("香港回歸記念日  "); }//7
  454.                 //if ( mo == 0x07 && dd == 0x07 ){ lcm_w_word("抗日戰(zhàn)爭記念日  "); }
  455.                 //if ( mo == 0x07 && dd == 0x11 ){ lcm_w_word("  世界人口日    "); }

  457.                 if ( mo == 0x08 && dd == 0x01 ){ lcm_w_word("  八一建軍節(jié)    "); }//8
  458.         //        if ( mo == 0x08 && dd == 0x08 ){ lcm_w_word("  中國男子節(jié)    "); }
  459.            if ( mo == 0x08 && dd == 0x15 ){ lcm_w_word("抗戰(zhàn)勝利記念日  "); }
  460.       if ( mo == 0x09 && dd == 0x09 ){ lcm_w_word("  明天教師節(jié)    "); }
  461.                 if ( mo == 0x09 && dd == 0x10 ){ lcm_w_word("  中國教師節(jié)    "); }//9
  462.                 if ( mo == 0x09 && dd == 0x18 ){ lcm_w_word("九一八事變紀(jì)念  "); }
  463.                 if ( mo == 0x09 && dd == 0x20 ){ lcm_w_word("  國際愛牙日    "); }
  464.                 if ( mo == 0x09 && dd == 0x27 ){ lcm_w_word("  世界旅游日    "); }

  466.                 if ( mo == 0x10 && dd == 0x01 ){ lcm_w_word("  中國國慶節(jié)    "); }//10
  467.            //if ( mo == 0x10 && dd == 0x04 ){ lcm_w_word("  世界動物日    "); }
  468.                 if ( mo == 0x10 && dd == 0x24 ){ lcm_w_word("    聯(lián)合國日    "); }
  469.                 //if ( mo == 0x10 && dd == 0x12 ){ lcm_w_word("明天國際教師節(jié)  "); }
  470.                 //if ( mo == 0x10 && dd == 0x13 ){ lcm_w_word("  國際教師節(jié)    "); }

  472.                 //if ( mo == 0x11 && dd == 0x10 ){ lcm_w_word("  世界青年節(jié)    "); }//11
  473.            //        if ( mo == 0x11 && dd == 0x17 ){ lcm_w_word("  世界學(xué)生節(jié)    "); }

  475.            //        if ( mo == 0x12 && dd == 0x01 ){ lcm_w_word("  世界艾滋病日  "); }//12
  476.                 if ( mo == 0x12 && dd == 0x23 ){ lcm_w_word("  明晚平安夜    "); }
  477.                 if ( mo == 0x12 && dd == 0x24 ){ lcm_w_word("  今晚平安夜    "); }
  478.                 if ( mo == 0x12 && dd == 0x25 ){ lcm_w_word("  今天圣誕節(jié)    "); }
  479.                 if ( mo == 0x12 && dd == 0x31 ){ lcm_w_word("    明日元旦    "); }

  481.         else{//非節(jié)日時顯示時晨信息，判斷小時數(shù)據(jù)范圍，調(diào)取顯示
  482.                      if ( hh >= 0x04 && hh <  0x06 ){ lcm_w_word("★★__▲▲__凌晨"); }
  483.                           if ( hh >= 0x06 && hh <  0x08 ){ lcm_w_word("☆○__▲△__早晨"); }
  484.                           if ( hh >= 0x08 && hh <  0x12 ){ lcm_w_word("__●__▲▲__上午"); }
  485.                           if ( hh == 0x12)               { lcm_w_word("____▲●▲__中午"); }
  486.                           if ( hh >= 0x13 && hh <  0x18 ){ lcm_w_word("__▲▲__●__下午"); }
  487.                           if ( hh >= 0x18 && hh <  0x22 ){ lcm_w_word("△▲__●☆__晚上"); }
  488.                           if ( hh >= 0x22 && hh <= 0x23 ){ lcm_w_word("△▲__★☆__夜里"); }
  489.                           if ( hh >= 0x00 && hh <  0x04 ){ lcm_w_word("__★▲▲★__深夜"); }
  490.                  }
  491. }
  492. /*****************************************************************************/
  493. //電子鐘應(yīng)用層程序設(shè)計
  494. /*****************************************************************************/
  495. //向LCM中填寫 年 數(shù)據(jù)
  496. void lcm_w_yy(void){

  498.                 yy = read_clock(0x8d);//調(diào)用1302時鐘數(shù)據(jù)中的年數(shù)據(jù)，從地址0x8d中
  499.                 lcm_w_test(0,0x80);
  500.                 lcm_w_word("20");//顯示內(nèi)容字符20
  501.                 lcm_w_test(1,(yy/16)+0x30);//函數(shù)參數(shù)1，代表本行寫數(shù)據(jù)，YY/16+0X30得出年十位數(shù)字的顯示碼地址，送顯示        
  502.                 lcm_w_test(1,yy%16+0x30);//函數(shù)參數(shù)1，代表本行寫數(shù)據(jù)，YY%得出年個位數(shù)字的顯示碼地址，送顯示
  503.                 //因為年數(shù)據(jù)兩位數(shù)字如果是09，C51默認(rèn)是16進(jìn)制數(shù)據(jù)，所以要用16來分離十位、個位。     
  504. }

  506. void lcm_w_yy2(void){//調(diào)年時的顯示程序
  507.      yy = read_clock(0x8d);//調(diào)用1302時鐘數(shù)據(jù)中的年數(shù)據(jù)，從地址0x8d中
  508.           lcm_w_test(0,0x93);
  509.           lcm_w_word("20");//顯示內(nèi)容字符20
  510.           lcm_w_test(1,(yy/16)+0x30);//函數(shù)參數(shù)1，代表本行寫數(shù)據(jù)，YY/16+0X30得出年十位數(shù)字的顯示碼地址，送顯示        
  511.           lcm_w_test(1,yy%16+0x30);//函數(shù)?
  512.      lcm_w_word("  年");
  513.                  }

  515. /*****************************************************************************/
  516. //向LCM中填寫 月 數(shù)據(jù)
  517. void lcm_w_mo(void){
  518.                 mo = read_clock(0x89);//調(diào)用1302時鐘數(shù)據(jù)中的月數(shù)據(jù)，從地址0x89中
  519.            lcm_w_test(0,0x82);
  520.       lcm_w_word("-");
  521.            lcm_w_test(1,(mo/16)+0x30);
  522.                 lcm_w_test(1,mo%16+0x30);//與16取余數(shù)，得到月份的個位數(shù)，加0x30得到該數(shù)字的液晶內(nèi)定顯示碼送顯示
  523.                 lcm_w_word("-");//調(diào)用字符顯示函數(shù)，顯示文字 月
  524. }        


  527. //向LCM中填寫調(diào)月時 月 數(shù)據(jù)顯示格式（調(diào)月時調(diào)用顯示格式）
  528. void lcm_w_mo2(void){
  529.                 mo = read_clock(0x89);//調(diào)用1302時鐘數(shù)據(jù)中的月數(shù)據(jù)，從地址0x89中
  530.       lcm_w_test(0,0x93);
  531.       lcm_w_word("  ");
  532.       lcm_w_test(1,(mo/16)+0x30);
  533.                 lcm_w_test(1,mo%16+0x30);//與16取余數(shù)，得到月份的個位數(shù)，加0x30得到該數(shù)字的液晶內(nèi)定顯示碼送顯示
  534.                 lcm_w_word("  月");//調(diào)用字符顯示函數(shù)，顯示文字 月
  535. }        


  538. /*****************************************************************************/
  539. //向LCM中填寫 日 數(shù)據(jù)
  540. void lcm_w_dd(void){

  542.                 dd = read_clock(0x87);//從1302芯片中讀取日數(shù)據(jù)，從地址0x87中
  543.                 lcm_w_test(0,0x84);        
  544.                 //if(dd/16 != 0){lcm_w_test(1,(dd/16)+0x30);}        //如果十位數(shù)不是0，就換算顯示
  545.                 //else{lcm_w_test(1,0x20);}//如果十位數(shù)是0，則顯示個空格，不顯示數(shù)據(jù)
  546.            lcm_w_test(1,(dd/16)+0x30);
  547.                 lcm_w_test(1,dd%16+0x30);//第一個1參數(shù)，表示本行寫數(shù)據(jù)，日數(shù)據(jù)與16取余得個位數(shù)，加0x30得到顯示碼
  548.                                 
  549. }        

  551. //向LCM中填寫調(diào)日期時的 日 數(shù)據(jù)顯示格式（調(diào)日時調(diào)用的顯示格式）
  552. void lcm_w_dd2(void){

  554.                 dd = read_clock(0x87);//從1302芯片中讀取日數(shù)據(jù)，從地址0x87中
  555.            lcm_w_test(0,0x93);        
  556.                 lcm_w_word("  ");
  557.            lcm_w_test(1,(dd/16)+0x30);
  558.                 lcm_w_test(1,dd%16+0x30);//第一個1參數(shù)，表示本行寫數(shù)據(jù)，日數(shù)據(jù)與16取余得個位數(shù)，加0x30得到顯示碼
  559.                 lcm_w_word("  日");//顯示字符 日
  560.                                 
  561. }        

  563. //}/*****************************************************************************/
  564. //星期處理并送入LCM的指定區(qū)域
  565. void lcm_w_xq(void){

  567.            unsigned char sel,dd,mo,yy;

  569.         dd = read_clock(0x87);//日
  570.              mo = read_clock(0x89);//月
  571.              yy = read_clock(0x8d);//年
  572.         Conver_week(0,yy,mo,dd);//調(diào)用公歷換算星期子函數(shù)
  573.    
  574.    sel=week;//week是公歷轉(zhuǎn)換星期子函數(shù)的運(yùn)行結(jié)果，結(jié)果為0-6，0是星期日
  575.         lcm_w_test(0,0x87);//顯示位置
  576.         if(sel==0)  {lcm_w_word("日");}    //0=星期日
  577.           if(sel==6)  {lcm_w_word("六");}    //
  578.           if(sel==5)  {lcm_w_word("五");}    //
  579.           if(sel==4)  {lcm_w_word("四");}    //
  580.    //if(sel==3)  {lcm_w_word("三");}經(jīng)調(diào)試發(fā)現(xiàn)液晶屏不認(rèn)這一句，只好用下一句顯示 三
  581.           if(sel==3)  {lcm_w_test(1,0xc8);lcm_w_test(1,0xfd);} //此指令等于lcm_w_word("三"); 因為“三”的內(nèi)碼失效。
  582.           if(sel==2)  {lcm_w_word("二");}    //
  583.           if(sel==1)  {lcm_w_word("一");}    //星期一
  584.         lcm_w_test(0,0x85);
  585.         lcm_w_word("星期");//調(diào)用字符顯示子函數(shù)，顯示 星期 兩個字

  587.    
  588.    
  589.    

  591. }        




  596. /*****************************************************************************/
  597. //向LCM中填寫 小時 數(shù)據(jù)
  598. void lcm_w_hh(void){
  599.         if(read_clock(0x85) != hh){//如果程序中的小時與1302芯片中的不同，
  600.                 hh = read_clock(0x85);//刷新程序中的小時數(shù)據(jù)
  601.                         if (hh > 0x07 && hh < 0x22 && w == 0){ //整點判斷
  602.                                 Beep();//調(diào)用一次整點報時音
  603.                         }
  604.                 }
  605.                 lcm_w_test(0,0x90);//第一個參數(shù)0，表示本行寫入LCM的是指令，指定顯示位置88H（第三行左端）
  606.                 lcm_w_test(1,(hh/16)+0x30);//顯示十位
  607.                 lcm_w_test(1,hh%16+0x30);//顯示個位
  608.                                 
  609. }


  612. //向LCM中填寫 小時 數(shù)據(jù)（用于調(diào)整時間時調(diào)用）
  613. void lcm_w_hh2(void){
  614.         if(read_clock(0x85) != hh){//如果程序中的小時與1302芯片中的不同，
  615.                 hh = read_clock(0x85);//刷新程序中的小時數(shù)據(jù)
  616.                         if (hh > 0x07 && hh < 0x22 && w == 0){ //整點判斷
  617.                                 Beep();//調(diào)用一次整點報時音
  618.                         }
  619.                 }
  620.                 lcm_w_test(0,0x93);//第一個參數(shù)0，表示本行寫入LCM的是指令，指定顯示位置88H（第三行左端）
  621.       lcm_w_word("  ");
  622.                 lcm_w_test(1,(hh/16)+0x30);//顯示十位
  623.                 lcm_w_test(1,hh%16+0x30);//顯示個位
  624.       lcm_w_word("  時");
  625.                                 
  626. }
  627. /*****************************************************************************/
  628. //向LCM中填寫 分鐘 數(shù)據(jù)
  629. void lcm_w_mm(void){
  630.         if(read_clock(0x83) != mm){//如果1302芯片中的分鐘數(shù)據(jù)與程序中的分鐘變量不相等               
  631.                 mm = read_clock(0x83);//刷新程序中的分鐘數(shù)據(jù)
  632.         }
  633.         //        if(w == 0){                                
  634.                 //        jie_nl();//調(diào)用節(jié)日顯示子函數(shù)
  635.         // DelayM(1000);
  636.         // jie_gl();
  637.              //        }                                
  638.         lcm_w_test(0,0x91);//寫指令，指定顯示位置為89H（第二行的第二個字符）        
  639.         lcm_w_test(1,0x3a);          //":"寫數(shù)據(jù)，顯示冒號，采用直接指定冒號的液晶內(nèi)定顯示碼的方法
  640.         lcm_w_test(1,(mm/16)+0x30);//向液晶寫數(shù)據(jù)，顯示分鐘的十位數(shù)
  641.         lcm_w_test(1,mm%16+0x30);//向液晶寫數(shù)據(jù)，顯示分鐘的個位數(shù)
  642.    lcm_w_test(1,0x3a);          //":"寫數(shù)據(jù)，顯示冒號，采用直接指定冒號的液晶內(nèi)定顯示碼的方法
  643. }


  646. void lcm_w_mm2(void){
  647. if(read_clock(0x83) != mm){//如果1302芯片中的分鐘數(shù)據(jù)與程序中的分鐘變量不相等               
  648.                 mm = read_clock(0x83);//刷新程序中的分鐘數(shù)據(jù)
  649.         }
  650.         
  651.         lcm_w_test(0,0x93);//寫指令，指定顯示位置為89H（第二行的第二個字符）        
  652.    lcm_w_word("  ");
  653.         lcm_w_test(1,(mm/16)+0x30);//向液晶寫數(shù)據(jù)，顯示分鐘的十位數(shù)
  654.         lcm_w_test(1,mm%16+0x30);//向液晶寫數(shù)據(jù)，顯示分鐘的個位數(shù)
  655.         lcm_w_word("  分");
  656. }

  658. /*****************************************************************************/
  659. //向LCM中填寫 秒 數(shù)據(jù) 和溫度數(shù)據(jù)
  660. void lcm_w_ss(void)
  661. {
  662.         unsigned int i=0;
  663.         unsigned char a=0,b=0,c=0;
  664.         if(read_clock(0x81) != ss)
  665.         {        //判斷是否需要更新，如果1302芯片中的秒數(shù)據(jù)與程序秒變量不同
  666.                 ss = read_clock(0x81);        //更新程序中的秒數(shù)據(jù)
  667.                 lcm_w_test(0,0x93);                //指定秒值在LCM上的顯示位置是8BH
  668.                 lcm_w_test(1,(ss/16)+0x30);        //顯示秒十位               
  669.                 lcm_w_test(1,ss%16+0x30);        //顯示秒個位(除以16，取余數(shù))

  671.                 updata ();        //刷新數(shù)據(jù)子函數(shù)

  673.                 lcm_w_test(0,0x95);                //指定溫度在LCM上的顯示位置為8DH               
  674.                 i=ReadTemperature();//讀溫度并送顯，調(diào)用了18B20的讀取溫度函數(shù)返回值，共3位，含十分之一位數(shù)字
  675.                 a=i/100;//得到十位上的數(shù)字
  676.                 lcm_w_test(1,a+0x30);        //參數(shù)1，表示該行寫數(shù)據(jù)，換算顯示溫度十位數(shù)字的顯示碼
  677.                 b=i/10-a*10;//處理得到第二位數(shù)字（個位）
  678.                 lcm_w_test(1,b+0x30);        //參數(shù)1，表示該行寫的是數(shù)據(jù)，顯示溫度個位數(shù)字
  679.                 lcm_w_test(1,0x2e);         //"."參數(shù)1，表示該行寫的數(shù)據(jù)，顯示一個小數(shù)點
  680.                 c=i-a*100-b*10;//取得溫度的第三位（最末尾，也就是小數(shù)點后的一位數(shù)字
  681.                 lcm_w_test(1,c+0x30); //換算小數(shù)點后的一位數(shù)字的顯示碼（加0x30），并顯示               
  682.                 lcm_w_word("℃");        //調(diào)用字符顯示函數(shù)，顯示攝氏度的符號
  683.    }        
  684. }

  686. void jie(void)//公歷和農(nóng)歷節(jié)日按照一秒間隔輪換顯示（節(jié)日顯示）
  687. {
  688. ss = read_clock(0x81);
  689. if(ss%16==1|ss%16==3|ss%16==5|ss%16==7|ss%16==9){jie_nl();}//秒是奇數(shù)調(diào)用農(nóng)歷節(jié)日顯示子函數(shù)
  690. if(ss%16==2|ss%16==4|ss%16==6|ss%16==8|ss%16==0){jie_gl();}//秒是偶數(shù)數(shù)，調(diào)用公歷節(jié)日顯示子函數(shù)
  691. }

  693. /*****************************************************************************/
  694. //刷新數(shù)據(jù)子函數(shù)，供調(diào)用，在這段程序之前已經(jīng)調(diào)用過
  695. void updata (void){
  696.                 lcm_w_mm();//刷新 分
  697.                 lcm_w_hh();//刷新 小時
  698.                 lcm_w_dd();//刷新 日
  699.                 lcm_w_xq();//更新星期值        
  700.                 lcm_w_mo();//刷新 月
  701.                 lcm_w_yy();//刷新 年
  702.       lcm_w_nl();//刷新農(nóng)歷
  703.       jie();//刷新節(jié)日顯示


  706. }
  707. /*****************************************************************************/
  708. void welcome(void){//開機(jī)歡迎顯示內(nèi)容，標(biāo)尺不能改動，文字不要對準(zhǔn)橫線之間的空隙

  710.          lcm_w_word(" K3:設(shè)置         K4:加 K2:減     K5:退出         K1:背光");//
  711.         //----------|-------1-------|-------3-------|-------2-------|-------4-------|-----//標(biāo)尺
  712. }
  713. //標(biāo)尺能提示文字顯示的位置在哪一行，是否在中心

  715. /*****************************************************************************/
  716. //調(diào)整時間子函數(shù)，設(shè)置鍵、數(shù)據(jù)范圍、上調(diào)加一，下調(diào)減一功能。
  717. void Set_time(unsigned char sel){ //根據(jù)選擇調(diào)整的相應(yīng)項目加1并寫入DS1302，函數(shù)參數(shù)是按動設(shè)置鍵的次數(shù)
  718.   

  720.   lcm_w_test(0,0x9b);//第一參數(shù)0表示本行寫入指令，指定下面行的 調(diào)整 顯示起始位置為9AH
  721.   lcm_w_word("★調(diào)整");//調(diào)用字符顯示函數(shù)，顯示 調(diào)整字樣
  722.   
  723.   //if(sel==6)  {lcm_w_word("秒鐘");address=0x80; max=0;mini=0;}     //秒7，沒有必要調(diào)了

  725.   if(sel==4)  {lcm_w_word("分鐘");address=0x82; max=59;mini=0;
  726.    lcm_w_mm2();
  727.    ds_w();
  728.    lcm_w_mm2();
  729.   
  730.   }    //分鐘6，按動6次顯示 調(diào)整分鐘
  731.   //并指定分鐘數(shù)據(jù)寫入1302芯片的地址是0x82，分鐘數(shù)據(jù)的最大值是59，最小值是0


  734.   if(sel==3)  {lcm_w_word("小時");address=0x84; max=23;mini=0;
  735.   
  736.     lcm_w_hh2();
  737.     ds_w();
  738.     lcm_w_hh2();
  739.   
  740.   }    //小時5，按動5次顯示 調(diào)整小時
  741.   //規(guī)定小時數(shù)據(jù)寫入1302芯片的位置是0x84，小時數(shù)據(jù)最大值23，最小值是0
  742.   

  744.   if(sel==2)  {lcm_w_word("日期");
  745.                address=0x86;

  747.                mo = read_clock(0x89);//讀月
  748.                                         moontemp1=mo/16;
  749.                                         moontemp2=mo%16;
  750.                                         mo=moontemp1*10+moontemp2;//轉(zhuǎn)換成10進(jìn)制月份數(shù)據(jù)

  752.                yy = read_clock(0x8d);//讀年
  753.                moontemp1=yy/16;
  754.                                         moontemp2=yy%16;
  755.                                         yy=moontemp1*10+moontemp2;//轉(zhuǎn)換成10進(jìn)制年份數(shù)據(jù)

  757.                if(mo==2&&yy%4!=0){max=28;mini=1;}//平年2月28天
  758.                                         if(mo==2&&yy%4==0){max=29;mini=1;}//閏年2月29天
  759.                                         if(mo==1||mo==3||mo==5||mo==7||mo==8||mo==10||mo==12){max=31;mini=1;}//31天的月份
  760.                                         if(mo==4||mo==6||mo==9||mo==11){max=30;mini=1;}//30天的月份
  761.     lcm_w_dd2();
  762.     ds_w();
  763.     lcm_w_dd2();
  764.   }    //日3，按動3次顯示 調(diào)整日期
  765.   //規(guī)定日期數(shù)據(jù)寫入2302的位置地址是0x86，日期最大值31，最小值是1



  769.   if(sel==1)  {lcm_w_word("月份");address=0x88; max=12;mini=1;
  770.     lcm_w_mo2();
  771.          ds_w();
  772.     lcm_w_mo2();
  773.   
  774.       }    //月2，按動2次顯示 調(diào)整月份
  775.   //規(guī)定月份寫入1302的位置地址是0x88，月份最大值12，最小值1


  778.   if(sel==0)  {lcm_w_word("年份");address=0x8c; max=99; mini=0;
  779.      lcm_w_yy2();
  780.      ds_w();
  781.      lcm_w_yy2();

  783.      }    //年1，按動1次顯示 調(diào)整年份，
  784.   //規(guī)定年份寫入1302的地址是0x8c,年份的最大值99，最小值0

  786. }
  787. /*****************************************************************************/
  788. //被調(diào)數(shù)據(jù)加一或減一，并檢查數(shù)據(jù)范圍，寫入1302指定地址保存
  789. void ds_w(void){

  791. item=((read_clock(address+1))/16)*10 + (read_clock(address+1))%16;
  792.   if(KEY_2 == 0){//如果按動上調(diào)鍵
  793.           item++;//數(shù)加 1  
  794.   }
  795.   if(KEY_4 == 0){//如果按動下調(diào)鍵
  796.           item--;//數(shù)減 1
  797.   }
  798.   if(item>max) item=mini;//查看數(shù)值是否在有效范圍之內(nèi)   
  799.   if(item<mini) item=max;//如果數(shù)值小于最小值，則自動等于最大值           
  800.   write_clock(0x8e,0x00);//允許寫1302芯片操作
  801.   write_clock(address,(item/10)*16+item%10);//轉(zhuǎn)換成16進(jìn)制寫入1302
  802.   write_clock(0x8e,0x80);//寫保護(hù)，禁止寫操作
  803.   }

  805. /*********************************************************************
  806. 農(nóng)歷有關(guān)程序：

  808. **********************************************************************
  809. ********************************************************************/
  810. //C51寫的公歷轉(zhuǎn)農(nóng)歷和星期
  811. #define uchar unsigned char
  812. #define uint unsigned int
  813. #include <intrins.h>
  814. /*
  815. 公歷年對應(yīng)的農(nóng)歷數(shù)據(jù),每年三字節(jié),
  816. 格式第一字節(jié)BIT7-4 位表示閏月月份,值為0 為無閏月,BIT3-0 對應(yīng)農(nóng)歷第1-4 月的大小
  817. 第二字節(jié)BIT7-0 對應(yīng)農(nóng)歷第5-12 月大小,第三字節(jié)BIT7 表示農(nóng)歷第13 個月大小
  818. 月份對應(yīng)的位為1 表示本農(nóng)歷月大(30 天),為0 表示小(29 天)
  819. 第三字節(jié)BIT6-5 表示春節(jié)的公歷月份,BIT4-0 表示春節(jié)的公歷日期
  820. */
  821. code uchar year_code[597] = {

  823. 0x04,0xAe,0x53, //1901 0
  824. 0x0A,0x57,0x48, //1902 3
  825. 0x55,0x26,0xBd, //1903 6
  826. 0x0d,0x26,0x50, //1904 9
  827. 0x0d,0x95,0x44, //1905 12
  828. 0x46,0xAA,0xB9, //1906 15
  829. 0x05,0x6A,0x4d, //1907 18
  830. 0x09,0xAd,0x42, //1908 21
  831. 0x24,0xAe,0xB6, //1909
  832. 0x04,0xAe,0x4A, //1910
  833. 0x6A,0x4d,0xBe, //1911
  834. 0x0A,0x4d,0x52, //1912
  835. 0x0d,0x25,0x46, //1913
  836. 0x5d,0x52,0xBA, //1914
  837. 0x0B,0x54,0x4e, //1915
  838. 0x0d,0x6A,0x43, //1916
  839. 0x29,0x6d,0x37, //1917
  840. 0x09,0x5B,0x4B, //1918
  841. 0x74,0x9B,0xC1, //1919
  842. 0x04,0x97,0x54, //1920
  843. 0x0A,0x4B,0x48, //1921
  844. 0x5B,0x25,0xBC, //1922
  845. 0x06,0xA5,0x50, //1923
  846. 0x06,0xd4,0x45, //1924
  847. 0x4A,0xdA,0xB8, //1925
  848. 0x02,0xB6,0x4d, //1926
  849. 0x09,0x57,0x42, //1927
  850. 0x24,0x97,0xB7, //1928
  851. 0x04,0x97,0x4A, //1929
  852. 0x66,0x4B,0x3e, //1930
  853. 0x0d,0x4A,0x51, //1931
  854. 0x0e,0xA5,0x46, //1932
  855. 0x56,0xd4,0xBA, //1933
  856. 0x05,0xAd,0x4e, //1934
  857. 0x02,0xB6,0x44, //1935
  858. 0x39,0x37,0x38, //1936
  859. 0x09,0x2e,0x4B, //1937
  860. 0x7C,0x96,0xBf, //1938
  861. 0x0C,0x95,0x53, //1939
  862. 0x0d,0x4A,0x48, //1940
  863. 0x6d,0xA5,0x3B, //1941
  864. 0x0B,0x55,0x4f, //1942
  865. 0x05,0x6A,0x45, //1943
  866. 0x4A,0xAd,0xB9, //1944
  867. 0x02,0x5d,0x4d, //1945
  868. 0x09,0x2d,0x42, //1946
  869. 0x2C,0x95,0xB6, //1947
  870. 0x0A,0x95,0x4A, //1948
  871. 0x7B,0x4A,0xBd, //1949
  872. 0x06,0xCA,0x51, //1950
  873. 0x0B,0x55,0x46, //1951
  874. 0x55,0x5A,0xBB, //1952
  875. 0x04,0xdA,0x4e, //1953
  876. 0x0A,0x5B,0x43, //1954
  877. 0x35,0x2B,0xB8, //1955
  878. 0x05,0x2B,0x4C, //1956
  879. 0x8A,0x95,0x3f, //1957
  880. 0x0e,0x95,0x52, //1958
  881. 0x06,0xAA,0x48, //1959
  882. 0x7A,0xd5,0x3C, //1960
  883. 0x0A,0xB5,0x4f, //1961
  884. 0x04,0xB6,0x45, //1962
  885. 0x4A,0x57,0x39, //1963
  886. 0x0A,0x57,0x4d, //1964
  887. 0x05,0x26,0x42, //1965
  888. 0x3e,0x93,0x35, //1966
  889. 0x0d,0x95,0x49, //1967
  890. 0x75,0xAA,0xBe, //1968
  891. 0x05,0x6A,0x51, //1969
  892. 0x09,0x6d,0x46, //1970
  893. 0x54,0xAe,0xBB, //1971
  894. 0x04,0xAd,0x4f, //1972
  895. 0x0A,0x4d,0x43, //1973
  896. 0x4d,0x26,0xB7, //1974
  897. 0x0d,0x25,0x4B, //1975
  898. 0x8d,0x52,0xBf, //1976
  899. 0x0B,0x54,0x52, //1977
  900. 0x0B,0x6A,0x47, //1978
  901. 0x69,0x6d,0x3C, //1979
  902. 0x09,0x5B,0x50, //1980
  903. 0x04,0x9B,0x45, //1981
  904. 0x4A,0x4B,0xB9, //1982
  905. 0x0A,0x4B,0x4d, //1983
  906. 0xAB,0x25,0xC2, //1984
  907. 0x06,0xA5,0x54, //1985
  908. 0x06,0xd4,0x49, //1986
  909. 0x6A,0xdA,0x3d, //1987
  910. 0x0A,0xB6,0x51, //1988
  911. 0x09,0x37,0x46, //1989
  912. 0x54,0x97,0xBB, //1990
  913. 0x04,0x97,0x4f, //1991
  914. 0x06,0x4B,0x44, //1992
  915. 0x36,0xA5,0x37, //1993
  916. 0x0e,0xA5,0x4A, //1994
  917. 0x86,0xB2,0xBf, //1995
  918. 0x05,0xAC,0x53, //1996
  919. 0x0A,0xB6,0x47, //1997
  920. 0x59,0x36,0xBC, //1998
  921. 0x09,0x2e,0x50, //1999 294
  922. 0x0C,0x96,0x45, //2000 297
  923. 0x4d,0x4A,0xB8, //2001
  924. 0x0d,0x4A,0x4C, //2002
  925. 0x0d,0xA5,0x41, //2003
  926. 0x25,0xAA,0xB6, //2004
  927. 0x05,0x6A,0x49, //2005
  928. 0x7A,0xAd,0xBd, //2006
  929. 0x02,0x5d,0x52, //2007
  930. 0x09,0x2d,0x47, //2008
  931. 0x5C,0x95,0xBA, //2009
  932. 0x0A,0x95,0x4e, //2010
  933. 0x0B,0x4A,0x43, //2011
  934. 0x4B,0x55,0x37, //2012
  935. 0x0A,0xd5,0x4A, //2013
  936. 0x95,0x5A,0xBf, //2014
  937. 0x04,0xBA,0x53, //2015
  938. 0x0A,0x5B,0x48, //2016
  939. 0x65,0x2B,0xBC, //2017
  940. 0x05,0x2B,0x50, //2018
  941. 0x0A,0x93,0x45, //2019
  942. 0x47,0x4A,0xB9, //2020
  943. 0x06,0xAA,0x4C, //2021
  944. 0x0A,0xd5,0x41, //2022
  945. 0x24,0xdA,0xB6, //2023
  946. 0x04,0xB6,0x4A, //2024
  947. 0x69,0x57,0x3d, //2025
  948. 0x0A,0x4e,0x51, //2026
  949. 0x0d,0x26,0x46, //2027
  950. 0x5e,0x93,0x3A, //2028
  951. 0x0d,0x53,0x4d, //2029
  952. 0x05,0xAA,0x43, //2030
  953. 0x36,0xB5,0x37, //2031
  954. 0x09,0x6d,0x4B, //2032
  955. 0xB4,0xAe,0xBf, //2033
  956. 0x04,0xAd,0x53, //2034
  957. 0x0A,0x4d,0x48, //2035
  958. 0x6d,0x25,0xBC, //2036
  959. 0x0d,0x25,0x4f, //2037
  960. 0x0d,0x52,0x44, //2038
  961. 0x5d,0xAA,0x38, //2039
  962. 0x0B,0x5A,0x4C, //2040
  963. 0x05,0x6d,0x41, //2041
  964. 0x24,0xAd,0xB6, //2042
  965. 0x04,0x9B,0x4A, //2043
  966. 0x7A,0x4B,0xBe, //2044
  967. 0x0A,0x4B,0x51, //2045
  968. 0x0A,0xA5,0x46, //2046
  969. 0x5B,0x52,0xBA, //2047
  970. 0x06,0xd2,0x4e, //2048
  971. 0x0A,0xdA,0x42, //2049
  972. 0x35,0x5B,0x37, //2050
  973. 0x09,0x37,0x4B, //2051
  974. 0x84,0x97,0xC1, //2052
  975. 0x04,0x97,0x53, //2053
  976. 0x06,0x4B,0x48, //2054
  977. 0x66,0xA5,0x3C, //2055
  978. 0x0e,0xA5,0x4f, //2056
  979. 0x06,0xB2,0x44, //2057
  980. 0x4A,0xB6,0x38, //2058
  981. 0x0A,0xAe,0x4C, //2059
  982. 0x09,0x2e,0x42, //2060
  983. 0x3C,0x97,0x35, //2061
  984. 0x0C,0x96,0x49, //2062
  985. 0x7d,0x4A,0xBd, //2063
  986. 0x0d,0x4A,0x51, //2064
  987. 0x0d,0xA5,0x45, //2065
  988. 0x55,0xAA,0xBA, //2066
  989. 0x05,0x6A,0x4e, //2067
  990. 0x0A,0x6d,0x43, //2068
  991. 0x45,0x2e,0xB7, //2069
  992. 0x05,0x2d,0x4B, //2070
  993. 0x8A,0x95,0xBf, //2071
  994. 0x0A,0x95,0x53, //2072
  995. 0x0B,0x4A,0x47, //2073
  996. 0x6B,0x55,0x3B, //2074
  997. 0x0A,0xd5,0x4f, //2075
  998. 0x05,0x5A,0x45, //2076
  999. 0x4A,0x5d,0x38, //2077
  1000. 0x0A,0x5B,0x4C, //2078
  1001. 0x05,0x2B,0x42, //2079
  1002. 0x3A,0x93,0xB6, //2080
  1003. 0x06,0x93,0x49, //2081
  1004. 0x77,0x29,0xBd, //2082
  1005. 0x06,0xAA,0x51, //2083
  1006. 0x0A,0xd5,0x46, //2084
  1007. 0x54,0xdA,0xBA, //2085
  1008. 0x04,0xB6,0x4e, //2086
  1009. 0x0A,0x57,0x43, //2087
  1010. 0x45,0x27,0x38, //2088
  1011. 0x0d,0x26,0x4A, //2089
  1012. 0x8e,0x93,0x3e, //2090
  1013. 0x0d,0x52,0x52, //2091
  1014. 0x0d,0xAA,0x47, //2092
  1015. 0x66,0xB5,0x3B, //2093
  1016. 0x05,0x6d,0x4f, //2094
  1017. 0x04,0xAe,0x45, //2095
  1018. 0x4A,0x4e,0xB9, //2096
  1019. 0x0A,0x4d,0x4C, //2097
  1020. 0x0d,0x15,0x41, //2098
  1021. 0x2d,0x92,0xB5, //2099
  1022. };
  1023. ///月份數(shù)據(jù)表
  1024. code uchar day_code1[9]={0x0,0x1f,0x3b,0x5a,0x78,0x97,0xb5,0xd4,0xf3};
  1025. code uint day_code2[3]={0x111,0x130,0x14e};
  1026. /*
  1027. 函數(shù)功能:輸入BCD陽歷數(shù)據(jù),輸出BCD陰歷數(shù)據(jù)(只允許1901-2099年)
  1028. 調(diào)用函數(shù)示例:Conversion(c_sun,year_sun,month_sun,day_sun)
  1029. 如:計算2004年10月16日Conversion(0,0x4,0x10,0x16);
  1030. c_sun,year_sun,month_sun,day_sun均為BCD數(shù)據(jù),c_sun為世紀(jì)標(biāo)志位,c_sun=0為21世
  1031. 紀(jì),c_sun=1為19世紀(jì)
  1032. 調(diào)用函數(shù)后,原有數(shù)據(jù)不變,讀c_moon,year_moon,month_moon,day_moon得出陰歷BCD數(shù)據(jù)
  1033. */
  1034. bit c_moon;
  1035. data uchar year_moon,month_moon,day_moon,week;
  1036. /*子函數(shù),用于讀取數(shù)據(jù)表中農(nóng)歷月的大月或小月,如果該月為大返回1,為小返回0*/
  1037. bit get_moon_day(uchar month_p,uint table_addr)
  1038. {
  1039. uchar temp;
  1040. switch (month_p)
  1041. {
  1042. case 1:{temp=year_code[table_addr]&0x08;
  1043. if (temp==0)return(0);else return(1);}
  1044. case 2:{temp=year_code[table_addr]&0x04;
  1045. if (temp==0)return(0);else return(1);}
  1046. case 3:{temp=year_code[table_addr]&0x02;
  1047. if (temp==0)return(0);else return(1);}
  1048. case 4:{temp=year_code[table_addr]&0x01;
  1049. if (temp==0)return(0);else return(1);}
  1050. case 5:{temp=year_code[table_addr+1]&0x80;
  1051. if (temp==0) return(0);else return(1);}
  1052. case 6:{temp=year_code[table_addr+1]&0x40;
  1053. if (temp==0)return(0);else return(1);}
  1054. case 7:{temp=year_code[table_addr+1]&0x20;
  1055. if (temp==0)return(0);else return(1);}
  1056. case 8:{temp=year_code[table_addr+1]&0x10;
  1057. if (temp==0)return(0);else return(1);}
  1058. case 9:{temp=year_code[table_addr+1]&0x08;
  1059. if (temp==0)return(0);else return(1);}
  1060. case 10:{temp=year_code[table_addr+1]&0x04;
  1061. if (temp==0)return(0);else return(1);}
  1062. case 11:{temp=year_code[table_addr+1]&0x02;
  1063. if (temp==0)return(0);else return(1);}
  1064. case 12:{temp=year_code[table_addr+1]&0x01;
  1065. if (temp==0)return(0);else return(1);}
  1066. case 13:{temp=year_code[table_addr+2]&0x80;
  1067. if (temp==0)return(0);else return(1);}
  1068. }
  1069. }
  1070. /*
  1071. 函數(shù)功能:輸入BCD陽歷數(shù)據(jù),輸出BCD陰歷數(shù)據(jù)(只允許1901-2099年)
  1072. 調(diào)用函數(shù)示例:Conversion(c_sun,year_sun,month_sun,day_sun)
  1073. 如:計算2004年10月16日Conversion(0,0x4,0x10,0x16);
  1074. c_sun,year_sun,month_sun,day_sun均為BCD數(shù)據(jù),c_sun為世紀(jì)標(biāo)志位,c_sun=0為21世
  1075. 紀(jì),c_sun=1為19世紀(jì)
  1076. 調(diào)用函數(shù)后,原有數(shù)據(jù)不變,讀c_moon,year_moon,month_moon,day_moon得出陰歷BCD數(shù)據(jù)
  1077. */
  1078. void Conversion(bit c,uchar year,uchar month,uchar day)
  1079. { //c=0 為21世紀(jì),c=1 為19世紀(jì) 輸入輸出數(shù)據(jù)均為BCD數(shù)據(jù)
  1080. uchar temp1,temp2,temp3,month_p;
  1081. uint temp4,table_addr;
  1082. bit flag2,flag_y;
  1083. temp1=year/16; //BCD->hex 先把數(shù)據(jù)轉(zhuǎn)換為十六進(jìn)制
  1084. temp2=year%16;
  1085. year=temp1*10+temp2;
  1086. temp1=month/16;
  1087. temp2=month%16;
  1088. month=temp1*10+temp2;
  1089. temp1=day/16;
  1090. temp2=day%16;
  1091. day=temp1*10+temp2;
  1092. //定位數(shù)據(jù)表地址
  1093. if(c==0)
  1094. {
  1095. table_addr=(year+0x64-1)*0x3;
  1096. }
  1097. else
  1098. {
  1099. table_addr=(year-1)*0x3;
  1100. }
  1101. //定位數(shù)據(jù)表地址完成
  1102. //取當(dāng)年春節(jié)所在的公歷月份
  1103. temp1=year_code[table_addr+2]&0x60;
  1104. temp1=_cror_(temp1,5);
  1105. //取當(dāng)年春節(jié)所在的公歷月份完成
  1106. //取當(dāng)年春節(jié)所在的公歷日
  1107. temp2=year_code[table_addr+2]&0x1f;
  1108. //取當(dāng)年春節(jié)所在的公歷日完成
  1109. // 計算當(dāng)年春年離當(dāng)年元旦的天數(shù),春節(jié)只會在公歷1月或2月
  1110. if(temp1==0x1)
  1111. {
  1112. temp3=temp2-1;
  1113. }
  1114. else
  1115. {
  1116. temp3=temp2+0x1f-1;
  1117. }
  1118. // 計算當(dāng)年春年離當(dāng)年元旦的天數(shù)完成
  1119. //計算公歷日離當(dāng)年元旦的天數(shù),為了減少運(yùn)算,用了兩個表
  1120. //day_code1[9],day_code2[3]
  1121. //如果公歷月在九月或前,天數(shù)會少于0xff,用表day_code1[9],
  1122. //在九月后,天數(shù)大于0xff,用表day_code2[3]
  1123. //如輸入公歷日為8月10日,則公歷日離元旦天數(shù)為day_code1[8-1]+10-1
  1124. //如輸入公歷日為11月10日,則公歷日離元旦天數(shù)為day_code2[11-10]+10-1
  1125. if (month<10)
  1126. {
  1127. temp4=day_code1[month-1]+day-1;
  1128. }
  1129. else
  1130. {
  1131. temp4=day_code2[month-10]+day-1;
  1132. }
  1133. if ((month>0x2)&&(year%0x4==0))
  1134. { //如果公歷月大于2月并且該年的2月為閏月,天數(shù)加1
  1135. temp4+=1;
  1136. }
  1137. //計算公歷日離當(dāng)年元旦的天數(shù)完成
  1138. //判斷公歷日在春節(jié)前還是春節(jié)后
  1139. if (temp4>=temp3)
  1140. { //公歷日在春節(jié)后或就是春節(jié)當(dāng)日使用下面代碼進(jìn)行運(yùn)算
  1141. temp4-=temp3;
  1142. month=0x1;
  1143. month_p=0x1; //month_p為月份指向,公歷日在春節(jié)前或就是春節(jié)當(dāng)日month_p指向首月
  1144. flag2=get_moon_day(month_p,table_addr);
  1145. //檢查該農(nóng)歷月為大小還是小月,大月返回1,小月返回0
  1146. flag_y=0;
  1147. if(flag2==0)temp1=0x1d; //小月29天
  1148. else temp1=0x1e; //大小30天
  1149. temp2=year_code[table_addr]&0xf0;
  1150. temp2=_cror_(temp2,4); //從數(shù)據(jù)表中取該年的閏月月份,如為0則該年無閏月
  1151. while(temp4>=temp1)
  1152. {
  1153. temp4-=temp1;
  1154. month_p+=1;
  1155. if(month==temp2)
  1156. {
  1157. flag_y=~flag_y;
  1158. if(flag_y==0)
  1159. month+=1;
  1160. }
  1161. else month+=1;
  1162. flag2=get_moon_day(month_p,table_addr);
  1163. if(flag2==0)temp1=0x1d;
  1164. else temp1=0x1e;
  1165. }
  1166. day=temp4+1;
  1167. }
  1168. else
  1169. { //公歷日在春節(jié)前使用下面代碼進(jìn)行運(yùn)算
  1170. temp3-=temp4;
  1171. if (year==0x0)
  1172. {
  1173. year=0x63;c=1;
  1174. }
  1175. else year-=1;
  1176. table_addr-=0x3;
  1177. month=0xc;
  1178. temp2=year_code[table_addr]&0xf0;
  1179. temp2=_cror_(temp2,4);
  1180. if (temp2==0)
  1181. month_p=0xc;
  1182. else
  1183. month_p=0xd; //
  1184. /*month_p為月份指向,如果當(dāng)年有閏月,一年有十三個月,月指向13,無閏月指向12*/
  1185. flag_y=0;
  1186. flag2=get_moon_day(month_p,table_addr);
  1187. if(flag2==0)temp1=0x1d;
  1188. else temp1=0x1e;
  1189. while(temp3>temp1)
  1190. {
  1191. temp3-=temp1;
  1192. month_p-=1;
  1193. if(flag_y==0)month-=1;
  1194. if(month==temp2)flag_y=~flag_y;
  1195. flag2=get_moon_day(month_p,table_addr);
  1196. if(flag2==0)temp1=0x1d;
  1197. else temp1=0x1e;
  1198. }
  1199. day=temp1-temp3+1;
  1200. }
  1201. c_moon=c; //HEX->BCD ,運(yùn)算結(jié)束后,把數(shù)據(jù)轉(zhuǎn)換為BCD數(shù)據(jù)
  1202. temp1=year/10;
  1203. temp1=_crol_(temp1,4);
  1204. temp2=year%10;
  1205. year_moon=temp1|temp2;
  1206. temp1=month/10;
  1207. temp1=_crol_(temp1,4);
  1208. temp2=month%10;
  1209. month_moon=temp1|temp2;
  1210. temp1=day/10;
  1211. temp1=_crol_(temp1,4);
  1212. temp2=day%10;
  1213. day_moon=temp1|temp2;
  1214. }

  1216. /*************************************************************************
  1217. /*函數(shù)功能:輸入BCD陽歷數(shù)據(jù),輸出BCD星期數(shù)據(jù)(只允許1901-2099年)
  1218. 調(diào)用函數(shù)示例:Conver_week(c_sun,year_sun,month_sun,day_sun)
  1219. 如:計算2004年10月16日Conversion(0,0x4,0x10,0x16);
  1220. c_sun,year_sun,month_sun,day_sun均為BCD數(shù)據(jù),c_sun為世紀(jì)標(biāo)志位,c_sun=0為21世
  1221. 紀(jì),c_sun=1為19世紀(jì)
  1222. 調(diào)用函數(shù)后,原有數(shù)據(jù)不變,讀week得出陰歷BCD數(shù)據(jù)
  1223. */
  1224. code uchar table_week[12]={0,3,3,6,1,4,6,2,5,0,3,5}; //月修正數(shù)據(jù)表
  1225. /*
  1226. 算法:日期+年份+所過閏年數(shù)+月較正數(shù)之和除7 的余數(shù)就是星期但如果是在
  1227. 閏年又不到3 月份上述之和要減一天再除7
  1228. 星期數(shù)為0
  1229. */

  1231. void Conver_week(bit c,uchar year,uchar month,uchar day)
  1232. {//c=0 為21世紀(jì),c=1 為19世紀(jì) 輸入輸出數(shù)據(jù)均為BCD數(shù)據(jù)
  1233. uchar temp1,temp2;
  1234. temp1=year/16; //BCD->hex 先把數(shù)據(jù)轉(zhuǎn)換為十六進(jìn)制
  1235. temp2=year%16;
  1236. year=temp1*10+temp2;
  1237. temp1=month/16;
  1238. temp2=month%16;
  1239. month=temp1*10+temp2;
  1240. temp1=day/16;
  1241. temp2=day%16;
  1242. day=temp1*10+temp2;
  1243. if (c==0){year+=0x64;} //如果為21世紀(jì),年份數(shù)加100
  1244. temp1=year/0x4; //所過閏年數(shù)只算1900年之后的
  1245. temp2=year+temp1;
  1246. temp2=temp2%0x7; //為節(jié)省資源,先進(jìn)行一次取余,避免數(shù)大于0xff,避免使用整型數(shù)據(jù)
  1247. temp2=temp2+day+table_week[month-1];
  1248. if (year%0x4==0&&month<3)temp2-=1;
  1249. week=temp2%0x7;
  1250. }



  1254. /******************************************
  1255. 顯示農(nóng)歷年月日

  1257. *******************************************/
  1258. //向LCM中填寫 農(nóng)歷年月日數(shù)據(jù)
  1259. void lcm_w_nl(void){

  1261.       dd = read_clock(0x87);//日
  1262.            mo = read_clock(0x89);//月
  1263.            yy = read_clock(0x8d);//年
  1264.       Conversion(0,yy,mo,dd);//調(diào)用公歷轉(zhuǎn)農(nóng)歷子函數(shù)
  1265.   //調(diào)用函數(shù)后,原有數(shù)據(jù)不變,讀c_moon農(nóng)歷世紀(jì),year_moon農(nóng)歷年,month_moon,day_moon得出陰歷BCD數(shù)據(jù)
  1266.                 lcm_w_test(0,0x88);
  1267.                 lcm_w_word("農(nóng)歷20");//顯示內(nèi)容字符20
  1268.                
  1269.                 lcm_w_test(1,(year_moon/16)+0x30);//函數(shù)參數(shù)1，代表本行寫數(shù)據(jù)，YY/16+0X30得出年十位數(shù)字的顯示碼地址，送顯示        
  1270.                 lcm_w_test(1,year_moon%16+0x30);//函數(shù)參數(shù)1，代表本行寫數(shù)據(jù)，YY%得出年個位數(shù)字的顯示碼地址，送顯示
  1271.                
  1272.       lcm_w_word("-");
  1273.                
  1274.       lcm_w_test(1,(month_moon/16)+0x30);
  1275.                 lcm_w_test(1,month_moon%16+0x30);//與16取余數(shù)，得到月份的個位數(shù)，加0x30得到該數(shù)字的液晶內(nèi)定顯示碼送顯示
  1276.                
  1277.                 lcm_w_word("-");//調(diào)用字符顯示函數(shù)，顯示文字 月

  1279.                   lcm_w_test(1,(day_moon/16)+0x30);
  1280.                 lcm_w_test(1,day_moon%16+0x30);//第一個1參數(shù)，表示本行寫數(shù)據(jù)，日數(shù)據(jù)與16取余得個位數(shù)，加0x30得到顯示碼
  1281.                
  1282.                                 
  1283. }        


  1286. /*****************************************************************************/
  1287. //---主程序---//
  1288. /*****************************************************************************/
  1289. main() {
  1290.         unsigned char e=0;
  1291.         //KEY_I = 0;
  1292.         KEY_1 = 1;KEY_2 = 1;KEY_3 = 1;KEY_4 = 1;KEY_5=1;//初始鍵盤
  1293.         beep=0;//因為用9014三極管驅(qū)動蜂鳴器，所以beep=1時，蜂鳴器響
  1294.    led_back=1;
  1295.         yy=0xff;mo=0xff;dd=0xff;xq=0xff;hh=0xff;mm=0xff;ss=0xff; //各數(shù)據(jù)刷新
  1296.         Beep();//鳴響一聲        
  1297.         Init_1302();//初始化1302時鐘芯片
  1298.         lcm_init();//初始化液晶顯示器
  1299.         lcm_clr();//清屏
  1300.         welcome();//顯示歡迎信息，顯示歡迎函數(shù)內(nèi)設(shè)定的內(nèi)容
  1301.         DelayM(3000); //歡迎信息顯示停留1秒
  1302.    lcm_init();//
  1303.    lcm_w_nl();//
  1304. /*****************************************************************************/
  1305. while(1){//主循環(huán)

  1307.                if (KEY_5 == 0) // 按下背光控制
  1308.               {
  1309.                        DelayM(20);//防抖
  1310.                         
  1311.                        if(KEY_5 == 0){                                
  1312.                                 Beep_key();//確定按鍵音
  1313.                            led_back =~led_back; //改變背光狀態(tài)
  1314.                                  
  1315.                                 }        
  1316.                                         while(KEY_5 == 0);//等待鍵松開
  1317.            }      



  1321.                 if (w == 0){   //W為程序頭段規(guī)定的正常走時標(biāo)志位，=0時說明在正常走時
  1322.                 lcm_w_ss();//刷新 秒
  1323.                 }
  1324.                 else {                //否則（W!=0的情況下就是調(diào)時狀態(tài)）啟動調(diào)時
  1325.                 }
  1326.                 //------------------------------------------------------------------
  1327.                 if (KEY_3 == 0) // 按下設(shè)置鍵
  1328.               {
  1329.                        DelayM(20);           //去抖
  1330.                         //led_g3 = 0;led_r = 1;
  1331.                         if(KEY_3 == 0 && w == 1)  //如果按下設(shè)置鍵時，系統(tǒng)是調(diào)時狀態(tài) 本鍵用于調(diào)整下一項
  1332.                         {
  1333.                                 Beep_key();//按鍵音
  1334.                                 e++;
  1335.                                 if (e >= 6 ){e = 0;}
  1336.                                 Set_time(e);//調(diào)用調(diào)整時間子函數(shù)                                
  1337.                         }


  1340.                         if(KEY_3 == 0 && w == 0)  //如果按下設(shè)置鍵時，系統(tǒng)正在正常走時狀態(tài)時就進(jìn)入調(diào)時狀態(tài)
  1341.                         {
  1342.                                 Beep_set();//確定按鍵音
  1343.                                 //led_b = 1;//
  1344.                                 lcm_clr();//清屏
  1345.             lcm_clr2();//清前三行屏幕顯示
  1346.                                 w=1;          //進(jìn)入調(diào)時，w是正常走時的標(biāo)志位，=1進(jìn)入調(diào)試狀態(tài)，=0進(jìn)入正常走時狀態(tài)
  1347.                         
  1348.                                 lcm_w_test(0,0x80);
  1349.                                 lcm_w_word("Esc");
  1350.             lcm_w_test(0,0x90);//指定顯示位置
  1351.                                 lcm_w_word("[+]");//在上一行指定位置顯示引號內(nèi)的字符
  1352.             lcm_w_test(0,0x88);
  1353.                                 lcm_w_word("Sel");
  1354.                       lcm_w_test(0,0x98);//函數(shù)第一參數(shù)是0，表示本很寫入液晶指令，指定顯示位置98H
  1355.                                 lcm_w_word("[-]");//在上一行指定的位置顯示 引號內(nèi)的字符                                
  1356.                                 Set_time(e);//調(diào)用調(diào)整時間子函數(shù)
  1357.                         }
  1358.                        while(KEY_3 == 0);//等待鍵松開
  1359.                
  1360.               }
  1361.                 //------------------------------------------------------------------
  1362.                 if (KEY_1 == 0) // 按下退出鍵Esc，當(dāng)在調(diào)時狀態(tài)時就退出調(diào)時
  1363.               {
  1364.                        DelayM(20);
  1365.                         //led_g1 = 0;led_r = 1;
  1366.                        if(KEY_1 == 0 && w == 1){        //如果w==1說明在調(diào)時狀態(tài)，按動這個鍵，退出調(diào)時                        
  1367.                                 Beep_set();//確定按鍵音
  1368.                                 w = 0;          //退出調(diào)時，進(jìn)入正常走時狀體
  1369.                                 e = 0;        //設(shè)置鍵功能循環(huán)中控制顯示 下一項 的參數(shù)歸0        
  1370.                     lcm_w_nl();//刷新農(nóng)歷顯示
  1371.                         }
  1372.                         if(KEY_1 == 0 && w == 0){                                
  1373.                                 lcm_clr();//清屏
  1374.                                 lcm_w_test(0,0x80);
  1375.                                 welcome();//顯示歡迎信息
  1376.                                 while(KEY_1 == 0);//等待鍵松開  
  1377.                         }
  1378.                                 lcm_clr();//清屏
  1379.                                 updata ();        //刷新數(shù)據(jù)
  1380.                                 lcm_w_mm();//刷新 分
  1381.             lcm_w_nl();//
  1382.                        while(KEY_1 == 0);//等待鍵松開  
  1383.               }
  1384.                 //------------------------------------------------------------------
  1385.                 if (KEY_2 == 0 && w == 1){ // 加減調(diào)整，KEY_2為上調(diào)鍵，如果上調(diào)鍵按下，且系統(tǒng)在調(diào)時狀態(tài){
  1386.                        DelayM(20); //延時消抖動20毫秒
  1387.                        if(KEY_2 == 0 && w == 1){        //確認(rèn)上調(diào)鍵是按下的                        
  1388.                                 Beep_key();//按鍵音
  1389.                                 Set_time(e);//調(diào)用調(diào)時子函數(shù)
  1390.                
  1391.                         }
  1392.                        while(KEY_2 == 0);//等待鍵松開
  1393.               }
  1394.                 //------------------------------------------------------------------
  1395.                 if (KEY_4 == 0 && w == 1){ // 加減調(diào)整，KEY_4為下調(diào)鍵，如果下調(diào)鍵按下而且系統(tǒng)在調(diào)時狀態(tài)              
  1396.                        DelayM(20);        //延時消抖動20毫秒
  1397.                             if(KEY_4 == 0 && w == 1){        //確定下調(diào)鍵是按下的                        
  1398.                                 Beep_key();//按鍵音
  1399.                                 Set_time(e);//調(diào)用調(diào)時的子函數(shù)
  1400.                         }
  1401.                        while(KEY_4 == 0);//等待鍵松開
  1402.               }
  1403. }        }        

復(fù)制代碼


所有資料打包下載（包含源程序 pcb 原理圖等）：
LCD12864帶農(nóng)歷和農(nóng)歷紀(jì)念日（有字庫）調(diào)時界面星期自動紀(jì)念日輪顯萬年歷適合定做PCB（.zip (143.62 KB, 下載次數(shù): 66)

評分

參與人數(shù) 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎勵！

查看全部評分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏11 分享淘帖 頂頂 踩踩
回復(fù)

使用道具 舉報

沙發(fā)
ID:159269 發(fā)表于 2017-1-1 22:41 | 只看該作者
怎么看通過沒？
回復(fù)

使用道具 舉報

板凳
ID:83510 發(fā)表于 2017-1-3 17:32 | 只看該作者
多謝分享
回復(fù)

使用道具 舉報

地板
ID:83510 發(fā)表于 2017-1-3 17:33 | 只看該作者
多謝分享
回復(fù)

使用道具 舉報

5#
ID:201672 發(fā)表于 2017-5-29 15:32 | 只看該作者
樓主牛人��！多謝分享
回復(fù)

使用道具 舉報

6#
ID:202586 發(fā)表于 2017-7-19 00:02 | 只看該作者
NB 謝謝分享 好長啊  這個程序多大？要多大的單片存得下，2051可以不   也想做一個
回復(fù)

使用道具 舉報

7#
ID:229752 發(fā)表于 2019-5-17 14:54 | 只看該作者
頂頂更健康
回復(fù)

使用道具 舉報

8#
ID:517951 發(fā)表于 2020-11-15 14:59 | 只看該作者
收藏學(xué)習(xí)代碼
回復(fù)

使用道具 舉報

9#
ID:846386 發(fā)表于 2020-12-2 23:17 | 只看該作者
代碼不錯，先學(xué)習(xí)了
回復(fù)

使用道具 舉報

10#
ID:357153 發(fā)表于 2020-12-28 14:40 | 只看該作者
感謝樓主的分享。收藏、值得學(xué)習(xí)
回復(fù)

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

手機(jī)版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表