基于51超聲波測距器設計-wenkub
2022-11-27 20:52:00 本頁面
【正文】 0003H LJMP PINT0 ORG 000BH LJMP INTT0 ORG 0013H RETI ORG 001BH LJMP INTT1 ORG 0023H RETI ORG 002BH RETI *主程序 * START: MOV SP, 4FH MOV R0, 40H 。40~43H 為顯示數(shù)據存放單元 （ 40 為最高位 ） MOV R7,0BH CLEARDISP:MOV R0, 00H INC R0 DJNZ R7, CLEARDISP MOV 20H, 00H MOV TMOD, 21H 。開啟測距定時器 START1: LCALL DISPLAY JNB 00H, START1 。開啟發(fā)超聲波用定時器 T1 OUT: RETI 。G MOV R5,0F7H。 DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H,0FFH,88H,0BFH ；共陽數(shù)碼管 0 ,1, 2,3,4,5,6,7,8,9,不亮， A, — *距離計算程序 (=計算值 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 。 EXTERN VOID DELAY(UINT)。 VOID MAIN (VOID) { DATA UCHAR DISPRAM[5]。 P2=0XFF。 DELAY(1)。 WHILE(! TESTOK) DISPLAY(DISPRAM)。 TIME/=10000。 TIME/=10。 } ELSE { DISPRAM [0]=16。 } FOR (I=0。 ET0=0。 TR0=0。 END NAME DELAY ?PR?_DELAY?DELAY SEGMENT CODE PUBLIC _DELAY RSEG ?PR?_DELAY?DELAY _DELAY: PUSH ACC MOV A,R7 JZ DELA1 INC R6 DELA1: MOV R5,50D DJNZ R5, $ DJNZ R7,DELA1 DJNZ R6,DELA1 POP ACC RET END NAME DISPLAY ?PR?_DISPLAY?DISPLAY SEGMENT CODE ?CO?_DISPLAY?DISPLAY SEGMENT DATA
環(huán)評公示相關推薦
鄂ICP備17016276號-1