标题: 超声波HC-SR04与STC89C52RC用1602显示 [打印本页]
作者: 欣欣    时间: 2021-5-1 16:34
标题: 超声波HC-SR04与STC89C52RC用1602显示
看着大家都再使用超声波模块，楼主也想试试，看效果怎么样，说干就干。

单片机源程序如下:
  1. #include<reg52.h>
  2. #define LCD1602_DB  P0      
  3. #define  u8 unsigned  char
  4. #define  u16  unsigned   int
  5. sbit LCD1602_RS = P2^6;
  6. sbit LCD1602_EN = P2^5;         
  7. sbit LCD1602_RW = P2^7;
  8. sbit TX     =P1^3;
  9. sbit RX     =P1^4;

  11. bit  flag   =0;
  12. u16  time   =0;
  13. int  S      =0;
  14. int  H,L;
  15. u8 list[]={"0.00M"};
  16. u8 code asc[15]={'0','1','2','3','4','5','6','7','8','9','.','-','M'};
  17. void Read_Busy()            
  18. {
  19.     u8 sta;      
  20.     LCD1602_DB = 0xff;
  21.     LCD1602_RS = 0;
  22.     LCD1602_RW = 1;
  23.     do
  24.     {
  25.         LCD1602_EN = 1;
  26.         sta = LCD1602_DB;
  27.         LCD1602_EN = 0;   
  28.     }while(sta & 0x80);
  29. }

  31. void Lcd1602_Write_Cmd(u8 cmd)      
  32. {
  33.     Read_Busy();
  34.     LCD1602_RS = 0;
  35.     LCD1602_RW = 0;
  36.     LCD1602_DB = cmd;
  37.     LCD1602_EN = 1;
  38.     LCD1602_EN = 0;   
  39. }

  41. void Lcd1602_Write_Data(u8 dat)   
  42. {
  43.     Read_Busy();
  44.     LCD1602_RS = 1;
  45.     LCD1602_RW = 0;
  46.     LCD1602_DB = dat;
  47.     LCD1602_EN = 1;
  48.     LCD1602_EN = 0;
  49. }

  51. void LcdSetCursor(u8 x,u8 y)   
  52. {
  53.     u8 addr;
  54.     if(y == 0)
  55.         addr = 0x00 + x;
  56.     else
  57.         addr = 0x40 + x;
  58.    
  59.     Lcd1602_Write_Cmd(addr|0x80);
  60. }

  62. void LcdShowStr(u8 x,u8 y,u8 *str)      
  63. {
  64.     LcdSetCursor(x,y);      
  65.     while(*str != '\0')
  66.     {
  67.         Lcd1602_Write_Data(*str++);
  68.     }
  69. }

  71. void InitLcd1602()               
  72. {
  73.     Lcd1602_Write_Cmd(0x38);     
  74.     Lcd1602_Write_Cmd(0x0c);
  75.     Lcd1602_Write_Cmd(0x06);
  76.     Lcd1602_Write_Cmd(0x01);     
  77. }

  79. void Delay1ms()                //@12.000MHz
  80. {
  81.    unsigned char i, j;

  83.          i = 2;
  84.          j = 239;
  85.          do
  86.          {
  87.                    while (--j);
  88.          } while (--i);
  89. }


  92. void Delay(u16 t)               
  93. {
  94.          while (--t)
  95.          Delay1ms();       
  96. }

  98. void Conut(void)
  99. {
  100.    time=TH0*256+TL0;
  101.          TH0=0;
  102.          TL0=0;
  103.          S=(time*1.7)/100;  
  104.    if (S<35)S=S+1;   
  105.    list[0]=asc[S%1000/100];
  106.    list[1]=asc[10];
  107.    list[2]=asc[S%100/10];
  108.    list[3]=asc[S%10];
  109.    list[4]=asc[12];
  110. }

  112. void  StartModule()                         
  113. {
  114.    TX=1;                                         
  115.    Delay(800);
  116.    TX=0;
  117. }

  119. void Timer0Init(void)                //@12.0000MHz
  120. {
  121.    TMOD &= 0xF0;                 
  122.          TMOD |= 0x01;                 
  123.          TL0 = 0;                 
  124.          TH0 = 0;                 
  125.          TF0 = 0;               
  126. }

  128. void main()
  129. {
  130.    Timer0Init();
  131.    InitLcd1602();
  132.    H=200;
  133.    L=100;
  134.    LcdShowStr(5,0,list);
  135.    while(1)
  136.    {
  137.       StartModule();
  138.             while(!RX);
  139.             TR0=1;                            
  140.             while(RX);                       
  141.             TR0=0;       
  142.       Conut();       
  143.       LcdShowStr(5,0,list);
  144.          }
  145. }
复制代码

工程文件下载:
超声波HC-SR04与STC89C52RC用1602显示.rar (34.27 KB, 下载次数: 49)

作者: 欣欣    时间: 2021-5-1 16:35
虽然程序调通了，但说实话感觉准确性不是很高，楼主水平有限仅供大家参考，网上这类程序还是蛮多的。

作者: 欣欣    时间: 2021-5-1 16:37
我们画电路图，LCD1602并没有画，根据源程序应该可以知道是接在那些IO上的。


作者: Dekia    时间: 2021-6-22 18:08
能加你 帮我过一个设计吗 大佬



欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1