重新开启测距定时器 MOV R2, 64H ； 测量间隔控制(约 4100=400ms） LOOP： LCALL DISPLAY DJNZ R2, LOOP SJMP START 1 *中断程序 (完整)用 51 单片机设计超声波测距系统的设计原理及电路附源程序 ；T0 中断 ， 65ms 中断一次 INTT0: CLR EA CLR TR0 MOV TH0 ，00H MOV TL0 ，00H SETB ET1 SETB EA SETB TR0 ;
启动计时器 T0 ， 用以计算超声波来回时 间 SETB TR1 ；开启发超声波用定时器 T1 OUT: RETI ;
T1 中断 。

17、 ， 发超声波用 INTT1: CPL VOUT DJNZ R4,RETIOUT CLR TR1 ；超声波发送完毕,关 T1 CLR ET1 MOV R4 ， 04H SETB EX0 ;
开启接收回波中断 RETIOUT: RETI ；外中断 0 ， 收到回波时进入 PINT0： CLR TR0 ；关计数器 CLR TR1 (完整)用 51 单片机设计超声波测距系统的设计原理及电路附源程序 CLR ET1 CLR EA CLR EX0 MOV 44H, TL0 ；将计数值移入处理单元 MOV 45H, TH0 SETB 00H ；接收成功标志 RETI *延时程序 DL1MS: MOV R6, 14H D 。

18、L1: MOV R7, #19H DL2： DJNZ R6 ，DL2 DJNZ R6, DL1 RET *显示程序* ;
40H 为最高位 ， 43H 为最低位 ， 先扫描高位 DISPLAY：MOVR1 ，40H;
G MOVR5 ， #0F7H;
G PLAY:MOVA, R5 MOVP0 ，#0FFH MOVP2, A MOVA ，R1 MOVDPTR, #TAB (完整)用 51 单片机设计超声波测距系统的设计原理及电路附源程序 MOVCA, A+DPTR MOVP0, A LCALL DLIMS INCR1 MOVA ，R5 JNBACC 。
0 ，ENDOUT；G RRA MOVR5 ，A AJMPPL 。

19、AY ENDOUT；MOVP2, 0FFH MOVP0 ，0FFH RET TAB； DB 0C0H ， 0F9H ， 0A4H,0B0H ， 99H ， 92H ， 82H,0F8H,80H,90H,0FFH,88H,0BFH ；共阳数码管 0， 1 ，2 ， 3,4,5,6 ， 7,8 ， 9 ， 不亮 ， A ，距离计算程序(=计算值17/1000cm） 近似 WORK：PUSHACC PUSHPSW PUSHB MOVPSW ，18H MOVR3, 45H MOVR2 ，44H MOVR1, 00D (完整)用 51 单片机设计超声波测距系统的设计原理及电路附源程序 MOVR0, 17D LCALL MUL2BY2 MOVR 。

20、3 ，03H MOVR2 ，0E8H LCALL DIV4BY2 LCALL DIV4BY2 MOV40H ，R4 MOVA ，40H JNZJJ0 MOV40H, 0AH ；最高位为 0,不点亮 JJ0：MOVAR0 MOVR4, A MOVAR1 MOVR5 A MOV R3, 00D MOVR2 ，#100D LCALL DIV4BY2 MOV41H, R4 MOVA, 41H JNZJJ1 MOVA, 40H ；此高位为 0 ， 先看最高位是否为不亮 SUBBA ，0AH JNZJJ1 (完整)用 51 单片机设计超声波测距系统的设计原理及电路附源程序 MOV41H, 0AH ； 最高位不 。

21、亮 ， 次高位也不亮 JJ1：MOVA, R0 MOVR4 ，A MOVA ，R1 MOVR5 ，A MOVR3, 00D MOVR2 ，#10D LCALL DIV4BY2 MOV42H ，R4 MOVA42H JNZJJ2 MOVA ，41H ；次高位为 0 ， 先看次高位是否为不亮 SUBBA ，0AH JNZJJ2 MOV42H ，0AH ；次高位不亮 ， 次高位也不亮 JJ2：MOV43H, R0 POPB POPPSW POPACC RET 两字节无符号数乘法程序 MUL2BY2：CLRA (完整)用 51 单片机设计超声波测距系统的设计原理及电路附源程序 MOVR7, A MOVR6 ，A。

22、MOV R5 ，A MOVR4 ，A MOV46H, 10H MULLOOP1:CLRC MOVA ，R4 RLCA MOVR4 ，A MOVA, R5 RLCA MOVR5, A MOVA ，R6 RLCA MOVR6 ，A MOVA ，R7 RLCA MOV R7 ，A MOV A ，R0 RLC A MOVR0 ，A MOVA, R1 RLCA MOVR1, A (完整)用 51 单片机设计超声波测距系统的设计原理及电路附源程序 JNCMULLOOP2 MOVA ，R4 ADDA, R2 MOVR4 ，A MOVA ，R5 ADDCA, R3 MOVR5, A MOVA ，R6 ADDC 。

【最新|(最新整理)用51单片机设计超声波测距系统的设计原理及电路附源程序】23、A, 00H MOVR6, A MOVA ，R7 ADDCA ，00H MOVR7 ，A MULLOOP2：DJNZ46H ，MULLOOP1 RET 四字节/两字节无符号数除法程序* DIV4BY2:MOV46H ，20H MOVR0 ， #00H MOVR1 ，00H DIVLOOP1: MOVA, R4 RLCA MOVR4 ，A MOVA, R5 (完整)用 51 单片机设计超声波测距系统的设计原理及电路附源程序 RLCA MOVR5, A MOVA, R6 RLCA MOVR6, A MOVA ，R7 RLCA MOVR7 ，A MOVA, R0 RLCA MOVR0 ，A MOVA ，。

24、R1 RLCA MOVR1, A CLRC MOVA ，R0 SUBBA ，R2 MOVB ，A MOV A ，R1 SUBBA ，R3 JCDIVLOOP2 MOVR0 ，B MOVR1 ，A (完整)用 51 单片机设计超声波测距系统的设计原理及电路附源程序 DIVLOOP2：CPLC DJNZ46H, DIVLOOP1 MOVA, R4 RLCA MOVR4 ， A MOVA, R5 RLCA MOVR5,A MOVA, R6 RLCA MOVR6 ，A MOVA ，R7 RLCA MOVR7, A RET ； END 附 C51 程序 #INCLUDE REG51 。
H #DEFINE UC 。

25、HAR UNSIGNED CHAR #DEFINE UINT UNSIGNED INT #DEFINE ULONG UNSIGNED LONG (完整)用 51 单片机设计超声波测距系统的设计原理及电路附源程序 EXTERN VOID CS_T（VOID）;
EXTERN VOID DELAY（UINT） ； EXTERN VOID DISPLAY（UCHAR*);
/DATA UCHAR DISPLAY（UCHAR）;
DATA UCHAR TESTOK； VOID MAIN (VOID） DATA UCHAR DISPRAM5 ； DATA UINT I;
DATA ULONG TIME； 。

26、 P0=0XFF;
P2=0XFF;
TMOD=0X11； IE=0X80;
WHILE (1) CS_T(）;
DELAY（1);
TESTOK=0； EX0=1;
ET0=1； WHILE(! TESTOK） DISPLAY（DISPRAM);
(完整)用 51 单片机设计超声波测距系统的设计原理及电路附源程序 IF (1=TESTOK) TIME=TH0;
TIME=(TIME8）| TL0;
TIME=172； TIME/=10000;
DISPRAM0=（UCHAR） （TIME%10)； TIME/=10； DISPRAM1=(UCHAR) (TIME%10);

来源：(未知)

【学习资料】网址：/a/2021/0318/0021716795.html

标题：最新|(最新整理)用51单片机设计超声波测距系统的设计原理及电路附源程序( 三 )