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関数で
キャラクタコード取得した場合に見えない障害物があることになってしまいます。
2そうだね プレイ済み