Kết quả 1 đến 10 của 30
			
		Chủ đề: Giúp em cái script này ^_^
- 
	16-07-10, 10:37 AM #1Giúp em cái script này ^_^function main() 
 Say("<color=blue>Le Kien Quan: <color>Ta la nguoi dam nhan cac <color=fire>su kien<color> trong nhung ngay le quan trong",2,"LamBanhKem/even83","Thoat/no")
 end;
 
 function even83()
 Say("<color=blue>Le Kien Quan: <color>Khi train o cac map cac ban co co hoi nhan duoc <color=fire>duong, trung, sua, bot my. <color>Nguoi hay lua chon",3,"Lam banh kem/lbkt","Su dung banh kem/sdbk","Thoat/no")
 end;
 
 function lbkt()
 Say("<color=blue>Le Kien Quan: <color>De lam banh kem nguoi can co <color=fire>duong, trung, sua, bot my, <color>nguoi cu du roi chu ?",2,"Bat dau lam banh/bdlb","Thoat/no")
 end;
 
 function bdlb()
 if (GetCash() >= 20000) then
 sl1=GetItemCount(117)
 sl2=GetItemCount(118)
 sl3=GetItemCount(119)
 sl4=GetItemCount(120)
 if (sl1 >= 1) and (sl2 >= 1) and (sl3 >= 1) and (sl4 >= 1) then
 DelItem(117)
 DelItem(118)
 DelItem(119)
 DelItem(120)
 if (GetItemCount(117) == (sl1-1)) and (GetItemCount(118) == (sl2-1)) and (GetItemCount(119) == (sl3-1)) and (GetItemCount(120) == (sl4-1)) then
 Pay(20000)
 lb = random(121,124)
 AddEventItem(lb)
 Msg2Player("Ban nhan duoc 1 chiec banh kem !");
 else
 Msg2Player("Hack a cung yeu !");
 end
 else
 Talk(1,"no","Ban khong co du <color=red>nguyen lieu<color>, khong the lam banh")
 end
 else
 Talk(1,"no","Ban khong co du <color=red>2 van luong<color>, khong the lam banh")
 end
 end;
 
 
 function sdbk()
 Say("<color=blue>Le Kien Quan: <color>Nhan vat dang cap tu 80 tro len moi co the su dung, nguoi hay lua chon",5,"Banh Kem Sua (Kem)/bksk","Banh Kem Sua (Thuong)/bkst","Banh Kem Sua (Ngon)/bksn","Banh Kem Sua (Hao Hang)/bkshh","Thoat/no")
 end;
 
 function bksk()
 if (GetLevel() >= 80) then
 sl=GetItemCount(121)
 if (sl >= 1) then
 DelItem(121)
 if (GetItemCount(121) == (sl-1)) then
 cbkhk = random(1,100)
 cpdhk = random(1,100)
 cthbthk = random(1,100)
 ctthk = random(1,100)
 crhk = random(1,100)
 AddOwnExp(100000)
 AddRepute(5)
 Msg2Player("Ban nhan duoc 5 danh vong, danh vong hien tai "..GetRepute().." diem !");
 if (cbkhk <= 5) then
 bk=random(75,102)
 AddEventItem(bk)
 Msg2Player("Ban nhan duoc 1 Bi Kip Mon Phai !");
 end
 
 if (cpdhk <= 5) then
 pd=random(106)
 AddEventItem(pd)
 Msg2Player("Ban nhan duoc 1 Phuc Duyen !");
 end
 
 if (cthbthk <= 5) then
 AddEventItem(31)
 Msg2Player("Ban nhan duoc 1 Tinh Hong Bao Thach !");
 end
 if (cthbthk <= 5) then
 tt=random(28,30)
 AddEventItem(tt)
 Msg2Player("Ban nhan duoc 1 Thuy Tinh !");
 end
 
 if (crhk <= 5) then
 AddEventItem(109)
 Msg2Player("Ban nhan duoc 1 Binh Ruu !");
 end
 else
 Msg2Player("Hack a cung yeu !");
 end
 else
 Talk(1,"no","Ban khong co <color=red>Banh Kem Sua (Kem)<color>, khong the su dung")
 end
 else
 Talk(1,"no","Ban khong du <color=red>cap 80<color>, khong the su dung")
 end
 end;
 
 
 
 
 function bkst()
 if (GetLevel() >= 80) then
 sl=GetItemCount(122)
 if (sl >= 1) then
 DelItem(122)
 if (GetItemCount(122) == (sl-1)) then
 cbkhk = random(1,100)
 cpdhk = random(1,100)
 cthbthk = random(1,100)
 ctthk = random(1,100)
 crhk = random(1,100)
 AddOwnExp(200000)
 AddRepute(10)
 Msg2Player("Ban nhan duoc 10 danh vong, danh vong hien tai "..GetRepute().." diem !");
 if (cbkhk <= 10) then
 bk=random(75,102)
 AddEventItem(bk)
 Msg2Player("Ban nhan duoc 1 Bi Kip Mon Phai !");
 end
 
 if (cpdhk <= 10) then
 pd=random(106)
 AddEventItem(pd)
 Msg2Player("Ban nhan duoc 1 Phuc Duyen !");
 end
 
 if (cthbthk <= 10) then
 AddEventItem(31)
 Msg2Player("Ban nhan duoc 1 Tinh Hong Bao Thach !");
 end
 if (cthbthk <= 10) then
 tt=random(28,30)
 AddEventItem(tt)
 Msg2Player("Ban nhan duoc 1 Thuy Tinh !");
 end
 
 if (crhk <= 10) then
 AddEventItem(109)
 Msg2Player("Ban nhan duoc 1 Binh Ruu !");
 end
 else
 Msg2Player("Hack a cung yeu !");
 end
 else
 Talk(1,"no","Ban khong co <color=red>Banh Kem Sua (Thuong)<color>, khong the su dung")
 end
 else
 Talk(1,"no","Ban khong du <color=red>cap 80<color>, khong the su dung")
 end
 end;
 
 
 function bksn()
 if (GetLevel() >= 80) then
 sl=GetItemCount(123)
 if (sl >= 1) then
 DelItem(123)
 if (GetItemCount(123) == (sl-1)) then
 cbkhk = random(1,100)
 cpdhk = random(1,100)
 cthbthk = random(1,100)
 ctthk = random(1,100)
 crhk = random(1,100)
 AddOwnExp(300000)
 AddRepute(15)
 Msg2Player("Ban nhan duoc 15 danh vong, danh vong hien tai "..GetRepute().." diem !");
 if (cbkhk <= 15) then
 bk=random(75,102)
 AddEventItem(bk)
 Msg2Player("Ban nhan duoc 1 Bi Kip Mon Phai !");
 end
 
 if (cpdhk <= 15) then
 pd=random(106)
 AddEventItem(pd)
 Msg2Player("Ban nhan duoc 1 Phuc Duyen !");
 end
 
 if (cthbthk <= 15) then
 AddEventItem(31)
 Msg2Player("Ban nhan duoc 1 Tinh Hong Bao Thach !");
 end
 if (cthbthk <= 15) then
 tt=random(28,30)
 AddEventItem(tt)
 Msg2Player("Ban nhan duoc 1 Thuy Tinh !");
 end
 
 if (crhk <= 15) then
 AddEventItem(109)
 Msg2Player("Ban nhan duoc 1 Binh Ruu !");
 end
 else
 Msg2Player("Hack a cung yeu !");
 end
 else
 Talk(1,"no","Ban khong co <color=red>Banh Kem Sua (Ngon)<color>, khong the su dung")
 end
 else
 Talk(1,"no","Ban khong du <color=red>cap 80<color>, khong the su dung")
 end
 end;
 
 
 function bkshh()
 if (GetLevel() >= 80) then
 sl=GetItemCount(124)
 if (sl >= 1) then
 DelItem(124)
 if (GetItemCount(124) == (sl-1)) then
 cbkhk = random(1,100)
 cpdhk = random(1,100)
 cthbthk = random(1,100)
 ctthk = random(1,100)
 crhk = random(1,100)
 AddOwnExp(500000)
 AddRepute(20)
 Msg2Player("Ban nhan duoc 20 danh vong, danh vong hien tai "..GetRepute().." diem !");
 if (cbkhk <= 20) then
 bk=random(75,102)
 AddEventItem(bk)
 Msg2Player("Ban nhan duoc 1 Bi Kip Mon Phai !");
 end
 
 if (cpdhk <= 20) then
 pd=random(106,108)
 pd=random(106)
 Msg2Player("Ban nhan duoc 1 Phuc Duyen !");
 end
 
 if (cthbthk <= 20) then
 AddEventItem(31)
 Msg2Player("Ban nhan duoc 1 Tinh Hong Bao Thach !");
 end
 if (cthbthk <= 20) then
 tt=random(28,30)
 AddEventItem(tt)
 Msg2Player("Ban nhan duoc 1 Thuy Tinh !");
 end
 
 if (crhk <= 20) then
 AddEventItem(109)
 Msg2Player("Ban nhan duoc 1 Binh Ruu !");
 end
 else
 Msg2Player("Hack a cung yeu !");
 end
 else
 Talk(1,"no","Ban khong co <color=red>Banh Kem Sua (Hao Hang)<color>, khong the su dung")
 end
 else
 Talk(1,"no","Ban khong du <color=red>cap 80<color>, khong the su dung")
 end
 end;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 function no()
 
 end;
 
 
 cái này là even của sever Muopv1.0 nó ko + dồn Exp em mún khi sử dụng bánh kem exp cộng dồn thì chĩnh ntn Mong Mấy PRO giúp em ^_^    Khách viếng thăm hãy cùng benop001 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé! Khách viếng thăm hãy cùng benop001 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
 
- 
	16-07-10, 01:11 PM #2Ðề: Giúp em cái script này ^_^Không thấy hồi âm gì lun @_@............................. Khách viếng thăm hãy cùng benop001 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
 
- 
	16-07-10, 01:49 PM #3Vi phạm quy định      
 - Ngày tham gia
- Jun 2010
- Bài viết
- 49
- Thanks
- 0
- Thanked 0 Times in 0 Posts
 Ðề: Giúp em cái script này ^_^À bạn muốn cộng dồn phải hông đơn giả thôi mà  
 AddOwnExp(200000) - -> Bỏ nó thay cái vào
 for i=1,200000 do -- 200000 là số exp bạn muốn có được
 AddOwnExp(1) -- ẽp là 1 điểm cho mỗi lần lập. 
 end
 Msg2Player("Nhan Duoc 2 chai exp") - 200k ẽp no se lập 200k lần mổi lần lập bạn sẽ được 1 ẽp sao 200k lần bạn sẽ có 200k exp ma ko sợ bị dư ra ,nó sẽ cộng dồn vì điều này tuyệt nhiên là đúng.Khách viếng thăm hãy cùngsonghungxây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
 
- 
	16-07-10, 02:16 PM #4Ðề: Giúp em cái script này ^_^hjx mình hơi ngốc viết vô nó báo lỗi rồi bạn viết dùm dzo hàm mình dc hem  Khách viếng thăm hãy cùng benop001 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé! Khách viếng thăm hãy cùng benop001 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
 
- 
	16-07-10, 02:22 PM #5Ðề: Giúp em cái script này ^_^Sẵn cho mình hõi lun hàm add Phúc Duyên là gì vậy 
 function pd()
 SetTask(TaskPhucDuyen(20000))
 Msg2Player("Ban Nhan Duoc 20000 Diem Phuc Duyen");
 end;
 cái này vjk đúng hem Khách viếng thăm hãy cùng benop001 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé! Khách viếng thăm hãy cùng benop001 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
 
- 
	16-07-10, 03:06 PM #6Thành Viên Tâm Huyết    
 - Ngày tham gia
- Mar 2008
- Đang ở
- Lâm Đồng
- Bài viết
- 1,877
- Thanks
- 38
- Thanked 394 Times in 136 Posts
 Ðề: Giúp em cái script này ^_^Hàm cộng dồn trc mình có share rồi đó bạn search nha Khách viếng thăm hãy cùng giangleloi xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
 
- 
	16-07-10, 03:54 PM #7Ðề: Giúp em cái script này ^_^ỡ đâu mà tìm mục nào thế tên ji dzj pac giang Khách viếng thăm hãy cùng benop001 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
 
- 
	16-07-10, 03:58 PM #8Vi phạm quy định      
 - Ngày tham gia
- Jun 2010
- Bài viết
- 49
- Thanks
- 0
- Thanked 0 Times in 0 Posts
 Ðề: Giúp em cái script này ^_^Khách viếng thăm hãy cùngsonghungxây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
 
- 
	16-07-10, 04:10 PM #9Ðề: Giúp em cái script này ^_^Khách viếng thăm hãy cùng benop001 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
 
- 
	16-07-10, 04:11 PM #10Ðề: Giúp em cái script này ^_^a` nói lun mình chơi sever Muopv1.0  Khách viếng thăm hãy cùng benop001 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé! Khách viếng thăm hãy cùng benop001 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
 
Các Chủ đề tương tự
- 
  Một số script trong thư mục script Vina (unpack)Bởi sangpronhat trong diễn đàn ScriptsTrả lời: 19Bài viết cuối: 26-11-11, 08:12 AM
- 
  Script ủy thác rời mạng.Bởi thachlong78 trong diễn đàn ScriptsTrả lời: 21Bài viết cuối: 28-01-10, 06:10 PM

 
				 
				 
				 
				 
				 
				 
			




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