Abomination vehicle

// [RCD] --originally made by Gear97
Val{
  AERO(default=22.5, min=-22.5, max=22.5)
  ARM1(default=0, max=1600000, step=1600000)
  ARM2(default=0, max=1600000, step=1600000)
  ARM3(default=0, max=1600000, step=1600000)
  ARM4(default=0, max=1600000, step=1600000)
  ARM5(default=0, max=1600000, step=1600000)
  GYRO(default=0, min=-60000, max=60000, step=24000)
  HANDLE(default=0, min=-45, max=45, step=6)
  JET(default=0, min=-8000, max=8000, step=8000)
  SHOOTIMER(default=-2, min=-2, max=70, step=72)
}
Key{
  0:JET(step=8000)
  1:JET(step=-8000)
  2:HANDLE(step=-3)
  3:HANDLE(step=3)
  4:GYRO(step=12000)
  5:GYRO(step=-12000)
  6:SHOOTIMER(step=1)
  7:AERO(step=-1.625)
  8:AERO(step=1.625)
}
Body{
  Core(){
    N:Rudder(angle=HANDLE){
      W:Frame(){
        W:Wheel(angle=90){}
        S:Jet(angle=-95, power=GYRO){
          S:Arm(angle=-84, power=ARM5, option=50000){}
        }
        N:Arm(angle=-1, power=ARM2, option=50000, name=ARMTH){}
      }
      N:Chip(angle=45){}
      E:Frame(){
        E:Wheel(angle=90){}
        S:Jet(angle=-95, power=GYRO){
          S:Arm(angle=-84, power=ARM3, option=50000){}
        }
        N:Arm(angle=-1, power=ARM4, option=50000, name=ARMSEC){}
      }
      W:Chip(angle=-120){}
      E:Chip(angle=-120){}
      N:Frame(){
        N:Arm(angle=-1, power=ARM1, option=50000, name=ARMFIR){}
      }
    }
    S:Chip(){
      N:Jet(angle=-60, power=-GYRO){}
      S:Chip(){
        W:Frame(){
          W:Wheel(angle=90, power=-JET){}
          N:Jet(angle=-60, power=-GYRO){}
          S:Chip(angle=-45){}
          N:Chip(angle=45){}
        }
        E:Frame(){
          E:Wheel(angle=90, power=JET){}
          N:Jet(angle=-60, power=-GYRO){}
          S:Chip(angle=-45){}
          N:Chip(angle=45){}
        }
        S:Chip(angle=-45){}
        N:Jet(angle=-45, power=-GYRO){}
      }
    }
  }
}
Script{print 0, " Velocity =",_VEL()
print 1,"  FPS=",_FPS(),"  Chips=",_CHIPS(),"  Weight=",_WEIGHT()
if SHOOTIMER = (0){ARM1 = (50000)}
if SHOOTIMER = (2){ARM2 = (50000)}
if SHOOTIMER = (4){ARM3 = (50000)}
if SHOOTIMER = (6){ARM1 = (50000)}
if SHOOTIMER = (8){ARM2 = (50000)}
if SHOOTIMER = (10){ARM3 = (50000)}
if SHOOTIMER = (12){SHOOTIMER = (-2)}
}
Lua{zoomvar=0

function getdist3d(p1,p2)
return ((p2[1]-p1[1])^2+(p2[2]-p1[2])^2+(p2[3]-p1[3])^2)^0.5
end

function zoomcontrol(x)
if x == 1 then zoomvar=zoomvar+1 end
if zoomvar==0 then _ZOOM(90) end
if zoomvar==1 then _ZOOM(30) end
if zoomvar==2 then _ZOOM(10) end
if zoomvar==3 then zoomvar=0 _ZOOM(90) end
end
function guncontrol()
if SHOOTIMER == (0) then ARM1 = (50000) end
if SHOOTIMER == (2) then ARM2 = (50000) end
if SHOOTIMER == (4) then ARM3 = (50000) end
if SHOOTIMER == (6) then ARM4 = (50000) end
if SHOOTIMER == (8) then ARM5 = (50000) end
if SHOOTIMER == (10) then SHOOTIMER = (-2) end
end

function main()
out(0,"Velocity = "..math.floor(getdist3d({0,0,0},{_VX(),_VY(),_VZ()})).." m/s")
out(1,"FPS = "..math.floor(_FPS()).." Chips = ".._CHIPS().." Weight = "..math.floor(_WEIGHT()))

guncontrol()
zoomcontrol(_KEYDOWN(16))
end}