Kết quả 11 đến 12 của 12
			
		Chủ đề: Code Ngẫu Nhiên
- 
	01-09-14, 05:54 PM #11Thành Viên      
 - Ngày tham gia
- Aug 2013
- Bài viết
- 78
- Thanks
- 16
- Thanked 15 Times in 13 Posts
 Ðề: Code Ngẫu Nhiên--Hµp Quà Hiên Viên 
 --Script m· quà
 --Code by Sói Kool
 
 x900501_g_scriptId = 900501
 x900501_g_HopQua = 30008155
 x900501_g_HienVienMinh = 10557063
 x900501_g_HienVienTien = 10557065
 x900501_g_HienVienChan = 10557055
 x900501_g_HienVienNhat = 10557058
 x900501_g_HienVienPhong = 10557059
 x900501_g_HienVienNguyet = 10557056
 x900501_g_HienVienTram = 10557062
 x900501_g_HienVienThien = 10557060
 x900501_g_HienVienViet = 10557061
 x900501_g_HienVienTn = 10557057
 x900501_g_HienVienLe = 10557051
 x900501_g_HienVienLan = 10557052
 x900501_g_HienVienPhach = 10557054
 x900501_g_HienVienDiet = 10557053
 x900501_g_HienVienTuyet = 10557064
 x900501_g_MG = 30008145
 x900501_g_TD = 30008152
 x900501_g_VD = 30008151
 x900501_g_NM = 30008146
 x900501_g_TT = 30008153
 x900501_g_TS = 30008154
 x900501_g_TL = 30008148
 x900501_g_DL = 30008149
 x900501_g_MD = 30008147
 x900501_g_CB = 30008150
 
 --**********************************
 --M· bäo sß½ng--
 --**********************************
 function x900501_OnDefaultEvent(sceneId,selfId,BagPos)
 
 --Ki¬m tra ô ðÕo cø
 local FreeSpace = LuaFnGetPropertyBagSpace( sceneId, selfId )
 if( FreeSpace < 1 ) then
 x900501_NotifyFailTips(sceneId,selfId,"Hãy s¡p xªp lÕi 1 ô tr¯ng trong ô ÐÕo Cø.")
 return 0
 end
 --Xóa ðÕo cø
 LuaFnDelAvailableItem(sceneId,selfId,x900501_g_Hop Qua,1)
 --Random v§t ph¦m
 local nRet = random(25)
 if nRet<=1 then
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_HienVienMinh,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái Hiên Viên - Minh." )
 elseif nRet<=2 then
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_HienVienTien,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái Hiên Viên - Tin." )
 elseif nRet<=3 then
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_HienVienChan,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái Hiên Viên - Ch¤n." )
 elseif nRet<=4 then
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_HienVienNhat,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái Hiên Viên - Nh§t." )
 elseif nRet<=5 then
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_HienVienPhong,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái Hiên Viên - Phong." )
 elseif nRet<=6 then
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_HienVienNguyet,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái Hiên Viên - Nguy®t." )
 elseif nRet<=7 then
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_HienVienTram,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái Hiên Viên - Träm." )
 elseif nRet<=8 then
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_HienVienThien,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái Hiên Viên - Thiên." )
 elseif nRet<=9 then
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_HienVienViet,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái Hiên Viên - Vi®t." )
 elseif nRet<=10 then
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_HienVienTn,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái Hiên Viên - Tiªn." )
 elseif nRet<=11 then
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_HienVienLe,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái Hiên Viên - L®." )
 elseif nRet<=12 then
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_HienVienLan,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái Hiên Viên - Lân." )
 elseif nRet<=13 then
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_HienVienPhach,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái Hiên Viên - Phách." )
 elseif nRet<=14 then
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_HienVienDiet,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái Hiên Viên - Di®t." )
 elseif nRet<=15 then
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_HienVienTuyet,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái Hiên Viên - Tuy®t." )
 elseif nRet<=16 then
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_MG,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái аng Hành L®nh - Minh Giáo." )
 elseif nRet<=17 then
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_MD,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái аng Hành L®nh - Mµ Dung." )
 elseif nRet<=18 then
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_TL,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái аng Hành L®nh - Thiªu Lâm." )
 elseif nRet<=19 then
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_DL,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái аng Hành L®nh - Thiên Long." )
 elseif nRet<=20 then
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_CB,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái аng Hành L®nh - Cái Bang." )
 elseif nRet<=21 then
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_VD,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái аng Hành L®nh - Võ Ðang." )
 elseif nRet<=22 then
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_TD,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái аng Hành L®nh - Tiêu Dao." )
 elseif nRet<=23 then
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_TT,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái аng Hành L®nh - Tinh Túc." )
 elseif nRet<=24 then
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_TS,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái аng Hành L®nh - Thiên S½n." )
 else
 BeginAddItem(sceneId)
 AddItem( sceneId,x900501_g_NM,1)
 EndAddItem(sceneId,selfId)
 AddItemListToHuman(sceneId,selfId)
 x900501_NotifyFailTips( sceneId, selfId,"Nh§n ðßþc 1 cái аng Hành L®nh - Nga My." )
 end
 
 local nam = GetName(sceneId,selfId)
 BroadMsgByChatPipe(sceneId, selfId,""..nam.."#R ðã m· #GHµp Quà Hiên Viên#R, nh§n ðßþc nhi«u ph¥n thß·ng quý giá. Chúc m×ng!",4)
 
 end
 --**********************************
 --Ghi tên Tip--
 --**********************************
 function x900501_NotifyFailTips( sceneId, selfId, Tip )
 BeginEvent( sceneId )
 AddText( sceneId, Tip )
 EndEvent( sceneId )
 DispatchMissionTips( sceneId, selfId )
 endKhách viếng thăm hãy cùng quyentran xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
 
- 
	
Các thành viên gởi lời cảm ơn đến quyentran vì bài viết này !chicanem12q (02-09-14) 
 
- 
	01-09-14, 06:58 PM #12Thành Viên      
 - Ngày tham gia
- Feb 2014
- Bài viết
- 69
- Thanks
- 34
- Thanked 17 Times in 14 Posts
 Ðề: Code Ngẫu Nhiênfunction x808071_RandomItem( ) 
 local ItemId = 0
 local randomval = random(1,50000)
 
 if( randomval >= 1 and randomval <= 30000 ) then
 ItemId = 20502007
 elseif( randomval >= 30001and randomval <= 50000 ) then
 ItemId = 20310102
 end
 return ItemId
 
 endKhách viếng thăm hãy cùng sac_no xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
 
- 
	
Các thành viên gởi lời cảm ơn đến sac_no vì bài viết này !chicanem12q (02-09-14) 
 
Các Chủ đề tương tự
- 
  [KT] Fix code mua nhiều xuBởi chaulenba trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 7Bài viết cuối: 26-06-14, 06:40 AM
- 
  [MU] Xin Code 3 item làm nhiệm vụ cấp 3Bởi MrKubjn trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 1Bài viết cuối: 03-05-13, 01:32 PM
- 
  [MU] Xin Code 3 item làm nhiệm vụ cấp 3Bởi tonsng trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 1Bài viết cuối: 31-07-12, 02:57 PM
- 
  [JX] JX Source code (không biết mới hok mà thấy cũng nhiều thứ)Bởi ICarus trong diễn đàn Võ Lâm Truyền Kỳ (Jx Server)Trả lời: 30Bài viết cuối: 14-02-12, 01:20 PM
- 
  ai biết code con tôm là bao nhiêu kogBởi thaoq12 trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 4Bài viết cuối: 31-07-11, 04:15 PM

 
				 
				 
				 
				 
				 
				 
			



 Gửi bởi chicanem12q
					[Only registered and activated users can see links.
 Gửi bởi chicanem12q
					[Only registered and activated users can see links.  
					
					
					
						 Trả lời kèm Trích dẫn
  Trả lời kèm Trích dẫn