超聲波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;
   
10. 
    
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. }
    
30. 
    
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. }
    
40. 
    
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. }
    
50. 
    
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. }
    
61. 
    
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. }
    
70. 
    
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. }
    
78. 
    
79. void Delay1ms()                //@12.000MHz
    
80. {
    
81.    unsigned char i, j;
    
82. 
    
83.          i = 2;
    
84.          j = 239;
    
85.          do
    
86.          {
    
87.                    while (--j);
    
88.          } while (--i);
    
89. }
    
90. 
    
91. 
    
92. void Delay(u16 t)               
    
93. {
    
94.          while (--t)
    
95.          Delay1ms();      
    
96. }
    
97. 
    
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. }
     
111. 
     
112. void  StartModule()                        
     
113. {
     
114.    TX=1;                                         
     
115.    Delay(800);
     
116.    TX=0;
     
117. }
     
118. 
     
119. void Timer0Init(void)                //@12.0000MHz
     
120. {
     
121.    TMOD &= 0xF0;                 
     
122.          TMOD |= 0x01;                 
     
123.          TL0 = 0;                 
     
124.          TH0 = 0;                 
     
125.          TF0 = 0;               
     
126. }
     
127. 
     
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, 售價: 1 E幣)

2021-5-6 00:18 上傳

點擊文件名下載附件
售價: 1 E幣  [記錄]  [購買]

【必讀】版權免責聲明

1、本主題所有言論和內容純屬會員個人意見，與本論壇立場無關。2、本站對所發內容真實性、客觀性、可用性不做任何保證也不負任何責任，網友之間僅出于學習目的進行交流。3、對提供的數字內容不擁有任何權利，其版權歸原著者擁有。請勿將該數字內容進行商業交易、轉載等行為，該內容只為學習所提供，使用后發生的一切問題與本站無關。 4、本網站不保證本站提供的下載資源的準確性、安全性和完整性;同時本網站也不承擔用戶因使用這些下載資源對自己和他人造成任何形式的損失或傷害。 5、本網站所有軟件和資料均為網友推薦收集整理而來，僅供學習用途使用，請務必下載后兩小時內刪除，禁止商用。6、如有侵犯你版權的，請及時聯系我們（電子郵箱1370723259@qq.com）指出，本站將立即改正。