改造コードです。ここにほとんど載ってます。