Ir para conteúdo

Ultima Yorunus (causa Dano Ou Carrega Vida?), Os 2 =) A Escolha é Sua


Yorun

Posts Recomendados

"Ultima Yorunus", é uma spell, ou melhor Talkaction que se você tiver o "red dragon scale" no Slot onde fica as Arrows você causará um dano numa determinada área de distância, agora se o item que estiver no Slot de Arrows for uma "green dragon scale" Você carregará a vida de todos que estiverem nesta área, alem de elevar a velocidade de seu char, e tambem carregar a vida de seu char...

 

Salve o código abaixo como "ultimayorunus.lua" dentro de sua pasta "scripts" encontrada em "data\talkactions\scrips"

Código:

-- Ultima Yorunus --
-- by Yorun (Diego) --

function onSay(cid, words, param)
if words == 'ultima yorunus' or words == 'Ultima Yorunus' then
	MANA = getPlayerMana(cid)
	MANAL = 600
	lala = getPlayerSlotItem(cid, 10)
	itemla = lala.itemid
	MIN = (getPlayerLevel(cid)*2+getPlayerMagLevel(cid)*4)*2 
	MAX = (getPlayerLevel(cid)*2+getPlayerMagLevel(cid)*4)*3 

	-- EDITE ABAIXO O ID DO ITEM NECESSÁRIO --
	itemn = 5920 -- green dragon scale --
	nomeitem = getItemName(itemn)
	itemh = 5882 -- red dragon scale --
	nomeitem2 = getItemName(itemh)
	-- EDITE ACIMA O ID DO ITEM NECESSÁRIO --

	playpos = getPlayerPosition(cid)
	if MANA >= MANAL then
		if itemla == itemh then
			I = 1
			repeat
				todaspos = getPosicoes(listapos, I)
				for a=1, 8 do
					doSendMagicEffect(todaspos[a], I+10)
					doAreaCombatHealth(cid, COMBAT_DROWNDAMAGE, todaspos[a], 0, -MIN, -MAX, 255)
				end
				I = I+1
			until I >= 9
			doPlayerAddMana(cid, -MANAL)
			doPlayerRemoveItem(cid, itemh, 1)
		elseif itemla == itemn then
			I = 1
			repeat
				todaspos = getPosicoes(listapos, I)
				for a=1, 8 do
					doSendMagicEffect(todaspos[a], I+10)
					doAreaCombatHealth(cid, COMBAT_DROWNDAMAGE, todaspos[a], 0, MIN, MAX, 255)
				end
				I = I+1
			until I >= 9
			doPlayerAddHealth(cid, MAX*2)
			velo = (MIN+MAX)/2
			doChangeSpeed(cid, velo)
			doPlayerAddMana(cid, -MANAL)
			doPlayerRemoveItem(cid, itemn, 1)
		elseif itemla == 0 then
			doPlayerSendTextMessage(cid, 18, 'Slot de Arrows está vazio! Um ' .. nomeitem .. ' ou um ' .. nomeitem2 .. ' é necessário nesse Slot.')
			doSendMagicEffect(playpos, 2)

		elseif itemla ~= itemn and itemla ~= itemh then
			doPlayerSendTextMessage(cid, 18, 'O item encontrado no Slot de arrows não é um ' .. nomeitem .. ' e nem um ' .. nomeitem2 .. '.')
			doSendMagicEffect(playpos, 2)				

		end
	else
		doPlayerSendTextMessage(cid, 18, 'Você precisa de ' .. MANAL .. ' de mana para usar Ultima Yorunus')
		doSendMagicEffect(playpos, 2)
	end
end
end



function getPosicoes(listapos, I)
posi1 = {x=playpos.x-I, y=playpos.y+I, z=playpos.z}
posi2 = {x=playpos.x, y=playpos.y+I, z=playpos.z} 
posi3 = {x=playpos.x+I, y=playpos.y+I, z=playpos.z}
posi4 = {x=playpos.x-I, y=playpos.y, z=playpos.z}
posi5 = {x=playpos.x+I, y=playpos.y, z=playpos.z}
posi6 = {x=playpos.x-I, y=playpos.y-I, z=playpos.z}
posi7 = {x=playpos.x, y=playpos.y-I, z=playpos.z}
posi8 = {x=playpos.x+I, y=playpos.y-I, z=playpos.z}

listapos = {posi1, posi2, posi3, posi4, posi5, posi6, posi7, posi8}

return listapos
end

 

Agora no seu arquivo "talkactions.xml" encontrada em "data\talkactions" você deve ADICIONAR o seguinte trecho:

<talkaction words="ultima yorunus" script="ultimayorunus.lua" />

 

Pronto!! agora é só usar a Spell no seu OT!!

Lembrando que as palavras para vc usar esta spell é: ultima yorunus

Espero que tenham gostado :)

Link para o comentário
Compartilhar em outros sites

  • 2 weeks later...
  • 3 months later...
  • 5 months later...
  • 1 month later...
Um pouco Util agora nao tem muita utilidade para servidores Low Rate

porcausa que é mais usado Uh, great Healing Potion

:p

 

Iaew Vitman, entaum cara... em Servers Low Rate, nada impede você de modificar a action, vc pode mudar a mana gasta alterando o MANAL e alterar o dano ou efeito de cura alterando a fórmula do MIN e do MAX... bem simples :)

é só usar um poquim de criatividade... a action ta bem flexível da para ser feitas as alterações necessárias...

 

Valeooo!!

Abraços!

Link para o comentário
Compartilhar em outros sites

×
×
  • Criar Novo...