- Diễn đàn
- CLB NGHIÊN CỨU & PHÁT TRIỂN MMORPG
- Kiếm Thế Server
- Hỏi Đáp/ Yêu Cầu
- [KT] Mình cần tìm 1 túi tân thủ !
Kết quả 1 đến 2 của 2
Chủ đề: Mình cần tìm 1 túi tân thủ !
-
13-08-13, 06:56 PM #1Thành Viên
- Ngày tham gia
- May 2010
- Bài viết
- 30
- Thanks
- 13
- Thanked 0 Times in 0 Posts
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é!
-
13-08-13, 07:02 PM #2Thà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ủ !
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!
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é!
-
The Following 2 Users Say Thank You to hoptacgame For This Useful Post:
chandoi1203 (03-11-15), ctyxdphucuong (13-08-13)
Chọn nhanh
Hỏi Đáp/ Yêu Cầu
Lên trên
- Khu vực riêng
- Thiếp lập
- Tin nhắn riêng
- Các theo dõi
- Đang trực tuyến
- Tìm diễn đàn
- Trang chính
- Diễn đàn
- ĐẠI SẢNH CLBGAMESVN
- GIAO LƯU CÙNG DOANH NGHIỆP
- CLB NGHIÊN CỨU & PHÁT TRIỂN MMORPG
- Mu Server
- Võ Lâm Truyền Kỳ (Jx Server)
- Thiên Long Bát Bộ
- Kiếm Thế Server
- Gunny - Webgame Bắn Súng
- Hiệp Khách Giang Hồ
- Tổng Hợp Các Server Games Khác
- Private Server For Linux
- CHUYÊN ĐỀ WEB GAMES
- Old Archived Server
- GIỚI THIỆU CÁC SERVER GAME PRIVATE
- CLB GAMES OFFLINE & THẢO LUẬN GAMES
- CLB WEBMASTER - SECURITY - SOFTWARE
- CHUYÊN MỤC GIẢI TRÍ
- LINH TINH KHÁC