【正文】 8H MOV TH1, 0E8H 。設波特率1200SETB PS SETB EA 。開總中斷SETB ES SETB ET0 。開T0中斷SETB TR1 。開啟T1記數(shù)SETB SETB MOV 23H,35 。設定LED顯示的延時時間MOV 24H,17 。設定串口發(fā)送的延時時間ACALL DDELAYLCALL LOOP 。調(diào)用溫度補償子程序CLR 80HSETB ESSRT: CLR ESCLR TICLR RIMOV R0,80HCLR AMOV A,SBUFMOV @R0,AINC R0SETB ESRETIPanduan: MOV R0,80HCJNE @R0,65,L1LCALL MAN1SJMP PanduanL1: CJNE @R0,66,L2LCALL MAN2 SJMP PanduanL2: CJNE @R0,67,L3LCALL MAN3SJMP PanduanL3: CJNE @R0,68,L4LCALL MAN4SJMP PanduanL4: CJNE @R0,69,L5 LCALL MAN5 SJMP Panduan L5: LCALL MAN6 SJMP PanduanLOOP1: JNB ,LOOP1 DJNZ 23H, Panduan 。判斷顯示延時時間 JNB ,XS2 CLR MOV P1,00010000B MOV P2 00000001B MOV R0,50H ACALL BCD ACALL LED SJMP LOOP2XS2: SETB MOV P1,00010000B MOV P2,00000010B MOV R0,60H 。超聲2的數(shù)據(jù)地址送R0 ACALL BCD 。把距離數(shù)據(jù)進行BCD碼轉(zhuǎn)化 ACALL LED 。調(diào)用顯示子程序 SJMP LOOP3DJNZ 24H, Panduan 。判斷串口發(fā)送延時到了嗎？ JNB ,LOOP3 MOV R0,50H 。把超聲1測距單元地址送R0 CLR TI MOV SBUF,10001000B 。并向PC機發(fā)11H,表示為傳感器1 JNB TI,$ CLR TI SJMP LOOP4 LOOP3: MOV R0,60H CLR TI MOV SBUF,00100010B 。并向PC機發(fā)22H, 表示為傳感器2 JNB TI,$ CLR TILOOP4: MOV SBUF,@R0 。發(fā)送數(shù)據(jù) INC R0 JNB TI,$ CLR TI MOV SBUF,@R0 INC R0 JNB TI,$ CLR TI MOV SBUF,@R0 INC R0 JNB TI,$ CLR TI MOV SBUF,@R0 JNB TI,$ CLR TI RET MAN1: CLR LOPA: JB ,LOPA CLR MOV TH0,21H MOV TL0,58H SETB EX0 。開外部中斷0 CLR 。啟傳感器1工作 SETB TR0 。啟T0記數(shù) ACALL DELAY2 CLR 。提前結(jié)束內(nèi)部消隱,BINH=1 CLR ACALL DELAY1 。 SETB 。BINK=0 SETB MOV R0,30H 。傳感器1計時單元地址 MOV R7, 。目標個數(shù) MOV @R0,TL0 INC R0 MOV @R0,TH0。存儲傳感器1計時數(shù)據(jù) INC R0 AJMP LOPAMAN2: CLR LOPB: JB ,LOPB CLR MOV TH0,21H MOV TL0,58H SETB TR0 。啟T0記數(shù) ACALL DELAY CLR 。啟動傳感器2工作 SETB TR0 。啟T0記數(shù) SETB ET0 。開T0中斷 SETB EX1 。開外部中斷1 ACALL DELAY2 。 CLR 。提前結(jié)束內(nèi)部消隱 CLR ACALL DELAY1 。 SETB MOV R0,40H 。傳感器2記數(shù)地址 MOV R7, 。目標個數(shù) MOV @R0,TL0 INC R0 MOV @R0,TH0。存儲傳感器2計時數(shù)據(jù) INC R0 CLR AJMP LOPBMAN3: CLR SETB 。設顯示標志位 ACALL DELAY1LOPC: JB ,LOPC 。等1跳轉(zhuǎn) CLR MOV TH0,21H MOV TL0,58H CLR 。啟傳感器1工作 SETB TR0 。啟T0記數(shù) SETB EX0 。開外部中斷0 ACALL DELAY2 。 CLR 。提前結(jié)束內(nèi)部消隱,BINH=1 CLR ACALL DELAY1 。 SETB 。BINK=0 MOV R0,30H 。超聲波傳感器1記數(shù)地址 MOV R7,02H 。目標個數(shù) SETB MOV @R0,TL0 INC R0 MOV @R0,TH0。存儲超聲1計時數(shù)據(jù) INC R0 AJMP LOPCMAN4: CLR SETB 。設顯示標志位 ACALL DELAY1LOPD: JB ,LOPD 。等1跳轉(zhuǎn) CLR MOV TH0,21H MOV TL0,58H CLR 。啟傳感器2工作 SETB TR0 。啟T0記數(shù) SETB EX1 。開外部中斷1 ACALL DELAY2 。 CLR 。提前結(jié)束內(nèi)部消隱 CLR ACALL DELAY1 。 SETB MOV R0,40H 。傳感器2記數(shù)地址 MOV R7,02H 。目標個數(shù) MOV R0,40H 。傳感器2計時單元地址 SETB MOV @R0,TL0 INC R0 MOV @R0,TH0。存儲傳感器2計時數(shù)據(jù) INC R0 AJMP LOOPDMAN5: SETB LOOPE: MOV TH0,21H MOV TL0,58H 。T0初值 CLR SETB EX0 。開外部中斷0 CLR 。啟傳感器1工作 SETB TR0 。啟T0記數(shù) ACALL DELAY2 。 CLR 。提前結(jié)束內(nèi)部消隱,BINH=1 CLR ACALL DELAY1 。 SETB 。BINK=0 MOV R0,30H 。超聲波傳感器1記數(shù)地址 MOV R7, 。目標個數(shù)LOP1: JB ,LOP1 。 判斷超聲標志位為1轉(zhuǎn)移 CLR 。啟傳感器2工作 SETB TR0 。啟T0記數(shù) SETB ET0 。開T0中斷 SETB EX1 。開外部中斷1 ACALL DELAY2 。 CLR 。提前結(jié)束內(nèi)部消隱 CLR ACALL DELAY1 。 SETB MOV R0,40H 。傳感器2記數(shù)地址 MOV R7, 。目標個數(shù) LOOP2: JNB ,LOOP2 。 判斷傳感器標志位 SJMP LOOPEMAN6: SETB SETB LOOPF: MOV TH0,20H 。T0初值, MOV TL0,5FH SETB ET0 。開T0中斷 SETB EX0 。開外部中斷0