(Resolvido)[PEDIDO] Spell que drena mana do oponente

[Mark Ackerman 16]

Preciso de 1 spell que drene a mana do oponente de preferencia que seja configuravel quanto de mana ira drenar quem ajudar +REP

Editado Setembro 24, 2017 por bismarkzika (veja o histórico de edições)

[Crypter 79]

Spoiler

function onCastSpell(cid, var)
	local numerodehit = 5
	local drena = 1000

	if isMonster(getCreatureTarget(cid))then
		return false
	end


	for x=1,numerodehit do
		if isPlayer(getCreatureTarget(cid)) then
		doCreatureAddMana(getCreatureTarget(cid), -drena)
		end
	end
end

 

 

[DboHere 16]

testei aqui nao funcinou tipo nao da erro na distro nada mais tbm n suga a mana poderia passar a tag ? xml ? 

[Crypter 79]

40 minutos atrás, yanloco70 disse:

testei aqui nao funcinou tipo nao da erro na distro nada mais tbm n suga a mana poderia passar a tag ? xml ? 

Ela só funciona em player ( Remove a mana do target , se for player)

[DboHere 16]

vlw funcionou kkkk nem notei

[Crypter 79]

15 horas atrás, yanloco70 disse:

vlw funcionou kkkk nem notei

Se tu quise que suga a mana do target a aumente pro player

Citar

function onCastSpell(cid, var)
	local numerodehit = 5
	local drena = 1000

	if isMonster(getCreatureTarget(cid))then
		return false
	end


	for x=1,numerodehit do
		if isPlayer(getCreatureTarget(cid)) then
			doCreatureAddMana(getCreatureTarget(cid), -drena)
      		doCreatureAddMana(cid, drena)
		end
	end
end

 

 

[DboHere 16]

2 minutos atrás, DboExplorer disse:

Se tu quise que suga a mana do target a aumente pro player

 

essa mesmo que queria vlw!

[OfWar 2]

@DboExplorer

Bom dia, como coloca ela pra tirar só 20%  mana do oponente? 20% da manatotal do rival. Podem me ajudar? Vlw obg

+REP

Editado Novembro 1, 2017 por OfWar (veja o histórico de edições)

[iBribe 7]

26 minutos atrás, OfWar disse:

@DboExplorer

Bom dia, como coloca ela pra tirar só 20%  mana do oponente? 20% da manatotal do rival. Podem me ajudar? Vlw obg

+REP

 

Spoiler

function onCastSpell(cid, var)
	local numerodehit = 5
	local drena = getCreatureMaxMana(cid)
	local  drena = 0.20*100
	if isMonster(getCreatureMaxMana(cid))then
		return false
	end


	for x=1,numerodehit do
		if isPlayer(getCreatureMaxMana(cid)) then
		doCreatureAddMana(getCreatureMaxMana(cid), -drena)
		end
	end
end

 

Não testei

[OfWar 2]

@iBribe

Acabei de desligar o meu pc

Estou pelo celular, + amanhã eu testo e te mando o resultado. Mt obg por ajudar

Pode me ajudar nessa aqui também? \/

http://www.tibiaking.com/forum/forums/topic/84884-ajuda-area-com-limite-level/?page=0#comment-471556

 

Eu falo a magia e não acontece nada

Ela tinha que pegar mana do oponente e trazer pra mim a quantidade de mana que ele pego.

Tfs 0.4

Tibia 8.6

 

 

 

 

@iBribe

[Crypter 79]

function onCastSpell(cid, var)
  	local target = getCreatureTarget(cid)
	local NumberOfHits = 1
	local value = getCreatureMaxMana(target)*0.20 -- 0.20 representa a 20% da mana total do seu target
    local restoremana = "false"

	if isMonster(target)then
		return false
	end


	for x=1,NumberOfHits do
		if isPlayer(target) then
			doCreatureAddMana(target, -value)
      		if restoremana == "true" then
      			doCreatureAddMana(cid, value)
        	end
		end
	end
  	return true
end

 

Editado Novembro 2, 2017 por DboExplorer (veja o histórico de edições)

[OfWar 2]

@DboExplorer

Funcionouuuu  mt obg + REP 

tenta me ajudar nessa aqui \/?

http://www.tibiaking.com/forum/forums/topic/84884-ajuda-area-com-limite-level/#comment-471761

 

TIBIA 8.6

TFS 0.4