せっかくなので改良した部分の一部を出して修正ポイントを説明しますね。ちょっと説明不足かもと思ったので。
まずWHILEのブロックの開始がわかりやすくなるようにその前に空行を入れました。これによって、ここからループが始まるよ、という意図が目立つようになってると思います。
またスティックのためのIFですが、差違がわかりやすくなるように同じ項目を並べるようにしました。また1行で収まりそうなのでブロックにはせずに1行にまとめてしまいました。
これはケースバイケースで仮に1行が長すぎたり1行にすることで見づらくなるようだったら、元のようにENDIFを使ったブロックにしたうえで見やすいように調整します。
WHILEやFORなどのループブロックの時には空行を入れた方が見やすくなると思いますが、IFの間に空行を入れるかどうかは好みと感覚によるところが大きいです。
1そうだね プレイ済み