PDA

View Full Version : [JX] Xin giúp về script lấy số lượng item tạo ra!



kuroo123
26-04-16, 08:07 PM
Xin mọi người giúp mình sửa đoạn script sau để có thể lấy SỐ LƯỢNG item muốn tạo ra với ạ. Ví dụ muốn lấy ra 50 item Ngũ hành kỳ thạch thì nhập số lượng 5 cho nhanh chứ lấy ra từng cái mất công ạ. À mà lấy ra 50 item Ngũ hành kỳ thạch đó có hàm nào để nó tự xếp chồng nhau ko ạ, chứ lấy ra riêng lẻ 50 ô thì hành trang ko đủ ạ.???

function layitem()
g_AskClientStringEx("0,10,9,1,0,0", 0, 256, "NhËp vµo Item Code", {layitem1, {i}} )
end

function layitem1(TaoItem, nCount)
g_AskClientNumberEx(0, 60, "Sè l­îng:", {TaoItem, {nCount}})
end

function TaoItem(nCount, szItem)
local szICode = lib:Split(szItem, ",");
local n = getn(szICode);
if (n ~= 1) then
if (n < 6) then Talk(1, "", format("Sai Item Code. ThiÕu tr­êng yªu cÇu <color=yellow>%s<color>",n)); return end
if (n > 7) then Talk(1, "", format("Sai Item Code. Qu¸ nhiÒu tr­êng d÷ liÖu <color=yellow>%s<color>",n)); return end
local itclass = tonumber(szICode[1]);
local ittype = tonumber(szICode[2]);
local itid = tonumber(szICode[3]);
local itlv = tonumber(szICode[4]);
local itseri = tonumber(szICode[5]);
local itluck = tonumber(szICode[6]);
local itmagic = tonumber(szICode[7]);
if (itlv < 0) then Talk(1, "", format("CÊp ®é man ®å kh«ng ®­îc thÊp qu¸ <color=yellow>%s<color>",itlv)); return end
if (itlv > 10) then Talk(1, "", format("ChØ hæ trî ®Õn cÊp 10. HiÖn t¹i nhËp vµo <color=yellow>%s<color>",itlv)); return end
if (itmagic == nil) then itmagic=0; end
AddItem(itclass,ittype,itid,itlv,itseri,itluck,itm agic);
else
local EquipId = tonumber(szICode[1]);
for i=1,nCount do
AddGoldItem(0, EquipId);
end
end
end


Nhưng GS báo lỗi như sau:


error: attempt to call a string value
stack traceback:
1[155]: function `call' [C]
2[150]: function `g_AskClientNumberBackEx' at line 105 [string "\script\dailogsys\dailogsay.lua"]

Xin mọi người chỉ giúp :((

wermanhme1990
26-04-16, 08:25 PM
Lão ăn mày map ba lăng huyện có phần nhập số may mắn, khi nhập đúng số sẽ có 2 phần là hủy điểm kinh nghiệm và hủy tiền, bấm vào sẽ hiện bảng nhập số, bạn tham khảo script đó rồi code tương tự.

VanSuKhoiDau
27-04-16, 03:20 AM
Code lấy n item với n nhập từ bàn phím



Include("\\script\\dailogsys\\dailogsay.lua")

function main()
AskClientForNumber("Give_nItem",0, "Ta muèn lÊy: ")
end

function Give_nItem(n_key)
for i=1,n_key do
AddEventItem(417)
end
end

kuroo123
27-04-16, 09:08 AM
Lão ăn mày map ba lăng huyện có phần nhập số may mắn, khi nhập đúng số sẽ có 2 phần là hủy điểm kinh nghiệm và hủy tiền, bấm vào sẽ hiện bảng nhập số, bạn tham khảo script đó rồi code tương tự.


Code lấy n item với n nhập từ bàn phím


Em xin cảm ơn 2 bác ạ :-* Vậy còn vấn đề lấy item ra xếp chồng có hướng giải quyết nào ko ạ?

kuroo123
27-04-16, 05:02 PM
Giúp em với, em làm theo hướng dẫn rồi mà vẫn bị lỗi. Bó tay rùi ạ :((

function layitem()
g_AskClientStringEx("0,10,9,1,0,0", 0, 256, "NhËp vµo Item Code", {layitem1} )
end

function layitem1()
AskClientForNumber("TaoItem",1,60,"Sè l­îng:", {nCount})
end

function TaoItem(szItem, nCount)
local szICode = lib:Split(szItem, ",");
local n = getn(szICode);
if (n ~= 1) then
if (n < 6) then Talk(1, "", format("Sai Item Code. ThiÕu tr­êng yªu cÇu <color=yellow>%s<color>",n)); return end
if (n > 7) then Talk(1, "", format("Sai Item Code. Qu¸ nhiÒu tr­êng d÷ liÖu <color=yellow>%s<color>",n)); return end
local itclass = tonumber(szICode[1]);
local ittype = tonumber(szICode[2]);
local itid = tonumber(szICode[3]);
local itlv = tonumber(szICode[4]);
local itseri = tonumber(szICode[5]);
local itluck = tonumber(szICode[6]);
local itmagic = tonumber(szICode[7]);
if (itlv < 0) then Talk(1, "", format("CÊp ®é man ®å kh«ng ®­îc thÊp qu¸ <color=yellow>%s<color>",itlv)); return end
if (itlv > 10) then Talk(1, "", format("ChØ hæ trî ®Õn cÊp 10. HiÖn t¹i nhËp vµo <color=yellow>%s<color>",itlv)); return end
if (itmagic == nil) then itmagic=0; end
AddItem(itclass,ittype,itid,itlv,itseri,itluck,itm agic);
else
local EquipId = tonumber(szICode[1]);
for i=1, nCount do
AddGoldItem(0, EquipId);
end
end
end



Code như vầy ạ mà GS nó báo lỗi error: 'for' limit must be a number :Laluot_191: