Pisanie / Poprawa Questów !

shejn · 19 Czerwca 2012

@Dargon ,zrobiłem tak jak mówisz i dalej był taki sam efekt jak po

wait

(

"Dalej"

)

d

gdy usunąłem z questu wait() to itemy dostawało się normalnie.

BlanciQ · 19 Czerwca 2012

Mam Prosbe do all. Sprawdzi mi Ktos ten quest .??! Bo gdy go probuje dodac to nie wyswietla sie w object ani po wbiciu 100 lvl .. Daje ++ za pomoc!! ;d

quest roza begin

state start begin

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

set_state(information)

end

state information begin

when letter begin

local v = find_npc_by_vnum(20086)

if v != 0 then

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

end

send_letter("QuestMaster")

end

when button or info begin

say_title("QuestMaster")

say("QuestMaster potrzebuje twojej natychmiastowej pomocy!")

say("Przyjdz do niego jak najszybciej!!")

end

when __TARGET__.target.click or

20086.chat."QuestMaster" begin

target.delete("__TARGET__")

say(locale.NOTICE_COLOR.."QuestMaster:"..locale.NORMAL_COLOR)

say("Witaj, mam dla ciebie pewne zadanie.")

say("Szedłem sobie Parterem Wu-tei aby zebrać najpiekniejszy kwiat na ziemi.")

say("aż tu nagle z nienacka zaatakował mnie Trolli Generał!!")

say("Ta wredna bestia zabrała mi ten kwiat.")

say("Prosze Cię, znajdz go i odzyskaj to co mi zabrał")

say("A obiecuje że cie godnie wynagrodze!! Ten kwiat nosi nazwe Róży.")

say_item_vnum(50024)

set_state(roza)

end

state roza begin

when letter begin

send_letter("Róża dla QuestMastera")

if pc.count_item(50024)>=1 then

local v = find_npc_by_vnum(20086)

if v != 0 then

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

end

when button or info begin

if pc.count_item(50024)>=1 then

say_title("Róża dla QuestMastera")

--- l

say("Brawo, zdobyłes róze!! ")

say("Wroc i dostarcz ją QuestMasterowi")

say("")

return

end

say_title("Róża dla QuestMastera")

--- l

say("QuestMasterowi zabrano róże.")

say("Musisz mu ją przynieść zabijajac Trollego Generała.")

say_item_vnum(50024)

say("Mozesz je kupic od innych graczy")

end

when __TARGET__.target.click with pc.count_item(50024)>=1 begin

target.delete("__TARGET__")

say(locale.NOTICE_COLOR.."Stajenny:"..locale.NORMAL_COLOR)

say("Udało Ci się!! Jestes Proo")

say("Jestem Ci dozgonnie wdzieczny.")

say("Oto Twja Nagroda^^")

say("")

say_reward("Otrzymales Kryształ")

say_reward("Otrzymales Upartość Orków")

say_reward("Otrzymales Serce Bera")

pc.remove_item(50024,1)

pc.give_item2(90003)

pc.give_item2(70040)

pc.give_item2(70022)

clear_letter()

set_state(__complete)

end

state __complete begin

end

Cięcina · 19 Czerwca 2012

poprawi mi ktoś questa by się pojawiały bossy ??

http://wklej.to/2cfIb

Bo to jest tak , teleportuje mnie na daną mapkę , zmieniłem warpa mapki ale bossy się nie pojawiają , ale jak wpisuję /m id bossa to się pojawi

szymano123 · 19 Czerwca 2012

Poprawi ktoś tego questa?

http://wklej.to/2d5nX

Wyskakuje takie coś: state name must be given

biolog90.quest 295 abort

JonyNawa1ony · 19 Czerwca 2012

@szymano123

na końcu tego:

when __TARGET__.target.click or
20018.chat."Nagroda za Notatki" begin
target.delete("__TARGET__")
say_title("Baek-Go:")
say("Spójrz, czy to nie Sekretna Receptura od ")
say("Chaegirab, tego znanego biologa? Hm, zwiększy ona")
say("Twoją Siłę Ataku podczas walki z innym graczami.")
say("Oto Twój napój!")
say("")
wait()
say_title("Baek-Go:")
say("A tym razem dostaniesz Niebieską Ebonitową ")
say("Szkatułkę. Jesteś ciekawy co wy niej może być? To")
say("ją otwórz!")
say("")
say_reward("Oto twoja nagroda za pomoc Biologowi Chaegirab.")
say_reward("Jako nagrodę za wypełnienie zadania od biologa")
say_reward("Chaegirab, wartość ataku podczas walki z innymi")
say_reward("graczami {PvP) na stałe wzrośnie o 10%.")
say_reward("Bonus ten został przyznany na stałe.")
say_reward("")

Dodaj:

set_state(__complete)

Czyli ma to wyglądać tak:

when __TARGET__.target.click or
20018.chat."Nagroda za Notatki" begin
target.delete("__TARGET__")
say_title("Baek-Go:")
say("Spójrz, czy to nie Sekretna Receptura od ")
say("Chaegirab, tego znanego biologa? Hm, zwiększy ona")
say("Twoją Siłę Ataku podczas walki z innym graczami.")
say("Oto Twój napój!")
say("")
wait()
say_title("Baek-Go:")
say("A tym razem dostaniesz Niebieską Ebonitową ")
say("Szkatułkę. Jesteś ciekawy co wy niej może być? To")
say("ją otwórz!")
say("")
say_reward("Oto twoja nagroda za pomoc Biologowi Chaegirab.")
say_reward("Jako nagrodę za wypełnienie zadania od biologa")
say_reward("Chaegirab, wartość ataku podczas walki z innymi")
say_reward("graczami {PvP) na stałe wzrośnie o 10%.")
say_reward("Bonus ten został przyznany na stałe.")
say_reward("")
set_state(__complete)

A tutaj jeszcze masz gotowego questa:

http://wklej.to/uD90q

szymano123 · 19 Czerwca 2012

Dalej ten sam błąd:(

JonyNawa1ony · 19 Czerwca 2012

Mam problem z dungeonem:

oto wycinek:

say_pytanie("Jesteś tego pewien?")
local x = select("Wchodzę!", "Nie wchodzę.")
if x == 2 then
return
elseif x == 1 then
pc.setqf("loch", 1)
d.join(13)
end
end
end

when login with pc.in_dungeon() and pc.get_map_index() >= 819200 and pc.get_map_index() < 51200 and pc.getqf("loch") == 1 begin
pc.setqf("loch", 0)
say_tytul("Loch Małp - Łatwy")
say("Znajdujecie się w Łatwym Lochu Małp.")
say("Jest to bardzo tajemnicze miejsce")
say("i kryje wiele tajemnic.")
say("")
say_title("Informacja:")
say_informacja("Postarajcie się wyjść stąd cali.")
say("")
say_lokalizacja("Powodzenia!")
wait()
say_tytul("Loch Małp - Łatwy")
say("Za chwilę otrzymacie pierwsze wskazówki.")
say_informacja("Przygotujcie się.")
server_timer("poi", 5)
end

Wszystko pięknie przenosi mnie na mapę o indexie 13 po rozmowie z npc.

Ale gdy mnie już zaloguje na tej mapie, nic się nie dzieje.

W tym problem?

@Edit

Dodam, że po teleporcie, już w dungeonie pt się rozwala.

seba96 · 19 Czerwca 2012

Znajdźcie błąd proszę bo zęby orka działają ale księgi już się nie wczytują.Proszę o szybką pomoc.

zęby:

----------------------------------------------------
--COLLECT QUEST_lv30
--METIN2 Collect Quest 
----------------------------------------------------
quest collect_quest_lv30  begin
    state start begin
		    when login or levelup with pc.level >= 30 and pc.level <= 150 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, "Badania Biologa")
				    end
				    send_letter("Badania Biologa")
		    end
		    when button or info begin
								    say_title("Badania Biologa")
								    say("Biolog Chaegirab, uczeń Uriela,")
								    say("własnie Cię szukał. Proszę idź ")
								    say("do niego i zaoferuj swoją pomoc.")
								    say("")
		    end

		    when __TARGET__.target.click or
				    20084.chat."Znajdź Biologa" begin
				    target.delete("__TARGET__")
				    say_title("Biolog Chaegirab:")
				    ---																							    l
				    say("Niebiosa, proszę pomóżcie mi...")
				    say("Badam wszystkie rodzaje roślin w tym ")
				    say("imperium. Jest bardzo dużo rzeczy,")
				    say("które muszą zostać zrobione. Nie mam")
				    say("czasu abym mógł sam wybrać się na wyprawę. ")
				    say("Proszę ,pomóż mi.")
				    say("")				
				    wait()
			  say_title("Biolog Chaegirab:")
				    say("Aktualnie badam Zęby Orka.")
				    say("Muszę przeprowadzić kilka eksperymentów,")
				    say("dlatego potrzebuje kilku Zębów Orka.")
				    say("Czy mógłbyś przynieść mi dziesięć Zębów Orka?")
				    say("Proszę, musisz mi pomóc!")
		    say("Zawsze przynoś mi po jednym Ząbie!")
		    say("abym miał czas na przeprowadzenie badań. ")
		    say("")																																																																						  
				    set_state(go_to_disciple)
				    pc.setqf("duration",0) 
				    pc.setqf("collect_count",0)
				    pc.setqf("drink_drug",0) -- 1
		    end
    end
    state go_to_disciple begin
		    when letter begin
				    send_letter("Badania Biologa")

		    end
		    when button or info begin
				    say_title("Zęby z Doliny Orków")
				    ---																							    l
				    say("Biolog Chaegirab, uczeń Uriela, potrzebuje do")
				    say("swoich badań 10 zębów orka z doliny Seungryong.")
				    say("Przynieś za każdym razem tylko jeden ząb, abym mógł ")
				    say("oddzielnie przebadać każdy z nich. Możesz je")
				    say("zdobyć z Orków, Czarnych Orków i Łysych Czarnych")
				    say("Orków.")
				    say("")				
				    say_item_vnum(30006)
				    say_reward("Do tej pory dostarczyłeś ".." "..pc.getqf("collect_count").." Zębów Orka!")
				    say_reward("")
		    end

		    when 71035.use begin
				    if get_time() < pc.getqf("duration") then
						    say("")
						    say("Przedmiot jest już użyty.")
						    say("")
						    return
				    end
				    if pc.getqf("drink_drug")==1 then
						    say("")
						    say("Przedmiot jest już użyty.")
						    say("")
						    return
				    end
				    if pc.count_item(30006)==0 then
						    say_title("Biolog Chaegirab:")
						    say("Co? Nie przyniosłeś mi zadnych")
						    say("Zębów Orka?")
						    say("")
						    return
				    end
				    item.remove()  
				    pc.setqf("drink_drug",1)
		    end


		    when 20084.chat."Zęby Orków" with pc.count_item(30006) >0   begin
				    if get_time() > pc.getqf("duration") then
						    say_title("Biolog Chaegirab:")
						    ---																							    l
						    say("Och! Przyniosłeś mi Ząb... ")
						    say("Musze go przetestować... na to potrzeba czasu.")
						    say("")
						    pc.remove_item("30006", 1)
						    pc.setqf("duration",get_time()+0*0*0) -----------------------------------22
						    wait()

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

						    local s= number(1,100)
						    if s<= pass_percent  then
							   if pc.getqf("collect_count")< 9 then  --10
										    local index =pc.getqf("collect_count")+1
										    pc.setqf("collect_count",index)  -- +1
										    say_title("Biolog Chaegirab:")
										    say("Och! Ten Ząb jest doskonałej jakości!")
										    say("Mogę natychmiast rozpocząć moje badania. Jednak")
										    say("potrzebuje jeszcze".." "..10-pc.getqf("collect_count").. " sztuk. Proszę, spróbuj je")
										    say("dla mnie znaleźć! ")
										    say("Ale pamiętaj o tym, że potrzebuję czasu. Kolejny")
										    say("Ząb będę mógł zbadać dopiero jutro.")
										    say("")
										    pc.setqf("drink_drug",0)	   
										    return
								    end
								    say_title("Biolog Chaegirab:")
								    say("Zebrałeś wszystkie Zęby Orków! Dziękuję bardzo.")
								    say("Ale teraz potrzebuję jeszcze specjalnego")
								    say("Kamienia. Nazywają go Kamieniem Duszy Jinunggyi.")
								    say("Byłbym Ci bardzo wdzięczny, jakbyś go dla mnie")  
								    say("znalazł. Z moich informacji wynika, że znajduje")
								    say("się on w posiadaniu Orków.")
								    say("")
								    pc.setqf("collect_count",0)
								    pc.setqf("drink_drug",0)	   
								    pc.setqf("duration",0)
								    set_state(key_item)
								    return
						    else														   
						    say_title("Biolog Chaegirab:")
						    say("Przykro mi, ale ten Ząb jest zepsuty i nie")
						    say("przyda mi się na nic. Proszę, przynieś mi nowy.")
						    say("")
						    pc.setqf("drink_drug",0)	   
						    return
						    end
		    else
			  say_title("Biolog Chaegirab:")
			  say("Jeszcze nie skonczyłem badać ostatniego Zębu Orka!")
			  say("Wróć póżniej, kiedy już skończe!")
			  say("")
			  return
		    end
    end
end

    state key_item begin
		    when letter begin
				    send_letter("Badania Biologa")

				    if pc.count_item(30220)>0 then 
						    local v = find_npc_by_vnum(20084)
						    if v != 0 then
								    target.vid("__TARGET__", v, "Badania Biologa")
						    end
				    end
		    end
		    when button or info begin
				    if pc.count_item(30220) >0 then
						    say_title("Kamień Duszy Jinunggyi")
						    ---																							    l
						    say_reward("Wreszcie. Znalazłeś Kamień Jinunggyi.")
						    say_reward("Zanieś go do Biolog Chaegirab.")
						    say_reward("Na pewno już na Ciebie czeka.")
						    say_reward("")
						    return
				    end
				    say_title("Kamień Duszy Jinunggyi")
				    ---																							    l
				    say("Do swoich badań Biolog Chaegirab, uczeń Uriela")
				    say("zebrałeś 10 Zębów Orka. Aby dokończyć i zrozumieć ")
				    say("wyniki swoich badań potrzebuje on jeszcze Kamień ")
				    say("Duszy Jinunggyi.")
				    say("")
				    say_item_vnum(30220)
				    say("")
				    say("Otrzymasz go od Czarnych Orków w Dolinie")
				    say("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("Odnalazłeś Kamień Duszy Jinunggyi")			   
				    end	
		    end

		    when __TARGET__.target.click  or
				    20084.chat."Mam Kamień Duszy Jinunggyi" with pc.count_item(30220) > 0  begin
				    target.delete("__TARGET__")
				    say_title("Biolog Chaegirab:")
				    say("Bardzo dziękuję! W nagrodę otrzymasz recepturę. ")
				    say("Składniki jej są skrzętnie przechowywane i tylko")
				    say("nieliczni je znają. Mikstura, którą możesz zrobić ")
				    say("na podstawie tego przepisu, uskrzydli Cię. Ruszaj")
				    say("w drogę i odszukaj Beak-Go. Przyrzadzi dla Ciebie")
				    say("ten napój. Z Twoją pomocą dowiedziałem się wielu")
				    say("istotnych rzeczy o Orkach!")
				    say("")
				    pc.remove_item(30220,1)
				    set_state(__reward)
		    end

    end

    state __reward begin
		    when letter begin
				    send_letter("Nagroda od Biologa")

				    local v = find_npc_by_vnum(20018)
				    if v != 0 then
						    target.vid("__TARGET__", v, "Nagroda od Biologa")
				    end
		    end
		    when button or info begin
				    say_title("Nagroda od Biologa")
				    ---																							    l
				    say("Jako nagrodę za Zęby Trzonowe Orków i Kamień ")
				    say("Duszy Jinunggyi, Biolog Chaegirab dał Ci")
				    say("recepturę sekretnej mikstury. Daj tę książkę ")
				    say("Baek-Go, on stworzy miksturę! ")
				    say("")
		    end

		    when __TARGET__.target.click  or
				    20018.chat."Nagroda za Zęby Orków"  begin
				    target.delete("__TARGET__")
				    say_title("Baek-Go:")
				    say("Spójrz tylko, czy to nie Sekretna Receptura od")
				    say("Chaegirab, tego znanego biologa? Hm, zwiększy ona")
				    say("Twoją Szybkość Poruszania się o 10 punktów. Oto")
				    say("Twój napój! Ponadto mam Ci przekazać jeszcze ten")
				    say("Pierścień. Uważaj, nie zgub go, wygląda, że jest")
				    say("drogocenny!")
				    say_reward("W nagrodę za wykonanie zadania, szybkość Twojego")
				    say_reward("ruchu na stałe zwiększy się o 10 punktów.")

				    affect.add_collect(apply.MOV_SPEED, 10, 60*60*24*365*60) --10
				    pc.give_item2(71015)   

				    clear_letter()
				    set_quest_state("collect_quest_lv40", "run")
				    set_state(__complete)
		    end

    end

    state __giveup__ begin
		    when 20084.chat."Poddajesz się? " begin
				    say_title("Biolog Chaegirab:")
				    say("Czy jesteś pewien, że chcesz się poddać? ")
				    say("Nie będziesz miał szansy, aby zacząć ")
				    say("ponownie!")
			 end
	 end
    state __complete begin
    end
end

księgi:

----------------------------------------------------
--COLLECT QUEST_lv40
--METIN2 Collect Quest 
----------------------------------------------------
quest collect_quest_lv40  begin
    state start begin
    end
    state start begin
		    when login or levelup with pc.level >= 40 and pc.level <= 150 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, "Badania Biologa")
				    end
				    send_letter("Badania Biologa")
		    end
		    when button or info begin
				    say_title("Badania Biologa")
				    say("Biolog Chaegirab, uczeń Uriela,")
				    say("własnie Cię szukał. Proszę idź ")
				    say("do niego i zaoferuj swoją pomoc.")
				    say("")
		    end

		    when __TARGET__.target.click or
				    20084.chat."Znajdź Biologa" begin
				    target.delete("__TARGET__")
				    say_title("Biolog Chaegirab:")
				    ---																							    l
							  say("Niebiosa, proszę pomóżcie mi...")
							  say("Badam wszystkie rodzaje roślin w tym ")
							  say("imperium. Jest bardzo dużo rzeczy,")
							  say("które muszą zostać zrobione. Nie mam")
							  say("czasu abym mógł sam wybrać się na wyprawę. ")
							  say("Proszę, pomóż mi.")
				    say("")
				    wait()
				    say_title("Biolog Chaegirab:")
				    say("Aktualnie badam Księgi Klątw.")
				    say("Muszę przeprowadzić kilka eksperymentów,")
				    say("dlatego potrzebuje kilku Ksiąg Klątw.")
				    say("Czy mógłbyś przynieść mi 15 Ksiąg Klątw?")
				    say("Proszę, musisz mi pomóc!")
				    say("Zawsze przynoś mi po jednej Księdze,")
				    say("abym miał czas na przeprowadzenie badań. ")
				    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("Badania Biologa")

		    end
		    when button or info begin
				    say_title("Starożytne Zaklęcia")
				    ---																							    l
				    say("Biolog Chaegirab, uczeń Uriela, interesuje się ")
				    say("Starożytnymi Zaklęciami. W Dolinie Seungryong")
				    say("znajduje się 15 Ksiąg Klątw. Dostarczaj")
				    say("Biologowi Chaegirab zawsze po jednej Księdze,")
				    say("aby mógł ją w spokoju przestudiować. Zdobędziesz")
				    say("je u Ezoterycznych Dręczycieli oraz Wysokich")
				    say("Dręczycieli.")
				    say("")
				    say_item_vnum(30047)
				    say_reward("Do tej pory dostarczyłeś ".." "..pc.getqf("collect_count").." Ksiąg.")
				    say("")
		    end

		    when 71035.use begin
				    if get_time() < pc.getqf("duration") then
						    say("")
						    say("Przedmiot jest już użyty.")
						    say("")
						    return
				    end
				    if pc.getqf("drink_drug")==1 then
						    say("")
						    say("Przedmiot jest już użyty.")
						    say("")
						    return
				    end
				    if pc.count_item(30047)==0 then
						    say_title("Biolog Chaegirab:")
						    say("Co? Nie przyniosłeś mi zadnych")
						    say("Ksiąg Klątw?")
						    say("")
						    return
				    end
				    item.remove()  
				    pc.setqf("drink_drug",1)
		    end


		    when 20084.chat."Księgi Klątw" with pc.count_item(30047) >0   begin
				    if get_time() > pc.getqf("duration") then
						    say_title("Biolog Chaegirab:")
						    ---																							    l
						    say("Och! Odnalazłeś Księgę Klątw!")
						    say("Poczekaj chwileczkę, muszę ją sprawdzić... ")
						    say("")
						    pc.remove_item(30047, 1)
						    pc.setqf("duration",get_time()+0*0*0) -----------------------------------22
						    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")< 14 then		 --15
										    local index =pc.getqf("collect_count")+1
										    pc.setqf("collect_count",index)  -- +1
										    say_title("Biolog Chaegirab:")
										    say("Oh!! Ta Księga Klątw jest doskonałej jakości!")
										    say("Przynieś mi jeszcze".." "..15-pc.getqf("collect_count").. " Ksiąg.")
										    say("Proszę, spróbuj je znaleźć! ")
										    say("")
										    pc.setqf("drink_drug",0)
										    return
								    end
								    say_title("Biolog Chaegirab:")
								    say("Skompletowałeś 15 ksiąg! Dziękuję Ci. Do")
								    say("odnalezienia pozostało jeszcze tylko Świątynny")
								    say("Kamień Duszy. Podejmiesz się tego zadania?")
								    say("Znajdziesz go u potworów przebywających w")
								    say("Świątyni Hwang, zwanej też Świątynią Ciemności.") 
								    say("")
								    pc.setqf("collect_count",0)
								    pc.setqf("drink_drug",0)	   
								    pc.setqf("duration",0)
								    set_state(key_item)
								    return
						    else														   
						    say_title("Biolog Chaegirab:")
						    say("Przykro mi, ale ta Księga jest zepsuta i nie")
						    say("przyda mi się na nic. Proszę, przynieś mi nowy.")
						    say("")
						    pc.setqf("drink_drug",0)
						    return
				    end
		    else
			  say_title("Biolog Chaegirab:")
			  say("Jeszcze nie skonczyłem badać ostatniego Księgi!")
			  say("Wróć póżniej, kiedy już skończe!")
			  say("")
			  return
		    end
    end
end

    state key_item begin
		    when letter begin
				    send_letter("Badania Biologa")

				    if pc.count_item(30221)>0 then 
						    local v = find_npc_by_vnum(20084)
						    if v != 0 then
								    target.vid("__TARGET__", v, "Badania Biologa")
						    end
				    end
		    end
		    when button or info begin
				    if pc.count_item(30221) >0 then
						    say_title("Świątynny Kamień Duszy")
						    ---																							    l
						    say("W końcu znalazłeś Świątynny Kamień Duszy!")
						    say("Dostarcz go do Biologa Chaegirab. On czeka już na")
						    say("Ciebie.")
						    say("")
						    return
				    end
				    say_title("Świątynny Kamień Duszy")
				    ---																							    l
				    say("Biologowi Chaegira, uczeń Uriela,")
				    say("dostarczyłeś 15 Ksiąg Klątw potrzebnych mu do")
				    say("przeprowadzenia badań. Potrzebuje on jeszcze")
				    say("Świątynny Kamień Duszy należący do tajemniczej")
				    say("Sekty, aby lepiej zrozumieć treść Księgi.")
				    say("")
				    say_item_vnum(30221)
				    say("")
				    say("Otrzymasz go u Ezoterycznej Sekty w Świątyni")
				    say("Hwang.")  
				    say("")
		    end


		    when 705.kill or
					 735.kill or
					 733.kill or
					 732.kill begin
				    local s = number(1, 50)
				    if s == 1 and pc.count_item(30221)==0 then
						    pc.give_item2(30221, 1)
						    send_letter("Odnalazłeś Świątynny Kamień Duszy")			   
				    end	
		    end

		    when __TARGET__.target.click  or
				    20084.chat."Mam Świątynny Kamień Duszy" with pc.count_item(30221) > 0  begin
				    target.delete("__TARGET__")
				    say_title("Biolog Chaegirab:")
				    say("Bardzo dziękuję! w nagrodę otrzymasz recepturę. ")
				    say("Składniki jej są skrzętnie przechowywane i tylko")
				    say("nieliczni je znają Mikstura, którą można zrobić ")
				    say("na podstawie tego przepisu, przyspieszy szybkość ")
				    say("władania mieczem. Ruszaj w drogę i odszukaj")
				    say("Baek-Go. On przyrządza dla Ciebie ten napój. Niech")
				    say("Ci szczęście sprzyja, mój przyjacielu. Z Twoją ")
				    say("pomocą dowiedziałem się wielu istotnych rzecz o")
				    say("Starożytnym Zaklęciu!")
				    say("")
				    pc.remove_item(30221,1)
				    set_state(__reward)
		    end

    end

    state __reward begin
		    when letter begin
				    send_letter("Nagroda od Chaegiraba")

				    local v = find_npc_by_vnum(20018)
				    if v != 0 then
						    target.vid("__TARGET__", v, "Nagroda od Chaegiraba")
				    end
		    end
		    when button or info begin
				    say_title("Nagroda od Chaegiraba")
				    ---																							    l
				    say("W nagrodę za skompletowanie 15 Ksiąg Klątw")
				    say("oraz Kamień Duszy otrzymasz od Biologa")
				    say("Chaegirab sekretną recepturę. Zanieś ją do")
				    say("Baek-Go, on przyrządzi dla Ciebie ten cudowny")
				    say("napój.")
				    say("")
		    end

		    when __TARGET__.target.click  or
				    20018.chat."Nagroda za Księgi Klątw"  begin
				    target.delete("__TARGET__")
				    say_title("Baek-Go:")
				    say("Spójrz, czy to nie sekretna receptura od")
				    say("Chaegirab, tego znanego Biologa? Hm, Zwiększa ona")
				    say("Twoją Szybkość Ataku o 5 punktów. Oto Twój napój.")
				    say("Oprócz tego mam Ci przekazać też tą Drewnianą ")
				    say("Szkatułkę. Starannie ją przechowuj.")
				    say_reward("W nagrodę za spełnienie prośby Biologa Chaegirab.")
				    say_reward("zwiększy się na stałe Twoja Szybkość Ataku o 10")
				    say_reward("punktów.")
				    say_reward("")
				    affect.add_collect(apply.ATT_SPEED,10,60*60*24*365*60)  --- 60		 
				    pc.give_item2(50110)   
				    clear_letter()
				    set_quest_state("collect_quest_lv50", "run")
				    set_state(__complete)
		    end

    end

    state __giveup__ begin
		    when 20084.chat."Poddajesz się? " begin
				    say_title("Biolog Chaegirab:")
				    say("Czy jesteś pewien, że chcesz się poddać? ")
				    say("Nie będziesz miał szansy, aby zacząć ")
				    say("ponownie!")
			 end
	 end
    state __complete begin
    end
end

JonyNawa1ony · 19 Czerwca 2012

Ale co nie działa?

Jaki błąd wyskakuje?!

Konkretnie, sprecyzuj to, nikomu się nie chce szukać błędów w takich questach.

shejn · 19 Czerwca 2012

mam tutaj błąd:

syntax error : [string "start"]:71: unexpected symbol near `when'

move_ring.quest:100:Abort (core dumped)

to dodałem i quest przestał działać(chciałem aby gracz ktory wbije do komnaty moglbyc tam tylko 35min):
 wait ()
timer("lol", 35*60)
end
end
when lol.timer begin
d.exit()
end
fragment z komnatą:
  elseif 3 == s then
  say_title ( pc.get_name().."!")
  say ("W komnacie grasują dwa Smoki ! Pokonanie ich to nie lada  wyzwanie! Lecz nagrody są wspaniałe!")
  wait ()
timer("lol", 35*60)
end
end
when lol.timer begin
d.exit()
end
if pc.count_item(71095) < 1 then
say("Nie możesz wejść do komnaty bez przepustki !")
else
pc.remove_item(71095, 1)
pc.warp(819200, 1049600)
end

shejn · 20 Czerwca 2012

czesc

idzie zrobic tak z tym questem

quest teleport_po_killu begin
state start begin
 when 1222.kill begin
  pc.warp(99999900, 99999900)
 end
end
end

ze loga tych wszystkich którzy danego mooba ''klepali'' ?

rayqi94 · 20 Czerwca 2012

Up. Pewnie coś z komendą dc. Ale czy da radę wyrzucić wszystkich na raz to nie wiem. Może pętla?

Dargon · 20 Czerwca 2012

czesc

idzie zrobic tak z tym questem
quest teleport_po_killu begin
state start begin
 when 1222.kill begin
  pc.warp(99999900, 99999900)
 end
end
end
ze loga tych wszystkich którzy danego mooba ''klepali'' ?

po zabiciu potwora daj np

 if pc.getqf("mob_attack") == 0 then pc.setqf("mob_attack", 1)

potem przykładowo:

if pc.getqf("mob_attack") == 1 then
  pc.warp(x, y)

seba96 · 20 Czerwca 2012

Ale co nie działa?

Jaki błąd wyskakuje?!

Konkretnie, sprecyzuj to, nikomu się nie chce szukać błędów w takich questach.

Nie działa to że po skończeniu misiji na 30lv nie włancza sie misja na 40lv

JonyNawa1ony · 20 Czerwca 2012

W queście z Ksiągami Klątw na początku zamień:

state start begin
when login or levelup with pc.level >= 40 and pc.level <= 150 begin
set_state(information)

na:

state run begin
when login or levelup with pc.level >= 40 and pc.level <= 150 begin
set_state(information)

ludojad · 20 Czerwca 2012

Witajcie.

Mam problem z pewnym questem, mógłby mi ktoś pomóc? ;D

quest shops begin

state start begin when

80082.chat."Kamienie duszy" begin

say_title("Specjalistka:")

say("") say("Chcesz otworzyc sklep z KD ?")

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

if s == 1 then

npc.open_shop(13)

else

return

end

when 80082.chat."Mikstury" begin

say_title("Specjalistka:")

say("") say("Chcesz otworzyc sklep z miksturami?")

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

if s == 1 then

npc.open_shop(12)

else

return

end

JonyNawa1ony · 20 Czerwca 2012

Dodaj 2 x end na koncu

ludojad · 20 Czerwca 2012

ok działa. Like ;]

SivleR · 20 Czerwca 2012

Siemka. Prosił bym o napisanie questa na komnatę smoka.

-Aby wejść potrzebne jest pt.

-Po wejściu mają 5 min na zniszczenie 3 metinów

-Metiny mają się respić po kolei.

-Po zabiciu ostatniego (3 metina) ma się zrespić smok.

-Do wejścia nie potrzeba żadnych itemków tylko pt :P

Z góry dziękuje

@Jony PW :P

Xan_2209 · 21 Czerwca 2012

Może mi ktoś pomóc z tym questem?

http://wklej.to/r4XQ7

Błąd: segmentation fault (core dumped)

Mateo193 · 21 Czerwca 2012

quest atlantyda begin

state start begin

when 20093.chat."Wejdz do Groty AV1" with pc.get_level()>74 begin

say("Koe-Pung:")

say("Witaj!")

say("Jestem straznikiem atlantydy!")

say("Jesli chcesz przejsc do owej groty")

say("potrzebujesz Krwisty kamien oraz odwage!")

say("")

say_item("Krwisty Kamien", 30190, "")

say_reward("Czy chcesz wejść do groty av1")

local a = select( Tak, Nie )

if a == 1 then

pc.count_item(30190)>0 then

say("Koe-Pung:")

say("Masz krwisty kamien!")

say("Zostaniesz przeniesiony!")

say("")

pc.remove_item(30190)

else

say("Koe-Pung:")

say("Nie moge Ciebie przeniesc!")

say("Potrzebujesz krwisty kamien!")

say_item("Krwisty Kamien", 30190, "")

return

end

elseif a == 2 then

return

end

poprawi mi ktoś.?

Xan_2209 · 21 Czerwca 2012

@up zobacz tego


quest atlantyda begin
state start begin
when 20093.chat."Wejdz do Groty AV1" with pc.level >= 75 begin
say("Koe-Pung:")
say("Witaj!")
say("Jestem straznikiem atlantydy!")
say("Jesli chcesz przejsc do owej groty")
say("potrzebujesz Krwisty kamien oraz odwage!")
say("")
say_item("Krwisty Kamien", 30190, "")
say_reward("Czy chcesz wejść do groty av1")
local a = select( Tak, Nie )
			if a == 1 then
when pc.count_item(30190)>0 begin
say("Koe-Pung:")
say("Masz krwisty kamien!")
say("Zostaniesz przeniesiony!")
say("")
pc.remove_item(30190)
			else
say("Koe-Pung:")
say("Nie moge Ciebie przeniesc!")
say("Potrzebujesz krwisty kamien!")
say_item("Krwisty Kamien", 30190, "")
return
end
			elseif a == 2 then
			return
end
end
end[/b][/color][/size][/font]
[font=tahoma, helvetica, arial, sans-serif][size=2][color=#ffffff][b]end
end

shejn · 21 Czerwca 2012

Elo.Quest się wgrał ale nie pokazuje się u NPC =(

http://wklej.to/m4xBI

JonyNawa1ony · 21 Czerwca 2012

@shejn

Zamień:

local a = select("+10 pkt Siła","+10 pkt int.","+10 pkt.PŻ","+10 pkt zręczność","Anuluj")

na:

local a = select("+10 pkt Siła","+10 pkt int.","+10 pkt.PŻ ","+10 pkt zręczność ","Anuluj")

shejn · 21 Czerwca 2012

@Jony

THX,zadziałało

PS:Miło że wróciłeś na MPC, a co się działo że Cię nie było ? :>

Pamiętam Cię jeszcze za czasów Bambusowych,Ortegowych,DjRazorowych,Sui'owych :>

mam problem:

http://wklej.to/hiC1o

po zakupie stat nie zabiera kasy tylko ją dodaje ;/

otrzymales : xxx

Zaloguj się

👋 Witaj na MPCForum!

Pisanie / Poprawa Questów !

Rekomendowane odpowiedzi

Zarchiwizowany