Yardım Av görevleri hk

umutcanpolat demiş ki:

Kullandıgım quest:

quest levelup begin
        state run begin
                when letter begin
                        local current = pc.getqf("current")
                        local completed_level = pc.getqf("complete");

                        if current == 0 and
                                pc.get_level() > completed_level and
                                pc.get_level() >  1 and
                                pc.get_level() < 60 then

                                local lev = pc.get_level()
                                pc.setqf("buttonstate", 2)
                                makequestbutton(""..lev.."Göreve Basla")
                                pc.setqf("current", lev)
                                pc.setqf("select", 1)
                                pc.setqf("remain", special.levelup_quest[lev][2])
                                setskin(NOWINDOW)
                        end

                        setstate(start)
                end
        end

        state start begin
                when info begin
                        local lev = pc.getqf("current")
                        if lev == 0 then return end

                        setskin(SCROLL)
                        setbgimage("level_bg.tga")
                        local s = pc.getqf("select")
                        if s == 0 then s = 1 end
                        addimage(20,12,special.levelup_img[special.levelup_quest[lev][s*2-1]])
                        setcolor(0,0,0)

                        say("")
                        say("")
                        say("Öldür",mob_name(special.levelup_quest[lev][s*2-1])," !")
                        say("Hedefi vur:",mob_name(special.levelup_quest[lev][s*2-1]))
                        say("Mevcut hedefler: "..special.levelup_quest[lev][s*2])

                        raw_script("Ödül: ".. special.levelup_quest[lev][5].." % Tecrübe")
                        say("")
                        if lev <= table.getn(special.levelup_reward1) then
                                raw_script(" "..item_name(special.levelup_reward1[lev][pc.job+1]))
                        else
                                raw_script(" ".."Tesadüfen bulunan malzeme")
                                                end

                        raw_script(newline)

                        levelup.show_mob_pos(lev)

                        select("Kabul Et")

                        clearmapsignal()
                        setskin(NOWINDOW)
                end

                when login begin
                        local lev = pc.getqf("current")

                        if lev != 0 then
                                if pc.getqf("remain") <= 0 then
                                        setskin(NOWINDOW)
                                        pc.setqf("buttonstate", 3)
                                        makequestbutton(""..lev.."Görevi Bitir")
                                else
                                        setskin(NOWINDOW)
                                        pc.setqf("buttonstate", 1)
                                        makequestbutton(""..lev.."Görev")
                                end
                        end
                end

                when button begin
                        local lev = pc.getqf("current")

                        if lev == 0 then return end

                        if pc.getqf("buttonstate") == 3 then

                                local s = pc.getqf("select")
                                if s == 0 then s = 1 end

                                say_title(" "..lev.."Görev Tamamlandi")
                                say("")
                                say("Harika, görevi mükemmel sekilde yerine getirdin!")
                                say("")
                                wait()

                                if lev <= 20 then
                                        if lev <= table.getn(special.levelup_reward1) then
                                                pc.give_item("Seviye"..lev.."Malzeme",
                                                special.levelup_reward1[lev][pc.job+1])
                                        else
                                                local v = number(1,100)

                                                if v <= special.levelup_reward3[1][1] then
                                                        pc.give_item("Seviye "..lev.." Malzeme",
                                                        special.levelup_reward3[1][2],special.levelup_reward3[1][3])
                                                elseif v <= special.levelup_reward3[2][1] then
                                                        pc.give_item("Seviye "..lev.." Malzeme",
                                                        special.levelup_reward3[2][2],special.levelup_reward3[2][3])
                                                elseif v <= special.levelup_reward3[3][1] then
                                                        pc.give_item("Seviye "..lev.." Malzeme",
                                                        special.levelup_reward3[3][2],special.levelup_reward3[3][3])
                                                elseif v <= special.levelup_reward3[4][1] then
                                                        pc.give_item("Seviye "..lev.." Malzeme",
                                                        special.levelup_reward3[4][2],special.levelup_reward3[4][3])
                                                else
                                                        pc.give_item("Seviye "..lev.." Malzeme",
                                                        special.levelup_reward3[5][2],special.levelup_reward3[5][3])
                                                end
                                        end

                                        pc.give_exp_perc(100)

                                        if lev == 12 or lev == 14 or lev == 16 or lev == 18 or lev == 20 then
                                                pc.give_item2(50083)
                                                say_reward(item_name(50083) .. " aldin.")
                                        end

                                else

                                        local ll = lev - 20
                                        if lev < 26 then

                                                local n = table.getn(special.levelup_reward_item_21[ll])
                                                local t = special.levelup_reward_item_21[ll][number(1, n)]
                                                say_reward("Ödül: ")
                                                if type(t) == "Tablo" then
                                                        pc.give_item2(t[1], t[2])
                                                        say_reward(item_name(t[1]).." "..t[2].."Parca aldin")
                                                else
                                                        pc.give_item2(t)
                                                        say_reward(item_name(t).." Malzeme aldin.")
                                                end

                                        end
                                        local reward_gold = special.levelup_reward_gold21
                                        local reward_exp = special.levelup_reward_exp21

                                        if lev >= 31 and lev <= 40 then
                                                reward_gold = special.levelup_reward_gold31
                                                reward_exp = special.levelup_reward_exp31
                                        elseif lev >= 41 and lev <= 50 then
                                                reward_gold = special.levelup_reward_gold41
                                                reward_exp = special.levelup_reward_exp41
                                        elseif lev >= 51 and lev <= 60 then
                                                reward_gold = special.levelup_reward_gold51
                                                reward_exp = special.levelup_reward_exp51
                                        end


                                        n = number(0, 99)
                                        local i = 0
                                        for i = 1, table.getn(reward_gold) do
                                                if n < reward_gold[i][2] then
                                                        pc.change_money(reward_gold[i][1])
                                                        say_reward(reward_gold[i][1].." Yang aldin.")
                                                        break
                                                else
                                                        n = n - reward_gold[i][2]
                                                end
                                        end


                                        n = number(0, 99)
                                        i = 0
                                        for i = 1, table.getn(reward_exp) do
                                                if n < reward_exp[i][2] then
                                                        pc.give_exp_perc(100)
                                                        say_reward("Tecrübe degeri "..reward_exp[i][1].." % aldin.")
                                                        break
                                                else
                                                        n = n - reward_exp[i][2]
                                                end
                                        end

                                        say("")

                                end

                                local old_lev = lev

                                lev = lev + 1


                                if lev > 1 and lev < 60 and pc.level >= lev then
                                        pc.setqf("buttonstate", 2)
                                        makequestbutton(" "..lev.." Göreve Basla")
                                        pc.setqf("current", lev)
                                        pc.setqf("select", 1)
                                        pc.setqf("remain",special.levelup_quest[lev][2])
                                        setskin(NOWINDOW)
                                        return
                                else
                                        pc.setqf("complete", old_lev)
                                        pc.setqf("current", 0)
                                        q.done()
                                end

                        elseif pc.getqf("buttonstate") == 2 then

                                local lev = pc.getqf("current")
                                if lev == 0 then
                                        q.done()
                                end

                                say_title("Av Görevi:")
                                say("")
                                say("Bir daki av görevi için")
                                say("bu iki canavardan bir tanesini seçip öldürebilirsin.")

                                say("")
                                local sel = select(
                                mob_name(special.levelup_quest[lev][1]).." "..special.levelup_quest[lev][2].." öldürürsen",
                                mob_name(special.levelup_quest[lev][3]).." "..special.levelup_quest[lev][4].." öldürürsen"
                                )


                                setskin(SCROLL)
                                setbgimage("level_bg.tga")
                                pc.setqf("select", sel)
                                addimage(20, 12, special.levelup_img[special.levelup_quest[lev][sel*2-1]])
                                setcolor(0,0,0)

                                say("")
                                say("")
                                say("Öldür",mob_name(special.levelup_quest[lev][sel*2-1])," !")
                                say("Hedefi öldür :",mob_name(special.levelup_quest[lev][sel*2-1]))
                                say("Kalan hedefler : "..special.levelup_quest[lev][sel*2])

                                raw_script("Ödül:".. special.levelup_quest[lev][5].." % Tecrübe")
                                say("")
                                if lev <= table.getn(special.levelup_reward1) then
                                        raw_script(" "..item_name(special.levelup_reward1[lev][pc.job+1]))
                                else
                                        say("")
                                        raw_script(" ".."Tesadüfen bulunan malzeme")
                                end

                                raw_script(newline)

                                levelup.show_mob_pos(lev)

                                local s = select("Tamam, baslayalim.")

                                if s == 1 then
                                        setskin(NOWINDOW)
                                        pc.setqf("remain",special.levelup_quest[lev][sel*2])
                                        syschat("<Görev> ", mob_name(special.levelup_quest[lev][sel*2-1])," "..special.levelup_quest[lev][sel*2].."Kazanç sayisi")
                                        q.set_title(" "..mob_name(special.levelup_quest[lev][sel*2-1]).." toplam.")
                                        q.set_counter("Kalan-sayi", pc.getqf("remain"))
                                        q.start()
                                end

                                setskin(NOWINDOW)
                                clearmapsignal()

                        elseif pc.getqf("buttonstate") == 1 then

                                local s = pc.getqf("select")
                                if s == 0 then s = 1 end

                                local lev = pc.getqf("current")

                                if lev != 0 then
                                say_title("Av görevi:")
                                say("")
                                say("su anda "..pc.getqf("remain").."tane daha ")
                                say(mob_name(special.levelup_quest[lev][s*2-1]), " öldürürsen,")
                                say("Av görevi tamamlanacak.")
                                say("")
                                local ss = select("Av görevi için bilgi.","Devam.")


                                        if ss == 1 then
                                                setskin(SCROLL)
                                                setbgimage("level_bg.tga")
                                                addimage(20,12,special.levelup_img[special.levelup_quest[lev][s*2-1]])
                                                setcolor(0,0,0)

                                                say("")
                                                say("")
                                                say("Öldür ",mob_name(special.levelup_quest[lev][s*2-1])," !")
                                                say("Hedefi öldür!   :",mob_name(special.levelup_quest[lev][s*2-1]))
                                                say("Kalan hedef : "..special.levelup_quest[lev][s*2])

                                                raw_script("Ödül: ".. special.levelup_quest[lev][5].."% Tecrübe.")
                                                say("")
                                                if lev <= table.getn(special.levelup_reward1) then
                                                        raw_script(" "..item_name(special.levelup_reward1[lev][pc.job+1]))
                                                else
                                                raw_script(" ".." Tesadüfen bulunan malzeme.")
                                                end

                                                raw_script(newline)

                                                q.set_title("Av görevi ", mob_name(special.levelup_quest[lev][s*2-1]), " toplam.")

                                                q.set_counter("Kalan sayi.", pc.getqf("remain"))
                                                q.start()

                                                levelup.show_mob_pos(lev)

                                                select("Tamamla")
                                                setskin(NOWINDOW)
                                                clearmapsignal()

                                        end

                                        setskin(NOWINDOW)
                                        q.set_title(" "..mob_name(special.levelup_quest[lev][s*2-1]).." toplam.")
                                        q.set_counter("Kalan sayi",pc.getqf("remain"))
                                        q.start()
                                end
                        end

                        pc.setqf("buttonstate", -1)
                end

                when levelup begin
                        local lev = pc.getqf("current");

                        if lev == 0 then
                                lev = pc.level


                                if lev < 2 or lev > 60 then return end

                                pc.setqf("buttonstate", 2)
                                makequestbutton(""..lev.."Göreve Basla.")
                                pc.setqf("current", lev)
                                pc.setqf("select", 1)
                                pc.setqf("remain", special.levelup_quest[lev][2])
                                setskin(NOWINDOW)
                        end
                end

                when kill begin
                        local sel = pc.getqf("select")

                        if sel == 0 then
                                sel = 1
                        end

                        local lev = pc.getqf("current")

                        if lev != 0 and npc.race == (special.levelup_quest[lev][sel*2-1]) and pc.getqf("buttonstate") == -1 then
                                local remain = pc.getqf("remain") - 1

                                if remain <= 0 then
                                        pc.setqf("remain", 0)
                                        q.set_counter_value(0)
                                        setskin(NOWINDOW)
                                        makequestbutton(" "..lev.."Görev Tamamlandi.")
                                        pc.setqf("buttonstate", 3)
                                else
                                        pc.setqf("remain", remain)
                                        q.set_counter_value(remain)
                                end
                        end
                end

                function show_mob_pos(lev)
                        map_index = pc.get_map_index()

                        if map_index <= 0 then
                                test_chat("show_mob_pos: map_index("..map_index..") < 0")
                                return
                        end

                        if map_index > table.getn(special.lvq_map) then
                                test_chat("show_mob_pos: map_index("..map_index..") > max("..table.getn(special.lvq_map)..")")
                                return
                        end

                        lev_quest_list = special.lvq_map[map_index]
                        if not lev_quest_list then
                                test_chat("show_mob_pos: special.lvq_map[map_index("..map_index..")] is nil.")
                                return
                        end

                        mob_pos_list = lev_quest_list[lev]
                        if not mob_pos_list then
                                test_chat("show_mob_pos: special.lvq_map[map_index("..map_index..")][lev("..lev..")] is nil.")
                                return
                        end

                        table.foreachi(
            mob_pos_list,
            function (n, mob_pos)
                                test_chat("haritada isaretle("..mob_pos[1]..", "..mob_pos[2]..")")
                                addmapsignal(mob_pos[1]*100, mob_pos[2]*100)
                        end
                        )
                        setmapcenterposition(200, 0)
                end
        end

end

Hepsini görmek için tıklayın...

erto42 demiş ki:

questlib.lua içindeki special.levelup ları kontrol et orada ayarları var exp yang item vesaire

Hepsini görmek için tıklayın...