Untitled

mail@pastecode.io avatar
unknown
plain_text
a year ago
7.7 kB
2
Indexable
Never
------------------------------------------------------------
----- Quest made with DaRealPains Quest Tool | Donationware 
----- Made for Just4Metin - Halloween 2015
-----------------------------------------------------------

quest halloween_mission begin
	state start begin

		when 20011.chat."Halloween nefericit" begin
			say_title("Halloween nefericit")
			say("Ach bine ca a venit "..pc.get_name()"!")
			say("Chiar pe tine te cautam. Am nevoie de cineva care ma poate ajuta!")
			say("Un prieten bun, pe nume Jack a fost rapit, dar din pacate nu stiu")
			say("de catre cine, sau unde a fost dus!")
			say("Poti afla te rog pentru mine aceste detalii?")
		local first_set = select("Desigur", "Nu doresc sa te ajut")
			if first_set == 2 then
				say("Cum doresti, dar nici eu nu te voi ajuta,")
				say("cand vei avea nevoie de mine!")
				return
			else if first_set == 1 then
				say("Iti multumesc!")
				say("Du-te in al doi-lea sat si caut-o pe Harang!")
				say("Ea te v-a ajuta mi departe")
				set_state(talk_to_harang)
			return
		end
	end
	
	state talk_to_harang begin
		when letter begin
			local v = find_npc_by_vnum(20024)
			if v != 0 then target.vid("__TARGET__", v, "Harang")
			end
			send_letter("Ce stii despre Jack?")
		end
		when button or info begin
			say_title("Ce stii despre Jack?")
			say("")
			say("Uriel are nevoie de ajutorul tau.")
			say("Jack a fost rapit, iar singura")
			say("persoana care detine Informatii")
			say("este Harang. Gaseste-o si cere-i")
			say("ajutorul!")
			say("")
			say_reward("Vorbeste cu Harang")
			say("")
		end
		when __TARGET__.target.click or 20024.chat."Ce stii despre Jack?" begin
			target.delete("__TARGET__")
			say_title("Ce stii despre Jack?")
			say("Cinte te trimite? Nu spune ca cineva doreste")
			say("sa se casatoreasca cu mine din nou...")
			say("")
			say("Aha, Uriel te trimite. Ce doreste?")
			wait()
		local second_set = select("Ma trimite pentru a-ti spune ca are nevoie de o noua vaza", "Uriel a spus ca Jack a fost rapit, si crede ca tu stii unde se afla","Uriel a uitat unde locuieste")
			if second_set == 1 then
				say("Aha ... ouk. Spune-i ca nu sunt")
				say("persoana potrivita. Trimite-l la Yonah.")
				return
			elseif second_set == 3 then
				say("Imi pare rau dar eu nu l-am vizitat niciodata!")
				say("Asa ca nu stiu unde locuieste.")
				return
			elseif second_set == 2 then
				say("Uriel crede bine ...")
				say("Ma aflam in bucatarie cand s-a intamplat.")
				say("Eu venit, au spart usa, au distrus tot, iar apoi au ars totul.")
				say("Erau niste creaturi de foc - mari, urate si proaste!")
				say("Cu putin noroc am reusit sa scap, dar pe Jack l-au luat cu ei.")
				say("Dar din fericire stiu cum il poti gasi. Atunci cand a fost rapit,")
				say("a inceput sa arunce dovleci pe drumul lui, in speranta ca cineva")
				say("il v-a gasi si salva. Dar din cate am vazut, multe animale si alte")
				say("creaturi au luat dovlecii cu ei. V-a trebui sa-i omori pentru a")
				say("recupera dovlecii.")
				say("Daca reusesti sa strangi 10 dovleci, dui Femeii Batrane, si daca")
				say("este satula, iti v-a spune unde il gasesti pe Jack!")
				set_state(get_pumpkins)
				game.set_event_flag("drop_pumpkin", 1)
			return
		end
	end

	state get_pumpkins begin
		when kill with game.get_event_flag("drop_pumpkin") == 1 and not npc.is_pc() begin
			local rand = number(0,99)
				if rand<35 then game.drop_item_with_ownership(50095, 1)
				return
			end
				if pc.count_item(50095)>9 then
			game.set_event_flag("drop_pumpkin", 0)
			set_state(talk_to_old_woman)
			return
		end
	end
	
	state talk_to_old_woman begin
		when letter begin
			local v = find_npc_by_vnum(9006)
			if v != 0 then target.vid("__TARGET__", v, "Femeie Batrana")
			end
			send_letter("Ai gasit toti dovlecii!")
		end
		when button or info begin
			say_title("Felicitari!")
			say("")
			say("Ai gasit 10 dovleci lasati de Jack.")
			say("Grabestete si inmanai Femeii Batrane.")
			say("")
			say("Si roaga-te sa nu ii fie foarte foame!")
			say_reward("Gaseste Femeia Batrana")
		end
		when __TARGET__.target.click or 9006.chat."Pofta buna!" begin
			target.delete("__TARGET__")
			say_title("Pofta buna!")
			say("Ach tu esti. Si vad ca ai adus o multime")
			say("de dovleci cu tine. Voi avea ce manca")
			say("o saptamana din ei. Cred ca pentru inceput")
			say("voi face o supa de dovleac!")
			say("Dar asi mai avea nevoie de cativa morcovi,")
			say("pentru a putea face supa cat mai delicioasa!")
			say_reward("Omoara monstrii si obtine 5 morcovi!")
			pc.remove_item(50095, 10)
			set_state(get_carrot)
			game.set_event_flag("drop_carrot", 1)
			return
		end
	end

	
	state get_carrot begin
		when kill with game.get_event_flag("drop_carrot") == 1 and not npc.is_pc() begin
			local rand = number(0,99)
				if rand<30 then game.drop_item_with_ownership(50055, 1)
				return
			end
				if pc.count_item(50055)>4 then
			game.set_event_flag("drop_carrot", 0)
			set_state(dareal_pain)
			return
		end
	end
			
	state dareal_pain begin
		when letter begin
			local v = find_npc_by_vnum(9006)
			if v != 0 then target.vid("__TARGET__", v, "Femeie Batrana")
			end
			send_letter("Ai gasit morvocii!")
		end
		when button or info begin
			say_title("Felicitari!")
			say("")
			say("Ai gasit morcovii.")
			say("Intoarce-te la Femeia Batrana.")
			say("")
			say_reward("Gaseste Femeia Batrana")
		end
		when __TARGET__.target.click or 9006.chat."Am gasit morcovii!" begin
			target.delete("__TARGET__")
			say_title("Multumesc!")
			say("Iti multumesc ca m-ai ajutat!")
			say("Iar dupa cum ti-am promis, te")
			say("voi ajuta si eu pe tine.")
			wait()
			say("Batranele vrajitoare imi spun")
			say("ca Jack se afla in Tara de Foc.")
			say("Undeva in nord ... in apropierea")
			say("unui Pod.")
			pc.remove_item(50055, 5)
			pc.setqf("old_done", 1)
			set_state(find_jack)
			return
		end
	end

	state find_jack begin
		when letter begin
			local v = find_npc_by_vnum(33008)
			if v != 0 then target.vid("__TARGET__", v, "Dovleacul Jack")
			end
			send_letter("Gaseste-l pe Jack!")
		end
		when button or info begin
			say_title("Gaseste-l pe Jack!")
			say("")
			say("Femeia batrana ti-a dat un indiciu.")
			say("Acum totul este in mana ta.")
			say("Grabeste-te si gaseste-l pe Jack!")
			say("")
			say_reward("Gaseste-l pe Jack")
		end
		when __TARGET__.target.click or 33008.chat."Te-am gasit!" with pc.getqf("old_done")==1 and not npc.is_pc() begin
			target.delete("__TARGET__")
			say_title("M-ai gasit!")
			say("Super! Ai reusit sa ma gasesti la timp.")
			say("Daca venei mai tarziu, poate eram transformat")
			say("deja in supa de dovleac!")
			wait()
			say("Ach si ... stiu ca ai facut deja destule")
			say("pentru mine, dar asi m-ai avea o ultima")
			say("rugaminte: Ai putea sa imi aduci dovlecii")
			say("care i-am pierdut pe drum? Pentru fiecare")
			say("20 de dovleci, iti voi da un Cufar magic!")
			return
			set_state(many_pumpkins)
			game.set_event_flag("many_pumpkins", 1)
			end
		end
	end
			
	state many_pumpkins begin
		when kill with game.get_event_flag("many_pumpkins") == 1 and not npc.is_pc() begin
			local rand = number(0,99)
				if rand<30 then game.drop_item_with_ownership(50095, 1)
			return
		end
	end
	
	state magic_treasure begin
		when 33008.chat."Am 20 de dovleci" with pc.count_item(50095)>20 begin
			say_title("Jack")
			say("Ce placere sa te revad!")
			say("Si dupa cum vad mi-ai adus 20 de dovleci.")
			say("Dupa cum ti-am promis, iti voi da un cufar")
			say("magic in schimbul celor 20 de dovleci!")
			wait()
			say("Un Halloween Fericit!")
			pc.remove_item("50095", 20)
			pc.give_item2("50034", 1)
			return
		end
	end
end