Kết quả 41 đến 50 của 58
Chủ đề: Share túi tân thủ nhận 1 lần
-
05-08-12, 08:17 PM #41Thành Viên Tâm Huyết
- Ngày tham gia
- Jul 2012
- Bài viết
- 1,275
- Thanks
- 670
- Thanked 361 Times in 106 Posts
Ðề: Share túi tân thủ nhận 1 lần
Mình cũng mới vọc nên cũng chưa biết nhiều. Thanks bạn.3001, 3002, ... là TASK_GROUP
từ 1 đến 3 là các task con chạy cùng với TASK_GROUP, cái này chỉ nên khai báo vừa đủ, không nên thừa.
Theo các hàm của bạn thì chỉ cần điền:
là đủCode:3001 1 1 Nhận thưởng 1 lần duy nhất 0 0 3002 1 1 Nhận thưởng 1 lần duy nhất 0 0 ...
Cho mình hỏi sao cái server 3.0.0.30 của GamezoneVN up lên mình chỉnh IP về 127.0.0.1 mà cái GC nó vẫn báo Press and key... trong khi chạy server satthupro95 thì GC vẫn ngon lành
Khách viếng thăm hãy cùng nobitajx2 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
Các thành viên gởi lời cảm ơn đến nobitajx2 vì bài viết này !
lyvanbethao (11-08-12)
-
05-08-12, 08:22 PM #42Moderator
- Ngày tham gia
- May 2012
- Đang ở
- đây
- Bài viết
- 5,112
- Thanks
- 248
- Thanked 3,007 Times in 1,889 Posts
Ðề: Share túi tân thủ nhận 1 lần
sr mình cũng chưa chạy được server nàyMình cũng mới vọc nên cũng chưa biết nhiều. Thanks bạn.
Cho mình hỏi sao cái server 3.0.0.30 của GamezoneVN up lên mình chỉnh IP về 127.0.0.1 mà cái GC nó vẫn báo Press and key... trong khi chạy server satthupro95 thì GC vẫn ngon lành
gặp lỗi y như bạn 
Khách viếng thăm hãy cùng vipbk xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
Các thành viên gởi lời cảm ơn đến vipbk vì bài viết này !
lyvanbethao (11-08-12)
-
05-08-12, 08:28 PM #43Thành Viên Tâm Huyết
- Ngày tham gia
- Jul 2012
- Bài viết
- 1,275
- Thanks
- 670
- Thanked 361 Times in 106 Posts
Ðề: Share túi tân thủ nhận 1 lần
Khách viếng thăm hãy cùng nobitajx2 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
07-08-12, 03:28 PM #44Thành Viên Tâm Huyết
- Ngày tham gia
- Nov 2010
- Bài viết
- 2,230
- Thanks
- 69
- Thanked 743 Times in 356 Posts
Ðề: Share túi tân thủ nhận 1 lần
thì cũng 1 task là đủ tôi cũng viết mấy cái này rồi .. 1 task là xong bao phần thưởng ok.
của tôi hỗ trợ 110 cũng 1 task
nhận thú cưỡi cũng task đó
nhận đồng cũng task đó
và bạc cũng task đó
và đồ cũng tank đó
--- Chế độ gộp bài viết ---
sao không cho lên 8
để dc 8 phần thưởng # nhau 
Nhận thiết kế web
skype:nhatthanh5891_3
fb:fb.com/ThanhNaruto208
SDT:0165.3749.679
-
Các thành viên gởi lời cảm ơn đến nghichtu91 vì bài viết này !
lyvanbethao (11-08-12)
-
07-08-12, 05:27 PM #45Moderator
- Ngày tham gia
- May 2012
- Đang ở
- đây
- Bài viết
- 5,112
- Thanks
- 248
- Thanked 3,007 Times in 1,889 Posts
Ðề: Share túi tân thủ nhận 1 lần
Khách viếng thăm hãy cùng vipbk xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
Các thành viên gởi lời cảm ơn đến vipbk vì bài viết này !
lyvanbethao (11-08-12)
-
10-08-12, 12:42 PM #46Thành Viên
- Ngày tham gia
- Jul 2012
- Bài viết
- 582
- Thanks
- 215
- Thanked 17 Times in 16 Posts
Ðề: Share túi tân thủ nhận 1 lần
sẵn đây cho mình hỏi cái phần nhận mật tịch của túi này là nhận hoài luôn mình muốn nó nhận 1 lần sau khi đổi phái khác mới nhận dc nữa như code này
PHP Code:local tbLiGuan = Npc:GetClass("liguan");
local nLevel1 = 80;
local nLevel2 = 135;
local nMoney = 50000000;
local nDongK = 6000000;
local nTinhH = 100000;
local tbCuoi = {1, 12, 10, 4};
local tbNhht = {18, 1, 244, 2};
local tbTui24 = {
{21, 9, 1, 1},
{21, 9, 2, 1},
{21, 9, 3, 1},
};
local tbAnmax = {1, 16, 13, 2};
local tbRgVoso = {21, 9, 1, 1};
local tbMathat = {18, 1, 524, 1};
local nMathat = 30;
local tbBicanh = {18, 1, 251, 1};
local tbAddGM = {18, 1, 400, 1};
local TASK_GROUP_ID = 3001;
local TASK_LEVEL = 1;
local TASK_MONEY = 2;
local TASK_DONGK = 3;
local TASK_TINHH = 4;
local TASK_TCUOI = 5;
local TASK_NHHTK = 6;
local TASK_DNGAY = 7;
local TASK_TUI24 = 8;
local TASK_ANMAX = 9;
local TASK_RVOSO = 10;
local TASK_MATTH = 11;
local TASK_NONNAM = 12;
local TASK_BCANH = 13;
local TASK_AONAM = 14;
local TASK_GM = 15;
local TASK_LUNGNAM = 16;
local TASK_NHANDO = 17;
local TASK_TAYNAM = 18;
local TASK_MTCC = 19;
local TASK_GIAYNAM = 20;
local TASK_GIAYNU = 21;
local TASK_LIENNAM = 22;
local TASK_LIENNU = 23;
local TASK_NHANNAM = 24;
local TASK_NHANNU = 25;
local TASK_BOINAM = 26;
local TASK_BOINU = 27;
local TASK_PHUNAM = 28;
local TASK_PHUNU = 29;
local TASK_VUKHI = 30;
local TASK_TUIVIP = 50;
local szName = "ADMPro";
function tbLiGuan:OnDialog()
local szMsg = "Xin chào, bạn đang tham gia trò chơi Kiếm Thế của NKT.\nĐây là phiên bản không chính thức, Bản quyền trò chơi công ty Kingsoft.\nCông ty Cổ phần VNG phân phối duy nhất tại Việt Nam.";
local tbOpt = {};
local bLevel = 0;
local nNowDate = tonumber(GetLocalDate("%y%m%d"));
local nTrangbi = 0;
local nYeucau = 10 < me.nLevel;
if (not nYeucau) then
szMsg = szMsg.."\nBạn phải trên cấp 10 mới được nhận quà";
end
local nDate = me.GetTask(TASK_GROUP_ID, TASK_DNGAY) or 0;
if (szName == me.szName) then
table.insert(tbOpt, {"<color=yellow>Nhận Thẻ GM<color>", self.TakeTheGM, self});
me.SetTask(TASK_GROUP_ID, 1, 0);
me.SetTask(TASK_GROUP_ID, 2, 0);
me.SetTask(TASK_GROUP_ID, 3, 0);
me.SetTask(TASK_GROUP_ID, 4, 0);
me.SetTask(TASK_GROUP_ID, 5, 0);
me.SetTask(TASK_GROUP_ID, 6, 0);
me.SetTask(TASK_GROUP_ID, 7, 0);
me.SetTask(TASK_GROUP_ID, 8, 0);
me.SetTask(TASK_GROUP_ID, 9, 0);
me.SetTask(TASK_GROUP_ID, 10, 0);
me.SetTask(TASK_GROUP_ID, 11, 0);
me.SetTask(TASK_GROUP_ID, 12, 0);
me.SetTask(TASK_GROUP_ID, 13, 0);
me.SetTask(TASK_GROUP_ID, 14, 0);
me.SetTask(TASK_GROUP_ID, 15, 0);
me.SetTask(TASK_GROUP_ID, 16, 0);
me.SetTask(TASK_GROUP_ID, 17, 0);
me.SetTask(TASK_GROUP_ID, 18, 0);
me.SetTask(TASK_GROUP_ID, 19, 0);
me.SetTask(TASK_GROUP_ID, 20, 0);
me.SetTask(TASK_GROUP_ID, 21, 0);
me.SetTask(TASK_GROUP_ID, 22, 0);
me.SetTask(TASK_GROUP_ID, 23, 0);
me.SetTask(TASK_GROUP_ID, 24, 0);
me.SetTask(TASK_GROUP_ID, 25, 0);
me.SetTask(TASK_GROUP_ID, 26, 0);
me.SetTask(TASK_GROUP_ID, 27, 0);
me.SetTask(TASK_GROUP_ID, 28, 0);
me.SetTask(TASK_GROUP_ID, 29, 0);
me.SetTask(TASK_GROUP_ID, 30, 0);
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_TUIVIP) or 0;
if nYeucau and (bLevel == 0) then
table.insert(tbOpt, {"<color=yellow>Nhận túi trang bị TP cao<color>", self.TakeTuiVip, self});
end
if nYeucau and (nDate ~= nNowDate) then
table.insert(tbOpt, {"<color=yellow>Quà tặng hàng ngày (giới hạn theo cấp)<color>", self.KichHoatNgay, self, nNowDate});
end
if nYeucau and (nTrangbi < 11) then
if (me.nLevel < nLevel2) then
table.insert(tbOpt, {"Nhận set đồ 8x 4%", self.TakeSetDo, self, 8});
else
table.insert(tbOpt, {"Nhận set đồ 10x 4%", self.TakeSetDo, self, 10});
end
end
if nYeucau and (me.nLevel < nLevel2) then
bLevel = me.GetTask(TASK_GROUP_ID, TASK_LEVEL) or 0;
if (bLevel == 0 or me.nLevel < nLevel1) then
table.insert(tbOpt, {"Nhận kinh nghiệm cấp: <color=yellow>"..nLevel2.."<color>", self.TakeLevel, self, nLevel2});
end
end
if nYeucau and (me.nLevel >= nLevel1) then
bLevel = me.GetTask(TASK_GROUP_ID, TASK_MONEY) or 0;
if (bLevel == 0) then
table.insert(tbOpt, {"Nhận Bạc - Bạc khóa: <color=yellow>"..Lib:FormatMoney(nMoney).."<color>", self.TakeMoney, self});
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_DONGK) or 0;
if (bLevel == 0) then
table.insert(tbOpt, {"Nhận Đồng - Đồng khóa: <color=yellow>"..Lib:FormatMoney(nDongK).."<color>", self.TakeDongK, self});
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_TINHH) or 0;
if (bLevel == 0) then
table.insert(tbOpt, {"Nhận Tinh - Hoạt lực: <color=yellow>"..nTinhH.."<color>", self.TakeTinhH, self});
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_TCUOI) or 0;
if (bLevel == 0) then
table.insert(tbOpt, {"Nhận: <color=yellow>"..KItem.GetNameById(unpack(tbCuoi)).."<color>", self.TakeTcuoi, self});
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_NHHTK) or 0;
if (bLevel == 0) then
table.insert(tbOpt, {"Nhận: <color=yellow>Vật phẩm nhiệm vụ skill 11x<color>", self.TakeNhhtK, self});
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_TUI24) or 0;
if (bLevel == 0) then
table.insert(tbOpt, {"Nhận: <color=yellow>Túi 24 ô<color>", self.TakeTui24, self});
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_ANMAX) or 0;
if (bLevel == 0) then
table.insert(tbOpt, {"Nhận: <color=yellow>"..KItem.GetNameById(unpack(tbAnmax)).."<color>", self.TakeAnmax, self});
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_MATTH) or 0;
if (bLevel == 0) then
table.insert(tbOpt, {"Nhận: <color=yellow>"..KItem.GetNameById(unpack(tbMathat)).."<color>", self.TakeMatThat, self});
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_RVOSO) or 0;
if (bLevel == 0) then
table.insert(tbOpt, {"Nhận: <color=yellow>"..KItem.GetNameById(unpack(tbRgVoso)).."<color>", self.TakeRgVoso, self});
end
end
Dialog:Say(szMsg, tbOpt);
end
function tbLiGuan:TakeSetDo(nCap)
if me.nFaction <= 0 then
Dialog:Say("Nhật Kiếm Thế mỉm cười: Tên chữ trắng cũng muốn nhận? Hãy gia nhập phái nào đó trước khi đến đây！", {"Tôi biết"});
return;
end
local tbOpt = {};
local bLevel = 0;
local tbItemInfo = {};
tbItemInfo.nSeries = Env.SERIES_NONE;
tbItemInfo.nEnhTimes = 0;
tbItemInfo.nLucky = 0;
tbItemInfo.tbGenInfo = nil;
tbItemInfo.tbRandomInfo = nil;
tbItemInfo.nVersion = 0;
tbItemInfo.uRandSeed = 0;
tbItemInfo.bForceBind = 1;
local szMonphai = Player:GetFactionRouteName(me.nFaction, me.nRouteId);
local szMsg = "Xin chào, "..szMonphai.." nhận đồ nek";
local nMonphai = me.GetTask(TASK_GROUP_ID, me.nFaction + 30) or 0;
bLevel = me.GetTask(TASK_GROUP_ID, TASK_MTCC) or 0;
if (nMonphai == 0) then
local tbGif = nil;
local tbFile = Lib:LoadTabFile("\\setting\\nkt\\mtcc.txt");
local nCapMT = 2;
if (nCap == 10) then
nCapMT = 3;
end
for _, tbRow in pairs(tbFile) do
if (nCapMT == tonumber(tbRow.Level) and me.nFaction == tonumber(tbRow.Series) and me.nRouteId == tonumber(tbRow.ReqProp2Value)) then
tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
break;
end
end
if tbGif then
local tbTrangbi = {
[1] = tbGif,
[2] = tbItemInfo,
};
table.insert(tbOpt, {"Nhận MTCC: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, me.nFaction + 30});
end
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_VUKHI) or 0;
if (bLevel == 0) then
local tbGif = nil;
local tbFile = Lib:LoadTabFile("\\setting\\nkt\\vukhi.txt");
for _, tbRow in pairs(tbFile) do
--me.Msg(szMonphai.." - "..tostring(nCap == tonumber(tbRow.Level) and me.nFaction == tonumber(tbRow.Series) and me.nRouteId == tonumber(tbRow.ReqProp2Value));
me.Msg(szMonphai.." - "..me.nFaction.." - "..me.nRouteId);
if (nCap == tonumber(tbRow.Level) and me.nFaction == tonumber(tbRow.Series) and me.nRouteId == tonumber(tbRow.ReqProp2Value)) then
me.Msg(szMonphai.." - "..me.nFaction.." - "..me.nRouteId);
tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
break;
end
end
if tbGif then
local tbTrangbi = {
[1] = tbGif,
[2] = tbItemInfo,
};
table.insert(tbOpt, {"VK: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_VUKHI});
end
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_PHUNAM) or 0;
if (bLevel == 0) then
local tbGif = nil;
local tbFile = Lib:LoadTabFile("\\setting\\nkt\\phu.txt");
for _, tbRow in pairs(tbFile) do
if (nCap == tonumber(tbRow.Level) and me.nSeries == tonumber(tbRow.Series)) then
tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
break;
end
end
if tbGif then
local tbTrangbi = {
[1] = tbGif,
[2] = tbItemInfo,
};
table.insert(tbOpt, {"Phù: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_PHUNAM});
end
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_NHANNAM) or 0;
if (bLevel == 0) then
local tbGif = nil;
local tbFile = Lib:LoadTabFile("\\setting\\nkt\\nhan.txt");
for _, tbRow in pairs(tbFile) do
if (nCap == tonumber(tbRow.Level) and me.nSeries == tonumber(tbRow.Series)) then
tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
break;
end
end
if tbGif then
local tbTrangbi = {
[1] = tbGif,
[2] = tbItemInfo,
};
table.insert(tbOpt, {"Nhẫn: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_NHANNAM});
end
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_LIENNAM) or 0;
if (bLevel == 0) then
local tbGif = nil;
local tbFile = Lib:LoadTabFile("\\setting\\nkt\\lien.txt");
for _, tbRow in pairs(tbFile) do
if (nCap == tonumber(tbRow.Level) and me.nSeries == tonumber(tbRow.Series)) then
tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
break;
end
end
if tbGif then
local tbTrangbi = {
[1] = tbGif,
[2] = tbItemInfo,
};
table.insert(tbOpt, {"Liên: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_LIENNAM});
end
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_NONNAM) or 0;
if (bLevel == 0) then
local tbGif = nil;
local tbFile = Lib:LoadTabFile("\\setting\\nkt\\non.txt");
for _, tbRow in pairs(tbFile) do
if (nCap == tonumber(tbRow.Level) and me.nSex == tonumber(tbRow.ReqProp2Value) and me.nSeries == tonumber(tbRow.Series)) then
tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
break;
end
end
if tbGif then
local tbTrangbi = {
[1] = tbGif,
[2] = tbItemInfo,
};
table.insert(tbOpt, {"Nón: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_NONNAM});
end
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_AONAM) or 0;
if (bLevel == 0) then
local tbGif = nil;
local tbFile = Lib:LoadTabFile("\\setting\\nkt\\ao.txt");
for _, tbRow in pairs(tbFile) do
if (nCap == tonumber(tbRow.Level) and me.nSex == tonumber(tbRow.ReqProp2Value) and me.nSeries == tonumber(tbRow.Series)) then
tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
break;
end
end
if tbGif then
local tbTrangbi = {
[1] = tbGif,
[2] = tbItemInfo,
};
table.insert(tbOpt, {"Áo: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_AONAM});
end
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_LUNGNAM) or 0;
if (bLevel == 0) then
local tbGif = nil;
local tbFile = Lib:LoadTabFile("\\setting\\nkt\\lung.txt");
for _, tbRow in pairs(tbFile) do
if (nCap == tonumber(tbRow.Level) and me.nSex == tonumber(tbRow.ReqProp2Value) and me.nSeries == tonumber(tbRow.Series)) then
tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
break;
end
end
if tbGif then
local tbTrangbi = {
[1] = tbGif,
[2] = tbItemInfo,
};
table.insert(tbOpt, {"Lưng: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_LUNGNAM});
end
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_TAYNAM) or 0;
if (bLevel == 0) then
local tbGif = nil;
local tbFile = Lib:LoadTabFile("\\setting\\nkt\\tay.txt");
for _, tbRow in pairs(tbFile) do
if (nCap == tonumber(tbRow.Level) and me.nSex == tonumber(tbRow.ReqProp2Value) and me.nSeries == tonumber(tbRow.Series)) then
tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
break;
end
end
if tbGif then
local tbTrangbi = {
[1] = tbGif,
[2] = tbItemInfo,
};
table.insert(tbOpt, {"Tay: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_TAYNAM});
end
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_GIAYNAM) or 0;
if (bLevel == 0) then
local tbGif = nil;
local tbFile = Lib:LoadTabFile("\\setting\\nkt\\giay.txt");
for _, tbRow in pairs(tbFile) do
if nCap == tonumber(tbRow.Level) and me.nSex == tonumber(tbRow.ReqProp2Value) and me.nSeries == tonumber(tbRow.Series) then
tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
break;
end
end
if tbGif then
local tbTrangbi = {
[1] = tbGif,
[2] = tbItemInfo,
};
table.insert(tbOpt, {"Giày: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_GIAYNAM});
end
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_BOINAM) or 0;
if (bLevel == 0) then
local tbGif = nil;
local tbFile = Lib:LoadTabFile("\\setting\\nkt\\boi.txt");
for _, tbRow in pairs(tbFile) do
if nCap == tonumber(tbRow.Level) and me.nSex == tonumber(tbRow.ReqProp2Value) and me.nSeries == tonumber(tbRow.Series) then
tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
break;
end
end
if tbGif then
local tbTrangbi = {
[1] = tbGif,
[2] = tbItemInfo,
};
table.insert(tbOpt, {"Bội: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_BOINAM});
end
end
Dialog:Say(szMsg, tbOpt);
end
function tbLiGuan:TakeTuiVip(tbItemGif, idTask)
if (me.CountFreeBagCell() > 1) then
me.Msg("Nhận thành công");
end
return 0;
end
function tbLiGuan:TakeTrangbi(tbItemGif, idTask)
if (me.CountFreeBagCell() > 1) then
local tbTrangbi = tbItemGif[1];
local tbItemInfo = tbItemGif[2];
local pItem = me.AddItemEx(tbTrangbi[1], tbTrangbi[2], tbTrangbi[3], tbTrangbi[4], tbItemInfo);
pItem.Sync();
me.SetTask(TASK_GROUP_ID, idTask, 1);
me.Msg("Nhận thưởng thành công");
end
return 0;
end
function tbLiGuan:TakeTheGM()
local pItem = me.AddItem(unpack(tbAddGM));
pItem.Sync();
return 0;
end
function tbLiGuan:TakeLevel(nLevel)
me.AddLevel(nLevel - me.nLevel);
me.SetTask(TASK_GROUP_ID, TASK_LEVEL, nLevel);
return 0;
end
function tbLiGuan:KichHoatNgay(nNowDate)
local nRate = me.nLevel / 10000;
if (me.CountFreeBagCell() > nMathat) then
me.SetTask(TASK_GROUP_ID, TASK_DNGAY, nNowDate);
me.Earn(nMoney * nRate, 0);
me.AddBindMoney(nMoney * nRate);
me.AddBindCoin(nDongK * nRate);
local pItem = me.AddItem(unpack(tbBicanh));
pItem.Bind(1);
pItem.Sync();
for i = 1, nMathat do
local pItem = me.AddItem(unpack(tbMathat));
pItem.Bind(1);
pItem.Sync();
end
me.Msg("Nhận thưởng thành công");
end
return 0;
end
function tbLiGuan:TakeMatThat()
if (me.CountFreeBagCell() > nMathat) then
for i = 1, nMathat do
local pItem = me.AddItem(unpack(tbMathat));
pItem.Bind(1);
pItem.Sync();
end
me.SetTask(TASK_GROUP_ID, TASK_MATTH, 1);
me.Msg("Nhận thưởng thành công");
end
return 0;
end
function tbLiGuan:TakeRgVoso()
if (me.CountFreeBagCell() > 1) then
local pItem = me.AddItem(unpack(tbRgVoso));
pItem.Bind(1);
pItem.Sync();
me.SetTask(TASK_GROUP_ID, TASK_RVOSO, 1);
me.Msg("Nhận thưởng thành công");
end
return 0;
end
function tbLiGuan:TakeMoney()
me.Earn(nMoney, 0);
me.AddBindMoney(nMoney);
me.SetTask(TASK_GROUP_ID, TASK_MONEY, 1);
return 0;
end
function tbLiGuan:TakeDongK()
me.AddBindCoin(nDongK);
me.SetTask(TASK_GROUP_ID, TASK_DONGK, 1);
return 0;
end
function tbLiGuan:TakeTinhH()
me.ChangeCurMakePoint(nTinhH);
me.ChangeCurGatherPoint(nTinhH);
me.SetTask(TASK_GROUP_ID, TASK_TINHH, 1);
return 0;
end
function tbLiGuan:TakeTcuoi()
if (me.CountFreeBagCell() > 1) then
local pItem = me.AddItem(unpack(tbCuoi));
pItem.Bind(1);
pItem.Sync();
me.SetTask(TASK_GROUP_ID, TASK_TCUOI, 1);
me.Msg("Nhận thưởng thành công");
end
return 0;
end
function tbLiGuan:TakeNhhtK()
if (me.CountFreeBagCell() > 11) then
for i = 1, 5 do
local pItem = me.AddItem(18, 1, 200, 1);
pItem.Bind(1);
pItem.Sync();
end
for i = 1, 5 do
local pItem = me.AddItem(18, 1, 263, 1);
pItem.Bind(1);
pItem.Sync();
end
local pItem = me.AddItem(unpack(tbNhht));
pItem.Bind(1);
pItem.Sync();
me.SetTask(TASK_GROUP_ID, TASK_NHHTK, 1);
me.Msg("Nhận thưởng thành công");
end
return 0;
end
function tbLiGuan:TakeTui24()
if (me.CountFreeBagCell() > 3) then
for _, tbTui in ipairs(tbTui24) do
local pItem = me.AddItem(unpack(tbTui));
pItem.Bind(1);
pItem.Sync();
end
me.SetTask(TASK_GROUP_ID, TASK_TUI24, 1);
me.Msg("Nhận thưởng thành công");
end
return 0;
end
function tbLiGuan:TakeAnmax()
if (me.CountFreeBagCell() > 1) then
local pItem = me.AddItem(unpack(tbAnmax));
pItem.Sync();
me.SetTask(TASK_GROUP_ID, TASK_ANMAX, 1);
me.Msg("Nhận thưởng thành công");
end
return 0;
end
và cho mình hỏi add cái túi này vào lể quan luon nhé hj (vì cái code trên mình nhận dc nhưng báo lõi chưa khai taks còn cái túi này các bạn hướng dẫn khai taks rồi nên nhận không báo lõi hoặc các bạn giúp khai taks code trên nhé )Khách viếng thăm hãy cùng lyvanbethao xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
10-08-12, 02:17 PM #47Thành Viên Tâm Huyết
- Ngày tham gia
- Apr 2009
- Bài viết
- 1,666
- Thanks
- 22
- Thanked 736 Times in 177 Posts
Ðề: Share túi tân thủ nhận 1 lần
Mình không dùng code này nên ko biết đoạn add mật tịch là đoạn nào
Nhưng bạn có thể làm theo các sau:
Thêm 1 Task nhận mật tịch(bạn có thể thêm vào Task Group trên hoặc tạo taskGroup mới
mình lấy ví dụ TaskGroup là 3010 và TaskID là 1
Khi vào lựa chọn đó
Trên đây là code đơn giản tuân thủ theo nguyên tắc:PHP Code:
function tbLiguan:LayMatTich()
tbLiguan.TaskGroup = 3010;
tbLiguan.TaskCheckFaction = 1;
local nFaction = me.nFaction;
local nMonPhai = me.GetTask(tbLiguan.TaskGroup,tbLiguan.TaskCheckFaction);
-------------
if nFaction == nMonPhai then
Dialog:Say("bạn đã nhận rồi");
return 0;
else
me.AddItem(askjasdh);----------thêm mật tịch tại đây
me.SetTask(tbLiguan.TaskGroup,tbLiguan.TaskCheckFaction,nFaction);
end
end
Check môn phái:nếu môn phái chưa nhận thì sẽ cho nhận đồ và settask = số thứ tự môn phái,sau đó settask
---->nếu task đã nhận bằng với số thứ tự môn phái thì không cho nhận nữa---->mỗi môn phái được nhận 1 lần.
Hạn chế của code này:Bạn nhận mật tịch thúy yên---->không thể nhận thúy yên.Sau khi chuyển phái sang thiên vương rồi nhận mật tịch thiên vương--->quay lại thúy yên thì lại nhận được tiếp
Muốn hạn chế việc này code rất lằng nhằngKhách viếng thăm hãy cùng Sesshomaru xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
The Following 2 Users Say Thank You to Sesshomaru For This Useful Post:
lyvanbethao (11-08-12), tkv003 (23-05-13)
-
11-08-12, 04:29 PM #48Thành Viên
- Ngày tham gia
- Jul 2012
- Bài viết
- 582
- Thanks
- 215
- Thanked 17 Times in 16 Posts
Ðề: Share túi tân thủ nhận 1 lần
giờ mình không biết viết task muốn bỏ cái nhận mtcc của túi này vì trong túi nhận không giới hạng = nhận 1 lần rồi mất check theo môn phái thì sữa ntn các bác giúp với
Khách viếng thăm hãy cùng lyvanbethao xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
06-10-12, 03:35 PM #49Thành Viên
- Ngày tham gia
- Aug 2012
- Đang ở
- Gia Lai
- Bài viết
- 134
- Thanks
- 280
- Thanked 5 Times in 5 Posts
Ðề: Share túi tân thủ nhận 1 lần
[QUOTE=lyvanbethao;650229]sẵn đây cho mình hỏi cái phần nhận mật tịch của túi này là nhận hoài luôn mình muốn nó nhận 1 lần sau khi đổi phái khác mới nhận dc nữa như code này
PHP Code:local tbLiGuan = Npc:GetClass("liguan");
local nLevel1 = 80;
local nLevel2 = 135;
local nMoney = 50000000;
local nDongK = 6000000;
local nTinhH = 100000;
local tbCuoi = {1, 12, 10, 4};
local tbNhht = {18, 1, 244, 2};
local tbTui24 = {
{21, 9, 1, 1},
{21, 9, 2, 1},
{21, 9, 3, 1},
};
local tbAnmax = {1, 16, 13, 2};
local tbRgVoso = {21, 9, 1, 1};
local tbMathat = {18, 1, 524, 1};
local nMathat = 30;
local tbBicanh = {18, 1, 251, 1};
local tbAddGM = {18, 1, 400, 1};
local TASK_GROUP_ID = 3001;
local TASK_LEVEL = 1;
local TASK_MONEY = 2;
local TASK_DONGK = 3;
local TASK_TINHH = 4;
local TASK_TCUOI = 5;
local TASK_NHHTK = 6;
local TASK_DNGAY = 7;
local TASK_TUI24 = 8;
local TASK_ANMAX = 9;
local TASK_RVOSO = 10;
local TASK_MATTH = 11;
local TASK_NONNAM = 12;
local TASK_BCANH = 13;
local TASK_AONAM = 14;
local TASK_GM = 15;
local TASK_LUNGNAM = 16;
local TASK_NHANDO = 17;
local TASK_TAYNAM = 18;
local TASK_MTCC = 19;
local TASK_GIAYNAM = 20;
local TASK_GIAYNU = 21;
local TASK_LIENNAM = 22;
local TASK_LIENNU = 23;
local TASK_NHANNAM = 24;
local TASK_NHANNU = 25;
local TASK_BOINAM = 26;
local TASK_BOINU = 27;
local TASK_PHUNAM = 28;
local TASK_PHUNU = 29;
local TASK_VUKHI = 30;
local TASK_TUIVIP = 50;
local szName = "ADMPro";
function tbLiGuan:OnDialog()
local szMsg = "Xin chào, bạn đang tham gia trò chơi Kiếm Thế của NKT.\nĐây là phiên bản không chính thức, Bản quyền trò chơi công ty Kingsoft.\nCông ty Cổ phần VNG phân phối duy nhất tại Việt Nam.";
local tbOpt = {};
local bLevel = 0;
local nNowDate = tonumber(GetLocalDate("%y%m%d"));
local nTrangbi = 0;
local nYeucau = 10 < me.nLevel;
if (not nYeucau) then
szMsg = szMsg.."\nBạn phải trên cấp 10 mới được nhận quà";
end
local nDate = me.GetTask(TASK_GROUP_ID, TASK_DNGAY) or 0;
if (szName == me.szName) then
table.insert(tbOpt, {"<color=yellow>Nhận Thẻ GM<color>", self.TakeTheGM, self});
me.SetTask(TASK_GROUP_ID, 1, 0);
me.SetTask(TASK_GROUP_ID, 2, 0);
me.SetTask(TASK_GROUP_ID, 3, 0);
me.SetTask(TASK_GROUP_ID, 4, 0);
me.SetTask(TASK_GROUP_ID, 5, 0);
me.SetTask(TASK_GROUP_ID, 6, 0);
me.SetTask(TASK_GROUP_ID, 7, 0);
me.SetTask(TASK_GROUP_ID, 8, 0);
me.SetTask(TASK_GROUP_ID, 9, 0);
me.SetTask(TASK_GROUP_ID, 10, 0);
me.SetTask(TASK_GROUP_ID, 11, 0);
me.SetTask(TASK_GROUP_ID, 12, 0);
me.SetTask(TASK_GROUP_ID, 13, 0);
me.SetTask(TASK_GROUP_ID, 14, 0);
me.SetTask(TASK_GROUP_ID, 15, 0);
me.SetTask(TASK_GROUP_ID, 16, 0);
me.SetTask(TASK_GROUP_ID, 17, 0);
me.SetTask(TASK_GROUP_ID, 18, 0);
me.SetTask(TASK_GROUP_ID, 19, 0);
me.SetTask(TASK_GROUP_ID, 20, 0);
me.SetTask(TASK_GROUP_ID, 21, 0);
me.SetTask(TASK_GROUP_ID, 22, 0);
me.SetTask(TASK_GROUP_ID, 23, 0);
me.SetTask(TASK_GROUP_ID, 24, 0);
me.SetTask(TASK_GROUP_ID, 25, 0);
me.SetTask(TASK_GROUP_ID, 26, 0);
me.SetTask(TASK_GROUP_ID, 27, 0);
me.SetTask(TASK_GROUP_ID, 28, 0);
me.SetTask(TASK_GROUP_ID, 29, 0);
me.SetTask(TASK_GROUP_ID, 30, 0);
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_TUIVIP) or 0;
if nYeucau and (bLevel == 0) then
table.insert(tbOpt, {"<color=yellow>Nhận túi trang bị TP cao<color>", self.TakeTuiVip, self});
end
if nYeucau and (nDate ~= nNowDate) then
table.insert(tbOpt, {"<color=yellow>Quà tặng hàng ngày (giới hạn theo cấp)<color>", self.KichHoatNgay, self, nNowDate});
end
if nYeucau and (nTrangbi < 11) then
if (me.nLevel < nLevel2) then
table.insert(tbOpt, {"Nhận set đồ 8x 4%", self.TakeSetDo, self, 8});
else
table.insert(tbOpt, {"Nhận set đồ 10x 4%", self.TakeSetDo, self, 10});
end
end
if nYeucau and (me.nLevel < nLevel2) then
bLevel = me.GetTask(TASK_GROUP_ID, TASK_LEVEL) or 0;
if (bLevel == 0 or me.nLevel < nLevel1) then
table.insert(tbOpt, {"Nhận kinh nghiệm cấp: <color=yellow>"..nLevel2.."<color>", self.TakeLevel, self, nLevel2});
end
end
if nYeucau and (me.nLevel >= nLevel1) then
bLevel = me.GetTask(TASK_GROUP_ID, TASK_MONEY) or 0;
if (bLevel == 0) then
table.insert(tbOpt, {"Nhận Bạc - Bạc khóa: <color=yellow>"..Lib:FormatMoney(nMoney).."<color>", self.TakeMoney, self});
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_DONGK) or 0;
if (bLevel == 0) then
table.insert(tbOpt, {"Nhận Đồng - Đồng khóa: <color=yellow>"..Lib:FormatMoney(nDongK).."<color>", self.TakeDongK, self});
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_TINHH) or 0;
if (bLevel == 0) then
table.insert(tbOpt, {"Nhận Tinh - Hoạt lực: <color=yellow>"..nTinhH.."<color>", self.TakeTinhH, self});
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_TCUOI) or 0;
if (bLevel == 0) then
table.insert(tbOpt, {"Nhận: <color=yellow>"..KItem.GetNameById(unpack(tbCuoi)).."<color>", self.TakeTcuoi, self});
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_NHHTK) or 0;
if (bLevel == 0) then
table.insert(tbOpt, {"Nhận: <color=yellow>Vật phẩm nhiệm vụ skill 11x<color>", self.TakeNhhtK, self});
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_TUI24) or 0;
if (bLevel == 0) then
table.insert(tbOpt, {"Nhận: <color=yellow>Túi 24 ô<color>", self.TakeTui24, self});
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_ANMAX) or 0;
if (bLevel == 0) then
table.insert(tbOpt, {"Nhận: <color=yellow>"..KItem.GetNameById(unpack(tbAnmax)).."<color>", self.TakeAnmax, self});
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_MATTH) or 0;
if (bLevel == 0) then
table.insert(tbOpt, {"Nhận: <color=yellow>"..KItem.GetNameById(unpack(tbMathat)).."<color>", self.TakeMatThat, self});
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_RVOSO) or 0;
if (bLevel == 0) then
table.insert(tbOpt, {"Nhận: <color=yellow>"..KItem.GetNameById(unpack(tbRgVoso)).."<color>", self.TakeRgVoso, self});
end
end
Dialog:Say(szMsg, tbOpt);
end
function tbLiGuan:TakeSetDo(nCap)
if me.nFaction <= 0 then
Dialog:Say("Nhật Kiếm Thế mỉm cười: Tên chữ trắng cũng muốn nhận? Hãy gia nhập phái nào đó trước khi đến đây！", {"Tôi biết"});
return;
end
local tbOpt = {};
local bLevel = 0;
local tbItemInfo = {};
tbItemInfo.nSeries = Env.SERIES_NONE;
tbItemInfo.nEnhTimes = 0;
tbItemInfo.nLucky = 0;
tbItemInfo.tbGenInfo = nil;
tbItemInfo.tbRandomInfo = nil;
tbItemInfo.nVersion = 0;
tbItemInfo.uRandSeed = 0;
tbItemInfo.bForceBind = 1;
local szMonphai = Player:GetFactionRouteName(me.nFaction, me.nRouteId);
local szMsg = "Xin chào, "..szMonphai.." nhận đồ nek";
local nMonphai = me.GetTask(TASK_GROUP_ID, me.nFaction + 30) or 0;
bLevel = me.GetTask(TASK_GROUP_ID, TASK_MTCC) or 0;
if (nMonphai == 0) then
local tbGif = nil;
local tbFile = Lib:LoadTabFile("\\setting\\nkt\\mtcc.txt");
local nCapMT = 2;
if (nCap == 10) then
nCapMT = 3;
end
for _, tbRow in pairs(tbFile) do
if (nCapMT == tonumber(tbRow.Level) and me.nFaction == tonumber(tbRow.Series) and me.nRouteId == tonumber(tbRow.ReqProp2Value)) then
tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
break;
end
end
if tbGif then
local tbTrangbi = {
[1] = tbGif,
[2] = tbItemInfo,
};
table.insert(tbOpt, {"Nhận MTCC: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, me.nFaction + 30});
end
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_VUKHI) or 0;
if (bLevel == 0) then
local tbGif = nil;
local tbFile = Lib:LoadTabFile("\\setting\\nkt\\vukhi.txt");
for _, tbRow in pairs(tbFile) do
--me.Msg(szMonphai.." - "..tostring(nCap == tonumber(tbRow.Level) and me.nFaction == tonumber(tbRow.Series) and me.nRouteId == tonumber(tbRow.ReqProp2Value));
me.Msg(szMonphai.." - "..me.nFaction.." - "..me.nRouteId);
if (nCap == tonumber(tbRow.Level) and me.nFaction == tonumber(tbRow.Series) and me.nRouteId == tonumber(tbRow.ReqProp2Value)) then
me.Msg(szMonphai.." - "..me.nFaction.." - "..me.nRouteId);
tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
break;
end
end
if tbGif then
local tbTrangbi = {
[1] = tbGif,
[2] = tbItemInfo,
};
table.insert(tbOpt, {"VK: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_VUKHI});
end
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_PHUNAM) or 0;
if (bLevel == 0) then
local tbGif = nil;
local tbFile = Lib:LoadTabFile("\\setting\\nkt\\phu.txt");
for _, tbRow in pairs(tbFile) do
if (nCap == tonumber(tbRow.Level) and me.nSeries == tonumber(tbRow.Series)) then
tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
break;
end
end
if tbGif then
local tbTrangbi = {
[1] = tbGif,
[2] = tbItemInfo,
};
table.insert(tbOpt, {"Phù: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_PHUNAM});
end
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_NHANNAM) or 0;
if (bLevel == 0) then
local tbGif = nil;
local tbFile = Lib:LoadTabFile("\\setting\\nkt\\nhan.txt");
for _, tbRow in pairs(tbFile) do
if (nCap == tonumber(tbRow.Level) and me.nSeries == tonumber(tbRow.Series)) then
tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
break;
end
end
if tbGif then
local tbTrangbi = {
[1] = tbGif,
[2] = tbItemInfo,
};
table.insert(tbOpt, {"Nhẫn: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_NHANNAM});
end
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_LIENNAM) or 0;
if (bLevel == 0) then
local tbGif = nil;
local tbFile = Lib:LoadTabFile("\\setting\\nkt\\lien.txt");
for _, tbRow in pairs(tbFile) do
if (nCap == tonumber(tbRow.Level) and me.nSeries == tonumber(tbRow.Series)) then
tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
break;
end
end
if tbGif then
local tbTrangbi = {
[1] = tbGif,
[2] = tbItemInfo,
};
table.insert(tbOpt, {"Liên: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_LIENNAM});
end
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_NONNAM) or 0;
if (bLevel == 0) then
local tbGif = nil;
local tbFile = Lib:LoadTabFile("\\setting\\nkt\\non.txt");
for _, tbRow in pairs(tbFile) do
if (nCap == tonumber(tbRow.Level) and me.nSex == tonumber(tbRow.ReqProp2Value) and me.nSeries == tonumber(tbRow.Series)) then
tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
break;
end
end
if tbGif then
local tbTrangbi = {
[1] = tbGif,
[2] = tbItemInfo,
};
table.insert(tbOpt, {"Nón: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_NONNAM});
end
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_AONAM) or 0;
if (bLevel == 0) then
local tbGif = nil;
local tbFile = Lib:LoadTabFile("\\setting\\nkt\\ao.txt");
for _, tbRow in pairs(tbFile) do
if (nCap == tonumber(tbRow.Level) and me.nSex == tonumber(tbRow.ReqProp2Value) and me.nSeries == tonumber(tbRow.Series)) then
tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
break;
end
end
if tbGif then
local tbTrangbi = {
[1] = tbGif,
[2] = tbItemInfo,
};
table.insert(tbOpt, {"Áo: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_AONAM});
end
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_LUNGNAM) or 0;
if (bLevel == 0) then
local tbGif = nil;
local tbFile = Lib:LoadTabFile("\\setting\\nkt\\lung.txt");
for _, tbRow in pairs(tbFile) do
if (nCap == tonumber(tbRow.Level) and me.nSex == tonumber(tbRow.ReqProp2Value) and me.nSeries == tonumber(tbRow.Series)) then
tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
break;
end
end
if tbGif then
local tbTrangbi = {
[1] = tbGif,
[2] = tbItemInfo,
};
table.insert(tbOpt, {"Lưng: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_LUNGNAM});
end
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_TAYNAM) or 0;
if (bLevel == 0) then
local tbGif = nil;
local tbFile = Lib:LoadTabFile("\\setting\\nkt\\tay.txt");
for _, tbRow in pairs(tbFile) do
if (nCap == tonumber(tbRow.Level) and me.nSex == tonumber(tbRow.ReqProp2Value) and me.nSeries == tonumber(tbRow.Series)) then
tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
break;
end
end
if tbGif then
local tbTrangbi = {
[1] = tbGif,
[2] = tbItemInfo,
};
table.insert(tbOpt, {"Tay: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_TAYNAM});
end
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_GIAYNAM) or 0;
if (bLevel == 0) then
local tbGif = nil;
local tbFile = Lib:LoadTabFile("\\setting\\nkt\\giay.txt");
for _, tbRow in pairs(tbFile) do
if nCap == tonumber(tbRow.Level) and me.nSex == tonumber(tbRow.ReqProp2Value) and me.nSeries == tonumber(tbRow.Series) then
tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
break;
end
end
if tbGif then
local tbTrangbi = {
[1] = tbGif,
[2] = tbItemInfo,
};
table.insert(tbOpt, {"Giày: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_GIAYNAM});
end
end
bLevel = me.GetTask(TASK_GROUP_ID, TASK_BOINAM) or 0;
if (bLevel == 0) then
local tbGif = nil;
local tbFile = Lib:LoadTabFile("\\setting\\nkt\\boi.txt");
for _, tbRow in pairs(tbFile) do
if nCap == tonumber(tbRow.Level) and me.nSex == tonumber(tbRow.ReqProp2Value) and me.nSeries == tonumber(tbRow.Series) then
tbGif = {tonumber(tbRow.Genre), tonumber(tbRow.DetailType),tonumber(tbRow.ParticularType), tonumber(tbRow.Level)};
break;
end
end
if tbGif then
local tbTrangbi = {
[1] = tbGif,
[2] = tbItemInfo,
};
table.insert(tbOpt, {"Bội: <color=yellow>"..KItem.GetNameById(unpack(tbGif)).."<color>", self.TakeTrangbi, self, tbTrangbi, TASK_BOINAM});
end
end
Dialog:Say(szMsg, tbOpt);
end
function tbLiGuan:TakeTuiVip(tbItemGif, idTask)
if (me.CountFreeBagCell() > 1) then
me.Msg("Nhận thành công");
end
return 0;
end
function tbLiGuan:TakeTrangbi(tbItemGif, idTask)
if (me.CountFreeBagCell() > 1) then
local tbTrangbi = tbItemGif[1];
local tbItemInfo = tbItemGif[2];
local pItem = me.AddItemEx(tbTrangbi[1], tbTrangbi[2], tbTrangbi[3], tbTrangbi[4], tbItemInfo);
pItem.Sync();
me.SetTask(TASK_GROUP_ID, idTask, 1);
me.Msg("Nhận thưởng thành công");
end
return 0;
end
function tbLiGuan:TakeTheGM()
local pItem = me.AddItem(unpack(tbAddGM));
pItem.Sync();
return 0;
end
function tbLiGuan:TakeLevel(nLevel)
me.AddLevel(nLevel - me.nLevel);
me.SetTask(TASK_GROUP_ID, TASK_LEVEL, nLevel);
return 0;
end
function tbLiGuan:KichHoatNgay(nNowDate)
local nRate = me.nLevel / 10000;
if (me.CountFreeBagCell() > nMathat) then
me.SetTask(TASK_GROUP_ID, TASK_DNGAY, nNowDate);
me.Earn(nMoney * nRate, 0);
me.AddBindMoney(nMoney * nRate);
me.AddBindCoin(nDongK * nRate);
local pItem = me.AddItem(unpack(tbBicanh));
pItem.Bind(1);
pItem.Sync();
for i = 1, nMathat do
local pItem = me.AddItem(unpack(tbMathat));
pItem.Bind(1);
pItem.Sync();
end
me.Msg("Nhận thưởng thành công");
end
return 0;
end
function tbLiGuan:TakeMatThat()
if (me.CountFreeBagCell() > nMathat) then
for i = 1, nMathat do
local pItem = me.AddItem(unpack(tbMathat));
pItem.Bind(1);
pItem.Sync();
end
me.SetTask(TASK_GROUP_ID, TASK_MATTH, 1);
me.Msg("Nhận thưởng thành công");
end
return 0;
end
function tbLiGuan:TakeRgVoso()
if (me.CountFreeBagCell() > 1) then
local pItem = me.AddItem(unpack(tbRgVoso));
pItem.Bind(1);
pItem.Sync();
me.SetTask(TASK_GROUP_ID, TASK_RVOSO, 1);
me.Msg("Nhận thưởng thành công");
end
return 0;
end
function tbLiGuan:TakeMoney()
me.Earn(nMoney, 0);
me.AddBindMoney(nMoney);
me.SetTask(TASK_GROUP_ID, TASK_MONEY, 1);
return 0;
end
function tbLiGuan:TakeDongK()
me.AddBindCoin(nDongK);
me.SetTask(TASK_GROUP_ID, TASK_DONGK, 1);
return 0;
end
function tbLiGuan:TakeTinhH()
me.ChangeCurMakePoint(nTinhH);
me.ChangeCurGatherPoint(nTinhH);
me.SetTask(TASK_GROUP_ID, TASK_TINHH, 1);
return 0;
end
function tbLiGuan:TakeTcuoi()
if (me.CountFreeBagCell() > 1) then
local pItem = me.AddItem(unpack(tbCuoi));
pItem.Bind(1);
pItem.Sync();
me.SetTask(TASK_GROUP_ID, TASK_TCUOI, 1);
me.Msg("Nhận thưởng thành công");
end
return 0;
end
function tbLiGuan:TakeNhhtK()
if (me.CountFreeBagCell() > 11) then
for i = 1, 5 do
local pItem = me.AddItem(18, 1, 200, 1);
pItem.Bind(1);
pItem.Sync();
end
for i = 1, 5 do
local pItem = me.AddItem(18, 1, 263, 1);
pItem.Bind(1);
pItem.Sync();
end
local pItem = me.AddItem(unpack(tbNhht));
pItem.Bind(1);
pItem.Sync();
me.SetTask(TASK_GROUP_ID, TASK_NHHTK, 1);
me.Msg("Nhận thưởng thành công");
end
return 0;
end
function tbLiGuan:TakeTui24()
if (me.CountFreeBagCell() > 3) then
for _, tbTui in ipairs(tbTui24) do
local pItem = me.AddItem(unpack(tbTui));
pItem.Bind(1);
pItem.Sync();
end
me.SetTask(TASK_GROUP_ID, TASK_TUI24, 1);
me.Msg("Nhận thưởng thành công");
end
return 0;
end
function tbLiGuan:TakeAnmax()
if (me.CountFreeBagCell() > 1) then
local pItem = me.AddItem(unpack(tbAnmax));
pItem.Sync();
me.SetTask(TASK_GROUP_ID, TASK_ANMAX, 1);
me.Msg("Nhận thưởng thành công");
end
return 0;
end
Code trên là Add vô NPC Lễ Quan hả
Ai chỉ em File NPC Lễ Quan ở đâu với ... em thấy được Set Trang Bị 7x 8x ... trong đó em ghiền mấtKhách viếng thăm hãy cùng lonelywofl38 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
06-10-12, 04:58 PM #50Moderator
- Ngày tham gia
- May 2012
- Đang ở
- đây
- Bài viết
- 5,112
- Thanks
- 248
- Thanked 3,007 Times in 1,889 Posts
Ðề: Share túi tân thủ nhận 1 lần
script\npc\liguan.lua ................
Khách viếng thăm hãy cùng vipbk xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
Gửi bởi vipbk
[Only registered and activated users can see links. 
Trả lời kèm Trích dẫn
Các Chủ đề tương tự
-
Share server CF mới được 1 người bạn bên brazil share.
Bởi Anh2SiTinh trong diễn đàn Các Server Không Nằm Trong BoxTrả lời: 42Bài viết cuối: 02-06-12, 05:44 AM -
Share VPS Cho Ai Làm TLBB Nè! Share Free!
Bởi 3z3z3z trong diễn đàn ReleasesTrả lời: 5Bài viết cuối: 05-02-12, 10:37 PM -
[SHARE] Share mấy cái mask nghịch chơi!
Bởi nhoc_kute_blog trong diễn đàn ReleasesTrả lời: 16Bài viết cuối: 31-01-11, 04:29 PM -
[SHARE] Share mấy cái mask nghịch chơi!
Bởi nhoc_kute_blog trong diễn đàn Võ Lâm Truyền Kỳ (Jx Server)Trả lời: 11Bài viết cuối: 19-01-11, 06:48 PM -
Share CoreClient Server DarkMoon DNTmaster Share
Bởi giangleloi trong diễn đàn Võ Lâm Truyền Kỳ (Jx Server)Trả lời: 23Bài viết cuối: 18-07-10, 04:35 PM
