N@/simple hover platform
I@X Y Z
O@Mul Fx Fy Fz
interval(T*1000)
T=0.03 M=1000 K=10 ThrK=50
Dx=X-extposx() Dy=Y-extposy() Dz=Z-extposz()
Fx=-M/T/ThrK*(Dx*K-extvelabsx())
Fy=-M/T/ThrK*(Dy*K-extvelabsy())
Fz=-M/T/ThrK*(Dz*K-extvelabsz())
Mul=sqrt(Fx^2+Fy^2+Fz^2)