Spell Genkidama - Globalevents e Spells - xTibia - Sua comunidade de Tibia e OTServ

Kryserver

90% Scripter ; 100% eu mesmo

Campones

INFOS

Grupo: Campones

Registrado: 19/10/10

Posts: 9

Char no Tibia: Toriele Alia

Postado em novembro 08, 2010

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:

Ajudei? Da um rep+ ae

Familialobomal

Campones

INFOS

Grupo: Campones

Registrado: 05/11/10

Posts: 19

Char no Tibia: Rey Mistery

Postado em novembro 08, 2010

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+

felipol

WE!

Visconde

INFOS

Grupo: Visconde

Registrado: 09/03/08

Posts: 275

Char no Tibia: Mick Fros

Postado em novembro 11, 2010

Poderia colocar uma foto da magia né!

Mas ta fmz, vlw por colaborar com scripts

Mapper&Designer

Fefolive

syshuy

Campones

INFOS

Grupo: Campones

Registrado: 19/08/10

Posts: 88

Postado em novembro 12, 2010

@up

coloka uma ss da magia

Sign%20Calish%20Teletubbies.JPG

Kryserver

90% Scripter ; 100% eu mesmo

Campones

INFOS

Grupo: Campones

Registrado: 19/10/10

Posts: 9

Char no Tibia: Toriele Alia

Postado em novembro 13, 2010

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

Ajudei? Da um rep+ ae