[MOD] Skull system [LUA] [WAR SERVER]

<?xml version="1.0" encoding="ISO-8859-1"?>
<mod name="Skull System" version="1.0" author="Skyforever" contact="tibiaking.com" enabled="yes">
<config name="SkullC_func"><![CDATA[

function setSkullColor(cid)
local t = {
[{5,10}] = 1,
[{11,15}] = 2,
[{16,20}] = 3,
[{21,25}] = 4,
[{26,math.huge}] = 5
}
for var, ret in pairs(t) do
if getPlayerFrags(cid) >= var[1] and getPlayerFrags(cid) <= var[2] then
doCreatureSetSkullType(cid, ret)
end
end
end
function getPlayerFrags(cid)
local time = os.time()
local times = {today = (time - 86400), week = (time - (7 * 86400))}
local contents, result = {day = {}, week = {}, month = {}}, db.getResult("SELECT `pd`.`date`, `pd`.`level`, `p`.`name` FROM `player_killers` pk LEFT JOIN `killers` k ON `pk`.`kill_id` = `k`.`id` LEFT JOIN `player_deaths` pd ON `k`.`death_id` = `pd`.`id` LEFT JOIN `players` p ON `pd`.`player_id` = `p`.`id` WHERE `pk`.`player_id` = " .. getPlayerGUID(cid) .. " AND `k`.`unjustified` = 1 AND `pd`.`date` >= " .. (time - (30 * 86400)) .. " ORDER BY `pd`.`date` DESC")
if(result:getID() ~= -1) then
repeat
local content = {date = result:getDataInt("date")}
if(content.date > times.today) then
table.insert(contents.day, content)
elseif(content.date > times.week) then
table.insert(contents.week, content)
else
table.insert(contents.month, content)
end
until not result:next()
result:free()
end
local size = {day = table.maxn(contents.day),week = table.maxn(contents.week),month = table.maxn(contents.month)}
return size.day + size.week + size.month
end
]]></config>
<event type="login" name="SkullLogin" event="script"><![CDATA[
domodlib('SkullC_func')
function onLogin(cid)
registerCreatureEvent(cid, "ColorKill")
setSkullColor(cid)
return true
end]]></event>
<event type="kill" name="ColorKill" event="script"><![CDATA[
domodlib('SkullC_func')
function onKill(cid, target)
if isPlayer(cid) and isPlayer(target) then
doCreatureSetSkullType(target, 0)
addEvent(setSkullColor, 100, cid)
end
return true
end]]></event>
</mod>

dailyFragsToRedSkull = 10
weeklyFragsToRedSkull = 40
monthlyFragsToRedSkull = 90

dailyFragsToBlackSkull = 9999999
weeklyFragsToBlackSkull = 9999999
monthlyFragsToBlackSkull = 9999999

[13/8/2012 21:47:22] [13/8/2012 21:47:22] [Error - CreatureScript Interface] 
[13/8/2012 21:47:22] In a timer event called from: 
[13/8/2012 21:47:22] domodlib('SkullC_func')
[13/8/2012 21:47:22] function onKill(cid, target)
[13/8/2012 21:47:22] if isPlayer(cid) and isPlayer(target) then
[13/8/2012 21:47:22] doCreatureSetSkullType(target, 0)
[13/8/2012 21:47:22] addEvent(setSkullColor, 100, cid)
[13/8/2012 21:47:22] end
[13/8/2012 21:47:22] return true
[13/8/2012 21:47:22] end:onKill
[13/8/2012 21:47:22] Description: 
[13/8/2012 21:47:22] (internalGetPlayerInfo) Player not found when requesting player info #18

[13/8/2012 21:47:22] [Error - CreatureScript Interface] 
[13/8/2012 21:47:22] In a timer event called from: 
[13/8/2012 21:47:22] domodlib('SkullC_func')
[13/8/2012 21:47:22] function onKill(cid, target)
[13/8/2012 21:47:22] if isPlayer(cid) and isPlayer(target) then
[13/8/2012 21:47:22] doCreatureSetSkullType(target, 0)
[13/8/2012 21:47:22] addEvent(setSkullColor, 100, cid)
[13/8/2012 21:47:22] end
[13/8/2012 21:47:22] return true
[13/8/2012 21:47:22] end:onKill
[13/8/2012 21:47:22] Description: 
[13/8/2012 21:47:22] [string "..."]:19: attempt to concatenate a boolean value
[13/8/2012 21:47:22] stack traceback:
[13/8/2012 21:47:22] 	[string "..."]:19: in function 'getPlayerFrags'
[13/8/2012 21:47:22] 	[string "..."]:11: in function <[string "..."]:2>

if isPlayer(cid) and isPlayer(target) then
doCreatureSetSkullType(target, 0)
addEvent(setSkullColor, 1, cid)
end