AC4400 Cab [Gmod E2]

@name AC4400 Cab [v0.1]
@inputs AC4400:entity BoxDoor #Screen1:entity Screen2:entity Screen3:entity
@outputs
@persist BoxDoorAng
@trigger

if(first() | dupefinished() | ~AC4400){
    #Left
    A = 1
    holoCreate(A, AC4400:toWorld(vec(-36.7,324,37)), vec(1),
    AC4400:toWorld(ang(0,0,0)))
    holoColor(A, vec4(80,55,35,255))
    holoModel(A, "models/sprops/cuboids/height06/size_4/cube_24x42x6.mdl")
    holoScale(A, vec(1.08,1.2,0.5))
    holoParent(A, AC4400)
    holoMaterial(A,"WTP/metal_2")

    A++
    holoCreate(A, holoEntity(1):toWorld(vec(10,3,-20)), vec(1),
    holoEntity(1):toWorld(ang(90,0,0)))
    holoColor(A, vec4(60,60,60,255))
    holoModel(A, "models/sprops/rectangles/size_3/rect_24x36x3.mdl")
    holoScale(A, vec(1.08,1.3,0.5))
    holoParent(A, holoEntity(1))
    holoMaterial(A,"WTP/metal_2")

    A++
    holoCreate(A, holoEntity(1):toWorld(vec(15.15,-12,-20)), vec(1),
    holoEntity(1):toWorld(ang(90,0,90)))
    holoColor(A, vec4(60,60,60,255))
    holoModel(A, "models/sprops/rectangles/size_2/rect_12x36x3.mdl")
    holoScale(A, vec(1.08,1,0.5))
    holoParent(A, holoEntity(1))
    holoMaterial(A,"WTP/metal_2")

    A++
    holoCreate(A, holoEntity(1):toWorld(vec(-21,3,-20)), vec(1),
    holoEntity(1):toWorld(ang(90,0,0)))
    holoColor(A, vec4(60,60,60,255))
    holoModel(A, "models/sprops/rectangles/size_3/rect_24x36x3.mdl")
    holoScale(A, vec(1.08,1.3,0.5))
    holoParent(A, holoEntity(1))
    holoMaterial(A,"WTP/metal_2")

    A++
    holoCreate(A, holoEntity(1):toWorld(vec(-6,9,-20)), vec(1),
    holoEntity(1):toWorld(ang(90,90,0)))
    holoColor(A, vec4(60,60,60,255))
    holoModel(A, "models/sprops/rectangles/size_3/rect_24x36x3.mdl")
    holoScale(A, vec(1.08,1.3,0.5))
    holoParent(A, holoEntity(1))
    holoMaterial(A,"WTP/metal_2")

    A++
    holoCreate(A, holoEntity(1):toWorld(vec(0,10.6,6)), vec(1),
    holoEntity(1):toWorld(ang(0,0,95)))
    holoColor(A, vec4(80,55,35,255))
    holoModel(A, "models/sprops/cuboids/height06/size_2/cube_12x42x6.mdl")
    holoScale(A, vec(1.08,1,1))
    holoParent(A, holoEntity(1))
    holoMaterial(A,"WTP/metal_2")

    A++
    holoCreate(A, holoEntity(1):toWorld(vec(9.7,9,6)), vec(1),
    holoEntity(1):toWorld(ang(0,0,85)))
    holoColor(A, vec4(80,55,35,255))
    holoModel(A, "models/sprops/cuboids/height06/size_2/cube_12x24x6.mdl")
    holoScale(A, vec(1.08,1,1))
    holoParent(A, holoEntity(1))
    holoMaterial(A,"WTP/metal_2")

    A++
    holoCreate(A, holoEntity(1):toWorld(vec(-11,8.2,6)), vec(1),
    holoEntity(1):toWorld(ang(0,5,85)))
    holoColor(A, vec4(80,55,35,255))
    holoModel(A, "models/sprops/cuboids/height06/size_2/cube_12x18x6.mdl")
    holoScale(A, vec(1.15,1,1))
    holoParent(A, holoEntity(1))
    holoMaterial(A,"WTP/metal_2")

    A++
    holoCreate(A, holoEntity(1):toWorld(vec(0,9.8,6.3)), vec(1),
    holoEntity(1):toWorld(ang(0,0,90)))
    holoColor(A, vec4(80,55,35,255))
    holoModel(A, "models/sprops/cuboids/height06/size_2/cube_12x42x6.mdl")
    holoScale(A, vec(1.08,1,1.1))
    holoParent(A, holoEntity(1))
    holoMaterial(A,"WTP/metal_2")

    A++ #10
    holoCreate(A, holoEntity(1):toWorld(vec(-11,8.6,9.3)), vec(1),
    holoEntity(1):toWorld(ang(0,5,90)))
    holoColor(A, vec4(80,55,35,255))
    holoModel(A, "models/sprops/cuboids/height06/size_1/cube_6x18x6.mdl")
    holoScale(A, vec(1.15,1,1))
    holoParent(A, holoEntity(1))
    holoMaterial(A,"WTP/metal_2")

    #Minifridge

    A = 11
    holoCreate(A, AC4400:toWorld(vec(-20.1,325.5,-12)), vec(1),
    AC4400:toWorld(ang(0,90,0)))
    holoColor(A, vec4(250,250,250,255))
    holoModel(A, "models/sprops/rectangles_thin/size_2/rect_12x24x1_5.mdl")
    holoScale(A, vec(1,1,1))
    holoParent(A, AC4400)
    holoMaterial(A,"phoenix_storms/mat/mat_phx_metallic2")

    A++
    holoCreate(A, holoEntity(11):toWorld(vec(0,6,21)), vec(1),
    holoEntity(11):toWorld(ang(90,90,0)))
    holoColor(A, vec4(250,250,250,255))
    holoModel(A, "models/sprops/rectangles_thin/size_3/rect_24x42x1_5.mdl")
    holoScale(A, vec(1,1,1))
    holoParent(A, holoEntity(11))
    holoMaterial(A,"phoenix_storms/mat/mat_phx_metallic2")

    A++
    holoCreate(A, holoEntity(11):toWorld(vec(11.3,0,21)), vec(1),
    holoEntity(11):toWorld(ang(90,0,0)))
    holoColor(A, vec4(250,250,250,255))
    holoModel(A, "models/sprops/rectangles_thin/size_2/rect_12x42x1_5.mdl")
    holoScale(A, vec(1,1,1))
    holoParent(A, holoEntity(11))
    holoMaterial(A,"phoenix_storms/mat/mat_phx_metallic2")

    A++
    holoCreate(A, holoEntity(11):toWorld(vec(-11.3,0,21)), vec(1),
    holoEntity(11):toWorld(ang(90,0,0)))
    holoColor(A, vec4(250,250,250,255))
    holoModel(A, "models/sprops/rectangles_thin/size_2/rect_12x42x1_5.mdl")
    holoScale(A, vec(1,1,1))
    holoParent(A, holoEntity(11))
    holoMaterial(A,"phoenix_storms/mat/mat_phx_metallic2")

    A++
    holoCreate(A, holoEntity(11):toWorld(vec(0,0,42)), vec(1),
    holoEntity(11):toWorld(ang(0,0,0)))
    holoColor(A, vec4(250,250,250,255))
    holoModel(A, "models/sprops/rectangles_thin/size_2/rect_12x24x1_5.mdl")
    holoScale(A, vec(1,1,1))
    holoParent(A, holoEntity(11))
    holoMaterial(A,"phoenix_storms/mat/mat_phx_metallic2")

    A = 16 #Door hinge
    holoCreate(A, holoEntity(11):toWorld(vec(11.3,-5.3,21)), vec(1),
    holoEntity(11):toWorld(ang(0,0,0)))
    holoColor(A, vec4(250,250,250,255))
    holoModel(A, "")
    holoScale(A, vec(0))
    holoParent(A, holoEntity(11))
    holoMaterial(A,"phoenix_storms/mat/mat_phx_metallic2")

    A++
    holoCreate(A, holoEntity(16):toWorld(vec(-11.3,0,0)), vec(1),
    holoEntity(16):toWorld(ang(90,90,0)))
    holoColor(A, vec4(250,250,250,255))
    holoModel(A, "models/sprops/rectangles_thin/size_3/rect_24x42x1_5.mdl")
    holoScale(A, vec(1,0.9,1))
    holoParent(A, holoEntity(16))
    holoMaterial(A,"phoenix_storms/mat/mat_phx_metallic2")

    A++
    holoCreate(A, holoEntity(16):toWorld(vec(-20,0,0)), vec(1),
    holoEntity(16):toWorld(ang(90,90,0)))
    holoColor(A, vec4(1,1,1,255))
    holoModel(A, "models/sprops/rectangles/size_1_5/rect_6x6x3.mdl")
    holoScale(A, vec(0.5,0.8,0.55))
    holoParent(A, holoEntity(16))
    holoMaterial(A,"phoenix_storms/mat/mat_phx_metallic2")

    #Right
    A = 19
    holoCreate(A, AC4400:toWorld(vec(36.7,324,37)), vec(1),
    AC4400:toWorld(ang(0,0,0)))
    holoColor(A, vec4(80,55,35,255))
    holoModel(A, "models/sprops/cuboids/height06/size_4/cube_24x42x6.mdl")
    holoScale(A, vec(1.08,1.2,0.5))
    holoParent(A, AC4400)
    holoMaterial(A,"WTP/metal_2")

    A++
    holoCreate(A, holoEntity(19):toWorld(vec(8.5,10.8,9.3)), vec(1),
    holoEntity(19):toWorld(ang(0,0,90)))
    holoColor(A, vec4(80,55,35,255))
    holoModel(A, "models/sprops/cuboids/height06/size_1/cube_6x24x6.mdl")
    holoScale(A, vec(1.05,1,1))
    holoParent(A, holoEntity(19))
    holoMaterial(A,"WTP/metal_2")

    A++
    holoCreate(A, holoEntity(19):toWorld(vec(8.5,11,6)), vec(1),
    holoEntity(19):toWorld(ang(0,0,90)))
    holoColor(A, vec4(80,55,35,255))
    holoModel(A, "models/sprops/cuboids/height06/size_2/cube_12x24x6.mdl")
    holoScale(A, vec(1.08,1,1))
    holoParent(A, holoEntity(19))
    holoMaterial(A,"WTP/metal_2")

    A++
    holoCreate(A, holoEntity(19):toWorld(vec(8.5,10.2,6)), vec(1),
    holoEntity(19):toWorld(ang(0,0,85)))
    holoColor(A, vec4(80,55,35,255))
    holoModel(A, "models/sprops/cuboids/height06/size_2/cube_12x24x6.mdl")
    holoScale(A, vec(1.08,1,1))
    holoParent(A, holoEntity(19))
    holoMaterial(A,"WTP/metal_2")

    A++
    holoCreate(A, holoEntity(19):toWorld(vec(-11.4,2.7,6)), vec(1),
    holoEntity(19):toWorld(ang(0,45,90)))
    holoColor(A, vec4(80,55,35,255))
    holoModel(A, "models/sprops/cuboids/height06/size_2/cube_12x24x6.mdl")
    holoScale(A, vec(1.08,1,1))
    holoParent(A, holoEntity(19))
    holoMaterial(A,"WTP/metal_2")

    A++
    holoCreate(A, holoEntity(19):toWorld(vec(-10.7,2,6)), vec(1),
    holoEntity(19):toWorld(ang(0,45,85)))
    holoColor(A, vec4(80,55,35,255))
    holoModel(A, "models/sprops/cuboids/height06/size_2/cube_12x24x6.mdl")
    holoScale(A, vec(1.08,1,1))
    holoParent(A, holoEntity(19))
    holoMaterial(A,"WTP/metal_2")

    A++
    holoCreate(A, holoEntity(19):toWorld(vec(-11.1,2.7,9.3)), vec(1),
    holoEntity(19):toWorld(ang(0,45,90)))
    holoColor(A, vec4(80,55,35,255))
    holoModel(A, "models/sprops/cuboids/height06/size_1/cube_6x24x6.mdl")
    holoScale(A, vec(1.08,1,1))
    holoParent(A, holoEntity(19))
    holoMaterial(A,"WTP/metal_2")

    A++
    holoCreate(A, holoEntity(19):toWorld(vec(-19.4,-9.4,9.3)), vec(1),
    holoEntity(19):toWorld(ang(0,90,90)))
    holoColor(A, vec4(80,55,35,255))
    holoModel(A, "models/sprops/cuboids/height06/size_1/cube_6x12x6.mdl")
    holoScale(A, vec(0.85,1,1))
    holoParent(A, holoEntity(19))
    holoMaterial(A,"WTP/metal_2")

    A++
    holoCreate(A, holoEntity(19):toWorld(vec(-19.65,-9.4,6)), vec(1),
    holoEntity(19):toWorld(ang(0,90,90)))
    holoColor(A, vec4(80,55,35,255))
    holoModel(A, "models/sprops/cuboids/height06/size_2/cube_12x12x6.mdl")
    holoScale(A, vec(0.85,1,1))
    holoParent(A, holoEntity(19))
    holoMaterial(A,"WTP/metal_2")

    A++
    holoCreate(A, holoEntity(19):toWorld(vec(-18.5,-9.4,6)), vec(1),
    holoEntity(19):toWorld(ang(0,90,85)))
    holoColor(A, vec4(80,55,35,255))
    holoModel(A, "models/sprops/cuboids/height06/size_2/cube_12x12x6.mdl")
    holoScale(A, vec(0.85,1,1))
    holoParent(A, holoEntity(19))
    holoMaterial(A,"WTP/metal_2")

    A++
    holoCreate(A, holoEntity(19):toWorld(vec(21,3,-20)), vec(1),
    holoEntity(19):toWorld(ang(90,0,0)))
    holoColor(A, vec4(60,60,60,255))
    holoModel(A, "models/sprops/rectangles/size_3/rect_24x36x3.mdl")
    holoScale(A, vec(1.08,1.3,0.5))
    holoParent(A, holoEntity(19))
    holoMaterial(A,"WTP/metal_2")

    A++
    holoCreate(A, holoEntity(19):toWorld(vec(-14,3,-20)), vec(1),
    holoEntity(19):toWorld(ang(90,0,0)))
    holoColor(A, vec4(60,60,60,255))
    holoModel(A, "models/sprops/cuboids/height12/size_2/cube_24x36x12.mdl")
    holoScale(A, vec(1.08,1.2,1))
    holoParent(A, holoEntity(19))
    holoMaterial(A,"WTP/metal_2")

    A++
    holoCreate(A, holoEntity(19):toWorld(vec(6,9,-20)), vec(1),
    holoEntity(19):toWorld(ang(95,90,0)))
    holoColor(A, vec4(60,60,60,255))
    holoModel(A, "models/sprops/rectangles/size_3/rect_24x36x3.mdl")
    holoScale(A, vec(1.08,1.3,0.5))
    holoParent(A, holoEntity(10))
    holoMaterial(A,"WTP/metal_2")


}
function number canClk() {
    return (BoxDoorAng != BoxDoor)
}

if(canClk()){
    interval(100)
    if(clk()){
        if(BoxDoorAng != BoxDoor) {
            BoxDoorAng += BoxDoorAng > BoxDoor ? -0.2 : 0.2
            BoxDoorAng = clamp(BoxDoorAng,0,1)
            holoAng(16,holoEntity(11):toWorld(ang(0,0+BoxDoorAng*85,0)))
        }
    }
    }
    if(changed(BoxDoor) & BoxDoor){
    soundPlay(0,0,"monkssounds/misc/ka50dooropen.wav")
    }elseif(BoxDoorAng == 0 & BoxDoor == 0){
    soundPlay(0,0,"monkssounds/misc/ka50doorclose.wav")
}