找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 1646|回復: 0
打印 上一主題 下一主題
收起左側(cè)

stc15f2k60s2單片機1302-1602程序

[復制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:392097 發(fā)表于 2018-8-31 19:28 | 只看該作者 回帖獎勵 |倒序瀏覽 |閱讀模式
  1. #include<stc15f2k60s2.h>
  2. #include<intrins.h>
  3. #include<string.h>
  4. #define uchar unsigned char
  5. #define uint unsigned int

  7. sbit RST=P1^2;
  8. sbit IO=P1^0;
  9. sbit SCLK=P1^1;
  10. sbit RS=P5^5;
  11. sbit RW=P5^4;
  12. sbit EN=P5^3;

  14. uchar *WEEK[]={"SUN","***","MON","TUS","WEN","THU","FRI","SAT"};
  15. uchar LCD_DSY_BUFFER1[]={"DATE 00-00-00   "};
  16. uchar LCD_DSY_BUFFER2[]={"TIME 00:00:00   "};
  17. uchar DateTime[7];

  19. void DelayMS(uint x)
  20. {
  21.    uchar i;
  22.    while(x--) for(i=0;i<120;i++);
  23. }

  25. void Write_A_Byte_TO_DS1302(uchar x)
  26. {
  27.    uchar i;
  28.    for(i=0;i<8;i++)
  29.    {
  30.    IO = x & 0x01; SCLK =1; SCLK = 0; x >>= 1;
  31.     }
  32. }

  34. uchar Get_A_Byte_FROM_DS1302()
  35. {
  36.   uchar i,b=0x00;
  37.   for(i=0;i<8;i++)
  38.   {
  39.     b |=_crol_((uchar)IO,i);
  40.     SCLK=1;SCLK=0;
  41.    }
  42.    return b / 16 * 10 + b % 16;
  43. }

  45. uchar Read_Data(uchar addr)
  46. {
  47.    uchar dat;
  48.    RST = 0; SCLK = 0;RST = 1;
  49.    Write_A_Byte_TO_DS1302(addr);
  50.    dat = Get_A_Byte_FROM_DS1302();
  51.    SCLK = 1; RST = 0;
  52.    return dat;
  53. }

  55. void GetTime()
  56. {
  57.    uchar i,addr = 0x81;
  58.    for (i = 0; i < 7;i++)
  59.    {
  60.       DateTime[i] = Read_Data(addr); addr += 2;
  61.     }
  62. }

  64. uchar Read_LCD_State()
  65. {
  66.    uchar state;
  67.    RS = 0; RW = 1; EN = 1; DelayMS(1); state = P0; EN = 0; DelayMS(1);
  68.    return state;
  69. }

  71. void LCD_Busy_Wait()
  72. {
  73.    while((Read_LCD_State() & 0x80) == 0x80);
  74.    DelayMS(5);
  75. }

  77. void Write_LCD_Data(uchar dat)
  78. {
  79.    LCD_Busy_Wait();
  80.    RS = 1; RW = 0; EN = 0; P0 = dat; EN = 1; DelayMS(1); EN = 0;
  81. }

  83. void Write_LCD_Command(uchar cmd)
  84. {
  85.    LCD_Busy_Wait();
  86.    RS = 0; RW = 0; EN = 0; P0 = cmd; EN = 1; DelayMS(1); EN = 0;
  87. }

  89. void Init_LCD()
  90. {
  91.    Write_LCD_Command(0x38); DelayMS(1);
  92.    Write_LCD_Command(0x01); DelayMS(1);
  93.    Write_LCD_Command(0x06); DelayMS(1);
  94.    Write_LCD_Command(0x0C); DelayMS(1);
  95. }

  97. void Set_LCD_POS(uchar p)
  98. {
  99.    Write_LCD_Command(p | 0x80);
  100. }

  102. void Display_LCD_String(uchar p,uchar *s)
  103. {
  104.    uchar i;
  105.    Set_LCD_POS(p);
  106.    for (i = 0;i < 16; i++)
  107.    {
  108.        Write_LCD_Data(s[i]);
  109.        DelayMS(1);
  110.     }
  111. }

  113. void Format_DateTime(uchar d, uchar *a)
  114. {
  115.    a[0] = d / 10 + '0'; a[1] = d % 10 + '0';
  116. }

  118. void main()
  119. {
  120.    Init_LCD();
  121.    while(1)
  122.    {
  123.       GetTime();
  124.       Format_DateTime(DateTime[6],LCD_DSY_BUFFER1 + 5);
  125.       Format_DateTime(DateTime[4],LCD_DSY_BUFFER1 + 8);
  126.       Format_DateTime(DateTime[3],LCD_DSY_BUFFER1 + 11);

  128.       strcpy(LCD_DSY_BUFFER1 + 13,WEEK[DateTime[5]]);

  130.       Format_DateTime(DateTime[2],LCD_DSY_BUFFER1 + 5);
  131.       Format_DateTime(DateTime[1],LCD_DSY_BUFFER1 + 8);
  132.       Format_DateTime(DateTime[0],LCD_DSY_BUFFER1 + 11);

  134.       Display_LCD_String(0x00,LCD_DSY_BUFFER1);
  135.       Display_LCD_String(0x40,LCD_DSY_BUFFER2);
  136.     }
  137. }
復制代碼
分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂頂 踩踩
回復

使用道具 舉報

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

本版積分規(guī)則

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

Powered by 單片機教程網(wǎng)

快速回復 返回頂部 返回列表