Advertisement
vrondakis

Untitled

Mar 14th, 2016
52
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.91 KB | None | 0 0
  1. if(SERVER) then
  2. util.AddNetworkString("SpawnBarrelMate")
  3. net.Receive("SpawnBarrelMate", function(len,ply)
  4. if(IsValid(ply)) then
  5. local barrel = ents.Create("prop_physics")
  6. barrel:SetPos(ply:GetPos()+Vector(0,0,30))
  7. barrel:SetModel("models/props_c17/oildrum001_explosive.mdl")
  8. barrel:Spawn()
  9. barrel:Ignite(30)
  10. end
  11. end)
  12. end
  13. if(CLIENT) then
  14. local frame
  15. GM.ShowHelp = function()
  16. if(frame) then
  17. frame:SetVisible(true)
  18. else
  19. frame = vgui.Create("DFrame")
  20. frame:SetSize(500,500)
  21. frame:Center()
  22.  
  23. local button = vgui.Create("DButton")
  24. button:SetSize(300, 50)
  25. button:SetPos(500/2-(300/2), 500/2-(50/2))
  26. button:SetText("Press me for free pussy")
  27. button.DoClick = function()
  28. net.Start("SpawnBarrelMate")
  29. net.SendToServer()
  30.  
  31. frame:SetVisible(false)
  32.  
  33. chat.AddText(Color(100,100,255,255), LocalPlayer(), "u stupid fuck")
  34. end
  35. end
  36. end
  37. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement