Pisanie / Poprawa Questów !

Sunushi · 31 Stycznia 2012

Myślałem, że to nie jest aż tak trudne..

quest hair_shop begin
state start begin
 when 20021.chat."Obcinanie" with pc.get_part(PART_HAIR) >= 1001 begin
  say_title(mob_name(20021)..":")
  say("Usługi fryzjerskie u "..mob_name(20021)..".")
  say("W czym mogę służyć?")
  local a = select("Obetnij mi włosy", "Nic, tak tylko patrze")
  say_title(mob_name(20021)..":")
  if a == 1 then
   if pc.money >= 500000 then
 pc.changemoney(-500000)
 say("Rachu ciachu, rachu ciachu...")
 say("Oto Twoja dawna fryzura!")
 pc.set_part(PART_HAIR, 0)
   else
 say("Nie masz 500.000 Yang.")
   end
  elseif a == 2 then
   say("No dobrze, to sobie patrz.")
  end
 end
end
end

Cięcina · 31 Stycznia 2012

Elo.

Potrzebuję questa na start żeby dostawał eq standartowe +9 na start i do tego pierścień teleportacji, proszę o pomoc i gdzie to wklejić na plikach kaszanka 2010r

Rower1310 · 31 Stycznia 2012

@Cięcina o taki quest ci się rozchodziło ??

quest lvl begin
   state start begin
       when login or levelup with pc.get_level() == 1 begin
           set_state(eq)
       end
   end
   state eq begin
       when letter begin
           send_letter("Witamy na serwerze .........")
       end
       when button or info begin
           say_title("Witamy na serwerze .........")
           say("")
           say("Na początek otrzymasz :")
           pc.give_item2(72001)
           pc.give_item(17009)
           pc.give_item(16009)
           pc.give_item(15009)
           pc.give_item(14009)
           pc.give_item(13009)
           if pc.job == 1 then ------ NINJA
               pc.give_item2(12349)
               pc.give_item2(1009)
               pc.give_item2(11409)
               say_reward("Skorzana Maska +9")
               say_reward("Sztylet +9")
               say_reward("Blekitne Ubranie +9")
           elseif pc.job == 0 then ----- WOJOWNIK
               pc.give_item2(12209)
               pc.give_item2(19)
               pc.give_item2(11209)
               say_reward("Tradycyjny Helm +9")
               say_reward("Miecz +9")
               say_reward("Mnisia Zbroja Plytowa +9")
           elseif pc.job == 2 then ----- SURA
               pc.give_item2(12489)
               pc.give_item2(19)
               pc.give_item2(11609)
               say_reward("Krwawy Helm +9")
               say_reward("Miecz +9")
               say_reward("Zalobna Zbroja Plytowa +9")
           elseif pc.job == 3 then ----- SZAMAN
               pc.give_item2(12629)
               pc.give_item2(7009)
               pc.give_item2(11809)
               say_reward("Czapka Mnicha +9")
               say_reward("Wachlarz +9")
               say_reward("Blekitna Szata +9")
           end
           say_reward("Pierścień expa")
           say_reward("Bojowa Tarcza +9")
           say_reward("Drewniana Bransoleta +9")
           say_reward("Skorzane Buty +9")
           say_reward("Drewniany Naszyjnik +9")
           say_reward("Drewniane Kolczyki +9")
           set_state(koniec)
       end
   end
   state koniec begin
   end
end

Chrupek97r · 31 Stycznia 2012

Chcialem zapyutac cyz moglby mi ktos zrobic quest cos w stlyu zabicia goo pae na 70 ze musisz ubic kilak ognistych kroli i od 1-7 lotnie KLucz Bong-In misje dostajesz od uriela i napsiac tytul Klucz od innego wymiaru

Nagroda 20kk yang 15kk expa

ebonitowa szkatka i pd 1h

PRosze o wymyslenie fabuly

A i szukam odrauz na swojego Hard(dedyka) quester:) pisac gg:3569605

kilu · 31 Stycznia 2012

Witam,

znalazlem na mpc questy do biologa, siedziałem 3h edytując nagrody gdyz sie na tym nie znam. Quest się wczytuje, ale po oddaniu zębów i kamienia, gdy idzie sie do bake-go po nagrode target sie swieci, lecz gdy sie na niego nacisnie nic sie nie dzieje, zadne menu sie nie wyswietla.


Quest collect_quest_lv30  begin
	state start begin
			when login or levelup with pc.level >= 30 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 - Zeby Orka")
					end
					send_letter("Analiza Biologa - Zeby Orka")
			end
			when button or info begin
				say_title("Analiza Biologa - Zeby Orka")
				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.")
		wait()
		say("Aktualnie badam Zeby Orka.")
		say("Musze przeprowadzic kilka eksperymentow,")
		say("dlatego potrzebuje kilku Zebow Orka.")
		say("Czy moglbys przyniesc mi 10 Zebow Orka?")
		say("Prosze, pomoz mi! Zawsze przynos mi po jednym,")
		say("abym mial czas na ich dokladne przebadanie!")
		say("")																																																																							  
					set_state(go_to_disciple)
					pc.setqf("duration",0)
					pc.setqf("collect_count",0)
					pc.setqf("drink_drug",0)
			end
	end
	state go_to_disciple begin
			when letter begin
					send_letter("Zadanie Specjalne - Zeby Orka")

			end
			when button or info begin
					say_title("Znajdz Zeby Orka")
					---												   l
					say("")
					say("Biolog Chaegirab, uczen Uriela,")
					say("szuka Zebow Orka.")
					say("Zawsze przynos mu po jednym, aby mial czas")
					say("na ich dokladne przebadanie.")
					say("Zebow orka szukaj u Czarnych Orkow!")
					say("")
					say_item_vnum(30006)
					say_reward("Do tej pory zebrales".." "..pc.getqf("collect_count").." Zebow Orka.")
					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(30006)==0 then
							say("Biolog Chaegirab:")
							say("Co? Nie przyniosles mi zadnych")
							say("Zebow Orka?...")
							say("")
							return
					end
					item.remove()  
					pc.setqf("drink_drug",1)
			end


	when 20084.chat."Zeby Orka" with pc.count_item(30006) >0   begin
					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("30006", 1)
							pc.setqf("duration",get_time()+0*0*0)
							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")< 9 then	 --10ÓĄH¤U
											local index =pc.getqf("collect_count")+1
											pc.setqf("collect_count",index)	 --¨ú±o¤@Ó®É +1
											say("Biolog Chaegirab:")
											say("Oh!! Ten Zab Orka jest doskonalej jakosci!")
											say("Przynies mi jeszcze".." "..10-pc.getqf("collect_count").. " Zebow Orka.")
											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("Ten Zab orka jest zlej jakosci!")
							say("Sprobuj przyniesc inny!")
							say("Prosze, pomoz mi!")
							pc.setqf("drink_drug",0)		 --ĂÄ¤ôŞě©l¤Ć
							return
							end
		else
			  say("Biolog Chaegirab:")
			  say("Jeszcze nie skonczylem badac ostatniego Zebu Orka!")
			  say("Wroc pozniej, kiedy juz skoncze!")
			  say("")
			  return
			end
	end
end

	state key_item begin
			when letter begin
					send_letter("Zadanie Specjalne - Zeby Orka")

					if pc.count_item(30220)>0 then
							local v = find_npc_by_vnum(20084)
							if v != 0 then
									target.vid("__TARGET__", v, "Analiza Biologa - Zeby Orka")
							end
					end
			end
			when button or info begin
					if pc.count_item(30220) >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 10 Zebow!")
					say("Teraz, biolog potrzebuje ostatni")
					say("przedmiot, aby zakonczyc swoje badania!")
					say_item_vnum(30220)
					say("Mozesz go znalezc zabijajac orki")
					say("w Dolinie Seungryong!")
					say("")
			end


			when 635.kill or
					 636.kill or
					 637.kill  begin
					local s = number(1, 50)
					if s == 1 and pc.count_item(30220)==0 then
							pc.give_item2(30220, 1)
							send_letter("Wroc do Biologa!")		
					end	
			end

			when __TARGET__.target.click  or
					20084.chat."Znalazlem Kamien Duszy" with pc.count_item(30220) > 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(30220,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 poruszania się")
  say_reward("Na zawsze!")
					say_reward("Oraz niespodzianke!")
					pc.give_item2(50070)
					pc.give_item2(50070)
					pc.give_item2(50070)
					pc.give_item2(50070)
					pc.give_item2(50070)
					affect.add_collect(apply.MOV_SPEED, 15, 60*60*24*365*60) --60¦~
					clear_letter()
					set_quest_state("collect_quest_lv40", "run")
					set_state(__complete)
			end

	end

	state __giveup__ begin
			when 20084.chat."Poddajesz sie?" begin
					say("Biolog Chaegirab:")
					say("Czy jestes pewien, ze chcesz sie poddac!?")
					say("Nie bedziesz mial szansy, aby zaczac")
					say("ponownie!")
		 end
	 end
	state __complete begin
	end
end

Dziękuję za pomoc.

Teraz po poprawieniu ę na e wyskakuje błąd w 1 linijce przy wgrywaniu (Core dumped) Proszę o pomoc. Moim zdaniem jest wszystko ok

Remotion · 1 Lutego 2012

Hi ,interesuje mnie pewien quest =) a mianowicie w przedmiocie.

Item : 999

Po kliknięciu na niego wyskakuje napis : ''bla ,bla,bla'' .. 3 zakładki do wyboru itemu :

-144 napis: item 1

-32 napis : item 2

-55 napis : item 3

Po wybraniu itemu ,dostajemy go i wywala z gry (wylogowuje)

tak jak to jest z niektórymi questami na lvl .. :>

PS: jaka funkcja odpowiada na wywalenie w quescie ? :P

Nigahiga · 1 Lutego 2012

@up

command("quit")

Sunushi · 1 Lutego 2012

quit wychodzi z całej gry a nie tylko wylogowuje.

Nigahiga · 1 Lutego 2012

Boże wy macie problemy. To Ty sobie daj phase_select a on quit.

kilu · 2 Lutego 2012

Witam,

znalazlem na mpc questy do biologa, siedziałem 3h edytując nagrody gdyz sie na tym nie znam. Quest się wczytuje, ale po oddaniu zębów i kamienia, gdy idzie sie do bake-go po nagrode target sie swieci, lecz gdy sie na niego nacisnie nic sie nie dzieje, zadne menu sie nie wyswietla.


Quest collect_quest_lv30  begin
	state start begin
			when login or levelup with pc.level >= 30 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 - Zeby Orka")
					end
					send_letter("Analiza Biologa - Zeby Orka")
			end
			when button or info begin
				say_title("Analiza Biologa - Zeby Orka")
				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.")
		wait()
		say("Aktualnie badam Zeby Orka.")
		say("Musze przeprowadzic kilka eksperymentow,")
		say("dlatego potrzebuje kilku Zebow Orka.")
		say("Czy moglbys przyniesc mi 10 Zebow Orka?")
		say("Prosze, pomoz mi! Zawsze przynos mi po jednym,")
		say("abym mial czas na ich dokladne przebadanie!")
		say("")																																																																							  
					set_state(go_to_disciple)
					pc.setqf("duration",0)
					pc.setqf("collect_count",0)
					pc.setqf("drink_drug",0)
			end
	end
	state go_to_disciple begin
			when letter begin
					send_letter("Zadanie Specjalne - Zeby Orka")

			end
			when button or info begin
					say_title("Znajdz Zeby Orka")
					---												   l
					say("")
					say("Biolog Chaegirab, uczen Uriela,")
					say("szuka Zebow Orka.")
					say("Zawsze przynos mu po jednym, aby mial czas")
					say("na ich dokladne przebadanie.")
					say("Zebow orka szukaj u Czarnych Orkow!")
					say("")
					say_item_vnum(30006)
					say_reward("Do tej pory zebrales".." "..pc.getqf("collect_count").." Zebow Orka.")
					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(30006)==0 then
							say("Biolog Chaegirab:")
							say("Co? Nie przyniosles mi zadnych")
							say("Zebow Orka?...")
							say("")
							return
					end
					item.remove()  
					pc.setqf("drink_drug",1)
			end


	when 20084.chat."Zeby Orka" with pc.count_item(30006) >0   begin
					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("30006", 1)
							pc.setqf("duration",get_time()+0*0*0)
							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")< 9 then	 --10ÓĄH¤U
											local index =pc.getqf("collect_count")+1
											pc.setqf("collect_count",index)	 --¨ú±o¤@Ó®É +1
											say("Biolog Chaegirab:")
											say("Oh!! Ten Zab Orka jest doskonalej jakosci!")
											say("Przynies mi jeszcze".." "..10-pc.getqf("collect_count").. " Zebow Orka.")
											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("Ten Zab orka jest zlej jakosci!")
							say("Sprobuj przyniesc inny!")
							say("Prosze, pomoz mi!")
							pc.setqf("drink_drug",0)		 --ĂÄ¤ôŞě©l¤Ć
							return
							end
		else
			  say("Biolog Chaegirab:")
			  say("Jeszcze nie skonczylem badac ostatniego Zebu Orka!")
			  say("Wroc pozniej, kiedy juz skoncze!")
			  say("")
			  return
			end
	end
end

	state key_item begin
			when letter begin
					send_letter("Zadanie Specjalne - Zeby Orka")

					if pc.count_item(30220)>0 then
							local v = find_npc_by_vnum(20084)
							if v != 0 then
									target.vid("__TARGET__", v, "Analiza Biologa - Zeby Orka")
							end
					end
			end
			when button or info begin
					if pc.count_item(30220) >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 10 Zebow!")
					say("Teraz, biolog potrzebuje ostatni")
					say("przedmiot, aby zakonczyc swoje badania!")
					say_item_vnum(30220)
					say("Mozesz go znalezc zabijajac orki")
					say("w Dolinie Seungryong!")
					say("")
			end


			when 635.kill or
					 636.kill or
					 637.kill  begin
					local s = number(1, 50)
					if s == 1 and pc.count_item(30220)==0 then
							pc.give_item2(30220, 1)
							send_letter("Wroc do Biologa!")		
					end	
			end

			when __TARGET__.target.click  or
					20084.chat."Znalazlem Kamien Duszy" with pc.count_item(30220) > 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(30220,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 poruszania się")
  say_reward("Na zawsze!")
					say_reward("Oraz niespodzianke!")
					pc.give_item2(50070)
					pc.give_item2(50070)
					pc.give_item2(50070)
					pc.give_item2(50070)
					pc.give_item2(50070)
					affect.add_collect(apply.MOV_SPEED, 15, 60*60*24*365*60) --60¦~
					clear_letter()
					set_quest_state("collect_quest_lv40", "run")
					set_state(__complete)
			end

	end

	state __giveup__ begin
			when 20084.chat."Poddajesz sie?" begin
					say("Biolog Chaegirab:")
					say("Czy jestes pewien, ze chcesz sie poddac!?")
					say("Nie bedziesz mial szansy, aby zaczac")
					say("ponownie!")
		 end
	 end
	state __complete begin
	end
end

Dziękuję za pomoc.

Teraz po poprawieniu ę na e wyskakuje błąd w 1 linijce przy wgrywaniu (Core dumped) Proszę o pomoc. Moim zdaniem jest wszystko ok

JonyNawa1ony · 2 Lutego 2012

Proszę o pomoc z questem.

Sam napisałem, jednak przy wgrywaniu na server wgrywają się tylko pierwsze linijki.

Proszę o pomoc, to mój pierwszy quest

Tutaj zamieszczam questa:

http://wklej.to/ArlKD

Lub w spoilerze

quest zaginiony_uczen begin
state start begin
when login or levelup with pc.level >= 10 begin
set_state(info)
end
end

state info begin
when letter begin
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET__", v, Uriel)
end
send_letter("Zaginiony Uczen")
end

when button or info begin
say_title("Zaginiony Uczeń")
say("")
say("Idź do Uriela...")
say("Ma dla Ciebie pierwsze zadanie,")
say("spiesz się!")
say("Dowiesz się więcej,")
say("jak z nim porozmawiasz.")
say("Uriel znajduje się w pierwszej wiosce.")
end

when __TARGET__.target.click or
20011.chat."Zaginiony Uczen" begin
target.delete("__TARGET__")
say_title(mob_name(20011)..": ")
say("Ach witaj "..pc.get_name()..",")
say("martwie się o mojego ucznia, Wonda-Hun.")
say("2 dni temu powinien wrócić z wyprawy.")
say("Mógłbyś mi pomóc go odszukać?")
say("Oczywiście wynagrodzę Twoją pomoc.")
wait()
say("Porozmawiaj z Kowalem,")
say("może on coś wie, w końcu to jego kuzyn.")
say("Śpiesz się, mamy mało czasu...")
say("Przyjdź od razu, jak się czegoś dowiesz.")
say("Powodzenia!")
wait()
say_title("Pomożesz odszukać Urielowi")
say_title("jego ucznia, Wonda-Huna?")
local s = select("Tak","Nie")
if s == 2 then
say("Nie? No cóż, będę musiał sobie jakoś sam poradzić.")
elseif s == 1 then
say("Tak? ohh dziękuje przyjacielu!")
say("Teraz udaj się do kowala,")
say("on na pewno coś wie o swoim kuzynie.")
say_reward("Kowal znajduje się w pierwszej wiosce.")
set_state(kowal)
end
end

state kowal begin
when letter begin
send_letter("Zaginiony Uczeń")
end

when button or info begin
say_title("Zaginiony Uczeń")
say("Uczeń Uriela, Wonda-Hun")
say("2 dni temu powinien wrócić z wyprawy...")
say("Uriel martwi się o niego, może coś się stało.")
say("Porozmawiaj z Kowalem, to jego kuzyn,")
say("może on coś wie.")
end

when letter begin
local v = find_npc_by_vnum(20016)
if v != 0 then
target.vid("__TARGET__", v, "Kowal")
end
end

when __TARGET__.target.click or
20016.chat."Zaginiony Uczeń" begin
say_title(mob_name(20016)..": ")
target.delete("__TARGET__")
say("")
say("Przysłał Cię Uriel?")
say("aaa... Martwi się o mojego kuzyna Wonda-Huna,")
say("właśnie się do niego wybiera.")
say("Wrócił wczoraj późno z wyprawy,")
say("był bardzo zmęczony, został u mnie na noc")
wait()
say_reward("Przekaż te informacje Urielowi:")
say("powiedz, że jest bezpieczny,")
say("już nie musi się martwić")
set_state(wiesci)
end
end

state wiesci begin
when letter begin
send_letter("Wieści o Wonda-Hun")
end

when buttor or info begin
say_title("Wieści o Wonda-Hun")
say("Dowiedziałeś się od Kowala,")
say("co się działo z uczniem Uriela.")
wait()
say("Wróć do Uriela i przekaż mu te informacje.")
say("Na pewno się ucieszy i przestanie zamartwiać.")
end

when letter begin
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET__", v, "Uriel")
end
end

when __TARGET__.target.click or
20011.chat."Mam dobre wieści o Wonda-Hun" begin
say_title(mob_name(20011)..": ")
target.delete("__TARGET__")
say("")
say("pc.get_name()..",)
say("Czy masz już wieści?")
local wiesci = select("Tak, dowiedziałem się wszystkiego", "Nie, niczego się nie dowiedziałem.")
if wiesci == 2 then
return
set_state(__complete__)
elseif wiesci == 1 then
say_title(mob_name(20011)..": ")
say("")
say("Wspaniale, za pomoc dostaniesz:")
local co_chcesz = select("10000 Expa", "500000 Yang", "+10 Obrony")
if co_chcesz == 1 then
pc.get_exp(10000)
elseif co_chcesz == 2 then
pc.change_money(500000)
elseif co_chcesz == 3 then
affect.add(apply.DEF_GRADE_BONUS, 10, 60*60*24*365*60)
end
end
end
end
state __complete__ begin
end
end

Oraz zdjęcie z maszyny:

Na pewno wynagrodzę Twoją pomoc!

AmOs · 2 Lutego 2012

http://wklej.to/KfwKf

Co w tym quescie jest źle proszę pomóżcie ;p

I od razu oczywiście jak można naprawcie go : D

Pozdrawiam

JonyNawa1ony · 2 Lutego 2012

Ten quest w ogóle jakiś rozpierdzielony jest..

Wszystkie wypowiedzi w say("TEKST") !!

AmOs · 2 Lutego 2012

No nie wiem To Jest Bambusa quest więc powinien być dobry

Sunushi · 2 Lutego 2012

JonyNawa1ony, już Ci tłumaczę co i jak. Jak sam zauważyłeś, quest się blokuje na letter.

quest zaginiony_uczen begin
state start begin
when login or levelup with pc.level >= 10 begin
set_state(info)
end
end

state info begin
when letter begin
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET__", v, Uriel")
end
send_letter("Zaginiony Uczen")
end

Wrzuciłeś quest na mpcforum w code, zobacz na podświetlenie składni. Na początku, który przechodzi end są podświetlone na kolor, hm, niech będzie jasny zielony. Zobacz do letter, dwa ostatnie endy są na fioletowo. Co się podświetla na fioletowo?

say("Śpiesz się, mamy mało czasu...")

Składnia pomiędzy "". Jak widać, składnia zaczyna się podświetlać na fioletowo po

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

Jaki wniosek? Usuń znak " po Uriel:

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

P.S.

say("Ach witaj pc.get_name()..",")

zamień na

say("Ach witaj "..pc.get_name()..",")

Będę tak co chwile dodawał tutaj błędy jakie znajduję w tym queście..

local = co_chcesz = select("10000 Expa", "500000 Yang", "+10 Obrony")

zamień na

local co_chcesz = select("10000 Expa", "500000 Yang", "+10 Obrony")

AmOs · 2 Lutego 2012

Lub Jeśli nie ma możliwośći naprawy go to może ktoś podać działający -.- ; D

Sunushi · 2 Lutego 2012

AmOs, kombinujesz jak koń pod górę w tym swoim queście. Zaraz Ci go poprawię..

AmOs · 2 Lutego 2012

Wiem wiem ale z questeami to ja dopiero zaczynam, questy są dość trudne : )

Z góry dzięki

Sunushi · 2 Lutego 2012

"Zaczynasz" a w stopce "quest by bambus3k". No niech Ci będzie

quest grota_wygnancow begin
state start begin
 when 20093.chat."Chcę Wejść " begin
  say_title("Koe-Pung:")
  if pc.get_level() < 75 then
   say("Wybacz, posiadasz zbyt mały poziom.")
   return
  end
  say("Witaj!")
  say("Mogę Cię przenieść do Groty Wygnańców,")
  say("Lecz musisz mi ukazać Krwisty Kamień.")
  local wybor = select("Przekaż Krwisty Kamień ","Anuluj")
  if wybor == 2 then
   return
  end
  say_title("Koe-Pung:")
  if pc.count_item(30190) > 0 then
   say("Posiadasz Krwisty Kamień ")
   say("Zostaniesz Przeniesiony!")
   wait()
   pc.remove_item(30190, 1)
   pc.warp(10000,1207800)
  else
   say("Wybacz ale nie posiadasz Krwistego Kamienia.")
  end
 end
end
end

P.S. Z tego co widzę to powinien działać. Jakby jakieś błędy wyskakiwały to pisz na PW (tylko w tym queście ofc..). I questy nie są trudne

AmOs · 2 Lutego 2012

Wiem wiem że bambusa ale ja go trochę przekombinowałem dlatego nie działał ;p dzięki : )

@@@Działa:)

JonyNawa1ony · 2 Lutego 2012

Ok, zedytowałem go....

Teraz wygląda tak:


quest zaginiony_uczen begin
state start begin
when login or levelup with pc.level >= 10 begin
set_state(info)
end
end

state info begin
when letter begin
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET__", v, Uriel)
end
send_letter("Zaginiony Uczen")
end

when button or info begin
say_title("Zaginiony Uczen")
say("")
say("Idź do Uriela...")
say("Ma dla Ciebie pierwsze zadanie,")
say("spiesz się!")
say("Dowiesz się więcej,")
say("jak z nim porozmawiasz.")
say_reward("Uriel znajduje się w pierwszej wiosce.")
end

when __TARGET__.target.click or
20011.chat."Zaginiony Uczen" begin
target.delete("__TARGET__")
say_title(mob_name(20011)..": ")
say("Ach witaj "..pc.get_name()..",")
say("martwie się o mojego ucznia, Wonda-Hun.")
say("2 dni temu powinien wrócić z wyprawy.")
say("Mógłbyś mi pomóc go odszukać?")
say("Oczywiście wynagrodzę Twoją pomoc.")
wait()
say("")
say("Porozmawiaj z Kowalem,")
say("może on coś wie, w końcu to jego kuzyn.")
say("Śpiesz się, mamy mało czasu...")
say("Przyjdź od razu, jak się czegoś dowiesz.")
say("Powodzenia!")
wait()
say_title("Pomożesz odszukać Urielowi")
say_title("jego ucznia, Wonda-Huna?")
local s = select("Tak","Nie")
if s == 2 then
say("Nie? No cóż, będę musiał sobie jakoś sam poradzić.")
elseif s == 1 then
say("Tak? ohh dziękuje przyjacielu!")
say("Teraz udaj się do kowala,")
say("on na pewno coś wie o swoim kuzynie.")
say_reward("Kowal znajduje się w pierwszej wiosce.")
set_state(kowal)
end
end

state kowal begin
when letter begin
send_letter("Zaginiony Uczen")
end

when button or info begin
say_title("Zaginiony Uczen")
say("Uczeń Uriela, Wonda-Hun")
say("2 dni temu powinien wrócić z wyprawy...")
say("Uriel martwi się o niego, może coś się stało.")
say("Porozmawiaj z Kowalem, to jego kuzyn,")
say("może on coś wie.")
end

when letter begin
local v = find_npc_by_vnum(20016)
if v != 0 then
target.vid("__TARGET__", v, Kowal)
end
end

when __TARGET__.target.click or
20016.chat."Zaginiony Uczen" begin
say_title(mob_name(20016)..": ")
target.delete("__TARGET__")
say("")
say("Przysłał Cię Uriel?")
say("aaa... Martwi się o mojego kuzyna Wonda-Huna,")
say("właśnie się do niego wybiera.")
say("Wrócił wczoraj późno z wyprawy,")
say("był bardzo zmęczony, został u mnie na noc")
wait()
say_reward("Przekaż te informacje Urielowi:")
say("powiedz, że jest bezpieczny,")
say("już nie musi się martwić")
set_state(wiesci)
end
end

state wiesci begin
when letter begin
send_letter("Wieści o Wonda-Hun")
end

when buttor or info begin
say_title("Wieści o Wonda-Hun")
say("Dowiedziałeś się od Kowala,")
say("co się działo z uczniem Uriela.")
wait()
say("Wróć do Uriela i przekaż mu te informacje.")
say("Na pewno się ucieszy i przestanie zamartwiać.")
end

when letter begin
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET__", v, Uriel)
end
end

when __TARGET__.target.click or
20011.chat."Mam dobre wieści o Wonda-Hun" begin
say_title(mob_name(20011)..": ")
target.delete("__TARGET__")
say("")
say("pc.get_name()..",)
say("Czy masz już wieści?")
local wiesci = select("Tak, dowiedziałem się wszystkiego", "Nie, niczego się nie dowiedziałem.")
if wiesci == 2 then
return
set_state(__complete__)
elseif wiesci == 1 then
say_title(mob_name(20011)..": ")
say("")
say("Wspaniale, za pomoc dostaniesz:")
local co_chcesz = select("10000 Expa", "500000 Yang", "+10 Obrony")
if co_chcesz == 1 then
pc.get_exp(10000)
elseif co_chcesz == 2 then
pc.change_money(500000)
elseif co_chcesz == 3 then
affect.add(apply.DEF_GRADE_BONUS, 10, 60*60*24*365*60)
end
end
end
end
state __complete__ begin
end
end

http://wklej.to/aFWqd

W maszynie wyskakuje:

Rower1310 · 2 Lutego 2012

@JonyNawa1ony ostatnia litera w say("") lub say_title("") nie może być polskim znakiem np. to

say_title("Zaginiony Uczeń")
say("Śpiesz się, mamy mało czasu...")
20016.chat."Zaginiony Uczeń" begin

chyba wszystkie wypisałem

JonyNawa1ony · 2 Lutego 2012

Rower1310, bardzo Ci dziękuje.... Nie wiedziałem o tym, "człowiek uczy się na błędach"

Obecnie quest wygląda tak:


quest zaginiony_uczen begin
state start begin
when login or levelup with pc.level >= 10 begin
set_state(info)
end
end

state info begin
when letter begin
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET__", v, Uriel)
end
send_letter("Zaginiony Uczen")
end

when button or info begin
say_title("Zaginiony Uczen")
say("")
say("Idź do Uriela...")
say("Ma dla Ciebie pierwsze zadanie,")
say("spiesz się!")
say("Dowiesz się więcej,")
say("jak z nim porozmawiasz.")
say_reward("Uriel znajduje się w pierwszej wiosce.")
end

when __TARGET__.target.click or
20011.chat."Zaginiony Uczen" begin
target.delete("__TARGET__")
say_title(mob_name(20011)..": ")
say("Ach witaj "..pc.get_name()..",")
say("martwie się o mojego ucznia, Wonda-Hun.")
say("2 dni temu powinien wrócić z wyprawy.")
say("Mógłbyś mi pomóc go odszukać?")
say("Oczywiście wynagrodzę Twoją pomoc.")
wait()
say("")
say("Porozmawiaj z Kowalem,")
say("może on coś wie, w końcu to jego kuzyn.")
say("Śpiesz się, mamy mało czasu...")
say("Przyjdź od razu, jak się czegoś dowiesz.")
say("Powodzenia!")
wait()
say_title("Pomożesz odszukać Urielowi")
say_title("jego ucznia, Wonda-Huna?")
local s = select("Tak","Nie")
if s == 2 then
say("Nie? No cóż, będę musiał sobie jakoś sam poradzić.")
elseif s == 1 then
say("Tak? ohh dziękuje przyjacielu!")
say("Teraz udaj się do kowala,")
say("on na pewno coś wie o swoim kuzynie.")
say_reward("Kowal znajduje się w pierwszej wiosce.")
set_state(kowal)
end
end

state kowal begin
when letter begin
send_letter("Zaginiony Uczen")
end

when button or info begin
say_title("Zaginiony Uczen")
say("Uczeń Uriela, Wonda-Hun")
say("2 dni temu powinien wrócić z wyprawy...")
say("Uriel martwi się o niego, może coś się stało.")
say("Porozmawiaj z Kowalem, to jego kuzyn,")
say("może on coś wie.")
end

when letter begin
local v = find_npc_by_vnum(20016)
if v != 0 then
target.vid("__TARGET__", v, Kowal)
end
end

when __TARGET__.target.click or
20016.chat."Zaginiony Uczen" begin
say_title(mob_name(20016)..": ")
target.delete("__TARGET__")
say("")
say("Przysłał Cię Uriel?")
say("aaa... Martwi się o mojego kuzyna Wonda-Huna,")
say("właśnie się do niego wybiera.")
say("Wrócił wczoraj późno z wyprawy,")
say("był bardzo zmęczony, został u mnie na noc")
wait()
say_reward("Przekaż te informacje Urielowi:")
say("powiedz, że jest bezpieczny,")
say("już nie musi się martwić")
set_state(wiesci)
end
end

state wiesci begin
when letter begin
send_letter("Wieści o Wonda-Hun")
end

when buttor or info begin
say_title("Wieści o Wonda-Hun")
say("Dowiedziałeś się od Kowala,")
say("co się działo z uczniem Uriela.")
wait()
say("Wróć do Uriela i przekaż mu te informacje.")
say("Na pewno się ucieszy i przestanie zamartwiać.")
end

when letter begin
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET__", v, Uriel)
end
end

when __TARGET__.target.click or
20011.chat."Mam dobre wieści o Wonda-Hun" begin
say_title(mob_name(20011)..": ")
target.delete("__TARGET__")
say("")
say("pc.get_name()..",)
say("Czy masz już wieści?")
local wiesci = select("Tak, dowiedziałem się wszystkiego", "Nie, niczego się nie dowiedziałem.")
if wiesci == 2 then
return
set_state(__complete__)
elseif wiesci == 1 then
say_title(mob_name(20011)..": ")
say("")
say("Wspaniale, za pomoc dostaniesz:")
local co_chcesz = select("10000 Expa", "500000 Yang", "+10 Obrony")
if co_chcesz == 1 then
pc.get_exp(10000)
elseif co_chcesz == 2 then
pc.change_money(500000)
elseif co_chcesz == 3 then
affect.add(apply.DEF_GRADE_BONUS, 10, 60*60*24*365*60)
end
end
end
end
state __complete__ begin
end
end

W maszynie wyskoczył błąd:

expecting 'when' or 'function'

zaginiony_uczen.quest:59:Abort (core dumped)

Raczej sobie z tym poradzę, jak coś dam @EDITA

Rower1310 · 2 Lutego 2012

zapomniałeś o end kończący state info

@edit nie wiem czy ten kawałek kodu jest prawidłowy

   	 when letter begin
           send_letter("Wieści o Wonda-Hun")
       end

       when buttor or info begin
           say_title("Wieści o Wonda-Hun")
           say("Dowiedziałeś się od Kowala,")
           say("co się działo z uczniem Uriela.")
           wait()
           say("Wróć do Uriela i przekaż mu te informacje.")
           say("Na pewno się ucieszy i przestanie zamartwiać.")
       end

       when letter begin
           local v = find_npc_by_vnum(20011)
               if v != 0 then
                   target.vid("__TARGET__", v, Uriel)
               end
       end

ja bym na twoim miejscu zrobił tak

    state wiesci begin
       when letter begin
           send_letter("Wieści o Wonda-Hun")
           local v = find_npc_by_vnum(20011)
               if v != 0 then
                   target.vid("__TARGET__", v, Uriel)
               end
       end

       when buttor or info begin
           say_title("Wieści o Wonda-Hun")
           say("Dowiedziałeś się od Kowala,")
           say("co się działo z uczniem Uriela.")
           wait()
           say("Wróć do Uriela i przekaż mu te informacje.")
           say("Na pewno się ucieszy i przestanie zamartwiać.")
       end

JonyNawa1ony · 2 Lutego 2012

Dodałem end kończące state info,

teraz tak wygląda quest:


quest zaginiony_uczen begin
state start begin
when login or levelup with pc.level >= 10 begin
set_state(info)
end
end

state info begin
when letter begin
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET__", v, Uriel)
end
send_letter("Zaginiony Uczen")
end
end

when button or info begin
say_title("Zaginiony Uczen")
say("")
say("Idź do Uriela...")
say("Ma dla Ciebie pierwsze zadanie,")
say("spiesz się!")
say("Dowiesz się więcej,")
say("jak z nim porozmawiasz.")
say_reward("Uriel znajduje się w pierwszej wiosce.")
end

when __TARGET__.target.click or
20011.chat."Zaginiony Uczen" begin
target.delete("__TARGET__")
say_title(mob_name(20011)..": ")
say("Ach witaj "..pc.get_name()..",")
say("martwie się o mojego ucznia, Wonda-Hun.")
say("2 dni temu powinien wrócić z wyprawy.")
say("Mógłbyś mi pomóc go odszukać?")
say("Oczywiście wynagrodzę Twoją pomoc.")
wait()
say("")
say("Porozmawiaj z Kowalem,")
say("może on coś wie, w końcu to jego kuzyn.")
say("Śpiesz się, mamy mało czasu...")
say("Przyjdź od razu, jak się czegoś dowiesz.")
say("Powodzenia!")
wait()
say_title("Pomożesz odszukać Urielowi")
say_title("jego ucznia, Wonda-Huna?")
local s = select("Tak","Nie")
if s == 2 then
say("Nie? No cóż, będę musiał sobie jakoś sam poradzić.")
elseif s == 1 then
say("Tak? ohh dziękuje przyjacielu!")
say("Teraz udaj się do kowala,")
say("on na pewno coś wie o swoim kuzynie.")
say_reward("Kowal znajduje się w pierwszej wiosce.")
set_state(kowal)
end
end

state kowal begin
when letter begin
send_letter("Zaginiony Uczen")
end

when button or info begin
say_title("Zaginiony Uczen")
say("Uczeń Uriela, Wonda-Hun")
say("2 dni temu powinien wrócić z wyprawy...")
say("Uriel martwi się o niego, może coś się stało.")
say("Porozmawiaj z Kowalem, to jego kuzyn,")
say("może on coś wie.")
end

when letter begin
local v = find_npc_by_vnum(20016)
if v != 0 then
target.vid("__TARGET__", v, Kowal)
end
end

when __TARGET__.target.click or
20016.chat."Zaginiony Uczen" begin
target.delete("__TARGET__")
say_title(mob_name(20016)..": ")
say("")
say("Przysłał Cię Uriel?")
say("aaa... Martwi się o mojego kuzyna Wonda-Huna,")
say("właśnie się do niego wybiera.")
say("Wrócił wczoraj późno z wyprawy,")
say("był bardzo zmęczony, został u mnie na noc")
wait()
say_reward("Przekaż te informacje Urielowi:")
say("powiedz, że jest bezpieczny,")
say("już nie musi się martwić")
set_state(wiesci)
end
end

state wiesci begin
when letter begin
send_letter("Wieści o Wonda-Hun")
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET__", v, Uriel)
end
end

when buttor or info begin
say_title("Wieści o Wonda-Hun")
say("Dowiedziałeś się od Kowala,")
say("co się działo z uczniem Uriela.")
wait()
say("Wróć do Uriela i przekaż mu te informacje.")
say("Na pewno się ucieszy i przestanie zamartwiać.")
end

when __TARGET__.target.click or
20011.chat."Mam dobre wieści o Wonda-Hun" begin
target.delete("__TARGET__")
say_title(mob_name(20011)..": ")
say("")
say("pc.get_name()..",)
say("Czy masz już wieści?")
local wiesci = select("Tak, dowiedziałem się wszystkiego", "Nie, niczego się nie dowiedziałem.")
if wiesci == 2 then
return
set_state(__complete__)
elseif wiesci == 1 then
say_title(mob_name(20011)..": ")
say("")
say("Wspaniale, za pomoc dostaniesz:")
local co_chcesz = select("10000 Expa", "500000 Yang", "+10 Obrony")
if co_chcesz == 1 then
pc.get_exp(10000)
elseif co_chcesz == 2 then
pc.change_money(500000)
elseif co_chcesz == 3 then
affect.add(apply.DEF_GRADE_BONUS, 10, 60*60*24*365*60)
end
end
end
end
state __complete__ begin
end
end

W maszynie wyskoczył komunikat:

expecting 'state'

zaginiony_uczen.quest:18:Abort (core dumped)

Zaloguj się

👋 Witaj na MPCForum!

Pisanie / Poprawa Questów !

Rekomendowane odpowiedzi

Zarchiwizowany