その後、ループ。 @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