Pisanie / Poprawa Questów !

Phaser · 9 Maja 2011

@Stelios

when letter begin
end
send_letter("Gratulujemy!")
set_state(info2)

when letter jest puste, a potem "nigdzie" są send_letter i set_state. I jak to ma działać?

Powinno być:

when letter begin
send_letter("Gratulujemy!")
set_state(info2)
end

@Edit

A te dwa questy to są niezależne czy 2 ma się pojawić dopiero po ukończeniu 1?

TenNowy · 9 Maja 2011

Witam.

Czy ktoś mógłby mi napisać quest na drop małży na lv 100+ .?

Stelios · 9 Maja 2011

@Phaser, są oddzielnie, jeden jest na 142lvl a drugi na 155lvl

I Dziękuję za wskazanie błędu ;D Myślałem, że to coś większego ;P

@E(18:14) Jeśli od rozpoczęcia 1 questa zdążymy wbić 155lvl to żeby nie pojawił się drugi ;P

@EDIT Działa :)

Ale nie daje tych 35% Doświadczenia ;/

Jeśli dobrze wiem to pc.give_exp_perc(tutaj np 35 czyli exp w %) to komenda na danie doświadczenia w % , zgadza się? ;P

@EDIT2 (18:21)

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

--- Misja by Czarny dla CzarnyMT2

--- Prosze o nie przypisywanie sobie

--- cudzej pracy! Pozdrawiam

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

quest mapy_czesc6 begin

state start begin

when login or levelup with pc.level >= 142 begin

setstate(info)

end

state info begin

when letter begin

send_letter("Poszukaj kawalka mapy")

setstate(zabij)

end

when button or info begin

say("Uriel nic o tym nie wie, zrob mu niespodzianke!")

say("Znajdz kolejny kawalek mapy. Aby go zdobyc")

say("musisz zabic "..mob_name(2602))

say("")

setstate(kill)

end

state kill begin

when 2602.kill begin

local a = pc.getqf("ile")+1

if a < 75 then

pc.setqf("ile", a)

setstate(zdobylem)

else

state zdobylem begin

say("Zdobyles kawalek mapy!")

say("Idz do Uriela aby go oddac!")

say("")

pc.give_item2(30126, 1)

setstate(szukajuriela)

end

state szukajuriela begin

when letter begin

local v = find_npc_by_vnum(20011)

local v != 0 then

target.vid("__CEL__", v, "20011")

end

send_letter("Idz do Uriela")

end

when button or info begin

say("Zrob mu niespodzianke i daj mu ten kawalek mapy!")

say("Na pewno jakos cie wynagrodzi.. ")

say("")

end

when __CEL__.target.click or 20011.chat."Mam cos dla ciebie!" begin

target.delete("__CEL__")

if pc.count_item(30126)

say_title(mob_name(20011)..":")

say("A coż to takiego? ")

say("Nie powiedz mi, co to takiego! ")

say("")

say("Czy to cos dobrego? ")

say("")

wait()

say_title(mob_name(20011)..":")

say("Kawalek mapy!!")

say("Dziekuje ci bardzo przyjacielu!")

say("Nie spodziewalem sie, ze mi to przyniesiesz...")

say("Nie mam nic przygotowane..")

say("")

say("Hmm.")

say("Nie wiem co teraz zrobic...")

say("A wiec moze tak, "..mob_name(20018))

say("ma u mnie dlug!")

wait()

say_title(mob_name(20011)..":")

say("Idz do niego i powiedz ze ja cie przyslalem ")

say("Bedzie wiedzial co ma zrobic! ")

say("Jeszcze raz dziekuje przyjacielu! ")

say("")

setstate(beakgo)

end

state ibeakgo begin

when letter begin

local v = find_npc_by_vnum(20018)

if v != 0 then

target.vid("__TARGET__", v, "20018")

end

send_letter("Poszukaj Beak-Go!")

end

when __TARGET__.target.click or 20018.chat."Uriel mnie przyslal" begin

target.delete("__TARGET__")

say_title(mob_name(20018)..":")

say("Witaj! No dobrze, pewnie nie wiedzial co ma ci dac")

say("w zamian za cos, a pamietal ze nadal mam u niego dlug!")

say("")

say("Hmm. Co chcialbys dostac? ")

say("Wybierz sam, bo ja ie wiem co bys chcial")

say("")

local s = select("+5% do Krytycznego uderzenia", "+5% do Przeszywajacego uderzenia", "+10% do Szybkosci Magii")

setstate(koniec)

if s == 1 then

say_title(mob_name(20018)..":")

say("Dobrze, juz cie szykuje do tego! Haa!")

say("")

say("No i gotowe!")

say("Od teraz masz +5% do Krytycznego uderzenia ")

say("na zawsze! ")

affect.add_collect(apply.POINT_CRITICAL_PCT, 5, 60*60*24*365*60) --60¦~

wait()

say_title(mob_name(20018)..":")

say("Dam ci cos od siebie, jakos dziwne to ")

say("Ale polubilem cie! Haa!")

pc.give_exp2(75000000)

pc.changemoney(30000000)

end

if s == 2 then

say_title(mob_name(20018)..":")

say("Dobrze, juz cie szykuje do tego! Haa!")

say("")

say("No i gotowe!")

say("Od teraz masz +5% do Przeszywajacego uderzenia ")

say("na zawsze! ")

affect.add_collect(apply.POINT_PENETRATE_PCT, 5, 60*60*24*365*60) --60¦~

wait()

say_title(mob_name(20018)..":")

say("Dam ci cos od siebie, jakos dziwne to ")

say("Ale polubilem cie! Haa!")

pc.give_exp2(75000000)

pc.changemoney(30000000)

end

if s == 3 then

say_title(mob_name(20018)..":")

say("Dobrze, juz cie szykuje do tego! Haa!")

say("")

say("No i gotowe!")

say("Od teraz masz +10% do Szybkosci Magii ")

say("na zawsze! ")

affect.add_collect(apply.POINT_CAST_SPEED, 10, 60*60*24*365*60) --60¦~

wait()

say_title(mob_name(20018)..":")

say("Dam ci cos od siebie, jakos dziwne to ")

say("Ale polubilem cie! Haa!")

pc.give_exp2(75000000)

pc.changemoney(30000000)

end

state koniec begin

end

wywala mi błąd w 25linijce - "state kill begin" ;/

xDeStRuCtx · 9 Maja 2011

@UP

Jeden end więcej przed state kill begin

Pon.Lok · 9 Maja 2011

Poprawa questa.

błąd:

expecting 'when' or 'function'
collect_quest_lv40.quest:276:Abort (core dumped)

Quest:

----------------------------------------------------
--COLLECT QUEST_lv40
--METIN2 Collect Quest 
--Edit By PonLok For MagnaMT2 
----------------------------------------------------
quest collect_quest_lv40  begin
state start begin
end
state run begin
	when login or levelup with pc.level >= 40 and pc.level <= 90 begin
		set_state(information)
	end	
end

state information begin
	when letter begin
		local v = find_npc_by_vnum(20084)
		if v != 0 then
			target.vid("__TARGET__", v, "Analiza Biologa - Ksiegi Klatw")
		end
		send_letter("Analiza Biologa - Ksiegi Klatw")
	end

	when button or info begin
		say_title("Analiza Biologa - Ksiegi Klatw")
		say("")
		say("Biolog Chaegirab, uczen Uriela,")
		say("wlasnie Cie szukal. Prosze idz")
		say("do niego i zaoferuj mu swoja pomoc")
		say("")
	end

	when __TARGET__.target.click or
		20084.chat."Znajdz Biologa" begin
		target.delete("__TARGET__")
		say("Biolog Chaegirab:")
		---                                                   l
		say("Niebiosa, prosze pomozcie mi...")
		say("Badam wszystkie rodzaje potworow w tym ")
		say("imperium. Jest bardzo duzo rzeczy,")
		say("ktore musza zostac zrobione. Nie mam")
		say("czasu abym mogl sam wybrac sie na wyprawe.")
		say("Prosze, pomoz mi.")
		say("Wynagrodze Cie za to.")
		wait()
		say("Aktualnie badam Ksiegi Klatw.")
		say("Musze przeprowadzic kilka eksperymentow,")
		say("dlatego potrzebuje kilku Ksiag Klatw.")
		say("Czy moglbys przyniesc mi 20 Ksiag Klatw?") 
		say("Prosze, pomoz mi! Zawsze przynos mi po jednej,")
		say("abym mial czas na ich dokladne przebadanie!")
		say("")																																						  
		set_state(go_to_disciple)
		pc.setqf("duration",0)  -- ĄiĄH¸Ő¸ŐŞş®É¶ˇ
		pc.setqf("collect_count",0)----ˇX¨ú±oŞşŞ««~ĽĆ¶q
		pc.setqf("drink_drug",0) ------ˇV łÜ°g´bĂÄ¤ôŞş¸Ü 1
	end
end

state go_to_disciple begin
	when letter begin
		send_letter("Zadanie Specjalne - Ksiegi Klatw")

	end
	when button or info begin
		say_title("Znajdz Ksiegi Klatw")
		---                                                   l
		say("")
		say("Biolog Chaegirab, uczen Uriela,")
		say("szuka Ksiag Klatw.")
		say("Zawsze przynos mu po jednej, aby mial czas")
		say("na ich dokladne przebadanie.")
		say("Ksiag Klatw szukaj pod Swiatynia Hwang!")
		say("")
		say_item_vnum(30047) 
		say_reward("Do tej pory zebrales".." "..pc.getqf("collect_count").." Ksiag Klatw")
		say("")
	end

	when 71035.use begin --°g´bĂÄ¤ô
		if get_time() < pc.getqf("duration") then
			say("")
			say("ÁŮ¤ŁĄiĄH¨ĎĄÎ°g´bĂÄ¤ô")
			say("")
			return
		end
		if pc.getqf("drink_drug")==1 then
			say("")
			say("¤w¸g¨ĎĄÎ¤F1¦¸")
			say("")
			return
		end
		if pc.count_item(30047)==0 then
			say("Biolog Chaegirab:")
			say("Co? Nie przyniosles mi zadnych")
			say("Ksiag Klatw?...")
			say("")
			return
		end

		item.remove()	
		pc.setqf("drink_drug",1)
	end




   	when 20084.chat."Ksiegi Klatw" with pc.count_item(30047) >0   begin
        if pc.count_item(30047) == 0 then
           say("Nie posiadasz przy sobie zadnej Ksiegi Klatw!")
                              return
                               end
		if get_time() > pc.getqf("duration") then
			say("Biolog Chaegirab:")
			---                                                   l
			say("Oh!! Znalazles!")
			say("Pozwol, ze rzuce okiem...")
			say("Jeszcze chwilke.")
			say("")
			pc.remove_item(30047, 1)
			pc.setqf("duration",get_time()+60*60*4) -----------------------------------4 godziny 
			wait()

			local pass_percent
			if pc.getqf("drink_drug")==0 then
				pass_percent=70
			else		
				pass_percent=90
			end

			local s= number(1,100)
			if s<= pass_percent  then
			   if pc.getqf("collect_count")< 19 then     --20ÓĄH¤U 
					local index =pc.getqf("collect_count")+1 
					pc.setqf("collect_count",index)     -- ¨ú±o¤F¤@Ó+1 
					say("Biolog Chaegirab:")
					say("Oh!! Ta Ksiega Klatw jest doskonalej jakosci!")
					say("Przynies mi jeszcze".." "..20-pc.getqf("collect_count").. " Ksiag Klatw")
					say("Prosze, sprobuj je znalezc!")
					say("")
					pc.setqf("drink_drug",0)	 --ĂÄ¤ôŞě©l¤Ć
					return
				end
				say("Biolog Chaegirab:")
				say("Oh, zebrales juz wszystkie?")
				say("Dobra robota...")
				say("Ale poczekaj!")
				say("Aby zakonczyc swoja prace, potrzebuje")
				say("abys przyniosl dla mnie jeszcze jeden przedmiot!")	
				say("")
				pc.setqf("collect_count",0)
				pc.setqf("drink_drug",0)	
				pc.setqf("duration",0) 
				set_state(key_item)
				return
			else								
			say("Biolog Chaegirab:")
			say("Ta Ksiega Klatw jest zlej jakosci!")
			say("Sprobuj przyniesc inna!")
			say("Prosze, pomoz mi!")
			pc.setqf("drink_drug",0)	 --ĂÄ¤ôŞě©l¤Ć
			return
		end
	else
	  say("Biolog Chaegirab:")
	  say("Jeszcze nie skonczylem badac ostatniej Ksiegi!")
	  say("Wroc pozniej, kiedy juz skoncze!")
	  say("")
	  return
	end

end
end


state key_item begin
	when letter begin
		send_letter("Zadanie Specjalne - Ksiegi Klatw")

		if pc.count_item(30221)>0 then	
			local v = find_npc_by_vnum(20084)
			if v != 0 then
				target.vid("__TARGET__", v, "Analiza Biologa - Ksiegi Klatw")
			end
		end

	end
	when button or info begin
		if pc.count_item(30221) >0 then
			say_title("Znalazles kamien duszy!")
			say("")
			---                                                   l
			say("Wroc do biologa, aby")
			say("odniesc mu kamien!")
			say("")
			return
		end

		say_title("Kamien Duszy")
		say("")
		---                                                   l
		say("Zebrales juz wszystkie 25 Ksiag!")
		say("Teraz, biolog potrzebuje ostatni")
		say("przedmiot, aby zakonczyc swoje badania!")
		say_item_vnum(30221)
		say("Mozesz go znalezc zabijajac Ezoty")
		say("w wokol Swiatyni Hwang!")	
		say("")
	end




	when 2032.kill or
		 2033.kill or
		 2034.kill or
		 2035.kill begin
		local s = number(1, 50)
		if s == 1 and pc.count_item(30221)==0 then
			pc.give_item2(30221, 1)
			send_letter("Wroc do biologa!")		
		end	
	end


	when __TARGET__.target.click  or
		20084.chat."Znalazlem Kamien Duszy" with pc.count_item(30221) > 0  begin
	    target.delete("__TARGET__")
		say("Biolog Chaegirab:")
		say("Oh, Znalazles!")
		say("Bardzo Tobie dziekuje!")
		say("")
		say_reward("Mozesz teraz isc do Baek-Go po nagrode!")
		say("")
		pc.remove_item(30221,1)
		set_state(__reward)
	end

end

state __reward begin
	when letter begin
		send_letter("Analiza Biologa - Nagroda")

		local v = find_npc_by_vnum(20018)
		if v != 0 then
			target.vid("__TARGET__", v, "Baek-Go")
		end

	end
	when button or info begin
		say_title("Skonczyles analize biologa!")
		---                                                   l
		say("Biolog Chaegirab wysyla Cie")
		say("po nagrode do Baek-Go!")
		say("")
	end

	when __TARGET__.target.click  or
		20018.chat."Nagroda"  begin
	    target.delete("__TARGET__")
		say("Baek-Go:")
		say("Hmm, a wiec Biolog")
		say("wyslal Cie po nagrode?")
		say("Zobaczmy, co tam masz...")
		say("")
		say_reward("Otrzymujesz +15 szybkosci ataku")
		say_reward("Na zawsze!")
		say_reward("Oraz niespodzianke!")

		affect.add_collect(apply.ATT_SPEED,15,60*60*24*365*60)    --- ˇV60¦~
		pc.give_item2(72045)
		pc.give_item2(71044, 5)
		pc.give_item2(71045, 5)
       end
		clear_letter()
		set_quest_state("collect_quest_lv50", "run")
		set_state(__complete)

end


end
state __complete begin
end
end

Stelios · 9 Maja 2011

@xDeStRuCtx Może dobrze, ale nadal błąd wywala... ;/

Wtedy pisało błąd w jakiejś linijce a teraz wgrywa się tylko do state kill begin i dalej wywala jakby się od nowa logowało do maszyny... ;/

(bez innych zmian w treści questa (robię edit w queście, tak jak podałeś))

@UP (z questem na biologa 40lvl) Spróbuj jeden end więcej na przez ostatnim state

MultiMT2 · 9 Maja 2011

Da radę naprawić ten quest? (pobrany z tego forum )

quest mounty begin

state start begin

when 71115.use or 71115.chat begin

pc.mount(20110, 600) -- Dzik

end

when 71117.use or 71117.chat begin

pc.mount(20111, 600) -- Wilk

end

when 71119.use or 71119.chat begin

pc.mount(20112, 600) -- Tygrys

end

when 71121.use or 71121.chat begin

pc.mount(20113, 600) -- Lew

end

Wcale się na tym nie znam więc za pomoc będę dozgonnie wdzięczny^^

Stelios · 10 Maja 2011

@UP

quest mounty begin

state start begin

when 71115.use or 71115.chat begin

pc.mount(20110, 600) -- Dzik

end

when 71117.use or 71117.chat begin

pc.mount(20111, 600) -- Wilk

end

when 71119.use or 71119.chat begin

pc.mount(20112, 600) -- Tygrys

end

when 71121.use or 71121.chat begin

pc.mount(20113, 600) -- Lew

end

Wgra się na 100% (sprawdziłem )

@RE

Pierwszy quest: Gdy wbijemy 142lvl dostajemy list w którym pisze ze aby dostać kolejny kawałek mapy musimy zabić 2602. Gdy zabijemy 75 mobów o ID 2602 dostajemy wiadomość z itemem 30125. Dostajemy kolejna wiadomość, musimy iść do Uriela, zabiera nam item 30125, a ten nam mówi, że mamy zabić 2 moby 1191 i 2 moby 1192 . Gdy zabijemy 2 moby 1192 dostajemy item o ID 30126. Jaśniej tego nie mogę napisać ;P

Drugi quest: zaczyna się na 155lvl. Dostajemy wiadomość i musimy iść do Uriela. Gdy już do niego dojdziemy i zaczynamy z nim rozmowę, proponuje nam wymianę 30126 za coś. Dostajemy 3 opcje do wyboru, gdy wybierzemy pierwszą opcje musimy zabić moba o id 2595 (następie wracamy do Uriela po nagrodę)*, gdy wybierzemy 2 opcje musimy zabić 150 mobów o ID 21981 (i wracamy do Uriela po nagrodę)*, gdy wybierzemy 3 opcje musimy zabić moba o ID 1095 oraz moba o ID 1192 (później wracamy do Uriela po nagrodę)*. *Wracamy do Uriela i oddajemy mu 30126 oraz odbieramy nagrodę za wykonaną jedną z 3 opcji ;P

;P

MultiMT2 · 10 Maja 2011

Musiałem dać uprawnienia całego folderu na 777

@Stelios

Dałoby radę przerobić, żeby wierzchowiec znikał po użyciu itemu (dzik: 12340, wilk: 12341, tygrys: 12342, lew: 12343) zamiast po 600 sekundach?

[EDIT]

Jeżeli mogę prosić, to poproszę o questa na to, ze jak użyję itemu o id 5858 to zniknę na minutę tak jakbym miał taki czar jak u ninji

afa · 10 Maja 2011

Naprawi mi ktoś tego Questa?

quest zombieland begin
        state start begin
                    when 20355.chat."Zombie Land" with pc.get_level =>100 begin
                          say_title(mob_name(20355)..":")
                          say("Witaj mogę przenieść cię do Zombie Land.[ENTER]Kosztuje to 100.000 Yang!")
                          say(",lecz pamiętaj musisz mieć 100 LvL !")
                          local a = select("Teleportuj","Anuluj")

                          if a == 1 then
                                  if pc.money() >= 100000
                                         pc.warp(83200,0)
                                 else
                                       say("Masz za mało Yang!")
                                 end
                         else
                                return
                         end
                  end
          end
end

Pozdrawiam

Stelios · 10 Maja 2011

@afa

quest zombieland begin

state start begin

when 20355.chat."Zombie Land" with pc.level >= 100 begin

say_title(mob_name(20355)..":")

say("Witaj mogę przenieść cię do Zombie Land.[ENTER]Kosztuje to 100.000 Yang!")

say("Lecz pamiętaj musisz mieć 100 LvL !")

local s = select("Teleportuj", "Anuluj")

if s == 1 then

say("Zostaiesz przeniesiony!")

wait()

pc.changemoney(-100000)

pc.warp(83200,0)

elseif s == 2 then

say("Nie to nie!")

end

Trochę go przerobiłem, ale działa ;P

@MultiMT2 Tak jak podczas użycia białych flag?

To się da, ale nie ze mną, ja nie umiem pisać questów ;/ ;P

xDeStRuCtx · 10 Maja 2011

@Up

To da 100k zamiast odjąć.

@2up

quest zombieland begin
    	state start begin
                	when 20355.chat."Zombie Land" with pc.get_level() >= 100 begin
                      	say_title(mob_name(20355)..":")
                      	say("Witaj mogę przenieść cię do Zombie Land.[ENTER]Kosztuje to 100.000 Yang!")
                      	say("lecz pamiętaj musisz mieć 100 LvL !")
                      	local a = select("Teleportuj","Anuluj")

                      	if a == 1 then
                              	if pc.get_money() >= 100000 then
pc.changemoney(-100000)
                                         pc.warp(83200,0)
                                 else
                                       say("Masz za mało Yang!")
                                 end
                         end
              	end
      	end
end

afa · 10 Maja 2011

Dzięki Działa

MultiMT2 · 10 Maja 2011

Tak jak podczas użycia białych flag?

Niestety na grze nie znam się tak bardzo, ja lubię tylko całą tą otoczkę (serwer, stronka itp :rolleyes: ) :P . Chodzi mi po prostu abym po użyciu itemu zniknął ( dobrze by było jakby też nie było widac efektu aury miecza i silnego ciała )

Stelios · 10 Maja 2011

@xDeStRuCtx zjadłem - ;/ ;P

@MultiMT2

Niestety na grze nie znam się tak bardzo, ja lubię tylko całą tą otoczkę (serwer, stronka itp :rolleyes: ) :P . Chodzi mi po prostu abym po użyciu itemu zniknął ( dobrze by było jakby też nie było widac efektu aury miecza i silnego ciała )

No tak, na tej podstawie, tylko ja się na tym nie znam, musiałbyś poprosić kogoś kto się zna. A ja nawet wolę nie obiecywać, bo nie wiem czy to jest wykonalne ;P

@RE

Pierwszy quest: Gdy wbijemy 142lvl dostajemy list w którym pisze ze aby dostać kolejny kawałek mapy musimy zabić 2602. Gdy zabijemy 75 mobów o ID 2602 dostajemy wiadomość z itemem 30125. Dostajemy kolejna wiadomość, musimy iść do Uriela, zabiera nam item 30125, a ten nam mówi, że mamy zabić 2 moby 1191 i 2 moby 1192 . Gdy zabijemy 2 moby 1192 dostajemy item o ID 30126. Jaśniej tego nie mogę napisać ;P

Drugi quest: zaczyna się na 155lvl. Dostajemy wiadomość i musimy iść do Uriela. Gdy już do niego dojdziemy i zaczynamy z nim rozmowę, proponuje nam wymianę 30126 za coś. Dostajemy 3 opcje do wyboru, gdy wybierzemy pierwszą opcje musimy zabić moba o id 2595 (następie wracamy do Uriela po nagrodę)*, gdy wybierzemy 2 opcje musimy zabić 150 mobów o ID 21981 (i wracamy do Uriela po nagrodę)*, gdy wybierzemy 3 opcje musimy zabić moba o ID 1095 oraz moba o ID 1192 (później wracamy do Uriela po nagrodę)*. *Wracamy do Uriela i oddajemy mu 30126 oraz odbieramy nagrodę za wykonaną jedną z 3 opcji ;P

@EDIT ( 11.05.2011r 23:16 )

Już nie potrzeba questów

Sam napisałem ;P

Ale dzięki za wcześniejszą pomoc

@xDeStRuCtx CHYBA się w końcu nauczyłem ;D

@EDIT2 (12.05.2011 17:00)

A jednak nie... Pisałem questa i pisałem i się zapomniałem i teraz nie wiem gdzie jest błąd ;/

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

--- Misja by Czarny dla CzarnyMT2

--- Prosze o nie przypisywanie sobie

--- cudzej pracy! Pozdrawiam

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

quest mapy_czesc2 begin

state start begin

when login or levelup with pc.level >= 84 begin

setstate(list)

end

state list begin

when letter begin

local v = find_npc_by_vnum(20018)

if v != 0 then

target.vid("__TARGET__", v, "20018")

end

send_letter("Strony Mapy - Uriel")

end

when button or info begin

say("Beak-Go cie szuka! ")

say("Idz do niego... ")

say("")

setstate(idz)

end

state idz begin

when __TARGET__.target.click or 20018.chat."Pomoc dla Uriela" begin

target.delete("__TARGET__")

say_title(mob_name(20018)..":")

say("Witam! ")

say("Dostales wiadomosc, ze cie szukam? ")

say("")

say("To dobrze. A wiec tak: ")

say("Misja polega na zdobyciu jednej ")

say("ze stron mapy! ")

say_item_vnum(30122)

say("")

wait()

say_title(mob_name(20018)..":")

say("Aby ja zdobyc musisz zapytac ")

say("sie kogos gdzie znajdziesz ")

say(mob_name(2315).." i wtedy wroc do mnie! ")

say("")

say("Moze zapytaj "..mob_name(20091))

say("gdzie go znajdziesz! ")

say("")

setstate(list2)

end

state list2 begin

when letter begin

local v = find_npc_by_vnum(20091)

if v != 0 then

target.vid("_TARGET2__", v, "20091")

end

send_letter("Poszukaj! ")

end

when button or info begin

say("Poszukaj go, on moze cos wiedziec! ")

say("Tylko szybko, Beak-Go nie jest cierpliwy! ")

say("")

setstate(idz2)

end

state idz2 begin

when __TARGET2__.target.click or 20091.chat."Wazne pytanie.." begin

target.delete("__TARGET2__")

say_title(mob_name(20091)..":")

say("O co chodzi? ")

say("Szukasz strony mapy?! ")

say("Haha! Aby ja zdobyc musisz zabic wiele potworow! ")

say("")

say("Zacznij od "..mob_name(2315).."! ")

say("")

setstate(list3)

end

state list3 begin

when letter begin

send_letter("Zdobadz Strone Mapy")

end

when button or info begin

say("Pamietasz co mowil ci "..mob_name(20091))

say("")

say("Aby zdobyc strone mapy musisz zabic ")

say(mob_name(2315).."! To moze byc trudne zadanie! ")

say("")

setstate(zabij)

end

state zabij begin

when 2315.kill begin

local warunek = math.random(2201)

if warunek >= 2181 and warunek < 2600 then

pc.give_item2(30122)

else

say("Udalo ci sie! ")

say("Zdobyles strone mapy! ")

say("Idz teraz do "..mob_name(20018))

say("aby mu to pokazac! ")

say("")

setstate(list4)

end

state list4 begin

when letter begin

local v = find_npc_by_vnum(20018)

if v != 0 then

target.vid("__TARGET3__", v, "20018")

end

send_letter("Idz do Beak-Go!")

end

when button or info begin

say("Idz do Beak-Go! ")

say("")

setstate(idz3)

end

state idz3 begin

when __TARGET3__.target.click or 20018.chat."Mam Strone Mapy" begin

target.delete("__TARGET3__")

if pc.count_item(30122)

say_title(mob_name(20018)..":")

say("Ooo! Widze ze ci sie udalo! ")

say("Gratuluje! ")

say("Ale ta strona nie jest dla mnie! ")

say("Zapomnialem ci powiedziec, ze masz ")

say("zaniesc ja do Uriela! ")

say("")

say("Tak wiec idz do niego i oddaj strone mapy! ")

say("")

wait()

say_title(mob_name(20018)..":")

say("Ale skoro jestes tutaj.. ")

say("Dam ci cos, za wykonanie tej misji! ")

say("")

say("Nic szczegolnego! ")

say("")

pc.give_exp2(10000000)

pc.changemoney(5000000)

say_reward("Otrzymales: 10.000.000 Doswiadczenia! ")

say_reward("Otrzymales: 5.000.000 Yang! ")

say("")

setstate(list5)

end

state list5 begin

when letter begin

local v = find_npc_by_vnum(20011)

if v != 0 then

target.vid("__TARGET4__", v, "20011")

end

send_letter("Idz do Uriela")

end

when button or info begin

say("Idz do Uriela aby oddac mu ")

say(" Strone mapy! ")

say_item_vnum(30122)

say("")

setstate(idz4)

end

when __TARGET4__.target.click or 20011.chat."Mam cos dla ciebie" begin

target.delete("__TARGET4__")

if pc.count_item(30122) > 0 then

say_title("Uriel : ")

say("Co dla mnie masz? ")

say("")

say("Nie lubie zgadywac! Powiedz mi, ")

say("albo pokaz mi to! ")

say("")

say_reward(pc.get_name().." : ")

say("No dobrze, pokaze ci to.. ")

say("")

say_item("", 30122 ,"")

say("")

wait()

say_title("Uriel : ")

say("Nie wierze.. ")

say("Zdobyles to dla mnie? ")

say("Nie wiem jak ci sie odwdzieczyc! ")

say("")

say("Ehh. Postawiles mnie w trudnej sytuacji. ")

say("")

wait()

say_title("Uriel : ")

say("Hmm. Jedynie tyle moge ci dac.. ")

say("")

say_reward("Otrzymales: 40.000.000 Doswiadczenia! ")

say_reward("Otrzymales: 15.000.000 Yang! ")

say_reward("Otrzymales: Zwoj Blogo. x2 ! ")

say_reward("Otrzymales: Magiczny Metal ! ")

pc.give_exp2(40000000)

pc.changemoney(15000000)

pc.give_item2(25040, 1)

pc.give_item2(25041, 1)

say("")

wait()

say_title("Uriel : ")

say("Musisz cos wiedziec. ")

say("Teraz przez dluzszy czas nie ")

say("bede mogl odbierac od ciebie Stron Mapy! ")

say("Przez dluzszy czas. ")

say("")

say("Ale do zobaczenia! ")

say("")

setstate(__COMPLETE__)

end

state __COMPLETE__ begin

end

Błąd pokazuje się przy state zabij

ale też w 213 linijce... Nie wiem co jest źle ;/

Ethylin · 12 Maja 2011

Siema naprawicie mi tego questa ;/ to mój pierwszy quest

quest raikari.quest begin
		state start begin
				when login or levelup with pc.qet_level>=66 
					set_state(Raikari)
				end
		end

state vataher begin
			when letter begin
					locale v = find_npc_by_vnum(20004)
					if v !=0 then
							target.vid("__TARGET__, v, "Niepokazny piszy")
					end
					send_letter("Atak")*

when button or Vataher begin
				say_title("Atak")
				say("Gratulacje właśnie osoiągnołeś 66level")
				say("Udaj się do Niepokaznego pieszego!")
				say("Potrzebuje on twojej omocy!")
				say_reward("Pośpiesz się!!!")
	end

when __TARGET__.target.click or
				20004.chat."Atak" begin
				target.delete("__TARGET__")
				say_title("Witaj!!Wkońcu się zjawiłeś!")
				say("Skoro tutaj jesteś zapewne przeczytałeś list, który Ci wysłałem."
				say("Jak już wiesz mam dla cb specjalne zadanie.")
				say("Ostatnio co raz częściej zdażają się ataki na ludzi z wioski")
				say("Kapitan z naszej wioski prosił mnie o to, abym znalazł wojownika który pokona te stwory")
				say("do tego zadania.")
				say("I odrazu zacząłem pisać list do Cibie, ale teraz ci opowiem na czym polega nasz problem")
				say("Otóż wojownicy z Gorty Wygnańców porywają mieszkańców naszej wioski")
				say("I musisz nam pomóc!.")
				say_reward("Zabij 10 Nieb.Kleryk")
			set_state(Kleryk)
			end
	end

when 2403.kill with pc.countitem(50613)==0 begin
		   local random = mat.random(4)
		   if random == 1 then
		   pc.give_item2(50613, 1)
		   chat("Zdobyłeś niebiańskie łzy")
		   say("wróć do niepokażnego pieszego")
		local v = find_npc_by_vnum(20004)
		if v != 0 then
			target.vid("__TARGET__", v, "Niepokaźny pieszy")
		end
	end
end

when 20004.chat."Atak" with pc.countitem(50613)>0 begin
		    target.delete("__TARGET__")
		    say_title("ATAK")
		    say("O już wróciłeś?Tak szybko?Brawo!")
		    say("Wypełniłeś zadanie, które ci zleciłem w nagrodę otrzymasz następujący przedmiot")
		    say_reward("Otrzymałeś Zbroje z czarnej stali +0")
	pc.remove_item(50613, 1)
	pc.give_item2(11290)
				set_state(__COMPLETE__)
				end
		end

12 Maja 2011

Siema naprawicie mi tego questa ;/ to mój pierwszy quest

quest raikari.quest begin
		state start begin
				when login or levelup with pc.qet_level>=66 
					set_state(Raikari)
				end
		end

state vataher begin
			when letter begin
					locale v = find_npc_by_vnum(20004)
					if v !=0 then
							target.vid("__TARGET__, v, "Niepokazny piszy")
					end
					send_letter("Atak")*

when button or Vataher begin
				say_title("Atak")
				say("Gratulacje właśnie osoiągnołeś 66level")
				say("Udaj się do Niepokaznego pieszego!")
				say("Potrzebuje on twojej omocy!")
				say_reward("Pośpiesz się!!!")
	end

when __TARGET__.target.click or
				20004.chat."Atak" begin
				target.delete("__TARGET__")
				say_title("Witaj!!Wkońcu się zjawiłeś!")
				say("Skoro tutaj jesteś zapewne przeczytałeś list, który Ci wysłałem."
				say("Jak już wiesz mam dla cb specjalne zadanie.")
				say("Ostatnio co raz częściej zdażają się ataki na ludzi z wioski")
				say("Kapitan z naszej wioski prosił mnie o to, abym znalazł wojownika który pokona te stwory")
				say("do tego zadania.")
				say("I odrazu zacząłem pisać list do Cibie, ale teraz ci opowiem na czym polega nasz problem")
				say("Otóż wojownicy z Gorty Wygnańców porywają mieszkańców naszej wioski")
				say("I musisz nam pomóc!.")
				say_reward("Zabij 10 Nieb.Kleryk")
			set_state(Kleryk)
			end
	end

when 2403.kill with pc.countitem(50613)==0 begin
		   local random = mat.random(4)
		   if random == 1 then
		   pc.give_item2(50613, 1)
		   chat("Zdobyłeś niebiańskie łzy")
		   say("wróć do niepokażnego pieszego")
		local v = find_npc_by_vnum(20004)
		if v != 0 then
			target.vid("__TARGET__", v, "Niepokaźny pieszy")
		end
	end
end

when 20004.chat."Atak" with pc.countitem(50613)>0 begin
		    target.delete("__TARGET__")
		    say_title("ATAK")
		    say("O już wróciłeś?Tak szybko?Brawo!")
		    say("Wypełniłeś zadanie, które ci zleciłem w nagrodę otrzymasz następujący przedmiot")
		    say_reward("Otrzymałeś Zbroje z czarnej stali +0")
	pc.remove_item(50613, 1)
	pc.give_item2(11290)
				set_state(__COMPLETE__)
				end
		end

gówno się znam na questach, ale state : vataher musi być tak samo napisane wszędzie

Ethylin · 12 Maja 2011

No dzięki ja też się gówno znam na questach z poradnikiem go robiłem ;D. A mógł by mi ktoś zrobić gotowca ;/??

slawekja · 12 Maja 2011

Chcialbym zamówić quwsta co daje kase i questa tylko dla gm co stawia od razu wszystkich potrzebnych npc (dodatkowych np handlarka z petardami)

Pisac gg: 729153973

xDeStRuCtx · 12 Maja 2011

quest raikari_quest begin
                   	state start begin
                                   	when login or levelup with pc.get_level()>=66  begin
                                           	set_state(inf)
                                   	end
                   	end

state inf begin
                           	when letter begin
                                           	local v = find_npc_by_vnum(20004)
                                           	if v !=0 then
                                                           	target.vid("__TARGET__", v, "Niepokazny piszy")
                                           	end
                                           	send_letter("Atak")
end
when button or info begin
                                   	say_title("Atak")
                                   	say("Gratulacje właśnie osoiągnołeś 66level")
                                   	say("Udaj się do Niepokaznego pieszego!")
                                   	say("Potrzebuje on twojej omocy!")
                                   	say_reward("Pośpiesz się!!!")
           	end

when __TARGET__.target.click or
                                   	20004.chat."Atak" begin
                                   	target.delete("__TARGET__")
                                   	say_title("Witaj!!Wkońcu się zjawiłeś!")
                                   	say("Skoro tutaj jesteś zapewne przeczytałeś list, który Ci wysłałem.")
                                   	say("Jak już wiesz mam dla cb specjalne zadanie.")
                                   	say("Ostatnio co raz częściej zdażają się ataki na ludzi z wioski")
                                   	say("Kapitan z naszej wioski prosił mnie o to, abym znalazł wojownika który pokona te stwory")
                                   	say("do tego zadania.")
                                   	say("I odrazu zacząłem pisać list do Cibie, ale teraz ci opowiem na czym polega nasz problem")
                                   	say("Otóż wojownicy z Gorty Wygnańców porywają mieszkańców naszej wioski")
                                   	say("I musisz nam pomóc!.")
                                   	say_reward("Zabij 10 Nieb.Kleryk")
                           	set_state(Kleryk)
                           	end
           	end
  		     state Kleryk begin

when 2403.kill with pc.countitem(50613)==0 begin
local count = pc.getqf("zabici")+1
if count < 10 then
pc.setqf("zabici", count)
else
                  		pc.give_item2(50613, 1)
                  		chat("Zdobyłeś niebiańskie łzy")
                  		say("wróć do niepokażnego pieszego")
                   	local v = find_npc_by_vnum(20004)
                   	if v != 0 then
                           	target.vid("__TARGET__", v, "Niepokaźny pieszy")
                   	end
  				     setstate(nagroda)
           	end
   	end
       end
       state nagroda begin

when 20004.chat."Atak" with pc.countitem(50613)>0 begin
                       	target.delete("__TARGET__")
                       	say_title("ATAK")
                       	say("O już wróciłeś?Tak szybko?Brawo!")
                       	say("Wypełniłeś zadanie, które ci zleciłem w nagrodę otrzymasz następujący przedmiot")
                       	say_reward("Otrzymałeś Zbroje z czarnej stali +0")
           	pc.remove_item(50613, 1)
           	pc.give_item2(11290)
                                   	set_state(__COMPLETE__)
                                   	end
                   	end
  				     state __COMPLETE__ begin
  				     end
  				     end

Stelios · 12 Maja 2011

@xDeStRuCtx szybszy, ja jakieś 5minut temu zauważyłem dopiero questa ;P

Ale wiedziałbym jak go naprawić ;P

@Pomożesz mi z tym moim? ;/

Coś zrąbałem przy state zabij bo pokazuje tam jakiś błąd i w 213 linijce ;/

nie wiem dokładniej o co chodzi ;/

Może pomyliłem gdzieś jakiś znak, albo coś... Ale jak patrze to nie widzę błędu ;/ ;P

@EDIT Ale xDeStRuCtx i tak masz błędy... Jeśli dobrze pamiętam to jeśli w zdaniu jest polski znak to nie może być od razu ") tylko przed tym musi być spacja. Przynajmniej któryś mi tak kiedyś tłumaczył ;P

Tak na wszelki jakby to poprawione przez xDeStRuCtx nie działało ;P ;/

quest raikari_quest begin

state start begin

when login or levelup with pc.get_level()>=66 begin

set_state(inf)

end

state inf begin

when letter begin

local v = find_npc_by_vnum(20004)

if v !=0 then

target.vid("__TARGET__", v, "Niepokazny piszy ")

end

send_letter("Atak")

end

when button or info begin

say_title("Atak ")

say("Gratulacje właśnie osoiągnołeś 66level ")

say("Udaj się do Niepokaznego pieszego! ")

say("Potrzebuje on twojej omocy! ")

say_reward("Pośpiesz się!!! ")

end

when __TARGET__.target.click or

20004.chat."Atak" begin

target.delete("__TARGET__")

say_title("Witaj!!Wkońcu się zjawiłeś! ")

say("Skoro tutaj jesteś zapewne przeczytałeś list, który Ci wysłałem. ")

say("Jak już wiesz mam dla cb specjalne zadanie. ")

say("Ostatnio co raz częściej zdażają się ataki na ludzi z wioski ")

say("Kapitan z naszej wioski prosił mnie o to, abym znalazł wojownika który pokona te stwory ")

say("do tego zadania. ")

say("I odrazu zacząłem pisać list do Cibie, ale teraz ci opowiem na czym polega nasz problem ")

say("Otóż wojownicy z Gorty Wygnańców porywają mieszkańców naszej wioski ")

say("I musisz nam pomóc!. ")

say_reward("Zabij 10 Nieb.Kleryk ")

set_state(Kleryk)

end

state Kleryk begin

when 2403.kill with pc.countitem(50613)==0 begin

local count = pc.getqf("zabici")+1

if count < 10 then

pc.setqf("zabici", count)

else

pc.give_item2(50613, 1)

chat("Zdobyłeś niebiańskie łzy ")

say("wróć do niepokażnego pieszego ")

local v = find_npc_by_vnum(20004)

if v != 0 then

target.vid("__TARGET__", v, "Niepokaźny pieszy ")

end

setstate(nagroda)

end

state nagroda begin

when 20004.chat."Atak" with pc.countitem(50613)>0 begin

target.delete("__TARGET__")

say_title("ATAK ")

say("O już wróciłeś?Tak szybko?Brawo! ")

say("Wypełniłeś zadanie, które ci zleciłem w nagrodę otrzymasz następujący przedmiot ")

say_reward("Otrzymałeś Zbroje z czarnej stali +0 ")

pc.remove_item(50613, 1)

pc.give_item2(11290)

set_state(__COMPLETE__)

end

state __COMPLETE__ begin

end

xDeStRuCtx · 12 Maja 2011

@UP

A gdzie ty widzisz polski znak bezpośrednio przy ") w poprawionej przeze mnie wersji?!

Stelios · 12 Maja 2011

@UP Napisałem, że wydawało mi się, że jeśli w zdaniu jest jakiś polski znak to musi być spacja przed ") , nie twierdze, że popełniłeś błąd tylko wolę się upewnić do tego czego się przy was nauczyłem ;P

@slawekja

Chcialbym zamówić quwsta co daje kase i questa tylko dla gm co stawia od razu wszystkich potrzebnych npc (dodatkowych np handlarka z petardami)

Nie napisałem opcji "Anuluj" (23:36)

Quest nr.2 :

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

--- Misja by Czarny dla CzarnyMT2

--- Prosze o nie przypisywanie sobie

--- cudzej pracy! Pozdrawiam

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

quest przywolanienpc begin

state start begin

when login or levelup with pc.is_gm() begin

setstate(list)

end

state list begin

when letter begin

send_letter("Przywołanie Handlarzy ")

end

when button or info begin

say("Tutaj możesz wybrać którego z ")

say("Handlarzy chciałbyś przywołać ")

say("")

local s = select("Handlarz 1", "Handlarz 2", "Handlarz 3", "Handlarz 4", "Handlarz 5", "Handlarz 6", "Wszyscy Handlarze", "Anuluj")

if s == 1 then

say("Przywołałeś Handlarza 1 ")

command ("m 9001 1")

end

if s == 2 then

say("Przywołałeś Handlarza 2 ")

command ("m 9002 1")

end

if s == 3 then

say("Przywołałeś Handlarza 3 ")

command ("m 9003 1")

end

if s == 4 then

say("Przywołałeś Handlarza 4 ")

command ("m 9004 1")

end

if s == 5 then

say("Przywołałeś Handlarza 5 ")

command ("m 9007 1")

end

if s == 6 then

say("Przywołałeś Handlarza 6 ")

command ("m 9008 1")

end

if s == 7 then

say("Przywołałeś Wszystkich Handlarzy! ")

command ("m 9001 1")

command ("m 9002 1")

command ("m 9003 1")

command ("m 9004 1")

command ("m 9007 1")

command ("m 9008 1")

end

if s == 8 then

say("Innym razem.. ")

say("")

wait()

return

end

Jeśli chcesz dodać wybór handlarzy to wpisujesz w

local s = select("Handlarz 1", "Handlarz 2", "Handlarz 3", "Handlarz 4", "Handlarz 5", "Handlarz 6", "Wszyscy Handlarze")

np na:

local s = select("Handlarz 1", "Handlarz 2", "Handlarz 3", "Handlarz 4", "Handlarz 5", "Handlarz 6", "Wszyscy Handlarze", "kolejny npc")

i dodajesz po

end

if s == 7 then

say("Przywołałeś Wszystkich Handlarzy! ")

command ("m 9001 1")

command ("m 9002 1")

command ("m 9003 1")

command ("m 9004 1")

command ("m 9007 1")

command ("m 9008 1")

end

np dodajesz :

end

if s == 7 then

say("Przywołałeś Wszystkich Handlarzy! ")

command ("m 9001 1")

command ("m 9002 1")

command ("m 9003 1")

command ("m 9004 1")

command ("m 9007 1")

command ("m 9008 1")

end

if s == 8 then

say("Przywolales kolejnego npctka ;P ")

command ("m idnpc 1")

end

@EDIT Pamiętaj, że każdy dodany select musi mieć wyższy numer od poprzedniego

np gdy masz :

if s == 2 then

nastepny musi miec

if s == 3 then

@EDIT2

slawekja

Quest nr.1 :

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

--- Misja by Czarny dla CzarnyMT2

--- Prosze o nie przypisywanie sobie

--- cudzej pracy! Pozdrawiam

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

quest expodnpc begin

state start begin

when login or levelup with pc.level() >= 1 begin

setstate(npc)

end

state npc begin

when 20011.chat."Daj mi doswiadczenie" begin

say("Witaj! U mnie mozesz dostac doswiadczenie! ")

say("")

say("Wybierz ile doswiadczenia byc chcial: ")

say("")

local s = select("500k", "1,5 kk", "4 kk", "10 kk", 30 kk")

if s == 1 then

say("Dostales 500k doswiadczenia!")

say("")

pc.give_exp2(500000)

end

if s == 2 then

say("Dostales 1,5 kk doswiadczenia!")

say("")

pc.give_exp2(1500000)

end

if s == 3 then

say("Dostales 4 kk doswiadczenia!")

say("")

pc.give_exp2(4000000)

end

if s == 4 then

say("Dostales 10 kk doswiadczenia!")

say("")

pc.give_exp2(10000000)

end

if s == 5 then

say("Dostales 30 kk doswiadczenia!")

say("")

pc.give_exp2(30000000)

end

W queście do dawania doświadczenia jest Uriel (20011), możesz to zmienić jak ci się podoba ;P ;D

(Oba questy poprawnie się wgrywają, ale nie sprawdzałem czy są w grze... ;P )

xDeStRuCtx · 12 Maja 2011

@UP

Spacja musi być tylko, gdy znak diaktryczny znajduje się tylko TUŻ przy cudzysłowiu ;x

Stelios · 12 Maja 2011

@UP Ok, dziękuję za sprostowanie

Nie byłem pewny, więc zapytałem, ale przepraszam, że wcześniej stwierdziłem ;P

@RE (mój quest do naprawy ;P)

@Pytanko, czy jeśli użyję tak funkcji or

pc.give_item2(19) or
pc.give_item2(29) or

pc.give_item2(39)

to będzie działać?

Zaloguj się

👋 Witaj na MPCForum!

Pisanie / Poprawa Questów !

Rekomendowane odpowiedzi

Gość Androu

Gość Androu

Zarchiwizowany