ASINX:
CJNE R4,#78H,$+3
JC DON6
MOV A,R5
RLC A
MOV 79H,C
ANL 0DH,#7FH
LCALL G1
LCALL FPCP
JZ AA
JC AA1
LJMP 0FFFFH
AA:
ACALL GHPI
ACALL EX
SJMP PP2;|x|=1,arcsin x=±π/2
AA1:
CLR 7DH;|x|<0.5标志
CJNE R4,#80H,AS1;|x|≤0.5
MOV A,R5
ORL A,R6
ORL A,R7
JZ AS1
SETB 7DH
CLR A
CLR C
SUBB A,R7
MOV R7,A
CLR A
SUBB A,R6
MOV R6,A
CLR A
SUBB A,R5
ADD A,#80H
MOV R5,A
MOV R4,#7FH
NRMLP:
ACALL SHIF
DEC R4
MOV A,R5
JNB ACC.7,NRMLP
ACALL FPS0
AS1:
ACALL FPLN1
DB 7AH,3DH,43H,0C4H;0.115 518 01 E-1
DB 7AH,64H,0CCH,0CDH;0.139 648 44 E-1
DB 7BH,0EH,27H,62H;0.173 527 64 E-1
DB 7BH,37H,45H,0D1H;0.223 722 59 E-1
DB 7BH,78H,0E3H,8EH;0.303 819 44 E-1
DB 7CH,36H,0DBH,6EH;0.446 428 57 E-1
DB 7DH,19H,99H,9AH;0.075
DB 7EH,2AH,0AAH,0AAH;0.166 666 67
DB 81H,0,0,0;1
DB 1
JNB 7DH,PP20
INC R4
JNB 7FH,AS2
JNB 79H,ACSRT
ACALL GHPI
INC R0
SJMP AS3
AS2:
ACALL GHPI
ACALL FPSU
PP20:
AJMP PP2