配列変数の参照を減らした結果、個別に変数を割り当ててああなりました。 (ON GOSUBのほうが速いかもしれない...)