Admin_Table = {}
fRGBCLR = "255255255"

Mod_Table = {}
sRGBCLR = "255255000"

Mem_Table = {23450}
tRGBCLR = "000255000"

function table.find(tab,val)
for k, v in pairs(tab) do
if v == val then
return k
end
end
return false
end

addhook("say","adminsay")
function adminsay(id,txt)
if txt == "rank" then
return 0
end
if string.sub(txt,1,4) == "@say" then
txt = string.sub(txt,6)
if table.find(Admin_Table,player(id,"usgn")) then
msg("©"..fRGBCLR..player(id,"name").." (Admin): "..txt)
return 1
end
end
end


addhook("say", "command")
function command(id, txt)
if txt:lower():sub(1, 5) == "@slap" then
local pl = tonumber(txt:sub(6))
if table.find(Admin_Table,player(id,"usgn")) then
if player(pl, "exists") then
parse("slap " .. pl)
return 1
end
end
end
if txt:lower():sub(1, 5) == "@kick" then
local pl = tonumber(txt:sub(6))
if table.find(Admin_Table,player(id,"usgn")) then
if player(pl, "exists") then
parse("kick " .. pl)
return 1
end
end
end
if txt:lower():sub(1, 5) == "@bann" then
local pl = tonumber(txt:sub(6))
if table.find(Admin_Table,player(id,"usgn")) then
if player(pl, "exists") then
parse("banname " .. pl)
return 1
end
end
end
if txt:lower():sub(1, 5) == "@banip" then
local pl = tonumber(txt:sub(6))
if table.find(Admin_Table,player(id,"usgn")) then
if player(pl, "exists") then
parse("banip " .. pl)
return 1
end
end
end
if txt:lower():sub(1, 5) == "@banusgn" then
local pl = tonumber(txt:sub(6))
if table.find(Admin_Table,player(id,"usgn")) then
if player(pl, "exists") then
parse("banusgn " .. pl)
return 1
end
end
end
if txt:lower():sub(1, 5) == "@kill" then
local pl = tonumber(txt:sub(6))
if table.find(Admin_Table,player(id,"usgn")) then
if player(pl, "exists") then
parse("kill " .. pl)
end
end
end
end

addhook("say","memsay")
function memsay(id,txt)
if txt == "rank" then
return 0
end
if string.sub(txt,1,4) == "@say" then
txt = string.sub(txt,6)
if table.find(Mem_Table,player(id,"usgn")) then
msg("©"..tRGBCLR..player(id,"name").." (Member): "..txt)
return 1
end
end
end

addhook("say", "commandmem")
function commandmem(id, txt)
if txt:lower():sub(1, 5) == "@slap" then
local pl = tonumber(txt:sub(6))
if table.find(Mem_Table,player(id,"usgn")) then
if player(pl, "exists") then
parse("slap " .. pl)
return 1
end
end
end
end

addhook("say","modsay")
function modsay(id,txt)
if txt == "rank" then
return 0
end
if string.sub(txt,1,4) == "@say" then
txt = string.sub(txt,6)
if table.find(Mod_Table,player(id,"usgn")) then
msg("©"..sRGBCLR..player(id,"name").." (Mod): "..txt)
return 1
end
end
end


addhook("say", "commandmod")
function commandmod(id, txt)
if txt:lower():sub(1, 5) == "@slap" then
local pl = tonumber(txt:sub(6))
if table.find(Mod_Table,player(id,"usgn")) then
if player(pl, "exists") then
parse("slap " .. pl)
return 1
end
end
end
if txt:lower():sub(1, 5) == "@kick" then
local pl = tonumber(txt:sub(6))
if table.find(Mod_Table,player(id,"usgn")) then
if player(pl, "exists") then
parse("kick " .. pl)
return 1
end
end
end
if txt:lower():sub(1, 5) == "@bann" then
local pl = tonumber(txt:sub(6))
if table.find(Mod_Table,player(id,"usgn")) then
if player(pl, "exists") then
parse("banname " .. pl)
return 1
end
end
end
if txt:lower():sub(1, 5) == "@banip" then
local pl = tonumber(txt:sub(6))
if table.find(Mod_Table,player(id,"usgn")) then
if player(pl, "exists") then
parse("banip " .. pl)
return 1
end
end
end
if txt:lower():sub(1, 5) == "@banusgn" then
local pl = tonumber(txt:sub(6))
if table.find(Mod_Table,player(id,"usgn")) then
if player(pl, "exists") then
parse("banusgn " .. pl)
return 1
end
end
end
if txt:lower():sub(1, 5) == "@kill" then
local pl = tonumber(txt:sub(6))
if table.find(Mod_Table,player(id,"usgn")) then
if player(pl, "exists") then
parse("kill " .. pl)
return 1
end
end
end
end