配列を使うのです! A,PX,PY,あとCもかな、これを火の玉の数だけの配列にして、18行のループの内側にもうひとつ、火の玉の数の分FOR〜NEXTで繰り返すのです。