計算ロジックは注意してください。
現象:
関数からの戻り値がおかしい。
例:
'/* -----------------------------------
' 四捨五入関数
' ----------------------------------- */
function ROUND%(SUU)
private RET%
RET% = int( SUU + 0.5 )
ROUND% = RET%
end function
MAIN:
private BUFF% '//作業領域
BUFF% = ROUND%(1) '//に変更
結果:
Integerの戻り値関数は、Integer型の変数に設定(当たり前ですが