サンプル ACLS FOR X=0 TO 25 FOR Y=0 TO 25 LOCATE X,Y,RND(1025) PRINT CHR$(33+X+Y) NEXT NEXT WAIT 80 X=0:Y=0 REPEAT GCLS GBOX X,Y,X+8,Y+8 B=BUTTON(2) Y=Y-(B==1)+(B==2) X=X-(B==4)+(B==8) X=X-(X>25)+(X<0) Y=Y-(Y>25)+(Y<0) IF B AND 16 THEN BEEP 13 LOCATE X,Y PRINT CHR$(0) ENDIF VSYNC UNTIL B AND 32 適当に文字を表示して、 押したボタンの方向にカーソルが動き、 Aボタンを押して選んだ位置の文字を消すことができます Bボタンで終了します CLSじゃなくてもこんな使い方ができるんですね