//fw= fowardthrust
//fud= up and down thrusters
//Cr= foward thursters centering speed (cruise)
//Lud= up and down thursters centering speed


RS = :RD1+:RD2+:RD3+:RD4
if :RF==1 and RS<4000 then goto3 else goto1 end
i=0
if i<50 then ++i :Lud=0 :sfx=1 :fw=0 :fud=-100 goto4 end
RS = :RD1+:RD2+:RD3+:RD4 i=0
if RS==4000 then :Lud=10 :Cr=0 :fw=100 :fud=0 goto1 else goto4 end