mindergo11
09-07-13, 05:36 AM
Mất 2h đồng hồ vô ích với cái vớ vẩn này mà không được
Các bạn xem hộ mình tại sao khi mình đổi lấy cái áo này thì không có câu thông báo . Tất cả các file # mình đều dùng như thế này mà sao giờ không được
function tbNpc:YPhucKim()
local nSex = me.nSex;
local nMyMoney = me.nCashMoney; --GetCash();
local tbItemId1 = {18,1,1192,3,0,0};
local nCount1 = me.GetItemCountInBags(18,1,1192,3);
if (nMyMoney < 10000000) then
Dialog:Say("Không đủ 1000 Vạn Lượng, có đủ rồi hãy quay lại.");
return 0;
end
if me.CountFreeBagCell() < 2 then
Dialog:Say("Phải Có 2 Ô Trống Trong Hành Trang Mới Sử Dụng Được !");
return 0;
end
if nCount1 < 100 then
Dialog:Say("<color=wheat>Trong hành trang của bạn không đủ \n100<color=yellow>[Mảnh Ghép]Y Phục Cực Phẩm<color>. ");
return 0;
else
if (0 == nSex) then
Task:DelItem(me, tbItemId1, 100);
me.AddItem(4,3,153,10);
me.CostMoney(10000000,0);
local szMsg = string.format("Chúc mừng người chơi <color=cyan>%s<color> đã may mắn Hợp Thành thành công <color=cyan>%s<color>", me.szName, pItem.szName);
KDialog.NewsMsg(1, Env.NEWSMSG_COUNT, szMsg);
KDialog.MsgToGlobal(szMsg);
me.SendMsgToFriend("Hảo hữu của bạn [<color=yellow>" .. me.szName .. "<color>] Hợp Thành thành công <color=cyan>".. pItem.szName .."<color>");
me.Msg("Hợp thành thành công nhận được <color=yellow>"..pItem.szName.."<color>.");
else
Task:DelItem(me, tbItemId1, 100);
me.AddItem(4,3,143,10);
me.CostMoney(10000000,0);
local szMsg = string.format("Chúc mừng người chơi <color=cyan>%s<color> đã may mắn Hợp Thành thành công <color=cyan>%s<color>", me.szName, pItem.szName);
KDialog.NewsMsg(1, Env.NEWSMSG_COUNT, szMsg);
KDialog.MsgToGlobal(szMsg);
me.SendMsgToFriend("Hảo hữu của bạn [<color=yellow>" .. me.szName .. "<color>] Hợp Thành thành công <color=cyan>".. pItem.szName .."<color>");
me.Msg("Hợp thành thành công nhận được <color=yellow>"..pItem.szName.."<color>.");
end
end
end
Tiện ai có file script của Bách bảo rương mà nhận thưởng như VNG cho mình nhé
Các bạn xem hộ mình tại sao khi mình đổi lấy cái áo này thì không có câu thông báo . Tất cả các file # mình đều dùng như thế này mà sao giờ không được
function tbNpc:YPhucKim()
local nSex = me.nSex;
local nMyMoney = me.nCashMoney; --GetCash();
local tbItemId1 = {18,1,1192,3,0,0};
local nCount1 = me.GetItemCountInBags(18,1,1192,3);
if (nMyMoney < 10000000) then
Dialog:Say("Không đủ 1000 Vạn Lượng, có đủ rồi hãy quay lại.");
return 0;
end
if me.CountFreeBagCell() < 2 then
Dialog:Say("Phải Có 2 Ô Trống Trong Hành Trang Mới Sử Dụng Được !");
return 0;
end
if nCount1 < 100 then
Dialog:Say("<color=wheat>Trong hành trang của bạn không đủ \n100<color=yellow>[Mảnh Ghép]Y Phục Cực Phẩm<color>. ");
return 0;
else
if (0 == nSex) then
Task:DelItem(me, tbItemId1, 100);
me.AddItem(4,3,153,10);
me.CostMoney(10000000,0);
local szMsg = string.format("Chúc mừng người chơi <color=cyan>%s<color> đã may mắn Hợp Thành thành công <color=cyan>%s<color>", me.szName, pItem.szName);
KDialog.NewsMsg(1, Env.NEWSMSG_COUNT, szMsg);
KDialog.MsgToGlobal(szMsg);
me.SendMsgToFriend("Hảo hữu của bạn [<color=yellow>" .. me.szName .. "<color>] Hợp Thành thành công <color=cyan>".. pItem.szName .."<color>");
me.Msg("Hợp thành thành công nhận được <color=yellow>"..pItem.szName.."<color>.");
else
Task:DelItem(me, tbItemId1, 100);
me.AddItem(4,3,143,10);
me.CostMoney(10000000,0);
local szMsg = string.format("Chúc mừng người chơi <color=cyan>%s<color> đã may mắn Hợp Thành thành công <color=cyan>%s<color>", me.szName, pItem.szName);
KDialog.NewsMsg(1, Env.NEWSMSG_COUNT, szMsg);
KDialog.MsgToGlobal(szMsg);
me.SendMsgToFriend("Hảo hữu của bạn [<color=yellow>" .. me.szName .. "<color>] Hợp Thành thành công <color=cyan>".. pItem.szName .."<color>");
me.Msg("Hợp thành thành công nhận được <color=yellow>"..pItem.szName.."<color>.");
end
end
end
Tiện ai có file script của Bách bảo rương mà nhận thưởng như VNG cho mình nhé