local function DoActualHUD()
        local ply = LocalPlayer()
        local HP,AR = ply:Health(),ply:Armor()

        draw.RoundedBox(6,10,ScrH() - 62,204,24,Color(0,0,0,255))
        draw.RoundedBox(6,12,ScrH() - 60,math.Clamp(HP,4,100)*2,20,Color(209,0,0,255))
        draw.SimpleText(HP,"TargetID",100,ScrH() - 58)
end

local function DrawHUD()
        Scrw, Scrh = ScrW(), ScrH()
        RelativeX, RelativeY = 0, Scrh

        DoActualHUD()
end

function GM:HUDPaint()
    DrawHUD()
    self.BaseClass:HUDPaint()
end