Cách chỉnh thêm vật phẩm ở Event đập trứng

[dianguc.vn]

ở file vật phẩm của event đập trứng hiện chỉ có 5 vật phẩm ai biết chỉnh cho số lượng nhiều hơn ở đâu không xin chỉ mình với

[satthupro95]

local tbRate = {7000,3000};
local tbAward =
{
[1] = {18,1,1,7};
[2] = {18,1,1,8};
--- Thêm vật phẩm vào đây ví dụ như là [3] = {18,1,1,8};
}
if me.CountFreeBagCell() < 10 then
Dialog:Say("Phải Có 10 Ô Trống Trong Túi Hành Trang Mới Đập Trứng Được !");
return 0;
end
if nCount2 < 1 then
Dialog:Say("<color=yellow>Trong hành trang của bạn không có <color=cyan>Búa<color> . Không thể đập trứng<color>");
return 0;
end
for i = 1, 2 do -- Bao nhiêu vật phẩm thì i chạy từ 1 -> đó . ví dụ 3 vật phẩm là i = 1,3

[dianguc.vn]

-- ÎļþÃû¡¡£ºguozi_summer.lua
-- ´´½¨Õß¡¡£ºsunduoliang
-- ´´½¨Ê±¼ä£º2009-07-09 09:12:56
-- Ãè  Êö  £º

local tbItem = Item:GetClass("trungevent")
function tbItem:OnUse()
local tbItemId2    = {18,1,25108,1,0,0};
    local nCount2 = me.GetItemCountInBags(18,1,25108,1); -- Búa
    if nCount2 < 1 then
    Dialog:Say("<color=yellow>Trong Hành trang của bạn không có <color=cyan>Búa<color> . Không thể đập Đá<color>");
        return 0;
        end
    local tbEvent = 
    {
        Player.ProcessBreakEvent.emEVENT_MOVE,
        Player.ProcessBreakEvent.emEVENT_ATTACK,
        Player.ProcessBreakEvent.emEVENT_SITE,
        Player.ProcessBreakEvent.emEVENT_USEITEM,
        Player.ProcessBreakEvent.emEVENT_ARRANGEITEM,
        Player.ProcessBreakEvent.emEVENT_DROPITEM,
        Player.ProcessBreakEvent.emEVENT_SENDMAIL,
        Player.ProcessBreakEvent.emEVENT_TRADE,
        Player.ProcessBreakEvent.emEVENT_CHANGEFIGHTSTATE,
        Player.ProcessBreakEvent.emEVENT_CLIENTCOMMAND,
        Player.ProcessBreakEvent.emEVENT_LOGOUT,
        Player.ProcessBreakEvent.emEVENT_DEATH,
        Player.ProcessBreakEvent.emEVENT_ATTACKED,
    }
     local tbOpt = {
                 GeneralProcess:StartProcess("<color=pink>Đang Đập Đá<color>", 5 * Env.GAME_FPS, {self.OnDialog4, self}, nil, tbEvent);
     };
    --Dialog:Say("",tbOpt);
end
function tbItem:OnDialog4()
local tbItemId2    = {18,1,25108,1,0,0};
    local nCount2 = me.GetItemCountInBags(18,1,25108,1); -- Búa
    local i = 0;
    local nAdd = 0;
    local nRand = 0;
    local nIndex = 0;
    -- random
    nRand = MathRandom(1, 10000);
    -- fill 3 rate    
    local tbRate = {5000,3000,1200,500,3000,3000,3000,3000,3000,3000,3000,3000,3000,3000,3000,3000};
    local tbAward = 
{
    [1] = {18,1,1190,4};
    [2] = {1,12,33,4};
    [3] = {1,12,36,4};
    [4] = {1,12,37,4};
    [5] = {1,12,39,4};
    [6] = {1,12,40,4};
    [7] = {1,12,41,4};
    [8] = {1,12,42,4};
    [9] = {1,12,47,4};
    [10] = {1,12,48,4};
    [11] = {1,12,38,4};
    [12] = {1,12,49,4};
    [13] = {1,12,50,4};
    [14] = {1,12,51,4};
    [15] = {1,12,52,4};
    [16] = {1,12,53,4};

}
if me.CountFreeBagCell() < 10 then
        Dialog:Say("Phải Có 10 Ô Trống Trong Túi Hà nh Trang Mới Đập Đá Được !");
        return 0;
    end
    if nCount2 < 1 then
    Dialog:Say("<color=yellow>Trong hà nh trang của bạn không có <color=cyan>Búa<color> . Không thể đập Đá<color>");
        return 0;
        end


    -- for i = 1, 2 do
        -- nAdd = nAdd + tbRate[i];
        -- if nAdd >= nRand then
            -- nIndex = i;
            -- break;
        -- end
    -- end
    -- local pItem = me.AddItem(unpack(tbAward[nIndex]));
    --pItem.Bind(1);
    -- local szMsg = string.format("Chúc mừng người chơi <color=cyan>%s<color> Dương Cung Bắn Trung <color=cyan>%s<color> Nhận 50tr EXP.", me.szName, pItem.szName);
    -- KDialog.NewsMsg(1, Env.NEWSMSG_COUNT, szMsg);
    -- KDialog.MsgToGlobal(szMsg);            
    -- me.SendMsgToFriend("Hảo hữu của bạn [<color=yellow>" .. me.szName 
        -- .. "<color>] Dương Cung Bắn Trúng <color=cyan>"
    -- .. pItem.szName .."<color> Nhận 50tr EXP.");                                  
    -- me.Msg("Bắn Trúng <color=cyan>"..pItem.szName.."<color> Nhận 50tr EXP - Xin Chúc Mừng");
    -- me.AddExp(50000000);
         
            for i = 1, 5 do
        nAdd = nAdd + tbRate[i];
        if nAdd >= nRand then
            nIndex = i;
            break;
        end
    end
    local pItem = me.AddItem(unpack(tbAward[nIndex]));
pItem.Bind(1);
me.SetItemTimeout(pItem, 2*24*60, 0); 
    if (nIndex == 4) or (nIndex == 5)  or (nIndex == 3)then
        local szMsg = string.format("<color=cyan>%s<color> Đập Đá Nhận Được <color=cyan>%s<color>", me.szName, pItem.szName);
    KDialog.NewsMsg(1, Env.NEWSMSG_COUNT, szMsg);
    KDialog.MsgToGlobal(szMsg);            
    me.SendMsgToFriend("Hảo hữu của bạn [<color=cyan>" .. me.szName 
        .. "<color>] Đập Đá Nhận Được <color=cyan>"
    .. pItem.szName .."");                           
    me.Msg("Đập Đá Nhận Được <color=cyan>"..pItem.szName.."<color>"); 
    Task:DelItem(me, tbItemId2, 1);
    elseif (nIndex == 1) or (nIndex == 2)then
        me.Msg("<color=cyan>"..me.szName.."<color> Đập Đá Nhận Được <color=cyan>"..pItem.szName.."<color>");
        Task:DelItem(me, tbItemId2, 1);
    end
        end 

Toàn bộ file đây nó chỉ ra đến vật phẩm số 5 thôi không ra các vật phẩm khác tử 6 trở lên

[satthupro95]

for i = 1, 5 do
        nAdd = nAdd + tbRate[i];
        if nAdd >= nRand then
            nIndex = i;
            break; 

Bao nhiêu vật phẩm thì sửa cái 5 ở trên như thế
Chỗ này nữa :
nRand = MathRandom(1, 10000);
local tbRate = {5000,3000,1200,500,3000,3000,3000,3000,3000,3000, 3000,3000,3000,3000,3000,3000};
local tbAward =
Ở trên bạn khai tổng là 10000 thì tổng các value ở tbRate cộng với nhau = 10000

[vipbk]

nRand = MathRandom(1, 10000);
local tbRate = {5000,3000,1200,500,3000,3000,3000,3000,3000,3000, 3000,3000,3000,3000,3000,3000};

chú ý tổng rate phải bằng 10000 hoặc sửa số 10000 thành tổng: 5000 + 3000 + ... + 3000

[vuagamepri]

Các anh cho em hỏi em muốn đập 1 phát nó mất luôn quả trứng với 1 cái búa thì chỉnh ở đâu ạ? Cho em đường dẫn file event đập trứng luôn nhé . Em cảm ơn

[__Jie__]

Các anh cho em hỏi em muốn đập 1 phát nó mất luôn quả trứng với 1 cái búa thì chỉnh ở đâu ạ? Cho em đường dẫn file event đập trứng luôn nhé . Em cảm ơn

script\item\class\daptrung.lua
Bác này ADM GiangLong à chuyên vào topic người ra xì spam

[vuagamepri]

script\item\class\daptrung.lua
Bác này ADM GiangLong à chuyên vào topic người ra xì spam

Hic, oan quá em có xì pam đâu. Gamer tự post bài tự cãi nhau đấy chứ. Mang tiếng quá @@