Toast's Analogue Clock [Gmod E2]

@name Toast's Analogue Clock
@inputs
@outputs
@persist Second Minute Hour
@trigger
E = entity()
if(first() | duped()){


    holoCreate(661)
    holoAlpha(661,0)
    holoParent(661,entity())

    holoCreate(662)
    holoAlpha(662,0)
    holoParent(662,entity())

    holoCreate(663)
    holoAlpha(663,0)
    holoParent(663,entity())

    A = 1
    holoCreate(A, entity():toWorld(vec(0,0,4)), vec(1),
    entity():toWorld(ang(0,0,0)))
    holoColor(A, vec(255,255,255))
    holoModel(A, "models/sprops/misc/tubes/size_72/tube_72x36.mdl")
    holoScale(A, vec(0.08,0.1,0.08))
    holoParent(A, entity())
    holoMaterial(A,"bobsters_trains/br_intercity_grey")

    A = 2
    holoCreate(A, entity():toWorld(vec(-1.7,1,0.2)), vec(1),
    entity():toWorld(ang(30,0,0)))
    holoColor(A, vec(255,255,255))
    holoModel(A, "models/sprops/cylinders/size_2/cylinder_3x12.mdl")
    holoScale(A, vec(0.15,0.15,0.3))
    holoParent(A, entity())
    holoMaterial(A,"bobsters_trains/br_carpet_grey")

    A = 3
    holoCreate(A, entity():toWorld(vec(-1.7,-1,0.2)), vec(1),
    entity():toWorld(ang(30,0,0)))
    holoColor(A, vec(255,255,255))
    holoModel(A, "models/sprops/cylinders/size_2/cylinder_3x12.mdl")
    holoScale(A, vec(0.15,0.15,0.3))
    holoParent(A, entity())
    holoMaterial(A,"bobsters_trains/br_carpet_grey")

    A = 4
    holoCreate(A, entity():toWorld(vec(1.7,1,0.2)), vec(1),
    entity():toWorld(ang(-30,0,0)))
    holoColor(A, vec(255,255,255))
    holoModel(A, "models/sprops/cylinders/size_2/cylinder_3x12.mdl")
    holoScale(A, vec(0.15,0.15,0.3))
    holoParent(A, entity())
    holoMaterial(A,"bobsters_trains/br_carpet_grey")

    A = 5
    holoCreate(A, entity():toWorld(vec(1.7,-1,0.2)), vec(1),
    entity():toWorld(ang(-30,0,0)))
    holoColor(A, vec(255,255,255))
    holoModel(A, "models/sprops/cylinders/size_2/cylinder_3x12.mdl")
    holoScale(A, vec(0.15,0.15,0.3))
    holoParent(A, entity())
    holoMaterial(A,"bobsters_trains/br_carpet_grey")

    A = 6
    holoCreate(A, entity():toWorld(vec(0,-0.28,4)), vec(1),
    entity():toWorld(ang(0,0,90)))
    holoColor(A, vec(240,240,240))
    holoModel(A, "models/sprops/cylinders/size_5/cylinder_12x6.mdl")
    holoScale(A, vec(0.45,0.45,0.5))
    holoParent(A, entity())
    holoMaterial(A,"bobsters_trains/br_carpet_grey")

    A = 7
    holoCreate(A, entity():toWorld(vec(0,-1.14,4)), vec(1),
    entity():toWorld(ang(0,0,0)))
    holoColor(A, vec(255,255,255))
    holoModel(A, "models/sprops/geometry/fdisc_12.mdl")
    holoScale(A, vec(0.45,0.45,0.45))
    holoParent(A, entity())
    holoMaterial(A,"bobsters_trains/br_intercity_grey")


    A = 8
    holoCreate(A, entity():toWorld(vec(0,0.2,4)), vec(1),
    entity():toWorld(ang(0,0,90)))
    holoColor(A, vec4(240,240,240,50))
    holoModel(A, "models/sprops/cylinders/size_5/cylinder_12x6.mdl")
    holoScale(A, vec(0.45,0.45,0.5))
    holoParent(A, entity())
    holoMaterial(A,"models/debug/debugwhite")

    A = 9
    holoCreate(A, entity():toWorld(vec(0,0.1,4)), vec(1),
    entity():toWorld(ang(0,0,90)))
    holoColor(A, vec(240,240,240))
    holoModel(A, "models/sprops/cylinders/size_5/cylinder_12x6.mdl")
    holoScale(A, vec(0.15,0.15,0.5))
    holoParent(A, entity())
    holoMaterial(A,"bobsters_trains/br_carpet_grey")

    A = 10
    holoCreate(A, entity():toWorld(vec(0,0,0.4)), vec(1),
    entity():toWorld(ang(90,0,0)))
    holoColor(A, vec(244,0,0))
    holoModel(A, "models/sprops/rectangles_thin/size_0/rect_1_5x6x1_5.mdl")
    holoScale(A, vec(0.5,0.05,0.05))
    holoParent(A, 661)
    holoMaterial(A,"models/debug/debugwhite")

    A = 11
    holoCreate(A, entity():toWorld(vec(0,0,0.4)), vec(1),
    entity():toWorld(ang(90,0,0)))
    holoColor(A, vec(244))
    holoModel(A, "models/sprops/rectangles_thin/size_0/rect_1_5x6x1_5.mdl")
    holoScale(A, vec(0.55,0.05,0.05))
    holoParent(A, 662)
    holoMaterial(A,"models/debug/debugwhite")

    A = 12
    holoCreate(A, entity():toWorld(vec(0,0,0.4)), vec(1),
    entity():toWorld(ang(90,0,0)))
    holoColor(A, vec(244))
    holoModel(A, "models/sprops/rectangles_thin/size_0/rect_1_5x6x1_5.mdl")
    holoScale(A, vec(0.44,0.05,0.05))
    holoParent(A, 663)
    holoMaterial(A,"models/debug/debugwhite")

    A = 13
    holoCreate(A, entity():toWorld(vec(0.15,1.23,6.4)), vec(1),
    entity():toWorld(ang(0,0,0)))
    holoColor(A, vec(240,240,240))
    holoModel(A, "models/sprops/misc/alphanum/alphanum_1.mdl")
    holoScale(A, vec(0.03,0.03,0.03))
    holoParent(A, 6)
    holoMaterial(A,"models/debug/debugwhite")

    A = 14
    holoCreate(A, entity():toWorld(vec(-0.15,1.23,6.4)), vec(1),
    entity():toWorld(ang(0,0,0)))
    holoColor(A, vec(240,240,240))
    holoModel(A, "models/sprops/misc/alphanum/alphanum_2.mdl")
    holoScale(A, vec(0.03,0.03,0.03))
    holoParent(A, 6)
    holoMaterial(A,"models/debug/debugwhite")

    A = 15
    holoCreate(A, entity():toWorld(vec(0,1.23,1.65)), vec(1),
    entity():toWorld(ang(0,0,0)))
    holoColor(A, vec(240,240,240))
    holoModel(A, "models/sprops/misc/alphanum/alphanum_6.mdl")
    holoScale(A, vec(0.03,0.03,0.03))
    holoParent(A,6)
    holoMaterial(A,"models/debug/debugwhite")

    A = 16
    holoCreate(A, entity():toWorld(vec(-2.4,1.23,4)), vec(1),
    entity():toWorld(ang(0,0,0)))
    holoColor(A, vec(240,240,240))
    holoModel(A, "models/sprops/misc/alphanum/alphanum_3.mdl")
    holoScale(A, vec(0.03,0.03,0.03))
    holoParent(A, 6)
    holoMaterial(A,"models/debug/debugwhite")

    A = 17
    holoCreate(A, entity():toWorld(vec(2.4,1.23,4)), vec(1),
    entity():toWorld(ang(0,0,0)))
    holoColor(A, vec(240,240,240))
    holoModel(A, "models/sprops/misc/alphanum/alphanum_9.mdl")
    holoScale(A, vec(0.03,0.03,0.03))
    holoParent(A,6)
    holoMaterial(A,"models/debug/debugwhite")

}
Second = curtime()
Minute = Second/60
Hour = Minute/60
interval(1000)

if(changed(Second))
{soundPlay("tick",0,"clock/tick.wav") soundStop("tick",0.1)}

holoPos(661,E:toWorld(vec(0,1.5,4)))
holoAng(661,E:toWorld(ang(-Second*6,0,0)))

holoPos(662,E:toWorld(vec(0,1.4,4.1)))
holoAng(662,E:toWorld(ang(-Minute*0.6,0,0)))

holoPos(663,E:toWorld(vec(0,1.45,3.9)))
holoAng(663,E:toWorld(ang(-Hour*30,0,0)))