Xin hàm đổi Item này ra Item khác.

[jxonline2]

Các pro cho xin hàm đổi từ Item 1 nếu thõa mãng sẽ ra Item 2.

Bonnus: hỏi thêm là các đổi thông số bán vật phẩm bằng tiền du long thành 1 vật phẩm khác?

Ví dụ: mua bằng tiền du long. Thì ta đôi cho mua bằng huyền tinh chẳng hạn.

[jxonline2]

upppppppppppppp ai pro giúp với

[knighterrant]

Có thể tham khảo cái này nè bạn
<b><font color=red>[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]</font></b>

[vipbk]

sao không up luôn đoạn code đó lên, up hộ bạn nè:



------------------------------------------ code 1 doi 1 hoan chinh
--------------------------------------
--------------------------------------
function tbnpctest:OnDialog()
local szMsg = "Hãy Chọn Loại Giao Dịch";
local tbOpt = {
{"<color=yellow>Dùng Nguyệt Ảnh Thạch đổi Vật phẩm", self.ChangeItem, self, 1},
{"Để Ta Suy Nghỉ"},
};
Dialog:Say(szMsg, tbOpt);
end
--------------------------------------
function tbnpctest:ChangeItem(nLevel)
local szContent = string.format("Hãy đặt đúng <color=yellow>5 NAT <color> vào !\n5 KNB đổi lấy 500 Tiền Du Long");
Dialog:OpenGift(szContent, nil, {tbnpctest.OnOpenGiftOk, tbnpctest, nLevel});
end
--------------------------------------
function tbnpctest:OnOpenGiftOk(nLevel, tbItemObj)
--Vật phẩm dùng để đổi (nguyệt ảnh thạch)
local vatpham = "18,1,476,1"; --ID NAT
--Đếm số lượng nguyên liệu
local nCount = 0;
for i = 1, #tbItemObj do
nCount = nCount + tbItemObj[i][1].nCount;
end
--Check đúng 5 NAT hay không?
if nCount ~= 5 then
Dialog:Say("<color=pink>Chú ý : <color>Mỗi lần chỉ được đặt vào 5 NAT !", {"Ta biết rồi !"});
return 0;
end
--Check có phải là NAT không!
for i = 1, #tbItemObj do
local pItem = tbItemObj[i][1];
local szKey = string.format("%s,%s,%s,%s",pItem.nGenre,pItem.nDetail,pItem.nParticular,pIte m.nLevel);
if szKey ~= vatpham then
Dialog:Say("Chỉ được dùng NAT để đổi!", {"Ta biết rồi !"});
return 0;
end
end
--Kiểm tra ô trống trong túi
if me.CountFreeBagCell() < 1 then
Dialog:Say("Cần sắp xếp lại túi!",{"Ta Biết rồi !"});
return 0;
end
--Nếu đúng NAT và số lượng => xóa NAT
for i = 1, #tbItemObj do
local pItem = tbItemObj[i][1];
pItem.Delete(me);
end
--Add số lượng vật phẩm mới vào
for i=1,5 do
local pItemEx = me.AddItem(18, 1, 1286, 1);--nhận được 5 rương 100 tiền du long
end
end
-----------------------------

[nghichtu91]

kết hợp hàm del va ham tìm và hàm add \m/

khôg co hàm đổi :d