下記のコードでは、如何がですか。乱数の範囲は、適当に変更して下さい。 FOR B=0 TO 15 SPSET B,1 SPSCALE B,RND(3)+1,RND(3)+1 SPCOLOR B,RGB(RND(256),RND(256),RND(256)) SPOFS B,RND(200),RND(200) NEXT 猶、15回なら、FOR I=1 TO 15 に成ります（0 TO 14 でも良い、スプライト番号に合う様に変更して下さい）。 因みに、FOR C=0 TO 1 STEP 0 とステップ（増減値）が 0 なら、無限ループに成りますが…。