gmod set shootpos
@name Tank Chip Simple V5
@inputs [Pod Gun TurretBase]:entity GunLock ADV:wirelink Ready
@outputs DDDD XHVec:vector Debug GunLatch Torque PrimaryAmmo SecondaryAmmo
@persist Dran:ranger XH:ranger User:entity A HoloOpacity
@persist Exclude 
@persist [Trig Sam Sac Fac Trig3 ET ET2]:vector
@persist TrigTX TrigTY TrigTZ TrigY TrigX TrigZ TrigT XHVec:vector Vel:vector [ETG ETG2]:vector TurretPitchAch TurretPitch RPMPitch RPM
@persist TurningRate ElevationRate ShootPos:vector Change TreadPitch
@inputs [FL FR Base]:entity
@outputs MPH
@persist RPMFL RPMFR EnginePowerReduced Stall EngineDestroyed Pactive
gmod set shootpos How to get it for free? gmod set shootpos
@persist [Pos Turningf Turningb Force]:vector
@inputs AmmoSwitch 
@outputs AmmoType 
@persist Aon Aimpower Torque TraverseRate ElevateRate Running EnginePitch TrackPitch
@persist ETG2X ETG2Y ETG2Z LoadPitch
@trigger all
 
interval(20)
 
 
gmod set shootpos PasteShr gmod set shootpos
#Added support for new ammo system
 
##### READ ALL THE FUCKING COMMENTS
##### READ ALL THE FUCKING COMMENTS
##### READ ALL THE FUCKING COMMENTS
##### READ ALL THE FUCKING COMMENTS
##### READ ALL THE FUCKING COMMENTS
 
 
#Version 4 Chip by Sestze, Kickasskyle, & Karbine (credits to Basque and Donovan for E2 soundPlay help)
gmod set shootpos How to get it? gmod set shootpos
 
 
#This chip is an ongoing WIP so some parts of it are not totally optimized and are butchered from other things
 
#(this chip used to have an engine damage system but does no longer, has some code from it still)
 
##### Remember when linking your wheels, link your two rear drive wheels or front wheels (1 per side)
#And link all the wheels on that track to the drive wheel with advanced ballsocket. FR means front right, etc
 
# V4 Changes: Added turret lock (on by default)
gmod set shootpos PasteShr gmod set shootpos
#Added Wirelink (for the most part, some inputs won't work with it)
#Turret sounds
 
 
 
# FUCKING IMPORTANT READ THIS:
#For the aim to be true, you need to "Static" your pod (seat)
#simply ballsocket center (check the "simple ballsocket, ignore settings box) your seat to the turret base
#and then with settings of -.1 for min and .1 for max for XYZ for advanced ballsocket (MAKE SURE FREE MOVEMENT IS CHECKED)
#click the pod and then the ground.
gmod set shootpos How to get it for free? gmod set shootpos
 
#MAKE SURE THIS CHIP FACES FORWARD (use the chip with the arrow on it)
#IF YOUR CONTROLS ARE REVERSED just rewire your WASD to the pod controller (use S for W, W for S, etc)
 
#Note about the gunlock- attach a weld latch from your gun to tank base, and wire it to GunLatch
#It is on by default so just tap whatever key you have bound to GunLock OR YOUR AIM WILL NOT WORK
 
#If your tank slides too much, consider applying a no-lift fin of 20-50 efficiency to the side of your base prop
 
#If you want a true crosshair(the hologram does this too), hook up an Adv. Hud Indicator with World and Vector checkboxes checked and the dropdown set to "-1 to 1"
gmod set shootpos How to get it for free? gmod set shootpos
#Wire to XHvec
 
 
 
 
 
 
 
 
#Movement constants. 
gmod set shootpos How to get it? gmod set shootpos
    Dfor = 0.1 #Forward friction.
    Dtur = 0.05 #turning friction. Raise this if it turns too fast.
    Torque = 250000*8 #Change the 2.7 multiplier to increase wheel torque. Affects steering speed too.
    Offsetfor = 200 # Ignore
    StaticPitch = 40 #Idle pitch
    DrivingPitch = 100
    TurningPitch = 120
    TreadPitch = 4
    Volume = 30 #Ignore
    Ang = ang(1,0,0) #Wheel direction angle. If your wheels don't spin, change the position of the 1
gmod set shootpos How to dowload it? gmod set shootpos
    # to 1,0,0 or 0,0,1 etc
      
   #Aiming constants 
    Aimpower = 220
    TraverseRate = 0.025
    ElevateRate = 0.025  
    
    HoloOpacity = 0 #(0-255)
    
   
gmod set shootpos How to get it? gmod set shootpos
 
    if(first()|dupefinished()){
 
    Base:soundPlay(1,0,"vehicles/crane/crane_turn_loop2.wav")
    Base:soundPlay(2,0,"vehicles/crane/crane_slow_to_idle_loop4.wav")
    TurretBase:soundPlay(3,0,"vehicles/tank_turret_loop1.wav")
  
}
if(changed(Ready)&Ready){
 
gmod set shootpos How to get it for free? gmod set shootpos
    Gun:soundPlay(4,1,"ambient/levels/outland/ol11_blastdoorlatch.wav")
        }
 
 
    LoadPitch = 70
    soundPitch(1,EnginePitch)
    soundPitch(2,TrackPitch)
    soundPitch(3,TurretPitch)  
    soundPitch(4,LoadPitch)  
 
gmod set shootpos How to dowload it? gmod set shootpos
 
# IF YOUR CONTROLS ARE REVERSED, REORDER THE CONTROLS
#IE if your tank goes forward when you hit reverse, change W to S, etc
W = ADV["W", number]
S = ADV["S", number]
A = ADV["A", number]
D = ADV["D", number]
Brake = ADV["Space", number]
Active = ADV["Active", number]
if(AmmoSwitch){Pod:hintDriver("Ammo changed next load", 5)}
gmod set shootpos How to dowload it? gmod set shootpos
    
 
 
 
#Constants
TurretPitchMax = 0.6 *100
TurretSmoother = 0.03 *100 #Turret Sound Smoother
RPMPitch = 1 #Amount of RPM before turret sounds activate
 
 
gmod set shootpos PasteShr gmod set shootpos
 
#I wouldn't fuck with it, but if your turret sound isn't working, fuck with the :yaw
RPM = abs(TurretBase:angVel():yaw()/6)
if(RPM > RPMPitch) {
                TurretPitchAch = TurretPitchMax
                 }
                        
                else {
                TurretPitchAch = 0        
                }
gmod set shootpos How to get it? gmod set shootpos
            #Smoother
            TurretPitch = clamp(TurretPitch+(TurretPitchAch-TurretPitch),TurretPitch-TurretSmoother,TurretPitch+TurretSmoother)
 
#You don't need to edit anything below this line-------------------------------- 
 
  
if(!Pactive) {GunLatch = 1}
else {GunLatch = 0}
 
if(GunLock & ~GunLock) {Pactive = !Pactive}
gmod set shootpos How to get it for free? gmod set shootpos
    
  if(!Active) {GunLatch = 1}  
 
 
 
    
 
 
  
    
gmod set shootpos PasteShr gmod set shootpos
if(first()|dupefinished())
{
    Exclude = 1000 #Ignore
    XHExclude = 300 #Ignore
    TurningRate = TraverseRate 
    ElevationRate = ElevateRate  
    rangerPersist(1)
    rangerFilter(entity():getConstraints())
    
    ######HOLO CREATION
gmod set shootpos PasteShr gmod set shootpos
    holoCreate(1,entity():pos(),vec(0.05,0.05,0.05))
    holoModel(1,"icosphere")
    holoColor(1,vec(0,255,0),HoloOpacity) #Holo sight color/alpha adjustment
    holoParent(1,Pod)
    
}
 
#Gun Vectors unlocked
    ET = entity():forward()
    ET2 = $ET
gmod set shootpos PasteShr gmod set shootpos
    ET2X = ET2:x()
    ET2Y = ET2:y()
    ET2Z = ET2:z()
 
#Gun locking vectors (Put under the originals, they'll look the same should be under if(Pod driver)
    ETG = Gun:forward()
    ETG2 = $ETG
    ETG2X = ETG2:x()
    ETG2Y = ETG2:y()
    ETG2Z = ETG2:z()
gmod set shootpos How to dowload it? gmod set shootpos
 
 
if(Pactive){
if(Pod:driver())
{
    Change = 1
    User= Pod:driver()
    Dran = rangerOffset(30000, User:shootPos() + User:eye() * Exclude, User:eye())
 
 
gmod set shootpos How to use it? gmod set shootpos
    
    if($Change){
        ShootPos = Pod:toLocal(User:shootPos())
    }
    
    if(Gun)
    {
        #Xhair
    XH = rangerOffset(30000, Gun:pos() + Gun:forward() *XHExclude, Gun:forward())
    XHVec = XH:position()
gmod set shootpos How to dowload it? gmod set shootpos
    XHVec2 = XH:position() - Pod:toWorld(ShootPos)
        #Hologram stuff
    HoloPos = Pod:toWorld(ShootPos) + XHVec2:normalized() * 40 #Do not adjust
        holoPos(1,HoloPos)    
        holoAng(1,Gun:angles())
        
        Trig2 = (Dran:position() - Gun:pos())
        Trig3 = Trig2:normalized()
            #Clamp the speed at which the Normalized vector changes, making a delayed turning
            #Split into 3 Numbers
gmod set shootpos How to dowload it? gmod set shootpos
            TrigX = Trig3:x()
            TrigY = Trig3:y()
            TrigZ = Trig3:z()
            #Add where it wants to aim, to a "delayed" value, that it will slowly obtain.
            TrigTX = clamp(TrigX, TrigTX-TurningRate, TrigTX+TurningRate)+ET2X
            TrigTY = clamp(TrigY, TrigTY-TurningRate, TrigTY+TurningRate)+ET2Y
            TrigTZ = clamp(TrigZ, TrigTZ-ElevationRate, TrigTZ+ElevationRate)+ET2Z
            
            TrigT = TrigTX+TrigTY+TrigTZ
            
gmod set shootpos PasteShr gmod set shootpos
        Trig = vec(TrigTX,TrigTY,TrigTZ)
        
        Sam = (Trig) - Gun:forward()
        Sac = (Gun:forward():cross(Sam)):cross(Gun:forward())
        Fac = (Sac + $Sac * 5)*Gun:mass()
        
        Gun:applyOffsetForce(Fac*50,Gun:pos()+Gun:forward()*Aimpower) #Edit the last number here to change force
        DDDD = 0
    }
 
gmod set shootpos PasteShr gmod set shootpos
}else{
    holoPos(1,entity():pos())
    Change = 0
}
}else{
                            TrigTX = TrigTX + ETG2X
                            TrigTY = TrigTY + ETG2Y
                            TrigTZ = TrigTZ + ETG2Z
                            TrigX = TrigTX
                            TrigY = TrigTY
gmod set shootpos PasteShr gmod set shootpos
                            TrigZ = TrigTZ
                            TurretPitch = 0
                            DDDD = 1
}
 
 
 
    
 
#Friction Changer, To make it jerk to a stop.
gmod set shootpos PasteShr gmod set shootpos
    if((!W&!S)){
        Dfor = 4
        }
 
#Handbrake
    if(Brake){
          Dfor = 15 #Braking friction
    }
 
#Damage Inputs
gmod set shootpos How to get it for free? gmod set shootpos
 
    #Default
    if(!EnginePowerReduced&!EngineDestroyed&!Stall){
        Power = Torque #Adjust multiplier to adjust torque. This affects steering, adjust Dtur if it turns too fast
        Running = 1
    }
 
    #Reduced Engine Power
    if(EnginePowerReduced&!EngineDestroyed&!Stall){
        Power = 260000*2.7 #Don't change this
gmod set shootpos PasteShr gmod set shootpos
        Running = 1
    }
 
    #Engine Destroyed/Stall
    if(EngineDestroyed|Stall){
        Running = 0
        Power = 0
    }
 
 
gmod set shootpos How to get it for free? gmod set shootpos
 
 
 
#Rpm Limitation
    Limit = 500 #RPM limit
    if((Limit > RPMFL)&(-Limit < RPMFL)) {TorqueFL = Power}else{TorqueFL = 0}
 
 
    if((Limit > RPMFR)&(-Limit < RPMFR)) {TorqueFR = Power}else{TorqueFR = 0}
 
gmod set shootpos How to dowload it? gmod set shootpos
    
 
 
#Actual Movement Calculations.
    Total = (W-S)
    Right = (A-D)
    Left = -Right
    #Right/left side
    RHS = (Total*2+Right*4)/2
    LHS = (Total*2+Left*4)/2
gmod set shootpos How to dowload it? gmod set shootpos
    
#Applying the Forces
if(W|S|A|D){
    FL:applyTorque(vec(Ang)*-TorqueFL*LHS)
 
    FR:applyTorque(vec(Ang)*TorqueFR*RHS)
 
}
 
#Base Dampening Friction
gmod set shootpos How to dowload it? gmod set shootpos
#Main drag forces.
    Pos = Base:pos()
    Vel = $Pos
    Vel:setZ(0)
 
#Reset Variables
    Force = vec()
    Turningf = vec()
    Turningb = vec()
 
gmod set shootpos PasteShr gmod set shootpos
#Drag Forces
if(clk())
{
    Force = Force - Vel * Base:mass() * Dfor
    Turningf = Turningf - entity():angVel():yaw() * entity():right() * Dtur * Base:mass()
    Turningb = Turningb + entity():angVel():yaw() * entity():right() * Dtur * Base:mass()
 
}
#Applying the forces
if(clk())
gmod set shootpos How to use it? gmod set shootpos
{
    Force = Force:setZ(0)
    Base:applyForce(Force)
    Base:applyOffsetForce(entity():forward() * Offsetfor, Turningf)
    Base:applyOffsetForce(entity():forward() * -Offsetfor, Turningb)
}
 
##Sounds for engines (inbuilt smoother)
if(clk()){
    if(A|D){
gmod set shootpos PasteShr gmod set shootpos
        Pitch = TurningPitch
    }elseif(W|S){
        Pitch = DrivingPitch
    }else{
        Pitch = StaticPitch    
    }
    #Smoother
    EnginePitch = clamp(Pitch,EnginePitch-2,EnginePitch+2)
}
 
gmod set shootpos PasteShr gmod set shootpos
#Sounds for Tracks (Inbuilt speedo and Smoother)
if(clk()){
    MPH=toUnit("mph", entity():vel():length())
 
 
        TPitch = MPH*TreadPitch
        
 
 
 
gmod set shootpos How to dowload it? gmod set shootpos
    
    #Smoother
    TrackPitch = clamp(TPitch,TrackPitch-20,TrackPitch+20)
    
 
}
 
 
#RPM Calculation
RPMFL = FL:angVel():pitch()/6
gmod set shootpos How to get it? gmod set shootpos
 
 
RPMFR = FR:angVel():pitch()/6
# if it isn't working, change the
# :roll to :yaw or :pitch till it works
 
if(AmmoSwitch & ~AmmoSwitch) {Aon = !Aon}
if(Aon) {PrimaryAmmo= 1} else{PrimaryAmmo = 0}
if(!Aon) {SecondaryAmmo = 1} else{SecondaryAmmo = 0}
gmod set shootpos