sign( ) 函数示例

store 10 to gnnum1
store -10 to gnnum2
store 0 to gnzero
clear
? sign(gnnum1)  &&显示 1
? sign(gnnum2)  &&显示 -1
? sign(gnzero)  &&显示 0