[KT] Mọi người ơi giúp em nếu được em xin biếu card 100k
Follow us on
Follow us on Facebook Follow us on Twitter Linked In Flickr Watch us on YouTube My Space Blogger
 
Trang 1 của 11 1 2 3 ... CuốiCuối
Kết quả 1 đến 10 của 102
  1. #1
    Thành Viên lyvanbethao's Avatar
    Ngày tham gia
    Jul 2012
    Bài viết
    582
    Thanks
    215
    Thanked 17 Times in 16 Posts

    Mọi người ơi giúp em nếu được em xin biếu card 100k

    em mỡ server free cho anh em chơi lâu rồi giờ định mỡ server thu phí 1 tháng 30k /nhân vật vì có nhiều người ủng hộ lắm , em sài server share của a3pic còn gs và gc của satthu95 trước khi mở online em đã xóa 5db trong navicat để cho server chạy lại mới hoàn toàn nhưng có 1 bạn hack mà em không hiễu luôn vì em thấy server có bán HTB trên KTC đâu mà 1 ngày đã mã set hoàng kim + vũ khí TL3 rồi em vào acc đó thủ xem thì thấy đồng khóa và đồng max, danh vọng max, mấy cái danh hiệu cả em là ADM chưa có add vào thẻ GM nữa mà acc đó vẫn có em nghi ngờ hack thẻ GM nhưng em kiễm tra hoàn toàn không có thẻ GM ..
    và say đây em kiễm tra lại server cho tất cả anh chị có kinh nghiệm xem :
    **túi tân thủ em xin của anh vipbk nhận từ cấp 1 >>>>>>>>>>99 em test thấy bình thường nhận xong vẫn mất túi
    **nhận thưỡng tại lễ quan em add nhận thẻ GM tại lễ quan luôn người có tên trong file lễ quan mới nhận được thẻ còn không thì ko nhận được em đã test file liquan.lua em dow cua anh tuidangvui.

    PHP Code:
    local tbLiGuan Npc:GetClass("liguan");

    local nLevel1 80;
    local nLevel2 120;
    local nMoney 100000000;
    local nDongK 6000000;
    local nTinhH 100000;
    local tbCuoi = {112334};
    local tbNhht = {1812442};
    local tbTui24 = {
        {
    21911},
        {
    21921},
        {
    21931},
    };
    local tbAnmax = {116132};
    local tbRgVoso = {1813795};
    local tbMathat = {1815241};
    local nMathat 30;

    local tbBicanh = {1812511};

    local tbAddGM = {1814001};

    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 "HoTroKiemThe";                                ----------------------------------DAY LÀ TÊN NHẬN THẺ GM MÀ EM ĐẶT


    function tbLiGuan:OnDialog()
        
    local szMsg "<color=red>Vâng vâng Hảo Hán đang từng bước chinh phục đỉnh cao của võ Lâm Ta chỉ có thể hổ trợ hảo hán những thứ cần thiết sau ta tinh nó có thể giúp ích cho các hạ<color>.";
        
    local tbOpt = {};
        
    local bLevel 0;
        
    local nNowDate tonumber(GetLocalDate("%y%m%d"));
        
    local nTrangbi 0;
        
    local nYeucau me.nLevel;

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

        local nDate 
    me.GetTask(TASK_GROUP_IDTASK_DNGAY) or 0;
        if (
    szName == me.szNamethen
            table
    .insert(tbOpt, {"<color=green>Nhận Thẻ GM<color>"self.TakeTheGMself});
            
    me.SetTask(TASK_GROUP_ID10);
            
    me.SetTask(TASK_GROUP_ID20);
            
    me.SetTask(TASK_GROUP_ID30);
            
    me.SetTask(TASK_GROUP_ID40);
            
    me.SetTask(TASK_GROUP_ID50);
            
    me.SetTask(TASK_GROUP_ID60);
            
    me.SetTask(TASK_GROUP_ID70);
            
    me.SetTask(TASK_GROUP_ID80);
            
    me.SetTask(TASK_GROUP_ID90);
            
    me.SetTask(TASK_GROUP_ID100);
            
    me.SetTask(TASK_GROUP_ID110);
            
    me.SetTask(TASK_GROUP_ID120);
            
    me.SetTask(TASK_GROUP_ID130);
            
    me.SetTask(TASK_GROUP_ID140);
            
    me.SetTask(TASK_GROUP_ID150);
            
    me.SetTask(TASK_GROUP_ID160);
            
    me.SetTask(TASK_GROUP_ID170);
            
    me.SetTask(TASK_GROUP_ID180);
            
    me.SetTask(TASK_GROUP_ID190);
            
    me.SetTask(TASK_GROUP_ID200);
            
    me.SetTask(TASK_GROUP_ID210);
            
    me.SetTask(TASK_GROUP_ID220);
            
    me.SetTask(TASK_GROUP_ID230);
            
    me.SetTask(TASK_GROUP_ID240);
            
    me.SetTask(TASK_GROUP_ID250);
            
    me.SetTask(TASK_GROUP_ID260);
            
    me.SetTask(TASK_GROUP_ID270);
            
    me.SetTask(TASK_GROUP_ID280);
            
    me.SetTask(TASK_GROUP_ID290);
            
    me.SetTask(TASK_GROUP_ID300);
        
    end
        
        bLevel 
    me.GetTask(TASK_GROUP_IDTASK_TUIVIP) or 0;
        -- if 
    nYeucau and (bLevel == 0then
            
    -- table.insert(tbOpt, {"<color=green>Nhận túi trang bị TP cao<color>"self.TakeTuiVipself});
        -- 
    end

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

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

        
    if nYeucau and (me.nLevel nLevel2then
            bLevel 
    me.GetTask(TASK_GROUP_IDTASK_LEVEL) or 0;
            if (
    bLevel == or me.nLevel nLevel1then
                table
    .insert(tbOpt, {"Nhận kinh nghiệm cấp: <color=green>"..nLevel2.."<color>"self.TakeLevelselfnLevel2});
            
    end
        end

        
    if nYeucau and (me.nLevel >= nLevel1then
            bLevel 
    me.GetTask(TASK_GROUP_IDTASK_MONEY) or 0;
            if (
    bLevel == 0then
                table
    .insert(tbOpt, {"Nhận Bạc khóa + Danh Hiệu <color=Yellow>LongMônPhiKiếm:<color> <color=green>"..Lib:FormatMoney(nMoney).."<color>"self.TakeMoneyself});
            
    end
            bLevel 
    me.GetTask(TASK_GROUP_IDTASK_DONGK) or 0;
            if (
    bLevel == 0then
                table
    .insert(tbOpt, {"Nhận Đồng khóa: <color=green>"..Lib:FormatMoney(nDongK).."<color>"self.TakeDongKself});
            
    end
            bLevel 
    me.GetTask(TASK_GROUP_IDTASK_TINHH) or 0;
            if (
    bLevel == 0then
                table
    .insert(tbOpt, {"Nhận Tinh - Hoạt lực: <color=green>"..nTinhH.."<color>"self.TakeTinhHself});
            
    end
            bLevel 
    me.GetTask(TASK_GROUP_IDTASK_TCUOI) or 0;
            if (
    bLevel == 0then
                table
    .insert(tbOpt, {"Nhận: <color=green>"..KItem.GetNameById(unpack(tbCuoi)).."<color>"self.TakeTcuoiself});
            
    end
            bLevel 
    me.GetTask(TASK_GROUP_IDTASK_NHHTK) or 0;
            if (
    bLevel == 0then
                table
    .insert(tbOpt, {"Nhận: <color=green>Vật phẩm nhiệm vụ skill 11x<color>"self.TakeNhhtKself});
            
    end
            bLevel 
    me.GetTask(TASK_GROUP_IDTASK_TUI24) or 0;
            if (
    bLevel == 0then
                table
    .insert(tbOpt, {"Nhận: <color=green>Túi 24 ô<color>"self.TakeTui24self});
            
    end
            bLevel 
    me.GetTask(TASK_GROUP_IDTASK_ANMAX) or 0;
            if (
    bLevel == 0then
                table
    .insert(tbOpt, {"Nhận: <color=green>"..KItem.GetNameById(unpack(tbAnmax)).."<color>"self.TakeAnmaxself});
            
    end
            bLevel 
    me.GetTask(TASK_GROUP_IDTASK_MATTH) or 0;
            if (
    bLevel == 0then
                table
    .insert(tbOpt, {"Nhận: <color=green>"..KItem.GetNameById(unpack(tbMathat)).."<color>"self.TakeMatThatself});
            
    end
            bLevel 
    me.GetTask(TASK_GROUP_IDTASK_RVOSO) or 0;
            if (
    bLevel == 0then
                table
    .insert(tbOpt, {"Nhận: <color=green>"..KItem.GetNameById(unpack(tbRgVoso)).."<color>"self.TakeRgVosoself});
            
    end
        end

        Dialog
    :Say(szMsgtbOpt);
    end

    function tbLiGuan:TakeSetDo(nCap)
        if 
    me.nFaction <= 0 then
            Dialog
    :Say("<color=red>Không Không để nhận trang bị thì hảo hán giai nhập phái trước và cộng diểm môn phái để tôi xem có thể giúp hảo hán được gì nhé!<color>", {"Uk quên mất may mà có ông nhắc nhỡ haha"});
            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.nFactionme.nRouteId);
        
    local szMsg "<color=red>OK rồi đó ,<color> <color=Yellow>"..szMonphai.." <color><color=red>nhận đồ nek<color>";

        
    local nMonphai me.GetTask(TASK_GROUP_IDme.nFaction 30) or 0;
        
    bLevel me.GetTask(TASK_GROUP_IDTASK_MTCC) or 0;
        if (
    nMonphai == 0then
            local tbGif 
    nil;
            
    local tbFile Lib:LoadTabFile("\\setting\\nkt\\mtcc.txt");
            
    local nCapMT 2;
            if (
    nCap == 10then
                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=green>"..KItem.GetNameById(unpack(tbGif)).."<color>"self.TakeTrangbiselftbTrangbime.nFaction 30});
            
    end
        end

        bLevel 
    me.GetTask(TASK_GROUP_IDTASK_VUKHI) or 0;
        if (
    bLevel == 0then
            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=green>"..KItem.GetNameById(unpack(tbGif)).."<color>"self.TakeTrangbiselftbTrangbiTASK_VUKHI});
            
    end
        end

        bLevel 
    me.GetTask(TASK_GROUP_IDTASK_PHUNAM) or 0;
        if (
    bLevel == 0then
            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=green>"..KItem.GetNameById(unpack(tbGif)).."<color>"self.TakeTrangbiselftbTrangbiTASK_PHUNAM});
            
    end
        end

        bLevel 
    me.GetTask(TASK_GROUP_IDTASK_NHANNAM) or 0;
        if (
    bLevel == 0then
            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=green>"..KItem.GetNameById(unpack(tbGif)).."<color>"self.TakeTrangbiselftbTrangbiTASK_NHANNAM});
            
    end
        end

        bLevel 
    me.GetTask(TASK_GROUP_IDTASK_LIENNAM) or 0;
        if (
    bLevel == 0then
            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=green>"..KItem.GetNameById(unpack(tbGif)).."<color>"self.TakeTrangbiselftbTrangbiTASK_LIENNAM});
            
    end
        end

            bLevel 
    me.GetTask(TASK_GROUP_IDTASK_NONNAM) or 0;
            if (
    bLevel == 0then
                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=green>"..KItem.GetNameById(unpack(tbGif)).."<color>"self.TakeTrangbiselftbTrangbiTASK_NONNAM});
                
    end
            end

            bLevel 
    me.GetTask(TASK_GROUP_IDTASK_AONAM) or 0;
            if (
    bLevel == 0then
                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=green>"..KItem.GetNameById(unpack(tbGif)).."<color>"self.TakeTrangbiselftbTrangbiTASK_AONAM});
                
    end
            end

            bLevel 
    me.GetTask(TASK_GROUP_IDTASK_LUNGNAM) or 0;
            if (
    bLevel == 0then
                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=green>"..KItem.GetNameById(unpack(tbGif)).."<color>"self.TakeTrangbiselftbTrangbiTASK_LUNGNAM});
                
    end
            end

            bLevel 
    me.GetTask(TASK_GROUP_IDTASK_TAYNAM) or 0;
            if (
    bLevel == 0then
                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=green>"..KItem.GetNameById(unpack(tbGif)).."<color>"self.TakeTrangbiselftbTrangbiTASK_TAYNAM});
                
    end
            end

            bLevel 
    me.GetTask(TASK_GROUP_IDTASK_GIAYNAM) or 0;
            if (
    bLevel == 0then
                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.Seriesthen
                        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=green>"..KItem.GetNameById(unpack(tbGif)).."<color>"self.TakeTrangbiselftbTrangbiTASK_GIAYNAM});
                
    end
            end

            bLevel 
    me.GetTask(TASK_GROUP_IDTASK_BOINAM) or 0;
            if (
    bLevel == 0then
                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.Seriesthen
                        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=green>"..KItem.GetNameById(unpack(tbGif)).."<color>"self.TakeTrangbiselftbTrangbiTASK_BOINAM});
                
    end
            end
        
        Dialog
    :Say(szMsgtbOpt);
    end

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

    function tbLiGuan:TakeTrangbi(tbItemGifidTask)
        if (
    me.CountFreeBagCell() > 1then
            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_IDidTask1);
            
    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_IDTASK_LEVELnLevel);
        return 
    0;
    end

    function tbLiGuan:KichHoatNgay(nNowDate)
        
    local nRate me.nLevel 10000;
        if (
    me.CountFreeBagCell() > nMathatthen
            me
    .SetTask(TASK_GROUP_IDTASK_DNGAYnNowDate);
            
    me.Earn(nMoney nRate0);
            
    me.AddBindMoney(nMoney nRate);
            
    me.AddBindCoin(nDongK nRate);
            
    local pItem me.AddItem(unpack(tbBicanh));
            
    pItem.Bind(1);
            
    pItem.Sync();
            for 
    1nMathat 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() > nMathatthen
            
    for 1nMathat do
                
    local pItem me.AddItem(unpack(tbMathat));
                
    pItem.Bind(1);
                
    pItem.Sync();
            
    end
            me
    .SetTask(TASK_GROUP_IDTASK_MATTH1);
            
    me.Msg("Nhận thưởng thành công");
        
    end
        
    return 0;
    end

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

    function tbLiGuan:TakeMoney()
        --
    me.Earn(nMoney0);
        
    me.AddBindMoney(nMoney);
        
    me.AddTitle(14,1,2,8);
        
    me.SetTask(TASK_GROUP_IDTASK_MONEY1);
        return 
    0;
    end

    function tbLiGuan:TakeDongK()
        
    me.AddBindCoin(nDongK);
        
    me.SetTask(TASK_GROUP_IDTASK_DONGK1);
        return 
    0;
    end

    function tbLiGuan:TakeTinhH()
        
    me.ChangeCurMakePoint(nTinhH);
        
    me.ChangeCurGatherPoint(nTinhH);
        
    me.SetTask(TASK_GROUP_IDTASK_TINHH1);
        return 
    0;
    end

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

    function tbLiGuan:TakeNhhtK()
        if (
    me.CountFreeBagCell() > 11then
            
    for 1do
                
    local pItem me.AddItem(1812001);
                
    pItem.Bind(1);
                
    pItem.Sync();
            
    end
            
    for 1do
                
    local pItem me.AddItem(1812631);
                
    pItem.Bind(1);
                
    pItem.Sync();
            
    end
            local pItem 
    me.AddItem(unpack(tbNhht));
            
    pItem.Bind(1);
            
    pItem.Sync();
            
    me.SetTask(TASK_GROUP_IDTASK_NHHTK1);
            
    me.Msg("Nhận thưởng thành công");
        
    end
        
    return 0;
    end

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

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


    **em nghỉ tới chuyện hack bằng thẻ cào nhưng max danh vọng max kỹ năng max tiềm năng thì hack bằng thẻ cào ko khả thi
    ** em kiễm tra script /Npc/.. có 2 file .lua em ko hiễu nó cho npc nào mà nội dung của nó thế này :
    file test.lua

    PHP Code:
    --NPC test

    local tbTest 
    Npc:GetClass("test");

    function 
    tbTest:OnDialog()
        
    local szMsg "Ta có thể giúp gì cho ngươi";
        
    local tbOpt = {
        {
    "Thêm đồng khóa" self.AddMoneyself},
        {
    "Thêm Bạc" self.GiveActiveMoneyself},
        {
    "Tinh lực" self.ChangeCurMakePointself},
        {
    "Hoạt Lực" self.ChangeCurGatherPointself},
        {
    "Thêm kinh nghiệm" self.AddExpself},
        {
    "Danh Vọng" self.AddReputeself},
        {
    "Tẩy Tủy Kinh",  self.Taytuyself},
        {
    "Huyền Tinh 5-8",  self.Huyentinh58self},
        {
    "Huyền Tinh 9-10",  self.Huyentinh910self},
        {
    "Huyền Tinh 11-12",  self.Huyentinh1112self},
        {
    "Đồ Hoàng kim 2",  self.Honthachself},
        {
    "Shop Thủy Hoàng vũ khí",  self.ShopThuyhoang2self},
        {
    "Bách Bảo Rương",  self.Baibaoxiangself},
        {
    "Danh Vọng Lãnh Thổ",  self.Danhvonglanhthoself},
        {
    "Quan Hàm",  self.Quanhamself},
        {
    "Phi Phong và đồ Bạch Kim",  self.Bachkimself},
        {
    "Đồ Hoàng Kim",  self.Hoangkimself},
        {
    "Vũ Khí Tần Lăng",  self.Vukhiself},
        {
    "Nhiệm vụ 110",  self.Chucphucself},
        {
    "Để xem sau"},
        };
        
    Dialog:Say(szMsgtbOpt);
        
    end
        
        
        
    function tbTest:Quanham()
    me.OpenShop(1521);
    end
    function tbTest:Danhvonglanhtho()
    me.OpenShop(1471);
    end
    function tbTest:Chucphuc()
    me.AddItem(18,1,200,1);
    me.AddItem(18,1,201,1);
    me.AddItem(18,1,202,1);
    me.AddItem(18,1,203,1);
    me.AddItem(18,1,204,1);
    me.AddItem(18,1,263,1);
    me.AddItem(18,1,264,1);
    me.AddItem(18,1,265,1);
    me.AddItem(18,1,266,1);
    me.AddItem(18,1,267,1);
    me.AddItem(18,1,377,1);
    me.AddItem(18,1,565,1);
    end
    function tbTest:Baibaoxiang()
        
    me.CallClientScript({"UiManager:OpenWindow""UI_BAIBAOXIANG"});
        
    me.AddItem(18,1,338,1);
        
    me.AddItem(18,1,325,1,10);
    end
    function tbTest:ShopThuyhoang2()
    me.OpenShop(1591);
    end
    function tbTest:Vukhi()
    me.AddItem(2,1,1245,10);
    me.AddItem(2,1,1246,10);
    me.AddItem(2,1,1247,10);
    me.AddItem(2,1,1248,10);
    me.AddItem(2,1,1249,10);
    me.AddItem(2,1,1250,10);
    me.AddItem(2,1,1251,10);
    me.AddItem(2,1,1252,10);
    me.AddItem(2,1,1253,10);
    me.AddItem(2,1,1254,10);
    me.AddItem(2,1,1275,10);
    me.AddItem(2,1,1276,10);
    me.AddItem(2,1,1277,10);
    me.AddItem(2,1,1278,10);
    me.AddItem(2,1,1315,10);
    me.AddItem(2,1,1316,10);
    me.AddItem(2,1,1317,10);
    me.AddItem(2,1,1318,10);
    me.AddItem(2,1,1319,10);
    me.AddItem(2,1,1320,10);
    me.AddItem(2,1,1321,10);
    me.AddItem(2,1,1322,10);
    me.AddItem(2,1,1323,10);
    me.AddItem(2,1,1245,10);
    me.AddItem(2,1,1345,10);
    me.AddItem(2,1,1346,10);
    me.AddItem(2,1,1347,10);
    me.AddItem(2,1,1348,10);

    end
    function tbTest:Bachkim()
    me.AddItem(1,17,13,10);
    me.AddItem(1,17,8,10);
    me.AddItem(1,17,20006,10);
            
    me.AddItem(1,17,7,10);
            
    me.AddItem(4,3,161,10);
            
    me.AddItem(1,18,4,8);
            
    me.AddItem(4,9,493,10);
            
    me.AddItem(18,2,4,1);
            
    me.AddItem(18,2,4,2);
            
    me.AddItem(18,2,4,3);
                    
    me.AddItem(2,1,1248,10);
                            
    me.AddItem(2,1,1254,10);
                            
    me.AddItem(2,1,1275,10);
                            
    me.AddItem(2,1,1277,10);
                            
    me.AddItem(2,7,509,10);
                            
    me.AddItem(2,4,264,10);
                            
    me.AddItem(4,3,20124,10);
                            
    me.AddItem(4,4,450,10);
                            
    me.AddItem(4,4,451,10);
                            
    me.AddItem(4,7,37,10);
                            
    me.AddItem(4,7,20061,10);
                            
    me.AddItem(4,5,453,10);
                            
    me.AddItem(4,5,454,10);
                            
    me.AddItem(4,5,20081,10);
                            
    me.AddItem(4,5,20082,10);
                            
    me.AddItem(4,7,20147,10);
                            
    end
    function tbTest:Hoangkim()
    me.AddItem(2,6,260,10);
    me.AddItem(2,8,669,10);
    me.AddItem(4,6,20003,10);
    me.AddItem(4,6,110,10);
    me.AddItem(4,3,161,10);
    me.AddItem(4,8,413,10);
    me.AddItem(4,6,464,10);
    me.AddItem(4,8,471,10);
    me.AddItem(4,8,491,10);
    me.AddItem(4,8,531,10);
    me.AddItem(4,6,551,10);
    me.AddItem(4,9,493,10);
    me.AddItem(4,10,20037,10);
    me.AddItem(4,10,20039,10);
    me.AddItem(4,3,236,10);
    me.AddItem(4,3,20048,10);
    me.AddItem(4,4,460,10);


    end
    function tbTest:Taytuy()
    me.AddItem(1,12,24,4);
    me.AddItem(1,12,12,4);
    me.AddItem(1,12,33,4);
    me.AddItem(21,9,1,1);
    me.AddItem(21,9,2,1);
    me.AddItem(21,9,3,1);
            
    me.AddItem(18,1,191,1);
            
    me.AddItem(18,1,191,1);
            
    me.AddItem(18,1,191,1);
            
    me.AddItem(18,1,191,1);
            
    me.AddItem(18,1,191,1);
            
    me.AddItem(18,1,191,2);
            
    me.AddItem(18,1,191,2);
            
    me.AddItem(18,1,191,2);
            
    me.AddItem(18,1,191,2);
            
    me.AddItem(18,1,191,2);
                    
    me.AddItem(18,1,192,1);
            
    me.AddItem(18,1,192,1);
            
    me.AddItem(18,1,192,1);
            
    me.AddItem(18,1,192,1);
            
    me.AddItem(18,1,192,1);
            
    me.AddItem(18,1,192,2);
            
    me.AddItem(18,1,192,2);
            
    me.AddItem(18,1,192,2);
            
    me.AddItem(18,1,192,2);
            
    me.AddItem(18,1,192,2);
            
    me.AddItem(18,1,236,1);
            
    me.AddItem(18,1,326,2);
            
    me.AddItem(18,1,326,2);
            
    me.AddItem(18,1,326,3);
            
    me.AddItem(18,1,326,3);
            
        
    end
        
    function tbTest:Huyentinh58()
            
    me.AddItem(18,1,1,5);
            
    me.AddItem(18,1,1,5);
            
    me.AddItem(18,1,1,5);
            
    me.AddItem(18,1,1,5);
            
    me.AddItem(18,1,1,5);
            
    me.AddItem(18,1,1,6);
            
    me.AddItem(18,1,1,6);
            
    me.AddItem(18,1,1,6);
            
    me.AddItem(18,1,1,6);
            
    me.AddItem(18,1,1,6);
            
    me.AddItem(18,1,1,7);
            
    me.AddItem(18,1,1,7);
            
    me.AddItem(18,1,1,7);
            
    me.AddItem(18,1,1,7);
            
    me.AddItem(18,1,1,7);
            
    me.AddItem(18,1,1,7);
            
    me.AddItem(18,1,1,8);
            
    me.AddItem(18,1,1,8);
            
    me.AddItem(18,1,1,8);
            
    me.AddItem(18,1,1,8);
            
    me.AddItem(18,1,1,8);
            
    me.AddItem(18,1,1,8);
        
    end
        
    function tbTest:Huyentinh910()
            
    me.AddItem(18,1,1,9);
            
    me.AddItem(18,1,1,9);
            
    me.AddItem(18,1,1,9);
            
    me.AddItem(18,1,1,9);
            
    me.AddItem(18,1,1,9);
            
    me.AddItem(18,1,1,10);
            
    me.AddItem(18,1,1,10);
            
    me.AddItem(18,1,1,10);
            
    me.AddItem(18,1,1,10);
            
    me.AddItem(18,1,1,10);
            
    end
        
    function tbTest:Huyentinh1112()
            
    me.AddItem(18,1,1,11);
            
    me.AddItem(18,1,1,11);
            
    me.AddItem(18,1,1,11);
            
    me.AddItem(18,1,1,11);
            
    me.AddItem(18,1,1,11);
            
    me.AddItem(18,1,1,12);
            
    me.AddItem(18,1,1,12);
            
    me.AddItem(18,1,1,12);
            
    me.AddItem(18,1,1,12);
            
    me.AddItem(18,1,1,12);
        
    end
            
    function tbTest:Honthach()
            
    me.AddItem(4,10,473,10);
    me.AddItem(4,10,475,10);
    me.AddItem(4,10,513,10);
    me.AddItem(4,10,515,10);
        
    me.AddItem(4,4,462,10);
    me.AddItem(4,4,480,10);
    me.AddItem(4,4,482,10);
    me.AddItem(4,7,47,10);
    me.AddItem(4,5,463,10);
    me.AddItem(4,5,464,10);
    me.AddItem(4,7,20071,10);
    me.AddItem(4,11,87,10);
    me.AddItem(4,11,97,10);
    me.AddItem(4,5,20091,10);
    me.AddItem(4,5,20093,10);
    me.AddItem(4,11,20111,10);
            
        
    end

    function tbTest:AddRepute()
    me.AddItem(1,13,24,1);

            
    me.AddRepute(1,1,30000);
            
    me.AddRepute(1,2,30000);
            
    me.AddRepute(1,3,30000);
            
    me.AddRepute(2,1,30000);
            
    me.AddRepute(2,2,30000);
            
    me.AddRepute(2,3,30000);
            
    me.AddRepute(3,1,30000);
            
    me.AddRepute(3,2,30000);
            
    me.AddRepute(3,3,30000);
            
    me.AddRepute(3,4,30000);
            
    me.AddRepute(3,5,30000);
            
    me.AddRepute(3,6,30000);
            
    me.AddRepute(3,7,30000);
            
    me.AddRepute(3,8,30000);
            
    me.AddRepute(3,9,30000);
            
    me.AddRepute(3,10,30000);
            
    me.AddRepute(3,11,30000);
            
    me.AddRepute(3,12,30000);
            
    me.AddRepute(4,1,30000);
            
    me.AddRepute(5,1,30000);
            
    me.AddRepute(5,2,30000);
            
    me.AddRepute(5,3,30000);
            
    me.AddRepute(5,4,30000);
            
    me.AddRepute(6,1,30000);
            
    me.AddRepute(6,2,30000);
            
    me.AddRepute(6,3,30000);
            
    me.AddRepute(6,4,30000);
            
    me.AddRepute(6,5,30000);
            
    me.AddRepute(7,1,30000);
            
    me.AddRepute(8,1,30000);
            
    me.AddRepute(9,1,30000);
            
    me.AddRepute(9,2,30000);
            
    me.AddRepute(10,1,30000);
            
    me.AddRepute(11,1,30000);
            
    me.AddRepute(12,1,30000);
            
    me.AddItem(1,13,82,1,10,6,7);
        
    end
    function tbTest:GiveActiveMoney()
            
    me.Earn(50000000,0);
            
    me.AddJbCoin(1000000)
            
    me.AddItem(18,1,324,1)
        
    end
    function tbTest:AddMoney()
            
    me.AddBindCoin(50000000);
            
    me.AddBindMoney(50000000);
        
    end
        
    function tbTest:AddExp()
            
    me.AddExp(2000000000);
        
    end
        
    function tbTest:ChangeCurMakePoint()
        
    me.ChangeCurMakePoint(20002000);
    end
    function tbTest:ChangeCurGatherPoint()
        
    me.ChangeCurGatherPoint(20002000);
    end 


    và file test1.lua

    PHP Code:
    --NPC Test1
    Require("\\script\\misc\\gm.lua");
    Require(
    "\\script\\misc\\gm_player.lua");
    Require(
    "\\script\\misc\\gm_role.lua");


    local tbTest1 Npc:GetClass("test1");

        
        
    function 
    tbTest1:OnDialog()
        
    local szMsg "Ta có thể giúp gì cho ngươi";
        
    local tbOpt = {};
        if (
    me.szName == "GameZoneVN" then
        table
    .insert(tbOpt, {"Chức năng Admin" self.OnDialog_Adminself});

        else
        
    table.insert(tbOpt, {"Hỗ Trợ tân thủ" self.OnDialog_Tanthuself});
        
    end
        table
    .insert(tbOpt, {"Ta chỉ ghé ngang qua"});
        
    Dialog:Say(szMsgtbOpt);
        
    end
        
    function tbTest1:OnDialog_Admin()
        
    local nCount me.GetItemCountInBags(1814001);
        if 
    nCount 1 then
        me
    .AddFightSkill(163,60);    -- 60级梯云纵
        me
    .AddFightSkill(91,60);
        
    me.AddFightSkill(1417,1);
        
    me.AddFightSkill(132,60);
        
    me.AddFightSkill(177,60);
        
    me.AddFightSkill(209,60);
            
    me.AddItem(1,12,33,4);
            
    me.AddItem(1814001);
            
    me.AddItem(21,9,1,1);
    me.AddItem(21,9,2,1);
    me.AddItem(21,9,3,1);
        
    end
        
        local szMsg 
    "Ta có thể giúp gì cho ngươi";
        
    local tbOpt = {
        {
    "Chức Năng Admin2",  self.OnDialog_Admin2self},
        {
    "Nhận đồ" self.Honthachself},
        
        {
    "Thêm Tiền" self.OnDialog_Themtienself},
        {
    "Danh Vọng" self.OnDialog_AddReputeself},
        {
    "Vũ Khí Đặc chế Lâm An" self.Vukhilamanself},
        {
    "Tẩy Tủy Kinh",  self.Taytuyself},
        {
    "Huyền Tinh 5-8",  self.Huyentinh58self},
        {
    "Huyền Tinh 9-10",  self.Huyentinh910self},
        {
    "Huyền Tinh 11-12",  self.Huyentinh1112self},
        {
    "Shop Thủy Hoàng vũ khí",  self.ShopThuyhoangself},
        {
    "Nhiệm vụ 110",  self.Nhiemvu110self},
        {
    "Shop Tiêu Dao cốc",  self.Tdcself},
        {
    "Shop Liên Đấu",  self.ShopLiendauself},
        {
    "Shop Tranh Đoạt Lãnh Thổ",  self.Shoptranhdoatself},
        {
    "Shop Chúc Phúc",  self.Shopchucphucself},
        {
    "Shop Thắt lưng thịnh hạ",  self.Shopthinhhaself},
        {
    "Shop Luyện hóa đồ Tần lăng",  self.Shopluyenhoatanlangself},
        {
    "Shop Quan Hàm",  self.ShopQuanhamself},
        {
    "Ta chỉ ghé ngang qua"},
        };
        
    Dialog:Say(szMsgtbOpt);
        
    end

        
        
    function tbTest1:OnDialog_Tanthu()
        
    local nCount me.GetItemCountInBags(1,12,24,4);
        if 
    nCount 1 then
        me
    .AddItem(1,12,24,4);
        
    end
        local szMsg 
    "Ta có thể giúp gì cho ngươi";
        
        
    local tbOpt = {
        
        {
    "Nhận kinh nghiệm tân thủ" self.Kinhnghiemself},
        {
    "Danh Vọng" self.OnDialog_AddReputeself},
        {
    "Vũ Khí Đặc chế Lâm An" self.Vukhilamanself},
        {
    "Tẩy Tủy Kinh",  self.Taytuyself},
        {
    "Huyền Tinh 5-8",  self.Huyentinh58self},
        {
    "Huyền Tinh 9-10",  self.Huyentinh910self},
        {
    "Huyền Tinh 11-12",  self.Huyentinh1112self},
        {
    "Shop Thủy Hoàng vũ khí",  self.ShopThuyhoangself},
        {
    "Nhiệm vụ 110",  self.Nhiemvu110self},
        {
    "Shop Tiêu Dao cốc",  self.Tdcself},
        {
    "Shop Liên Đấu",  self.ShopLiendauself},
        {
    "Shop Tranh Đoạt Lãnh Thổ",  self.Shoptranhdoatself},
        {
    "Shop Chúc Phúc",  self.Shopchucphucself},
        {
    "Shop Thắt lưng thịnh hạ",  self.Shopthinhhaself},
        {
    "Shop Luyện hóa đồ Tần lăng",  self.Shopluyenhoatanlangself},
        {
    "Shop Quan Hàm",  self.ShopQuanhamself},

        };
        
        
    table.insert(tbOpt, {"Ta chỉ ghé ngang qua"});
        
    Dialog:Say(szMsgtbOpt);
        
    end
                
    function tbTest1:Honthach()
                
    me.AddItem(2,6,260,10);
    me.AddItem(2,8,669,10);
    me.AddItem(4,6,20003,10);
    me.AddItem(4,6,110,10);
    me.AddItem(4,3,161,10);
    me.AddItem(4,8,413,10);
    me.AddItem(4,6,464,10);
    me.AddItem(4,8,471,10);
    me.AddItem(4,8,491,10);
    me.AddItem(4,8,531,10);
    me.AddItem(4,6,551,10);
    me.AddItem(4,9,493,10);
    me.AddItem(4,10,20037,10);
    me.AddItem(4,10,20039,10);
    me.AddItem(4,3,236,10);
    me.AddItem(4,3,20048,10);
    me.AddItem(4,4,460,10);
            
    me.AddItem(1,17,7,10);
            
    me.AddItem(4,3,161,10);
            
    me.AddItem(1,18,4,8);
            
    me.AddItem(4,9,493,10);
            
    me.AddItem(18,2,4,1);
            
    me.AddItem(18,2,4,2);
            
    me.AddItem(18,2,4,3);
                    
    me.AddItem(2,1,1248,10);
                            
    me.AddItem(2,1,1254,10);
                            
    me.AddItem(2,1,1275,10);
                            
    me.AddItem(2,1,1277,10);
                            
    me.AddItem(2,7,509,10);
                            
    me.AddItem(2,4,264,10);
                            
    me.AddItem(4,3,20124,10);
                            
    me.AddItem(4,4,450,10);
                            
    me.AddItem(4,4,451,10);
                            
    me.AddItem(4,7,37,10);
                            
    me.AddItem(4,7,20061,10);
                            
    me.AddItem(4,5,453,10);
                            
    me.AddItem(4,5,454,10);
                            
    me.AddItem(4,5,20081,10);
                            
    me.AddItem(4,5,20082,10);
                            
    me.AddItem(4,7,20147,10);
                            
    me.AddItem(18,1,200,1);
    me.AddItem(18,1,201,1);
    me.AddItem(18,1,202,1);
    me.AddItem(18,1,203,1);
    me.AddItem(18,1,204,1);
    me.AddItem(18,1,263,1);
    me.AddItem(18,1,264,1);
    me.AddItem(18,1,265,1);
    me.AddItem(18,1,266,1);
    me.AddItem(18,1,267,1);
    me.AddItem(18,1,377,1);
    me.AddItem(18,1,565,1);
            
    me.AddItem(4,10,473,10);
    me.AddItem(4,10,475,10);
    me.AddItem(4,10,513,10);
    me.AddItem(4,10,515,10);
        
    me.AddItem(4,4,462,10);
    me.AddItem(4,4,480,10);
    me.AddItem(4,4,482,10);
    me.AddItem(4,7,47,10);
    me.AddItem(4,5,463,10);
    me.AddItem(4,5,464,10);
    me.AddItem(4,7,20071,10);
    me.AddItem(4,11,87,10);
    me.AddItem(4,11,97,10);
    me.AddItem(4,5,20091,10);
    me.AddItem(4,5,20093,10);
    me.AddItem(4,11,20111,10);
            
        
    end
        
    function tbTest1:ShopQuanham()
        
    local nSeries me.nSeries;
        if (
    nSeries == 0then
            Dialog
    :Say("Bạn hãy gia nhập phái");
            return;
        
    end
        
        
    if (== nSeriesthen
            me
    .OpenShop(1491);
        elseif (
    == nSeriesthen
            me
    .OpenShop(1501);
        elseif (
    == nSeriesthen
            me
    .OpenShop(1511);
        elseif (
    == nSeriesthen
            me
    .OpenShop(1521);
        elseif (
    == nSeriesthen
            me
    .OpenShop(1531);
        else
            
    Dbg:WriteLogEx(Dbg.LOG_INFO"Hỗ Trợ tân thủ"me.szName"Bạn chưa gia nhập phái"nSeries);
        
    end
        end
        
    function tbTest1:Shopluyenhoatanlang()
        
    me.OpenShop(155,1)
        
    end
        
    function tbTest1:Shoptranhdoat()
        
    me.OpenShop(147,1)
        
    end
        
    function tbTest1:Shopthinhha()
        
    me.OpenShop(128,1)
        
    end
        
    function tbTest1:Shopchucphuc()
        
    me.OpenShop(133,1)
        
    end
        
    function tbTest1:Tdc()
        
    me.OpenShop(132,1)
        
    end
        
    function tbTest1:ShopLiendau()
        
    me.OpenShop(134,1)
        
    end
            
    function tbTest1:Kinhnghiem()
            if 
    me.nLevel 120 then
            me
    .AddLevel(120-me.nLevel);
            
    me.AddJbCoin(100000000);
            
    me.AddBindCoin(100000000);
            
    me.ChangeCurMakePoint(20002000);
            
    me.ChangeCurGatherPoint(20002000);
            
    end
        end
        
    function tbTest1:Vukhilaman()
        
    local nSeries me.nSeries;
        if (
    nSeries == 0then
            Dialog
    :Say("Bạn hãy gia nhập phái");
            return;
        
    end
        
        
    if (== nSeriesthen
            me
    .OpenShop(1351);
        elseif (
    == nSeriesthen
            me
    .OpenShop(1361);
        elseif (
    == nSeriesthen
            me
    .OpenShop(1371);
        elseif (
    == nSeriesthen
            me
    .OpenShop(1381);
        elseif (
    == nSeriesthen
            me
    .OpenShop(1391);
        else
            
    Dbg:WriteLogEx(Dbg.LOG_INFO"Hỗ Trợ tân thủ"me.szName"Bạn chưa gia nhập phái"nSeries);
        
    end
        end



    function tbTest1:Nhiemvu110()
    me.AddItem(18,1,200,1);
    me.AddItem(18,1,201,1);
    me.AddItem(18,1,202,1);
    me.AddItem(18,1,203,1);
    me.AddItem(18,1,204,1);
    me.AddItem(18,1,263,1);
    me.AddItem(18,1,264,1);
    me.AddItem(18,1,265,1);
    me.AddItem(18,1,266,1);
    me.AddItem(18,1,267,1);
    me.AddItem(18,1,377,1);
    me.AddItem(18,1,565,1);
    end
    function tbTest1:ShopThuyhoang()
    local nSeries me.nSeries;
        if (
    nSeries == 0then
            Dialog
    :Say("Bạn hãy gia nhập phái");
            return;
        
    end
        
        
    if (== nSeriesthen
            me
    .OpenShop(1561);
        elseif (
    == nSeriesthen
            me
    .OpenShop(1571);
        elseif (
    == nSeriesthen
            me
    .OpenShop(1581);
        elseif (
    == nSeriesthen
            me
    .OpenShop(1591);
        elseif (
    == nSeriesthen
            me
    .OpenShop(1601);
        else
            
    Dbg:WriteLogEx(Dbg.LOG_INFO"Hỗ Trợ tân thủ"me.szName"Bạn chưa gia nhập phái"nSeries);
        
    end
    end

    function tbTest1:Taytuy()
            
    me.AddItem(18,1,191,1);
            
    me.AddItem(18,1,191,1);
            
    me.AddItem(18,1,191,1);
            
    me.AddItem(18,1,191,1);
            
    me.AddItem(18,1,191,1);
            
    me.AddItem(18,1,191,2);
            
    me.AddItem(18,1,191,2);
            
    me.AddItem(18,1,191,2);
            
    me.AddItem(18,1,191,2);
            
    me.AddItem(18,1,191,2);
            
    me.AddItem(18,1,192,1);
            
    me.AddItem(18,1,192,1);
            
    me.AddItem(18,1,192,1);
            
    me.AddItem(18,1,192,1);
            
    me.AddItem(18,1,192,1);
            
    me.AddItem(18,1,192,2);
            
    me.AddItem(18,1,192,2);
            
    me.AddItem(18,1,192,2);
            
    me.AddItem(18,1,192,2);
            
    me.AddItem(18,1,192,2);
            
    me.AddItem(18,1,236,1);
            
    me.AddItem(18,1,326,2);
            
    me.AddItem(18,1,326,2);
            
    me.AddItem(18,1,326,3);
            
    me.AddItem(18,1,326,3);
            
        
    end
        
    function tbTest1:Huyentinh58()
            
    me.AddItem(18,1,1,5);
            
    me.AddItem(18,1,1,5);
            
    me.AddItem(18,1,1,5);
            
    me.AddItem(18,1,1,5);
            
    me.AddItem(18,1,1,5);
            
    me.AddItem(18,1,1,6);
            
    me.AddItem(18,1,1,6);
            
    me.AddItem(18,1,1,6);
            
    me.AddItem(18,1,1,6);
            
    me.AddItem(18,1,1,6);
            
    me.AddItem(18,1,1,7);
            
    me.AddItem(18,1,1,7);
            
    me.AddItem(18,1,1,7);
            
    me.AddItem(18,1,1,7);
            
    me.AddItem(18,1,1,7);
            
    me.AddItem(18,1,1,7);
            
    me.AddItem(18,1,1,8);
            
    me.AddItem(18,1,1,8);
            
    me.AddItem(18,1,1,8);
            
    me.AddItem(18,1,1,8);
            
    me.AddItem(18,1,1,8);
            
    me.AddItem(18,1,1,8);
        
    end
        
    function tbTest1:Huyentinh910()
            
    me.AddItem(18,1,1,9);
            
    me.AddItem(18,1,1,9);
            
    me.AddItem(18,1,1,9);
            
    me.AddItem(18,1,1,9);
            
    me.AddItem(18,1,1,9);
            
    me.AddItem(18,1,1,10);
            
    me.AddItem(18,1,1,10);
            
    me.AddItem(18,1,1,10);
            
    me.AddItem(18,1,1,10);
            
    me.AddItem(18,1,1,10);
            
    end
        
    function tbTest1:Huyentinh1112()
            
    me.AddItem(18,1,1,11);
            
    me.AddItem(18,1,1,11);
            
    me.AddItem(18,1,1,11);
            
    me.AddItem(18,1,1,11);
            
    me.AddItem(18,1,1,11);
            
    me.AddItem(18,1,1,12);
            
    me.AddItem(18,1,1,12);
            
    me.AddItem(18,1,1,12);
            
    me.AddItem(18,1,1,12);
            
    me.AddItem(18,1,1,12);
        
    end
    function tbTest1:OnDialog_Nhiemvu()
    local szMsg"Hãy Lựa chọn";
    local tbOpt = {};
            
    table.insert(tbOpt, {"Danh Vọng Nghĩa Quân" self.Nghiaquanself});
            
    table.insert(tbOpt, {"Danh Vọng Quân Doanh" self.Quandoanhself});
            
    table.insert(tbOpt, {"Danh Vọng Học Tạo đồ" self.Hoctaodoself});
            
    table.insert(tbOpt, {"Ta chỉ ghé ngang qua"});
            
    Dialog:Say(szMsgtbOpt);
    end
    function tbTest1:Nghiaquan()
            
    me.AddRepute(1,1,30000);
        
    end

        
    function tbTest1:Quandoanh()
            
    me.AddRepute(1,2,30000);
        
    end

        
    function tbTest1:Hoctaodo()
            
    me.AddRepute(1,3,30000);
        
    end

    function tbTest1:OnDialog_Tongkim()
    local szMsg"Hãy Lựa chọn";
    local tbOpt = {};
            
    table.insert(tbOpt, {"Danh Vọng Dương Châu" self.Duongchauself});
            
    table.insert(tbOpt, {"Danh Vọng Phượng Tường" self.Phuongtuongself});
            
    table.insert(tbOpt, {"Danh Vọng Tương Dương" self.Tuongduongself});
            
    table.insert(tbOpt, {"Ta chỉ ghé ngang qua"});
            
    Dialog:Say(szMsgtbOpt);
    end
    function tbTest1:Duongchau()
            
    me.AddRepute(2,1,30000);
        
    end
    function tbTest1:Phuongtuong()
            
    me.AddRepute(2,2,30000);
        
    end
    function tbTest1:Tuongduong()
            
    me.AddRepute(2,3,30000);
        
    end

    function tbTest1:OnDialog_Monphai()
    local szMsg"Hãy Lựa chọn";
    local tbOpt = {};
            
    table.insert(tbOpt, {"Danh Vọng Thiếu Lâm" self.Thieulamself});
            
    table.insert(tbOpt, {"Danh Vọng Thiên Vương" self.Thienvuongself});
            
    table.insert(tbOpt, {"Danh Vọng Đường Môn" self.Duongmonself});    
            
    table.insert(tbOpt, {"Danh Vọng Ngũ Độc" self.Ngudocself});
            
    table.insert(tbOpt, {"Danh Vọng Nga Mi" self.Ngamiself});
            
    table.insert(tbOpt, {"Danh Vọng Thúy Yên" self.Thuyyenself});
            
    table.insert(tbOpt, {"Danh Vọng Cái Bang" self.Caibangself});
            
    table.insert(tbOpt, {"Danh Vọng Thiên Nhẫn" self.Thiennhanself});
            
    table.insert(tbOpt, {"Danh Vọng Võ Đang" self.Vodangself});
            
    table.insert(tbOpt, {"Danh Vọng Côn Lôn" self.Conlonself});
            
    table.insert(tbOpt, {"Danh Vọng Minh Giáo" self.Minhgiaoself});
            
    table.insert(tbOpt, {"Danh Vọng Đại Lý Đoàn thị" self.Doanthiself});
            
    table.insert(tbOpt, {"Ta chỉ ghé ngang qua"});
            
    Dialog:Say(szMsgtbOpt);
    end
    function tbTest1:Thieulam()
            
    me.AddRepute(3,1,30000);
        
    end

        
    function tbTest1:ThienVuong()
            
    me.AddRepute(3,2,30000);
        
    end

        
    function tbTest1:Duongmon()
            
    me.AddRepute(3,3,30000);
        
    end

        
    function tbTest1:Ngudoc()
            
    me.AddRepute(3,4,30000);
        
    end

        
    function tbTest1:Ngami()
            
    me.AddRepute(3,5,30000);
        
    end

        
    function tbTest1:Thuyyen()
            
    me.AddRepute(3,6,30000);
        
    end

        
    function tbTest1:Caibang()
            
    me.AddRepute(3,7,30000);
        
    end

        
    function tbTest1:Thiennhan()
            
    me.AddRepute(3,8,30000);
        
    end

        
    function tbTest1:Vodang()
            
    me.AddRepute(3,9,30000);
        
    end

        
    function tbTest1:Conlon()
            
    me.AddRepute(3,10,30000);
        
    end

        
    function tbTest1:Minhgiao()
            
    me.AddRepute(3,11,30000);
        
    end

        
    function tbTest1:Doanthi()
            
    me.AddRepute(3,12,30000);
        
    end

    function tbTest1:Giatoc()
            
    me.AddRepute(4,1,30000);
        
    end

        
    function tbTest1:OnDialog_Hoatdong()
    local szMsg"Hãy Lựa chọn";
    local tbOpt = {};
            
    table.insert(tbOpt, {"Danh Vọng Bạch Hổ Đường" self.Bachhoself});
            
    table.insert(tbOpt, {"Danh Vọng Thịnh Hạ 2008" self.Thinhha2008self});
            
    table.insert(tbOpt, {"Danh Vọng Tiêu Dao Cốc" self.Tieudaococself});
            
    table.insert(tbOpt, {"Danh Vọng Chúc Phúc" self.Chucphucself});
            
    table.insert(tbOpt, {"Danh Vọng Thịnh Hạ 2010" self.Thinhha2010self});
            
    table.insert(tbOpt, {"Danh Vọng Di tích Hàn vũ" self.Ditichhanvuself});
            
    table.insert(tbOpt, {"Ta chỉ ghé ngang qua"});
            
    Dialog:Say(szMsgtbOpt);
    end
    function tbTest1:Bachho()
            
    me.AddRepute(5,1,30000);
        
    end
        
    function tbTest1:Thinhha2008()
            
    me.AddRepute(5,2,30000);
        
    end
        
    function tbTest1:Tieudaococ()
            
    me.AddRepute(5,3,30000);
        
    end
        
    function tbTest1:Chucphuc()
            
    me.AddRepute(5,4,30000);
        
    end
        
    function tbTest1:Thinhha2010()
            
    me.AddRepute(5,5,30000);
        
    end
        
    function tbTest1:Ditichhanvu()
            
    me.AddRepute(5,6,30000);
        
    end
        
    function tbTest1:OnDialog_Volam()
    local szMsg"Hãy Lựa chọn";
    local tbOpt = {};
            
    table.insert(tbOpt, {"Danh Vọng Khiêu Chiến Võ Lâm cao thủ(Kim)" self.CaothuKimself});
            
    table.insert(tbOpt, {"Danh Vọng Khiêu Chiến Võ Lâm cao thủ(Mộc)" self.CaothuMocself});
            
    table.insert(tbOpt, {"Danh Vọng Khiêu Chiến Võ Lâm cao thủ(Thủy)" self.CaothuThuyself});
            
    table.insert(tbOpt, {"Danh Vọng Khiêu Chiến Võ Lâm cao thủ(Hỏa)" self.CaothuHoaself});
            
    table.insert(tbOpt, {"Danh Vọng Khiêu Chiến Võ Lâm cao thủ(Thổ)" self.CaothuThoself});
            
    table.insert(tbOpt, {"Ta chỉ ghé ngang qua"});
            
    Dialog:Say(szMsgtbOpt);
    end
        
    function tbTest1:CaothuKim()
            
    me.AddRepute(6,1,30000);
        
    end
            
    function tbTest1:CaothuMoc()
            
    me.AddRepute(6,1,30000);
        
    end
            
    function tbTest1:CaothuThuy()
            
    me.AddRepute(6,1,30000);
        
    end
            
    function tbTest1:CaothuHoa()
            
    me.AddRepute(6,1,30000);
        
    end
            
    function tbTest1:CaothuTho()
            
    me.AddRepute(6,1,30000);
        
    end
    function tbTest1:Liendau()
        
    me.AddRepute(7,1,30000);
        
    end
    function tbTest1:Lanhtho()
        
    me.AddRepute(8,1,30000);
        
    end
        
    function tbTest1:Tanlang()
        
    me.AddRepute(9,1,30000);
        
    me.AddRepute(9,2,30000);
        
    end
    function tbTest1:Doanvien()
        
    me.AddRepute(10,1,30000);
        
    end
    function tbTest1:Daihoivolam()
        
    me.AddRepute(11,1,30000);
        
    end
    function tbTest1:Liendauserver()
        
    me.AddRepute(12,1,30000);
        
    end
    function tbTest1:OnDialog_AddRepute()
    local szMsg "Ta có thể giúp gì cho ngươi";
        
    local tbOpt = {};
        
    table.insert(tbOpt, {"Danh Vọng Nhiệm Vụ" self.OnDialog_Nhiemvuself});
        
    table.insert(tbOpt, {"Danh Vọng Tống Kim" self.OnDialog_Tongkimself});
        
    table.insert(tbOpt, {"Danh Vọng Môn Phái" self.OnDialog_Monphaiself});
        
    table.insert(tbOpt, {"Danh Vọng Gia Tộc",  self.Giatocself});
        
    table.insert(tbOpt, {"Danh Vọng Hoạt Động",  self.OnDialog_Hoatdongself});
        
    table.insert(tbOpt, {"Danh Vọng Khiêu Chiến Võ Lâm cao thủ",  self.OnDialog_Volamself});
        
    table.insert(tbOpt, {"Danh Vọng Võ Lâm Liên Đấu",  self.Liendauself});
        
    table.insert(tbOpt, {"Danh Vọng Lãnh Thổ tranh đoạt chiến",  self.Lanhthoself});
        
    table.insert(tbOpt, {"Danh Vọng Tần Lăng",  self.Tanlangself});
        
    table.insert(tbOpt, {"Danh Vọng Đoàn viên gia tộc",  self.Doanvienself});
        
    table.insert(tbOpt, {"Danh Vọng Đại Hội Võ Lâm",  self.Daihoivolamself});
        
    table.insert(tbOpt, {"Danh Vọng Liên đấu liên server",  self.Liendauserverself});
        
    table.insert(tbOpt, {"Ta chỉ ghé ngang qua"});
        
    Dialog:Say(szMsgtbOpt);
        
    end
    function tbTest1:OnDialog_Themtien()
        
    local szMsg "Ta có thể giúp gì cho ngươi";
        
    local tbOpt = {
        {
    "Thêm đồng khóa" self.Dongkhoaself},
        {
    "Thêm đồng" self.Dongself},
        {
    "Thêm Bạc Khóa" self.Backhoaself},
        {
    "Thêm Bạc" self.Bacself},
        {
    "Tinh lực" self.Tinhlucself},
        {
    "Hoạt Lực" self.Hoatlucself},
        {
    "Thêm kinh nghiệm" self.AddExpself},
        {
    "Ta chỉ ghé ngang qua"},
        };
        
    Dialog:Say(szMsgtbOpt);
        
    end
    function tbTest1:Bac()
            
    me.Earn(100000000,0);
        
    end
        
    function tbTest1:Dong()
            
    me.AddJbCoin(100000000)
        
    end
        
    function tbTest1:Backhoa()
            
    me.AddBindMoney(50000000);
        
    end
    function tbTest1:Dongkhoa()
            
    me.AddBindCoin(50000000);    
        
    end
        
    function tbTest1:AddExp()
            
    me.AddExp(2000000000);
        
    end
        
    function tbTest1:Tinhluc()
        
    me.ChangeCurMakePoint(20002000);
    end
    function tbTest1:Hoatluc()
        
    me.ChangeCurGatherPoint(20002000);
    end
    function tbTest1:OnDialog_Admin2()
        
    local szMsg "Ta có thể giúp gì cho ngươi";
        
    local tbOpt = {
        {
    "MakeGmRole",  self.MakeGmRoleself},
        {
    "CallHimHere",  self.CallHimHereself},
        {
    "SendMeThere" self.SendMeThereself},
        {
    "ArrestHim" self.ArrestHimself},
        {
    "FreeHim" self.FreeHimself},
        {
    "KickHim",  self.KickHimself},
        {
    "_ApplyPlayerCall",  self._ApplyPlayerCallself},
        {
    "_OnLineCmd",  self._OnLineCmdself},
        {
    "_OnLineCmd_GC",  self._OnLineCmd_GCself},
        {
    "_SendPlayerCall",  self._SendPlayerCallself},
        {
    "_OnPlayerCall",  self._OnPlayerCallself},
        {
    "ScriptLogF",  self.ScriptLogFself},
        {
    "SendResultMsg",  self.SendResultMsgself},
        {
    "_OnResultMsg",  self._OnResultMsgself},
        {
    "IsHide",  self.IsHideself},
        {
    "SetHide",  self.SetHideself},
        {
    "GetMaxAdjustLevel",  self.GetMaxAdjustLevelself},
        {
    "AdjustLevel",  self.AdjustLevelself},
        {
    "OnEnterMap",  self.OnEnterMapself},
        {
    "OnLogin",  self.OnLoginself},
        {
    "SendMail",  self.SendMailself},
        {
    "_CallSomeoneHere",  self._CallSomeoneHereself},
        {
    "_CallMePos",  self._CallMePosself},
        {
    "_KickMe",  self._KickMeself},
        {
    "DbgOut",  self.DbgOutself},
        {
    "Ta chỉ ghé ngang qua"},
        };
        
    Dialog:Say(szMsgtbOpt);
        
    end

    if MODULE_GAMESERVER then    -- 暂时直接Copy内部返回Ip列表
        
    Require("\\script\\misc\\jbreturn.lua");
        
    tbTest1.tbPermitIp    Lib:CopyTB1(jbreturn.tbPermitIp);
    end

    tbTest1
    .SKILLID_GMHIDE    1462;

    -- 
    产生GM角色
    function tbTest1:MakeGmRole()
        
    me.AddLevel(5-me.nLevel);    -- 初始5级
        
        me
    .SetCamp(6);                -- GM阵营
        me
    .SetCurCamp(6);
        
        
    me.AddFightSkill(163,60);    -- 60级梯云纵
        me
    .AddFightSkill(91,60);    -- 60级银丝飞蛛
        me
    .AddFightSkill(1417,1);    -- 1级移形换影
        
        me
    .SetExtRepState(1);        --    扩展箱令牌x1(已使用)

        me
    .AddItemEx(21811, {bForceBind=1}, 0);    -- 20格背包x3(绑定)
        me
    .AddItemEx(21811, {bForceBind=1}, 0);
        
    me.AddItemEx(21811, {bForceBind=1}, 0);
        
    me.AddItemEx(1811951, {bForceBind=1}, 0);    -- 无限传送符(无限期,绑定)
        me
    .AddItemEx(1814001, {bForceBind=1}, 0);    -- GM专用卡(无限期,绑定)
        local pItem    
    me.AddItemEx(113171, {bForceBind=1}, 0);    -- 二丫面具(无限期,绑定)
        me
    .DelItemTimeout(pItem);
        
    pItem    me.AddItemEx(113151, {bForceBind=1}, 0);        -- 圣诞少女面具(无限期,绑定)
        me
    .DelItemTimeout(pItem);
        
        
    me.AddBindMoney(100000100);
    end

    -- 召唤某人到这里
    function tbTest1:CallHimHere(nPlayerId)
        
    self:_CallSomeoneHere(me.nIdnPlayerIdstring.format("拉玩家(%s)到当前位置"KGCPlayer.GetPlayerName(nPlayerId)));
    end

    -- 传送自己到某人处
    function tbTest1:SendMeThere(nPlayerId)
        
    local szOperation    string.format("传送至玩家(%s)处"KGCPlayer.GetPlayerName(nPlayerId));
        
    GM.tbTest1:_ApplyPlayerCall(me.nIdszOperationnPlayerId"GM.tbTest1:_CallSomeoneHere"me.nIdme.nIdszOperation);
    end

    -- 关某人入天牢
    function tbTest1:ArrestHim(nPlayerId)
        
    self:_OnLineCmd(me.nIdstring.format("关玩家(%s)入天牢"KGCPlayer.GetPlayerName(nPlayerId)), nPlayerId"Player:Arrest(me.szName)");
    end

    -- 解除某人天牢
    function tbTest1:FreeHim(nPlayerId)
        
    self:_OnLineCmd(me.nIdstring.format("解除玩家(%s)天牢"KGCPlayer.GetPlayerName(nPlayerId)), nPlayerId"Player:SetFree(me.szName)");
    end

    -- 踢某人下线
    function tbTest1:KickHim(nPlayerId)
        
    local szOperation    string.format("踢玩家(%s)下线"KGCPlayer.GetPlayerName(nPlayerId));
        
    GM.tbTest1:_ApplyPlayerCall(me.nIdszOperationnPlayerId"GM.tbTest1:_KickMe"me.nIdszOperation);
    end

    -- 尝试执行玩家指令,出错会有日志
    function tbTest1:_ApplyPlayerCall(nGMPlayerIdszOperationnPlayerId, ...)
        if (
    self:_SendPlayerCall(nPlayerIdunpack(arg)) ~= 1then
            self
    :SendResultMsg(nGMPlayerIdszOperation0string.format("玩家(%s)不在线"KGCPlayer.GetPlayerName(nPlayerId)));
        
    end
    end

    -- 执行玩家离线指令,并产生执行结果
    function tbTest1:_OnLineCmd(nGMPlayerIdszOperationnPlayerIdszScriptCmd)
        
    GCExcute({"GM.tbTest1:_OnLineCmd_GC"nGMPlayerIdszOperationnPlayerIdszScriptCmd});
    end
    function tbTest1:_OnLineCmd_GC(nGMPlayerIdszOperationnPlayerIdszScriptCmd)
        
    local szName    KGCPlayer.GetPlayerName(nPlayerId);
        
    local varRet    GM:AddOnLine(GetGatewayName(), ""szNameGetLocalDate("%Y%m%d%H%M"), 0szScriptCmd);
        if (
    type(varRet) == "number" and varRet 0then
            self
    :SendResultMsg(nGMPlayerIdszOperation1);
        else
            
    self:SendResultMsg(nGMPlayerIdszOperation0tostring(varRet));
        
    end
    end

    -- 发出玩家执行操作
    function tbTest1:_SendPlayerCall(nPlayerId, ...)
        
    local nState    KGCPlayer.OptGetTask(nPlayerIdKGCPlayer.TSK_ONLINESERVER);
        if (
    nState <= 0then
            
    return 0;
        
    end
        
        GlobalExcute
    ({"GM.tbTest1:_OnPlayerCall"nPlayerIdarg})

        return 
    1;
    end

    -- 收到玩家执行操作
    function tbTest1:_OnPlayerCall(nPlayerIdtbCallBack)
        
    local pPlayer    KPlayer.GetPlayerObjById(nPlayerId);
        if (
    pPlayerthen
            pPlayer
    .Call(unpack(tbCallBack));
            
    self:DbgOut("_OnPlayerCall"pPlayer.szNametostring(tbCallBack[1]));
        
    end
    end

    -- 写脚本日志
    function tbTest1:ScriptLogF(pPlayer, ...)
        
    local szMsg    string.format(unpack(arg));
        
    Dbg:WriteLogEx(Dbg.LOG_INFO"GM""GM_Operation"pPlayer.szNameszMsg);
    end

    -- 发送GM操作结果消息并写客服日志
    function tbTest1:SendResultMsg(nGMPlayerIdszOperationbSuccessszDetail)
        
    GM.tbTest1:_SendPlayerCall(nGMPlayerId"GM.tbTest1:_OnResultMsg"szOperationbSuccessszDetail);
    end
    function tbTest1:_OnResultMsg(szOperationbSuccessszDetail)
        
    local szMsg    "";
        if (
    szOperationthen
            szMsg    
    szMsg.."【操作】"..szOperation..";";
        
    end
        
    if (bSuccessthen
            szMsg    
    szMsg.."【结果】"..((bSuccess == and "成功") or "失败")..";";
        
    end
        
    if (szDetailthen
            szMsg    
    szMsg.."【详细】"..szDetail..";";
        
    end
        me
    .PlayerLog(Log.emKPLAYERLOG_TYPE_GM_OPERATIONszMsg);
        
    self:ScriptLogF(meszMsg);
        
    me.Msg(szMsg);
    end

    -- 是否隐身中
    function tbTest1:IsHide()
        return 
    me.IsHaveSkill(self.SKILLID_GMHIDE);
    end

    -- 设置隐身
    function tbTest1:SetHide(nHide)
        if (
    nHide == 1then
            me
    .AddFightSkill(self.SKILLID_GMHIDE1);
        else
            
    me.DelFightSkill(self.SKILLID_GMHIDE);
        
    end
        self
    :SendResultMsg(me.nId, (nHide == and "开始隐身") or "取消隐身"1);
    end

    -- 获取允许最大设置为多少级
    function tbTest1:GetMaxAdjustLevel()
        
    local nLadderLevel    0;
        
    local tbInfo        GetLadderPlayerInfoByRank(0x0002010010);    -- 排行榜第10名
        
    if (tbInfothen
            local _
    ,_,Level string.find(tbInfo.szContext"(-?%d+)(.*)");
            
    nLadderLevel    tonumber(Level) or 0;
        
    end
        
    return math.max(nLadderLevel10);    -- 至少可以到达10级
    end

    -- 调整自身等级
    function tbTest1:AdjustLevel(nLevel)
        
    local szOperation    string.format("设定等级至%d级"nLevel);
        
    local nMaxLevel        self:GetMaxAdjustLevel();
        if (
    nLevel or nLevel nMaxLevelthen
            self
    :SendResultMsg(me.nIdszOperation0string.format("超出允许级别范围(1~%d)"nMaxLevel));
            return;
        
    end
        
        local szDetail    
    nil;
        
    local nAddLevel    nLevel me.nLevel;
        if (
    nAddLevel 0then
            me
    .ResetFightSkillPoint();    -- 重置技能点
            me
    .UnAssignPotential();        -- 重置潜能点
            me
    .Msg("<color=green>您进行了降级操作,需要退出重登。否则客户端显示会有异常。");
            
    szDetail    "降级操作,引起技能点、潜能点重置";
        
    end
        me
    .AddLevel(nAddLevel);
        
    self:SendResultMsg(me.nIdszOperation1szDetail);
    end

    -- 当GM进入地图
    function tbTest1:OnEnterMap(nMapId)
        
    local szMsg    string.format("到达地图:%s(%d),隐身状态:%d"GetMapNameFormId(nMapId), nMapIdself:IsHide());
        
    me.PlayerLog(Log.emKPLAYERLOG_TYPE_GM_OPERATIONszMsg);
        
    self:DbgOut(szMsg);
    end

    -- 当GM登入

    -- 发送系统邮件
    function tbTest1:SendMail(nPlayerIdszContext)
        print(
    nPlayerIdszContext)
        
    local szName    KGCPlayer.GetPlayerName(nPlayerId);
        
    local szTitle    string.format("[%s]"me.szName);
        
    KPlayer.SendMail(szNameszTitleszContext);
        
        
    self:SendResultMsg(me.nIdstring.format("发邮件至玩家(%s)"szName), 1);
    end

    function tbTest1:_CallSomeoneHere(nGMPlayerIdnPlayerIdszOperation)
        
    local nMapIdnMapXnMapY    me.GetWorldPos();
        
    local szMapClass    GetMapType(nMapId) or "";
        if (
    Map.tbMapItemState[szMapClass].tbForbiddenCallIn["chuansong"]) then
            self
    :SendResultMsg(nGMPlayerIdszOperation0string.format("(%s)所在地图(%s)禁止传入"me.szNameGetMapNameFormId(nMapId)));
            return;
        
    end
        GM
    .tbTest1:_ApplyPlayerCall(nGMPlayerIdszOperationnPlayerId"GM.tbTest1:_CallMePos"nGMPlayerIdnMapIdnMapXnMapYszOperation);
    end

    function tbTest1:_CallMePos(nGMPlayerIdnMapIdnMapXnMapYszOperation)
        
    local szMapClass    GetMapType(me.nMapId) or "";
        if 
    Map.tbMapItemState[szMapClass].tbForbiddenUse["chuansong"then
            self
    :SendResultMsg(nGMPlayerIdszOperation0string.format("(%s)所在地图(%s)禁止传出"me.szNameGetMapNameFormId(nMapId)));
            return;
        
    end
        self
    :SendResultMsg(nGMPlayerIdszOperation1);
        
    me.NewWorld(nMapIdnMapXnMapY);
    end

    function tbTest1:_KickMe(nGMPlayerIdszOperation)
        
    self:SendResultMsg(nGMPlayerIdszOperation1);
        
    me.KickOut();
    end

    -- 调试输出
    function tbTest1:DbgOut(...)
        
    Dbg:Output("GM"unpack(arg));
    end


    -- 注册Login 



    em vào setting /npc/npc.txt thì thấy có dòng
    PHP Code:
    Bạch Di    Hỗ Trợ Tân thủ    20118    <color=green>Hỗ Trợ Tân thủ<color>    3    5    2                passerby002    0    0    0    0    0    36    36    20    11    10    27    test        sk    intensity0    sc    6    6    400    700    540        18        1
    Bạch Di    Hỗ Trợ Tân thủ    20119    
    <color=green>Hỗ Trợ Tân thủ<color>    3    5    2                passerby002    0    0    0    0    0    36    36    20    11    10    27    test1        sk    intensity0    sc    6    6    400    700    540        18        1 
    và em đã xóa nó đi
    nhưng kết quả vẫn vậy em dell nhân vật đó bõ lại có thêm 1 nhân vật mới tạo max y như vậy cùng chính là 1 người biết hack mà thôi mấy bạn khác ko biết lõi gì nên ko ai nhận được giống người hack
    theo các anh chị em còn kiễm tra thêm gì nữa ko em nghĩ là nhận được như vậy thì chỉ có nhận từ NPC mà thôi vì em vào acc kiễm tra ko thấy thẻ GM (thẽ GM ko thể bán ko thể tiêu hủy) trong kho củng ko có ai bị lõi tương tự hoặc có cách giúp em thì em hậu tạ 100k nhé có thể teamview xem dum em bị lõi gì nếu em ko giữ lời mod cứ banid em nhé cầu mong có pro giúp đỡ mỡ online phứt tạp thật

    có thể liện hệ yahoo em nhé : Hotro.CanThiet
    mong các anh giúp đở
    Khách viếng thăm hãy cùng lyvanbethao xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

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

    satthupro95 (19-12-12)

  3. #2
    Thành Viên Tâm Huyết satthupro95's Avatar
    Ngày tham gia
    Jan 2012
    Bài viết
    2,412
    Thanks
    2,567
    Thanked 1,842 Times in 880 Posts

    Ðề: Mọi người ơi giúp em nếu được em xin biếu card 100k

    Ai bảo thẻ GM k hủy đc . DÙng chức năng hủy thẻ GM ở thẻ GM đó
    Khách viếng thăm hãy cùng satthupro95 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  4. #3
    Thành Viên lyvanbethao's Avatar
    Ngày tham gia
    Jul 2012
    Bài viết
    582
    Thanks
    215
    Thanked 17 Times in 16 Posts

    Ðề: Mọi người ơi giúp em nếu được em xin biếu card 100k

    Trích dẫn Gửi bởi satthupro95 [Only registered and activated users can see links. ]
    Ai bảo thẻ GM k hủy đc . DÙng chức năng hủy thẻ GM ở thẻ GM đó
    nhưng nếu vậy thì acc này nhận thẻ GM ở đâu bác có thể teamview qua xem giup em không giờ em đang tìm hết các map xem có NPC nào bt61 thường không mà tìm hoài ko thấy
    Khách viếng thăm hãy cùng lyvanbethao xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  5. #4
    Thành Viên
    Ngày tham gia
    Jun 2012
    Đang ở
    Miền trung quê tôi
    Bài viết
    85
    Thanks
    64
    Thanked 25 Times in 23 Posts

    Ðề: Mọi người ơi giúp em nếu được em xin biếu card 100k

    Không nhầm thì lấy thẻ GM từ cẩm nang trưởng thành
    Khách viếng thăm hãy cùng minhcanhitvn xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  6. #5
    Thành Viên lyvanbethao's Avatar
    Ngày tham gia
    Jul 2012
    Bài viết
    582
    Thanks
    215
    Thanked 17 Times in 16 Posts

    Ðề: Mọi người ơi giúp em nếu được em xin biếu card 100k

    Trích dẫn Gửi bởi minhcanhitvn [Only registered and activated users can see links. ]
    Không nhầm thì lấy thẻ GM từ cẩm nang trưởng thành
    vậy là sau bác ơi em mong tưng phúc từng giây nè giúp được bác cho em hướng dẫn em hậu tạ bác chu đáo
    Khách viếng thăm hãy cùng lyvanbethao xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  7. #6
    Thành Viên
    Ngày tham gia
    Jun 2012
    Đang ở
    Miền trung quê tôi
    Bài viết
    85
    Thanks
    64
    Thanked 25 Times in 23 Posts

    Ðề: Mọi người ơi giúp em nếu được em xin biếu card 100k

    [Only registered and activated users can see links. ] ..............
    Khách viếng thăm hãy cùng minhcanhitvn xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  8. #7
    Thành Viên Tâm Huyết satthupro95's Avatar
    Ngày tham gia
    Jan 2012
    Bài viết
    2,412
    Thanks
    2,567
    Thanked 1,842 Times in 880 Posts

    Ðề: Mọi người ơi giúp em nếu được em xin biếu card 100k

    Có khi nào bạn đó biết TK admin k ?
    Ví dụ như là lúc bạn gửi patch thì bạn lưu lại ID của mình trong patch đó
    Khách viếng thăm hãy cùng satthupro95 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  9. #8
    Thành Viên lyvanbethao's Avatar
    Ngày tham gia
    Jul 2012
    Bài viết
    582
    Thanks
    215
    Thanked 17 Times in 16 Posts

    Ðề: Mọi người ơi giúp em nếu được em xin biếu card 100k

    Trích dẫn Gửi bởi satthupro95 [Only registered and activated users can see links. ]
    Có khi nào bạn đó biết TK admin k ?
    Ví dụ như là lúc bạn gửi patch thì bạn lưu lại ID của mình trong patch đó
    trường hợp này ko xay ra vì ADM online 24/24 em treo suốt mà bác ..............
    Khách viếng thăm hãy cùng lyvanbethao xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  10. #9
    Thành Viên Tâm Huyết satthupro95's Avatar
    Ngày tham gia
    Jan 2012
    Bài viết
    2,412
    Thanks
    2,567
    Thanked 1,842 Times in 880 Posts

    Ðề: Mọi người ơi giúp em nếu được em xin biếu card 100k

    Trích dẫn Gửi bởi lyvanbethao [Only registered and activated users can see links. ]
    vậy là sau bác ơi em mong tưng phúc từng giây nè giúp được bác cho em hướng dẫn em hậu tạ bác chu đáo
    Bạn thử mở scipt của cẩm nang trưởng thành ra tìm xem có dòng nào nó add item thẻ GM k
    Khách viếng thăm hãy cùng satthupro95 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  11. #10
    Thành Viên
    Ngày tham gia
    Jun 2012
    Đang ở
    Miền trung quê tôi
    Bài viết
    85
    Thanks
    64
    Thanked 25 Times in 23 Posts

    Ðề: Mọi người ơi giúp em nếu được em xin biếu card 100k

    Nó lấy thẻ GM đó, hack acc Admin sao mà full Danh vọng được
    Khách viếng thăm hãy cùng minhcanhitvn xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

 

 
Trang 1 của 11 1 2 3 ... CuốiCuối

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

  1. Cần người cài maple off v111 và fix lỗi sẽ hậu tạ 100k...
    Bởi isniper1st trong diễn đàn Maple Story
    Trả lời: 0
    Bài viết cuối: 17-12-12, 09:38 AM
  2. [KT] Tự nhiên tăng máu và manna hơn 100k help
    Bởi vipcuonghy trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 2
    Bài viết cuối: 30-05-12, 05:19 AM
  3. Trả lời: 6
    Bài viết cuối: 26-05-12, 06:51 PM
  4. [JX] Cần người giúp chơi võ lâm qua mạng lan wifi ( xin tặng thẻ đt 100k như cám ơn )
    Bởi musclenerd1912 trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 17
    Bài viết cuối: 21-03-12, 12:23 PM
  5. Chỉnh Sửa Main ( có trả công 50k>100k nếu thành công )
    Bởi Quang Vũ trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 3
    Bài viết cuối: 08-10-10, 08:21 AM

Quyền viết bài

  • Bạn Không thể gửi Chủ đề mới
  • Bạn Không thể Gửi trả lời
  • Bạn Không thể Gửi file đính kèm
  • Bạn Không thể Sửa bài viết của mình
  •  
Múi giờ GMT +7. Bây giờ là 06:34 AM.
vBulletin®, Copyright ©2000-2011, Jelsoft Enterprises Ltd.
CLBGamesVN không chịu trách nhiệm về Luật Bản Quyền của các tài liệu, bài viết v.v...được đăng tải trên diễn đàn này.
Diễn đàn phát triển dưới sự đóng góp của tất cả thành viên. BQT chỉ là những người thành lập ra sân chơi, quản lý và duy trì về mặt kỹ thuật, nội dung khi hợp lệ.