[Quest] Misja na Krwisty Kamień + Zwoje Redystrybucji

matuszny1987 · 15 Lutego 2012

Jest to quest na Krwisty Kamień wzorowany na quescie z metin2.pl biegamy po piekle zbieramy łzy i takie tam...

Musimy wgrać 2 questy jeden na samą misje a 2 aktywujący ją u Koe-Pung.

No to bez zbędnego gadania

Do swojego questa dodajemy nową opcje wyboru

Misja na Krwisty Kamień

Potem na końcu dodajemy:

set_quest_state("grota_krwisty", "run")

Bez aktywowania u danego npc quest nie będzie działał.

Quest na Krwisty Kamień :

--------------------------------------------
--  Misja na Krwisty Kamień
--	Copyright © GrottoOfExile 2012.
--	All rights reserved.
--  
--	Made by adriank1410 && Matuszny1987.
--	http://www.grottoofexile.pl
--	http://www.adriank.pl
--	http://www.youtube.com/adriank1410
--  Copyright ©2012. All rights reserved.
--
--	This quest and any others with comment
--	like this is GrottoOfExile private
--	Metin2 server copyright and is
--	protected by law in Poland and
--	in any other country.
--
--	If you have found or bought this file,
--	please contact us!
--
--	DO NOT REMOVE THIS COMMENT!
--	DO NOT COPY!
--	DO NOT PUBLISH!
--	DO NOT SELL!
--------------------------------------------
quest grota_krwisty begin	
state start begin
end
state run begin
when login or levelup begin
set_state(information)
end
end
state information begin
		when login or levelup begin
		local v=find_npc_by_vnum(20095)
		target.vid("__TARGET__", v, "Seon-Hae")
		send_letter("W Grocie")
	end
	when button or info begin
		say_title("W Grocie")
		say("")
		say("Udaj się do Seon-Hae aby dowiedzieć się ")
		say("Jak wytworzyć Krwisty Kamień dzięki którego moc")
		say("pozwoli tobie wejść do Groty Wygnańców.")
		say("")
		say_reward("Seon-Hae znajduje się w pierwszym mieście.")
	end

	when 20095.chat."W Grocie" begin
	target.delete("__TARGET__")
		say_title("Seon-Hae")
		say("")
		say("Słuchaj uważnie, mój drogi! Opowiem ci pewną ")
		say("historię, ale tylko jeden raz...")
		wait()
		say_title("Seon-Hae")
		say("W dzisiejszych czasach czcimy Boga Smoków,")
		say("jednak w dalekiej przeszłości byliśmy pod opieką ")
		say("trzech bóstw. Bahar-Taraji, bogini Stworzenia,")
		say("została zamordowana przez jej zazdrosnego brata")
		say("Beran-Setaou. A trzeci bóg, Balliit-Elvedin,")
		say("którego obecnie znamy jako Boga Smoków,")
		say("pogrążył się w głębokiej żałobie po swojej")
		say("siostrze.")
		wait()
		say_title("Seon-Hae")
		say("Pomiędzy dwoma braćmi wybuchła bita, którą ")
		say("wygrał Smoczy Bóg. Plotka głosi, że w miejscu")
		say("walki nadal widoczne są ślady bitwy. Po swojej")
		say("porażce, Beran-Setaou został zamknięty w jaskini,")
		say("która w dzisiejszych czasach znana jest jako")
		say("Grota Wygnańców.")
		wait()
		say_title("Seon-Hae")
		say("Zakon Baljiit-Elvedin strzeże wszystkich wejść ")
		say("do Groty. Jeżeli chcesz wejść do środka,")
		say("musisz posiadać Krwisty Kamień. Wiem jak je")
		say("wyprodukować, jednak nie jest to takie łatwe.")
		say("")
		say("Wszystko zaczęło się od łez, którymi Smoczy")
		say("Bóg opłakiwał śmierć swojej siostry. Z")
		say("chwilą upadku na ziemię nagle skamieniały.")
		say("Nadal można je znaleźć na Ognistej Ziemi")
		say("Doyyumhwan. Zdobądź siedem Łez i cztery kawałki")
		say("Obsydianu od Płomieni, które tam żyją. Gdy tylko")
		say("uporasz się z tym zadaniem, wróć do mnie.")
		say_reward("Zbierz 7 Skamieniałych łez i 4 sztuki Obsydianu w")
		say_reward("Doyyumwhan.")
		set_state(doyyumhwaji)
	end
end

state doyyumhwaji begin
	when letter begin
		send_letter("W Doyyumhwan")
	end
	when letter begin
		target.pos("__TARGET1__", 1384, 1061, 62, "Skamieniała Łza")
		target.pos("__TARGET2__", 694, 1040, 62, "Skamieniała Łza")
		target.pos("__TARGET3__", 222, 1051, 62, "Skamieniała Łza")
		target.pos("__TARGET4__", 434, 401, 62, "Skamieniała Łza")
		target.pos("__TARGET5__", 1120, 436, 62, "Skamieniała Łza")
		target.pos("__TARGET6__", 799, 799, 62, "Skamieniała Łza")
		target.pos("__TARGET7__", 120, 730, 62, "Skamieniała Łza")
	end
	when button or info begin
		say_title("W Grocie")
		say("")
		say("Udaj się na Ogniste Ziemie Doyyumhwan i poszukaj")
		say("Skamieniałych łez Smoczego Boga Baljiit Elvedin.")
		say("Zbierz od razu trochę Obsydianu, Znajdziesz go u")
		say("Płomieni.")
		say("")
		say_reward("Potrzebny Obsydian: 4")
	end
	when __TARGET1__.target.arrive begin
		target.delete("__TARGET1__")
		say("Tak to jest to miejsce!")
		say("Tutaj była ukryta łza..")
		pc.give_item2(30186, 1)
			if pc.count_item(30186) == 7 then
					say("")
					say("Zebrałeś potrzebną ilość Skamieniałych Łez!")
					if pc.count_item(30188) == 4 then
						say("Zebrałeś potrzebną ilość Obsydianu!")
						set_state(backtoseon)
					else
						say("Zbierz wszystkie ukryte Skamieniałe łzy")
						say("Oraz 4 Sztuki Obsydianu!")
						say("")
						say_reward("Obsydian znajdziesz u Płomieni!")
					end
			end
	end
	when __TARGET2__.target.arrive begin
		target.delete("__TARGET2__")
		say("Tak to jest to miejsce!")
		say("Tutaj była ukryta łza..")
		pc.give_item2(30186, 1)
			if pc.count_item(30186) == 7 then
					say("")
					say("To była osatnia łza.")
					if pc.count_item(30188) == 4 then
						say("Zebrałeś potrzebną ilość Obsydianu!")
						set_state(backtoseon)
					else
						say("Zbierz wszystkie ukryte Skamieniałe łzy")
						say("Oraz 4 Sztuki Obsydianu!")
						say("")
						say_reward("Obsydian znajdziesz u Płomieni!")
					end
			end
	end
	when __TARGET3__.target.arrive begin
		target.delete("__TARGET3__")
		say("Tak to jest to miejsce!")
		say("Tutaj była ukryta łza..")
		pc.give_item2(30186, 1)
			if pc.count_item(30186) == 7 then
					say("")
					say("To była osatnia łza.")
					if pc.count_item(30188) == 4 then
						say("Zebrałeś potrzebną ilość Obsydianu!")
						set_state(backtoseon)
					else
						say("Zbierz wszystkie ukryte Skamieniałe łzy")
						say("Oraz 4 Sztuki Obsydianu!")
						say("")
						say_reward("Obsydian znajdziesz u Płomieni!")
					end
			end
	end
	when __TARGET4__.target.arrive begin
		target.delete("__TARGET4__")
		say("Tak to jest to miejsce!")
		say("Tutaj była ukryta łza..")
		pc.give_item2(30186, 1)
			if pc.count_item(30186) == 7 then
					say("")
					say("To była osatnia łza.")
					if pc.count_item(30188) == 4 then
						say("Zebrałeś potrzebną ilość Obsydianu!")
						set_state(backtoseon)
					else
						say("Zbierz wszystkie ukryte Skamieniałe łzy")
						say("Oraz 4 Sztuki Obsydianu!")
						say("")
						say_reward("Obsydian znajdziesz u Płomieni!")
					end
			end
	end
	when __TARGET5__.target.arrive begin
		target.delete("__TARGET5__")
		say("Tak to jest to miejsce!")
		say("Tutaj była ukryta łza..")
		pc.give_item2(30186, 1)
			if pc.count_item(30186) == 7 then
					say("")
					say("To była osatnia łza.")
					if pc.count_item(30188) == 4 then
						say("Zebrałeś potrzebną ilość Obsydianu!")
						set_state(backtoseon)
					else
						say("Zbierz wszystkie ukryte Skamieniałe łzy")
						say("Oraz 4 Sztuki Obsydianu!")
						say("")
						say_reward("Obsydian znajdziesz u Płomieni!")
					end
			end
	end
	when __TARGET6__.target.arrive begin
		target.delete("__TARGET6__")
		say("Tak to jest to miejsce!")
		say("Tutaj była ukryta łza..")
		pc.give_item2(30186, 1)
			if pc.count_item(30186) == 7 then
					say("")
					say("To była osatnia łza.")
					if pc.count_item(30188) == 4 then
						say("Zebrałeś potrzebną ilość Obsydianu!")
						set_state(backtoseon)
					else
						say("Zbierz wszystkie ukryte Skamieniałe łzy")
						say("Oraz 4 Sztuki Obsydianu!")
						say("")
						say_reward("Obsydian znajdziesz u Płomieni!")
					end
			end
	end
	when __TARGET7__.target.arrive begin
		target.delete("__TARGET7__")
		say("Tak to jest to miejsce!")
		say("Tutaj była ukryta łza..")
		pc.give_item2(30186, 1)
			if pc.count_item(30186) == 7 then
					say("")
					say("To była osatnia łza.")
					if pc.count_item(30188) == 4 then
						say("Zebrałeś potrzebną ilość Obsydianu!")
						set_state(backtoseon)
					else
						say("Zbierz wszystkie ukryte Skamieniałe łzy")
						say("Oraz 4 Sztuki Obsydianu!")
						say("")
						say_reward("Obsydian znajdziesz u Płomieni!")
					end
			end
	end
	when 2204.kill begin
		local n = number(1,50)
		if n <= 7 then
			pc.give_item2(30188, 1)
				if pc.count_item(30188) == 4 then
					say_title("Obsydian")
					say("")
					say("Zebrałeś potrzebną ilość Obsydianu!")
					if pc.count_item(30186) == 7 then
						say("Zebrałeś potrzebną ilość Skamieniałych Łez")
						set_state(backtoseon)
					else
						say("Zbierz 7 Skamieniałych Łez")
					end
				end
		end
	end		
end

state backtoseon begin
	when letter begin
		send_letter("Wróć do Seon-Hae")

		local v=find_npc_by_vnum(20095)
		if 0==v then
		else
			target.vid("__TARGETs__", v, "Seon-Hae")
		end
		target.delete("__TARGET1__")
		target.delete("__TARGET2__")
		target.delete("__TARGET3__")
		target.delete("__TARGET4__")
		target.delete("__TARGET5__")
		target.delete("__TARGET6__")
		target.delete("__TARGET7__")
	end
	when button or info begin
		say_title("Wróc do Seon-Hae")
		say("")
		say("Zebrałeś 7 skamieniałych łez Smoczego Boga Baljiit Elvedin")
		say("oraz 4 sztuki Obsydianu od Płomieni!")
		say("")
		say_reward("Wróć do Seon-Hae!")
	end
	when 20095.chat."W Grocie" with pc.count_item(30186) >= 7 and  pc.count_item(30188) >= 4 begin
		target.delete("__TARGETs__")
		pc.remove_item(30186,7)
		pc.remove_item(30188,4)
		say_title("Seon-Hae")
		say("")
		say("Och tak ! ")
		say("Zebrałeś 7 skamieniałych łez Smoczego Boga Baljiit Elvedin")
		say("oraz 4 sztuki Obsydianu od Płomieni!")
		say("Ale to nie wszystko...")
		say("Udaj się do Czerwonego Lasu Lungsam aby zdobyć ")
		say("Krople Krwi Bahar-Taraji.")
		set_state(gototrent02)
		pc.give_item2(30189,1)
	end
end

state gototrent02 begin
	when letter begin
		send_letter("W Grocie")	
	end
	when letter begin
		target.pos("__TARGETtr2__", 650, 633, 68, "Kropla Krwi")
	end
	when button or info begin
		say_title("W Grocie")
		say("")
		say("Podążaj za Głosem Smoczego Boga Baljiit Elvedin")
		say("w Czerwonym Lesie Lungsam. Nawet jeśli nie uda")
		say("Ci się zobaczyć ducha bogini, będziesz w stanie")
		say("wyczuć jej obecność.")
	end
	when __TARGETtr2__.target.arrive begin
		target.delete("__TARGETtr2__")
		say("Znalazłeś pare kropli krwi Bahar-Tarajii...")
		say("")
		wait()
		say("Tak ! To jest na pewno ta krew...")
		say("Wróc do Seon-Hae z Kroplą Krwi Bahar-Taraji.")
		say("")
		say_reward("Seon-Hae znajdziesz w pierwszym mieście.")
		pc.give_item2(30187, 1)
		set_state(backtoseon2)
	end
end

state backtoseon2 begin
	when letter begin
		send_letter("Wróć do Seon-Hae")	
		target.vid("__TARGETseon2__", v, "Seon-Hae")

	end
	when button or info begin
		say_title("Wróć do Seon-Hae")
		say("")
		say("Znalazłeś Krople Krwi Bahar-Taraji")
		say("Wróć teraz do Seon-Hae aby wytworzyć ")
		say("Krwisty Kamień.")
	end
	when 20095.chat."Krople Krwi" with pc.count_item(30189) >= 1 and  pc.count_item(30187) >= 1 begin
		target.delete("__TARGETseon2__")
		pc.remove_item(30189,1)
		pc.remove_item(30187,1)
		say_title("Seon-Hae")
		say("")
		say("Krew prawdziej Bogini! Szybko, zrobię z niej")
		say("Krwisty Kamień zanim wyschnie.")
		say("")
		wait()
		say("Dzięki Krwistemu Kamieniowi strażnik Koe-Pung")
		say("udostępni Ci portal, który zaprowadzi Cię do")
		say("Groty Wygnańców. Pamiętaj jednak, że to")
		say("zadziała tylko raz. Jeżeli będziesz potrzebował ")
		say("większej ilości Krwistych Kamieni, wróc do mnie.")
		pc.give_item2(30190,1)
	end
end
	end

Quest musi zostać zapisany pod nazwą grota_krwisty aby poprawnie działał.

Zwoje Redystrybucji :

--------------------------------------------
--  Zwoje Redystrybucji
--	Copyright © GrottoOfExile 2012.
--	All rights reserved.
--  
--	Made by adriank1410 && Matuszny1987.
--	http://www.grottoofexile.pl
--	http://www.adriank.pl
--	http://www.youtube.com/adriank1410
--  Copyright ©2012. All rights reserved.
--
--	This quest and any others with comment
--	like this is GrottoOfExile private
--	Metin2 server copyright and is
--	protected by law in Poland and
--	in any other country.
--
--	If you have found or bought this file,
--	please contact us!
--
--	DO NOT REMOVE THIS COMMENT!
--	DO NOT COPY!
--	DO NOT PUBLISH!
--	DO NOT SELL!
--------------------------------------------
quest reset_status begin
state start begin
	when 71103.use or 71104.use or 71105.use or 71106.use begin
		local name = { "VIT", "INT", "STR", "DEX" }
		local idx = item.get_vnum() - 71103
		local func = { pc.get_ht, pc.get_iq, pc.get_st, pc.get_dx }

		if func[idx+1]() == 1 then
			say(name[idx+1].." Nie możesz przywócić tych statystyk.")
			say(name[idx+1].." gdyż Twoje punkty wynoszą tylko jeden.")
			say("")
			return
		end
		say_title("Powrót Statusu")
		say("Za pomocą zwoju możesz zresetować swoje ")
		say("umiejętności "..name[idx+1].." do jednego punktu.")
		say("")
		say_reward("Czy chcesz zresetować punkty "..name[idx+1].."?")

		local s = select("Tak", "Nie")

		if s == 1 then
			if pc.reset_status( idx ) == true then
				say_title("Powrót Statusu")
				say_reward("Twoje umiejętności "..name[idx+1].." zostały przywrócone do jednego punktu!")
				say("")
				pc.remove_item(item.get_vnum())
			else
				say_title("Powrót Statusu")
				say_reward("Dobrze, może innym razem..")
				say("")
			end
		end
	end
end
end

Wgrywanie questów na serwer by bambus3k.

http://www.mpcforum.pl/topic/163124-tutwgrywanie-questow-na-serwer/

I PAMIETAJCIE !

nfsfankp50098 · 16 Lutego 2012

Na pewno wykorzystam quest na zwoje Redystrybucji

Kawał dobrej roboty

HeniekLopata · 16 Lutego 2012

ja bym bardziej poddziadział że quest na zwoje jest edytowany przez was a nie napisany ;p

old_kwiatosz · 16 Lutego 2012

Fajne questy, właśnie nie wiedziałem jak to wykorzystać:

target.pos("__TARGET7__", 120, 730, 62, "Skamieniała Łza")

Vatu · 16 Lutego 2012

Jest to quest na Krwisty Kamień wzorowany na quescie z metin2.pl biegamy po piekle zbieramy łzy i takie tam...

Musimy wgrać 2 questy jeden na samą misje a 2 aktywujący ją u Koe-Pung.

No to bez zbędnego gadania

Do swojego questa dodajemy nową opcje wyboru

Misja na Krwisty Kamień

Potem na końcu dodajemy:

set_quest_state("grota_krwisty", "run")

Bez aktywowania u danego npc quest nie będzie działał.

Quest na Krwisty Kamień :

--------------------------------------------
--  Misja na Krwisty Kamień
--	Copyright © GrottoOfExile 2012.
--	All rights reserved.
--  
--	Made by adriank1410 && Matuszny1987.
--	http://www.grottoofexile.pl
--	http://www.adriank.pl
--	http://www.youtube.com/adriank1410
--  Copyright ©2012. All rights reserved.
--
--	This quest and any others with comment
--	like this is GrottoOfExile private
--	Metin2 server copyright and is
--	protected by law in Poland and
--	in any other country.
--
--	If you have found or bought this file,
--	please contact us!
--
--	DO NOT REMOVE THIS COMMENT!
--	DO NOT COPY!
--	DO NOT PUBLISH!
--	DO NOT SELL!
--------------------------------------------
quest grota_krwisty begin	
state start begin
end
state run begin
when login or levelup begin
set_state(information)
end
end
state information begin
		when login or levelup begin
		local v=find_npc_by_vnum(20095)
		target.vid("__TARGET__", v, "Seon-Hae")
		send_letter("W Grocie")
	end
	when button or info begin
		say_title("W Grocie")
		say("")
		say("Udaj się do Seon-Hae aby dowiedzieć się ")
		say("Jak wytworzyć Krwisty Kamień dzięki którego moc")
		say("pozwoli tobie wejść do Groty Wygnańców.")
		say("")
		say_reward("Seon-Hae znajduje się w pierwszym mieście.")
	end

	when 20095.chat."W Grocie" begin
	target.delete("__TARGET__")
		say_title("Seon-Hae")
		say("")
		say("Słuchaj uważnie, mój drogi! Opowiem ci pewną ")
		say("historię, ale tylko jeden raz...")
		wait()
		say_title("Seon-Hae")
		say("W dzisiejszych czasach czcimy Boga Smoków,")
		say("jednak w dalekiej przeszłości byliśmy pod opieką ")
		say("trzech bóstw. Bahar-Taraji, bogini Stworzenia,")
		say("została zamordowana przez jej zazdrosnego brata")
		say("Beran-Setaou. A trzeci bóg, Balliit-Elvedin,")
		say("którego obecnie znamy jako Boga Smoków,")
		say("pogrążył się w głębokiej żałobie po swojej")
		say("siostrze.")
		wait()
		say_title("Seon-Hae")
		say("Pomięzy dwona braćmi wybuchła bita, którą ")
		say("wygrał Smoczy Bóg. Plotka głosi, że w miejscu")
		say("walki nadal widoczne są ślady bitwy. Po swojej")
		say("porażce, Beran-Setaou został zamknięty w jaskini,")
		say("która w dzisiejszych czasach znana jest jako")
		say("Grota Wygnańców.")
		wait()
		say_title("Seon-Hae")
		say("Zakon Baljiit-Elvedin strzeże wszystkich wejść ")
		say("do Groty. Jeżeli chcesz wejść do śodka,")
		say("musisz posiadać Krwisty Kamień. Wiem jak je")
		say("wyprodkować, jednak nie jest to takie łatwe.")
		say("")
		say("Wszystko zaczęło się od łez, którymi Smoczy")
		say("Bóg opłakwiał śmierć swojej siostry. Z")
		say("chwilą upadku na ziemię nagle skamieniały.")
		say("Nadal można je znaleźć na Ognistej Ziemi")
		say("Doyyumhwan. Zdobądź siedem Łez i cztery kawałki")
		say("Obsydianu od Płomieni, które tam żyją. Gdy tylko")
		say("uporasz się z tym zadaniem, wróć do mnie.")
		say_reward("Zbierz 7 Skamieniałych łez i 4 sztuki Obsydianu w")
		say_reward("Doyyumwhan.")
		set_state(doyyumhwaji)
	end
end

state doyyumhwaji begin
	when letter begin
		send_letter("W Doyyumhwan")
	end
	when letter begin
		target.pos("__TARGET1__", 1384, 1061, 62, "Skamieniała Łza")
		target.pos("__TARGET2__", 694, 1040, 62, "Skamieniała Łza")
		target.pos("__TARGET3__", 222, 1051, 62, "Skamieniała Łza")
		target.pos("__TARGET4__", 434, 401, 62, "Skamieniała Łza")
		target.pos("__TARGET5__", 1120, 436, 62, "Skamieniała Łza")
		target.pos("__TARGET6__", 799, 799, 62, "Skamieniała Łza")
		target.pos("__TARGET7__", 120, 730, 62, "Skamieniała Łza")
	end
	when button or info begin
		say_title("W Grocie")
		say("")
		say("Udaj się na Ogniste Ziemie Doyyumhwan i poszukaj")
		say("Skamieniałych łez Smoczego Boga Baljiit Elvedin.")
		say("Zbierz od razu trochę Obsydianu, Znajdziesz go u")
		say("Płomieni.")
		say("")
		say_reward("Potrzebny Obsydian: 4")
	end
	when __TARGET1__.target.arrive begin
		target.delete("__TARGET1__")
		say("Tak to jest to miejsce!")
		say("Tutaj była ukryta łza..")
		pc.give_item2(30186, 1)
			if pc.count_item(30186) == 7 then
					say("")
					say("Zebrałeś potrzebną ilość Skamieniałych Łez!")
					if pc.count_item(30188) == 4 then
						say("Zebrałeś potrzebną ilość Obsydianu!")
						set_state(backtoseon)
					else
						say("Zbierz wszystkie ukryte Skamieniałe łzy")
						say("Oraz 4 Sztuki Obsydianu!")
						say("")
						say_reward("Obsydian znajdziesz u Płomieni!")
					end
			end
	end
	when __TARGET2__.target.arrive begin
		target.delete("__TARGET2__")
		say("Tak to jest to miejsce!")
		say("Tutaj była ukryta łza..")
		pc.give_item2(30186, 1)
			if pc.count_item(30186) == 7 then
					say("")
					say("To była osatnia łza.")
					if pc.count_item(30188) == 4 then
						say("Zebrałeś potrzebną ilość Obsydianu!")
						set_state(backtoseon)
					else
						say("Zbierz wszystkie ukryte Skamieniałe łzy")
						say("Oraz 4 Sztuki Obsydianu!")
						say("")
						say_reward("Obsydian znajdziesz u Płomieni!")
					end
			end
	end
	when __TARGET3__.target.arrive begin
		target.delete("__TARGET3__")
		say("Tak to jest to miejsce!")
		say("Tutaj była ukryta łza..")
		pc.give_item2(30186, 1)
			if pc.count_item(30186) == 7 then
					say("")
					say("To była osatnia łza.")
					if pc.count_item(30188) == 4 then
						say("Zebrałeś potrzebną ilość Obsydianu!")
						set_state(backtoseon)
					else
						say("Zbierz wszystkie ukryte Skamieniałe łzy")
						say("Oraz 4 Sztuki Obsydianu!")
						say("")
						say_reward("Obsydian znajdziesz u Płomieni!")
					end
			end
	end
	when __TARGET4__.target.arrive begin
		target.delete("__TARGET4__")
		say("Tak to jest to miejsce!")
		say("Tutaj była ukryta łza..")
		pc.give_item2(30186, 1)
			if pc.count_item(30186) == 7 then
					say("")
					say("To była osatnia łza.")
					if pc.count_item(30188) == 4 then
						say("Zebrałeś potrzebną ilość Obsydianu!")
						set_state(backtoseon)
					else
						say("Zbierz wszystkie ukryte Skamieniałe łzy")
						say("Oraz 4 Sztuki Obsydianu!")
						say("")
						say_reward("Obsydian znajdziesz u Płomieni!")
					end
			end
	end
	when __TARGET5__.target.arrive begin
		target.delete("__TARGET5__")
		say("Tak to jest to miejsce!")
		say("Tutaj była ukryta łza..")
		pc.give_item2(30186, 1)
			if pc.count_item(30186) == 7 then
					say("")
					say("To była osatnia łza.")
					if pc.count_item(30188) == 4 then
						say("Zebrałeś potrzebną ilość Obsydianu!")
						set_state(backtoseon)
					else
						say("Zbierz wszystkie ukryte Skamieniałe łzy")
						say("Oraz 4 Sztuki Obsydianu!")
						say("")
						say_reward("Obsydian znajdziesz u Płomieni!")
					end
			end
	end
	when __TARGET6__.target.arrive begin
		target.delete("__TARGET6__")
		say("Tak to jest to miejsce!")
		say("Tutaj była ukryta łza..")
		pc.give_item2(30186, 1)
			if pc.count_item(30186) == 7 then
					say("")
					say("To była osatnia łza.")
					if pc.count_item(30188) == 4 then
						say("Zebrałeś potrzebną ilość Obsydianu!")
						set_state(backtoseon)
					else
						say("Zbierz wszystkie ukryte Skamieniałe łzy")
						say("Oraz 4 Sztuki Obsydianu!")
						say("")
						say_reward("Obsydian znajdziesz u Płomieni!")
					end
			end
	end
	when __TARGET7__.target.arrive begin
		target.delete("__TARGET7__")
		say("Tak to jest to miejsce!")
		say("Tutaj była ukryta łza..")
		pc.give_item2(30186, 1)
			if pc.count_item(30186) == 7 then
					say("")
					say("To była osatnia łza.")
					if pc.count_item(30188) == 4 then
						say("Zebrałeś potrzebną ilość Obsydianu!")
						set_state(backtoseon)
					else
						say("Zbierz wszystkie ukryte Skamieniałe łzy")
						say("Oraz 4 Sztuki Obsydianu!")
						say("")
						say_reward("Obsydian znajdziesz u Płomieni!")
					end
			end
	end
	when 2204.kill begin
		local n = number(1,50)
		if n <= 7 then
			pc.give_item2(30188, 1)
				if pc.count_item(30188) == 4 then
					say_title("Obsydian")
					say("")
					say("Zebrałeś potrzebną ilość Obsydianu!")
					if pc.count_item(30186) == 7 then
						say("Zebrałeś potrzebną ilość Skamieniałych Łez")
						set_state(backtoseon)
					else
						say("Zbierz 7 Skamieniałych Łez")
					end
				end
		end
	end		
end

state backtoseon begin
	when letter begin
		send_letter("Wróc do Seon-Hae")

		local v=find_npc_by_vnum(20095)
		if 0==v then
		else
			target.vid("__TARGETs__", v, "Seon-Hae")
		end
		target.delete("__TARGET1__")
		target.delete("__TARGET2__")
		target.delete("__TARGET3__")
		target.delete("__TARGET4__")
		target.delete("__TARGET5__")
		target.delete("__TARGET6__")
		target.delete("__TARGET7__")
	end
	when button or info begin
		say_title("Wróc do Seon-Hae")
		say("")
		say("Zebrałeś 7 skamieniałych łez Smoczego Boga Baljiit Elvedin")
		say("oraz 4 sztuki Obsydianu od Płomieni!")
		say("")
		say_reward("Wróć do Seon-Hae!")
	end
	when 20095.chat."W Grocie" with pc.count_item(30186) >= 7 and  pc.count_item(30188) >= 4 begin
		target.delete("__TARGETs__")
		pc.remove_item(30186,7)
		pc.remove_item(30188,4)
		say_title("Seon-Hae")
		say("")
		say("Och tak ! ")
		say("Zebrałeś 7 skamieniałych łez Smoczego Boga Baljiit Elvedin")
		say("oraz 4 sztuki Obsydianu od Płomieni!")
		say("Ale to nie wszystko...")
		say("Udaj się do Czerwonego Lasu Lungsam aby zdobyć ")
		say("Krople Krwi Bahar-Taraji.")
		set_state(gototrent02)
		pc.give_item2(30189,1)
	end
end

state gototrent02 begin
	when letter begin
		send_letter("W Grocie")	
	end
	when letter begin
		target.pos("__TARGETtr2__", 650, 633, 68, "Kropla Krwi")
	end
	when button or info begin
		say_title("W Grocie")
		say("")
		say("Podążaj za Głosem Smoczego Boga Baljiit Elvedin")
		say("w Czerwonym Lesie Lungsam. Nawet jeśli nie uda")
		say("Ci się zobaczyć ducha bogini, będziesz w stanie")
		say("wyczuć jej obecność.")
	end
	when __TARGETtr2__.target.arrive begin
		target.delete("__TARGETtr2__")
		say("Znalazłeś pare kropli krwi Bahar-Tarajii...")
		say("")
		wait()
		say("Tak ! To jest na pewno ta krew...")
		say("Wróc do Seon-Hae z Kroplą Krwi Bahar-Taraji.")
		say("")
		say_reward("Seon-Hae znajdziesz w pierwszym mieście.")
		pc.give_item2(30187, 1)
		set_state(backtoseon2)
	end
end

state backtoseon2 begin
	when letter begin
		send_letter("Wróć do Seon-Hae")	
		target.vid("__TARGETseon2__", v, "Seon-Hae")

	end
	when button or info begin
		say_title("Wróć do Seon-Hae")
		say("")
		say("Znalazłeś Krople Krwi Bahar-Taraji")
		say("Wróć teraz do Seon-Hae aby wytworzyć ")
		say("Krwisty Kamień.")
	end
	when 20095.chat."Krople Krwi" with pc.count_item(30189) >= 1 and  pc.count_item(30187) >= 1 begin
		target.delete("__TARGETseon2__")
		pc.remove_item(30189,1)
		pc.remove_item(30187,1)
		say_title("Seon-Hae")
		say("")
		say("Krew prawdziej Bogini! Szybko, zrobię z niej")
		say("Krwisty Kamień zanim wyschnie.")
		say("")
		wait()
		say("Dzięki Krwistemu Kamieniowi strażnik Koe-Pung")
		say("udostępni Ci portal, który zaprowadzi Cię do")
		say("Groty Wygnańców. Pamiętaj jednak, że to")
		say("zadziała tylko raz. Jeżeli będziesz potrzebował ")
		say("większej ilości Krwistych Kamieni, wróc do mnie.")
		pc.give_item2(30190,1)
	end
end
	end

Quest musi zostać zapisany pod nazwą grota_krwisty aby poprawnie działał.

Zwoje Redystrybucji :

--------------------------------------------
--  Zwoje Redystrybucji
--	Copyright © GrottoOfExile 2012.
--	All rights reserved.
--  
--	Made by adriank1410 && Matuszny1987.
--	http://www.grottoofexile.pl
--	http://www.adriank.pl
--	http://www.youtube.com/adriank1410
--  Copyright ©2012. All rights reserved.
--
--	This quest and any others with comment
--	like this is GrottoOfExile private
--	Metin2 server copyright and is
--	protected by law in Poland and
--	in any other country.
--
--	If you have found or bought this file,
--	please contact us!
--
--	DO NOT REMOVE THIS COMMENT!
--	DO NOT COPY!
--	DO NOT PUBLISH!
--	DO NOT SELL!
--------------------------------------------
quest reset_status begin
state start begin
	when 71103.use or 71104.use or 71105.use or 71106.use begin
		local name = { "VIT", "INT", "STR", "DEX" }
		local idx = item.get_vnum() - 71103
		local func = { pc.get_ht, pc.get_iq, pc.get_st, pc.get_dx }

		if func[idx+1]() == 1 then
			say(name[idx+1].." Nie możesz przywócić tych statystyk.")
			say(name[idx+1].." gdyż Twoje punkty wynoszą tylko jeden.")
			say("")
			return
		end
		say_title("Powrót Statusu")
		say("Za pomocą zwoju możesz zresetować swoje ")
		say("umiejętności "..name[idx+1].." do jednego punktu.")
		say("")
		say_reward("Czy chcesz zresetować punkty "..name[idx+1].."?")

		local s = select("Tak", "Nie")

		if s == 1 then
			if pc.reset_status( idx ) == true then
				say_title("Powrót Statusu")
				say_reward("Twoje umiejętności "..name[idx+1].." zostały przywrócone do jednego punktu!")
				say("")
				pc.remove_item(item.get_vnum())
			else
				say_title("Powrót Statusu")
				say_reward("Dobrze, może innym razem..")
				say("")
			end
		end
	end
end
end

Wgrywanie questów na serwer by bambus3k.

http://www.mpcforum.pl/topic/163124-tutwgrywanie-questow-na-serwer/

I PAMIETAJCIE !

Mi się przydał tylko quest na Kamień.

Ale masz like.

damomo · 16 Lutego 2012

Wiecie co w pisaniu takich questów, jak tutaj Mateuszny dał jest najgorsze ?

Wypełnianie dialogów (jeśli wzorujemy się na PL), dlatego naprawdę.. Kawał dobrej roboty został odwalony.

Mało komu się chce tyle pisać. (a żeby jeszcze wiedzieć co pisać..)

matuszny1987 · 16 Lutego 2012

Tutaj była mała literówka

say_title("Seon-Hae")
					say("Pomięzy dwona braćmi wybuchła bita, którą ")
					say("wygrał Smoczy Bóg. Plotka głosi, że w miejscu")
					say("walki nadal widoczne są ślady bitwy. Po swojej")

I jeszcze parę innych

Już poprawiłem

Wiecie co w pisaniu takich questów, jak tutaj Mateuszny dał jest najgorsze ?

Wypełnianie dialogów (jeśli wzorujemy się na PL), dlatego naprawdę.. Kawał dobrej roboty został odwalony.

Mało komu się chce tyle pisać. (a żeby jeszcze wiedzieć co pisać..)

Tak w ogóle to Matuszny nie Mateuszny

Jeżeli ktoś potrzebuje jakieś misje to pisać na gg 28990979 chętnie pomogę

Za jakieś 15 minut dam questa z Koe-Pung.

@edit

Jest i quest.

quest grota_wygnancow begin
	state start begin
			when 20093.chat."Chcę Wejść " with pc.level >= 75 and pc.level <= 255 begin
					say_title("Koe-Pung:")
					say("Stój! Jestem Koe-Pung z Zakonu Smoków, strażnik")
					say("portalu. Możesz przejść tylko jeśli otrzymałeś ")
					say("pozwolenie Zakonu i jeśli pokażesz mi Krwisty")
					say("Kamień!")
					local s=select("Wejdź ", "Gdzie znajdę taki kamień?", "Zejdź mi z drogi, albo zginiesz!")
					if 1==s then
					if pc.count_item(30190)>0 then
					say_title("Koe-Pung:")
					say("Widzę że posiadasz Krwisty Kamień oraz")
					say("Pozwolenie Zakonu. Zatem zostaniesz przeniesiony")
					say("Do Groty Wygnańców.")
					wait()
					pc.remove_item(30190, 1)
					pc.warp(10000, 1207800)
					end
					if 2==s then
					say_title("Koe-Pung:")
					say("Tylko ten kto nalezy do zakonu Smoków i kto")
					say("dowiedzie, że jest godny Boga Smoków, otrzyma")
					say("swięte kamienie. Istnieje takich kilka....")
					say_reward("Porozmawiaja w swoim rodzinnym miescie z Seon-Hae!")
					set_quest_state("grota_krwisty", "run")
					end
					if 3==s then
					say_title("Koe-Pung:")
					say("Nadal tu jesteś?! Zjeżdżaj stąd ale już! Jest to miejsce")
					say("dla prawdziwych Wojowników!")
					end
					end
					end
					end
					end

damomo · 16 Lutego 2012

Jejuś, wybacz mi, jakoś tak po "Mat" zawsze mi się dopełnia z imieniem Mateusz, stąd moje niedopatrzenie.

Co do questów, ile wy je pisaliście ? Lepiej niż wypracowanie...

Vatu · 16 Lutego 2012

Mam pytanie czy istnieje jakaś funkcja na zmianę w potwora żeby działało jak marmur poli??

Bo pc.polymorph() to zmienia ale nie bije się wiecej bo sprawdzałem.

Jest może jakaś inna funkcja?

matuszny1987 · 16 Lutego 2012

Mam pytanie czy istnieje jakaś funkcja na zmianę w potwora żeby działało jak marmur poli??

Bo pc.polymorph() to zmienia ale nie bije się wiecej bo sprawdzałem.

Jest może jakaś inna funkcja?

No ta nie daje siły marmurowi

Zaraz pokminie

Zawsze można najebać siłyy

Jejuś, wybacz mi, jakoś tak po "Mat" zawsze mi się dopełnia z imieniem Mateusz, stąd moje niedopatrzenie.

Co do questów, ile wy je pisaliście ? Lepiej niż wypracowanie...

Adriank już od dłuższego czasu w metina się za bardzo nie bawi i pracuje sam ;<

Łapta troche historyjki o grocie

Duch Sury :

--------------------------------------------
--  Duch Sury
--	  Copyright © GrottoOfExile 2012.
--	  All rights reserved.
--  
--	  Made by adriank1410 && Matuszny1987.
--	  http://www.grottoofexile.pl
--	  http://www.adriank.pl
--	  http://www.youtube.com/adriank1410
--  Copyright ©2012. All rights reserved.
--
--	  This quest and any others with comment
--	  like this is GrottoOfExile private
--	  Metin2 server copyright and is
--	  protected by law in Poland and
--	  in any other country.
--
--	  If you have found or bought this file,
--	  please contact us!
--
--	  DO NOT REMOVE THIS COMMENT!
--	  DO NOT COPY!
--	  DO NOT PUBLISH!
--	  DO NOT SELL!
--------------------------------------------


quest duch_sury3 begin
	state start begin
			when 30121.chat."Jesteś Duchem?" begin
					say_title("Duch Sury:")
					say("Nie.. Jestem twoją babcią!")
					say("Oczywiście że jestem duchem...!")
					say("Wysoki jak brzoza a głupi jak koza...!")
					local s=select("Znasz historie tego miejsca?", "Pomocy Duch!")
					if s==1 then
					say_title("Duch Sury:")
					say("O tak,wiem dokladnie co się wtedy wydarzyło.")
					say("Kiedy jeszcze żyłem prowadziłem długie badania,")
					say("by odkryć przyczyny odnależć grotę. A po mojej")
					say("Smierci miałem sporo czasu na rozmyślanie o tym.")
					say("Powiedz mi, co cię interesuje!")
					wait()
					local s=select("Trzej bogowie", "Już wystarczająco dużo usłyszałem")
					if s==1 then
					say_title("Duch Sury :")
					say("Niegdyś boskie rodzeństwo tworzyło filar")
					say("istnienia. Bahar-Taraji, Bogini stworzenia, była")
					say("najmłodsza z trójki rodzeństwa. Jej zadaniem było")
					say("stwarzanie życia - gdzie się tylko pojawiła")
					say("kiełkowały kwiaty i rozwijało się bujne życie.")
					local s=select("Dalej", "Już wystarczajaco dużo usłyszałem")
					if s==1 then
					say_title("Duch Sury:")
					say("Najstarszy brat nazywał się Beran-Setaou. Był on")
					say("odpowiedzialny za koniec i rodzkład. Gdy tylko")
					say("cykl życia zbliżał się ku końcowi, rodzielał on")
					say("Ciało od duszy i kierował ją w zaświaty. ")
					say("Tak oto życie toczyło się swoim rytmem - narodzin")
					say("i przemijania - i tak były zachowane podstawy")
					say(" życia wszystkich istot.")
					local s=select("Dalej", "Już wystarczajaco dużo usłyszałem")
					if s==1 then
					say_title("Duch Sury:")
					say("Drugi z braci to Baljiit-Elvedin,Bóg Ochrony i")
					say("Równowagi pośredniczył on między swoim")
					say("rodzeństwem  i zapewniał istotom ziemskim")
					say("nieprzerwany cykl życia.Do jego obowiazków")
					say("należało np.czuwanie nad przemijaniem pór roku.")
					end
					end
					end
					end
					end
					end
					end

Duch Wojownika :

--------------------------------------------
--  Duch Wojownika
--      Copyright © GrottoOfExile 2012.
--      All rights reserved.
--  
--      Made by adriank1410 && Matuszny1987.
--      http://www.grottoofexile.pl
--      http://www.adriank.pl
--      http://www.youtube.com/adriank1410
--  Copyright ©2012. All rights reserved.
--
--      This quest and any others with comment
--      like this is GrottoOfExile private
--      Metin2 server copyright and is
--      protected by law in Poland and
--      in any other country.
--
--      If you have found or bought this file,
--      please contact us!
--
--      DO NOT REMOVE THIS COMMENT!
--      DO NOT COPY!
--      DO NOT PUBLISH!
--      DO NOT SELL!
--------------------------------------------


quest duch_wojownika begin
	state start begin
			when 30122.chat."Dlaczego jestes przezroczysty?" begin
					say_title("Duch Wojownika:")
					say("A co myslałes? Jestem duchem zamkniętym w skale!")
					say("Już od tysiaca lat....")
					local s=select("Kim jestes?", "Pomocy Duch!")
					if s==1 then
					say_title("Duch Wojownika:")
					say("Niegdys byłem najemnikiem, prostym człowiekiem..")
					say("Moi rodzice mieli małe gospodarstwo.Ja jednak")
					say("nie chciałem przez całe życie orać pola, a więc")
					say("poszedłem do wojska. Wprawdzie było cięzko, ale")
					say("piękne czasy jednak po pewnym czasie miałem")
					say("dosyć tego, ze nic niewarci arystkoraci wydawali")
					say("mi rozkazy i zdezertowałem. To, że się ")
					say("znalazłem w tym mrocznym miejscu to tylko")
					say("przypadek.")
					wait()
					local s=select("Czy znasz historię groty?")
					if s==1 then
					say_title("Duch Wojownika:")
					say("Nie nic nie wiem. po prostu miałem pecha. Po tym")
					say("jak zdezertowałem, szukałem kryjówki w górach i")
					say("znalazłem tę jaskinię. Już od poczatku wydawała")
					say("mi się podejrzana, ale położona była korzystnie i")
					say("do tego całkowicie opuszczona. Po kilku dniach")
					say("byłem swiadkiem - i ofiars - niesamowitej walki.")
					say("Jesli chcesz opowiem Ci o tym.")
					wait()
					local g=select("Poczatek Walki", "Już wystarczajaco dużo usłyszałem")
					if g==1 then
					say_title("Duch Wojownika:")
					say("Pewnego dnia - zbierałem własnie korzonki na")
					say("zboczu - gdy, bez ostrzeżenia spadł z nieba")
					say("Srebrny Smok. I już myslałem, że po mnie, ale o")
					say("dziwo, on nawet na mnie nie spojrzał - utkwił  ")
					say("utkwił wzrok w jaskini. Nawet nie zwolnił, tylko prosto")
					say("skierował się w stronę doliny i wpadł do jaskini.")
					say(" życia wszystkich istot.")
					local l=select("Dalej", "Już wystarczająco dużo usłyszałem")
					if l==1 then
					say_title("Duch Wojownika:")
					say("Przez pewien czas było zupełnie cicho. Nie")
					say("wiedziałem co mam zrobić. Wszystkie moje rzeczy")
					say("znajdowały się w jaskini, ale nie chciałem stan±ć ")
					say("oko w oko ze smokiem! Nagle zatrzęsła się ziemia,")
					say("a z głębi jaskini usłyszałem przytłumiony ryk -")
					say("ale o dziwo. były dwa odgłosy, a nie jeden!")
					say("Krótko po tym wyleciały z jaskini jak błyskawica")
					say("dwa smoki, najpierw srebrny a tuż za nim")
					say("niebieski.")
					local a=select("Dalej", "Już wystarczajaco dużo usłyszałem")
					if a==1 then
					say_title("Duch Wojownika")
					say("Między smokami rozgorzała zaciekła walka, która ")
					say("trudno opisać słowami. Szponami rozdzierały sobie")
					say("skrzydła, zakleszczyły się w sobie, zatopily")
					say("swoje ogromne zęby w szyi przeciwnika a...Krew")
					say("lala się strumieniami na wszystkie strony.....")
					say("Jednak żaden ze smoków nie ustapił nawet przez")
					say("chwilę.")
					wait()
					local b=select("Koniec Walki", "Już wystarczajaco dużo usłyszałem!")
					if b==1 then
					say_title("Duch Wojownika:")
					say("Obydwa smoki przewalały się nad górami jak")
					say("ogromna burza z piorunami i zrównywały szczyty")
					say("górskie z dolinami. Ogniste błyskawice opaliły")
					say("pysk srebrnego smoka, a lodowy grad doszczętnie")
					say("zniszczył skrzydła niebieskiego. Gruby pancerz")
					say("lodowy, który już od wieków pokrywał ziemię,")
					say("stopił sięz mieniu oka pozostawiaj±ć cuchnace")
					say("błoto. Zdrętwiały z przerażenia, zdażyłem się ")
					say("jeszcze schować za skała, ale nie byłem już w")
					say("staie odwrócić wzroku.")
					wait()
					say_title("Duch Wojownika:")
					say("Krótko przed zniknięciem w jaskini, dogonił go")
					say("srebrny smok i wydarzyło się cos bardzo dziwnego:")
					say("W powietrzu uniosło się cos błyszczacego, co")
					say("przeobraziło się w powietrze a następnie w")
					say("kłab energii, w srodku uwięziony był niebieski")
					say("smok wyjacy z bólu i wsciekłosci..Powoli")
					say("kurczył się, jego wycie stawało się słabszego, a ")
					say("jego łuski traciły blask, stawiał się matowe i")
					say("bezbarwne...")
					wait()
					end
					end
					end
					end
					end
					end
					end
					end
					end

Pewnie jeszcze dam quest na komnatę smoka na hasło no ale muszę go poprawić bo zastosowałem timer zamiast server_timer i jest jak jest

Mam pytanie czy istnieje jakaś funkcja na zmianę w potwora żeby działało jak marmur poli??

Bo pc.polymorph() to zmienia ale nie bije się wiecej bo sprawdzałem.

Jest może jakaś inna funkcja?

Dalej z tym debilem sharramem robisz?

damomo · 16 Lutego 2012

Już przejrzałem, pełno literówek, ale jak nie chce się komuś pisać, to bardzo fajne questy : )

Teraz będziesz wszystkie pliki serwerowe nam udostępniać ?

matuszny1987 · 16 Lutego 2012

Już przejrzałem, pełno literówek, ale jak nie chce się komuś pisać, to bardzo fajne questy : )

Teraz będziesz cały serwer nam udostępniać ?

Literówki to rzecz którą może poprawić każdy

Event świąteczny :

--------------------------------------------
--		Event Swiateczny
--		Copyright © GrottoOfExile 2012.
--		All rights reserved.
--  
--		Made by adriank1410 && Matuszny1987.
--		http://www.grottoofexile.pl
--		http://www.adriank.pl
--		http://www.youtube.com/adriank1410
--  Copyright ©2012. All rights reserved.
--
--		This quest and any others with comment
--		like this is GrottoOfExile private
--		Metin2 server copyright and is
--		protected by law in Poland and
--		in any other country.
--
--		If you have found or bought this file,
--		please contact us!
--
--		DO NOT REMOVE THIS COMMENT!
--		DO NOT COPY!
--		DO NOT PUBLISH!
--		DO NOT SELL!
--------------------------------------------

quest mikolaj begin
state start begin
	when 20031.chat."Hej Długobrody!" with pc.getqf("Pierwszy") == 0 begin
		   pc.setqf("Pierwszy", 1)
		say_title("Mikołaj:")
		say("Gdzie ja jestem? A ty kim jesteś?")
		wait()
		say_title("Mikołaj:")
		say("Uważaj na swoje słowa! Nie jestem żadnym")
		say("długobrodym! Nazywam się Mikołaj!")
		say("Jestem nieco rozkojarzony,")
		say("bo jeszcze chwilę byłem na pasterce...")
		say("Nagle zawirował cały świat w ułamku")
		say("sekundy znalazłem się właśnie tutaj...")
		wait()
		say_title("Mikołaj:")
		say("A teraz odczep się i pozwól mi świętować ")
		say("w spokoju!")
		end
		when 20031.chat."Wymień Skarpete!" with pc.getqf("Pierwszy") == 1 begin
		say_title("Mikołaj:")
		say("Znowu ty? Słuchaj, zdadzę ci pewną tajemnicę.")
		say("Przy odrobinie szczęścia zabijająć potwory")
		say("możesz zdobyć Świąteczną Skarpetę!")
		wait()
		say_title("Mikołaj:")
		say("Za pomocą tej Skarpety możesz otrzymać odemnie")
		say("Losowy upominek. Chcesz?")
		wait()
		say_title("Mikołaj:")
		say("Upominkiem może być Fryzura Afro lub jakiś inny")
		say("Przedmiot albo możesz nic nie dostać!")
		say("Jednym z nich jest Pieczęć dzięki której możesz")
		say("dosiąść jednego z moich reniferów!")
		wait()
		if pc.count_item(50010)==0 then
		say_title("Mikołaj:")
		say("Gdy zdobędziesz Świąteczną Skarpetę mogę ją dla ciebie")
		say("Na jakiś upominek!")
		say("Ho Ho Ho ! Wesołych Świąt!")
		end
		if pc.count_item(50010)>=1 then
		say_title("Mikołaj:")
		say("Hmm widzę że masz Świąteczną Skarpetę!")
		say("Czy chciał byś ją wymienić na upominek?")
		local s=select("Wymieniam Skarpete", "Anuluj")
		if 1==s then
		if pc.count_item(50010)>=1 then
		local przedmiot = math.random(20)
			if przedmiot == 1 then
				pc.change_gold(1000000)
			elseif przedmiot == 2 then
				pc.give_item2(71084)
			elseif przedmiot == 3 then
				pc.give_item2(71085)
			elseif przedmiot == 4 then
				pc.give_item2(70024)
			elseif przedmiot == 5 then
				pc.give_item2(50513)
			elseif przedmiot == 6 then
				pc.give_item2(50060)
			elseif przedmiot == 7 then
				pc.give_item2(70043)
			elseif przedmiot == 8 then
				pc.change_gold(2000000)
			elseif przedmiot == 9 then
				pc.give_item2(27003, 50)
			elseif przedmiot == 10 then
				pc.give_item2(27006, 50)
			elseif przedmiot == 11 then
				pc.give_item2(27005, 50)
			elseif przedmiot == 12 then
				pc.give_item2(27002, 50)
			elseif przedmiot == 13 then
				pc.give_item2(70038, 10)
			end
	end	
end
end
end
end
end

To już nie te czasy... metin spadł na dno pełno zjebanych broni i mobów.

Pamiętam jak kiedyś całą noc spolszczaliśmy quest na lv konia tak samo main_quest

Na serwerze dużo mamy zrobione długi okres czasu pracowaliśmy na to co mamy...

Nie typu ShaRRaMka z orientala przelej 500 bamusowi i ci da......

Jakiś czas temu kupił za 150zł od bambusa pakera tego spierdolonego " ? ? ? ? ? ? ? ?? ? ? "

damomo · 16 Lutego 2012

Tą skarpete się wymienia ? W takim razie czemu nie ma item.remove() ? (czy jak to się tam pisało)

Vatu · 16 Lutego 2012

No ta nie daje siły marmurowi

Zaraz pokminie

Zawsze można najebać siłyy

Adriank już od dłuższego czasu w metina się za bardzo nie bawi i pracuje sam ;<

Łapta troche historyjki o grocie

Duch Sury :

--------------------------------------------
--  Duch Sury
--	  Copyright © GrottoOfExile 2012.
--	  All rights reserved.
--  
--	  Made by adriank1410 && Matuszny1987.
--	  http://www.grottoofexile.pl
--	  http://www.adriank.pl
--	  http://www.youtube.com/adriank1410
--  Copyright ©2012. All rights reserved.
--
--	  This quest and any others with comment
--	  like this is GrottoOfExile private
--	  Metin2 server copyright and is
--	  protected by law in Poland and
--	  in any other country.
--
--	  If you have found or bought this file,
--	  please contact us!
--
--	  DO NOT REMOVE THIS COMMENT!
--	  DO NOT COPY!
--	  DO NOT PUBLISH!
--	  DO NOT SELL!
--------------------------------------------


quest duch_sury3 begin
	state start begin
			when 30121.chat."Jesteś Duchem?" begin
					say_title("Duch Sury:")
					say("Nie.. Jestem twoją babcią!")
					say("Oczywiście że jestem duchem...!")
					say("Wysoki jak brzoza a głupi jak koza...!")
					local s=select("Znasz historie tego miejsca?", "Pomocy Duch!")
					if s==1 then
					say_title("Duch Sury:")
					say("O tak,wiem dokladnie co się wtedy wydarzyło.")
					say("Kiedy jeszcze żyłem prowadziłem długie badania,")
					say("by odkryć przyczyny odnależć grotę. A po mojej")
					say("Smierci miałem sporo czasu na rozmyślanie o tym.")
					say("Powiedz mi, co cię interesuje!")
					wait()
					local s=select("Trzej bogowie", "Już wystarczająco dużo usłyszałem")
					if s==1 then
					say_title("Duch Sury :")
					say("Niegdyś boskie rodzeństwo tworzyło filar")
					say("istnienia. Bahar-Taraji, Bogini stworzenia, była")
					say("najmłodsza z trójki rodzeństwa. Jej zadaniem było")
					say("stwarzanie życia - gdzie się tylko pojawiła")
					say("kiełkowały kwiaty i rozwijało się bujne życie.")
					local s=select("Dalej", "Już wystarczajaco dużo usłyszałem")
					if s==1 then
					say_title("Duch Sury:")
					say("Najstarszy brat nazywał się Beran-Setaou. Był on")
					say("odpowiedzialny za koniec i rodzkład. Gdy tylko")
					say("cykl życia zbliżał się ku końcowi, rodzielał on")
					say("Ciało od duszy i kierował ją w zaświaty. ")
					say("Tak oto życie toczyło się swoim rytmem - narodzin")
					say("i przemijania - i tak były zachowane podstawy")
					say(" życia wszystkich istot.")
					local s=select("Dalej", "Już wystarczajaco dużo usłyszałem")
					if s==1 then
					say_title("Duch Sury:")
					say("Drugi z braci to Baljiit-Elvedin,Bóg Ochrony i")
					say("Równowagi pośredniczył on między swoim")
					say("rodzeństwem  i zapewniał istotom ziemskim")
					say("nieprzerwany cykl życia.Do jego obowiazków")
					say("należało np.czuwanie nad przemijaniem pór roku.")
					end
					end
					end
					end
					end
					end
					end

Duch Wojownika :

--------------------------------------------
--  Duch Wojownika
--	  Copyright © GrottoOfExile 2012.
--	  All rights reserved.
--  
--	  Made by adriank1410 && Matuszny1987.
--	  http://www.grottoofexile.pl
--	  http://www.adriank.pl
--	  http://www.youtube.com/adriank1410
--  Copyright ©2012. All rights reserved.
--
--	  This quest and any others with comment
--	  like this is GrottoOfExile private
--	  Metin2 server copyright and is
--	  protected by law in Poland and
--	  in any other country.
--
--	  If you have found or bought this file,
--	  please contact us!
--
--	  DO NOT REMOVE THIS COMMENT!
--	  DO NOT COPY!
--	  DO NOT PUBLISH!
--	  DO NOT SELL!
--------------------------------------------


quest duch_wojownika begin
	state start begin
			when 30122.chat."Dlaczego jestes przezroczysty?" begin
					say_title("Duch Wojownika:")
					say("A co myslałes? Jestem duchem zamkniętym w skale!")
					say("Już od tysiaca lat....")
					local s=select("Kim jestes?", "Pomocy Duch!")
					if s==1 then
					say_title("Duch Wojownika:")
					say("Niegdys byłem najemnikiem, prostym człowiekiem..")
					say("Moi rodzice mieli małe gospodarstwo.Ja jednak")
					say("nie chciałem przez całe życie orać pola, a więc")
					say("poszedłem do wojska. Wprawdzie było cięzko, ale")
					say("piękne czasy jednak po pewnym czasie miałem")
					say("dosyć tego, ze nic niewarci arystkoraci wydawali")
					say("mi rozkazy i zdezertowałem. To, że się ")
					say("znalazłem w tym mrocznym miejscu to tylko")
					say("przypadek.")
					wait()
					local s=select("Czy znasz historię groty?")
					if s==1 then
					say_title("Duch Wojownika:")
					say("Nie nic nie wiem. po prostu miałem pecha. Po tym")
					say("jak zdezertowałem, szukałem kryjówki w górach i")
					say("znalazłem tę jaskinię. Już od poczatku wydawała")
					say("mi się podejrzana, ale położona była korzystnie i")
					say("do tego całkowicie opuszczona. Po kilku dniach")
					say("byłem swiadkiem - i ofiars - niesamowitej walki.")
					say("Jesli chcesz opowiem Ci o tym.")
					wait()
					local g=select("Poczatek Walki", "Już wystarczajaco dużo usłyszałem")
					if g==1 then
					say_title("Duch Wojownika:")
					say("Pewnego dnia - zbierałem własnie korzonki na")
					say("zboczu - gdy, bez ostrzeżenia spadł z nieba")
					say("Srebrny Smok. I już myslałem, że po mnie, ale o")
					say("dziwo, on nawet na mnie nie spojrzał - utkwił  ")
					say("utkwił wzrok w jaskini. Nawet nie zwolnił, tylko prosto")
					say("skierował się w stronę doliny i wpadł do jaskini.")
					say(" życia wszystkich istot.")
					local l=select("Dalej", "Już wystarczająco dużo usłyszałem")
					if l==1 then
					say_title("Duch Wojownika:")
					say("Przez pewien czas było zupełnie cicho. Nie")
					say("wiedziałem co mam zrobić. Wszystkie moje rzeczy")
					say("znajdowały się w jaskini, ale nie chciałem stan±ć ")
					say("oko w oko ze smokiem! Nagle zatrzęsła się ziemia,")
					say("a z głębi jaskini usłyszałem przytłumiony ryk -")
					say("ale o dziwo. były dwa odgłosy, a nie jeden!")
					say("Krótko po tym wyleciały z jaskini jak błyskawica")
					say("dwa smoki, najpierw srebrny a tuż za nim")
					say("niebieski.")
					local a=select("Dalej", "Już wystarczajaco dużo usłyszałem")
					if a==1 then
					say_title("Duch Wojownika")
					say("Między smokami rozgorzała zaciekła walka, która ")
					say("trudno opisać słowami. Szponami rozdzierały sobie")
					say("skrzydła, zakleszczyły się w sobie, zatopily")
					say("swoje ogromne zęby w szyi przeciwnika a...Krew")
					say("lala się strumieniami na wszystkie strony.....")
					say("Jednak żaden ze smoków nie ustapił nawet przez")
					say("chwilę.")
					wait()
					local b=select("Koniec Walki", "Już wystarczajaco dużo usłyszałem!")
					if b==1 then
					say_title("Duch Wojownika:")
					say("Obydwa smoki przewalały się nad górami jak")
					say("ogromna burza z piorunami i zrównywały szczyty")
					say("górskie z dolinami. Ogniste błyskawice opaliły")
					say("pysk srebrnego smoka, a lodowy grad doszczętnie")
					say("zniszczył skrzydła niebieskiego. Gruby pancerz")
					say("lodowy, który już od wieków pokrywał ziemię,")
					say("stopił sięz mieniu oka pozostawiaj±ć cuchnace")
					say("błoto. Zdrętwiały z przerażenia, zdażyłem się ")
					say("jeszcze schować za skała, ale nie byłem już w")
					say("staie odwrócić wzroku.")
					wait()
					say_title("Duch Wojownika:")
					say("Krótko przed zniknięciem w jaskini, dogonił go")
					say("srebrny smok i wydarzyło się cos bardzo dziwnego:")
					say("W powietrzu uniosło się cos błyszczacego, co")
					say("przeobraziło się w powietrze a następnie w")
					say("kłab energii, w srodku uwięziony był niebieski")
					say("smok wyjacy z bólu i wsciekłosci..Powoli")
					say("kurczył się, jego wycie stawało się słabszego, a ")
					say("jego łuski traciły blask, stawiał się matowe i")
					say("bezbarwne...")
					wait()
					end
					end
					end
					end
					end
					end
					end
					end
					end

Pewnie jeszcze dam quest na komnatę smoka na hasło no ale muszę go poprawić bo zastosowałem timer zamiast server_timer i jest jak jest

Dalej z tym debilem sharramem robisz?

Tym razem dla siebie potrzebuje.

A siły nie najebie bo też nie za ciekawie będzie.

@EDIT On wtedy nie kupił tego pakera.

matuszny1987 · 16 Lutego 2012

Tą skarpete się wymienia ? W takim razie czemu nie ma item.remove() ? (czy jak to się tam pisało)

aaaaaaa

Zapomniałem.

Tym razem dla siebie potrzebuje.

A siły nie najebie bo też nie za ciekawie będzie.

@EDIT On wtedy nie kupił tego pakera.

Tak czy tak jest pierdolonym zerem nie szanującym czyjejś pracy.

Co chwile się jara że ma rozpakowanego clienta nevrasta i m2m a gdyby nie ten zjebany paker to by mógł wylizać nawet tego ? ? ? ? ? nie rozpakuje....

Co do jego zdania o mnie "Hahahah ty i serwer wszystko z mpc" a tak samo jak połowa w dupie była i gówno widziała.

Nie lubię ludzi którzy nie myślą logicznie.

nfsfankp50098 · 16 Lutego 2012

kolejne super questy a nie posiadasz morze questa z Halloween do jacka pumpkina i z Wielkanocy do królika ?

Nigahiga · 16 Lutego 2012

kolejne super questy a nie posiadasz morze questa z Halloween do jacka pumpkina i z Wielkanocy do królika ?

"morze" posiadam, a co nie łaska samemu napisać..? Przecież to jest dziecinnie proste bo te questy z tego co widzę to opierają się na samych warunkach, tablice dla nich są obce..

matuszny1987 · 16 Lutego 2012

kolejne super questy a nie posiadasz morze questa z Halloween do jacka pumpkina i z Wielkanocy do królika ?

Do tych świąt jeszcze daleko

nfsfankp50098 · 16 Lutego 2012

Ale wole mieć wszystko gotowe

"morze" posiadam, a co nie łaska samemu napisać..? Przecież to jest dziecinnie proste bo te questy z tego co widzę to opierają się na samych warunkach, tablice dla nich są obce..

Jak takie proste to napisz mi 2 questy co podałem wyżej

damomo · 16 Lutego 2012

Jak takie trudne to idź się uczyć ortografii.

matuszny1987 · 16 Lutego 2012

Za jakiś czas możecie się spodziewać generatora pytań do konkursu OX ułatwi prace

z4z0l · 16 Lutego 2012

Ten zwój redystrybucji jest standardowo w sf2k10 więc nie wiem jaki sens wrzucania.

Zephyr33 · 16 Lutego 2012

Tak generator pytań ox...

Na inforge jest już od roku :P

adm · 16 Lutego 2012

Jak możesz to podziel się jeszcze wymiarem władców ; p

old_kwiatosz · 16 Lutego 2012

@up

Nie wiem skąd go mam, ale to jest ten co był na escaria

Ja go nie pisałem:

quest wymiar_wladcow begin
state start begin
 when 20019.chat."Wymiar Władców." begin
 say_title("Gigantyczny Minotaur:")
 say("Ta Magiczna moc pozwala Twojej Postaci otworzyć ")
 say("bardzo tajemniczy Wymiar Władców, w którym musisz")
 say("pokonać każdego przeciwnika w najszybszym czasie.")
 say("")
 local q=select("Jestem Gotów!", "To nie ten moment...")
  if q==1 then
  say_title("Gigantyczny Minotaur:")
  say("Wybierz swój marmur polimorfi!")
  local s=select("Dziki Pies", "Dziki Sługa", "Młody Pająk", "Ezot. Fanatyk")
  if 1==s then
  affect.remove_good()
  pc.polymorph ( 101, 9999 )
   d.join(201)
   pc.setqf("lol", 1)
   end
   if 2==s then
   affect.remove_good()
   pc.polymorph ( 502, 9999 )
   d.join(201)
   pc.setqf("lol", 1)
   end
   if 3==s then
   affect.remove_good()
   pc.polymorph ( 2001, 9999 )
   d.join(201)
   pc.setqf("lol", 1)
   end
   if 4==s then
   affect.remove_good()
   pc.polymorph ( 701, 9999 )
   d.join(201)
   pc.setqf("lol", 1)
   end
  end
  if q==2 then
   say_title("Strażnik Wymiaru Władców:")
   say("Widocznie nie jesteś jeszcze gotów..")
  end
  end
 when login with pc.in_dungeon() and pc.getqf("lol") == 1 begin
 d.notice("Witamy w Wymiarze Władców...")
 d.spawn_mob(101, 193, 97, 1, 1, 1)
 end
 when 101.kill with pc.in_dungeon() and pc.getqf("lol") == 1 begin
 d.notice("Czas Start!")
 timer("wymiar_2", 5)
 d.setf("wymiar", 1)
 pc.setqf("time1", get_time())
 end
 when wymiar_2.timer begin
 d.notice("No to zaczynamy! Oto Best Kapitan!")
 mob.spawn(591, 193, 97, 1, 1, 1)
 end
 when 591.kill with pc.in_dungeon() and pc.getqf("lol") == 1 begin
 d.notice("Best Kapitan został pokonany!")
 timer("wymiar_3", 5)
 end
 when wymiar_3.timer begin
 d.notice("No to zaczynamy! Oto Lord Małp!")
 mob.spawn(5163, 193, 97, 1, 1, 1)
 end
 when 5163.kill with pc.in_dungeon() and pc.getqf("lol") == 1 begin
 d.notice("Lord Małp został Pokonany!")
 timer("wymiar_4", 5)
 end
 when wymiar_4.timer begin
 mob.spawn(691, 193, 97, 1, 1, 1)
 d.notice("No to zaczynamy! Oto Wódz Orków!")
 end
 when 691.kill with pc.in_dungeon() and pc.getqf("lol") == 1 begin
 d.notice("Wódz Orków został pokonany!")
 timer("wymiar_5", 5)
 end
 when wymiar_5.timer begin
 mob.spawn(2091, 193, 97, 1, 1, 1)
 d.notice("No to zaczynamy! Oto Królowa Pajaków!")
 end
 when 2091.kill with pc.in_dungeon() and pc.getqf("lol") == 1 begin
 d.notice("Królowa Pajaków została pokonana!")
 timer("wymiar_6", 5)
 end
 when wymiar_6.timer begin
 mob.spawn(5002, 193, 97, 1, 1, 1)
 d.notice("No to zaczynamy! Oto ostatni przeciwnik! Hae-Tae!")
 end
 when 5002.kill with pc.in_dungeon() and pc.getqf("lol") == 1 begin
 d.notice("Pomyślnie ukończyłeś wyzwanie Wymiaru Władców!")
 d.notice("Za 10 sekund zostaniesz przeniesiony do miasta!")
 timer("wymiar_exit", 5)
 pc.remove_polymorph()
 pc.setqf("lol", 0)
 pc.setqf("czas", 1)
 pc.setqf("time2", get_time())
 end
 when wymiar_exit.timer begin
 d.exit_all()
 d.setf("wymiar", 0)
 end
 when login with pc.getqf("czas") == 1 begin
 pc.setqf("czas", 0)
 pc.remove_polymorph()
 local x = pc.getqf("time1")
 local y = pc.getqf("time2")
 local s = pc.setqf("time3", y-x)
 local czas = pc.getqf("time3")
 say_title("Wymiar Władców")
 say("Gratulacje "..pc.get_name().."!")
 say("Twój czas to: "..czas.." sekund.")
 end
 end
 end

PS: Nie wiem czy działa ;x

PS2: (Dla noobków z Pisanie Questów na zamówienie) to nie ten quest o którym mówiłem

Zaloguj się

👋 Witaj na MPCForum!

[Quest] Misja na Krwisty Kamień + Zwoje Redystrybucji

Rekomendowane odpowiedzi

Zarchiwizowany