Ir para conteúdo
TK News
  • Cadastre-se

Action%25252525252FTalkaction [Action] Livro de Compras (AOL ~ BLESS ~ Twist of fate (PVP Bless) & outros)

Jamison Collins

Por ,
em Scripts tfs 0.4 (OLD)

 Share Seguidores 0

Posts Recomendados

  • Este é um post popular.
Jamison Collins

Jamison Collins 387

Postado
  • Este é um post popular.
Postado

Olá "TKbianos",

Eu desenvolvi um outro script junto com meu paceiro Daaniel, que pode agradar muita gente.

O script faz o seguinte : Ao clicar no Item X (9002), abrirá uma janela vendendo os seguintes itens :

  • Todas as blessings incluindo PVP blessing (Twist of fate).
  • As 5 blessings sem o PVP blessing (Twist of fate).
  • Apenas o PVP blessing (Twist of fate).
  • Um amulet of loss (AOL).

Com a janela aparecendo essas opções você selecionará, e apertará "OK" ou a tecla Enter para confirma sua compra. O script vai verificar se você tem o dinheiro necessário, e se tiver, ele removerá o dinheiro e te dará o item, se não tiver, haverá uma mensagem falando que não é possível comprar o item.

@Update 0.0.1 (08 de outubro de 2013 - 12:05) :

  • Criação do script.

Imagem :

 

eP8G5Xq.png

@Update 0.1.1 (10 de outubro de 2013 - 09:50) :

  • Adicionado marcadores para separar as categorias dos itens vendidos.
  • Adicionado o preço do item ao lado de seus nomes.
  • Adicionado alguns itens do tipo conteiners  (backpacks).
  • Adicionado efeitos quando houver alguma falha na compra.
  • Fixado o bug do "EnterButton" (agora você pode confirma a compra com o "Enter").
  • Fixado algumas mensagens.

Imagem :

5c3lPGD.png

@Update 0.1.2 (20 de outubro de 2013 - 19:03) :

  • Adicionado a aba Teleports (Hometown).
  • Fixado ao selecionar uma das abas.

 

Bem, aqui vai... 

Crie um arquivo chamado holybook.lua na pasta actions>scripts, e cole isso dentro :

-- Desenvolvido do tibiaking.com por :
-- Daaniel Nolmena & Jamison Collins
--------------------------------------
--------------------------------------

modaldialog = {

	title = "Holy Book",
	message = "Choose what you want to buy.",
	buttons = {
		{ id = 1, value = "Ok" },
		{ id = 2, value = "Cancel" },
	},
	buttonEnter = 1,
	buttonEscape = 2,
	choices = {
		{ id = 0, value = "------/Teleports/------" },
		{ id = 13, value = "Hometown [1K]" },
		{ id = 0, value = "------/Blessings/------" },
		{ id = 1, value = "All blessings [70K]" },
		{ id = 2, value = "Five blessings [50K]" },
		{ id = 3, value = "Twist of Fate [20K]" },
		{ id = 0, value = "-------/Amulets/------" },
		{ id = 4, value = "Amulet of Loss [10K]" },
		{ id = 0, value = "------/Backpacks/-----" },
		{ id = 5, value = "Backpack [100GP]" },
		{ id = 6, value = "Blue Backpack [100GP]" },
		{ id = 7, value = "Grey Backpack [100GP]" },
		{ id = 8, value = "Purple Backpack [100GP]" },
		{ id = 9, value = "Green Backpack [100GP]" },
		{ id = 10, value = "Yellow Backpack [100GP]" },
		{ id = 11, value = "Orange Backpack [100GP]" },
		{ id = 12, value = "Red Backpack [100GP]" }
	},
	popup = false
}

local bless = {1, 2, 3, 4, 5}
local five_blessings_price = 50000 -- 50k SEM TWIST OF FATE
local twist_of_fate_price = 20000 -- 20k APENAS TWIST OF FATE
local all_blessings_price = 70000 -- 70k COM TWIST OF FATE
local amulet_of_loss_price = 10000 -- 10k AMULET OF LOSS
local backpack_price = 100 -- 100 gp preço das backpacks
local hometown_price = 1000 -- 1000 gp preço do teleport para cidade

function callback(cid, button, choice)
	if button == 1 or button == 29 or button == 0 then
		if (choice == 1) then
			for i = 1, table.maxn(bless) do
				if getPlayerBlessing(cid, bless[i]) == false and getPlayerPVPBlessing(cid) == false then
					if (doPlayerRemoveMoney(cid, all_blessings_price) == true) then
						for i = 1, table.maxn(bless) do
							doPlayerAddBlessing(cid, bless[i])
						end
						doPlayerSetPVPBlessing(cid)
						doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "You has been blessed by Gods with all blessings, including the twist of fate.")
						doSendMagicEffect(getPlayerPosition(cid), 28)
					else
						doPlayerSendCancel(cid, "You don't have 100k to buy the five blessings and twist of fate.")
						doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF)
					end
				else
					doPlayerSendCancel(cid, "You already have the five blessings or twist of fate. Please choose other one to buy.")
					doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF)
				end
			end			
		elseif (choice == 2) then
			for i = 1, table.maxn(bless) do
				if getPlayerBlessing(cid, bless[i]) == false and getPlayerPVPBlessing(cid) == true then
					if (doPlayerRemoveMoney(cid, five_blessings_price) == true) then
						for i = 1, table.maxn(bless) do
							doPlayerAddBlessing(cid, bless[i])
						end
						doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "You has been blessed with the five blessings. Before you had only the twist of fate.")
						doSendMagicEffect(getPlayerPosition(cid), 28)
					else
						doPlayerSendCancel(cid, "You don't have 50k to buy the five blessings.")
						doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF)
					end
				else
					doPlayerSendCancel(cid, "You already have the five blessings. Please choose other one to buy.")
					doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF)
				end
			end			
		elseif (choice == 3) then
			for i = 1, table.maxn(bless) do
				if getPlayerBlessing(cid, bless[i]) == true and getPlayerPVPBlessing(cid) == false then
					if (doPlayerRemoveMoney(cid, twist_of_fate_price) == true) then
						doPlayerSetPVPBlessing(cid)
						doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "You has been blessed with twist of fate. the only bless that you didn't had.")
						doSendMagicEffect(getPlayerPosition(cid), 28)
					else
						doPlayerSendCancel(cid, "You don't have 20k to buy the twist of fate.")
						doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF)
					end
				else
					doPlayerSendCancel(cid, "You already have the twist of fate. Please choose other one to buy.")
					doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF)
				end
			end			
		elseif (choice == 4) then
			if (doPlayerRemoveMoney(cid, amulet_of_loss_price) == true) then
				doPlayerAddItem(cid, 2173, 1)
				doSendMagicEffect(getPlayerPosition(cid), 28)
			else
				doPlayerSendCancel(cid, "You don't have 10k to buy an amulet of loss.")
				doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF)
			end
		elseif (choice == 5) then
			if (doPlayerRemoveMoney(cid, backpack_price) == true) then
				doPlayerAddItem(cid, 1988, 1)
				doSendMagicEffect(getPlayerPosition(cid), 28)
			else
				doPlayerSendCancel(cid, "You don't have 100gp to buy a backpack.")
				doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF)
			end
		elseif (choice == 6) then
			if (doPlayerRemoveMoney(cid, backpack_price) == true) then
				doPlayerAddItem(cid, 2002, 1)
				doSendMagicEffect(getPlayerPosition(cid), 28)
			else
				doPlayerSendCancel(cid, "You don't have 100gp to buy a blue backpack.")
				doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF)
			end
		elseif (choice == 7) then
			if (doPlayerRemoveMoney(cid, backpack_price) == true) then
				doPlayerAddItem(cid, 2003, 1)
				doSendMagicEffect(getPlayerPosition(cid), 28)
			else
				doPlayerSendCancel(cid, "You don't have 100gp to buy a grey backpack.")
				doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF)
			end
		elseif (choice == 8) then
			if (doPlayerRemoveMoney(cid, backpack_price) == true) then
				doPlayerAddItem(cid, 2001, 1)
				doSendMagicEffect(getPlayerPosition(cid), 28)
			else
				doPlayerSendCancel(cid, "You don't have 100gp to buy a purple backpack.")
				doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF)
			end
		elseif (choice == 9) then
			if (doPlayerRemoveMoney(cid, backpack_price) == true) then
				doPlayerAddItem(cid, 1998, 1)
				doSendMagicEffect(getPlayerPosition(cid), 28)
			else
				doPlayerSendCancel(cid, "You don't have 100gp to buy a green backpack.")
				doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF)
			end
		elseif (choice == 10) then
			if (doPlayerRemoveMoney(cid, backpack_price) == true) then
				doPlayerAddItem(cid, 1999, 1)
				doSendMagicEffect(getPlayerPosition(cid), 28)
			else
				doPlayerSendCancel(cid, "You don't have 100gp to buy a yellow backpack.")
				doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF)
			end
		elseif (choice == 11) then
			if (doPlayerRemoveMoney(cid, backpack_price) == true) then
				doPlayerAddItem(cid, 10519, 1)
				doSendMagicEffect(getPlayerPosition(cid), 28)
			else
				doPlayerSendCancel(cid, "You don't have 100gp to buy an orange backpack.")
				doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF)
			end
		elseif (choice == 12) then
			if (doPlayerRemoveMoney(cid, backpack_price) == true) then
				doPlayerAddItem(cid, 2000, 1)
				doSendMagicEffect(getPlayerPosition(cid), 28)
			else
				doPlayerSendCancel(cid, "You don't have 100gp to buy a red backpack.")
				doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF)
			end
		elseif (choice == 13) then
			if getTileInfo(getThingPos(cid)).protection == true then
				if (doPlayerRemoveMoney(cid, hometown_price) == true) then
					addEvent(goHomeTownI, 10 * 1000, cid)
					doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You will teleport in 30 seconds.")				
				else
					doPlayerSendCancel(cid, "You don't have 1000gp to teleport to your hometown.")
					doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF)
				end
			else
				doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You can't use this in protection zone.")
			end
		elseif (choice == 0 or choice == 0.1 or choice == 0.2) then
			addDialog(modaldialog, 2345, cid, callback);
		end
	end
end

function goHomeTownI(cid, position, fromPosition, toPosition)
	if getTileInfo(getThingPos(cid)).protection == true then
		addEvent(goHomeTownII, 10 * 1000, cid)
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You will teleport in 20 seconds.")	
	else
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You can't teleport out of protection zone.")
	end
end
function goHomeTownII(cid, position, fromPosition, toPosition)
	if getTileInfo(getThingPos(cid)).protection == true then
		addEvent(goHomeTownIII, 10 * 1000, cid)
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You will teleport in 10 seconds.")	
	else
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You can't teleport out of protection zone.")
	end
end
function goHomeTownIII(cid, position, fromPosition, toPosition)
	if getTileInfo(getThingPos(cid)).protection == true then
		doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
		doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
		doSendMagicEffect(getTownTemplePosition(getPlayerTown(cid)), CONST_ME_TELEPORT)	
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have been teleported to the "..getTownName(getPlayerTown(cid)).." town.")	
	else
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You can't teleport out of protection zone.")
	end
end

function onUse(cid, item, fromPosition, itemEx, toPosition)
	addDialog(modaldialog, 2345, cid, callback);
	return true
end 

 

Depois abra o arquivo actions.xml e adicione a seguinte tag :

<action itemid="9002" event="script" value="holybook.lua"/> 

 

...e pronto, estará funcionando direitinho !

 

Testado e funcionando no TFS 0.3 (Versão 10.10).

 

Créditos : 

Jamison Collins (50%)

Daaniel (50%)

愛"A alma permanece em suas criações" 平V89E5aN.png


142c9d3439.jpg
(Não dou suporte por mensagem privada.)

Link para o post
Compartilhar em outros sites
kaiquegabriel

kaiquegabriel 171

Postado
Postado

Gostei pra caramba, bem útil, tira um pouco do RPG dos NPCs que servem pra isso mas é bem útil mesmo. Coloca o valor das blessings na frente do item, acho que fica mais fácil pra saberem o preço. sempre tem um novato que fica tentando comprar que nem idiota

Skype @kaiquegabriel__ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~Atenciosamente,

kaiquegabriel.

Não dou suporte via pm.

Em caso de dúvidas, crie um tópico e espere o suporte.

Link para o post
Compartilhar em outros sites
Jamison Collins

Jamison Collins 387

Postado
  • Autor
Postado

Sim, eu coloquei, porém não está na imagem, eu fiz a modificação quando estava criando o tópico...

Aqui está a parte responsável por isso :

		{ id = 1, value = "All blessings [70K]" },
		{ id = 2, value = "Five blessings [50K]" },
		{ id = 3, value = "Twist of Fate [20K]" },
		{ id = 4, value = "Amulet of Loss [10K]" }

愛"A alma permanece em suas criações" 平V89E5aN.png


142c9d3439.jpg
(Não dou suporte por mensagem privada.)

Link para o post
Compartilhar em outros sites
Jamison Collins

Jamison Collins 387

Postado
  • Autor
Postado

@Update 0.1.1 (10 de outubro de 2013 - 09:50) :

  • Adicionado marcadores para separar as categorias dos itens vendidos.
  • Adicionado o preço do item ao lado de seus nomes.
  • Adicionado alguns itens do tipo conteiners  (backpacks).
  • Adicionado efeitos quando houver alguma falha na compra.
  • Fixado o bug do "EnterButton" (agora você pode confirma a compra com o "Enter").
  • Fixado algumas mensagens.

Imagem :

5c3lPGD.png

愛"A alma permanece em suas criações" 平V89E5aN.png


142c9d3439.jpg
(Não dou suporte por mensagem privada.)

Link para o post
Compartilhar em outros sites
  • 2 weeks later...
Jamison Collins

Jamison Collins 387

Postado
  • Autor
Postado

@Update 0.1.2 (20 de outubro de 2013 - 19:03) :

 

Spoiler 

 

  • Adicionado a aba Teleports (Hometown).
  • Fixado ao selecionar uma das abas.

愛"A alma permanece em suas criações" 平V89E5aN.png


142c9d3439.jpg
(Não dou suporte por mensagem privada.)

Link para o post
Compartilhar em outros sites
  • 1 month later...
larafaz

larafaz 13

Postado
Postado

aq deu erro no distro 0.o

 

[5:49:48.692]   data/actions/scripts/bookbless.lua:219: in function <data/actions/scripts/bookbless.lua:218>
 
fiz tudo certo ctrl +c e ctrl +v porem mudei so o nome do arquivo nada mas...
 
client 8.6 aqui
Link para o post
Compartilhar em outros sites
Jamison Collins

Jamison Collins 387

Postado
  • Autor
Postado

Qual distro você usa ?

愛"A alma permanece em suas criações" 平V89E5aN.png


142c9d3439.jpg
(Não dou suporte por mensagem privada.)

Link para o post
Compartilhar em outros sites
larafaz

larafaz 13

Postado
Postado
[4:10:06.836] The Forgotten Server, version 0.4_SVN ()
[4:10:06.836] Compiled with GNU C++ version 4.4.0 at Mar  8 2011, 00:36:40.
[4:10:06.837] A server developed by Elf, Stian, Slawkens and KaczooH, .
[4:10:06.837] Visit our forum for updates, support and resources: http://vapus.n
et/forum.
 
nao sei se iss tem a ver eh meu server ligado
Link para o post
Compartilhar em outros sites
Jamison Collins

Jamison Collins 387

Postado
  • Autor
Postado

Amigo, infelizmente seu distro não suporta o script. 

Desculpa por eu não ser competente o bastante para fazer o script para outros distros.

愛"A alma permanece em suas criações" 平V89E5aN.png


142c9d3439.jpg
(Não dou suporte por mensagem privada.)

Link para o post
Compartilhar em outros sites
larafaz

larafaz 13

Postado
Postado

tipo meu projeto tem mt coisa que eu preciso mais nao tem suport como tambem os escudos de war e o sistema de cast bom teria como eu mudar de distro ?

se sim sabe como posso fazer ?

 

abrigado ;D

 

se eu conseguir mudar vou usar esse seu sistema ae \o

Link para o post
Compartilhar em outros sites
Jamison Collins

Jamison Collins 387

Postado
  • Autor
Postado

Você precisa apenas de um TFS compilado mais recente ou que seja da versão  rev5777 ou rev5883. Esses eu tenho certeza que darão suporte a esse script.

愛"A alma permanece em suas criações" 平V89E5aN.png


142c9d3439.jpg
(Não dou suporte por mensagem privada.)

Link para o post
Compartilhar em outros sites
larafaz

larafaz 13

Postado
Postado

 

 

Você precisa apenas de um TFS compilado mais recente ou que seja da versão  rev5777 ou rev5883. Esses eu tenho certeza que darão suporte a esse script.

 entao broder oque eu faço eu pego meu projeto guardo numa pasta, dae eu vo baxo um tfs que vc falo e boto na posta do projeto e executo ele ?

ele vai ler tudo que tem no meu projeto ?

Link para o post
Compartilhar em outros sites
Jamison Collins

Jamison Collins 387

Postado
  • Autor
Postado

Não, cuidado... tem que ter cuidado na hora de fazer essas coisas, você tem que passar aos poucos e testando.

愛"A alma permanece em suas criações" 平V89E5aN.png


142c9d3439.jpg
(Não dou suporte por mensagem privada.)

Link para o post
Compartilhar em outros sites
  • 3 weeks later...
  • 1 month later...
Jamison Collins

Jamison Collins 387

Postado
  • Autor
Postado

@up!

愛"A alma permanece em suas criações" 平V89E5aN.png


142c9d3439.jpg
(Não dou suporte por mensagem privada.)

Link para o post
Compartilhar em outros sites
  • 1 month later...
Artur Henrique

Artur Henrique 53

Postado
Postado
[05/04/2014 19:03:28] [Error - Action Interface] 
[05/04/2014 19:03:28] data/actions/scripts/book.lua:onUse
[05/04/2014 19:03:28] Description: 
[05/04/2014 19:03:28] data/actions/scripts/book.lua:219: attempt to call global 'addDialog' (a nil value)
[05/04/2014 19:03:28] stack traceback:
[05/04/2014 19:03:28] data/actions/scripts/book.lua:219: in function <data/actions/scripts/book.lua:218>
 
quase chorei aqui véi :S
Link para o post
Compartilhar em outros sites
  • 1 month later...
Jamison Collins

Jamison Collins 387

Postado
  • Autor
Postado

@up

愛"A alma permanece em suas criações" 平V89E5aN.png


142c9d3439.jpg
(Não dou suporte por mensagem privada.)

Link para o post
Compartilhar em outros sites

Participe da conversa

Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.

Visitante
Responder

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emojis são permitidos.

×   Seu link foi automaticamente incorporado.   Mostrar como link

×   Seu conteúdo anterior foi restaurado.   Limpar o editor

×   Não é possível colar imagens diretamente. Carregar ou inserir imagens do URL.

×
 Share
Seguidores 0
Ir para a lista de tópicos

  • Quem Está Navegando   0 membros estão online

    Nenhum usuário registrado visualizando esta página.

TibiaKing

Open Tibia Server

Quer aprender a criar seu próprio servidor de Tibia? Então está no lugar certo, aqui você encontrará milhares de tutorias, scripts, códigos, mapas e utilitários para que você possa fazer o seu próprio servidor de Tibia começando do zero.

Redes Sociais

Anuncie no TibiaKing

Precisa de mais visibilidade em seus projetos? Quer fazer um plano publicitário para o seu servidor? Anuncie no OTKing e faça sua divulgação, possuímos centenas de acessos simultâneos e milhares diários, com certeza será a sua solução!

×
×
  • Criar Novo...

Informação Importante

Confirmação de Termo

  Eu aceito