E2 Junkers Ju-88 (By Spaml1)

@name Junkers Ju-88
@inputs
@outputs
@persist T Vel Propspeed Timer SoundFixTimer SoundFix
@trigger

E=entity():isWeldedTo()
if(first())
{
    runOnTick(1)
    R=random(0,255)
    G=random(0,255)
    B=random(0,255)
    Colour=vec(R,G,B)
    E:setMass(50000)
    entity():setMass(0)
    E:setAlpha(255)

    if(E:type()!="prop_vehicle_prisoner_pod")
    {
        print("You must spawn the Chip on a seat")
        selfDestructAll()
    }
    function cHolo(Index, Model:string, Position:vector, Angle:angle, Scale:vector)
    {
        holoCreate(Index)
        holoModel(Index,Model)
        holoPos(Index,Position)
        holoAng(Index,Angle)
        holoScale(Index,Scale)
        holoShadow(Index,1)
        holoParent(Index,E)
    }
cHolo(1,"hq_rcube",E:toWorld(vec(0,-25,-16)),E:toWorld(ang(0,0,0)),vec(5,8,1))
cHolo(2,"hq_rcube",E:toWorld(vec(0,-235,50)),E:toWorld(ang(0,0,0)),vec(5,42.5,1))
cHolo(3,"hq_rcube",E:toWorld(vec(0,-27,-6)),E:toWorld(ang(0,0,0)),vec(5,8,1))
cHolo(4,"hq_rcube",E:toWorld(vec(28,-28,20)),E:toWorld(ang(90,0,0)),vec(6,8,1))
cHolo(6,"hq_tube",E:toWorld(vec(0,-40,57)),E:toWorld(ang(0,0,0)),vec(5,10,0.5))
cHolo(7,"hq_rcube",E:toWorld(vec(28,-260,33)),E:toWorld(ang(90,0,0)),vec(4,40,1))
cHolo(8,"hq_rcube",E:toWorld(vec(-28,-260,33)),E:toWorld(ang(90,0,0)),vec(4,40,1))
cHolo(9,"hq_rcube",E:toWorld(vec(0,-490,25)),E:toWorld(ang(0,0,90)),vec(5,4.5,1))
cHolo(10,"hq_dome",E:toWorld(vec(0,15,18)),E:toWorld(ang(0,0,-90)),vec(6,6,8))
cHolo(11,"hq_torus",E:toWorld(vec(0,22,18)),E:toWorld(ang(0,0,-90)),vec(6,6,3))
cHolo(12,"hq_torus_thin",E:toWorld(vec(0,28,18)),E:toWorld(ang(0,0,0)),vec(6,6,2))
cHolo(13,"hq_torus_thin",E:toWorld(vec(0,26,22)),E:toWorld(ang(0,0,45)),vec(6,6,1))
cHolo(14,"hq_torus_thin",E:toWorld(vec(0,28,16)),E:toWorld(ang(0,0,-45)),vec(6,6,1))
cHolo(15,"hq_torus_thin",E:toWorld(vec(0,28,18)),E:toWorld(ang(90,0,0)),vec(6,6,2))
cHolo(16,"hq_torus_thin",E:toWorld(vec(0,26,18)),E:toWorld(ang(90,0,45)),vec(6,6,1))
cHolo(17,"hq_torus_thin",E:toWorld(vec(0,28,18)),E:toWorld(ang(90,0,-45)),vec(6,6,1))
cHolo(19,"hq_rcube",E:toWorld(vec(28,-260,0)),E:toWorld(ang(0,0,-92.5)),vec(1,2,40))
cHolo(20,"hq_rcube",E:toWorld(vec(-28,-260,0)),E:toWorld(ang(0,0,-92.5)),vec(1,2,40))
cHolo(21,"hq_rcube",E:toWorld(vec(28,-95,20)),E:toWorld(ang(90,0,0)),vec(6,8,1))
cHolo(22,"hq_rcube",E:toWorld(vec(-28,-95,20)),E:toWorld(ang(90,0,0)),vec(6,8,1))
cHolo(23,"hq_rcube",E:toWorld(vec(0,-90,25)),E:toWorld(ang(0,0,90)),vec(5,4.5,1))
cHolo(24,"hq_rcube",E:toWorld(vec(0,-90,-5)),E:toWorld(ang(0,0,0)),vec(5,4.5,0.2))
cHolo(25,"hq_dome",E:toWorld(vec(0,-40,60)),E:toWorld(ang(0,0,0)),vec(5,10,4))
cHolo(26,"hq_rcube",E:toWorld(vec(0,-120,25)),E:toWorld(ang(0,0,0)),vec(50,3,1))
cHolo(27,"hq_rcylinder",E:toWorld(vec(0,-120,25)),E:toWorld(ang(0,0,0)),vec(50,3,1))
cHolo(28,"hq_rcylinder",E:toWorld(vec(0,-140,25)),E:toWorld(ang(0,0,0)),vec(50,5,1))
cHolo(29,"hq_rcube",E:toWorld(vec(110,-90,25)),E:toWorld(ang(0,0,0)),vec(15,3,1))
cHolo(30,"hq_rcube",E:toWorld(vec(-110,-90,25)),E:toWorld(ang(0,0,0)),vec(15,3,1))
cHolo(31,"hq_rcube",E:toWorld(vec(240,-100,25)),E:toWorld(ang(0,-10,0)),vec(10,3,1))
cHolo(32,"hq_rcube",E:toWorld(vec(-240,-100,25)),E:toWorld(ang(0,10,0)),vec(10,3,1))
cHolo(33,"hq_rcube",E:toWorld(vec(0,-420,-2)),E:toWorld(ang(0,0,-2.5)),vec(5,12,1))
cHolo(34,"hq_rcube",E:toWorld(vec(0,-200,-12)),E:toWorld(ang(0,0,-1.5)),vec(5,25,1))
cHolo(35,"hq_rcube",E:toWorld(vec(0,-480,0)),E:toWorld(ang(0,0,-2)),vec(5,3,1))
cHolo(36,"hq_rcube",E:toWorld(vec(0,-350,-7)),E:toWorld(ang(0,0,-2.2)),vec(5,5,1))
cHolo(37,"right_prism",E:toWorld(vec(0,-465,80)),E:toWorld(ang(0,90,0)),vec(4,1,6))
cHolo(38,"rcylinder_thin",E:toWorld(vec(0,-495,45)),E:toWorld(ang(90,90,90)),vec(2,3,1))
cHolo(39,"cube",E:toWorld(vec(0,-500,80)),E:toWorld(ang(0,90,0)),vec(2,1,6))
cHolo(40,"hq_rcube",E:toWorld(vec(-28,-28,20)),E:toWorld(ang(90,0,0)),vec(6.1,8,1))
cHolo(41,"hq_rcylinder",E:toWorld(vec(100,-28,10)),E:toWorld(ang(0,180,90)),vec(5,5,7))
cHolo(42,"hq_dome",E:toWorld(vec(100,-70,10)),E:toWorld(ang(0,0,90)),vec(5,5,10))
cHolo(43,"hq_rcylinder_thin",E:toWorld(vec(100,-65,10)),E:toWorld(ang(0,180,90)),vec(5,5,2))
cHolo(44,"hq_torus",E:toWorld(vec(100,10,10)),E:toWorld(ang(0,180,90)),vec(5,5,20))
cHolo(45,"hq_dome",E:toWorld(vec(100,20,10)),E:toWorld(ang(0,-180,90)),vec(2,2,4))
cHolo(47,"hq_rcube",E:toWorld(vec(-28,-28,20)),E:toWorld(ang(90,0,0)),vec(6.1,8,1))
cHolo(48,"hq_rcylinder",E:toWorld(vec(-100,-28,10)),E:toWorld(ang(0,180,90)),vec(5,5,7))
cHolo(49,"hq_dome",E:toWorld(vec(-100,-70,10)),E:toWorld(ang(0,0,90)),vec(5,5,10))
cHolo(50,"hq_rcylinder_thin",E:toWorld(vec(-100,-65,10)),E:toWorld(ang(0,180,90)),vec(5,5,2))
cHolo(51,"hq_torus",E:toWorld(vec(-100,10,10)),E:toWorld(ang(0,180,90)),vec(5,5,20))
cHolo(52,"hq_dome",E:toWorld(vec(-100,20,10)),E:toWorld(ang(0,-180,90)),vec(2,2,4))
cHolo(53,"hq_rcube",E:toWorld(vec(100,30,10)),E:toWorld(ang(180,0,0)),vec(0.8,0.5,5))
cHolo(54,"hq_rcube",E:toWorld(vec(-100,30,10)),E:toWorld(ang(180,0,0)),vec(0.8,0.5,5))
cHolo(55,"hq_rcylinder_thin",E:toWorld(vec(-100,-30,-20)),E:toWorld(ang(0,0,0)),vec(1,1,5))
cHolo(56,"hq_rcylinder_thin",E:toWorld(vec(100,-30,-20)),E:toWorld(ang(0,0,0)),vec(1,1,5))
cHolo(57,"hq_rcylinder_thick",E:toWorld(vec(-100,-30,-50)),E:toWorld(ang(0,90,90)),vec(3,3,3))
cHolo(58,"hq_rcylinder_thick",E:toWorld(vec(100,-30,-50)),E:toWorld(ang(0,90,90)),vec(3,3,3))
cHolo(59,"hq_rcylinder_thin",E:toWorld(vec(0,-455,0)),E:toWorld(ang(0,0,-30)),vec(1,1,5))
cHolo(60,"hq_rcylinder_thick",E:toWorld(vec(0,-470,-30)),E:toWorld(ang(0,90,90)),vec(2,2,2))
cHolo(61,"right_prism",E:toWorld(vec(-50,-478,40)),E:toWorld(ang(0,-90,90)),vec(2,1,12))
cHolo(62,"cube",E:toWorld(vec(-50,-455,40)),E:toWorld(ang(0,-90,-90)),vec(2,1,12))
cHolo(63,"right_prism",E:toWorld(vec(-50,-420,40)),E:toWorld(ang(0,90,-90)),vec(4,1,12))
cHolo(64,"right_prism",E:toWorld(vec(50,-478,40)),E:toWorld(ang(0,-90,-90)),vec(2,1,12))
cHolo(65,"cube",E:toWorld(vec(50,-455,40)),E:toWorld(ang(0,90,90)),vec(2,1,12))
cHolo(66,"right_prism",E:toWorld(vec(50,-420,40)),E:toWorld(ang(0,90,90)),vec(4,1,12))

holoColor(1,vec(100,100,100))
holoColor(2,vec(100,100,100))
holoColor(3,vec(100,100,100))
holoColor(4,vec(100,100,100))
holoColor(5,vec(100,100,100))
holoColor(6,vec(100,100,100))
holoColor(7,vec(100,100,100))
holoColor(8,vec(100,100,100))
holoColor(9,vec(100,100,100))
holoColor(10,vec(100,100,100))
holoColor(11,vec(100,100,100))
holoColor(12,vec(100,100,100))
holoColor(13,vec(100,100,100))
holoColor(14,vec(100,100,100))
holoColor(15,vec(100,100,100))
holoColor(16,vec(100,100,100))
holoColor(17,vec(100,100,100))
holoColor(18,vec(100,100,100))
holoColor(19,vec(100,100,100))
holoColor(20,vec(100,100,100))
holoColor(21,vec(100,100,100))
holoColor(22,vec(100,100,100))
holoColor(23,vec(100,100,100))
holoColor(24,vec(100,100,100))
holoColor(25,vec(100,100,100))
holoColor(26,vec(100,100,100))
holoColor(27,vec(100,100,100))
holoColor(28,vec(100,100,100))
holoColor(29,vec(100,100,100))
holoColor(30,vec(100,100,100))
holoColor(31,vec(100,100,100))
holoColor(32,vec(100,100,100))
holoColor(33,vec(100,100,100))
holoColor(34,vec(100,100,100))
holoColor(35,vec(100,100,100))
holoColor(36,vec(100,100,100))
holoColor(37,vec(100,100,100))
holoColor(38,vec(100,100,100))
holoColor(39,vec(100,100,100))
holoColor(40,vec(100,100,100))
holoColor(41,vec(100,100,100))
holoColor(42,vec(100,100,100))
holoColor(43,vec(100,100,100))
holoColor(44,vec(50,50,50))
holoColor(45,vec(200,200,0))
holoColor(46,vec(100,100,100))
holoColor(47,vec(100,100,100))
holoColor(48,vec(100,100,100))
holoColor(49,vec(100,100,100))
holoColor(50,vec(100,100,100))
holoColor(51,vec(50,50,50))
holoColor(52,vec(200,200,0))
holoColor(53,vec(10,10,10))
holoColor(54,vec(10,10,10))
holoColor(55,vec(80,80,80))
holoColor(56,vec(80,80,80))
holoColor(57,vec(10,10,10))
holoColor(58,vec(10,10,10))
holoColor(59,vec(100,100,100))
holoColor(60,vec(10,10,10))
holoColor(61,vec(100,100,100))
holoColor(62,vec(100,100,100))
holoColor(63,vec(100,100,100))
holoColor(64,vec(100,100,100))
holoColor(65,vec(100,100,100))
holoColor(66,vec(100,100,100))
holoColor(67,vec(100,100,100))

holoMaterial(10,"phoenix_storms/glass")
holoMaterial(25,"phoenix_storms/glass")
}
Chair=entity():isWeldedTo()
Driver=Chair:driver()
W=Driver:keyForward()
S=Driver:keyBack()
Rvel=E:angVel():roll()
Pvel=E:angVel():pitch()
Yvel=E:angVel():yaw()
Pd=E:angles():pitch()/200
R1=E:angles():roll()/200
Range=rangerOffset(100,E:pos()+vec(0,0,-8),-E:up())
Height=Range:distance()
E:applyForce(-E:vel()*E:mass())
E:applyAngForce(ang(Rvel,-Yvel,-Pvel)*E:mass())
E:applyForce(vec(0,0,2)*E:mass()*7.511255)
if(Height<40|!Driver)
{
    E:applyForce(vec(0,0,2)*E:mass()*(57.5-Height))
    E:applyForce(-vec(0,0,2)*E:mass()*5*(Height-57.5))
}
E:applyAngForce(ang(R1,0,-Pd)*E:mass()*100)
if(Driver)
{
    if(Height>57.5)
    {
        Y=vec(Driver:eye():dot(Chair:right()),Driver:eye():dot(Chair:right()),0):y()
    }
    else{Y=0}
    if(Vel>750)
    {
        P=vec(0,Driver:eye():dot(Chair:up()),Driver:eye():dot(Chair:up())):z()
    }
    else{P=0}
    E:applyAngForce(ang(-P,-Y,Y)*E:mass()*100)

    SoundFixTimer++
    SoundFix=sin(SoundFixTimer)*2+2
    Speed=E:vel():length()
    Timer+=1
    if(Timer>500)
    {Timer=0}
    if(Timer==5){entity():soundPlay(1,0,"ambient/outdoors_well.wav")}
    soundPitch(1,Speed*T*6+SoundFix)
}
else{soundStop(1)}
Forward=E:forward()*E:mass()*150
E:applyForce((Forward+$Forward)*T)
if(W){T+=0.01}
if(S|!Driver){T-=0.01}
elseif(S&Height<40){T-=0.005}
if(T<0){T=0}
if(T>5){T=5}
Vel=E:vel():length()
Propspeed+=clamp(T*10,0,500)
holoAng(54,E:toWorld(ang(Propspeed,0,0)))
holoAng(53,E:toWorld(ang(Propspeed,0,0)))
if(Driver&T<2&Height>60)
{
    E:applyForce(-vec(0,0,1)*E:mass()*50)
    T=2
}
if(E:driver())
{
    Active=1
}
else{Active=1000}

if(changed(Active)&Active)
{
    E:hintDriver("Made by Spaml1",7)
    E:hintDriver("W and S - force",5)
    E:hintDriver("Mouse aim to steer",5)
}