FPDI: MOV A,R4 JZ OV3 CPL A INC A MOV R4,A MOV A,R0 JNZ D1 AJMP G0 D1: ACALL DP JZ OV3 JC OV3 ORL 09H,#80H ORL 0DH,#80H FPD3: ACALL EXT MOV R0,#19H ACALL SUB0 XCH A,R5 SUBB A,R1 JC D2 INC R4 CJNE R4,#0,D3 OV3: LJMP 0FFFFH D2: ACALL ADD0 ADDC A,R1 LOOP2: ACALL ADD2 RLC A JC D4 ACALL SUB0 SUBB A,R1 JNC D3 ACALL ADD0 ADDC A,R1 SJMP D3 D4: ACALL SUB0 SUBB A,R1 CLR C D3: DJNZ R0,D5 MOV R5,1DH MOV R6,1EH MOV R7,1FH JC COM3 ACALL INC 3 COM3: JBC 7EH,DON3 ANL 0DH,#7FH DON3: RET D5: CPL C CPL RS1 ACALL H0 CPL RS1 SJMP LOOP2