quest collect_seon1 begin
    state start begin
        when login or levelup with pc.level >= 1 begin
            set_state( informacje )
        end
    end

    state informacje begin
        when letter begin
            local v = find_npc_by_vnum( 20091 )
            if v != 0 then
                target.vid("__CEL__", v, "Analiza")
            end
            send_letter("Analiza Seona-Peyonga")
        end
        when button or info begin
            say_title("Analiza Seona-Peyonga")
            say("OPIS1_OPIS1_OPIS1_OPIS1")
            say("")
        end
        when __CEL__.target.click or
            20091.chat."Analiza" begin
            target.delete("__CEL__")
            say_title(mob_name(npc.get_race())..":")
            say("OPIS2_OPIS2_OPIS2_OPIS2")
            say("Przynieś mi 25x ...")
            say("Czas oczekiwania: 10 minut.")
            say("")
            pc.setqf("czas", 0)
            pc.setqf("ilosc", 0)
            set_state( secound )
        end
    end

    state secound begin
        when letter begin
            send_letter("Analiza - Przedmioty")
        end
        when button or info begin
            local r = pc.getqf("czas") - get_time()
            local przelicz = r/60
            local min = math.floor(przelicz)
            local j
            if min == 1 then
                j = "minuta."
            elseif (min >= 2 and min <= 4) or (min >= 22 and min <= 24) then
                j = "minuty."
            else
                j = "minut."
            end
            say_title("Analiza - Przedmioty")
            say("OPIS3_OPIS3_OPIS3_OPIS3")
            say("")
            if get_time() < pc.getqf("czas") then
                say_reward("Pozostały czas: "..min.." "..j)
            else
                say_reward("Przedmiot może zostać przebadany.")
            end
            say_reward("Oddane: "..pc.getqf("ilosc").."/25.")
            say("")
        end
        when 20091.chat."Przedmiot" with pc.count_item(ID_PRZEDMIOTU) > 0 begin
            if get_time() > pc.getqf("czas") then
                say_title(mob_name(npc.get_race())..":")
                say("Sprawdźmy..")
                say("")
                pc.remove_item(ID_PRZEDMIOTU, 1)
                pc.setqf("czas", get_time()+time_min_to_sec(10))
                wait()
                if math.random(1, 100) <= 50 then
                    if pc.getqf("ilosc") < 24 then
                        local dd = pc.getqf("ilosc")+1
                        pc.setqf("ilosc", dd)
                        say_title(mob_name(npc.get_race())..":")
                        say("Ten przedmiot jest dobrej jakości.")
                        say_reward("Do tej pory oddałeś: "..pc.getqf("ilosc")..".")
                        say("")
                    else
                        say_title(mob_name(npc.get_race())..":")
                        say("To już ostatni przedmiot.")
                        say("Udało Ci się ukończyć misję.")
                        say("")
                        say_reward("Oto nagroda:")
                        local w = select("+25 Witalność", "+25 Inteligencja", "+25 Siła", +25 Zręczność")
                        if w == 1 then
                            affect.add_collect(apply.CON, 25, 60*60*24*365*100)
                        elseif w == 2 then
                            affect.add_collect(apply.INT, 25, 60*60*24*365*100)
                        elseif w == 3 then
                            affect.add_collect(apply.STR, 25, 60*60*24*365*100)
                        elseif w == 4 then
                            affect.add_collect(apply.DEX, 25, 60*60*24*365*100)
                        end
                        pc.delqf("czas")
                        pc.delqf("ilosc")
                        clear_letter()
                        set_state( koniec )
                    end
                else
                    say_title(mob_name(npc.get_race())..":")
                    say("Ten przedmiot jest złej jakości.")
                    say("")
                end
            else
                local r = pc.getqf("czas") - get_time()
                local przelicz = r/60
                local min = math.floor(przelicz)
                local j
                if min == 1 then
                    j = "minuta."
                elseif (min >= 2 and min <= 4) or (min >= 22 and min <= 24) then
                    j = "minuty."
                else
                    j = "minut."
                end
                say_title(mob_name(npc.get_race())..":")
                say("Nie przebadałem jeszcze poprzedniego przedmiotu.")
                say("")
                say_reward("Pozostało: "..min.." "..j)
                say("")
            end
        end
    end

    state koniec begin
    end
end