PHP Code:
--脨脗脢脰脌帽掳眉拢潞赂拢脌没掳忙脥脝鲁枚潞贸拢卢脣霉脫脨脨脗脥忙录脪驴脡脪脭脕矛脠隆脪禄赂枚脨脗脢脰脌帽掳眉拢卢脙驴碌陆脪禄露篓碌脠录露戮霉驴脡麓脫脨脗脢脰脌帽掳眉脰脨禄帽碌脙脪禄露篓脢媒脕驴碌脛陆冒脟庐录露碌脌戮脽陆卤脌酶拢卢脳脺录脹脰碌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 = 20000; --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;
tbGift.TaskId_Count = 1;
tbGift.Use_Max =1;
tbGift.TASK_GROUP_ID1 = 3001;
tbGift.TASK_GROUP_ID2 = 3002;
tbGift.TASK_GROUP_ID3 = 3003;
tbGift.TASK_GROUP_ID4 = 3004;
tbGift.TASK_GROUP_ID5 = 3005;
tbGift.TASK_GROUP_ID6 = 3006;
tbGift.TASK_GROUP_ID7 = 3007;
tbGift.TASK_GROUP_ID8 = 3008;
local tbGift = Item:GetClass("newplayergift");
tbGift.tbItemInfo = {
bForceBind=1,
};
--------------------------------------------------------------------------------
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=pink>++<color>Hỗ trợ tân thủ <color=pink>++<color>",self.HoTro,self};
{"<color=pink>++<color>Nhận thưởng hàng ngày <color=pink>++<color>",self.NhanThuongHangNgay,self};
{"Để 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 = "Chào mừng bạn đến với <color=green>Kiếm Thế Bắc Ninh<color> - Dev by <color=blue>Nobita<color>";
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
tbGift.tbSetItem = {
{{2,6,161,10},{2,6,171,10},{2,6,181,10},{2,6,191,10},{2,6,201,10},{2,6,161,10},{2,6,171,10},{2,6,181,10},{2,6,191,10},{2,6,201,10},},--phu
{{2,7,312,10},{2,7,332,10},{2,7,352,10},{2,7,372,10},{2,7,492,10},{2,7,322,10},{2,7,342,10},{2,7,362,10},{2,7,382,10},{2,7,402,10},},--giay
{{2,10,628,10},{2,10,332,10},{2,10,652,10},{2,10,372,10},{2,10,392,10},{2,10,322,10},{2,10,342,10},{ 2,10,362,10},{2,10,382,10},{2,10,502,10},},--bao tay
{{2,5,160,10},{2,5,170,10},{2,5,180,10},{2,5,190,10},{2,5,200,10},{2,5,160,10},{2,5,170,10},{2,5,180 ,10},{2,5,190,10},{2,5,200,10},},--lien
{{2,11,310,10},{2,11,330,10},{2,11,350,10},{2,11,370,10},{2,11,390,10},{2,11,320,10},{2,11,340,10},{ 2,11,360,10},{2,11,380,10},{2,11,400,10},},--ngoc boi
{{2,4,160,10},{2,4,170,10},{2,4,180,10},{2,4,190,10},{2,4,250,10},{2,4,160,10},{2,4,170,10},{2,4,180 ,10},{2,11,190,10},{2,4,200,10},},--gioi chi
{{2,8,310,10},{2,8,330,10},{2,8,350,10},{2,8,470,10},{2,8,390,10},{2,8,320,10},{2,8,340,10},{2,8,360 ,10},{2,8,380,10},{2,8,400,10},},--dai
{{2,3,612,10},{2,3,652,10},{2,3,692,10},{2,3,732,10},{2,3,772,10},{2,3,622,10},{2,3,662,10},{2,3,702 ,10},{2,3,742,10},{2,3,802,10},},--ao
{{2,9,610,10},{2,9,650,10},{2,9,690,10},{2,9,730,10},{2,9,770,10},{2,9,620,10},{2,9,660,10},{2,9,700 ,10},{2,9,760,10},{2,9,800,10},},--mu
{{2,1,551,10},{2,1,591,10},{2,1,611,10},{2,1,651,10},{2,1,691,10},{2,1,551,10},{2,1,591,10},{2,1,611 ,10},{2,1,651,10},{2,1,691,10},},
{{2,1,561,10},{2,1,601,10},{2,1,621,10},{2,1,661,10},{2,1,701,10},{2,1,561,10},{2,1,601,10},{2,1,621 ,10},{2,1,661,10},{2,1,701,10},},
{{2,1,571,10},{2,1,981,10},{2,1,631,10},{2,1,671,10},{2,1,711,10},{2,1,571,10},{2,1,981,10},{2,1,631 ,10},{2,1,671,10},{2,1,711,10},},
{{2,1,581,10},{2,2,100,10},{2,1,641,10},{2,1,681,10},{2,1,721,10},{2,1,581,10},{2,2,100,10},{2,1,641 ,10},{2,1,681,10},{2,1,721,10},},
{{2,1,1172,10},{2,2,90,10},{2,1,811,10},{2,1,851,10},{2,1,891,10},{2,1,1172,10},{2,2,90,10},{2,1,811 ,10},{2,1,851,10},{2,1,891,10},},
{{2,1,1145,10},{2,1,911,10},{2,1,1183,10},{2,1,1208,10},{2,1,1211,10},{2,1,1145,10},{2,1,911,10},{2, 1,1183,10},{2,1,1208,10},{2,1,1211,10},},
}
-------------------------------
function tbGift:TrangBi100(nFlag, nSeries)
local nCount = me.GetTask(self.TASK_GROUP_ID6, self.TaskId_Count);
if nCount >= self.Use_Max then
local szMsg = "<color=yellow>Phần thưởng chỉ nhận được 1 lần :<color>";
local tbOpt = {
{"Bạn đã nhận phần thưởng này rồi..."};
};
Dialog:Say(szMsg, tbOpt);
return 0;
end
if (nCount == 0) then
if not nFlag then
local szMsg = "Nhận trang bị hệ nào?";
local tbOpt =
{
{"Hệ Kim",self.TrangBi100,self,1,1},
{"Hệ Mộc",self.TrangBi100,self,1,2},
{"Hệ Thủy",self.TrangBi100,self,1,3},
{"Hệ Hỏa",self.TrangBi100,self,1,4},
{"Hệ Thổ",self.TrangBi100,self,1,5},
}
Dialog:Say(szMsg,tbOpt);
elseif nFlag == 1 then
local szMsg = "Nam hay nữ?";
local tbOpt =
{
{"Nam",self.TrangBi100,self,2,nSeries},
{"Nữ",self.TrangBi100,self,2,nSeries+5},
}
Dialog:Say(szMsg,tbOpt);
else
local tbItems = self.tbSetItem;
for i = 1, 15 do
me.AddItem(unpack(tbItems[i][nSeries])).Bind(1);
me.SetTask(self.TASK_GROUP_ID6, self.TaskId_Count, nCount + 1);
end
end
end
end
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
function tbGift:LenLevel1101()
me.AddLevel(110 - me.nLevel);
end
--------------------------------------------------------------------------------
function tbGift:BacDong1()
--me.Earn(5000000,0);
--me.AddJbCoin(10000);
me.AddBindCoin(3000000);
me.AddBindMoney(50000000);
end
--------------------------------------------------------------------------------
function tbGift:Tui1()
me.AddStackItem(21,9,1,1,self.tbItemInfo,1);
me.AddStackItem(21,9,2,1,self.tbItemInfo,1);
me.AddStackItem(21,9,3,1,self.tbItemInfo,1);
end
----------------------------------------------------------------------------------
function tbGift:TinhHoatLuc1()
me.ChangeCurMakePoint(500000,0);
me.ChangeCurGatherPoint(500000,0);
end
--------------------------------------------------------------------------------
function tbGift:ThuCuoi1()
me.AddStackItem(1,12,45,4,self.tbItemInfo,1);
end
function tbGift:nhiemvu1110()
me.AddStackItem(18,1,200,1,self.tbItemInfo,1);
me.AddStackItem(18,1,201,1,self.tbItemInfo,1);
me.AddStackItem(18,1,202,1,self.tbItemInfo,1);
me.AddStackItem(18,1,203,1,self.tbItemInfo,1);
me.AddStackItem(18,1,204,1,self.tbItemInfo,1);
me.AddStackItem(18,1,263,1,self.tbItemInfo,1);
me.AddStackItem(18,1,264,1,self.tbItemInfo,1);
me.AddStackItem(18,1,265,1,self.tbItemInfo,1);
me.AddStackItem(18,1,266,1,self.tbItemInfo,1);
me.AddStackItem(18,1,267,1,self.tbItemInfo,1);
end
----------------------------------------------------------------------------------
----------------------------------------------------------------------------------
----------------------------------------------------------------------------------
function tbGift:HoTro()
local szMsg = "Chào mừng bạn đến với <color=green>Kiếm Thế Bắc Ninh<color> - Dev by <color=blue>Nobita<color>";
local szMsg = "Xin hãy chọn:";
local tbOpt = {
{"Nhận thăng cấp 110 ", self.LenLevel110, self},
{"Túi 24 ô",self.Tui,self};
{"Thú Cưỡi",self.ThuCuoi,self};
{"Tinh lực - Hoạt Lực",self.TinhHoatLuc,self};
{"Nhận Bạc - Đồng ",self.BacDong,self};
{"Đồ Nhiệm Vụ 110",self.nhiemvu110,self};
{"Nhận set đồ hỗ trợ ",self.TrangBi100,self};
{"Mật Tịch Cao",self.MatTichCao, self};
{"Ta Chỉ Xem Qua Thôi..."},
};
Dialog:Say(szMsg, tbOpt);
end
function tbGift:NhanThuongHangNgay()
local szMsg = "<color=yellow>Phần thưởng<color><color=pink> Nhận thưởng hàng ngày<color> nhận tại <color=yellow>Tu Luyện Châu. Xin hãy gia nhập phái :<color>";
local tbOpt = {
{"Kết thúc đối thoại..."},
};
Dialog:Say(szMsg, tbOpt);
end
function tbGift:LenLevel110()
local nCount = me.GetTask(self.TASK_GROUP_ID1, self.TaskId_Count);
if nCount >= self.Use_Max then
local szMsg = "<color=yellow>Phần thưởng chỉ nhận được 1 lần :<color>";
local tbOpt = {
{"Bạn đã nhận phần thưởng này rồi..."};
};
Dialog:Say(szMsg, tbOpt);
return 0;
end
if (nCount == 0) then
local szMsg = "<color=yellow>Phần thưởng chỉ nhận được 1 lần. Hãy chọn<color><color=pink> Nhận thưởng <color><color=yellow>:<color>";
local tbOpt = {
{"Nhận thưởng", self.LenLevel1101, self};
};
Dialog:Say(szMsg, tbOpt);
end
me.SetTask(self.TASK_GROUP_ID1, self.TaskId_Count, nCount + 1);
end
function tbGift:Tui()
local nCount = me.GetTask(self.TASK_GROUP_ID2, self.TaskId_Count);
if nCount >= self.Use_Max then
local szMsg = "<color=yellow>Phần thưởng chỉ nhận được 1 lần. Hãy chọn<color><color=pink> Nhận thưởng <color><color=yellow>:<color>";
local tbOpt = {
{"Bạn đã nhận phần thưởng này rồi ..."};
};
Dialog:Say(szMsg, tbOpt);
return 0;
end
if (nCount == 0) then
local szMsg = "<color=yellow>Phần thưởng chỉ nhận được 1 lần. Hãy chọn<color><color=pink> Nhận thưởng <color><color=yellow>:<color>";
local tbOpt = {
{"Nhận thưởng", self.Tui1, self};
};
Dialog:Say(szMsg, tbOpt);
end
me.SetTask(self.TASK_GROUP_ID2, self.TaskId_Count, nCount + 1);
end
function tbGift:BacDong()
local nCount = me.GetTask(self.TASK_GROUP_ID5, self.TaskId_Count);
if nCount >= self.Use_Max then
local szMsg = "<color=yellow>Phần thưởng chỉ nhận được 1 lần :<color>";
local tbOpt = {
{"Bạn đã nhận phần thưởng này rồi..."};
};
Dialog:Say(szMsg, tbOpt);
return 0;
end
if (nCount == 0) then
local szMsg = "<color=yellow>Phần thưởng chỉ nhận được 1 lần. Hãy chọn<color><color=pink> Nhận thưởng <color><color=yellow>:<color>";
local tbOpt = {
{"Nhận thưởng", self.BacDong1, self};
};
Dialog:Say(szMsg, tbOpt);
end
me.SetTask(self.TASK_GROUP_ID5, self.TaskId_Count, nCount + 1);
end
function tbGift:ThuCuoi()
local nCount = me.GetTask(self.TASK_GROUP_ID3, self.TaskId_Count);
if nCount >= self.Use_Max then
local szMsg = "<color=yellow>Phần thưởng chỉ nhận được 1 lần :<color>";
local tbOpt = {
{"Bạn đã nhận phần thưởng này rồi..."};
};
Dialog:Say(szMsg, tbOpt);
return 0;
end
if (nCount == 0) then
local szMsg = "<color=yellow>Phần thưởng chỉ nhận được 1 lần. Hãy chọn<color><color=pink> Nhận thưởng <color><color=yellow>:<color>";
local tbOpt = {
{"Nhận thưởng", self.ThuCuoi1, self};
};
Dialog:Say(szMsg, tbOpt);
end
me.SetTask(self.TASK_GROUP_ID3, self.TaskId_Count, nCount + 1);
end
function tbGift:TinhHoatLuc()
local nCount = me.GetTask(self.TASK_GROUP_ID4, self.TaskId_Count);
if nCount >= self.Use_Max then
local szMsg = "<color=yellow>Phần thưởng chỉ nhận được 1 lần :<color>";
local tbOpt = {
{"Bạn đã nhận phần thưởng này rồi..."};
};
Dialog:Say(szMsg, tbOpt);
return 0;
end
if (nCount == 0) then
local szMsg = "<color=yellow>Phần thưởng chỉ nhận được 1 lần. Hãy chọn<color><color=pink> Nhận thưởng <color><color=yellow>:<color>";
local tbOpt = {
{"Nhận thưởng", self.TinhHoatLuc1, self};
};
Dialog:Say(szMsg, tbOpt);
end
me.SetTask(self.TASK_GROUP_ID4, self.TaskId_Count, nCount + 1);
end
function tbGift:nhiemvu110()
local nCount = me.GetTask(self.TASK_GROUP_ID7, self.TaskId_Count);
if nCount >= self.Use_Max then
local szMsg = "<color=yellow>Phần thưởng chỉ nhận được 1 lần :<color>";
local tbOpt = {
{"Bạn đã nhận phần thưởng này rồi..."};
};
Dialog:Say(szMsg, tbOpt);
return 0;
end
if (nCount == 0) then
local szMsg = "<color=yellow>Phần thưởng chỉ nhận được 1 lần. Hãy chọn<color><color=pink> Nhận thưởng <color><color=yellow>:<color>";
local tbOpt = {
{"Nhận thưởng", self.nhiemvu1110, self};
};
Dialog:Say(szMsg, tbOpt);
end
me.SetTask(self.TASK_GROUP_ID7, self.TaskId_Count, nCount + 1);
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
--------------------------------------
-------------------------------------
--------------------------------------
--================================================================
--================================================================