Pedido De Spells

Carlinhow789 · Agosto 3, 2011

I Aed Galera Bllz?!

Sabe Akelas Magias Do Tibia rpg Brasil?

Akelas q é tipo 1 meteoro

exori mas flam

exori mas ice

Alguem poderia faser o Script delas pra min?

PLEASE

DO REP+

da 1 olhada nas ss ae

http://imageshack.us/photo/my-images/651/rpg2z.png/

http://imageshack.us/photo/my-images/8/rpgf.png/

SO Q 1 DE FIRE E 1 DE ICE

Editado Agosto 3, 2011 por Carlinhow789

Mulizeu · Agosto 3, 2011

Testa essa

Vai data spells crie um arquivo.lua Renomei-o para Meteoro.lua

--Spell By XxXxMulizeuXxXx
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 combat2 = createCombatObject()

local combat3 = createCombatObject()

local combat4 = createCombatObject()

local meteor = createCombatObject()
setCombatParam(meteor, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(meteor, COMBAT_PARAM_EFFECT, 52)
setCombatFormula(meteor, COMBAT_FORMULA_LEVELMAGIC, -4.6, -200, -4.2, -200)

local meteore = createCombatObject()
setCombatParam(meteore, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(meteore, COMBAT_PARAM_EFFECT, 41)
setCombatFormula(meteore, COMBAT_FORMULA_LEVELMAGIC, -4.6, -200, -4.2, -200)

local stun = createConditionObject(CONDITION_PARALYZE)
setConditionParam(stun, CONDITION_PARAM_TICKS, 5000)
setConditionFormula(stun, -0.8, 0, -0.9, 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, -4.6, -200, -4.2, -200)

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

combat_arr2 = {
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0},
{0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0},
{0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0},
{0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 0},
{0, 0, 1, 0, 0, 3, 1, 1, 0, 0, 0},
{0, 0, 0, 1, 0, 1, 1, 1, 1, 0, 0},
{0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0},
{0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0},
{0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
}

combat_arr3 = {
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0},
{0, 0, 1, 0, 1, 0, 1, 1, 0, 0, 0},
{0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0},
{0, 0, 0, 1, 1, 3, 0, 1, 1, 0, 0},
{0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0},
{0, 0, 1, 1, 1, 1, 0, 1, 0, 0, 0},
{0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0},
{0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
}

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

local combat_area1 = createCombatArea(combat_arr1)
setCombatArea(combat, combat_area1)

local combat_area2 = createCombatArea(combat_arr2)
setCombatArea(combat2, combat_area2)

local combat_area3 = createCombatArea(combat_arr3)
setCombatArea(combat3, combat_area3)

local combat_area4 = createCombatArea(combat_arr4)
setCombatArea(combat4, combat_area4)

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, 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, 28)
                       addEvent(meteorCast, 200, {cid = cid, pos = pos, combat = meteor_water})
               else
                       local newpos = {x = pos.x - 7, y = pos.y - 6, z = pos.z}
                       doSendDistanceShoot(newpos, pos, 28)
                       addEvent(meteorCast, 450, {cid = cid,pos = pos, combat = meteor})
		addEvent(meteorCast, 190, {cid = cid,pos = pos, combat = meteore})
               end
       end
end

function onTargetTile2(cid, pos)
       if (math.random(0, 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, 28)
                       addEvent(meteorCast, 200, {cid = cid, pos = pos, combat = meteor_water})
               else
                       local newpos = {x = pos.x - 7, y = pos.y - 6, z = pos.z}
                       doSendDistanceShoot(newpos, pos, 28)
                       addEvent(meteorCast, 450, {cid = cid,pos = pos, combat = meteor})
		addEvent(meteorCast, 690, {cid = cid,pos = pos, combat = meteore})
               end
       end
end

function onTargetTile3(cid, pos)
       if (math.random(0, 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, 28)
                       addEvent(meteorCast, 200, {cid = cid, pos = pos, combat = meteor_water})
               else
                       local newpos = {x = pos.x - 7, y = pos.y - 6, z = pos.z}
                       doSendDistanceShoot(newpos, pos, 28)
                       addEvent(meteorCast, 450, {cid = cid,pos = pos, combat = meteor})
		addEvent(meteorCast, 690, {cid = cid,pos = pos, combat = meteore})
               end
       end
end

function onTargetTile4(cid, pos)
       if (math.random(0, 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, 28)
                       addEvent(meteorCast, 200, {cid = cid, pos = pos, combat = meteor_water})
               else
                       local newpos = {x = pos.x - 7, y = pos.y - 6, z = pos.z}
                       doSendDistanceShoot(newpos, pos, 28)
                       addEvent(meteorCast, 200, {cid = cid,pos = pos, combat = meteor})
		addEvent(meteorCast, 690, {cid = cid,pos = pos, combat = meteore})
               end
       end
end
setCombatCallback(combat, CALLBACK_PARAM_TARGETTILE, "onTargetTile")
setCombatCallback(combat2, CALLBACK_PARAM_TARGETTILE, "onTargetTile2")
setCombatCallback(combat3, CALLBACK_PARAM_TARGETTILE, "onTargetTile3")
setCombatCallback(combat4, CALLBACK_PARAM_TARGETTILE, "onTargetTile4")

function onCastSpell(cid, var)
doCreatureSay(cid, "METEORO", TALKTYPE_MONSTER)
local msg = getCreatureMaster(cid)
if isPlayer(msg) == true then
local mon = getCreatureName(cid)
doCreatureSay(msg, ""..mon..", use Meteoro!", TALKTYPE_SAY)
end
addEvent(doCombat, 300, cid, combat, var)
addEvent(doCombat, 600, cid, combat2, var)
addEvent(doCombat, 900, cid, combat3, var)
addEvent(doCombat, 1200, cid, combat4, var)
return doCombat(cid, combat, var)
end

Vai em spells.xml

Coloque essa Tag

	<instant name="Meteoro" words="Meteoro" lvl="300" mana="255" direction="1" exhaustion="1000" needlearn="0" event="script" value="Meteoro.lua">
</instant>

Editado Agosto 3, 2011 por mulizeu

Carlinhow789 · Agosto 4, 2011

Essa ae é de fire ow ice?

Como q faço pra colocar de holly tmb?

folfer · Agosto 7, 2011

qual e o nome do poder para usar neeeee :withstupidsmiley:

Entrar

Pedido De Spells

Posts Recomendados

Carlinhow789 1

Link para o comentário

Compartilhar em outros sites

Mulizeu 86

Link para o comentário

Compartilhar em outros sites

Carlinhow789 1

Link para o comentário

Compartilhar em outros sites

folfer 1

Link para o comentário

Compartilhar em outros sites

Quem Está Navegando 0 membros estão online

Conteúdo Similar

Você só pode deslogar depois de 5 segundos

otserver Alguem poderia me ajudar ?? Com esse Mapa de POKETIBIA

Baiak Titan 8.6 200X - 24h/7 Dedicado BR (COM MONTARIAS)

script alguém pode me ajudar nessa spells aqui, queira que colocassem pro meu personagem ficar inatingível por 6 segundos e podendo atacar livremente

Cliente 10.00 Bug Quando o jogador usa qualquer magia ou posição

Fóruns

Tutoriais

Suporte