local PropertySheet,Frame,Panel,List,victim,KickButton

-- Creating the DFrame
Frame = vgui.Create("DFrame")
Frame:SetSize(ScrW()/2,ScrH()/2)
Frame:SetTitle("Admin UI")
Frame:Center()
Frame:SetBackgroundBlur(true)
Frame:SetDeleteOnClose(true)
Frame:MakePopup()

-- Creating the PropertySheet so it's easier to add more tabs later

PropertySheet = vgui.Create("DPropertySheet",Frame)
PropertySheet:SetPos(5,35)
PropertySheet:SetSize(ScrW()/2-10,ScrH()/2-50)

-- Creating a Panel

Panel = vgui.Create("DPanel",PropertySheet)
Panel:SetPaintBackground(false)
Panel:SetSize(ScrW()/2-40,ScrH()/2-100)

-- Creating a list of players

List = vgui.Create("DListView",Panel)
List:SetPos(5,5)
List:SetSize(Panel:GetWide()/2,Panel:GetTall()-15)
List:AddColumn("Player")

for k,v in pairs(player.GetAll()) do
List:AddLine(v:Nick())
end

List.OnRowSelected = function(panel, line)
victim = List:GetLine(line):GetValue(1)
end

-- Adding Buttons

KickButton = vgui.Create("DButton",Panel)
KickButton:SetPos(Panel:GetWide()/2+15,Panel:GetTall()/2 - 180)
KickButton:SetSize(Panel:GetWide()/2-15,30)
KickButton:SetText("Kick")
function KickButton:DoClick()
if victim then -- we better check than giving out errors!
LocalPlayer():ConCommand("spud_cmd kick "..victim:SteamID().."")
surface.PlaySound("common/wpn_select.wav")
else
LocalPlayer():ChatPrint("You have to choose a player to kick!") -- You can't kick /dev/null :D
end
end

-- Adding the Panel to the PropertySheet
PropertySheet:AddSheet("Main Functions",Panel,"",false,false,"Use the Main Admin Functions.")