Pisanie / Poprawa Questów !

4h4 · 14 Lutego 2012

Proszę o poprawę !

quest resp begin
                               state start begin
                                                               when 20011.chat."MobSpawn" begin
                                                                                               say ( "Witaj" )
                                                                                               say ( "" )
                                                                                               say ( "Chcesz kogos przywolac?" )
                                                                                               say ( "UWAGA!! ON PRZYWOLA SIE KOLO URIEL!" )
                                                                                               say ( "Wybierz kogo chcesz przywolac, a potem napierdalaj jak pojebany." )
                                                                                               local s = select ( "Riper", "Nieb.Smierc", "9 ogonow", "Anuluj" )
                                                                                               if 1 == s then
                                                                                                                               mob.spawn( 1093, 658, 550, 0, 0, 0 )
                                                                                                                               chat( "Potwor zostal przywolany!" )
                                                                                                                               chat( "Przy Urielu" )
                                                                                               elseif 2 == s then
                                                                                                                               mob.spawn( 1095, 658, 550, 0, 0, 0 )
                                                                                                                               chat( "Potwor zostal przywolany!" )
                                                                                                                               chat( "Przy Urielu" )
                                                                                               elseif 3 == s then
                                                                                                                               mob.spawn( 1901, 658, 550, 0, 0, 0 )
                                                                                                                               chat( "Potwor zostal przywolany!" )
                                                                                                                               chat( "Przy Urielu" )
                                                                                               else
                                                                                                                               return
                                                                                               end
                                                               end
                               end
end

sexarek · 14 Lutego 2012

Siemka . Ma moze ktoś questa ktory da sie dodać do pierscienia tp funkcje na zamiane 1 kkk yang na 1 sztabke i na odwrót sztabke na 1 kkk . Chciałbym aby w pierscieniu tp była funkcja Bank a w niej zamiana yang na sztabki i sztabki na yang .

Dargon · 14 Lutego 2012

2x UP

quest resp begin
state start begin
	when 20011.chat."MobSpawn" begin
		say("Witaj")
		say("")
		say("Chcesz kogos przywolac?")
		say("UWAGA!! ON PRZYWOLA SIE KOLO URIEL!")
		say("Wybierz kogo chcesz przywolac, a potem napierdalaj jak pojebany.")
		local s = select ("Riper", "Nieb.Smierc", "9 ogonow", "Anuluj")
		if 1 == s then
			mob.spawn(1093, 658, 550, 0, 0, 0)
			chat("Potwor zostal przywolany!")
			chat("Przy Urielu")
		elseif 2 == s then
			mob.spawn(1095, 658, 550, 0, 0, 0)
			chat("Potwor zostal przywolany!")
			chat("Przy Urielu")
		elseif 3 == s then
			mob.spawn(1901, 658, 550, 0, 0, 0)
			chat("Potwor zostal przywolany!")
			chat("Przy Urielu")
		elseif 4 ==s then
			return
		end
	end
end
end

old_kwiatosz · 15 Lutego 2012

A nie powinna być tu ilość :

mob.spawn(1901, 658, 550, 0, 0, 1) -- tu gdzie jeden ?

Rower1310 · 15 Lutego 2012

@up ma rację ponieważ z tego co pamiętam to ta ostatnia liczba odpowiada za ilość przywoływanych mobbów

sexarek · 15 Lutego 2012

Witam powie mi ktoś co jest tutaj źle lub to poprawi ? Błąd jest niby w linijce 50 czyli ostatniej tak wskazuje maszyna.

quest wymieniacz begin

state start begin

when 80009.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(90004, 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(90004, 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(90004, 200)

end

else

say_title("Informacja:")

say("Nie masz wystarczającej ilości Yang.")

end

@Edit

jak usune to end z 50 linijki to maszyna wywala błąd " qc in malloc (): error : allocation failed abort (core dumped) "

Rower1310 · 15 Lutego 2012

@up używaj zawsze elseif wtedy masz pewność że się nie pogubisz w end-ach. Nie jestem pewny co do konstrukcji if-ów a dokładniej tego

with pc.get_money() >= 500000000

ponieważ z tego co ja wiem to with można używać tylko przy when ale nie jestem pewny. Jak nie będzie działać to napisz to poprawię ci te if-y.

Tutaj masz cały poprawiony kod

quest wymieniacz begin
state start begin
when 80009.click begin
local s = select("200 sztabek za 2kkk", "100 sztabek za 1kkk", "50 sztabek za 500kk", "Zakończ")
if s == 4 then
return
elseif 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
elseif a == 1 then
pc.change_money(-500000000)
pc.give_item2(90004, 50)
end

elseif 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
elseif c == 1 then
pc.change_money(-1000000000)
pc.give_item2(90004, 100)
end

elseif 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
elseif b == 1 then
pc.change_money(-2000000000)
pc.give_item2(90004, 200)
end

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

@edit kod questu dawaj zawsze w spoilerze lepiej wtedy wygląda

sexarek · 15 Lutego 2012

Niestety też nie dziala wskazał bład w linijce 44 . Jak byś mógł to poprawić byłbym ci wdzięczny .

nfsfankp50098 · 15 Lutego 2012

Witam quest nadal nie przywołuje metinów

quest Witek begin
 state start begin
	    when 2522.kill begin
			 timer("lol5", 2*60)
			 say("")
			 say("Za 2 min zostaniesz przeniesiony")
  say("do wymiaru gdzie smierc to pestka")
  say("Zniszcz Elit.Lowce Glow i zdobadz tron podziemi")
  say("")
  say("Otrzymałeś Złata Perłe")
			 say("")
  pc.give_item2(18199,1)
	    end
	    when lol5.timer begin
  mob.spawn(8030, 91, 1145, 0, 0, 1)
  mob.spawn(8030, 91, 1129, 0, 0, 1)
  mob.spawn(8030, 58, 1145, 0, 0, 1)
  mob.spawn(8030, 58, 1129, 0, 0, 1)
  pc.warp(1007400,1114100)
	    end
 when 2523.kill begin
			 timer("lol6", 2*60)
			 say("")
			 say("Gratulacje zabiłes Elit.Łowce Głow")
  say("masz 2 min na zebranie dropu zanim zostaniesz")
  say("przeniesiony na pierwsza platforme!")
			 say("")
	    end
	    when lol6.timer begin
  pc.warp(1084500,1090600)
 end
 end
end

Nadal nie działa

mob.spawn(8030, 91, 1145, 0, 0, 1)

czy

mob.spawn(8030, 91, 1145, 0, 0, 0)

Czy ktoś pomoże jakby co to chodzi o metiny a nie o potwory

Vatu · 15 Lutego 2012

Witam.

Potrzebuje części questa.

Chodzi o to ze mam tak:

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

if s == 1 then

d.join(12)

I teraz przenosi na kordy.

Ale chce zeby teraz z tych kordów przeniosło na:

8534 101 po 10 sek.

Rower1310 · 15 Lutego 2012

@nfsfankp50098 w tym quescie kiedy ma się rozpocząć wykonywanie questu ??

Ponieważ w tym co napisałeś masz że po rozwaleniu moba o id 2522 dopiero wykonuje się quest

@3x up podaj screen z konsoli

nfsfankp50098 · 15 Lutego 2012

moby mają się zrespić po zabiciu moba 2522 i przy okazji przenieść na inną platformę

jak zabije moba 2522 te metki mają się zrespić na tej samej mapie tylko na innej platformie

Rower1310 · 15 Lutego 2012

@up ok ale tutaj nie masz nigdzie na jakie kordy ma cię przenieść

when 2522.kill begin
timer("lol5", 2*60)
say("")
say("Za 2 min zostaniesz przeniesiony")
say("do wymiaru gdzie smierc to pestka")
say("Zniszcz Elit.Lowce Glow i zdobadz tron podziemi")
say("")
say("Otrzymałeś Złata Perłe")
say("")
pc.give_item2(18199,1)
end

podaj kordy to ci zrobię

nfsfankp50098 · 15 Lutego 2012

zobacz jeszcze raz mam zrobione że po 2 min tp

quest Witek begin
 state start begin
    when 2522.kill begin
	 timer("lol5", 2*60)
	 say("")
	 say("Za 2 min zostaniesz przeniesiony")
  say("do wymiaru gdzie smierc to pestka")
  say("Zniszcz Elit.Lowce Glow i zdobadz tron podziemi")
  say("")
  say("Otrzymałeś Złata Perłe")
	 say("")
  pc.give_item2(18199,1)
    end
    when lol5.timer begin
  mob.spawn(8030, 91, 1145, 0, 0, 1)
  mob.spawn(8030, 91, 1129, 0, 0, 1)
  mob.spawn(8030, 58, 1145, 0, 0, 1)
  mob.spawn(8030, 58, 1129, 0, 0, 1)
  pc.warp(1007400,1114100)
    end
 when 2523.kill begin
	 timer("lol6", 2*60)
	 say("")
	 say("Gratulacje zabiłes Elit.Łowce Głow")
  say("masz 2 min na zebranie dropu zanim zostaniesz")
  say("przeniesiony na pierwsza platforme!")
	 say("")
    end
    when lol6.timer begin
  pc.warp(1084500,1090600)
 end
 end
end

kopson44 · 15 Lutego 2012

siema

umiałby ktoś przerobić ten quest aby była możliwość kupna danego bonusu tylko raz??

np. kupie sobie 10inta i następnym razem już nie będe mógł go kupić, ta opcja mi zniknie, ale będe mógł kupić następne bony które pozostały mi na liście

---------------------------------
-- Quest napisany przez Sunushi
-- Prosze nie usuwac stopki
---------------------------------
quest bonus_za_rude begin
	state start begin
			when 20017.chat."Wymień rudę na bonus!" begin
					say_title(mob_name(20017)..":")
					if pc.getqf("bonus") == 2 then
							say("Niestety, wykorzystałeś już limit bonusów.")
							say_reward("Każdemu graczowi wolno wymienić ")
							say_reward("rudę tylko na dwa dowolne bonusy.")
					else
							say("Witaj "..pc.get_name().."!")
							say("Mogę wymienić kilka sztuk rudy na mały bon.")
							say("Chcesz skorzystać z moich usług?")
							local a = select("Tak","Nie, może innym razem")
							if a == 2 then
									say_title(mob_name(20017)..":")
									say("No dobrze, wróć gdy zmienisz zdanię.")
							elseif a == 1 then
									say_title(mob_name(20017)..":")
									say("Proszę, oto cennik:")
									say("- 10 siły za 800 sztuk Rudy Ebonitu,")
									say("- +3000 PŻ za 1000 sztuk Rudy Kryształu,")
									say("- +100 obrony za 1200 sztuk Rudy Nieb. Łez,")
									say("- +2000 PE za 1000 sztuk Rudy Ametystu,")
									say("- +10 Int za 800 sztuk Rudy Złota,")
									say("- +10 Zrę za 800 sztuk Rudy B. Złota,")
									say("- +10 Wit za 800 sztuk Rudy Jadeitu,")
									say("- +20% Szyb. Ruchu za 600 sztuk Rudy Miedzi.")
									wait()
									say_title(mob_name(20017)..":")
									say("Wybierz rudę, którą chcesz wymienić:")
									local s = select("Ebonit","Kryształ ","Nieb. Łzy","Ametyst","Złoto","B. Złoto","Jadeit","Miedź ","Anuluj")
									if s == 1 then
											say_title(mob_name(20017)..":")
											if pc.count_item(50608) < 800 then
													say("Masz zbyt małą ilość rudy!")
													return
											end
											say("Czy na pewno chcesz wymienić 800 sztuk Rudy")
											say("Ebonitu na +10 Siły?")
											local b = select("Tak","Anuluj")
											if b == 2 then
													return
											elseif b == 1 then
													say_title(mob_name(20017)..":")
													say("Otrzymałeś stały bon +10 siły!")
													local count = pc.getqf("bonus") + 1
													pc.setqf("bonus", count)
													affect.add_collect(apply.STR, 10, 60*60*24*365*60)
													pc.remove_item(50608,800)
											end
									elseif s == 2 then
											say_title(mob_name(20017)..":")
											if pc.count_item(50611) < 1000 then
													say("Masz zbyt małą ilość rudy!")
													return
											end
											say("Czy na pewno chcesz wymienić 1000 sztuk Rudy")
											say("Kryształu na +3000 PŻ?")
											local b = select("Tak","Anuluj")
											if b == 2 then
													return
											elseif b == 1 then
													say_title(mob_name(20017)..":")
													say("Otrzymałeś stały bon +3000 PŻ!")
													local count = pc.getqf("bonus") + 1
													pc.setqf("bonus", count)
													affect.add_collect(apply.MAX_HP, 3000, 60*60*24*365*60)
													pc.remove_item(50611,1000)
											end
									elseif s == 3 then
											say_title(mob_name(20017)..":")
											if pc.count_item(50613) < 1200 then
													say("Masz zbyt małą ilość rudy!")
													return
											end
											say("Czy na pewno chcesz wymienić 1200 sztuk Rudy")
											say("Nieb. Łez na +100 Obrony?")
											local b = select("Tak","Anuluj")
											if b == 2 then
													return
											elseif b == 1 then
													say_title(mob_name(20017)..":")
													say("Otrzymałeś stały bon +100 Obrony!")
													local count = pc.getqf("bonus") + 1
													pc.setqf("bonus", count)
													affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*24*365*60)
													pc.remove_item(50613,1200)
											end
									elseif s == 4 then
											say_title(mob_name(20017)..":")
											if pc.count_item(50612) < 1000 then
													say("Masz zbyt małą ilość rudy!")
													return
											end
											say("Czy na pewno chcesz wymienić 1000 sztuk Rudy")
											say("Ametystu na +2000 PE?")
											local b = select("Tak","Anuluj")
											if b == 2 then
													return
											elseif b == 1 then
													say_title(mob_name(20017)..":")
													say("Otrzymałeś stały bon +2000 PE!")
													local count = pc.getqf("bonus") + 1
													pc.setqf("bonus", count)
													affect.add_collect(apply.MAX_SP, 2000, 60*60*24*365*60)
													pc.remove_item(50612,1000)
											end
									elseif s == 5 then
											say_title(mob_name(20017)..":")
											if pc.count_item(50606) < 800 then
													say("Masz zbyt małą ilość rudy!")
													return
											end
											say("Czy na pewno chcesz wymienić 800 sztuk Rudy")
											say("Złota na +10 Inteligencji?")
											local b = select("Tak","Anuluj")
											if b == 2 then
													return
											elseif b == 1 then
													say_title(mob_name(20017)..":")
													say("Otrzymałeś stały bon +10 Inteligencji!")
													local count = pc.getqf("bonus") + 1
													pc.setqf("bonus", count)
													affect.add_collect(apply.INT, 10, 60*60*24*365*60)
													pc.remove_item(50606,800)
											end
									elseif s == 6 then
											say_title(mob_name(20017)..":")
											if pc.count_item(50610) < 800 then
													say("Masz zbyt małą ilość rudy!")
													return
											end
											say("Czy na pewno chcesz wymienić 800 sztuk Rudy")
											say("Białego Złota na +10 Zręczności?")
											local b = select("Tak","Anuluj")
											if b == 2 then
													return
											elseif b == 1 then
													say_title(mob_name(20017)..":")
													say("Otrzymałeś stały bon +10 Zręczności!")
													local count = pc.getqf("bonus") + 1
													pc.setqf("bonus", count)
													affect.add_collect(apply.DEX, 10, 60*60*24*365*60)
													pc.remove_item(50610,800)
											end
									elseif s == 7 then
											say_title(mob_name(20017)..":")
											if pc.count_item(50607) < 800 then
													say("Masz zbyt małą ilość rudy!")
													return
											end
											say("Czy na pewno chcesz wymienić 800 sztuk Rudy")
											say("Jadeitu na +10 Witalności?")
											local b = select("Tak","Anuluj")
											if b == 2 then
													return
											elseif b == 1 then
													say_title(mob_name(20017)..":")
													say("Otrzymałeś stały bon +10 Witalności!")
													local count = pc.getqf("bonus") + 1
													pc.setqf("bonus", count)
													affect.add_collect(apply.CON, 10, 60*60*24*365*60)
													pc.remove_item(50607,800)
											end
									elseif s == 8 then
											say_title(mob_name(20017)..":")
											if pc.count_item(50604) < 600 then
													say("Masz zbyt małą ilość rudy!")
													return
											end
											say("Czy na pewno chcesz wymienić 600 sztuk Rudy")
											say("Jadeitu na +20% Szybkości Ruchu?")
											local b = select("Tak","Anuluj")
											if b == 2 then
													return
											elseif b == 1 then
													say_title(mob_name(20017)..":")
													say("Otrzymałeś stały bon +20% Szybk. Ruchu!")
													local count = pc.getqf("bonus") + 1
													pc.setqf("bonus", count)
													affect.add_collect(apply.MOV_SPEED, 20, 60*60*24*365*60)
													pc.remove_item(50604,600)
											end
									elseif s == 9 then
											return
									end
							end
					end
			end
	end
end

paradox123 · 15 Lutego 2012

Siema .

Potrzebuje questa który daje skile na g u npc'ta chodzi mi o coś takiego jak tu na ss : . Tylko żeby odrazu nawet na 1lvlu bez skili na M dał skil na g takiego prostego questa to już mam . Mi chodzi o coś takiego jak na SS Żeby z M1 na G1 i pojedyńczo wybierać co sie chce . A nie na 1 lvlu sie idzie i wszystkie skile na G odrazu ;P

sexarek · 15 Lutego 2012

Poradziłęm sobie z niedziałającym questem przerobiłem go troszke i działa teraz mam takie pytanko .

Wie ktoś jak mogę dodać ten quest tak aby miec funkcje bank w pierscieniu teleportacji ? oto quest :

quest probny begin

state start begin

when 20005.chat."Bankier" begin

local s = select( "Wymieniam 1kkk yang za 10 klejnotow " , "Wymieniam 500kk yang za 5 klejnotow " , " Zakoncz " )

if s == 2 then

if pc.get_money() >= 500000000 then

say_title("Informacja:")

say("Czy chcesz zmienić 500kk Yang za 5 klejnotow?")

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

if p == 2 then

return

end

if p == 1 then

pc.change_money( -500000000 )

pc.give_item2(90004, 5)

end

else

say("Nie masz tyle Yang")

end

elseif s == 1 then

if pc.get_money() >= 1000000000 then

say_title("Informacja:")

say("Czy chcesz zmienić 1kkk Yang za 10 klejnotow?")

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

if h == 2 then

return

end

if h == 1 then

pc.change_money(-1000000000)

pc.give_item2(90004, 10)

end

else

say("Nie masz tyle Yang")

end

elseif s == 3 then

return

end

z4z0l · 15 Lutego 2012

Poprawiłem kod, troszkę bardziej czytelniejszy jest to po pierwsze. Jeżeli chcesz dodać go do pierścienia teleportacji, to usuwasz quest, state oraz when. Dodajesz do localnej opcję "Bankier" a potem wklepujesz kod od od local s = select ... peace.

quest probny begin
state start begin
 when 20005.chat."Bankier" begin
  local s = select( "Wymieniam 1kkk yang za 10 klejnotow " , "Wymieniam 500kk yang za 5 klejnotow " , " Zakoncz " )
   if s == 2 then
 if pc.get_money() >= 500000000 then
  say_title("Informacja:")
  say("Czy chcesz zmienić 500kk Yang za 5 klejnotow?")
  local p = select("Tak", "Nie")
  if p == 1 then
   pc.change_money( -500000000 )
   pc.give_item2(90004, 5)
   end
  else
  say("Nie masz tyle Yang")
  end
   elseif s == 1 then
  if pc.get_money() >= 1000000000 then
   say_title("Informacja:")
   say("Czy chcesz zmienić 1kkk Yang za 10 klejnotow?")
   local h = select("Tak", "Nie")
   if h == 1 then
   pc.change_money(-1000000000)
   pc.give_item2(90004, 10)
   end
  else
  say("Nie masz tyle Yang")
  end
   end
 end
end
end

Vatu · 15 Lutego 2012

Witam.

Potrzebuje części questa.

Chodzi o to ze mam tak:

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

if s == 1 then

d.join(12)

I teraz przenosi na kordy.

Ale chce zeby teraz z tych kordów przeniosło na:

8534 101 po 10 sek.

z4z0l · 15 Lutego 2012

jeżeli dungeon to d.new_jump_all

Vatu · 15 Lutego 2012

@UP OK. Dziękuje.

A teraz pytanko jest jakaś funkcja na polimorfię??

Która działa bo ta pc.polymorph(Mob, czas) to tak jak /poly 101 np.

Jest może inna??

A moze da sie tak zrobić ze dostajesz do eq marmurek i od razu go używa.

paradox123 · 15 Lutego 2012

co nie ma ktoś qeusta do skili na g u npc???

z4z0l · 15 Lutego 2012

@UP OK. Dziękuje.

A teraz pytanko jest jakaś funkcja na polimorfię??

Która działa bo ta pc.polymorph(Mob, czas) to tak jak /poly 101 np.

Jest może inna??

A moze da sie tak zrobić ze dostajesz do eq marmurek i od razu go używa.

Chodzi o to, aby nadać wszystkie bonusy podczas przemiany ?

@Up

ja posiadam

nfsfankp50098 · 15 Lutego 2012

Witam szukając questa dla paradox123 znalazłem coś w po dobie ale nawet nie wiem czy on działa ale może w czymś się przyda

Prosze to link do tematu

http://www.mpcforum.pl/topic/391274-problem-skille-z-m1-na-g1-nohamachi-bez-surki/

Creep2 · 15 Lutego 2012

Prosze o zmienienie Questa :P

Siema mam problem chce by nowe mapy miały nazwy np: Stare bagno-140lv Tu mam napisane jak to dokładnie ma wygladać:PP

Miasto Duchów-100lv

Wu-Tei-115lv

Ziemia Zombie-135lv

Śródziemie-160lv

Stare Bagno-190lv

Klasztor-220lv

I proszę żeby nie tylko tak pisało ale tak było ;P

Za pomoc daje + i 5

Edit /

Macie Questa

-- ?? ???? ??

quest tibia begin

state start begin

when 20095.chat."Chciałbyś się gdzieś przenieść?" begin

say ("Witaj![ENTER]Jestem Seon-Hae, staruszek który wie o rzeczach,[ENTER]O których inni nie mają pojęcia, Jeżeli chcesz,[ENTER]Mogę ci pokażę drogę do zaginionych krain,[ENTER]Ale droga tam jest bardzo niebezpieczna i nie zrobię tego za darmo![ENTER]Za moje usługi musisz zaplacic![ENTER]Czy nadal jesteś chętny?")

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

if main_set == 2 then

return

end

if pc.get_level() < 75then

say("Chyba nie myślisz, że na takim poziomie[ENTER]gdziekolwiek cię przeniose?[ENTER]Osiągnij 75 lvl i przyjdź ponownie")

say("")

return

end

local map = pc.get_map_index()

local empire = pc.get_empire()

local level = pc.get_level()

local cost = math.floor(level / 5) * 100000

-- ?? ????

if cost < 10000000 then

cost = 10000000

end

say("A więc jednak się zdecydowałeś?[ENTER] Lecz wiedz że takie coś kosztuje... ")

say_reward(string.format("Musisz zapłacić %d Yang", cost))

-- ?? ?? ???? ?? ?? (? ?? 1,2 ??)

if map == 1 or map == 3 or map == 21 or map == 23 or map == 41 or map == 43 then

local guild_map_names = {

"Miasto Duchów",

}

guild_map_name = guild_map_names[empire]

local empire_castle={

"Atlantyda-75lv",

}

empire_castle =empire_castle[empire]

local sub_set = 0

if level < 145 then -- 60?? : ?????, ???, ????, ???

sub_set = select(guild_map_name, "Wu-Tei", "Ziemia Zombie", "Śródziemie", empire_castle,"Anuluj")

if sub_set == 6 then -- ??

return

end

else -- 61?? : ????, ???, ????, ????

sub_set = select(guild_map_name, "Wu-Tei", "Ziemia Zombie", "Śródziemie", empire_castle,"Dalej")

if sub_set == 6 then -- ??

say("Te mapy dostępne są od 145 poziomu!")

say_reward(string.format("Za usługe pobieram %d yang!", cost))

sub_set = select("Stare Bagno", "Klasztor", "Wróć", "Anuluj") + 5

if sub_set == 9 then -- ??

return

end

if sub_set == 8 then -- ??

--- l

say_reward(string.format("Bedzie to kosztowac %d yang.", cost))

say_reward("To co postanowiłeś?")

sub_set = select(guild_map_name, "Wu-Tei", "Ziemia Zombie", "Śródziemie", empire_castle,"Dalej")

if sub_set == 6 then -- ??

--- l

say("Te mapy dostepne sa od 145 poziomu!")

say("Więc jak?")

say_reward(string.format("Koszt to %d yang.", cost))

sub_set = select("Stare Bagno", "Klasztor", "Wróć", "Anuluj") + 5

if sub_set == 8 then -- ??

return

end

if pc.gold < cost then

say("Niestety nie masz wystarczająco[ENTER]Dużo Yang![ENTER]Przyjdź kiedy będziesz mieć pełną sumę...")

say_reward(string.format("Musisz zapłacić %d yang", cost))

say("")

return

end

pc.changegold(-cost)

local warp = {

-- gm_guild_build

{

{ 105100, 99 },

},

-- metin2_map_dd

{

{ 8010900, 9300 },

},

-- metin2_map_zombiev1

{

{ 1024092, 537981 },

},

-- metin2_map_naga1

{

{ 9935552, 9935731 },

},

{-- metin2_map_skipia_dungeon_01

{ 100, 1203248 },

} ,

-- metin2_map_bagno

{

{ 1844902, 1000816 },

},

-- metin2_map_m2m

{

{ 6935877, 6936042 },

{ 6936174, 6935790 },

{ 6936406, 6936041 },

},

}

test_chat(warp[sub_set][empire][1]..warp[sub_set][empire][2])

say("Podązaj za mną!")

say("")

say("Za godzine powinnismy byc na miejscu!")

wait()

pc.warp(warp[sub_set][empire][1], warp[sub_set][empire][2])

else -- ? ?? 1,2 ? ??? ?????? ? ?? 1,2 ? ??? ?? ??

local sub_set2 = 3

--sub_set2 = select(locale.vileage1_name[empire], locale.vileage2_name[empire], locale.cancel)

if empire==1 then

sub_set2 = select("Shinsoo M1","Shinsoo M2" , locale.cancel)

elseif empire ==2 then

sub_set2 = select("Chunjo M1","Chunjo M2" , locale.cancel)

elseif empire ==3 then

sub_set2 = select("Jinno M1","Jinno M2" , locale.cancel)

end

if sub_set2 != 3 then

if pc.gold < cost then

say("Hmm...")

say("Rozumiem, ze nie masz yang")

say("ale ja tez musze jakos wyzywic swoja rodzine!")

say_reward(string.format("Wroc kiedy zdobedziesz %d yang", cost))

say("")

else

if sub_set2 == 1 then

say("Podązaj za mną!")

say("Za godzine powinnismy byc na miejscu")

wait()

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

elseif sub_set2 == 2 then

say("Podązaj za mną!")

say("Za godzine powinnismy byc na miejscu")

say("")

wait()

if empire == 1 then

pc.warp(353100,882900)

elseif empire == 2 then

pc.warp(145500,240000)

elseif empire == 3 then

pc.warp(863900,246000)

end

pc.changegold(-cost)

end

end -- end_of_chat

end -- end_of_state

end

quest z_teleport begin

state start begin

when 20376.chat."V2 Krainy Zombie" with pc.level >= 50 begin

pc.warp(38400,64000)

end

when 20376.chat."V2 Krainy Zombie" with pc.level < 50 begin

say("Abym cię przeniósł do V2 Krainy Zombie musisz mieć[ENTER]Co najmniej 50lv!")

end

when 20092.chat."Atlantyda" begin

pc.warp(10000,1213200)

end

quest straznik begin

state start begin

when 20370.chat."Kolejne Piętro" with pc.level >= 1 begin

pc.warp(8084900,75000)

end

when 20371.chat."Kolejne Piętro" with pc.level >= 1 begin

pc.warp(8119300,25000)

end

when 20371.chat."Wróć na poprzednie Piętro" with pc.level >= 1 begin

pc.warp(8027400,31000)

end

when 20372.chat."Kolejne Piętro" with pc.level >= 1 begin

pc.warp(8050000, 77000)

end

when 20372.chat."Wróć na poprzednie Piętro" with pc.level >= 1 begin

pc.warp(8084900,75000)

end

when 20373.chat."Kolejne, już ostatnie Piętro" with pc.level >= 1 begin

pc.warp(8130000,70000)

end

when 20373.chat."Wróć na poprzednie Piętro" with pc.level >= 1 begin

pc.warp(8119300,25000)

end

when 20374.chat."Wróć na poprzednie Piętro" with pc.level >= 1 begin

pc.warp(8050000, 77000)

end

quest z_teleport begin

state start begin

when 20377.chat."Wróć do V1 Krainy Zombie" with pc.level >= 50 begin

pc.warp(20000,10000)

end

Zaloguj się

👋 Witaj na MPCForum!

Pisanie / Poprawa Questów !

Rekomendowane odpowiedzi

Zarchiwizowany