PDA

View Full Version : [TLBB] Share Script Hộp Quà May Mắn



s2bac95
15-05-15, 01:57 AM
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_Ite mId,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
15-05-15, 06:19 AM
cho vài cái ảnh in game đi thớt :D

vocweb
15-05-15, 07:48 AM
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)