その後、ループ。
@LOOP ’ループ
FOR I=0 TO LEN(X)-1
LOCATE X[I],Y[I]:?" " ’今の位置を消す
R=RND(4) ’どっちに動くか
IF R==0 && X[I]<48 THEN INC X[I]
IF R==1 && X[I]>1 THEN DEC X[I]
IF R==2 && Y[I]<28 THEN INC Y[I]
IF R==3 && Y[I]>1 THEN DEC Y[I]
LOCATE X[I],Y[I]:?"●" ’新しい位置に表示
NEXT
VSYNC 10
GOTO @LOOP
0そうだね プレイ済み