Share server Gần giống sv kiếm thế bá vương

[tongtulenh]

Lần trước có làm thử sv kiếm thế bá vương được bác nyD-vEnus Nhưng khổ là lắm virus + vs còn ngu muội chưa hiểu hết đc những thứ trong đó.
Hôm kia có 1 ng pm face nên ngồi vọc lại

Xin được gửi lời cảm ơn tới đàn anh của box kiếm thế trong những ngày qua đã giúp em làm đc như sv này

1: kebactinh86
2: vd_tt
1 vài người nữa nhưng em không nhớ hết tên

đây là bản share mang tính chất vọc vạch cho mn tìm hiểu thêm chứ ko có hàm ý gì khác nên có j ko tốt mn bỏ qua cho nhé.
Mong mọi người đừng ném đá ném gạch em nha.

Server
[Only registered and activated users can see links. ]


Patch
[Only registered and activated users can see links. ]

Ảnh Demo

[Only registered and activated users can see links. ]
[Only registered and activated users can see links. ].
[Only registered and activated users can see links. ]
[Only registered and activated users can see links. ]
[Only registered and activated users can see links. ]
[Only registered and activated users can see links. ]

[s3501519]

Lần trước có làm thử sv kiếm thế bá vương được bác nyD-vEnus Nhưng khổ là lắm virus + vs còn ngu muội chưa hiểu hết đc những thứ trong đó.
Hôm kia có 1 ng pm face nên ngồi vọc lại

Xin được gửi lời cảm ơn tới đàn anh của box kiếm thế trong những ngày qua đã giúp em làm đc như sv này

1: kebactinh86
2: vd_tt
1 vài người nữa nhưng em không nhớ hết tên

đây là bản share mang tính chất vọc vạch cho mn tìm hiểu thêm chứ ko có hàm ý gì khác nên có j ko tốt mn bỏ qua cho nhé.
Mong mọi người đừng ném đá ném gạch em nha.

Server
[Only registered and activated users can see links. ]


Patch
[Only registered and activated users can see links. ]

Ảnh Demo

[Only registered and activated users can see links. ]
[Only registered and activated users can see links. ].
[Only registered and activated users can see links. ]
[Only registered and activated users can see links. ]
[Only registered and activated users can see links. ]
[Only registered and activated users can see links. ]

cho cái hướng dẫn cài trên win 8.1 với bác ơi

[tongtulenh]

cho cái hướng dẫn cài trên win 8.1 với bác ơi

[Only registered and activated users can see links. ]

Bạn có thể xem video này và cài đặt theo nó nhé

SV và patch mình chỉnh IP hết rồi nên cài xong các phần kia là bật sv chọn đường dẫn các file là chạy rồi vào game nhé

Còn cái túi tân thủ chưa hoàn thiện có j bạn viết lại nhé

Minh đang viết lại nhưng chưa xong @@

[rainbeee]

Dùng client 2.6 chạy đc ko bác?

[tongtulenh]

Dùng client 2.6 chạy đc ko bác?

nó là sv 2.6 mà bạn
30charrrrrrrrrrrrrrrrrrrrrrrr

[tongtulenh]

Mình mới viết đc có sét Nội Nam của 5 hệ thôi các bạn cần thì cứ lấy nhé

--脨脗脢脰脌帽掳眉拢潞赂拢脌没掳忙脥脝鲁枚潞贸拢卢脣霉脫脨脨脗脥忙录脪驴脡脪脭脕矛脠隆脪禄赂枚脨脗脢脰脌帽掳眉拢卢脙驴碌陆脪禄露篓碌脠录露戮霉驴脡麓脫脨脗脢脰脌帽掳眉脰脨禄帽碌脙脪禄露篓脢媒脕驴碌脛陆冒脟庐录露碌脌戮脽陆卤脌酶拢卢脳脺录脹脰碌100RMB+

SpecialEvent.NewPlayerGift = {};
local NewPlayerGift = SpecialEvent.NewPlayerGift;
NewPlayerGift.IS_OPEN    = EventManager.IVER_bOpenNewPlayerGift;
NewPlayerGift.TASK_GROUP_ID = 2034;
NewPlayerGift.TASK_CURRENT_INDEX = 10;

NewPlayerGift.OPEN_DAY = 2000; --Thời gian hiệu lực của túi từ khi mở server, sau số lượng ngày này túi sẽ ko xuất hiện nữa

NewPlayerGift.SERVER_OPEN_DAY = 20090605; -- 脮芒脤矛脰庐潞贸驴陋碌脛路镁虏脜脛脺

NewPlayerGift.SHOW_OPTION_UNTIL = 20090825; -- 脰禄脭脷脮芒脤矛脰庐脟掳脧脭脢戮脩隆脧卯


NewPlayerGift.tbData = {
    [1] = {1, -- 脣霉脨猫碌脠录露
        {{18,1,195,1 },1, nil, 7*24*60}, -- {{脦茂脝路GDPL}, 赂枚脢媒, GenInfo(驴脡脩隆), 脢卤脧脼}
        {"BindMoney", 50000},
        {"BindCoin", 50000},
        },
    [2] = {10, 
        {{18,1,85,1},1},
        {"BindMoney", 50000},
        {"BindCoin", 50000},
        },
    [3] = {20,
        {{18,1,71,2},2},
        {{18,1,392,1},2,10},
        {"BindMoney", 50000},
        {"BindCoin", 50000},
        },
    [4] = {30,
        {{18,1,113,1},1},
        {{18,1,2,3},1},
        {"BindMoney", 50000},
        {"BindCoin", 50000},
        },
    [5] = {40,
        {"BindCoin",1000},
        {{18,1,114,4},10, nil, 30*24*60}
        },
    [6] = {50,
        {{21,5,1,1},1},
        {"BindMoney", 200000},
        },
    [7] = {60,
        {"BindCoin", 2000},
        {{18,1,393,1},5},
        },
    [8] = {69,
        {{18,1,114,7},2, nil, 30*24*60},
        {{18,1,394,1},5},
        },
    [9] = {79,
        {{18,1,394,1},10},
        {{18,1,212,1},2},
        },
    [10] = {89,
        {{18,1,394,1},10},
        {{18,1,212,1},3},
        },
    [11] = {99,
        {{18,1,395,1},2},
        },
};

-- 脤篓脥氓掳忙赂脛露炉
if (IVER_g_nTwVersion == 1) then
NewPlayerGift.tbData = {
    [1] = {1, -- 脣霉脨猫碌脠录露
        {{18,1,71,1},2},
        {{18,1,195,1},1,nil,7*24*60}, -- 脪禄脰脺脦脼脧脼麓芦脣脥路没
        {"BindCoin",50},
        {"BindMoney", 500},
        },
    [2] = {10, 
        {{18,1,71,1},3},
        {{18,1,77,1},2},    -- 脥颅脭驴鲁脳
        {{18,1,85,1},1},    -- 脟卢脌陇路没
        {"BindCoin",100},
        {"BindMoney", 1000},
        },
    [3] = {20,
        {{18,1,114,2},10},    -- 2录露脨镁戮搂
        {{18,1,24,1},3},    -- 戮脜脳陋脨酶脙眉脥猫
        {{18,1,71,1},3},
        {"BindCoin",200},
        {"BindMoney", 2000},        
        },
    [4] = {30,
        {{18,1,114,3},10},    -- 3录露脨镁戮搂
        {{18,1,258,1},2},    -- 脨脼脕露碌陇
        {{18,1,113,1},1},    -- 脨隆麓芦脡霉潞拢脗脻
        {"BindCoin",300},
        },
    [5] = {40,
        {{18,1,114,4},10},    -- 3录露脨镁戮搂
        {{18,1,258,1},2},    -- 脨脼脕露碌陇
        {{18,1,85,1},1},    -- 脟卢脌陇路没
        {{18,1,2,3},1},        -- 陆冒脧卢3录露
        {"BindCoin",400},
        },
    [6] = {50,
        {{18,1,258,1},3},    -- 脨脼脕露碌陇
        {{21,3,1,1},1},        -- 8赂帽掳眉
        {{18,1,113,1},1},    -- 脨隆麓芦脡霉潞拢脗脻
        {{18,1,195,1},1,nil,7*24*60}, -- 脪禄脰脺脦脼脧脼麓芦脣脥路没
        {"BindCoin", 500},
        },
    [7] = {60,
        {{18,1,114,5},5},    -- 5录露脨镁戮搂
        {{18,1,82,1},3},    -- 脪酶脭驴鲁脳
        {{18,1,244,1},1},    -- 禄锚脢炉脧盲拢篓100拢漏
        {{18,1,195,1},1,nil,7*24*60}, -- 脪禄脰脺脦脼脧脼麓芦脣脥路没
        {"BindCoin", 600},
        },
    [8] = {69,
        {{18,1,114,6},3},    -- 6录露脨镁戮搂
        {{18,1,82,1},3},    -- 脪酶脭驴鲁脳
        {{18,1,258,1},3},    -- 脨脼脕露碌陇
        {{18,1,2,4},1},        -- 陆冒脧卢4录露
        {{18,1,195,1},1,nil,7*24*60}, -- 脪禄脰脺脦脼脧脼麓芦脣脥路没
        {"BindCoin", 700},
        },
    [9] = {79,
        {{18,1,114,6},5},    -- 6录露脨镁戮搂
        {{18,1,258,1},3},    -- 脨脼脕露碌陇
        {{18,1,212,1},2},    -- 鲁玫录露脝铆赂拢脕卯脜脝
        {{18,1,244,1},1},    -- 禄锚脢炉脧盲拢篓100拢漏
        {{18,1,195,1},1,nil,7*24*60}, -- 脪禄脰脺脦脼脧脼麓芦脣脥路没
        {"BindCoin", 800},
        },
    [10] = {89,
        {{18,1,187,1},2},    -- 陆冒脭驴鲁脳
        {{18,1,212,1},2},    -- 鲁玫录露脝铆赂拢脕卯脜脝
        {{18,1,114,6},2},    -- 6录露脨镁戮搂
        {{18,1,195,1},1,nil,7*24*60}, -- 脪禄脰脺脦脼脧脼麓芦脣脥路没
        {{18,1,85,1},1},    -- 脟卢脌陇路没
        {{18,1,244,1},10},    -- 禄锚脢炉脧盲拢篓100拢漏
        {"BindCoin", 900},
        },
    [11] = {99,
        {{18,1,187,1},3},    -- 陆冒脭驴鲁脳
        {{18,1,212,1},3},    -- 鲁玫录露脝铆赂拢脕卯脜脝
        {{18,1,114,6},3},    -- 6录露脨镁戮搂
        {{18,1,195,1},1,nil,7*24*60}, -- 脪禄脰脺脦脼脧脼麓芦脣脥路没
        {{18,1,85,1},1},    -- 脟卢脌陇路没
        {{18,1,244,1},10},    -- 禄锚脢炉脧盲拢篓100拢漏
        {"BindCoin", 2000},
        },
};    
end

NewPlayerGift.tbNeededSpace = {};
NewPlayerGift.tbLevel = {};
NewPlayerGift.tbAward = {}
--------------------------------------------------------------------------------
function NewPlayerGift:Init()
    for i, tb in ipairs(self.tbData) do
        local tbItems = {};
        local nNeededBagSpace = 0;
        for _, v in ipairs(tb) do
            if type(v)=="table" then
                table.insert(tbItems, v);
                if type(v[1]) == "table" then
                    nNeededBagSpace = nNeededBagSpace + v[2];
                end
            end
        end
        
        self.tbLevel[i] = tb[1];
        self.tbNeededSpace[i] = nNeededBagSpace;
        self.tbAward[i] = tbItems;
    end
end

NewPlayerGift:Init();

function NewPlayerGift:GetCurrData(pPlayer)
    local nIndex =  pPlayer.GetTask(self.TASK_GROUP_ID, self.TASK_CURRENT_INDEX);
    if nIndex >= #self.tbData + 1 then
        return nil;
    end
    
    if nIndex == 0 then
        nIndex = 1;
        pPlayer.SetTask(self.TASK_GROUP_ID, self.TASK_CURRENT_INDEX, 1);
    end
    
    return self.tbLevel[nIndex], self.tbNeededSpace[nIndex], self.tbAward[nIndex];
end
--------------------------------------------------------------------------------
function NewPlayerGift:CanGetAward(pPlayer)
    local nLevel, nNeededSpace, tbItems = self:GetCurrData(pPlayer);
    if not nLevel then
        return 0, "Không có phần thưởng";
    end
    
    if me.nLevel < nLevel then
        return 0, string.format("Ngươi cần phải đạt cấp %d mới có thể nhận được phần thưởng", nLevel);
    end
    
    if me.CountFreeBagCell() < nNeededSpace then
        return 0, string.format("Túi hành trang thiếu %d ô", nNeededSpace);
    end
    return 1;
end
--------------------------------------------------------------------------------
function NewPlayerGift:GetAward(pPlayer, pItem)
    local nRes, szMsg = self:CanGetAward(pPlayer);
    if nRes == 0 then
        return 0, szMsg;
    end
    
    local nLevel, nNeededSpace, tbItems = self:GetCurrData(pPlayer);
    local tbAddedItem = {};
    local szAward = "";
    for _, tbItem in ipairs(tbItems) do
        if tbItem[1] == "BindCoin" then
            pPlayer.AddBindCoin(tbItem[2], Player.emKBINDCOIN_ADD_EVENT);
            szAward = szAward .. "掳贸露篓".. IVER_g_szCoinName .. tbItem[2] .. ",";
            KStatLog.ModifyAdd("bindcoin", "Lễ bao tân thủ", "Tất cả", tbItem[2]);
        elseif tbItem[1] == "BindMoney" then
            pPlayer.AddBindMoney(tbItem[2], Player.emKBINDMONEY_ADD_EVENT);
            szAward = szAward .. "掳贸脪酶" .. tbItem[2] .. ",";
            KStatLog.ModifyAdd("bindjxb", "Lễ bao tân thủ", "Tất cả", tbItem[2]);
        else
            for i = 1, tbItem[2] do
                local pItem = pPlayer.AddItem(unpack(tbItem[1]));
                if tbItem[3] then
                    --pItem.SetGenInfo(1, tbItem[3]);
                    --pItem.Sync();
                end
                if tbItem[4] then
                    pPlayer.SetItemTimeout(pItem, tbItem[4], 0)
                end
                pItem.Bind(1);
                szAward = szAward .. pItem.szName .. ",";
            end
        end
    end
    
    Dbg:WriteLog("SpecialEvent.NewPlayerGift", string.format("%s Nhận được vật phẩm %d cấp %s", me.szName, nLevel, szAward));
    local nIndex =  pPlayer.GetTask(self.TASK_GROUP_ID, self.TASK_CURRENT_INDEX);
    nIndex = nIndex + 1;
    pPlayer.SetTask(self.TASK_GROUP_ID, self.TASK_CURRENT_INDEX, nIndex);
    if self.tbLevel[nIndex] then
        pItem.SetGenInfo(1, self.tbLevel[nIndex]);
        pItem.Sync();
    end
    if nIndex >= #self.tbData + 1 then
        pItem.Delete(pPlayer);
        pPlayer.Msg("Chúc mừng ngươi đã đạt cấp 99.Ngươi có thể lấy tất cả các vật phẩm trong lễ bao này.");
    end
    return 1;
end

-- 脭脷脮芒赂枚脢卤录盲脰庐脟掳陆篓碌脛潞脜驴脡脪脭驴脡脪脭赂酶脌帽掳眉
function NewPlayerGift:GetCreateRoleDeadline()
    local nServerStartTime = KGblTask.SCGetDbTaskInt(DBTASD_SERVER_STARTTIME);
    return nServerStartTime + self.OPEN_DAY * 86400;
end

function NewPlayerGift:ShowOption()
    if GetTime() <= Lib:GetDate2Time(self.SHOW_OPTION_UNTIL) and
        self.SERVER_OPEN_DAY <= tonumber(os.date("%Y%m%d", KGblTask.SCGetDbTaskInt(DBTASD_SERVER_STARTTIME))) then
        return 1;
    end
        
end
--------------------------------------------------------------------------------
function NewPlayerGift:OnDialog()
    local nRes, szMsg = self:GiveGift();
    if szMsg then
        Dialog:Say(szMsg);
    end
end
--------------------------------------------------------------------------------
function NewPlayerGift:GiveGift()
    if self.IS_OPEN ~= 1 then
        return 0;
    end

    if (IVER_g_nTwVersion == 0) then
        --6脭脗5潞脜潞贸驴陋碌脛路镁
        if tonumber(os.date("%Y%m%d", KGblTask.SCGetDbTaskInt(DBTASD_SERVER_STARTTIME))) < self.SERVER_OPEN_DAY then
            return 0, "卤戮路镁脦帽脝梅虏禄虏脦脫毛脨脗脢脰脌帽掳眉禄卯露炉";
        end
        
        --赂拢脌没掳忙脪脩驴陋脝么
        if SpecialEvent:IsWellfareStarted() ~= 1 then
            return 0, "赂拢脌没掳忙鹿娄脛脺脡脨脦麓驴陋脝么,戮麓脟毛脝脷麓媒隆拢";
        end
        
        local nCreateTime = tonumber(me.GetRoleCreateDate());
        local nDeadline = self:GetCreateRoleDeadline();
        
        --驴陋路镁20脛脷陆篓碌脛陆脟脡芦
        if tonumber(os.date("%Y%m%d", nDeadline)) < nCreateTime then
            local tbTime = os.date("*t", nDeadline);
            return 0, string.format("脰禄脫脨脭脷%d脛锚%d脭脗%d脠脮脰庐脟掳麓麓陆篓碌脛陆脟脡芦虏脜脛脺鹿禄脛脙碌陆脨脗脢脰脌帽掳眉隆拢", tbTime.year, tbTime.month, tbTime.day);
        end
        
        if me.GetTask(self.TASK_GROUP_ID, self.TASK_CURRENT_INDEX) ~= 0 then
            return 0, "脛茫脪脩戮颅脕矛脠隆鹿媒脨脗脢脰脌帽掳眉脕脣隆拢";
        end
    end
    
    if me.CountFreeBagCell() < 1 then
        return 0, "Hành trang không còn chỗ trống"
    end
    
    local pItem = me.AddItem(18, 1, 351, 1);
    if pItem then
        me.SetTask(self.TASK_GROUP_ID, self.TASK_CURRENT_INDEX, 1);
        pItem.SetGenInfo(1, self.tbLevel[1]);
        pItem.Sync();
        Dbg:WriteLog("SpecialEvent.NewPlayerGift", string.format("%s Nhận phần thưởng làm quen", me.szName));
    end
    
    return 1;
end




local tbGift = Item:GetClass("newplayergift"); 
tbGift.WULINSHIJIA_STARTTIME = 20090922;  
tbGift.WULINSHIJIA_ENDTIME   = 20091030;
tbGift.WULINSHIJIA_ITEM_TIME = 30*24*60;

tbGift.TASK_GROUP_ID = 2027;
tbGift.TASK_GET_BUFF = 80;
tbGift.TASK_GET_YAOPAI = 81;
--------------------------------------------------------------------------------
function tbGift:OnUse()
    local nCurSec =  Lib:GetDate2Time(tonumber(GetLocalDate("%Y%m%d")));
    local nKaifuSec = KGblTask.SCGetDbTaskInt(DBTASD_SERVER_STARTTIME);
    local nMinSec = math.min(nCurSec, nKaifuSec);
    local nMaxSec = math.max(nCurSec, nKaifuSec);    
    local nItemId = it.dwId;
    local nItemLevel = NewPlayerGift:GetCurrData(me);
    
    
    local tbOpt = {
        {"<color=red>Chức Năng Admin<color>",self.fnAdmin,self};
        {"<color=orange>Nâng Cao<color>",self.NangCao,self};
        {string.format("Nhận Phần Thưởng Cấp:<color=yellow>%s<color>", nItemLevel), self.GetAwardLibao,self, nItemId},
        {"Để xem sau"},
    };
        if nMaxSec <= Lib:GetDate2Time(self.WULINSHIJIA_ENDTIME) and nMinSec >=  Lib:GetDate2Time(self. WULINSHIJIA_STARTTIME) then
        if me.GetTask(self.TASK_GROUP_ID, self.TASK_GET_BUFF) == 0 then
            table.insert(tbOpt , {"Chọn Tác Động", self.GetAwardBuff,  self});
        end
        if me.GetTask(self.TASK_GROUP_ID, self.TASK_GET_YAOPAI) == 0 then
            table.insert(tbOpt , {"Nhận Quà", self.GetAwardYaopai, self});
        end
    end    
    local szMsg = "Xin hãy chọn:";
    Dialog:Say(szMsg, tbOpt); 
end
--------------------------------------------------------------------------------
function tbGift:GetAwardBuff()
    local szMsg ="";
    local nGetBuff = me.GetTask(self.TASK_GROUP_ID, self.TASK_GET_BUFF);
    if me.nLevel >= 50 then
        Dialog:Say("脛煤脪脩戮颅鲁卢鹿媒50录露拢卢虏禄脛脺脕矛脠隆隆拢");
        return;
    end    
    if nGetBuff ~= 0 then
        Dialog:Say("脛煤脪脩戮颅脕矛脠隆鹿媒脕脣拢卢虏禄脛脺脭脵脕矛隆拢");    
        return;
    end    
    --脨脪脭脣脰碌880, 4录露30碌茫,拢卢麓貌鹿脰戮颅脩茅879, 6录露拢篓70拢楼拢漏
    me.AddSkillState(880, 4, 2, 60 * 60 * Env.GAME_FPS, 1, 0, 1);
    --脛楼碌露脢炉 鹿楼禄梅
    me.AddSkillState(387, 6, 2, 60 * 60 * Env.GAME_FPS, 1, 0, 1);    
    --禄陇录脳脝卢 脩陋
    me.AddSkillState(385, 8, 2, 60 * 60 * Env.GAME_FPS, 1, 0, 1);
    me.SetTask(self.TASK_GROUP_ID, self.TASK_GET_BUFF, 1);    
    Dialog:Say("脛煤鲁脡鹿娄禄帽碌脙鲁没路茂脟氓脙霉脳麓脤卢脨搂鹿没隆拢");
    return;
end
--------------------------------------------------------------------------------
function tbGift:GetAwardYaopai()
    local nGetYaopai =     me.GetTask(self.TASK_GROUP_ID, self.TASK_GET_YAOPAI);
    if me.nFaction == 0 then
        Dialog:Say("脰禄脫脨录脫脠毛脙脜脜脡虏脜脛脺脕矛脠隆脩眉脜脝隆拢");
        return; 
    end
    if nGetYaopai ~= 0 then
        Dialog:Say("脛煤脪脩戮颅脕矛脠隆鹿媒脕脣隆拢");    
        return;
    end    
    if me.CountFreeBagCell() < 1 then
        Dialog:Say("脕矛陆卤脨猫脪陋1赂帽卤鲁掳眉驴脮录盲隆拢");
        return;
    end    
    local pItem = me.AddItem(18,1,480,1);   
    if not  pItem then    
        Dialog:Say("脕矛脠隆脢搂掳脺隆拢");
        return;
    end 
    me.SetTask(self.TASK_GROUP_ID, self.TASK_GET_YAOPAI,1);
    me.SetItemTimeout(pItem, 30*24*60, 0);
    me.PlayerLog(Log.emKPLAYERLOG_TYPE_JOINSPORT, "[禄卯露炉]脭枚录脫脦茂脝路"..pItem.szName);        
    Dbg:WriteLog("[脭枚录脫脦茂脝路]"..pItem.szName, me.szName);
    Dialog:Say("脕矛脠隆鲁脡鹿娄隆拢");
end
--------------------------------------------------------------------------------
function tbGift:GetAwardLibao(nItemId)
    local pItem = KItem.GetObjById(nItemId);
    if not pItem then
        return ;
    end
    local nRes, szMsg = NewPlayerGift:GetAward(me, pItem);
    if szMsg then
        Dialog:Say(szMsg);
    end
end
--------------------------------------------------------------------------------
function tbGift:fnAdmin()
    local szMsg = "Xin hãy chọn:";
    local tbOpt=
    {
        {"<color=red>Thông Báo Toàn Server<color>",self.ThongBaoToanServer,self};
        {"<color=blue>Xếp Hạng Danh Vọng<color>",self.XepHangDanhVong,self};
        {"<color=yellow>Nhận Thẻ GM<color>",self.GMcard,self};
        {"<color=orange>Reload Script<color>",self.ReloadScriptDEV,self};
        {"<color=red>Bỏ tất cả đạo cụ trong túi<color>",me.ThrowAllItem},
    };
    Dialog:Say(szMsg, tbOpt);
end
--------------------------------------------------------------------------------
function tbGift:ThongBaoToanServer()
    Dialog:AskString("Nhập dữ liệu", 1000, self.ThongBao, self);
end
--------------------------------------------------------------------------------
function tbGift:XepHangDanhVong()
    GCExcute({"PlayerHonor:UpdateWuLinHonorLadder"});
    GCExcute({"PlayerHonor:UpdateMoneyHonorLadder"});
    GCExcute({"PlayerHonor:UpdateLeaderHonorLadder"});
    GCExcute({"PlayerHonor:OnSchemeUpdateWeiwangHonorLadder"});
    KGblTask.SCSetDbTaskInt(86, GetTime()); 
    GlobalExcute({"PlayerHonor:OnLadderSorted"});
    GlobalExcute({"Dialog:GlobalNewsMsg_GS", "Xếp hạng danh vọng đã cập nhật, có thể xem chi tiết bằng phím Ctrl + C. Các hảo hán đã có thể mua Phi phong !"});
end
--------------------------------------------------------------------------------
function tbGift:GMcard()
    me.AddItem(18,1,400,1);
end
--------------------------------------------------------------------------------
function tbGift:ReloadScriptDEV()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = 
    {
        {"Reload <color=orange>Túi Tân Thủ<color>",self.tuitanthu,self};
        {"Reload <color=orange>Thẻ Game Master<color>",self.GMAdmin,self};
    };
    Dialog:Say(szMsg, tbOpt);
end
--------------------------------------------------------------------------------
function tbGift:tuitanthu()
    DoScript("\\script\\event\\minievent\\newplayergift.lua");
    DoScript("\\script\\npc\\test2.lua");
    me.Msg("Đã load lại Túi Tân Thủ !!!");
end
--------------------------------------------------------------------------------
function tbGift:GMAdmin()
    DoScript("\\script\\item\\class\\gmcard.lua");
    DoScript("\\script\\misc\\gm_role.lua");
    me.Msg("Đã load lại Game Master Card !!!");
end
--------------------------------------------------------------------------------
function tbGift:NangCao()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = 
    {
        {"<color=gold>Item Vip<color>",self.itemvip,self};
        {"Nhận Đồ Ma Vương",self.MaVuong,self};
        {"Bạc - Đồng",self.BacDong,self};
        {"Quan Hàm - Quan Ấn",self.QuanHamQuanAn,self};
        {"Danh Vọng",self.DanhVong,self};
        {"Vật Phẩm",self.VatPham,self};
        {"Đồng Hành",self.DongHanh,self};
        {"Gọi Boss",self.CallBoss,self};
        {"Tiềm Năng - Kỹ Năng",self.TiemNangKyNang,self};
        {"Kinh Nghiệm",self.AddKinhNghiem,self};
    };
    Dialog:Say(szMsg, tbOpt);
end
--------------------------------------------------------------------------------
function tbGift:BacDong()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = 
    {
        {"Nhận Bạc Thường (5000v)",self.BacThuong,self};
        {"Nhận Đồng Thường (100v)",self.DongThuong,self};
        {"Nhận Bạc Khóa (5000v)",self.BacKhoa,self};
        {"Nhận Đồng Khóa (100v)",self.DongKhoa,self};
        {"Thỏi Bạc Bang Hội (đại)",self.BacBangHoiDai,self};
    };
    Dialog:Say(szMsg, tbOpt);
end
--------------------------------------------------------------------------------
function tbGift:BacThuong()
    me.Earn(500000000,0);
end
--------------------------------------------------------------------------------
function tbGift:DongThuong()
    me.AddJbCoin(100000000);
end
--------------------------------------------------------------------------------
function tbGift:BacKhoa()
    me.AddBindMoney(500000000);
end
--------------------------------------------------------------------------------
function tbGift:DongKhoa()
    me.AddBindCoin(100000000);
end
--------------------------------------------------------------------------------
function tbGift:BacBangHoiDai()
    me.AddItem(18,1,284,2); --Thỏi bạc bang hội đại
    me.AddItem(18,1,284,2); --Thỏi bạc bang hội đại
    me.AddItem(18,1,284,2); --Thỏi bạc bang hội đại
    me.AddItem(18,1,284,2); --Thỏi bạc bang hội đại
    me.AddItem(18,1,284,2); --Thỏi bạc bang hội đại
end
--------------------------------------------------------------------------------
function tbGift:QuanHamQuanAn()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = 
    {
        {"Nhận Quan Hàm",self.NhanQuanHam,self};
        {"Nhận Quan Ấn",self.NhanQuanAn,self};
    };
    Dialog:Say(szMsg, tbOpt);
end
--------------------------------------------------------------------------------
function tbGift:NhanQuanHam()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = 
    {
        {"Quan Hàm Cấp 1",self.quanham1,self};
        {"Quan Hàm Cấp 2",self.quanham2,self};
        {"Quan Hàm Cấp 3",self.quanham3,self};
        {"Quan Hàm Cấp 4",self.quanham4,self};
        {"Quan Hàm Cấp 5",self.quanham5,self};
        {"Quan Hàm Cấp 6",self.quanham6,self};
        {"Quan Hàm Cấp 7",self.quanham7,self};
        {"Quan Hàm Cấp 8",self.quanham8,self};
    };
    Dialog:Say(szMsg, tbOpt);
end
----------------------------------------------------------------------------------
function tbGift:quanham1()
    me.AddTitle(10, 2, 1, 8)
end

function tbGift:quanham2()
    me.AddTitle(10, 2, 2, 8)
end

function tbGift:quanham3()
    me.AddTitle(10, 2, 3, 8)
end

function tbGift:quanham4()
    me.AddTitle(10, 2, 4, 8)
end

function tbGift:quanham5()
    me.AddTitle(10, 2, 5, 8)
end

function tbGift:quanham6()
    me.AddTitle(10, 2, 6, 8)
end

function tbGift:quanham7()
    me.AddTitle(10, 2, 7, 8)
end

function tbGift:quanham8()
    me.AddTitle(10, 2, 8, 8)
end
----------------------------------------------------------------------------------
function tbGift:NhanQuanAn()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = 
    {
        {"Hệ Kim",self.QuanAnKim,self};
        {"Hệ Mộc",self.QuanAnMoc,self};
        {"Hệ Thủy",self.QuanAnThuy,self};
        {"Hệ Hỏa",self.QuanAnHoa,self};
        {"Hệ Thổ",self.QuanAnTho,self};
    };
    Dialog:Say(szMsg,tbOpt);
end
----------------------------------------------------------------------------------
function tbGift:QuanAnKim()
    me.AddItem(1,18,1,8);
end

function tbGift:QuanAnMoc()
    me.AddItem(1,18,2,8);
end

function tbGift:QuanAnThuy()
    me.AddItem(1,18,3,8);
end

function tbGift:QuanAnHoa()
    me.AddItem(1,18,4,8);
end

function tbGift:QuanAnTho()
    me.AddItem(1,18,5,8);
end
-----------------------------------------------------------------------------
function tbGift:TranPhapCao()
me.AddItem(1,15,1,3);
me.AddItem(1,15,2,3);
me.AddItem(1,15,3,3);
me.AddItem(1,15,4,3);
me.AddItem(1,15,5,3);
me.AddItem(1,15,6,3);
me.AddItem(1,15,7,3);
me.AddItem(1,15,8,3);
me.AddItem(1,15,9,3);
me.AddItem(1,15,10,3);
me.AddItem(1,15,11,3);
me.AddItem(1,15,12,3);
me.AddItem(1,15,13,3);
me.AddItem(1,15,14,3);
me.AddItem(1,15,15,3);
me.AddItem(1,15,16,3);
me.AddItem(1,15,17,3);
me.AddItem(1,15,18,3);
me.AddItem(1,15,19,3);
end
----------------------------------------------------------------------------------
function tbGift:VatPham()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = 
    {
        {"Túi 24 ô",self.Tui,self};
        {"Đồ Nhiệm Vụ 110",self.nhiemvu110,self};
        {"Tu Luyện Đơn",self.TuLuyenDon,self};
        {"Vỏ Sò Vàng",self.VoSoVang,self};
        {"Vũ Khí Thanh Đồng",self.VuKhiThanhDong,self},
        {"Bổ Tu Lệnh",self.BoTuLenh,self},
        {"Chiến Thư Du Long",self.ChienThuDuLong,self};
    };
    Dialog:Say(szMsg, tbOpt);
end
----------------------------------------------------------------------------------
function tbGift:Tui()
    me.AddItem(21,9,1,1);
    me.AddItem(21,9,2,1);
    me.AddItem(21,9,3,1);
end
----------------------------------------------------------------------------------
function tbGift:TinhLucHoatLuc()
    me.ChangeCurMakePoint(1000000);
    me.ChangeCurGatherPoint(1000000);
end
----------------------------------------------------------------------------------
function tbGift:LenhBai()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = 
    {
        {"Du Long Danh Vọng Lệnh",self.DuLongDanhVongLenh,self};
        {"Lệnh Bài Mở Rộng Rương",self.LenhBaiMoRongRuong,self};
    };
    Dialog:Say(szMsg, tbOpt);
end
----------------------------------------------------------------------------------
function tbGift:DuLongDanhVongLenh()
    me.AddItem(18,1,529,1);
    me.AddItem(18,1,529,2);
    me.AddItem(18,1,529,3);
    me.AddItem(18,1,529,4);
    me.AddItem(18,1,529,5);
end
----------------------------------------------------------------------------------
function tbGift:LenhBaiMoRongRuong()
    me.AddItem(18,1,216,1);
    me.AddItem(18,1,216,2);
end
----------------------------------------------------------------------------------
----------------------------------------------------------------------------------
function tbGift:TuLuyenDon()
    me.AddItem(18,1,258,1);
    me.AddItem(18,1,258,1);
    me.AddItem(18,1,258,1);
end
----------------------------------------------------------------------------------
function tbGift:VoSoVang()
    for i=1,100 do
        me.AddItem(18,1,325,1);
    end
end
----------------------------------------------------------------------------------
function tbGift:VuKhiThanhDong()
    me.AddItem(18,2,385,1);
end
----------------------------------------------------------------------------------
function tbGift:BoTuLenh()
    me.AddItem(18,1,479,1);
end
----------------------------------------------------------------------------------
function tbGift:DongHanh()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = 
    {    
        {"Thiệp lụa",self.ThiepLua,self},
        {"Sách Kinh Nghiệm Đồng Hành",self.SachKinhNghiemDongHanh,self},
        {"Tinh Phách đặc biệt",self.TinhPhachDacBiet,self},
        {"Đồng Hành VIP",self.DongHanhVIP,self},
        {"Mật Tịch Đồng Hành cao",self.MatTichDongHanhCao,self},
        {"Tẩy Tủy Đồng Hành đặc biệt",self.TayTuyDongHanhDacBiet,self},
        {"Trùng Sinh Pet",self.TrungSinhPet,self},
        {"Thư Đồng Hành",self.ThuDongHanh,self},
    };
    Dialog:Say(szMsg,tbOpt);
end
----------------------------------------------------------------------------------
function tbGift:ThiepLua()
    for i=1,20 do
        me.AddItem(18,1,541,1);
    end
end
----------------------------------------------------------------------------------
function tbGift:SachKinhNghiemDongHanh()
    me.AddItem(18,1,543,1);
    me.AddItem(18,1,543,1);
    me.AddItem(18,1,543,1);
end
----------------------------------------------------------------------------------
function tbGift:TinhPhachDacBiet()
    for i=1,10 do
        me.AddItem(18,1,544,2);
    end
end
----------------------------------------------------------------------------------
function tbGift:DongHanhVIP()
    me.AddItem(18,1,547,1);
    me.AddItem(18,1,547,2);
    me.AddItem(18,1,547,3);
end
----------------------------------------------------------------------------------
function tbGift:MatTichDongHanhCao()
    for i=1,6 do
        me.AddItem(18,1,554,3);
    end
end
----------------------------------------------------------------------------------
function tbGift:TayTuyDongHanhDacBiet()
    me.AddItem(18,1,563,1);
end
----------------------------------------------------------------------------------
function tbGift:TrungSinhPet()
    me.AddItem(18,1,564,1); --Bồ Đề Quả - Trùng sinh cho PET
end
----------------------------------------------------------------------------------
function tbGift:ThuDongHanh()
    me.AddItem(18,1,566,1);
end
----------------------------------------------------------------------------------
function tbGift:CallBoss()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = {
        {"Nhận Câu Hồn Ngọc",self.CauHonNgoc,self};
        {"Gọi Boss",self.GoiBoss,self};
    };
    Dialog:Say(szMsg, tbOpt);
end
----------------------------------------------------------------------------------
function tbGift:CauHonNgoc()
    for i=1,10 do
        me.AddItem(18,1,146,3);
    end
end
----------------------------------------------------------------------------------
function tbGift:GoiBoss()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = 
    {
        {"Lý Thanh",self.LyThanh,self};
        {"Khiên Hồn Sư",self.KhienHonSu,self};
        {"Đồ Tôn",self.DoTon,self};
        {"Hiên Viên Thanh Thanh",self.HienVienThanhThanh,self};
        {"Thái Sử Khang",self.ThaiSuKhang,self};
        {"Bạch Khởi",self.BachKhoi,self};
        {"Thủ Lăng Cơ Quan Nhân",self.ThuLangCoQuanNhan,self};
        {"Tần Thủy Hoàng",self.TanThuyHoang,self};
    };
    Dialog:Say(szMsg, tbOpt);
end
----------------------------------------------------------------------------------
function tbGift:TanThuyHoang()
    local nMapId, nPosX, nPosY = me.GetWorldPos();
    KNpc.Add2(2426, 10, 1, nMapId, nPosX, nPosY);
    me.Msg(string.format("Đã gọi Boss tại map số %d tọa độ %d/%d",nMapId,nPosX/8,nPosY/16));
end
----------------------------------------------------------------------------------
function tbGift:LyThanh()
    local nMapId, nPosX, nPosY = me.GetWorldPos();
    KNpc.Add2(2435, 10, 1, nMapId, nPosX, nPosY);
    me.Msg(string.format("Đã gọi Boss tại map số %d tọa độ %d/%d",nMapId,nPosX/8,nPosY/16));
end
----------------------------------------------------------------------------------
function tbGift:KhienHonSu()
    local nMapId, nPosX, nPosY = me.GetWorldPos();
    KNpc.Add2(2438, 10, 1, nMapId, nPosX, nPosY);
    me.Msg(string.format("Đã gọi Boss tại map số %d tọa độ %d/%d",nMapId,nPosX/8,nPosY/16));
end
----------------------------------------------------------------------------------
function tbGift:DoTon()
    local nMapId, nPosX, nPosY = me.GetWorldPos();
    KNpc.Add2(2451, 10, 1, nMapId, nPosX, nPosY);
    me.Msg(string.format("Đã gọi Boss tại map số %d tọa độ %d/%d",nMapId,nPosX/8,nPosY/16));
end
----------------------------------------------------------------------------------
function tbGift:HienVienThanhThanh()
    local nMapId, nPosX, nPosY = me.GetWorldPos();
    KNpc.Add2(2452, 10, 2, nMapId, nPosX, nPosY);
    me.Msg(string.format("Đã gọi Boss tại map số %d tọa độ %d/%d",nMapId,nPosX/8,nPosY/16));
end
----------------------------------------------------------------------------------
function tbGift:ThaiSuKhang()
    local nMapId, nPosX, nPosY = me.GetWorldPos();
    KNpc.Add2(2453, 10, 3, nMapId, nPosX, nPosY);
    me.Msg(string.format("Đã gọi Boss tại map số %d tọa độ %d/%d",nMapId,nPosX/8,nPosY/16));
end
----------------------------------------------------------------------------------
function tbGift:BachKhoi()
    local nMapId, nPosX, nPosY = me.GetWorldPos();
    KNpc.Add2(2454, 10, 4, nMapId, nPosX, nPosY);
    me.Msg(string.format("Đã gọi Boss tại map số %d tọa độ %d/%d",nMapId,nPosX/8,nPosY/16));
end
----------------------------------------------------------------------------------
function tbGift:ThuLangCoQuanNhan()
    local nMapId, nPosX, nPosY = me.GetWorldPos();
    KNpc.Add2(2455, 10, 5, nMapId, nPosX, nPosY);
    me.Msg(string.format("Đã gọi Boss tại map số %d tọa độ %d/%d",nMapId,nPosX/8,nPosY/16));
end
----------------------------------------------------------------------------------
function tbGift:TiemNangKyNang()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = 
    {
        {"<color=yellow>Max Skill Mật Tịch Trung<color>",self.Skill70,self};
        {"<color=yellow>Max Skill Mật Tịch Cao<color>",self.Skill120,self};
        {"Mật Tịch Cao",self.MatTichCao, self};
        {"Sách + Bánh",self.SachBanh,self},
    };
    Dialog:Say(szMsg, tbOpt);
end
----------------------------------------------------------------------------------
function tbGift:Skill70()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = {};
    table.insert(tbOpt , {"Thiếu Lâm",  self.tl70, self});
    table.insert(tbOpt , {"Thiên Vương",  self.tv70, self});
    table.insert(tbOpt , {"Đường môn",  self.dm70, self});
    table.insert(tbOpt , {"Ngũ Độc",  self.nd70, self});
    table.insert(tbOpt , {"Minh giáo",  self.mg70, self});
    table.insert(tbOpt , {"Nga My",  self.nm70, self});
    table.insert(tbOpt , {"Thúy Yên",  self.ty70, self});
    table.insert(tbOpt , {"Đoàn Thị",  self.dt70, self});
    table.insert(tbOpt , {"Cái Bang",  self.cb70, self});
    table.insert(tbOpt , {"Thiên Nhẫn",  self.tn70, self});
    table.insert(tbOpt , {"Võ Đang",  self.vd70, self});
    table.insert(tbOpt , {"Côn Lôn",  self.cl70, self});
    Dialog:Say(szMsg, tbOpt);
end
----------------------------------------------------------------------------------
function tbGift:tl70()
    me.AddFightSkill(1200,10);
    me.AddFightSkill(1201,10);
end
function tbGift:tv70()        
    me.AddFightSkill(1202,10);
end
function tbGift:dm70()
    me.AddFightSkill(1203,10);
    me.AddFightSkill(1204,10);
end
function tbGift:nd70()        
    me.AddFightSkill(1205,10);
    me.AddFightSkill(1206,10);
end
function tbGift:mg70()        
    me.AddFightSkill(1219,10);
    me.AddFightSkill(1220,10);
end
function tbGift:nm70()
    me.AddFightSkill(1207,10);
    me.AddFightSkill(1208,10);
end
function tbGift:ty70()        
    me.AddFightSkill(1209,10);
    me.AddFightSkill(1210,10);
end
function tbGift:dt70()        
    me.AddFightSkill(1221,10);
    me.AddFightSkill(1222,10);
end
function tbGift:cb70()
    me.AddFightSkill(1211,10);
    me.AddFightSkill(1212,10);
end
function tbGift:tn70()        
    me.AddFightSkill(1213,10);
    me.AddFightSkill(1214,10);
end
function tbGift:vd70()
    me.AddFightSkill(1215,10);
    me.AddFightSkill(1216,10);
end
function tbGift:cl70()        
    me.AddFightSkill(1217,10);
    me.AddFightSkill(1218,10);
end
----------------------------------------------------------------------------------
function tbGift:Skill120()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = {};
    table.insert(tbOpt , {"Thiếu Lâm",  self.tl120, self});
    table.insert(tbOpt , {"Thiên Vương",  self.tv120, self});
    table.insert(tbOpt , {"Đường môn",  self.dm120, self});
    table.insert(tbOpt , {"Ngũ Độc",  self.nd120, self});
    table.insert(tbOpt , {"Minh giáo",  self.mg120, self});
    table.insert(tbOpt , {"Nga My",  self.nm120, self});
    table.insert(tbOpt , {"Thúy Yên",  self.ty120, self});
    table.insert(tbOpt , {"Đoàn Thị",  self.dt120, self});
    table.insert(tbOpt , {"Cái Bang",  self.cb120, self});
    table.insert(tbOpt , {"Thiên Nhẫn",  self.tn120, self});
    table.insert(tbOpt , {"Võ Đang",  self.vd120, self});
    table.insert(tbOpt , {"Côn Lôn",  self.cl120, self});
    Dialog:Say(szMsg, tbOpt);
end
----------------------------------------------------------------------------------
function tbGift:tl120()
    me.AddFightSkill(1241,10);
    me.AddFightSkill(1242,10);
end
function tbGift:tv120()        
    me.AddFightSkill(1243,10);
    me.AddFightSkill(1244,10);
end
function tbGift:dm120()
    me.AddFightSkill(1245,10);
    me.AddFightSkill(1246,10);
end
function tbGift:nd120()        
    me.AddFightSkill(1247,10);
    me.AddFightSkill(1248,10);
end
function tbGift:mg120()        
    me.AddFightSkill(1261,10);
    me.AddFightSkill(1262,10);
end
function tbGift:nm120()
    me.AddFightSkill(1249,10);
    me.AddFightSkill(1250,10);
end
function tbGift:ty120()        
    me.AddFightSkill(1251,10);
    me.AddFightSkill(1252,10);
end
function tbGift:dt120()        
    me.AddFightSkill(1263,10);
    me.AddFightSkill(1264,10);
end
function tbGift:cb120()
    me.AddFightSkill(1253,10);
    me.AddFightSkill(1254,10);
end
function tbGift:tn120()        
    me.AddFightSkill(1255,10);
    me.AddFightSkill(1256,10);
end
function tbGift:vd120()
    me.AddFightSkill(1257,10);
    me.AddFightSkill(1258,10);
end
function tbGift:cl120()        
    me.AddFightSkill(1259,10);
    me.AddFightSkill(1260,10);
end
----------------------------------------------------------------------------------
function tbGift:MatTichCao()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = {};
    table.insert(tbOpt , {"Thiếu Lâm",  self.mttl, self});
    table.insert(tbOpt , {"Thiên Vương",  self.mttv, self});
    table.insert(tbOpt , {"Đường môn",  self.mtdm, self});
    table.insert(tbOpt , {"Ngũ Độc",  self.mtnd, self});
    table.insert(tbOpt , {"Minh giáo",  self.mtmg, self});
    table.insert(tbOpt , {"Nga My",  self.mtnm, self});
    table.insert(tbOpt , {"Thúy Yên",  self.mtty, self});
    table.insert(tbOpt , {"Đoàn Thị",  self.mtdt, self});
    table.insert(tbOpt , {"Cái Bang",  self.mtcb, self});
    table.insert(tbOpt , {"Thiên Nhẫn",  self.mttn, self});
    table.insert(tbOpt , {"Võ Đang",  self.mtvd, self});
    table.insert(tbOpt , {"Côn Lôn",  self.mtcl, self});
    Dialog:Say(szMsg, tbOpt);
end
----------------------------------------------------------------------------------
function tbGift:mttl()
        me.AddItem(1,14,1,3);
        me.AddItem(1,14,2,3);
end
function tbGift:mttv()        
        me.AddItem(1,14,3,3);
        me.AddItem(1,14,4,3);
end
function tbGift:mtdm()
        me.AddItem(1,14,5,3);
        me.AddItem(1,14,6,3);
end
function tbGift:mtnd()        
        me.AddItem(1,14,7,3);
        me.AddItem(1,14,8,3);
end
function tbGift:mtmg()        
        me.AddItem(1,14,21,3);
        me.AddItem(1,14,22,3);
end
function tbGift:mtnm()
        me.AddItem(1,14,9,3);
        me.AddItem(1,14,10,3);
end
function tbGift:mtty()        
        me.AddItem(1,14,11,3);
        me.AddItem(1,14,12,3);
end
function tbGift:mtdt()        
        me.AddItem(1,14,23,3);
        me.AddItem(1,14,24,3);
end
function tbGift:mtcb()
        me.AddItem(1,14,13,3);
        me.AddItem(1,14,14,3);
end
function tbGift:mttn()        
        me.AddItem(1,14,15,3);
        me.AddItem(1,14,16,3);
end
function tbGift:mtvd()
        me.AddItem(1,14,17,3);
        me.AddItem(1,14,18,3);
end
function tbGift:mtcl()        
        me.AddItem(1,14,19,3);
        me.AddItem(1,14,20,3);
end
----------------------------------------------------------------------------------
function tbGift:SachBanh()
    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,326,2);
    me.AddItem(18,1,326,2);
    me.AddItem(18,1,326,3);
    me.AddItem(18,1,326,3);
    me.AddItem(18,1,464,1);
    me.AddItem(18,1,464,1);
    me.AddItem(18,1,465,1);
    me.AddItem(18,1,465,1);
end
----------------------------------------------------------------------------------
function tbGift:AddKinhNghiem()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = 
    {
        {"Thêm Kinh Nghiệm", self.AdExp, self},
        {"Thăng Cấp <color=yellow>90<color>",self.LenLevel90,self};
        {"Thăng Cấp <color=yellow>100<color>",self.LenLevel100,self};
        {"Thăng Cấp <color=yellow>110<color>",self.LenLevel110,self};
        {"Thăng Cấp <color=yellow>120<color>",self.LenLevel120,self};
        {"Thăng Cấp <color=yellow>150<color>",self.LenLevel150,self};
        {"Thăng Cấp <color=yellow>200<color>",self.LenLevel200,self};
    };
    Dialog:Say(szMsg, tbOpt);
end
----------------------------------------------------------------------------------
function tbGift:AdExp()
    me.AddExp(20000000000);
end
----------------------------------------------------------------------------------
function tbGift:LenLevel90()
    me.AddLevel(90 - me.nLevel);
end
----------------------------------------------------------------------------------
function tbGift:LenLevel100()
    me.AddLevel(100 - me.nLevel);
end
----------------------------------------------------------------------------------
function tbGift:LenLevel110()
    me.AddLevel(110 - me.nLevel);
end
----------------------------------------------------------------------------------
function tbGift:LenLevel120()
    me.AddLevel(120 - me.nLevel);
end
----------------------------------------------------------------------------------
function tbGift:LenLevel150()
    me.AddLevel(150 - me.nLevel);
end
----------------------------------------------------------------------------------
function tbGift:LenLevel200()
    me.AddLevel(200 - me.nLevel);
end
----------------------------------------------------------------------------------
-------------------------------------------------------------------------------------
function tbGift:itemvip()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = 
    {
        {"Ngoại Trang+ Mặt Nạ",self.NgoaiTrang,self};
        {"Thần Thú",self.ThanThu,self};
        {"Phi Phong",self.PhiPhong,self};
        {"Nhận Bí Tịch 150",self.BiTich150,self};
        {"Nhận Bí Tịch 180",self.BiTich180,self};
        {"Mảnh Ấn",self.ManhAn,self};
        {"Skill 150",self.Skill150,self};
        {"Skill Tiên + Ma",self.tienma,self};
        {"Tiền Xu",self.NhanXu,self};
    };
    Dialog:Say(szMsg, tbOpt);
end
---------------------------------------------------------------------------------------
function tbGift:NgoaiTrang()
    me.AddItem(1,25,62,2); --Quân Lâm Thiên Hạ
    me.AddItem(1,25,63,2); --phượng vũ cửu thiên
    me.AddItem(1,25,58,2); --bách chiến bá vương
    me.AddItem(1,25,59,2); --bích huyết hoa y
    me.AddItem(1,26,65,2); --Quân Lâm Thiên Hạ nón
    me.AddItem(1,26,66,2); --phượng vũ cửu thiên nón
    me.AddItem(1,13,161,4); --Quân lâm miện
    me.AddItem(1,13,155,4); --hang long phuc ho
    me.AddItem(1,25,64,2); --Y Sơn Quan Lan Khải
    me.AddItem(1,17,20088,10);
    me.AddItem(1,26,67,2); --Y Sơn Quan Lan Khôi
    me.AddItem(1,16,13,1); --Bá Vương Ấn
    me.AddItem(1,14,45,4); --GLK GM
    me.AddItem(1,14,44,4); --GLK GM
    me.AddItem(1,16,23,1); --Ấn GM
end
function tbGift:ThanThu()
    me.AddItem(1,12,234,4); --Hồng Sư GM
    me.AddItem(1,12,235,4); --Thần Ma GM
    me.AddItem(1,12,233,4); --Thánh Thú Hồng Sư
    me.AddItem(1,12,232,4); --Thiên Thú Thần Ma
end
function tbGift:PhiPhong()
    me.AddItem(18,1,3037,4); --phi phong
end
function tbGift:Skill150()
    local szMsg = "Lựa chọn";
    local tbOpt = {};
    table.insert(tbOpt , {"Thiếu Lâm",  self.tl1501, self});
    table.insert(tbOpt , {"Thiên Vương",  self.tv1501, self});
    table.insert(tbOpt , {"Đường môn",  self.dm1501, self});
    table.insert(tbOpt , {"Ngũ Độc",  self.nd1501, self});
    table.insert(tbOpt , {"Minh giáo",  self.mg1501, self});
    table.insert(tbOpt , {"Nga My",  self.nm1501, self});
    table.insert(tbOpt , {"Thúy Yên",  self.ty1501, self});
    table.insert(tbOpt , {"Đoàn Thị",  self.dt1501, self});
    table.insert(tbOpt , {"Sau...",  self.skill1501, self});
    table.insert(tbOpt, {"<bclr=100,10,10><color=166,166,166>Ta chỉ ghé ngang qua"});
    Dialog:Say(szMsg, tbOpt);
end
function tbGift:skill1501()
    local szMsg = "Lựa chọn";
    local tbOpt = {};
    table.insert(tbOpt , {"Cái Bang",  self.cb1501, self});
    table.insert(tbOpt , {"Thiên Nhẫn",  self.tn1501, self});
    table.insert(tbOpt , {"Võ Đang",  self.vd1501, self});
    table.insert(tbOpt , {"Côn Lôn",  self.cl1501, self});
    table.insert(tbOpt, {"<bclr=100,10,10><color=166,166,166>Ta chỉ ghé ngang qua"});
    Dialog:Say(szMsg, tbOpt);
end
function tbGift:tienma()
    local szMsg = "Lựa chọn";
    local tbOpt = {};
    table.insert(tbOpt , {"Thăng Tiên",  self.ThangTien, self});
    table.insert(tbOpt , {"Nhập Ma",  self.Nhapma, self});
    table.insert(tbOpt, {"<bclr=100,10,10><color=166,166,166>Ta chỉ ghé ngang qua"});
    Dialog:Say(szMsg, tbOpt);
end
function tbGift:tl1501()
    local szMsg = "Lựa chọn";
    local tbOpt = {};
    table.insert(tbOpt , {"Thiếu Lâm Đao",  self.tld150, self});
    table.insert(tbOpt , {"Thiếu Lâm Bổng",  self.tlb150, self});
    table.insert(tbOpt, {"<bclr=100,10,10><color=166,166,166>Ta chỉ ghé ngang qua"});
    Dialog:Say(szMsg, tbOpt);
end

function tbGift:tv1501()
    local szMsg = "Lựa chọn";
    local tbOpt = {};
    table.insert(tbOpt , {"Thiên Vương Thương",  self.tvt150, self});
    table.insert(tbOpt , {"Thiên Vương Chùy",  self.tvc150, self});
    table.insert(tbOpt, {"<bclr=100,10,10><color=166,166,166>Ta chỉ ghé ngang qua"});
    Dialog:Say(szMsg, tbOpt);
end

function tbGift:dm1501()
    local szMsg = "Lựa chọn";
    local tbOpt = {};
    table.insert(tbOpt , {"Đường Môn Tụ Tiễn",  self.dmtt150, self});
    table.insert(tbOpt , {"Đường Môn Hãm Tĩnh",  self.dmht150, self});
    table.insert(tbOpt, {"<bclr=100,10,10><color=166,166,166>Ta chỉ ghé ngang qua"});
    Dialog:Say(szMsg, tbOpt);
end
function tbGift:nd1501()
    local szMsg = "Lựa chọn";
    local tbOpt = {};
    table.insert(tbOpt , {"Ngũ Độc Đao",  self.ndd150, self});
    table.insert(tbOpt , {"Ngũ Độc Chưởng",  self.ndc150, self});
    table.insert(tbOpt, {"<bclr=100,10,10><color=166,166,166>Ta chỉ ghé ngang qua"});
    Dialog:Say(szMsg, tbOpt);
end

function tbGift:mg1501()
    local szMsg = "Lựa chọn";
    local tbOpt = {};
    table.insert(tbOpt , {"Minh Giáo Kiếm",  self.mgk150, self});
    table.insert(tbOpt , {"Minh Giáo Chùy",  self.mgc150, self});
    table.insert(tbOpt, {"<bclr=100,10,10><color=166,166,166>Ta chỉ ghé ngang qua"});
    Dialog:Say(szMsg, tbOpt);
end


function tbGift:nm1501()
    local szMsg = "Lựa chọn";
    local tbOpt = {};
    table.insert(tbOpt , {"Nga Mi Chưởng",  self.nmc150, self});
    table.insert(tbOpt , {"Nga Mi Phụ Trợ",  self.nmpt150, self});
    table.insert(tbOpt, {"<bclr=100,10,10><color=166,166,166>Ta chỉ ghé ngang qua"});
    Dialog:Say(szMsg, tbOpt);
end


function tbGift:ty1501()
    local szMsg = "Lựa chọn";
    local tbOpt = {};
    table.insert(tbOpt , {"Thúy Yên Kiếm",  self.tyk150, self});
    table.insert(tbOpt , {"Thúy Yên Đao",  self.tyd150, self});
    table.insert(tbOpt, {"<bclr=100,10,10><color=166,166,166>Ta chỉ ghé ngang qua"});
    Dialog:Say(szMsg, tbOpt);
end

function tbGift:dt1501()
    local szMsg = "Lựa chọn";
    local tbOpt = {};
    table.insert(tbOpt , {"Đoàn Thị Kiếm",  self.dtk150, self});
    table.insert(tbOpt , {"Đoàn Thị Chỉ",  self.dtc150, self});
    table.insert(tbOpt, {"<bclr=100,10,10><color=166,166,166>Ta chỉ ghé ngang qua"});
    Dialog:Say(szMsg, tbOpt);
end

function tbGift:cb1501()
    local szMsg = "Lựa chọn";
    local tbOpt = {};
    table.insert(tbOpt , {"Cái Bang Chưởng",  self.cbc150, self});
    table.insert(tbOpt , {"Cái Bang Bổng",  self.cbb150, self});
    table.insert(tbOpt, {"<bclr=100,10,10><color=166,166,166>Ta chỉ ghé ngang qua"});
    Dialog:Say(szMsg, tbOpt);
end

function tbGift:tn1501()
    local szMsg = "Lựa chọn";
    local tbOpt = {};
    table.insert(tbOpt , {"Ma Nhẫn Đao",  self.mnd150, self});
    table.insert(tbOpt , {"Thiên Nhẫn Kích",  self.tnk150, self});
    table.insert(tbOpt, {"<bclr=100,10,10><color=166,166,166>Ta chỉ ghé ngang qua"});
    Dialog:Say(szMsg, tbOpt);
end

function tbGift:vd1501()
    local szMsg = "Lựa chọn";
    local tbOpt = {};
    table.insert(tbOpt , {"Võ Đang Kiếm",  self.vdk150, self});
    table.insert(tbOpt , {"Võ Đang Khí",  self.vdc150, self});
    table.insert(tbOpt, {"<bclr=100,10,10><color=166,166,166>Ta chỉ ghé ngang qua"});
    Dialog:Say(szMsg, tbOpt);
end
function tbGift:cl1501()
    local szMsg = "Lựa chọn";
    local tbOpt = {};
    table.insert(tbOpt , {"Côn Lôn Đao",  self.cld150, self});
    table.insert(tbOpt , {"Côn Lôn Kiếm",  self.clk150, self});
    table.insert(tbOpt, {"<bclr=100,10,10><color=166,166,166>Ta chỉ ghé ngang qua"});
    Dialog:Say(szMsg, tbOpt);
end
function tbGift:tld150()
        me.AddFightSkill(1981,20);
end

function tbGift:ThangTien()
        me.AddFightSkill(1443,20);
end

function tbGift:Nhapma()
        me.AddFightSkill(1444,20);
end

function tbGift:tlb150()
        me.AddFightSkill(1958,20);
end


function tbGift:tvt150()
        me.AddFightSkill(1982,20);
end


function tbGift:tvc150()
        me.AddFightSkill(1956,20);
end

function tbGift:dmtt150()
        me.AddFightSkill(1959,20);
end
function tbGift:dmht150()
        me.AddFightSkill(1988,20);
end

function tbGift:ndd150()
        me.AddFightSkill(1984,20);
end

function tbGift:ndc150()
        me.AddFightSkill(1986,20);
end


function tbGift:mgk150()
        me.AddFightSkill(1961,20);
end



function tbGift:mgc150()
        me.AddFightSkill(1996,20);
end

function tbGift:nmc150()
        me.AddFightSkill(1962,20);
end

function tbGift:nmpt150()
        me.AddFightSkill(1990,20);
end

function tbGift:tyk150()
        me.AddFightSkill(1964,20);
end

function tbGift:tyd150()
        me.AddFightSkill(1966,20);
end


function tbGift:dtk150()
        me.AddFightSkill(1968,20);
end

function tbGift:dtc150()
        me.AddFightSkill(1898,20);
end

function tbGift:cbc150()
        me.AddFightSkill(1970,20);
end

function tbGift:cbb150()
        me.AddFightSkill(1992,20);
end


function tbGift:mnd150()
        me.AddFightSkill(1972,20);
end

function tbGift:tnk150()
        me.AddFightSkill(1993,20);
end


function tbGift:vdk150()
        me.AddFightSkill(1979,20);
end


function tbGift:vdc150()
        me.AddFightSkill(1978,20);
end


function tbGift:cld150()
        me.AddFightSkill(1974,20);
end


function tbGift:clk150()
        me.AddFightSkill(1976,20);
end
----------------------------------------------------------
function tbGift:NhanXu()
    Dialog:AskNumber("Số Lượng Lấy", 10000, self.layxu,self);
end
function tbGift:layxu(szSoLuongVatPham)
    me.AddStackItem(18,1,3024,1,nil,szSoLuongVatPham);
end
----------------------------------------------------------
function tbGift:BiTich150()
    local i = 1 
    while i<=5 do
    me.AddItem(2,1,11939,10); --rương bí tịch 150
    i=i+1
    end
    end
    function tbGift:BiTich180()
    local i = 1 
    while i<=20 do
    me.AddItem(18,1,3047,3); --rương bí tịch 180  
    i=i+1
    end
    end
    function tbGift:ManhAn()
    local i = 1 
    while i<=100000 do
    me.AddItem(18,1,1192,12); --rương bí tịch 180
    i=i+1
    end
    end
    
    
--------------------------------------------------------------------------------------------------
function tbGift:MaVuong()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = 
    {
        {"Sét Nam",self.setnam,self};
        {"Sét Nữ",self.setnu,self};        
    };
    Dialog:Say(szMsg, tbOpt);
end
--------------------------------------------------------------------------------------------------
function tbGift:setnam()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = 
    {
        {"Sét Hệ Kim",self.hekim1,self};
        {"Sét Hệ Mộc",self.hemoc1,self};
        {"Sét Hệ Thổ",self.hetho1,self};
        {"Sét Hệ Thủy",self.hethuy1,self};
        {"Sét Hệ Hỏa",self.hehoa1,self};
        
    };
    Dialog:Say(szMsg, tbOpt);
end
--------------------------------------------------------------------------------------------------
--------------------------------------------------------------------------------------------------
function tbGift:setnu()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = 
    {
        {"Sét Hệ Kim",self.hekim2,self};
        {"Sét Hệ Mộc",self.hemoc2,self};
        {"Sét Hệ Thổ",self.hetho2,self};
        {"Sét Hệ Thủy",self.hethuy2,self};
        {"Sét Hệ Hỏa",self.hehoa2,self};
        
    };
    Dialog:Say(szMsg, tbOpt);
end
--------------------------------------------------------------------------------------------------
--------------------------------------------------------------------------------------------------
function tbGift:hekim1()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = 
    {
        {"Sét Hệ Kim Nội",self.kimnoi1,self};
        {"Sét Hệ Kim Ngoại",self.kimngoai1,self};
    };
    Dialog:Say(szMsg, tbOpt);
end
--------------------------------------------------------------------------------------------------
--------------------------------------------------------------------------------------------------
function tbGift:hemoc1()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = 
    {
        {"Sét Hệ Kim Nội",self.mocnoi1,self};
        {"Sét Hệ Kim Ngoại",self.mocngoai1,self};
    };
    Dialog:Say(szMsg, tbOpt);
end
--------------------------------------------------------------------------------------------------
function tbGift:hethuy1()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = 
    {
        {"Sét Hệ Kim Nội",self.thuynoi1,self};
        {"Sét Hệ Kim Ngoại",self.thuyngoai1,self};
    };
    Dialog:Say(szMsg, tbOpt);
end
--------------------------------------------------------------------------------------------------
function tbGift:hehoa1()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = 
    {
        {"Sét Hệ Kim Nội",self.hoanoi1,self};
        {"Sét Hệ Kim Ngoại",self.hoangoai1,self};
    };
    Dialog:Say(szMsg, tbOpt);
end
--------------------------------------------------------------------------------------------------
function tbGift:hetho1()
    local szMsg = "Xin hãy chọn:";
    local tbOpt = 
    {
        {"Sét Hệ Kim Nội",self.thonoi1,self};
        {"Sét Hệ Kim Ngoại",self.thongoai1,self};
    };
    Dialog:Say(szMsg, tbOpt);
end
--------------------------------------------------------------------------------------------------
    function tbGift:kimnoi1()
    local i = 1 
    while i<=1 do
    me.AddItem(4,3,2004,10);
    me.AddItem(4,6,2054,10);
    me.AddItem(4,4,2079,10);
    me.AddItem(4,5,2104,10);
    me.AddItem(4,11,2129,10);
    me.AddItem(4,9,2179,10);
    me.AddItem(4,7,2229,10);
    me.AddItem(4,10,2259,10);
    me.AddItem(4,8,2309,10);
    i=i+1
    end
    end
--------------------------------------------------------------------------------------------------
    function tbGift:mocnoi1()
    local i = 1 
    while i<=1 do
    me.AddItem(4,3,2009,10);
    me.AddItem(4,6,2059,10);
    me.AddItem(4,4,2084,10);
    me.AddItem(4,5,2109,10);
    me.AddItem(4,11,2134,10);
    me.AddItem(4,9,2184,10);
    me.AddItem(4,7,2734,10);
    me.AddItem(4,10,2264,10);
    me.AddItem(4,8,2314,10);
    i=i+1
    end
    end
--------------------------------------------------------------------------------------------------
    function tbGift:thuynoi1()
    local i = 1 
    while i<=1 do
    me.AddItem(4,3,2014,10);
    me.AddItem(4,6,2064,10);
    me.AddItem(4,4,2089,10);
    me.AddItem(4,5,2114,10);
    me.AddItem(4,11,2139,10);
    me.AddItem(4,9,2189,10);
    me.AddItem(4,7,2739,10);
    me.AddItem(4,10,2269,10);
    me.AddItem(4,8,2319,10);
    i=i+1
    end
    end
    
--------------------------------------------------------------------------------------------------
    function tbGift:hoanoi1()
    local i = 1 
    while i<=1 do
    me.AddItem(4,3,2019,10);
    me.AddItem(4,6,2069,10);
    me.AddItem(4,4,2094,10);
    me.AddItem(4,5,2119,10);
    me.AddItem(4,11,2144,10);
    me.AddItem(4,9,2194,10);
    me.AddItem(4,7,2744,10);
    me.AddItem(4,10,2274,10);
    me.AddItem(4,8,2324,10);
    i=i+1
    end
    end
        
--------------------------------------------------------------------------------------------------
    function tbGift:thonoi1()
    local i = 1 
    while i<=1 do
    me.AddItem(4,3,2024,10);
    me.AddItem(4,6,2074,10);
    me.AddItem(4,4,2099,10);
    me.AddItem(4,5,2124,10);
    me.AddItem(4,11,2149,10);
    me.AddItem(4,9,2199,10);
    me.AddItem(4,7,2749,10);
    me.AddItem(410,2279,10);
    me.AddItem(4,8,2329,10);
    i=i+1
    end
    end 

[tuankiss]

Giải nén cái file Patch trên win 10 nó báo viruts nhiều quá ^^! Xóa mất luôn cái Game.exe !

[tongtulenh]

Giải nén cái file Patch trên win 10 nó báo viruts nhiều quá ^^! Xóa mất luôn cái Game.exe !

lấy cái game.exe khác cho vào là đc

[mylove2004tc]

Skill 180 quá đã mình đang kiếm cái này về chơi. Sướng quá
Đánh boss 95 thử nó rơi ra đồ nâng cấp ngựa v.vv. y như mấy cái online luôn đã quá..Thế là em bỏ được mấy cái server online rồi đấy nhá..
Qua Lâm An xem SHOP thì y như đang chơi online aa.aaa... đã quá
Kết nhất con Thần Thú GM kháng +10k haha đeo lên trâu vãi ra
Chơi offf làm ad luôn cho đã

1000 thanks[Only registered and activated users can see links. ][Only registered and activated users can see links. ]
[Only registered and activated users can see links. ][Only registered and activated users can see links. ][Only registered and activated users can see links. ][Only registered and activated users can see links. ]
[Only registered and activated users can see links. ][Only registered and activated users can see links. ][Only registered and activated users can see links. ]
[Only registered and activated users can see links. ]

[tongtulenh]

Ok nếu bạn thích thì sắp tới sẽ có thêm tính năng nữa mình đang làm dở tại đang bận quá chưa viết xong hết