Sobre a formula é só vc alterar os numeros..obviamente q se aumentalos hitará mais a cada Magic Level..setAttackFormula(combat, COMBAT_FORMULA_LEVELMAGIC, MInA,MinB, MaxA,MaxB)
Agora sua Spell(PS:N testei)
local TEMPO_PARA_REMOVER = 5 * 1000 -- em ms, 5 * 1000 = 5 segundoslocal EFFECT_AO_REMOVER = CONST_ME_POFF -- efeito que aparece ao remover os itens
local combat1 = createCombatObject()
setCombatParam(combat1, COMBAT_PARAM_CREATEITEM, 9612)
local combat2 = createCombatObject()
setCombatParam(combat2, COMBAT_PARAM_CREATEITEM, 9611)
local combat3 = createCombatObject()
setCombatParam(combat3, COMBAT_PARAM_CREATEITEM, 9619)
local combat4 = createCombatObject()
setCombatParam(combat4, COMBAT_PARAM_CREATEITEM, 9618)
local combat5 = createCombatObject()
setCombatParam(combat5, COMBAT_PARAM_CREATEITEM, 9617)
local combat6 = createCombatObject()
setCombatParam(combat6, COMBAT_PARAM_CREATEITEM, 9616)
local combat7 = createCombatObject()
setCombatParam(combat7, COMBAT_PARAM_CREATEITEM, 9615)
local combat8 = createCombatObject()
setCombatParam(combat8, COMBAT_PARAM_CREATEITEM, 9614)
local combat9 = createCombatObject()
setCombatParam(combat9, COMBAT_PARAM_CREATEITEM, 9613)
local combat10 = createCombatObject()
setConditionParam(condition, CONDITION_PARAM_TICKS, 5000)
setCombatCondition(combat, condition)
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_DEATHDAMAGE)
setCombatParam(combat, COMBAT_PARAM_EFFECT, 71)
setAttackFormula(combat, COMBAT_FORMULA_LEVELMAGIC, 1, 2, 3, 4)
local arr1 = {
{1, 0, 0},
{0, 2, 0},
{0, 0, 0}
}
local arr2 = {
{0, 1, 0},
{0, 2, 0},
{0, 0, 0}
}
local arr3 = {
{0, 0, 1},
{0, 2, 0},
{0, 0, 0}
}
local arr4 = {
{0, 0, 0},
{1, 2, 0},
{0, 0, 0}
}
local arr5 = {
{0, 0, 0},
{0, 3, 0},
{0, 0, 0}
}
local arr6 = {
{0, 0, 0},
{0, 2, 1},
{0, 0, 0}
}
local arr7 = {
{0, 0, 0},
{0, 2, 0},
{1, 0, 0}
}
local arr8 = {
{0, 0, 0},
{0, 2, 0},
{0, 1, 0}
}
local arr9 = {
{0, 0, 0},
{0, 2, 0},
{0, 0, 1}
}
local arr10 = {
{1, 1, 1},
{1, 3, 1},
{1, 1, 1}
}
local area1 = createCombatArea(arr1)
local area2 = createCombatArea(arr2)
local area3 = createCombatArea(arr3)
local area4 = createCombatArea(arr4)
local area5 = createCombatArea(arr5)
local area6 = createCombatArea(arr6)
local area7 = createCombatArea(arr7)
local area8 = createCombatArea(arr8)
local area9 = createCombatArea(arr9)
local area10 = createCombatArea(arr10)
setCombatArea(combat1, area1)
setCombatArea(combat2, area2)
setCombatArea(combat3, area3)
setCombatArea(combat4, area4)
setCombatArea(combat5, area5)
setCombatArea(combat6, area6)
setCombatArea(combat7, area7)
setCombatArea(combat8, area8)
setCombatArea(combat9, area9)
setCombatArea(combat10, area10)
function onTargetTile(cid, pos)
local function doRemoveItemFromPos(pos, id)
local i = getTileItemById(pos, id).uid
i = i > 1 and doRemoveItem(i) and true or false
if i and tonumber(EFFECT_AO_REMOVER) and EFFECT_AO_REMOVER >= 0 and EFFECT_AO_REMOVER <= 255 then
doSendMagicEffect(pos, EFFECT_AO_REMOVER)
end
end
local iI = {getTileItemById(pos, 9613), getTileItemById(pos, 9614), getTileItemById(pos, 9615), getTileItemById(pos, 9616), getTileItemById(pos, 9617), getTileItemById(pos, 9618), getTileItemById(pos, 9619), getTileItemById(pos, 9611), getTileItemById(pos, 9612)}
for _, i in pairs (iI) do
if i.uid > 1 then addEvent(doRemoveItemFromPos, TEMPO_PARA_REMOVER, pos, i.itemid) end
end
end
function onTargetTile1(cid, pos)
onTargetTile(cid, pos)
end
function onTargetTile2(cid, pos)
onTargetTile(cid, pos)
end
function onTargetTile3(cid, pos)
onTargetTile(cid, pos)
end
function onTargetTile4(cid, pos)
onTargetTile(cid, pos)
end
function onTargetTile5(cid, pos)
onTargetTile(cid, pos)
end
function onTargetTile6(cid, pos)
onTargetTile(cid, pos)
end
function onTargetTile7(cid, pos)
onTargetTile(cid, pos)
end
function onTargetTile8(cid, pos)
onTargetTile(cid, pos)
end
function onTargetTile9(cid, pos)
onTargetTile(cid, pos)
end
function onTargetTile10(cid, pos)
onTargetTile(cid, pos)
end
setCombatCallback(combat1, CALLBACK_PARAM_TARGETTILE, "onTargetTile1")
setCombatCallback(combat2, CALLBACK_PARAM_TARGETTILE, "onTargetTile2")
setCombatCallback(combat3, CALLBACK_PARAM_TARGETTILE, "onTargetTile3")
setCombatCallback(combat4, CALLBACK_PARAM_TARGETTILE, "onTargetTile4")
setCombatCallback(combat5, CALLBACK_PARAM_TARGETTILE, "onTargetTile5")
setCombatCallback(combat6, CALLBACK_PARAM_TARGETTILE, "onTargetTile6")
setCombatCallback(combat7, CALLBACK_PARAM_TARGETTILE, "onTargetTile7")
setCombatCallback(combat8, CALLBACK_PARAM_TARGETTILE, "onTargetTile8")
setCombatCallback(combat9, CALLBACK_PARAM_TARGETTILE, "onTargetTile9")
setCombatCallback(combat10, CALLBACK_PARAM_TARGETTILE, "onTargetTile10")
function doExecuteCombat(cid, var, combat)
if not isCreature(cid) then return true end
return doCombat(cid, combat, var)
end
function onCastSpell(cid, var)
local combats = {[1] = combat1, [2] = combat2, [3] = combat3, [4] = combat4, [5] = combat5, [6] = combat6, [7] = combat7, [8] = combat8, [9] = combat9, [10] = combat10}
for timing, c in pairs (combats) do
addEvent(doExecuteCombat, timing, cid, var, c)
end
return true
end







info
Grupo: Barão
Registrado: 26/12/11
Posts: 201
Reputação: +18
Char no Tibia: Flaah
Boa Tarde amigos do XTibia, tenho uma duvida nessa script, que seria:
Queria que ela paralisa-se o player inimigo e ficasse hitando o tbm, durante 5 segundos, ai quando os 5 segundos acabasse, os efeitos iriam sair.
Spell:
local TEMPO_PARA_REMOVER = 5 * 1000 -- em ms, 5 * 1000 = 5 segundos local EFFECT_AO_REMOVER = CONST_ME_POFF -- efeito que aparece ao remover os itens local combat1 = createCombatObject() setCombatParam(combat1, COMBAT_PARAM_CREATEITEM, 9612) local combat2 = createCombatObject() setCombatParam(combat2, COMBAT_PARAM_CREATEITEM, 9611) local combat3 = createCombatObject() setCombatParam(combat3, COMBAT_PARAM_CREATEITEM, 9619) local combat4 = createCombatObject() setCombatParam(combat4, COMBAT_PARAM_CREATEITEM, 9618) local combat5 = createCombatObject() setCombatParam(combat5, COMBAT_PARAM_CREATEITEM, 9617) local combat6 = createCombatObject() setCombatParam(combat6, COMBAT_PARAM_CREATEITEM, 9616) local combat7 = createCombatObject() setCombatParam(combat7, COMBAT_PARAM_CREATEITEM, 9615) local combat8 = createCombatObject() setCombatParam(combat8, COMBAT_PARAM_CREATEITEM, 9614) local combat9 = createCombatObject() setCombatParam(combat9, COMBAT_PARAM_CREATEITEM, 9613) local combat10 = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_DEATHDAMAGE) setCombatParam(combat, COMBAT_PARAM_EFFECT, 71) setAttackFormula(combat, COMBAT_FORMULA_LEVELMAGIC, 1, 2, 3, 4) local arr1 = { {1, 0, 0}, {0, 2, 0}, {0, 0, 0} } local arr2 = { {0, 1, 0}, {0, 2, 0}, {0, 0, 0} } local arr3 = { {0, 0, 1}, {0, 2, 0}, {0, 0, 0} } local arr4 = { {0, 0, 0}, {1, 2, 0}, {0, 0, 0} } local arr5 = { {0, 0, 0}, {0, 3, 0}, {0, 0, 0} } local arr6 = { {0, 0, 0}, {0, 2, 1}, {0, 0, 0} } local arr7 = { {0, 0, 0}, {0, 2, 0}, {1, 0, 0} } local arr8 = { {0, 0, 0}, {0, 2, 0}, {0, 1, 0} } local arr9 = { {0, 0, 0}, {0, 2, 0}, {0, 0, 1} } local arr10 = { {1, 1, 1}, {1, 3, 1}, {1, 1, 1} } local area1 = createCombatArea(arr1) local area2 = createCombatArea(arr2) local area3 = createCombatArea(arr3) local area4 = createCombatArea(arr4) local area5 = createCombatArea(arr5) local area6 = createCombatArea(arr6) local area7 = createCombatArea(arr7) local area8 = createCombatArea(arr8) local area9 = createCombatArea(arr9) local area10 = createCombatArea(arr10) setCombatArea(combat1, area1) setCombatArea(combat2, area2) setCombatArea(combat3, area3) setCombatArea(combat4, area4) setCombatArea(combat5, area5) setCombatArea(combat6, area6) setCombatArea(combat7, area7) setCombatArea(combat8, area8) setCombatArea(combat9, area9) setCombatArea(combat10, area10) function onTargetTile(cid, pos) local function doRemoveItemFromPos(pos, id) local i = getTileItemById(pos, id).uid i = i > 1 and doRemoveItem(i) and true or false if i and tonumber(EFFECT_AO_REMOVER) and EFFECT_AO_REMOVER >= 0 and EFFECT_AO_REMOVER <= 255 then doSendMagicEffect(pos, EFFECT_AO_REMOVER) end end local iI = {getTileItemById(pos, 9613), getTileItemById(pos, 9614), getTileItemById(pos, 9615), getTileItemById(pos, 9616), getTileItemById(pos, 9617), getTileItemById(pos, 9618), getTileItemById(pos, 9619), getTileItemById(pos, 9611), getTileItemById(pos, 9612)} for _, i in pairs (iI) do if i.uid > 1 then addEvent(doRemoveItemFromPos, TEMPO_PARA_REMOVER, pos, i.itemid) end end end function onTargetTile1(cid, pos) onTargetTile(cid, pos) end function onTargetTile2(cid, pos) onTargetTile(cid, pos) end function onTargetTile3(cid, pos) onTargetTile(cid, pos) end function onTargetTile4(cid, pos) onTargetTile(cid, pos) end function onTargetTile5(cid, pos) onTargetTile(cid, pos) end function onTargetTile6(cid, pos) onTargetTile(cid, pos) end function onTargetTile7(cid, pos) onTargetTile(cid, pos) end function onTargetTile8(cid, pos) onTargetTile(cid, pos) end function onTargetTile9(cid, pos) onTargetTile(cid, pos) end function onTargetTile10(cid, pos) onTargetTile(cid, pos) end setCombatCallback(combat1, CALLBACK_PARAM_TARGETTILE, "onTargetTile1") setCombatCallback(combat2, CALLBACK_PARAM_TARGETTILE, "onTargetTile2") setCombatCallback(combat3, CALLBACK_PARAM_TARGETTILE, "onTargetTile3") setCombatCallback(combat4, CALLBACK_PARAM_TARGETTILE, "onTargetTile4") setCombatCallback(combat5, CALLBACK_PARAM_TARGETTILE, "onTargetTile5") setCombatCallback(combat6, CALLBACK_PARAM_TARGETTILE, "onTargetTile6") setCombatCallback(combat7, CALLBACK_PARAM_TARGETTILE, "onTargetTile7") setCombatCallback(combat8, CALLBACK_PARAM_TARGETTILE, "onTargetTile8") setCombatCallback(combat9, CALLBACK_PARAM_TARGETTILE, "onTargetTile9") setCombatCallback(combat10, CALLBACK_PARAM_TARGETTILE, "onTargetTile10") function doExecuteCombat(cid, var, combat) if not isCreature(cid) then return true end return doCombat(cid, combat, var) end function onCastSpell(cid, var) local combats = {[1] = combat1, [2] = combat2, [3] = combat3, [4] = combat4, [5] = combat5, [6] = combat6, [7] = combat7, [8] = combat8, [9] = combat9, [10] = combat10} for timing, c in pairs (combats) do addEvent(doExecuteCombat, timing, cid, var, c) end return true endOBS: Queria que fosse no combat10, que paralisa-se e ficasse hitando durante 5 segundo.
PS: Uma duvida, como eu edito essa formula?
ALGUEM AJUDA PORFAVOR, VALENDO +REP
Editado Outubro 23 por Flaah