@name Chik's Metal Detector V3
@inputs EGP:wirelink
@persist Player:entity Weps:array ShouldPlay

if(first() || changed(->EGP) && ->EGP){
    EGP:egpClear()
    EGP:egpRoundedBox(1,vec2(256,256),vec2(470,470))
    EGP:egpColor(1,vec(70,70,70))
    EGP:egpText(2,"ChikScan V3",vec2(130,40))
    EGP:egpSize(2,50)
    timer("cycle",100)
    EGP:egpBox(3,vec2(256,380),vec2(400,30))
    EGP:egpBox(4,vec2(256,420),vec2(400,30))
    EGP:egpBox(5,vec2(256,460),vec2(400,30))

}
if(clk("cycle")){
    timer("cycle",100)
}
Player = noentity()
Weps:clear()

Player = ranger(300):entity()

##########################################
############### WEAPONS ##################
##########################################

Weps = Player:GetWeapons()
Armed = 0
for(I = 1, 10){
    if(Weps[I,string] != ""){
        EGP:egpText(I+5,Weps[I,string],vec2(70, I*25+80))
        if(Weps[I,string]:find("weapon_mad") || Weps[I,string]:find("weapon_bd")){
            EGP:egpColor(I+5,vec(255,0,0))
            Armed = 1
        }
    }
}
if(Weps:count()>10){
    for(I = 10,20){
        if(Weps[I,string] != ""){
            EGP:egpText(I+5,Weps[I,string],vec2(270, I*25+80))
            if(Weps[I,string]:find("weapon_mad") || Weps[I,string]:find("weapon_bd")){
                EGP:egpColor(I+5,vec(255,0,0))
                Armed = 1
            }
        }
    }
}

if(Armed){
    EGP:egpText(28,"Player is armed!",vec2(210,450))
    EGP:egpSize(28,17)
    EGP:egpColor(5,vec(255,0,0))
    ShouldPlay = 1
}
else{
    EGP:egpText(28,"Player is unarmed.",vec2(200,450))
    EGP:egpSize(28,17)
    EGP:egpColor(5,vec(0,255,0))
    ShouldPlay = 0
}


#####################################
############# ARMOR #################
#####################################

if(Player:armor()>0){
    EGP:egpText(26,"Player is armored!",vec2(200,410))
    EGP:egpSize(26,15)
    EGP:egpColor(4,vec(255,0,0))
}
else{
    EGP:egpText(26,"Player is not armored.",vec2(175,410))
    EGP:egpColor(4,vec(0,255,0))
}



######################################
############## HEALTH ################
######################################

if(Player:health()<33){
    EGP:egpText(27,"Player is critically injured!",vec2(170,370))
    EGP:egpSize(27,17)
    EGP:egpColor(3,vec(255,0,0))
}
elseif(Player:health()<66){
    EGP:egpText(27,"Player is moderately injured.",vec2(170,370))
    EGP:egpSize(27,17)
    EGP:egpColor(3,vec(255,140,0))
}
elseif(Player:health()<100){
    EGP:egpText(27,"Player is slightly injured.",vec2(173,370))
    EGP:egpSize(27,17)
    EGP:egpColor(3,vec(255,255,0))
}
else{
    EGP:egpText(27,"Player is not injured at all.",vec2(170,370))
    EGP:egpSize(27,17)
    EGP:egpColor(3,vec(0,255,0))
}