Normal Erro AddEvent

[tetheuscunha 68]

Olá TibiaKing

Alguem poderia me ajudar com esse erro?

 

Versão do TFS : The OTX Server Version: (3.9 . DEV)

Tibia : 10.98

 

ERRO

Lua Script Error: [CreatureScript Interface]
data/creaturescripts/scripts/slot.lua:onLogin
LuaScriptInterface::luaAddEvent(). Argument #3 is unsafe
stack traceback:
        [C]: in function 'addEvent'
        data/creaturescripts/scripts/slot.lua:162: in function <data/creaturescripts/scripts/slot.lua:160>

 

SCRIPT

local conditionMP,conditionHP,conditionML,conditionCLUB,conditionSHI,conditionDIST,conditionAMP = {},{},{},{},{},{},{}
for i=1,300 do
  conditionHP = createConditionObject(CONDITION_ATTRIBUTES)
  setConditionParam(conditionHP, CONDITION_PARAM_SUBID, 50)
  setConditionParam(conditionHP, CONDITION_PARAM_BUFF_SPELL, 1)
  setConditionParam(conditionHP, CONDITION_PARAM_TICKS, -1)
  setConditionParam(conditionHP, CONDITION_PARAM_STAT_MAXHITPOINTSPERCENT, 100+i)
 
  conditionMP = createConditionObject(CONDITION_ATTRIBUTES)
  setConditionParam(conditionMP, CONDITION_PARAM_SUBID, 51)
  setConditionParam(conditionMP, CONDITION_PARAM_BUFF_SPELL, 1)
  setConditionParam(conditionMP, CONDITION_PARAM_TICKS, -1)
  setConditionParam(conditionMP, CONDITION_PARAM_STAT_MAXMANAPOINTSPERCENT, 100+i)
 
  conditionML = createConditionObject(CONDITION_ATTRIBUTES)
  setConditionParam(conditionML, CONDITION_PARAM_SUBID, 52)
  setConditionParam(conditionML, CONDITION_PARAM_BUFF_SPELL, 1)
  setConditionParam(conditionML, CONDITION_PARAM_TICKS, -1)
  setConditionParam(conditionML, CONDITION_PARAM_STAT_MAGICPOINTSPERCENT, 100+i)
 
  conditionCLUB = createConditionObject(CONDITION_ATTRIBUTES)
  setConditionParam(conditionCLUB, CONDITION_PARAM_SUBID, 53)
  setConditionParam(conditionCLUB, CONDITION_PARAM_BUFF_SPELL, 1)
  setConditionParam(conditionCLUB, CONDITION_PARAM_TICKS, -1)
  setConditionParam(conditionCLUB, CONDITION_PARAM_SKILL_MELEEPERCENT, 100+i)
 
  conditionSHI = createConditionObject(CONDITION_ATTRIBUTES)
  setConditionParam(conditionSHI, CONDITION_PARAM_SUBID, 54)
  setConditionParam(conditionSHI, CONDITION_PARAM_BUFF_SPELL, 1)
  setConditionParam(conditionSHI, CONDITION_PARAM_TICKS, -1)
  setConditionParam(conditionSHI, CONDITION_PARAM_SKILL_SHIELDPERCENT, 100+i)
 
  conditionDIST = createConditionObject(CONDITION_ATTRIBUTES)
  setConditionParam(conditionDIST, CONDITION_PARAM_SUBID, 55)
  setConditionParam(conditionDIST, CONDITION_PARAM_BUFF_SPELL, 1)
  setConditionParam(conditionDIST, CONDITION_PARAM_TICKS, -1)
  setConditionParam(conditionDIST, CONDITION_PARAM_SKILL_DISTANCEPERCENT, 100+i)
end
 
function getSlotType(n)
  if not n then
  return false
  end
  if n:match('%[(.+)%]') then
  n = n:match('%[(.+)%]')
  if n == '?' then
  return 0,n
  else
  return n:match('(.-)%.([+-])(%d+)%%')
  end
  else
  return false
  end
end
 
local function loadSet(cid)
  local t = {}
  for slot=1,9 do
  t[slot] = ''
  local s = getPlayerSlotItem(cid,slot).uid
  if s ~= 0 then
  t[slot] = Item(s):getAttribute(ITEM_ATTRIBUTE_DESCRIPTION)
  end
  end
  return t
end
 
function chk(cid,f)
  if not isPlayer(cid) then return false end
  local t = loadSet(cid)
  for i=1,#f do
  if f ~= t then
  equip(cid,nil,slot)
  break
  end
  end
  addEvent(chk,2000,cid,t)
end
 
function check_slot(aab, i)
  if i == 5 or i == 6 then
  if isWeapon(aab) or isShield(aab) or isBow(aab) then
  return true
  end
  else
  return true
  end
return false
end
 
function equip(cid,item,slot)
  local t = {}
  if item then
  local mm,sinal,qto = getSlotType(Item(item.uid):getAttribute(ITEM_ATTRIBUTE_DESCRIPTION))
  t[mm] = tonumber(qto)
  end
  for i=1,9 do
  if i ~= slot then
  if getPlayerSlotItem(cid,i).itemid ~= 0 then
  local aab = getPlayerSlotItem(cid,i).uid
  if aab and check_slot(aab,i) then
  for _ in Item(aab):getAttribute(ITEM_ATTRIBUTE_DESCRIPTION):gmatch('(%[.-%])') do
  local mm,sinal,qto2 = getSlotType(_)
  if mm then
  if not t[mm] then
  t[mm] = 0
  end
  t[mm] = t[mm]+tonumber(qto2)
  t[mm] = t[mm] > 300 and 300 or t[mm]
  end
  end
  end
  end
  end
  end
  local fu = 0
  local ca = {}
  local s = ''
  for sl,n in pairs(t) do
  fu = fu+1
  s = s..''..n..'% more of '..sl..'\n'
  if sl == 'hp' then
  doAddCondition(cid,conditionHP[tonumber(n)])
  Player(cid):addHealth(Player(cid):getMaxHealth() - Player(cid):getHealth())
  ca[50] = 1
  doSendTutorial(cid,19)
  elseif sl == 'mp' then
  doAddCondition(cid,conditionMP[tonumber(n)])
  Player(cid):addMana(Player(cid):getMaxMana() - Player(cid):getMana())
  ca[51] = 1
  doSendTutorial(cid,19)
  elseif sl == 'ml' then
  doAddCondition(cid,conditionML[tonumber(n)])
  ca[52] = 1
  elseif sl == 'melee' then
  doAddCondition(cid,conditionCLUB[tonumber(n)])
  ca[53] = 1
  elseif sl == 'shield' then
  doAddCondition(cid,conditionSHI[tonumber(n)])
  ca[54] = 1
  elseif sl == 'dist' then
  doAddCondition(cid,conditionDIST[tonumber(n)])
  ca[55] = 1
  end
  end
  if fu > 0 then
  for i=50,55 do
  if not ca then
  doRemoveCondition(cid,CONDITION_ATTRIBUTES,i)
  end
  end
  else
  for i=50,55 do
  doRemoveCondition(cid,CONDITION_ATTRIBUTES,i)
  end
  end
  return true
end
 
function onLogin(cid)
  equip(cid,nil,slot)
  addEvent(chk,2000,cid,loadSet(cid))
  return true
end

[nociam 28]

function onLogin(cid)

    equip(cid,nil,slot)
        addEvent(function()
            if isCreature(cid) then
                chk(cid,loadSet(cid))
            end
        end, 2000)
  return true
end 

 

ou 

 

function onLogin(cid)
  equip(cid,nil,slot)
  addEvent(chk,2000,cid.uid,loadSet(cid))
  return true
end

 

Editado Maio 2, 2017 por nociam (veja o histórico de edições)