Code đục lỗ 3

[localhost169]

local tbItem = Item:GetClass("chuyduclo3")
function tbItem:OnUse()
local szMsg = "<newdialog><color=green>Vui Lòng Chon Trang Bị Muốn Đục Lỗ <item=18,1,2255,1><enter>";
local tbOpt = {};


table.insert(tbOpt ,{string.format("<color=cyan>Đục Lỗ Nón"), self.duclo, self,1});--
table.insert(tbOpt ,{string.format("<color=cyan>Đục Lỗ Áo"), self.duclo, self,2});--
table.insert(tbOpt ,{string.format("<color=cyan>Đục Lỗ Lưng"), self.duclo, self,3});--
table.insert(tbOpt ,{string.format("<color=cyan>Đục Lỗ Tay"), self.duclo, self,4});--
table.insert(tbOpt ,{string.format("<color=cyan>Đục Lỗ Giày"), self.duclo, self,5});--
table.insert(tbOpt ,{string.format("<color=cyan>Đục Lỗ Liên"), self.duclo, self,6});--
table.insert(tbOpt ,{string.format("<color=cyan>Đục Lỗ Nhẫn"), self.duclo, self,7});--
table.insert(tbOpt ,{string.format("<color=cyan>Đục Lỗ Bội"), self.duclo, self,8});--
table.insert(tbOpt ,{string.format("<color=cyan>Đục Lỗ Phù"), self.duclo, self,9});--
table.insert(tbOpt ,{string.format("<color=cyan>Đục Lỗ Vũ Khí"), self.duclo, self,10});--
table.insert(tbOpt ,{"Kết thúc đối thoại"});
Dialog:Say(szMsg, tbOpt);
return 0;
end;
function tbItem:duclo(nValue)
local nHoleLevel;
if nValue == 1 then
local pItem = me.GetEquip(Item.EQUIPPOS_HEAD)

if pItem then

pItem.MakeHole(3,6,1)
else
Dialog:Say("Vui Lòng Mang Trang Bị Vào Người");
return 0;
end
me.KickOut()
local szMsg = string.format("\n<color=cyan>Chúc Mừng Người chơi <color=yellow>"..me.szName.."<color> Đục Lỗ Thứ 3 Nón Thành Công");
KDialog.MsgToGlobal(szMsg);

elseif nValue == 2 then
local pItem = me.GetEquip(Item.EQUIPPOS_BODY)
if pItem then

pItem.MakeHole(3,6,1)
else
Dialog:Say("Vui Lòng Mang Trang Bị Vào Người");
return 0;
end
me.KickOut()
local szMsg = string.format("\n<color=cyan>Chúc Mừng Người chơi <color=yellow>"..me.szName.."<color> Đục Lỗ Thứ 3 Áo Thành Công");
KDialog.MsgToGlobal(szMsg);

elseif nValue == 3 then
local pItem = me.GetEquip(Item.EQUIPPOS_BELT)
if pItem then
local nReputeLevel = me.GetReputeLevel(5, 2);--check level

pItem.MakeHole(3,6,1)
else
Dialog:Say("Vui Lòng Mang Trang Bị Vào Người");
return 0;
end
me.KickOut()
local szMsg = string.format("\n<color=cyan>Chúc Mừng Người chơi <color=yellow>"..me.szName.."<color> Đục Lỗ Thứ 3 Lưng Thành Công");
KDialog.MsgToGlobal(szMsg);

elseif nValue == 4 then
local pItem = me.GetEquip(Item.EQUIPPOS_CUFF)
if pItem then
local nReputeLevel = me.GetReputeLevel(5, 6);--check level

pItem.MakeHole(3,6,1)
else
Dialog:Say("Vui Lòng Mang Trang Bị Vào Người");
return 0;
end
me.KickOut()
local szMsg = string.format("\n<color=cyan>Chúc Mừng Người chơi <color=yellow>"..me.szName.."<color> Đục Lỗ Thứ 3 Tay Thành Công");
KDialog.MsgToGlobal(szMsg);

elseif nValue == 5 then
local pItem = me.GetEquip(Item.EQUIPPOS_FOOT)
if pItem then
local nReputeLevel = me.GetReputeLevel(10, 1);--check level
if nReputeLevel == 4 then
nHoleLevel = 6
elseif nReputeLevel == 3 then
nHoleLevel = 5
elseif nReputeLevel <= 2 then
nHoleLevel = 4
end
pItem.MakeHole(3,6,1)
else
Dialog:Say("Vui Lòng Mang Trang Bị Vào Người");
return 0;
end
me.KickOut()
local szMsg = string.format("\n<color=cyan>Chúc Mừng Người chơi <color=yellow>"..me.szName.."<color> Đục Lỗ Thứ 3 Giày Thành Công");
KDialog.MsgToGlobal(szMsg);

elseif nValue == 6 then
local pItem = me.GetEquip(Item.EQUIPPOS_NECKLACE)
if pItem then
local nReputeLevel = me.GetReputeLevel(5, 5);--check level
if nReputeLevel == 4 then
nHoleLevel = 6
elseif nReputeLevel == 3 then
nHoleLevel = 5
elseif nReputeLevel <= 2 then
nHoleLevel = 4
end
pItem.MakeHole(3,6,1)
else
Dialog:Say("Vui Lòng Mang Trang Bị Vào Người");
return 0;
end
me.KickOut()
local szMsg = string.format("\n<color=cyan>Chúc Mừng Người chơi <color=yellow>"..me.szName.."<color> Đục Lỗ Thứ 3 Liên Thành Công");
KDialog.MsgToGlobal(szMsg);

elseif nValue == 7 then
local pItem = me.GetEquip(Item.EQUIPPOS_RING)
if pItem then
local nReputeLevel = me.GetReputeLevel(11, 1);--check level
if nReputeLevel == 4 then
nHoleLevel = 6
elseif nReputeLevel == 3 then
nHoleLevel = 5
elseif nReputeLevel <= 2 then
nHoleLevel = 4
end
pItem.MakeHole(3,6,1)
else
Dialog:Say("Vui Lòng Mang Trang Bị Vào Người");
return 0;
end
me.KickOut()
local szMsg = string.format("\n<color=cyan>Chúc Mừng Người chơi <color=yellow>"..me.szName.."<color> Đục Lỗ Thứ 3 Nhẫn Thành Công");
KDialog.MsgToGlobal(szMsg);

elseif nValue == 8 then
local pItem = me.GetEquip(Item.EQUIPPOS_PENDANT)

if pItem then
local nReputeLevel = me.GetReputeLevel(12, 1);--check level
if nReputeLevel == 4 then
nHoleLevel = 6
elseif nReputeLevel == 3 then
nHoleLevel = 5
elseif nReputeLevel <= 2 then
nHoleLevel = 4
end
pItem.MakeHole(3,6,1)
else
Dialog:Say("Vui Lòng Mang Trang Bị Vào Người");
return 0;
end
me.KickOut()
local szMsg = string.format("\n<color=cyan>Chúc Mừng Người chơi <color=yellow>"..me.szName.."<color> Đục Lỗ Thứ 3 Bội Thành Công");
KDialog.MsgToGlobal(szMsg);

elseif nValue == 9 then
local pItem = me.GetEquip(Item.EQUIPPOS_AMULET)
if pItem then
local nReputeLevel = me.GetReputeLevel(5, 4);--check level
if nReputeLevel == 6 then
nHoleLevel = 6
elseif nReputeLevel == 5 then
nHoleLevel = 5
elseif nReputeLevel <= 4 then
nHoleLevel = 4
end
pItem.MakeHole(3,6,1)
else
Dialog:Say("Vui Lòng Mang Trang Bị Vào Người");
return 0;
end
me.KickOut()
local szMsg = string.format("\n<color=cyan>Chúc Mừng Người chơi <color=yellow>"..me.szName.."<color> Đục Lỗ Thứ 3 Phù Thành Công");
KDialog.MsgToGlobal(szMsg);

elseif nValue == 10 then
local pItem = me.GetEquip(Item.EQUIPPOS_WEAPON)
if pItem then
local nReputeLevel = me.GetReputeLevel(9,2);--check level
if nReputeLevel == 4 then
nHoleLevel = 6
elseif nReputeLevel == 3 then
nHoleLevel = 5
elseif nReputeLevel <= 2 then
nHoleLevel = 4
end
pItem.MakeHole(3,6,1)
else
Dialog:Say("Vui Lòng Mang Trang Bị Vào Người");
return 0;
end

me.KickOut()
local szMsg = string.format("\n<color=cyan>Chúc Mừng Người chơi <color=yellow>"..me.szName.."<color> Đục Lỗ Thứ 3 Vũ Khí Thành Công");
KDialog.MsgToGlobal(szMsg);

end
me.ConsumeItemInBags2(1,18 ,1, 2255 ,1,nil,-1);

end;

[hxhhxhz]

chèn code này zô npc rầu có cần thêm gì nữa ở đâu k ạ ??

[localhost169]

chèn code này zô npc rầu có cần thêm gì nữa ở đâu k ạ ??

tạo 1 item có class như trên rồi ấn chuột phải vào item là xài dc. chịu khó đọc code thì sẽ hiểu

[na.ilusm89]

chèn code này zô npc rầu có cần thêm gì nữa ở đâu k ạ ??

đây là code đoạn item dùng xong tự out ra và đăng nhập lại - 1 item hiện hành bạn đang sử dụng nếu dùng npc chế biến xíu nữa là đc

[hxhhxhz]

2.6 dùng được k nhỷ mấy huynh ,,
do e chỉ bjt sài 2.6 ...............

[hoangcangbg]

2.6 làm gì có tính năng khảm nạm với đục lỗ ? Mod thêm chắc được

[hxhhxhz]

hôm bữa thấy bên TNGH làm dc
h k bjt có bác nào giúp mình làm tét thử dc k nhỷ

[satthupro95]

[Only registered and activated users can see links. ]
2.6 cũng mod được nhưng nó bị giới hạn khá nhiều, nên k được nhiều opt lắm

[hxhhxhz]

[Only registered and activated users can see links. ]
2.6 cũng mod được nhưng nó bị giới hạn khá nhiều, nên k được nhiều opt lắm

hướng dẫn e làm dc k anh satthu.. thấy cũng hay hay ý

[xinanno13]

[Only registered and activated users can see links. ]
2.6 cũng mod được nhưng nó bị giới hạn khá nhiều, nên k được nhiều opt lắm

hi bạn có thế hướng dẫn mình mod đc k ạ. tks