quest BadaniaBiologa_XenoX4Fun begin
    state start begin
        when login begin
            cmdchat("BadaniaBiologa "..q.getcurrentquestindex())
            if pc.level >= 30 then
                cmdchat("WczytajBiologa "..pc.getqf("biolog_etap").." "..pc.getqf("biolog_item").." "..pc.getqf("biolog_ilosc"))
            end
        end

        when login or levelup begin
            if pc.level >= 90 then
                if pc.getqf("biolog_etap") == 0 then
                    pc.setqf("biolog_etap", 1)
                    pc.setqf("biolog_item", 30166)
                    pc.setqf("biolog_ilosc", 20)
                end
            -- else
            --  pc.setqf("biolog_etap", 0)
            end
        end

        when button or info begin
            if pc.getqf("biolog_etap") == 0 then
                chat("[Badania Biologa] Nie zacząłeś jeszcze żadnego badania! ")

            elseif pc.getqf("biolog_etap") == 1 then
                if pc.level >= 90 then
                    if pc.count_item(pc.getqf("biolog_item")) >= pc.getqf("biolog_ilosc") then
                        pc.remove_item(pc.getqf("biolog_item"), pc.getqf("biolog_ilosc"))
                        say_title("Gratulacje, ukończyłeś badanie biologa!")
                        say("")
                        say("Jako nagrodę otrzymujesz: ")
                        say("- Wartość Ataku +20")
                        affect.add_collect_point(POINT_ATT_BONUS,20,60*60*24*365*60)
                        pc.setqf("biolog_etap", 2)
                        pc.setqf("biolog_item", 30091)
                        pc.setqf("biolog_ilosc", 40)
                        cmdchat("WczytajBiologa "..pc.getqf("biolog_etap").." "..pc.getqf("biolog_item").." "..pc.getqf("biolog_ilosc"))
                    else
                        chat("[Badania Biologa] Nie masz przy sobie wystarczającej ilości wymaganego przedmiotu!")
                    end
                else
                    chat("[Badania Biologa] Aby rozpocząć to badanie musisz osiągnąć 90 poziom!")
                end

            elseif pc.getqf("biolog_etap") == 2 then
                if pc.level >= 110 then
                    if pc.count_item(pc.getqf("biolog_item")) >= pc.getqf("biolog_ilosc") then
                        pc.remove_item(pc.getqf("biolog_item"), pc.getqf("biolog_ilosc"))
                        say_title("Gratulacje, ukończyłeś badanie biologa!")
                        say("")
                        say("Jako nagrodę otrzymujesz: ")
                        say("- Szybkość Ruchu 60%")
                        say("- Silny Przeciwko Potworom 30%")
                        affect.add_collect_point(POINT_MOV_SPEED,60,60*60*24*365*60)
                        affect.add_collect_point(POINT_ATTBONUS_MONSTER,30,60*60*24*365*60)
                        pc.setqf("biolog_etap", 3)
                        pc.setqf("biolog_item", 30223)
                        pc.setqf("biolog_ilosc", 10)
                        cmdchat("WczytajBiologa "..pc.getqf("biolog_etap").." "..pc.getqf("biolog_item").." "..pc.getqf("biolog_ilosc"))
                    else
                        chat("[Badania Biologa] Nie masz przy sobie wystarczającej ilości wymaganego przedmiotu!")
                    end
                else
                    chat("[Badania Biologa] Aby rozpocząć to badanie musisz osiągnąć 110 poziom!")
                end

            elseif pc.getqf("biolog_etap") == 3 then
                if pc.level >= 150 then
                    if pc.count_item(pc.getqf("biolog_item")) >= pc.getqf("biolog_ilosc") then
                        pc.remove_item(pc.getqf("biolog_item"), pc.getqf("biolog_ilosc"))
                        say_title("Gratulacje, ukończyłeś badanie biologa!")
                        say("")
                        say("Jako nagrodę otrzymujesz: ")
                        say("- Szybkość Ataku +30")
                        affect.add_collect_point(POINT_ATT_SPEED,30,60*60*24*365*60)
                        pc.setqf("biolog_etap", 4)
                        pc.setqf("biolog_item", 18032)
                        pc.setqf("biolog_ilosc", 30)
                        cmdchat("WczytajBiologa "..pc.getqf("biolog_etap").." "..pc.getqf("biolog_item").." "..pc.getqf("biolog_ilosc"))
                    else
                        chat("[Badania Biologa] Nie masz przy sobie wystarczającej ilości wymaganego przedmiotu!")
                    end
                else
                    chat("[Badania Biologa] Aby rozpocząć to badanie musisz osiągnąć 150 poziom!")
                end

            elseif pc.getqf("biolog_etap") == 4 then
                if pc.level >= 180 then
                    if pc.count_item(pc.getqf("biolog_item")) >= pc.getqf("biolog_ilosc") then
                        pc.remove_item(pc.getqf("biolog_item"), pc.getqf("biolog_ilosc"))
                        say_title("Gratulacje, ukończyłeś badanie biologa!")
                        say("")
                        say("Jako nagrodę otrzymujesz: ")
                        say("- +110.000 Max PŻ ")
                        affect.add_collect_point(POINT_MAX_HP,110000,60*60*24*365*60)
                        pc.setqf("biolog_etap", 5)
                        pc.setqf("biolog_item", 18061)
                        pc.setqf("biolog_ilosc", 40)
                        cmdchat("WczytajBiologa "..pc.getqf("biolog_etap").." "..pc.getqf("biolog_item").." "..pc.getqf("biolog_ilosc"))
                    else
                        chat("[Badania Biologa] Nie masz przy sobie wystarczającej ilości wymaganego przedmiotu!")
                    end
                else
                    chat("[Badania Biologa] Aby rozpocząć to badanie musisz osiągnąć 180 poziom!")
                end

            elseif pc.getqf("biolog_etap") == 5 then
                if pc.level >= 200 then
                    if pc.count_item(pc.getqf("biolog_item")) >= pc.getqf("biolog_ilosc") then
                        pc.remove_item(pc.getqf("biolog_item"), pc.getqf("biolog_ilosc"))
                        say_title("Gratulacje, ukończyłeś badanie biologa!")
                        say("")
                        say("Jako nagrodę otrzymujesz: ")
                        say("- Silni Przeciwko Ludziom 30%")
                        affect.add_collect_point(POINT_ATTBONUS_HUMAN,30,60*60*24*365*60)
                        pc.setqf("biolog_etap", 6)
                        pc.setqf("biolog_item", 18080)
                        pc.setqf("biolog_ilosc", 40)
                        cmdchat("WczytajBiologa "..pc.getqf("biolog_etap").." "..pc.getqf("biolog_item").." "..pc.getqf("biolog_ilosc"))
                    else
                        chat("[Badania Biologa] Nie masz przy sobie wystarczającej ilości wymaganego przedmiotu!")
                    end
                else
                    chat("[Badania Biologa] Aby rozpocząć to badanie musisz osiągnąć 200 poziom!")
                end

            elseif pc.getqf("biolog_etap") == 6 then
                if pc.level >= 240 then
                    if pc.count_item(pc.getqf("biolog_item")) >= pc.getqf("biolog_ilosc") then
                        pc.remove_item(pc.getqf("biolog_item"), pc.getqf("biolog_ilosc"))
                        say_title("Gratulacje, ukończyłeś badanie biologa!")
                        say("")
                        say("Jako nagrodę otrzymujesz: ")
                        say("- Silni Przeciwko Potworom 20%")
                        affect.add_collect_point(POINT_ATTBONUS_MONSTER,20,60*60*24*365*60)
                        pc.setqf("biolog_etap", 7)
                        pc.setqf("biolog_item", 18083)
                        pc.setqf("biolog_ilosc", 30)
                        cmdchat("WczytajBiologa "..pc.getqf("biolog_etap").." "..pc.getqf("biolog_item").." "..pc.getqf("biolog_ilosc"))
                    else
                        chat("[Badania Biologa] Nie masz przy sobie wystarczającej ilości wymaganego przedmiotu!")
                    end
                else
                    chat("[Badania Biologa] Aby rozpocząć to badanie musisz osiągnąć 240 poziom!")
                end

            elseif pc.getqf("biolog_etap") == 7 then
                if pc.level >= 250 then
                    if pc.count_item(pc.getqf("biolog_item")) >= pc.getqf("biolog_ilosc") then
                        pc.remove_item(pc.getqf("biolog_item"), pc.getqf("biolog_ilosc"))
                        say_title("Gratulacje, ukończyłeś badanie biologa!")
                        say("")
                        say("Jako nagrodę otrzymujesz: ")
                        say("- 15% Odporność Na Umiejętności")
                        say("- 15% Odporność Na Obrażenia")
                        affect.add_collect_point(POINT_SKILL_DEFEND_BONUS,15,60*60*24*365*60)
                        affect.add_collect_point(POINT_NORMAL_HIT_DEFEND_BONUS,15,60*60*24*365*60)
                        pc.setqf("biolog_etap", 8)
                        pc.setqf("biolog_item", 0)
                        pc.setqf("biolog_ilosc", 0)
                        cmdchat("WczytajBiologa "..pc.getqf("biolog_etap").." "..pc.getqf("biolog_item").." "..pc.getqf("biolog_ilosc"))
                    else
                        chat("[Badania Biologa] Nie masz przy sobie wystarczającej ilości wymaganego przedmiotu!")
                    end
                else
                    chat("[Badania Biologa] Aby rozpocząć to badanie musisz osiągnąć 250 poziom!")
                end
            end
        end
    end
end