N@/simple hover platform
I@X Y Z
O@Mul Fx Fy Fz Mass A Vo
interval(T*1000)
T=0.03 K=10 ThrK=50
Dx=X-extposx() Dy=Y-extposy() Dz=Z-extposz()+200
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)

A=(extvelabsz()-Vo)/T
Vo = extvelabsz()

Mass=abs(Fzo*ThrK/(A+600))
Fz!=0->M=Mass;
Fz==0->M=1000;
Mass-=550

Mass = round(Mass, 0) 


Fzo=Fz

Start==0->Mass=1000 M=1000 Start=1;
