Biolog na 130 lvl

[Usama Su kocken]

Czyszcze dysk wiec wreczam wam questa na jeczmienie ustatowiony jest on na 130 lvl, nie podoba sie to nie komentowac

 

 

 

 

 

quest collect_quest_lv130 begin
    state start begin
    end
    state run begin
         when login or levelup with pc.level >= 130 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łaśnie 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:")
            say("Niebiosa, proszę pomóż mi... ")
            say("Badam wszystkie rodzaje roślin w tym ")
            say("imperium. Jest bardzo dużo rzeczy, ")
            say("które muszą zostać zbadane. 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 Jeczmien.")
            say("Muszę przeprowadzić kilka eksperymentów,")
            say("dlatego potrzebuję kilku egzemplarzy.")
            say("Czy mógłbyś przynieść mi 50 Jeczmieni? ")
            say("Proszę, pomóż mi! Zawsze przynoś mi po jednym,")
            say("abym miał czas na ich dokładne 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("Badania Biologa")
        end
        when button or info begin
            say_title("Jeczmien")
            say("Biolog Chaegirab, uczeń Uriela, obecnie zajmuj")
            say("się studiowaniem zachowania Przywódców")
            say("Potworów. Do swoich badań potrzebuj 50 Jeczmieni")
            say(". Postaraj się je zdobyć i")
            say("pamietaj, aby zanosić je do biologa pojedynczo.")
            say("")
            say_item_vnum(30000)
            say("")
            say_reward("Do tej pory dostarczyłeś: "..pc.getqf("collect_count").." Jeczmieni.")
            say("")
        end
        when 71035.use begin
            if get_time() < pc.getqf("duration") and pc.getqf("drink_drug") < 1 then
                say_reward("Eliskir Poszukiwacza:")
                say("Ten magiczny przedmiot zmniejsza czas")
                say("oddania następnego przedmiotu u biologa,")
                say("po jego użyciu możesz natychmiast")
                say("oddać przedmiot!")
                say("Ponadto daję większą szansę na przyjęcie przedmiotu!")
                say_reward("Czy chcesz użyć Eliksiru?")
                say_reward("Zostanie on usunięty po użyciu.")
                local wy = select("Użyj.", "Nie używaj.")
                if wy == 2 then
                    return
                elseif wy == 1 then
                    pc.setqf("duration", 0)
                    pc.setqf("drink_drug",1)
                    say("Możesz już oddać przedmiot biologowi!")
                    say_reward("Eliksir Poszukiwacza zostaję usunięty!")
                    pc.remove_item(71035, 1)
                end
            else
                say_reward("Eliksir Poszukiwacza:")
                say("Nie możesz użyć przedmiotu, ponieważ ")
                say("biolog już może przyjąć przedmiot.")
                return
            end
        end
        when 20084.chat."Jeczmien" with pc.count_item(30000) > 0 begin
            local roznica = pc.getqf("duration") - get_time()
            local minuty = roznica/60
            local minuty2 = math.floor(minuty)
            if get_time() > pc.getqf("duration") then
                say_title("Biolog Chaegirab:")
                say("Och! Znalazłeś! Jeczmien ")
                say("Poczekaj chwilkę, muszę go sprawdzić...")
                say("")
                pc.remove_item("30000", 1)
                pc.setqf("duration",get_time()+60*60*1)
                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("Biolog Chaegirab:")
                    say_green("Oh!! Ten Jeczmien jest doskonałej jakości!")
                    say("Przynieś mi jeszcze: "..50-pc.getqf("collect_count").. " Jeczmieni.")
                    say("Proszę, spróbuj je znaleźć! ")
                    say("")
                    pc.setqf("drink_drug",0)
                    return
                    end
                    say_title("Biolog Chaegirab:")
                    say("Dostarczyłeś mi 50 Jeczmieni, to wspaniale!")
                    say("Zgaduję, że domyślasz się, czego teraz")
                    say("potrzebuję. Nadal brakuje Kamienia Liderów. Gdy")
                    say("mi go dostarczysz, będę miał już wszystko. Dasz")
                    say("sobie radę z tym zadaniem, prawda? Zdobądź Kamień ")
                    say("Liderów i mi go przynieś. Możesz go zdobyć od tak")
                    say("zwanych bossó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_red("Przykro mi, ale ten Jeczmien jest złej jakości!")
                    say("Proszę, przynieś mi inny!")
                    say("Proszę, pomóż mi!")
                    say("")
                    pc.setqf("drink_drug",0)
                    return
                end
            else
                say_title("Biolog Chaegirab:")
                say("Jeszcze nie skończyłem badać ostatniego jeczmienia !")
                say("Przyjdź do mnie za : "..minuty2.." minut!")
                say("")
            end
        end
    end
    state key_item begin
        when letter begin
            send_letter("Badania Biologa")
            if pc.count_item(30000)>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(30000) >0 then
                say_title("Kamień Liderów")
                say("W końcu udało Ci się zdobyć Kamień. ")
                say("Zanieś go do Biologa Chaegirab. On czeka już na")
                say("Ciebie.")
                say("")
                return
            end
            say_title("Kamień Liderów")
            say("Dostarczyłeś Biologowi 50 Jeczmieni.")
            say("Teraz, Chaegirab potrzebuje Kamień ")
            say("Liderów, który pomoże je zrozumieć. ")
            say("")
            say_item_vnum(30000)
            say("")
            say("Możesz go zdobyć z")
            say("wszystkich bosów.")
            say("")
            say("")
        end
        when 2191.kill or 2091.kill or 1304.kill or 1091.kill or 1093.kill or 691.kill or 2206.kill or 1901.kill begin
            local s = number(1, 50)
            if s == 1 and pc.count_item(30224)==0 then
                pc.give_item2(30224, 1)
                send_letter("Otrzymano Kamień Liderów")
            end
        end
        when __TARGET__.target.click or
            20084.chat."Otrzymano Kamień Liderów" with pc.count_item(30224) > 0 begin
            target.delete("__TARGET__")
            say_title("Biolog Chaegirab:")
            say("Oh! dobra robota! Teraz, w końcu, mogę dokńczyć ")
            say("moje badania. Jako nagrodę, dam Ci tajemniczą ")
            say("recepturę. Zanieśją do Baek-Go, a przyrządzi on")
            say("dla Ciebie specjalną miksturę. Życzę miłego dnia!")
            say("I dziękuję za Twoją pomoc. Sam bym sobie nie")
            say("poradził!")
            say("")
            pc.remove_item(30224,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")
            say("W nagrodę za zebranie Jeczmieni i")
            say("zdobycie Kamienia Liderów, biolog Chaegirab dał ")
            say("Ci sekretną recepturę. Idź teraz do Baek-Go, on")
            say("przygotuje dla Ciebie cudowną miksturę.")
            say("")
        end
        when __TARGET__.target.click or
            20018.chat."Nagroda za Jeczmienie" 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ć?")
            say("To ją otwórz!")
            say("")
            say_reward("Twoja Siła Ataku, przeciwko innym graczom")
            say_reward("została Zwiększona o 10% (bonus stały).")
            say_reward("Nieb. Ebonit. Szkatułka")
            say_reward("")
            affect.add_collect(apply.ATT_GRADE_BONUS, 10, 60*60*24*365*60)
            pc.give_item2(50114)
            clear_letter()
            set_quest_state("seon_pyeong_92", "run")
            set_state(__complete)
        end
    end
    state __giveup__ begin
        when 20084.chat."Poddajesz się? " begin
            say("Biolog Chaegirab:")
            say("Czy jesteś pewień, że chcesz się poddać? ")
            say("Nie bedziesz miał szansy, aby zacząć ")
            say("ponownie.")
        end
    end
    state __complete begin
    end
end
 

 

 

http://wklej.to/NyBQ7
 

[Wojtek]

Chujowizna hehe

[Michas۩]

Bardzo dobra firma!

like... ;]