-
MBFSUB:
SETB F0
AS:
LCALL MVR1
MOV C,F0
RRC A
XRL A,@R1
MOV C,ACC.7
ASN:
MOV 1EH,C
XRL A,@R0
RLC A
MOV F0,C
LCALL MVR0
LCALL AS
http://www.codebf.com/read/4755/39547
-
FDIV:
INC R0
MOV A,@R0
INC R0
ORL A,@R0
DEC R0
DEC R0
JNZ DIV1
MOV @R0,#41H
CLR OV
RET
DIV1:
INC R1
MOV A,@R1
INC R1
ORL A,@R1
DEC R1
DEC R1
JNZ DIV2
SE
http://www.codebf.com/read/4755/39548
-
MOV A,R6
CPL ACC.7
MOV R6,A
JC DAB2
NSUB:
MOV A,R4
SUB A,R7
MOV R4,A
MOV A,R3
SUBB A,R6
MOV R3,A
MOV A,R3
JB ACC.7,DABE
DAB1:
MOV C,SR0
MOV
http://www.codebf.com/read/4755/39549
-
DV31:
CLR C
MOV A,R3
SUBB A,R7
JC DV30
SETB OV
RET
DV30:
MOV R2,#10H
DM23:
CLR C
MOV A,R5
RLC A
MOV R5,A
MOV A,R4
RLC A
MOV R4,A
MOV A,R3
RLC A
http://www.codebf.com/read/4755/39550
-
MADD1:
MOV A,R3
ORL A,R4
MADD6:
CLR OV
MOV A,R6
ORL A,R7
MADD5:
CLR A
MOV R3,A
MOV R4,A
MOV R2,#41H
MOV A,R7
MOV B,R4
MOV A,B
XCH A,R7
MOV B,R3
ADD A,
http://www.codebf.com/read/4755/39551
-
MULD:
MOV A,R3
MOV B,R7
MUL AB
MOV R4,B
MOV R5,A
MOV A,R3
MOV B,R6
MUL AB
ADD A,R4
MOV R4,A
CLR A
ADDC A,B
MOV R3,A
MOV A,R2
MOV B,R7
http://www.codebf.com/read/4755/39552
-
DIVD:
CLR C
MOV A,R3
SUBB A,R7
MOV A,R2
SUBB A,R6
JC DVD1
SETB OV
RET
DVD1:
MOV B,#10H
DVD2:
CLR C
MOV A,R5
RLC A
MOV R5,A
MOV A,R4
RLC
http://www.codebf.com/read/4755/39553
-
MULS:
MOV R4,#0
MOV R5,#0
LCALL MDS
MDS:
CLR F0
MOV A,R6
JNB ACC.7,MDS1
CPL F0
XCH A,R7
CPL A
ADD A,#1
XCH A,R7
CPL A
ADDC A,#0
MOV R6,A
MULD:
http://www.codebf.com/read/4755/39554
-
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
http://www.codebf.com/read/4755/39555
-
DSUB:
MOV A,R6
CPL ACC.7
MOV R6,A
DADD:
MOV A,R3
MOV C,ACC.7
MOV SR0,C
XRL A,R6
MOV C,ACC.7
MOV A,R3
CLR ACC.7
MOV R3,A
MOV A,R6
CLR ACC.7
MOV R6,A
JC
http://www.codebf.com/read/4755/39556
