资源描述:
《《超声波测距》word版》由会员上传分享,免费在线阅读,更多相关内容在应用文档-天天文库。
1、;晶振采用6M,P1口为数码管段输出口,P3.0~P3.2为 *;数码管位输出口,P3.5超声波;发送输出,P3.7超声波收* ;***************************************************;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 中断入口程序 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2、 ORG0000H ljmpstart ORG002BH;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 主程序 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; START:MOVR0,#70H MOVR7,#0BH MOV20H,#00H CLEARDISP: M
3、OV@R0,#00H INCR0 DJNZR7,CLEARDISP MOVTMOD,#99H cjzcx:MOVTL0,#00H MOVTH0,#00H MOVR0,#0bH movr1,#0bh mov16h,#03H mov15h,#54H mov17h,#90h puzel:mov14h,#32h ;超声波发射
4、持续200ms here:cplp3.5 ;输出40kHz方波 nop nop nop djnz14h,here setbtr0 setbp3.2 mq:djnz15h,$ djnz16
5、h,mq QBA:JNBP3.7,QBC DJNZR1,QBA DJNZR0,QBA QBC:djnz17h,QBC clrp3.2 clrtr0 mov70h,tl0 mov71h,th0 movr2,71h movr3,70h movr6,#22H
6、 movr7,#0H LCALLMULD movr6,#64H movr7,#0H LCALLDIVD MOV73H,R2 MOV74H,R3 CLRR3 CLRR4 CLRR5 MOVR6,73H MOVR7,74H LCALL
7、HB2 MOVA,R4 MOVB,#10H DIVAB MOV78H,A MOV77H,B MOVA,R5 MOVB,#10H DIVAB MOV76H,A MOV75H,B mova,78h cjnea,#0h,pdcx
8、 mova,77h cjnea,#5h,pdcx mova,76h cjnea,#0h,pdcx mov78h,#0bh mov77h,#0bh mov76h,#0bh ajmpxxcx pdcx:mova,78h cjnea,#4h,xxcx