Pisanie / Poprawa Questów !

Stelios · 14 Października 2011

Tyle ze pieczecie znikaja po ustalonym czasie to ja tez wiem jednak zrob sobie pieczec zwykla normalna i zrob do niej quest z funkcja pc.mount(id_mounta) bez czasu

@EDIT chodzi mi tu o pieczecie niezakładane

No w takim przypadku jeśli nie jest ustalony czas w MySQL to teoretycznie pieczęć nie znika.

@UP

Jakiego HA ?

Szukasz questów na swój serwer?

Wszystkie questy udostępnione działają poprawnie

(wszystkie - te które udostępniają questerzy)

@EDIT

@2UP

when 290498.use or 290498.chat begin

290498 to NPC czy item?

Jeśli item to nie widzę powodu żeby zrobić chat,

a jeśli to NPC to nie ma możliwości żeby go użyć...

@EDIT

@5UP

----------------------------------------------------
-- Metin2 Triadica.net
-- Kapitan Quest By Bambus3k
-- Change Name
----------------------------------------------------
quest changename begin
state start begin
when 20355.chat."Chciałbym Zmienić Swój Nick " begin
say_title("Zmiana Nicku:")
say("")
say("Witaj,")
say("dzięki mnie możesz zmienić swój nick na stałe! ")
say("Wystarczy, że się zgodzisz !")
say("")
say_reward("Czy chciałbyś zmienić swój nick?")
say("")
local change = select("Tak", "Nie")
if change == 1 then
if pc.get_money() >= 300000000 then
say_title("Zmiana Nicku:")
say("")
say("więc chcesz zmienić swój nick?")
say("Dobrze, tylko pamiętaj, że przyjaciele ")
say("mogą Cię nie rozpoznać pod tym nowym imieniem")
say("")
say_reward("Podaj swój nowy nick:")
say_reward("Nie możesz używać kodów ASCI!")
say("")
local c_name = input()
local c_search = find_pc_by_name(c_name)

if c_search==0 then
say_title("Zmiana Nicku:")
say("")
say("Podałeś już swój nowy nick wygloąda on tak:")
say(""..c_name.." zostawić taki?")
say("")
local secure = select("Tak", "Nie")
if secure == 1 then
say_title("Zmiana Nicku:")
say("")
say("Pomyślnie Zmieniono Nick!")
say("")
say("Twoja nowa nazwa to: "..c_name.." ")
say("")
say_reward("Przeloguj się aby zaktualizować zmiany!")
say("")
pc.change_name(c_name)
pc.remove_item(71055, 1)
pc.change_money( -300000000 )  --- 300000000 to 300kk liczbę możesz zmienić
else
say_title("Zmiana Nicku:")
say("")
say("Dobrze, że zmieniłeś zdanie...")
say("Twoja nazwa została nie zmieniona!")
say("")
end
else
say_title("Zmiana Nicku:")
say("")
say("Podana przez Ciebie nazwa nicku już jest zajęta!")
say("Wybierz sobie nowy inny nick i go podaj...")
say("")
end
end
else
return
end
end
end
end

lKnXl · 14 Października 2011

Jest to item ,ale ja chce ,zeby po zmianie mapy dalej siedzial na wierzchowcu.

GoGame · 14 Października 2011

Witam , napisałem Questa

Czy możecie sprawdzić tego Questa

Dane:

ID itema = 100939
ID npc = 93993
ID Zbroi = 66289 , 66489 , 66689 , 66889

Treść Questa:

quest Zbroja_Krola begin
state start begin
	when 93993.chat."Zbroja Króla" with pc.count_item(100939)>=1 begin
		say_title("Witaj "..pc.get_name().." !")
		say("")
		say("Za Sekretną Pieczęć Seon-Sa-Eyu Otrzymasz")
		say("Zbroję Króla.")
		say("Jest to najlepsza zbroja w Świecie Metin.")
		say("")
		say_reward("Czy chcesz się wymienić ?")
		local a = select(locale.yes, locale.no)
			if a == 1 then
				pc.remove_item(100939, 1)
				if pc.job() == 0 then
					pc.give_item2(66289, 1)
					say_reward("Otrzymałeś Zbroję Króla!")
				end
				if pc.job() == 1 then
					pc.give_item2(66489, 1)
					say_reward("Otrzymałeś Pancerz Króla!")
				end
				if pc.job() == 2 then
					pc.give_item2(66689, 1)
					say_reward("Otrzymałeś Zbroję Króla!")
				end
				if pc.job() == 3 then
					pc.give_item2(66889, 1)
					say_reward("Otrzymałeś Szatę Króla!")
				end
			elseif a == 2 then
				return
			end
	end
end
end

Quest polega na wymianie

itemu (Sekretna Pieczęć Seon-Sa-Eyu) na Zbroję króla

dla każdej klasy

proszę o sprawdzenie questa czy zadziałą na moim serwerze , czy dobrze end porozstawiane

Stelios · 14 Października 2011

Witam , napisałem Questa

Czy możecie sprawdzić tego Questa

Dane:

ID itema = 100939
ID npc = 93993
ID Zbroi = 66289 , 66489 , 66689 , 66889

Treść Questa:

quest Zbroja_Krola begin
state start begin
	when 93993.chat."Zbroja Króla" with pc.count_item(100939)>=1 begin
		say_title("Witaj "..pc.get_name().." !")
		say("")
		say("Za Sekretną Pieczęć Seon-Sa-Eyu Otrzymasz")
		say("Zbroję Króla.")
		say("Jest to najlepsza zbroja w Świecie Metin.")
		say("")
		say_reward("Czy chcesz się wymienić ?")
		local a = select(locale.yes, locale.no)
			if a == 1 then
				pc.remove_item(100939, 1)
				if pc.job() == 0 then
					pc.give_item2(66289, 1)
					say_reward("Otrzymałeś Zbroję Króla!")
				end
				if pc.job() == 1 then
					pc.give_item2(66489, 1)
					say_reward("Otrzymałeś Pancerz Króla!")
				end
				if pc.job() == 2 then
					pc.give_item2(66689, 1)
					say_reward("Otrzymałeś Zbroję Króla!")
				end
				if pc.job() == 3 then
					pc.give_item2(66889, 1)
					say_reward("Otrzymałeś Szatę Króla!")
				end
			elseif a == 2 then
				return
			end
	end
end
end

Quest polega na wymianie

itemu (Sekretna Pieczęć Seon-Sa-Eyu) na Zbroję króla

dla każdej klasy

proszę o sprawdzenie questa czy zadziałą na moim serwerze , czy dobrze end porozstawiane

Tak, będzie działać.

Tak od siebie, polecam najpierw sprawdzić a później zapytać.

Źle napisany quest nic nie zrobi.

@EDIT

Dziękuję również.

I przepraszam, mam dziś straszny dzień...

Wszyscy i wszystko przeciwko mnie...

GoGame · 14 Października 2011

@UP dzięki za uwagę następnym razem sam sprawdzę

leci plusik dla ciebie za sprawdzenie

Veygr · 14 Października 2011

Szukam komendy do questa która będzie teleportowała wszystkich z PT na daną mapę. Coś jak pc.warp tylko że działa na wszystkich członków grupy.

old_kwiatosz · 14 Października 2011

Szukam komendy do questa która będzie teleportowała wszystkich z PT na daną mapę. Coś jak pc.warp tylko że działa na wszystkich członków grupy.

d.join()  -- w środku () wpisz id mapy na którą ma telać , np tak : (43)

Veygr · 14 Października 2011

0 reakcji na to

quest test begin
state start begin
	when 20093.chat."test" with party.is_leader() begin
		say_title("Keo-Pung:")
		if party.get_near_count() < 4 then
			say("Minimum 4 osoby w PT. ")
			party.chat("W PT muszą być 4 osoby. ")
			return
		end
		if pc.get_level() < 100 then
			say("Musisz miec minimum 100 lvl ")
			party.chat("Lider musi mieć 100 lvl ")
			return
		else
			say("Lecimy? ")
			local s = select("tak ;D ","Nie ")
				if s == 1 then
					d.join(202)
				end
			end
		end

end
end

LubaskiKawus · 14 Października 2011

cze..

po prosze questa u 9233 ''wymieniacz''

po kliknieciu w niego wyswietlaja sie 3 okna

200 sztabek 2kkk

100 sztabek 1kkk

50 sztabek 500kk

i jak wybierze jakas opcje to pisze : czy chcesz sie wymienic [...cena] za [...szt sztabek]

i wybor tak ,nie

jak kliknie np na tak przy 200sztabkach to wezmie mu te 2kkk

XeriasTeam · 15 Października 2011

Witam , mam ogromną prośbę o zmianę questu by Bamusek żeby opłata za zmianę nicku wynosiła 300kk z góry dziękuje .

----------------------------------------------------

-- Metin2 Triadica.net

-- Kapitan Quest By Bambus3k

-- Change Name

----------------------------------------------------

quest changename begin

state start begin

when 20355.chat."Chciałbym Zmienić Swój Nick " begin

say_title("Zmiana Nicku:")

say("")

say("Witaj,")

say("dzięki mnie możesz zmienić swój nick na stałe! ")

say("Wystarczy, że się zgodzisz !")

say("")

say_reward("Czy chciałbyś zmienić swój nick?")

say("")

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

if change == 1 then

say_title("Zmiana Nicku:")

say("")

say("więc chcesz zmienić swój nick?")

say("Dobrze, tylko pamiętaj, że przyjaciele ")

say("mogą Cię nie rozpoznać pod tym nowym imieniem")

say("")

say_reward("Podaj swój nowy nick:")

say_reward("Nie możesz używać kodów ASCI!")

say("")

local c_name = input()

local c_search = find_pc_by_name(c_name)

if c_search==0 then

say_title("Zmiana Nicku:")

say("")

say("Podałeś już swój nowy nick wygloąda on tak:")

say(""..c_name.." zostawić taki?")

say("")

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

if secure == 1 then

say_title("Zmiana Nicku:")

say("")

say("Pomyślnie Zmieniono Nick!")

say("")

say("Twoja nowa nazwa to: "..c_name.." ")

say("")

say_reward("Przeloguj się aby zaktualizować zmiany!")

say("")

pc.change_name(c_name)

pc.remove_item(71055, 1)

else

say_title("Zmiana Nicku:")

say("")

say("Dobrze, że zmieniłeś zdanie...")

say("Twoja nazwa została nie zmieniona!")

say("")

end

else

say_title("Zmiana Nicku:")

say("")

say("Podana przez Ciebie nazwa nicku już jest zajęta!")

say("Wybierz sobie nowy inny nick i go podaj...")

say("")

end

else

return

end

lopescio · 15 Października 2011

@Up Stelios już Ci napisał:

----------------------------------------------------
-- Metin2 Triadica.net
-- Kapitan Quest By Bambus3k
-- Change Name
----------------------------------------------------
quest changename begin
state start begin
when 20355.chat."Chciałbym Zmienić Swój Nick " begin
say_title("Zmiana Nicku:")
say("")
say("Witaj,")
say("dzięki mnie możesz zmienić swój nick na stałe! ")
say("Wystarczy, że się zgodzisz !")
say("")
say_reward("Czy chciałbyś zmienić swój nick?")
say("")
local change = select("Tak", "Nie")
if change == 1 then
if pc.get_money() >= 300000000 then
say_title("Zmiana Nicku:")
say("")
say("więc chcesz zmienić swój nick?")
say("Dobrze, tylko pamiętaj, że przyjaciele ")
say("mogą Cię nie rozpoznać pod tym nowym imieniem")
say("")
say_reward("Podaj swój nowy nick:")
say_reward("Nie możesz używać kodów ASCI!")
say("")
local c_name = input()
local c_search = find_pc_by_name(c_name)

if c_search==0 then
say_title("Zmiana Nicku:")
say("")
say("Podałeś już swój nowy nick wygloąda on tak:")
say(""..c_name.." zostawić taki?")
say("")
local secure = select("Tak", "Nie")
if secure == 1 then
say_title("Zmiana Nicku:")
say("")
say("Pomyślnie Zmieniono Nick!")
say("")
say("Twoja nowa nazwa to: "..c_name.." ")
say("")
say_reward("Przeloguj się aby zaktualizować zmiany!")
say("")
pc.change_name(c_name)
pc.remove_item(71055, 1)
pc.change_money( -300000000 )  --- 300000000 to 300kk liczbę możesz zmienić
else
say_title("Zmiana Nicku:")
say("")
say("Dobrze, że zmieniłeś zdanie...")
say("Twoja nazwa została nie zmieniona!")
say("")
end
else
say_title("Zmiana Nicku:")
say("")
say("Podana przez Ciebie nazwa nicku już jest zajęta!")
say("Wybierz sobie nowy inny nick i go podaj...")
say("")
end
end
else
return
end
end
end
end

Stelios · 15 Października 2011

0 reakcji na to

quest test begin
state start begin
	when 20093.chat."test" with party.is_leader() begin
		say_title("Keo-Pung:")
		if party.get_near_count() < 4 then
			say("Minimum 4 osoby w PT. ")
			party.chat("W PT muszą być 4 osoby. ")
			return
		end
		if pc.get_level() < 100 then
			say("Musisz miec minimum 100 lvl ")
			party.chat("Lider musi mieć 100 lvl ")
			return
		else
			say("Lecimy? ")
			local s = select("tak ;D ","Nie ")
				if s == 1 then
					d.join(202)
				end
			end
		end

end
end

d.join(202)

ktoś pisał, że musi być

d.join(ID, xkord, y_kord)

Ale nie wiem czy tak będzie poprawnie działać.

Veygr · 15 Października 2011

quest test begin
       state start begin
               when 20093.chat."test" with party.is_leader() begin
                       say_title("Keo-Pung:")
                       if party.get_near_count() < 4 then
                               say("Minimum 4 osoby w PT. ")
                               party.chat("W PT muszą być 4 osoby. ")
                               return
                       end
                       if pc.get_level() < 100 then
                               say("Musisz miec minimum 100 lvl ")
                               party.chat("Lider musi mieć 100 lvl ")
                               return
                       else
                               say("Lecimy? ")
                               local s = select("tak ;D ","Nie ")
                                       if s == 1 then
                                               d.join(202, 110, 112)
                                       end
                               end
                       end

end
end

quest test begin
       state start begin
               when 20093.chat."test" with party.is_leader() begin
                       say_title("Keo-Pung:")
                       if party.get_near_count() < 4 then
                               say("Minimum 4 osoby w PT. ")
                               party.chat("W PT muszą być 4 osoby. ")
                               return
                       end
                       if pc.get_level() < 100 then
                               say("Musisz miec minimum 100 lvl ")
                               party.chat("Lider musi mieć 100 lvl ")
                               return
                       else
                               say("Lecimy? ")
                               local s = select("tak ;D ","Nie ")
                                       if s == 1 then
                                               d.join(202, 8084600, 89200)
                                       end
                               end
                       end

end
end

quest test begin
       state start begin
               when 20093.chat."test" with party.is_leader() begin
                       say_title("Keo-Pung:")
                       if party.get_near_count() < 4 then
                               say("Minimum 4 osoby w PT. ")
                               party.chat("W PT muszą być 4 osoby. ")
                               return
                       end
                       if pc.get_level() < 100 then
                               say("Musisz miec minimum 100 lvl ")
                               party.chat("Lider musi mieć 100 lvl ")
                               return
                       else
                               say("Lecimy? ")
                               local s = select("tak ;D ","Nie ")
                                       if s == 1 then
                                               d.join(8084600, 89200)
                                       end
                               end
                       end

end
end

0 reakcji

Właśnie zauważyłem że jak dam d.join(1) to zadziała.

Mapy muszą być pod tym samym procesem żeby to zadziałało ;]

Svope · 15 Października 2011

d.join otwiera dungeon wiec jezeli nic nie bedzie dalej nie zadziala. Mysle że będzie działać warp_all_in_map

LubaskiKawus · 15 Października 2011

cze..

po prosze questa u 9233 ''wymieniacz''

po kliknieciu w niego wyswietlaja sie 3 okna

200 sztabek 2kkk

100 sztabek 1kkk

50 sztabek 500kk

i jak wybierze jakas opcje to pisze : czy chcesz sie wymienic [...cena] za [...szt sztabek]

i wybor tak ,nie

jak kliknie np na tak przy 200sztabkach to wezmie mu te 2kkk

Svope · 15 Października 2011

@UP prosze bardzo

quest wymieniacz begin
state start begin
	when 9233.click begin
		local s = select("200 sztabek 2kkk", "100 sztabek 1kkk", "50 sztabek 500kk", "Zakończ")
			if s == 4 then
				return
				end
			if s == 3 with pc.count_item(ID_SZTABKI) >= 50 then
				say_title("Informacja:")
				say("Pamyślnie zamieniłeś sztabki.")
				pc.remove_item(ID_SZTABKI, 50)
				pc.change_money(500000000)
			end

			if s == 2 with pc.count_item(ID_SZTABKI) >= 100 then
				say_title("Informacja:")
				say("Pamyślnie zamieniłeś sztabki.")
				pc.remove_item(ID_SZTABKI, 100)
				pc.change_money(1000000000)
			end

			if s == 1 with pc.count_item(ID_SZTABKI) >= 200 then
				say_title("Informacja:")
				say("Pamyślnie zamieniłeś sztabki.")
				pc.remove_item(ID_SZTABKI, 200)
				pc.change_money(2000000000)
			end

			else
			say_title("Informacja:")
			say("Nie masz wystarczającej ilości sztabek.")
		end
	end
end
end

@EDIT zapomniałem o możliwości wyboru tutaj poprawione:)

quest wymieniacz begin
state start begin
	when 9233.click begin
		local s = select("200 sztabek 2kkk", "100 sztabek 1kkk", "50 sztabek 500kk", "Zakończ")
			if s == 4 then
				return
				end
			if s == 3 with pc.count_item(ID_SZTABKI) >= 50 then
				say_title("Informacja:")
				say("Czy chcesz zamienic 50 sztabek za 500kk?")
				local a == select("Tak", "Nie")
				if a == 2 then
				return
				end
				if a == 1 then
				pc.remove_item(ID_SZTABKI, 50)
				pc.change_money(500000000)
			end

			if s == 2 with pc.count_item(ID_SZTABKI) >= 100 then
				say_title("Informacja:")
				say("Czy chcesz zamienic 100 sztabek za 1kkk?")
				local c == select("Tak", "Nie")
				if c == 2 then
				return
				end
				if c == 1 then
				pc.remove_item(ID_SZTABKI, 100)
				pc.change_money(1000000000)
			end

			if s == 1 with pc.count_item(ID_SZTABKI) >= 200 then
				say_title("Informacja:")
				say("Czy chcesz zamienic 200 sztabek za 2kkk?")
				local b == select("Tak", "Nie")
				if b == 2 then
				return
				end
				if b == 1 then
				pc.remove_item(ID_SZTABKI, 200)
				pc.change_money(2000000000)
			end

			else
			say_title("Informacja:")
			say("Nie masz wystarczającej ilości sztabek.")
		end
	end
end
end

LubaskiKawus · 15 Października 2011

thx tylko ze ja chcialem na odwrot

za kase kupujesz sztabki a nie odwrotnie ;x

Svope · 15 Października 2011

@UP sorki za pomyłkę źle cie zrozumiałem łap

quest wymieniacz begin
state start begin
	when 9233.click begin
		local s = select("200 sztabek za 2kkk", "100 sztabek za 1kkk", "50 sztabek za 500kk", "Zakończ")
			if s == 4 then
				return
				end
			if s == 3 with pc.get_money() >= 500000000 then
				say_title("Informacja:")
				say("Czy chcesz zmienić 500kk sztabek za 50 sztabek?")
				local a == select("Tak", "Nie")
				if a == 2 then
				return
				end
				if a == 1 then
				pc.change_money(-500000000)
				pc.give_item2(ID_SZTABKI, 50)
			end

			if s == 2 with pc.get_money() >= 1000000000 then
				say_title("Informacja:")
				say("Czy chcesz zmienić 1kkk sztabek za 100 sztabek?")
				local c == select("Tak", "Nie")
				if c == 2 then
				return
				end
				if c == 1 then
				pc.change_money(-1000000000)
				pc.give_item2(ID_SZTABKI, 100)
			end

			if s == 1 with pc.get_money() >= 2000000000 then
				say_title("Informacja:")
				say("Czy chcesz zmienić 2kkk sztabek za 200 sztabek?")
				local b == select("Tak", "Nie")
				if b == 2 then
				return
				end
				if b == 1 then
				pc.change_money(-2000000000)
				pc.give_item2(ID_SZTABKI, 200)
			end

			else
			say_title("Informacja:")
			say("Nie masz wystarczającej ilości Yang.")
		end
	end
end
end

LubaskiKawus · 15 Października 2011

thx ! zaraz sprawdze czy działa ..

a moglbys mi te 2 questy złączyć że po kliknieciu w tego npc bedzie

sztabki na kase

kasa na sztabki

Veygr · 15 Października 2011

d.join otwiera dungeon wiec jezeli nic nie bedzie dalej nie zadziala. Mysle że będzie działać warp_all_in_map

I o to chodzi ;] Wszystko już działa.

lKnXl · 15 Października 2011

Prosiłbym o questa podobnego jak na PL na zdobycie krwistego kamienia.Dam limit + !!

ID NPC:20095

ID Kamienia:30190

XeriasTeam · 15 Października 2011

2 prośba dodanie Zoombie od 100 lv

quest move_ring begin

state start begin

when 80009.use begin

local s = select("Moje miasto","Pierwsze miasto Shinsoo", "Pierwsze miasto Chunjo", "Pierwsze miasto Jinno", "Drugie miasto Shinsoo M2", "Drugie miasto Chunjo M2", "Drugie miasto Jinno M2", "Dalej", "Anuluj")

if s == 1 then

say_title("Zostaniesz przeniesiony! ")

say("")

wait()

local empire = pc.get_empire()

if empire == 1 then

pc.warp(474300 , 954800)

elseif empire == 2 then

pc.warp(63800, 166400)

elseif empire == 3 then

pc.warp(959900, 269200)

end

if s == 2 then

say_title("Zostaniesz przeniesiony! ")

say("")

wait()

pc.warp ( 474300 , 954800 )

end

if s == 3 then

say_title("Zostaniesz przeniesiony!")

say("")

wait()

pc.warp ( 63800 , 166400 )

end

if s == 4 then

say_title("Zostaniesz przeniesiony!")

say("")

wait()

pc.warp ( 959900 , 269200 )

end

if s == 5 then

say_title("Zostaniesz przeniesiony!")

say("")

wait()

pc.warp ( 353100 , 882900 )

end

if s == 6 then

say_title("Zostaniesz przeniesiony!")

say("")

wait()

pc.warp ( 145500 , 240000 )

end

if s == 7 then

say_title("Zostaniesz przeniesiony!")

say("")

wait()

pc.warp ( 863900 , 246000 )

end

if s == 8 then

local s2 = select("Dolina Seungryong", "Pustynia Yongbi", "Góra Sohan", "Loch Pająków V1", "Loch Pająków V2", "Las Duchów","Czerwony Las", "Dalej","Anuluj") --- druga strona

if s2 == 1 then

say_title ("Zostaniesz Przeniesiony")

say ("")

wait ()

local empire = pc . get_empire ( )

if empire == 1 then

pc.warp ( 402100 , 673900 )

elseif empire == 2 then

pc.warp ( 270400 , 739900 )

elseif empire == 3 then

pc.warp ( 321300 , 808000 )

end

if s2 == 2 then

say_title ("Zostaniesz Przeniesiony")

say ("")

wait ()

local empire = pc . get_empire ( )

if empire == 1 then

pc.warp ( 217800 , 627200 )

elseif empire == 2 then

pc.warp ( 221900 , 502700 )

elseif empire == 3 then

pc.warp ( 344000 , 502500 )

end

if s2 == 3 then

say_title ("Zostaniesz Przeniesiony")

say ("")

wait ()

local empire = pc . get_empire ( )

if empire == 1 then

pc.warp ( 434200 , 290600 )

elseif empire == 2 then

pc.warp ( 375200 , 174900 )

elseif empire == 3 then

pc.warp ( 491800 , 173600 )

end

if s2 == 4 then

say_title ("Zostaniesz Przeniesiony")

say ("")

wait ()

local empire = pc . get_empire ( )

if empire == 1 then

pc.warp ( 599400 , 756300 )

elseif empire == 2 then

pc.warp ( 597800 , 622200 )

elseif empire == 3 then

pc.warp ( 730700 , 689800 )

end

if s2 == 5 then

say_title("Zostaniesz przeniesiony!")

say("")

wait()

pc.warp ( 704100 , 464100 )

end

if s2 == 6 then

say_title("Zostaniesz przeniesiony! ")

say("")

wait()

pc.warp(289100 , 5700)

end

if s2 == 7 then

say_title("Zostaniesz przeniesiony! ")

say("")

wait()

pc.warp ( 1119900 , 70800 )

end

if s2 == 8 then

local s3 = select("Zoombie 100lv","Ziemia Olbrzymów", "Ognista Ziemia","Wieża Demonów","Grota Wygnawców V1", "Grota Wygnawców V2" , "Dalej","Anuluj")

if s3 == 1 then

say_title("Zostaniesz przeniesiony! ")

say("")

wait()

pc.warp ( 0 , 4500000 )

end

if s3 == 2 then

say_title("Zostaniesz przeniesiony! ")

say("")

wait()

pc.warp ( 845100 , 745900 )

end

if s3 == 3 then

say_title("Zostaniesz przeniesiony!")

say("")

wait()

pc.warp ( 672700 , 680500 )

end

if s3 == 4 then

say_title("Zostaniesz przeniesiony! ")

say("")

wait()

pc.warp ( 590500 , 110500 )

end

if s3 == 5 then

say_title("Zostaniesz przeniesiony! ")

say("")

wait()

pc.warp ( 9800 , 1215100 )

end

if s3 == 6 then

say_title("Zostaniesz przeniesiony! ")

say("")

wait()

pc.warp ( 241300 , 1275500 )

end

if s3 == 7 then

say_title("Zostaniesz przeniesiony! ")

say("")

wait()

pc.warp ( 0 , 500000 )

end

if s3 == 8 then

local s4 = select("Loch Małp Łatwy", "Loch Mało Sredni", "Loch Małp Trudny", "Anuluj")

if s4 == 1 then

say_title("Zostaniesz przeniesiony! ")

say("")

wait()

pc.warp ( 928800 , 447700 )

end

if s4 == 2 then

say_title("Zostaniesz przeniesiony! ")

say("")

wait()

pc.warp ( 135200 , 653200 )

end

if s4 == 3 then

say_title("Zostaniesz przeniesiony! ")

say("")

wait()

pc.warp ( 135200 , 730081 )

end

Stelios · 15 Października 2011

thx ! zaraz sprawdze czy działa ..

a moglbys mi te 2 questy złączyć że po kliknieciu w tego npc bedzie

sztabki na kase

kasa na sztabki

Aż tak trudno to połączyć?

Przecież tylko kopiujesz oba selecty i zmieniasz numerki...

@EDIT

quest wymieniacz begin
state start begin
	when 9233.click begin
		local s = select("200 sztabek za 2kkk", "100 sztabek za 1kkk", "50 sztabek za 500kk", "2kkk za 200 sztabek", "1kkk za 100 sztabek", "500kk za 50 sztabek", "Zakończ")
			if s == 7 then
				return
			end
			if s == 3 with pc.get_money() >= 500000000 then
				say_title("Informacja:")
				say("Czy chcesz zmienić 500kk sztabek za 50 sztabek?")
				local a == select("Tak", "Nie")
				if a == 2 then
				return
				end
				if a == 1 then
				pc.change_money(-500000000)
				pc.give_item2(ID_SZTABKI, 50)
			end

			if s == 2 with pc.get_money() >= 1000000000 then
				say_title("Informacja:")
				say("Czy chcesz zmienić 1kkk sztabek za 100 sztabek?")
				local c == select("Tak", "Nie")
				if c == 2 then
				return
				end
				if c == 1 then
				pc.change_money(-1000000000)
				pc.give_item2(ID_SZTABKI, 100)
			end

			if s == 1 with pc.get_money() >= 2000000000 then
				say_title("Informacja:")
				say("Czy chcesz zmienić 2kkk sztabek za 200 sztabek?")
				local b == select("Tak", "Nie")
				if b == 2 then
				return
				end
				if b == 1 then
				pc.change_money(-2000000000)
				pc.give_item2(ID_SZTABKI, 200)
			end

			if s == 4 with pc.count_item(ID_sztabki) >= 200 then
				say_title("Informacja:")
				say("Czy chcesz zmienić 200 sztabek za 2kkk?")
				local r == select("Tak", "Nie")
				if r == 2 then
				return
				end
				if r == 1 then
				pc.change_money(2000000000)
				pc.remove_item(ID_SZTABKI, 200)
			end

			if s == 5 with pc.count_item(ID_SZTABKI) >= 100 then
				say_title("Informacja:")
				say("Czy chcesz zmienić 100 sztabek za 1kkk?")
				local t == select("Tak", "Nie")
				if t == 2 then
				return
				end
				if t == 1 then
				pc.change_money(1000000000)
				pc.remove_item(ID_SZTABKI, 100)
			end

			if s == 6 with pc.count_item(IDZ_SZTABKI) >= 50 then
				say_title("Informacja:")
				say("Czy chcesz zmienić 50 sztabek za 500kk?")
				local y == select("Tak", "Nie")
				if y == 2 then
				return
				end
				if y == 1 then
				pc.change_money(500000000)
				pc.remove_item(ID_SZTABKI, 50)
			end

			else
			say_title("Informacja:")
			say("Nie masz wystarczającej ilości Yang.")
		end
	end
end
end

Proste, łatwe, ale nie przyjemne...

kopson44 · 15 Października 2011

próbowałem jakoś złożyć ten quest, ale dalej nie działa tak jakbym chciał

wgrywa się bez problemu

ubijemy metina i lecimy na inną mape

tu mamy ubić 8 metinów aby był kolejny poziom, ale po ubiciu tych metinów nic się nie dzieje

to jest ten kawałek:

when 8003.kill with pc.in_dungeon() and pc.get_map_index() == 103 begin
			timer("dalej", 6)
			local cont = d.getf("8_kamykuf") + 1
               d.setf("8_kamykuf", cont)

               if cont >= 8 then
                       d.setf("8_kamykuf", 0)
               end     
       end

a to cały quest

quest mini_event begin
       state start begin
               when 20016.chat."Wyzwanie" begin --- ID to index mapki
                               say_title(mob_name(20016)..":")
                       if pc.getqf("raz") == 0 then
                               say("Witaj "..pc.get_name().."! ")
                               say("Mozesz u mnie odbyć pewną misje. ")
                               say("")
                               say("Misja ta polega na zniszczeniu kilku kamieni ")
                               say("metin i kilku potworków. ")

                               if pc.get_level() < 50 then
                                       say("Mogę wpuszczać tylko osoby z 50 poziomem. ")
                                       party.chat("Wasz lider nie posiada 50 poziomu. ")                                  

                               else
                                       say("Spełniasz Warunki: ")
                                       say_title("Masz lvl 50 lub wiekszy ")
                                       say("")
                                       say_reward("Chcesz się przenieść aby ją wykonać? ")

                                       local s = select("Tak", "Nie")                    
                                               if s == 1 then
                                                       say_title(mob_name(20016)..":")
                                                       say("Zostaniesz przeniesiony na inna mape. ")

                                                       pc.setqf("raz", get_time()+1*1*1)
                                                       pc.warp(7013100, 2512600)
                                               end
                               end

                       else
                               say("Nie mozesz tego zrobić wiecej niż raz dziennie. ")
                               say("")
                       end

                       if pc.getqf("raz") <= get_time() then
                               pc.setqf("raz", 0)
                       end
               end

			when 8004.kill begin
			timer("metek_lv20", 6)
			end

			when metek_lv20.timer begin
			d.new_jump_all(103, 383, 640)
					d.spawn_mob(8003, 375, 405)
                       d.spawn_mob(8003, 392, 405)
                       d.spawn_mob(8003, 406, 392)
                       d.spawn_mob(8003, 406, 372)
                       d.spawn_mob(8003, 393, 360)
					d.spawn_mob(8003, 374, 360)
                       d.spawn_mob(8003, 360, 373)
					d.spawn_mob(8003, 359, 394)

					end

			when 8003.kill with pc.in_dungeon() and pc.get_map_index() == 103 begin
			local cont = d.getf("8_kamykuf") + 1
               d.setf("8_kamykuf", cont)

               if cont >= 8 then
                       d.setf("8_kamykuf", 0)
               end  
			timer("dalej", 6)
		end

			when 8003.kill with pc.in_dungeon() and pc.get_map_index() == 103 begin
			game.drop_item(50300, 1)
			end

			when dalej.timer begin
			d.notice("Pokonaj 4 Bossy Zwirząt")
			d.spawn_mob(191, 383, 369)
			d.spawn_mob(192, 208, 301)
			d.spawn_mob(193, 468, 204)
			d.spawn_mob(194, 452, 578)
			d.regen_file("data/takiecos/takiecos1.txt")
			end

			when kill with mob_vnum() == 191 and mob_vnum() == 192 and mob_vnum() == 193 and mob_vnum() == 194 begin
			timer("event", 6)
			end

			when 191.kill begin
			d.notice("Lykos Pokonany!")
			end
			when 192.kill begin
			d.notice("Scrofa Pokonana!")
			end
			when 193.kill begin
			d.notice("Bera Pokonana!")
			end
			when 194.kill begin
			d.notice("Tigris Pokonany!")
			end

			when event.timer begin
			d.notice("Bosy zostały pokonane, ale to nie koniec zabawy. ")
			d.new_jump_all(103, 383, 640)
			d.spawn_mob(591, 384, 384)
			d.regen_file("data/takiecos/takiecos2.txt")
			end

			when 591.kill with pc.in_dungeon() and pc.get_map_index() == 103 begin
			d.notice("Kapitan Został Zgładzony. ")
			timer("wodzowie",6)
			end

			when wodzowie.timer begin
			d.notice("Atak Orków, zniszcz 10 Wodzów Orków. ")
			d.regen_file("data/takiecos/takiecos4.txt")
			end

			when 691.kill with pc.in_dungeon() and pc.get_map_index() == 103 begin
			local cont = d.getf("10wodzow") + 1
               d.setf("10wodzow", cont)

               if cont >= 8 then
                       d.setf("10wodzow", 0)
					timer("zniszczeni",5 )
               end     
			end

			when zniszczeni.timer begin
			d.new_jump_all(103, 383, 640)
			d.notice("Wodzowie zostali pokonani. ")
			d.notice("Czas na kolejny etap. ")
			d.notice("Zniszcz 20 Metinów, masz na to 10min")
			end

			when 8005.kill begin
			local cont = d.getf("20metow") + 1
               d.setf("20metow", cont)

               if cont >= 20 then
                       d.setf("20metow", 0)
					timer("dead",5 )
					end
			end

			 when logout with  pc.get_map_index() == 103 begin
                       local empire = pc.get_empire() 
                               if empire == 1 then 
                                       pc.warp(474300, 954800) 
                               elseif empire == 2 then 
                                       pc.warp(63800, 166400) 
                               elseif empire == 3 then 
                                       pc.warp(959900, 269200)
                               end
               end

			when dead.timer begin
			d.new_jump_all(103, 383, 640)
			d.notice("Metiny zniszczone ")
			d.notice("Ostatnie Wyzwanie ")
			end

			when 692.kill begin
			d.notice("Elit.Wódz Orków został pokonany. ")
			d.notice("Czas dobiegł końca, zachwile zostaniecie wylogowani. ")
			timer("koniec", 6)
			end

			when koniec.timer begin
			d.exit_all()
			end
	end
end

powie ktoś co robie źle??

@EDIT

wcześniej złego questa wkleiłem teraz to ten

LubaskiKawus · 16 Października 2011

Aż tak trudno to połączyć?

Przecież tylko kopiujesz oba selecty i zmieniasz numerki...

@EDIT

quest wymieniacz begin
state start begin
	when 9233.click begin
		local s = select("200 sztabek za 2kkk", "100 sztabek za 1kkk", "50 sztabek za 500kk", "2kkk za 200 sztabek", "1kkk za 100 sztabek", "500kk za 50 sztabek", "Zakończ")
			if s == 7 then
				return
			end
			if s == 3 with pc.get_money() >= 500000000 then
				say_title("Informacja:")
				say("Czy chcesz zmienić 500kk sztabek za 50 sztabek?")
				local a == select("Tak", "Nie")
				if a == 2 then
				return
				end
				if a == 1 then
				pc.change_money(-500000000)
				pc.give_item2(ID_SZTABKI, 50)
			end

			if s == 2 with pc.get_money() >= 1000000000 then
				say_title("Informacja:")
				say("Czy chcesz zmienić 1kkk sztabek za 100 sztabek?")
				local c == select("Tak", "Nie")
				if c == 2 then
				return
				end
				if c == 1 then
				pc.change_money(-1000000000)
				pc.give_item2(ID_SZTABKI, 100)
			end

			if s == 1 with pc.get_money() >= 2000000000 then
				say_title("Informacja:")
				say("Czy chcesz zmienić 2kkk sztabek za 200 sztabek?")
				local b == select("Tak", "Nie")
				if b == 2 then
				return
				end
				if b == 1 then
				pc.change_money(-2000000000)
				pc.give_item2(ID_SZTABKI, 200)
			end

			if s == 4 with pc.count_item(ID_sztabki) >= 200 then
				say_title("Informacja:")
				say("Czy chcesz zmienić 200 sztabek za 2kkk?")
				local r == select("Tak", "Nie")
				if r == 2 then
				return
				end
				if r == 1 then
				pc.change_money(2000000000)
				pc.remove_item(ID_SZTABKI, 200)
			end

			if s == 5 with pc.count_item(ID_SZTABKI) >= 100 then
				say_title("Informacja:")
				say("Czy chcesz zmienić 100 sztabek za 1kkk?")
				local t == select("Tak", "Nie")
				if t == 2 then
				return
				end
				if t == 1 then
				pc.change_money(1000000000)
				pc.remove_item(ID_SZTABKI, 100)
			end

			if s == 6 with pc.count_item(IDZ_SZTABKI) >= 50 then
				say_title("Informacja:")
				say("Czy chcesz zmienić 50 sztabek za 500kk?")
				local y == select("Tak", "Nie")
				if y == 2 then
				return
				end
				if y == 1 then
				pc.change_money(500000000)
				pc.remove_item(ID_SZTABKI, 50)
			end

			else
			say_title("Informacja:")
			say("Nie masz wystarczającej ilości Yang.")
		end
	end
end
end

Proste, łatwe, ale nie przyjemne...

niby dobre ale nie chce sie dodać ...

vps11363# ./qc wymieniacz.quest

QUEST : wymieniacz

STATE : start

WHEN : 9233.click

i nic dalej w konsoli sie nie moge ruszyc a wgrze sie tez nie dodaje

Zaloguj się

👋 Witaj na MPCForum!

Pisanie / Poprawa Questów !

Rekomendowane odpowiedzi

Zarchiwizowany