浮点符号函数

入口条件：操作数在[R0]中。
出口信息：累加器 A=1 时为正数，A=0FFH时为负数，A=0 时为零。
影响资源：PSW、A 堆栈需求： ２字节

FSGN: INC R0
MOV A,@R0
INC R0
ORL A,@R0
DEC R0
DEC R0
JNZ SGN
RET
SGN: MOV A,@R0
RLC A
MOV A,#1
JNC SGN1
MOV A,#0FFH
SGN1: RET