【変な乱数制作委員会】 まったく、誰得かは存じ上げないが、とにかく変な乱数を作るのだ。 計算コストもコードの長さも知ったもんではない。 暗号論的擬似乱数生成器なんてものももちろん知らん。 そしてどのような偏りを持ち、どのような用途に適するかさえ存じ上げない。 まあ、とにかく「変な乱数を作ってるんだよ！」

（何か頭のねじがずれてる気がするけど気にしない）

VAR SRND01% DEF SRANDOMIZE V SRND01%=V+7 END DEF SRND(Q) SRND01%=ABS(SQR(SRND01%)-SRND01%) WHILE SRND01%<8E7 SRND01%=SRND01%*PI() AND &HFFFFFFF WEND RETURN SRND01%/100 MOD Q END

ふと思ったけどSQR()の存在意義が謎になってきた

あ、SRND(ここ) ここ　の値は256以下ぐらいがおすすめされます。 大きすぎると[お察しください]

というわけで、迷路生成に組み込んでみたいと思います。 相性は如何に？？