こんなんかなー
肝心の計算方法がよくわからん。
http://upload.bokunatu.com/krkr/miemie/bknt0018.ks