[Ajuda Aki] Meteoro Script

hudson256
em Scripts

hudson256

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 23/07/11Posts: 16

Ae galerinha,

 

 

 

Alguem sabe onde que estar o problema desse script:

 

local combat = createCombatObject()

 

local meteor = createCombatObject()

setCombatParam(meteor, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE)

setCombatParam(meteor, COMBAT_PARAM_EFFECT, CONST_ME_ICEATTACK)

setCombatFormula(meteor, COMBAT_FORMULA_LEVELMAGIC, -1, -34, -1, -50, 5, 5, 9.31, 11.92)

 

local meteor_water = createCombatObject()

setCombatParam(meteor_water, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE)

setCombatParam(meteor_water, COMBAT_PARAM_EFFECT, CONST_ME_ICEATTACK)

setCombatFormula(meteor, COMBAT_FORMULA_LEVELMAGIC, -1, -34, -1, -50, 5, 5, 9.31, 11.92)

 

combat_arr = {

{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},

{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},

{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},

{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},

{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},

{0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0},

{0, 0, 0, 0, 0, 0, 1, 3, 1, 0, 0, 0, 0, 0, 0},

{0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0},

{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},

{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},

{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},

{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},

{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}

}

 

local combat_area = createCombatArea(combat_arr)

setCombatArea(combat, combat_area)

 

local function meteorCast(p)

doCombat(p.cid, p.combat, positionToVariant(p.pos))

end

 

 

function onTargetTile(cid, pos)

if (math.random(1, 1) == 1) then

local ground = getThingfromPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0})

if (isInArray(water, ground.itemid) == TRUE) then

local newpos = {x = pos.x - 7, y = pos.y - 6, z = pos.z}

doSendDistanceShoot(newpos, pos, 3)

addEvent(meteorCast, 6000, {cid = cid, pos = pos, combat = meteor_water})

else

local newpos = {x = pos.x - 7, y = pos.y - 6, z = pos.z}

doSendDistanceShoot(newpos, pos, 3)

addEvent(meteorCast, 600, {cid = cid,pos = pos, combat = meteor})

end

end

end

 

setCombatCallback(combat, CALLBACK_PARAM_TARGETTILE, "onTargetTile")

 

function onCastSpell(cid, var)

return doCombat(cid, combat, var)

end

 

 

 

Tentei mudar esse meteoro de fire pra ice,

mas ta caindo os fire e no final da o hit de ice com effect...

tem como fzr com que cai meteoro de ice e no final continue dando o hit de ice?

 

 

 

 

vllws ae!

www.LegendaryWorld.net

 

otserver.png

LuckOake

avatar
Marquês
Marquês

INFOS

Grupo: MarquêsRegistrado: 23/07/12Posts: 1104Gênero: MasculinoChar no Tibia: Luck Oake

Substitua isso:

 

doSendDistanceShoot(newpos, pos, 3)

 

Por isso:

 

doSendDistanceShoot(newpos, pos, 28)

hudson256

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 23/07/11Posts: 16

Vllws maan!!! rep+

www.LegendaryWorld.net

 

otserver.png

SkyDangerous

Deus Kalec
avatar
Lorde
Lorde

INFOS

Grupo: LordeRegistrado: 17/01/09Posts: 2098Char no Tibia: Adra Sata

Dúvida Sanada,

Reportado para mover.

Me segui lá (:

 

b906.png

http://ageofwar.servegame.com/

IP: ageofwar.servegame.com

TIBIA: 10.78

GLOBAL PERFECT CUSTOM