Автоматическое изменение Приветствия хаба (мода), Можно ли реализовать такой скрипт ?

sPath1 = Core.GetPtokaXPath().."texts/Motd1.txt"
sPath2 = Core.GetPtokaXPath().."texts/Motd2.txt"
sPath3 = Core.GetPtokaXPath().."texts/Motd3.txt"

local s1,s2,s3,s4 = "$UserCommand 1 3 ","$UserCommand 0 2|","$<%[mynick]> ","||"
local bot = SetMan.GetString(21)
function OnStartup()
    t1=GetFile(sPath1)
    t2=GetFile(sPath2)
    t3=GetFile(sPath3)
end

function UserConnected(user)
    if (user.iProfile == -1) then
        Core.SendToUser(user,"<"..bot.."> "..t1)
        Core.SendToUser(user,s1.."Правила для UnReg"..s3.."!Motd1"..s4)
    elseif (user.iProfile == 3) then
        Core.SendToUser(user,"<"..bot.."> "..t2)
        Core.SendToUser(user,s1.."Правила для Reg"..s3.."!Motd2"..s4)
    elseif (user.iProfile == 2) then
        Core.SendToUser(user,"<"..bot.."> "..t3)
        Core.SendToUser(user,s1.."Правила для VIP"..s3.."!Motd3"..s4)
    end
end

RegConnected=UserConnected

function GetFile(file)
    local f = io.open(file, "r")
    local message = f:read("*all")
    f:close()
    return message
end