要求是兩個紅外傳感器距離一米，用手觸發A傳感器啟動定時器計時，然后再觸發B傳感器停止計數，得到時間，再求速度（路程/時間）。最后顯示在LCDLCD1602A。
程序如下：
#include<reg52.h>
#include<intrins.h>
#define uint8 unsigned char
#define uint16 unsigned int
#define CMD 0x00
#define DAT 0x01
#define DataPort P0//LCD數據口
sbit RW=P2^6;
sbit RS=P2^7;
sbit E=P2^5;
sbit A=P1^0;//傳感器A
sbit N=P2^0;//傳感器B
uint8 CNT=0; //10ms
float speed;
bit flag_1s=0;
uint8 Resust=0;
/**ms級延時子程序**/
void delay(uint16 t)
{
uint16 a;
for(;t>0;t--)
for(a=123;a>0;a--);
}
/**LCD時序**/
void write_LCD(uint8 dat,bit rs)
{
E=0;
RW=0;
RS=rs;//選擇指令or數據
_nop_();
_nop_();
_nop_();
E=1;
_nop_();//delay(1);
_nop_();
_nop_();
DataPort=dat;//將數據送到LCD數據口
_nop_();
_nop_();
_nop_();
E=0;
delay(1);
}
/**LCD選擇顯示位置子函數**/
void SetXY(uint8 x,uint8 y)
{
x=x&0x0f;//防止X、Y 超過量程
y=y&0x01;
if(y)
{
write_LCD(0x80+x,CMD);
}
else
{
write_LCD(0xc0+x,CMD);
}
}
/**速度數值轉換子函數**/
void disload(uint16 a)
{
SetXY(3,0);
write_LCD(a*100/100+'0',DAT);//個位
write_LCD('.',DAT);
write_LCD(a*100%100/10+'0',DAT);//小數位1
write_LCD(a*100%100%10+'0',DAT);//小數位2
write_LCD('k',DAT);
write_LCD('m',DAT);
write_LCD('/',DAT);
write_LCD('h',DAT);
}
/**LCD字符指針函數**/
void LCD_wrstr(uint8*str)
{
while(*str!='\0')
{
write_LCD(*str,DAT);
str++;
}
}
/**初始化子程序**/
void All_init()
{
delay(500);
write_LCD(0x38,CMD);
write_LCD(0x38,CMD);
write_LCD(0x0c,CMD);
write_LCD(0x01,CMD);
delay(10);
SetXY(0,1);//設置標題顯示位置
LCD_wrstr("Tachometer:");
TMOD=0x01;//設置T0位工作方式1——作為16位定時器
ET0=1;//打開定時器0的中斷
TR0=1;//打開定時器0
TH0=(65536-9216)/256;//裝入初值
TL0=(65536-9216)%256;
IT0=1;//外部中斷0為下降沿中斷
EX0=1;//打開外部中斷
EA=1;//打開總中斷
}
void main()
{
All_init();//先進行初始化
while(1)
{
if(flag_1s==1)
{
flag_1s=0;//1s標志位清零
disload(speed);
}
}
Timer0Init();
EA=1;
while(1)
{
if(A==1)//當傳感器a檢測到時
{
CNT=0;//從0開始計時
CNT++
}
if(N==1)//當傳感器B檢測到時
{
Resust=CNT; //存儲計數結果
}
}
}
/**定時器0中斷服務子程序**/
void timer0() interrupt 1
{
TH0=(65536-9216)/256;
TL0=(65536-9216)%256;
if(CNT==300)
{
speed=360/Resust*100;
EX0=0;//關閉外部中斷0
CNT=0;//定時1s之后C_50ms清零
flag_1s=1;//1s標志位置1
TH0=(65536-9216)/256;//重新初值
TL0=(65536-9216)%256;
}
}
|
