肝心のサブルーチンは、こんな感じ。 こうしたほうが、ってのあったら教えてください！