E:applyForce(-E:vel()*E:mass()*Multiplier)

@name Helper Bot
@inputs Active W S
@outputs Gyro:angle V:vector
@persist 
@trigger all


Me = owner()
Ent = entity()

if (Active == 1)
{
    runOnTick(1)
    P = Ent:elevation(Me:aimPos())
    Y = Ent:bearing(Me:aimPos())
    R = Ent:angles():roll()
    Gyro = -ang(P,Y,R)*500
    
    Ent:applyAngForce(Gyro + $Gyro*5)
    
    V = (Me:aimPos() - Ent:pos())/10
    
    if (W == 1)
    {
        Ent:applyForce(V + $V*5)
    }
    
    
}

@name NPC Detect
@persist Dist Npc:entity Loc:vector

interval(10)

EE = entity()

findByClass("npc_*")
Loc = findClosest(EE:pos()):pos()

Dist = EE:pos():distance(Loc)

if (Dist < 200){
    EE:setColor(255, 0, 0) }
if (Dist > 200){
    EE:setColor(0, 255, 0) }

@name Sensor
@inputs Prop:entity
if (~Prop) {
    holoCreate(1)
    holoMaterial(1,"models/shiny")
    holoParent(1,Prop)

    #Fancy calculations: (if this work it SHOULD place the hologram 25 units ABOVE the prop no matter the size of the prop)
    holoPos(1,Prop:toWorld(Prop:boxCenter()+vec(0,0,Prop:boxSize():z()/2+25))

    runOnTick(1)
}

if (findCanQuery()) { #Are we allowed to find stuff?
    findByClass("npc_*") #Find NPCs
    E = findClosest(Prop:pos()) #Find closest
    if (E:pos():distance(Prop:pos()) < 200) { #Check distance
        holoColor(1,vec(255,0,0)) #Red
    } else {
        holoColor(1,vec(0,255,0)) #Green
    }
}

Angle = ang()

holoAng(Index,Angle)

Angle:yaw() += 1

if(Angle:yaw() > 180)
{
    Angle:yaw() = -180
}

runOnTick(1)
entity():applyForce(vec(0,0,9.013)*entity():mass())

for(Index=1, Players:count())
{
    holocreate(Index)
}

for(Index=1, Players:count())
{
    holocreate(Index)
    if(Players[Index,entity]:SteamID() == "STEAM_targetsteamID")
    {
        #Change holo's color for a particular SteamID
        #You could also modify material, alpha, scale, etc.

        holoColor(Index, vec(Red,Green,Blue)
    }

    if(Players[Index,entity] == entity():owner())
    {
        #same as above but for the owner's hologram
        holoColor(Index, vec(Red,Green,Blue)
    }
}

@name Hologram Radar
@persist Players:array Scale


if(first())
{
    #find all players
    findByClass("player")
    Players = findToArray()
    
    #spawn holograms for each player
    for(Index=1,Players:count())
    {
        holoCreate(Index)
        holoModel(Index,"hqicosphere")
        holoScale(Index,vec(0.5,0.5,0.5))
        holoMaterial(Index,"models/debug/debugwhite")
        
        #check for custom colors

        #owner
        if(Players[Index,entity]:steamID() == owner():steamID())
        {holoColor(Index,vec(Red,Green,Blue))}
        
        #player name
        if(Players[Index,entity]:steamID() == "STEAM_XXXXXXXXX")
        {holoColor(Index,vec(Red,Green,Blue))}
        
    }
    
    #black background
    holoCreate(0)
    holoModel(0,"plane")
    holoScale(0,vec(40,40,1))
    holoColor(0,vec())
    holoAlpha(0,100)
    holoMaterial(0,"models/debug/debugwhite")
    
    runOnTick(1)
}

#move holograms
holoPos(0,entity():pos() + vec(0,0,5))

for(Index=1,Players:count())
{
    holoPos(Index,entity():pos() + entity():toLocal(Players[Index,entity]:pos()) / vec(60,60,20) + vec(0,0,10))
}

 
#player name
if(Players[Index,entity]:steamID() == "STEAM_XXXXXXXXX")
{holoColor(Index,vec(Red,Green,Blue))}

if(first())

@inputs E:entity
@persist Array:array
interval(10000) #search every 10 seconds
findIncludePlayerProps(E) #only this players props
findByClass("") #camera entity here
Array = findToArray() #put it into an array

for (X = 1,Array:count()) {
	holoCreate(X) #create a hologram
	holoPos(X,Array[X,entity]:pos()) #position a hologram
	holoParent(X,Array[X,entity]) #parent it to the camera
	print("Camera "+X+" is at vector " + Array[X,entity]:pos():toString()) #print it - don't run on small intervals
	concmd("echo Camera "+X+" is at vector " + Array[X,entity]:pos():toString()) #put it into console
}