急遽作りなおしました

昔のソースコードがなかったので手抜きですが、作りなおしました。