Комманды И Текст, Помогите пожалуйста ;-)

hubscmd = "!hubs"
hubsfile = "texts/hubs.txt"

OpConnected = NewUserConnected



function ChatArrival(curUser,data)
    local data = string.sub(data,1,-2)
    local s,e,cmd =string.find(data, "%b<>%s+(%S+)")

    if cmd == hubscmd then
dofile(hubsfile)
curUser:SendPMtonickloadtext(hubsfile)
end

curUser:SendData("$UserCommand 1 2 Ваше меню\\Внутрисетевые хабы$<%[mynick]> "..hubscmd.." %[nick]|")

end

hubscmd = "!hubs"
hubsfile = "texts/hubs.txt"


function ChatArrival(curUser,data)
  local data = string.sub(data,1,-2)
  local s,e,cmd =string.find(data, "%b<>%s+(%S+)")

  if cmd == hubscmd then
    local h = io.open(frmHub:GetPtokaXLocation()..hubsfile)
    if h then
      curUser:SendPM("Bot", h:read"*a")
          h:flush()
          h:close()
    end
  end
end

function NewUserConnected(curUser)
  curUser:SendData("$UserCommand 1 2 Ваше меню\\Внутрисетевые хабы$<%[mynick]> "..hubscmd.." %[nick]&#*124;")
end

OpConnected = NewUserConnected

sBot = "Глывый бот хаба"

hubscmd = "!hubs"
hubsfile = "scripts/texts/hubs.txt"

sitecmd = "!sites"
sitesfile = "scripts/texts/sites.txt"


function ChatArrival(User,data)
  local data = string.sub(data,1,-2)
  local s,e,cmd =string.find(data, "%b<>%s+(%S+)")

  if cmd == hubscmd then
    local h = io.open(frmHub:GetPtokaXLocation()..hubsfile)
    if h then
      User:SendPM(""..sBot.."", h:read"*a")
          h:flush()
          h:close()
    end
    return 1
  end
if cmd == sitecmd then
    local h = io.open(frmHub:GetPtokaXLocation()..sitesfile)
    if h then
      User:SendPM(""..sBot.."", h:read"*a")
          h:flush()
          h:close()
    end
    return 1
  end
end

function NewUserConnected(User)
    User:SendData("$UserCommand 1 2 Ваше меню\\Внутрисетевые хабы$<%[mynick]> "..hubscmd.." %[nick]|")
    User:SendData("$UserCommand 1 2 Ваше меню\\Внутрисетевые сайты$<%[mynick]> "..sitecmd.." %[nick]|")
end

OpConnected = NewUserConnected