Advertisement
Guest User

admmenu_p2.lua

a guest
Mar 21st, 2018
93
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.08 KB | None | 0 0
  1. --------------------------------------
  2. --- Multi-Purpose Menu
  3. --- Designed and Created by KONSOLEJR
  4. --------------------------------------
  5.  
  6. ----------------
  7. --- Server Side
  8. ----------------
  9.  
  10. function ulx.admpanel_p2( calling_ply, target_ply )
  11. ULib.clientRPC( target_ply, "ulx.admclient2" )
  12. end
  13.  
  14. local admpanel = ulx.command( "", "ulx admpanel_p2", ulx.admpanel_p2 )
  15. admpanel:defaultAccess( ULib.ACCESS_ADMIN )
  16. admpanel:help( "Opens the admin panel page 2." )
  17.  
  18. ----------------
  19. --- Client Side
  20. ----------------
  21. function ulx.admclient2( ply )
  22.  
  23. local Frame = vgui.Create( "DFrame" )
  24. Frame:SetSize(193,750)
  25. Frame:Center()
  26. Frame:SetTitle("Administration Menu: Page 2")
  27. Frame:SetVisible(true)
  28. Frame:SetDraggable(true)
  29. Frame:ShowCloseButton(true)
  30. Frame:MakePopup()
  31. Frame.Paint = function (self, w, h)
  32. draw.RoundedBox(0,0,0,w,h,(Color(0,0,0,255)))
  33. end
  34. -----------------
  35. --- Page Changer
  36. -----------------
  37. local gui = vgui.Create ("DButton", Frame)
  38. gui:SetPos(21,650)
  39. gui:SetSize(50,50)
  40. gui:SetText("<")
  41. gui:SetVisible(true)
  42. function gui:OnMousePressed()
  43. RunConsoleCommand( "ulx", "admpanel_p1" )
  44. Frame:SetVisible(false)
  45. end
  46.  
  47. local gui = vgui.Create ("DButton", Frame)
  48. gui:SetPos(121,650)
  49. gui:SetSize(50,50)
  50. gui:SetText(">")
  51. gui:SetVisible(true)
  52. function gui:OnMousePressed()
  53. RunConsoleCommand( "ulx", "admpanel_p2" )
  54. Frame:SetVisible(false)
  55. end
  56. -------------
  57. --- Commands
  58. -------------
  59.  
  60. local gui = vgui.Create ("DButton", Frame)
  61. gui:SetPos(21,50)
  62. gui:SetSize(150,50)
  63. gui:SetText("Reset the Map -CAUTION-")
  64. gui:SetVisible(true)
  65. function gui:OnMousePressed()
  66. RunConsoleCommand("ulx", "resetmap")
  67. Frame:SetVisible(false)
  68. end
  69.  
  70. local gui = vgui.Create ("DButton", Frame)
  71. gui:SetPos(21,150)
  72. gui:SetSize(150,50)
  73. gui:SetText("Restart the Server -CAUTION-")
  74. gui:SetVisible(true)
  75. function gui:OnMousePressed()
  76. LocalPlayer():ConCommand("ulx rcon _Restart")
  77. Frame:SetVisible(false)
  78. end
  79. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement