[Poprawa]Quest na Biologa bez kamyka

[DynamicPOL]

prosiłbym o edycję tego Questa:

quest collect_quest_lv40 begin
	state start begin
	end
	state run begin
		when login or levelup with pc.level >= 40 begin
			set_state(information)
		end
	end
	state information begin
		when letter begin
			local v = find_npc_by_vnum(20084)
			if v != 0 then
				target.vid("__TARGET__", v, "Analiza Biologa")
			end
			send_letter("Analiza Biologa")
		end
		when button or info begin
			say_title("Analiza Biologa")
			say("")
			say("Biolog Chaegirab, uczeń Baek-Goa,")
			say("właśnie Cie szukał. Proszę idź ")
			say("do niego i zaoferuj mu swoją pomoc.")
			say("")
		end
		when __TARGET__.target.click or 20084.chat."Znajdź Biologa" begin
			target.delete("__TARGET__")
			say("Biolog Chaegirab:")
			say("Niebiosa, proszę pomóż mi... ")
			say("Badam wszystkie rodzaje roślin w tym ")
			say("imperium. Jest bardzo dużo rzeczy, ")
			say("które muszą zostać zbadane. Nie mam ")
			say("czasu abym mógł sam wybrać się na wyprawę. ")
			say("Proszę,pomóż mi. ")
			wait()
			say("Biolog Chaegirab:")
			say("Aktualnie badam Księgi Klątw.")
			say("Muszę przeprowadzić kilka eksperymentów,")
			say("dlatego potrzebuję kilku egzemplarzy.")
			say("Czy mógłbyś przynieść mi piętnaście Księg Klątw?")
			say("Proszę, pomóż mi! Zawsze przynoś mi po jednej,")
			say("abym miał czas na ich dokladne przebadanie!")
			say("")
			say_item("Księga Klątw", 30047, "")
			set_state(go_to_disciple)
			pc.setqf("duration",0)
			pc.setqf("collect_count",0)
			pc.setqf("drink_drug",0)
		end
	end
	state go_to_disciple begin
		when letter begin
			send_letter("Zadanie specjalne!")
		end
		when button or info begin
			say_title("Znajdź Księgi Klątw")
			say("")
			say("Biolog Chaegirab, uczeń Baek-Goa,")
			say("szuka Księgi Klątw.")
			say("Zawsze przynoś mu po jednym, aby miał czas")
			say("na ich dokladne przebadanie.")
			say("Księgi Klątw szukaj u Ezotów koło Świątyni.")
			say("")
			say_item_vnum(30047)
			say_reward("Do tej pory dostarczyłeś: "..pc.getqf("collect_count").." Księg Klątw.")
			say("")
		end
		when 71035.use begin
			if get_time() < pc.getqf("duration") and pc.getqf("drink_drug") < 1 then
			say_reward("Eliskir Poszukiwacza:")
			say("Ten magiczny przedmiot zmniejsza czas")
			say("oddania następnego przedmiotu u biologa,")
			say("po jego użyciu możesz natychmiast")
			say("oddać przedmiot!")
			say("Ponadto daję większą szansę na przyjęcie przedmiotu!")
			say_reward("Czy chcesz użyć Eliksiru?")
			say_reward("Zostanie on usunięty po użyciu.")
			local wy = select("Użyj.", "Nie używaj.")
			if wy == 2 then
			return
			elseif wy == 1 then
			pc.setqf("duration", 0)
			pc.setqf("drink_drug",1)
			say("Możesz już oddać przedmiot biologowi!")
			say_reward("Eliksir Poszukiwacza zostaję usunięty!")
			pc.remove_item(71035, 1)
			end
			else
			say_reward("Eliksir Poszukiwacza:")
			say("Nie możesz użyć przedmiotu, ponieważ ")
			say("biolog już może przyjąć przedmiot.")
			return
			end
		end
		when 2301.kill or 2302.kill or 2303.kill or 2304.kill or 2305.kill or 2311.kill or 2312.kill or 2313.kill or 2314.kill or 2315.kill begin
			local s = number(1, 15)
			if s == 1 then
				pc.give_item2(30006)
			end
		end
		when 20084.chat." Księga Klątw " with pc.count_item(30047) >0 begin
			local roznica = pc.getqf("duration") - get_time()
			local minuty = roznica/60
			local minuty2 = math.floor(minuty)
			if get_time() > pc.getqf("duration") then
					say("Biolog Chaegirab:")
					say("Oh!! Znalazłeś!")
					say("Pozwól, że rzuce okiem...")
					say("Jeszcze chwilkę.")
					say("")
			pc.remove_item(30047, 1)
			pc.setqf("duration",get_time()+60*60*1)
			wait()
			local pass_percent
			if pc.getqf("drink_drug")==0 then
				pass_percent=60
			else
				pass_percent=90
			end
			local s= number(1,100)
			if s<= pass_percent then
				if pc.getqf("collect_count")< 14 then
					local index =pc.getqf("collect_count")+1
					pc.setqf("collect_count",index)
					say("Biolog Chaegirab:")
					say_green("Oh!! Ta Księga Klątw jest doskonałej jakości!")
					say("Jesteś wspaniały!")
					say("Przynieś mi jeszcze: "..15-pc.getqf("collect_count").. " Księg Klątw")
					say("Proszę, spróbuj je znaleźć!")
					say("")
					pc.setqf("drink_drug",0)
					return
					end
					say("Biolog Chaegirab:")
					say("Znalazłeś już piętnaście Księg Klątw!!")
					say("Dziękuje Ci, że jesteś taki pomocny.")
					say("Musisz teraz zdobyc Świątynny Kamień Dusz")
					say("Słyszałem, że owy kamien często wypada z")
					say("Pająków znajdujących się na pustyni oraz lochach. ")
					say("Zrobisz to dla mnie?")
					say("")
					say_item("Świątynny Kamień Duszy", 30221, "")
					say_reward("Zabijaj Smiert. Trujący Pająk")
					say_reward("Czerwony Trujący Pająk")
					say_reward("Szpon. Trujący Pająk")
					say_reward("Pająk Żołnierz")
					pc.setqf("collect_count",0)
					pc.setqf("drink_drug",0)
					pc.setqf("duration",0)
					set_state(key_item)
					return
				else
					say("Biolog Chaegirab:")
					say("Wybacz niestety...")
					say_red("Twoja Księga była zbyt porwana...")
					say("Proszę, przynieś mi inną!")
					say("Nie zawiedź mnie!")
					say("")
					pc.setqf("drink_drug",0)
					return
				end
			else
				say("Biolog Chaegirab:")
				say("Jeszcze nie skończyłem badać ostatniej Księgi !")
				say("Przyjdź do mnie za : "..minuty2.." minut!")
				say("")
				return
			end
		end
	end
		state key_item begin
		when letter begin
			send_letter("Świątynny Kamień Duszy")
			if pc.count_item(30221)>0 then
			local v = find_npc_by_vnum(20084)
			if v != 0 then
				target.vid("__TARGET__", v, "Świątynny Kamień Duszy")
			end
			end
		end
		when button or info begin
			if pc.count_item(30221) >0 then
			say_title("Wróć do Biologa!")
			say("")
			say("Zdobyłeś Świątynny Kamień Duszy! ")
			say("Idź szybko przynieś go Biologowi.")
			say("")
			return
			end
			say_title("Świątynny Kamień Duszy")
			say("")
			say("Zebrałeś juz odpowiednia ilość ")
			say("Księg Klątw.")
			say("Musisz teraz znalezć Świątynny Kamień Duszy ")
			say_item_vnum(30221)----------
			say("Świątynny Kamień Duszy")
			say("mozna zdobyc zabijając pająki na pustyni bądz lochach")
			say("Nie zawiedz biologa!")
		end
		when 2032.kill or 2033.kill or 2034.kill or 2035.kill begin
			local s = number(1, 50)
			if s == 1 and pc.count_item(30221)==0 then
				pc.give_item2(30221, 1)
				send_letter("Świątynny Kamień Duszy")
			end
		end
		when __TARGET__.target.click or
			20084.chat."Świątynny Kamień Duszy" with pc.count_item(30221) > 0 begin
			target.delete("__TARGET__")
			say("Biolog Chaegirab:")
			say("Oh,Zdobyleś go! ")
			say("Odnalazłeś Świątynny Kamień Duszy")
			say("Ciesze się bardzo")
			say("Dziękuję Ci za pomoc")
			say("W zamian otrzymasz nagrode!")
			say("Idz do mojego mistrza Baek-Goa")
			say("On za pomoc mi podaruje Ci cenna nagrodę.")
			say("")
			pc.remove_item(30221,1)
			set_state(__reward)
		end
	end
	state __reward begin
		when letter begin
			send_letter("Odbierz nagrodę!")
			local v = find_npc_by_vnum(20018)
			if v != 0 then
				target.vid("__TARGET__", v, "Baek-Go!")
			end
		end
		when button or info begin
			say_title("Odbierz nagrodę!")
			say("Biolog Chaegirab wysyła Cie")
			say("po nagrodę do Baek-Go!")
			say("Udaj się do niego")
			say("by otrzymac nagrodę za")
			say("Twój ciężki trud...")
			say("Baek-Go znajduje się w pierwszej wiosce")
			say("Masz go na mapie. Śpiesz się!")
			say("")
		end
		when __TARGET__.target.click or
			20018.chat."Baek-Go" begin
			target.delete("__TARGET__")
			say("Baek-Go:")
			say("Drogi przyjacielu")
			say("Za Twój Ciężki trud otrzymujesz")
			say("stały bon szybkości ataku")
			say("Został on podniesiony o 15 oraz")
			say("pewien przedmiot do dalszych walk.")
			say("")
			say_reward("+5 szybkość ataku na stałe")
			say_reward("Drog. Ebonit. Szkatułka")
			say("")
			affect.add_collect(apply.ATT_SPEED,5,60*60*24*365*60)
			pc.give_item2(50110)
			clear_letter()
			set_quest_state("collect_quest_lv50", "run")
			set_state(__complete)
		end
	end
	state __giveup__ begin
		when 20084.chat."Poddajesz sie?" begin
			say("Biolog Chaegirab:")
			say("Czy jesteś pewien, że chcesz się poddać!?")
			say("Nie będziesz miał szansy, aby zacząć ponownie!")
			say("Ta misja Cię opuści...")
		end
	end
	state __complete begin
	end
end

tak aby nie było potrzeba tego kamyka.. Na koniec i prosiłbym żeby opiicać jak to zrobić

Za pomoc posypią się lajki.

[Phoenix.]

Część questa zaczynającą się od:

state key_item begin

usuń, a od linijki:

state __reward begin

wklej treść questa pod ukończonym biologiem.