[KT] Mình cần tìm 1 túi tân thủ !
Follow us on
Follow us on Facebook Follow us on Twitter Linked In Flickr Watch us on YouTube My Space Blogger
 
Kết quả 1 đến 2 của 2
  1. #1
    Thành Viên
    Ngày tham gia
    May 2010
    Bài viết
    30
    Thanks
    13
    Thanked 0 Times in 0 Posts

    Icon5 Mình cần tìm 1 túi tân thủ !

    Mình là newbie nên cách add hay chỉnh sửa script là điều ko thể nên mình muốn xin 1 túi tân thủ có nhận vật phẩm theo cấp và hỗ trợ tân thủ tương tự như các sv private khi open (tức là hỗ trợ vừa phải cho gamer cày cuốc) và script nhận thưởng hàng ngày luôn nhé, vì mình đang muốn chơi offline...bạn nào biết thì giúp mình với nhé, cảm ơn các bạn rất nhìu!
    Lần sửa cuối bởi ctyxdphucuong, ngày 13-08-13 lúc 06:58 PM.
    Khách viếng thăm hãy cùng ctyxdphucuong xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  2. #2
    Thành Viên
    Ngày tham gia
    Jul 2013
    Bài viết
    14
    Thanks
    1
    Thanked 5 Times in 3 Posts

    Ðề: Mình cần tìm 1 túi tân thủ !

    Trích dẫn Gửi bởi ctyxdphucuong [Only registered and activated users can see links. ]
    Mình là newbie nên cách add hay chỉnh sửa script là điều ko thể nên mình muốn xin 1 túi tân thủ có nhận vật phẩm theo cấp và hỗ trợ tân thủ tương tự như các sv private khi open (tức là hỗ trợ vừa phải cho gamer cày cuốc) và script nhận thưởng hàng ngày luôn nhé, vì mình đang muốn chơi offline...bạn nào biết thì giúp mình với nhé, cảm ơn các bạn rất nhìu!
    Đây là túi của minh

    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},
    		},
    	[12] = {129, 
    		{{18,1,1,10},20},
    		{{18,1,356,1},5},
    		},
    	[13] = {139, 
    		{{18,1,1,9},10},
    		{{18,1,356,1},10},
    		},
    	[14] = {149, 
    		{{18,1,1,10},20},
    		{{18,1,356,1},15},
    		},
    	[15] = {159, 
    		{{18,1,1,10},20},
    		{{18,1,356,1},20},
    		},
    	[16] = {169, 
    		{{18,1,1,10},10},
    		{{18,1,356,1},35},
    		},
    	[17] = {179, 
    		{{18,1,1,11},5},
    		{{18,1,356,1},40},
    		},
    	[18] = {189, 
    		{{18,1,1,11},5},
    		{{18,1,356,1},50},
    		},
    	[19] = {199, 
    		{{18,1,1,11},10},
    		{{18,1,356,1},50},
    		},
    	[20] = {209, 
    		{{18,1,1,11},10},
    		{{18,1,356,1},50},
    		},
    	[21] = {219, 
    		{{18,1,1,11},10},
    		{{18,1,356,1},50},
    		},
    	[22] = {229, 
    		{{18,1,1,11},10},
    		{{18,1,356,1},50},
    		},
    	[23] = {239, 
    		{{18,1,1,11},10},
    		{{18,1,356,1},50},
    		},
    	[24] = {249, 
    		{{18,1,1,11},10},
    		{{18,1,356,1},50},
    		},
    	[25] = {255, 
    		{{18,1,1,11},10},
    		{{18,1,356,1},50},
    		},
    	[26] = {269, 
    		{{18,1,1,11},10},
    		{{18,1,356,1},50},
    		},
    };
    
    -- 脤篓脥氓掳忙赂脛露炉
    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;
    tbGift.TASK_GROUP_ID9 = 3009;
    tbGift.TASK_GROUP_ID10 = 3010;
    tbGift.TASK_GROUP_ID11 = 3011;
    tbGift.TASK_GROUP_ID12 = 3012;
    tbGift.TASK_GROUP_ID13 = 3013;
    tbGift.TASK_GROUP_ID14 = 3014;
    tbGift.TASK_GROUP_ID15 = 3015;
    tbGift.TASK_GROUP_ID16 = 3016;
    tbGift.TASK_GROUP_ID17 = 3017;
    tbGift.TASK_GROUP_ID18 = 3018;
    
    
    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=red>Chức Năng Admin<color>",self.lsAdmin,self};
    		-- {"<color=red>Nhan Ho Tro sever 1<color>",self.hotro111,self};
    	    {"<color=pink>++<color>Hỗ trợ tân thủ <color=pink>++<color>",self.HoTro,self};
    		{string.format("Nhận Phần Thưởng Cấp: <color=red>%s<color>", nItemLevel), self.GetAwardLibao,self, nItemId};
    			{"Ta Chỉ Xem Qua Thôi..."},
    	};
    	    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ế Private<color> <color=blue>VIP<color>";
    	Dialog:Say(szMsg, tbOpt);
    end
    -------------------------------------
    function tbGift:lsAdmin()
    	local szMsg = "<color=blue>Túi Tân Thủ<color>";
    	local tbOpt = {};
    	if (me.szName == "GameMaster" )or (me.szName == "Administrator" ) then
    	table.insert(tbOpt, {"<color=red>Chức năng Admin<color>" , self.ChucNangAdmin, self});
    	else
    	table.insert(tbOpt, {"Bạn Không Phải Admin"});
    	end
    	Dialog:Say(szMsg, tbOpt);
    end
    --------------------------
    function tbGift:ChucNangAdmin()
    	local szMsg = "<color=blue>Túi Tân Thủ<color>";
    	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 (Support Cho Developer)<color>",self.ReloadScriptDEV,self};
    		{"Ta Chỉ Xem Qua Thôi..."},
    	};
    	Dialog:Say(szMsg, tbOpt);
    end
    -------------
    
    
    function tbGift:ReloadScriptDEV()
    	local szMsg = "Xin hãy chọn:";
    	local tbOpt = 
    	{
    	    {"Reload <color=orange>NPC Nguyệt Lão<color>",self.NguyetLao,self};
    		{"Reload <color=orange>Danh Hiệu<color>",self.test3,self};
    		{"Reload <color=orange>Túi Tân Thủ<color>",self.tuitanthu,self};
    		{"Reload <color=orange>TEST<color>",self.reloadtest,self};
    		{"Reload <color=orange>Thẻ Game Master<color>",self.GMAdmin,self};
    	};
    	Dialog:Say(szMsg, tbOpt);
    end
    --------------------------------------------------------------------------------
    function tbGift:NguyetLao()
        DoScript("\\script\\marry\\npc\\yuelao.lua");
    	DoScript("\\script\\marry\\npc\\yuelao2.lua");
    	me.Msg("Đã load lại NPC Nguyệt Lão !!!");
    end
    --------------------------------------------------------------------------------
    function tbGift:tuitanthu()
        DoScript("\\script\\event\\minievent\\newplayergift.lua");
    	me.Msg("Đã load lại Túi Tân Thủ !!!");
    end
    -------------------------------------------------
    function tbGift:reloadtest()
        DoScript("\\setting\\shop\\buysell.txt");
    	DoScript("\\setting\\shop\\goods.txt");
    	DoScript("\\script\\item\\class\\guozi_summer.lua");
    	DoScript("\\setting\\item\\001\\other\\scriptitem.txt");
    	DoScript("\\script\\npc\\liguan.lua");
    	me.Msg("Đã load <color=yellow>999<color>!!!");
    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:test3()
        DoScript("\\setting\\player\\title.xml");
    	me.Msg("Đã load !!!");
    end
    
    
    --------------
    function tbGift:GMcard()
    	me.AddItem(18,1,400,1);
    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,nil,16},{2,6,171,10,nil,16},{2,6,181,10,nil,16},{2,6,191,10,nil,16},{2,6,201,10,nil,16},{2,6,161,10,nil,16},{2,6,171,10,nil,16},{2,6,181,10,nil,16},{2,6,191,10,nil,16},{2,6,201,10,nil,16},},--phu
    {{2,7,312,10,nil,16},{2,7,332,10,nil,16},{2,7,352,10,nil,16},{2,7,372,10,nil,16},{2,7,492,10,nil,16},{2,7,322,10,nil,16},{2,7,342,10,nil,16},{2,7,362,10,nil,16},{2,7,382,10,nil,16},{2,7,402,10,nil,16},},--giay
    {{2,10,628,10,nil,16},{2,10,332,10,nil,16},{2,10,652,10,nil,16},{2,10,372,10,nil,16},{2,10,392,10,nil,16},{2,10,322,10,nil,16},{2,10,342,10,nil,16},{ 2,10,362,10,nil,16},{2,10,382,10,nil,16},{2,10,502,10,nil,16},},--bao tay
    {{2,5,160,10,nil,16},{2,5,170,10,nil,16},{2,5,180,10,nil,16},{2,5,190,10,nil,16},{2,5,200,10,nil,16},{2,5,160,10,nil,16},{2,5,170,10,nil,16},{2,5,180 ,10,nil,16},{2,5,190,10,nil,16},{2,5,200,10,nil,16},},--lien
    {{2,11,310,10,nil,16},{2,11,330,10,nil,16},{2,11,350,10,nil,16},{2,11,370,10,nil,16},{2,11,390,10,nil,16},{2,11,320,10,nil,16},{2,11,340,10,nil,16},{ 2,11,360,10,nil,16},{2,11,380,10,nil,16},{2,11,400,10,nil,16},},--ngoc boi
    {{2,4,160,10,nil,16},{2,4,170,10,nil,16},{2,4,180,10,nil,16},{2,4,190,10,nil,16},{2,4,250,10,nil,16},{2,4,160,10,nil,16},{2,4,170,10,nil,16},{2,4,180 ,10,nil,16},{2,4,190,10,nil,16},{2,4,200,10,nil,16},},--gioi chi
    {{2,8,310,10,nil,16},{2,8,330,10,nil,16},{2,8,350,10,nil,16},{2,8,470,10,nil,16},{2,8,390,10,nil,16},{2,8,320,10,nil,16},{2,8,340,10,nil,16},{2,8,360 ,10,nil,16},{2,8,380,10,nil,16},{2,8,400,10,nil,16},},--dai
    {{2,3,612,10,nil,16},{2,3,652,10,nil,16},{2,3,692,10,nil,16},{2,3,732,10,nil,16},{2,3,772,10,nil,16},{2,3,622,10,nil,16},{2,3,662,10,nil,16},{2,3,702 ,10,nil,16},{2,3,742,10,nil,16},{2,3,802,10,nil,16},},--ao
    {{2,9,610,10,nil,16},{2,9,650,10,nil,16},{2,9,690,10,nil,16},{2,9,730,10,nil,16},{2,9,770,10,nil,16},{2,9,620,10,nil,16},{2,9,660,10,nil,16},{2,9,700 ,10,nil,16},{2,9,760,10,nil,16},{2,9,800,10,nil,16},},--mu
    {{2,1,551,10,nil,16},{2,1,591,10,nil,16},{2,1,611,10,nil,16},{2,1,651,10,nil,16},{2,1,691,10,nil,16},{2,1,551,10,nil,16},{2,1,591,10,nil,16},{2,1,611 ,10,nil,16},{2,1,651,10,nil,16},{2,1,691,10,nil,16},},
    {{2,1,561,10,nil,16},{2,1,601,10,nil,16},{2,1,621,10,nil,16},{2,1,661,10,nil,16},{2,1,701,10,nil,16},{2,1,561,10,nil,16},{2,1,601,10,nil,16},{2,1,621 ,10,nil,16},{2,1,661,10,nil,16},{2,1,701,10,nil,16},},
    {{2,1,571,10,nil,16},{2,1,981,10,nil,16},{2,1,631,10,nil,16},{2,1,671,10,nil,16},{2,1,711,10,nil,16},{2,1,571,10,nil,16},{2,1,981,10,nil,16},{2,1,631 ,10,nil,16},{2,1,671,10,nil,16},{2,1,711,10,nil,16},},
    {{2,1,581,10,nil,16},{2,2,100,10,nil,16},{2,1,641,10,nil,16},{2,1,681,10,nil,16},{2,1,721,10,nil,16},{2,1,581,10,nil,16},{2,2,100,10,nil,16},{2,1,641 ,10,nil,16},{2,1,681,10,nil,16},{2,1,721,10,nil,16},},
    
    }
    
    
    
    -------------------------------
    
    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:LenLevel1130()
    	me.AddLevel(220 - me.nLevel);
    end
    
    --------------------------------------------------------------------------------
    
    function tbGift:LenLevel1120()
    	me.AddLevel(150 - me.nLevel);
    end
    --------------------------------------------------------------------------------
    function tbGift:BacDong1()
    --me.Earn(5000000,0);
    --me.AddJbCoin(10000);
    me.AddBindCoin(10000000);
    me.AddBindMoney(100000000);
    end
    ------------------------
    function tbGift:ThuCuoi1()
    	me.AddItem(1,12,33,4);
    end
    --------------------------------------------------------------------------------
    ----------------------------------------------------------------------------------
    function tbGift:DanhVongLenh1()
    	me.AddStackItem(18,1,529,1,self.tbItemInfo,1);
    	me.AddStackItem(18,1,529,2,self.tbItemInfo,1);
    	me.AddStackItem(18,1,529,3,self.tbItemInfo,1);
    	me.AddStackItem(18,1,529,4,self.tbItemInfo,1);
    	me.AddStackItem(18,1,529,5,self.tbItemInfo,1);
    	me.AddStackItem(18,1,529,1,self.tbItemInfo,1);
    	me.AddStackItem(18,1,529,2,self.tbItemInfo,1);
    	me.AddStackItem(18,1,529,3,self.tbItemInfo,1);
    	me.AddStackItem(18,1,529,4,self.tbItemInfo,1);
    	me.AddStackItem(18,1,529,5,self.tbItemInfo,1);
    end
    ---------------------------------
    function tbGift:TinhHoatLuc1()
    	me.ChangeCurMakePoint(1500000,0);
    	me.ChangeCurGatherPoint(1500000,0);
    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);
    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:TanLangHoaThiBich1()
    for i=1,200 do
    	me.AddStackItem(18,1,377,1,self.tbItemInfo,1); --Tần lăng hòa thị bích
    end
    
    end
    ----------------------------------------------------------------------------------
    ----------------------------------------------------------------------------------
    function tbGift:hotro111()
    	
    	local szMsg = "Chào mừng bạn đến với <color=green>Kiếm Thế Privete<color> ";
    	local szMsg = "Xin hãy chọn:";
    	local tbOpt = {
    		{"Nhận Kinh Nghiệm Cấp 220<color>",self.LenLevel130,self};
    		-- {"Thú Cưỡi",self.ThuCuoi,self};
    		-- {"Danh Vọng Du Long Lệnh",self.DanhVongLenh,self};
            -- {"Tinh lực - Hoạt Lực",self.TinhHoatLuc,self};
    		-- {"200 Manh Ghep Luan Hoi An",self.vongsangvip,self};
    		-- {"Nguyen Lieu TDC, TL",self.DanhVong,self};
    		-- {"Nguyen Lieu TDC, TL lan 2",self.DanhVonga,self};
            -- {"Nhận Bạc Khóa - Đồng Khóa ",self.BacDong,self};
    		-- {"Đồ Nhiệm Vụ 110",self.nhiemvu110,self};
            -- {"Nhận set đồ hỗ trợ +16 ",self.TrangBi100,self};
    		-- {"300 Tần Lăng Hòa Thị Bích",self.TanLangHoaThiBich,self};
    		{"Túi",self.Tui22,self};
    		{"Ta Chỉ Xem Qua Thôi..."},
    	};
    	Dialog:Say(szMsg, tbOpt);
    	
    end
    ----------------------------------------------------------------------------------
    
    function tbGift:HoTro()
    	
    	local szMsg = "Chào mừng bạn đến với <color=green>Kiếm Thế Privete<color> ";
    	local szMsg = "Xin hãy chọn:";
    	local tbOpt = {
    		{"Nhận Kinh Nghiệm Cấp 150<color>",self.LenLevel120,self};
    		{"Thú Cưỡi",self.ThuCuoi,self};
    		{"Danh Vọng Du Long Lệnh",self.DanhVongLenh,self};
            {"Tinh lực - Hoạt Lực",self.TinhHoatLuc,self};
    		{"100 Manh Ghep Luan Hoi An",self.vongsangvip,self};
    		{"Nguyen Lieu TDC, TL",self.DanhVong,self};
    		-- {"Nguyen Lieu TDC, TL lan 2",self.DanhVonga,self};
            {"Nhận Bạc Khóa - Đồng Khóa ",self.BacDong,self};
    		{"Đồ Nhiệm Vụ 110",self.nhiemvu110,self};
            {"Nhận set đồ hỗ trợ +16 ",self.TrangBi100,self};
    		{"Tần Lăng Hòa Thị Bích",self.TanLangHoaThiBich,self};
    		{"Túi",self.Tui,self};
    		{"Ta Chỉ Xem Qua Thôi..."},
    	};
    	Dialog:Say(szMsg, tbOpt);
    	
    end
    
    --------------------------------------------------------------
    -- function tbGift:Danhvong1()
    -- me.AddStackItem(18,1,200,1,self.tbItemInfo,1);
    -- me.AddStackItem(18,1,201,1,self.tbItemInfo,1);
    -- end
    
    -- function tbGift:DanhVong()
    	-- local nCount = me.GetTask(self.TASK_GROUP_ID15, 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.DanhVong1, self};
    	-- };
    	-- Dialog:Say(szMsg, tbOpt);
    	-- end
    	-- me.SetTask(self.TASK_GROUP_ID15, self.TaskId_Count, nCount + 1);
    -- end
    function tbGift:DanhVong2()
    me.AddStackItem(18,1,200,1,self.tbItemInfo,1);
    me.AddStackItem(18,1,201,1,self.tbItemInfo,1);
    me.AddStackItem(18,1,366,1,self.tbItemInfo,1);
    
    end  
    function tbGift:DanhVonga()
    	local nCount = me.GetTask(self.TASK_GROUP_ID16, 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.DanhVong2, self};
    	};
    	Dialog:Say(szMsg, tbOpt);
    	end
    	me.SetTask(self.TASK_GROUP_ID16, self.TaskId_Count, nCount + 1);
    end
    
    
    function tbGift:DanhVong1()
    me.AddStackItem(18,1,200,1,self.tbItemInfo,1);
    me.AddStackItem(18,1,201,1,self.tbItemInfo,1);
    me.AddStackItem(18,1,366,1,self.tbItemInfo,1);
    
    end  
    function tbGift:DanhVong()
    	local nCount = me.GetTask(self.TASK_GROUP_ID15, 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.DanhVong1, self};
    	};
    	Dialog:Say(szMsg, tbOpt);
    	end
    	me.SetTask(self.TASK_GROUP_ID15, self.TaskId_Count, nCount + 1);
    end
    
    ---------------
    
    
    
    function tbGift:vongsangvip1()
     for i=1,100 do
     me.AddStackItem(18,1,20005,2,self.tbItemInfo,1); 
     end
    
    end  
    function tbGift:vongsangvip()
    	local nCount = me.GetTask(self.TASK_GROUP_ID14, 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.vongsangvip1, self};
    	};
    	Dialog:Say(szMsg, tbOpt);
    	end
    	me.SetTask(self.TASK_GROUP_ID14, self.TaskId_Count, nCount + 1);
    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:LenLevel130()
    	local nCount = me.GetTask(self.TASK_GROUP_ID17, 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.LenLevel1130, self};
    	};
    	Dialog:Say(szMsg, tbOpt);
    	end
    	me.SetTask(self.TASK_GROUP_ID17, self.TaskId_Count, nCount + 1);
    end
    
    
    function tbGift:LenLevel120()
    	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.LenLevel1120, self};
    	};
    	Dialog:Say(szMsg, tbOpt);
    	end
    	me.SetTask(self.TASK_GROUP_ID1, self.TaskId_Count, nCount + 1);
    end
    
    function tbGift:TanLangHoaThiBich()
    	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. 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.TanLangHoaThiBich1, self};
    	};
    	Dialog:Say(szMsg, tbOpt);
    	end
    	me.SetTask(self.TASK_GROUP_ID3, 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:Tui222()
    	--me.AddItem(21,9,1,1); --Túi thiên tằm 24 ô
    	me.AddStackItem(21,9,1,1,self.tbItemInfo,1);
    	me.AddStackItem(21,9,1,1,self.tbItemInfo,1);
    	me.AddStackItem(21,9,1,1,self.tbItemInfo,1);
    end
    function tbGift:Tui22()
    	local nCount = me.GetTask(self.TASK_GROUP_ID18, 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.Tui222, self};
    	};
    	Dialog:Say(szMsg, tbOpt);
    	end
    	me.SetTask(self.TASK_GROUP_ID18, self.TaskId_Count, nCount + 1);
    end
    
    function tbGift:Tui1()
    	--me.AddItem(21,9,1,1); --Túi thiên tằm 24 ô
    	me.AddStackItem(21,9,1,1,self.tbItemInfo,1);
    	me.AddStackItem(21,9,1,1,self.tbItemInfo,1);
    	me.AddStackItem(21,9,1,1,self.tbItemInfo,1);
    end
    function tbGift:Tui()
    	local nCount = me.GetTask(self.TASK_GROUP_ID10, 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.Tui1, self};
    	};
    	Dialog:Say(szMsg, tbOpt);
    	end
    	me.SetTask(self.TASK_GROUP_ID10, 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:ThuCuoi()
    	local nCount = me.GetTask(self.TASK_GROUP_ID8, 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_ID8, self.TaskId_Count, nCount + 1);
    end
    function tbGift:DanhVongLenh()
    	local nCount = me.GetTask(self.TASK_GROUP_ID9, 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.DanhVongLenh1, self};
    	};
    	Dialog:Say(szMsg, tbOpt);
    	end
    	me.SetTask(self.TASK_GROUP_ID9, self.TaskId_Count, nCount + 1);
    end
    
    function tbGift:Danhhieu()
    local szMsg = "Hãy chọn danh hiệu ngươi muốn đi :";
    	local tbOpt=
    	{
    		{"Trí Sự",self.Danhhieu1,self},
    		{"Tư Mã",self.Danhhieu2,self},
    		{"Thái Thú",self.Danhhieu3,self},
    		{"Thiếu Khanh",self.Danhhieu4,self},
    		{"Thượng Khanh",self.Danhhieu5,self},
    		{"Quốc Công",self.Danhhieu6,self},
    		{"Thừa Tướng",self.Danhhieu7,self},
    		{"Hoàng Đế",self.Danhhieu8,self},
    				{"không có gì"},
    	};
    
    	Dialog:Say(szMsg,tbOpt);
    
    end
    function tbGift:Danhhieu1()
    me.AddTitle(10,1,1,1);
    
    end
    function tbGift:Danhhieu2()
    me.AddTitle(10,1,2,2);
    
    end
    function tbGift:Danhhieu3()
    me.AddTitle(10,1,3,3);
    
    end
    function tbGift:Danhhieu4()
    me.AddTitle(10,1,4,4);
    
    end
    function tbGift:Danhhieu5()
    me.AddTitle(10,1,5,5);
    
    end
    function tbGift:Danhhieu6()
    me.AddTitle(10,1,6,6);
    
    end
    function tbGift:Danhhieu7()
    me.AddTitle(10,1,7,7);
    
    end
    function tbGift:Danhhieu8()
    me.AddTitle(10,1,8,8);
    
    end
    function tbGift:ThongBaoToanServer()
    	Dialog:AskString("Nhập Dữ Liệu", 1000, self.ThongBao, self);
    	
    end  
    function tbGift:ThongBao(msg)
    	GlobalExcute({"Dialog:GlobalNewsMsg_GS", msg});
    end
    
    ------------------------------------
    
    -------------------------------------
    
    --------------------------------------
    
    --================================================================
    --================================================================
    Lần sửa cuối bởi hoptacgame, ngày 13-08-13 lúc 07:08 PM.
    Khách viếng thăm hãy cùng hoptacgame xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  3. The Following 2 Users Say Thank You to hoptacgame For This Useful Post:

    chandoi1203 (03-11-15), ctyxdphucuong (13-08-13)

 

 

Quyền viết bài

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