[Pedido] Spell com slow/haste

[Hoad 7]

Preciso de uma spell que de dano e slow no inimigo (50%) e haste no caster 50%, com a ajuda do spell creator "criei" isso:

 

-- SpellCreator generated.

-- =============== COMBAT VARS ===============
-- Areas/Combat for 0ms
local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_HOLYDAMAGE)
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE)
setCombatArea(combat,createCombatArea({{3}}))
function onGetFormulaValues(cid, level, skill, attack, factor)
local skillTotal, levelTotal = skill + attack * 1, level / 5
return -(skillTotal * 1 + levelTotal), -(skillTotal * 1 + levelTotal)
end
setCombatCallback(combat, CALLBACK_PARAM_SKILLVALUE, "onGetFormulaValues")

local combat_2 = createConditionObject(CONDITION_PARALYZE)
setConditionParam(combat_2, CONDITION_PARAM_TICKS, 1500)
setConditionParam(combat_2, CONDITION_PARAM_SPEED, -0.5, 56, -0.5, 56)
setCombatCondition(combat, combat_2)

-- =============== CORE FUNCTIONS ===============
local function RunPart(c,cid,var,dirList,dirEmitPos) -- Part
if (isCreature(cid)) then
doCombat(cid, c, var)
if (dirList ~= nil) then -- Emit distance effects
local i = 2;
while (i < #dirList) do
doSendDistanceShoot(dirEmitPos,{x=dirEmitPos.x-dirList,y=dirEmitPos.y-dirList[i+1],z=dirEmitPos.z},dirList[1])
i = i + 2
end
end
end
end

function onCastSpell(cid, var)
local startPos = getCreaturePosition(cid)
RunPart(combat,cid,var)
return true
end

 

Não coloquei o haste no caster pq ainda não sei "ler" muito bem os scripts ç.ç

Além disso vcs podem traduzir tudo que está abaixo do -- ===== CORE FUNCTIONS ===== ?

 

-- =============== CORE FUNCTIONS ===============
local function RunPart(c,cid,var,dirList,dirEmitPos) -- Part
if (isCreature(cid)) then
doCombat(cid, c, var)
if (dirList ~= nil) then -- Emit distance effects
local i = 2;
while (i < #dirList) do
doSendDistanceShoot(dirEmitPos,{x=dirEmitPos.x-dirList,y=dirEmitPos.y-dirList[i+1],z=dirEmitPos.z},dirList[1])
i = i + 2
end
end
end
end

function onCastSpell(cid, var)
local startPos = getCreaturePosition(cid)
RunPart(combat,cid,var)
return true
end

 

Help me, please c:

 

 

Editado Dezembro 4, 2014 por Hoad (veja o histórico de edições)