基于GP2Y0A+ST32F103RCT6的红外测距程序分享

因为老师让做这个课程设计，所以我把做好的东西发到这分享给大家。
测距用的是夏普的GP2Y0A。屏幕用的是OLED显示屏。

单片机源程序如下:

1. #include "sys.h"
   
2. #include "delay.h"
   
3. #include "usart.h"
   
4. #include "oled.h"
   
5. #include "adc.h"
   
6. #include "led.h"
   
7. 
   
8. extern u8 nonside[];
   
9. 
   
10. int main(void)
    
11. {       
    
12.         u16 adcx;u8 display[8];
    
13.         delay_init();
    
14.   LED_Init();         
    
15.         NVIC_PriorityGroupConfig(NVIC_PriorityGroup_2);
    
16.         uart_init(115200);       
    
17.         OLED_Init();
    
18.         Adc_Init();       
    
19.   LCD_Print(15, 0, "GYJ16481314",TYPE16X16,TYPE8X16);
    
20.         LCD_Print(0, 16, "Infrared距离",TYPE16X16,TYPE8X16);
    
21.         Draw_BMP(32,48,nonside);
    
22.         Draw_BMP(48,48,nonside);
    
23.         Draw_BMP(64,48,nonside);         
    
24.         while(1)
    
25.         {  
    
26.                
    
27.                
    
28.                 adcx=Get_Adc_Average(ADC_Channel_11,10);
    
29.                 if (adcx>472&&adcx<=558)
    
30.                 {
    
31.                         display[0]='8';
    
32.                         display[1]='0';
    
33.                         display[3]='c';
    
34.                         display[4]='m';
    
35.      LCD_Print(40, 32, display,TYPE16X16,TYPE6X8);
    
36.                 }
    
37.                                 else if (adcx>558&&adcx<=620)
    
38.                 {
    
39.      LCD_Print(40, 32, "70cm",TYPE16X16,TYPE6X8);
    
40.                 }
    
41.                                 else if (adcx>620&&adcx<=730)
    
42.                 {
    
43.      LCD_Print(40, 32, "60cm",TYPE16X16,TYPE6X8);
    
44.                 }
    
45.                 else if (adcx>730&&adcx<=807)
    
46.                 {
    
47.      LCD_Print(40, 32, "50cm",TYPE16X16,TYPE6X8);       
    
48.                 }
    
49.                 else if (adcx>807&&adcx<=992)
    
50.                 {
    
51.      LCD_Print(40, 32, "40cm",TYPE16X16,TYPE6X8);
    
52.                 }
    
53.                 else if (adcx>992&&adcx<=1303)
    
54.                 {
    
55.      LCD_Print(40, 32, "30cm",TYPE16X16,TYPE6X8);
    
56.                 }
    
57.                 else if (adcx>1303&&adcx<=1551)
    
58.                 {
    
59.      LCD_Print(40, 32, "25cm",TYPE16X16,TYPE6X8);
    
60.                 }
    
61.                 else if (adcx>1551&&adcx<=1861)
    
62.                 {
    
63.      LCD_Print(40, 32, "20cm",TYPE16X16,TYPE6X8);               
    
64.                 }
    
65.                 else if (adcx>1861&&adcx<=2419)
    
66.                 {
    
67.     LCD_Print(40, 32, "15cm",TYPE16X16,TYPE6X8);
    
68.                 }
    
69.                 else if (adcx>2419&&adcx<=3102)
    
70.                 {
    
71.      LCD_Print(40, 32, "10cm",TYPE16X16,TYPE6X8);
    
72.                 }
    
73.                 else if (adcx>3102&&adcx<=3660)
    
74.                 {
    
75.      LCD_Print(40, 32, "8cm",TYPE16X16,TYPE6X8);               
    
76.                 }
    
77.                 else if (adcx>3660&&adcx<=3784)
    
78.                 {
    
79.      LCD_Print(40, 32, "7cm",TYPE16X16,TYPE6X8);
    
80.                 }
    
81.                 else if (adcx>3784&&adcx<=3908)
    
82.                 {
    
83.      LCD_Print(40, 32, "5cm",TYPE16X16,TYPE6X8);
    
84.                 }
    
85.                 else if (adcx>3908&&adcx<=4095)
    
86.                 {
    
87.      LCD_Print(40, 32, "6cm",TYPE16X16,TYPE6X8);
    
88.                 }
    
89.                 if(adcx>1551)        GPIO_ResetBits(GPIOA,GPIO_Pin_8);
    
90.                 else GPIO_SetBits(GPIOA,GPIO_Pin_8);
    
91.                 delay_ms(10);
    
92.         }
    
93. }
    

复制代码

所有资料51hei提供下载:
红外测距.rar (288.68 KB, 下载次数: 73)

2018-12-26 12:32 上传

点击文件名下载附件
这是用OLED显示的测距，显示的东西可以修改，不会的可以问我

感谢楼主的资源

感谢楼主的分享

感谢楼主

多谢楼主

这个是怎样实现测距的呢？比如距离到一定值之后单片机会有什么反应？

楼主你是用正点原子迷你版做的吗