Tiền Du Long (100) Rơi tiền ngẫu nhiên ?

[newhorizon1811]

như tiều đề. file .lua của em tỉ lệ 1 rương là 100 tiền du long.
em muốn chỉnh lại tỉ lệ thấp hơn kiểu 1 rương được 10 tới 50 tiền du long thì chỉnh sao ạ.
các bác giúp em với ạ

local tbHorseXiang = Item:GetClass("horsexiang_vn");
function tbHorseXiang:OnUse()	
	local nGenre = tonumber(it.GetExtParam(1));
	local nDetail = tonumber(it.GetExtParam(2));
	local nParticular = tonumber(it.GetExtParam(3));
	local nLevel = tonumber(it.GetExtParam(4));
	local nNum = tonumber(it.GetExtParam(5)) or 1;
	local bBind = tonumber(it.GetExtParam(6)) or 1;
	local nTimes = tonumber(it.GetExtParam(7)) or 0;
	
	if not nGenre or not nDetail or not nParticular or not nLevel then
		return 0;
	end
	local bTimes = 0;
	if nTimes > 0 then
		bTimes = 1;
	end
	
	local nNeedCount = KItem.GetNeedFreeBag(nGenre, nDetail, nParticular, nLevel, {bTimeOut= bTimes}, nNum);	
	
	if nGenre <= 5 then
		nNeedCount = nNum;
	end
	
	if me.CountFreeBagCell() < nNeedCount then
		me.Msg(string.format("Túi đã đầy, cần %s ô túi trống.", nNeedCount));
		return 0;
	end	
	local szName = "";
	for i =1, nNum do
		local nTimeout = 0;
		local tbInfo = {};
		tbInfo.bMsg = 0;
		if bTimes == 1 then
			tbInfo.bTimeOut = 1;
			nTimeout = GetTime() + nTimes * 60;
		end
		if bBind == 1 then	
			tbInfo.bForceBind = 1;
		end
		local pItem = me.AddItemEx(nGenre, nDetail, nParticular, nLevel,tbInfo,nil,nTimeout);
		if pItem and szName == "" then
			szName = pItem.szName;
		end
	end
	if szName ~= "" then
		me.Msg("Bạn nhận được " .. tostring(nNum) .. ", " .. szName .. "!","");
	end
	return 1;
end

[newhorizon1811]

úp.............................

các pro chỉ em với ạ.......

[mrkutepro]

úp.............................

các pro chỉ em với ạ.......

Sửa dòng code này:

local nNum = tonumber(it.GetExtParam(5)) or 1; 

Thành con số bạn muốn, ví dụ:

local nNum = 50; 

[thuannd203]

úp.............................

các pro chỉ em với ạ.......

Muốn random từ 10-50 hay bao nhiêu thì chuyển cái script về rương đó thành randomitem, Khai báo thêm rương đó trong randomitem.txt. Chọn tỷ lệ cho phù hợp.

[___Rookie___]

ý của bạn là muốn nó random từ 10 đến 50 đúng không

local tbHorseXiang = Item:GetClass("horsexiang_vn");
function tbHorseXiang:OnUse()
local nGenre = tonumber(it.GetExtParam(1));
local nDetail = tonumber(it.GetExtParam(2));
local nParticular = tonumber(it.GetExtParam(3));
local nLevel = tonumber(it.GetExtParam(4));
local nNum = tonumber(MathRandom(10,50));
local bBind = tonumber(it.GetExtParam(6)) or 1;
local nTimes = tonumber(it.GetExtParam(7)) or 0;

if not nGenre or not nDetail or not nParticular or not nLevel then
return 0;
end
local bTimes = 0;
if nTimes > 0 then
bTimes = 1;
end

local nNeedCount = KItem.GetNeedFreeBag(nGenre, nDetail, nParticular, nLevel, {bTimeOut= bTimes}, nNum);

if nGenre <= 5 then
nNeedCount = nNum;
end

if me.CountFreeBagCell() < nNeedCount then
me.Msg(string.format("Túi đã đầy, cần %s ô túi trống.", nNeedCount));
return 0;
end
local szName = "";
for i =1, nNum do
local nTimeout = 0;
local tbInfo = {};
tbInfo.bMsg = 0;
if bTimes == 1 then
tbInfo.bTimeOut = 1;
nTimeout = GetTime() + nTimes * 60;
end
if bBind == 1 then
tbInfo.bForceBind = 1;
end
local pItem = me.AddItemEx(nGenre, nDetail, nParticular, nLevel,tbInfo,nil,nTimeout);
if pItem and szName == "" then
szName = pItem.szName;
end
end
if szName ~= "" then
me.Msg("Bạn nhận được " .. tostring(nNum) .. ", " .. szName .. "!","");
end
return 1;
end