quest badania_biologa begin
    state start begin
        function refresh()
            local przedmioty = "23001|23002|23003|23004|23005|23006"
            local etap = pc.getqf("biolog_etap")
            local ilosc = "10|15|20|20|20|20"
            local oddane = pc.getqf("oddane")
            local pozostalo = 50 - pc.getqf("oddane")
            local minutes = math.floor((pc.getqf("czas")-get_time())/60)
            local seconds = (pc.getqf("czas")-get_time())-minutes*60
            local szansa = pc.getqf("szansa")
            local poziom = pc.getqf("poziom")
            if pc.getqf("czas") < get_time() then
                minutes = 0
                seconds = 0
            end
            cmdchat("BiologWczytaj "..przedmioty.." "..etap.." "..ilosc.." "..oddane.." "..pozostalo.." "..minutes.." "..seconds.." "..szansa.." "..poziom)
        end

        when login begin
            timer("petla_automatycznego_odswiezania_1", 1)
            cmdchat("OddajBiolog "..q.getcurrentquestindex())
        end

        when login with pc.get_level() >= 30 begin
            if pc.getqf("biolog_etap") == 0 then
                pc.setqf("biolog_etap", 1)
                pc.setqf("szansa", 100)
                pc.setqf("poziom", 30)
                badania_biologa.refresh()
            else
                badania_biologa.refresh()
            end
        end

        when 28001.use begin
            pc.setqf("czas", 0)
            badania_biologa.refresh()
        end

---- BIOLOG 30 LV.
        when button or info with pc.getqf("biolog_etap") == 1 begin
            if pc.get_level() < 30 then
                syschat(">> Nie posiadasz minimum 30 poziomu aby rozpocząć to badanie!")
                return
            end
            if pc.count_item(23001) < 1 then
                syschat(">> Nie posiadasz przy sobie "..item_name(23001).." - zdobądź go i spróbuj ponownie!")
                return
            end
            if get_time() < pc.getqf("czas") then
                local minutes = math.floor((pc.getqf("czas")-get_time())/60)
                local seconds = (pc.getqf("czas")-get_time())-minutes*60
                syschat(">> Do następnego oddania pozostało: "..minutes.." minut "..seconds.." sekund")
            else
                pc.remove_item(23001, 1)
                pc.setqf("czas", get_time()+60*5)
                local pass_percent = 100
                local s = number(1,100)
                if s <= pass_percent then
                    pc.setqf("oddane", pc.getqf("oddane")+1)
                    syschat(">> Przedmiot do Badania Biologa ("..item_name(23001)..") został przyjęty pomyślnie.")
                    badania_biologa.refresh()
                else
                    syschat(">> Niestety ten przedmiot do Badania Biologa ("..item_name(23001)..") był wadliwy, spróbuj ponownie.")
                    badania_biologa.refresh()
                end
                if pc.getqf("oddane") == 10 then
                    syschat(">> Zebrałeś już wszystkie przedmioty do tego Badania Biologa!")
                    pc.setqf("oddane", 0)
                    pc.setqf("czas", 0)
                    pc.setqf("szansa", 100)
                    pc.setqf("poziom", 40)
                    pc.setqf("biolog_etap", 2)
                    badania_biologa.refresh()
                end
            end
        end




---- BIOLOG 40 LV.
        when button or info with pc.getqf("biolog_etap") == 2 begin
            if pc.get_level() < 40 then
                syschat(">> Nie posiadasz minimum 40 poziomu aby rozpocząć to badanie!")
                return
            end
            if pc.count_item(23002) < 1 then
                syschat(">> Nie posiadasz przy sobie "..item_name(23002).." - zdobądź go i spróbuj ponownie!")
                return
            end
            if get_time() < pc.getqf("czas") then
                local minutes = math.floor((pc.getqf("czas")-get_time())/60)
                local seconds = (pc.getqf("czas")-get_time())-minutes*60
                syschat(">> Do następnego oddania pozostało: "..minutes.." minut "..seconds.." sekund")
            else
                pc.remove_item(23002, 1)
                pc.setqf("czas", get_time()+60*10)
                local pass_percent = 100
                local s = number(1,100)
                if s <= pass_percent then
                    pc.setqf("oddane", pc.getqf("oddane")+1)
                    syschat(">> Przedmiot do Badania Biologa ("..item_name(23002)..") został przyjęty pomyślnie.")
                    badania_biologa.refresh()
                else
                    syschat(">> Niestety ten przedmiot do Badania Biologa ("..item_name(23002)..") był wadliwy, spróbuj ponownie.")
                    badania_biologa.refresh()
                end
                if pc.getqf("oddane") == 15 then
                    syschat(">> Zebrałeś już wszystkie przedmioty do tego Badania Biologa!")
                    pc.setqf("oddane", 0)
                    pc.setqf("czas", 0)
                    pc.setqf("szansa", 100)
                    pc.setqf("poziom", 50)
                    pc.setqf("biolog_etap", 3)
                    badania_biologa.refresh()
                end
            end
        end




---- BIOLOG 50 LV.
        when button or info with pc.getqf("biolog_etap") == 3 begin
            if pc.get_level() < 50 then
                syschat(">> Nie posiadasz minimum 50 poziomu aby rozpocząć to badanie!")
                return
            end
            if pc.count_item(23003) < 1 then
                syschat(">> Nie posiadasz przy sobie "..item_name(23003).." - zdobądź go i spróbuj ponownie!")
                return
            end
            if get_time() < pc.getqf("czas") then
                local minutes = math.floor((pc.getqf("czas")-get_time())/60)
                local seconds = (pc.getqf("czas")-get_time())-minutes*60
                syschat(">> Do następnego oddania pozostało: "..minutes.." minut "..seconds.." sekund")
            else
                pc.remove_item(23003, 1)
                pc.setqf("czas", get_time()+60*20)
                local pass_percent = 100
                local s = number(1,100)
                if s <= pass_percent then
                    pc.setqf("oddane", pc.getqf("oddane")+1)
                    syschat(">> Przedmiot do Badania Biologa ("..item_name(23003)..") został przyjęty pomyślnie.")
                    badania_biologa.refresh()
                else
                    syschat(">> Niestety ten przedmiot do Badania Biologa ("..item_name(23003)..") był wadliwy, spróbuj ponownie.")
                    badania_biologa.refresh()
                end
                if pc.getqf("oddane") == 20 then
                    syschat(">> Zebrałeś już wszystkie przedmioty do tego Badania Biologa!")
                    pc.setqf("oddane", 0)
                    pc.setqf("czas", 0)
                    pc.setqf("szansa", 100)
                    pc.setqf("poziom", 60)
                    pc.setqf("biolog_etap", 4)
                    badania_biologa.refresh()
                end
            end
        end


---- BIOLOG 60 LV.
        when button or info with pc.getqf("biolog_etap") == 4 begin
            if pc.get_level() < 60 then
                syschat(">> Nie posiadasz minimum 60 poziomu aby rozpocząć to badanie!")
                return
            end
            if pc.count_item(23004) < 1 then
                syschat(">> Nie posiadasz przy sobie "..item_name(23004).." - zdobądź go i spróbuj ponownie!")
                return
            end
            if get_time() < pc.getqf("czas") then
                local minutes = math.floor((pc.getqf("czas")-get_time())/60)
                local seconds = (pc.getqf("czas")-get_time())-minutes*60
                syschat(">> Do następnego oddania pozostało: "..minutes.." minut "..seconds.." sekund")
            else
                pc.remove_item(23004, 1)
                pc.setqf("czas", get_time()+60*25)
                local pass_percent = 100
                local s = number(1,100)
                if s <= pass_percent then
                    pc.setqf("oddane", pc.getqf("oddane")+1)
                    syschat(">> Przedmiot do Badania Biologa ("..item_name(23004)..") został przyjęty pomyślnie.")
                    badania_biologa.refresh()
                else
                    syschat(">> Niestety ten przedmiot do Badania Biologa ("..item_name(23004)..") był wadliwy, spróbuj ponownie.")
                    badania_biologa.refresh()
                end
                if pc.getqf("oddane") == 20 then
                    syschat(">> Zebrałeś już wszystkie przedmioty do tego Badania Biologa!")
                    pc.setqf("oddane", 0)
                    pc.setqf("czas", 0)
                    pc.setqf("szansa", 100)
                    pc.setqf("poziom", 70)
                    pc.setqf("biolog_etap", 5)
                    badania_biologa.refresh()
                end
            end
        end


---- BIOLOG 70 LV.
        when button or info with pc.getqf("biolog_etap") == 5 begin
            if pc.get_level() < 70 then
                syschat(">> Nie posiadasz minimum 70 poziomu aby rozpocząć to badanie!")
                return
            end
            if pc.count_item(23005) < 1 then
                syschat(">> Nie posiadasz przy sobie "..item_name(23005).." - zdobądź go i spróbuj ponownie!")
                return
            end
            if get_time() < pc.getqf("czas") then
                local minutes = math.floor((pc.getqf("czas")-get_time())/60)
                local seconds = (pc.getqf("czas")-get_time())-minutes*60
                syschat(">> Do następnego oddania pozostało: "..minutes.." minut "..seconds.." sekund")
            else
                pc.remove_item(23005, 1)
                pc.setqf("czas", get_time()+60*35)
                local pass_percent = 100
                local s = number(1,100)
                if s <= pass_percent then
                    pc.setqf("oddane", pc.getqf("oddane")+1)
                    syschat(">> Przedmiot do Badania Biologa ("..item_name(23005)..") został przyjęty pomyślnie.")
                    badania_biologa.refresh()
                else
                    syschat(">> Niestety ten przedmiot do Badania Biologa ("..item_name(23005)..") był wadliwy, spróbuj ponownie.")
                    badania_biologa.refresh()
                end
                if pc.getqf("oddane") == 20 then
                    syschat(">> Zebrałeś już wszystkie przedmioty do tego Badania Biologa!")
                    pc.setqf("oddane", 0)
                    pc.setqf("czas", 0)
                    pc.setqf("szansa", 100)
                    pc.setqf("poziom", 80)
                    pc.setqf("biolog_etap", 6)
                    badania_biologa.refresh()
                end
            end
        end


---- BIOLOG 80 LV.
        when button or info with pc.getqf("biolog_etap") == 6 begin
            if pc.get_level() < 80 then
                syschat(">> Nie posiadasz minimum 80 poziomu aby rozpocząć to badanie!")
                return
            end
            if pc.count_item(23006) < 1 then
                syschat(">> Nie posiadasz przy sobie "..item_name(23006).." - zdobądź go i spróbuj ponownie!")
                return
            end
            if get_time() < pc.getqf("czas") then
                local minutes = math.floor((pc.getqf("czas")-get_time())/60)
                local seconds = (pc.getqf("czas")-get_time())-minutes*60
                syschat(">> Do następnego oddania pozostało: "..minutes.." minut "..seconds.." sekund")
            else
                pc.remove_item(23006, 1)
                pc.setqf("czas", get_time()+60*50)
                local pass_percent = 100
                local s = number(1,100)
                if s <= pass_percent then
                    pc.setqf("oddane", pc.getqf("oddane")+1)
                    syschat(">> Przedmiot do Badania Biologa ("..item_name(23006)..") został przyjęty pomyślnie.")
                    badania_biologa.refresh()
                else
                    syschat(">> Niestety ten przedmiot do Badania Biologa ("..item_name(23006)..") był wadliwy, spróbuj ponownie.")
                    badania_biologa.refresh()
                end
                if pc.getqf("oddane") == 20 then
                    syschat(">> Zebrałeś już wszystkie przedmioty do tego Badania Biologa!")
                    pc.setqf("oddane", 0)
                    pc.setqf("czas", 0)
                    pc.setqf("szansa", 0)
                    pc.setqf("poziom", 0)
                    pc.setqf("biolog_etap", "koniec")
                    badania_biologa.refresh()
                end
            end
        end

        when petla_automatycznego_odswiezania_1.timer begin
            badania_biologa.refresh()
            timer("petla_automatycznego_odswiezania_2", 1)
        end

        when petla_automatycznego_odswiezania_2.timer begin
            badania_biologa.refresh()
            timer("petla_automatycznego_odswiezania_1", 1)
        end
    end
end