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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 嵌入式/单片机论坛 › 24小时必答区 › 哪位大神帮我看一下这个单片机程序，按键不起作用
返回列表 发新帖
查看: 4331|回复: 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
等我先看完程序先

大神帮我一下可以么
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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