標(biāo)題: lcd1602+DS3231+STC89C53單片機(jī)簡單時鐘制作 [打印本頁]
作者: xiashan    時間: 2015-4-5 16:07
標(biāo)題: lcd1602+DS3231+STC89C53單片機(jī)簡單時鐘制作
本帖最后由 xiashan 于 2015-4-5 16:14 編輯















1.bell.c
  1. #include "main.h"

  3. // 原始頻率表，低音。
  4. uint code  FreTab[12]={262,277,293,311,329,349,370,392,415,440,466,494};
  5. // 1-7.
  6. uchar code  XY_Tab[7]={0,2,4,5,7,9,11};

  8. uint New_FreTab[12];

  10. void Delay_10MS()
  11. {
  12. uchar a,b;
  13. for(a = 50;a>0;a--)
  14.   {
  15.    for(b = 100;b>0;b--);
  16.   }
  17. }
  18. uchar YC_Tab[]={1,2,4,8,16,32,64};

  20. void Beep(uchar num)
  21. {
  22. uint i,j;
  23. uchar D=60,E=20;
  24. switch(num)
  25. {
  26.    case 1:      //開機(jī)響鈴  ·
  27.    j=0;while(j<300){BEE=!BEE;for(i=0;i<D;i++){;}j++;};
  28.    break;
  29.    case 2:      //簡單鬧鈴  ·
  30.    j=0;while(j<400){BEE=!BEE;for(i=0;i<E;i++){;}j++;}for(i=0;i<18;i++)Delay_10MS();
  31.    j=0;while(j<400){BEE=!BEE;for(i=0;i<E;i++){;}j++;}for(i=0;i<18;i++)Delay_10MS();
  32.    //j=0;while(j<400){BEE=!BEE;for(i=0;i<E;i++){;}j++;}for(i=0;i<12;i++)Delay_10MS();
  33.    j=0;while(j<500){BEE=!BEE;for(i=0;i<E;i++){;}j++;}
  34.    break;
  35.    case 3:      //操作按鍵響鈴  ·
  36.    j=0;while(j<200){BEE=!BEE;for(i=0;i<30;i++){;}j++;};
  37.    break;           

  39.   case 4:     //整點(diǎn)報(bào)時響鈴   —
  40.    j=0;while(j<2800){BEE=!BEE;for(i=0;i<D;i++){;}j++;}
  41.    break;   
  42. }
  43. BEE=1;
  44. }

  46. // QSD 0-11
  47. // SYD 1-3 1降8度 2不變，3升8度

  49. void JX_New_Few_FerTab(uchar QSD)
  50. {
  51. uchar i,j;

  53. for(i = 0 ;i <12;i++)    // 12次循環(huán)
  54.   {
  55.    j = i +QSD;    //根據(jù)起始調(diào)判斷起始音符位置
  56.    if(j >11)     //如果起始調(diào)不是最低
  57.     {
  58.      j = j - 12;  // 0-11
  59.      New_FreTab[i] = FreTab[j]*2;// 頻率*2
  60.     }
  61.    else        //頻率不變
  62.     {
  63.      New_FreTab[i] = FreTab[j];
  64.     }
  65.    /*if(SYD == 1)      //判斷升降調(diào)。1降調(diào)，2不變，3升調(diào)。
  66.     {
  67.      New_FreTab[i] >>= 1;//頻率減一半
  68.     }
  69.    else
  70.     {
  71.      if(SYD == 3)
  72.       {
  73.        New_FreTab[i] <<= 1;
  74.       }
  75.     }*/
  76.   }
  77. }


  80. void Play_Music(uchar *Sound,uchar QSD)
  81. {
  82. uint GQ_CD = 0;     //歌曲長度
  83. uint GQ_WZ = 0;

  85. uchar GQ_YG = 0;
  86. uchar GQ_YC = 0;

  88. uint YP_PL = 0;

  90. uchar YG_Bai = 0;
  91. uchar YG_Shi = 0;
  92. uchar  YG_Ge = 0;

  94. uchar YC_Bai = 0;
  95. uchar YC_Shi = 0;
  96. uchar  YC_Ge = 0;

  98. uint DSD_PL = 0;

  100. uint YF0 = 0; // 1分音符變量
  101. uint YF1 = 0; // 發(fā)音長度時間
  102. uint YF2 = 0; //不發(fā)音長度時間
  103. uint YF4 = 0; // 4分音符時間

  105. uint FY_JG = 0;

  107. uint YZ_TC = 0;
  108. uint JF_YF = 0;

  110. uchar i =0;

  112. JX_New_Few_FerTab(QSD);

  114. while(Sound[GQ_CD] != 0)   //判斷歌曲長度
  115.   {
  116.    GQ_CD += 2;    //指向下一位音符數(shù)據(jù)
  117.   }

  119. while(GQ_WZ<GQ_CD && Al_Flag==1)
  120.   {
  121.    GQ_YG = Sound[GQ_WZ];

  123.    YG_Bai = GQ_YG/100;  // 1升半音，0不升
  124.    YG_Shi = GQ_YG/10%10; // 1低音，2為中音，3為高音
  125.    YG_Ge = GQ_YG%10;  // 1-7 音符位；
  126.    YP_PL = New_FreTab[XY_Tab[YG_Ge -1] + YG_Bai];// yg_ge -1 1-7 0-6

  128.    if(YG_Ge != 0)
  129.     {
  130.      switch(YG_Shi)
  131.       {
  132.        case 2: YP_PL <<=1;break;
  133.        case 3: YP_PL <<=2;break;
  134.       }
  135.      DSD_PL = 65536-(50000/YP_PL)*10;
  136.      Time_H = DSD_PL >>8;
  137.      Time_L = DSD_PL & 0xFF;
  138.      TH0 = Time_H;
  139.      TL0 = Time_L;
  140.     }


  143.    GQ_YC = Sound[GQ_WZ +1];

  145.    YC_Bai = GQ_YC/100;  // 1有符點(diǎn)，0無符點(diǎn)
  146.    YC_Shi = GQ_YC/10%10; // 演奏效果0普通，1連音，2頓音
  147.    YC_Ge = GQ_YC%10;  // 幾分音符。

  149.    YF0 = YF_YF;
  150.    YF4 = YF0 /4;
  151.    FY_JG =YF4- YF4 *SFYF_JG;

  153.    JF_YF = YC_Tab[YC_Ge];// 幾分音符；
  154.    YZ_TC = YF0 /JF_YF;   // 算出對應(yīng)延時長度多少個10MS
  155.    
  156.    if(YC_Bai == 1)   //判斷是否有符點(diǎn)
  157.     {
  158.      YZ_TC = YZ_TC+YZ_TC/2;//有符點(diǎn)
  159.     }

  161.    if(YC_Shi != 1)   //不是連音
  162.     {
  163.      if(YC_Shi == 0) //是否為普通音
  164.       {
  165.        if(JF_YF <= 4) // 是否小于16分音
  166.         {
  167.          YF1 = YZ_TC -FY_JG; // 發(fā)音有間隔
  168.         }
  169.        else   // 不小于16分音
  170.         {
  171.          YF1 = YZ_TC * SFYF_JG;//發(fā)音無音隔
  172.         }
  173.       }
  174.      else     //是頓音，演奏時間為原來的一半
  175.       {
  176.        YF1 = YZ_TC /2;
  177.       }
  178.     }
  179.    else       //是連音，發(fā)音無音隔
  180.     {
  181.      YF1 = YZ_TC;
  182.     }

  184.    if(YG_Ge == 0)    //沒有音符數(shù)據(jù)
  185.     {
  186.      YF1 = 0;    //演奏時間 ＝ 0
  187.     }
  188.    else       //有音符數(shù)據(jù)
  189.     {
  190.      YF2 = YZ_TC - YF1;

  192.      TR0 =1;
  193.      for(i = YF1; i >0;i --)
  194.       {
  195.        Delay_10MS();
  196.       }
  197.      BEE = 1;
  198.      TR0 = 0;
  199.      for(i = YF2; i >0;i --)
  200.       {
  201.        Delay_10MS();
  202.       }     
  203.     }
  204.    GQ_WZ += 2;     //指向下一個音符
  205.    
  206.   }
  207. }
復(fù)制代碼

2.bell.h
  1. #ifndef __BELL_H__
  2. #define __BELL_H__

  4. #define uchar unsigned char
  5. #define uint  unsigned int
  6. #define YF_YF  160
  7. #define SFYF_JG 4/5

  9. sbit BEE = P3 ^ 4;

  11. void Beep(uchar num);
  12. void Delay_10MS(void);
  13. void JX_New_Few_FerTab(uchar QSD);
  14. void Play_Music(uchar *Sound,uchar QSD);

  16. #endif
復(fù)制代碼


3.DS18B20.C
  1. #include "main.h"

  3. uchar temp_I;//測量到的溫度的整數(shù)部分
  4. uchar xiaoshu1;//小數(shù)第一位
  5. //uchar xiaoshu,xiaoshu2;//小數(shù)第二位
  6. bit  fg=1;        //溫度正負(fù)標(biāo)志，等于0時為負(fù)數(shù)

  8. //溫度處理程序
  9. /***********ds18b20子程序*************************/

  11. /***********ds18b20延遲子函數(shù)（晶振12MHz ）*******/

  13. void delay_18B20(uchar i)
  14. {
  15.     while(--i);
  16. }

  18. void delay500(void)   //12M延時500us，誤差 0us
  19. {
  20.     uchar a,b;
  21.     for(b=71;b>0;b--)
  22.         for(a=2;a>0;a--);
  23. }

  25. /**********ds18b20初始化函數(shù)**********************/

  27. bit Init_DS18B20()
  28. {
  29.   bit x=0;
  30.   DQ = 1;          //DQ復(fù)位
  31.   delay_18B20(16);  //稍做延時
  32.   DQ = 0;          //單片機(jī)將DQ拉低
  33.   delay500(); //精確延時480us-960us
  34.   DQ = 1;          //拉高總線
  35.   delay_18B20(27);//等待60us
  36.   x=DQ;            //如果返回脈沖為低則初始化成功 x=1則初始化失敗
  37.   delay_18B20(238); //延時，DS18B20釋放總線
  38.   return x;
  39. }

  41. /***********ds18b20讀一個字節(jié)**************/

  43. uchar ReadOneChar()
  44. {
  45. uchar i=0;
  46. uchar dat = 0;
  47. for (i=8;i>0;i--)
  48. {
  49.   DQ = 0; // 給脈沖信號
  50.   dat>>=1;
  51.   DQ = 1; // 給脈沖信號
  52.   delay_18B20(1);//等待7us
  53.   if(DQ){dat|=0x80;}
  54.   delay_18B20(20);//延時40us，讀數(shù)據(jù)結(jié)束
  55.   DQ = 1;
  56.   delay_18B20(1);
  57.   }
  58.   return(dat);
  59. }

  61. /*************ds18b20寫一個字節(jié)****************/

  63. void WriteOneChar(uchar dat)
  64. {
  65.   uchar i=0;
  66.   for (i=8; i>0; i--)
  67.   {
  68.     DQ = 0;
  69.      delay_18B20(5);
  70.    DQ = dat&0x01;
  71.      delay_18B20(20);
  72.    DQ = 1;
  73.      dat>>=1;
  74. }
  75. }

  77. /**************設(shè)定溫度精度為10位******************************/
  78. void Write_18B20()
  79. {
  80. if(Init_DS18B20()==0){
  81.   WriteOneChar(0xCC);           //跳過讀序號列號的操作
  82.   WriteOneChar(0x4E);           //將設(shè)定的溫度報(bào)警值寫入 DS18B20
  83.   WriteOneChar(0x64);  //寫TH
  84.   WriteOneChar(0x00);  //寫TL
  85.   WriteOneChar(0x3F);           //10位精確度

  87.   Init_DS18B20();
  88.   WriteOneChar(0xCC);           //跳過讀序號列號的操作
  89.   WriteOneChar(0x48);           //把暫存器里的溫度報(bào)警值拷貝到EEROM
  90. }
  91. }

  93. /**************讀取ds18b20當(dāng)前溫度************
  94. /*****************************************************************************************
  95. **函數(shù)名：ReadTemperature(void)
  96. **輸  入：
  97. **輸  出：
  98. **說  明：讀溫度值（低位放tempL;高位放tempH;）
  99. ******************************************************************************************/
  100. bit ReadTemp()
  101. {
  102. uchar tempL,tempH;
  103. if(Init_DS18B20()==0){
  104.   WriteOneChar(0xCC); //跳過讀序列號的操作
  105.   WriteOneChar(0x44); //啟動溫度轉(zhuǎn)換

  107.   Init_DS18B20();
  108.   WriteOneChar(0xCC); //跳過讀序列號的操作
  109.   WriteOneChar(0xBE); //讀溫度寄存器（頭兩個值分別為溫度的低位和高位）
  110.   tempL=ReadOneChar(); //讀出溫度的低位LSB
  111.   tempH=ReadOneChar(); //讀出溫度的高位MSB
  112.   
  113.   if(tempH>0x7f)      //最高位為1時溫度是負(fù)
  114.   {
  115.    tempL=~tempL+1;         //補(bǔ)碼轉(zhuǎn)換，取反加一
  116.    tempH=~tempH;      
  117.    fg=1;      //讀取溫度為負(fù)時fg=1
  118.   }
  119.   else fg=0;
  120.   temp_I = tempL/16+tempH*16;      //整數(shù)部分
  121.   xiaoshu1 = (tempL&0x0f)*10/16; //小數(shù)第一位
  122.   //xiaoshu2 = (tempL&0x0f)*100/16;//小數(shù)第二位
  123.   //xiaoshu=xiaoshu1*10+xiaoshu2; //小數(shù)兩位
  124.   return 0;
  125. }
  126. else return 1;
  127. }
  128. //溫度處理程序結(jié)束
復(fù)制代碼

4.DS18B20.H
  1. #ifndef __DS18B20_H__
  2. #define __DS18B20_H__

  4. //DS18B20管腳定義
  5. sbit DQ = P1^0;

  7. extern uchar temp_I;
  8. extern bit fg;

  10. extern bit Init_DS18B20();
  11. void Write_18B20();
  12. extern bit ReadTemp();


  15. #endif#ifndef __DS18B20_H__
  16. #define __DS18B20_H__

  18. //DS18B20管腳定義
  19. sbit DQ = P1^0;

  21. extern uchar temp_I;
  22. extern bit fg;

  24. extern bit Init_DS18B20();
  25. void Write_18B20();
  26. extern bit ReadTemp();


  29. #endif
復(fù)制代碼

5.DS3231.C
  1. #include "DS3231.H"

  3. /************************* Global Variables ***************************/
  4. xdata   uchar   sec, min, hour, day, date, month, year;
  5. xdata uchar  Dtemp;

  7. /**************************** functions ******************************/
  8. void delay()
  9. {
  10.   ;;
  11. }

  13. void start()            /* --------- Initiate start condition ---------- */
  14. {
  15. sda = 1; delay();
  16. scl = 1; delay();
  17. sda = 0; delay();
  18. scl = 0;
  19. }
  20. void stop()             /* ---------- Initiate stop condition ----------- */
  21. {
  22. sda = 0; delay();
  23. scl = 1; delay();
  24. sda = 1; delay();
  25. scl = 0;
  26. }

  28. void i2cack()
  29. {
  30. uchar i=0;
  31. scl=1;delay();
  32. while(sda==1 && i<255) i++;
  33. scl=0;delay();
  34. }
  35. void i2cwrite(uchar d)         /* ----------------------------- */
  36. {
  37. uchar i;

  39.   scl = 0;
  40.      for (i = 0;i < 8; i++)
  41.      {
  42.             sda = d & 0x80; /* Send the msbits first */
  43.          scl = 0;delay();
  44.    scl = 1;delay();
  45.          d = d << 1;     /* do shift here to increase scl high time */
  46.          scl = 0;
  47.      }
  48.      sda = 1;delay();        /* Release the sda line */
  49.      scl = 0;delay();
  50. }

  52. uchar i2cread(uchar b)   /* ----------------------------------- */
  53. {
  54. uchar i, d;

  56.         d = 0;
  57.         sda = 1;delay();             /* Let go of sda line */
  58.         scl = 0;delay();
  59.         for (i = 0; i < 8; i++) /* read the msb first */
  60.         {
  61.                 scl = 1;delay();
  62.     d = d << 1;
  63.     d = d | (uchar)sda;
  64.                 scl = 0;delay();
  65.         }
  66.         sda = b;delay();          /* low for ack, high for nack */
  67.         scl = 1;delay();
  68.         scl = 0;delay();
  69.         sda = 1;delay();          /* Release the sda line */
  70.         return d;
  71. }
  72. void i2cwrite_add(uchar address,uchar dat)//指定地址寫一個字節(jié)數(shù)據(jù)
  73. {
  74. start();
  75. i2cwrite(ADDRTC);
  76. i2cack();
  77. i2cwrite(address);
  78. i2cack();
  79. i2cwrite(dat);
  80. i2cack();
  81. stop();
  82. }
  83. uchar i2cread_add(uchar address)
  84. //指定地址讀一個字節(jié)數(shù)據(jù)
  85. {
  86. uchar dd;
  87. start();
  88. i2cwrite(ADDRTC);
  89. i2cack();
  90. i2cwrite(address);
  91. i2cack();
  92. start();
  93. i2cwrite(ADDRTC);
  94. i2cack();
  95. dd=i2cread(0);
  96. stop();
  97. return dd;
  98. }

  100. void    InitDS3231()     /* ----- set time & date; user data entry ------ */
  101. {
  102.   scl=1;delay();
  103.   sda=1;delay();

  105.      start();
  106.      i2cwrite(ADDRTC);       /* write slave address, write 1339 */
  107.      i2cwrite(0x00);  /* write register address, 1st clock register */
  108.      i2cwrite(0x00); //秒
  109.      i2cwrite(0x01); //分
  110.      i2cwrite(0x01); //時
  111.      i2cwrite(0x03); //星期
  112.      i2cwrite(0x12); //日
  113.      i2cwrite(0x01); //月
  114.      i2cwrite(0x11); //年
  115.      //i2cwrite(0x10); /* enable sqw, 1hz output */
  116.      stop();
  117. }
  118. void    GetTime()     /* --- get date/time from DS3231 --- */
  119. {
  120.         //while(int0);    /* loop until int pin goes low */
  121.         //start();
  122.         //i2cwrite(ADDRTC);
  123.         //i2cwrite(0x0f);
  124.         //i2cwrite(0);            /* clear alarm flags */
  125.         //stop();

  127.         start();
  128.         i2cwrite(ADDRTC);
  129.         i2cwrite(0);
  130.         start();
  131.         i2cwrite(ADDRTC | 1);
  132.         sec = i2cread(ACK);
  133.         min = i2cread(ACK);
  134.         hour= i2cread(ACK);
  135.         day = i2cread(ACK);
  136.         date= i2cread(ACK);
  137.         month= i2cread(ACK);
  138.         year= i2cread(NACK);
  139.         stop();
  140. }

  142. void    read_temp()       /* -------- read temperature -------- */
  143. {
  144. int     itemp;
  145. float   ftemp;

  147.         do
  148.         {
  149.                 start();
  150.                 i2cwrite(ADDRTC);
  151.                 i2cwrite(0x0e);         /* address of control register */
  152.                 start();
  153.                 i2cwrite(ADDRTC + 1);   /* send the device address for read */
  154.                 itemp = i2cread(NACK);  /* get the control register value */
  155.                 stop();
  156.         }       while(itemp & 0x20);            /* wait until CNVT bit goes inactive */

  158.         start();
  159.         i2cwrite(ADDRTC);
  160.         i2cwrite(0x11);                 /* address of temperature MSB */
  161.         start();
  162.         i2cwrite(ADDRTC + 1);           /* send the device address for read */
  163.         itemp = ( (int) i2cread(ACK) << 5 );
  164.         itemp += ( i2cread(NACK) >> 3);
  165.         stop();
  166.         if(itemp & 0x1000)      itemp += 0xe000;        /* if sign bit set, make 16 bit 2's comp */

  168.         ftemp = 0.03125 * (float) itemp;        /* convert to degrees C */
  169.         /* ftemp = ftemp * 9 / 5 + 32;  /* skip this if you don't want degrees F */
  170.   Dtemp  = (uchar) ftemp;
  171. }

  173. /*void    frq_out_tog()   // --- toggle en32khz bit to enable/disable sqw ---
  174. {
  175. uchar   val;

  177.         start();
  178.         i2cwrite(ADDRTC);
  179.         i2cwrite(0x0f);                 // control/status reg address
  180.         start();
  181.         i2cwrite(ADDRTC + 1);           //send the device address for read
  182.         val = i2cread(NACK);
  183.         stop();
  184.         val ^= 0x08;    //toggle en32khz bit
  185.         start();
  186.         i2cwrite(ADDRTC);
  187.         i2cwrite(0x0f);                 //control/status reg address
  188.         i2cwrite(val);
  189.         stop();
  190. }*/

  192. void    init_alrm()     /* --- enable alarm 1 for once-per-second --- */
  193. {
  194.         start();
  195.         i2cwrite(ADDRTC);
  196.         i2cwrite(7);            /* 1st alarm 1 reg address */
  197.         i2cwrite(0x80); /* mask alarm register */
  198.         i2cwrite(0x80);
  199.         i2cwrite(0x80);
  200.         i2cwrite(0x80);
  201.         stop();

  203.         start();
  204.         i2cwrite(ADDRTC);
  205.         i2cwrite(0x0e); /* control/status reg address */
  206.         i2cwrite(0x05); /* enable interrupts, alarm 1 output */
  207. }
  208. void    comm_init()     /* ------ reset DS3231 comm interface ------ */
  209. {
  210.         do      /* because the DS3231 I2C interface is active for both supplies */
  211.         {       /*  after a micro reset, we must get the comm into a known state */
  212.                 sda = 1;        /* make sure master has released SDA */
  213.                 scl = 1;
  214.                 if(sda) /* if sda is high, generate a start */
  215.                 {
  216.                         sda = 0;        /* The DS3231 will recognize a valid start */
  217.                         sda = 1;        /*  condition anywhere in a I2C data transfer */
  218.                 }
  219.                 scl = 0;
  220.         }       while(sda == 0);        /* if the DS3231 is holding sda low, try again */
  221. }
復(fù)制代碼

6.DS3231.H
  1. #ifndef __DS3231_H__
  2. #define __DS3231_H__

  4. #include <reg52.h>
  5. #include <intrins.h>

  7. #define uchar unsigned char
  8. #define uint  unsigned int

  10. sbit    scl = P1^7;             /* I2C pin definitions */
  11. sbit    sda = P1^6;
  12. sbit    int0 = P3^2;
  13. /**************************** defines *******************************/
  14. #define ADDRTC  0xd0    /* DS3231 slave address (write) */
  15. #define ACK     0
  16. #define NACK    1

  18. extern xdata   uchar   sec, min, hour, day, date, month, year,Dtemp;

  20. /*********************** Function Prototypes **************************/
  21. void    start();
  22. void    stop();
  23. void   i2cwrite(uchar d);
  24. uchar   i2cread(uchar b);
  25. void    writebyte();
  26. void    Init_DS3231();
  27. //void    frq_out_tog();
  28. void    init_alrm();
  29. void    comm_init();
  30. void GetTime(void);
  31. void SetTime(uchar yea,uchar mon,uchar da,uchar hou,uchar min,uchar sec);
  32. void i2cwrite_add(uchar address,uchar dat);
  33. uchar i2cread_add(uchar address);
  34. void InitDS3231();
  35. void    read_temp();

  37. #endif
復(fù)制代碼



7.KEY.C
  1. #include "MAIN.H"

  3. xdata uchar keyvalue,SetFlag=0;

  5. void Scan_Key()
  6. {
  7. uchar a=80;
  8. if(SET==0)
  9.     {
  10.         Delay5Ms();
  11.   if(SET==0)
  12.         {
  13.             keyvalue=1;
  14.    Beep(3);
  15.    Disp_b=0; //開始返回菜單計(jì)時
  16.         }
  17.         while((SET==0)&&a)
  18.   {
  19.    --a;
  20.    Delay5Ms();
  21.   }
  22.     }
  23.     if(UP==0)
  24.     {
  25.         Delay5Ms();
  26.         if(UP==0)
  27.         {
  28.    keyvalue=2;
  29.    Beep(3);
  30.    Disp_b=0;
  31.         }
  32.         while((UP==0)&&a)
  33.   {
  34.    --a;
  35.    Delay5Ms();
  36.   }
  37.     }
  38.     if(DOWN==0)
  39.     {         
  40.         Delay5Ms();
  41.         if(DOWN==0)
  42.         {
  43.             keyvalue=3;
  44.    Beep(3);
  45.    Disp_b=0;
  46.         }
  47.         while((DOWN==0)&&a)
  48.   {
  49.    --a;
  50.    Delay5Ms();
  51.   }
  52.     }
  53. }

  55. void KeyProcess()//時鐘設(shè)置程序
  56. {
  57. if(keyvalue==1)
  58. {
  59.   //DisplayStr(0,0,"    Time Set    ");
  60. //      ----------------
  61.   SetFlag++;
  62.   if(SetFlag==14) {SetFlag=0;Disp_Time();}
  63.   keyvalue=0;
  64. }
  65. switch(SetFlag)
  66. {
  67.   case 1:
  68.   {
  69.    Readtime();
  70.    DisplayStr(0,0,"    Adj Year    ");
  71. //       ----------------
  72.    DisplayStr(0,1,"20");
  73.    DisplayChar(2,1,Flash?(year/10+0x30):' ');
  74.    DisplayChar(3,1,Flash?(year%10+0x30):' ');
  75.    DisplayChar(4,1,0x00);
  76.    DisplayChar(5,1,month/10+0x30);
  77.    DisplayChar(6,1,month%10+0x30);
  78.    DisplayChar(7,1,0x01);
  79.    DisplayChar(8,1,date/10+0x30);
  80.    DisplayChar(9,1,date%10+0x30);
  81.    DisplayChar(10,1,0x02);
  82.    DisplayChar(11,1,' ');
  83.    switch(day)
  84.    {
  85.     case 1:DisplayStr(12,1,"Mon");break;
  86.     case 2:DisplayStr(12,1,"Tue");break;
  87.     case 3:DisplayStr(12,1,"Wed");break;
  88.     case 4:DisplayStr(12,1,"Thu");break;
  89.     case 5:DisplayStr(12,1,"Fri");break;
  90.     case 6:DisplayStr(12,1,"Sat");break;
  91.     case 7:DisplayStr(12,1,"Sun");break;
  92.     default :DisplayStr(12,1,"ERR");break;
  93.    }
  94.    DisplayChar(15,1,' ');
  95.    if(keyvalue==2&&SetFlag==1) //年+
  96.       {
  97.           Set(6,0);
  98.           keyvalue=0;
  99.       }
  100.    if(keyvalue==3&&SetFlag==1) //年-
  101.       {
  102.           Set(6,1);
  103.           keyvalue=0;
  104.       }
  105.      }
  106.   break;

  108.   case 2:
  109.   {
  110.    Readtime();
  111.    DisplayStr(0,0,"    Adj Month   ");
  112. //       ----------------
  113.    DisplayStr(0,1,"20");
  114.    DisplayChar(2,1,year/10+0x30);
  115.    DisplayChar(3,1,year%10+0x30);
  116.    DisplayChar(4,1,0x00);
  117.    DisplayChar(5,1,Flash?(month/10+0x30):' ');
  118.    DisplayChar(6,1,Flash?(month%10+0x30):' ');
  119.    DisplayChar(7,1,0x01);
  120.    DisplayChar(8,1,date/10+0x30);
  121.    DisplayChar(9,1,date%10+0x30);
  122.    DisplayChar(10,1,0x02);
  123.    DisplayChar(11,1,' ');
  124.    switch(day)
  125.    {
  126.     case 1:DisplayStr(12,1,"Mon");break;
  127.     case 2:DisplayStr(12,1,"Tue");break;
  128.     case 3:DisplayStr(12,1,"Wed");break;
  129.     case 4:DisplayStr(12,1,"Thu");break;
  130.     case 5:DisplayStr(12,1,"Fri");break;
  131.     case 6:DisplayStr(12,1,"Sat");break;
  132.     case 7:DisplayStr(12,1,"Sun");break;
  133.     default :DisplayStr(12,1,"ERR");break;
  134.    }
  135.    DisplayChar(15,1,' ');
  136.    if(keyvalue==2&&SetFlag==2) //月+
  137.       {
  138.           Set(5,0);
  139.           keyvalue=0;
  140.       }
  141.    if(keyvalue==3&&SetFlag==2) //月-
  142.       {
  143.           Set(5,1);
  144.           keyvalue=0;
  145.       }
  146.      }
  147.   break;

  149.   case 3:
  150.   {
  151.    Readtime();
  152.    DisplayStr(0,0,"    Adj Date    ");
  153. //       ----------------
  154.    DisplayStr(0,1,"20");
  155.    DisplayChar(2,1,year/10+0x30);
  156.    DisplayChar(3,1,year%10+0x30);
  157.    DisplayChar(4,1,0x00);
  158.    DisplayChar(5,1,month/10+0x30);
  159.    DisplayChar(6,1,month%10+0x30);
  160.    DisplayChar(7,1,0x01);
  161.    DisplayChar(8,1,Flash?(date/10+0x30):' ');
  162.    DisplayChar(9,1,Flash?(date%10+0x30):' ');
  163.    DisplayChar(10,1,0x02);
  164.    DisplayChar(11,1,' ');
  165.    switch(day)
  166.    {
  167.     case 1:DisplayStr(12,1,"Mon");break;
  168.     case 2:DisplayStr(12,1,"Tue");break;
  169.     case 3:DisplayStr(12,1,"Wed");break;
  170.     case 4:DisplayStr(12,1,"Thu");break;
  171.     case 5:DisplayStr(12,1,"Fri");break;
  172.     case 6:DisplayStr(12,1,"Sat");break;
  173.     case 7:DisplayStr(12,1,"Sun");break;
  174.     default :DisplayStr(12,1,"ERR");break;
  175.    }
  176.    DisplayChar(15,1,' ');
  177.    if(keyvalue==2&&SetFlag==3) //日+
  178.       {
  179.           Set(4,0);
  180.           keyvalue=0;
  181.       }
  182.    if(keyvalue==3&&SetFlag==3) //日-
  183.       {
  184.           Set(4,1);
  185.           keyvalue=0;
  186.       }
  187.      }
  188.   break;

  190.   case 4:
  191.   {
  192.    Readtime();
  193.    DisplayStr(0,0,"    Adj Hour    ");
  194. //       ----------------
  195.    DisplayChar(0,1,month/10+0x30);
  196.    DisplayChar(1,1,month%10+0x30);
  197.    DisplayChar(2,1,0x01);
  198.    DisplayChar(3,1,date/10+0x30);
  199.    DisplayChar(4,1,date%10+0x30);
  200.    DisplayChar(5,1,0x02);
  201.    DisplayChar(6,1,' ');
  202.    DisplayChar(7,1,' ');
  203.    DisplayChar(8,1,Flash?(hour/10+0x30):' ');
  204.    DisplayChar(9,1,Flash?(hour%10+0x30):' ');
  205.    DisplayChar(10,1,':');
  206.    DisplayChar(11,1,min/10+0x30);
  207.    DisplayChar(12,1,min%10+0x30);
  208.    DisplayChar(13,1,':');
  209.    DisplayChar(14,1,sec/10+0x30);
  210.    DisplayChar(15,1,sec%10+0x30);
  211.    if(keyvalue==2&&SetFlag==4) //時+
  212.    {
  213.        Set(2,0);
  214.        keyvalue=0;
  215.    }
  216.    if(keyvalue==3&&SetFlag==4) //時-
  217.    {
  218.        Set(2,1);
  219.        keyvalue=0;
  220.    }
  221.      }
  222.   break;

  224.   case 5:
  225.   {
  226.    Readtime();
  227.    DisplayStr(0,0,"   Adj Minute   ");
  228. //       ----------------
  229.    DisplayChar(0,1,month/10+0x30);
  230.    DisplayChar(1,1,month%10+0x30);
  231.    DisplayChar(2,1,0x01);
  232.    DisplayChar(3,1,date/10+0x30);
  233.    DisplayChar(4,1,date%10+0x30);
  234.    DisplayChar(5,1,0x02);
  235.    DisplayChar(6,1,' ');
  236.    DisplayChar(7,1,' ');
  237.    DisplayChar(8,1,hour/10+0x30);
  238.    DisplayChar(9,1,hour%10+0x30);
  239.    DisplayChar(10,1,':');
  240.    DisplayChar(11,1,Flash?(min/10+0x30):' ');
  241.    DisplayChar(12,1,Flash?(min%10+0x30):' ');
  242.    DisplayChar(13,1,':');
  243.    DisplayChar(14,1,sec/10+0x30);
  244.    DisplayChar(15,1,sec%10+0x30);
  245.    if(keyvalue==2&&SetFlag==5) //分+
  246.    {
  247.        Set(1,0);
  248.        keyvalue=0;
  249.    }
  250.    if(keyvalue==3&&SetFlag==5) //分-
  251.    {
  252.        Set(1,1);
  253.        keyvalue=0;
  254.    }
  255.   }
  256.   break;

  258.   case 6:
  259.   {
  260.    Readtime();
  261.    DisplayStr(0,0,"   Adj Second   ");
  262. //       ----------------
  263.    DisplayChar(0,1,month/10+0x30);
  264.    DisplayChar(1,1,month%10+0x30);
  265.    DisplayChar(2,1,0x01);
  266.    DisplayChar(3,1,date/10+0x30);
  267.    DisplayChar(4,1,date%10+0x30);
  268.    DisplayChar(5,1,0x02);
  269.    DisplayChar(6,1,' ');
  270.    DisplayChar(7,1,' ');
  271.    DisplayChar(8,1,hour/10+0x30);
  272.    DisplayChar(9,1,hour%10+0x30);
  273.    DisplayChar(10,1,':');
  274.    DisplayChar(11,1,min/10+0x30);
  275.    DisplayChar(12,1,min%10+0x30);
  276.    DisplayChar(13,1,':');
  277.    DisplayChar(14,1,Flash?(sec/10+0x30):' ');
  278.    DisplayChar(15,1,Flash?(sec%10+0x30):' ');
  279.    if(keyvalue==2&&SetFlag==6) //秒+
  280.       {
  281.           Set(0,0);
  282.           keyvalue=0;
  283.       }
  284.    if(keyvalue==3&&SetFlag==6) //秒-
  285.       {
  286.           Set(0,1);
  287.           keyvalue=0;
  288.       }
  289.      }
  290.   break;

  292.   case 7:
  293.   {
  294.    ReadAlarm();
  295.    DisplayStr(0,0,"   Alarm1 Set   ");
  296. //       ----------------
  297. //       ALARM1 OFF **:**
  298.    DisplayStr(0,1,"ALARM1");
  299.    DisplayChar(6,1,' ');
  300.    if((I2CReadAdd(DS3231_CONTROL) & 0x01)==0) DisplayStr(7,1,Flash?("   "):("OFF"));
  301.    else DisplayStr(7,1,Flash?("   "):(" ON"));
  302.    DisplayChar(10,1,' ');
  303.    DisplayChar(11,1,al1_hour/10+0x30);
  304.    DisplayChar(12,1,al1_hour%10+0x30);
  305.    DisplayChar(13,1,':');
  306.    DisplayChar(14,1,al1_min/10+0x30);
  307.    DisplayChar(15,1,al1_min%10+0x30);
  308.    if((keyvalue==2||keyvalue==3)&&SetFlag==7) //鬧鈴1開關(guān)
  309.       {
  310.           Set(50,1);
  311.           keyvalue=0;
  312.       }
  313.      }
  314.   break;

  316.   case 8:
  317.   {
  318.    ReadAlarm();
  319.    DisplayStr(0,0,"  AL1 Adj Hour  ");
  320. //       ----------------
  321.    DisplayStr(0,1,"ALARM1");
  322.    DisplayChar(6,1,' ');
  323.    DisplayStr(7,1,(I2CReadAdd(DS3231_CONTROL) & 0x01)?(" ON"):("OFF"));
  324.    DisplayChar(10,1,' ');
  325.    DisplayChar(11,1,Flash?(al1_hour/10+0x30):' ');
  326.    DisplayChar(12,1,Flash?(al1_hour%10+0x30):' ');
  327.    DisplayChar(13,1,':');
  328.    DisplayChar(14,1,al1_min/10+0x30);
  329.    DisplayChar(15,1,al1_min%10+0x30);
  330.    if(keyvalue==2&&SetFlag==8) //鬧鈴1時+
  331.       {
  332.           Set(9,0);
  333.           keyvalue=0;
  334.       }
  335.    if(keyvalue==3&&SetFlag==8) //鬧鈴1時-
  336.       {
  337.           Set(9,1);
  338.           keyvalue=0;
  339.       }
  340.      }
  341.   break;

  343.   case 9:
  344.   {
  345.    ReadAlarm();
  346.    DisplayStr(0,0," AL1 Adj Minute ");
  347. //       ----------------
  348.    DisplayStr(0,1,"ALARM1");
  349.    DisplayChar(6,1,' ');
  350.    DisplayStr(7,1,(I2CReadAdd(DS3231_CONTROL) & 0x01)?(" ON"):("OFF"));
  351.    DisplayChar(10,1,' ');
  352.    DisplayChar(11,1,al1_hour/10+0x30);
  353.    DisplayChar(12,1,al1_hour%10+0x30);
  354.    DisplayChar(13,1,':');
  355.    DisplayChar(14,1,Flash?(al1_min/10+0x30):' ');
  356.    DisplayChar(15,1,Flash?(al1_min%10+0x30):' ');
  357.    if(keyvalue==2&&SetFlag==9) //鬧鈴1分+
  358.       {
  359.           Set(8,0);
  360.           keyvalue=0;
  361.       }
  362.    if(keyvalue==3&&SetFlag==9) //鬧鈴1分-
  363.       {
  364.           Set(8,1);
  365.           keyvalue=0;
  366.       }
  367.      }
  368.   break;

  370.   case 10:
  371.   {
  372.    ReadAlarm();
  373.    DisplayStr(0,0,"   Alarm2 Set   ");
  374. //       ----------------
  375. //       ALARM2 OFF **:**
  376.    DisplayStr(0,1,"ALARM2");
  377.    DisplayChar(6,1,' ');
  378.    if((I2CReadAdd(DS3231_CONTROL) & 0x02)==0) DisplayStr(7,1,Flash?("   "):("OFF"));
  379.    else DisplayStr(7,1,Flash?("   "):(" ON"));
  380.    DisplayChar(10,1,' ');
  381.    DisplayChar(11,1,al2_hour/10+0x30);
  382.    DisplayChar(12,1,al2_hour%10+0x30);
  383.    DisplayChar(13,1,':');
  384.    DisplayChar(14,1,al2_min/10+0x30);
  385.    DisplayChar(15,1,al2_min%10+0x30);
  386.    if((keyvalue==2||keyvalue==3)&&SetFlag==10) //鬧鈴2開關(guān)
  387.       {
  388.           Set(60,1);
  389.           keyvalue=0;
  390.       }
  391.      }
  392.   break;

  394.   case 11:
  395.   {
  396.    ReadAlarm();
  397.    DisplayStr(0,0,"  AL2 Adj Hour  ");
  398. //       ----------------
  399.    DisplayStr(0,1,"ALARM2");
  400.    DisplayChar(6,1,' ');
  401.    DisplayStr(7,1,(I2CReadAdd(DS3231_CONTROL) & 0x02)?(" ON"):("OFF"));
  402.    DisplayChar(10,1,' ');
  403.    DisplayChar(11,1,Flash?(al2_hour/10+0x30):' ');
  404.    DisplayChar(12,1,Flash?(al2_hour%10+0x30):' ');
  405.    DisplayChar(13,1,':');
  406.    DisplayChar(14,1,al2_min/10+0x30);
  407.    DisplayChar(15,1,al2_min%10+0x30);
  408.    if(keyvalue==2&&SetFlag==11) //鬧鈴2時+
  409.       {
  410.           Set(12,0);
  411.           keyvalue=0;
  412.       }
  413.    if(keyvalue==3&&SetFlag==11) //鬧鈴2時-
  414.       {
  415.           Set(12,1);
  416.           keyvalue=0;
  417.       }
  418.      }
  419.   break;

  421.   case 12:
  422.   {
  423.    ReadAlarm();
  424.    DisplayStr(0,0," AL2 Adj Minute ");
  425. //       ----------------
  426.    DisplayStr(0,1,"ALARM2");
  427.    DisplayChar(6,1,' ');
  428.    DisplayStr(7,1,(I2CReadAdd(DS3231_CONTROL) & 0x02)?(" ON"):("OFF"));
  429.    DisplayChar(10,1,' ');
  430.    DisplayChar(11,1,al2_hour/10+0x30);
  431.    DisplayChar(12,1,al2_hour%10+0x30);
  432.    DisplayChar(13,1,':');
  433.    DisplayChar(14,1,Flash?(al2_min/10+0x30):' ');
  434.    DisplayChar(15,1,Flash?(al2_min%10+0x30):' ');
  435.    if(keyvalue==2&&SetFlag==12) //鬧鈴2分+
  436.       {
  437.           Set(11,0);
  438.           keyvalue=0;
  439.       }
  440.    if(keyvalue==3&&SetFlag==12) //鬧鈴2分-
  441.       {
  442.           Set(11,1);
  443.           keyvalue=0;
  444.       }
  445.      }
  446.   break;

  448.   case 13:
  449.   {
  450.    DisplayStr(0,0,"   Sound Set    ");
  451. //       ----------------
  452.    DisplayStr(0,1,"Sound:");
  453.    DisplayChar(6,1,Flash?' ':((uchar)aa+0x30));
  454.    DisplayChar(7,1,' ');
  455.    DisplayStr(8,1,aa?"Music   ":"Beep    ");
  456.    if((keyvalue==2||keyvalue==3)&&SetFlag==13) //鬧鈴鈴聲選擇
  457.       {
  458.           aa=!aa;
  459.           keyvalue=0;
  460.       }
  461.      }
  462.   break;
  463. }

  465. if(SetFlag==0&&keyvalue==2)
  466. {
  467.   SetFlag=7;
  468.   keyvalue=0;
  469. }
  470. }


  473. void Set(uchar sel,uchar selby)
  474. {
  475. char item;
  476.     uchar max,mini;

  478.     if(sel==0)  {max=59;mini=0;}    //秒
  479.     if(sel==1)  {max=59;mini=0;}    //分鐘
  480.     if(sel==2)  {max=23;mini=0;}    //小時
  481. if(month==2)
  482.   if(runnian())
  483.   {
  484.    if(sel==4)  {max=29;mini=1;}
  485.   }
  486.   else
  487.   {
  488.    if(sel==4)  {max=28;mini=1;}
  489.   }
  490. else
  491. {
  492.      if(month==1|month==3|month==5|month==7|month==8|month==10|month==12)
  493.   {   
  494.    if(sel==4)  {max=31;mini=1;}
  495.   }
  496.   if(month==4|month==6|month==9|month==11)
  497.   {   
  498.    if(sel==4)  {max=30;mini=1;}
  499.   }
  500. }
  501.     if(sel==5)  {max=12;mini=1;}    //月
  502.     if(sel==6)  {max=99;mini=0;}    //年
  503.     if(sel==8)  {max=59;mini=0;}    //鬧鈴1小時
  504.     if(sel==9)  {max=23;mini=0;}    //鬧鈴1分鐘
  505.     if(sel==11)  {max=59;mini=0;}    //鬧鈴2小時
  506.     if(sel==12)  {max=23;mini=0;}    //鬧鈴2分鐘
  507.     if(sel==50)  { //鬧鈴1開關(guān)
  508.   item=I2CReadAdd(DS3231_CONTROL)^0x01;
  509.   I2CWrite(DS3231_CONTROL,item);
  510. }
  511.     if(sel==60)  {   //鬧鈴2開關(guān)
  512.   item=I2CReadAdd(DS3231_CONTROL)^0x02;
  513.   I2CWrite(DS3231_CONTROL,item);
  514. }
  515. else{
  516.   item=(I2CReadAdd(sel)&0x7F)/16*10+(I2CReadAdd(sel)&0x7F)%16;
  517.      if (selby==0) item++;  else item--;
  518.      if(item>max) item=mini;  
  519.      if(item<mini) item=max;
  520.   I2CWrite(sel,B_BCD(item));
  521.     autoweek();
  522. }
  523. }
復(fù)制代碼



8.KEY.H
  1. #ifndef __KEY_H__
  2. #define __KEY_H__


  5. #define uchar unsigned char
  6. #define uint  unsigned int

  8. sbit SET  = P3^7;
  9. sbit UP  = P3^6;
  10. sbit DOWN  = P3^5;

  12. extern xdata uchar keyvalue,SetFlag;

  14. void Scan_Key();
  15. void KeyProcess();
  16. void Set(uchar sel,uchar selby);

  18. #endif
復(fù)制代碼



9.LCD1602.C
  1. #include "main.h"

  3. uchar lastsec=0xFF;
  4. uchar code mychar[8][8]={
  5. 0x08,0x0F,0x12,0x0F,0x0A,0x1F,0x02,0x02, //年 0x00
  6. 0x0F,0x09,0x0F,0x09,0x0F,0x09,0x13,0x00, //月 0x01
  7. 0x1F,0x11,0x11,0x1F,0x11,0x11,0x1F,0x00, //日 0x02
  8. 0x07,0x05,0x07,0x00,0x00,0x00,0x00,0x00, //°  0x03
  9. //0x02,0x05,0x05,0x02,0x00,0x00,0x00,0x00, //°  0x03
  10. 0x01,0x03,0x1D,0x11,0x1D,0x03,0x01,0x00,  //小喇叭標(biāo)記 0x04
  11. 0x00,0x0C,0x00,0x00,0x00,0x00,0x00,0x00,  //鬧鈴1標(biāo)記  0x05
  12. 0x00,0x00,0x00,0x00,0x0C,0x0C,0x00,0x00,  //鬧鈴2標(biāo)記  0x06
  13. 0x00,0x0C,0x00,0x00,0x0C,0x0C,0x00,0x00  //鬧鈴1+2標(biāo)記  0x07
  14. };
  15.       
  16. void Delay5Ms()
  17. {
  18.     uchar a,b;
  19.     for(b=19;b>0;b--)
  20.         for(a=130;a>0;a--);
  21. }

  23. void WriteDataLCM(uchar WDLCM)
  24. {
  25.    ReadStatusLCM(); //檢測忙
  26.    LCM_Data = WDLCM;
  27.    LCM_RS = 1;
  28.    LCM_RW = 0;
  29.    LCM_E = 0;
  30.    LCM_E = 0; //延時
  31.    LCM_E = 1;
  32. }


  35. void WriteCommandLCM(uchar WCLCM,BuysC) //BuysC為0時忽略忙檢測
  36. {
  37.    if(BuysC) ReadStatusLCM(); //根據(jù)需要檢測忙
  38.    LCM_Data = WCLCM;
  39.    LCM_RS = 0;
  40.    LCM_RW = 0;
  41.    LCM_E = 0;
  42.    LCM_E = 0;
  43.    LCM_E = 1;
  44. }


  47. uchar ReadStatusLCM()
  48. {
  49.    LCM_Data = 0xFF;
  50.    LCM_RS = 0;
  51.    LCM_RW = 1;
  52.    LCM_E = 0;
  53.    LCM_E = 0;
  54.    LCM_E = 1;
  55.    while (LCM_Data & 0x80); //檢測忙信號
  56.    return(LCM_Data);
  57. }


  60. void LCMInit()
  61. {
  62.    LCM_Data = 0;
  63.    WriteCommandLCM(0x38,0); //三次顯示模式設(shè)置，不檢測忙信號
  64.    Delay5Ms();
  65.    WriteCommandLCM(0x38,0);
  66.    Delay5Ms();
  67.    WriteCommandLCM(0x38,0);
  68.    Delay5Ms();
  69. WriteCGRAM();
  70.    WriteCommandLCM(0x38,1); //顯示模式設(shè)置,開始要求每次檢測忙信號
  71.    WriteCommandLCM(0x08,1); //關(guān)閉顯示
  72.    WriteCommandLCM(0x01,1); //顯示清屏
  73.    WriteCommandLCM(0x06,1); // 顯示光標(biāo)移動設(shè)置
  74.    WriteCommandLCM(0x0C,1); // 顯示開及光標(biāo)設(shè)置
  75. }


  78. void DisplayChar(uchar X, uchar Y, uchar DData)
  79. {
  80.    Y &= 0x01;
  81.    X &= 0x0F; //限制X不能大于15，Y不能大于1
  82.    if(Y) X |= 0x40; //當(dāng)要顯示第二行時地址碼+0x40;
  83.    X |= 0x80; //算出指令碼
  84.    WriteCommandLCM(X, 0); //這里不檢測忙信號，發(fā)送地址碼
  85.    WriteDataLCM(DData);
  86. }


  89. void DisplayStr(uchar X, uchar Y, uchar code *DData)
  90. {
  91.    uchar ListLength,j;
  92.    ListLength = strlen(DData);
  93.    Y &= 0x01;
  94.    X &= 0x0F; //限制X不能大于15，Y不能大于1
  95.     if (X <= 0x0F) //X坐標(biāo)應(yīng)小于0xF
  96.     {
  97.   for(j=0;j<ListLength;j++)
  98.   {
  99.              DisplayChar(X, Y, DData[j]); //顯示單個字符
  100.              X++;
  101.   }
  102. }
  103. }

  105. void WriteCGRAM() //CGRAM區(qū)寫入自定義的字符
  106. {
  107. uchar x,y;
  108. WriteCommandLCM(0x40,0);
  109. for(y=0;y<8;y++)
  110. {
  111.   for(x=0;x<8;x++)
  112.   {
  113.    WriteDataLCM(mychar[y][x]);
  114.   }
  115. }

  117. }

  119. void Disp_Time()
  120. {
  121. Readtime();
  122. if(F_500ms){
  123.   DisplayChar(2,1,' ');
  124.   DisplayChar(5,1,' ');
  125. }
  126. else{
  127.   DisplayChar(2,1,':');
  128.   DisplayChar(5,1,':');
  129. }
  130. if(sec!=lastsec){
  131.   DisplayChar(2,1,':');
  132.   DisplayChar(5,1,':');
  133.   F_500ms_b=0;F_500ms=0;
  134.   DisplayStr(0,0,"20");
  135.   DisplayChar(2,0,year/10+0x30);
  136.   DisplayChar(3,0,year%10+0x30);
  137.   DisplayChar(4,0,0x00);
  138.   DisplayChar(5,0,month/10+0x30);
  139.   DisplayChar(6,0,month%10+0x30);
  140.   DisplayChar(7,0,0x01);
  141.   DisplayChar(8,0,date/10+0x30);
  142.   DisplayChar(9,0,date%10+0x30);
  143.   DisplayChar(10,0,0x02);
  144.   DisplayChar(11,0,' ');
  145.   DisplayChar(12,0,' ');
  146.   switch(day)
  147.   {
  148.    case 1:DisplayStr(13,0,"Mon");break;
  149.    case 2:DisplayStr(13,0,"Tue");break;
  150.    case 3:DisplayStr(13,0,"Wed");break;
  151.    case 4:DisplayStr(13,0,"Thu");break;
  152.    case 5:DisplayStr(13,0,"Fri");break;
  153.    case 6:DisplayStr(13,0,"Sat");break;
  154.    case 7:DisplayStr(13,0,"Sun");break;
  155.    default :DisplayStr(13,0,"ERR");break;
  156.   }
  157.   
  158.   DisplayChar(0,1,(hour<10)?' ':(hour/10+0x30));
  159.   DisplayChar(1,1,hour%10+0x30);
  160.   DisplayChar(3,1,min/10+0x30);
  161.   DisplayChar(4,1,min%10+0x30);
  162.   DisplayChar(6,1,sec/10+0x30);
  163.   DisplayChar(7,1,sec%10+0x30);
  164.   switch(I2CReadAdd(DS3231_CONTROL) & 0x03)
  165.   {
  166.    case 1: DisplayChar(8,1,0x04);DisplayChar(9,1,0x05);break;
  167.    case 2: DisplayChar(8,1,0x04);DisplayChar(9,1,0x06);break;
  168.    case 3: DisplayChar(8,1,0x04);DisplayChar(9,1,0x07);break;
  169.    default: DisplayChar(8,1,' ');DisplayChar(9,1,' ');break;
  170.   }
  171.   if((I2CReadAdd(DS3231_CONTROL) & 0x02)==1 && (I2CReadAdd(DS3231_CONTROL) & 0x01)==0) DisplayChar(9,1,0x06);

  173.   if(ReadTemp()==1){
  174.    DisplayChar(10,1,' ');
  175.    DisplayChar(11,1,' ');
  176.    DisplayChar(12,1,(Dtemp<10)?' ':(Dtemp/10+0x30));
  177.    DisplayChar(13,1,Dtemp%10+0x30);
  178.    DisplayChar(14,1,0x03);
  179.    DisplayChar(15,1,'C');
  180.   }
  181.   lastsec=sec;
  182. }
  183. }
復(fù)制代碼



10.LCD1602.H
  1. #ifndef __LCD1602_H__
  2. #define __LCD1602_H__

  4. #define LCM_Data  P0
  5. #define uchar unsigned char
  6. #define uint  unsigned int

  8. sbit LCM_RS = P2 ^ 1;
  9. sbit LCM_RW = P2 ^ 2;
  10. sbit LCM_E = P2 ^ 5;

  12. void Delay5Ms();
  13. void Delay400ms();
  14. void WriteDataLCM(uchar WDLCM);
  15. void WriteCommandLCM(uchar WCLCM,BuysC);
  16. uchar ReadStatusLCM(void);
  17. void LCMInit(void);
  18. void DisplayChar(uchar X, uchar Y, uchar DData);
  19. void DisplayStr(uchar X, uchar Y, uchar code *DData);
  20. void WriteCGRAM(void);
  21. void Disp_Time(void);
  22. void Disp_Temp(void);


  25. #endif
復(fù)制代碼



11.main.C
  1. //CPU: AT89C52/STC89C53   OSC 12MHZ
  2. //1602 液晶 左上接口      
  3. //Vo接10K可調(diào)電阻分別到5V和GND
  4. //DS3231 3.3V

  6. #include "main.h"
  7. #include "music.h"

  9. uchar F_100ms=0,F_100ms_b;
  10. uchar F_500ms=0,F_500ms_b;
  11. uchar re_disp,re_disp_b=0;//500ms返回菜單循環(huán)計(jì)數(shù)
  12. uchar Disp_b = 0; //顯示延時計(jì)數(shù)
  13. bit  Flash  = 0; //調(diào)時閃爍用標(biāo)志變量
  14. bit  Al_Flag  = 0; //鬧鈴標(biāo)志位
  15. bit  aa = 0; //鈴聲選擇
  16. uchar alarmmin; //鬧鈴時間2分鐘
  17. uchar Time_H = 0;
  18. uchar Time_L = 0;

  20. void Timer0Init() //音樂鬧鈴用定時器 T0方式1
  21. {
  22. TMOD = 0x01;
  23. TH0 = 0xFF;
  24. TL0 = 0xFF;
  25. EA = 1;
  26. ET0 =1;
  27. TR0 = 0;
  28. }

  30. void Timer1Init() //25ms定時器 T1方式1
  31. {
  32.     TMOD = 0x10;
  33.     TH1 = 0x9E;
  34.     TL1 = 0x58;
  35. EA = 1;
  36.     ET1 = 1;
  37.     TR1 = 1;
  38. }

  40. void Alarm_Int0_Init() //中斷0開啟
  41. {
  42. EA = 1;
  43. EX0 = 1;
  44. IT0 = 0;//電平的觸發(fā)方式
  45. }

  47. void main()
  48. {
  49. Delay5Ms();
  50. Delay5Ms();
  51. Timer0Init(); //開啟定時器0中斷
  52. Timer1Init(); //開啟定時器1中斷
  53. Alarm_Int0_Init(); //開啟外部中斷0
  54. while(!F_500ms) ; //啟動等待，等LCM講入工作狀態(tài)
  55.    Beep(1); //開機(jī)提示音
  56. Write_18B20();
  57.     InitDS3231(); //初始化DS3231
  58.    autoweek(); //開機(jī)自動星期轉(zhuǎn)換
  59. LCMInit(); //LCM初始化
  60. while(1)
  61. {
  62.   if(F_100ms&&SetFlag==0)
  63.   {
  64.    Disp_Time();
  65.    F_100ms=0;F_100ms_b=0;
  66.   }
  67.   if(Al_Flag==1 && aa==0) Beep(2);
  68.   if(Al_Flag==1 && aa==1) Play_Music(MusicTwo,5);
  69.   if((min-alarmmin)==2) Al_Flag=0; //鬧鈴響2分鐘，停止鬧鈴
  70.   Scan_Key();
  71.   KeyProcess();
  72.   if(Disp_b>=20) SetFlag=0;//10s沒有按下按鍵，則返回時間顯示
  73. }

  75. }

  77. void Alarm_Int0() interrupt 0
  78. {
  79. Al_Flag=1; //鬧鈴標(biāo)志位置位
  80. alarmmin=min; //初始化鬧鈴時間
  81. I2CWrite(DS3231_STATUS,0x00); //清DS3231內(nèi)部鬧鐘標(biāo)志位
  82. //Beep2();
  83. }

  85. void Timer0() interrupt 1
  86. {
  87. BEE = !BEE;
  88. TH0 = Time_H;
  89. TL0 = Time_L;
  90. }

  92. void Timer1() interrupt 3
  93. {
  94.    TH1=0x9E;
  95.    TL1=0x58;
  96. F_100ms_b++;
  97. F_500ms_b++;
  98. re_disp_b++;
  99.    if(SET==0||UP==0||DOWN==0) Al_Flag=0; //按下按鍵關(guān)閉鬧鈴
  100. if(F_100ms_b>=4) {F_100ms=1;  F_100ms_b=0;}
  101.    if(F_500ms_b>=20) {F_500ms=1;  F_500ms_b=0;}
  102. if(re_disp_b>=20) {re_disp=1;re_disp_b=0;Flash=!Flash;Disp_b++;if(Disp_b>=100) Disp_b=100;}
  103. }
復(fù)制代碼

12.main.h
  1. #ifndef __MAIN_H__
  2. #define __MAIN_H__

  4. #include <reg52.h>
  5. #include <string.h>
  6. #include "LCD1602.H"
  7. #include "DS3231_2.H"
  8. #include "bell.h"
  9. #include "key.h"
  10. #include "ds18b20.h"

  12. #define uchar unsigned char
  13. #define uint  unsigned int

  15. extern uchar F_500ms,F_500ms_b,Disp_b,Time_H,Time_L;
  16. extern bit aa,Flash,Al_Flag;

  18. #endif
復(fù)制代碼




作者: fsj5098    時間: 2015-5-4 23:07
不錯，收下，看看能不能仿制一個
作者: guody001    時間: 2015-5-8 09:46
買了個模塊，初始化時間時經(jīng)常只能部份準(zhǔn)確，15他變成2035，時鐘小時大于10也會出錯，不知是何故
作者: 何來塵埃飛舞    時間: 2015-5-14 17:20
如果只用到ds3231時鐘芯片和lcd602，要怎么樣改程序？就是不要聲音、鬧鈴和溫度
作者: 何來塵埃飛舞    時間: 2015-5-14 17:22
如果只用到ds3231時鐘芯片和lcd602，要怎么樣改程序？就是不要聲音、鬧鈴和溫度
作者: jjbboox    時間: 2015-5-18 09:40
DS3231內(nèi)部有溫度寄存器。
不需要外圍溫度器件。
樓主用的LCD1602怎么顯示中文的？是把某幾個字符改掉的嗎？
這些改掉的字符掉電后還在嗎？
作者: jjbboox    時間: 2015-5-20 09:11
jjbboox 發(fā)表于 2015-5-18 09:40
DS3231內(nèi)部有溫度寄存器。
不需要外圍溫度器件。
樓主用的LCD1602怎么顯示中文的？是把某幾個字符改掉的 ...

自己回去試了一下。
自己來回答提出的問題。

LCD1602沒有FLASH內(nèi)存，所以掉電以后這些字符肯定就是沒有了。
不光掉電后沒了。只要程序里面對1602進(jìn)行初始化以后，也會丟失。

不過樓主的作品給了我很大的啟發(fā)，謝謝
作者: 1qaz2wsx77    時間: 2015-10-13 21:10
sbit    int0 = P3^2;這個是接哪的呀？
作者: liuyuanhui0    時間: 2015-11-19 14:12
sbit    int0 = P3^2;這個是接哪的呀？<18b20>
作者: neemxyang    時間: 2015-11-19 21:15
照方抓藥，我也弄一個
作者: liuyuanhui0    時間: 2016-5-2 07:12
文件不全
作者: cdddyj    時間: 2016-5-4 11:18
可以發(fā)一個打包好的程序嗎
作者: wangjianb01978    時間: 2016-11-15 22:53

可以發(fā)一個打包好的程序嗎
作者: wangjianb01978    時間: 2016-11-23 14:01
可以發(fā)一個打包好的程序嗎
作者: wuwenhua    時間: 2016-11-24 15:24
好東西，做的真漂亮。
作者: 575216897    時間: 2016-12-29 14:16
跪求打包程序
作者: 彭鵬    時間: 2017-1-6 20:32
Keil uVision5 編譯后，HEX文件超過26KB。stc89c52rc的程序空間不夠用，即便是c53的程序空間也不夠。
作者: 唐131    時間: 2017-3-23 15:00
跪求打包程序
作者: 549838023    時間: 2017-5-12 21:56
可以求一個工程文件嗎？
作者: 1226199801    時間: 2017-10-16 21:22
原理圖和程序?qū)Σ簧�。�！?hr noshade size="2" width="100%" color="#808080"> 作者: 隨風(fēng)66    時間: 2017-10-17 18:34
學(xué)習(xí)一下
作者: luxianjun    時間: 2017-12-14 23:08
原理圖和程序?qū)Σ簧系模约焊母�，上傳一個完整工程文件

ds32311602時鐘.rar

125.81 KB, 下載次數(shù): 161, 下載積分: 黑幣 -5

作者: shahuoa    時間: 2018-9-2 10:59
謝謝樓主提供的代碼，學(xué)習(xí)了
作者: anksy    時間: 2018-9-2 18:57
謝謝分享。學(xué)習(xí)中。
作者: anksy    時間: 2018-9-2 20:26
luxianjun 發(fā)表于 2017-12-14 23:08
原理圖和程序?qū)Σ簧系�，自己改改，上傳一個完整工程文件

扣了我5黑幣，文件卻沒下載下來！
作者: zhaozhenrong    時間: 2018-10-15 14:29
這個項(xiàng)目較好，可以參考。
作者: loyoid    時間: 2018-12-19 15:46
最近在弄DS3231，謝謝樓主分享
作者: 51單片機(jī)1234    時間: 2019-1-21 13:38
謝謝樓主的分享了
作者: jemery1030    時間: 2019-7-28 12:18
今天來測試 感謝
作者: windwong    時間: 2021-2-4 20:29
很有參考價(jià)值。多謝分享！
作者: sh-fluke    時間: 2021-3-27 08:38
謝謝樓主的分享了，參考一下。
作者: bs981    時間: 2022-1-23 02:23
luxianjun 發(fā)表于 2017-12-14 23:08
原理圖和程序?qū)Σ簧系�，自己改改，上傳一個完整工程文件

好東西
作者: hegangyanyan    時間: 2022-1-28 13:03

自己動手豐衣足食，DIY精神永垂不朽！
作者: bjhyn_zhong    時間: 2022-3-9 11:16
jjbboox 發(fā)表于 2015-5-18 09:40
DS3231內(nèi)部有溫度寄存器。
不需要外圍溫度器件。
樓主用的LCD1602怎么顯示中文的？是把某幾個字符改掉的 ...

LCD1602顯示的簡單漢字字模代碼，在單片機(jī)程序中，發(fā)送給LCD1602顯示RAM
作者: jlccsyzq    時間: 2022-8-12 14:48
感謝樓主的分享，DSC231的走時精度比DS1302好多了



歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1