GP2D12红外测距传感器 单片机程序及PROTEUS仿真 实测可用

GP2D12红外测距传感器的PROTEUS仿真原理图如下：





GP2D12红外测距传感器的单片机程序：

1. #include"reg52.h"
   
2. #include<intrins.h>
   
3. #define uint unsigned int
   
4. #define uchar unsigned char
   
5. 
   
6. sbit cs = P3^2;
   
7. long int read=0;
   
8. sbit wela = P2^7;
   
9. sbit dula = P2^6;
   
10. sbit lcden=P3^4;
    
11. sbit lcdrs=P3^5;
    
12. 
    
13. uchar bai,shi,ge,num;
    
14. 
    
15. uchar table[] ="123456789";
    
16. 
    
17. void delayms(uint z)
    
18. {
    
19.         uint x,y;
    
20.         for(x=z;x>0;x--)
    
21.                 for(y=110;y>0;y-- );
    
22. }
    
23. 
    
24. void write_com(uchar com)
    
25. {        
    
26.         lcdrs=0;
    
27.         P0=com;
    
28.         delayms(5);
    
29.         lcden=1;
    
30.         delayms(5);
    
31.         lcden=0;
    
32. }
    
33. 
    
34. void write_data(uchar date)
    
35. {
    
36.         lcdrs=1;
    
37.         P0=date;
    
38.         delayms(5);
    
39.         lcden=1;
    
40.         delayms(5);
    
41.         lcden=0;
    
42. }
    
43. 
    
44. void init()
    
45. {
    
46.         dula=0;
    
47.         wela=0;
    
48.         lcden=0;
    
49.         write_com(0x38);
    
50.         write_com(0x0c);
    
51.         write_com(0x06);
    
52.         write_com(0x01);
    
53. }
    
54. void delay(uint a)           //  a 个1us延时
    
55. {
    
56.         for(;a > 0;a --)
    
57.         _nop_();_nop_();
    
58. }
    
59. 
    
60. void T0_time() interrupt 1
    
61. {
    
62.         cs = 0;
    
63.         RD = 0;
    
64.         read = P1;
    
65.         INT0 = 1;
    
66. }
    
67. uint adc0804()
    
68. {
    
69. TMOD=0X01;
    
70. TH0=(65536-45872)/256;
    
71. TL0=(65536-45872)/256;
    
72. EA=1;
    
73. ET0=1;
    
74. TR0=1;
    
75. 
    
76.         INT0 = 1;
    
77.         cs = 0;
    
78.         WR = 0;
    
79.         delay(255);
    
80.         cs = 1;
    
81.         WR = 1;
    
82.         delay(200);               
    
83.         read = read * 196 /100;
    
84.         return read;
    
85.         
    
86. }
    
87. 
    
88. void math(uint x)
    
89. {
    
90.         bai = x / 100;
    
91.         shi = x /10 % 10;
    
92.         ge = x % 10;
    
93. }/*
    
94. void display()
    
95. {         
    
96.          
    
97.         math(adc0804());
    
98.         
    
99.         dula=1;
    
100.         P0 = table[bai+10];
     
101.         dula=0;
     
102.         P0=0xff;
     
103. 
     
104.         wela = 1;
     
105.         P0 = 0xfe;
     
106.         wela=0;
     
107.         delay(7000000);
     
108. 
     
109.                
     
110.         dula=1;
     
111.         P0 = table[shi];
     
112.         dula=0;
     
113.         P0=0xff;
     
114. 
     
115.         wela = 1;
     
116.         P0 = 0xfd;
     
117.         wela=0;
     
118.         delay(7000000);
     
119. 
     
120.                
     
121.         dula=1;
     
122.         P0 = table[ge];
     
123.         dula=0;
     
124.         P0=0xff;
     
125. 
     
126.         wela = 1;
     
127.         P0 = 0xfb;
     
128.         wela=0;
     
129.         delay(7000000);
     
130.         
     
131. }
     
132. 
     
133.    */
     
134. 
     
135. void main()
     
136. {
     
137.     cs=0;
     
138.                 init();           
     
139. 
     
140. 
     
141.                    while(1)
     
142.                 {
     
143.                
     
144. 
     
145.             math(adc0804());
     
146.                
     
147. 
     
148.                 write_com(0x80+5);
     
149.         
     
150.                 write_data(table[bai]);
     
151.                 write_data(table[shi]);
     
152.                 write_data(table[ge]);
     
153.                         delayms(500);
     
154.                
     
155.                 }
     
156.         
     
157. }

复制代码

注意仿真工程只能用Proteus7.5这个版本,其他版本均无法仿真,必须要Proteus7.5才能用,如果你没有安装此版本的话就不必下载了
Keil代码与Proteus7.5仿真下载: GP2D12仿真文件.zip (165.48 KB, 下载次数: 415)

2016-8-15 13:44 上传

点击文件名下载附件

李12117 发表于 2017-5-3 23:02
仿真时说没找到gp2d12这个元件怎么办?

楼主说了,这个文件只能用Proteus7.5打开才可以,其他版本都仿真,我测试也是这样的,其他版本打开 1602都是无显示,下图是用Proteus7.5打开的效果

仿真时说没找到gp2d12这个元件怎么办?

仿真上LCD1602显示的167是1.67V，GP2D12显示的54是54cm吗？

好资料，51黑有你更精彩!!!

下载学习，谢谢分享

学习了，谢谢分享

学习了，谢谢分享

学习学习

红外测距传感器与STC89C52怎么链接

怎么进行操作，数码管灯不亮

你好，我下载了你的GP2D12仿真文件，怎么不能仿真啊，是因为没有lcd的程序文件吗？

小叔叔 发表于 2019-11-18 09:18
怎么进行操作，数码管灯不亮

这个是用LCD1602来显示的