function GetNormalTime(s)
    s=tonumber(s) or 0
    local r=""
    if s>=31104000 then r=math.floor(s/31104000).." г. " s=math.fmod(s,31104000) end
    if s>=2592000 then r=r..math.floor(s/2592000).." мес. " s=math.fmod(s,2592000) end
    if s>=86400 then r=r..math.floor(s/86400).." д. " s=math.fmod(s,86400) end
    if s>=3600 then r=r..math.floor(s/3600).." ч. " s=math.fmod(s,3600) end
    if s>=60 then r=r..math.floor(s/60).." мин. " s=math.fmod(s,60) end
    return r..s.." сек."
end

function ConnectToMeArrival(tUser)
    if tUser.iProfile==-1 then
        Core.SendPmToUser(tUser, sBot, "*** "..tUser.sNick..", Cкачивание для незарегистрированных пользователей запрещены! Зарегистрируйтесь, пожалуйста!")
        return true
    end
end

    elseif tUser.iProfile == -1 then
        Core.SendPmToUser(tUser, sBot, "*** "..tUser.sNick..", Главный чат и приватные сообщения для незарегистрированных пользователей запрещены, сообщение не отправлено! Зарегистрируйтесь, пожалуйста!")
        return true
    end

{[-1] = false,[0] = true,[1] = true,[2] = false,[3] = false,[4] = true},

function addtofile(sUser, msg, tTable, tablename, file)
    local tDate = os.date("%d.%m.%Y %H:%M:%S")
    table.insert(tTable, tDate.."  "..sUser.sNick.."  "..msg)
    WriteFile(tTable, tablename, file)
end    

function delinfile(msg, tTable, tablename, file)
    msg = tonumber(msg)
    table.remove (tTable, msg)
    WriteFile(tTable, tablename, file)
end

["loadfile"] = function()
    local f,e = io.open(Core.GetPtokaXPath().."scripts/Hider/HiddenUsers.lst","r")
    if f then
    while 1 do
    line = f:read("*l")
    if line ==  nil then
    break
    end
    local s,e,InfoOne,InfoTwo = string.find(line, "(.+)$$$(.+)")
    if InfoOne ~= nil then
    sTable.Hiders[InfoOne]=InfoTwo
    end
    end
    f:close(f)
    else
    f,e = io.open(Core.GetPtokaXPath().."scripts/Hider/HiddenUsers.lst", "w" )
    f:write()
    f:close()
    end
    end,

["SaveTable"] = function()
    local f,e = io.open(Core.GetPtokaXPath().."scripts/Hider/HiddenUsers.lst", "w" )
    for aaa,bbb in pairs(sTable.Hiders) do
    f:write(aaa.."$$$"..bbb.."\n")
    end
    f:close()
    end,
}

function ChatArrival(tUser, sData)
  local cmd = sData:match"%b<>%s+(%S+).*|"
  if cmd == "!команда" then
    -- здесь вписываем то, что должно происходить по команде!
    return true
  end    
end

            local msg = "\r\n\t\tВы были забанены за несанкционированное использование аккаунта ОПератора хаба!"..
                "\r\n\t\tЕсли Вы действительно ОПератор хаба и просто сменили свой IP-адрес, то"..
                "\r\n\t\tСвяжитесь с администратором хаба: "..tSetup.Email
            Core.SendToUser(user, "<"..tSetup.Bot.."> "..msg)
                        Core.SendToOpChat("юзера с ип "..user.sIP.." забанило за несанкционированное использование аккаунта ОПератора хаба")
            Core.Disconnect(user)
            BanMan.BanIP(user.sIP, "Подделка ника администрации", tSetup.Bot, true)

Core.SendToUser(tUser, сообщение)

Core.SendPmToUser(tUser, имя_бота, сообщение)

function ShowHalloMessage(tUser)              
    Core.GetUserAllData(tUser)
    local sProfile = ""
    if CheckOwner(tUser) then
        sProfile = "Owner"
    else    
        sProfile = tProfiles[tUser.iProfile][4]
    end    
    local HalloText = loadtextfiles(sText.."hallo.txt");
    HalloText = string.gsub(HalloText, "%[USER%]", tUser.sNick)
    HalloText = string.gsub(HalloText, "%[IP%]", tUser.sIP)
    HalloText = string.gsub(HalloText, "%[HUB%]", SetMan.GetString(0))
    HalloText = string.gsub(HalloText, "%[BOTNAME%]", sBot)
    HalloText = string.gsub(HalloText, "%[USERA%]", Core.GetUsersCount()+1)
    HalloText = string.gsub(HalloText, "%[VERSION%]", "Ptokax "..Core.Version)
    HalloText = string.gsub(HalloText, "%[ACTUALPEAK%]", Core.GetActualUsersPeak())
    HalloText = string.gsub(HalloText, "%[MAXPEAK%]", tStat.MaxUsers)
    HalloText = string.gsub(HalloText, "%[MAXSHARA%]", GetNormalShare(tStat.MaxShara))
    HalloText = string.gsub(HalloText, "%[SHARKA%]", GetNormalShare(Core.GetCurrentSharedSize()+tUser.iShareSize))
    HalloText = string.gsub(HalloText, "%[SHARE%]", GetNormalShare(tUser.iShareSize))
    HalloText = string.gsub(HalloText, "%[MSGS%]", tUsers[tUser.sIP].Msg)
    HalloText = string.gsub(HalloText, "%[TIMES%]", GetNormalTime(tUsers[tUser.sIP].Time,1))
    HalloText = string.gsub(HalloText, "%[ROLE%]", sProfile)
    HalloText = string.gsub(HalloText, "%[SHARARECORD%]", GetNormalShare(tStat.MaxShara))
    HalloText = string.gsub(HalloText, "%[USERRECORD%]", tStat.MaxUsers)
    Core.SendToNick(tUser.sNick,HalloText)    
end

function loadtextfiles(filename)
    local message = ""
    local f = io.open( filename, "r" )
    if f then
        message=f:read("*all")
        message=string.gsub(message,"|","")
        message=string.gsub(message,"\n","\r\n")
        f:close()
    end
    return message
end

message=string.gsub(message,"\n","\r\n")

Core.SendToAll("<"..Bot.."> "..SetMan.GetMOTD())

sFile = Core.GetPtokaXPath().."scripts/папка/файл"

sFile = frmHub:GetPtokaXLocation().."scripts/папка/файл"

function ChatArrival(tUser, sData)
    sData = string.sub(sData,1,-2)
    local _,_,CmdMain = string.find(sData, "%b<>%s+(%S+)")
    if CmdMain == "!startAR"  then
        ...
    end
end