Share Script Hộp Quà May Mắn

[s2bac95]

Mình tham gia cũng lâu lâu, thực sự gần đây mình mới hoạt động đều và nhiều hơn. giờ mình có 1 cái Script đơn giản thôi mong mọi người đừng chê nhé !

-- Hop Qua May Man 
-- s2bac95
-- clbgamesvn.com
x901234_g_ScriptId    = 901234 -- ID Script
x901234_g_ItemId = 30503164 -- ID cua Item Quy Dinh Trong Commonitem.txt
x901234_g_BaoShiId = {
30505167, -- Tien Vang Nho [1-5]
30505167,
30505167,
30505167,
30505167,
30505168, -- Tien Vang Lon [5-10]
30505168,
30505168,
30505168,
30505168, 
39910008, -- 3K Diem Tang [11-15]
39910008,
39910008,
39910008,
39910008,
39910009,-- 5K Diem Tang [16-20]
39910009,
39910009,
39910009,
39910009,
30008014, -- X2.5 [21 - 25]
30008014,
30008014,
30008014,
30008014,
30900016, -- Cao Cap Hop Thanh Phu [26 - 30]
30900016,
30900016,
30900016,
30900016,
30503143, -- Bao Thach Trac Khac Phu [31 - 35]
30503143,
30503143,
30503143,
30503143,
30503168, -- The Vip 1 [36 - 40]
30503168,
30503168,
30503168,
30503168,
20310158, -- Vo Hon Dich Tuong Dan [41 - 46]
20310158,
20310158,
20310158,
20310158,
10149077, -- Toa Ky Thuoc Tinh  46 - 50
10149077,
10149077,
10149077,
10149077,
10124610, -- Thoi Trang 51 - 55
10124610,
10124610,
10124610,
10124610,
30121001, -- Dieu Van
30121001,
30121001,
30121001,
30121001,
30121001,
}

function x901234_OnDefaultEvent( sceneId, selfId)
    local    nam    = LuaFnGetName( sceneId, selfId )

     --Kiem Tra Tay Nai

    if LuaFnGetPropertyBagSpace( sceneId, selfId ) < 2 then
        BeginEvent(sceneId)
            AddText(sceneId,"#b#GBOn phäi d¬ tr¯ng 2 ô ĐOo cø, ho£c tay näi d¬ có th¬ m· hµp quà may m¡n !")
        EndEvent(sceneId)
        DispatchEventList(sceneId,selfId,targetId)
        return
    end
    if LuaFnGetMaterialBagSpace( sceneId, selfId ) < 1 then
            BeginEvent(sceneId)
        AddText(sceneId,"#b#GBOn phäi d¬ tr¯ng 2 ô ĐOo cø, ho£c tay näi d¬ có th¬ m· hµp quà may m¡n !")
        EndEvent(sceneId)
        DispatchEventList(sceneId,selfId,targetId)
        return
    end

    local GiftId = 0   
    local strtext
    
    for i=0,0 do
    --Quay Random nhan Qua
local odds = random(1,610)
      if( odds >= 1 and odds <= 10 ) then
        GiftId = x901234_g_BaoShiId[1]
        strtext = "Ti«n Vàng [Nhö]"
      elseif( odds >= 11 and odds <= 20 ) then
        GiftId = x901234_g_BaoShiId[2]
        strtext = "Ti«n Vàng [Nhö]"
      elseif( odds >= 21 and odds <= 30 ) then
        GiftId = x901234_g_BaoShiId[3]
        strtext = "Ti«n Vàng [Nhö]"
      elseif( odds >= 31 and odds <= 40 ) then
        GiftId = x901234_g_BaoShiId[4]
        strtext = "Ti«n Vàng [Nhö]"
      elseif( odds >= 41 and odds <= 50 ) then
        GiftId = x901234_g_BaoShiId[5]
        strtext = "Ti«n Vàng [Nhö]"
      elseif( odds >= 51 and odds <= 60 ) then
        GiftId = x901234_g_BaoShiId[6]
        strtext = "Ti«n Vàng [L¾n]"
      elseif( odds >= 61 and odds <= 70 ) then
        GiftId = x901234_g_BaoShiId[7]
        strtext = "Ti«n Vàng [L¾n]"
      elseif( odds >= 71 and odds <= 80 ) then
        GiftId = x901234_g_BaoShiId[8]
        strtext = "Ti«n Vàng [L¾n]"
      elseif( odds >= 81 and odds <= 90 ) then
        GiftId = x901234_g_BaoShiId[9]
        strtext = "Ti«n Vàng [L¾n]"
      elseif( odds >= 91 and odds <= 100 ) then
        GiftId = x901234_g_BaoShiId[10]
        strtext = "Ti«n Vàng [L¾n]"
      elseif( odds >= 101 and odds <= 110 ) then
        GiftId = x901234_g_BaoShiId[11]
        strtext = "Phiªu di¬m t£ng 3K"
      elseif( odds >= 111 and odds <= 120 ) then
        GiftId = x901234_g_BaoShiId[12]
        strtext = "Phiªu di¬m t£ng 3K"
      elseif( odds >= 121 and odds <= 130 ) then
        GiftId = x901234_g_BaoShiId[13]
        strtext = "Phiªu di¬m t£ng 3K"
      elseif( odds >= 131 and odds <= 140 ) then
        GiftId = x901234_g_BaoShiId[14]
        strtext = "Phiªu di¬m t£ng 3K"
      elseif( odds >= 141 and odds <= 150 ) then
        GiftId = x901234_g_BaoShiId[15]
        strtext = "Phiªu di¬m t£ng 3K"
      elseif( odds >= 151 and odds <= 160 ) then
        GiftId = x901234_g_BaoShiId[16]
        strtext = "Phiªu di¬m t£ng 5K"
      elseif( odds >= 161 and odds <= 170 ) then
        GiftId = x901234_g_BaoShiId[17]
        strtext = "Phiªu di¬m t£ng 5K"
      elseif( odds >= 171 and odds <= 180 ) then
        GiftId = x901234_g_BaoShiId[18]
        strtext = "Phiªu di¬m t£ng 5K"
      elseif( odds >= 181 and odds <= 190 ) then
        GiftId = x901234_g_BaoShiId[19]
        strtext = "Phiªu di¬m t£ng 5K"
      elseif( odds >= 191 and odds <= 200 ) then
        GiftId = x901234_g_BaoShiId[20]
        strtext = "Phiªu di¬m t£ng 5K"
      elseif( odds >= 201 and odds <= 210 ) then
        GiftId = x901234_g_BaoShiId[21]
        strtext = "Thông Thiên Linh Đan"
      elseif( odds >= 211 and odds <= 220 ) then
        GiftId = x901234_g_BaoShiId[22]
        strtext = "Thông Thiên Linh Đan"
      elseif( odds >= 221 and odds <= 230 ) then
        GiftId = x901234_g_BaoShiId[23]
        strtext = "Thông Thiên Linh Đan"
      elseif( odds >= 231 and odds <= 240 ) then
        GiftId = x901234_g_BaoShiId[24]
        strtext = "Thông Thiên Linh Đan"
      elseif( odds >= 241 and odds <= 250 ) then
        GiftId = x901234_g_BaoShiId[25]
        strtext = "Thông Thiên Linh Đan"
      elseif( odds >= 251 and odds <= 260 ) then
        GiftId = x901234_g_BaoShiId[26]
        strtext = "Cao C¤p H?p Thành Phù"
      elseif( odds >= 261 and odds <= 270 ) then
        GiftId = x901234_g_BaoShiId[27]
        strtext = "Cao C¤p H?p Thành Phù"
      elseif( odds >= 271 and odds <= 280 ) then
        GiftId = x901234_g_BaoShiId[28]
        strtext = "Cao C¤p H?p Thành Phù"
      elseif( odds >= 281 and odds <= 290 ) then
        GiftId = x901234_g_BaoShiId[29]
        strtext = "Cao C¤p H?p Thành Phù"
      elseif( odds >= 291 and odds <= 300 ) then
        GiftId = x901234_g_BaoShiId[30]
        strtext = "Cao C¤p H?p Thành Phù"
      elseif( odds >= 301 and odds <= 310 ) then
        GiftId = x901234_g_BaoShiId[31]
        strtext = "Bäo ThOch Trác Kh¡c Phù"
      elseif( odds >= 311 and odds <= 320 ) then
        GiftId = x901234_g_BaoShiId[32]
        strtext = "Bäo ThOch Trác Kh¡c Phù"
      elseif( odds >= 321 and odds <= 330 ) then
        GiftId = x901234_g_BaoShiId[33]
        strtext = "Bäo ThOch Trác Kh¡c Phù"
      elseif( odds >= 322 and odds <= 340 ) then
        GiftId = x901234_g_BaoShiId[34]
        strtext = "Bäo ThOch Trác Kh¡c Phù"
      elseif( odds >= 323 and odds <= 350 ) then
        GiftId = x901234_g_BaoShiId[35]
        strtext = "Bäo ThOch Trác Kh¡c Phù"
      elseif( odds >= 324 and odds <= 360 ) then
        GiftId = x901234_g_BaoShiId[36]
        strtext = "Thë Vip 1"
      elseif( odds >= 325 and odds <= 370 ) then
        GiftId = x901234_g_BaoShiId[37]
        strtext = "Thë Vip 1"
      elseif( odds >= 326 and odds <= 380 ) then
        GiftId = x901234_g_BaoShiId[38]
        strtext = "Thë Vip 1"
      elseif( odds >= 327 and odds <= 390 ) then
        GiftId = x901234_g_BaoShiId[39]
        strtext = "Thë Vip 1"
      elseif( odds >= 328 and odds <= 400 ) then
        GiftId = x901234_g_BaoShiId[40]
        strtext = "Thë Vip 1"
      elseif( odds >= 329 and odds <= 410 ) then
        GiftId = x901234_g_BaoShiId[41]
        strtext = "Vo H°n D¸ch Tß¾ng Đan"
      elseif( odds >= 330 and odds <= 420 ) then
        GiftId = x901234_g_BaoShiId[42]
        strtext = "Vo H°n D¸ch Tß¾ng Đan"
      elseif( odds >= 331 and odds <= 430 ) then
        GiftId = x901234_g_BaoShiId[43]
        strtext = "Vo H°n D¸ch Tß¾ng Đan"
      elseif( odds >= 332 and odds <= 440 ) then
        GiftId = x901234_g_BaoShiId[44]
        strtext = "Vo H°n D¸ch Tß¾ng Đan"
      elseif( odds >= 333 and odds <= 450 ) then
        GiftId = x901234_g_BaoShiId[45]
        strtext = "Vo H°n D¸ch Tß¾ng Đan"
      elseif( odds >= 334 and odds <= 460 ) then
        GiftId = x901234_g_BaoShiId[46]
        strtext = "T÷a KÜ: Nhung Tuyªt Th¥n Ngßu"
      elseif( odds >= 335 and odds <= 470 ) then
        GiftId = x901234_g_BaoShiId[47]
        strtext = "T÷a KÜ: Nhung Tuyªt Th¥n Ngßu"
      elseif( odds >= 336 and odds <= 480 ) then
        GiftId = x901234_g_BaoShiId[48]
        strtext = "T÷a KÜ: Nhung Tuyªt Th¥n Ngßu"
      elseif( odds >= 337 and odds <= 490 ) then
        GiftId = x901234_g_BaoShiId[49]
        strtext = "T÷a KÜ: Nhung Tuyªt Th¥n Ngßu"
      elseif( odds >= 338 and odds <= 500 ) then
        GiftId = x901234_g_BaoShiId[50]
        strtext = "T÷a KÜ: Nhung Tuyªt Th¥n Ngßu"
      elseif( odds >= 339 and odds <= 510 ) then
        GiftId = x901234_g_BaoShiId[51]
        strtext = "Th¶i Trang: Ng÷c Vû Thanh Trù"
        elseif( odds >= 340 and odds <= 520 ) then
        GiftId = x901234_g_BaoShiId[52]
        strtext = "Th¶i Trang: Ng÷c Vû Thanh Trù"
        elseif( odds >= 341 and odds <= 530 ) then
        GiftId = x901234_g_BaoShiId[53]
        strtext = "Th¶i Trang: Ng÷c Vû Thanh Trù"
        elseif( odds >= 342 and odds <= 540 ) then
        GiftId = x901234_g_BaoShiId[54]
        strtext = "Th¶i Trang: Ng÷c Vû Thanh Trù"
        elseif( odds >= 343 and odds <= 550 ) then
        GiftId = x901234_g_BaoShiId[55]
        strtext = "Th¶i Trang: Ng÷c Vû Thanh Trù"
        elseif( odds >= 344 and odds <= 560 ) then
        GiftId = x901234_g_BaoShiId[56]
        strtext = "Điêu Vån Thñc Kh¡c Dung T«"
        elseif( odds >= 345 and odds <= 570 ) then
        GiftId = x901234_g_BaoShiId[57]
        strtext = "Điêu Vån Thñc Kh¡c Dung T«"
        elseif( odds >= 346 and odds <= 580 ) then
        GiftId = x901234_g_BaoShiId[58]
        strtext = "Điêu Vån Thñc Kh¡c Dung T«"
        elseif( odds >= 347 and odds <= 590 ) then
        GiftId = x901234_g_BaoShiId[59]
        strtext = "Điêu Vån Thñc Kh¡c Dung T«"
        elseif( odds >= 348 and odds <= 600 ) then
        GiftId = x901234_g_BaoShiId[60]
        strtext = "Điêu Vån Thñc Kh¡c Dung T«"
        elseif( odds >= 349 and odds <= 610 ) then
        GiftId = x901234_g_BaoShiId[61]
        strtext = "????"
        elseif( odds >= 350 and odds <= 620 ) then
        GiftId = x901234_g_BaoShiId[62]
        strtext = "55"
        elseif( odds >= 351 and odds <= 630 ) then
        GiftId = x901234_g_BaoShiId[63]
        strtext = "44"
        elseif( odds >= 352 and odds <= 640 ) then
        GiftId = x901234_g_BaoShiId[64]
        strtext = "33"
        elseif( odds >= 353 and odds <= 650 ) then
        GiftId = x901234_g_BaoShiId[65]
        strtext = "22"
        elseif( odds >= 354 and odds <= 660 ) then
        GiftId = x901234_g_BaoShiId[66]
        strtext = "11"
        elseif( odds >= 355 and odds <= 670 ) then
        GiftId = x901234_g_BaoShiId[67]
        strtext = "???"
        elseif( odds >= 356 and odds <= 680 ) then
        GiftId = x901234_g_BaoShiId[68]
        strtext = "????"
        elseif( odds >= 357 and odds <= 690 ) then
        GiftId = x901234_g_BaoShiId[69]
        strtext = "????"
        elseif( odds >= 358 and odds <= 700 ) then
        GiftId = x901234_g_BaoShiId[70]
        strtext = "????"
        elseif( odds >= 359 and odds <= 710 ) then
        GiftId = x901234_g_BaoShiId[71]
        strtext = "????"
        elseif( odds >= 360 and odds <= 720 ) then
        GiftId = x901234_g_BaoShiId[72]
        strtext = "????"
        elseif( odds >= 361 and odds <= 730 ) then
        GiftId = x901234_g_BaoShiId[73]
        strtext = "????"
        elseif( odds >= 362 and odds <= 740 ) then
        GiftId = x901234_g_BaoShiId[74]
        strtext = "????"
        elseif( odds >= 363 and odds <= 750 ) then
        GiftId = x901234_g_BaoShiId[75]
        strtext = "????"
        elseif( odds >= 364 and odds <= 760 ) then
        GiftId = x901234_g_BaoShiId[76]
        strtext = "????"
        elseif( odds >= 365 and odds <= 770 ) then
        GiftId = x901234_g_BaoShiId[77]
        strtext = "????"
      end
      TryRecieveItem( sceneId, selfId, GiftId, 1 )
      BroadMsgByChatPipe( sceneId, selfId, "#gff00f0Xin chúc m×ng #gffff00"..nam.." #gff00f0 da m· trúng #gffff00"..strtext.."#gff00f0 r°i nhé !", 4 )
end

LuaFnDelAvailableItem(sceneId,selfId,x901234_g_ItemId,1)
        BeginEvent(sceneId)
        AddText(sceneId,"#b#YChúc m×ng bOn da m· trúng #gff00f0 "..strtext.." !")
    EndEvent( sceneId )
    DispatchEventList( sceneId, selfId, -1 )
end

--**********************************
-- 
--**********************************
function x901234_IsSkillLikeScript( sceneId, selfId)
    return 0
end 

[makute7413]

cho vài cái ảnh in game đi thớt

[vocweb]

Dùng lệnh này để lấy tên item, khỏi phải nhập chi cho rắc rối

GetItemName(sceneId, itemId)