2行目のWHILEに対するWENDがありません。 Aボタンを押したら@A以降の処理を実行するのでしたら 2行目のWHILE 1は不要だと思います。