kill_reward.lua

quest kill_reward begin
    state start begin
        function settings()
            mCount = 5 --mobi de ucis
            mId = 101 --vnum mob
            mName = mob_name(mId)
            return mCount, mId, mName
        end
        when letter begin
            send_letter("Ucide pentru premiu")
        end
        when button or info begin
            kill_reward.settings()
            local bStr = "bonus"
            say_title("Ucide pentru premiu")
            say("Salutare razboinicule!")
            say(string.format("Ca sa primesti un %q trebuie sa omori %d %s",bStr,mCount,mName))
            say("Mult noroc!")
            pc.setqf("state", mCount)
            q.set_counter(string.format("%q ",mName), mCount)
        end
        when kill begin
            kill_reward.settings()
            if npc.get_race() == mId then
                local count = pc.getqf("state") - 1
                if count < mCount then
                    pc.setqf("state", count)
                    q.set_counter(string.format("%q ",mName), count)
                end
                if count == 0 then
                    say_title("Ucide pentru premiu")
                    say(string.format("Felicitari , ai reusit sa omori %d %s.",mCount,mName))
                    say("Te rog sa iti alegi premiul.")
                    wait()
                    premii = {
                        {["v"] = 15, ["c"] = 1, ["n"] = ""}, -- {["v"] = vnum, ["c"] = count(numar de iteme), ["n"] = nume}
                        {["v"] = 16, ["c"] = 1, ["n"] = ""}, -- {In cazul in care ["n"] ramane cu valoarea default ""(string.empty)}
                        {["v"] = 17, ["c"] = 1, ["n"] = ""}, -- {va fi incarcat numele itemului, dupa vnum(ca string)}
                        {["v"] = 18, ["c"] = 1, ["n"] = ""},
                        {["v"] = 19, ["c"] = 1, ["n"] = ""},
                    }
                    p_tab = {}
                    for p in premii do
                        iName = premii[p]["n"]
                        iVnum = premii[p]["v"]
                        if iName == "" then iName = item_name(iVnum) end
                        table.insert(p_tab,iName)
                    end
                    list = select_table(p_tab)
                    pVnum = premii[list]["v"]
                    pCount = premii[list]["c"]
                    pName = item_name(pVnum)
                    pc.give_item2(pVnum, pCount)
                    say_reward(string.format("Ai primit %q x %d[ENTER]",pName,pCount))
                    say_item_vnum(pVnum)
                    clear_letter()
                    q.done()
                    set_state(__COMPLETE__)
                end
            end
        end
    end
    state __COMPLETE__ begin
    end
end