[Resolvido] !buyhealth E !buymana

[lukina 0]

Bom Xtibianos Gostaria DE 5 Scripts

 

1° !newhealth a pessoa so pode falar quando tiver sem pz e qando falar vai custa 20k e ela vai comprar 20k d life e 20k d mana ( So Pode-se comprar 1 vez)

 

2° !superhealth A Pessoa so pode falar se tiver sem pz e quando falar ela vai comprar 250k d life por 2kk 50 crystal coin.. ( So Pode-se comprar 1 vez)

3° !supermana A Pessoa so pode falar se tiver sem pz e quando falar ela vai comprar 250k d mana por 2kk 50

crystal coin.. ( So Pode-se comprar 1 vez)

4° !special health A Pessoa so pode falar se tiver sem pz e quando flar ela vai comprar 500k d life por 6kk ( So Pode-se comprar 1 vez)

5° !specialmana Pessoa so pode falar se tiver sem pz e quando flar ela vai comprar 500k d mana por 6kk( So Pode-se comprar 1 vez)

Bom Gostaria Mto Urgente Desses Scripts !! Tds Eles AS PSSOAS so podem comprar 1 vez c tentarem d novo eles perdem o dinhero ou não da obrigado !!Urgente COMANDO BUYHEALTH (ComprarLife) BUYMANA (comprarmana)

[kkk111 8]

Aqui está

 

<talkaction words="!newhealth;!superhealth;!supermana;!especialhealth;!especialmana" script="buyhealth.lua"/>

 

function onSay(cid, words, param)

if(isPlayerPzLocked(cid) ~= true) then
	if(words == "!newhealth") then
		if(getPlayerStorageValue(cid, 25001) <= 0) then
			if(doPlayerRemoveMoney(cid, 20000) == true)
				setCreatureMaxHealth(cid, getCreatureMaxHealth(cid)+20000)
				setCreatureMaxMana(cid, getCreatureMaxMana(cid)+20000)
				doPlayerSetStorageValue(cid, 25001, 1)
				doCreatureAddHealth(cid, getCreatureMaxHealth(cid))
				doCreatureAddMana(cid, getCreatureMaxMana(cid))
			else
				doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você não tem 20000 gps.")
			end
		else
			doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você já comprou.")
		end
	elseif(words == "!superhealth") then
		if(getPlayerStorageValue(cid, 25002) <= 0) then
			if(doPlayerRemoveMoney(cid, 2500000) == true)
				setCreatureMaxHealth(cid, getCreatureMaxHealth(cid)+250000)
				doPlayerSetStorageValue(cid, 25002, 1)
				doCreatureAddHealth(cid, getCreatureMaxHealth(cid))
			else
				doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você não tem 2500000 gps.")
			end
		else
			doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você já comprou.")
		end
	elseif(words == "!supermana") then
		if(getPlayerStorageValue(cid, 25003) <= 0) then
			if(doPlayerRemoveMoney(cid, 2500000) == true)
				setCreatureMaxMana(cid, getCreatureMaxMana(cid)+250000)
				doPlayerSetStorageValue(cid, 25003, 1)
				doCreatureAddMana(cid, getCreatureMaxMana(cid))
			else
				doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você não tem 2500000 gps.")
			end
		else
			doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você já comprou.")
		end
	elseif(words == "!especialhealth") then
		if(getPlayerStorageValue(cid, 25004) <= 0) then
			if(doPlayerRemoveMoney(cid, 5000000) == true)
				setCreatureMaxHealth(cid, getCreatureMaxHealth(cid)+500000)
				doPlayerSetStorageValue(cid, 25004, 1)
				doCreatureAddHealth(cid, getCreatureMaxHealth(cid))
			else
				doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você não tem 5000000 gps.")
			end
		else
			doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você já comprou.")
		end
	elseif(words == "!especialmana") then
		if(getPlayerStorageValue(cid, 25005) <= 0) then
			if(doPlayerRemoveMoney(cid, 5000000) == true)
				setCreatureMaxMana(cid, getCreatureMaxMana(cid)+500000)
				doPlayerSetStorageValue(cid, 25005, 1)
				doCreatureAddMana(cid, getCreatureMaxMana(cid))
			else
				doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você não tem 5000000 gps.")
			end
		else
			doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você já comprou.")
		end
	end
else
	doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você não pode comprar quando estiver com battle.")
end
return true
end

 

Espero que goste =]

[lukina 0]

Ty Perfect!

Vlw!

[Vilden 137]

Dúvida sanada, Nitrax007 caso tenha mais dúvidas só criar um novo tópico

e esperar que o Xtibia te responda =).

 

 

Rep+ para kkk11111

 

 

Tópico fechado.