-- # --------------------------------------------- #
-- #  Quest By Monkey/IceValue dla Castios. #
-- # --------------------------------------------- #
quest poczatek begin
    state start begin
        when login or levelup with pc.level >= 5 begin
            set_state(poczatek)
        end
    end
    state poczatek begin
        when letter begin
            send_letter("Ruszaj przygodo")
        end
        when button or info begin
            say_title("Twoja przygoda")
            say("")
            say("To, że to czytasz oznacza nowy etap w Twojej przygodzie. ")
            say("Wiele lat temu nasza kraina nie była otoczona murami")
            say("Wszyscy byli połączeni. ")
            say("Morze było czyste, a okolicy nie otaczały zwierzęta" )
            say("Niestety od momentu rozpadu na 3 religię wszystko uległo zmianie. ")
            say("Dzikie zwierzęta zaczęły podchodzic coraz bliżej. ")
            say("Niszczyły nasze plony.. ")
            say("Ah. Te wspomnienia gdy nasze rodziny umierały z głodu. ")
            wait()
            say("Po kilku latach wybudowaliśmy ogromne mury, nasza wioska jako jedna z pierwszych broniła się. ")
            say("Teraz nasi strażnicy, znowu zauważyli ataki zwierząt ")
            say("Niestety nasze mury już nie są takie silne. ")
            say("Musisz nam pomóc abyśmy unikneli powrotu przeszłości. ")
            say("Pamiętaj, że to My przygarneliśmy Cię z doliny. ")
            say("Umarłbyć, a jednak daliśmy Ci szansę ")
            say("Wielu uważa, że to błąd! Pokaz im że się mylą ")
            say("Pomożesz nam? ")
            say("")
            local s=select("Tak" , "Niestety nie")
            if s==1 then
                say_title("Przygoda: ")
                say("")
                say("Wspaniale! ")
                say("Resztę informacji znajdziesz w liście. ")
                say("")
                set_state(zwierzeta)
            else
                say_title("Przygoda: ")
                say("")
                say("Pff... nie to nie. ")
                say("Żegnam. ")
                say("")
                set_state(koniecall)
            end
        end
    end
    state zwierzeta begin
        when letter begin
            send_letter("Uratuj plony")
        end
        when button or info begin
            say_title("Uratuj plony")
            say("Te Zwierzęta niszczą nasze plony! ")
            say("Na co czekasz! ")
            say("Twoim celem jest zabicie 100 "..mob_name(104))
            say("")
            say_reward("Dotychczas zabiłeś:   "..pc.getqf("ile").."")
        end
        when kill with npc.get_race() == 104 begin
               local count = pc.getqf("ile")+1
                   if count < 100 then
                     pc.setqf("ile", count)
                   elseif count == 100 then
                   set_state(zwierzaczki)
                   end
        end
    end
    state zwierzaczki begin
        when letter begin
            send_letter("Pokonałeś Zwierzęta ")
        end
        when button or info begin
            say_title("Pokonałeś Zwierzaki")
            say("")
            say("Oh Od godziny dochodzą nas słuchy ")
            say("Twój  był niesamowity ")
            say("Zyskałeś/aś dobre imię tym uczynkiem" )
            say("Obserwujemy jak dziki wycofują się z naszych plonów ")
            say("Jesteśmy Ci naprawdę wdzięczni ! ")
            say("Zasłużyłeś na odpoczynek. ")
            say("Pamiętaj, że to dopiero początek Twojej przygodzie w niezwykłej krainie Castios ")
            say("Wszyscy dalej patrzą Ci na ręce ")
            say("Trzymaj swoją nagrodę ")
            say("")

            local bungle = {
                {19, 2},
                {50513, 2},
                {70038, 1},
                {71094, 5},
                {291, 1},
            }
            for i = 1, table.getn(bungle) do
                pc.give_item2(bungle[i][1], bungle[i][2])
            end
            set_state(koniecall)
        end
    end
    state koniecall begin
    end
end