CH=CHKCHR(X,Y) IF CH!=0 THEN X=OX:Y=OY LOCATE OX,OY:PRINT CHR$(0); LOCATE X,Y:PRINT A$; VSYNC GOTO @LOOP あ、BUTTON関数の前に@LOOPのラベルを付けるのを忘れてたんで 追加してくださいね。 キャラクターを消す場合は” ”(空白)ではなくCHR$(0)を使いましょう。 ACLSやCLS命令を実行すると画面はCHR$(0)で埋め尽くされます。 表示してたキャラクタを消すのに" "(空白)を使うとCHKCHR関数で キャラクタコード取得した場合に見えない障害物があることになってしまいます。