• Need a bit of help with Chat Commands
    1 replies, posted
Hi so I have Derma Panel I made and i would like to open when i run a chat command. But i dont know how to do that all i have it set for now is a console command any help? Heres the code Code: if (SERVER) then util.AddNetworkString( "SetHimOnFire" ) net.Receive( "SetHimOnFire", function( len, ply ) ply:Ignite(10, 5) end ) util.AddNetworkString( "swag" ) net.Receive( "swag", function( len, ply ) ply:SetHealth( 100) timer.Simple( 0.1, function() PrintMessage( HUD_PRINTTALK, ply:Name() .. ", Your Health is now: " .. ply:Health() )end ) timer.Stop() end ) util.AddNetworkString( "armor" ) net.Receive( "armor", function( len, ply ) ply:SetArmor( 100) timer.Simple( 0.1, function() PrintMessage( HUD_PRINTTALK, ply:Name() .. ", Your Armor is now: " .. ply:Armor() )end ) timer.Stop() end ) util.AddNetworkString( "run" ) net.Receive( "run", function( len, ply, player ) ply:SetRunSpeed( 1000 ) timer.Simple( 0.1, function() PrintMessage( HUD_PRINTTALK, ply:Name() .. ", Is now Sanic" )end ) timer.Stop() end ) util.AddNetworkString( "norun" ) net.Receive( "norun", function( len, ply, player ) ply:SetRunSpeed( 250 ) timer.Simple( 0.1, function() PrintMessage( HUD_PRINTTALK, ply:Name() .. ", Is no longer Sanic" )end ) timer.Stop() end ) util.AddNetworkString( "budda" ) net.Receive( "budda", function( len, ply ) ply:SetHealth( 1 ) ply:GodEnable() timer.Simple( 0.1, function() PrintMessage( HUD_PRINTTALK, ply:Name() .. " You are Buddha'd!" )end ) timer.Stop() end ) util.AddNetworkString( "unbudda" ) net.Receive( "unbudda", function( len, ply ) ply:SetHealth( 100 ) ply:GodDisable() timer.Simple( 0.1, function() PrintMessage( HUD_PRINTTALK, ply:Name() .. " You are no longer Buddha'd!" )end ) timer.Stop() end ) util.AddNetworkString( "god" ) net.Receive( "god", function( len, ply ) ply:GodEnable() timer.Simple( 0.1, function() PrintMessage( HUD_PRINTTALK, ply:Name() .. " You are now Godded!" )end ) timer.Stop() end ) util.AddNetworkString( "money" ) net.Receive( "money", function( len, ply, calling_ply ) ply:setmoneyMoney( 20000 ) end ) util.AddNetworkString( "unarrest" ) net.Receive( "unarrest", function( len, ply ) ply:unArrest() end ) util.AddNetworkString( "ammo" ) net.Receive( "ammo", function( len, ply ) ply:GiveAmmo(99999, "ar2") ply:GiveAmmo(99999, "pistol") ply:GiveAmmo(99999, "buckshot") ply:GiveAmmo(99999, "357") ply:GiveAmmo(99999, "smg") ply:GiveAmmo(99999, "winchester") ply:GiveAmmo(99999, "sniper_rounds") ply:GiveAmmo(99999, "smg1") ply:GiveAmmo(99999, "SniperPenetratedRound") timer.Simple( 0.1, function() PrintMessage( HUD_PRINTTALK, ply:Name() .. ", Enabled Infinite Ammo" )end ) timer.Stop() end ) util.AddNetworkString( "unammo" ) net.Receive( "unammo", function( len, ply ) ply:SetAmmo(100, "ar2") ply:SetAmmo(100, "pistol") ply:SetAmmo(100, "buckshot") ply:SetAmmo(100, "357") ply:SetAmmo(100, "smg") ply:SetAmmo(100, "winchester") ply:SetAmmo(100, "sniper_rounds") ply:SetAmmo(100, "smg1") ply:GiveAmmo(100, "SniperPenetratedRound") timer.Simple( 0.1, function() PrintMessage( HUD_PRINTTALK, ply:Name() .. ", Disabled Infinite Ammo" )end ) timer.Stop() end ) util.AddNetworkString( "ungod" ) net.Receive( "ungod", function( len, ply ) ply:GodDisable() timer.Simple( 0.1, function() PrintMessage( HUD_PRINTTALK, ply:Name() .. " You are no longer Godded!" )end ) timer.Stop() end ) util.AddNetworkString( "fart" ) net.Receive( "fart", function( len, ply ) ply:Kill() timer.Simple( 10.2, function() PrintMessage( HUD_PRINTTALK, ply:Name() .. ", Your Health is now:" .. ply:Health() )end ) end ) end if (CLIENT) then local midW, midH = ScrW() / 2, ScrH() / 2 local function OpenRazor() local Panel = vgui.Create( "DFrame" ) Panel:SetSize( 650, 650 ) Panel:SetPos( midW - ( Panel:GetWide() / 2 ), midH - ( Panel:GetTall() / 2) ) Panel:SetTitle( "Razor Sharp DarkRP!" ) Panel:ShowCloseButton( true ) Panel:MakePopup() Panel:SetDraggable( false ) --Commands! local Lag = vgui.Create( "DButton", Panel ) Lag:SetPos( 140, 50 ) Lag:SetSize( 100, 25 ) Lag:SetText( "Tell server Lag" ) Lag.DoClick = function() RunConsoleCommand( "ulx", "rcon", "say [rainbow]LAG" ) Panel:Close() local ply = LocalPlayer() chat.AddText( Color( 0, 0, 255 ), "The server was told about the lag!" ) end --Close Button local MyButton = vgui.Create( "DButton", Panel ) MyButton:SetPos( 20, 50 ) MyButton:SetText("Burn Yourself") MyButton:SetSize(100, 25) MyButton.DoClick = function() net.Start( "SetHimOnFire" ) net.WriteEntity( LocalPlayer() ) net.SendToServer() Panel:Close() end local MyButton2 = vgui.Create( "DButton", Panel ) MyButton2:SetPos( 20, 90 ) MyButton2:SetText("Suicide") MyButton2:SetSize(100, 25) MyButton2.DoClick = function() net.Start( "fart" ) net.WriteEntity( LocalPlayer() ) net.SendToServer() Panel:Close() end local MyButton3 = vgui.Create( "DButton", Panel ) MyButton3:SetPos( 20, 130 ) MyButton3:SetText("Fill Your Health") MyButton3:SetSize(100, 25) MyButton3.DoClick = function() net.Start( "swag" ) net.WriteEntity( LocalPlayer() ) net.SendToServer() Panel:Close() end local MyButton4 = vgui.Create( "DButton", Panel ) MyButton4:SetPos( 20, 170 ) MyButton4:SetText("Infinite Ammo") MyButton4:SetSize(100, 25) MyButton4.DoClick = function() net.Start( "ammo" ) net.WriteEntity( LocalPlayer() ) net.SendToServer() Panel:Close() end local MyButton5 = vgui.Create( "DButton", Panel ) MyButton5:SetPos( 20, 210 ) MyButton5:SetText("God") MyButton5:SetSize(100, 25) MyButton5.DoClick = function() net.Start( "god" ) net.WriteEntity( LocalPlayer() ) net.SendToServer() Panel:Close() end local MyButton6 = vgui.Create( "DButton", Panel ) MyButton6:SetPos( 140, 210 ) MyButton6:SetText("UnGod") MyButton6:SetSize(100, 25) MyButton6.DoClick = function() net.Start( "ungod" ) net.WriteEntity( LocalPlayer() ) net.SendToServer() Panel:Close() end local MyButton7 = vgui.Create( "DButton", Panel ) MyButton7:SetPos( 275, 600 ) MyButton7:SetText("Close") MyButton7:SetSize(100, 25) MyButton7.DoClick = function() Panel:Close() end local MyButton8 = vgui.Create( "DButton", Panel ) MyButton8:SetPos( 140, 130) MyButton8:SetText("Fill Your armor") MyButton8:SetSize(100, 25) MyButton8.DoClick = function() net.Start( "armor" ) net.WriteEntity( LocalPlayer() ) net.SendToServer() Panel:Close() end local MyButton9 = vgui.Create( "DButton", Panel ) MyButton9:SetPos( 140, 170 ) MyButton9:SetText("Disable Inf Ammo") MyButton9:SetSize(100, 25) MyButton9.DoClick = function() net.Start( "unammo" ) net.WriteEntity( LocalPlayer() ) net.SendToServer() Panel:Close() end local MyButton10 = vgui.Create( "DButton", Panel ) MyButton10:SetPos( 140, 90 ) MyButton10:SetText("Sanic") MyButton10:SetSize(100, 25) MyButton10.DoClick = function() net.Start( "run" ) net.WriteEntity( LocalPlayer() ) net.SendToServer() Panel:Close() end local MyButton11 = vgui.Create( "DButton", Panel ) MyButton11:SetPos( 260, 90 ) MyButton11:SetText("No More Sanic") MyButton11:SetSize(100, 25) MyButton11.DoClick = function() net.Start( "norun" ) net.WriteEntity( LocalPlayer() ) net.SendToServer() Panel:Close() end local MyButton12 = vgui.Create( "DButton", Panel ) MyButton12:SetPos( 260, 130 ) MyButton12:SetText("Buddha") MyButton12:SetSize(100, 25) MyButton12.DoClick = function() net.Start( "budda" ) net.WriteEntity( LocalPlayer() ) net.SendToServer() Panel:Close() end local MyButton13 = vgui.Create( "DButton", Panel ) MyButton13:SetPos( 260, 170 ) MyButton13:SetText("Un Buddha") MyButton13:SetSize(100, 25) MyButton13.DoClick = function() net.Start( "unbudda" ) net.WriteEntity( LocalPlayer() ) net.SendToServer() Panel:Close() end local MyButton14 = vgui.Create( "DButton", Panel ) MyButton14:SetPos( 260, 50 ) MyButton14:SetText("Inf Money") MyButton14:SetSize(100, 25) MyButton14.DoClick = function() net.Start( "money" ) net.WriteEntity( LocalPlayer() ) net.SendToServer() end local MyButton15 = vgui.Create( "DButton", Panel ) MyButton15:SetPos( 260, 210 ) MyButton15:SetText("Unarrest Yourself") MyButton15:SetSize(100, 25) MyButton15.DoClick = function() net.Start( "unarrest" ) net.WriteEntity( LocalPlayer() ) net.SendToServer() Panel:Close() end local MyLabel = vgui.Create( "DLabel", Panel ) MyLabel:SetPos( 10, 630 ) MyLabel:SetText("Coded By:") local MyLabel2 = vgui.Create( "DLabel", Panel ) MyLabel2:SetPos( 65, 630 ) MyLabel2:SetText("Skater") Panel.Paint = function() draw.RoundedBox( 8, 0, 0, Panel:GetWide(), Panel:GetTall(), Color( 135, 209, 255, 150 ) ) end end concommand.Add( "rzr1050admin", OpenRazor ) hook.Add( 'PlayerSay', 'OpenRazor', function( ply, text ) text = string.lower( text ) if ( string.sub( text, 1, 10) == '!adminmenu') then end end) end --Derma_Message( "You have run the command: ", "Command Complete!", "Close" ) Thanks
Wrong section, post here instead: [url]http://facepunch.com/forumdisplay.php?f=65[/url] And you might wanna put your code in [noparse][code][/code][/noparse] tags to make it more readable.
Sorry, you need to Log In to post a reply to this thread.