lyvanbethao
12-08-12, 12:03 PM
trong đây cái hàm nhận mtcc là nhận không giới hạng giờ muốn chĩnh cho nhận 1 lần giống mấy thứ kia thì sửa ntn các bạn chỉ dùm
--脨脗脢脰脌帽掳眉拢潞赂拢脌没掳忙� �脝鲁枚潞贸拢卢脣霉脫脨脨脗脥忙录� ��驴脡脪脭脕矛脠隆脪禄赂枚脨脗脢脰 脌帽掳眉拢卢脙驴碌陆脪禄露篓碌脠� �露戮霉驴脡麓脫脨脗脢脰脌帽掳眉脰� ��禄帽碌脙脪禄露篓脢媒脕驴碌脛陆冒 脟庐录露碌脌戮脽陆卤脌酶拢卢脳脺� �脹脰碌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,1 0},{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,1 0},{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,3 72,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,1 0},{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,3 70,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,1 0},{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,1 0},{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,1 0},{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,1 0},{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,1 0},{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,1 0},{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,1 0},{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,1 0},{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,1 0},{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,120 8,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
--------------------------------------
-------------------------------------
--------------------------------------
--================================================== ==============
--================================================== ==============
thans:ar! you và muôn chuyễn cái túi này qua lể quan nhận luôn nhé các bạn thanks bõ mấy cái nhận thưởng theo level dum mì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 = 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,1 0},{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,1 0},{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,3 72,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,1 0},{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,3 70,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,1 0},{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,1 0},{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,1 0},{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,1 0},{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,1 0},{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,1 0},{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,1 0},{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,1 0},{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,1 0},{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,120 8,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
--------------------------------------
-------------------------------------
--------------------------------------
--================================================== ==============
--================================================== ==============
thans:ar! you và muôn chuyễn cái túi này qua lể quan nhận luôn nhé các bạn thanks bõ mấy cái nhận thưởng theo level dum mình