Advertisement
Guest User

Untitled

a guest
Dec 11th, 2017
327
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 4.71 KB | None | 0 0
  1. isAdmin = false
  2. showLicenses = false
  3.  
  4. settings = {
  5. button = 10,
  6. forceShowGUIButtons = false,
  7. }
  8.  
  9. Citizen.CreateThread(function()
  10. local currentItemIndex = 1
  11. local selectedItemIndex = 1
  12.  
  13. WarMenu.CreateMenu('admin', 'Admin Menu')
  14. WarMenu.CreateSubMenu('kickplayers', 'admin', 'Kick Player')
  15. WarMenu.CreateSubMenu('banplayers', 'admin', 'Ban Player')
  16. WarMenu.CreateSubMenu('unbanplayers', 'admin', 'Unban Player')
  17. WarMenu.CreateSubMenu('spectateplayers', 'admin', 'Spectate Players')
  18. WarMenu.CreateSubMenu('teleporttoplayer', 'admin', 'Teleport to Player')
  19. WarMenu.CreateSubMenu('settings', 'admin', 'Settings')
  20. TriggerServerEvent("EasyAdmin:amiadmin")
  21.  
  22.  
  23.  
  24.  
  25. while true do
  26. if WarMenu.IsMenuOpened('admin') then
  27. if isAdmin == false then
  28. WarMenu.CloseMenu()
  29. elseif isAdmin == true then
  30. if (permissions.kick or settings.forceShowGUIButtons) and WarMenu.MenuButton('Kick Player', 'kickplayers') then
  31.  
  32. elseif (permissions.ban or settings.forceShowGUIButtons) and WarMenu.MenuButton('Ban Player', 'banplayers') then
  33.  
  34. elseif (permissions.spectate or settings.forceShowGUIButtons) and WarMenu.MenuButton('Spectate Player', 'spectateplayers') then
  35.  
  36. elseif (permissions.teleport or settings.forceShowGUIButtons) and WarMenu.MenuButton('Teleport to Player', 'teleporttoplayer') then
  37.  
  38. elseif (permissions.unban or settings.forceShowGUIButtons) and WarMenu.MenuButton('Unban Player', "unbanplayers") then
  39.  
  40. elseif WarMenu.MenuButton('Settings', "settings") then
  41.  
  42. elseif WarMenu.Button('Close') then
  43. WarMenu.CloseMenu()
  44. end
  45. end
  46. WarMenu.Display()
  47. elseif WarMenu.IsMenuOpened("kickplayers") then
  48.  
  49. for i,thePlayer in ipairs(players) do
  50. if WarMenu.MenuButton("["..GetPlayerServerId( thePlayer ).."] "..GetPlayerName( thePlayer ), 'kickplayers') then
  51.  
  52. DisplayOnscreenKeyboard(1, "FMMC_KEY_TIP8", "", "", "", "", "", 128 + 1)
  53.  
  54. while UpdateOnscreenKeyboard() ~= 1 and UpdateOnscreenKeyboard() ~= 2 do
  55. Citizen.Wait( 0 )
  56. end
  57.  
  58. local result = GetOnscreenKeyboardResult()
  59.  
  60. if result then
  61. TriggerServerEvent("EasyAdmin:kickPlayer", GetPlayerServerId( thePlayer ), result)
  62. end
  63. end
  64. end
  65. WarMenu.Display()
  66.  
  67. elseif WarMenu.IsMenuOpened("banplayers") then
  68.  
  69. for i,thePlayer in ipairs(players) do
  70. if WarMenu.MenuButton("["..GetPlayerServerId( thePlayer ).."] "..GetPlayerName( thePlayer ), 'banplayers') then
  71. DisplayOnscreenKeyboard(1, "FMMC_KEY_TIP8", "", "", "", "", "", 128 + 1)
  72.  
  73. while UpdateOnscreenKeyboard() ~= 1 and UpdateOnscreenKeyboard() ~= 2 do
  74. Citizen.Wait( 0 )
  75. end
  76.  
  77. local result = GetOnscreenKeyboardResult()
  78.  
  79.  
  80. if result then
  81. TriggerServerEvent("EasyAdmin:banPlayer", GetPlayerServerId( thePlayer ), result)
  82. end
  83. end
  84. end
  85. WarMenu.Display()
  86.  
  87.  
  88. elseif WarMenu.IsMenuOpened("spectateplayers") then
  89.  
  90. for i,thePlayer in ipairs(players) do
  91. if WarMenu.MenuButton("["..GetPlayerServerId( thePlayer ).."] "..GetPlayerName( thePlayer ), 'spectateplayers') then
  92. TriggerServerEvent("EasyAdmin:requestSpectate",thePlayer)
  93. end
  94. end
  95. WarMenu.Display()
  96.  
  97. elseif WarMenu.IsMenuOpened("teleporttoplayer") then
  98.  
  99. for i,thePlayer in ipairs(players) do
  100. if WarMenu.MenuButton("["..GetPlayerServerId( thePlayer ).."] "..GetPlayerName( thePlayer ), 'teleporttoplayer') then
  101. local x,y,z = table.unpack(GetEntityCoords(GetPlayerPed(thePlayer),true))
  102. local heading = GetEntityHeading(GetPlayerPed(player))
  103. SetEntityCoords(PlayerPedId(), x,y,z,0,0,heading, false)
  104. end
  105. end
  106. WarMenu.Display()
  107.  
  108. elseif WarMenu.IsMenuOpened("unbanplayers") then
  109.  
  110. for i,theBanned in ipairs(banlist) do
  111. if showLicenses then
  112. if WarMenu.Button(theBanned) then
  113. TriggerServerEvent("EasyAdmin:unbanPlayer", theBanned)
  114. TriggerServerEvent("EasyAdmin:updateBanlist")
  115. Citizen.Trace("unbanning user")
  116. end
  117. else
  118. if WarMenu.Button(banlist.reasons[i]) then
  119. TriggerServerEvent("EasyAdmin:unbanPlayer", theBanned)
  120. Citizen.Trace("unbanning user")
  121. TriggerServerEvent("EasyAdmin:updateBanlist")
  122. end
  123. end
  124. end
  125. WarMenu.Display()
  126.  
  127. elseif WarMenu.IsMenuOpened("settings") then
  128. if showLicenses then
  129. sl = "Licenses"
  130. else
  131. sl = "Reasons"
  132. end
  133. if WarMenu.Button("Banlist: Show Licenses/Reasons", sl) then
  134. showLicenses = not showLicenses
  135. elseif WarMenu.Button('Refresh Banlist') then
  136. TriggerServerEvent("EasyAdmin:updateBanlist")
  137. elseif WarMenu.Button('Refresh Permissions') then
  138. TriggerServerEvent("amiadmin")
  139. end
  140.  
  141. WarMenu.Display()
  142.  
  143.  
  144.  
  145. elseif IsControlJustReleased(0,171) and isAdmin == true then --M by default
  146. WarMenu.OpenMenu('admin')
  147. end
  148.  
  149. Citizen.Wait(0)
  150. end
  151. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement