Pisanie / Poprawa Questów !

[Vatu]

Siemka.

 

Potrzebuje takiego czegoś:

Mam sobie rajd i chce teraz żeby był tam taki jak by timer.

Chodzi o to że mam do zniszczenia 4 metki w 4 minuty i chce teraz żeby ktoś mi napisał takie coś.

[Karpielek]

Witam,

 

Mam quest z biologiem, wszystko ładnie się kompiluje lecz w grze nic, ale to nic się nie wyświetla. Żadnej informacji aby dojść do biologa. W folderze w object z biologiem są tam pliki jakieś i chyba powinno wszystko działać, tymczasem nie działa. Proszę o sprawdzenie: http://e-shad.tk/biolog_matowe_fix.quest

Limit lajków czeka.

[jhgjhghjghjghjh]

 

 

SIema mam serwer dedykowany mietin2 wszystko już skoczone tylko nie wiem czemu nie mogę wejść do DT i nie wiem może to zależy od questa jak tak to proszę o tego questa z góry dziękuję.

[maniek1310]

@Karpielek tutaj masz błąd

when login or levelup with pc.level >= 60 and pc.level <= 125 begin

zamień na

when login or levelup with pc.get_level() >= 60 and pc.get_level() <= 125 begin

[Karpielek]

@Karpielek tutaj masz błąd

when login or levelup with pc.level >= 60 and pc.level <= 125 begin

zamień na

when login or levelup with pc.get_level() >= 60 and pc.get_level() <= 125 begin

Nadal nie pomaga :/

[maniek1310]

a usunąłeś przed wgraniem stary quest z serwera ??

[Karpielek]

Skompilowałem ponownie (./qc biolog_matowe_fix.quest), nie usuwałem. Ale jeżeli są takie same nazwy questów to one chyba raczej się nadpiszą, prawda? Zobacz proszę czy wszystko jest ok w tym queście, bo mam wątpliwości, że coś w nim nie gra

// edit stary quest usunięty, questy na nowo skompilowane, serwer zrestartowany i nie działa nadal.

[maniek1310]

@Karpielek poprawiłem trochę znaki ą ,ś , ć itd ale reszta to jest raczej dobra

Powodem nie działania tego questu może być złe kodowanie w edytorze questu.

1. Uruchom edytor np. Notepad ++

2. Kliknij "Format" potem "Koduj w ANSI"

3. Następnie wklej ten kod questu

http://wklej.to/5JGe6

4. I dopiero zapisz quest i wgraj na serwer.

5. Dla pewności usuń najpierw stary quest z serwera.

[taki_niesmialy]

Da się zrobić tak aby po śmierci gracza aktywował się quest ?

 

Np. jeśli ktoś zginie to wyświetla mu się okienko z tekstem "UMARŁEŚ".

 

 

oraz prosił bym o wycinek z guesta który odpowiada że oddawanie przedmiotów. Chodzi o to że musimy oddać 10 przedmiotów po 1 do danego npc. Wiem że jest to w queście od biologa ale jakoś nie mogę tamtego użyć.

[maniek1310]

@up funkcja która sprawdza to pc.is_dead()

a ten quest że trzeba oddać przedmioty to napisz jakie id ma być tego przedmiotu , ile % na przyjęcie itd

[taki_niesmialy]

id przedmioty to powiedzmy "9999" do npc o id "1234" szansa 100% i trzeba oddać 10 tych itemów

 

@Edit

 

Czyli to zadziała tak?

 

when pc.is_dead() begin

czy brakuje jeszcze czegoś?

[maniek1310]

@taki_niesmialy powinno działać

http://wklej.to/2a3a2

 

funkcja pc.is_dead() zwraca dwie liczby 0 i 1 .

1 - user jest dead

0 - user jest żywy

 

np.

when pc.is_dead() == 1 begin
say("Dead")
end

[Sunushi]

maniek1310, weź już się lepiej nie odzywaj bo wprowadzasz tylko ludzi w błąd. Musi być wykonana jakaś akcja, aby można było coś przyrównać. Dla przykładu nie zadziała when pc.is_dead() bo to jest funkcja sprawdzająca, czy gracz jest żywy czy nie a nie akcja. Do akcji zaliczamy np: login, levelup, mount, unmount, enter, letter, info, button, kill, click, use, timer, chat. Jest ich jeszcze kilka. Więc za przeproszeniem zamknij się już i nie pisz głupot albo zastanów się nad tym co piszesz

[taki_niesmialy]

Dobra, questa sprawdzę a co z tą funkcją? Zadziała czy nie?

[Sunushi]

Musisz pętle zrobić, która będzie się co 1 sek wykonywała i sprawdzała czy żyjemy czy nie

[old_kwiatosz]

@up

Właśnie ja nie znam się za bardzo na pętlach, a potrzebuję takiej co 1 sekundę się wykonuję.

Podasz na PW, lub tutaj ?

Dzięki.

[maniek1310]

Wiem pomyliłem się ale każdy może się pomylić.

[BlondynX]

zawsze mozna zrobic tak ale nie gwarantuje 100% dzialania

quest bejbe begin
state start begin
when login begin
timer("tak",1)
end
when tak.timer begin
timer("tak",1)
if pc.is_dead() == 1 then -- lub if pc.is_dead() then
say("dziala")
end
end
end
end

[Warlok20]

Do poprawy.

 

quest diament begin

state start begin

when login or levelup with pc.get_level >= 40 begin

set_state(info)

end

end

state info begin

when letter begin

local v = find_npc_by_vnum(20016)

if v != 0 then

target.vid("__TARGET", v, "Kowal")

end

send_letter("Zło Nadciąga!!!")

when button or info begin

say_title("")

say("")

say_reward("")

end

when _TARGET_.target.click or

20006.chat."Misja" begin

target.delete("__TARGET__")

say_title("")

say("")

say_reward("")

set_state(info2)

end

end

state info2 begin

when letter begin

send_letter("")

end

when button or info begin

say("")

end

when 101.kill with pc.countitem()==0 begin

local random = math.random(20)

if random == 1 then

pc.give_item2(50107)

say("")

local v = find_npc_by_vnum(20016)

if v !=0 then

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

end

end

end

when 20016.chat."Misja" with pc.countitem()>0 begin

target.delete("__TARGET__")

local random = math.random(20)

if random == 1 then

say_title("TO TO~~")

say("to jest ot")

say_reward("tak")

pc.remove_item()

if random == 2 then

say_title("NIE NIE")

say("to jest nie nie nei")

say_reward("nie")

pc.remove_item(50107)

pc.give_item2(8001)

set_state(__COMPLETE__)

end

end

end

state __COMPLETE__ begin

end

end

 

 

Chodzi mi o to if random... u npc... żeby on miał jakiś procent na przyjęcie danego itemu.

[Warlok20]

co oznacza ten kawałek questa?

 

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

 

[BlondynX]

Witam,

 

Mam quest z biologiem, wszystko ładnie się kompiluje lecz w grze nic, ale to nic się nie wyświetla. Żadnej informacji aby dojść do biologa. W folderze w object z biologiem są tam pliki jakieś i chyba powinno wszystko działać, tymczasem nie działa. Proszę o sprawdzenie: http://e-shad.tk/bio...atowe_fix.quest

Limit lajków czeka.

 

pokaz mi putty/free bsd jak zaladujesz na jakim state staje

 

@a co do manka

--ziomek skoncz doradzac bo twoje rady sa naprawde idiotyczne

pc.level a pc.get_level to jedno i to samo- oba dzialaja

[maniek1310]

@BlondyX po pierwsze on miał pc.level a powinno być pc.level() a po drugie ja jestem przyzwyczajony do pc.get_level()

[Warlok20]

Proszę o poprawę... bo nie działa tak jak trzeba...

 

quest collect_quest_lv90 begin

state start begin

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

set_state(informacja)

end

end

 

state informacja begin

when letter begin

local v = find_npc_by_vnum(20006)

if v != 0 then

target.vid("__TARGET__", v, "Poszukiwania Mirine")

end

send_letter("Poszukiwania Mirine")

end

 

when button or info begin

say_title("Poszukiwana Mirine")

say("Mirine, potrzebuje twojej pomocy,")

say("biegnij i sprawdź co się dzieje?!")

end

 

when __TARGET__.target.click or

20006.chat."Odszukaj Mirine" begin

target.delete("__TARGET__")

say_title("Poszukiwania Mirine:")

--- l

say("Witaj, młody wojowniku!")

say("Od kilku dni nękają mnie straszliwe sny,")

say("są tak straszne, że w środku nocy budze się z łzami w oczach.")

say("Uriel poradził mi, abym znalazła kogoś odważnego,")

say("udałam się do Strażnika Wsi, a on polecił mi ciebie.")

say("Chciałabym Ciebie prosić o pomoc. Jesteś jedynym ratunkiem!")

say("Prosze pomóż mi!...")

wait()

say_title("Poszukiwania Mirine:")

say("Dziękuję ci, że się zgodziłeś,")

say("Musisz dla mnie znaleźc kilka potrzebnych rzeczy.")

say("Proszę Cie o to abyś zdobył dla mnie 25 sztuk itemu")

say("Tylk przynoś je co 6 godzin, ponieważ nie jestem w stanie")

say("pracować szybciej.")

say("Dziękuję.")

set_state(informacja2)

pc.setqf("duration",0)

pc.setqf("collect_count",0)

pc.setqf("drink_drug",0)

end

end

 

state informacja2 begin

when letter begin

send_letter("Poszukiwania Mirine")

 

end

when button or info begin

say_title("item")

--- l

say("Mirine śnią się straszliwe koszmary,")

say("aby temu zapobieć musi zdobyć item.")

say("Postaraj się Jej pomóc!")

say("Pamiętaj aby nie przynosić item zbyt często!")

say_item_vnum(27994)

say("")

say_reward("Mrine otrzymała do tej pory ".." "..pc.getqf("collect_count").." item.")

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

 

 

if pc.count_item(27994)==0 then

say_title("Poszukiwania Mirine:")

say("Nie zdobyłeś dla mnie ani jednego")

say("item?")

say("")

return

end

item.remove()

pc.setqf("drink_drug",1)

end

 

 

 

 

when 20006.chat."item" with pc.count_item(27994) >0 begin

if get_time() > pc.getqf("duration") then

say_title("Poszukiwana Mirine:")

--- l

say("Udało Ci się! zdobyłeś item.")

say("Daj mi chwilę, musze sprawdzić czy jest prawdziwy...")

say("")

pc.remove_item("27994", 1)

pc.setqf("duration",get_time()+60*60*1) -- oddawanie co 1h

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")< 49 then

local index =pc.getqf("collect_count")+1

pc.setqf("collect_count",index)

say_title("Poszukiwania Mirine:")

say("Tak! Ten item jest świetny!")

say("Przynieś mi więcej ".." "..25-pc.getqf("collect_count").. " item.")

say("Oby tak dalej...! ")

say("")

pc.setqf("drink_drug",0)

return

end

say_title("Poszukiwania Mirine:")

say("Zdobyłeś dla mnie 25 item, dziękuję!")

say("")

pc.setqf("collect_count",0)

pc.setqf("drink_drug",0)

pc.setqf("duration",0)

set_state(key_item)

return

else

say_title("Poszukiwania Mirine:")

say("Wybacz, ale ten item jest zepsuty...")

say("Proszę, przynieś mi inny!")

say("Dziękuję!")

say("")

pc.setqf("drink_drug",0)

return

end

else

say_title("Poszukiwania Mirine:")

say("Nie skończyłam badać ostatnie item.")

say("Przyjdz później!")

say("")

return

end

 

end

end

 

when __TARGET__.target.click or

20006.chat."Poszukiwania Mirine" with pc.count_item(27994) > 0 begin

target.delete("__TARGET__")

say_title("Poszukiwania Mirine:")

say("Gratuluję!!! Świetna robota.")

say("Teraz Uriel pomoże mi z moim straszliwym snem.")

say("W nagrodę dostaniesz kilka cennych itemów.")

say("")

pc.remove_item(27994,1)

set_state(nagroda)

end

 

end

 

state nagroda begin

when letter begin

send_letter("Nagroda od Mirine")

 

local v = find_npc_by_vnum(9005)

if v != 0 then

target.vid("__TARGET__", v, "Nagroda od Mirine")

end

 

end

when button or info begin

say_title("Nagroda od Mirine")

--- l

say("W nagrodę za pomoc Mirine dostaniesz cenne itemy")

say("Udaj siędo Dozorcy!")

say("")

end

 

when __TARGET__.target.click or

9005.chat."Nagroda za item" begin

target.delete("__TARGET__")

say_title("Nagroda od Dozorcy:")

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("")

 

affect.add_collect(apply.ATT_GRADE_BONUS,10, 60*60*24*365*60) --10

pc.give_item2(299)

 

end

 

end

 

 

state __giveup__ begin

when 20006.chat."Poddajesz się? " begin

say("Poszukiwania Mirine:")

say("Czy jesteś pewień, że chcesz się poddać? ")

say("Nie bedziesz miał szansy, aby zacząć ")

say("ponownie.")

end

end

state __complete begin

end

end

 

[Sunushi]

@BlondyX po pierwsze on miał pc.level a powinno być pc.level() a po drugie ja jestem przyzwyczajony do pc.get_level()

Skończ pierdolić głupoty. pc.get_level() to to samo co pc.level

[kubakus111]

co jest zle w tych questach ;x?

 

po wgraniu wpisuje ./qc nazwa_quest.quest, wszystko jest dobrze, quest sie wczytuje, lecz w grze go nie ma :/ (tak robie /reload q, a nawet restartuje serwer...)

 

 

 

 

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

-- Serwer Rehab

-- Quest Edit by Flexior

-- Analiza Biologa 30lv

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

quest zeby 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 --10H¤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("")

wait()

say_title("Otrzymales 15% szybkosci ruchu na zawsze!")

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

 

 

 

 

 

 

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

-- Serwer Rehab

-- Quest Edit by Flexior

-- Analiza Biologa 40lv

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

quest ksiegi begin

state start begin

end

state run begin

when login or levelup with pc.level >= 40 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 15 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 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()+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 --15H¤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".." "..15-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 15 Ksiag!")

say("Teraz, biolog potrzebuje ostatni")

say("przedmiot, aby zakonczyc swoje badania!")

say_item_vnum(30221)

say("Mozesz go znalezc zabijajac ezoteryków")

say("w Świątyni!")

say("")

end

 

 

 

 

when 731.kill or

733.kill or

734.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("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("")

wait()

say_title("Otrzymales 15 szybkosci ataku na zawsze!")

affect.add_collect(apply.ATT_SPEED,10,60*60*24*365*60) --- ˇV60¦~

 

clear_letter()

set_quest_state("collect_quest_lv50", "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

 

 

 

 

 

 

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

-- Serwer Rehab

-- Quest Edit by Flexior

-- Analiza Biologa 50lv

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

quest pamiatki begin

state start begin

end

state run begin

when login or levelup with pc.level >= 50 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 - Pamiatki po Demonie")

end

send_letter("Analiza Biologa - Pamiatki po Demonie")

end

 

when button or info begin

say_title("Analiza Biologa - Pamiatki po Demonie")

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 Pamiatki po Demonie.")

say("Musze przeprowadzic kilka eksperymentow,")

say("dlatego potrzebuje kilku Pamiatek po Demonie.")

say("Czy moglbys przyniesc mi 15 Pamiatek po Demonie?")

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)-- ¨ú±oŞşŞ««~ĽĆ¶q

pc.setqf("drink_drug",0) --łÜ°g´bĂĤôŞş¸Ü1

end

end

 

state go_to_disciple begin

when letter begin

send_letter("Zadanie Specjalne - Pamiatki po Demonie")

 

end

when button or info begin

say_title("Znajdz Pamiatki po Demonie")

--- l

say("")

say("Biolog Chaegirab, uczen Uriela,")

say("szuka Pamiatek po Demonie.")

say("Zawsze przynos mu po jednej, aby mial czas")

say("na ich dokladne przebadanie.")

say("Pamiatek po Demonie szukaj w Wiezy Demonow!")

say("")

say_item_vnum(30015)

say_reward("Do tej pory zebrales".." "..pc.getqf("collect_count").." Pamiatek po Demonie")

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(30015)==0 then

say("Biolog Chaegirab:")

say("Co? Nie przyniosles mi zadnych")

say("Pamiatek po Demonie?...")

say("")

return

end

 

item.remove()

pc.setqf("drink_drug",1)

end

 

 

 

when 20084.chat."Pamiatki po Demonie" with pc.count_item(30015) >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(30015, 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) --¨ú±o¤@®É+1

say("Biolog Chaegirab:")

say("Oh!! Ta Pamiatka po Demonie jest doskonalej jakosci!")

say("Przynies mi jeszcze".." "..15-pc.getqf("collect_count").. " Pamiatek po Demonie")

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 Pamiatka po Demonie 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 Pamiatki!")

say("Wroc pozniej, kiedy juz skoncze!")

say("")

return

end

 

end

end

 

 

state key_item begin

when letter begin

send_letter("Zadanie Specjalne - Pamiatki po Demonie")

 

if pc.count_item(30222)>0 then

local v = find_npc_by_vnum(20084)

if v != 0 then

target.vid("__TARGET__", v, "Analiza Biologa - Pamiatki po Demonie")

end

end

 

end

when button or info begin

if pc.count_item(30222) >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 15 Pamiatek!")

say("Teraz, biolog potrzebuje ostatni")

say("przedmiot, aby zakonczyc swoje badania!")

say_item_vnum(30222)----------Żu¤`ĆFĆF»îĄŰ

say("Mozesz go znalezc zabijajac Podle Demony")

say("w Wiezy Demonow")

say("")

end

 

 

when 1031.kill or

1032.kill or

1033.kill or

1034.kill begin

local s = number(1, 50)

if s == 1 and pc.count_item(30222)==0 then

pc.give_item2(30222, 1)

send_letter("Wroc do biologa!")

end

end

 

 

 

 

when __TARGET__.target.click or

20084.chat."Znalazlem Kamien Duszy" with pc.count_item(30222) > 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(30222,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("")

wait()

say_title("Otrzymales 200 obrony na stale!")

 

affect.add_collect(apply.DEF_GRADE_BONUS,200,60*60*24*365*60) -----ˇV60¦~

 

 

clear_letter()

set_quest_state("collect_quest_lv60", "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

 

 

 

 

 

 

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

-- Serwer Rehab

-- Quest Edit by Flexior

-- Analiza Biologa 60lv

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

quest collect_quest_lv60 begin

state start begin

end

state run begin

when login or levelup with pc.level >= 60 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 - Matowe Lody")

end

send_letter("Analiza Biologa - Matowe Lody")

end

 

when button or info begin

say_title("Analiza Biologa - Matowe Lody")

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 Matowe Lody.")

say("Musze przeprowadzic kilka eksperymentow,")

say("dlatego potrzebuje kilku Matowych Lodow.")

say("Czy moglbys przyniesc mi 20 Matowych Lodow?")

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) -- Ą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 - Matowe Lody")

 

end

when button or info begin

say_title("Znajdz Matowe Lody")

--- l

say("")

say("Biolog Chaegirab, uczen Uriela,")

say("szuka Matowych Lodow.")

say("Zawsze przynos mu po jednym, aby mial czas")

say("na ich dokladne przebadanie.")

say("Matowych Lodow szukaj na Gorze Sohan!")

say("")

say_item_vnum(30050)

say_reward("Do tej pory zebrales".." "..pc.getqf("collect_count").." Matowych Lodow")

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(30050)==0 then

say("Biolog Chaegirab:")

say("Co? Nie przyniosles mi zadnych")

say("Matowych Lodow?...")

say("")

return

end

 

item.remove()

pc.setqf("drink_drug",1)

end

 

 

 

 

when 20084.chat."Matowe Lody" with pc.count_item(30050) >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(30050, 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")< 19 then --20ˇ

local index =pc.getqf("collect_count")+1

pc.setqf("collect_count",index) -- ¨ú±o¤F¤@+1

say("Biolog Chaegirab:")

say("Oh!! Ten Matowy Lod jest doskonalej jakosci!")

say("Przynies mi jeszcze".." "..20-pc.getqf("collect_count").. " Matowych Lodow")

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 Matowy Lod 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 ostatniego Lodu!")

say("Wroc pozniej, kiedy juz skoncze!")

say("")

return

end

 

end

end

 

 

state key_item begin

when letter begin

send_letter("Zadanie Specjalne - Matowe Lody")

 

if pc.count_item(30223)>0 then

local v = find_npc_by_vnum(20084)

if v != 0 then

target.vid("__TARGET__", v, "Analiza Biologa - Matowe Lody")

end

end

 

end

when button or info begin

if pc.count_item(30223) >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 20 Lodow!")

say("Teraz, biolog potrzebuje ostatni")

say("przedmiot, aby zakonczyc swoje badania!")

say_item_vnum(30223)

say("Mozesz go znalezc zabijajac lodowe potwory")

say("na Gorze Sohan!")

say("")

end

 

 

 

 

when 1102.kill or

1103.kill or

1104.kill or

1106.kill begin

local s = number(1, 50)

if s == 1 and pc.count_item(30223)==0 then

pc.give_item2(30223, 1)

send_letter("Wroc do biologa!")

end

end

 

 

when __TARGET__.target.click or

20084.chat."Znalazlem Kamien Duszy" with pc.count_item(30223) > 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(30223,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("")

wait()

say_title("Otrzymales 150 wartosci ataku na zawsze!")

 

affect.add_collect(apply.ATT_GRADE_BONUS,150,60*60*24*365*60)--ˇX100¦~

 

clear_letter()

set_quest_state("collect_quest_lv70", "run")

set_state(__complete)

end

 

end

 

 

state __complete begin

end

end

 

 

 

 

 

 

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

-- Serwer Rehab

-- Quest Edit by Flexior

-- Analiza Biologa 70lv

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

quest konary begin

state start begin

end

state run begin

when login or levelup with pc.level >= 70 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 - Konary Zelkova")

end

send_letter("Analiza Biologa - Konary Zelkova")

end

 

when button or info begin

say_title("Analiza Biologa - Konary Zelkova")

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 Konary Zelkova.")

say("Musze przeprowadzic kilka eksperymentow,")

say("dlatego potrzebuje kilku Konarow Zelkova.")

say("Czy moglbys przyniesc mi 25 Konarow Zelkova?")

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) -- ĄiĄH¸Ő¸ŐŞş®É¶ˇ

pc.setqf("collect_count",0)--¨ú±oŞşŞ««~ĽĆ¶q

pc.setqf("drink_drug",0) --łÜ°g´bĂĤôŞş¸Ü 1

end

end

 

state go_to_disciple begin

when letter begin

send_letter("Zadanie Specjalne - Konary Zelkova")

 

end

when button or info begin

say_title("Znajdz Konary Zelkova")

--- l

say("")

say("Biolog Chaegirab, uczen Uriela,")

say("szuka Konarow Zelkova")

say("Zawsze przynos mu po jednym, aby mial czas")

say("na ich dokladne przebadanie.")

say("Konarow Zelkova szukaj w zwyklym i czerwonym lesie")

say("")

say_item_vnum(30165)

say_reward("Do tej pory zebrales".." "..pc.getqf("collect_count").." Konarow Zelkova")

say("")

end

 

when 71035.use begin --°g´bĂĤô

if get_time() < pc.getqf("duration") then

say("Á٤ŁĄiĄH¨ĎĄÎ°g´bĂĤô")

return

end

if pc.getqf("drink_drug")==1 then

say("¤w¸g¨ĎĄÎ¤F1¦¸")

return

end

if pc.count_item(30165)==0 then

say("Biolog Chaegirab:")

say("Co? Nie przyniosles mi zadnych")

say("Konarow Zelkova?...")

say("")

return

end

 

item.remove()

pc.setqf("drink_drug",1)

end

when 2301.kill or

2302.kill or

2303.kill or

2304.kill or

2305.kill or

2311.kill or

2312.kill or

2313.kill or

2314.kill or

2315.kill begin

local s = number(1, 5)

if s == 1 and pc.count_item(30165)==0 then

pc.give_item2(30165)

end

end

 

 

 

when 20084.chat."Konary Zelkova" with pc.count_item(30165) >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(30165, 1)

pc.setqf("duration",get_time()+0*0*0)------------------22¤p®É

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")< 24 then --25ˇ

local index =pc.getqf("collect_count")+1

pc.setqf("collect_count",index) --¨ú±o¤F¤@+1

say("Biolog Chaegirab:")

say("Oh!! Ten Konar Zelkova jest doskonalej jakosci!")

say("Przynies mi jeszcze".." "..25-pc.getqf("collect_count").. " Konarow Zelkova")

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 Konar Zelkova 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 Konaru!")

say("Wroc pozniej, kiedy juz skoncze!")

say("")

return

end

 

end

end

 

 

state key_item begin

when letter begin

send_letter("Zadanie Specjalne - Konary Zelkova")

 

if pc.count_item(30224)>0 then

local v = find_npc_by_vnum(20084)

if v != 0 then

target.vid("__TARGET__", v, "Analiza Biologa - Konary Zelkova")

end

end

 

end

when button or info begin

if pc.count_item(30224) >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 Konarow Zelkova")

say("Teraz, biolog potrzebuje ostatni")

say("przedmiot, aby zakonczyc swoje badania!")

say_item_vnum(30224)----------°ěĆF»îĄŰ

say("Mozesz go znalezc zabijajac potwory")

say("w zwykłym i czerwonym lesie")

say("")

end

 

 

 

when 2301.kill or

2302.kill or

2303.kill or

2304.kill or

2305.kill or

2311.kill or

2312.kill or

2313.kill or

2314.kill or

2315.kill begin

local s = number(1, 50)

if s == 1 and pc.count_item(30224)==0 then

pc.give_item2(30224)

send_letter("Wroc do biologa!")

end

end

 

 

 

when __TARGET__.target.click or

20084.chat."Znalazlem Kamien Duszy" with pc.count_item(30224) > 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(30224,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("")

wait()

say_title("Wybierz rodzaj bonusu jaki chcesz otrzymać ")

 

local s = select("15% odp. na Wojowników", "15% odp. na Ninje", "15% odp. na Sury", "15% odp. na Szamanów")

if s == 1 then

affect.add_collect(apply.RESIST_WARRIOR, 15, 60*60*24*365*60) --60¦~

say_reward("Otrzymałeś bonus: 15% odp. na Wojowników!")

say_reward("Otrzymałeś bonus: 30% na potwory!")

 

elseif s == 2 then

affect.add_collect(apply.RESIST_NINJA, 15, 60*60*24*365*60) --60¦~

say_reward("Otrzymałeś bonus: 15% odp. na Ninje!")

say_reward("Otrzymałeś bonus: 30% na potwory")

 

elseif s == 3 then

affect.add_collect(apply.RESIST_SURA, 15, 60*60*24*365*60) --60¦~

say_reward("Otrzymałeś bonus: 15% odp. na Sury!")

say_reward("Otrzymałeś bonus: 30% na potwory")

 

elseif s == 4 then

affect.add_collect(apply.RESIST_SHAMAN, 15, 60*60*24*365*60) --60¦~

say_reward("Otrzymałeś bonus: 15% odp. Szamanów!")

say_reward("Otrzymałeś bonus: 30% na potwory")

 

end

 

affect.add_collect_point(ATT_BONUS_TO_MONSTER,30,60*60*24*365*60) --60łâ

 

 

 

clear_letter()

set_quest_state("collect_quest_lv80", "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

 

 

 

 

 

 

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

-- Serwer Rehab

-- Quest Edit by Flexior

-- Analiza Biologa 80lv

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

quest certy begin

state start begin

end

state run begin

when login or levelup with pc.level >= 80 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 - Certyfikaty Tugyisa")

end

send_letter("Analiza Biologa - Certyfikaty Tugyisa")

end

 

when button or info begin

say_title("Analiza Biologa - Certyfikaty Tugyisa")

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 Certyfikaty Tugyisa")

say("Musze przeprowadzic kilka eksperymentow,")

say("dlatego potrzebuje kilku Certyfikatow Tugyisa.")

say("Czy moglbys przyniesc mi 30 Certyfikatow Tugyisa?")

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) -- Ą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 - Certyfikaty Tugyisa")

 

end

when button or info begin

say_title("Znajdz Certyfikaty Tugyisa")

--- l

say("")

say("Biolog Chaegirab, uczen Uriela,")

say("szuka Certyfikaty Tugyisa.")

say("Zawsze przynos mu po jednej, aby mial czas")

say("na ich dokladne przebadanie.")

say("Certyfikatow Tugyisa szukaj na Wezowym Polu!")

say("")

say_item_vnum(30166)

say_reward("Do tej pory zebrales".." "..pc.getqf("collect_count").." Certyfikatow Tugyisa")

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(30166)==0 then

say("Biolog Chaegirab:")

say("Co? Nie przyniosles mi zadnych")

say("Certyfikatow Tugyisa?...")

say("")

return

end

 

item.remove()

pc.setqf("drink_drug",1)

end

 

when 1401.kill or

1402.kill or

1403.kill or

1601.kill or

1602.kill or

1603.kill begin

local s = number(1, 5)

if s == 1 and pc.count_item(30166)==0 then

pc.give_item2(30166, 1)

end

end

 

 

when 20084.chat."Certyfikaty Tugyisa" with pc.count_item(30166) >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(30166, 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")< 29 then --30H¤U

local index =pc.getqf("collect_count")+1

pc.setqf("collect_count",index) -- ¨ú±o¤F¤@+1

say("Biolog Chaegirab:")

say("Oh!! Ten Certyfikat Tugyisa jest doskonalej jakosci!")

say("Przynies mi jeszcze".." "..30-pc.getqf("collect_count").. " Certyfikatow Tugyisa")

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 Certyfikat Tugyisa 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 Certyfikatu!")

say("Wroc pozniej, kiedy juz skoncze!")

say("")

return

end

 

end

end

 

 

state key_item begin

when letter begin

send_letter("Zadanie Specjalne - Certyfikaty Tugyisa")

 

if pc.count_item(30225)>0 then

local v = find_npc_by_vnum(20084)

if v != 0 then

target.vid("__TARGET__", v, "Analiza Biologa - Certyfikaty Tugyisa")

end

end

 

end

when button or info begin

if pc.count_item(30225) >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 30 Certyfikatow!")

say("Teraz, biolog potrzebuje ostatni")

say("przedmiot, aby zakonczyc swoje badania!")

say_item_vnum(30225)

say("Mozesz go znalezc zabijajac potwory")

say("na Wezowym Polu!")

say("")

end

 

 

 

 

when 1401.kill or

1402.kill or

1403.kill or

1601.kill or

1602.kill or

1603.kill begin

local s = number(1, 50)

if s == 1 and pc.count_item(30225)==0 then

pc.give_item2(30225, 1)

send_letter("Wroc do biologa!")

end

end

 

 

when __TARGET__.target.click or

20084.chat."Znalazlem Kamien Duszy" with pc.count_item(30225) > 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(30225,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("")

wait()

say_title("Wybierz rodzaj bonusu jaki chcesz otrzymać ")

 

local s = select("35% na Wojowników", "35% na Ninje", "35% na Sury", "35% na Szamanów")

if s == 1 then

affect.add_collect(apply.POINT_ATTBONUS_WARRIOR, 35, 60*60*24*365*60) --60¦~

say_reward("Otrzymałeś bonus: 35% na Wojowników")

say_reward("Otrzymałeś bonus: +20% wartości Ataku")

 

elseif s == 2 then

affect.add_collect(apply.POINT_ATTBONUS_ASSASSIN, 35, 60*60*24*365*60) --60¦~

say_reward("Otrzymałeś bonus: 35% na Ninje")

say_reward("Otrzymałeś bonus: +20% wartości Ataku")

 

elseif s == 3 then

affect.add_collect(apply.POINT_ATTBONUS_SURA, 35, 60*60*24*365*60) --60¦~

say_reward("Otrzymałeś bonus: 35% na Sury")

say_reward("Otrzymałeś bonus: +20% wartości Ataku")

)

elseif s == 4 then

affect.add_collect(apply.POINT_ATTBONUS_SHAMAN, 35, 60*60*24*365*60) --60¦~

say_reward("Otrzymałeś bonus: 35% na Szamanów")

say_reward("Otrzymałeś bonus: +20% wartości Ataku")

 

end

 

affect.add_collect_point(POINT_ATT_BONUS,20,60*60*24*365*60) --60łâ

 

 

 

clear_letter()

set_state(__complete)

end

 

end

 

 

state __complete begin

end

end

 

 

 

za pomoc lajki