[Quest] Cykliczne polowania

Sunushi · 9 Grudnia 2012

Panowie i panie, powstał taki świetny dział a wy się nie produkujecie. Ja się pytam, dlaczego?

Żeby rozruszać troszkę ten dział postanowiłem coś napisać specjalnie na tą okazję. Prosty (albo i nie) quest, który po rozmowie z Baek-Go przydziela nam zabicie kilku potworów. W nagrodę dostajemy Yangi, Exp oraz jakiś przedmiot w dowolnej ilości. Quest jest cykliczny, ponieważ możemy wykonywać go co 24 godziny. Jak to wygląda w praktyce?

Na początek idziemy do Baek-Go i robimy banalną misję polegającą na zabiciu 10 Wilków. Tak to sobie dodałem, że niby Baek-Go nas sprawdza czy nadajemy się na myśliwych. Później zaczyna się właściwa część questa (należy oglądać od lewej do prawej):

Na początek kilka przykładowych misji (administracja sama może je zdefiniować w banalny wręcz sposób, który później opiszę)

Po zaakceptowaniu misji wyświetla się nam piękny zwój zawierający nazwę potwora do zabicia:

A treść zwoju kryje następującą treść:

Zabijamy kilka potworów i obserwujemy zmiany:

Po zabiciu określonej liczby potworów:

Zawiera informację o powrocie do Baek-Go. Czas na nagrodę:

(nie spolszczone item_proto, lol )

Co jeśli ukończymy misję i będziemy chcieli wziąć nową?

Jeśli anulujemy misję i będziemy chcieli wziąć ją na nowo, to dostaniemy tą, którą anulowaliśmy. Nowa misja będzie dopiero po upływie 24 godzin od wzięcia poprzedniej. No, chyba tyle z prezentacji, czas na questa i opis konfiguracji:

http://pastebin.com/8ZrpJjzu

quest cykliczne_polowania begin
 state start begin
		 when letter begin
				 send_letter("Cykliczne Polowania")
				 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("Cykliczne Polowania")
				 say("Cykliczne polowania są zestawem misji, które można")
				 say("wykonywać co 24 godziny. Misje są dobierane na")
				 say("podstawie poziomu postaci, lecz dużo też zależy od")
				 say("szczęścia. Aby rozpocząć swoją pierwszą misję idź ")
				 say("do Baek-Go. Znajdziesz go w pierwszym mieście.")
				 say("")
		 end

		 when __TARGET__.target.click or 20018.chat."Cykliczne Polowania" begin
				 target.delete("__TARGET__")
				 say_title(mob_name(20018)..":")
				 say("Witaj. Jak powszechnie wiadomo, w naszym świecie")
				 say("nieustannie mnożą się potwory. Nieważne ile byśmy")
				 say("ich zabili, zawsze znajdzie się coś do roboty.")
				 say("Dostałem pozwolenia od Strażnika Miejskiego na")
				 say("wyznaczaniu, osobom takim jak Ty, co należy wykonać.")
				 wait()
				 say_title(mob_name(20018)..":")
				 say("Spójrzmy... Może na początek sprawdzę czy się do")
				 say("tego nadajesz. Zabij 20 Wilków po czym zgłoś się ")
				 say("do mnie. Nie martw się, zostaniesz za to nagrodzony.")
				 say("")
				 set_state(kill)
		 end
 end

 state kill begin
		 when letter begin
				 send_letter("Zabij 20 Wilków")
		 end

		 when button or info begin
				 say_title("Zabij 20 Wilków")
				 say("Pierwsze zadanie nie jest zbyt ambitne. Baek-Go")
				 say("poprosił Cię, byś zabił 20 Wilków. Jest to test,")
				 say("który wykaże czy nadajesz się na osobe do polowań.")
				 say("")
				 say_reward("Zabitych Wilków: "..pc.getqf("kill_count").."/20")
				 say("")
		 end

		 when kill with npc.get_race() == 102 begin
				 local kill = pc.getqf("kill_count")+1
				 pc.setqf("kill_count", kill)
				 if kill == 20 then
						 set_state(back)
				 end
		 end
 end

 state back begin
		 when letter begin
				 send_letter("Cykliczne Polowania")
				 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("Cykliczne Polowania")
				 say("Udało Ci się zabić 20 Wilków. Wróć do Baek-Go")
				 say("po nagrodę.")
				 say("")
		 end

		 when __TARGET__.target.click or 20018.chat."Cykliczne Polowania" begin
				 target.delete("__TARGET__")
				 say_title(mob_name(20018)..":")
				 say("Świetnie, udało Ci się zabić 20 Wilków! Myślę,")
				 say("że jesteś w stanie polować na nieco mocniejsze")
				 say("potwory. Zgłoś się do mnie gdy tylko nabierzesz")
				 say("ochotę na łowy. Ah, zapomniałbym. Oto Twoja")
				 say("nagroda.")
				 say_reward("Otrzymujesz 5.000 Yang")
				 say_reward("Otrzymujesz 500 Doświadczenia.")
				 say("")
				 pc.setqf("kill_count", 0)
				 pc.setqf("mob", 1)
				 pc.change_gold(5000)
				 pc.give_exp(500)
				 set_state(polowanie)
		 end
 end

 ---------------------------
 -- Właściwa część questa --
 ---------------------------
 state polowanie begin
		 when 20018.chat."Cykliczne Polowanie" begin
				 say_title(mob_name(20018)..":")
				 local acc_time = get_time()
				 local old_time = pc.getqf("time")
				 if acc_time < old_time and pc.getqf("mob") == 0 then
						 local diff = math.ceil((old_time - acc_time)/3600)
						 local h
						 if diff == 1 then
								 h = "godzinę."
						 elseif (diff >= 2 and diff <= 4) or diff >= 22 then
								 h = "godziny."
						 else
								 h = "godzin."
						 end
						 say("Niestety, musisz poczekać jeszcze "..diff.." "..h)
						 return
				 end
				 say("Witaj ponownie! Co, masz ochotę na małe polowanko?")
				 say("Nie ma problemu! Zaraz coś dla Ciebie znajdę...")
				 wait()
				 say_title(mob_name(20018)..":")
				 if get_time() > pc.getqf("time") then
						 local mobs = cykliczne_polowania.return_mob()
						 local n = number(1, table.getn(mobs))
						 local tablica = mobs[n]
						 local ret1 = tablica[1]
						 local number = number(tablica[2], tablica[3])
						 pc.setqf("number", n)
						 pc.setqf("mob", ret1)
						 pc.setqf("kill_mob", number)
						 pc.setqf("time", get_time()+24*60*60)
				 end
				 say("Zobaczmy co mu tu mamy...")
				 say("Niech będzie "..pc.getqf("kill_mob").."x "..mob_name(pc.getqf("mob"))..".")
				 say("Co Ty na to?")
				 say("")
				 say_reward("Pamiętaj, że będziesz mógł dostać inną misję ")
				 say_reward("dopiero po upłynięciu 24 godzin!")
				 local a = select("Biore!", "Narazie nie")
				 if a == 1 then
						 set_state(kill_monster)
				 end
		 end
 end

 state kill_monster begin
		 when letter begin
				 send_letter(cykliczne_polowania.title())
		 end

		 when button or info begin
				 local kill = pc.getqf("kill_mob")
				 say_title(cykliczne_polowania.title())
				 say("Baek-Go zlecił Ci zabicie "..kill.."x "..mob_name(pc.getqf("mob")))
				 say("")
				 say_reward("Ilość zabitych potworów: "..pc.getqf("kill_count").."/"..kill)
				 say("")
				 say("Jest to misja nieobowiązkowa więc możesz z niej")
				 say("zrezygnować. Czy chcesz anulować misję?")
				 if select("Tak", "Nie") == 1 then
						 say_title(cykliczne_polowania.title())
						 say("Misja została anulowana.")
						 say("")
						 pc.setqf("kill_count", 0)
						 set_state(polowanie)
				 end
		 end

		 when 20018.chat."Anuluj Cykliczne Polowanie" begin
				 say_title(mob_name(20018)..":")
				 say("Na pewno chcesz zrezygnować z tej misji?")
				 say("Pamiętaj, że i tak nie dostaniesz innej dopóki")
				 say("nie miną 24 godziny od wzięcia aktualnej.")
				 if select("Przerwij misję ", "Kontynuuj misję ") == 1 then
						 say_title(mob_name(20018)..":")
						 say("Misja została anulowana.")
						 say("")
						 pc.setqf("kill_count", 0)
						 set_state(polowanie)
				 end
		 end

		 when kill with npc.get_race() == pc.getqf("mob") begin
				 local kill = pc.getqf("kill_count")+1
				 pc.setqf("kill_count", kill)
				 if kill == pc.getqf("kill_mob") then
						 set_state(reward)
				 end
		 end
 end


 state reward begin
		 when letter begin
				 send_letter("Polowanie ukończone")
				 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("Polowanie ukończone")
				 say("Pomyślnie pokonałeś wyznaczone potwory.")
				 say("Wróć do Baek-Go po nagrodę.")
				 say("")
		 end

		 when __TARGET__.target.click or 20018.chat."Cykliczne Polowania" begin
				 target.delete("__TARGET__")
				 say_title(mob_name(20018)..":")
				 say("Udało Ci się zabić wszystkie potwory? To świetnie!")
				 say("Proszę, oto Twoja nagroda.")
				 local kill_mob = pc.getqf("kill_mob")
				 local n = pc.getqf("number")
				 local mobs = cykliczne_polowania.return_mob()
				 local gold = kill_mob*mobs[n][4]
				 local exp = kill_mob*mobs[n][5]
				 local item = mobs[n][6]
				 local count = mobs[n][7]
				 say_reward(gold.." Yang")
				 pc.change_gold(gold)
				 say_reward(exp.." Doświadczenia")
				 pc.give_exp(exp)
				 if item != 0 and count != 0 then
						 say_reward(count.."x "..item_name(item))
						 pc.give_item2(item, count)
				 end
				 say("")
				 pc.setqf("kill_count", 0)
				 pc.setqf("kill_mob", 0)
				 pc.setqf("mob", 0)
				 pc.setqf("number", 0)
				 pc.setqf("time", get_time()+24*60*60)
				 clear_letter()
				 set_state(polowanie)
		 end
 end

 state __FUNCTION__ begin
		 function return_mob()
				 local level = math.ceil(pc.get_level()/10)
				 local mobs = {
						 --
						 -- Jak uzupelniac tablice?
						 -- {id potwora, min. ilosc do zabicia, max. ilosc do zabicia, yang za 1 moba, exp za 1 moba, przedmiot, ilosc za 1 moba},
						 --
						 { -- 1-9
								 {103, 10, 20, 100, 500, 27003, 5}, -- wilk
								 {109, 10, 20, 100, 500, 27003, 5}, -- czerw. dzik
								 {173, 5, 15, 100, 500, 27003, 5}, -- glodny alfa wilk
								 {178, 5, 15, 100, 500, 27003, 5}, -- glodny dzik
								 {8001, 1, 50, 100, 500, 27003, 5}, -- metin cierpienia
						 }, -- 1-9
						 { -- 10-19
								 {110, 15, 25, 100, 500, 27003, 5}, -- niedzwiedz
								 {112, 15, 25, 100, 500, 27003, 5}, -- czarny niedzwiedz
								 {151, 1, 3, 100, 500, 27003, 5}, -- cung-mok
								 {184, 10, 20, 100, 500, 27003, 5}, -- glodny tygrys
								 {8002, 1, 5, 100, 500, 27003, 5}, -- metin walki
								 {8003, 1, 5, 100, 500, 27003, 5}, -- metin bitwy
						 }, -- 10-19
						 { -- 20-29
								 {138, 10, 20, 100, 500, 27003, 5}, -- przeklety czerw. dzik
								 {303, 10, 15, 100, 500, 27003, 5}, -- zaprzys. general
								 {393, 5, 10, 100, 500, 27003, 5}, -- se-rang
								 {395, 20, 30, 100, 500, 27003, 5}, -- bezduszny mi-jung
								 {8004, 1, 5, 100, 500, 27003, 5}, -- metin chciwosci
								 {8005, 1, 5, 100, 500, 27003, 5}, -- metin czerni
						 }, -- 20-29
						 { -- 30-39
								 {402, 10, 20, 100, 500, 27003, 5}, -- mianiak czarnego wiatru
								 {491, 2, 5, 100, 500, 27003, 5}, -- mahon
								 {503, 20, 25, 100, 500, 27003, 5}, -- dziki lucznik
								 {601, 2, 5, 100, 500, 27003, 5}, -- ork 
								 {634, 5, 20, 100, 500, 27003, 5}, -- elit ork czarodziej
								 {636, 5, 20, 100, 500, 27003, 5}, -- czarny ork
								 {8006, 1, 5, 100, 500, 27003, 5}, -- metin ciemnosci
								 {8007, 1, 5, 100, 500, 27003, 5}, -- metin zazdrosci
						 }, -- 30-39
						 { -- 40-49
								 {591, 2, 5, 100, 500, 27003, 5}, -- best kapitan
								 {705, 5, 20, 100, 500, 27003, 5}, -- ezot egzekutor
								 {752, 15, 30, 100, 500, 27003, 5}, -- wysoki arahan
								 {902, 5, 10, 100, 500, 27003, 5}, -- zarazony pies
								 {8008, 1, 5, 100, 500, 27003, 5}, -- metin duszy
								 {8009, 1, 5, 100, 500, 27003, 5}, -- metin cienia
						 }, -- 40-49
						 { -- 50-59
								 {777, 15, 40, 100, 500, 27003, 5}, -- best przywolywacz
								 {906, 5, 30, 100, 500, 27003, 5}, -- zarazony lucznik
								 {1004, 10, 20, 100, 500, 27003, 5}, -- demoni szaman
								 {8015, 1, 5, 100, 500, 27003, 5}, -- metin twardosci
								 {8016, 1, 5, 100, 500, 27003, 5}, -- metin diabla
						 }, -- 50-59
						 { -- 60-69
								 {1103, 10, 20, 100, 500, 27003, 5}, -- lodowy robak
								 {1107, 5, 10, 100, 500, 27003, 5}, -- lodowy golem
								 {1303, 20, 40, 100, 500, 27003, 5}, -- straszydlo
								 {2134, 10, 15, 100, 500, 27003, 5}, -- wezowy lucznik
								 {8018, 1, 5, 100, 500, 27003, 5}, -- metin smierci
						 }, -- 60-69
						 { -- 70-79
								 {1031, 5, 20, 100, 500, 27003, 5}, -- podly demoni zolnierz
								 {1305, 5, 20, 100, 500, 27003, 5}, -- ropuszy general
								 {2202, 5, 20, 100, 500, 27003, 5}, -- ognisty duch
								 {8019, 1, 5, 100, 500, 27003, 5}, -- metin morderstwa
								 {80024, 1, 5, 100, 500, 27003, 5}, -- metin pung-ma
						 }, -- 70-79
						 { -- 80-89
								 {1501, 5, 10, 100, 500, 27003, 5}, -- skalny golem
								 {2205, 5, 10, 100, 500, 27003, 5}, -- ognisty wojownik
								 {2305, 10, 20, 100, 500, 27003, 5}, -- zle drzewo
								 {2312, 30, 50, 100, 500, 27003, 5}, -- czerwony duch pniaka
								 {8025, 1, 5, 100, 500, 27003, 5}, -- metin ma-an
								 {8026, 1, 5, 100, 500, 27003, 5}, -- metin to-young
						 }, -- 80-89
						 { -- 90-99
								 {2315, 10, 20, 300, 1500, 27003, 5}, -- czerwone zle drzewo
								 {2401, 1, 10, 2000, 2500, 27003, 5}, -- zolnierz seatou
								 {8027, 1, 5, 1500, 3000, 27003, 5}, -- metin jeon-un
						 }, -- 90-99
				 }
				 return mobs[level]
		 end

		 function title()
				 return "Polowanie: "..mob_name(pc.getqf("mob"))
		 end
 end
end

Konfiguracja:

Aby skonfigurować nasze moby, ich ilość i nagrody za nie należy zjechać na sam dół naszego questa. Jest tam dosyć obszerna tablica. Dodałem tam komentarze, które powinny wam pomóc w edytowaniu tego wszystkiego. Zacznijmy od tego, że tablica dzieli się na 10 kategorii poziomu (nie będę wypisywał, można samemu zobaczyć). Następnie każda kategoria dzieli się na poszczególne moby. Weżmy np metina joun-un:

{8027, 1, 5, 1500, 3000, 27003, 5}, -- metin jeon-un
{id, min. ilosc tego moba, max ilosc tego moba, ile yang za jednego, ile expa za jednego, jaki przedmiot, ile sztuk za wszystkie}

Nie wiem co tu więcej opisywać, wystarczy to skonfigurować by quest śmigał tak jak należy.

To chyba wszystko, pisać jak widzicie jakieś błędy (pisany na szybko )

Nexicoll · 9 Grudnia 2012

Kolejna doskonała robota. Dzięki wielkie

MrHackuss · 9 Grudnia 2012

Piknie ;D + i 5 4 u

JachuPL · 9 Grudnia 2012

Świetny Quest! Co prawda ubiegłeś mnie, bo pisałem podobny (coś na wzór tablicy w Elsword), ale świetna robota! Do tego wszystko działa Wielkie dzięki!

Qentinios · 9 Grudnia 2012

Dawno nie dawałeś tak dużo, co tu dużo pisać, świetna robota.

Usama Su kocken · 9 Grudnia 2012

Botqu daj mi swoj talent :((

zajebiste lajk

@oj tam oj tam

lopes564 · 9 Grudnia 2012

Botqu daj mi swoj talent

1% talent, a reszta to zapierdalanie

Sunushi · 9 Grudnia 2012

1% talent, a reszta to zapierdalanie

Myślę, że to raczej wprawa niż zapierdzielanie. Gdy wczoraj zobaczyłem swoje questy sprzed 2 lat to myślałem, że się załamię. Wystarczy poznać możliwości języka (po dziś dzie wiem, że znam tylko część lua), mieć pomysły i robić to dla przyjemności oraz zabawy.

Czy ktoś ma pomysł na rozwój tego questa czy lepiej pisać coś nowego?

lopes564 · 9 Grudnia 2012

Gdy wczoraj zobaczyłem swoje questy sprzed 2 lat to myślałem, że się załamię.

Ło jezu, 2 lata temu to ja z innych questów ściągałem

quest cus begin
state start begin

więc wiesz

TEJLI · 9 Grudnia 2012

Linia 222:

                        local count = mobs[n][6]

Powinno być:

                        local count = mobs[n][7]

Poza tym, quest powinien być dobry. Pomysł jest wspaniały, a wykonanie jak najbardziej profesjonalne

Dzięki za wstawkę

Pozdrawiam

Sunushi · 9 Grudnia 2012

Linia 222:
 local count = mobs[n][6]
Powinno być:
 local count = mobs[n][7]
Poza tym, quest powinien być dobry. Pomysł jest wspaniały, a wykonanie jak najbardziej profesjonalne

Dzięki za wstawkę

Pozdrawiam

Tak, to są właśnie niesprawdzone poprawki :P Dzięki za zwrócenie uwagi, już poprawiam

z4z0l · 10 Grudnia 2012

Świetna robota Sun - jak zwykle wielkie gratulacje Nic skomplikowanego ale jednak cieszy oko - dzięki.

Ink™ · 10 Grudnia 2012

Panowie i panie, powstał taki świetny dział a wy się nie produkujecie. Ja się pytam, dlaczego?

Żeby rozruszać troszkę ten dział postanowiłem coś napisać specjalnie na tą okazję.

Like idzie nie za Quest, lecz za te słowa. Oczywiście, niektórym quest też się przyda, bo jest dobrze napisany.

Rapils · 13 Grudnia 2012

To w taki sposób zaistniały misje na zmianki i bodzie serwera Dr2 ..

Niezły bajer

Sunushi · 13 Grudnia 2012

To w taki sposób zaistniały misje na zmianki i bodzie serwera Dr2 ..

Niezły bajer

Nie wiem czy w taki sposób, ja byłem tylko przy Dr1. Kalimdor i Draenor2 Szykra sam już tworzył. Niemniej jednak zasada działania jest zapewne podobna

Cort · 14 Grudnia 2012

Quescik dobry, ale nie prościej zamiast

					 when kill with npc.get_race() == 102 begin

when 102.kill begin

Niby bez różnicy, ale prościej :P

Sunushi · 14 Grudnia 2012

Quescik dobry, ale nie prościej zamiast
                        when kill with npc.get_race() == 102 begin
when 102.kill begin
Niby bez różnicy, ale prościej :P

Niby bez różnicy ale jak będziesz miał jeszcze jedną misję, w której będzie do zabicia Wilka to będą ze sobą kolidować te misje i będzie się wykonywać tylko jedna. Taki zabieg jaki ja zastosowałem eliminuje ten błąd

Cort · 14 Grudnia 2012

Niby bez różnicy ale jak będziesz miał jeszcze jedną misję, w której będzie do zabicia Wilka to będą ze sobą kolidować te misje i będzie się wykonywać tylko jedna. Taki zabieg jaki ja zastosowałem eliminuje ten błąd

To czysty state nie zamyka questa permanentnie? To dziwnie trochę, bo w sumie wychodzi na to samo.

Sunushi · 14 Grudnia 2012

Nie o to chodzi. Przyjmijmy, że masz tą misję i polowanie w którym też masz Wilka. Jeśli będziesz próbował robić 2 misje na raz to Ci się to najzwyczajniej w świecie nie uda. Będziesz musiał ukończyć tą, która w quest nazwa begin jest wyżej wg alfabetu a dopiero później będziesz musiał znowu zabijać Wilki (robisz najpierw pierwszą a później drugą misję zamiast dwóch na raz)

Cort · 14 Grudnia 2012

Ale z drugiej strony npc.get_race() i xxx.kill działa na tej samej zasadzie, nie mi to oceniać, nie znam się aż tak na questach, niemniej jednak dzięki.

Sunushi · 14 Grudnia 2012

Ale z drugiej strony npc.get_race() i xxx.kill działa na tej samej zasadzie, nie mi to oceniać, nie znam się aż tak na questach, niemniej jednak dzięki.

Sęk w tym, że to nie działa tak samo. Jeśli zrobisz 102.kill to w object utworzy Ci się folder 102. Jeśli dasz kill with npc.get_race() to doda się folder do notarget. Questy będące w notarget nie kolidują ze sobą

Cort · 14 Grudnia 2012

Sęk w tym, że to nie działa tak samo. Jeśli zrobisz 102.kill to w object utworzy Ci się folder 102. Jeśli dasz kill with npc.get_race() to doda się folder do notarget. Questy będące w notarget nie kolidują ze sobą

No teraz to ma jednak sens, dzięki wielkie =)

Cort · 26 Grudnia 2012

Tak przeglądałem tego questa i... :rolleyes:

say("że jesteś w stanie polować na nieco mocniejsze")

z4z0l · 27 Grudnia 2012

Tak przeglądałem tego questa i... :rolleyes:

say("że jesteś w stanie polować na nieco mocniejsze")

Co z tego? Poprawnie zadziała. Polskie znaki diakrytyczne nie mogą występować przy zamknięciu cudzysłowu.

Cort · 27 Grudnia 2012

Zamknięciu, no chyba że tak. Ja zawsze jak miałem np "świetnie" to robiłem say(" świetnie!").

Zaloguj się

👋 Witaj na MPCForum!

[Quest] Cykliczne polowania

Rekomendowane odpowiedzi

Zarchiwizowany