PDA

View Full Version : [KT] Script cường hóa item lên 16



cuga95
26-04-14, 06:29 PM
Lúc trước có down 1 server trên clbgamesvn, trong server thấy có hàm cường hóa item lên 16.
Tức là mở giao diện OnOpenGiftOk lên, đặt vật phẩm vào, nhận lại được item + 16 nếu đó là trang bị
Không biết có pro nào biết không, chỉ giáo giùm! /:)

anhnhianh
26-04-14, 07:18 PM
sever thím đang chạy là sever nào? nếu 2.6 thì nó có sẵn mà :|

cuga95
26-04-14, 08:11 PM
sever thím đang chạy là sever nào? nếu 2.6 thì nó có sẵn mà :|

Bác up hộ em cái script đó lên với

anhnhianh
26-04-14, 09:50 PM
local tbItem = Item:GetClass("NaDev_dach16");
function tbItem:OnUse()
DoScript("\\script\\event\\cacevent\\cuopluongthao\\dach16.l ua");
local szMsg = "Đặt vào Item Cần Cường Hóa";
Dialog:OpenGift(szMsg, nil, {self.CuongHoa, self, 1});
end
function tbItem:CuongHoa(nValue, tbItemObj)
local tbItemId1 = {18,1,20326,1,0,0}; -- Lam Long Đơn (Thô)
local tbItemInfo = {bForceBind=1,};
local tbItemList = {};
local nCount = 0;
for i = 1, #tbItemObj do
nCount = nCount + tbItemObj[i][1].nCount;
end
--Check đúng 15 Mảnh ghép hay không?
if nCount ~= 1 then
Dialog:Say("Chỉ được đặt vào 1 vật phẩm", {"Ta biết rồi !"});
return 0;
end
for _, pItem in pairs(tbItemObj) do
if pItem[1].szName == "Phi Phong Song Long Huyền Thoại" then
Dialog:Say("Cái này mà củng đòi nâng cấp");
return;
end
local pItem1 = me.AddItem(pItem[1].nGenre, pItem[1].nDetail, pItem[1].nParticular, pItem[1].nLevel,nil,16);
pItem1.Bind(1)
KDialog.MsgToGlobal("<color=yellow>Người chơi <color=green>["..me.szName.."]<color> sử dụng <color=pink>Đá Cường Hóa 16<color> cường hóa <color=green>"..pItem1.szName.."<color> lên 16 không mất Huyền Tinh và Tiền<color>");
me.ConsumeItemInBags(1, 18, 1, 20327, 1);
end
for _, pItem in pairs(tbItemObj) do
if me.DelItem(pItem[1]) ~= 1 then
return 0;
end
end
end

ngâm cứu đi nhá

Làm phép tính sau để cho ra kết quả: 1 + 1 x 2 = ? (gợi ý câu trả lời: 3)