あれ？U=RND(4)だと0~3になるけど、後のIF~THENが、1~4の場合だけしか確かめていないので、0になった場合、全ての条件をすりぬけ、@DAIを実行するから大吉がやたら多かったのではないのですか?改善方法は2通りあります。スクショに貼ってあるので、参考にしてください。