Hey I'm using the Prop Hunters version of Prop Hunt and I wanted to player ranks to the scoreboard. I have tried with no success. Would anyone be able to help me?
The scoreboard code is attached below.
if GAMEMODE && IsValid(GAMEMODE.ScoreboardPanel) then
GAMEMODE.ScoreboardPanel:Remove()
end
local menu
surface.CreateFont( "ScoreboardPlayer" , {
font = "coolvetica",
size = 32,
weight = 500,
antialias = true,
italic = false
})
local function colMul(color, mul)
color.r = math.Clamp(math.Round(color.r * mul), 0, 255)
color.g = math.Clamp(math.Round(color.g * mul), 0, 255)
color.b = math.Clamp(math.Round(color.b * mul), 0, 255)
end
local muted = Material("icon32/muted.png", "noclamp")
local skull = Material("melonbomber/skull.png", "noclamp")
local function addPlayerItem(self, mlist, ply, pteam)
local but = vgui.Create("DButton")
but.player = ply
but.ctime = CurTime()
but:SetTall(draw.GetFontHeight("RobotoHUD-20") + 4)
but:SetText("")
function but:Paint(w, h)
surface.SetDrawColor(color_black)
-- surface.DrawOutlinedRect(0, 0, w, h)
if IsValid(ply) && ply:IsPlayer() then
local s = 4
if !ply:Alive() then
surface.SetMaterial(skull)
surface.SetDrawColor(220, 220, 220, 255)
surface.DrawTexturedRect(s, h / 2 - 16, 32, 32)
s = s + 32 + 4
end
if ply:IsMuted() then
surface.SetMaterial(muted)
// draw shadow
-- surface.SetDrawColor(color_black)
-- surface.DrawTexturedRect(s + 1, h / 2 - 16 + 1, 32, 32)
// draw mute icon
surface.SetDrawColor(150, 150, 150, 255)
surface.DrawTexturedRect(s, h / 2 - 16, 32, 32)
s = s + 32 + 4
end
local col = color_white
draw.ShadowText(ply:Ping(), "RobotoHUD-L20", w - 4, 0, col, 2)
draw.ShadowText(ply:Nick(), "RobotoHUD-L20", s, 0, col, 0)
end
end
function but:DoClick()
if IsValid(ply) then
GAMEMODE:DoScoreboardActionPopup(ply)
end
end
mlist:AddItem(but)
end
local function doPlayerItems(self, mlist, pteam)
for k, ply in pairs(team.GetPlayers(pteam)) do
local found = false
for t,v in pairs(mlist:GetCanvas():GetChildren()) do
if v.player == ply then
found = true
v.ctime = CurTime()
end
end
if !found then
addPlayerItem(self, mlist, ply, pteam)
end
end
local del = false
for t,v in pairs(mlist:GetCanvas():GetChildren()) do
if !v.perm && v.ctime != CurTime() then
v:Remove()
del = true
end
end
// make sure the rest of the elements are moved up
if del then
timer.Simple(0, function() mlist:GetCanvas():InvalidateLayout() end)
end
end
local function makeTeamList(parent, pteam)
local mlist
local pnl = vgui.Create("DPanel", parent)
pnl:DockPadding(0, 0, 0, 0)
local hs = math.Round(draw.GetFontHeight("RobotoHUD-25") * 1.1)
function pnl:Paint(w, h)
surface.SetDrawColor(220, 220, 220, 50)
-- surface.DrawRect(0, 0, w, h)
surface.SetDrawColor(68, 68, 68, 120)
surface.DrawLine(0, hs, 0, h - 1)
surface.DrawLine(w - 1, hs, w - 1, h - 1)
surface.DrawLine(0, h - 1, w, h - 1)
surface.SetDrawColor(55, 55, 55, 120)
surface.DrawRect(1, hs, w - 2, h - hs)
end
function pnl:Think()
if !self.RefreshWait || self.RefreshWait < CurTime() then
self.RefreshWait = CurTime() + 0.1
doPlayerItems(self, mlist, pteam)
end
end
local headp = vgui.Create("DPanel", pnl)
headp:DockMargin(0,0,0,4)
headp:Dock(TOP)
headp:SetTall(hs)
function headp:Paint(w, h)
surface.SetDrawColor(68, 68, 68, 255)
-- surface.DrawRect(0, 0, w, h)
draw.RoundedBoxEx(4, 0, 0, w, h, Color(68, 68, 68, 120), true, true, false, false)
draw.ShadowText(team.GetName(pteam), "RobotoHUD-25", 6, 0, team.GetColor(pteam), 0)
end
local but = vgui.Create("DButton", headp)
but:Dock(RIGHT)
but:SetText("")
surface.SetFont("RobotoHUD-20")
local tw, th = surface.GetTextSize("Join team")
but:SetWide(tw + 6)
function but:DoClick()
RunConsoleCommand("car_jointeam", pteam)
end
function but:Paint(w, h)
surface.SetDrawColor(team.GetColor(pteam))
-- surface.DrawRect(0, 0, w, h)
surface.SetDrawColor(color_black)
-- surface.DrawOutlinedRect(0, 0, w, h)
local col = table.Copy(team.GetColor(pteam))
if self:IsDown() then
surface.SetDrawColor(12,50,50,120)
-- surface.DrawRect(1, 1, w - 2, h - 2)
col.r = col.r * 0.8
col.g = col.g * 0.8
col.b = col.b * 0.8
elseif self:IsHovered() then
surface.SetDrawColor(255,255,255,30)
-- surface.DrawRect(1, 1, w - 2, h - 2)
col.r = col.r * 1.2
col.g = col.g * 1.2
col.b = col.b * 1.2
end
draw.ShadowText("Join team", "RobotoHUD-20", 2, h / 2 - th / 2, col, 0)
end
mlist = vgui.Create("DScrollPanel", pnl)
mlist:Dock(FILL)
function mlist:Paint(w, h)
end
// child positioning
local canvas = mlist:GetCanvas()
canvas:DockPadding(8, 8, 8, 8)
function canvas:OnChildAdded( child )
child:Dock( TOP )
child:DockMargin( 0,0,0,4 )
end
local head = vgui.Create("DPanel")
head:SetTall(draw.GetFontHeight("RobotoHUD-15") * 1.05)
head.perm = true
local col = Color(190, 190, 190)
function head:Paint(w, h)
draw.ShadowText("Name", "RobotoHUD-15", 4, 0, col, 0)
draw.ShadowText("Ping", "RobotoHUD-15", w - 4, 0, col, 2)
end
mlist:AddItem(head)
return pnl
end
function GM:ScoreboardRoundResults(results)
self:ScoreboardShow()
menu.ResultsPanel.Results = results
menu.ResultsPanel:InvalidateLayout()
end
function GM:ScoreboardShow()
if IsValid(menu) then
if GAMEMODE.GameState == 3 then
menu:SetVisible(false)
else
menu:SetVisible(true)
end
else
menu = vgui.Create("DFrame")
GAMEMODE.ScoreboardPanel = menu
menu:SetSize(ScrW() * 0.8, ScrH() * 0.8)
menu:Center()
menu:MakePopup()
menu:SetKeyboardInputEnabled(false)
menu:SetDeleteOnClose(false)
menu:SetDraggable(false)
menu:ShowCloseButton(false)
menu:SetTitle("")
menu:DockPadding(8, 8, 8, 8)
function menu:PerformLayout()
if IsValid(menu.CopsList) then
menu.CopsList:SetWidth((self:GetWide() - 16) * 0.5)
end
end
function menu:Paint(w, h)
surface.SetDrawColor(40,40,40,230)
surface.DrawRect(0, 0, w, h)
end
menu.Credits = vgui.Create("DPanel", menu)
menu.Credits:Dock(TOP)
menu.Credits:DockMargin(0, 0, 0, 4)
function menu.Credits:Paint(w, h)
surface.SetFont("RobotoHUD-25")
local t = GAMEMODE.Name or ""
local tw,th = surface.GetTextSize(t)
draw.ShadowText("Prop Hunt - 420 BlazeIt Gaming", "RobotoHUD-25", 0, 0, Color(33, 130, 0), 0)
end
function menu.Credits:PerformLayout()
surface.SetFont("RobotoHUD-25")
local w,h = surface.GetTextSize(GAMEMODE.Name or "")
self:SetTall(h)
end
local bottom = vgui.Create("DPanel", menu)
bottom:SetTall(draw.GetFontHeight("RobotoHUD-15") * 1.3)
bottom:Dock(BOTTOM)
bottom:DockMargin(0, 8, 0, 0)
surface.SetFont("RobotoHUD-15")
local tw, th = surface.GetTextSize("Spectate")
function bottom:Paint(w, h)
local c
local rr
for k, ply in pairs(team.GetPlayers(1)) do
if c then
c = c .. ", " .. ply:Nick()
else
c = ply:Nick()
end
end
if c then
draw.ShadowText(c, "RobotoHUD-10", tw + 8 + 4, h / 2, color_white, 0, 1)
end
end
local but = vgui.Create("DButton", bottom)
but:Dock(LEFT)
but:SetText("")
but:DockMargin(0, 0, 4, 0)
but:SetWide(tw + 8)
function but:Paint(w, h)
local col = Color(90, 90, 90, 160)
local colt = Color(190, 190, 190)
if self:IsDown() then
colMul(colt, 0.5)
elseif self:IsHovered() then
colMul(colt, 1.2)
end
draw.RoundedBox(4, 0, 0, w, h, col)
draw.ShadowText("Spectate", "RobotoHUD-15", w / 2, h / 2, colt, 1, 1)
end
function but:DoClick()
RunConsoleCommand("car_jointeam", 1)
end
local main = vgui.Create("DPanel", menu)
main:Dock(FILL)
function main:Paint(w, h)
surface.SetDrawColor(40,40,40,230)
-- surface.DrawRect(0, 0, w, h)
end
menu.CopsList = makeTeamList(main, 2)
menu.CopsList:Dock(LEFT)
menu.CopsList:DockMargin(0, 0, 8, 0)
menu.RobbersList = makeTeamList(main, 3)
menu.RobbersList:Dock(FILL)
end
end
function GM:ScoreboardHide()
if GAMEMODE.GameState == 3 then
menu:Close()
return
end
if IsValid(menu) then
menu:Close()
end
end
function GM:HUDDrawScoreBoard()
end
function GM:DoScoreboardActionPopup(ply)
local actions = DermaMenu()
if ply:IsAdmin() then
local admin = actions:AddOption("Is an Admin")
admin:SetIcon("icon16/shield.png")
end
if ply != LocalPlayer() then
local t = "Mute"
if ply:IsMuted() then
t = "Unmute"
end
local mute = actions:AddOption( t )
mute:SetIcon("icon16/sound_mute.png")
function mute:DoClick()
if IsValid(ply) then
ply:SetMuted(!ply:IsMuted())
end
end
end
if IsValid(LocalPlayer()) && LocalPlayer():IsAdmin() then
actions:AddSpacer()
if ply:Team() == 2 then
-- if ply:Alive() then
-- local specateThem = actions:AddOption( "Spectate" )
-- specateThem:SetIcon( "icon16/status_online.png" )
-- function specateThem:DoClick()
-- RunConsoleCommand("mu_spectate", ply:EntIndex())
-- end
-- end
end
end
actions:Open()
end
