[WEAPON] Wand Multi Target

Preview:

Tutorial:

Em data/weapons/weapons.xml adicione:

<wand id="7735" script="starshoter.lua">
   <vocation name="Druid"/><vocation name="Elder Druid"/>
   <vocation name="Sorcerer"/><vocation name="Master Sorcerer"/>
</wand>

Em data/items/items.xml procure pelo item id 7735, e substitua por isso:

<item id="7735" article="the" name="star wand">
      <attribute key="description" value="This holy wand radiates huge ammount of light. This weapon were made by Frikx"/>
      <attribute key="weight" value="20"/>
      <attribute key="attack" value="1"/>
      <attribute key="hitChance" value="100"/>
      <attribute key="weaponType" value="distance"/>
      <attribute key="range" value="5"/>
   </item>

Em data/weapons/scripts/ crie um arquivo com o nome starshoter.lua e dentro coloque:

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_BLOCKARMOR, 0)
setCombatParam(combat, COMBAT_PARAM_BLOCKSHIELD, 0)
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE)
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_HOLYDAMAGE)
setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_HOLY)
setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -0.2, -25, -0.2, -3)

local manaNeededPerTarget = 20
local hitExtraTargets = 3
local hitExtraTargetsInRange = 2

function getCreaturesInRange(position, radiusx, radiusy, showMonsters, showPlayers)
   local creaturesList = {}
   for x = -radiusx, radiusx do
      for y = -radiusy, radiusy do
         if not (x == 0 and y == 0) then
            creature = getTopCreature({x = position.x+x, y = position.y+y, z = position.z, stackpos = STACKPOS_TOP_CREATURE})
            if (creature.type == 1 and showPlayers == 1) or (creature.type == 2 and showMonsters == 1) then
               table.insert(creaturesList, creature.uid)
            end
         end
      end
   end
   return creaturesList
end

function onUseWeapon(cid, var)
   local ret = doCombat(cid, combat, var)
   if(ret == LUA_ERROR) then
      return LUA_ERROR
   end
   doPlayerAddManaSpent(cid, manaNeededPerTarget)
   doCreatureAddMana(cid, -manaNeededPerTarget)
   
   local target = variantToNumber(var)
   local hitplayers = 0
   if(target ~= 0) then
      if(isPlayer(target) == TRUE) then
         hitplayers = 1
      end
      local nowHit = 0
      local randomId = 0
      local otherTargets = getCreaturesInRange(getCreaturePosition(target), hitExtraTargetsInRange, hitExtraTargetsInRange, 1, hitplayers)
      if(#otherTargets > 0) then
         for i = 1, hitExtraTargets do
            if(getCreatureMana(cid) > manaNeededPerTarget) then
               randomId = math.random(1, #otherTargets)
               nowHit = otherTargets[randomId]
               if(isCreature(nowHit) == TRUE) then
                  table.remove(otherTargets, randomId)
                  ret = doCombat(cid, combat, numberToVariant(nowHit))
                  if(ret ~= LUA_ERROR) then
                     doPlayerAddManaSpent(cid, manaNeededPerTarget)
                     doCreatureAddMana(cid, -manaNeededPerTarget)
                  end
               end
               if(#otherTargets == 0) then
                  break
               end
            else
               break
            end
         end
      end
   end
   return TRUE
end

Créditos:

Frikx

Carinha não entendi muito bem isso serveria para qualquer wand que eu tenho no meu servidor ?

o meu deu o seguinte erro e nao atk 2 bixo so atk 1 e vai dando erros

[25/07/2013 02:00:34] [Error - Weapon Interface]

[25/07/2013 02:00:34] data/weapons/scripts/starshoter.lua:onUseWeapon

[25/07/2013 02:00:34] Description:

[25/07/2013 02:00:34] data/weapons/scripts/starshoter.lua:33: attempt to call global 'doPlayerAddManaSpent' (a nil value)

[25/07/2013 02:00:34] stack traceback:

[25/07/2013 02:00:34] data/weapons/scripts/starshoter.lua:33: in function <data/weapons/scripts/starshoter.lua:28>