API tools faq
paste
OfficialSmudge

Longest

OfficialSmudge
Mar 27th, 2015
308
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 7.49 KB | None | 0 0
raw download clone embed print report
  1. local SettingsButtons = { { "Set Name", function() local DermaPanel = vgui.Create( "DFrame" ) DermaPanel:SetPos((ScrW() / 2) - 130, (ScrH() / 2) - 200) DermaPanel:SetSize(260, 70) DermaPanel:SetDraggable(false) DermaPanel:SetTitle("Press enter to set name") DermaPanel:ShowCloseButton(true) DermaPanel:MakePopup() local nameentry = vgui.Create("DTextEntry", DermaPanel) nameentry:SetAllowNonAsciiCharacters(true) nameentry:SetValue(LocalPlayer():getDarkRPVar("name") or "") nameentry:SetSize(240, 32) nameentry:SetPos(10, 30) nameentry.OnEnter = function() LocalPlayer():ConCommand('say "/name ' .. nameentry:GetValue() .. '"') Msg("Name set") DermaPanel:Remove() end end, function(ply) return true end}, {"Custom Job", function() local DermaPanel = vgui.Create( "DFrame" ) DermaPanel:SetPos((ScrW() / 2) - 130, (ScrH() / 2) - 200) DermaPanel:SetSize(260, 70) DermaPanel:SetDraggable(false) DermaPanel:SetTitle("Press enter to set name") DermaPanel:ShowCloseButton(true) DermaPanel:MakePopup() local Jobentry = vgui.Create("DTextEntry", DermaPanel) Jobentry:SetAllowNonAsciiCharacters(true) Jobentry:SetValue(LocalPlayer():getDarkRPVar("job") or "") Jobentry:SetSize(240, 32) Jobentry:SetPos(10, 30) Jobentry.OnEnter = function() LocalPlayer():ConCommand('say "/job ' .. Jobentry:GetValue() .. '"') Msg("Job set") DermaPanel:Remove() end end, function(ply) return true end}, {"Drop Money", function() local DermaPanel = vgui.Create( "DFrame" ) DermaPanel:SetPos((ScrW() / 2) - 130, (ScrH() / 2) - 200) DermaPanel:SetSize(260, 70) DermaPanel:SetDraggable(false) DermaPanel:SetTitle("Press enter to drop money") DermaPanel:ShowCloseButton(true) DermaPanel:MakePopup() local Dropentry = vgui.Create("DTextEntry", DermaPanel) Dropentry:SetAllowNonAsciiCharacters(true) Dropentry:SetValue(500) Dropentry:SetSize(240, 32) Dropentry:SetPos(10, 30) Dropentry.OnEnter = function()  LocalPlayer():ConCommand('say "/dropmoney ' .. Dropentry:GetValue() .. '"') Msg("Drop command ran") DermaPanel:Remove() end end, function(ply) return true end}, {"Set Agenda", function() local DermaPanel = vgui.Create( "DFrame" ) DermaPanel:SetPos((ScrW() / 2) - 130, (ScrH() / 2) - 200) DermaPanel:SetSize(260, 70) DermaPanel:SetDraggable(false) DermaPanel:SetTitle("Press enter to set agenda") DermaPanel:ShowCloseButton(true) DermaPanel:MakePopup() local Agendaentry = vgui.Create("DTextEntry", DermaPanel) Agendaentry:SetAllowNonAsciiCharacters(true) Agendaentry:SetValue(LocalPlayer():getDarkRPVar("agenda") or "") Agendaentry:SetSize(240, 32) Agendaentry:SetPos(10, 30) Agendaentry.OnEnter = function() LocalPlayer():ConCommand('say "/agenda ' .. Agendaentry:GetValue() .. '"') Msg("Agenda set") DermaPanel:Remove() end end, function(ply) if DarkRPAgendas[ply:Team()] == nil then return false else return true end end}, {"Sell all doors", function() local DermaPanel = vgui.Create( "DFrame" ) DermaPanel:SetPos((ScrW() / 2) - 130, (ScrH() / 2) - 200) DermaPanel:SetSize(260, 70) DermaPanel:SetDraggable(false) DermaPanel:SetTitle("Type 'confirm' to sell all door") DermaPanel:ShowCloseButton(true) DermaPanel:MakePopup() local Dropentry = vgui.Create("DTextEntry", DermaPanel) Dropentry:SetAllowNonAsciiCharacters(true) Dropentry:SetValue("deny") Dropentry:SetSize(240, 32) Dropentry:SetPos(10, 30) Dropentry.OnEnter = function() if Dropentry:GetText() == "confirm" then LocalPlayer():ConCommand('say "/unownalldoors"') DermaPanel:Remove() end if Dropentry:GetText() == "deny" then DermaPanel:Remove() end end end, function(ply) return true end}, {"Set Background Color", function() local DermaPanel = vgui.Create( "DFrame" ) DermaPanel:SetPos((ScrW() / 2) - 130, (ScrH() / 2) - 200) DermaPanel:SetSize(260, 300) DermaPanel:SetDraggable(false) DermaPanel:SetTitle("Choose color") DermaPanel:ShowCloseButton(true) DermaPanel:MakePopup() local color = vgui.Create( "DColorMixer", DermaPanel) color:SetSize( 240, 200) color:SetPos( 10, 32 ) color:SetColor(Color(math.random(255),math.random(255),math.random(255),math.random(255))) local button = vgui.Create( "DButton", DermaPanel ) button:SetSize( 240, 20 ) button:SetPos( 10, 250 ) button:SetText( "Set Color" ) button.DoClick = function( button ) local r = color:GetColor().r local g = color:GetColor().g local b = color:GetColor().b PhoneBackgroundColor = Color(r,g,b,255) end local tbutton = vgui.Create( "DButton", DermaPanel ) tbutton:SetSize( 240, 20 ) tbutton:SetPos( 10, 275 ) tbutton:SetText( "Default" ) tbutton.DoClick = function( tbutton ) PhoneBackgroundColor = Color( 25, 25, 25, 255 ) end end, function(ply) return true end}, {"Drop Weapon", function() LocalPlayer():ConCommand('say "/dropweapon"') end, function(ply) return true end}, {"Place Laws", function() LocalPlayer():ConCommand('say "/placelaws"') end, function(ply) if RPExtraTeams[ply:Team()].mayor then return true end end}, {"Add Law", function() local DermaPanel = vgui.Create( "DFrame" ) DermaPanel:SetPos((ScrW() / 2) - 130, (ScrH() / 2) - 200) DermaPanel:SetSize(260, 70) DermaPanel:SetDraggable(false) DermaPanel:SetTitle("Press enter to add law") DermaPanel:ShowCloseButton(true) DermaPanel:MakePopup() local Agendaentry = vgui.Create("DTextEntry", DermaPanel) Agendaentry:SetAllowNonAsciiCharacters(true) Agendaentry:SetSize(240, 32) Agendaentry:SetPos(10, 30) Agendaentry.OnEnter = function() LocalPlayer():ConCommand('say "/addlaw ' .. Agendaentry:GetValue() .. '"') Msg("Agenda set") DermaPanel:Remove() end end, function(ply) if RPExtraTeams[ply:Team()].mayor then return true end end}, {"Remove Law", function() local DermaPanel = vgui.Create( "DFrame" ) DermaPanel:SetPos((ScrW() / 2) - 130, (ScrH() / 2) - 200) DermaPanel:SetSize(260, 70) DermaPanel:SetDraggable(false) DermaPanel:SetTitle("Press enter to remove law number") DermaPanel:ShowCloseButton(true) DermaPanel:MakePopup() local Agendaentry = vgui.Create("DTextEntry", DermaPanel) Agendaentry:SetAllowNonAsciiCharacters(true) Agendaentry:SetSize(240, 32) Agendaentry:SetPos(10, 30) Agendaentry.OnEnter = function() LocalPlayer():ConCommand('say "/removelaw ' .. Agendaentry:GetValue() .. '"') Msg("Agenda set") DermaPanel:Remove() end end, function(ply) if RPExtraTeams[ply:Team()].mayor then return true end end}, {"Make wanted", function() local DermaPanel = vgui.Create( "DFrame" ) DermaPanel:SetPos((ScrW() / 2) - 130, (ScrH() / 2) - 200) DermaPanel:SetSize(260, 70) DermaPanel:SetDraggable(false) DermaPanel:SetTitle("Press enter to make wanted") DermaPanel:ShowCloseButton(true) DermaPanel:MakePopup() local Agendaentry = vgui.Create("DTextEntry", DermaPanel) Agendaentry:SetAllowNonAsciiCharacters(true) Agendaentry:SetSize(240, 32) Agendaentry:SetPos(10, 30) Agendaentry.OnEnter = function() LocalPlayer():ConCommand('say "/wanted ' .. "" .. Agendaentry:GetValue() .. " " .. Agendaentry:GetValue() .. "" .. '"') Msg("Agenda set") DermaPanel:Remove() end end, function (ply) if GAMEMODE.CivilProtection[ply:Team()] then return true end end}, {"Make warrant", function() local DermaPanel = vgui.Create( "DFrame" ) DermaPanel:SetPos((ScrW() / 2) - 130, (ScrH() / 2) - 200) DermaPanel:SetSize(260, 70) DermaPanel:SetDraggable(false) DermaPanel:SetTitle("Press enter to make wanted") DermaPanel:ShowCloseButton(true) DermaPanel:MakePopup() local Agendaentry = vgui.Create("DTextEntry", DermaPanel) Agendaentry:SetAllowNonAsciiCharacters(true) Agendaentry:SetSize(240, 32) Agendaentry:SetPos(10, 30) Agendaentry.OnEnter = function() LocalPlayer():ConCommand('say "/warrant ' .. "" .. Agendaentry:GetValue() .. " " .. Agendaentry:GetValue() .. "" .. '"') Msg("Agenda set") DermaPanel:Remove() end end, function (ply) if GAMEMODE.CivilProtection[ply:Team()] then return true end end} }
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!