Kết quả 1 đến 10 của 30
Chủ đề: Giúp em cái script này ^_^
-
16-07-10, 10:37 AM #1
Giú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é!
-
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 #3
- 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é!
-
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 hemKhá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 #6
- 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 #8
- 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é!
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