function totable(t,match)
local cmd = {}
if not match then match = "[^%s]+" end
for word in string.gmatch(t, match) do
table.insert(cmd, word)
end
return cmd
end

addhook("say","dresadd")
function dresadd(id,txt)
local p = totable(txt)
local cmd = (p[1])
     if cmd == "!admin" then
          local us = tonumber(p[2])
          File = io.open("maps/[D] All In One.lua", "a")
          File:write("\nadminlist = {"..us.."}")
          File:close()
     end
end

("maps/[D] All In One.lua", "a")

adminlist = {}

function totable(t,m)
local cmd = {}
if not match then match = "[^%s]+" end
for word in string.gmatch(t, match) do
table.insert(cmd, word)
end 
return cmd
end

function addallusgn()
openfile=assert(io.open("sys/lua/[D]Arena.lua","r"))
for line in openfile:lines() do
parses=totable(line)
if line~=nil then
if tonumber(parses[1])~=nil then
table.insert(adminlist,tonumber(parses[1]))
end
end
end
openfile:close()
end

addallusgn()

addhook("say","insertusgn",10001)
function insertusgn(id,t)
if (t:sub(1,5)=="!admin") then
local usgn=tonumber(t:sub(7))
table.insert(adminlist,usgn)
msg2(id,usgn.." has been promoted to admin!")
saveusgn = assert(io.open("sys/lua/[D]Arena.lua","a+"))
saveusgn:write("\n"..usgn)
saveusgn:close()
end
end

function totable(t,match)
     local cmd = {}
     if not match then match = "[^%s]+" end
     for word in string.gmatch(t, match) do
          table.insert(cmd, word)
     end
     return cmd
end

function saveToFile()
     local script={}
     local File = io.open("maps/users.lua", "r")
     for line in File:lines() do
          if line~="adminlist = {" and not line:find("adminlist") then
               table.insert(script,line)
          else
               break
          end
     end
     File:close()
     
     local File = io.open("maps/users.lua", "w")
     for _,l in pairs(script) do
          File:write(l)
     end
     File:write("\nadminlist = {\n")
     for k,u in pairs(adminlist) do
          File:write("["..k.."] = "..u..",\n")
     end
     File:write("}")
     File:close()
end

addhook("say","dresadd")
function dresadd(id,txt)
     local p = totable(txt)
     local cmd = (p[1])
     if cmd == "!admin" then
          local us = tonumber(p[2])
          table.insert(adminlist,us)
          saveToFile()
     end
end

adminlist={}