それだと移動は難しいですね・・・出来なくはないですけど。動かさないものはそれで良いとして動かすものは配列で座標を持たせる。仮に5個だとして、まず初期設定。 DIM X[5],Y[5] ’配列を使う宣言 FOR I=0 TO LEN(X)-1 ’初期値を代入  X[I]=RND(48)+1:Y[I]=RND(28)+1 NEXT