Magias, Pleasee Help Me !

Por 21359706, 16 de mai. de 2011 em Archived

tibia

script

otserv

990

21359706XealTy2Campones

info

Grupo: Campones

Registrado: 31/10/10

Posts: 22

Reputação: +9

16 de maio de 2011 às 15:11

Tipo do script: Spells

Protocolo (versão do Tibia): 8.60

Servidor utilizado: Alissow

Nível de experiência: ?

Adicionais/Informações: Aew to affim de algumas magias do OT (tibiarpg brasil [Citeron,Danae])

Tipo as novas ou as antigas mesmo ex: exori mas hur, ou exori mas flam, exori mas gran,

exori con hur ,exori mas frigo, exevo master frigo, vita sio, e todas as outras,

Peço para q contribuão com as que puderem ou se ja tiver visto em algum lugar poste o

link, Pfff me ajudem fastt Pleaseee !!!

Darkwath DCampones

info

Grupo: Campones

Registrado: 15/04/11

Posts: 28

Reputação: +8

Char no Tibia: darkwath

16 de maio de 2011 às 15:29

exori mas frigo

local water = {490, 491, 492, 493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625}

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, -8.35, -400, -8.30, -300)

setCombatParam(meteor, COMBAT_PARAM_CREATEITEM, 0000)

local stun = createConditionObject(CONDITION_PARALYZE)

setConditionParam(stun, CONDITION_PARAM_TICKS, 3000)

setConditionFormula(stun, -0.5, 0, -0.6, 0)

setCombatCondition(meteor, stun)

local meteor_water = createCombatObject()

setCombatParam(meteor_water, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)

setCombatParam(meteor_water, COMBAT_PARAM_EFFECT, CONST_ME_LOSEENERGY)

setCombatFormula(meteor_water, COMBAT_FORMULA_LEVELMAGIC, -9.80, -200, -9.76, -200)

combat_arr = {

{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, 1, 3, 1, 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}

}

local combat_area = createCombatArea(combat_arr)

setCombatArea(combat, combat_area)

local function meteorCast(p)

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

end

local function stunEffect(cid)

doSendMagicEffect(getThingPos(cid), CONST_ME_STUN)

end

function onTargetTile(cid, pos)

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

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

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

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

doSendDistanceShoot(newpos, pos, 28)

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

else

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

doSendDistanceShoot(newpos, pos, 28)

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

end

setCombatCallback(combat, CALLBACK_PARAM_TARGETTILE, "onTargetTile")

function onCastSpell(cid, var)

return doCombat(cid, combat, var)

end

exori mas hur

local water = {490, 491, 492, 493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625}

local combat = createCombatObject()

local meteor = createCombatObject()

setCombatParam(meteor, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)

setCombatParam(meteor, COMBAT_PARAM_EFFECT, CONST_ME_FIREATTACK)

setCombatFormula(meteor, COMBAT_FORMULA_LEVELMAGIC, -10.20, -200, -11.40, -200)

local stun = createConditionObject(CONDITION_PARALYZE)

setConditionParam(stun, CONDITION_PARAM_TICKS, 7000)

setConditionFormula(stun, -0.5, 0, -0.6, 0)

setCombatCondition(meteor, stun)

local meteor_water = createCombatObject()

setCombatParam(meteor_water, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)

setCombatParam(meteor_water, COMBAT_PARAM_EFFECT, CONST_ME_LOSEENERGY)

setCombatFormula(meteor_water, COMBAT_FORMULA_LEVELMAGIC, -10.20, -200, -9.20, -200)

combat_arr = {

{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, 1, 3, 1, 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}

}

local combat_area = createCombatArea(combat_arr)

setCombatArea(combat, combat_area)

local function meteorCast(p)

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

end

local function stunEffect(cid)

doSendMagicEffect(getThingPos(cid), CONST_ME_STUN)

end

function onTargetTile(cid, pos)

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

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

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

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

doSendDistanceShoot(newpos, pos, CONST_ANI_FIRE)

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

else

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

doSendDistanceShoot(newpos, pos, CONST_ANI_FIRE)

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

end

setCombatCallback(combat, CALLBACK_PARAM_TARGETTILE, "onTargetTile")

function onCastSpell(cid, var)

return doCombat(cid, combat, var)

end

exori con hur

local scom1 = createCombatObject()

local scom2 = createCombatObject()

local combat1 = createCombatObject()

setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)

setCombatParam(combat1, COMBAT_PARAM_EFFECT, 6)

setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -8.20, -200, -8.40, -200)

local combat2 = createCombatObject()

setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)

setCombatParam(combat2, COMBAT_PARAM_DISTANCEEFFECT, 18)

arr1 = {

{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, 1, 3, 1, 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}

}

arr2 = {

{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, 1, 3, 1, 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}

}

local area1 = createCombatArea(arr1)

local area2 = createCombatArea(arr2)

setCombatArea(scom1, area1)

setCombatArea(scom2, area2)

function onTargetTile(cid, pos)

doCombat(cid,combat1,positionToVariant(pos))

end

function onTargetTile2(cid, pos)

doCombat(cid,combat2,positionToVariant(pos))

end

setCombatCallback(scom1, CALLBACK_PARAM_TARGETTILE, "onTargetTile")

setCombatCallback(scom2, CALLBACK_PARAM_TARGETTILE, "onTargetTile2")

local function onCastSpell1(parameters)

doCombat(parameters.cid, scom1, parameters.var)

end

local function onCastSpell2(parameters)

doCombat(parameters.cid, scom2, parameters.var)

end

function onCastSpell(cid, var)

local parameters = { cid = cid, var = var}

addEvent(onCastSpell1, 100, parameters)

addEvent(onCastSpell2, 100, parameters)

return TRUE

end

exori mas gran

local combat = createCombatObject()

setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)

setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_HITAREA)

setCombatParam(combat, COMBAT_PARAM_USECHARGES, true)

local arr = {

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

{ 1, 1, 2, 1, 1},

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

{ 1, 1, 1, 1, 1}

}local area = createCombatArea(arr)

setCombatArea(combat, area)

function onGetFormulaValues(cid, level, skill, attack, factor)

local skillTotal, levelTotal = skill + attack * 2, level / 3 return -(skillTotal * 3.0 + levelTotal), -(skillTotal * 4.0 + levelTotal)

end

setCombatCallback(combat, CALLBACK_PARAM_SKILLVALUE, "onGetFormulaValues")

function onCastSpell(cid, var)

return doCombat(cid, combat, var)

end

exevo gran mas hur

local water = {490, 491, 492, 493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625}

local combat = createCombatObject()

local meteor = createCombatObject()

setCombatParam(meteor, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)

setCombatParam(meteor, COMBAT_PARAM_EFFECT, CONST_ME_FIREATTACK)

setCombatFormula(meteor, COMBAT_FORMULA_LEVELMAGIC, -8.20, -200, -8.40, -200)

local stun = createConditionObject(CONDITION_PARALYZE)

setConditionParam(stun, CONDITION_PARAM_TICKS, 7000)

setConditionFormula(stun, -1.0, 0, -0.8, 0)

setCombatCondition(meteor, stun)

local meteor_water = createCombatObject()

setCombatParam(meteor_water, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)

setCombatParam(meteor_water, COMBAT_PARAM_EFFECT, CONST_ME_LOSEENERGY)

setCombatFormula(meteor, COMBAT_FORMULA_LEVELMAGIC, -8.20, -200, -8.40, -200)

local area = createCombatArea(AREA_CROSS5X5)

setCombatArea(combat, area)

setCombatArea(combat, combat_area)

local function meteorCast(p)

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

end

local function stunEffect(cid)

doSendMagicEffect(getThingPos(cid), CONST_ME_STUN)

end

function onTargetTile(cid, pos)

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

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

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

local newpos = {x = pos.x - 9, y = pos.y - 8, z = pos.z}

doSendDistanceShoot(newpos, pos, CONST_ANI_FIRE)

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

else

local newpos = {x = pos.x - 9, y = pos.y - 8, z = pos.z}

doSendDistanceShoot(newpos, pos, CONST_ANI_FIRE)

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

end

setCombatCallback(combat, CALLBACK_PARAM_TARGETTILE, "onTargetTile")

function onCastSpell(cid, var)

return doCombat(cid, combat, var)

end

exevo master frigo

local combat = createCombatObject()

setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE)

setCombatParam(combat, COMBAT_PARAM_EFFECT, 52)

setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -8.9, -50, -8.7, -100)

local area = createCombatArea(AREA_CROSS5X5)

setCombatArea(combat, area)

function onCastSpell(cid, var)

return doCombat(cid, combat, var)

end

exevo gran con hur

local scom1 = createCombatObject()

local scom2 = createCombatObject()

local combat1 = createCombatObject()

setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)

setCombatParam(combat1, COMBAT_PARAM_EFFECT, 6)

setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -7.20, -150, -7.40, -150)

local combat2 = createCombatObject()

setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)

setCombatParam(combat2, COMBAT_PARAM_DISTANCEEFFECT, 18)

arr1 = {

{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, 1, 1, 1, 0, 0, 0, 0},

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

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

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

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

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

{0, 0, 0, 0, 1, 1, 1, 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}

}

arr2 = {

{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, 1, 1, 1, 0, 0, 0, 0},

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

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

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

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

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

{0, 0, 0, 0, 1, 1, 1, 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}

}

local area1 = createCombatArea(arr1)

local area2 = createCombatArea(arr2)

setCombatArea(scom1, area1)

setCombatArea(scom2, area2)

function onTargetTile(cid, pos)

doCombat(cid,combat1,positionToVariant(pos))

end

function onTargetTile2(cid, pos)

doCombat(cid,combat2,positionToVariant(pos))

end

setCombatCallback(scom1, CALLBACK_PARAM_TARGETTILE, "onTargetTile")

setCombatCallback(scom2, CALLBACK_PARAM_TARGETTILE, "onTargetTile2")

local function onCastSpell1(parameters)

doCombat(parameters.cid, scom1, parameters.var)

end

local function onCastSpell2(parameters)

doCombat(parameters.cid, scom2, parameters.var)

end

function onCastSpell(cid, var)

local parameters = { cid = cid, var = var}

addEvent(onCastSpell1, 100, parameters)

addEvent(onCastSpell2, 200, parameters)

return TRUE

end

exevo gran mas san

local water = {490, 491, 492, 493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625}

local combat = createCombatObject()

local meteor = createCombatObject()

setCombatParam(meteor, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE)

setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_HOLYAREA)

setCombatFormula(meteor, COMBAT_FORMULA_LEVELMAGIC, -8.20, -200, -7.40, -200)

local meteor_water = createCombatObject()

setCombatParam(meteor_water, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE)

setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_HOLYAREA)

setCombatFormula(meteor, COMBAT_FORMULA_LEVELMAGIC, -8.20, -200, -7.40, -200)

combat_arr = {

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

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

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

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

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

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

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

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

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

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

{0, 0, 0, 0, 0, 1, 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

local function stunEffect(cid)

doSendMagicEffect(getThingPos(cid), CONST_ME_STUN)

end

function onTargetTile(cid, pos)

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

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

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

local newpos = {x = pos.x - 9, y = pos.y - 8, z = pos.z}

doSendDistanceShoot(newpos, pos, CONST_ANI_SMALLHOLY)

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

else

local newpos = {x = pos.x - 9, y = pos.y - 8, z = pos.z}

doSendDistanceShoot(newpos, pos, CONST_ANI_SMALLHOLY)

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

end

setCombatCallback(combat, CALLBACK_PARAM_TARGETTILE, "onTargetTile")

function onCastSpell(cid, var)

return doCombat(cid, combat, var)

end

vita gran sio

--vita gran sio--

local tempo = 10 * 60 * 1000

local combat = createCombatObject()

setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_RED)

setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, FALSE)

local condition = createConditionObject(CONDITION_ATTRIBUTES)

setConditionParam(condition, CONDITION_PARAM_STAT_MAXHEALTHPERCENT, 150)

setConditionParam(condition, CONDITION_PARAM_BUFF, true)

setConditionParam(condition, CONDITION_PARAM_TICKS, tempo)

setCombatCondition(combat, condition)

function onCastSpell(cid, var)

return doCombat(cid, combat, var)

end

utevo gran sio

local tempo =10 * 60 * 1000

local combat = createCombatObject()

setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_RED)

setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, FALSE)

local condition = createConditionObject(CONDITION_ATTRIBUTES)

local condition = createConditionObject(CONDITION_REGENERATION)

setConditionParam(condition, CONDITION_PARAM_SUBID, 100)

setConditionParam(condition, CONDITION_PARAM_BUFF, TRUE)

setConditionParam(condition, CONDITION_PARAM_TICKS, tempo)

setConditionParam(condition, CONDITION_PARAM_MANAGAIN, 100)

setConditionParam(condition, CONDITION_PARAM_MANATICKS, 1000)

setCombatCondition(combat, condition)

function onCastSpell(cid, var)

return doCombat(cid, combat, var)

end

OBS: para utevo sio e so trocar onde tem "CONDITION_PARAM_SUBID, 100" e diminui o valor

E para vita sio onde tem "CONDITION_PARAM_STAT_MAXHEALTHPERCENT, 150" os buffs exori e exevo e so colocar "SKILL_DISTANCE,x" ou "SKILL_SWORD,x" (no caso ira adicionar o tanto de skill que voce colocar em 'x'

no spells.xml e so colocar igual ta em baixo e ir trocando onde ta colorido

</instant>

se precisar de algo mais e so falar

Editado Maio 16 por Darkwath

21359706XealTy2Campones

info

Grupo: Campones

Registrado: 31/10/10

Posts: 22

Reputação: +9

16 de maio de 2011 às 15:54

exori mas frigo

local water = {490, 491, 492, 493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625}

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, -8.35, -400, -8.30, -300)

setCombatParam(meteor, COMBAT_PARAM_CREATEITEM, 0000)

local stun = createConditionObject(CONDITION_PARALYZE)

setConditionParam(stun, CONDITION_PARAM_TICKS, 3000)

setConditionFormula(stun, -0.5, 0, -0.6, 0)

setCombatCondition(meteor, stun)

local meteor_water = createCombatObject()

setCombatParam(meteor_water, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)

setCombatParam(meteor_water, COMBAT_PARAM_EFFECT, CONST_ME_LOSEENERGY)

setCombatFormula(meteor_water, COMBAT_FORMULA_LEVELMAGIC, -9.80, -200, -9.76, -200)

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, 1, 0, 0, 0, 0, 0},

{0, 0, 0, 0, 1, 3, 1, 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}

}

local combat_area = createCombatArea(combat_arr)

setCombatArea(combat, combat_area)

local function meteorCast(p)

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

end

local function stunEffect(cid)

doSendMagicEffect(getThingPos(cid), CONST_ME_STUN)

end

function onTargetTile(cid, pos)

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

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

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

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

doSendDistanceShoot(newpos, pos, 28)

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

else

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

doSendDistanceShoot(newpos, pos, 28)

addEvent(meteorCast, 100, {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

exori mas hur

local water = {490, 491, 492, 493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625}

local combat = createCombatObject()

local meteor = createCombatObject()

setCombatParam(meteor, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)

setCombatParam(meteor, COMBAT_PARAM_EFFECT, CONST_ME_FIREATTACK)

setCombatFormula(meteor, COMBAT_FORMULA_LEVELMAGIC, -10.20, -200, -11.40, -200)

local stun = createConditionObject(CONDITION_PARALYZE)

setConditionParam(stun, CONDITION_PARAM_TICKS, 7000)

setConditionFormula(stun, -0.5, 0, -0.6, 0)

setCombatCondition(meteor, stun)

local meteor_water = createCombatObject()

setCombatParam(meteor_water, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)

setCombatParam(meteor_water, COMBAT_PARAM_EFFECT, CONST_ME_LOSEENERGY)

setCombatFormula(meteor_water, COMBAT_FORMULA_LEVELMAGIC, -10.20, -200, -9.20, -200)

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, 1, 0, 0, 0, 0, 0},

{0, 0, 0, 0, 1, 3, 1, 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}

}

local combat_area = createCombatArea(combat_arr)

setCombatArea(combat, combat_area)

local function meteorCast(p)

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

end

local function stunEffect(cid)

doSendMagicEffect(getThingPos(cid), CONST_ME_STUN)

end

function onTargetTile(cid, pos)

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

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

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

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

doSendDistanceShoot(newpos, pos, CONST_ANI_FIRE)

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

else

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

doSendDistanceShoot(newpos, pos, CONST_ANI_FIRE)

addEvent(meteorCast, 100, {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

exori con hur

local scom1 = createCombatObject()

local scom2 = createCombatObject()

local combat1 = createCombatObject()

setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)

setCombatParam(combat1, COMBAT_PARAM_EFFECT, 6)

setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -8.20, -200, -8.40, -200)

local combat2 = createCombatObject()

setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)

setCombatParam(combat2, COMBAT_PARAM_DISTANCEEFFECT, 18)

arr1 = {

{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, 1, 3, 1, 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}

}

arr2 = {

{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, 1, 3, 1, 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}

}

local area1 = createCombatArea(arr1)

local area2 = createCombatArea(arr2)

setCombatArea(scom1, area1)

setCombatArea(scom2, area2)

function onTargetTile(cid, pos)

doCombat(cid,combat1,positionToVariant(pos))

end

function onTargetTile2(cid, pos)

doCombat(cid,combat2,positionToVariant(pos))

end

setCombatCallback(scom1, CALLBACK_PARAM_TARGETTILE, "onTargetTile")

setCombatCallback(scom2, CALLBACK_PARAM_TARGETTILE, "onTargetTile2")

local function onCastSpell1(parameters)

doCombat(parameters.cid, scom1, parameters.var)

end

local function onCastSpell2(parameters)

doCombat(parameters.cid, scom2, parameters.var)

end

function onCastSpell(cid, var)

local parameters = { cid = cid, var = var}

addEvent(onCastSpell1, 100, parameters)

addEvent(onCastSpell2, 100, parameters)

return TRUE

end

exori mas gran

local combat = createCombatObject()

setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)

setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_HITAREA)

setCombatParam(combat, COMBAT_PARAM_USECHARGES, true)

local arr = {

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

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

{ 1, 1, 2, 1, 1},

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

{ 1, 1, 1, 1, 1}

}local area = createCombatArea(arr)

setCombatArea(combat, area)

function onGetFormulaValues(cid, level, skill, attack, factor)

local skillTotal, levelTotal = skill + attack * 2, level / 3 return -(skillTotal * 3.0 + levelTotal), -(skillTotal * 4.0 + levelTotal)

end

setCombatCallback(combat, CALLBACK_PARAM_SKILLVALUE, "onGetFormulaValues")

function onCastSpell(cid, var)

return doCombat(cid, combat, var)

end

exevo gran mas hur

local water = {490, 491, 492, 493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625}

local combat = createCombatObject()

local meteor = createCombatObject()

setCombatParam(meteor, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)

setCombatParam(meteor, COMBAT_PARAM_EFFECT, CONST_ME_FIREATTACK)

setCombatFormula(meteor, COMBAT_FORMULA_LEVELMAGIC, -8.20, -200, -8.40, -200)

local stun = createConditionObject(CONDITION_PARALYZE)

setConditionParam(stun, CONDITION_PARAM_TICKS, 7000)

setConditionFormula(stun, -1.0, 0, -0.8, 0)

setCombatCondition(meteor, stun)

local meteor_water = createCombatObject()

setCombatParam(meteor_water, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)

setCombatParam(meteor_water, COMBAT_PARAM_EFFECT, CONST_ME_LOSEENERGY)

setCombatFormula(meteor, COMBAT_FORMULA_LEVELMAGIC, -8.20, -200, -8.40, -200)

local area = createCombatArea(AREA_CROSS5X5)

setCombatArea(combat, area)

setCombatArea(combat, combat_area)

local function meteorCast(p)

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

end

local function stunEffect(cid)

doSendMagicEffect(getThingPos(cid), CONST_ME_STUN)

end

function onTargetTile(cid, pos)

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

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

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

local newpos = {x = pos.x - 9, y = pos.y - 8, z = pos.z}

doSendDistanceShoot(newpos, pos, CONST_ANI_FIRE)

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

else

local newpos = {x = pos.x - 9, y = pos.y - 8, z = pos.z}

doSendDistanceShoot(newpos, pos, CONST_ANI_FIRE)

addEvent(meteorCast, 100, {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

exevo master frigo

local combat = createCombatObject()

setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE)

setCombatParam(combat, COMBAT_PARAM_EFFECT, 52)

setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -8.9, -50, -8.7, -100)

local area = createCombatArea(AREA_CROSS5X5)

setCombatArea(combat, area)

function onCastSpell(cid, var)

return doCombat(cid, combat, var)

end

exevo gran con hur

local scom1 = createCombatObject()

local scom2 = createCombatObject()

local combat1 = createCombatObject()

setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)

setCombatParam(combat1, COMBAT_PARAM_EFFECT, 6)

setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -7.20, -150, -7.40, -150)

local combat2 = createCombatObject()

setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)

setCombatParam(combat2, COMBAT_PARAM_DISTANCEEFFECT, 18)

arr1 = {

{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, 1, 1, 1, 0, 0, 0, 0},

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

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

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

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

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

{0, 0, 0, 0, 1, 1, 1, 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}

}

arr2 = {

{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, 1, 1, 1, 0, 0, 0, 0},

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

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

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

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

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

{0, 0, 0, 0, 1, 1, 1, 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}

}

local area1 = createCombatArea(arr1)

local area2 = createCombatArea(arr2)

setCombatArea(scom1, area1)

setCombatArea(scom2, area2)

function onTargetTile(cid, pos)

doCombat(cid,combat1,positionToVariant(pos))

end

function onTargetTile2(cid, pos)

doCombat(cid,combat2,positionToVariant(pos))

end

setCombatCallback(scom1, CALLBACK_PARAM_TARGETTILE, "onTargetTile")

setCombatCallback(scom2, CALLBACK_PARAM_TARGETTILE, "onTargetTile2")

local function onCastSpell1(parameters)

doCombat(parameters.cid, scom1, parameters.var)

end

local function onCastSpell2(parameters)

doCombat(parameters.cid, scom2, parameters.var)

end

function onCastSpell(cid, var)

local parameters = { cid = cid, var = var}

addEvent(onCastSpell1, 100, parameters)

addEvent(onCastSpell2, 200, parameters)

return TRUE

end

exevo gran mas san

local water = {490, 491, 492, 493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625}

local combat = createCombatObject()

local meteor = createCombatObject()

setCombatParam(meteor, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE)

setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_HOLYAREA)

setCombatFormula(meteor, COMBAT_FORMULA_LEVELMAGIC, -8.20, -200, -7.40, -200)

local meteor_water = createCombatObject()

setCombatParam(meteor_water, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE)

setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_HOLYAREA)

setCombatFormula(meteor, COMBAT_FORMULA_LEVELMAGIC, -8.20, -200, -7.40, -200)

combat_arr = {

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

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

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

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

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

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

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

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

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

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

{0, 0, 0, 0, 0, 1, 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

local function stunEffect(cid)

doSendMagicEffect(getThingPos(cid), CONST_ME_STUN)

end

function onTargetTile(cid, pos)

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

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

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

local newpos = {x = pos.x - 9, y = pos.y - 8, z = pos.z}

doSendDistanceShoot(newpos, pos, CONST_ANI_SMALLHOLY)

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

else

local newpos = {x = pos.x - 9, y = pos.y - 8, z = pos.z}

doSendDistanceShoot(newpos, pos, CONST_ANI_SMALLHOLY)

addEvent(meteorCast, 100, {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

vita gran sio

--vita gran sio--

local tempo = 10 * 60 * 1000

local combat = createCombatObject()

setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_RED)

setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, FALSE)

local condition = createConditionObject(CONDITION_ATTRIBUTES)

setConditionParam(condition, CONDITION_PARAM_STAT_MAXHEALTHPERCENT, 150)

setConditionParam(condition, CONDITION_PARAM_BUFF, true)

setConditionParam(condition, CONDITION_PARAM_TICKS, tempo)

setCombatCondition(combat, condition)

function onCastSpell(cid, var)

return doCombat(cid, combat, var)

end

utevo gran sio

local tempo =10 * 60 * 1000

local combat = createCombatObject()

setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_RED)

setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, FALSE)

local condition = createConditionObject(CONDITION_ATTRIBUTES)

local condition = createConditionObject(CONDITION_REGENERATION)

setConditionParam(condition, CONDITION_PARAM_SUBID, 100)

setConditionParam(condition, CONDITION_PARAM_BUFF, TRUE)

setConditionParam(condition, CONDITION_PARAM_TICKS, tempo)

setConditionParam(condition, CONDITION_PARAM_MANAGAIN, 100)

setConditionParam(condition, CONDITION_PARAM_MANATICKS, 1000)

setCombatCondition(combat, condition)

function onCastSpell(cid, var)

return doCombat(cid, combat, var)

end

OBS: para utevo sio e so trocar onde tem "CONDITION_PARAM_SUBID, 100" e diminui o valor

E para vita sio onde tem "CONDITION_PARAM_STAT_MAXHEALTHPERCENT, 150" os buffs exori e exevo e so colocar "SKILL_DISTANCE,x" ou "SKILL_SWORD,x" (no caso ira adicionar o tanto de skill que voce colocar em 'x'

no spells.xml e so colocar igual ta em baixo e ir trocando onde ta colorido

<instant name="Eternal Master Winter" words="exevo master frigo" lvl="120" mana="1200" prem="1" selftarget="1" exhaustion="2000" needlearn="0" script="attack/hellcore.lua">

<vocation name="Druid"/>

<vocation name="Elder Druid"/>

</instant>

se precisar de algo mais e so falar

o.O de + ajudou muito +rep

Darkwath DCampones

info

Grupo: Campones

Registrado: 15/04/11

Posts: 28

Reputação: +8

Char no Tibia: darkwath

16 de maio de 2011 às 16:02

esquei de avisar as magias

exori mas hur

exori mas frigo

exevo gran mas hur

estao com o paralize pra muda e so troca os valores na linha

local stun = createConditionObject(CONDITION_PARALYZE)

setConditionParam(stun, CONDITION_PARAM_TICKS, 3000)

setConditionFormula(stun, -0.5, 0, -0.6, 0)

setCombatCondition(meteor, stun)