KR

Spell Genkidama

Por Kryserver, 07 de nov. de 2010 em Globalevents e Spells

script
5
1.6k
KryserverK
07 de novembro de 2010 às 22:01

Bom.. gente por enquanto ta sem ss mais depois eu conserto isso.

 

Vao na pasta spells/scripts/attacks e copiem um arquivo qualquer e coloquem o nome como genkidama.Depois abram,apaguem tudo e colem isso :

 

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_PHYSICALDAMAGE)
setCombatParam(combat1, COMBAT_PARAM_EFFECT, 5)
setCombatParam(combat1, COMBAT_PARAM_DISTANCEEFFECT, 254)
setCombatFormula(combat1, COMBAT_FORMULA_SKILL, 0, -112, 0.82, -57)

local combat2 = createCombatObject()
setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat2, COMBAT_PARAM_EFFECT, 34)
setCombatParam(combat2, COMBAT_PARAM_DISTANCEEFFECT, 254)
setCombatFormula(combat2, COMBAT_FORMULA_SKILL, 0, -112, 0.82, -57)

local combat3 = createCombatObject()
setCombatParam(combat3, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat3, COMBAT_PARAM_EFFECT, 5)
setCombatParam(combat3, COMBAT_PARAM_DISTANCEEFFECT, 254)
setCombatFormula(combat3, COMBAT_FORMULA_SKILL, 0, -112, 0.82, -57)

local combat4 = createCombatObject()
setCombatParam(combat4, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat4, COMBAT_PARAM_EFFECT, 34)
setCombatParam(combat4, COMBAT_PARAM_DISTANCEEFFECT, 254)
setCombatFormula(combat4, COMBAT_FORMULA_SKILL, 0, -112, 0.82, -57)

local combat5 = createCombatObject()
setCombatParam(combat5, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat5, COMBAT_PARAM_EFFECT, 5)
setCombatParam(combat5, COMBAT_PARAM_DISTANCEEFFECT, 254)
setCombatFormula(combat5, COMBAT_FORMULA_SKILL, 0, -112, 0.82, -57)

local combat6 = createCombatObject()
setCombatParam(combat6, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat6, COMBAT_PARAM_EFFECT, 34)
setCombatParam(combat6, COMBAT_PARAM_DISTANCEEFFECT, 254)
setCombatFormula(combat6, COMBAT_FORMULA_SKILL, 0, -112, 0.82, -57)

local combat7 = createCombatObject()
setCombatParam(combat7, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat7, COMBAT_PARAM_EFFECT, 5)
setCombatParam(combat7, COMBAT_PARAM_DISTANCEEFFECT, 254)
setCombatFormula(combat7, COMBAT_FORMULA_SKILL, 0, -112, 0.82, -57)

local combat8 = createCombatObject()
setCombatParam(combat8, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat8, COMBAT_PARAM_EFFECT, 34)
setCombatParam(combat8, COMBAT_PARAM_DISTANCEEFFECT, 254)
setCombatFormula(combat8, COMBAT_FORMULA_SKILL, 0, -112, 0.82, -57)


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

arr4 = {
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0},
{0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0},
{0, 1, 0, 1, 1, 1, 1, 1, 0, 1, 0},
{0, 1, 0, 1, 1, 0, 1, 1, 0, 1, 0},
{0, 1, 1, 1, 0, 2, 0, 1, 1, 1, 0},
{0, 1, 0, 1, 1, 0, 1, 1, 0, 1, 0},
{0, 1, 0, 1, 1, 1, 1, 1, 0, 1, 0},
{0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0},
{0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}
}

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

arr8 = {
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0},
{0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0},
{0, 1, 0, 1, 1, 1, 1, 1, 0, 1, 0},
{0, 1, 0, 1, 1, 0, 1, 1, 0, 1, 0},
{0, 1, 1, 1, 0, 2, 0, 1, 1, 1, 0},
{0, 1, 0, 1, 1, 0, 1, 1, 0, 1, 0},
{0, 1, 0, 1, 1, 1, 1, 1, 0, 1, 0},
{0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0},
{0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 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, 0, parameters)
addEvent(onCastSpell3, 0, parameters)
addEvent(onCastSpell4, 0, parameters)
addEvent(onCastSpell5, 0, parameters)
addEvent(onCastSpell6, 0, parameters)
addEvent(onCastSpell7, 0, parameters)
addEvent(onCastSpell8, 0, parameters)
return TRUE 
end

 

Depois vao na pasta spells e abram o arquivo spells.html, vao na parte dos spells instants e colem isso:

<instant name="Genkidama" words="Genkidama" lvl="1000" mana="1300" prem="1" selftarget="1" exhaustion="2000" needlearn="0" script="attack/genkidama.lua">
	<vocation name="Sorcerer" />
	<vocation name="Druid" />
	<vocation name="Knight" />
	<vocation name="Paladin" />
       </instant>

 

Pronto,seu spells esta feito.

 

Screen Shot:

genkidama.png

Editado Novembro 14 por Kryserver

08 de novembro de 2010 às 20:01

Muito legal Parabens vc tem cheito com a coisa :thumbsupsmiley:

 

REP+

 

Manow da um olhada e comenta la no meu post =)

:thumbsupsmiley:

 

33 Teleports Falantes FamiliaLM 46 1 06/11/10

35 Sistema De Mineração 100% Sem Bug FamiliaLM 26 0 06/11/10

37 Sistema Anti Mc By Familialm FamiliaLM 0 0 08/11/10

ta na mesma pagina que essa post ta :smile_positivo:

 

REP+

felipolF
11 de novembro de 2010 às 12:52

Poderia colocar uma foto da magia né!

 

Mas ta fmz, vlw por colaborar com scripts :D

syshuyS
12 de novembro de 2010 às 19:31

@up

 

coloka uma ss da magia

KryserverK
13 de novembro de 2010 às 12:48

Mals gente eu nao estava podendo responder por causa da semana de provas na minha escola..bom como eu disse no inicio do topico eu vou postar Ss esperem só eu abrir as minhas provas acabarem