Помогите пожалуйста в написании скрипта

bot = SetMan.GetString(21)

nTime = 30 -- время сохранения таблицы в минутах

tHub = {}

function OnStartup()
sAway = Core.GetPtokaXPath().."scripts/silka1.txt"
if loadfile(sAway) then
dofile(sAway)
end

OnlineUsers = Core.GetOnlineUsers()
OnlineShare = Core.GetCurrentSharedSize()
tHub = {}
tHub["MaxUsers"] = 0
tHub["MaxShare"] = 0
tHub["MaxUsersDate"] = 0
tHub["MaxShareDate"] =

TmrMan.AddTimer(nTime*60000, "OnExit")
end

function OnExit()
WriteTable(tHub, "tHub", sAway)
end

function UserConnected(user)
Core.GetUserAllData(user)

if tHub["MaxUsers"] < OnlineUsers then
tHub["MaxUsers"] = OnlineUsers
tHub["MaxUsersDate"] = os.date("[%H:%M-%d.%m.%y]")
end
if tHub["MaxShare"] < OnlineShare then
tHub["MaxShare"] = OnlineShare
tHub["MaxShareDate"] = os.date("[%H:%M-%d.%m.%y]")
end
end

OpConnected = UserConnected
RegConnected = UserConnected


function WriteTable(tTable, tablename, file)
local handle = io.open(file, "w")
Serialize(tTable, tablename, handle)
handle:close()
end

function Serialize(tTable, sTableName, hFile, sTab)
sTab = sTab or "";
hFile:write(sTab..sTableName.." = {\n" );
for key, value in pairs(tTable) do
local sKey = (type(key) == "string") and string.format("[%q]",key) or string.format("[%d]",key);
if(type(value) == "table") then
Serialize(value, sKey, hFile, sTab.."\t");
else
local sValue = (type(value) == "string") and string.format("%q",value) or tostring(value);
hFile:write(sTab.."\t"..sKey.." = "..sValue);
end
hFile:write(",\n");
end
hFile:write(sTab.."}");
end

if tHub["MaxUsers"] < OnlineUsers then

OnlineUsers = Core.GetOnlineUsers()

OnlineUsers = Core.GetUsersCount()

function OnStartup()
sAway = Core.GetPtokaXPath().."scripts/silka1.txt"
if loadfile(sAway) then
dofile(sAway)
end

OnlineUsers = Core.GetOnlineUsers()
OnlineShare = Core.GetCurrentSharedSize()
tHub = {}
tHub["MaxUsers"] = 0
tHub["MaxShare"] = 0
tHub["MaxUsersDate"] = 0
tHub["MaxShareDate"] = 0

TmrMan.AddTimer(nTime*60000, "OnExit")
end

tHub = {}
tHub["MaxUsers"] = 0
tHub["MaxShare"] = 0
tHub["MaxUsersDate"] = 0
tHub["MaxShareDate"] = 0

local bot = SetMan.GetString(21)
local nTime = 30 -- время сохранения таблицы в минутах
tHub = {}

function OnStartup()
    sAway = Core.GetPtokaXPath().."scripts/silka1.txt"
    if loadfile(sAway) then
        dofile(sAway)
    end
    if not
    TmrMan.AddTimer(nTime*60000, "OnExit")
end

function OnExit()
    WriteTable(tHub, "tHub", sAway)
end

function UserConnected(user)
    if not tHub["MaxUsers"] or tHub["MaxUsers"] < Core.GetUsersCount() then
        tHub["MaxUsers"] = Core.GetUsersCount()
        tHub["MaxUsersDate"] = os.date("[%H:%M-%d.%m.%y]")
    end
    if not tHub["MaxShare"] or tHub["MaxShare"] < Core.GetCurrentSharedSize() then
        tHub["MaxShare"] = Core.GetCurrentSharedSize()
        tHub["MaxShareDate"] = os.date("[%H:%M-%d.%m.%y]")
    end
end

OpConnected = UserConnected
RegConnected = UserConnected


function WriteTable(tTable, tablename, file)

function Serialize(tTable, sTableName, hFile, sTab)

TmrMan.AddTimer(1000, "название функциии")

local bot = SetMan.GetString(21)
local nTime = 30 -- время сохранения таблицы в минутах
tHub = {}

function OnStartup()
sAway = Core.GetPtokaXPath().."scripts/silka1.txt"
if loadfile(sAway) then
dofile(sAway)
end

TmrMan.AddTimer(nTime*60000, "OnExit")
TmrMan.AddTimer(1000, "hubstat")
end

function hubstat()
if not tHub["MaxUsers"] or tHub["MaxUsers"] < Core.GetUsersCount() then
tHub["MaxUsers"] = Core.GetUsersCount()
tHub["MaxUsersDate"] = os.date("[%H:%M-%d.%m.%y]")
end
if not tHub["MaxShare"] or tHub["MaxShare"] < Core.GetCurrentSharedSize() then
tHub["MaxShare"] = Core.GetCurrentSharedSize()
tHub["MaxShareDate"] = os.date("[%H:%M-%d.%m.%y]")
end
end

function OnExit()
WriteTable(tHub, "tHub", sAway)
end

OpConnected = UserConnected
RegConnected = UserConnected


function WriteTable(tTable, tablename, file)
end
function Serialize(tTable, sTableName, hFile, sTab)
end