免费超声波测距仪的设计

bsp;XSGW   ;当百位为零时消隐
XSSW: SWAP A    ;正常显示
   ORL A,#0BH
   MOV P1,A
   ACALL DELAY

XSGW: MOV A,7BH   ;显示十位
   SWAP A
   ORL A,#0DH
   MOV P1,A
   ACALL DELAY

   MOV A,7AH   ;显示小数
   SWAP A
   ORL A,#0EH
   MOV P1,A
   ACALL DELAY

   RET

超声波发射子程序：
TIMER1:CPL P3.7   ;发射10个40K脉冲信号
   DJNZ R5,FH_T1
   CLR TR1
   CLR IE0    ;清外部中断0标志位
   SETB EX0   ;开外部中断0
FH_T1: RETI

回波接收处理子程序：
TT0: PUSH ACC
   PUSH PSW
   CLR TR0   ;关定时器T0
   CLR EX0   ;关外部中断0
   ACALL DISP   ;刷新显示
   ACALL DISP   ;刷新显示
   MOV 7AH,70H
   MOV 7BH,71H
   MOV 7CH,72H
   MOV 7DH,73H

   MOV 70H,#00H
   MOV 71H,#00H
   MOV 72H,#00H
   MOV 73H,#00H
   MOV TH0,#0F6H
   MOV TL0,#0EAH
   MOV TL1, TH1

   SETB TR0
   MOV R5,#14H
   SETB TR1   ;重新发射10个脉冲波
  CLR IE0    ;清外部中断0标志位
  SETB EX0   ;开外部中断0
FH_TT0:POP PSW
   POP ACC
   RETI

距离计算子程序：
TIMER:PUSH ACC
   PUSH PSW
   MOV TH0,#0F6H
   MOV TL0,#0F1H

   INC  70H
   INC  70H
   MOV A,70H
   CJNE A,#0AH,FH
   MOV 70H,#00H

   INC  71H
   MOV A,71H
   CJNE A,#0AH,FH
   MOV 71H,#00H

   INC  72H
   MOV A,72H
   CJNE A,#0AH,FH
   MOV 72H,#00H

   INC  73H
   MOV A,73H
   CJNE A,#01H,FH
   MOV 73H,#00H
         ;没回复信号，则复位系统
&nbs

首页上一页 3 4 5 6 7 下一页尾页 6/7/7

免费超声波测距仪的设计(六)