@name Holo ricer Steering Wheel
@inputs Controller:wirelink [RPM CGear]
@outputs L1 L2 L3 L4 L5 L6 L7
@persist R I

if( duped() ){ reset() }

if (first()) {
    runOnTick(1)

    # Parent
    entity():setAlpha(0)

     ##################~ Holo Steering Wheel ~##################
   I = 0
#Stick
    holoCreate(1,entity():toWorld(vec(0+I,0,6)),vec(0.20,0.20,1),entity():toWorld(ang()),vec(50,50,50)+67,"hqcylinder2")
    holoMaterial(1,"sprops/textures/sprops_metal1")
    holoParent(1,entity())
#Grip
    holoCreate(2,entity():toWorld(vec(0+I,0,12.6)),vec(1.3,1.3,1.3),entity():toWorld(ang()),vec(32,32,32),"hq_torus")
    holoMaterial(2,"models/props/cs_office/snowmana")
# Middle plate
    holoCreate(3,entity():toWorld(vec(0+I,0,12.2)),vec(0.31,0.31,0.09),entity():toWorld(ang()),vec(200,200,200)+30,"hqcylinder2")
    holoMaterial(3,"sprops/textures/sprops_metal1")
# Under plate
    holoCreate(4,entity():toWorld(vec(3+I,0,12.26)),vec(0.7,0.16,0.04),entity():toWorld(ang(-5,0,0)),vec(200,200,200)+30,"hqcylinder2")
    holoMaterial(4,"sprops/textures/sprops_metal1")
# Left plate
    holoCreate(5,entity():toWorld(vec(0+I,-3,12.34)),vec(0.7,0.16,0.04),entity():toWorld(ang(5,100,0)),vec(200,200,200)+30,"hqcylinder2")
    holoMaterial(5,"sprops/textures/sprops_metal1")
# Right plate
    holoCreate(6,entity():toWorld(vec(0+I,3,12.34)),vec(0.7,0.16,0.04),entity():toWorld(ang(-5,80,0)),vec(200,200,200)+30,"hqcylinder2")
    holoMaterial(6,"sprops/textures/sprops_metal1")
# Under grip
    holoCreate(7,entity():toWorld(vec(4.8+I,0,12.5)),vec(0.25,0.18,0.09),entity():toWorld(ang(-5,0,0)),vec(32,32,32),"hq_rcube_thick")
    holoMaterial(7,"models/props/cs_office/snowmana")
# Under Grip 2
    holoCreate(8,entity():toWorld(vec(4.9+I,0,12.4)),vec(0.27,0.09,0.2),entity():toWorld(ang(0,-90,95)),vec(32,32,32),"prism")
    holoMaterial(8,"models/props/cs_office/snowmana")
# Left grip
    holoCreate(9,entity():toWorld(vec(0.36+I,-4.9,12.5)),vec(0.25,0.18,0.09),entity():toWorld(ang(5,100,0)),vec(32,32,32),"hq_rcube_thick")
    holoMaterial(9,"models/props/cs_office/snowmana")
# Left Grip 2
    holoCreate(10,entity():toWorld(vec(0.26+I,-4.8,12.4)),vec(0.27,0.09,0.2),entity():toWorld(ang(0,14,-95)),vec(32,32,32),"prism")
    holoMaterial(10,"models/props/cs_office/snowmana")
# Right grip
    holoCreate(11,entity():toWorld(vec(0.36+I,4.9,12.5)),vec(0.25,0.18,0.09),entity():toWorld(ang(-5,80,0)),vec(32,32,32),"hq_rcube_thick")
    holoMaterial(11,"models/props/cs_office/snowmana")
# Right Grip 2
    holoCreate(12,entity():toWorld(vec(0.26+I,4.8,12.4)),vec(0.27,0.09,0.2),entity():toWorld(ang(0,-14,95)),vec(32,32,32),"prism")
    holoMaterial(12,"models/props/cs_office/snowmana")
# Grip indicator 1
    holoCreate(13,entity():toWorld(vec(-6.84+I,0,12.6)),vec(0.145,0.14,0.34),entity():toWorld(ang(0,0,90)),vec(255,0,0),"hqtorus2")
    holoMaterial(13,"models/debug/debugwhite")
# Middle Graphic plate 2 (Outer-x2 Circle)
    holoCreate(14,entity():toWorld(vec(0+I,0,12.75)),vec(0.212,0.212,0.01),entity():toWorld(ang()),vec(45,45,45)+10,"hqcylinder2")
    holoMaterial(14,"sprops/textures/sprops_chrome1")
# Middle Graphic plate 2 (Outer Circle)
    holoCreate(15,entity():toWorld(vec(0+I,0,12.8)),vec(0.195,0.195,0.01),entity():toWorld(ang()),vec(255,255,255)+10,"hqcylinder2")
    holoMaterial(15,"sprops/textures/sprops_chrome1")
# Middle Graphic plate 3 (Inner Circle)
    holoCreate(16,entity():toWorld(vec(0+I,0,12.86)),vec(0.175,0.175,0.01),entity():toWorld(ang()),vec(40,40,40)+10,"hqcylinder2")
    holoMaterial(16,"sprops/textures/sprops_metal1")
# Bolt 1 (Listed in Clockwise Order)
    holoCreate(17,entity():toWorld(vec(-1.57+I,0,12.7)),vec(0.035,0.035,0.02),entity():toWorld(ang()),vec(25,25,25)+10,"hq_sphere")
    holoMaterial(17,"sprops/textures/sprops_metal1")
# Bolt 2
    holoCreate(18,entity():toWorld(vec(-0.9+I,1.3,12.7)),vec(0.035,0.035,0.02),entity():toWorld(ang()),vec(25,25,25)+10,"hq_sphere")
    holoMaterial(18,"sprops/textures/sprops_metal1")
# Bolt 3
    holoCreate(19,entity():toWorld(vec(0.9+I,1.3,12.7)),vec(0.035,0.035,0.02),entity():toWorld(ang()),vec(25,25,25)+10,"hq_sphere")
    holoMaterial(19,"sprops/textures/sprops_metal1")
# Bolt 4
    holoCreate(20,entity():toWorld(vec(1.57+I,0,12.7)),vec(0.035,0.035,0.02),entity():toWorld(ang()),vec(25,25,25)+10,"hq_sphere")
    holoMaterial(20,"sprops/textures/sprops_metal1")
# Bolt 5
    holoCreate(21,entity():toWorld(vec(-0.90+I,-1.3,12.7)),vec(0.035,0.035,0.02),entity():toWorld(ang()),vec(25,25,25)+10,"hq_sphere")
    holoMaterial(21,"sprops/textures/sprops_metal1")
# Bolt 6
    holoCreate(22,entity():toWorld(vec(0.9+I,-1.3,12.7)),vec(0.035,0.035,0.02),entity():toWorld(ang()),vec(25,25,25)+10,"hq_sphere")
    holoMaterial(22,"sprops/textures/sprops_metal1")




    for (S = 2,22) {holoParent(S,1)}
    for(Nigger = 23,50){
    holoParent(Nigger,entity())}

}

    Left = Controller["A",number]
    Right = Controller["D",number]
    W = Controller["W",number]

#    if (Left & !Right){Rotation = 145}
#    elseif (!Left & Right){Rotation = -145}
#    else {Rotation = 0}
    Rotation = Left ? 145 : Right ? -145 : 0

#    if (R > Rotation){R = R - 7}
#    elseif (R < Rotation){R = R + 7}
    R += ( R > Rotation ? -7 : R < Rotation ? 7 : 0 )
    holoAng(1,entity():toWorld(ang(0,R,0)))