基于89c51超聲波測距論文(doc畢業(yè)設(shè)計論文)(編輯修改稿)
2025-07-19 13:10 本頁面
【文章內(nèi)容簡介】 收到回波時進入PINT0: CLR TR0 。關(guān)計數(shù)器 CLR TR1 CLR ET1 CLR EA 。 CLR EX0 。 MOV 44H,TL0 。將計數(shù)值移入處理單元 MOV 45H,TH0 。 SETB 00H 。接收成功標(biāo)志 RETI。****************************************************。* 顯示程序 *。****************************************************。 40H為最高位，43H為最低位，先掃描高位 DISPLAY: MOV R1,40H。G MOV R5,0F7H。G PLAY: MOV A,R5 MOV P0,0FFH MOV P2,A MOV A,@R1 MOV DPTR,TAB MOVC A,@A+DPTR MOV P0,A LCALL DL1MS INC R1 MOV A,R5 JNB ,ENDOUT。G RR A MOV R5,A AJMP PLAY ENDOUT: MOV P2,0FFH MOV P0,0FFH RET。 TAB: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H,0FFH,88H,0BFH。共陽段碼表 0 1 2 3 4 56 7 8 9 不亮A。****************************************************。* 延時程序 *。****************************************************。 DL1MS: MOV R6,14H DL1: MOV R7,19H DL2: DJNZ R7,DL2 DJNZ R6,DL1 RET。****************************************************。* 距離計算程序 (=計數(shù)值*17/1000cm) *。****************************************************。work: PUSH ACC PUSH PSW PUSH B MOV PSW, 18h MOV R3, 45H MOV R2, 44H MOV R1, 00D MOV R0, 17D LCALL MUL2BY2 MOV R3, 03H MOV R2, 0E8H LCALL DIV4BY2 LCALL DIV4BY2 MOV 40H, R4 MOV A,40H JNZ JJ0 MOV 40H,0AH 。最高位為零，不點亮JJ0: MOV A, R0 MOV R4, A MOV A, R1 MOV R5, A MOV R3, 00D MOV R2, 100D LCALL DIV4BY2 MOV 41H, R4 MOV A,41H JNZ JJ1 MOV A,40H 。次高位為0，先看最高位是否為不亮 SUBB A,0AH JNZ JJ1 MOV 41H,0AH 。最高位不亮，次高位也不亮JJ1: MOV A, R0 MOV R4, A MOV A, R1 MOV R5, A MOV R3, 00D MOV R2, 10D LCALL DIV4BY2 MOV 42H, R4 MOV A,42H JNZ JJ2 MOV A,41H 。次次高位為0，先看次高位是否為不亮 SUBB A,0AH JNZ JJ2 MOV 42H,0AH 。次高位不亮，次次高位也不亮JJ2: MOV 43H, R0 POP B POP PSW POP ACC RET。****************************************************。* 兩字節(jié)無符號數(shù)乘法程序 *。****************************************************。 R7R6R5R4 = R3R2 * R1R0。MUL2BY2: CLR A MOV R7, A MOV R6, A MOV R5, A MOV R4, A MOV 46H, 10HMULLOOP1: CLR C MOV A, R4 RLC A MOV R4, A MOV A, R5 RLC A MOV R5, A MOV A, R6 RLC A MOV R6, A MOV A, R7 RLC A MOV R7, A MOV
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1