[Quest] Biolog badanie parufek

[Harsky]

http://pastebin.com/DTSHvRYp

 

fyklont kłesta:

quest biolog_parufki begin

 state start begin

 when login or levelup with pc.get_level() ==5 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, "Chaegirab")

 end

 send_letter("Analiza Biologa")

 end

 when button or info begin

 say_title("Analiza Biologa")

 say("Biolog Chaegirab, uczeń Uriela,")

 say("właśnie Cię szukał.")

 say("Proszę, idź do niego i zaoferuj")

 say("swoją pomoc.")

 end

 when __TARGET__.target.click or

 20084.chat."Porozmawiaj z Biologiem"begin

 target.delete("__TARGET__")

 say_title("Biolog Chaegirab:")

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

 wait()

 say_title("Biolog Chaegirab:")

 say("Aktualnie badam Parufki.")

 say("Muszę przeprowadzić kilka badań przu użyciu")

 say("Pokrzyw. Dlatego więc potrzebuję 14 Parufek.")

 say("Czy mógłbyś mi je przynieść?")

 say("Proszę, musisz mi pomóc!")

 say("Zawsze przynos mi po jednej,")

 say("abym mógł ją dokłanie przebadać.")

 set_state(go_to_disciple)

 pc.setqf("collect_count",0)

 pc.setqf("drink_drug",0)

 end

 end

 state go_to_disciple begin

 when letter begin

 send_letter("Zadanie specjalne!")

 end

 when button or info begin

 say_title("Zbierz Parufka")

 say("Biolog Chaegirab, uczeń Uriela,")

 say("poszukuje Parufka.")

 say("Zawsze przynoś mu po jednej,")

 say("aby miał czas na przeprowadzenie badań.")

 say("Parufka możesz znaleść u:") 

 ("100, 100")

 say_item("Parufka",300,"")

 say_red("Do tej pory dostarczyłeś "..pc.getqf("collect_count").."Parufka!")

 end

 when 71035.use begin --Quest Potion

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

 say("Przedmiot jest już użyty.")

 return

 end

 if pc.count_item(300)==0 then

 say("Najpierw zbierz Parufki.")

 return

 end

 item.remove()

 pc.setqf("drink_drug",1)

 end

 when 100.kill or 100.kill begin

 if pc.count_item(300)< 14 -pc.getqf("collect_count") then

 pc.give_item2(300, 1)

 end

 end

 when 20084.chat."Parufka"with pc.count_item(300) >0 begin

 say("Biolog Chaegirab:")

 say("O kurwa!! Znalazłeś!")

 say("Pozwól, że rzucę okiem...")

 pc.remove_item(300, 1)

 wait()

 local pass_percent

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

 pass_percent=100

 else

 pass_percent=100

 end

 local s= number(1,100)

 if s<= pass_percent then

 if pc.getqf("collect_count")< 14 then

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

 pc.setqf("collect_count",index)

 say_title("Biolog Chaegirab:")

 say_green("O kurwa!!! Ta Parufka jest doskonałej jakości!")

 say("Potrzebuje jeszcze: "..14-pc.getqf("collect_count").. "sztuk.")

 say("Proszę, spróbuj je znaleść!")

 pc.setqf("drink_drug",0)

 return

 end

 say_title("Biolog Chaegirab:")

 say("W końcu mam wystarczajšcš ilość Parufka. Dobra")

 say("robota! Jako dowód mojej wdzięczności, podaruję ")

 say("ci trochę Yang i wynik moich badań.")

 say_title("Informacja:")

 say_reward("- 12342353523 Doświadczenia")

 say_reward("- 12213214452 Yang")

 say_reward("- Miecz Pełni Księzyca+9")

 say_reward("- 299")

 say_reward("- 299")

 say_reward("- 299")

 say_reward("- 299")

 say_reward("- 299")

 pc.setqf("collect_count",0)

 pc.setqf("drink_drug",0)

 pc.setqf("duration",0)

 clear_letter()

 set_state(__DlaMpc)

 pc.give_exp2(12342353523)

 pc.change_money(12213214452)

 pc.give_item2(299)

 pc.give_item2(299)

 pc.give_item2(299)

 pc.give_item2(299)

 pc.give_item2(299)

 pc.give_item2(299)

 set_quest_state("levelup","run")

 return

 else

 say_title("Biolog Chaegirab:")

 say_red("Bardzo mi przykro, ale ta Parufka już zwiędła.")

 say("Proszę, przynieś mi świeżą.")

 say("")

 pc.setqf("drink_drug",0)

 return

 end

 end

 end

 state __DlaMpc begin

 end

 end

 

 

[watus]

na prawde pro quest, nikt by takiego nie umial napisac ,

link powinien dac ci duzo domyslenia

http://www.mpcforum.pl/topic/957958-generator-questu-biologa/

ale like'a ci dam ze wzgledu twojej ilosci postow

[Harsky]

Dzięki

[marcin9994PL]

zajebiste wykonanie zajebisty pomysł I LIKE IT

p.s

 

jak parufka może być zwiędła?

[SuicideRlz]

Brak input, not approved.

[.nismo]

Są parówki, approved.

 

say("Aktualnie badam Parufki.")
say("Muszę przeprowadzić kilka badań przu użyciu")
say("Pokrzyw. Dlatego więc potrzebuję 14 Parufek.")

Sensowne.

[.Teodor]

zajebiste wykonanie zajebisty pomysł I LIKE IT

p.s

 

jak parufka może być zwiędła?

 

Bez inputów wszystko może się stać. Tak, to one przywracają równowagę w questach... (WTF)

[Rapils]

say("Muszę przeprowadzić kilka badań przu użyciu")

 say("Pokrzyw. Dlatego więc potrzebuję 14 Parufek.")

Bada pokrzywy ale potrzebuje Parufek? :C

 

aw: Dzięki, fajne na Hamachi ;>

[Sheila^^]

Up@

Dziękuje, za błąd zaraz poprawie w moim generatorze, bo nie zauważyłem w generatorze

 

Topick@

Generator mój jest w trakcie testów więc jeszcze nie generuje 100% pro questów.

[.Teodor]

Up@

Dziękuje, za błąd zaraz poprawie w moim generatorze, bo nie zauważyłem w generatorze

 

Topick@

Generator mój jest w trakcie testów więc jeszcze nie generuje 100% pro questów.

 

w MOIM GENERATORZE, MÓJ GENERATOR,

jarasz się?

[Phoenix.]

@Up, też "przykuło to" moją uwagę. Jakby to kurfa co najmniej milion dolców był

@Top

Strasznie sensowny quest, nie ma co

Specjalnie użyteczny ten generator nie będzie, bo

a) jest już takich kilka

b ) po co to komu, jak takie questy są ogólnodostępne i wystarczy zmienić sobie dialog?

[z4z0l]

 

when 100.kill or 100.kill begin

 

say("Parufka możesz znaleść u:")
("100, 100")

 

Jesteś mistrzem.

[Glinka.]

TROLL OFF