一定範囲内でランダムな値を得る。

ちょっと野暮用でこんなのが必要になったので、せっかくだから簡単にインクルードの形にしてここに保存しておく。

Random2:
Return Random(Args(2) - Args(1)) + Args(1)

わずか二行のお手軽インクルード。
第一引数に範囲の小さいほう。第二引数に範囲の大きいほう。
例えば、50〜100の中からランダムに値を得たい場合は、

Random2(50,100)

ってかんじで。
順番覚えるのが面倒って人のため(特に僕自身)に、順番は関係ないのも作ってみる。

Random2:
Return Random( Max(Args(1),Args(2)) - Min(Args(1),Args(2)) ) + Min(Args(1),Args(2))

やはり二行。
今日はこれだけ。以上。