bgxとbgyの設定がまずいです bgputで設定できる座標の値はx座標が0~24、y座標が0~14だそうです(初期状態では) なので、53行54行の式を bgx=rnd(24) bgy=rnd(14) にしたらいいでしょう もしくは、@loopの上辺りに bgscreen 1,26,16 と書いておくと言う手もあります たぶん