[Spell] Ice Nova

alldakie
em Globalevents e Spells

alldakie

avatar
Marquês
Marquês

INFOS

Grupo: MarquêsRegistrado: 28/07/11Posts: 1223

Olá Xtibianos,

Hoje vim trazer uma magia...

 

Como deve ficar após a configuração...

exorigranmasfrigo.jpg

 

Em (.../data/spells/scripts) você cria um arquivo chamado de "Ice Nova.lua", e adiciona o seguinte código:

local acombat1 = createCombatObject() 
local acombat2 = createCombatObject() 
local acombat3 = createCombatObject() 
local acombat4 = createCombatObject() 
local acombat5 = createCombatObject() 
local acombat6 = createCombatObject() 
local acombat7 = createCombatObject() 
local acombat8 = createCombatObject() 
local combat1 = createCombatObject() 
setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) 
setCombatParam(combat1, COMBAT_PARAM_EFFECT, 52) 
setCombatParam(combat1, COMBAT_PARAM_DISTANCEEFFECT, 28) 
setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -0.85, -80, -0.9, -127) 
local combat2 = createCombatObject() 
setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) 
setCombatParam(combat2, COMBAT_PARAM_EFFECT, 52) 
setCombatParam(combat2, COMBAT_PARAM_DISTANCEEFFECT, 28) 
setCombatFormula(combat2, COMBAT_FORMULA_LEVELMAGIC, -0.85, -80, -0.9, -127) 
local combat3 = createCombatObject() 
setCombatParam(combat3, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) 
setCombatParam(combat3, COMBAT_PARAM_EFFECT, 52) 
setCombatParam(combat3, COMBAT_PARAM_DISTANCEEFFECT, 28) 
setCombatFormula(combat3, COMBAT_FORMULA_LEVELMAGIC, -0.85, -80, -0.9, -127) 
local combat4 = createCombatObject() 
setCombatParam(combat4, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) 
setCombatParam(combat4, COMBAT_PARAM_EFFECT, 52) 
setCombatParam(combat4, COMBAT_PARAM_DISTANCEEFFECT, 28) 
setCombatFormula(combat4, COMBAT_FORMULA_LEVELMAGIC, -0.85, -80, -0.9, -127) 
local combat5 = createCombatObject() 
setCombatParam(combat5, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) 
setCombatParam(combat5, COMBAT_PARAM_EFFECT, 41) 
setCombatParam(combat5, COMBAT_PARAM_DISTANCEEFFECT, 36) 
setCombatFormula(combat5, COMBAT_FORMULA_LEVELMAGIC, -0.85, -80, -0.9, -127) 
local combat6 = createCombatObject() 
setCombatParam(combat6, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) 
setCombatParam(combat6, COMBAT_PARAM_EFFECT, 41) 
setCombatParam(combat6, COMBAT_PARAM_DISTANCEEFFECT, 36) 
setCombatFormula(combat6, COMBAT_FORMULA_LEVELMAGIC, -0.85, -80, -0.9, -127) 
local combat7 = createCombatObject() 
setCombatParam(combat7, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) 
setCombatParam(combat7, COMBAT_PARAM_EFFECT, 41) 
setCombatParam(combat7, COMBAT_PARAM_DISTANCEEFFECT, 36) 
setCombatFormula(combat7, COMBAT_FORMULA_LEVELMAGIC, -0.85, -80, -0.9, -127) 
local combat8 = createCombatObject() 
setCombatParam(combat8, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) 
setCombatParam(combat8, COMBAT_PARAM_EFFECT, 41) 
setCombatParam(combat8, COMBAT_PARAM_DISTANCEEFFECT, 36) 
setCombatFormula(combat8, COMBAT_FORMULA_LEVELMAGIC, -0.0, -80, -0, -127) 
local condition = createConditionObject(CONDITION_PARALYZE) 
setConditionParam(condition, CONDITION_PARAM_TICKS, 20000) 
--setConditionParam(condition, CONDITION_PARAM_SPEED, -200) 
setConditionFormula(condition, -0.9, 0, -0.9, 0) 
setCombatCondition(combat1, condition) 
setCombatCondition(combat2, condition) 
setCombatCondition(combat3, condition) 
setCombatCondition(combat4, condition) 
setCombatCondition(combat5, condition) 
setCombatCondition(combat6, condition) 
setCombatCondition(combat7, condition) 
setCombatCondition(combat8, condition) 
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, 2, 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, 1, 1, 1, 0, 0, 0, 0}, 
{0, 0, 0, 1, 1, 0, 1, 1, 0, 0, 0}, 
{0, 0, 0, 1, 0, 2, 0, 1, 0, 0, 0}, 
{0, 0, 0, 1, 1, 0, 1, 1, 0, 0, 0}, 
{0, 0, 0, 0, 1, 1, 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} 
} 
arr3 = { 
{0, 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, 1, 1, 1, 1, 0, 0, 0}, 
{0, 0, 1, 1, 0, 0, 0, 1, 1, 0, 0}, 
{0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0}, 
{0, 0, 1, 0, 0, 2, 0, 0, 1, 0, 0}, 
{0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0}, 
{0, 0, 1, 1, 0, 0, 0, 1, 1, 0, 0}, 
{0, 0, 0, 1, 1, 1, 1, 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} 
} 
arr4 = { 
{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, 0, 0, 0, 0, 0, 1, 0, 0}, 
{0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0}, 
{1, 1, 0, 0, 0, 0, 0, 0, 0, 1, 1}, 
{1, 1, 0, 0, 0, 2, 0, 0, 0, 1, 1}, 
{1, 1, 0, 0, 0, 0, 0, 0, 0, 1, 1}, 
{0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0}, 
{0, 0, 1, 0, 0, 0, 0, 0, 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} 
} 
arr5 = { 
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, 
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, 
{0, 0, 0, 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, 2, 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} 
} 
arr6 = { 
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, 
{0, 0, 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, 1, 1, 0, 0, 0, 0}, 
{0, 0, 0, 1, 1, 0, 1, 1, 0, 0, 0}, 
{0, 0, 0, 1, 0, 2, 0, 1, 0, 0, 0}, 
{0, 0, 0, 1, 1, 0, 1, 1, 0, 0, 0}, 
{0, 0, 0, 0, 1, 1, 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} 
} 
arr7 = { 
{0, 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, 1, 1, 1, 1, 0, 0, 0}, 
{0, 0, 1, 1, 0, 0, 0, 1, 1, 0, 0}, 
{0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0}, 
{0, 0, 1, 0, 0, 2, 0, 0, 1, 0, 0}, 
{0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0}, 
{0, 0, 1, 1, 0, 0, 0, 1, 1, 0, 0}, 
{0, 0, 0, 1, 1, 1, 1, 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} 
} 
arr8 = { 
{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, 0, 0, 0, 0, 0, 1, 0, 0}, 
{0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0}, 
{1, 1, 0, 0, 0, 0, 0, 0, 0, 1, 1}, 
{1, 1, 0, 0, 0, 2, 0, 0, 0, 1, 1}, 
{1, 1, 0, 0, 0, 0, 0, 0, 0, 1, 1}, 
{0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0}, 
{0, 0, 1, 0, 0, 0, 0, 0, 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} 
} 
local area1 = createCombatArea(arr1) 
local area2 = createCombatArea(arr2) 
local area3 = createCombatArea(arr3) 
local area4 = createCombatArea(arr4) 
local area5 = createCombatArea(arr5) 
local area6 = createCombatArea(arr6) 
local area7 = createCombatArea(arr7) 
local area8 = createCombatArea(arr8) 
setCombatArea(acombat1, area1) 
setCombatArea(acombat2, area2) 
setCombatArea(acombat3, area3) 
setCombatArea(acombat4, area4) 
setCombatArea(acombat5, area5) 
setCombatArea(acombat6, area6) 
setCombatArea(acombat7, area7) 
setCombatArea(acombat8, area8) 
function onTargetTile(cid, pos) 
   doCombat(cid,combat1,positionToVariant(pos)) 
end 
function onTargetTile2(cid, pos) 
   doCombat(cid,combat2,positionToVariant(pos)) 
end 
function onTargetTile3(cid, pos) 
   doCombat(cid,combat3,positionToVariant(pos)) 
end 
function onTargetTile4(cid, pos) 
   doCombat(cid,combat4,positionToVariant(pos)) 
end 
function onTargetTile5(cid, pos) 
   doCombat(cid,combat5,positionToVariant(pos)) 
end 
function onTargetTile6(cid, pos) 
   doCombat(cid,combat6,positionToVariant(pos)) 
end 
function onTargetTile7(cid, pos) 
   doCombat(cid,combat7,positionToVariant(pos)) 
end 
function onTargetTile8(cid, pos) 
   doCombat(cid,combat8,positionToVariant(pos)) 
end 
setCombatCallback(acombat1, CALLBACK_PARAM_TARGETTILE, "onTargetTile") 
setCombatCallback(acombat2, CALLBACK_PARAM_TARGETTILE, "onTargetTile2") 
setCombatCallback(acombat3, CALLBACK_PARAM_TARGETTILE, "onTargetTile3") 
setCombatCallback(acombat4, CALLBACK_PARAM_TARGETTILE, "onTargetTile4") 
setCombatCallback(acombat5, CALLBACK_PARAM_TARGETTILE, "onTargetTile5") 
setCombatCallback(acombat6, CALLBACK_PARAM_TARGETTILE, "onTargetTile6") 
setCombatCallback(acombat7, CALLBACK_PARAM_TARGETTILE, "onTargetTile7") 
setCombatCallback(acombat8, CALLBACK_PARAM_TARGETTILE, "onTargetTile8") 
local function onCastSpell1(parameters) 
   doCombat(parameters.cid, acombat1, parameters.var) 
end 
local function onCastSpell2(parameters) 
   doCombat(parameters.cid, acombat2, parameters.var) 
end 
local function onCastSpell3(parameters) 
   doCombat(parameters.cid, acombat3, parameters.var) 
end 
local function onCastSpell4(parameters) 
   doCombat(parameters.cid, acombat4, parameters.var) 
end 
local function onCastSpell5(parameters) 
   doCombat(parameters.cid, acombat5, parameters.var) 
end 
local function onCastSpell6(parameters) 
   doCombat(parameters.cid, acombat6, parameters.var) 
end 
local function onCastSpell7(parameters) 
   doCombat(parameters.cid, acombat7, parameters.var) 
end 
local function onCastSpell8(parameters) 
   doCombat(parameters.cid, acombat8, parameters.var) 
end 
function onCastSpell(cid, var) 
local parameters = { cid = cid, var = var} 
addEvent(onCastSpell1, 0, parameters) 
addEvent(onCastSpell2, 200, parameters) 
addEvent(onCastSpell3, 400, parameters) 
addEvent(onCastSpell4, 600, parameters) 
addEvent(onCastSpell5, 700, parameters) 
addEvent(onCastSpell6, 900, parameters) 
addEvent(onCastSpell7, 1100, parameters) 
addEvent(onCastSpell8, 1300, parameters) 
end 

 

Depois adicione em (.../data/spells/spells.xml) o seguinte codigo:

    <instant name="Ice nova" words="exori gran mas frigo" lvl="45" mana="355" prem="0"  exhaustion="2000" needlearn="0" script="ice nova.lua">

 

Creditos: orzeleagle

 

Gostou, +REP

kel

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 16/04/06Posts: 1

Tá dando erro agora xP

alldakie

avatar
Marquês
Marquês

INFOS

Grupo: MarquêsRegistrado: 28/07/11Posts: 1223

@Kel,

Tópico atualizado, veja se funciona, caso aconteça algum tipo de erro mande-o p/ mim...

kelvinvictor

RPG Maker
avatar
Barão
Barão

INFOS

Grupo: BarãoRegistrado: 24/02/10Posts: 204Char no Tibia: Krewcz

Tenta colocar ele pra vip by account 1.0 para somente vip's usarem, ta aqui as funções do meu sistema de vip:

 

Funções que utilizam o account id:
doTeleportPlayersByAccount(acc, topos) -> Teleporta todos os players da account
getVipTimeByAccount(acc) -> Pega o tempo de vip
setVipTimeByAccount(acc, time) -> Edita o tempo de vip
getVipDaysByAccount(acc) -> Pega o tempo de vip em dias
isVipAccount(acc) -> Verifica se é vip
addVipDaysByAccount(acc, days) -> Adiciona dias de vip
doRemoveVipDaysByAccount(acc, days) -> Remove dias de vip
getVipDateByAccount(acc) -> Pega a data e hora que irá terminar a vip

Funções que utilizam o creature id (cid):
doTeleportPlayers(cid, topos) -> Teleporta todos os players da account
getVipTime(cid) -> Pega o tempo de vip
setVipTime(cid, time) -> Edita o tempo de vip
getVipDays(cid) -> Pega o tempo de vip em dias
isVip(cid) -> Verifica se é vip
addVipDays(cid, days) -> Adiciona dias de vip
doRemoveVipDays(cid, days) -> Remove dias de vip
getVipDate(cid) -> Pega a data e hora que irá terminar a vip

 

@edit:

 

Vcê pode usar o comando:

 

isVip(cid)

Ele verifica se o player é vip, se não for vip ele soltara a mensagem: Você não possui vip

Atenciosamente,

Kelvin Victor

 

Ajudei? REP +

 

Meu fan? Use:

 

2prrxjd.png

Meus Tutoriais:

 

 

21906_7.png

 

21281_8.png

peedro19021999

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 26/08/11Posts: 9Char no Tibia: Kn8

Ual ! Gostei muito da sua magia ! :weight_lift:

luccabatista

Musa Do palmeras é linda nénaoh?
avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 12/10/11Posts: 8Char no Tibia: Crazyin

Seus topicos sobre spells sao todos muito bons, eu pediria para voce me adicionar no msn para eu falar algumas coisas

a vce. vleu REP+

 

 

crazytibia@hotmail.com

JuninhoSimao

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 12/12/11Posts: 41Char no Tibia: Dizzarlysa Deonwinth

a magia mais dahora ki eu ja vi REP++