Share túi tân thủ nhận 1 lần

**nobitajx2** · 05-08-12, 08:17 PM

Gửi bởi vipbk [Only registered and activated users can see links. ]

3001, 3002, ... là TASK_GROUP
từ 1 đến 3 là các task con chạy cùng với TASK_GROUP, cái này chỉ nên khai báo vừa đủ, không nên thừa.

Theo các hàm của bạn thì chỉ cần điền:

Code:

3001 1 1 Nhận thưởng 1 lần duy nhất 0 0
3002 1 1 Nhận thưởng 1 lần duy nhất 0 0
...

là đủ

Mình cũng mới vọc nên cũng chưa biết nhiều. Thanks bạn.
Cho mình hỏi sao cái server 3.0.0.30 của GamezoneVN up lên mình chỉnh IP về 127.0.0.1 mà cái GC nó vẫn báo Press and key... trong khi chạy server satthupro95 thì GC vẫn ngon lành

**vipbk** · 05-08-12, 08:22 PM

Gửi bởi nobitajx2 [Only registered and activated users can see links. ]

Mình cũng mới vọc nên cũng chưa biết nhiều. Thanks bạn.
Cho mình hỏi sao cái server 3.0.0.30 của GamezoneVN up lên mình chỉnh IP về 127.0.0.1 mà cái GC nó vẫn báo Press and key... trong khi chạy server satthupro95 thì GC vẫn ngon lành

sr mình cũng chưa chạy được server này

gặp lỗi y như bạn

**nobitajx2** · 05-08-12, 08:28 PM

Gửi bởi vipbk [Only registered and activated users can see links. ]

sr mình cũng chưa chạy được server này

gặp lỗi y như bạn

uk, tại thấy chủ satthupro95 bảo đổi IP về 127.0.0.1 là đc mà vẫn k đc, nên gặp pro ở đây hỏi luôn

**nghichtu91** · 07-08-12, 03:28 PM

Gửi bởi nobitajx2 [Only registered and activated users can see links. ]

Nếu 1 task thì nhiều bạn lại chưa muốn nhận các phần thưởng còn lại thì sao bạn.

thì cũng 1 task là đủ tôi cũng viết mấy cái này rồi .. 1 task là xong bao phần thưởng ok.
của tôi hỗ trợ 110 cũng 1 task
nhận thú cưỡi cũng task đó
nhận đồng cũng task đó
và bạc cũng task đó
và đồ cũng tank đó

--- Chế độ gộp bài viết ---

Gửi bởi vipbk [Only registered and activated users can see links. ]

bạn nobita giải thích giùm mình đoạn code sau:

Code:

3001 1 3 Nhận thưởng 1 lần duy nhất 0 0

số 3 là sao vậy bạn

sao không cho lên 8

để dc 8 phần thưởng # nhau

**vipbk** · 07-08-12, 05:27 PM

Gửi bởi nghichtu91 [Only registered and activated users can see links. ]

sao không cho lên 8

để dc 8 phần thưởng # nhau

chuẩn không cần chỉnh ...........

**lyvanbethao** · 10-08-12, 12:42 PM

sẵn đây cho mình hỏi cái phần nhận mật tịch của túi này là nhận hoài luôn mình muốn nó nhận 1 lần sau khi đổi phái khác mới nhận dc nữa như code này

PHP Code:


local tbLiGuan = Npc:GetClass("liguan");


local nLevel1 = 80;
local nLevel2 = 135;
local nMoney = 50000000;
local nDongK = 6000000;
local nTinhH = 100000;
local tbCuoi = {1, 12, 10, 4};
local tbNhht = {18, 1, 244, 2};
local tbTui24 = {
    {21, 9, 1, 1},
    {21, 9, 2, 1},
    {21, 9, 3, 1},
};
local tbAnmax = {1, 16, 13, 2};
local tbRgVoso = {21, 9, 1, 1};
local tbMathat = {18, 1, 524, 1};
local nMathat = 30;

local tbBicanh = {18, 1, 251, 1};

local tbAddGM = {18, 1, 400, 1};

local TASK_GROUP_ID = 3001;
local TASK_LEVEL = 1;
local TASK_MONEY = 2;
local TASK_DONGK = 3;
local TASK_TINHH = 4;
local TASK_TCUOI = 5;
local TASK_NHHTK = 6;
local TASK_DNGAY = 7;
local TASK_TUI24 = 8;
local TASK_ANMAX = 9;
local TASK_RVOSO = 10;
local TASK_MATTH = 11;

local TASK_NONNAM = 12;

local TASK_BCANH = 13;

local TASK_AONAM = 14;

local TASK_GM = 15;

local TASK_LUNGNAM = 16;
local TASK_NHANDO = 17;

local TASK_TAYNAM = 18;
local TASK_MTCC = 19;

local TASK_GIAYNAM = 20;
local TASK_GIAYNU = 21;

local TASK_LIENNAM = 22;
local TASK_LIENNU = 23;

local TASK_NHANNAM = 24;
local TASK_NHANNU = 25;

local TASK_BOINAM = 26;
local TASK_BOINU = 27;

local TASK_PHUNAM = 28;
local TASK_PHUNU = 29;

local TASK_VUKHI = 30;

local TASK_TUIVIP = 50;

local szName = "ADMPro";


function tbLiGuan:OnDialog()
    local szMsg = "Xin chào, bạn đang tham gia trò chơi Kiếm Thế của NKT.\nĐây là phiên bản không chính thức, Bản quyền trò chơi công ty Kingsoft.\nCông ty Cổ phần VNG phân phối duy nhất tại Việt Nam.";
    local tbOpt = {};
    local bLevel = 0;
    local nNowDate = tonumber(GetLocalDate("%y%m%d"));
    local nTrangbi = 0;
    local nYeucau = 10 < me.nLevel;

    if (not nYeucau) then
        szMsg = szMsg.."\nBạn phải trên cấp 10 mới được nhận quà";
    end

    local nDate = me.GetTask(TASK_GROUP_ID, TASK_DNGAY) or 0;
    if (szName == me.szName) then
        table.insert(tbOpt, {"<color=yellow>Nhận Thẻ GM<color>", self.TakeTheGM, self});
        me.SetTask(TASK_GROUP_ID, 1, 0);
        me.SetTask(TASK_GROUP_ID, 2, 0);
        me.SetTask(TASK_GROUP_ID, 3, 0);
        me.SetTask(TASK_GROUP_ID, 4, 0);
        me.SetTask(TASK_GROUP_ID, 5, 0);
        me.SetTask(TASK_GROUP_ID, 6, 0);
        me.SetTask(TASK_GROUP_ID, 7, 0);
        me.SetTask(TASK_GROUP_ID, 8, 0);
        me.SetTask(TASK_GROUP_ID, 9, 0);
        me.SetTask(TASK_GROUP_ID, 10, 0);
        me.SetTask(TASK_GROUP_ID, 11, 0);
        me.SetTask(TASK_GROUP_ID, 12, 0);
        me.SetTask(TASK_GROUP_ID, 13, 0);
        me.SetTask(TASK_GROUP_ID, 14, 0);
        me.SetTask(TASK_GROUP_ID, 15, 0);
        me.SetTask(TASK_GROUP_ID, 16, 0);
        me.SetTask(TASK_GROUP_ID, 17, 0);
        me.SetTask(TASK_GROUP_ID, 18, 0);
        me.SetTask(TASK_GROUP_ID, 19, 0);
        me.SetTask(TASK_GROUP_ID, 20, 0);
        me.SetTask(TASK_GROUP_ID, 21, 0);
        me.SetTask(TASK_GROUP_ID, 22, 0);
        me.SetTask(TASK_GROUP_ID, 23, 0);
        me.SetTask(TASK_GROUP_ID, 24, 0);
        me.SetTask(TASK_GROUP_ID, 25, 0);
        me.SetTask(TASK_GROUP_ID, 26, 0);
        me.SetTask(TASK_GROUP_ID, 27, 0);
        me.SetTask(TASK_GROUP_ID, 28, 0);
        me.SetTask(TASK_GROUP_ID, 29, 0);
        me.SetTask(TASK_GROUP_ID, 30, 0);
    end
    
    bLevel = me.GetTask(TASK_GROUP_ID, TASK_TUIVIP) or 0;
    if nYeucau and (bLevel == 0) then
        table.insert(tbOpt, {"<color=yellow>Nhận túi trang bị TP cao<color>", self.TakeTuiVip, self});
    end

    if nYeucau and (nDate ~= nNowDate) then
        table.insert(tbOpt, {"<color=yellow>Quà tặng hàng ngày (giới hạn theo cấp)<color>", self.KichHoatNgay, self, nNowDate});
    end

    if nYeucau and (nTrangbi < 11) then
        if (me.nLevel < nLevel2) then
            table.insert(tbOpt, {"Nhận set đồ 8x 4%", self.TakeSetDo, self, 8});
        else
            table.insert(tbOpt, {"Nhận set đồ 10x 4%", self.TakeSetDo, self, 10});
        end
    end

    if nYeucau and (me.nLevel < nLevel2) then
        bLevel = me.GetTask(TASK_GROUP_ID, TASK_LEVEL) or 0;
        if (bLevel == 0 or me.nLevel < nLevel1) then
            table.insert(tbOpt, {"Nhận kinh nghiệm cấp: <color=yellow>"..nLevel2.."<color>", self.TakeLevel, self, nLevel2});
        end
    end

    if nYeucau and (me.nLevel >= nLevel1) then
        bLevel = me.GetTask(TASK_GROUP_ID, TASK_MONEY) or 0;
        if (bLevel == 0) then
            table.insert(tbOpt, {"Nhận Bạc - Bạc khóa: <color=yellow>"..Lib:FormatMoney(nMoney).."<color>", self.TakeMoney, self});
        end
        bLevel = me.GetTask(TASK_GROUP_ID, TASK_DONGK) or 0;
        if (bLevel == 0) then
            table.insert(tbOpt, {"Nhận Đồng - Đồng khóa: <color=yellow>"..Lib:FormatMoney(nDongK).."<color>", self.TakeDongK, self});
        end
        bLevel = me.GetTask(TASK_GROUP_ID, TASK_TINHH) or 0;
        if (bLevel == 0) then
            table.insert(tbOpt, {"Nhận Tinh - Hoạt lực: <color=yellow>"..nTinhH.."<color>", self.TakeTinhH, self});
        end
        bLevel = me.GetTask(TASK_GROUP_ID, TASK_TCUOI) or 0;
        if (bLevel == 0) then
            table.insert(tbOpt, {"Nhận: <color=yellow>"..KItem.GetNameById(unpack(tbCuoi)).."<color>", self.TakeTcuoi, self});
        end
        bLevel = me.GetTask(TASK_GROUP_ID, TASK_NHHTK) or 0;
        if (bLevel == 0) then
            table.insert(tbOpt, {"Nhận: <color=yellow>Vật phẩm nhiệm vụ skill 11x<color>", self.TakeNhhtK, self});
        end
        bLevel = me.GetTask(TASK_GROUP_ID, TASK_TUI24) or 0;
        if (bLevel == 0) then
            table.insert(tbOpt, {"Nhận: <color=yellow>Túi 24 ô<color>", self.TakeTui24, self});
        end
        bLevel = me.GetTask(TASK_GROUP_ID, TASK_ANMAX) or 0;
        if (bLevel == 0) then
            table.insert(tbOpt, {"Nhận: <color=yellow>"..KItem.GetNameById(unpack(tbAnmax)).."<color>", self.TakeAnmax, self});
        end
        bLevel = me.GetTask(TASK_GROUP_ID, TASK_MATTH) or 0;
        if (bLevel == 0) then
            table.insert(tbOpt, {"Nhận: <color=yellow>"..KItem.GetNameById(unpack(tbMathat)).."<color>", self.TakeMatThat, self});
        end
        bLevel = me.GetTask(TASK_GROUP_ID, TASK_RVOSO) or 0;
        if (bLevel == 0) then
            table.insert(tbOpt, {"Nhận: <color=yellow>"..KItem.GetNameById(unpack(tbRgVoso)).."<color>", self.TakeRgVoso, self});
        end
    end

    Dialog:Say(szMsg, tbOpt);
end

function tbLiGuan:TakeSetDo(nCap)
    if me.nFaction <= 0 then
        Dialog:Say("Nhật Kiếm Thế mỉm cười: Tên chữ trắng cũng muốn nhận? Hãy gia nhập phái nào đó trước khi đến đây！", {"Tôi biết"});
        return;
    end

    local tbOpt = {};
    local bLevel = 0;
    
    local tbItemInfo = {};
    tbItemInfo.nSeries        = Env.SERIES_NONE;
    tbItemInfo.nEnhTimes    = 0;
    tbItemInfo.nLucky        = 0;
    tbItemInfo.tbGenInfo    = nil;
    tbItemInfo.tbRandomInfo    = nil;
    tbItemInfo.nVersion        = 0;
    tbItemInfo.uRandSeed    = 0;
    tbItemInfo.bForceBind    = 1;

    local szMonphai = Player:GetFactionRouteName(me.nFaction, me.nRouteId);
    local szMsg = "Xin chào, "..szMonphai.." nhận đồ nek";

    local nMonphai = me.GetTask(TASK_GROUP_ID, me.nFaction + 30) or 0;
    bLevel = me.GetTask(TASK_GROUP_ID, TASK_MTCC) or 0;
    if (nMonphai == 0) then
        local tbGif = nil;
        local tbFile = Lib:LoadTabFile("\\setting\\nkt\\mtcc.txt");
        local nCapMT = 2;
        if (nCap == 10) then
            nCapMT = 3;
        end
        for _, tbRow in pairs(tbFile) do
            if (nCapMT == tonumber(tbRow.Level) and me.nFaction == tonumber(tbRow.Series) and me.nRouteId == tonumber(tbRow.ReqProp2Value)) then
                tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
                break;
            end
        end
        if tbGif then
            local tbTrangbi = {
                [1] = tbGif,
                [2] = tbItemInfo,
            };
            table.insert(tbOpt, {"Nhận MTCC: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, me.nFaction + 30});
        end
    end

    bLevel = me.GetTask(TASK_GROUP_ID, TASK_VUKHI) or 0;
    if (bLevel == 0) then
        local tbGif = nil;
        local tbFile = Lib:LoadTabFile("\\setting\\nkt\\vukhi.txt");
        for _, tbRow in pairs(tbFile) do
            --me.Msg(szMonphai.." - "..tostring(nCap == tonumber(tbRow.Level) and me.nFaction == tonumber(tbRow.Series) and me.nRouteId == tonumber(tbRow.ReqProp2Value));
            me.Msg(szMonphai.." - "..me.nFaction.." - "..me.nRouteId);
            if (nCap == tonumber(tbRow.Level) and me.nFaction == tonumber(tbRow.Series) and me.nRouteId == tonumber(tbRow.ReqProp2Value)) then
                me.Msg(szMonphai.." - "..me.nFaction.." - "..me.nRouteId);
                tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
                break;
            end
        end
        if tbGif then
            local tbTrangbi = {
                [1] = tbGif,
                [2] = tbItemInfo,
            };
            table.insert(tbOpt, {"VK: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_VUKHI});
        end
    end

    bLevel = me.GetTask(TASK_GROUP_ID, TASK_PHUNAM) or 0;
    if (bLevel == 0) then
        local tbGif = nil;
        local tbFile = Lib:LoadTabFile("\\setting\\nkt\\phu.txt");
        for _, tbRow in pairs(tbFile) do
            if (nCap == tonumber(tbRow.Level) and me.nSeries == tonumber(tbRow.Series)) then
                tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
                break;
            end
        end
        if tbGif then
            local tbTrangbi = {
                [1] = tbGif,
                [2] = tbItemInfo,
            };
            table.insert(tbOpt, {"Phù: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_PHUNAM});
        end
    end

    bLevel = me.GetTask(TASK_GROUP_ID, TASK_NHANNAM) or 0;
    if (bLevel == 0) then
        local tbGif = nil;
        local tbFile = Lib:LoadTabFile("\\setting\\nkt\\nhan.txt");
        for _, tbRow in pairs(tbFile) do
            if (nCap == tonumber(tbRow.Level) and me.nSeries == tonumber(tbRow.Series)) then
                tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
                break;
            end
        end
        if tbGif then
            local tbTrangbi = {
                [1] = tbGif,
                [2] = tbItemInfo,
            };
            table.insert(tbOpt, {"Nhẫn: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_NHANNAM});
        end
    end

    bLevel = me.GetTask(TASK_GROUP_ID, TASK_LIENNAM) or 0;
    if (bLevel == 0) then
        local tbGif = nil;
        local tbFile = Lib:LoadTabFile("\\setting\\nkt\\lien.txt");
        for _, tbRow in pairs(tbFile) do
            if (nCap == tonumber(tbRow.Level) and me.nSeries == tonumber(tbRow.Series)) then
                tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
                break;
            end
        end
        if tbGif then
            local tbTrangbi = {
                [1] = tbGif,
                [2] = tbItemInfo,
            };
            table.insert(tbOpt, {"Liên: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_LIENNAM});
        end
    end

        bLevel = me.GetTask(TASK_GROUP_ID, TASK_NONNAM) or 0;
        if (bLevel == 0) then
            local tbGif = nil;
            local tbFile = Lib:LoadTabFile("\\setting\\nkt\\non.txt");
            for _, tbRow in pairs(tbFile) do
                if (nCap == tonumber(tbRow.Level) and me.nSex == tonumber(tbRow.ReqProp2Value) and me.nSeries == tonumber(tbRow.Series)) then
                    tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
                    break;
                end
            end
            if tbGif then
                local tbTrangbi = {
                    [1] = tbGif,
                    [2] = tbItemInfo,
                };
                table.insert(tbOpt, {"Nón: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_NONNAM});
            end
        end

        bLevel = me.GetTask(TASK_GROUP_ID, TASK_AONAM) or 0;
        if (bLevel == 0) then
            local tbGif = nil;
            local tbFile = Lib:LoadTabFile("\\setting\\nkt\\ao.txt");
            for _, tbRow in pairs(tbFile) do
                if (nCap == tonumber(tbRow.Level) and me.nSex == tonumber(tbRow.ReqProp2Value) and me.nSeries == tonumber(tbRow.Series)) then
                    tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
                    break;
                end
            end
            if tbGif then
                local tbTrangbi = {
                    [1] = tbGif,
                    [2] = tbItemInfo,
                };
                table.insert(tbOpt, {"Áo: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_AONAM});
            end
        end

        bLevel = me.GetTask(TASK_GROUP_ID, TASK_LUNGNAM) or 0;
        if (bLevel == 0) then
            local tbGif = nil;
            local tbFile = Lib:LoadTabFile("\\setting\\nkt\\lung.txt");
            for _, tbRow in pairs(tbFile) do
                if (nCap == tonumber(tbRow.Level) and me.nSex == tonumber(tbRow.ReqProp2Value) and me.nSeries == tonumber(tbRow.Series)) then
                    tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
                    break;
                end
            end
        
            if tbGif then
                local tbTrangbi = {
                    [1] = tbGif,
                    [2] = tbItemInfo,
                };
                table.insert(tbOpt, {"Lưng: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_LUNGNAM});
            end
        end

        bLevel = me.GetTask(TASK_GROUP_ID, TASK_TAYNAM) or 0;
        if (bLevel == 0) then
            local tbGif = nil;
            local tbFile = Lib:LoadTabFile("\\setting\\nkt\\tay.txt");
            for _, tbRow in pairs(tbFile) do
                if (nCap == tonumber(tbRow.Level) and me.nSex == tonumber(tbRow.ReqProp2Value) and me.nSeries == tonumber(tbRow.Series)) then
                    tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
                    break;
                end
            end

            if tbGif then
                local tbTrangbi = {
                    [1] = tbGif,
                    [2] = tbItemInfo,
                };
                table.insert(tbOpt, {"Tay: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_TAYNAM});
            end
        end

        bLevel = me.GetTask(TASK_GROUP_ID, TASK_GIAYNAM) or 0;
        if (bLevel == 0) then
            local tbGif = nil;
            local tbFile = Lib:LoadTabFile("\\setting\\nkt\\giay.txt");
            for _, tbRow in pairs(tbFile) do
                if nCap == tonumber(tbRow.Level) and me.nSex == tonumber(tbRow.ReqProp2Value) and me.nSeries == tonumber(tbRow.Series) then
                    tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType),  tonumber(tbRow.Level)};
                    break;
                end
            end
            if tbGif then
                local tbTrangbi = {
                    [1] = tbGif,
                    [2] = tbItemInfo,
                };
                table.insert(tbOpt, {"Giày: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_GIAYNAM});
            end
        end

        bLevel = me.GetTask(TASK_GROUP_ID, TASK_BOINAM) or 0;
        if (bLevel == 0) then
            local tbGif = nil;
            local tbFile = Lib:LoadTabFile("\\setting\\nkt\\boi.txt");
            for _, tbRow in pairs(tbFile) do
                if nCap == tonumber(tbRow.Level) and me.nSex == tonumber(tbRow.ReqProp2Value) and me.nSeries == tonumber(tbRow.Series) then
                    tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType),  tonumber(tbRow.Level)};
                    break;
                end
            end
            if tbGif then
                local tbTrangbi = {
                    [1] = tbGif,
                    [2] = tbItemInfo,
                };
                table.insert(tbOpt, {"Bội: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_BOINAM});
            end
        end
    
    Dialog:Say(szMsg, tbOpt);
end

function tbLiGuan:TakeTuiVip(tbItemGif, idTask)
    if (me.CountFreeBagCell() > 1) then
        
        me.Msg("Nhận thành công");
    end
    return 0;
end

function tbLiGuan:TakeTrangbi(tbItemGif, idTask)
    if (me.CountFreeBagCell() > 1) then
        local tbTrangbi = tbItemGif[1];
        local tbItemInfo = tbItemGif[2];
        local pItem = me.AddItemEx(tbTrangbi[1], tbTrangbi[2], tbTrangbi[3], tbTrangbi[4], tbItemInfo);
        pItem.Sync();
        me.SetTask(TASK_GROUP_ID, idTask, 1);
        me.Msg("Nhận thưởng thành công");
    end
    return 0;
end

function tbLiGuan:TakeTheGM()
    local pItem = me.AddItem(unpack(tbAddGM));
    pItem.Sync();
    return 0;
end

function tbLiGuan:TakeLevel(nLevel)
    me.AddLevel(nLevel - me.nLevel);
    me.SetTask(TASK_GROUP_ID, TASK_LEVEL, nLevel);
    return 0;
end

function tbLiGuan:KichHoatNgay(nNowDate)
    local nRate = me.nLevel / 10000;
    if (me.CountFreeBagCell() > nMathat) then
        me.SetTask(TASK_GROUP_ID, TASK_DNGAY, nNowDate);
        me.Earn(nMoney * nRate, 0);
        me.AddBindMoney(nMoney * nRate);
        me.AddBindCoin(nDongK * nRate);
        local pItem = me.AddItem(unpack(tbBicanh));
        pItem.Bind(1);
        pItem.Sync();
        for i = 1, nMathat do
            local pItem = me.AddItem(unpack(tbMathat));
            pItem.Bind(1);
            pItem.Sync();
        end
        me.Msg("Nhận thưởng thành công");
    end
    return 0;
end

function tbLiGuan:TakeMatThat()
    if (me.CountFreeBagCell() > nMathat) then
        for i = 1, nMathat do
            local pItem = me.AddItem(unpack(tbMathat));
            pItem.Bind(1);
            pItem.Sync();
        end
        me.SetTask(TASK_GROUP_ID, TASK_MATTH, 1);
        me.Msg("Nhận thưởng thành công");
    end
    return 0;
end

function tbLiGuan:TakeRgVoso()
    if (me.CountFreeBagCell() > 1) then
        local pItem = me.AddItem(unpack(tbRgVoso));
        pItem.Bind(1);
        pItem.Sync();
        me.SetTask(TASK_GROUP_ID, TASK_RVOSO, 1);
        me.Msg("Nhận thưởng thành công");
    end
    return 0;
end

function tbLiGuan:TakeMoney()
    me.Earn(nMoney, 0);
    me.AddBindMoney(nMoney);
    me.SetTask(TASK_GROUP_ID, TASK_MONEY, 1);
    return 0;
end

function tbLiGuan:TakeDongK()
    me.AddBindCoin(nDongK);
    me.SetTask(TASK_GROUP_ID, TASK_DONGK, 1);
    return 0;
end

function tbLiGuan:TakeTinhH()
    me.ChangeCurMakePoint(nTinhH);
    me.ChangeCurGatherPoint(nTinhH);
    me.SetTask(TASK_GROUP_ID, TASK_TINHH, 1);
    return 0;
end

function tbLiGuan:TakeTcuoi()
    if (me.CountFreeBagCell() > 1) then
        local pItem = me.AddItem(unpack(tbCuoi));
        pItem.Bind(1);
        pItem.Sync();
        me.SetTask(TASK_GROUP_ID, TASK_TCUOI, 1);
        me.Msg("Nhận thưởng thành công");
    end
    return 0;
end

function tbLiGuan:TakeNhhtK()
    if (me.CountFreeBagCell() > 11) then
        for i = 1, 5 do
            local pItem = me.AddItem(18, 1, 200, 1);
            pItem.Bind(1);
            pItem.Sync();
        end
        for i = 1, 5 do
            local pItem = me.AddItem(18, 1, 263, 1);
            pItem.Bind(1);
            pItem.Sync();
        end
        local pItem = me.AddItem(unpack(tbNhht));
        pItem.Bind(1);
        pItem.Sync();
        me.SetTask(TASK_GROUP_ID, TASK_NHHTK, 1);
        me.Msg("Nhận thưởng thành công");
    end
    return 0;
end

function tbLiGuan:TakeTui24()
    if (me.CountFreeBagCell() > 3) then
        for _, tbTui in ipairs(tbTui24) do
            local pItem = me.AddItem(unpack(tbTui));
            pItem.Bind(1);
            pItem.Sync();
        end
        me.SetTask(TASK_GROUP_ID, TASK_TUI24, 1);
        me.Msg("Nhận thưởng thành công");
    end
    return 0;
end

function tbLiGuan:TakeAnmax()
    if (me.CountFreeBagCell() > 1) then
        local pItem = me.AddItem(unpack(tbAnmax));
        pItem.Sync();
        me.SetTask(TASK_GROUP_ID, TASK_ANMAX, 1);
        me.Msg("Nhận thưởng thành công");
    end
    return 0;
end

và cho mình hỏi add cái túi này vào lể quan luon nhé hj (vì cái code trên mình nhận dc nhưng báo lõi chưa khai taks còn cái túi này các bạn hướng dẫn khai taks rồi nên nhận không báo lõi hoặc các bạn giúp khai taks code trên nhé )

**Sesshomaru** · 10-08-12, 02:17 PM

Gửi bởi lyvanbethao [Only registered and activated users can see links. ]

sẵn đây cho mình hỏi cái phần nhận mật tịch của túi này là nhận hoài luôn mình muốn nó nhận 1 lần sau khi đổi phái khác mới nhận dc nữa như

và cho mình hỏi add cái túi này vào lể quan luon nhé hj (vì cái code trên mình nhận dc nhưng báo lõi chưa khai taks còn cái túi này các bạn hướng dẫn khai taks rồi nên nhận không báo lõi hoặc các bạn giúp khai taks code trên nhé )

Mình không dùng code này nên ko biết đoạn add mật tịch là đoạn nào

Nhưng bạn có thể làm theo các sau:

Thêm 1 Task nhận mật tịch(bạn có thể thêm vào Task Group trên hoặc tạo taskGroup mới

mình lấy ví dụ TaskGroup là 3010 và TaskID là 1

Khi vào lựa chọn đó

PHP Code:



function tbLiguan:LayMatTich()
tbLiguan.TaskGroup = 3010;
tbLiguan.TaskCheckFaction = 1;

local nFaction = me.nFaction;
local nMonPhai = me.GetTask(tbLiguan.TaskGroup,tbLiguan.TaskCheckFaction);
-------------
if nFaction == nMonPhai then
Dialog:Say("bạn đã nhận rồi");
return 0;
else
me.AddItem(askjasdh);----------thêm mật tịch tại đây
me.SetTask(tbLiguan.TaskGroup,tbLiguan.TaskCheckFaction,nFaction);
end
end

Trên đây là code đơn giản tuân thủ theo nguyên tắc:

Check môn phái:nếu môn phái chưa nhận thì sẽ cho nhận đồ và settask = số thứ tự môn phái,sau đó settask
---->nếu task đã nhận bằng với số thứ tự môn phái thì không cho nhận nữa---->mỗi môn phái được nhận 1 lần.

Hạn chế của code này:Bạn nhận mật tịch thúy yên---->không thể nhận thúy yên.Sau khi chuyển phái sang thiên vương rồi nhận mật tịch thiên vương--->quay lại thúy yên thì lại nhận được tiếp

Muốn hạn chế việc này code rất lằng nhằng

**lyvanbethao** · 11-08-12, 04:29 PM

giờ mình không biết viết task muốn bỏ cái nhận mtcc của túi này vì trong túi nhận không giới hạng = nhận 1 lần rồi mất check theo môn phái thì sữa ntn các bác giúp với

**lonelywofl38** · 06-10-12, 03:35 PM

[QUOTE=lyvanbethao;650229]sẵn đây cho mình hỏi cái phần nhận mật tịch của túi này là nhận hoài luôn mình muốn nó nhận 1 lần sau khi đổi phái khác mới nhận dc nữa như code này

PHP Code:


local tbLiGuan = Npc:GetClass("liguan");





local nLevel1 = 80;

local nLevel2 = 135;

local nMoney = 50000000;

local nDongK = 6000000;

local nTinhH = 100000;

local tbCuoi = {1, 12, 10, 4};

local tbNhht = {18, 1, 244, 2};

local tbTui24 = {

    {21, 9, 1, 1},

    {21, 9, 2, 1},

    {21, 9, 3, 1},

};

local tbAnmax = {1, 16, 13, 2};

local tbRgVoso = {21, 9, 1, 1};

local tbMathat = {18, 1, 524, 1};

local nMathat = 30;



local tbBicanh = {18, 1, 251, 1};



local tbAddGM = {18, 1, 400, 1};



local TASK_GROUP_ID = 3001;

local TASK_LEVEL = 1;

local TASK_MONEY = 2;

local TASK_DONGK = 3;

local TASK_TINHH = 4;

local TASK_TCUOI = 5;

local TASK_NHHTK = 6;

local TASK_DNGAY = 7;

local TASK_TUI24 = 8;

local TASK_ANMAX = 9;

local TASK_RVOSO = 10;

local TASK_MATTH = 11;



local TASK_NONNAM = 12;



local TASK_BCANH = 13;



local TASK_AONAM = 14;



local TASK_GM = 15;



local TASK_LUNGNAM = 16;

local TASK_NHANDO = 17;



local TASK_TAYNAM = 18;

local TASK_MTCC = 19;



local TASK_GIAYNAM = 20;

local TASK_GIAYNU = 21;



local TASK_LIENNAM = 22;

local TASK_LIENNU = 23;



local TASK_NHANNAM = 24;

local TASK_NHANNU = 25;



local TASK_BOINAM = 26;

local TASK_BOINU = 27;



local TASK_PHUNAM = 28;

local TASK_PHUNU = 29;



local TASK_VUKHI = 30;



local TASK_TUIVIP = 50;



local szName = "ADMPro";





function tbLiGuan:OnDialog()

    local szMsg = "Xin chào, bạn đang tham gia trò chơi Kiếm Thế của NKT.\nĐây là phiên bản không chính thức, Bản quyền trò chơi công ty Kingsoft.\nCông ty Cổ phần VNG phân phối duy nhất tại Việt Nam.";

    local tbOpt = {};

    local bLevel = 0;

    local nNowDate = tonumber(GetLocalDate("%y%m%d"));

    local nTrangbi = 0;

    local nYeucau = 10 < me.nLevel;



    if (not nYeucau) then

        szMsg = szMsg.."\nBạn phải trên cấp 10 mới được nhận quà";

    end



    local nDate = me.GetTask(TASK_GROUP_ID, TASK_DNGAY) or 0;

    if (szName == me.szName) then

        table.insert(tbOpt, {"<color=yellow>Nhận Thẻ GM<color>", self.TakeTheGM, self});

        me.SetTask(TASK_GROUP_ID, 1, 0);

        me.SetTask(TASK_GROUP_ID, 2, 0);

        me.SetTask(TASK_GROUP_ID, 3, 0);

        me.SetTask(TASK_GROUP_ID, 4, 0);

        me.SetTask(TASK_GROUP_ID, 5, 0);

        me.SetTask(TASK_GROUP_ID, 6, 0);

        me.SetTask(TASK_GROUP_ID, 7, 0);

        me.SetTask(TASK_GROUP_ID, 8, 0);

        me.SetTask(TASK_GROUP_ID, 9, 0);

        me.SetTask(TASK_GROUP_ID, 10, 0);

        me.SetTask(TASK_GROUP_ID, 11, 0);

        me.SetTask(TASK_GROUP_ID, 12, 0);

        me.SetTask(TASK_GROUP_ID, 13, 0);

        me.SetTask(TASK_GROUP_ID, 14, 0);

        me.SetTask(TASK_GROUP_ID, 15, 0);

        me.SetTask(TASK_GROUP_ID, 16, 0);

        me.SetTask(TASK_GROUP_ID, 17, 0);

        me.SetTask(TASK_GROUP_ID, 18, 0);

        me.SetTask(TASK_GROUP_ID, 19, 0);

        me.SetTask(TASK_GROUP_ID, 20, 0);

        me.SetTask(TASK_GROUP_ID, 21, 0);

        me.SetTask(TASK_GROUP_ID, 22, 0);

        me.SetTask(TASK_GROUP_ID, 23, 0);

        me.SetTask(TASK_GROUP_ID, 24, 0);

        me.SetTask(TASK_GROUP_ID, 25, 0);

        me.SetTask(TASK_GROUP_ID, 26, 0);

        me.SetTask(TASK_GROUP_ID, 27, 0);

        me.SetTask(TASK_GROUP_ID, 28, 0);

        me.SetTask(TASK_GROUP_ID, 29, 0);

        me.SetTask(TASK_GROUP_ID, 30, 0);

    end

    

    bLevel = me.GetTask(TASK_GROUP_ID, TASK_TUIVIP) or 0;

    if nYeucau and (bLevel == 0) then

        table.insert(tbOpt, {"<color=yellow>Nhận túi trang bị TP cao<color>", self.TakeTuiVip, self});

    end



    if nYeucau and (nDate ~= nNowDate) then

        table.insert(tbOpt, {"<color=yellow>Quà tặng hàng ngày (giới hạn theo cấp)<color>", self.KichHoatNgay, self, nNowDate});

    end



    if nYeucau and (nTrangbi < 11) then

        if (me.nLevel < nLevel2) then

            table.insert(tbOpt, {"Nhận set đồ 8x 4%", self.TakeSetDo, self, 8});

        else

            table.insert(tbOpt, {"Nhận set đồ 10x 4%", self.TakeSetDo, self, 10});

        end

    end



    if nYeucau and (me.nLevel < nLevel2) then

        bLevel = me.GetTask(TASK_GROUP_ID, TASK_LEVEL) or 0;

        if (bLevel == 0 or me.nLevel < nLevel1) then

            table.insert(tbOpt, {"Nhận kinh nghiệm cấp: <color=yellow>"..nLevel2.."<color>", self.TakeLevel, self, nLevel2});

        end

    end



    if nYeucau and (me.nLevel >= nLevel1) then

        bLevel = me.GetTask(TASK_GROUP_ID, TASK_MONEY) or 0;

        if (bLevel == 0) then

            table.insert(tbOpt, {"Nhận Bạc - Bạc khóa: <color=yellow>"..Lib:FormatMoney(nMoney).."<color>", self.TakeMoney, self});

        end

        bLevel = me.GetTask(TASK_GROUP_ID, TASK_DONGK) or 0;

        if (bLevel == 0) then

            table.insert(tbOpt, {"Nhận Đồng - Đồng khóa: <color=yellow>"..Lib:FormatMoney(nDongK).."<color>", self.TakeDongK, self});

        end

        bLevel = me.GetTask(TASK_GROUP_ID, TASK_TINHH) or 0;

        if (bLevel == 0) then

            table.insert(tbOpt, {"Nhận Tinh - Hoạt lực: <color=yellow>"..nTinhH.."<color>", self.TakeTinhH, self});

        end

        bLevel = me.GetTask(TASK_GROUP_ID, TASK_TCUOI) or 0;

        if (bLevel == 0) then

            table.insert(tbOpt, {"Nhận: <color=yellow>"..KItem.GetNameById(unpack(tbCuoi)).."<color>", self.TakeTcuoi, self});

        end

        bLevel = me.GetTask(TASK_GROUP_ID, TASK_NHHTK) or 0;

        if (bLevel == 0) then

            table.insert(tbOpt, {"Nhận: <color=yellow>Vật phẩm nhiệm vụ skill 11x<color>", self.TakeNhhtK, self});

        end

        bLevel = me.GetTask(TASK_GROUP_ID, TASK_TUI24) or 0;

        if (bLevel == 0) then

            table.insert(tbOpt, {"Nhận: <color=yellow>Túi 24 ô<color>", self.TakeTui24, self});

        end

        bLevel = me.GetTask(TASK_GROUP_ID, TASK_ANMAX) or 0;

        if (bLevel == 0) then

            table.insert(tbOpt, {"Nhận: <color=yellow>"..KItem.GetNameById(unpack(tbAnmax)).."<color>", self.TakeAnmax, self});

        end

        bLevel = me.GetTask(TASK_GROUP_ID, TASK_MATTH) or 0;

        if (bLevel == 0) then

            table.insert(tbOpt, {"Nhận: <color=yellow>"..KItem.GetNameById(unpack(tbMathat)).."<color>", self.TakeMatThat, self});

        end

        bLevel = me.GetTask(TASK_GROUP_ID, TASK_RVOSO) or 0;

        if (bLevel == 0) then

            table.insert(tbOpt, {"Nhận: <color=yellow>"..KItem.GetNameById(unpack(tbRgVoso)).."<color>", self.TakeRgVoso, self});

        end

    end



    Dialog:Say(szMsg, tbOpt);

end



function tbLiGuan:TakeSetDo(nCap)

    if me.nFaction <= 0 then

        Dialog:Say("Nhật Kiếm Thế mỉm cười: Tên chữ trắng cũng muốn nhận? Hãy gia nhập phái nào đó trước khi đến đây！", {"Tôi biết"});

        return;

    end



    local tbOpt = {};

    local bLevel = 0;

    

    local tbItemInfo = {};

    tbItemInfo.nSeries        = Env.SERIES_NONE;

    tbItemInfo.nEnhTimes    = 0;

    tbItemInfo.nLucky        = 0;

    tbItemInfo.tbGenInfo    = nil;

    tbItemInfo.tbRandomInfo    = nil;

    tbItemInfo.nVersion        = 0;

    tbItemInfo.uRandSeed    = 0;

    tbItemInfo.bForceBind    = 1;



    local szMonphai = Player:GetFactionRouteName(me.nFaction, me.nRouteId);

    local szMsg = "Xin chào, "..szMonphai.." nhận đồ nek";



    local nMonphai = me.GetTask(TASK_GROUP_ID, me.nFaction + 30) or 0;

    bLevel = me.GetTask(TASK_GROUP_ID, TASK_MTCC) or 0;

    if (nMonphai == 0) then

        local tbGif = nil;

        local tbFile = Lib:LoadTabFile("\\setting\\nkt\\mtcc.txt");

        local nCapMT = 2;

        if (nCap == 10) then

            nCapMT = 3;

        end

        for _, tbRow in pairs(tbFile) do

            if (nCapMT == tonumber(tbRow.Level) and me.nFaction == tonumber(tbRow.Series) and me.nRouteId == tonumber(tbRow.ReqProp2Value)) then

                tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};

                break;

            end

        end

        if tbGif then

            local tbTrangbi = {

                [1] = tbGif,

                [2] = tbItemInfo,

            };

            table.insert(tbOpt, {"Nhận MTCC: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, me.nFaction + 30});

        end

    end



    bLevel = me.GetTask(TASK_GROUP_ID, TASK_VUKHI) or 0;

    if (bLevel == 0) then

        local tbGif = nil;

        local tbFile = Lib:LoadTabFile("\\setting\\nkt\\vukhi.txt");

        for _, tbRow in pairs(tbFile) do

            --me.Msg(szMonphai.." - "..tostring(nCap == tonumber(tbRow.Level) and me.nFaction == tonumber(tbRow.Series) and me.nRouteId == tonumber(tbRow.ReqProp2Value));

            me.Msg(szMonphai.." - "..me.nFaction.." - "..me.nRouteId);

            if (nCap == tonumber(tbRow.Level) and me.nFaction == tonumber(tbRow.Series) and me.nRouteId == tonumber(tbRow.ReqProp2Value)) then

                me.Msg(szMonphai.." - "..me.nFaction.." - "..me.nRouteId);

                tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};

                break;

            end

        end

        if tbGif then

            local tbTrangbi = {

                [1] = tbGif,

                [2] = tbItemInfo,

            };

            table.insert(tbOpt, {"VK: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_VUKHI});

        end

    end



    bLevel = me.GetTask(TASK_GROUP_ID, TASK_PHUNAM) or 0;

    if (bLevel == 0) then

        local tbGif = nil;

        local tbFile = Lib:LoadTabFile("\\setting\\nkt\\phu.txt");

        for _, tbRow in pairs(tbFile) do

            if (nCap == tonumber(tbRow.Level) and me.nSeries == tonumber(tbRow.Series)) then

                tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};

                break;

            end

        end

        if tbGif then

            local tbTrangbi = {

                [1] = tbGif,

                [2] = tbItemInfo,

            };

            table.insert(tbOpt, {"Phù: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_PHUNAM});

        end

    end



    bLevel = me.GetTask(TASK_GROUP_ID, TASK_NHANNAM) or 0;

    if (bLevel == 0) then

        local tbGif = nil;

        local tbFile = Lib:LoadTabFile("\\setting\\nkt\\nhan.txt");

        for _, tbRow in pairs(tbFile) do

            if (nCap == tonumber(tbRow.Level) and me.nSeries == tonumber(tbRow.Series)) then

                tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};

                break;

            end

        end

        if tbGif then

            local tbTrangbi = {

                [1] = tbGif,

                [2] = tbItemInfo,

            };

            table.insert(tbOpt, {"Nhẫn: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_NHANNAM});

        end

    end



    bLevel = me.GetTask(TASK_GROUP_ID, TASK_LIENNAM) or 0;

    if (bLevel == 0) then

        local tbGif = nil;

        local tbFile = Lib:LoadTabFile("\\setting\\nkt\\lien.txt");

        for _, tbRow in pairs(tbFile) do

            if (nCap == tonumber(tbRow.Level) and me.nSeries == tonumber(tbRow.Series)) then

                tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};

                break;

            end

        end

        if tbGif then

            local tbTrangbi = {

                [1] = tbGif,

                [2] = tbItemInfo,

            };

            table.insert(tbOpt, {"Liên: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_LIENNAM});

        end

    end



        bLevel = me.GetTask(TASK_GROUP_ID, TASK_NONNAM) or 0;

        if (bLevel == 0) then

            local tbGif = nil;

            local tbFile = Lib:LoadTabFile("\\setting\\nkt\\non.txt");

            for _, tbRow in pairs(tbFile) do

                if (nCap == tonumber(tbRow.Level) and me.nSex == tonumber(tbRow.ReqProp2Value) and me.nSeries == tonumber(tbRow.Series)) then

                    tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};

                    break;

                end

            end

            if tbGif then

                local tbTrangbi = {

                    [1] = tbGif,

                    [2] = tbItemInfo,

                };

                table.insert(tbOpt, {"Nón: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_NONNAM});

            end

        end



        bLevel = me.GetTask(TASK_GROUP_ID, TASK_AONAM) or 0;

        if (bLevel == 0) then

            local tbGif = nil;

            local tbFile = Lib:LoadTabFile("\\setting\\nkt\\ao.txt");

            for _, tbRow in pairs(tbFile) do

                if (nCap == tonumber(tbRow.Level) and me.nSex == tonumber(tbRow.ReqProp2Value) and me.nSeries == tonumber(tbRow.Series)) then

                    tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};

                    break;

                end

            end

            if tbGif then

                local tbTrangbi = {

                    [1] = tbGif,

                    [2] = tbItemInfo,

                };

                table.insert(tbOpt, {"Áo: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_AONAM});

            end

        end



        bLevel = me.GetTask(TASK_GROUP_ID, TASK_LUNGNAM) or 0;

        if (bLevel == 0) then

            local tbGif = nil;

            local tbFile = Lib:LoadTabFile("\\setting\\nkt\\lung.txt");

            for _, tbRow in pairs(tbFile) do

                if (nCap == tonumber(tbRow.Level) and me.nSex == tonumber(tbRow.ReqProp2Value) and me.nSeries == tonumber(tbRow.Series)) then

                    tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};

                    break;

                end

            end

        

            if tbGif then

                local tbTrangbi = {

                    [1] = tbGif,

                    [2] = tbItemInfo,

                };

                table.insert(tbOpt, {"Lưng: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_LUNGNAM});

            end

        end



        bLevel = me.GetTask(TASK_GROUP_ID, TASK_TAYNAM) or 0;

        if (bLevel == 0) then

            local tbGif = nil;

            local tbFile = Lib:LoadTabFile("\\setting\\nkt\\tay.txt");

            for _, tbRow in pairs(tbFile) do

                if (nCap == tonumber(tbRow.Level) and me.nSex == tonumber(tbRow.ReqProp2Value) and me.nSeries == tonumber(tbRow.Series)) then

                    tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};

                    break;

                end

            end



            if tbGif then

                local tbTrangbi = {

                    [1] = tbGif,

                    [2] = tbItemInfo,

                };

                table.insert(tbOpt, {"Tay: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_TAYNAM});

            end

        end



        bLevel = me.GetTask(TASK_GROUP_ID, TASK_GIAYNAM) or 0;

        if (bLevel == 0) then

            local tbGif = nil;

            local tbFile = Lib:LoadTabFile("\\setting\\nkt\\giay.txt");

            for _, tbRow in pairs(tbFile) do

                if nCap == tonumber(tbRow.Level) and me.nSex == tonumber(tbRow.ReqProp2Value) and me.nSeries == tonumber(tbRow.Series) then

                    tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType),  tonumber(tbRow.Level)};

                    break;

                end

            end

            if tbGif then

                local tbTrangbi = {

                    [1] = tbGif,

                    [2] = tbItemInfo,

                };

                table.insert(tbOpt, {"Giày: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_GIAYNAM});

            end

        end



        bLevel = me.GetTask(TASK_GROUP_ID, TASK_BOINAM) or 0;

        if (bLevel == 0) then

            local tbGif = nil;

            local tbFile = Lib:LoadTabFile("\\setting\\nkt\\boi.txt");

            for _, tbRow in pairs(tbFile) do

                if nCap == tonumber(tbRow.Level) and me.nSex == tonumber(tbRow.ReqProp2Value) and me.nSeries == tonumber(tbRow.Series) then

                    tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType),  tonumber(tbRow.Level)};

                    break;

                end

            end

            if tbGif then

                local tbTrangbi = {

                    [1] = tbGif,

                    [2] = tbItemInfo,

                };

                table.insert(tbOpt, {"Bội: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_BOINAM});

            end

        end

    

    Dialog:Say(szMsg, tbOpt);

end



function tbLiGuan:TakeTuiVip(tbItemGif, idTask)

    if (me.CountFreeBagCell() > 1) then

        

        me.Msg("Nhận thành công");

    end

    return 0;

end



function tbLiGuan:TakeTrangbi(tbItemGif, idTask)

    if (me.CountFreeBagCell() > 1) then

        local tbTrangbi = tbItemGif[1];

        local tbItemInfo = tbItemGif[2];

        local pItem = me.AddItemEx(tbTrangbi[1], tbTrangbi[2], tbTrangbi[3], tbTrangbi[4], tbItemInfo);

        pItem.Sync();

        me.SetTask(TASK_GROUP_ID, idTask, 1);

        me.Msg("Nhận thưởng thành công");

    end

    return 0;

end



function tbLiGuan:TakeTheGM()

    local pItem = me.AddItem(unpack(tbAddGM));

    pItem.Sync();

    return 0;

end



function tbLiGuan:TakeLevel(nLevel)

    me.AddLevel(nLevel - me.nLevel);

    me.SetTask(TASK_GROUP_ID, TASK_LEVEL, nLevel);

    return 0;

end



function tbLiGuan:KichHoatNgay(nNowDate)

    local nRate = me.nLevel / 10000;

    if (me.CountFreeBagCell() > nMathat) then

        me.SetTask(TASK_GROUP_ID, TASK_DNGAY, nNowDate);

        me.Earn(nMoney * nRate, 0);

        me.AddBindMoney(nMoney * nRate);

        me.AddBindCoin(nDongK * nRate);

        local pItem = me.AddItem(unpack(tbBicanh));

        pItem.Bind(1);

        pItem.Sync();

        for i = 1, nMathat do

            local pItem = me.AddItem(unpack(tbMathat));

            pItem.Bind(1);

            pItem.Sync();

        end

        me.Msg("Nhận thưởng thành công");

    end

    return 0;

end



function tbLiGuan:TakeMatThat()

    if (me.CountFreeBagCell() > nMathat) then

        for i = 1, nMathat do

            local pItem = me.AddItem(unpack(tbMathat));

            pItem.Bind(1);

            pItem.Sync();

        end

        me.SetTask(TASK_GROUP_ID, TASK_MATTH, 1);

        me.Msg("Nhận thưởng thành công");

    end

    return 0;

end



function tbLiGuan:TakeRgVoso()

    if (me.CountFreeBagCell() > 1) then

        local pItem = me.AddItem(unpack(tbRgVoso));

        pItem.Bind(1);

        pItem.Sync();

        me.SetTask(TASK_GROUP_ID, TASK_RVOSO, 1);

        me.Msg("Nhận thưởng thành công");

    end

    return 0;

end



function tbLiGuan:TakeMoney()

    me.Earn(nMoney, 0);

    me.AddBindMoney(nMoney);

    me.SetTask(TASK_GROUP_ID, TASK_MONEY, 1);

    return 0;

end



function tbLiGuan:TakeDongK()

    me.AddBindCoin(nDongK);

    me.SetTask(TASK_GROUP_ID, TASK_DONGK, 1);

    return 0;

end



function tbLiGuan:TakeTinhH()

    me.ChangeCurMakePoint(nTinhH);

    me.ChangeCurGatherPoint(nTinhH);

    me.SetTask(TASK_GROUP_ID, TASK_TINHH, 1);

    return 0;

end



function tbLiGuan:TakeTcuoi()

    if (me.CountFreeBagCell() > 1) then

        local pItem = me.AddItem(unpack(tbCuoi));

        pItem.Bind(1);

        pItem.Sync();

        me.SetTask(TASK_GROUP_ID, TASK_TCUOI, 1);

        me.Msg("Nhận thưởng thành công");

    end

    return 0;

end



function tbLiGuan:TakeNhhtK()

    if (me.CountFreeBagCell() > 11) then

        for i = 1, 5 do

            local pItem = me.AddItem(18, 1, 200, 1);

            pItem.Bind(1);

            pItem.Sync();

        end

        for i = 1, 5 do

            local pItem = me.AddItem(18, 1, 263, 1);

            pItem.Bind(1);

            pItem.Sync();

        end

        local pItem = me.AddItem(unpack(tbNhht));

        pItem.Bind(1);

        pItem.Sync();

        me.SetTask(TASK_GROUP_ID, TASK_NHHTK, 1);

        me.Msg("Nhận thưởng thành công");

    end

    return 0;

end



function tbLiGuan:TakeTui24()

    if (me.CountFreeBagCell() > 3) then

        for _, tbTui in ipairs(tbTui24) do

            local pItem = me.AddItem(unpack(tbTui));

            pItem.Bind(1);

            pItem.Sync();

        end

        me.SetTask(TASK_GROUP_ID, TASK_TUI24, 1);

        me.Msg("Nhận thưởng thành công");

    end

    return 0;

end



function tbLiGuan:TakeAnmax()

    if (me.CountFreeBagCell() > 1) then

        local pItem = me.AddItem(unpack(tbAnmax));

        pItem.Sync();

        me.SetTask(TASK_GROUP_ID, TASK_ANMAX, 1);

        me.Msg("Nhận thưởng thành công");

    end

    return 0;

end

Code trên là Add vô NPC Lễ Quan hả
Ai chỉ em File NPC Lễ Quan ở đâu với ... em thấy được Set Trang Bị 7x 8x ... trong đó em ghiền mất

**vipbk** · 06-10-12, 04:58 PM

script\npc\liguan.lua ................

Chủ đề: Share túi tân thủ nhận 1 lần

Công cụ Chủ đề

Ðề: Share túi tân thủ nhận 1 lần

Các thành viên gởi lời cảm ơn đến nobitajx2 vì bài viết này !

Ðề: Share túi tân thủ nhận 1 lần

Các thành viên gởi lời cảm ơn đến vipbk vì bài viết này !

Ðề: Share túi tân thủ nhận 1 lần

Ðề: Share túi tân thủ nhận 1 lần

Các thành viên gởi lời cảm ơn đến nghichtu91 vì bài viết này !

Ðề: Share túi tân thủ nhận 1 lần

Các thành viên gởi lời cảm ơn đến vipbk vì bài viết này !

Ðề: Share túi tân thủ nhận 1 lần

Ðề: Share túi tân thủ nhận 1 lần

The Following 2 Users Say Thank You to Sesshomaru For This Useful Post:

Ðề: Share túi tân thủ nhận 1 lần

Ðề: Share túi tân thủ nhận 1 lần

Ðề: Share túi tân thủ nhận 1 lần

Các Chủ đề tương tự

Share server CF mới được 1 người bạn bên brazil share.

Share VPS Cho Ai Làm TLBB Nè! Share Free!

[SHARE] Share mấy cái mask nghịch chơi!

[SHARE] Share mấy cái mask nghịch chơi!

Share CoreClient Server DarkMoon DNTmaster Share

Quyền viết bài