浮点数压栈

浮点数压栈

入口条件： *** 作数在[R0]中。
出口信息： *** 作数压入栈顶。
影响资源：A、R2、R3 堆栈需求： ５字节  

FPUS: POP ACC
MOV R2,A
POP ACC
MOV R3,A
MOV A,@R0
PUSH ACC
INC R0
MOV A,@R0
PUSH ACC
INC R0
MOV A,@R0
PUSH ACC
DEC R0
DEC R0
MOV A,R3
PUSH ACC
MOV A,R2
PUSH ACC
RET