Untitled

quest lvlgorev  begin
        state start begin
        when login with pc.level >= 1 begin
            send_letter ( "1. Görev" )
        end
            when button or info begin
            say_title("1. Görev")
            say("XXX NPC seni ariyor, yardimina ihtiyaci var!")
            say("Cok onemli ve acil oldugunu soyluyor.")
            say("Acele et!")
            say("")
        end
            when 20023.chat."Savaş Metni Görevi" begin -- Görev Npc kodu  -- Örnek Soon npc yazdım
            say("Hey niyahet buradasin!")
            say("Seni ariyordum...")
            say("Neyse meseleye gelelim.")
            say("Senin yardimina ihtiyacim var.")
            say("Savaş Metnini Kesip Kader Kitabini")
            say("Bana Getirmen Gerekiyor")
            say_reward("Hadi git ve Metni oldur.")
            target.delete("__TARGET__")
            set_state(kill)
        end
    end

    state kill begin
        when letter begin
            send_letter("Savaş Metni Görevi")           
        end
        when button or info begin
            say_title("Savaş Metni Görevi")
            say("Soon seni Savaş Metni Oldurup")
            say("Kader Kitabini Ondan Alman Icin")
            say_item("Kader Kitabi", 70101,"")
            say("gorevlendirdi.")
            say("")
            say_reward("Hadi Hemen Savaş Metnini Oldur!")
        end
        when 8003.kill begin -- Metin kodu
            local n = number(1,1)
            if n <= 100 then -- Oran
            pc.give_item2(70101, 1) -- Düşecek görev itemi
            if pc.count_item(70101) == 1 then
                say_title("Savaş Metnini Oldurdun")
                say("Kader Kitabi  sende!")
                say("Geri git ve onu Soon'a ver.")
                say("")
                say_reward("Soon'a geri don!")
                        set_state(gerigelsoon)
                    end
            end
        end
    end
  
    state gerigelsoon begin
        when letter begin
            send_letter("Savaş Metni Görevi")
           
            local v=find_npc_by_vnum(20023)
            if 0==v then
            else
                target.vid("__TARGET1__", v, "Soon")
            end

        end
        when button or info begin
            say_title("Savaş Metni Görevi")
            say("Kader Kitabi sende!")
            say("Geri git ve onu Soon'a ver.")
            say("")
            say_reward("Soon'a geri don!")
        end
        when 20023.chat."Savaş Metni" with pc.count_item(70101)==1 begin
            target.delete("__TARGET1__")
            say_title("Soon")
            say("Ahh bekledigim gibi!")
            say("Kader Kitabi sende o zaman.")
            say("Onu bana ver.")
            say("Analiz edecegim.")
            say("Cok guzel gorunuyor!")
            say("Icindeki Bilgileri Cozmek Icin Sabirsizlaniyorum!")
            say("Odulu gercekten hakettin!")
            say("")
            pc.remove_item( "70101" , 1 ) -- Görev itemi silelim
            wait()
            say_title("Odulunu Sec")
        local odul98 = select ("+9 Kılıç", "100k Exp", "1m Yang") -- Ödüller seçenekleri
            if odul98 == 1 then
                say_title("Sectigin Odul")
                say("+9 Kılıç Sectin")
                pc.give_item2("19", 1) -- ödül
                return
                end
            if odul98 == 2 then
                say_title("Sectigin Odul")
                say("100k exp Seçtin")
                pc.give_exp("1000000", 1) -- ödül
                return
                end
            if odul98 == 3 then
                say_title("Sectigin Odul")
                say("1m Yang Seçtin")
                pc.change_money(100000) -- ödül
                return
                end
                        clear_letter()
                        set_state(__complete)
        end
    end
        state __complete begin
        end
end