tutor_14_egp_hud

@name egp_hud
@inputs
@outputs
@persist [E O]:entity EGP:wirelink MaxHP MaxAR
@trigger

interval(100)

if(first()){

    alibNoDup()
    E = entity()
    O = owner()
    MaxHP = 228
    MaxAR = 228

    findByClass("gmod_wire_egp_hud")
    findSortByDistance(vec(50))
    findClosest(E:pos())
    F = find()
    F:weldTo(E,1)
    EGP = F:wirelink()

    print(EGP)
    EGP:egpClear()

    EGP:egpBoxOutline(5,vec2(550,800),vec2(300,50))
    EGP:egpBoxOutline(6,vec2(550,855),vec2(300,50))
    EGP:egpBoxOutline(7,vec2(775,825),vec2(100,100))
}
    #[
    #HP
    EGP:egpBox(8,vec2(550,800),vec2(300,50))
    EGP:egpColor(8,vec(255,0,0))

    #Armor
    EGP:egpBox(9,vec2(550,855),vec2(300,50))
    EGP:egpColor(9,vec(0,0,255))

    #God
    if(O:alibPlyInGod()){
        EGP:egpText(10,"God",vec2(525,790))
    } else { EGP:egpText(10,"",vec2(525,790)) }

} else {

    if(O:health()<=MaxHP){
        EGP:egpBox(8,vec2(550,800),vec2( (O:health()/2.28)*3 ,50))
    }

    if(O:armor()<=MaxAR){
        EGP:egpBox(9,vec2(550,855),vec2( (O:armor()/2.28)*3 ,50))
    }

    if(O:alibPlyInGod()){
        EGP:egpText(10,"God",vec2(525,790))
    } else { EGP:egpText(10,"HP: "+O:health(),vec2(525,790)) }

}