あと、同じ命令分をズラズラ並べると、読みにくくなるので、FOR命令と配列変数を覚えて FOR I=0 TO n GFILL PX1[I],PY1[I],PX2[I],PY2[I],PRGB[I] NEXT FOR I=0 TO n IF C==PRGB[I] THEN BGMPLAY PM$[I] NEXT 　などと書くと短く、見やすくなると思います。