48～51行目、56行目～59行目、67～70行目は必ず条件を満たします。 R=RND(100)で0～99の数値を取得するのでR<=99は必ず条件を 満たすのであまり意味が無いかと。条件を間違えているのでしたら この限りではありませんが。 ガチャか何かの抽選プログラムでしょうか？