SIGN

構文
SIGN( num )
引数
num
戻値
1
正の数
0
0
-1
負の数
ERR_VALUE
それ以外

プログラム

////////////////////////////////////////////////// // 【引数】 // num // 【戻値】 // : 1 // 正の数、 : 0 // 0、 : -1 // 負の数、 : ERR_VALUE // それ以外、 : ////////////////////////////////////////////////// FUNCTION SIGN(num) SELECT TRUE CASE !CHKNUM(num) RESULT = ERR_VALUE CASE num > 0 RESULT = 1 CASE num = 0 RESULT = 0 CASE num < 0 RESULT = -1 SELEND FEND