a=0.5 b=-15 c=20 d=-1 :dp+=:dps*a*(:dms==d) if:dpc then:dp=c endend goto2