Spell TFS 0.X [Spell] Katara's Sense

[xWhiteWolf 3010]

Fala pessoal do TK, hoje vim trazer uma spell bem bonita que veio na minha cabeça.
em 14:06 desse vídeo dá pra ver oque eu tentei criar
http://tvuol.uol.com.br/video/avatar--livro-3-fogo--ep-48--a-manipuladora-de-fantoches-04028C98306ED8A90326/
mas por conta dos efeitos precários que o Tibia possui não ficou tão legal qnt eu imaginei mas em todo caso eu decidi compartilhar o código com vocês.

O resultado final foi esse daqui:

  Mostrar conteúdo oculto

Se vocês se interessaram é só criar um arquivo em spells/scripts e colocar isso daqui dentro dele:

function onCastSpell(cid, var)
local config = {
spins = 1,
delay = 120
}


local k = checkGroundInArray(getPositionsByDirection(cid), grass)
	if #k < 1 then
	doSendMagicEffect(getThingPos(cid), CONST_ME_POFF)
	doPlayerSendCancel(cid, "You need to be around grass to cast this spell.")
	return false
	end
		
	for i = 1, #k do
	addEvent(function()
				if isPlayer(cid) then
				local pos = k[i]
						local grama = getThingFromPos(pos)						
						doTransformItem(grama.uid, driedgrass[math.random(1, #driedgrass)])
						a = (i < 9) and doSendMagicEffect(pos, 1) or doSendMagicEffect(pos, 53)
						doSendDistanceShoot(pos, getThingPos(cid), 36)
				end
			end, (config.delay/2) * i)	
	end	
	range = #k > 4 and 7 or 5
	
	addEvent(function()
		if isPlayer(cid) then
			local pos = k[i]
			local lastPos = false
			for i = 1, range do
				local position = getPositionByDirection(getCreaturePosition(cid), getCreatureLookDirection(cid), i)					
				if isWalkable(position, false, true, true) then
					local creature = getTopCreature(position)
					if (creature.uid > 0) then
						doSendDistanceShoot(getCreaturePosition(cid), getCreaturePosition(creature.uid), 36)
						doTargetCombatHealth(cid, creature.uid, COMBAT_PHYSICALDAMAGE, -142 * (#k - 1), -150 * (#k - 1), CONST_ME_NONE)
					break
					end
					lastPos = position
				end
				
				if lastPos then
					doSendDistanceShoot(getCreaturePosition(cid), lastPos, 36)
				end
			end
		end
	end, (config.delay + (4 * config.delay * config.spins)) )		
			
	addEvent(function()
		for j = 1, #k do			
			addEvent(function()
				local pos = k[j]
				local grama = getThingFromPos(pos)	
				if isInArray(driedgrass, grama.itemid) then
					doTransformItem(grama.uid, grass[math.random(1, #grass)])
				end	
			end, (config.delay/2) * j)									
		end
	end, config.delay * 100)			
	spinRotate(cid, config.spins, config.delay)
return true
end

e em spells.xml vc adiciona:

<instant name="TK" words="kataras sense" lvl="8" mana="35" prem="0" casterTargetOrDirection="1" exhaustion="1500" needlearn="0" event="script" value="nomedoarquivo.lua">
</instant>

OBS: Note que esse script usa funções da new library. Você pode conseguir essas funções aqui: http://www.tibiaking.com/forum/topic/46015-new-library-v-10/

Espero que tenham curtido, esse é só o começo! Testada em TFS 0.3.6 Tibia 8.54.

[Erik Cazo 42]

Super foda *0* mais não entendo nada de função      REP pra você

Editado Novembro 17, 2014 por Erik Cazo (veja o histórico de edições)

[Mr. Crimson Prince 30]

Vou usar essa spell e mais umas outras suas numa nova classe "alchemist" pro meu servidor...

[xWhiteWolf 3010]

Essa spell foi pensada pra ser um dobrador de agua removendo agua da grama e fazendo ela morrer... não sei se combinaria.

[Cat 2609]

que criativo, tira a água da grama pra usar e transforma em terra

usando com sprites proprias deve ficar foda

[xWhiteWolf 3010]

sim mas teria que ser umas sprites onde as bordas seriam arredondas, vê o vídeo aí pra vc ver como tinha que ser hahaha

[Cat 2609]

da pra fazer um ground assim

mais interessante seria você usar a magia uma vez e deixar a grama mais morta, tem uma grama morta no tibia, depois quando usa de novo seca tudo por que tira o resto

[xWhiteWolf 3010]

mas essa sprite já é a da grama seca...

[avalax 6]

paga pau de avatar a lenda da aang kk

[xWhiteWolf 3010]

auhuhehua nao é nem questão de pagar pau, dá pra fazer umas coisas legais baseado nas dobras do desenho.

[xWhiteWolf 3010]

EDIT: Arrumado o bug de acertar players em pz e da animação atravessar paredes. Apenas substituam o script ;]

[avalax 6]

parabens mt loka a script

[xWhiteWolf 3010]

vlw hauhauha fico feliz que vcs tenham curtido.

[fezeRa 44]

Desculpa reviver topico mas, como posso fazer pra essa magia não precisar de grama, e o tiro ir em um target?

[xWhiteWolf 3010]

mais fácil fazer do 0 doque editar do jeito que vc pediu:: só pegar um dos exori e trocar no xml pra needtarget = "1" em vez de escrever casterTargetorDirection. E colocar pro combat ser em addEvent e antes dele vc põe a função de dar a giradinha.

[fezeRa 44]

Eu queria igual a sua spell, só fazer com que seja em target mesmo, a questão dos tiles, eu removi 1 parte do script e ele não faz mais o esquema dos tiles.

[xWhiteWolf 3010]

posta a sua versão que eu edito pra target

[fezeRa 44]

function onCastSpell(cid, var)
local config = {
spins = 1,
delay = 120
}


local k = checkGroundInArray(getPositionsByDirection(cid), grass)
	
		
	for i = 1, #k do
	addEvent(function()
				if isPlayer(cid) then
				local pos = k[i]
						local grama = getThingFromPos(pos)						
						doTransformItem(grama.uid, driedgrass[math.random(1, #driedgrass)])
						a = (i < 9) and doSendMagicEffect(pos, 1) or doSendMagicEffect(pos, 53)
						doSendDistanceShoot(pos, getThingPos(cid), 36)
				end
			end, (config.delay/2) * i)	
	end	
	range = #k > 4 and 7 or 5
	
	addEvent(function()
		if isPlayer(cid) then
			local pos = k[i]
			local lastPos = false
			for i = 1, range do
				local position = getPositionByDirection(getCreaturePosition(cid), getCreatureLookDirection(cid), i)					
				if isWalkable(position, false, true, true) then
					local creature = getTopCreature(position)
					if (creature.uid > 0) then
						doSendDistanceShoot(getCreaturePosition(cid), getCreaturePosition(creature.uid), 36)
						doTargetCombatHealth(cid, creature.uid, COMBAT_PHYSICALDAMAGE, -142 * (#k - 1), -150 * (#k - 1), CONST_ME_NONE)
					break
					end
					lastPos = position
				end
				
				if lastPos then
					doSendDistanceShoot(getCreaturePosition(cid), lastPos, 36)
				end
			end
		end
	end, (config.delay + (4 * config.delay * config.spins)) )		
			
	addEvent(function()
		for j = 1, #k do			
			addEvent(function()
				local pos = k[j]
				local grama = getThingFromPos(pos)	
				if isInArray(driedgrass, grama.itemid) then
					doTransformItem(grama.uid, grass[math.random(1, #grass)])
				end	
			end, (config.delay/2) * j)									
		end
	end, config.delay * 100)			
	spinRotate(cid, config.spins, config.delay)
return true
end

[xWhiteWolf 3010]

Só coloca needtarget = "1" no xml e troca o script:

  Mostrar conteúdo oculto

function onCastSpell(cid, var)
local config = {
spins = 1,
delay = 120
}


local k = checkGroundInArray(getPositionsByDirection(cid), grass)
	
		
	for i = 1, #k do
	addEvent(function()
				if isPlayer(cid) then
				local pos = k[i]
						local grama = getThingFromPos(pos)						
						doTransformItem(grama.uid, driedgrass[math.random(1, #driedgrass)])
						a = (i < 9) and doSendMagicEffect(pos, 1) or doSendMagicEffect(pos, 53)
						doSendDistanceShoot(pos, getThingPos(cid), 36)
				end
			end, (config.delay/2) * i)	
	end	
	range = #k > 4 and 7 or 5
	
	addEvent(function()
		if isPlayer(cid) then
			local creature = variantToNumber(var)
			if (creature > 0) then
				doSendDistanceShoot(getCreaturePosition(cid), getCreaturePosition(creature), 36)
				doTargetCombatHealth(cid, creature, COMBAT_PHYSICALDAMAGE, -142 * (#k + 1), -150 * (#k + 1), CONST_ME_NONE)
			end
		end
	end, (config.delay + (4 * config.delay * config.spins)) )		
			
	addEvent(function()
		for j = 1, #k do			
			addEvent(function()
				local pos = k[j]
				local grama = getThingFromPos(pos)	
				if isInArray(driedgrass, grama.itemid) then
					doTransformItem(grama.uid, grass[math.random(1, #grass)])
				end	
			end, (config.delay/2) * j)									
		end
	end, config.delay * 100)			
	spinRotate(cid, config.spins, config.delay)
return true
end

[Guilherme 461]

Gostei bastante da magia, poderia deixar uma poça de agua em baixo do inimigo.