Zioło - fabularny

[Phoenix.]

Siema.

Kolejny quest z serii fabularnych.

Polega na: idź, dropnij, przynieś - bla bla...

 

quest swiatynia begin
	state start begin
		when login or levelup with pc.level >= 55 begin
			set_state(swiatynia2)
		end
	end     

	state swiatynia2 begin
		when letter begin
			local v = find_npc_by_vnum(20355)
				if v != 0 then
				target.vid("__TARGET__", v, "Kapitan")
				end
			send_letter("Zadanie od Kapitana! ")
		end

		when button or info begin
			say_title("List: ")
			say("")
			say("Zioło! ")
			say("")
			say("Kapitan potrzebuje zioła! ")
			say("Idź do niego, zaoferuj mu swoją pomoc! ")
			say("")
		end

		when __TARGET__.target.click or
		20355.chat."Zioło" begin
		target.delete("__TARGET__")
			say_title("Kapitan: ")
			say("")
			say("Witaj! Dobrze Cię widzieć. ")
			say("Cholerna choroba! Od paru dni")
			say("nie daje mi żyć. Poczciwy Uriel ")
			say("powiedział mi, że jedynym ratunkiem")
			say("jest zioło, które")
			say("znajdziesz Świątyni. ")
			say("")
			say("Na Twoim poziomie, to żaden problem")
			say("zdobyć je dla mnie. ")
			say("")
			say_title("To jak, pomożesz mi? ")
			say("")
			local s=select("Jasne" , "Nie mam czasu... ")
			if s==1 then
				say_title("Kapitan: ")
				say("")
				say("Dziękuję Ci bardzo! ")
				say("Wszelkie informacje dostarczę Ci w liście! ")
				say("")
				set_state(accept)
			elseif 2==s then
				say_title("Kapitan: ")
				say("")
				say("Hmm... cóż, będę musiał poszukać ")
				say("kogoś innego do pomocy... ")
				say("")
				set_state(complete)
			end
		end
	end

	state accept begin
		when letter begin
			send_letter("Zioło")
		end

		when button or info begin
			say_title("List od Kapitana: ")
			say("")
			say("Aby zdobyć zioło, które mi pomoże, ")
			say("musisz udać się do Świątyni w ")
			say("Dolinie Orków i pokonać tamtejsze bestie! ")
			say("To właśnie oni wytwarzają najlepsze")
			say("zioło na moją chorobę! ")
			say("")
			say_reward("Zabijaj nazwa_moba, ")
			say("")
		end

		when kill with npc.get_race() == id_moba and pc.countitem(30152) == 0 begin
			local s = number(1, 100)
			if s == 30 then
			pc.give_item2(30152, 1)
			syschat("Znalazłeś zioło! ")
			syschat("Idź jak najszybciej do Kapitana! ")
			set_state(koniec)
			local v = find_npc_by_vnum(20355)
			if v != 0 then
			target.vid("__TARGET__", v, "Kapitan")
			end
			end
		end
	end
                
	state koniec begin
		when 20355.chat."Mam Zioło! " with pc.countitem(30152)>0 begin
			say_title("Kapitan: ")
			say("")
			say("Brawo! Znalazłeś! Wiedziałem, ")
			say("ze mogę na Tobie polegać! ")
			say("Nareszcie skończą się moje roblemy")
			say("z nieprzespanymi nocami! ")
			say("")
			say_title("W nagrode dostaniesz: ")
			say("xxx")
			say("")
			pc.give_item2(xxx, 1)
			pc.remove_item(30152, 1)
			set_state(complete)
		end
	end

	state complete begin
	end
end

 

http://wklej.to/CT5RU

 

Branoc

[KimJongUn]

ze ci sie chce pisac , sprobuj czegos trudniejszego bo poprzez pisanie ciagle teog samego bez podnoszoenia poprzeczki niczego sie nie nauczysz

[pawelxxx20]

ty na prafde jestes pro elo, napisales jeden quest i go edytujesz, brafa dla tego pana.