久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

標(biāo)題: 12864-ds1302-ds18b20-單片機(jī)萬年歷程序 [打印本頁]
作者: 51hei人人    時間: 2016-3-12 21:21
標(biāo)題: 12864-ds1302-ds18b20-單片機(jī)萬年歷程序




  1. #include<reg52.h>
  2. #include<intrins.h>
  3. #define SoundSpace 3/4   
  4. unsigned char sec,min,hour,day,month,year,year1,cen,week;  //秒，分，小時，公歷日期，月份，年份，世紀(jì)，星期
  5. unsigned char LunarMonth,LunarDay,LunarYear;         //陰歷日期，月份，年份
  6. bit c_moon;                                          //大小月標(biāo)志位                                          
  7. bit cenbit=0;                                          //世紀(jì)標(biāo)志，為1,則表示20世紀(jì)，為0,則表示21世紀(jì)
  8. bit w;                                               //調(diào)時狀態(tài)標(biāo)志位
  9. unsigned char next;
  10. /**********定義LCD12864的數(shù)據(jù)線和相關(guān)函數(shù)*************/
  11. sbit LCD_RS=P2^6;        //模式位，低電平輸入指令，高電平輸入數(shù)據(jù)
  12. sbit LCD_RW=P2^5;        //讀寫位，低電平讀，高電平寫
  13. sbit LCD_E=P2^7;         //LCD12864使能位，低電平無效，高電平使能
  14. sbit PSB=P3^2;
  15. #define Busy 0x80
  16. #define LCD_Data P0     //LCD12864的8位數(shù)據(jù)總線，單片機(jī)的P0端口
  17. void WriteDataLCD(unsigned char WDLCD);          //給LCD12864寫數(shù)據(jù)
  18. void WriteCommandLCD(unsigned char WCLCD);       //給LCD12864寫指令
  19. void LCDInit(void);                              //LCD12864初始化
  20. void LCDClear(void);                             //LCD12864清屏
  21. void CheckBusy(void);                            //忙檢測
  22. void LCDSendWord(unsigned char *p);              //向LCD發(fā)送一個字符串
  23. void LCDTestWord(bit i,unsigned char word);
  24. void DisplaySec(void);                           //在LCD上顯示秒鐘
  25. void DisplayMin(void);                           //在LCD上顯示分鐘
  26. void DisplayHour(void);                          //在LCD上顯示小時
  27. void DisplayDay(void);                           //在LCD上顯示日期
  28. void DisplayYear(void);                          //在LCD上顯示年份
  29. void DisplayMonth(void);                         //在LCD上顯示月份
  30. void DisplayWeek(void);                          //在LCD上顯示星期
  31. void Holidays(void);                             //在LCD上顯示節(jié)日
  32. /*********定義時間芯片DS1302的數(shù)據(jù)線及相關(guān)函數(shù)***********/
  33. sbit DS1302_CLK=P3^6;         //DS1302的時鐘信號線   
  34. sbit DS1302_IO=P3^0;          //DS1302的數(shù)據(jù)端口線
  35. sbit DS1302_RST=P3^5;         //DS1302的片選信號線
  36. void WriteDs1302byte(unsigned char temp);                    //給DS1302寫一個字節(jié)
  37. void WriteDs1302(unsigned char address,unsigned char dat);  //給DS1302寫入時間，先確定地址，再確定要寫入的數(shù)據(jù)
  38. unsigned char ReadDs1302(unsigned char address);           //讀取DS1302的數(shù)據(jù)
  39. void InitDS1302();
  40. /**********定義溫度傳感器DS18B20的數(shù)據(jù)線和相關(guān)函數(shù)*************/
  41. sbit DS18B20=P3^7;                        //DS18B20的數(shù)據(jù)線
  42. int temp;
  43. void DS18B20Init(void);                   //DS18B20初始化函數(shù)
  44. int GetTemp(void);
  45. void TempWriteByte(unsigned char dat);
  46. unsigned char TempRead(void);
  47. bit TempReadBit(void);   
  48. void delayb(unsigned int count);
  49. void TempChange(void);
  50. void Conversion(bit cen_m,unsigned char year,unsigned char month,unsigned char day);
  51. bit GetMoonDay(unsigned char month_p,unsigned int TableAddr);
  52. void DisplayShengXiao(void);
  53. void DelayMs(unsigned int a);
  54. void Delay(unsigned char num);
  55. /**********定義開關(guān)按鍵,及蜂鳴器的數(shù)據(jù)線************/
  56. sbit SetKey=P1^0;       //按鍵功能：設(shè)置
  57. sbit SureKey=P1^1;      //按鍵功能：確認(rèn)
  58. sbit PlusKey=P1^2;      //按鍵功能：加
  59. sbit ReduceKey=P1^3;    //按鍵功能：減
  60. void Key(void);

  62. #define Fosc 12000000      //定義晶振頻率12000000HZ
  63. #define jiepai 3/4         //定義普通音符演奏的長度分率,//每4分音符間隔
  64. sbit Speaker=P1^5;         //定義輸出管腳
  65. unsigned int code FreTab[12]={262,277,294,311,330,349,369,392,415,440,466,494};  //C調(diào)歌曲12個半音的頻率
  66. unsigned char code PositTab[7]={0,2,4,5,7,9,11};                                   //1~7在頻率表中的位置
  67. unsigned char code LengthTab[7]={1,2,4,8,16,32,64};                       
  68. unsigned char SoundTempTH0,SoundTempTL0;    //音符定時器初值暫存
  69. unsigned char SoundTempTH1,SoundTempTL1;    //音長定時器初值暫存
  70. void SpeakerDiDi(void);
  71. void SpeakerDiDi(void)
  72. {
  73. unsigned char i;
  74. for(i=0;i<3;i++)
  75. {
  76.   Speaker=0;
  77.   DelayMs(100);
  78.   Speaker=1;
  79.   DelayMs(100);
  80. }
  81. DelayMs(500);
  82. for(i=0;i<3;i++)
  83. {
  84.   Speaker=0;
  85.   DelayMs(100);
  86.   Speaker=1;
  87.   DelayMs(100);
  88. }
  89. DelayMs(500);
  90. for(i=0;i<2;i++)
  91. {
  92.   Speaker=0;
  93.   DelayMs(500);
  94.   Speaker=1;
  95.   DelayMs(100);
  96. }
  97. }
  98. void InitialSound(void)
  99. {
  100.     Speaker=1;
  101.     SoundTempTH1=(65535-(1/1200)*Fosc)/256;    //計算TL1應(yīng)裝入的初值     (10ms的初裝值)
  102.     SoundTempTL1=(65535-(1/1200)*Fosc)%256;    //計算TH1應(yīng)裝入的初值
  103.     TH1=SoundTempTH1;                          //裝入初值
  104.     TL1=SoundTempTL1;
  105.     TMOD|=0x11;                                //定時器1、2都工作在定時器模式，工作方式1
  106.     ET0=1;                                     //定時器0開中斷
  107.     ET1=0;                                     //定時器1關(guān)中斷
  108.     TR0=0;                                     //不啟動定時器
  109.     TR1=0;                                     //不啟動定時器
  110.     EA=1;                                      //開啟CPU中斷
  111. }

  113. void Speakertimer(void) interrupt 1            //音符發(fā)生中斷
  114. {
  115.     Speaker=!Speaker;                          //取反  
  116.     TH0=SoundTempTH0;                          //定時器0重新裝初值
  117.     TL0=SoundTempTL0;
  118. }
  119. void PlayMusic(unsigned char *SoundName,unsigned char diaohao,unsigned shengjiang,unsigned int Speed)
  120.                                    //SoundName為演奏歌曲歌名 diaohao是指樂曲升多少個半音演奏
  121.            //shengjiang 1:降八度, 2:不升不降, 3:升八度; Speed歌曲演奏速度
  122. {
  123.     unsigned int NewFreTab[12];         //新的頻率表
  124.     unsigned char i,j;
  125.     unsigned int Point,yinfuchang,yipai,LDiv1,LDiv2,sifenyifu,CurrentFre,TempCounter,SoundLength;
  126.              //Point 指針?biāo)饕?nbsp; LDiv  音符演奏的長度(多少個10ms)   yipai 1分音符的長度(幾個10ms)即一個節(jié)拍   
  127.              //sifenyifu 4分音符的長度   CurrentFre 查出對應(yīng)音符的頻率   SoundLength歌曲長度   TempCounter計算計數(shù)器初值
  128.     unsigned char yindiao,length,yinfu,shengban,gaodi,SLen,leixing,fudian;
  129.              //yindiao音調(diào)  length音長  yinfu音符  gaodi高低音  shengban是否升半   leixing音符類型(0普通1連音2頓音)
  130.     for(i=0;i<12;i++)                   // 根據(jù)調(diào)號及升降八度來生成新的頻率表
  131.     {
  132.         j=i+diaohao;
  133.         if(j>11)
  134.         {
  135.             j=j-12;
  136.             NewFreTab[i]=FreTab[j]*2;            //頻率翻倍速
  137.         }
  138.         else
  139.             NewFreTab[i]=FreTab[j];
  140.         if(shengjiang==1) NewFreTab[i]>>=2;      //如果是降調(diào)  則頻率除以2
  141.         else if(shengjiang==3) NewFreTab[i]<<=2; //如果是升調(diào) 則頻率翻倍速
  142.     }                                   
  143.     SoundLength=0;
  144.     while(SoundName[SoundLength]!=0x00)          //計算歌曲長度 以0X00結(jié)尾
  145.     {
  146.         SoundLength+=2;
  147.     }
  148.     Point=0;
  149.     yindiao=SoundName[Point];                    //第一個字節(jié)為音符音調(diào)
  150.     length=SoundName[Point+1];                   //第二個字節(jié)為音符時值
  151.     yipai=12000/Speed;                           //算出一個節(jié)拍的長度(單位是10ms)   
  152.     sifenyifu=yipai/4;                           //算出4分音符的長度
  153.     sifenyifu=sifenyifu-sifenyifu*jiepai;        //普通音最長間隔標(biāo)準(zhǔn)
  154.     TR0=0;
  155.     TR1=1;                                       //啟動定時器1
  156.     while(Point<SoundLength)
  157.     {
  158.         yinfu=yindiao%10;                        //個位，1--7七個音符                                 
  159.         gaodi=yindiao/10%10;                     //十位，高低音
  160.         shengban=yindiao/100;                    //百位，是否升半
  161.         CurrentFre=NewFreTab[PositTab[yinfu-1]+shengban];     //查出對應(yīng)音符的頻率   
  162.         if(yinfu!=0)
  163.         {
  164.             if (gaodi==1) CurrentFre>>=2;         //低音，頻率除以2
  165.             if (gaodi==3) CurrentFre<<=2;         //高音, 頻率翻倍速
  166.             TempCounter=65536-(50000/CurrentFre)*10/(12000000/Fosc);//計算計數(shù)器初值
  167.             SoundTempTH0=TempCounter/256;
  168.             SoundTempTL0=TempCounter%256;
  169.             TH0=SoundTempTH0;
  170.             TL0=SoundTempTL0+12;                 //加12是對中斷延時的補(bǔ)償
  171.         }
  172.         SLen=LengthTab[length%10];               //算出是幾分音符
  173.         leixing=length/10%10;                    //算出音符類型(0普通1連音2頓音)
  174.         fudian=length/100;
  175.         yinfuchang=yipai/SLen;                   //算出連音音符演奏的長度(多少個10ms)
  176.         if (fudian==1)
  177.             yinfuchang=yinfuchang+yinfuchang/2;
  178.         if(leixing!=1)   
  179.             if(leixing==0)                       //算出普通音符的演奏長度
  180.                 if (SLen<=4)   
  181.                     LDiv1=yinfuchang-sifenyifu;
  182.                 else
  183.                     LDiv1=yinfuchang*jiepai;
  184.             else
  185.                 LDiv1=yinfuchang/2;              //算出頓音的演奏長度
  186.         else
  187.             LDiv1=yinfuchang;
  188.         if(yinfu==0) LDiv1=0;
  189.             LDiv2=yinfuchang-LDiv1;              //算出不發(fā)音的長度
  190.          if (yinfu!=0)
  191.         {
  192.             TR0=1;
  193.             for(i=LDiv1;i>0;i--)                 //發(fā)規(guī)定長度的音
  194.             {
  195.                 while(TF1==0);
  196.                 TH1=SoundTempTH1;
  197.                 TL1=SoundTempTL1;
  198.                 TF1=0;
  199.             }
  200.         }
  201.         if(LDiv2!=0)
  202.         {
  203.             TR0=0; Speaker=0;
  204.             for(i=LDiv2;i>0;i--)                //音符間的間隔
  205.             {
  206.                 while(TF1==0);
  207.                 TH1=SoundTempTH1;
  208.                 TL1=SoundTempTL1;
  209.                 TF1=0;
  210.             }
  211.         }
  212.         Point+=2;
  213.         yindiao=SoundName[Point];
  214.         length=SoundName[Point+1];
  215.     }
  216.     Speaker=1;
  217. }
  218. //**************************************************************************
  219. unsigned char code HappyBirthday[]=
  220. {//生日歌
  221.     0x19,0x03, 0x19,0x03, 0x1A,0x02, 0x19,0x02, 0x1F,0x02,
  222.     0x1B,0x01, 0x19,0x03, 0x19,0x03, 0x1A,0x02, 0x19,0x02,
  223.     0x20,0x02, 0x1F,0x01, 0x19,0x03, 0x19,0x03, 0x23,0x02,
  224.     0x21,0x02, 0x1F,0x02, 0x1B,0x0C, 0x1A,0x15, 0x22,0x03,
  225.     0x22,0x03, 0x21,0x02, 0x1F,0x02, 0x20,0x02, 0x1F,0x15,
  226.     0x00,0x00
  227. };
  228. unsigned char code Butterfly[]=
  229. {
  230. 0x17,0x03, 0x16,0x03, 0x17,0x01, 0x16,0x03, 0x17,0x03,                                
  231. 0x16,0x03, 0x15,0x01, 0x10,0x03, 0x15,0x03, 0x16,0x02,
  232.   0x16,0x0D, 0x17,0x03, 0x16,0x03, 0x15,0x03, 0x10,0x03,  
  233.    0x10,0x0E, 0x15,0x04, 0x0F,0x01, 0x17,0x03, 0x16,0x03,
  234.     0x17,0x01, 0x16,0x03, 0x17,0x03, 0x16,0x03, 0x15,0x01,
  235.     0x10,0x03, 0x15,0x03, 0x16,0x02, 0x16,0x0D, 0x17,0x03,
  236.     0x16,0x03, 0x15,0x03, 0x10,0x03, 0x15,0x03, 0x16,0x01,  
  237.     0x17,0x03, 0x16,0x03, 0x17,0x01, 0x16,0x03, 0x17,0x03,
  238.     0x16,0x03, 0x15,0x01, 0x10,0x03, 0x15,0x03, 0x16,0x02,
  239.     0x16,0x0D, 0x17,0x03, 0x16,0x03, 0x15,0x03, 0x10,0x03,  
  240.     0x10,0x0E, 0x15,0x04, 0x0F,0x01, 0x17,0x03, 0x19,0x03,  
  241.     0x19,0x01, 0x19,0x03, 0x1A,0x03, 0x19,0x03, 0x17,0x01,  
  242.     0x16,0x03, 0x16,0x03, 0x16,0x02, 0x16,0x0D, 0x17,0x03,
  243.     0x16,0x03, 0x15,0x03, 0x10,0x03, 0x10,0x0D, 0x15,0x00,
  244.     0x19,0x03, 0x19,0x03, 0x1A,0x03, 0x1F,0x03, 0x1B,0x03,  
  245.     0x1B,0x03, 0x1A,0x03, 0x17,0x0D, 0x16,0x03, 0x16,0x03,  
  246.     0x16,0x0D, 0x17,0x01, 0x17,0x03, 0x17,0x03, 0x19,0x03,  
  247.     0x1A,0x02, 0x1A,0x02, 0x10,0x03, 0x17,0x0D, 0x16,0x03,
  248.     0x16,0x01, 0x17,0x03, 0x19,0x03, 0x19,0x03, 0x17,0x03,
  249.     0x19,0x02, 0x1F,0x02, 0x1B,0x03, 0x1A,0x03, 0x1A,0x0E,
  250.     0x1B,0x04, 0x17,0x02, 0x1A,0x03, 0x1A,0x03, 0x1A,0x0E,   
  251.     0x1B,0x04, 0x1A,0x03, 0x19,0x03, 0x17,0x03, 0x16,0x03,
  252.     0x17,0x0D, 0x16,0x03, 0x17,0x03, 0x19,0x01, 0x19,0x03,
  253.     0x19,0x03, 0x1A,0x03, 0x1F,0x03, 0x1B,0x03, 0x1B,0x03,
  254.     0x1A,0x03, 0x17,0x0D, 0x16,0x03, 0x16,0x03, 0x16,0x03,
  255.     0x17,0x01, 0x17,0x03, 0x17,0x03, 0x19,0x03, 0x1A,0x02,
  256.     0x1A,0x02, 0x10,0x03, 0x17,0x0D, 0x16,0x03, 0x16,0x01,
  257.     0x17,0x03, 0x19,0x03, 0x19,0x03, 0x17,0x03, 0x19,0x03,
  258.     0x1F,0x02, 0x1B,0x03, 0x1A,0x03, 0x1A,0x0E, 0x1B,0x04,
  259.     0x17,0x02, 0x1A,0x03, 0x1A,0x03, 0x1A,0x0E, 0x1B,0x04,
  260.     0x17,0x16, 0x1A,0x03, 0x1A,0x03, 0x1A,0x0E, 0x1B,0x04,
  261.     0x1A,0x03, 0x19,0x03, 0x17,0x03, 0x16,0x03, 0x0F,0x02,
  262.     0x10,0x03, 0x15,0x00, 0x00,0x00
  263. };
  264. /*音樂歌譜每個音符由兩個字節(jié)表示，第一個字節(jié)表示音高，第二個字節(jié)表示音長
  265. 音高由三位數(shù)字組成：個位是表示 1~7 這七個音符
  266. 十位是表示音符所在的音區(qū):1-低音，2-中音，3-高音;百位表示這個音符是否要升半音: 0-不升，1-升半音。
  267. 音長最多由三位數(shù)字組成：
  268. 個位表示音符的時值，其對應(yīng)關(guān)系是：
  269. 數(shù)值(n): |0 |1 |2 |3 | 4 | 5 | 6 |
  270. 幾分音符: |1 |2 |4 |8 |16 |32 |64   
  271. 十位表示音符的演奏效果 (0-2): 0-普通，1-連音，2-頓音 百位是符點(diǎn)位: 0-無符點(diǎn)，1-有符點(diǎn)


  274. 陽歷對應(yīng)的陰歷數(shù)據(jù)，每年三字節(jié)，
  275. 格式第一字節(jié)BIT7-4位表示閏月月份，為0,則無閏月，BIT3-0對應(yīng)陰歷第1-4月的大小，
  276. 第二字節(jié)BIT7-0對應(yīng)陰歷第5-12月大小，第三字節(jié)BIT7表示陰歷第13月大小
  277. 月分對應(yīng)的位為1,表示農(nóng)歷月大（30天）為0表示小（29天）
  278. 第三字節(jié)BIT6-5表示春節(jié)的公歷月份，BIT4-0表示春節(jié)公歷日期
  279. */
  280. code unsigned char YearCode[597]=
  281. {
  282.     0x04,0xAe,0x53,    //1901 0
  283. 0x0A,0x57,0x48,    //1902 3
  284.     0x55,0x26,0xBd,    //1903 6
  285.     0x0d,0x26,0x50,    //1904 9
  286.     0x0d,0x95,0x44,    //1905 12
  287.     0x46,0xAA,0xB9,    //1906 15
  288.     0x05,0x6A,0x4d,    //1907 18
  289.     0x09,0xAd,0x42,    //1908 21
  290.     0x24,0xAe,0xB6,    //1909
  291.     0x04,0xAe,0x4A,    //1910
  292.     0x6A,0x4d,0xBe,    //1911
  293.     0x0A,0x4d,0x52,    //1912
  294.     0x0d,0x25,0x46,    //1913
  295.     0x5d,0x52,0xBA,    //1914
  296.     0x0B,0x54,0x4e,    //1915
  297.     0x0d,0x6A,0x43,    //1916
  298.     0x29,0x6d,0x37,    //1917
  299.     0x09,0x5B,0x4B,    //1918
  300. 0x74,0x9B,0xC1,    //1919
  301. 0x04,0x97,0x54,    //1920
  302.     0x0A,0x4B,0x48,    //1921
  303.     0x5B,0x25,0xBC,    //1922
  304.     0x06,0xA5,0x50,    //1923
  305.     0x06,0xd4,0x45,    //1924
  306.     0x4A,0xdA,0xB8,    //1925
  307.     0x02,0xB6,0x4d,    //1926
  308.     0x09,0x57,0x42,    //1927
  309.     0x24,0x97,0xB7,    //1928
  310.     0x04,0x97,0x4A,    //1929
  311.     0x66,0x4B,0x3e,    //1930
  312.     0x0d,0x4A,0x51,    //1931
  313.     0x0e,0xA5,0x46,    //1932
  314.     0x56,0xd4,0xBA,    //1933
  315.     0x05,0xAd,0x4e,    //1934
  316.     0x02,0xB6,0x44,    //1935
  317.     0x39,0x37,0x38,    //1936
  318.     0x09,0x2e,0x4B,    //1937
  319.     0x7C,0x96,0xBf,    //1938
  320.     0x0C,0x95,0x53,    //1939
  321.     0x0d,0x4A,0x48,    //1940
  322.     0x6d,0xA5,0x3B,    //1941
  323.     0x0B,0x55,0x4f,    //1942
  324.     0x05,0x6A,0x45,    //1943
  325.     0x4A,0xAd,0xB9,    //1944
  326.     0x02,0x5d,0x4d,    //1945
  327.     0x09,0x2d,0x42,    //1946
  328. 0x2C,0x95,0xB6,    //1947
  329.     0x0A,0x95,0x4A,    //1948
  330.     0x7B,0x4A,0xBd,    //1949
  331. 0x06,0xCA,0x51,    //1950
  332.     0x0B,0x55,0x46,    //1951
  333.     0x55,0x5A,0xBB,    //1952
  334.     0x04,0xdA,0x4e,    //1953
  335.     0x0A,0x5B,0x43,    //1954
  336.     0x35,0x2B,0xB8,    //1955
  337.     0x05,0x2B,0x4C,    //1956
  338.     0x8A,0x95,0x3f,    //1957
  339.     0x0e,0x95,0x52,    //1958
  340.     0x06,0xAA,0x48,    //1959
  341. 0x7A,0xd5,0x3C,    //1960
  342.     0x0A,0xB5,0x4f,    //1961
  343. 0x04,0xB6,0x45,    //1962
  344.   0x4A,0x57,0x39,    //1963
  345.     0x0A,0x57,0x4d,    //1964
  346.     0x05,0x26,0x42,    //1965
  347.     0x3e,0x93,0x35,    //1966
  348.     0x0d,0x95,0x49,    //1967
  349.     0x75,0xAA,0xBe,    //1968
  350.     0x05,0x6A,0x51,    //1969
  351.     0x09,0x6d,0x46,    //1970
  352.     0x54,0xAe,0xBB,    //1971
  353.     0x04,0xAd,0x4f,    //1972
  354.     0x0A,0x4d,0x43,    //1973
  355.     0x4d,0x26,0xB7,    //1974
  356.     0x0d,0x25,0x4B,    //1975
  357.     0x8d,0x52,0xBf,    //1976
  358.     0x0B,0x54,0x52,    //1977
  359.     0x0B,0x6A,0x47,    //1978
  360.     0x69,0x6d,0x3C,    //1979
  361.     0x09,0x5B,0x50,    //1980
  362.     0x04,0x9B,0x45,    //1981
  363.     0x4A,0x4B,0xB9,    //1982
  364.     0x0A,0x4B,0x4d,    //1983
  365.     0xAB,0x25,0xC2,    //1984
  366.     0x06,0xA5,0x54,    //1985
  367.     0x06,0xd4,0x49,    //1986
  368.     0x6A,0xdA,0x3d,    //1987
  369.     0x0A,0xB6,0x51,    //1988
  370.     0x09,0x37,0x46,    //1989
  371.     0x54,0x97,0xBB,    //1990
  372.     0x04,0x97,0x4f,    //1991
  373.     0x06,0x4B,0x44,    //1992
  374.     0x36,0xA5,0x37,    //1993
  375.     0x0e,0xA5,0x4A,    //1994
  376.     0x86,0xB2,0xBf,    //1995
  377.     0x05,0xAC,0x53,    //1996
  378.     0x0A,0xB6,0x47,    //1997
  379.     0x59,0x36,0xBC,    //1998
  380.     0x09,0x2e,0x50,    //1999 294
  381.     0x0C,0x96,0x45,    //2000 297
  382.     0x4d,0x4A,0xB8,    //2001 300
  383.     0x0d,0x4A,0x4C,    //2002 303
  384.     0x0d,0xA5,0x41,    //2003 306
  385.     0x25,0xAA,0xB6,    //2004 309
  386.     0x05,0x6A,0x49,    //2005 312
  387.     0x7A,0xAd,0xBd,    //2006 315
  388.     0x02,0x5d,0x52,    //2007 318
  389.     0x09,0x2d,0x47,    //2008 321
  390.     0x5C,0x95,0xBA,    //2009 324
  391.     0x0A,0x95,0x4e,    //2010 327
  392.     0x0B,0x4A,0x43,    //2011
  393.     0x4B,0x55,0x37,    //2012
  394.     0x0A,0xd5,0x4A,    //2013
  395.     0x95,0x5A,0xBf,    //2014
  396.     0x04,0xBA,0x53,    //2015
  397.     0x0A,0x5B,0x48,    //2016
  398.     0x65,0x2B,0xBC,    //2017
  399.     0x05,0x2B,0x50,    //2018
  400.     0x0A,0x93,0x45,    //2019
  401.     0x47,0x4A,0xB9,    //2020
  402.     0x06,0xAA,0x4C,    //2021
  403.     0x0A,0xd5,0x41,    //2022
  404.     0x24,0xdA,0xB6,    //2023
  405.     0x04,0xB6,0x4A,    //2024
  406.     0x69,0x57,0x3d,    //2025
  407.     0x0A,0x4e,0x51,    //2026
  408.     0x0d,0x26,0x46,    //2027
  409.     0x5e,0x93,0x3A,    //2028
  410.     0x0d,0x53,0x4d,    //2029
  411.     0x05,0xAA,0x43,    //2030
  412.     0x36,0xB5,0x37,    //2031
  413.     0x09,0x6d,0x4B,    //2032
  414.     0xB4,0xAe,0xBf,    //2033
  415.     0x04,0xAd,0x53,    //2034
  416.     0x0A,0x4d,0x48,    //2035
  417.     0x6d,0x25,0xBC,    //2036
  418.     0x0d,0x25,0x4f,    //2037
  419.     0x0d,0x52,0x44,    //2038
  420.     0x5d,0xAA,0x38,    //2039
  421.     0x0B,0x5A,0x4C,    //2040
  422.     0x05,0x6d,0x41,    //2041
  423.     0x24,0xAd,0xB6,    //2042
  424.     0x04,0x9B,0x4A,    //2043
  425.     0x7A,0x4B,0xBe,    //2044
  426.     0x0A,0x4B,0x51,    //2045
  427.     0x0A,0xA5,0x46,    //2046
  428.     0x5B,0x52,0xBA,    //2047
  429.     0x06,0xd2,0x4e,    //2048
  430.     0x0A,0xdA,0x42,    //2049
  431.     0x35,0x5B,0x37,    //2050
  432.     0x09,0x37,0x4B,    //2051
  433.     0x84,0x97,0xC1,    //2052
  434.     0x04,0x97,0x53,    //2053
  435.     0x06,0x4B,0x48,    //2054
  436.     0x66,0xA5,0x3C,    //2055
  437.     0x0e,0xA5,0x4f,    //2056
  438.     0x06,0xB2,0x44,    //2057
  439.     0x4A,0xB6,0x38,    //2058
  440. 0x0A,0xAe,0x4C,    //2059
  441.     0x09,0x2e,0x42,    //2060
  442.     0x3C,0x97,0x35,    //2061
  443.     0x0C,0x96,0x49,    //2062
  444.     0x7d,0x4A,0xBd,    //2063
  445.     0x0d,0x4A,0x51,    //2064
  446. 0x0d,0xA5,0x45,    //2065
  447.     0x55,0xAA,0xBA,    //2066
  448.     0x05,0x6A,0x4e,    //2067
  449.     0x0A,0x6d,0x43,    //2068
  450.     0x45,0x2e,0xB7,    //2069
  451. 0x05,0x2d,0x4B,    //2070
  452.     0x8A,0x95,0xBf,    //2071
  453.     0x0A,0x95,0x53,    //2072
  454.     0x0B,0x4A,0x47,    //2073
  455.     0x6B,0x55,0x3B,    //2074
  456.     0x0A,0xd5,0x4f,    //2075
  457.     0x05,0x5A,0x45,    //2076
  458.     0x4A,0x5d,0x38,    //2077
  459.     0x0A,0x5B,0x4C,    //2078
  460.     0x05,0x2B,0x42,    //2079
  461.     0x3A,0x93,0xB6,    //2080
  462.     0x06,0x93,0x49,    //2081
  463.     0x77,0x29,0xBd,    //2082
  464.     0x06,0xAA,0x51,    //2083
  465.     0x0A,0xd5,0x46,    //2084
  466.     0x54,0xdA,0xBA,    //2085
  467.     0x04,0xB6,0x4e,    //2086
  468.     0x0A,0x57,0x43,    //2087
  469.     0x45,0x27,0x38,    //2088
  470.     0x0d,0x26,0x4A,    //2089
  471.     0x8e,0x93,0x3e,    //2090
  472.     0x0d,0x52,0x52,    //2091
  473.     0x0d,0xAA,0x47,    //2092
  474.     0x66,0xB5,0x3B,    //2093
  475.     0x05,0x6d,0x4f,    //2094
  476.     0x04,0xAe,0x45,    //2095
  477.     0x4A,0x4e,0xB9,    //2096
  478.     0x0A,0x4d,0x4C,    //2097
  479.     0x0d,0x15,0x41,    //2098
  480.     0x2d,0x92,0xB5,    //2099
  481. };

  483. /******************忙檢測函數(shù)***************/
  484. void CheckBusy(void)
  485. {
  486. LCD_RS=0;
  487. LCD_RW=1;
  488. LCD_E=1;
  489. LCD_Data=0xff;
  490. while((LCD_Data&0x80)==0x80);
  491. LCD_E=0;
  492. }

  494. /**********************給LCD寫入數(shù)據(jù)*****************/
  495. void WriteDataLCD(unsigned char WDLCD)
  496. {
  497.   CheckBusy();               //檢測忙
  498.   LCD_RS = 1;                //RS為高電平，DB7----DB0為數(shù)據(jù)      
  499.   LCD_RW = 0;                //RW為低電平，E從高電平到低電平,則是把DB7----DB0的數(shù)據(jù)寫到DR或者IR
  500.   LCD_E = 1;
  501.   LCD_Data = WDLCD;          //傳送數(shù)據(jù)WDLCD
  502.   Delay(5);
  503.   LCD_E = 0;                 //E從 高電平 到 低電平
  504.   Delay(5);
  505. }

  507. /******************給LCD寫入指令**********************/
  508. void WriteCommandLCD(unsigned char WCLCD) //BuysC為0時忽略忙檢測
  509. {
  510.   CheckBusy();                //檢測忙
  511.   LCD_RS = 0;                 //RS為低，DB7----DB0為指令
  512.   LCD_RW = 0;                 //RW為低,E從高電平到低電平,則是把DB7----DB0的數(shù)據(jù)寫到DR或者IR
  513.   LCD_E = 1;
  514.   LCD_Data = WCLCD;           //傳送數(shù)據(jù)
  515.   Delay(5);
  516.   LCD_E = 0;                  //E從 高電平到低電平
  517.      Delay(5);
  518. }

  520. /***************LCD初始化******************/

  522. void LCDInit(void)
  523. {
  524.   WriteCommandLCD(0x30);     //顯示模式設(shè)置,開始要求每次檢測忙信號
  525.   WriteCommandLCD(0x01);     //顯示清屏
  526.   WriteCommandLCD(0x06);     // 顯示光標(biāo)移動設(shè)置
  527.   WriteCommandLCD(0x0C);     // 顯示開,無游標(biāo),不反白
  528. }

  530. /********************清屏***************************/
  531. void LCDClear(void)
  532. {
  533.   WriteCommandLCD(0x01);     //顯示清屏
  534.   WriteCommandLCD(0x34);     // 顯示光標(biāo)移動設(shè)置
  535.   WriteCommandLCD(0x30);     // 顯示開及光標(biāo)設(shè)置
  536. }

  538. /*****************************************/
  539. void LCDSendWord(unsigned char *p)         //向LCD發(fā)送一個字符串，
  540. {
  541. while(*p>0)                            //比如void LCDSendWord('你好');就是讓LCD顯示"你好"
  542. {
  543.   WriteDataLCD(*p);
  544.   p++;
  545. }
  546. }
  547.   
  548. /************寫數(shù)據(jù)或者指令***************/
  549. void LCDTestWord(bit i,unsigned char word)
  550. {
  551. if(i==0)
  552. {
  553.   WriteCommandLCD(word);             //i=0;則寫入指令
  554. }
  555. else
  556. {
  557.   WriteDataLCD(word);                //i=1;則寫入數(shù)據(jù)  
  558. }
  559. }

  561. void DisplayYear(void)                 //往LCD上填寫 年 數(shù)據(jù)
  562. {
  563. year=ReadDs1302(0x8d);            //從1302的0X8D處讀出年數(shù)據(jù)
  564. LCDTestWord(0,0x81);               //寫指令 0X81  在第一行第二個字符位置顯示 年 數(shù)據(jù)
  565. LCDTestWord(1,(year/16)+0x30);     //寫數(shù)據(jù)
  566. LCDTestWord(1,year%16+0x30);      //寫數(shù)據(jù)
  567. LCDTestWord(0,0x82);                //寫指令  第一行第三個字符位置
  568. LCDSendWord("年");                  //顯示 年  LCD DDRAM第一行地址為80-87,第二行為90-97,第三行為88-8F,第四行為98-9F
  569. DisplayShengXiao();
  570. }

  572. void DisplayMonth(void)                //往LCD上填寫  月 數(shù)據(jù)
  573. {
  574. month=ReadDs1302(0x89);           //從1302中讀取月份數(shù)據(jù)
  575. LCDTestWord(0,0x83);               //寫命令
  576. if(month/16!=0)
  577. {
  578.   LCDTestWord(1,(month/16)+0x30);//寫數(shù)據(jù)
  579. }
  580. else
  581. {
  582.   LCDTestWord(1,0x20);            //寫數(shù)據(jù)
  583. }
  584. LCDTestWord(1,month%16+0x30);       //寫數(shù)據(jù)  
  585. LCDTestWord(0,0x84);                //寫指令
  586. LCDSendWord("月");                  //顯示 月
  587. DisplayShengXiao();
  588. }
  589.                            
  590. void DisplayWeek(void)                  //往LCD上填寫  星期  數(shù)據(jù)
  591. {
  592. week=(ReadDs1302(0x8b))%16;             //從1302中讀取星期數(shù)據(jù)  
  593. LCDTestWord(0,0x90);
  594. LCDSendWord("星期");
  595. LCDTestWord(0,0x92);
  596. if(week==7)    {LCDSendWord("日");}
  597. if(week==6)    {LCDSendWord("六");}
  598. if(week==5)    {LCDSendWord("五");}
  599. if(week==4)    {LCDSendWord("四");}
  600. if(week==3)    {LCDSendWord("叁");}
  601. if(week==2)    {LCDSendWord("二");}
  602. if(week==1)    {LCDSendWord("一");} //顯示星期一到星期日
  603. }   

  605. void DisplayDay(void)                   //往LCD上填寫   日期  數(shù)據(jù)     
  606. {
  607. day=ReadDs1302(0x87);              //從1302中讀取日期數(shù)據(jù)
  608. LCDTestWord(0,0x85);
  609. if(day/16!=0)   
  610.   { LCDTestWord(1,(day/16)+0x30); }         
  611. else
  612.      { LCDTestWord(1,0x20);}
  613. LCDTestWord(1,day%16+0x30);
  614. LCDTestWord(0,0x86);
  615. LCDSendWord("日");
  616. DisplayShengXiao();
  617. }

  619. void DisplayHour(void)                 //往LCD上填寫  小時數(shù)據(jù)
  620. {
  621. hour=ReadDs1302(0x85);
  622. LCDTestWord(0,0x88);
  623. LCDTestWord(1,(hour/16)+0x30);
  624. LCDTestWord(1,hour%16+0x30);
  625. }

  627. void DisplayMin(void)                  //往LCD上填寫分鐘 數(shù)據(jù)   
  628. {
  629. min=ReadDs1302(0x83);
  630. LCDTestWord(0,0x89);
  631. LCDTestWord(1,0x3a);
  632. LCDTestWord(1,(min/16)+0x30);
  633. LCDTestWord(1,min%16+0x30);
  634. LCDTestWord(1,0x3a);
  635. }

  637. void DisplaySec(void)                 //住LCD上填寫  秒鐘   和溫度  數(shù)據(jù)
  638. {
  639. unsigned char i=0;
  640. unsigned int a=0,b=0,c=0;
  641. sec=ReadDs1302(0x81);
  642. LCDTestWord(0,0x8b);
  643. LCDTestWord(1,(sec/16)+0x30);
  644. LCDTestWord(1,sec%16+0x30);
  645. }
  646. void DisplayTemp(void)
  647. {
  648. unsigned int i;
  649. unsigned char a,b,c;
  650. WriteCommandLCD(0x8c);
  651. LCDTestWord(0,0x8d);
  652. TempChange();
  653. i=GetTemp();
  654. a=i/100;
  655. LCDTestWord(1,a+0x30);
  656. b=i/10-a*10;
  657. LCDTestWord(1,b+0x30);
  658. LCDTestWord(1,0x2e);
  659. c=i-a*100-b*10;
  660. LCDTestWord(1,c+0x30);
  661. LCDSendWord("℃");
  662. }

  664. /***************************寫入操作*********************/
  665. void WriteDs1302Byte(unsigned  char temp)        
  666. {
  667.     unsigned char i;
  668.     for (i=0;i<8;i++)               //循環(huán)8次 寫入數(shù)據(jù)
  669.     {
  670.         DS1302_CLK=0;
  671.         DS1302_IO=temp&0x01;      //每次傳輸?shù)妥止?jié)
  672.         temp>>=1;                //右移一位
  673.         DS1302_CLK=1;
  674.    }
  675. }  

  677. /***********************************寫入數(shù)據(jù)*****************************/
  678. void WriteDs1302( unsigned char address,unsigned char dat )     //先寫地址，再寫數(shù)據(jù)
  679. {
  680.   DS1302_RST=0;
  681. _nop_();
  682.   DS1302_CLK=0;
  683. _nop_();
  684.   DS1302_RST=1;
  685.     _nop_();                    //啟動
  686.   WriteDs1302Byte(address); //發(fā)送地址
  687.   WriteDs1302Byte(dat);  //發(fā)送數(shù)據(jù)
  688.   DS1302_RST=0;            //恢復(fù)
  689. }

  691. /****************************************************************************/
  692. unsigned char ReadDs1302(unsigned char address)        //先送地址，再讀數(shù)據(jù)
  693. {
  694.   unsigned char i,temp=0x00;
  695.   DS1302_RST=0;
  696. _nop_();
  697.   DS1302_CLK=0;
  698. _nop_();
  699.   DS1302_RST=1;
  700. _nop_();
  701.   WriteDs1302Byte(address);         //送地址函數(shù)
  702.   for (i=0;i<8;i++)               //循環(huán)8次 讀取數(shù)據(jù)
  703.   {
  704.   DS1302_CLK=1;
  705.   _nop_();
  706.    if(DS1302_IO)
  707.    temp|=0x80;               //每次傳輸?shù)妥止?jié)
  708.   DS1302_CLK=0;
  709.   temp>>=1;               //右移一位
  710. }
  711.   DS1302_RST=0;
  712. _nop_();  
  713. DS1302_CLK=1;
  714. DS1302_IO=0;
  715. return (temp);              //返回
  716. }
  717. /*****************DS1302初始化********************/
  718. void InitDS1302()                        //DS1302中秒，分，時，日期，月份，星期，年的地址分別是0x80,0x82,0x84,0x86,0x88,0x8a,0x8c
  719. {                                        //初始化寫入的時間是2010年4月1日15點(diǎn)整，星期六
  720. WriteDs1302(0x8e,0x00);             //控制命令，WP位為0，允許寫操作  控制位地址是0x8e
  721. DelayMs(5);
  722. WriteDs1302(0x8c,0x10);             //寫入年份10年
  723. DelayMs(5);
  724. WriteDs1302(0x8a,0x04);             //寫入星期6
  725.     DelayMs(5);
  726. WriteDs1302(0x88,0x05);             //定入月分 5月
  727. DelayMs(5);
  728. WriteDs1302(0x86,0x01);             //寫入日期 1日
  729. DelayMs(5);
  730. WriteDs1302(0x84,0x09);             //寫入小時 9點(diǎn)
  731. DelayMs(5);
  732. WriteDs1302(0x82,0x59);             //寫入分鐘 59分
  733. DelayMs(5);
  734. WriteDs1302(0x80,0x30);              //寫入秒  30秒
  735. DelayMs(5);
  736. WriteDs1302(0x8e,0x80);              //控制命令，WP為1,禁止寫操作
  737. }

  739. /*************************************************************************/

  741. void delayb(unsigned int count)   //delay
  742. {
  743.     unsigned char i;
  744.     while(count)
  745.     {
  746.        i=200;
  747.        while(i>0)
  748.        i--;
  749.        count--;
  750.     }
  751. }

  753. void DS18B20Init(void)          //DS18B20初始化
  754. {
  755. unsigned int i;               
  756. DS18B20=0;
  757. i=103;
  758. while(i>0)i--;
  759. DS18B20=1;
  760. i=4;
  761. while(i>0)i--;
  762. }

  764. bit TempReadBit(void)          // 讀一位
  765. {
  766. unsigned int i;
  767.     bit dat;
  768.     DS18B20=0;i++;             //小延時一下
  769.     DS18B20=1;i++;i++;
  770.     dat=DS18B20;
  771.     i=8;while(i>0)i--;
  772.     return (dat);
  773. }

  775. unsigned char TempRead(void)   //讀一個字節(jié)
  776. {
  777. unsigned char i,j,dat;
  778.     dat=0;
  779.     for(i=1;i<=8;i++)
  780.     {
  781.      j=TempReadBit();
  782.      dat=(j<<7)|(dat>>1); //讀出的數(shù)據(jù)最低位在最前面，這樣剛好一個字節(jié)在DAT里
  783.     }
  784.     return(dat);             //將一個字節(jié)數(shù)據(jù)返回
  785. }

  787. void TempWriteByte(unsigned char dat)  
  788. {                           //寫一個字節(jié)到DS18B20里
  789. unsigned int i;
  790.     unsigned char j;
  791.     bit testb;
  792.     for(j=1;j<=8;j++)
  793.     {
  794.      testb=dat&0x01;
  795.      dat=dat>>1;
  796.      if(testb)          // 寫1部分
  797.      {
  798.          DS18B20=0;
  799.          i++;i++;
  800.          DS18B20=1;
  801.          i=8;while(i>0)i--;
  802.         }
  803.      else
  804.      {
  805.          DS18B20=0;       //寫0部分
  806.          i=8;while(i>0)i--;
  807.          DS18B20=1;
  808.          i++;i++;
  809.         }
  810.     }
  811. }

  813. void TempChange(void)  //發(fā)送溫度轉(zhuǎn)換命令
  814. {
  815. DS18B20Init();             //初始化DS18B20
  816.     delayb(1);             //延時
  817.     TempWriteByte(0xcc);  // 跳過序列號命令
  818.     TempWriteByte(0x44);  //發(fā)送溫度轉(zhuǎn)換命令
  819. }

  821. int GetTemp()               //獲得溫度
  822. {
  823. float tt;
  824.     unsigned char a,b;
  825.     DS18B20Init();
  826.     delayb(1);
  827.     TempWriteByte(0xcc);  
  828.     TempWriteByte(0xbe);    //發(fā)送讀取數(shù)據(jù)命令
  829.     a=TempRead();           //連續(xù)讀兩個字節(jié)數(shù)據(jù)
  830.     b=TempRead();
  831.     temp=b;
  832.     temp<<=8;            
  833.     temp=temp|a;            //兩字節(jié)合成一個整型變量。
  834.     tt=temp*0.0625;         //得到真實(shí)十進(jìn)制溫度值，因?yàn)镈S18B20 可以精確到0.0625度，所以讀回數(shù)據(jù)的最低位代表的是0.0625度。                     
  835.     temp=tt*10+0.5;         //放大十倍，這樣做的目的將小數(shù)點(diǎn)后第一位 也轉(zhuǎn)換為可顯示數(shù)字，同時進(jìn)行一個四舍五入操作。                          
  836.     return temp;            //返回溫度值
  837. }

  839. code unsigned char DayCode1[9]={0x00,0x1f,0x3b,0x5a,0x78,0x97,0xb5,0xd4,0xf3};
  840. code unsigned int DayCode2[3]={0x111,0x130,0x14e};                           
  841. //計算公歷日離當(dāng)年元旦的天數(shù),為了減少運(yùn)算,用了兩個表   DayCode1[9],DayCode2[3]
  842. //如果公歷月在九月或前,天數(shù)會少于0xff,用表DayCode1[9],在九月后,天數(shù)大于0xff,用表DayCode2[3]
  843. //如輸入公歷日為8月10日,則公歷日離元旦天數(shù)為DayCode1[8-1]+10-1,如輸入公歷日為11月10日,則公歷日離元旦天數(shù)為DayCode2[11-10]+10-1
  844. /*讀取數(shù)據(jù)表中農(nóng)歷月的大月或小月,如果該月為大返回1,為小返回0*/
  845. bit GetMoonDay(unsigned char LunarMonth,unsigned int TableAddr)
  846. {
  847. unsigned char temp;
  848.     switch (LunarMonth)                       //LunarMonth指向農(nóng)歷月份
  849. {
  850.         case 1:
  851.   {
  852.    temp=YearCode[TableAddr]&0x08;    //1月，對應(yīng)年份表里第一字節(jié)的BIT3位，如果是1,則月大，如果是0,則月小
  853.             if (temp==0) return(0);        //為0,月小  
  854.    else  return(1);                //為1,月大
  855.   }
  856.         case 2:
  857.   {
  858.    temp=YearCode[TableAddr]&0x04;    //2月，對應(yīng)年份表里第一字節(jié)的BIT2位，如果是1,則月大，如果是0,則月小
  859.             if (temp==0) return(0);        //為0,月小
  860.    else  return(1);                //為1,月大
  861.   }
  862.         case 3:
  863.   {
  864.    temp=YearCode[TableAddr]&0x02;    //3月，對應(yīng)第一字節(jié)的BIT1位，如果是1,則月大，如果是0,則月小
  865.             if (temp==0) return(0);        //為0,月小
  866.    else  return(1);                //為1,月大
  867.   }
  868.         case 4:
  869.   {
  870.    temp=YearCode[TableAddr]&0x01;    //1月，對應(yīng)第一字節(jié)的BIT0位，如果是1,則月大，如果是0,則月小
  871.             if (temp==0) return(0);
  872.    else return(1);
  873.   }
  874.         case 5:
  875.   {
  876.    temp=YearCode[TableAddr+1]&0x80;  //5月，對應(yīng)第二字節(jié)的BIT7位，如果是1,則月大，如果是0,則月小
  877.             if (temp==0)  return(0);
  878.    else  return(1);
  879.   }
  880.         case 6:
  881.   {
  882.    temp=YearCode[TableAddr+1]&0x40;  //6月，對應(yīng)第二字節(jié)的BIT6位，如果是1,則月大，如果是0,則月小
  883.             if (temp==0) return(0);
  884.    else  return(1);
  885.   }
  886.         case 7:
  887.   {
  888.    temp=YearCode[TableAddr+1]&0x20;  //7月，對應(yīng)第二字節(jié)的BIT5位，如果是1,則月大，如果是0,則月小
  889.             if (temp==0) return(0);
  890.    else  return(1);
  891.   }
  892.         case 8:
  893.   {
  894.    temp=YearCode[TableAddr+1]&0x10;  //8月，對應(yīng)第二字節(jié)的BIT4位，如果是1,則月大，如果是0,則月小
  895.             if (temp==0) return(0);
  896.    else  return(1);
  897.   }
  898.         case 9:
  899.   {
  900.    temp=YearCode[TableAddr+1]&0x08;  //9月，對應(yīng)第二字節(jié)的BIT3位，如果是1,則月大，如果是0,則月小
  901.             if (temp==0) return(0);
  902.    else  return(1);
  903.   }
  904.         case 10:
  905.   {
  906.    temp=YearCode[TableAddr+1]&0x04;  //10月，對應(yīng)第二字節(jié)的BIT2位，如果是1,則月大，如果是0,則月小
  907.             if (temp==0) return(0);
  908.    else  return(1);
  909.   }
  910.         case 11:
  911.   {
  912.    temp=YearCode[TableAddr+1]&0x02;  //11月，對應(yīng)第二字節(jié)的BIT1位，如果是1,則月大，如果是0,則月小
  913.             if (temp==0) return(0);
  914.    else  return(1);
  915.   }
  916.         case 12:
  917.   {
  918.    temp=YearCode[TableAddr+1]&0x01;  //12月，對應(yīng)第二字節(jié)的BIT0位，如果是1,則月大，如果是0,則月小
  919.             if (temp==0) return(0);
  920.    else  return(1);
  921.   }
  922.         case 13:
  923.   {
  924.    temp=YearCode[TableAddr+2]&0x80;  //13月，對應(yīng)第三字節(jié)的BIT7位，如果是1,則月大，如果是0,則月小
  925.             if (temp==0) return(0);
  926.    else  return(1);
  927.   }
  928.     }
  929. }

  931. void Conversion(bit cenbit,unsigned char year,unsigned char month,unsigned char day)
  932.                              //cenbit=0為21世紀(jì),cenbit=1為20世紀(jì),輸入輸出數(shù)據(jù)均為BCD數(shù)據(jù)
  933. {                        
  934.     unsigned char temp1,temp2,temp3,MonthP;//temp3,temp4分別表示春節(jié)距元旦的天數(shù)，公歷日離元旦的天數(shù)
  935.     unsigned int temp4,TableAddr;
  936.     bit flag2,flag_y;
  937.     temp1=year/16;           //BCD->hex 先把數(shù)據(jù)轉(zhuǎn)換為十六進(jìn)制  高位
  938.     temp2=year%16;           //低位
  939.     year=temp1*10+temp2;     //把 年 數(shù)據(jù) 轉(zhuǎn)換成16進(jìn)制
  940.     temp1=month/16;          //月份 高位
  941.     temp2=month%16;          //月份 低位
  942.     month=temp1*10+temp2;    //把 月 數(shù)據(jù) 轉(zhuǎn)換成16進(jìn)制
  943.     temp1=day/16;            //日期 高位
  944.     temp2=day%16;            //日期 低位
  945.     day=temp1*10+temp2;      //把 日 數(shù)據(jù) 轉(zhuǎn)換成16進(jìn)制
  946.     if(cenbit==0)                           //如果是21世紀(jì)
  947. {                  
  948.         TableAddr=(year+0x64-1)*0x03;       //定位數(shù)據(jù)表地址  year對應(yīng)的年份表中的地址是(year+99)*3 如2010年 其地址是327
  949.   LCDTestWord(0,0x80);
  950.   LCDSendWord("20");
  951.     }
  952.     else                                    //如果是20世紀(jì)
  953. {
  954.         TableAddr=(year-1)*0x03;            //定位數(shù)據(jù)表地址  year對應(yīng)的年份表中的地址是(year-1)*3  如1901年 其地址是3
  955.   LCDTestWord(0,0x80);
  956.   LCDSendWord("19");
  957.     }
  958.     temp1=YearCode[TableAddr+2]&0x60;       //取當(dāng)年春節(jié)所在的公歷月份   年份表中第三字節(jié)BIT6-5表示春節(jié)的公歷月份
  959.     temp1=_cror_(temp1,5);                  //循環(huán)右移5位，得到 春節(jié)所在的公歷月份
  960.     temp2=YearCode[TableAddr+2]&0x1f;       //取當(dāng)年春節(jié)所在的公歷日    年份表中第三字節(jié)BIT4-0表示當(dāng)年春節(jié)所在的公歷日
  961.     if(temp1==0x01)                         // 計算當(dāng)年春年離當(dāng)年元旦的天數(shù),春節(jié)只會在公歷1月或2月   
  962.         temp3=temp2-1;                      //假如春節(jié)在公歷1月，則元旦離春節(jié)的天數(shù)為  temp2-1 天
  963.     else
  964.         temp3=temp2+0x1f-1;                 //假如春節(jié)在公歷2月，則無理離春節(jié)的天數(shù)為  temp2+0x1f-1 天
  965.     if (month<10)
  966.         temp4=DayCode1[month-1]+day-1;      //0到8月某日距元旦的天數(shù)
  967.     else
  968.         temp4=DayCode2[month-10]+day-1;     //9月開始的某一天距元旦的天數(shù)
  969.     if ((month>0x02)&&(year%0x04==0))       //如果公歷月大于2月并且該年的2月為閏月,天數(shù)加1
  970.         temp4+=1;
  971.                                          //計算機(jī)出公歷日距元旦的天數(shù)和春節(jié)距元旦的天數(shù)，則是為了比較公歷日是在春節(jié)前還是春節(jié)后
  972.                                          //如果temp3>temp4  則 公歷日在春節(jié)之前
  973.     if (temp4>=temp3)                       //公歷日在春節(jié)后或就是春節(jié)當(dāng)日使用下面代碼進(jìn)行運(yùn)算
  974. {   
  975.         temp4-=temp3;                       //公歷日離春節(jié)的天數(shù)  因?yàn)楣珰v日在春節(jié)后  所以為temp4-temp3
  976.         month=0x01;
  977.         MonthP=0x01;                        //LunarMonth為月份指向,公歷日在春節(jié)前或就是春節(jié)當(dāng)日LunarMonth指向首月
  978.         flag2=GetMoonDay(MonthP,TableAddr); //檢查該農(nóng)歷月為大小還是小月,大月返回1,小月返回0
  979.         flag_y=0;
  980.         if(flag2==0)                            //GetMoonDay()函數(shù)返回的是0
  981.    {temp1=0x1d;}                       //小月29天
  982.         else                                    //GetMoonDay()函數(shù)返回的是1
  983.    {temp1=0x1e;}                       //大月30天
  984.         temp2=YearCode[TableAddr]&0xf0;         //年份數(shù)據(jù)表中第1字節(jié)BIT7-4為閏月，為0則這年無閏月，如為1,表示有閏月
  985.         temp2=_cror_(temp2,4);                  //從數(shù)據(jù)表中取該年的閏月月份,如為0，則該年無閏月  BIT3-0表示陰歷1到4月的大小 1為大 0 為小
  986.         while(temp4>=temp1)
  987.   {
  988.             temp4-=temp1;
  989.             MonthP+=1;
  990.             if(month==temp2)
  991.    {
  992.              flag_y=~flag_y;
  993.              if(flag_y==0)  {month+=1;}
  994.             }
  995.             else
  996.       {
  997.     month+=1;
  998.    }
  999.             flag2=GetMoonDay(MonthP,TableAddr);
  1000.             if(flag2==0)
  1001.    {
  1002.     temp1=0x1d;
  1003.    }
  1004.             else
  1005.    {
  1006.     temp1=0x1e;
  1007.    }
  1008.         }
  1009.         day=temp4+1;
  1010.     }
  1011.     else
  1012. {  //公歷日在春節(jié)前使用下面代碼進(jìn)行運(yùn)算
  1013.         temp3-=temp4;                          //公歷日離春節(jié)的天數(shù)  因?yàn)楣珰v日在春節(jié)前  所以為temp3-temp4
  1014.         if (year==0x00){year=0x63;cenbit=1;}
  1015.         else year-=1;
  1016.         TableAddr-=0x03;
  1017.         month=0x0c;
  1018.         temp2=YearCode[TableAddr]&0xf0;    //格式第一字節(jié)BIT7-4位表示閏月月份，為0,則無閏月，BIT3-0對應(yīng)陰歷第1-4月的大小，
  1019.         temp2=_cror_(temp2,4);
  1020.         if (temp2==0)MonthP=0x0c;
  1021.         else MonthP=0x0d; //
  1022.         /* MonthP為月份指向,如果當(dāng)年有閏月,一年有十三個月,月指向13,無閏月指向12*/
  1023.         flag_y=0;
  1024.         flag2=GetMoonDay(MonthP,TableAddr);
  1025.         if(flag2==0)temp1=0x1d;
  1026.         else temp1=0x1e;
  1027.         while(temp3>temp1)
  1028.   {
  1029.             temp3-=temp1;
  1030.             MonthP-=1;
  1031.             if(flag_y==0)month-=1;
  1032.             if(month==temp2)flag_y=~flag_y;
  1033.             flag2=GetMoonDay(MonthP,TableAddr);
  1034.             if(flag2==0)temp1=0x1d;
  1035.             else temp1=0x1e;
  1036.          }
  1037.         day=temp1-temp3+1;
  1038.     }
  1039.     c_moon=cenbit;               
  1040.     temp1=year/10;
  1041.     temp1=_crol_(temp1,4);
  1042.     temp2=year%10;
  1043.     LunarYear=temp1|temp2;

  1045.     temp1=month/10;
  1046.     temp1=_crol_(temp1,4);
  1047.     temp2=month%10;
  1048.     LunarMonth=temp1|temp2;

  1050.     temp1=day/10;
  1051.     temp1=_crol_(temp1,4);
  1052.     temp2=day%10;
  1053.     LunarDay=temp1|temp2;
  1054. }

  1056. void DisplayShengXiao(void)
  1057. {
  1058. unsigned char LunarYearD,ReYear;        //農(nóng)歷年份的十進(jìn)制數(shù)  和取模后的余數(shù)
  1059. if(cen==0x19)  {cenbit=1;}
  1060. if(cen==0x20)  {cenbit=0;}
  1061.   Conversion(cenbit,year,month,day);       //將公歷日期轉(zhuǎn)換成農(nóng)歷
  1062. LCDTestWord(0,0x94);                     //顯示在LCD的0X94位置上
  1063. LCDTestWord(1,LunarYear/16+0x30);        //農(nóng)歷年十位
  1064.   LCDTestWord(1,LunarYear%16+0x30);        //農(nóng)歷年個位
  1065.   LCDTestWord(1,'-');                      //用-隔開
  1066.   LCDTestWord(1,LunarMonth/16+0x30);       //農(nóng)歷月十位
  1067.   LCDTestWord(1,LunarMonth%16+0x30);       //農(nóng)歷月個位  
  1068.   LCDTestWord(1,'-');
  1069.   LCDTestWord(1,LunarDay/16+0x30);         //農(nóng)歷日十位
  1070.   LCDTestWord(1,LunarDay%16+0x30);         //農(nóng)歷日個位
  1071.   LunarYearD=(LunarYear/16)*10+LunarYear%16;        //農(nóng)歷年轉(zhuǎn)換成10進(jìn)制數(shù)
  1072.   ReYear=LunarYearD%12;                             //農(nóng)歷年模12,取余運(yùn)算
  1073.   switch(ReYear)
  1074.   {
  1075.   case 0: LCDTestWord(0,0x93);LCDSendWord("龍");break;   //余0即整除 農(nóng)歷 龍年
  1076.   case 1: LCDTestWord(0,0x93);LCDSendWord("蛇");break;   //蛇年
  1077.      case 2: LCDTestWord(0,0x93);LCDSendWord("馬");break;
  1078.   case 3: LCDTestWord(0,0x93);LCDSendWord("羊");break;
  1079.   case 4: LCDTestWord(0,0x93);LCDSendWord("猴");break;
  1080.   case 5: LCDTestWord(0,0x93);LCDSendWord("雞");break;
  1081.   case 6: LCDTestWord(0,0x93);LCDSendWord("狗");break;
  1082.   case 7: LCDTestWord(0,0x93);LCDSendWord("豬");break;
  1083.   case 8: LCDTestWord(0,0x93);LCDSendWord("鼠");break;
  1084.      case 9: LCDTestWord(0,0x93);LCDSendWord("牛");break;
  1085.   case 10:LCDTestWord(0,0x93);LCDSendWord("虎");break;
  1086.   case 11:LCDTestWord(0,0x93);LCDSendWord("兔");break;
  1087. }
  1088. }
  1089. /***************節(jié)假日提示********************/

  1091. void Holidays(void)
  1092. {
  1093. LCDTestWord(0,0x98);

  1095. if(LunarMonth==0x01 && LunarDay==0x01)       {LCDSendWord("春節(jié)快樂        ");}
  1096. if(LunarMonth==0x01 && LunarDay==0x05)       {LCDSendWord("姐姐的生日      ");}
  1097. if(LunarMonth==0x01 && LunarDay==0x15)       {LCDSendWord("元宵節(jié)快樂      ");}
  1098. if(LunarMonth==0x05 && LunarDay==0x05)       {LCDSendWord("端午節(jié)快樂      ");}
  1099. if(LunarMonth==0x06 && LunarDay==0x26)       {LCDSendWord("佳燕的生日      ");}
  1100. if(LunarMonth==0x07 && LunarDay==0x07)       {LCDSendWord("中國情人節(jié)      ");}
  1101. if(LunarMonth==0x08 && LunarDay==0x15)       {LCDSendWord("中秋節(jié)快樂      ");}
  1102. if(LunarMonth==0x09 && LunarDay==0x01)       {LCDSendWord("嘿嘿，又長大了  ");}
  1103. if(LunarMonth==0x09 && LunarDay==0x03)       {LCDSendWord("侄子的生日      ");}
  1104. if(LunarMonth==0x09 && LunarDay==0x09)       {LCDSendWord("重陽節(jié)          ");}
  1105. if(LunarMonth==0x09 && LunarDay==0x30)       {LCDSendWord("媽媽的生日      ");}
  1106. if(LunarMonth==0x12 && LunarDay==0x08)       {LCDSendWord("臘八節(jié)          ");}
  1107. if(LunarMonth==0x12 && LunarDay==0x15)       {LCDSendWord("過小年啦        ");}
  1108. if(LunarMonth==0x12 && LunarDay==0x27)       {LCDSendWord("爸爸的生日      ");}
  1109. if(LunarMonth==0x12 && LunarDay==0x29)       {LCDSendWord("臘月二十九      ");}
  1110. if(LunarMonth==0x12 && LunarDay==0x30)       {LCDSendWord("除夕夜到了      ");}     //以上是農(nóng)歷節(jié)日，以下是公歷節(jié)日
  1111. if(month==0x01 && day==0x01)     {LCDSendWord("元旦節(jié)快樂      ");}   
  1112. if(month==0x02 && day==0x02)  {LCDSendWord("世界濕地日      ");}
  1113. if(month==0x02 && day==0x10)  {LCDSendWord("世界氣象日      ");}
  1114. if(month==0x03 && day==0x08)  {LCDSendWord("國際婦女節(jié)      ");}
  1115. if(month==0x03 && day==0x12)  {LCDSendWord("中國植樹節(jié)      ");}
  1116. if(month==0x03 && day==0x15)  {LCDSendWord("消費(fèi)者權(quán)益日    ");}
  1117. if(month==0x03 && day==0x22)  {LCDSendWord("世界水日        ");}     
  1118. if(month==0x04 && day==0x01)  {LCDSendWord("愚人節(jié)快樂      ");}
  1119. if(month==0x04 && day==0x05)  {LCDSendWord("中國清明節(jié)      ");}
  1120. if(month==0x04 && day==0x22)  {LCDSendWord("世界地球日      ");}
  1121. if(month==0x05 && day==0x01)  {LCDSendWord("國際勞動節(jié)      ");}
  1122. if(month==0x05 && day==0x04)  {LCDSendWord("中國青年節(jié)      ");}
  1123. if(month==0x05 && day==0x12)  {LCDSendWord("世界護(hù)士節(jié)      ");}
  1124. if(month==0x06 && day==0x01)  {LCDSendWord("國際兒童節(jié)      ");}
  1125. if(month==0x06 && day==0x05)  {LCDSendWord("世界環(huán)境日      ");}
  1126. if(month==0x06 && day==0x06)  {LCDSendWord("國際愛眼日      ");}
  1127. if(month==0x06 && day==0x25)  {LCDSendWord("世界土地日      ");}
  1128. if(month==0x06 && day==0x26)  {LCDSendWord("國際禁毒日      ");}   
  1129. if(month==0x07 && day==0x01)  {LCDSendWord("香港回歸日      ");}   
  1130. if(month==0x08 && day==0x01)  {LCDSendWord("中國建軍節(jié)      ");}
  1131. if(month==0x09 && day==0x10)  {LCDSendWord("中國老師節(jié)      ");}
  1132. if(month==0x09 && day==0x18)  {LCDSendWord("九一八事件紀(jì)念日");}
  1133. if(month==0x10 && day==0x01)  {LCDSendWord("中國國慶節(jié)      ");}
  1134. if(month==0x10 && day==0x04)  {LCDSendWord("世界動物日      ");}
  1135. if(month==0x10 && day==0x09)  {LCDSendWord("世界郵政日      ");}
  1136. if(month==0x10 && day==0x10)  {LCDSendWord("辛亥革命紀(jì)念日  ");}  
  1137. if(month==0x12 && day==0x20)  {LCDSendWord("澳門回歸紀(jì)念日  ");}
  1138. if(month==0x12 && day==0x24)  {LCDSendWord("平安夜          ");}
  1139. if(month==0x12 && day==0x25)  {LCDSendWord("圣誕節(jié)          ");}
  1140.     else    LCDSendWord("入云龍小白");
  1141. }
  1142. void UpDate(void)
  1143. {
  1144. DisplayYear();     //顯示年
  1145. DisplayMonth();    //顯示月
  1146. DisplayDay();    //顯示日
  1147. DisplayWeek();    //顯示星期
  1148. DisplayHour();    //顯示時
  1149. DisplayMin();    //顯示分
  1150. DisplaySec();    //顯示秒
  1151. DisplayShengXiao();
  1152. }
  1153. void SetTime(unsigned char count)
  1154. {
  1155. unsigned char address,item;
  1156. unsigned char max,mini;
  1157. LCDTestWord(0,0x98);
  1158. LCDSendWord("調(diào)整");
  1159. if(count==6)  {LCDSendWord("秒鐘      ");address=0x81; max=59;mini=0;}
  1160. if(count==5)  {LCDSendWord("分鐘      ");address=0x83; max=59;mini=0;}
  1161. if(count==4)  {LCDSendWord("小時      ");address=0x85; max=23;mini=0;}
  1162. if(count==3)  {LCDSendWord("星期      ");address=0x8b; max=7;mini=1;}
  1163. if(count==2)  {LCDSendWord("日期      ");address=0x87; max=31; mini=1;}
  1164. if(count==1)  {LCDSendWord("月份      ");address=0x89; max=12;mini=1;}
  1165. if(count==0)  {LCDSendWord("年份      ");address=0x8d; max=99;mini=0;}
  1166. item=ReadDs1302(address);//讀取DS1302某地址上的數(shù)值賦給item  
  1167. item=(item/16)*10+item%16;
  1168. if(PlusKey==0)       //PlusKey-加
  1169.   item++;          //數(shù)加 1
  1170. if(ReduceKey==0)     //ReduceKey-減
  1171.   item--;          //數(shù)減 1
  1172. if(item>max)
  1173.   item=mini;       //查看數(shù)值有效范圍  
  1174. if(item<mini)
  1175.   item=max;
  1176. WriteDs1302(0x8e,0x00);
  1177. item=(item/10)*16+item%10;
  1178. WriteDs1302(address-1,item); //將調(diào)整好的item值寫入DS1302
  1179.     UpDate();
  1180. }

  1182. void Key(void)
  1183. {

  1185. if (SetKey==0)           // 設(shè)置時間
  1186. {
  1187.     DelayMs(10);         //按鍵消抖   
  1188.   if(SetKey==0&&w==0)  //當(dāng)是正常狀態(tài)時就進(jìn)入調(diào)時狀態(tài)
  1189.   {
  1190.    w=1;          //進(jìn)入調(diào)時   
  1191.    SetTime(next);   //調(diào)整   
  1192.   }
  1193.   if(SetKey==0&&w==1)  //當(dāng)是調(diào)時狀態(tài) 本鍵用于調(diào)整下一項(xiàng)
  1194.   {
  1195.    next++;
  1196.    if(next>=7)   {next= 0;}
  1197.    SetTime(next);   //調(diào)整   
  1198.   }
  1199.      while(SetKey==0);    //等待鍵松開
  1200. }
  1201. if(SureKey==0)           // 當(dāng)在調(diào)時狀態(tài)時就退出調(diào)時
  1202.     {
  1203.   DelayMs(10);         //按鍵消抖
  1204.   if(SureKey==0&&w==1)
  1205.   {
  1206.    w=0;next=0;
  1207.    Holidays();
  1208.   }
  1209.   while(SureKey==0);   //等待鍵松開
  1210. }
  1211. if (PlusKey==0)          //加調(diào)整
  1212. {
  1213.      DelayMs(10);         //按鍵消抖
  1214.      if(PlusKey==0&&w==1)
  1215.   {   
  1216.    SetTime(next);   //調(diào)整
  1217.   }
  1218.   while(PlusKey==0);       //等待鍵松開
  1219. }

  1221. if (ReduceKey==0)        //減調(diào)整
  1222. {        
  1223.      DelayMs(10);         //按鍵消抖
  1224.      if(ReduceKey==0&&w==1)
  1225.   {   
  1226.    SetTime(next);   //調(diào)整
  1227.   }  
  1228.   while(ReduceKey==0);     //等待鍵松開
  1229. }  
  1230. }

  1232. void DelayMs(unsigned int a)        //延時 1MS/次
  1233. {
  1234. unsigned char i;
  1235. while(--a!=0)
  1236. {
  1237.   for(i=0;i<125;i++)
  1238.   ;
  1239. }
  1240. }

  1242. void Delay(unsigned char num)               
  1243. {
  1244. while(num--)
  1245. ;
  1246. }

  1248. void main()
  1249. {
  1250. SetKey=1;
  1251. SureKey=1;
  1252. PlusKey=1;
  1253. ReduceKey=1;
  1254. PSB=1;
  1255. next=0;
  1256. LCDInit();
  1257. LCDClear();
  1258. //InitDS1302();
  1259. InitialSound();
  1260. while(1)                        
  1261. {
  1262. if(w==0)
  1263. {
  1264.   DisplayYear();     //顯示年
  1265.   DisplayMonth();    //顯示月
  1266.   DisplayDay();    //顯示日
  1267.   DisplayWeek();    //顯示星期
  1268.   DisplayHour();    //顯示時
  1269.   DisplayMin();    //顯示分
  1270.   DisplaySec();    //顯示秒
  1271.   Holidays();        //顯示節(jié)日
  1272.   DisplayTemp();     //顯示溫度
  1273.   }
  1274.   Key();
  1275.   if(min==0&&sec==0)
  1276.   {
  1277.    
  1278.    if(LunarMonth==9&&LunarDay==1)
  1279.    {
  1280.     PlayMusic(HappyBirthday,0,3,300);
  1281.    }
  1282.    else
  1283.    {
  1284.     SpeakerDiDi();
  1285.    }
  1286.   }
  1287. }
  1288. }
復(fù)制代碼




作者: 1433633039    時間: 2016-3-19 17:42
可有仿真圖？
作者: whengfu    時間: 2016-3-31 14:38
謝謝樓主開源，這么完整的萬年歷代碼，我等學(xué)習(xí)了
作者: D_anJF00    時間: 2016-12-22 20:23
可有仿真圖



歡迎光臨 (http://www.zg4o1577.cn/bbs/) Powered by Discuz! X3.1
主站蜘蛛池模板： 亚洲午夜av久久乱码 | 日本午夜在线视频 | 视频一区在线观看 | 精品成人在线 | 黄视频国产| 国产在线精品一区二区三区 | 国产成人精品免费视频大全最热 | 色黄视频在线 | 日本免费在线观看视频 | 亚洲国产成人精品久久久国产成人一区 | 一级黄色片毛片 | 一级做a爰片久久毛片 | 久久久久久久久久久久亚洲 | 精品一区二区三区在线视频 | 国产精品高 | 成人精品一区二区 | 国产精品 欧美精品 | 91久久精品一区二区二区 | 欧美一级免费看 | 日本一区二区视频 | 国产免费一区 | 久久69精品久久久久久久电影好 | 国产精品久久久99 | 蜜桃久久 | 91p在线观看| 午夜成人免费视频 | 国产精品一区二区三区久久久 | 日韩在线免费 | 久久久性色精品国产免费观看 | 国产精品久久久久久久久免费桃花 | 久久亚洲综合 | 国产一区二区三区在线免费 | 国产精品区二区三区日本 | 日韩在线高清 | 亚洲天堂一区二区 | 中国美女撒尿txxxxx视频 | 美女黄网站视频免费 | 欧美中文字幕一区二区三区 | 色毛片 | 一级毛片免费 | 欧美一区二区视频 |