【正文】 2004. 附錄一 原理圖 附錄二 源程序 ；******************************************************* ；超聲波測(cè)距器 ；采用AT89C52 12MHz晶振 ；采用共陽(yáng)LED顯示器 ；******************************************************** ；~4m,堆棧在4FH以上，20H用于標(biāo)志顯 ；示緩沖單元在40H~43H，內(nèi)存44H~46H用于計(jì)算距離 VOUT EQU ；脈沖輸出端口 ；********************************************************* ；**************************中斷入口程序******************** ORG 0000H LJMP START ORG 0003H LJMP PINT0 ORG 000BH LJMP INT0 ORG 0013H RETI ORG 001BH LJMP INT1 ORG 0023H RETI ORG 002BH RETI ；****************************主程序************************* START:： MOV SP,4FH MOV R0 , 40H 。T1為8位自動(dòng)重裝模式，T0為16位定時(shí)器 MOV TH0 ,00H 。40kHz初值 MOV TL1, 0F2H MOV P0, 0FFH MOV P1, 0FFH MOV P2, 0FFH MOV P3, 0FFH MOV R4, 04H 。開(kāi)啟測(cè)距定時(shí)器 START1: LCALL DISPLAY JNB 00H, START1 。計(jì)算距離子程序 SETB EA CLR 00H SETB TR0 。測(cè)量間隔控制（約4ms100=400ms）LOOP: LCALL DISPLAY DJNZ R2, LOOP SJMP START1。T0中斷，65ms中斷一次INT0: CLR EA CLR TR0 MOV TH0, 00H MOV TL0, 00H SETB ET1 SETB EA SETB TR0 。開(kāi)啟發(fā)超聲波用定時(shí)器T1OUT: RETI。超聲波發(fā)送完畢，關(guān)閉T1 CLR ET1 MOV R4, 04H SETB EX0 。外中斷0，收到回波時(shí)進(jìn)入PINT0: CLR TR0 。將計(jì)數(shù)值移入處理單元 MOV 45H, TH0 SETB 00H 。*************************顯示程序************************；40H為最高位，43H為最低位，先掃描高位DISPLAY: MOV R1, 40H MOV R5, 0F7HPLAY: 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 RR A MOV R5, A AJMP PLAYENDOUT: MOV P2, 0FFH MOV P0, 0FFH RETTAB: DB 0C0H, 0F9H, 0A4H, 0B0H, 99H, 92H, 82H, 0F8H, 80H, 90H, 0FFH, 88H。 ***************距離計(jì)算程序（距離=計(jì)數(shù)值17/1000m）************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 。最高位不亮，次高位也不亮 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 。次高位不亮，次次高位也不亮 JJ2: MOV 43H, R0 POP B POP PSW POP ACC RET。********************4字節(jié)/2字節(jié)無(wú)符號(hào)數(shù)除法程序*********************；R7R6R5R4/R3R2=R7R6R5R4(商)…………R1R0(余數(shù))DIV4BY2: MOV 46H, 20H MOV R0, 00H MOV R1, 00HDIVLOOP1: 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 A, R0 RLC A MOV R0, A MOV A, R1 RLC A MOV R1, A CLR C MOV A, R0 SUBB A, R2 MOV B, A MOV A, R1 SUBB A, R3 JC DIVLOOP2 MOV R0, B MOV R1, ADIVLOOP2: CPL C DJNZ 46H, DIVLOOP1 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 RET END 袁節(jié)膅薂羄肅蒃薁蚃芀荿薀螆肅芅蕿袈羋膁蚈羀肁蒀蚇蝕襖莆蚇螂肀莂蚆羅袂羋蚅蚄膈膄蚄螇羈蒂蚃衿膆莈螞羈罿芄螁蟻膄膀螁螃羇葿螀裊膃蒅蝿肈羆莁螈螇芁芇莄袀肄膃莄羂艿蒂莃螞肂莈蒂螄羋芄蒁袆肀膀蒀罿袃薈葿螈聿蒄葿袁羈莀蒈羃膇芆蕆蚃羀膂蒆螅膅蒁薅袇羈莇薄罿膄芃薃蠆羆艿薃袁節(jié)膅薂羄肅蒃薁蚃芀荿薀螆肅芅蕿袈羋膁蚈羀肁蒀蚇蝕襖莆蚇螂肀莂蚆羅袂羋蚅蚄膈膄蚄螇羈蒂蚃衿膆莈螞羈罿芄螁蟻膄膀螁螃羇葿螀裊膃蒅蝿肈羆莁螈螇芁芇莄袀肄膃莄羂艿蒂莃螞肂莈蒂螄羋芄