51單片機(jī)超聲波測距程序

超聲波測距 測距范圍 2cm 400cm include include define uint unsigned int define uchar unsigned char sbit trig P1 0 sbit echo P3 2 sbit test P1 1 測試燈 sbit dula P2 6 sbit wela P2 7 sbit BEEP P2 3 uint timeh timel distance uint ge shi bai xiaoshu flag time 共陰極數(shù)碼管不帶小數(shù)點(diǎn)代碼表 uchar code list 0 x3f 0 x06 0 x5b 0 x4f 0 x66 0 x6d 0 x7d 0 x07 0 x7f 0 x6f 0 x77 0 x7c 0 x39 0 x5e 0 x79 0 x71 共陰極數(shù)碼管帶小數(shù)點(diǎn)代碼表 uchar code listtwo 0 xbf 0 x86 0 xdb 0 xcf 0 xe6 0 xed 0 xfd 0 x87 0 xff 0 xef 長延時(shí)函數(shù) void delay uint z uint x y for x z x 0 x for y 100 y 0 y 短延時(shí)函數(shù) void delay20us uchar a for a 0 a 100 a 報(bào)警函數(shù) void beer BEEP 0 delay 10 定時(shí)器初始化 void initime0 TMOD 0 x01 TH0 0 TL0 0 EA 0 ET0 0 EX0 0 外部中斷函數(shù) void estern interrupt 0 timeh TH0 timel TL0 beer flag 1 進(jìn)入中斷 標(biāo)志位就置 1 EX0 0 同時(shí)關(guān)斷外部中斷和定時(shí)器 TR0 0 顯示函數(shù) void display distance bai distance 1000 shi distance 1000 100 ge distance 100 xiaoshu distance 10 dula 1 P0 list xiaoshu dula 0 P0 0 xff wela 1 P0 0 xf7 wela 0 delay 2 dula 1 P0 listtwo ge dula 0 P0 0 xff wela 1 P0 0 xfb wela 0 delay 2 dula 1 P0 list shi dula 0 P0 0 xff wela 1 P0 0 xfd wela 0 delay 1 dula 1 P0 list bai dula 0 P0 0 xff wela 1 P0 0 xfe wela 0 delay 1 被調(diào)用子函數(shù) void diaoyong uint i EA 0 echo 1 為了檢測電平的高低 首先必須拉 高 trig 1 delay20us trig 0 while echo 0 如果進(jìn)入中斷 即接收到超聲波就 向下執(zhí)行 flag 0 接收到就清除標(biāo)志位 EA 1 同時(shí)打開總中斷 EX0 1 打開外部中斷 TR0 1 開定時(shí)器 TH0 0 定時(shí)器清零 TL0 0 for i 0 i 100 i 等待測量的結(jié)果 display distance 用 100 次顯示循環(huán)來延時(shí) 解決數(shù)碼 管顯示不亮問題 delay 50 用延時(shí)函數(shù)數(shù)碼管閃爍 TR0 0 延時(shí)一段時(shí)間后關(guān)斷定時(shí)器 EX0 0 延時(shí)一段時(shí)間后關(guān)斷外部中斷 if flag 1 如果進(jìn)入中斷 說明測距已經(jīng)測好 time timeh 256 timel 計(jì)算測定距離 并顯示 distance time 0 1720 display distance if flag 0 如果沒有進(jìn)入中斷 距離為 0 同時(shí)燈 閃爍 distance 0 te