t=.2 b=0 goto3*:IN a=(:JZ*:RZ+:IZ*:RY-:HZ*:RX) :z+=(a+b)/2*t b=a goto3*:IN