[KT] Tiền Du Long (100) Rơi tiền ngẫu nhiên ?
Follow us on
Follow us on Facebook Follow us on Twitter Linked In Flickr Watch us on YouTube My Space Blogger
 
Kết quả 1 đến 5 của 5
  1. #1
    Thành Viên
    Ngày tham gia
    Jun 2013
    Bài viết
    102
    Thanks
    86
    Thanked 1 Time in 1 Post

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

    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 ạ


    Code:
    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
    Khách viếng thăm hãy cùng newhorizon1811 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  2. #2
    Thành Viên
    Ngày tham gia
    Jun 2013
    Bài viết
    102
    Thanks
    86
    Thanked 1 Time in 1 Post

    Ðề: tiền du long (100) Rơi tiền ngẫu nhiên

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

    các pro chỉ em với ạ.......
    Khách viếng thăm hãy cùng newhorizon1811 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  3. #3
    Thành Viên mrkutepro's Avatar
    Ngày tham gia
    Apr 2012
    Đang ở
    SafeZone
    Bài viết
    523
    Thanks
    82
    Thanked 248 Times in 125 Posts

    Ðề: tiền du long (100) Rơi tiền ngẫu nhiên

    Trích dẫn Gửi bởi newhorizon1811 [Only registered and activated users can see links. ]
    úp.............................

    các pro chỉ em với ạ.......
    Sửa dòng code này:
    PHP Code:
    local nNum tonumber(it.GetExtParam(5)) or 1
    Thành con số bạn muốn, ví dụ:
    PHP Code:
    local nNum 50
    Khách viếng thăm hãy cùng mrkutepro xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  4. Các thành viên gởi lời cảm ơn đến mrkutepro vì bài viết này !

    newhorizon1811 (10-08-13)

  5. #4
    Thành Viên
    Ngày tham gia
    May 2013
    Bài viết
    39
    Thanks
    25
    Thanked 4 Times in 4 Posts

    Ðề: tiền du long (100) Rơi tiền ngẫu nhiên

    Trích dẫn Gửi bởi newhorizon1811 [Only registered and activated users can see links. ]
    ú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.
    Khách viếng thăm hãy cùng thuannd203 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  6. Các thành viên gởi lời cảm ơn đến thuannd203 vì bài viết này !

    newhorizon1811 (10-08-13)

  7. #5
    Thành Viên
    Ngày tham gia
    Jul 2013
    Bài viết
    31
    Thanks
    14
    Thanked 31 Times in 11 Posts

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

    ý 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
    Lần sửa cuối bởi ___Rookie___, ngày 09-08-13 lúc 11:22 PM. Lý do: up code
    Khách viếng thăm hãy cùng ___Rookie___ xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  8. The Following 2 Users Say Thank You to ___Rookie___ For This Useful Post:

    newhorizon1811 (10-08-13), sindhand (13-05-24)

 

 

Các Chủ đề tương tự

  1. [KT] Hỏi cách chỉnh rate du long( tăng tỷ lệ đôi tiền du long )
    Bởi anhvaem_n2s trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 1
    Bài viết cuối: 24-06-12, 11:52 PM
  2. [KT] Du Long lỗi, GS báo stack overflow mặc dù mở hết map Du Long
    Bởi anhvaem_n2s trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 0
    Bài viết cuối: 07-06-12, 07:37 PM
  3. [MU] Sever tự nhiên nhiều Bless, Soul quá
    Bởi bingpong91 trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 9
    Bài viết cuối: 16-03-12, 11:04 AM
  4. xin server cổ long việt hóa đủ chơi và sài cilent cổ long việt
    Bởi cogiakk68 trong diễn đàn Yêu Cầu - Hỏi Đáp
    Trả lời: 5
    Bài viết cuối: 15-02-11, 03:02 PM
  5. Cổ long online việt hóa có dấu + request box Cổ Long
    Bởi HKDdev.team trong diễn đàn Các Server Không Nằm Trong Box
    Trả lời: 20
    Bài viết cuối: 20-11-10, 10:22 PM

Quyền viết bài

  • Bạn Không thể gửi Chủ đề mới
  • Bạn Không thể Gửi trả lời
  • Bạn Không thể Gửi file đính kèm
  • Bạn Không thể Sửa bài viết của mình
  •  
Múi giờ GMT +7. Bây giờ là 10:47 AM.
vBulletin®, Copyright ©2000-2011, Jelsoft Enterprises Ltd.
CLBGamesVN không chịu trách nhiệm về Luật Bản Quyền của các tài liệu, bài viết v.v...được đăng tải trên diễn đàn này.
Diễn đàn phát triển dưới sự đóng góp của tất cả thành viên. BQT chỉ là những người thành lập ra sân chơi, quản lý và duy trì về mặt kỹ thuật, nội dung khi hợp lệ.