rnd(2) こういうのはどう? 任意に0か1が返る関数だけど 確率を変えたいのだったら ret=0:if rnd(確率) then ret=1 で、確率は変わるはず ちと「任意」の意味がわからないので、適当に書いてます