[PEDIDO] Script de Spell

[dbko 1]

Alguem me Faz um Script de Spell qe Bate na Mana do Player Mesmo Sem Utamo Vita

[narazaky 61]

Veja essa: 

local combat = createCombatObject()

setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_MANADRAIN)

setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_ENERGYHIT)

setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_ENERGY)

function onGetFormulaValues(cid, level, maglevel)

min = -(level * 2 + maglevel * 3) * 4.2

max = -(level * 2 + maglevel * 3) * 4.3

return min, max

end

 

setCombatCallback(combat, CALLBACK_PARAM_LEVELMAGICVALUE, "onGetFormulaValues")

 

function onCastSpell(cid, var)

return doCombat(cid, combat, var)

end

 

local distanceCombat = createCombatObject()

setCombatParam(distanceCombat, COMBAT_PARAM_TYPE, COMBAT_MANADRAIN)

setCombatParam(distanceCombat, COMBAT_PARAM_EFFECT, CONST_ME_ENERGYHIT)

setCombatParam(distanceCombat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_ENERGY)

function onGetFormulaValues(cid, level, maglevel)

min = -(level * 2 + maglevel * 3) * 3.1

max = -(level * 2 + maglevel * 3) * 3.2

return min, max

end

 

setCombatCallback(combat, CALLBACK_PARAM_LEVELMAGICVALUE, "onGetFormulaValues")

 

function onCastSpell(cid, var)

return doCombat(cid, combat, var)

end

[xWhiteWolf 3009]

eu fiz uma spell dessa baseada num script do SailorMoonLive
 

--    You can use this spell and copy and modify it. 
--                Created By SailorMoonLive 
--    But pls don't remove this comment 



function onCastSpell(cid, var)
     local CreatureMaxMana =    getCreatureMaxMana(getCreatureTarget(cid))


if getCreatureTarget(cid)  then
     local CreatureMana = getCreatureMana(getCreatureTarget(cid))
     local critmana = CreatureMaxMana/15
     local manadraw = ( CreatureMana /4)
      if CreatureMana >= critmana  then
          local Target = getCreatureTarget(cid)
          local targetPos = getPlayerPosition(Target)
              doCreatureAddMana(Target, -manadraw, COMBAT_LIFEDRAIN)
              doSendAnimatedText(targetPos, manadraw , TEXTCOLOR_BLUE)
             doSendMagicEffect(targetPos, 1)
          local pos = getPlayerPosition(cid)
              doCreatureAddMana(cid, manadraw, 1)              
            doSendMagicEffect(pos, 39)
        else
            doCreatureSay(getCreatureTarget(cid), "ENOUGH!", 1)
            doCreatureSay(cid, "I guess you're out of mana now...", 1)          
      end
end
return true
end

o bom desse script é que ao usar a magia, o inimigo (target) perde 1/4 da mana e vc ganha essa mana pra vc.
Pra configurar é só mudar em local manadraw= (creaturemana/4)
e no spells.xml

<instant name="Mana Draw" words="utura san"    lvl="100" mana="0"  range="5" needtarget="1" blockwalls="1"  exhaustion="2000"  event="script" value="attack/manadrain.lua">
<vocation id="5"/>
<vocation id="6"/>
</instant>

Editado Março 10, 2014 por xWhiteWolf (veja o histórico de edições)

[dbko 1]

Vlws Narazaky Rep+