画像のはテストです。 あと、無駄ループ本当にごめんなさい。15行ってか、DEFDIM2はすべて抜いてください。