基于51超声波测距器设计--中国矿业大学徐海学院电子04-1 鲍海鸿.doc

程序清单

以下是用汇编语言编写的超声波测距控制源程序：

采用AT89S5112ＭＨz晶振

显示缓冲单元在４０Ｈ～４３Ｈ，使用内存44H、45H、46H用于计算距离

20H用于标志

VOUTEQUP1.0;脉冲输出端口

*中断入口程序*

ORG0000H

LJMPSTART

ORG0003H

LJMPPINT0

ORG000BH

LJMPINTT0

ORG0013H

RETI

ORG001BH

LJMPINTT1

ORG0023H

RETI

ORG002BH

RETI

*主程序*

START:MOVSP,#4FH

MOVR0,#40H;40~43H为显示数据存放单元（40为最高位）

MOVR7,#0BH

CLEARDISP:MOV@R0,#00H

INCR0

DJNZR7,CLEARDISP

MOV20H,#00H

MOVTMOD,#21H;T1为8位自动重装模式，T0为16位定时器

MOVTH0,#00H;65ms初值

MOVTL0,#00H;40KHz初值

MOVTH1,#0F2H

MOVTL1,#0F2H

MOVP0,#0FFH

MOVP1,#0FFH

MOVP2,#0FFH

MOVP3,#0FFH

MOVR4,#04H；超声波脉冲个数控制（为赋值的一半）

SETBPX0

SETBET0

STEBEA

CLR00H

SETBTR0 ;开启测距定时器

START1:LCALLDISPLAY

JNB00H,START1;收到反射信号时标志位为1

CLREA

LCALLWORK；计算距离子程序

SETBEA

CLR00H

SETBTR0；重新开启测距定时器

MOVR2,#64H；测量间隔控制（约4*100=400ms）

LOOP:LCALLDISPLAY

DJNZR2,LOOP

SJMPSTART1

*中断程序*

;T0中断，65ms中断一次

INTT0:CLREA

CLRTR0

MOVTH0,#00H

MOVTL0,#00H

SETBET1

SETBEA

SETBTR0;启动计时器T0，用以计算超声波来回时间

SETBTR1;开启发超声波用定时器T1

OUT:RETI

;T1中断，发超声波用

INTT1:CPLVOUT

DJNZR4,RETIOUT

CLRTR1；超声波发送完毕，关T1

CLRET1

MOVR4,#04H

SETBEX0；开启接收回波中断

RETIOUT:RETI

;外中断0，收到回波时进入

PINT0:CLRTR0；关计数器

CLRTR1

CLRET1

CLREA

CLREX0

MOV44H,TL0；将