All pastes #423897 Raw Edit

Miscellany

public lua v1 · immutable
·published 2007-04-04 13:58 UTC
rendered paste body
if SERVER then        local function GiveSomeWeapons( ply, command, arguments )             ply:Give("pb_angel")         endconcommand.Add( "pb_angel", GiveSomeWeapons )        local function GiveDM4( ply, command, arguments )             ply:Give("pb_dm4")         endconcommand.Add( "pb_DM4", GiveDM4 )endif CLIENT then    local Window = nil    local function GMPBWeapons()     if ( Window ) then Window:SetVisible( true ) return end     Window = vgui.Create( "Frame" )    Window:SetName( "vgui_hello" )     local button = vgui.Create( "Button", Window, "Button4" )    button:SetActionFunction( GiveWeapon )    Window:LoadControlsFromFile( "resource/ui/gmpb_weapons.res" )    Window:SetKeyBoardInputEnabled( true )    Window:SetMouseInputEnabled( true )     Window:SetPos( (ScrW() - 400) / 2, ScrH() - 200 )    Window:SetVisible( true )endconcommand.Add( "gmpb_weapons", GMPBWeapons ) 	function GiveWeapon()            LocalPlayer():ConCommand("pb_angel\n")    end	function GiveDM4()            LocalPlayer():ConCommand("pb_dm4\n")    end	end