Vadkutya küldi

quest lv1 begin
    state start begin
        when login or levelup with pc.get_level() >= 1 begin
            set_state(vadaszat)
        end
    end
    state vadaszat begin
        when letter begin
            send_letter("Vadászat1")
        end

        when button or info begin
            say_title("Vadállatok #1")
            say("Üdvözöllek "..pc.get_name().."!")
            say("A Vad kutyák egyre veszélyesebbek!")
            say("Sok veszetséget ők terjesztenek,")
            say("Amióta a metinkövek és a Vörös sárkány,")
            say("megjelent a világunkba.")
            say("Feladatod:")
            say("")
            say("Gyilkolj le: 30 Vad kutyát")
            say("Ha megcsinálod jutalmad nem marad el!")
            say("Szeretnéd a feladatot elkezdeni?")
            local s = select("Igen", "Nem", "feladom")
            if s == 2 then
                say("Kár..")
                clear_letter()
                set_state(aufgeben)
            else
                say("Rendben, indulj!")
                say_reward("Ölj meg 30 db Vad kutyát!")
                say_reward("Ha megölted, jutalomban részesülsz!")
                say_reward("Vigyázz! Ha nem fogadod majd el a jutalmad,")
                say_reward("hiába csináltad meg a küldetést, nem kapod meg!")
                pc.setqf("state1", 0)
                q.set_counter("Vad kutyát", 30)
                set_state(go)
            end
        end
    end
    state go begin
        when letter begin
            send_letter("Vadállatok #1")
        end

        when button or info begin
            say_title("Vadállatok #1")
            say("Státusz:")
            say_reward("Te már "..pc.getqf("state1").." Vad kutyát öltél meg a 30-ból!")
        end

        when 101.kill begin
            local count1 = pc.getqf("state1") + 1
            if count1 <= 30 then
                qc.setqf("state1", count1)
                q.set_counter("Vad kutyát", count1)
            end
            if count1 == 30 then
                set_state(fertig)
            end
        end
    end
    state fertig begin
        when letter begin
            send_letter("Küldetés befejezve")
        end

        when button or info begin
            say_title("Befejezett küldetés!")
            say("Úgy látom végeztél!")
            say("Megérdemled immáron a jutalmad!")
            wait()
            say("Szeretnéd a jutalmad most?")
            local s=select("Természetesen", "Nem", "soha")
            if s== 2 then
                clear_letter()
                set_state(aufgeben)
            else
                say_reward("Titokzatos Smaragd dobozt kaptál 1 darabot.")
                say_reward("2.000.000 Yangot kaptál.")
                pc.give_item2(50133, 1)
                pc.change_gold(2000000)
                clear_letter()
                set_quest_state("lv20", "run")
                set_state(ende)
            end
        end
    end
    state aufgeben begin
    end

    state ende begin
    end
end