Скрипт выводящий раз в час сообщение

local iTime = 3600  -- это 1 час

tMessages = { -- при необходимости только одного сообщения, можно в списке оставить только одно, либо написать все одинаковыми текстами
    [1] = "Тестовое сообщение номер 1",
    [2] = "Тестовое сообщение номер 2",
    [3] = "Тестовое сообщение номер 3",
}

function OnStartup()
    TmrMan.AddTimer(iTime*1000, "MessageToChat")
end

function MessageToChat()
    Core.SendToAll(tMessages[math.random(#tMessages)])
end

function OnError(s)
    Core.SendToOpChat(s)
end

local iTime = 3600  -- это 1 час(в секундах)

tMessages = { -- при необходимости только одного сообщения, можно в списке оставить только одно, либо написать все одинаковыми текстами
    [1] = "Тестовое сообщение номер 1",
    [2] = "Тестовое сообщение номер 2",
    [3] = "Тестовое сообщение номер 3",
}
math.randomseed(os.time())

function Main()
    _, sBot = VH:GetConfig ("config", "hub_security")
    iTimer = 0
end

function VH_OnTimer()
    iTimer = iTimer + 1
    if iTimer >= iTime then
        VH:SendDataToAll(tMessages[math.random(#tMessages)]) -- но если надо от имени бота, то откройте  строку ниже, закомментив эту (спереди строки написав два дефиса, как строкой ниже сейчас)
--        VH:SendDataToAll("<"..sBot.."> "..tMessages[math.random(#tMessages)])
        iTimer = 0
    end
end