Meteor Rain

Criado por Lpz, flwflw!

Testado em The Forgotten Server 0.3.6

Fala aê, manolagem.

Estava eu aqui, brincando com o Pesquisar do computador, quando achei esse arquivo milenar no meu computador. É uma magia, que um dia eu criei me baseando num servidor que nunca saiu. Kingdom Age, falo mermo

Bom, sem mais enrolação, tá aê.

INSTALANDO

1. Crie um arquivo chamado meteor rain.lua na pasta data/spells/scripts.

local spellConfig = {

	{effect = CONST_ME_FIREATTACK,

	 area = createCombatArea({

		{1, 0, 1},

		{0, 2, 0},

		{0, 1, 0}})

	},

	{effect = CONST_ME_FIREAREA,

	 area = createCombatArea({

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

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

		{0, 0, 2, 0, 0},

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

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

	},

	{effect = CONST_ME_FIREATTACK,

	 area = createCombatArea({

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

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

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

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

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

	},

	{effect = CONST_ME_HITBYFIRE,

	 area = createCombatArea({

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

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

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

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

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

	},

	{effect = CONST_ME_FIREAREA,

	 area = createCombatArea({

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

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

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

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

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

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

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

	},

	{effect = CONST_ME_HITBYFIRE,

	 area = createCombatArea({

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

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

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

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

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

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

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

	},

	{effect = CONST_ME_FIREAREA,

	 area = createCombatArea({

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

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

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

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

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

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

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

	}

}


local combats = {}

for k, config in ipairs(spellConfig) do

	combats[k] = createCombatObject()

		onTargetTile = function(cid, pos)

			local basePos = getThingPosition(cid)

			local fromPos = {x=basePos.x-6, y=basePos.y-8, z=basePos.z}

			doSendDistanceShoot(fromPos, pos, CONST_ANI_FIRE)

		end

		setCombatCallback(combats[k], CALLBACK_PARAM_TARGETTILE, "onTargetTile")

		setCombatParam(combats[k], COMBAT_PARAM_TYPE, COMBAT_FIREDAMAGE)

		setCombatParam(combats[k], COMBAT_PARAM_EFFECT, config.effect)

		setCombatFormula(combats[k], COMBAT_FORMULA_LEVELMAGIC, -0.593, -50, -0.929, -100)

		setCombatArea(combats[k], config.area)

end


local function castingSpellTime(p)

	if(isCreature(p[1]) == TRUE) then

		doCombat(unpack(p))

	end

end

function onCastSpell(cid, var)

	for k, combat in ipairs(combats) do

		addEvent(castingSpellTime, (250*k), {cid, combat, var})

	end

	return true

end

2. Cole essa chave em spells.xml

<instant name="Meteor Rain" words="meteor rain" lvl="80" mana="860" prem="1" exhaustion="2000" needlearn="0" event="script" value="meteor rain.lua"/>

3. Dê reload e seja feliz.

Screenshot

Não ligue pro nick na imagem D:

Editado Outubro 16, 2011 13 anos por Lpz (veja o histórico de edições)

Ficou bom! Talvez eu uso no meu ATS aqui!

Você é Oneshot do outro forum?

#Topico

Magia muito legal, adorei *-*

Fico bem legal garou, eu sempre quis fazer esse tipo de spells estilo meteoro. Eu vi isso em um servidor de avatar (korelin) e sempre tive vontade de tentar fazer esse tipo de magia só que nunca consegui.

Oneshot, Garou e agora Lpz.

Brigadão pelos comentários, galera.