if (SERVER) then return false end

local hook                               = hook
local ScrH                               = ScrH
local ScrW                               = ScrW

local tspeed                             = ( Color(200,170,40,150)      )
local thp                                = ( Color(240,60,60,150)       )
local tblack                             = ( Color(20,20,20,170)        )
local black                              = ( Color(20,20,20,255)    )
local nwhite                             = ( Color(235,235,235,255) )


-- Draw functions
surface.CreateFont("Menu",{font = "Trebuchet24", size = 28.4, weight = 292, antialias = 0})
surface.CreateFont("MenuSmall",{font = "Trebuchet24", size = 21, weight = 130, antialias = 1})

function DrawText ( text, x, y, color )
        draw.SimpleText ( text, "Menu", x, y, color, TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
end

function DrawTextSmall ( text, x, y, color )
        draw.SimpleText ( text, "MenuSmall", x, y, color, TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
end

local function GetTextWidth(hFont, strString)
        surface.SetFont(hFont)
        local iWidth, iHeight = surface.GetTextSize(strString)
        return iWidth
end

local function DrawRectangle(pointX, pointY, pointW, pointH, colColor)
        surface.SetDrawColor(colColor)
        surface.DrawOutlinedRect(pointX, pointY, pointW, pointH)
end

local function DrawFilledRectangle(pointX, pointY, pointW, pointH, colColor)
        surface.SetDrawColor(colColor)
        surface.DrawRect(pointX, pointY, pointW, pointH)
end

function killtokens()
                draw.RoundedBoxEx(0, 15, 80, 220, 50, tblack, false, false, true, true)
                DrawText ("0 KillTokens", 79, 102, nwhite )
end

function time()
                local rt = string.ToMinutesSeconds(math.Round(math.max( GetGlobalInt( "Deathrun_RoundTime" ) - CurTime(), 0 )))
                draw.RoundedBoxEx(0, 6, ScrH()-168, 80, 34, tblack, false, false, false, false)
                DrawText (rt, 40, ScrH()-152, nwhite )
end

function speedbar()
    local vel = LocalPlayer():GetVelocity():Length2D()
    local defSpeedWidth = math.Clamp(vel, 0, 1500)/1500
	speedWidth = Lerp(defSpeedWidth, 0, 244)

    draw.RoundedBox(0, 6, ScrH()-82, 244, 34, tblack)

    draw.RoundedBox(0, 48, ScrH()-80, speedWidth, 30, tspeed)

    draw.RoundedBox(0, 7, ScrH()-84, 38, 38, black)
    draw.RoundedBox(0, 29.5, ScrH()-78, 7.6, 26, nwhite)

    draw.RoundedBox(0, 11, ScrH()-70, 14, 4, nwhite)
    draw.RoundedBox(0, 13, ScrH()-65, 12, 4, nwhite)
    draw.RoundedBox(0, 15, ScrH()-60, 10, 4, nwhite)

    draw.SimpleText("SPEED: " .. math.Round(vel), "Menu", 92, ScrH()-66, nwhite, TEXT_ALIGN_LEFT)
end

function hpbar()
        local hp = math.Round((202/100*LocalPlayer():Health())-2)
        local health = math.Clamp(LocalPlayer():Health(),0,100)
        local CHealth = Color(225 - 2.55 * (health / 100) * 100, 2.55 * (health / 100) * 100, 0, 255)
        draw.RoundedBoxEx(0, 6, ScrH()-122, 244, 34, tblack, false, false, false, false)
        draw.RoundedBoxEx(0, 7, ScrH()-124, 38, 38, black, true, true, true, true)
        draw.RoundedBoxEx(0, 24, ScrH()-121, 5, 31, nwhite, false, false, false, false)
        draw.RoundedBoxEx(0, 48, ScrH()-120, hp, 30, CHealth, false, false, false, false)
        draw.RoundedBoxEx(0, 13, ScrH()-108, 28, 5, nwhite, false, false, false, false)
        DrawText ( health.." HP", 92, ScrH()-106, nwhite )
end

function ammo()
        local Weapon = LocalPlayer():GetActiveWeapon()

        if IsValid(Weapon) then

                local WeaponName = Weapon:GetPrintName()
                local iLen = (Weapon:Clip1() - 1) * 10
                local iWeaponNameLen = GetTextWidth("MenuSmall", WeaponName)
                if (iLen < iWeaponNameLen) then
                        iLen = iWeaponNameLen
                end

                local hudX = ScrW() - iLen - 10 - 20 - 10
                local hudW = iLen + 20 + 10
                local hudH = 65
                DrawTextSmall( WeaponName, hudX + (8 + ( iWeaponNameLen / 2 )), hudY + 10, nwhite )

                for i = 0, Weapon:Clip1() - 1 do
                        DrawFilledRectangle(ScrW() - i * 10 - 30, hudY + 25, 5, 30, nwhite)
                end
        end
end

hook.Add("HUDPaint", "HUD", function ()
        speedbar()
        hpbar()
        time()
        --killtokens()
        ammo()
end)

function hidehud(name)
        for k, v in pairs({"CHudHealth", "CHudBattery", "CHudAmmo", "CHudSecondaryAmmo"}) do
                if name == v then return false end
        end
end
hook.Add("HUDShouldDraw", "KillOldHUD", hidehud)