Author Topic: Adding player ranks to Prop Hunt scoreboard  (Read 2395 times)

0 Members and 1 Guest are viewing this topic.

Offline smallo

  • Newbie
  • *
  • Posts: 2
  • Karma: -1
Adding player ranks to Prop Hunt scoreboard
« on: January 17, 2015, 03:35:31 PM »
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.

Code: [Select]
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

Offline smallo

  • Newbie
  • *
  • Posts: 2
  • Karma: -1
Re: Adding player ranks to Prop Hunt scoreboard
« Reply #1 on: January 19, 2015, 06:15:04 AM »
Or at least just the piece of code to grab a players rank

Offline JamminR

  • Ulysses Team Member
  • Hero Member
  • *****
  • Posts: 8096
  • Karma: 390
  • Sertafide Ulysses Jenius
    • Team Ulysses [ULib/ULX, other fine releases]
Re: Adding player ranks to Prop Hunt scoreboard
« Reply #2 on: January 19, 2015, 08:10:34 PM »
If you're using ULib, we added a nice function, GetUserGroup
"Though a program be but three lines long, someday it will have to be maintained." -- The Tao of Programming