Помогите Со Скриптом

Prefixes = {}
function ChatArrival(user,data)
local data = string.sub(data,1,-2)
local s,e,cmd =string.find(data, "%b<>%s+(%S+)")
who = user
if cmd == "!status" then
StatusCheck()
str = "В данный момент на хабе присутствуют следующие комманды (просмотр по префиксам)\n"..string.rep("=",50)..""
for i,ct in pairs(Prefixes) do str = str.."\n= "..ct end
user:SendData(""..str.."\n"..string.rep("=",50).."")
return 1
end
end

StatusCheck = function()
FClan = 0
npc = 0
npt = 0
for i,user in pairs(frmHub:GetOnlineUsers()) do
local _,_,pf,nname = string.find(user.sName, "%[(.-)%]+(.*)")
for x,c in pairs(Prefixes) do
if c == pf then no = 1 end
end
if not (no == 1) then Prefixes[i] = pf end
end
end

NewUserConnected = function(user)
user:SendData("$UserCommand 1 2 Опции пользователя\\Информация\\Комманды онлайн$<%[mynick]> !status||")
end
OpConnected = NewUserConnected

function ChatArrival(tUser,sData)
sData=sData:sub(1,-2)
local _,_,sCmd=sData:find("%b<>%s+(%S+)")
if sCmd=="!status" then
StatusCheck()
local sStr="В данный момент на хабе присутствуют следующие команды (просмотр по префиксам)\n"..string.rep("=",50)
for i,v in pairs(tPrefixes) do sStr=sStr.."\n\t["..i.."], ник(и): "..table.concat(v,", ") end
tUser:SendData(sStr.."\n"..string.rep("=",50))
return 1
end
end

StatusCheck=function()
tPrefixes={}
for i,v in pairs(frmHub:GetOnlineUsers()) do
local bFlag,_,_,sPrf,sNick=true,v.sName:find("%[(.-)%]+(.*)")
if sPrf and sNick then
for j,w in pairs(tPrefixes) do
if w==sPrf then bFlag=false break end
end
if bFlag then tPrefixes[sPrf]={sNick}
else table.insert(tPrefixes[sPrf],sNick) end
end
end
end

NewUserConnected=function(tUser)
tUser:SendData("$UserCommand 1 2 Опции пользователя\\Информация\\Команды онлайн$<%[mynick]> !status&#*124;")
end
OpConnected=NewUserConnected

tTab={
  "FClan",
  "(Hoolig@n_Clan)",
  "(PROteam)",
  "FVF"
}

function ChatArrival(tUser,sData)
  sDate=sDate:sub(tUser.sName:len()+4,-2)
  if sDate=="!status" then
    tUser:SendData("\n\t"..table.concat(tTab,",\n\t"))
  end
end