TopSeachMySQL, API2 | Топ поисков на хабе

con:execute(("INSERT INTO `SeachDate` (`id_Seach`, `date_Seach`, `category`) VALUES ((SELECT `id` FROM `TopSeach` WHERE Seach = '%s'),'%s','%s')"):format(sSeach,os.date("%Y-%m-%d"),iNumber))

local tExceptions = {    -- Слова исключения которые в топ заносится не будут
    ["xxx"] = 1,
    ["порно"] = 1,
    ["малолетки"] = 1,
    ["porn"] = 1,
    ["анал"] = 1,
    ["ххх"] = 1,
            ["porno"] = 1,
}

function SearchArrival(tUser, sData)
    sData = sData:sub(1,-2)
    local _,_,iNumber,sSeach = sData:find("$Search .-%s%u%p%u%p%d%p(%d+)%p(.*)")
    if iNumber and sSeach then
        sSeach = String2Lower(sSeach)
        sSeach = sSeach:gsub("%p", " ")
        local _,_,sTthseach = sSeach:find("^(%a%a%a)")
        if sTthseach ~= "tth" then
            if tExceptions[sSeach] ~= 1 then
                con:execute(("INSERT INTO `TopSeach` (`Seach`) VALUES ('%s')"):format(sSeach))
                con:execute(("UPDATE `TopSeach` SET `S%s` = `S%s` + 1 WHERE `Seach` = '%s'"):format(tostring(iNumber), tostring(iNumber), sSeach))
                con:execute(("INSERT INTO `SeachDate` (`id_Seach`, `date_Seach`, `category`) VALUES ((SELECT `id` FROM `TopSeach` WHERE Seach = '%s'),'%s','%s')"):format(sSeach,os.date("%Y-%m-%d"),iNumber))
            end    
        end    
    end
end

  local iNumber, sSeach = sData:match"$Search .-%s%u%p%u%p%d%p(%d+)%p(.*)"
  if iNumber then

Core.SendToAll(tostring(package.cpath))