找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 3414|回复: 0
收起左侧

太阳能定时led标志牌单片机源程序

[复制链接]
ID:212203 发表于 2017-6-18 10:23 | 显示全部楼层 |阅读模式
太阳能定时led标志牌

单片机源程序如下:
  1. #include<reg52.h>
  2. //#include"DS18B20_3.H"
  3. #include <string.h>
  4. #include <intrins.h>
  5. #define uint unsigned int
  6. #define uchar unsigned char
  7. #define wd 0                                //定义是否有温度功能  =0时无温度,=1时有温度


  8. #define yh 0x80 //LCD第一行的初始位置,因为LCD1602字符地址首位D7恒定为1(100000000=80)
  9. #define er 0x80+0x40 //LCD第二行初始位置(因为第二行第一个字符位置地址是0x40)

  10. //液晶屏的与C51之间的引脚连接定义(显示数据线接C51的P0口)
  11. sbit en=P2^7;
  12. sbit rw=P2^6;   //如果硬件上rw接地,就不用写这句和后面的rw=0了
  13. sbit rs=P2^5;


  14. //校时按键与C51的引脚连接定义

  15. sbit set=P3^4;          //设置键
  16. sbit add=P3^5;          //加键
  17. sbit dec=P3^2;          //减键
  18. sbit seeNL_NZ=P3^3;        //查看农历/闹钟

  19. sbit DQ=P1^0;                // 温度传感器DS18B20
  20. sbit buzzer=P2^3;        //蜂鸣器,通过三极管8550驱动,端口低电平响

  21. sbit led=P3^7;                 //LCD背光开关
  22. bit  led1=1;

  23. unsigned char temp_miao;
  24. unsigned char bltime;  //背光亮的时间
  25. uchar tflag;//温度正负标志

  26. //DS1302时钟芯片与C51之间的引脚连接定义
  27. sbit IO=P2^1;
  28. sbit SCLK=P2^0;
  29. sbit RST=P2^2;


  30. uchar a,miao,shi,fen,ri,yue,nian,week,setn,temp;
  31. uint flag;
  32. //flag用于读取头文件中的温度值,和显示温度值
  33. bit c_moon;

  34. uchar nz_shi=10,nz_fen=0,nz_miao=0,setNZn;            //定义闹钟变量
  35. uchar shangyimiao,bsn,temp_hour;                        //记录上一秒时间
  36. uchar T_NL_NZ;                                                        //计数器
  37. bit timerOn=0;                                                        //闹钟启用标志位
  38. bit baoshi=0;                                                        //整点报时标志位
  39. bit  p_r=0;                                                                 //平年/润年  =0表示平年,=1表示润年
  40. data uchar year_moon,month_moon,day_moon,week;



  41. sbit ACC0=ACC^0;
  42. sbit ACC7=ACC^7;
  43. /************************************************************
  44. ACC累加器=A
  45. ACC.0=E0H

  46. ACC.0就是ACC的第0位。Acc可以位寻址。

  47. 累加器ACC是一个8位的存储单元,是用来放数据的。但是,这个存储单元有其特殊的地位,
  48. 是单片机中一个非常关键的单元,很多运算都要通过ACC来进行。以后在学习指令时,
  49. 常用A来表示累加器。但有一些地方例外,比如在PUSH指令中,就必须用ACC这样的名字。
  50. 一般的说法,A代表了累加器中的内容、而ACC代表的是累加器的地址。
  51. ***************************************************************/



  52. //********阳历转换阴历表************************************
  53. code uchar year_code[597]={
  54.                     0x04,0xAe,0x53,    //1901 0
  55.                     0x0A,0x57,0x48,    //1902 3
  56.                     0x55,0x26,0xBd,    //1903 6
  57.                     0x0d,0x26,0x50,    //1904 9
  58.                     0x0d,0x95,0x44,    //1905 12
  59.                     0x46,0xAA,0xB9,    //1906 15
  60.                     0x05,0x6A,0x4d,    //1907 18
  61.                     0x09,0xAd,0x42,    //1908 21
  62.                     0x24,0xAe,0xB6,    //1909
  63.                     0x04,0xAe,0x4A,    //1910
  64.                     0x6A,0x4d,0xBe,    //1911
  65.                     0x0A,0x4d,0x52,    //1912
  66.                     0x0d,0x25,0x46,    //1913
  67.                     0x5d,0x52,0xBA,    //1914
  68.                     0x0B,0x54,0x4e,    //1915
  69.                     0x0d,0x6A,0x43,    //1916
  70.                     0x29,0x6d,0x37,    //1917
  71.                     0x09,0x5B,0x4B,    //1918
  72.                     0x74,0x9B,0xC1,    //1919
  73.                     0x04,0x97,0x54,    //1920
  74.                     0x0A,0x4B,0x48,    //1921
  75.                     0x5B,0x25,0xBC,    //1922
  76.                     0x06,0xA5,0x50,    //1923
  77.                     0x06,0xd4,0x45,    //1924
  78.                     0x4A,0xdA,0xB8,    //1925
  79.                     0x02,0xB6,0x4d,    //1926
  80.                     0x09,0x57,0x42,    //1927
  81.                     0x24,0x97,0xB7,    //1928
  82.                     0x04,0x97,0x4A,    //1929
  83.                     0x66,0x4B,0x3e,    //1930
  84.                     0x0d,0x4A,0x51,    //1931
  85.                     0x0e,0xA5,0x46,    //1932
  86.                     0x56,0xd4,0xBA,    //1933
  87.                     0x05,0xAd,0x4e,    //1934
  88.                     0x02,0xB6,0x44,    //1935
  89.                     0x39,0x37,0x38,    //1936
  90.                     0x09,0x2e,0x4B,    //1937
  91.                     0x7C,0x96,0xBf,    //1938
  92.                     0x0C,0x95,0x53,    //1939
  93.                     0x0d,0x4A,0x48,    //1940
  94.                     0x6d,0xA5,0x3B,    //1941
  95.                     0x0B,0x55,0x4f,    //1942
  96.                     0x05,0x6A,0x45,    //1943
  97.                     0x4A,0xAd,0xB9,    //1944
  98.                     0x02,0x5d,0x4d,    //1945
  99.                     0x09,0x2d,0x42,    //1946
  100.                     0x2C,0x95,0xB6,    //1947
  101.                     0x0A,0x95,0x4A,    //1948
  102.                     0x7B,0x4A,0xBd,    //1949
  103.                     0x06,0xCA,0x51,    //1950
  104.                     0x0B,0x55,0x46,    //1951
  105.                     0x55,0x5A,0xBB,    //1952
  106.                     0x04,0xdA,0x4e,    //1953
  107.                     0x0A,0x5B,0x43,    //1954
  108.                     0x35,0x2B,0xB8,    //1955
  109.                     0x05,0x2B,0x4C,    //1956
  110.                     0x8A,0x95,0x3f,    //1957
  111.                     0x0e,0x95,0x52,    //1958
  112.                     0x06,0xAA,0x48,    //1959
  113.                     0x7A,0xd5,0x3C,    //1960
  114.                     0x0A,0xB5,0x4f,    //1961
  115.                     0x04,0xB6,0x45,    //1962
  116.                     0x4A,0x57,0x39,    //1963
  117.                     0x0A,0x57,0x4d,    //1964
  118.                     0x05,0x26,0x42,    //1965
  119.                     0x3e,0x93,0x35,    //1966
  120.                     0x0d,0x95,0x49,    //1967
  121.                     0x75,0xAA,0xBe,    //1968
  122.                     0x05,0x6A,0x51,    //1969
  123.                     0x09,0x6d,0x46,    //1970
  124.                     0x54,0xAe,0xBB,    //1971
  125.                     0x04,0xAd,0x4f,    //1972
  126.                     0x0A,0x4d,0x43,    //1973
  127.                     0x4d,0x26,0xB7,    //1974
  128.                     0x0d,0x25,0x4B,    //1975
  129.                     0x8d,0x52,0xBf,    //1976
  130.                     0x0B,0x54,0x52,    //1977
  131.                     0x0B,0x6A,0x47,    //1978
  132.                     0x69,0x6d,0x3C,    //1979
  133.                     0x09,0x5B,0x50,    //1980
  134.                     0x04,0x9B,0x45,    //1981
  135.                     0x4A,0x4B,0xB9,    //1982
  136.                     0x0A,0x4B,0x4d,    //1983
  137.                     0xAB,0x25,0xC2,    //1984
  138.                     0x06,0xA5,0x54,    //1985
  139.                     0x06,0xd4,0x49,    //1986
  140.                     0x6A,0xdA,0x3d,    //1987
  141.                     0x0A,0xB6,0x51,    //1988
  142.                     0x09,0x37,0x46,    //1989
  143.                     0x54,0x97,0xBB,    //1990
  144.                     0x04,0x97,0x4f,    //1991
  145.                     0x06,0x4B,0x44,    //1992
  146.                     0x36,0xA5,0x37,    //1993
  147.                     0x0e,0xA5,0x4A,    //1994
  148.                     0x86,0xB2,0xBf,    //1995
  149.                     0x05,0xAC,0x53,    //1996
  150.                     0x0A,0xB6,0x47,    //1997
  151.                     0x59,0x36,0xBC,    //1998
  152.                     0x09,0x2e,0x50,    //1999 294
  153.                     0x0C,0x96,0x45,    //2000 297
  154.                     0x4d,0x4A,0xB8,    //2001
  155.                     0x0d,0x4A,0x4C,    //2002
  156.                     0x0d,0xA5,0x41,    //2003
  157.                     0x25,0xAA,0xB6,    //2004
  158.                     0x05,0x6A,0x49,    //2005
  159.                     0x7A,0xAd,0xBd,    //2006
  160.                     0x02,0x5d,0x52,    //2007
  161.                     0x09,0x2d,0x47,    //2008
  162.                     0x5C,0x95,0xBA,    //2009
  163.                     0x0A,0x95,0x4e,    //2010
  164.                     0x0B,0x4A,0x43,    //2011
  165.                     0x4B,0x55,0x37,    //2012
  166.                     0x0A,0xd5,0x4A,    //2013
  167.                     0x95,0x5A,0xBf,    //2014
  168.                     0x04,0xBA,0x53,    //2015
  169.                     0x0A,0x5B,0x48,    //2016
  170.                     0x65,0x2B,0xBC,    //2017
  171.                     0x05,0x2B,0x50,    //2018
  172.                     0x0A,0x93,0x45,    //2019
  173.                     0x47,0x4A,0xB9,    //2020
  174.                     0x06,0xAA,0x4C,    //2021
  175.                     0x0A,0xd5,0x41,    //2022
  176.                     0x24,0xdA,0xB6,    //2023
  177.                     0x04,0xB6,0x4A,    //2024
  178.                     0x69,0x57,0x3d,    //2025
  179.                     0x0A,0x4e,0x51,    //2026
  180.                     0x0d,0x26,0x46,    //2027
  181.                     0x5e,0x93,0x3A,    //2028
  182.                     0x0d,0x53,0x4d,    //2029
  183.                     0x05,0xAA,0x43,    //2030
  184.                     0x36,0xB5,0x37,    //2031
  185.                     0x09,0x6d,0x4B,    //2032
  186.                     0xB4,0xAe,0xBf,    //2033
  187.                     0x04,0xAd,0x53,    //2034
  188.                     0x0A,0x4d,0x48,    //2035
  189.                     0x6d,0x25,0xBC,    //2036
  190.                     0x0d,0x25,0x4f,    //2037
  191.                     0x0d,0x52,0x44,    //2038
  192.                     0x5d,0xAA,0x38,    //2039
  193.                     0x0B,0x5A,0x4C,    //2040
  194.                     0x05,0x6d,0x41,    //2041
  195.                     0x24,0xAd,0xB6,    //2042
  196.                     0x04,0x9B,0x4A,    //2043
  197.                     0x7A,0x4B,0xBe,    //2044
  198.                     0x0A,0x4B,0x51,    //2045
  199.                     0x0A,0xA5,0x46,    //2046
  200.                     0x5B,0x52,0xBA,    //2047
  201.                     0x06,0xd2,0x4e,    //2048
  202.                     0x0A,0xdA,0x42,    //2049
  203.                     0x35,0x5B,0x37,    //2050
  204.                     0x09,0x37,0x4B,    //2051
  205.                     0x84,0x97,0xC1,    //2052
  206.                     0x04,0x97,0x53,    //2053
  207.                     0x06,0x4B,0x48,    //2054
  208.                     0x66,0xA5,0x3C,    //2055
  209.                     0x0e,0xA5,0x4f,    //2056
  210.                     0x06,0xB2,0x44,    //2057
  211.                     0x4A,0xB6,0x38,    //2058
  212.                     0x0A,0xAe,0x4C,    //2059
  213.                     0x09,0x2e,0x42,    //2060
  214.                     0x3C,0x97,0x35,    //2061
  215.                     0x0C,0x96,0x49,    //2062
  216.                     0x7d,0x4A,0xBd,    //2063
  217.                     0x0d,0x4A,0x51,    //2064
  218.                     0x0d,0xA5,0x45,    //2065
  219.                     0x55,0xAA,0xBA,    //2066
  220.                     0x05,0x6A,0x4e,    //2067
  221.                     0x0A,0x6d,0x43,    //2068
  222.                     0x45,0x2e,0xB7,    //2069
  223.                     0x05,0x2d,0x4B,    //2070
  224.                     0x8A,0x95,0xBf,    //2071
  225.                     0x0A,0x95,0x53,    //2072
  226.                     0x0B,0x4A,0x47,    //2073
  227.                     0x6B,0x55,0x3B,    //2074
  228.                     0x0A,0xd5,0x4f,    //2075
  229.                     0x05,0x5A,0x45,    //2076
  230.                     0x4A,0x5d,0x38,    //2077
  231.                     0x0A,0x5B,0x4C,    //2078
  232.                     0x05,0x2B,0x42,    //2079
  233.                     0x3A,0x93,0xB6,    //2080
  234.                     0x06,0x93,0x49,    //2081
  235.                     0x77,0x29,0xBd,    //2082
  236.                     0x06,0xAA,0x51,    //2083
  237.                     0x0A,0xd5,0x46,    //2084
  238.                     0x54,0xdA,0xBA,    //2085
  239.                     0x04,0xB6,0x4e,    //2086
  240.                     0x0A,0x57,0x43,    //2087
  241.                     0x45,0x27,0x38,    //2088
  242.                     0x0d,0x26,0x4A,    //2089
  243.                     0x8e,0x93,0x3e,    //2090
  244.                     0x0d,0x52,0x52,    //2091
  245.                     0x0d,0xAA,0x47,    //2092
  246.                     0x66,0xB5,0x3B,    //2093
  247.                     0x05,0x6d,0x4f,    //2094
  248.                     0x04,0xAe,0x45,    //2095
  249.                     0x4A,0x4e,0xB9,    //2096
  250.                     0x0A,0x4d,0x4C,    //2097
  251.                     0x0d,0x15,0x41,    //2098
  252.                     0x2d,0x92,0xB5,    //2099
  253. };

  254. ///月份数据表
  255. code uchar day_code1[9]={0x0,0x1f,0x3b,0x5a,0x78,0x97,0xb5,0xd4,0xf3};
  256. code uint day_code2[3]={0x111,0x130,0x14e};

  257. /*
  258. 函数功能:输入BCD阳历数据,输出BCD阴历数据(只允许1901-2099年)
  259. 调用函数示例:Conversion(c_sun,year_sun,month_sun,day_sun)
  260. 如:计算2004年10月16日Conversion(0,0x4,0x10,0x16);
  261. c_sun,year_sun,month_sun,day_sun均为BCD数据,c_sun为世纪标志位,c_sun=0为21世
  262. 纪,c_sun=1为19世纪
  263. 调用函数后,原有数据不变,读c_moon,year_moon,month_moon,day_moon得出阴历BCD数据
  264. */

  265. bit c_moon;
  266. data uchar year_moon,month_moon,day_moon,week;
  267. //子函数,用于读取数据表中农历月的大月或小月,如果该月为大返回1,为小返回0
  268. bit get_moon_day(uchar month_p,uint table_addr)
  269. {
  270.         uchar temp;
  271.     switch (month_p){
  272.         case 1:{temp=year_code[table_addr]&0x08;
  273.              if (temp==0)return(0);else return(1);}
  274.         case 2:{temp=year_code[table_addr]&0x04;
  275.              if (temp==0)return(0);else return(1);}
  276.         case 3:{temp=year_code[table_addr]&0x02;
  277.              if (temp==0)return(0);else return(1);}
  278.         case 4:{temp=year_code[table_addr]&0x01;
  279.              if (temp==0)return(0);else return(1);}
  280.         case 5:{temp=year_code[table_addr+1]&0x80;
  281.              if (temp==0) return(0);else return(1);}
  282.         case 6:{temp=year_code[table_addr+1]&0x40;
  283.              if (temp==0)return(0);else return(1);}
  284.         case 7:{temp=year_code[table_addr+1]&0x20;
  285.              if (temp==0)return(0);else return(1);}
  286.         case 8:{temp=year_code[table_addr+1]&0x10;
  287.              if (temp==0)return(0);else return(1);}
  288.         case 9:{temp=year_code[table_addr+1]&0x08;
  289.              if (temp==0)return(0);else return(1);}
  290.         case 10:{temp=year_code[table_addr+1]&0x04;
  291.              if (temp==0)return(0);else return(1);}
  292.         case 11:{temp=year_code[table_addr+1]&0x02;
  293.              if (temp==0)return(0);else return(1);}
  294.         case 12:{temp=year_code[table_addr+1]&0x01;
  295.              if (temp==0)return(0);else return(1);}
  296.         case 13:{temp=year_code[table_addr+2]&0x80;
  297.              if (temp==0)return(0);else return(1);}
  298.     }
  299.          return 0;
  300. }

  301. /*
  302. 函数功能:输入BCD阳历数据,输出BCD阴历数据(只允许1901-2099年)
  303. 调用函数示例:Conversion(c_sun,year_sun,month_sun,day_sun)
  304. 如:计算2004年10月16日Conversion(0,0x4,0x10,0x16);
  305. c_sun,year_sun,month_sun,day_sun均为BCD数据,c_sun为世纪标志位,c_sun=0为21世
  306. 纪,c_sun=1为19世纪
  307. 调用函数后,原有数据不变,读c_moon,year_moon,month_moon,day_moon得出阴历BCD数据
  308. */

  309. void Conversion(bit c,uchar year,uchar month,uchar day)
  310. {                         //c=0 为21世纪,c=1 为19世纪 输入输出数据均为BCD数据
  311.     uchar temp1,temp2,temp3,month_p;
  312.     uint temp4,table_addr;
  313.     bit flag2,flag_y;
  314.     temp1=year/16;   //BCD->hex 先把数据转换为十六进制
  315.     temp2=year%16;
  316.    // year=temp1*10+temp2;
  317.         year=temp1*16+temp2;
  318.     temp1=month/16;
  319.     temp2=month%16;
  320.     //month=temp1*10+temp2;
  321.         month=temp1*16+temp2;
  322.     temp1=day/16;
  323.     temp2=day%16;
  324.     //day=temp1*10+temp2;
  325.         day=temp1*16+temp2;
  326.     //定位数据表地址
  327.     if(c==0){                  
  328.         table_addr=(year+0x64-1)*0x3;
  329.     }
  330.     else {
  331.         table_addr=(year-1)*0x3;
  332.     }
  333.     //定位数据表地址完成
  334.     //取当年春节所在的公历月份
  335.     temp1=year_code[table_addr+2]&0x60;
  336.     temp1=_cror_(temp1,5);
  337.     //取当年春节所在的公历月份完成
  338.     //取当年春节所在的公历日
  339.     temp2=year_code[table_addr+2]&0x1f;
  340.     //取当年春节所在的公历日完成
  341.     // 计算当年春年离当年元旦的天数,春节只会在公历1月或2月
  342.     if(temp1==0x1){  
  343.         temp3=temp2-1;  
  344.     }  
  345.     else{
  346.         temp3=temp2+0x1f-1;        
  347.     }
  348.     // 计算当年春年离当年元旦的天数完成
  349.     //计算公历日离当年元旦的天数,为了减少运算,用了两个表
  350.     //day_code1[9],day_code2[3]
  351.     //如果公历月在九月或前,天数会少于0xff,用表day_code1[9],
  352.     //在九月后,天数大于0xff,用表day_code2[3]
  353.     //如输入公历日为8月10日,则公历日离元旦天数为day_code1[8-1]+10-1
  354.     //如输入公历日为11月10日,则公历日离元旦天数为day_code2[11-10]+10-1
  355.     if (month<10){
  356.         temp4=day_code1[month-1]+day-1;
  357.     }
  358.     else{
  359.         temp4=day_code2[month-10]+day-1;
  360.     }
  361.     if ((month>0x2)&&(year%0x4==0)){  //如果公历月大于2月并且该年的2月为闰月,天数加1
  362.         temp4+=1;
  363.     }
  364.     //计算公历日离当年元旦的天数完成
  365.     //判断公历日在春节前还是春节后
  366.     if (temp4>=temp3){ //公历日在春节后或就是春节当日使用下面代码进行运算
  367.         temp4-=temp3;
  368.         month=0x1;
  369.         month_p=0x1;  //month_p为月份指向,公历日在春节前或就是春节当日month_p指向首月
  370.         flag2=get_moon_day(month_p,table_addr); //检查该农历月为大小还是小月,大月返回1,小月返回0
  371.         flag_y=0;
  372.         if(flag2==0)temp1=0x1d; //小月29天
  373.         else temp1=0x1e; //大小30天
  374.         temp2=year_code[table_addr]&0xf0;
  375.         temp2=_cror_(temp2,4);  //从数据表中取该年的闰月月份,如为0则该年无闰月
  376.         while(temp4>=temp1){
  377.             temp4-=temp1;
  378.             month_p+=1;
  379.             if(month==temp2){
  380.             flag_y=~flag_y;
  381.             if(flag_y==0)month+=1;
  382.             }
  383.             else month+=1;
  384.             flag2=get_moon_day(month_p,table_addr);
  385.             if(flag2==0)temp1=0x1d;
  386.             else temp1=0x1e;
  387.         }
  388.         day=temp4+1;
  389.     }
  390.     else{  //公历日在春节前使用下面代码进行运算
  391.         temp3-=temp4;
  392.         if (year==0x0){year=0x63;c=1;}
  393.         else year-=1;
  394.         table_addr-=0x3;
  395.         month=0xc;
  396.         temp2=year_code[table_addr]&0xf0;
  397.         temp2=_cror_(temp2,4);
  398.         if (temp2==0)
  399.                         month_p=0xc;
  400.         else
  401.                         month_p=0xd; //
  402.         
  403.                 //month_p为月份指向,如果当年有闰月,一年有十三个月,月指向13,无闰月指向12
  404.         
  405.         flag_y=0;
  406.         flag2=get_moon_day(month_p,table_addr);
  407.         if(flag2==0)temp1=0x1d;
  408.         else temp1=0x1e;
  409.         while(temp3>temp1){
  410.             temp3-=temp1;
  411.             month_p-=1;
  412.             if(flag_y==0)month-=1;
  413.             if(month==temp2)flag_y=~flag_y;
  414.             flag2=get_moon_day(month_p,table_addr);
  415.             if(flag2==0)temp1=0x1d;
  416.             else temp1=0x1e;
  417.          }
  418.         day=temp1-temp3+1;
  419.     }
  420.     c_moon=c;                 //HEX->BCD ,运算结束后,把数据转换为BCD数据
  421.     temp1=year/10;
  422.     temp1=_crol_(temp1,4);
  423.     temp2=year%10;
  424.     year_moon=temp1|temp2;
  425.     temp1=month/10;
  426.     temp1=_crol_(temp1,4);
  427.     temp2=month%10;
  428.     month_moon=temp1|temp2;
  429.     temp1=day/10;
  430.     temp1=_crol_(temp1,4);
  431.     temp2=day%10;
  432.     day_moon=temp1|temp2;
  433. }


  434. /*
  435. 函数功能:输入BCD阳历数据,输出BCD星期数据(只允许1901-2099年)
  436. 调用函数示例:Conver_week(c_sun,year_sun,month_sun,day_sun)
  437. 如:计算2004年10月16日Conversion(0,0x4,0x10,0x16);
  438. c_sun,year_sun,month_sun,day_sun均为BCD数据,c_sun为世纪标志位,c_sun=0为21世
  439. 纪,c_sun=1为19世纪
  440. 调用函数后,原有数据不变,读week得出阴历BCD数据
  441. */
  442. code uchar table_week[12]={0,3,3,6,1,4,6,2,5,0,3,5}; //月修正数据表
  443. /*
  444. 算法:日期+年份+所过闰年数+月较正数之和除7 的余数就是星期但如果是在
  445. 闰年又不到3 月份上述之和要减一天再除7
  446. 星期数为0
  447. */
  448. void Conver_week(uchar year,uchar month,uchar day)
  449. {//c=0 为21世纪,c=1 为19世纪 输入输出数据均为BCD数据
  450.     uchar p1,p2;
  451.     year+=0x64;  //如果为21世纪,年份数加100
  452.     p1=year/0x4;  //所过闰年数只算1900年之后的
  453.     p2=year+p1;
  454.     p2=p2%0x7;  //为节省资源,先进行一次取余,避免数大于0xff,避免使用整型数据
  455.     p2=p2+day+table_week[month-1];
  456.     if (year%0x4==0&&month<3)p2-=1;
  457.     week=p2%0x7;
  458. }


  459. /**************************************************************/

  460. uchar code tab1[]={"20  -  -   "};         //年显示的固定字符
  461. uchar code tab2[]={"  :  :  "};                //时间显示的固定字符
  462. uchar code nlp[]={"NL:  -  -   PING"};        //农历平年显示
  463. uchar code nlr[]={"NL:  -  -   RUN "};        //农历润年显示
  464. uchar code NZd[]={"timer:    -  -  "};        //显示闹钟固定点
  465. uchar code qk[]= {"                "};        //清空显示
  466. uchar code tm[]= {"time"};



  467. //=====================DS18B20=============================================
  468. //******************************************************************************
  469. void Delayns(int num)//延时函数
  470. {
  471.         while(num--);
  472. }       


  473. //******************************************************************************
  474. void Init_DS18B20(void)//初始化ds1820
  475. {
  476.         unsigned char x=0;
  477.         DQ = 1;    //DQ复位
  478.         Delayns(8);  //稍做延时
  479.         DQ = 0;    //单片机将DQ拉低
  480.         Delayns(80); //精确延时 大于 480us
  481.         DQ = 1;    //拉高总线
  482.         Delayns(14);
  483.         x=DQ;      //稍做延时后 如果x=0则初始化成功 x=1则初始化失败
  484.         Delayns(20);
  485. }
  486. //******************************************************************************
  487. unsigned char ReadOneChar(void)//读一个字节
  488. {
  489.         unsigned char i=0;
  490.         unsigned char dat = 0;
  491.         for (i=8;i>0;i--)
  492.         {
  493.                 DQ = 0; // 给脉冲信号
  494.                 dat>>=1;
  495.                 DQ = 1; // 给脉冲信号
  496.                 if(DQ)
  497.                 dat|=0x80;
  498.                 Delayns(4);
  499.         }
  500.         return(dat);
  501. }

  502. //******************************************************************************
  503. void WriteOneChar(unsigned char dat)//写一个字节
  504. {
  505.         unsigned char i=0;
  506.         for (i=8; i>0; i--)
  507.         {
  508.                 DQ = 0;
  509.                 DQ = dat&0x01;
  510.                 Delayns(5);
  511.                 DQ = 1;
  512.                 dat>>=1;
  513.         }
  514. }
  515. //******************************************************************************
  516. unsigned int ReadTemperature(void)//读取温度
  517. {
  518.         unsigned char a=0;
  519.         unsigned char b=0;
  520.         unsigned int t=0;
  521.         float tt=0;
  522.         Init_DS18B20();
  523.         WriteOneChar(0xCC); // 跳过读序号列号的操作
  524.         WriteOneChar(0x44); // 启动温度转换
  525.         Init_DS18B20();
  526.         WriteOneChar(0xCC); //跳过读序号列号的操作
  527.         WriteOneChar(0xBE); //读取温度寄存器
  528.         a=ReadOneChar();  //读低8位
  529.         b=ReadOneChar(); //读高8位
  530.         t=b;
  531.         t<<=8;
  532.         t=t|a;
  533.    
  534.    if(t<0x0fff)   tflag=0;
  535.    else   {t=~t+2;tflag=1;}
  536.         t=t*(0.625)+5;//温度值扩大10倍,精确到1位小数
  537.         //CurrentT=tvalue;
  538.         //return(tvalue);
  539.    
  540.         //tt=t*0.625;
  541.         //t= (unsigned int)(tt*10+0.5); //放大10倍输出并四舍五入
  542.         return(t);
  543. }
  544. //*****************************************************************************



  545. //延时函数,后面经常调用
  546. void delay(uint xms)//延时函数,有参函数
  547. {
  548.         uint x,y;
  549.         for(x=xms;x>0;x--)
  550.          for(y=110;y>0;y--);
  551. }

  552. /********液晶写入指令函数与写入数据函数,以后可调用**************/

  553. /*在这个程序中,液晶写入有关函数会在DS1302的函数中调用,所以液晶程序要放在前面*/

  554. void write_1602com(uchar com)//****液晶写入指令函数****
  555. {
  556.         rs=0;//数据/指令选择置为指令
  557.         rw=0; //读写选择置为写
  558.         P0=com;//送入数据
  559.         delay(1);
  560.         en=1;//拉高使能端,为制造有效的下降沿做准备
  561.         delay(1);
  562.         en=0;//en由高变低,产生下降沿,液晶执行命令
  563. }


  564. void write_1602dat(uchar dat)//***液晶写入数据函数****
  565. {
  566.         rs=1;//数据/指令选择置为数据
  567.         rw=0; //读写选择置为写
  568.         P0=dat;//送入数据
  569.         delay(1);
  570.         en=1; //en置高电平,为制造下降沿做准备
  571.         delay(1);
  572.         en=0; //en由高变低,产生下降沿,液晶执行命令
  573. }


  574. void lcd_init(void)//***液晶初始化函数****
  575. {
  576.         write_1602com(0x38);//设置液晶工作模式,意思:16*2行显示,5*7点阵,8位数据
  577.         write_1602com(0x0c);//开显示不显示光标
  578.         write_1602com(0x06);//整屏不移动,光标自动右移
  579.         write_1602com(0x01);//清显示

  580.         write_1602com(yh+1);//日历显示固定符号从第一行第1个位置之后开始显示
  581.         for(a=0;a<14;a++)
  582.         {
  583.         write_1602dat(tab1[a]);//向液晶屏写日历显示的固定符号部分
  584.         //delay(3);
  585.         }
  586.         write_1602com(er);//时间显示固定符号写入位置,从第2个位置后开始显示
  587.         for(a=0;a<8;a++)
  588.         {
  589.         write_1602dat(tab2[a]);//写显示时间固定符号,两个冒号
  590.         //delay(3);
  591.         }

  592. }

  593. /*********************over***********************/


  594. /***************DS1302有关子函数********************/
  595. void write_byte(uchar dat)//写一个字节
  596. {
  597.         ACC=dat;
  598.         RST=1;
  599.         for(a=8;a>0;a--)
  600.         {
  601.                 IO=ACC0;
  602.                 SCLK=0;
  603.                 SCLK=1;
  604.                 ACC=ACC>>1;
  605.         }
  606. }
  607. uchar read_byte()//读一个字节
  608. {
  609.         RST=1;
  610.         for(a=8;a>0;a--)
  611.         {
  612.                 ACC7=IO;
  613.                 SCLK=1;
  614.                 SCLK=0;
  615.                 ACC=ACC>>1;

  616.         }
  617.         return (ACC);
  618. }
  619. //----------------------------------------
  620. void write_1302(uchar add,uchar dat)//向1302芯片写函数,指定写入地址,数据
  621. {
  622.         RST=0;
  623.         SCLK=0;
  624.         RST=1;
  625.         write_byte(add);
  626.         write_byte(dat);
  627.         SCLK=1;
  628.         RST=0;
  629. }
  630. uchar read_1302(uchar add)//从1302读数据函数,指定读取数据来源地址
  631. {
  632.         uchar temp;
  633.         RST=0;
  634.         SCLK=0;
  635.         RST=1;
  636.         write_byte(add);
  637.         temp=read_byte();
  638.         SCLK=1;
  639.         RST=0;
  640.         return(temp);
  641. }

  642. uchar BCD_Decimal(uchar bcd)//BCD码转十进制函数,输入BCD,返回十进制
  643. {
  644.          uchar Decimal;
  645.          Decimal=bcd>>4;
  646.          return(Decimal=Decimal*10+(bcd&=0x0F));
  647. }

  648. //--------------------------------------
  649. void ds1302_init() //1302芯片初始化子函数(2010-01-07,12:00:00,week4)
  650. {
  651.         RST=0;
  652.         SCLK=0;
  653.        
  654.         write_1302(0x8e,0x00); //允许写,禁止写保护
  655.         //write_1302(0x80,0x00); //向DS1302内写秒寄存器80H写入初始秒数据00
  656.         //write_1302(0x82,0x30);//向DS1302内写分寄存器82H写入初始分数据00
  657.         //write_1302(0x84,0x10);//向DS1302内写小时寄存器84H写入初始小时数据12
  658.         //write_1302(0x8a,0x05);//向DS1302内写周寄存器8aH写入初始周数据4
  659.         //write_1302(0x86,0x31);//向DS1302内写日期寄存器86H写入初始日期数据07
  660.         //write_1302(0x88,0x05);//向DS1302内写月份寄存器88H写入初始月份数据01
  661.         //write_1302(0x8c,0x17);//向DS1302内写年份寄存器8cH写入初始年份数据10
  662.         write_1302(0x8e,0x80); //打开写保护
  663. }


  664. //------------------------------------
  665. //温度显示子函数
  666. void write_temp(uchar add,uint dat)//向LCD写温度数据,并指定显示位置
  667. {
  668.         uchar gw,sw,bw,qw;
  669.         //bw=dat/100;//取得百位
  670.         //sw=dat%100/10;//取得十位数字
  671.         //gw=dat%10;//取得个位数字
  672.    
  673.    qw=dat/1000;//百位数
  674.    bw=dat%1000/100;//十位数
  675.    sw=dat%100/10;//个位数
  676.    gw=dat%10;//小数位
  677.    if(tflag==1)
  678.    {
  679.       write_1602com(er+add);//er是头文件规定的值0x80+0x40
  680.       write_1602dat(0x2d);  //负号标志
  681.       write_1602dat(0x30+bw);
  682.       write_1602dat(0x30+sw);//数字+30得到该数字的LCD1602显示码
  683.       write_1602dat('.');
  684.       write_1602dat(0x30+gw);//数字+30得到该数字的LCD1602显示码
  685.       write_1602dat(0xdf);//显示温度的小圆圈符号,0xdf是液晶屏字符库的该符号地址码
  686.       write_1602dat(0x43);        //显示"C"符号,0x43是液晶屏字符库里大写C的地址码       
  687.    }
  688.    else
  689.    {
  690.       write_1602com(er+add);//er是头文件规定的值0x80+0x40
  691.       write_1602dat(0x30+qw);
  692.       write_1602dat(0x30+bw);
  693.       write_1602dat(0x30+sw);//数字+30得到该数字的LCD1602显示码
  694.       write_1602dat('.');
  695.       write_1602dat(0x30+gw);//数字+30得到该数字的LCD1602显示码
  696.       write_1602dat(0xdf);//显示温度的小圆圈符号,0xdf是液晶屏字符库的该符号地址码
  697.       write_1602dat(0x43);        //显示"C"符号,0x43是液晶屏字符库里大写C的地址码       
  698.    }
  699. }

  700. //------------------------------------
  701. //时分秒显示子函数
  702. void write_sfm(uchar add,uchar dat)//向LCD写时分秒,有显示位置加、现示数据,两个参数
  703. {
  704.         uchar gw,sw;
  705.         gw=dat%10;//取得个位数字
  706.         sw=dat/10;//取得十位数字
  707.         write_1602com(er+add);//er是头文件规定的值0x80+0x40
  708.         write_1602dat(0x30+sw);//数字+30得到该数字的LCD1602显示码
  709.         write_1602dat(0x30+gw);//数字+30得到该数字的LCD1602显示码                               
  710. }

  711. //-------------------------------------
  712. //年月日显示子函数
  713. void write_nyr(uchar add,uchar dat)//向LCD写年月日,有显示位置加数、显示数据,两个参数
  714. {
  715.         uchar gw,sw;
  716.         gw=dat%10;//取得个位数字
  717.         sw=dat/10;//取得十位数字
  718.         write_1602com(yh+add);//设定显示位置为第一个位置+add
  719.         write_1602dat(0x30+sw);//数字+30得到该数字的LCD1602显示码
  720.         write_1602dat(0x30+gw);//数字+30得到该数字的LCD1602显示码       
  721. }


  722. //------------------------------------
  723. //农历显示子函数
  724. void write_nl(uchar add,uchar dat)//向LCD写时分秒,有显示位置加、现示数据,两个参数
  725. {
  726.        
  727.         uchar gw,sw;
  728.         //gw=dat%10;//取得个位数字
  729.         //sw=dat/10;//取得十位数字
  730.         gw=dat%16;//取得个位数字
  731.         sw=dat/16;//取得十位数字
  732.         write_1602com(er+add);//er是头文件规定的值0x80+0x40
  733. //        write_1602dat(0x30+sw);//数字+30得到该数字的LCD1602显示码
  734. //        write_1602dat(0x30+gw);//数字+30得到该数字的LCD1602显示码       
  735.         write_1602dat('0'+sw);//数字+30得到该数字的LCD1602显示码
  736.         write_1602dat('0'+gw);//数字+30得到该数字的LCD1602显示码               
  737. }

  738. //-------------------------------------------
  739. void write_week(uchar week)//写星期函数
  740. {
  741.         write_1602com(yh+0x0c);//星期字符的显示位置
  742.         switch(week)
  743.         {
  744.                 case 1:write_1602dat('M');//星期数为1时,显示
  745.                            write_1602dat('O');
  746.                            write_1602dat('N');
  747.                            break;
  748.           
  749.                 case 2:write_1602dat('T');//星期数据为2时显示
  750.                            write_1602dat('U');
  751.                            write_1602dat('E');
  752.                            break;
  753.                
  754.                 case 3:write_1602dat('W');//星期数据为3时显示
  755.                            write_1602dat('E');
  756.                            write_1602dat('D');
  757.                            break;
  758.                
  759.                 case 4:write_1602dat('T');//星期数据为4是显示
  760.                            write_1602dat('H');
  761.                            write_1602dat('U');
  762.                            break;
  763.                
  764.                 case 5:write_1602dat('F');//星期数据为5时显示
  765.                            write_1602dat('R');
  766.                            write_1602dat('I');
  767.                            break;
  768.                
  769.                 case 6:write_1602dat('S');//星期数据为6时显示
  770.                            write_1602dat('T');
  771.                            write_1602dat('A');
  772.                            break;
  773.                
  774.                 case 0:write_1602dat('S');//星期数据为7时显示
  775.                            write_1602dat('U');
  776.                            write_1602dat('N');
  777.                            break;
  778.         }
  779. }


  780. //****************键盘扫描有关函数**********************
  781. void keyscan()
  782. {
  783.         if(seeNL_NZ==0)
  784.         {
  785.                 delay(9);
  786.                 if(seeNL_NZ==0)
  787.                 {
  788.                         led1=0;
  789.                         bltime=0;
  790.                         if((setn==0)&&(setNZn==0))                                                                //在没有进入调时模式时才可按动
  791.                         {
  792. //                                buzzer=0;//蜂鸣器短响一次
  793.                             delay(20);
  794.                             buzzer=1;
  795.        
  796.                                 if(TR1==1)
  797.                                 {
  798.                                         TR1=0;               
  799.                                 }
  800.                                 else
  801.                                 {                       
  802.                                         T_NL_NZ++;
  803.                                         if(T_NL_NZ==3)
  804.                                         {
  805.                                                 setn=0;
  806.                                                 setNZn=0;
  807.                                                 T_NL_NZ=0;       
  808.                                         }
  809.                                 }                       
  810.                         }
  811.                         while(seeNL_NZ==0);
  812.                 }
  813.         }
  814.                        

  815.         if(set==0)//---------------set为功能键(设置键)--------------------
  816.         {
  817.                 delay(9);//延时,用于消抖动
  818.                 if(set==0)//延时后再次确认按键按下
  819.                 {
  820.                         led1=0;
  821.                         bltime=0;

  822. //                    buzzer=0;//蜂鸣器短响一次
  823.                     delay(20);
  824.                     buzzer=1;
  825.                         while(!set);
  826.                         if(T_NL_NZ==0x02)                        //证明是对闹钟进行设置
  827.                         {
  828.                                 setNZn++;
  829.                                 if(setNZn==4)                        //闹钟设定成功,退回到正常显示并开启闹钟
  830.                                 {
  831.                                         setNZn=0;
  832.                                         setn=0;
  833.                                         timerOn=1;                               
  834.                                 }
  835.                                 switch(setNZn)
  836.                                 {
  837.                                         case 0:                                                //正常显示日期时间
  838.                                                 write_1602com(0x0c);        //
  839.                                                 write_1602com(er);                //时间显示固定符号写入位置?
  840.                                                 for(a=0;a<16;a++)
  841.                                                 write_1602dat(NZd[a]);        //写显示时间固定符号,两个冒号
  842.                                                
  843.                                                 write_sfm(8,nz_shi);        //闹钟 时
  844.                                                 write_sfm(11,nz_fen);        //闹钟 分
  845.                                                 write_sfm(14,nz_miao);        //闹钟 秒
  846.                                                 break;
  847.                                         case 1:                                                   //闹钟秒光标闪烁               
  848.                                                 write_1602com(er+15);        //设置按键按动一次,秒位置显示光标   //er+0x09;
  849.                                                    write_1602com(0x0f);        //设置光标为闪烁
  850.                                                 break;
  851.                                         case 2:                                                //闹钟分光标闪烁       
  852.                                                 write_1602com(er+12);        //设置按键按动一次,秒位置显示光标   //er+0x09;
  853.                                                    write_1602com(0x0f);        //设置光标为闪烁
  854.                                                 break;
  855.                                         case 3:                                                //闹钟时光标闪烁       
  856.                                                 write_1602com(er+9);        //设置按键按动一次,秒位置显示光标   //er+0x09;
  857.                                                    write_1602com(0x0f);        //设置光标为闪烁
  858.                                                 break;       
  859.                                 }       
  860.                         }

  861.                         else                                                                //证明是对时间及日期进行设置
  862.                         {
  863.                                 if(T_NL_NZ==0)
  864.                                 {
  865.                                         setn++;
  866.                                         if(setn==7)
  867.                                                 setn=0;                        //设置按键共有秒、分、时、星期、日、月、年、返回,8个功能循环
  868.                                         switch(setn)
  869.                                         {
  870.                        
  871.                                                 case 1: TR0=0;//关闭定时器
  872.                                                 //TR1=0;
  873.                                                 write_1602com(er+7);//设置按键按动一次,秒位置显示光标   //er+0x09;
  874.                                                    write_1602com(0x0f);//设置光标为闪烁
  875.                                                    temp=(miao)/10*16+(miao)%10;//秒数据写入DS1302
  876.                                                    write_1302(0x8e,0x00);
  877.                                                    write_1302(0x80,0x80|temp);//miao
  878.                                               write_1302(0x8e,0x80);
  879.                                                    break;
  880.                                                 case 2:  
  881.                                                 write_1602com(er+4);  //按2次fen位置显示光标   //er+0x06       
  882.                                                      //write_1602com(0x0f);
  883.                                                 break;
  884.                                                 case 3:
  885.                                                 write_1602com(er+1);   //按动3次,shi
  886.                                              //write_1602com(0x0f);
  887.                                                 break;
  888.                                         //        case 4: write_1602com(yh+0x0e);//按动4次,week
  889.                                              //write_1602com(0x0f);
  890.                                         //        break;
  891.                                                 case 4: write_1602com(yh+0x0a);//按动4次,ri
  892.                                              //write_1602com(0x0f);
  893.                                                 break;
  894.                                                 case 5: write_1602com(yh+0x07);//按动5次,yue
  895.                                              //write_1602com(0x0f);
  896.                                                 break;
  897.                                                 case 6: write_1602com(yh+0x04);//按动6次,nian
  898.                                              //write_1602com(0x0f);
  899.                                                 break;
  900.                                                 case 0:
  901.                                                 write_1602com(0x0c);//按动到第7次,设置光标不闪烁
  902.                                                 TR0=1;//打开定时器
  903.                                          temp=(miao)/10*16+(miao)%10;
  904.                                                    write_1302(0x8e,0x00);
  905.                                                    write_1302(0x80,0x00|temp);//miao数据写入DS1302
  906.                                                    write_1302(0x8e,0x80);
  907.                                     break;       
  908.                                         }                                                                                                       
  909.                                 }
  910.                         }
  911.                 }
  912.         }
  913. //------------------------------加键add----------------------------               
  914.         if((setn!=0)&&(setNZn==0))//当set按下以下。再按以下键才有效(按键次数不等于零)
  915.         {
  916.                 if(add==0)  //上调键
  917.                 {
  918.                         delay(10);
  919.                         if(add==0)
  920.                         {
  921.                                 led1=0;
  922.                                 bltime=0;

  923. //                            buzzer=0;//蜂鸣器短响一次
  924.                             delay(20);
  925.                             buzzer=1;
  926.                                 while(!add);
  927.                                 switch(setn)
  928.                                 {
  929.                                         case 1:miao++;//设置键按动1次,调秒
  930.                                                         if(miao==60)
  931.                                                                 miao=0;//秒超过59,再加1,就归零
  932.                                                         write_sfm(0x06,miao);//令LCD在正确位置显示"加"设定好的秒数
  933.                                                         temp=(miao)/10*16+(miao)%10;//十进制转换成DS1302要求的DCB码
  934.                                                            write_1302(0x8e,0x00); //允许写,禁止写保护
  935.                                                            write_1302(0x80,temp); //向DS1302内写秒寄存器80H写入调整后的秒数据BCD码
  936.                                                            write_1302(0x8e,0x80); //打开写保护
  937.                                                         write_1602com(er+7);//因为设置液晶的模式是写入数据后,光标自动右移,所以要指定返回
  938.                                                         //write_1602com(0x0b);
  939.                                                         break;
  940.                                         case 2:fen++;
  941.                                                         if(fen==60)
  942.                                                                 fen=0;
  943.                                                         write_sfm(0x03,fen);//令LCD在正确位置显示"加"设定好的分数据
  944.                                                         temp=(fen)/10*16+(fen)%10;//十进制转换成DS1302要求的DCB码
  945.                                                            write_1302(0x8e,0x00);//允许写,禁止写保护
  946.                                                            write_1302(0x82,temp);//向DS1302内写分寄存器82H写入调整后的分数据BCD码
  947.                                                            write_1302(0x8e,0x80);//打开写保护
  948.                                                         write_1602com(er+4);//因为设置液晶的模式是写入数据后,指针自动加一,在这里是写回原来的位置
  949.                                                         break;
  950.                                         case 3:shi++;
  951.                                                         if(shi==24)
  952.                                                                 shi=0;
  953.                                                         write_sfm(0x00,shi);//令LCD在正确的位置显示"加"设定好的小时数据
  954.                                                         temp=(shi)/10*16+(shi)%10;//十进制转换成DS1302要求的DCB码
  955.                                                            write_1302(0x8e,0x00);//允许写,禁止写保护
  956.                                                            write_1302(0x84,temp);//向DS1302内写小时寄存器84H写入调整后的小时数据BCD码
  957.                                                            write_1302(0x8e,0x80);//打开写保护
  958.                                                         write_1602com(er+1);//因为设置液晶的模式是写入数据后,指针自动加一,所以需要光标回位
  959.                                                         break;
  960.                                         /*
  961.                                         case 4:week++;
  962.                                                         if(week==8)
  963.                                                                 week=1;
  964.                                             write_1602com(yh+0x0C);//指定'加'后的周数据显示位置
  965.                                                                 write_week(week);//指定周数据显示内容
  966.                                             temp=(week)/10*16+(week)%10;//十进制转换成DS1302要求的DCB码
  967.                                                            write_1302(0x8e,0x00);//允许写,禁止写保护
  968.                                                            write_1302(0x8a,temp);//向DS1302内写周寄存器8aH写入调整后的周数据BCD码
  969.                                                            write_1302(0x8e,0x80);//打开写保护
  970.                                                            write_1602com(yh+0x0e);//因为设置液晶的模式是写入数据后,指针自动加一,所以需要光标回位
  971.                                                         break;
  972.                                         */
  973.                                         case 4:ri++;
  974.                                                         if((yue==12)||(yue==10)||(yue==8)||(yue==7)||(yue==5)||(yue==3)||(yue==1))
  975.                   {
  976.                      if(ri>=32)  ri=1;
  977.                   }  
  978.                   else if(yue!=2)
  979.                   {
  980.                      if(ri>=31)  ri=1;
  981.                   }
  982.                                                 else
  983.                   {
  984.                      if(((nian%4)==0))
  985.                                                         {
  986.                         if(nian%100==0)
  987.                         {
  988.                            if((nian%400)==0) if(ri==30)  ri=1;
  989.                            else if(ri>=29)  ri=1;
  990.                         }
  991.                         else if(ri>29)  ri=1;
  992.                      }
  993.                      else if(ri>=29)  ri=1;
  994.                   }
  995.                                                         Conver_week(nian,yue,ri);
  996.                                                         write_week(week);
  997.                                                         write_nyr(9,ri);//令LCD在正确的位置显示"加"设定好的日期数据
  998.                                                         temp=(ri)/10*16+(ri)%10;//十进制转换成DS1302要求的DCB码
  999.                                                            write_1302(0x8e,0x00);//允许写,禁止写保护
  1000.                                                            write_1302(0x86,temp);//向DS1302内写日期寄存器86H写入调整后的日期数据BCD码
  1001.                                                            write_1302(0x8e,0x80);//打开写保护
  1002.                                                         write_1602com(yh+10);//因为设置液晶的模式是写入数据后,指针自动加一,所以需要光标回位
  1003.                                
  1004.                                                         break;
  1005.                                         case 5:yue++;
  1006.                                                         if(yue==13)        yue=1;
  1007.                      if((yue==11)||(yue==9)||(yue==6)||(yue==4))
  1008.                      {
  1009.                         if(ri>30)  {ri=30;write_nyr(9,ri);}//令LCD在正确的位置显示"加"设定好的日期数据
  1010.                      }  
  1011.                      else if(yue==2)
  1012.                      {
  1013.                         if(((nian%4)==0))
  1014.                         {
  1015.                            if(nian%100==0)
  1016.                            {
  1017.                               if((nian%400)==0)
  1018.                               {
  1019.                                  if(ri>29)
  1020.                                  {ri=29;write_nyr(9,ri);}
  1021.                               }
  1022.                            }
  1023.                            else if(ri>29) {ri=29;write_nyr(9,ri);}
  1024.                         }
  1025.                         else if(ri>28)  {ri=28;write_nyr(9,ri);}
  1026.                         
  1027.                      }
  1028.                                                         Conver_week(nian,yue,ri);
  1029.                                                         write_week(week);
  1030.                                                         write_nyr(6,yue);//令LCD在正确的位置显示"加"设定好的月份数据
  1031.                                                         temp=(yue)/10*16+(yue)%10;//十进制转换成DS1302要求的DCB码
  1032.                                                            write_1302(0x8e,0x00);//允许写,禁止写保护
  1033.                                                            write_1302(0x88,temp);//向DS1302内写月份寄存器88H写入调整后的月份数据BCD码
  1034.                                                            write_1302(0x8e,0x80);//打开写保护
  1035.                                                         write_1602com(yh+7);//因为设置液晶的模式是写入数据后,指针自动加一,所以需要光标回位
  1036.                                
  1037.                                                         break;
  1038.                                         case 6:nian++;
  1039.                                                  if(nian==100)
  1040.                                                         nian=0;
  1041.                      if(yue==2)
  1042.                      {
  1043.                         if(((nian%4)==0))
  1044.                         {
  1045.                            if(nian%100==0)
  1046.                            {
  1047.                               if((nian%400)==0)
  1048.                               {
  1049.                                  if(ri>29)
  1050.                                  {ri=29;write_nyr(9,ri);}
  1051.                               }
  1052.                            }
  1053.                            else if(ri>29) {ri=29;write_nyr(9,ri);}
  1054.                         }
  1055.                         else if(ri>28)  {ri=28;write_nyr(9,ri);}
  1056.                         
  1057.                      }
  1058.                                                         Conver_week(nian,yue,ri);
  1059.                                                         write_week(week);
  1060.                                                         write_nyr(3,nian);//令LCD在正确的位置显示"加"设定好的年份数据
  1061.                                             temp=(nian)/10*16+(nian)%10;//十进制转换成DS1302要求的DCB码
  1062.                                                            write_1302(0x8e,0x00);//允许写,禁止写保护
  1063.                                                            write_1302(0x8c,temp);//向DS1302内写年份寄存器8cH写入调整后的年份数据BCD码
  1064.                                                            write_1302(0x8e,0x80);//打开写保护
  1065.                                                         write_1602com(yh+4);//因为设置液晶的模式是写入数据后,指针自动加一,所以需要光标回位
  1066.                                
  1067.                                                         break;
  1068.                                 }
  1069.                         }
  1070.        
  1071.                 }
  1072.                 //------------------减键dec,各句功能参照'加键'注释---------------
  1073.                 if(dec==0)
  1074.                 {
  1075.                         delay(10);//调延时,消抖动
  1076.                         if(dec==0)
  1077.                         {
  1078.                                 led1=0;
  1079.                                 bltime=0;

  1080. //                            buzzer=0;//蜂鸣器短响一次
  1081.                             delay(20);
  1082.                             buzzer=1;
  1083.                                 while(!dec);
  1084.                                 switch(setn)
  1085.                                 {
  1086.                                         case 1:
  1087.                                                 miao--;
  1088.                                                 if(miao==-1)
  1089.                                                         miao=59;//秒数据减到-1时自动变成59
  1090.                                                 write_sfm(0x06,miao);//在LCD的正确位置显示改变后新的秒数
  1091.                                     temp=(miao)/10*16+(miao)%10;//十进制转换成DS1302要求的DCB码
  1092.                                                    write_1302(0x8e,0x00); //允许写,禁止写保护
  1093.                                                    write_1302(0x80,temp); //向DS1302内写秒寄存器80H写入调整后的秒数据BCD码
  1094.                                                    write_1302(0x8e,0x80); //打开写保护
  1095.                                                 write_1602com(er+7);//因为设置液晶的模式是写入数据后,指针自动加一,在这里是写回原来的位置
  1096.                                                 //write_1602com(0x0b);
  1097.                                                 break;
  1098.                                         case 2:
  1099.                                                 fen--;
  1100.                                                 if(fen==-1)
  1101.                                                 fen=59;
  1102.                                                 write_sfm(3,fen);
  1103.                                                 temp=(fen)/10*16+(fen)%10;//十进制转换成DS1302要求的DCB码
  1104.                                                    write_1302(0x8e,0x00);//允许写,禁止写保护
  1105.                                                    write_1302(0x82,temp);//向DS1302内写分寄存器82H写入调整后的分数据BCD码
  1106.                                                    write_1302(0x8e,0x80);//打开写保护
  1107.                                                 write_1602com(er+4);//因为设置液晶的模式是写入数据后,指针自动加一,在这里是写回原来的位置
  1108.                                                 break;
  1109.        
  1110.                                         case 3:
  1111.                                                 shi--;
  1112.                                                   if(shi==-1)
  1113.                                                 shi=23;
  1114.                                                 write_sfm(0,shi);
  1115.                                                 temp=(shi)/10*16+(shi)%10;//十进制转换成DS1302要求的DCB码
  1116.                                                    write_1302(0x8e,0x00);//允许写,禁止写保护
  1117.                                                    write_1302(0x84,temp);//向DS1302内写小时寄存器84H写入调整后的小时数据BCD码
  1118.                                                    write_1302(0x8e,0x80);//打开写保护
  1119.                                                 write_1602com(er+1);//因为设置液晶的模式是写入数据后,指针自动加一,所以需要光标回位
  1120.                                                 break;
  1121.                         /*
  1122.                         case 4:week--;
  1123.                                         if(week==0)
  1124.                                                 week=7;
  1125.                                  
  1126.                     write_1602com(yh+0x0C);//指定'加'后的周数据显示位置
  1127.                                         write_week(week);//指定周数据显示内容
  1128.                                    temp=(week)/10*16+(week)%10;//十进制转换成DS1302要求的DCB码
  1129.                                    write_1302(0x8e,0x00);//允许写,禁止写保护
  1130.                                    write_1302(0x8a,temp);//向DS1302内写周寄存器8aH写入调整后的周数据BCD码
  1131.                                    write_1302(0x8e,0x80);//打开写保护
  1132.                                    write_1602com(yh+0x0e);//因为设置液晶的模式是写入数据后,指针自动加一,所以需要光标回位
  1133.                                 break;
  1134.                         */
  1135.                                         case 4:
  1136.                                                 ri--;
  1137.                                                 if((yue==12)||(yue==10)||(yue==8)||(yue==7)||(yue==5)||(yue==3)||(yue==1))
  1138.                   {
  1139.                      if(ri==0)  ri=31;
  1140.                   }  
  1141.                   else if(yue!=2)
  1142.                   {
  1143.                      if(ri==0)  ri=30;
  1144.                   }
  1145.                                                 else
  1146.                   {
  1147.                      if(((nian%4)==0))
  1148.                                                         {
  1149.                         if(nian%100==0)
  1150.                         {
  1151.                            if((nian%400)==0) if(ri==0)  ri=29;
  1152.                            else if(ri==0)  ri=28;
  1153.                         }
  1154.                         else if(ri==0)  ri=29;
  1155.                      }
  1156.                      else if(ri==0)  ri=28;
  1157.                   }
  1158.                                                 Conver_week(nian,yue,ri);
  1159.                                                 write_week(week);
  1160.                                                 write_nyr(9,ri);
  1161.                                                 temp=(ri)/10*16+(ri)%10;//十进制转换成DS1302要求的DCB码
  1162.                                                    write_1302(0x8e,0x00);//允许写,禁止写保护
  1163.                                                    write_1302(0x86,temp);//向DS1302内写日期寄存器86H写入调整后的日期数据BCD码
  1164.                                                    write_1302(0x8e,0x80);//打开写保护
  1165.                                                 write_1602com(yh+10);//因为设置液晶的模式是写入数据后,指针自动加一,所以需要光标回位               
  1166.                                                 break;
  1167.                                         case 5:
  1168.                                                 yue--;
  1169.                   if(yue==0)
  1170.                                                 yue=12;

  1171.                   if((yue==11)||(yue==9)||(yue==6)||(yue==4))
  1172.                      {
  1173.                         if(ri>30)  {ri=30;write_nyr(9,ri);}//令LCD在正确的位置显示"加"设定好的日期数据
  1174.                      }  
  1175.                      else if(yue==2)
  1176.                      {
  1177.                         if(((nian%4)==0))
  1178.                         {
  1179.                            if(nian%100==0)
  1180.                            {
  1181.                               if((nian%400)==0)
  1182.                               {
  1183.                                  if(ri>29)
  1184.                                  {ri=29;write_nyr(9,ri);}
  1185.                               }
  1186.                            }
  1187.                            else if(ri>29) {ri=29;write_nyr(9,ri);}
  1188.                         }
  1189.                         else if(ri>28)  {ri=28;write_nyr(9,ri);}
  1190.                         
  1191.                      }
  1192.                                                 Conver_week(nian,yue,ri);
  1193.                                                 write_week(week);
  1194.                                                 write_nyr(6,yue);
  1195.                                                 temp=(yue)/10*16+(yue)%10;//十进制转换成DS1302要求的DCB码
  1196.                                                    write_1302(0x8e,0x00);//允许写,禁止写保护
  1197.                                                    write_1302(0x88,temp);//向DS1302内写月份寄存器88H写入调整后的月份数据BCD码
  1198.                                                    write_1302(0x8e,0x80);//打开写保护
  1199.                                                 write_1602com(yh+7);//因为设置液晶的模式是写入数据后,指针自动加一,所以需要光标回位
  1200.                        
  1201.                                                 break;       
  1202.                                         case 6:
  1203.                                                 nian--;
  1204.                                                  if(nian==-1)
  1205.                                                 nian=99;
  1206.                   if(nian==100)
  1207.                                                         nian=0;
  1208.                      if(yue==2)
  1209.                      {
  1210.                         if(((nian%4)==0))
  1211.                         {
  1212.                            if(nian%100==0)
  1213.                            {
  1214.                               if((nian%400)==0)
  1215.                               {
  1216.                                  if(ri>29)
  1217.                                  {ri=29;write_nyr(9,ri);}
  1218.                               }
  1219.                            }
  1220.                            else if(ri>29) {ri=29;write_nyr(9,ri);}
  1221.                         }
  1222.                         else if(ri>28)  {ri=28;write_nyr(9,ri);}
  1223.                         
  1224.                      }
  1225.                                                 Conver_week(nian,yue,ri);
  1226.                                                 write_week(week);
  1227.                                                 write_nyr(3,nian);
  1228.                                          temp=(nian)/10*16+(nian)%10;//十进制转换成DS1302要求的DCB码
  1229.                                                    write_1302(0x8e,0x00);//允许写,禁止写保护
  1230.                                                    write_1302(0x8c,temp);//向DS1302内写年份寄存器8cH写入调整后的年份数据BCD码
  1231.                                                    write_1302(0x8e,0x80);//打开写保护
  1232.                                                 write_1602com(yh+4);//因为设置液晶的模式是写入数据后,指针自动加一,所以需要光标回位
  1233.                                                 break;
  1234.                                                                
  1235.                                 }
  1236.                         }
  1237.                 }
  1238.         }
  1239.         if((setNZn!=0)&&(setn==0))
  1240.         {
  1241.                 if(add==0)  //上调键
  1242.                 {
  1243.                         delay(10);
  1244.                         if(add==0)
  1245.                         {
  1246.                                 led1=0;
  1247.                                 bltime=0;

  1248. //                            buzzer=0;//蜂鸣器短响一次
  1249.                             delay(20);
  1250.                             buzzer=1;
  1251.                                 while(!add);
  1252.                                 switch(setNZn)
  1253.                                 {
  1254.                                         case 1:
  1255.                                                 nz_miao++;                                //设置键按动1次,调秒
  1256.                                                 if(nz_miao==60)
  1257.                                                         nz_miao=0;//秒超过59,再加1,就归零
  1258.                                                 write_sfm(14,nz_miao);//令LCD在正确位置显示"加"设定好的秒数
  1259.                                                 write_1602com(er+15);//因为设置液晶的模式是写入数据后,光标自动右移,所以要指定返回
  1260.                                                 break;
  1261.                                         case 2:
  1262.                                                 nz_fen++;
  1263.                                                 if(nz_fen==60)
  1264.                                                         nz_fen=0;
  1265.                                                 write_sfm(11,nz_fen);//令LCD在正确位置显示"加"设定好的分数据
  1266.                                                 write_1602com(er+12);//因为设置液晶的模式是写入数据后,指针自动加一,在这里是写回原来的位置
  1267.                                                 break;
  1268.                                         case 3:
  1269.                                                 nz_shi++;
  1270.                                                 if(nz_shi==24)
  1271.                                                         nz_shi=0;
  1272.                                                 write_sfm(8,nz_shi);//令LCD在正确的位置显示"加"设定好的小时数据
  1273.                                                 write_1602com(er+9);//因为设置液晶的模式是写入数据后,指针自动加一,所以需要光标回位
  1274.                                                 break;
  1275.                                 }
  1276.                         }
  1277.        
  1278.                 }
  1279.                 //------------------减键dec,各句功能参照'加键'注释---------------
  1280.                 if(dec==0)
  1281.                 {
  1282.                         delay(10);//调延时,消抖动
  1283.                         if(dec==0)
  1284.                         {
  1285.                                 led1=0;
  1286.                                 bltime=0;

  1287. //                            buzzer=0;//蜂鸣器短响一次
  1288.                             delay(20);
  1289.                             buzzer=1;
  1290.                                 while(!dec);
  1291.                                 switch(setNZn)
  1292.                                 {
  1293.                                         case 1:
  1294.                                                 nz_miao--;
  1295.                                                 if(nz_miao==-1)
  1296.                                                         nz_miao=59;//秒数据减到-1时自动变成59
  1297.                                                 write_sfm(14,nz_miao);//在LCD的正确位置显示改变后新的秒数
  1298.                                                 write_1602com(er+15);
  1299.                                                 break;
  1300.                                         case 2:
  1301.                                                 nz_fen--;
  1302.                                                 if(nz_fen==-1)
  1303.                                                         nz_fen=59;
  1304.                                                 write_sfm(11,nz_fen);
  1305.                                                 write_1602com(er+12);//因为设置液晶的模式是写入数据后,指针自动加一,在这里是写回原来的位置
  1306.                                                 break;
  1307.        
  1308.                                         case 3:
  1309.                                                 nz_shi--;
  1310.                                                   if(nz_shi==-1)
  1311.                                                 nz_shi=23;
  1312.                                                 write_sfm(8,nz_shi);
  1313.                                                 write_1602com(er+9);//因为设置液晶的模式是写入数据后,指针自动加一,所以需要光标回位
  1314.                                                 break;
  1315.                                                                
  1316.                                 }
  1317.                         }
  1318.                 }
  1319.         }       
  1320. }

  1321. //-------------------------------
  1322. void init(void)   //定时器、计数器设置函数
  1323. {
  1324.         TMOD=0x11;                 //指定定时/计数器的工作方式为3
  1325.         TH0=0;                         //定时器T0的高四位=0
  1326.         TL0=0;                  //定时器T0的低四位=0
  1327.         TH1=0x3C;
  1328.         TL1=0xB0;
  1329.         EA=1;                          //系统允许有开放的中断
  1330.         ET0=1;                         //允许T0中断
  1331.         ET1=1;
  1332.         IT1=1;
  1333.         IT0=0;
  1334.         TR0=1;                         //开启中断,启动定时器
  1335.         TR1=0;
  1336. }


  1337. void alarm(void)
  1338. {
  1339.         if((shi==nz_shi)&&(fen==nz_fen)&&(miao==0))
  1340.         {
  1341.                         buzzer=0;
  1342.         }
  1343.         if((shi==nz_shi)&&(fen==(nz_fen+1)))
  1344.         {
  1345.                 TR1=0;
  1346.                 buzzer=1;
  1347.         }
  1348. }


  1349. void ZD_baoshi(void)
  1350. {
  1351.         buzzer=0;
  1352.         delay(5);
  1353.         buzzer=1;
  1354.         bsn++;
  1355.         if(bsn==temp_hour)
  1356.         {
  1357.                 baoshi=0;
  1358.         }
  1359. }

  1360. //*******************主函数**************************
  1361. //***************************************************
  1362. void main()
  1363. {
  1364.         P1=0xff;
  1365.         lcd_init();      //调用液晶屏初始化子函数
  1366.         ds1302_init();   //调用DS1302时钟的初始化子函数
  1367.         init();          //调用定时计数器的设置子函数
  1368.         led=1;           //打开LCD的背光电源
  1369.    // buzzer=0;                 //蜂鸣器长响一次
  1370.     delay(80);
  1371.     buzzer=1;
  1372.         while(1)  //无限循环下面的语句:
  1373.         {               
  1374.                     keyscan();      //调用键盘扫描子函数
  1375.                 led=led1;               
  1376.                 if(timerOn==1)
  1377.                         alarm();        //闹钟输出
  1378.                 if((fen==0)&&(miao==0))
  1379.                 {
  1380.                         if(shi>12)
  1381. ……………………

  1382. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

所有资料51hei提供下载:
程序.zip (132.42 KB, 下载次数: 9)
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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