#include
unsigned?int?i=0;
sbit?P36=P3^6;
unsigned?char?j;
unsigned?int?kop;
unsigned?char?a[10]={0xc00xf90xa40xb00x990x920x820xf80x800x90};
unsigned?char?b[8]={0xff0xff0xff0xff0xff0xff0xff0xff};
void?delaym（unsigned?int?t）
{?unsigned?char?p;	??????
while（t--）
{
for（p=0;?p<125;?p++）;		
}
}

void?main（）
{
????EA?=?1;
????TH0=0x00;
	TL0=0x00;
	ET0=1;
	ET1=1;		
??	TMOD?=?0x15;//?打開定時(shí)器和計(jì)數(shù)器T0，因此矩形脈沖輸入端接P3.4
	TH1=0x3C;?//50ms
	TL1=0xB0;		
????TR0?=?1;
	TR1?=?1;
while（1）
{?
??for（j=0;j<3;j++）?//顯示個(gè)數(shù)
??{
??P0=b[j];
??P2=j;
??delaym（2）;
???}
??}
}
timer3（）?interrupt?3??//定時(shí)器中斷時(shí)間到就讀取計(jì)數(shù)器值
{?TH1=0X3C;
?TL1=0XB0;
?i++;
if（i==20）?//1s才進(jìn)行技術(shù)脈沖值顯示，即每秒更新一次速度
{
???kop=TH0;//計(jì)數(shù)器計(jì)入脈沖，每來(lái)一個(gè)矩形脈沖計(jì)數(shù)值加1
???kop=kop<<8;
???kop=kop+TL0;

b[2]=a[kop/100];???????//顯示計(jì)數(shù)器的值即實(shí)際測(cè)得速度
b[1]=a[kop%100/10];
b[0]=a[kop%100%10];
i=0;
TH0=0;//計(jì)數(shù)器速度獲取后清零，進(jìn)行下次獲取
TL0=0;
}
}

?屬性????????????大小?????日期????時(shí)間???名稱
-----------?---------??----------?-----??----

?????文件???????1029??2009-04-04?17:03??電機(jī)測(cè)速（有霍爾+磁鋼或紅外反射對(duì)管+黑白碼盤做該實(shí)驗(yàn)）\moto?test.c

?????文件???????3608??2008-11-29?10:44??電機(jī)測(cè)速（有霍爾+磁鋼或紅外反射對(duì)管+黑白碼盤做該實(shí)驗(yàn)）\moto

?????文件????????199??2008-12-02?14:34??電機(jī)測(cè)速（有霍爾+磁鋼或紅外反射對(duì)管+黑白碼盤做該實(shí)驗(yàn)）\moto.plg

?????文件???????2122??2008-11-29?11:40??電機(jī)測(cè)速（有霍爾+磁鋼或紅外反射對(duì)管+黑白碼盤做該實(shí)驗(yàn)）\moto.Uv2

?????文件???????3918??2008-11-29?10:44??電機(jī)測(cè)速（有霍爾+磁鋼或紅外反射對(duì)管+黑白碼盤做該實(shí)驗(yàn)）\moto?test.OBJ

?????文件???????2541??2008-11-29?10:44??電機(jī)測(cè)速（有霍爾+磁鋼或紅外反射對(duì)管+黑白碼盤做該實(shí)驗(yàn)）\moto?test.LST

?????文件???????1517??2008-11-28?18:48??電機(jī)測(cè)速（有霍爾+磁鋼或紅外反射對(duì)管+黑白碼盤做該實(shí)驗(yàn)）\moto.hex

?????文件?????????45??2008-11-29?10:44??電機(jī)測(cè)速（有霍爾+磁鋼或紅外反射對(duì)管+黑白碼盤做該實(shí)驗(yàn)）\moto.lnp

?????文件???????5795??2008-11-29?10:44??電機(jī)測(cè)速（有霍爾+磁鋼或紅外反射對(duì)管+黑白碼盤做該實(shí)驗(yàn)）\moto.M51

?????文件????????983??2008-11-29?11:40??電機(jī)測(cè)速（有霍爾+磁鋼或紅外反射對(duì)管+黑白碼盤做該實(shí)驗(yàn)）\moto_Opt.Bak

?????文件???????2077??2008-11-24?19:19??電機(jī)測(cè)速（有霍爾+磁鋼或紅外反射對(duì)管+黑白碼盤做該實(shí)驗(yàn)）\moto_Uv2.Bak

?????文件????????981??2008-12-02?14:53??電機(jī)測(cè)速（有霍爾+磁鋼或紅外反射對(duì)管+黑白碼盤做該實(shí)驗(yàn)）\moto.Opt

?????目錄??????????0??2009-04-04?17:33??電機(jī)測(cè)速（有霍爾+磁鋼或紅外反射對(duì)管+黑白碼盤做該實(shí)驗(yàn)）

-----------?---------??----------?-----??----

????????????????24815????????????????????13