UltimatusVirsus

Untitled

Sep 5th, 2021
50
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.40 KB | None | 0 0
  1. HELP_COMMANDS = HELP_COMMANDS or {}
  2. HELP_COMMANDS.Commands = HELP_COMMANDS.Commands or {
  3. ["!addons"] = "Aqui esta el enlace de los addons del servidor: \nhttps://steamcommunity.com/sharedfiles/filedetails/?id=2587374901",
  4. ["!owner"] = "Link del owner del servidor: \nhttps://steamcommunity.com/id/vicentefelipechile/"
  5. }
  6.  
  7. HELP_COMMANDS.AccessGroups = {
  8. ["superadmin"] = true,
  9. }
  10.  
  11. concommand.Add("cmd_addcmd", function(ply, cmd, args)
  12. if not HELP_COMMANDS.AccessGroups[ply:GetUserGroup()] then return end
  13.  
  14. local newCommand = arg[1]
  15. local output = arg[2]
  16. HELP_COMMANDS.Commands[newCommand] = output
  17. HELP_COMMANDS.Save()
  18. ply:ChatPrint("Comando añadido con exito: " .. newCommand)
  19. end)
  20.  
  21. concommand.Add("cmd_removecmd", function(ply, cmd, args)
  22. if not HELP_COMMANDS.AccessGroups[ply:GetUserGroup()] then return end
  23.  
  24. local removeCommand = args[1]
  25. HELP_COMMANDS.Commands[removeCommand] = nil
  26. HELP_COMMANDS.Save()
  27. ply:ChatPrint("Comando removido con exito:" .. removeCommand)
  28. end)
  29.  
  30. concommand.Add("cmd_help", function(ply)
  31. print("Lista de comandos:\n\n- cmd_addcmd (Super Admin)\n- cmd_removecmd (Super Admin)\n- cmd_help\n- cmd_listcmd")
  32. end)
  33.  
  34. concommand.Add("cmd_listcmd", function(ply)
  35. for k,v in pairs(HELP_COMMANDS.Commands) do
  36. ply:ChatPrint("Comando: " .. k .. " Texto: " .. v)
  37. end
  38. end)
  39.  
  40. hook.Add("PlayerSay", "CheckHelpCommands", function(ply, text)
  41. local helpCommand = HELP_COMMANDS.Commands[string.lower(text)]
  42. if helpCommand then
  43. ply:ChatPrint(helpCommand)
  44. return ""
  45. end
  46. end)
  47.  
  48. local saveDir = "cmd_config"
  49. function HELP_COMMANDS.Save()
  50. if not file.Exists(saveDir, "DATA") then
  51. file.CreateDir(saveDir)
  52. end
  53. file.Write(saveDir .. "/cmds.txt", util.TableToJSON(HELP_COMMANDS.Commands, true))
  54. MsgC(Color(0,255,0), ("Comandos guardados con exito!\n"))
  55. end
  56.  
  57. function HELP_COMMANDS.Load()
  58. local data = file.Read(saveDir .. "/cmds.txt", "DATA")
  59. if not data then MsgC(Color(255,0,0), "No se encontro informacion guardada\n") return end
  60.  
  61. HELP_COMMANDS.Commands = util.JSONToTable(data)
  62. MsgC(Color(0,255,0), "Informacion cargada con exito\n")
  63. end
  64.  
  65. hook.Add("InitPostEntity", "LoadHelpCommandsData", function()
  66. HELP_COMMANDS.Load()
  67. end)
  68.  
  69. concommand.Add("cmd_load", function()
  70. HELP_COMMANDS.Load()
  71. end)
  72.  
  73. concommand.Add("cmd_save", function()
  74. HELP_COMMANDS.Save()
  75. end)
  76.  
  77. concommand.Add("cmd_reload", function()
  78. HELP_COMMANDS.Save()
  79. HELP_COMMANDS.Load()
  80. end)
Advertisement
Add Comment
Please, Sign In to add comment