Quest Evento (TOP)

[csantos93 11]

quest evento_natal begin
	state start begin
		when login begin
                if game.get_event_flag("evento_natal") == 1 then
                    notice("O Evento de Natal está ativo.")
                end
            end
		when 9004.chat."Evento de Natal" with pc.is_gm() begin
			say_title("Evento de Natal")
			say("O Evento de Natal consiste no drop de Meias de Natal.")
			say("Os jogadores podem trocar suas Meias de Natal por")
			say("itens na Arvore de Natal. Ao ativar este evento irá")
			say("aparecer uma Arvore de Natal e um Pai Natal na")
			say("Montanha Sohan.")
			say_reward("O que você deseja fazer?")
		local s = select("Ativar Evento", "Desativar Evento", "Cancelar")
			if s == 1 then
				game.set_event_flag("evento_natal", 1)
				notice_all("O Evento de Natal começou.")
				notice_all("O Pai Natal viajava em seu trenó quando decidiu fazer uma pequena pausa na")
				notice_all("Montanha Sohan mas algo de ruim aconteceu. Encontre o Pai Natal na Montanha")
				notice_all("e descubra como o pode ajudar. Feliz Natal e Bom Jogo!")
			elseif s == 2 then
				game.set_event_flag("evento_natal", 0)
				notice_all("O Evento de Natal terminou.")
				notice_all("Infelizmente a época natalícia chegou ao fim e o Pai Natal seguiu viagem.")
				notice_all("Mas ele promete voltar no próximo Natal. Bom jogo!")
			end
		end

		when kill with not npc.is_pc() and game.get_event_flag("evento_natal") == 1 begin
			if pc.count_item(50010) >= 0 then
			local porc = math.random(1,1500)
				if porc <= 2 then
					game.drop_item_with_ownership("50010", 1)
					syschat("Você recebeu uma Meia de Natal.")
				end
			end
			
			when 20126.chat."Ho Ho Ho!"	begin
				say_title("Pai Natal:")
				say("Ho Ho Ho!")
				say("Mais um ano se passou...")
				say("Talvez se esteja a perguntar porque estou na")
				say("Montanha. Permita-me que lhe explique...")
				wait()
				say_title("Pai Natal:")
				say("Bem, vivemos tempos difíceis.")
				say("Hoje em dia são poucas as pessoas que querem")
				say("comprar livros e outas coisas do género.")
				say("Com o avançar da minha idade, fica cada vez")
				say("mais difícil voar por aí num trenó puxado por")
				say("renas. Por essa razão decidi parar aqui um")
				say("pouco para descansar.")
			end
		
			when 20126.chat.("E as Meias de Natal?") begin
				say_title("Pai Natal:")
				say("As Meias! Quase me esquecia!")
				say("Queria esconder os meus presentes nas Meias")
				say("por cima da lareira. Mas várias criaturas")
				say("nada natalícias roubaram-mas todas!")
				say("Tudo aconteceu muito rápido quando parei")
				say("aqui para descansar.")
				wait()
				say_title("Pai Natal:")
				say("Por favor ajude-me a recuperá-las.")
				say("Você parece-me alguém bastante forte e")
				say("capaz de lutar contra esses monstros.")
				say("Se você conseguir obter algumas dessas Meias")
				say("pode pendurá-las nos ramos desta linda")
				say("arvore em troca de alguns itens valiosos.")
			end
		end

		when 20094.chat."Trocar Meias" with game.get_event_flag("evento_natal") == 1 begin
			say_title("Arvore de Natal:")
			say ("Você encontrou algumas Meias?")
			say ("Gostaria de trocar suas Meias de Natal por")
			say ("algum desses itens valiosos?")
			local a = select ("10 Meias - Livro de Habilidades", "50 Meias - Pergaminho do Dragão", "100 Meias - Mármore da Benção", "150 Meias - 3 Reforços para Itens", "200 Meias - 5 Feitiço Para Itens", "Cancelar")
				if a == 1 then
					if pc.count_item(50010) >= 25 then
					pc.give_item2(50300, 1)
					pc.remove_item(50010, 25)
				else
					say("Você não tem Meias de Natal suficientes.")
				end
				elseif a == 2 then
					if pc.count_item(50010) >= 50 then
					pc.give_item2(71032, 1)
					pc.remove_item(50010, 50)
				else
					say("Você não tem Meias de Natal suficientes.")
				end
				elseif a == 3 then
					if pc.count_item(50010) >= 100 then
					pc.give_item2(70024, 1)
					pc.remove_item(50010, 100)
				else
					say("Você não tem Meias de Natal suficientes.")
				end
				elseif a == 4 then
					if pc.count_item(50010) >= 150 then
					pc.give_item2(71085, 3)
					pc.remove_item(50010, 150)
				else
					say("Você não tem Meias de Natal suficientes.")
				end
				elseif a == 5 then
					if pc.count_item(50010) >= 200 then
					pc.give_item2(71084, 5)
					pc.remove_item(50010, 200)
				else
					say("Você não tem Meias de Natal suficientes.")
				end
			end
		end
	end
end

1- Ativar / Desativar o Evento no NPC (Ajudante de Eventos)

2- O Pai Natal da Informações sobre o Evento.

3- Dropa meias em todos os Monstros.

4- Podem trocar meias por itens na arvore de Natal.

 

Notas:

O NPC arvore de natal esta enganado basta substituirem por o numero da arvore de natal.

A quest é uma alternativa a quest de natal para quem não quer pet's e venho quente em seu servidor e quer utilizar a arvore de natal e pai natal ao mesmo tempo.

Ainda não foi testada por isso não sei se esta a trabalhar correctamente, alguem que entenda de quest's de uma olhada pois foi feita por mim e sou bem amador. 

 

PEDIDO!

Se alguem consegue por o Pai Natal e Arvore de Natal a invocar na montanha ao ativar o evento que comente ai em baixo como meter isso.

[Odaline 2]

Consegues fazê-lo com o game.set_event_flag() e game.get_event_flag().

 

Por exemplo:

 

when login with pc.get_map_index() == XX begin

    if game.get_event_flag("spawn_arvore_pai_natal") == 0 then

    --spawn mobs aqui

    game.set_event_flag("spawn_arvore_pai_natal", 1)

    else

    end

end

 

Isto vai fazer com que, qualquer jogador que entre no mapa, se a Árvore e o Pai Natal não estiverem lá, vai dar spawn aos mesmos. 

 

Cumprimentos,

Odaline