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

 找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 4725|回復: 10
收起左側

哪位大神幫我看一下這個單片機程序，按鍵不起作用

[復制鏈接]
ID:61140 發表于 2018-6-10 16:06 | 顯示全部樓層 |閱讀模式
這個程序是我從網上下載的，因為它是用普通51單片機的，但我用的STC12C5A60S2，所以改了延時能用了，但是現在按鍵調整時間不管用，有沒有大神幫我看一下問題出在哪。
  1. #include<stc12c5a60s2.h>
  2. #include<intrins.h>
  3. #define SoundSpace 3/4   
  4. unsigned char sec,min,hour,day,month,year,cen,week;  //秒，分，小時，公歷日期，月份，年份，世紀，星期
  5. unsigned char LunarMonth,LunarDay,LunarYear;         //陰歷日期，月份，年份
  6. bit c_moon;                                          //大小月標志位                                          
  7. bit cenbit=0;                                          //世紀標志，為1,則表示20世紀，為0,則表示21世紀
  8. bit w;                                               //調時狀態標志位
  9. unsigned char next;
  10. /**********定義LCD12864的數據線和相關函數*************/
  11. sbit LCD_RS=P1^1;        //模式位，低電平輸入指令，高電平輸入數據
  12. sbit LCD_RW=P1^0;        //讀寫位，低電平讀，高電平寫
  13. sbit LCD_E=P4^2;         //LCD12864使能位，低電平無效，高電平使能
  14. //sbit PSB=P1^4;
  15. #define Busy 0x80
  16. #define LCD_Data P0     //LCD12864的8位數據總線，單片機的P0端口
  17. void WriteDataLCD(unsigned char WDLCD);          //給LCD12864寫數據
  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發送一個字符串
  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上顯示節日
  32. /*********定義時間芯片DS1302的數據線及相關函數***********/
  33. sbit DS1302_CLK=P2^5;         //DS1302的時鐘信號線   
  34. sbit DS1302_IO=P2^6;          //DS1302的數據端口線
  35. sbit DS1302_RST=P2^7;         //DS1302的片選信號線
  36. void WriteDs1302byte(unsigned char temp);                    //給DS1302寫一個字節
  37. void WriteDs1302(unsigned char address,unsigned char dat);  //給DS1302寫入時間，先確定地址，再確定要寫入的數據
  38. unsigned char ReadDs1302(unsigned char address);           //讀取DS1302的數據
  39. void InitDS1302();
  40. /**********定義溫度傳感器DS18B20的數據線和相關函數*************/
  41. sbit DS18B20=P4^4;                        //DS18B20的數據線
  42. int temp;
  43. void DS18B20Init(void);                   //DS18B20初始化函數
  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. /**********定義開關按鍵,及蜂鳴器的數據線************/
  56. sbit SetKey=P1^4;       //按鍵功能：設置
  57. sbit SureKey=P1^5;      //按鍵功能：確認
  58. sbit PlusKey=P1^6;      //按鍵功能：加
  59. sbit ReduceKey=P1^7;    //按鍵功能：減
  60. void Key(void);

  62. #define Fosc 24000000      //定義晶振頻率24000000HZ
  63. #define jiepai 3/4         //定義普通音符演奏的長度分率,每4分音符間隔
  64. sbit Speaker=P3^0;         //定義輸出管腳

  66. unsigned int code FreTab[12]={262,277,294,311,330,349,369,392,415,440,466,494};  //C調歌曲12個半音的頻率
  67. unsigned char code PositTab[7]={0,2,4,5,7,9,11};                                   //1~7在頻率表中的位置
  68. unsigned char code LengthTab[7]={1,2,4,8,16,32,64};                       
  69. unsigned char SoundTempTH0,SoundTempTL0;    //音符定時器初值暫存
  70. unsigned char SoundTempTH1,SoundTempTL1;    //音長定時器初值暫存
  71. void SpeakerDiDi(void);
  72. void SpeakerDiDi(void)
  73. {
  74. unsigned char i;  //整點報時延時
  75. for(i=0;i<3;i++)
  76. {
  77.   Speaker=0;
  78.   DelayMs(800);
  79.   Speaker=1;
  80.   DelayMs(800);
  81. }
  82. DelayMs(4000);
  83. for(i=0;i<3;i++)
  84. {
  85.   Speaker=0;
  86.   DelayMs(800);
  87.   Speaker=1;
  88.   DelayMs(800);
  89. }
  90. DelayMs(4000);
  91. for(i=0;i<2;i++)
  92. {
  93.   Speaker=0;
  94.   DelayMs(4000);
  95.   Speaker=1;
  96.   DelayMs(1000);
  97. }
  98. }
  99. void InitialSound(void)
  100. {
  101.     Speaker=1;
  102.     SoundTempTH1=(65535-(1/1200)*Fosc)/256;    //計算TL1應裝入的初值     (10ms的初裝值)
  103.     SoundTempTL1=(65535-(1/1200)*Fosc)%256;    //計算TH1應裝入的初值
  104.     TH1=SoundTempTH1;                          //裝入初值
  105.     TL1=SoundTempTL1;
  106.     TMOD|=0x11;                                //定時器1、2都工作在定時器模式，工作方式1
  107.     ET0=1;                                     //定時器0開中斷
  108.     ET1=0;                                     //定時器1關中斷
  109.     TR0=0;                                     //不啟動定時器
  110.     TR1=0;                                     //不啟動定時器
  111.     EA=1;                                      //開啟CPU中斷
  112. }  

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


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

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

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

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

  521. /***************LCD初始化******************/

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

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

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

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

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

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

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

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

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

  665. /***************************寫入操作*********************/
  666. void WriteDs1302Byte(unsigned  char temp)        
  667. {
  668.     unsigned char i;
  669.     for (i=0;i<8;i++)               //循環8次 寫入數據
  670.     {
  671.         DS1302_CLK=0;
  672.         DS1302_IO=temp&0x01;      //每次傳輸低字節
  673.         temp>>=1;                //右移一位
  674.         DS1302_CLK=1;
  675.    }
  676. }  

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

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

  740. /*************************************************************************/

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

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

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

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

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

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

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

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

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

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

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

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

  1093. void Holidays(void)
  1094. {
  1095. LCDTestWord(0,0x98);

  1097.      if(LunarMonth==0x01 && LunarDay==0x01)       {LCDSendWord("春節快樂！");}
  1098. else if(LunarMonth==0x01 && LunarDay==0x15)       {LCDSendWord("元宵節快樂");}
  1099. else if(LunarMonth==0x02 && LunarDay==0x26)       {LCDSendWord("俺村過會了");}
  1100. else if(LunarMonth==0x04 && LunarDay==0x01)       {LCDSendWord("小蛋蛋生日");}
  1101. else if(LunarMonth==0x05 && LunarDay==0x05)       {LCDSendWord("端午節快樂");}
  1102. else if(LunarMonth==0x05 && LunarDay==0x12)       {LCDSendWord("張宇鵬生日");}
  1103. else if(LunarMonth==0x07 && LunarDay==0x07)       {LCDSendWord("中國情人節");}
  1104. else if(LunarMonth==0x08 && LunarDay==0x15)       {LCDSendWord("中秋節快樂");}
  1105. else if(LunarMonth==0x09 && LunarDay==0x01)       {LCDSendWord("自信就成功");}
  1106. else if(LunarMonth==0x09 && LunarDay==0x09)       {LCDSendWord("今天重陽節");}
  1107. else if(LunarMonth==0x10 && LunarDay==0x01)       {LCDSendWord("今天要祭祖");}
  1108. else if(LunarMonth==0x12 && LunarDay==0x08)       {LCDSendWord("今天臘八節");}
  1109. else if(LunarMonth==0x12 && LunarDay==0x15)       {LCDSendWord("過小年啦！");}
  1110. else if(LunarMonth==0x12 && LunarDay==0x29)       {LCDSendWord("臘月二十九");}
  1111. else if(LunarMonth==0x12 && LunarDay==0x30)       {LCDSendWord("除夕夜到了");}   
  1112. //以上是農歷節日，以下是公歷節日
  1113. else if(month==0x01 && day==0x01)  {LCDSendWord("元旦節快樂");}   
  1114. else if(month==0x02 && day==0x02)  {LCDSendWord("世界濕地日");}
  1115. else if(month==0x02 && day==0x10)  {LCDSendWord("世界氣象日");}
  1116. else if(month==0x03 && day==0x08)  {LCDSendWord("國際婦女節");}
  1117. else if(month==0x03 && day==0x12)  {LCDSendWord("中國植樹節");}
  1118. else if(month==0x03 && day==0x15)  {LCDSendWord("消費者權益");}
  1119. else if(month==0x03 && day==0x22)  {LCDSendWord("世界水日了");}     
  1120. else if(month==0x04 && day==0x01)  {LCDSendWord("愚人節快樂");}
  1121. else if(month==0x04 && day==0x05)  {LCDSendWord("中國清明節");}
  1122. else if(month==0x04 && day==0x22)  {LCDSendWord("世界地球日");}
  1123. else if(month==0x05 && day==0x01)  {LCDSendWord("國際勞動節");}
  1124. else if(month==0x05 && day==0x04)  {LCDSendWord("中國青年節");}
  1125. else if(month==0x05 && day==0x12)  {LCDSendWord("世界護士節");}
  1126. else if(month==0x06 && day==0x01)  {LCDSendWord("國際兒童節");}
  1127. else if(month==0x06 && day==0x05)  {LCDSendWord("世界環境日");}
  1128. else if(month==0x06 && day==0x06)  {LCDSendWord("國際愛眼日");}
  1129. else if(month==0x06 && day==0x25)  {LCDSendWord("世界土地日");}
  1130. else if(month==0x06 && day==0x26)  {LCDSendWord("國際禁毒日");}   
  1131. else if(month==0x07 && day==0x01)  {LCDSendWord("香港回歸日");}   
  1132. else if(month==0x08 && day==0x01)  {LCDSendWord("中國建軍節");}
  1133. else if(month==0x09 && day==0x10)  {LCDSendWord("中國教師節");}
  1134. else if(month==0x09 && day==0x18)  {LCDSendWord("九一八事變");}
  1135. else if(month==0x10 && day==0x01)  {LCDSendWord("今日國慶節");}
  1136. else if(month==0x10 && day==0x04)  {LCDSendWord("世界動物日");}
  1137. else if(month==0x10 && day==0x09)  {LCDSendWord("世界郵政日");}
  1138. else if(month==0x10 && day==0x10)  {LCDSendWord("辛亥革命日");}  
  1139. else if(month==0x12 && day==0x20)  {LCDSendWord("澳門回歸日");}
  1140. else if(month==0x12 && day==0x24)  {LCDSendWord("美好的回憶");}
  1141. else if(month==0x12 && day==0x25)  {LCDSendWord("++圣誕節++");}
  1142.    else    LCDSendWord("努力賺錢");  


  1145. /*                else    if (hour==0x04 && min==0x25)    {LCDSendWord("現在是凌晨"); }
  1146.                 else        if (hour>= 0x06 && min<  0x08 ){LCDSendWord("現在是早晨"); }
  1147.                 else        if (hour>= 0x08 && min<  0x12 ){LCDSendWord("現在是上午"); }
  1148.                 else        if (hour== 0x12 )              {LCDSendWord("現在是中午"); }
  1149.                 else        if (hour>= 0x13 && min<  0x18 ){LCDSendWord("現在是下午"); }
  1150.                 else        if (hour>= 0x18 && min<  0x22 ){LCDSendWord("現在是晚上"); }
  1151.                 else        if (hour>= 0x22 && min<= 0x23 ){LCDSendWord("☆現在是夜里"); }
  1152.                 else        if (hour>= 0x00 && min<  0x04 ){LCDSendWord("現在已深夜"); }        */
  1153.                         }        

  1155.   
  1156. void UpDate(void)
  1157. {
  1158. DisplayYear();     //顯示年
  1159. DisplayMonth();    //顯示月
  1160. DisplayDay();    //顯示日
  1161. DisplayWeek();    //顯示星期
  1162. DisplayHour();    //顯示時
  1163. DisplayMin();    //顯示分
  1164. DisplaySec();    //顯示秒
  1165. DisplayShengXiao();
  1166. }

  1168. void SetTime(unsigned char count)
  1169. {
  1170. unsigned char address,item;
  1171. unsigned char max,mini;
  1172. LCDTestWord(0,0x98);
  1173. LCDSendWord("調整");
  1174. if(count==6)  {LCDSendWord("秒鐘      ");address=0x81; max=59;mini=0;}
  1175. if(count==5)  {LCDSendWord("分鐘      ");address=0x83; max=59;mini=0;}
  1176. if(count==4)  {LCDSendWord("小時      ");address=0x85; max=23;mini=0;}
  1177. if(count==3)  {LCDSendWord("星期      ");address=0x8b; max=7;mini=1;}
  1178. if(count==2)  {LCDSendWord("日期      ");address=0x87; max=31; mini=1;}
  1179. if(count==1)  {LCDSendWord("月份      ");address=0x89; max=12;mini=1;}
  1180. if(count==0)  {LCDSendWord("年份      ");address=0x8d; max=99;mini=0;}
  1181. item=ReadDs1302(address);//讀取DS1302某地址上的數值賦給item  
  1182. item=(item/16)*10+item%16;
  1183. if(PlusKey==0)       //PlusKey-加
  1184.   item++;          //數加 1
  1185. if(ReduceKey==0)     //ReduceKey-減
  1186.   item--;          //數減 1
  1187. if(item>max)
  1188.   item=mini;       //查看數值有效范圍  
  1189. if(item<mini)
  1190.   item=max;
  1191. WriteDs1302(0x8e,0x00);
  1192. item=(item/10)*16+item%10;
  1193. WriteDs1302(address-1,item); //將調整好的item值寫入DS1302
  1194.     UpDate();
  1195. }

  1197. void Key(void)
  1198. {

  1200. if (SetKey==0)           // 設置時間
  1201. {
  1202.     DelayMs(80);         //按鍵消抖   
  1203.   if(SetKey==0&&w==1)  //當是正常狀態時就進入調時狀態
  1204.   {
  1205.    w=1;          //進入調時   
  1206.    SetTime(next);   //調整   
  1207.   }
  1208.   if(SetKey==0&&w==1)  //當是調時狀態 本鍵用于調整下一項
  1209.   {
  1210.    next++;
  1211.    if(next>=7)   {next= 0;}
  1212.    SetTime(next);   //調整   
  1213.   }
  1214.      while(SetKey==0);    //等待鍵松開
  1215. }
  1216. if(SureKey==0)           // 當在調時狀態時就退出調時
  1217.     {
  1218.   DelayMs(80);         //按鍵消抖
  1219.   if(SureKey==0&&w==1)
  1220.   {
  1221.    w=0;next=0;
  1222.    Holidays();
  1223.   }
  1224.   while(SureKey==0);   //等待鍵松開
  1225. }
  1226. if (PlusKey==0)          //加調整
  1227. {
  1228.      DelayMs(80);         //按鍵消抖
  1229.      if(PlusKey==0&&w==1)
  1230.   {   
  1231.    SetTime(next);   //調整
  1232.   }
  1233.   while(PlusKey==0);       //等待鍵松開
  1234. }

  1236. if (ReduceKey==0)        //減調整
  1237. {        
  1238.      DelayMs(80);         //按鍵消抖
  1239.      if(ReduceKey==0&&w==1)
  1240.   {   
  1241.    SetTime(next);   //調整
  1242.   }  
  1243.   while(ReduceKey==0);     //等待鍵松開
  1244. }  
  1245. }

  1247. void DelayMs(unsigned int a)        //延時 1MS/次
  1248. {
  1249. unsigned char i;
  1250. while(--a!=0)
  1251. {
  1252.   for(i=0;i<125;i++)
  1253.   ;
  1254. }
  1255. }

  1257. void Delay(unsigned char num)               
  1258. {
  1259. while(num--)
  1260. ;
  1261. }

  1263. void main()
  1264. {
  1265.         P4SW = 0xff; //啟動P4接口
  1266.         P4M0 = 0xff;   //接口設置為強推
  1267. SureKey=1;
  1268. PlusKey=1;
  1269. ReduceKey=1;
  1270. // PSB=1;
  1271. next=0;
  1272. LCDInit();
  1273. LCDClear();
  1274. InitDS1302();
  1275. InitialSound();
  1276. while(1)                        
  1277. {
  1278.   DisplayYear();     //顯示年
  1279.   DisplayMonth();    //顯示月
  1280.   DisplayDay();    //顯示日
  1281.   DisplayWeek();    //顯示星期
  1282.   DisplayHour();    //顯示時
  1283.   DisplayMin();    //顯示分
  1284.   DisplaySec();    //顯示秒
  1285.   Holidays();        //顯示節日
  1286.   DisplayTemp();     //顯示溫度  
  1287.   Key();
  1288.   if(min==0&&sec==0)
  1289.   {
  1290.    if(LunarMonth==9&&LunarDay==1)
  1291.    {
  1292.    PlayMusic(HappyBirthday,0,3,300);
  1293.    }
  1294.    else
  1295.    {
  1296.     SpeakerDiDi();
  1297.    }
  1298.   }
  1299. }
  1300. }
復制代碼


回復

使用道具 舉報

ID:329253 發表于 2018-6-10 17:02 來自手機 | 顯示全部樓層
你這代碼太長了，應該把他刪減一下，再發出來
回復

使用道具 舉報

ID:349102 發表于 2018-6-10 23:17 來自手機 | 顯示全部樓層
等我先看完程序先
回復

使用道具 舉報

ID:330198 發表于 2018-6-11 12:59 | 顯示全部樓層
360截圖20180611125241835.jpg
你晶振頻率改沒改啊
回復

使用道具 舉報

ID:61140 發表于 2018-6-12 20:07 | 顯示全部樓層
zhanghyg 發表于 2018-6-11 12:59
你晶振頻率改沒改啊

這個改不改無所謂，反正我也不聽歌，走時精確就行了，現在主要是按鍵不起作用，求教大神了
回復

使用道具 舉報

ID:61140 發表于 2018-6-15 12:10 | 顯示全部樓層
有沒有大神幫我看一下啊，只是按鍵部分只要能管用就行了，
回復

使用道具 舉報

ID:61140 發表于 2019-1-7 18:42 | 顯示全部樓層

有沒有大神幫我看一下啊，只是按鍵部分只要能管用就行了，
回復

使用道具 舉報

ID:280876 發表于 2019-1-8 10:14 | 顯示全部樓層
太長了，沒時間看
回復

使用道具 舉報

ID:453974 發表于 2019-1-8 12:33 | 顯示全部樓層
按鍵延時檢測有點長，你把它減小一點然后再看看
回復

使用道具 舉報

ID:386762 發表于 2019-1-8 17:09 | 顯示全部樓層
先看看按鍵檢測電路是否有效，在看看按鍵消抖的時間是否太差導致檢測不到（可以試試長按按鍵試試是否按鍵有效）
回復

使用道具 舉報

ID:61140 發表于 2019-5-26 16:16 | 顯示全部樓層
皮條01 發表于 2018-6-10 23:17
等我先看完程序先

大神幫我一下可以么
回復

使用道具 舉報

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

本版積分規則

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

Powered by 單片機教程網

快速回復 返回頂部 返回列表
主站蜘蛛池模板： 国产黑丝在线 | 欧美视频免费 | 国产一级一级 | 久久看看 | 国产美女精品 | 欧美日韩国产在线 | 欧美另类视频 | 青春草91 | 亚洲一区二区三区在线免费 | 日韩精品在线免费观看 | 成人久久| 国产欧美一区二区在线观看 | 亚洲人成人一区二区在线观看 | 国产免费观看视频 | 国产精品高潮呻吟久久av黑人 | 99re6在线视频精品免费 | av中文字幕在线播放 | 日韩欧美亚洲 | av午夜电影 | 久久久久久亚洲精品不卡 | 午夜三区 | 亚洲3p| 亚洲欧美日韩在线不卡 | 羞羞视频在线观看免费观看 | 国产精品国产三级国产a | 精品一区二区在线观看 | 国产成人精品久久二区二区91 | 天天爽一爽 | 在线免费国产视频 | 国产区在线视频 | 成人久久久久久久久 | 九九久久精品 | 99视频精品| 中文成人无字幕乱码精品 | 欧美a区 | 亚洲精品99久久久久久 | 日韩一区二区在线视频 | 欧洲毛片| 国产精品视频网 | 北条麻妃视频在线观看 | 美女黄网|