見てみました。 1. AX=0:AY=0 は @SOUSA の上に移動してはダメなので、@SOUSA の下に戻してください。AXとAYには、押したボタンに応じてどこの方向に移動すれるかを入れます。@SOUSAに戻るたびに0を入れないと、ナナメに動いたりぐちゃぐちゃに動いてしまいます。 2. CH=CHKCHR(X+AX,Y+AY) の AY が YX になっています。AX と AY にこれから移動したい方向が入っているので、打ち間違えると当たり判定がうまくいきません。 3. LOCATE X,Y:PRINT "" の " と " の間にスペースをひとつ入れてください。これはその子が移動するときに前いた位置にスペースを上書きして消す処理なので、今のままだとその子が移動すると残像が残ってしまいます。