单片机红外测距开发

利用红外距离传感器，将测得的电信号转换为数字信号，并在LCD1602上显示

#include< reg52.h> 
#define uint unsigned int 
#define uchar unsigned char

uchar code table1[]=“0123456789.m“;
uchar code table2[]=“the distance is:“; 
 
uchar baishige; 
uint temp; 
uchar num;
 

sbit lcden=P1^2;
sbit lcdrs=P1^0; 																											   
sbit lcdrw=P1^1; 

sbit clock=P3^7; 
sbit start=P3^4; 
sbit eoc=P3^5; 
sbit oe=P3^6; 
sbit ale=P1^7; 
sbit adda=P3^2; 


void delay（uint x）; 

void write_com（uchar com）
{ 
   lcdrw=0; 
   lcdrs=0; 
   P0=com; 
   delay（5）; 
   lcden=1; 
   delay（5）; 
   lcden=0; 
} 

void write_data（uchar date）//1602
{ 

   lcdrw=0; 
   lcdrs=1; 
   P0=date; 
   delay（5）; 
   lcden=1; 
   delay（5）; 
   lcden=0; 
} 

void lcd_init（）
{ 
   lcden=0; 
   write_com（0x38）; 
   write_com（0x0c）; 
   w

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       6486  2016-12-26 11:34  红外测距\红外测距程序文件\1602

     文件       2286  2016-12-26 11:34  红外测距\红外测距程序文件\1602.c

     文件       1458  2016-12-26 11:34  红外测距\红外测距程序文件\1602.hex

     文件         25  2016-12-26 11:34  红外测距\红外测距程序文件\1602.lnp

     文件       5340  2016-12-26 11:34  红外测距\红外测距程序文件\1602.LST

     文件       8854  2016-12-26 11:34  红外测距\红外测距程序文件\1602.M51

     文件       7284  2016-12-26 11:34  红外测距\红外测距程序文件\1602.OBJ

     文件        347  2016-12-26 11:34  红外测距\红外测距程序文件\1602.plg

     文件      55210  2016-12-26 11:34  红外测距\红外测距程序文件\1602.uvopt

     文件      13223  2016-11-30 19:15  红外测距\红外测距程序文件\1602.uvproj

     文件      55212  2016-12-04 20:28  红外测距\红外测距程序文件\1602_uvopt.bak

     文件          0  2016-11-30 16:56  红外测距\红外测距程序文件\1602_uvproj.bak

     文件      34447  2016-12-26 11:47  红外测距\红外测距论文参考.docx

     文件     166267  2016-12-26 10:44  红外测距\附件1\红外模块1.jpg

     文件     121357  2016-12-26 10:44  红外测距\附件1\红外模块2.jpg

     文件     136154  2016-12-26 10:44  红外测距\附件1\红外模块3.jpg

     文件      94785  2016-12-26 10:44  红外测距\附件1\红外模块4.jpg

     文件     264338  2016-12-26 11:12  红外测距\附件2\红外测距原理图.pdf

     目录          0  2016-12-26 11:49  红外测距\红外测距程序文件

     目录          0  2016-12-26 11:49  红外测距\附件1

     目录          0  2016-12-26 11:49  红外测距\附件2

     目录          0  2016-12-26 11:50  红外测距

----------- ---------  ---------- -----  ----

               973073                    22