//指定した範囲をランダマイズする Rndint関数 を作ってみた
#module __RNDINT__
#defcfunc Rndint int _Rnds, int _Rnde
Rnds=_Rnds
Rnde=_Rnde
if Rnds>Rnde {
sw=Rnds
Rnds=Rnde
Rnde=sw
}
return int(rnd(Rnde+1-Rnds)+Rnds)
#global __RNDINT__
//とりあえずボタンを作成
button "Rndint", *cmd
stop
//ボタンが押されたら...
*cmd
//描画開始
redraw 0
//背景の色
color 255, 255, 255 : boxf
//文字の色
color 0, 0, 0
//表示する座標
pos 0,25
//指定した範囲をランダマイズ(今回は-5~9まで)
//結果を表示
mes "Rndint(-5,9) = " + Rndint(-5,9)
//描画終了
redraw 1
//一時停止
stop
こんなんでいい?