Hỏi Về additem và ramdom [Lưu trữ] - CLBGAMESVN MMORPG DEVELOPMENT

View Full Version : Hỏi Về additem và ramdom

[M]r[K]id

19-12-10, 01:22 PM

mình muốn làm 1 cái event anh bánh được 1 món VKHK nhưng mình đã viết được tất cả add item roài.... nhưng bây giờ mình chỉ muốn nhận được 1 món thì làm như thế nào
đây là hàm của mình

function anccc2()
i = random(1,10)
nguhanh = romdom(0,4)
if GetItemCount(banhchungcaocap2) >= 1 and GetCash() >= 100000 then
DelEventItem(banhchungcaocap2)
pay(100000)
for i=1,10 do AddOwnExp(100000000) end
AddItem( 0, 0, 0, 61, nguhanh, 1, 10) --<color=yellow> [Hoang Kim] Vo Gian Y Thien Kiem +1
AddItem( 0, 0, 1, 61, nguhanh, 1, 10) --<color=yellow> [Hoang Kim] Tu Khong Giang Ma Gioi Dao +1
AddItem( 0, 0, 2, 61, nguhanh, 1, 10) --<color=yellow> [Hoang Kim] Phuc Ma Tu Kim Con +1
AddItem( 0, 0, 3, 61, nguhanh, 1, 10) --<color=yellow> [Hoang Kim] Ke Nghiep Bon Loi Toan Long Thuong +1
AddItem( 0, 0, 4, 61, nguhanh, 1, 10) --<color=yellow> [Hoang Kim] Ham Thien Kim Hoan Dai Nhan Than Chuy +1
AddItem( 0, 0, 5, 61, nguhanh, 1, 10) --<color=yellow> [Hoang Kim] Bich Hai Uyen Uong Lien Hoan Dao +1
AddItem( 0, 0, 0, 121, nguhanh, 1, 10) --<color=yellow> [Hoang Kim] Lang Nhac Thai Cap Kiem +1
AddItem( 0, 0, 1, 121, nguhanh, 1, 10) --<color=yellow> [Hoang Kim] Ngu Long Luong Ngan Bao Dao +1
AddItem( 0, 0, 2, 121, nguhanh, 1, 10) --<color=yellow> [Hoang Kim] Dich Hy Luc Ngoc Truong +1
AddItem( 0, 0, 3, 121, nguhanh, 1, 10) --<color=yellow> [Hoang Kim] Ma Sat Quy Coc U Minh Thuong +1
AddItem( 0, 0, 1, 151, nguhanh, 1, 10) --<color=yellow> [Hoang Kim] Suong Tinh Thien Nien Han Thiet +1
AddItem( 0, 0, 5, 121, nguhanh, 1, 10) --<color=yellow> [Hoang Kim] Vo Yem Phong Suong Lien Hoan Dao +1
AddItem( 0, 0, 0, 181, nguhanh, 1, 10) --<color=yellow> [Hoang Kim] Cap Phong Chan Vo Kiem +1
AddItem( 0, 0, 1, 181, nguhanh, 1, 10) --<color=yellow> [Hoang Kim] Te Hoang Phuong Chi Bao Dao +1
AddItem( 0, 0, 2, 181, nguhanh, 1, 10) --<color=yellow> [Hoang Kim] Dong Cuu Phi Long Con +1
AddItem( 0, 0, 3, 181, nguhanh, 1, 10) --<color=yellow> [Hoang Kim] Ma Nghi Hiep Hoa Phan Thanh Thuong +1
AddItem( 0, 0, 5, 181, nguhanh, 1, 10) --<color=yellow> [Hoang Kim] U Lung Thuc Cot Song Nhan +1
AddItem( 0, 0, 0, 241, nguhanh, 1, 10) --<color=yellow> [Hoang Kim] Loi Khung Cuu Thien Kiem +1
AddItem( 0, 0, 1, 241, nguhanh, 1, 10) --<color=yellow> [Hoang Kim] Minh Ao Ta Sat Doc Nhan +1
Msg2Player("Ban Nhan Duoc 500 Trieu Kinh Nghiem va 1 món VKHK [+1]")
else
Msg2Player("Xin Kiem Tra Lai Thung Do Xem Ban Co Dem Theo Banh Chung Cao Cap Hay Khong Hay Khong")
end;

Vd bây giờ ăn thì sẽ nhận được 1 món bất kì trong những món trên thì phải làm sao :Laluot_167::Laluot_167::Laluot_167:

Tiến Đạt

19-12-10, 01:33 PM

Nhận theo phái. 100% nhận đc ( mình k být vít tỷ lệ % randum)

if GetFaction() == "Thieu Lam Phai" then
AddItem( 0, 0, 0, 61, nguhanh, 1, 10) --<color=yellow> [Hoang Kim] Vo Gian Y Thien Kiem +1
MsgEx("ban nhan duoc vu khi HK mon phaii: "..GetFaction())
elseif GetFaction() == "Thien Vuong Bang" then
Tương Tự Add Vũ Khí Hk vô
MsgEx("ban nhan duoc vu khi HK mon phai: "..GetFaction())
elseif GetFaction() == "Duong Mon" then
Tương Tự Add Vũ Khí Hk vô
MsgEx("ban nhan duoc vu khi HK mon phai: "..GetFaction())
elseif GetFaction() == "Ngu Doc Giao" then
Tương Tự Add Vũ Khí Hk vô
MsgEx("ban nhan duoc vu khi HK mon phai: "..GetFaction())
elseif GetFaction() == "Nga My Phai" then
Tương Tự Add Vũ Khí Hk vô
MsgEx("Hoc duoc vo cong 150 cua mon phai: "..GetFaction())
elseif GetFaction() == "Thuy Yen Mon" then
Tương Tự Add Vũ Khí Hk vô
MsgEx("ban nhan duoc vu khi HK mon phai: "..GetFaction())
elseif GetFaction() == "Cai Bang" then
Tương Tự Add Vũ Khí Hk vô
MsgEx("ban nhan duoc vu khi HK mon phai: "..GetFaction())
elseif GetFaction() == "Thien Nhan Giao" then
Tương Tự Add Vũ Khí Hk vô
MsgEx("ban nhan duoc vu khi HK mon phai: "..GetFaction())
elseif GetFaction() == "Vo Dang Phai" then
Tương Tự Add Vũ Khí Hk vô
MsgEx("ban nhan duoc vu khi HK mon phai: "..GetFaction())
elseif GetFaction() == "Con Lon Phai" then
Tương Tự Add Vũ Khí Hk vô
MsgEx("ban nhan duoc vu khi HK mon phai: "..GetFaction())

Nhận Randum phái này nhận của phái khác đẳng cấp Random

cap = random(1,10)
i = floor(random(100,1000)/100)
nguhanh = random(0,4)
if i == 1 then --vu khi
a = random(0,5)
AddItem(0,0,a,cap,nguhanh,0,random(5,8))
end

K být có lỗi k vì chưa test :)) Bài viết mang tính tham khảo.
mà k nên viết Even cứ ăn là đc 100% như vậy.

Nhớ khai báo Include k lỗi ráng chịu
[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]

[M]r[K]id

19-12-10, 02:13 PM

Tiến Đạt

19-12-10, 02:16 PM

cap = random(1,10)
i = floor(random(100,1000)/100)
nguhanh = random(0,4)
if i == 1 then --vu khi
a = random(0,5)
AddItem(0,0,a,cap,nguhanh,0,random(5,8))
end

cái nì ra đồ tùm lum tèm lem hít... có ra HKMP gì đâu

Nó có ra vũ khí k?
Đã nói mang tính tham khảo mà , bạn phải chỉnh cho thích hợp với Even chứ.

sieunhangao

19-12-10, 02:23 PM

function main()
a = random(1,100)
if a == 1 then
AddItem(....)
elseif a == 2 then
AddEventItem(....)
end
end;

đây là cái random đơn giản và hiệu quả nhất xem và tự hiểu và từ đó viết thêm nhé

Tiến Đạt

19-12-10, 02:30 PM

đây là cái random đơn giản và hiệu quả nhất xem và tự hiểu và từ đó viết thêm nhé

Vậy a==3>>>100 thì sao?
Sẽ k nhận đc cái ji
Nên thêm 1 dòng
elseif
Msg2Player("May k may man rui`. k nhan dc ji ca. hahaha.")
end

=))

[M]r[K]id

19-12-10, 02:32 PM

tìm được cách roài: nhân đây share các bạn luk
sau khí oc95 xong đoạn nì:

function main()
checkVIPend()
KillingSpamer()
SetTask(TaskTieuCuc,0)
a = random(1,24)
if a == 1 then
MsgEx("<color=green>Moi lan Trung Sinh deu ton mot luong tien, danh vong, phuc duyen nhat dinh.<color>\Tien Dat",1)
elseif a == 2 then
MsgEx("<color=fire>Ban co the dang ky tai khoan VIP tai tien trang.\nDen tien trang ngu dai thanh thi de biet them chi tiet.<color>\Tien Dat",1)
elseif a == 3 then
MsgEx("<color=water>Tang Kiem la mot he thong cay cap nhanh nhat hien nay sau su kien Quang Truong Mau.<color>\Tien Dat",1)
elseif a == 4 then
MsgEx("<color=red>Moi lan thoat game tot nhat ban hay tro ve cac thanh thi va thon lang de duoc an toan.\nNeu khong co the mat di nhan vat dang choi.<color>\Tien Dat",1)
elseif a == 5 then
MsgEx("<color=blue>Khi het mau co the den gap cac ong chu khach diem de phuc hoi mau.<color>\Tien Dat",1)
elseif a == 6 then
MsgEx("<color=yellow>Trong cac tiem tra co ban nhung loai duoc thao quy hiem.<color>\Tien Dat",1)
elseif a == 7 then
MsgEx("<color=pink>Khi muon cay cap an toan ban co the den gap cac ve binh hay quan sai de nhan duoc su ho tro tot nhat.<color>\Tien Dat",1)
elseif a == 8 then
MsgEx("<color=earth>Muon kiem them thu nhap ban co the gap cac chu Tieu Cuc hay Phien Dau de nhan di giao cac chuyen hang co the nhan duoc kinh nghiem va tien.<color>\Tien Dat",1)
elseif a == 9 then
MsgEx("<color=cyan>Phien Ban 1.5 toan bo cac shop deu ban do hop ly. Va ban co the mua do o Tran Tam Bao-Bien Kinh(Than Bi Thuong Nhan)<color>\nDNTmaster",1)
elseif a == 10 then
MsgEx("Khi nao ban cam thay buon chan hay lien he voi Admin de nhan duoc cac su ho tro tot nhat cho Server...\nCac su kien va chuc nang Server deu do chinh tay Tien Dat thuc hien.",1)
elseif a == 11 then
MsgEx("<color=metal>Ban co the ep Huyen Tinh o cac Tho Ren trong ngu dai thanh thi.",1)
elseif a == 12 then
MsgEx("<color=fire>Ban co the den gap cac Thay Boi trong thanh thi de co the xem hom nay ban nhan duoc vat pham gi.",1)
elseif a == 13 then
MsgEx("<color=wood>Muon nhan duoc nhan doi Kinh Nghiem ban co the den gap Duong Pho Lao Ban o ngu dai thanh thi.",1)
elseif a == 14 then
MsgEx("<color=water>Muon hoc duoc nhieu cong phu noi tieng den gap cac an may cho tien ho.\nNeu may man nguoi se nhan duoc loi chi dan cua ho.",1)
elseif a == 15 then
MsgEx("<color=earth>Ai co mau do den thi co the den gap cac ong Chu Song Bac de danh ban tha ho.Bao dam khong an gian dau.",1)
elseif a == 16 then
MsgEx("<color=yellow>Muon duoc nhieu diem danh vong ban co the den gap cac dich quan.",1)
elseif a == 17 then
MsgEx("<color=red>Neu muon bao ve cac mon do cua ban hay de gap tham cuu o Ba Lang Huyen de cai dat ma ruong.",1)
elseif a == 18 then
MsgEx("<color=green>Dang cap toi da co the dat duoc o phien ban nay la 350",1)
elseif a == 19 then
MsgEx("<color=blue>Khi nao cam thay minh nang diem sai roi co the den gap Xa Phu den dao Tay Tuy.Nho khong o lau tren dao duoc nha.",1)
elseif a == 20 then
MsgEx("<color=pink>Khi dang thuc hien nhiem vu Thuong Hoi cua Tieu Cuc thi chi co the di chuyen bang thuyen.Nhung hay can than bon dao tac.",1)
elseif a == 21 then
MsgEx("<color=metal>De tro thanh mot dao tac di cuop do cua lai buon ban can den gap Pho Nam Bang o Bien Kinh.",1)
elseif a == 22 then
MsgEx("Neu muon lap Bang thi den Hoa Son.Nho dem theo mot thanh Nhac Vuong Kiem nha.De tao thanh nhac vuong kiem thi den gap Tho Ren dem theo du 12 vien Nhac Vuong Hon Thach.",1)
elseif a == 23 then
MsgEx("Ky Nang 90 co the hoc tai cac su phu trong lang hoac hoc bang Bi Kip.\nRieng ky nang 120 chi co the hoc bang Bi Kip",1)
elseif a == 24 then
MsgEx("Trong Ngu Dai Thanh Thi tat ca cac Npc deu da duoc viet hoa cung voi cac Npc trong tam dai thon lang.",1)
elseif a == 25 then
MsgEx("Phien Ban: Vo Lam Truyen Ky Song Gio Tinh Yeu by Tien Dat",1)
elseif a == 26 then
[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]
end
end;

chắc các bạn cũng đã hỉu :D
là thế này
chúng ta sẽ cho số a ra random từ 1->24 bằng lệnh sau
a = random(1,24)
rùi sau đó níu a = 1 thì nó sẽ thông báo câu lệnh gì đó và tương tự a = 2 , a = 3, a = n (n là số từ 1->24) nó sẽ thông báo những câu khác nhau
còn về tỉ lệ thì ...... đang tìm thêm

Tiến Đạt

19-12-10, 02:35 PM

Ơ đều nhỉ cuối cái scipts có đoạn này

MsgEx("Phien Ban: Vo Lam Truyen Ky Song Gio Tinh Yeu by Tien Dat",1)
elseif a == 26 then
[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]

[M]r[K]id

19-12-10, 02:52 PM

đã tìm ra tỉ lệ: đã tét ko bug

function anccc1()
if GetItemCount(banhchungcaocap1) >= 1 and GetCash() >= 1000000 then
DelEventItem(banhchungcaocap1)
pay(1000000)
for i=1,10 do AddOwnExp(50000000) end
if b == 1 then
if a == 1 then
AddItem( 0, 0, 0, 61, nguhanh, mayman, 10) --<color=yellow> [Hoang Kim] Vo Gian Y Thien Kiem +1
end
if a == 2 then
AddItem( 0, 0, 1, 61, nguhanh, mayman, 10) --<color=yellow> [Hoang Kim] Tu Khong Giang Ma Gioi Dao +1
end
if a == 3 then
AddItem( 0, 0, 2, 61, nguhanh, mayman, 10) --<color=yellow> [Hoang Kim] Phuc Ma Tu Kim Con +1
end
if a == 4 then
AddItem( 0, 0, 3, 61, nguhanh, mayman, 10) --<color=yellow> [Hoang Kim] Ke Nghiep Bon Loi Toan Long Thuong +1
end
if a == 5 then
AddItem( 0, 0, 4, 61, nguhanh, mayman, 10) --<color=yellow> [Hoang Kim] Ham Thien Kim Hoan Dai Nhan Than Chuy +1
end
if a == 6 then
AddItem( 0, 0, 5, 61, nguhanh, mayman, 10) --<color=yellow> [Hoang Kim] Bich Hai Uyen Uong Lien Hoan Dao +1
end
if a == 7 then
AddItem( 0, 0, 0, 121, nguhanh, mayman, 10) --<color=yellow> [Hoang Kim] Lang Nhac Thai Cap Kiem +1
end
if a == 8 then
AddItem( 0, 0, 1, 121, nguhanh, mayman, 10) --<color=yellow> [Hoang Kim] Ngu Long Luong Ngan Bao Dao +1
end
if a == 9 then
AddItem( 0, 0, 2, 121, nguhanh, mayman, 10) --<color=yellow> [Hoang Kim] Dich Hy Luc Ngoc Truong +1
end
if a == 10 then
AddItem( 0, 0, 3, 121, nguhanh, mayman, 10) --<color=yellow> [Hoang Kim] Ma Sat Quy Coc U Minh Thuong +1
end
if a == 11 then
AddItem( 0, 0, 1, 151, nguhanh, mayman, 10) --<color=yellow> [Hoang Kim] Suong Tinh Thien Nien Han Thiet +1
end
if a == 12 then
AddItem( 0, 0, 5, 121, nguhanh, mayman, 10) --<color=yellow> [Hoang Kim] Vo Yem Phong Suong Lien Hoan Dao +1
end
if a == 13 then
AddItem( 0, 0, 0, 181, nguhanh, mayman, 10) --<color=yellow> [Hoang Kim] Cap Phong Chan Vo Kiem +1
end
if a == 14 then
AddItem( 0, 0, 1, 181, nguhanh, mayman, 10) --<color=yellow> [Hoang Kim] Te Hoang Phuong Chi Bao Dao +1
end
if a == 15 then
AddItem( 0, 0, 2, 181, nguhanh, mayman, 10) --<color=yellow> [Hoang Kim] Dong Cuu Phi Long Con +1
end
if a == 16 then
AddItem( 0, 0, 3, 181, nguhanh, mayman, 10) --<color=yellow> [Hoang Kim] Ma Nghi Hiep Hoa Phan Thanh Thuong +1
end
if a == 17 then
AddItem( 0, 0, 5, 181, nguhanh, mayman, 10) --<color=yellow> [Hoang Kim] U Lung Thuc Cot Song Nhan +1
end
if a == 18 then
AddItem( 0, 0, 0, 241, nguhanh, mayman, 10) --<color=yellow> [Hoang Kim] Loi Khung Cuu Thien Kiem +1
end
if a == 19 then
AddItem( 0, 0, 1, 241, nguhanh, mayman, 10) --<color=yellow> [Hoang Kim] Minh Ao Ta Sat Doc Nhan +1
end
if a == 20 then
AddItem( 0, 1, 2, 31, nguhanh, mayman, 10) --<color=yellow>Thien Quang Chi Hoa Vu Man Thien + 1
end
if a == 21 then
AddItem( 0, 1, 1, 31, nguhanh, mayman, 10) --<color=yellow>Bang Han Chi Dan Chi Phi Dao + 1
end
if a == 22 then
AddItem( 0, 1, 0, 31, nguhanh, mayman, 10) --<color=yellow>Sam Hoang Chi Phi Tinh Doat Hon + 1
end
if b == 2 then
AddEventItem(idbikip90)
end
if b == 3 then
AddEventItem(idbikip90)
end
if b == 4 then
AddEventItem(idbikip90)
end
if b == 5 then
AddEventItem(idbikip90)
end
Msg2Player("Ban Nhan Duoc 500 Trieu Kinh Nghiem va 1 món VKHK [+1]")
else
Msg2Player("Xin Kiem Tra Lai Thung Do Xem Ban Co Dem Theo Banh Chung Cao Cap [+1] va 100v Hay Khong")
end
end
end;

đoạn trên dịch ra thế này:
cho số a là random từ 1->22
số b là random 1->5
số a đã giải thích ở trên
số b h giải thích:
níu số b = 1 thì nó sẽ ra số a = 1->22
níu số b = 2->5 nó sẽ ra cái khác
như vậy tỉ lệ ra đồ hoàng kim là 1/5
còn tỉ lệ ra đồ khác là 4/5 ( ở đây của mình là pí kíp )

nhớ thiết lập nhưng thứ sau:
Include("\\Script\\global\\sourcejx49.lua");
a = random(1,23)
b = random(1,5)

[M]r[K]id

19-12-10, 02:53 PM

Ơ đều nhỉ cuối cái scipts có đoạn này

đổi lại thui mà ..... vì là admin nên phải pm yahoo mình chứ..... người khác sao zo dc sever mà giải quyết :H ( mặc dù đó là bạn batca2tay share server lên, nhưng có có datbase cũng chịu hà)

conan9x

20-12-10, 02:54 PM

Tiến Đạt

20-12-10, 03:03 PM

ak batca2tay ơi. cái sever Sóng gió tình yêu của ông ý. cái đồ Song gio - bat kham. đấy là đồ Kim ô của Thiếu Lâm. h tôi muốn đồ đó chỉ dùng cho phái thiếu lâm. như đồ Hoang Kim Môn Phái thì làm như thế nào. chứ cái Đồ Song Gio - Bat Kham đó phái nào cũng xài đc.Chắc Sever này ông định làm 1 bộ Full Kim ô Đúng Ko. Hy vọng là song gio ver 0.4 có

Bạn vô settings mục Item mở các file quần áo mũ ... lên .
Tìm Đồ Sóng Gió bất kham . ( chú ý mở file .txt == EX nhé ) tìm dòng 需求属性5数值 và ghi vô đó các số từ 0>>6
tương ứng với các phái , ví dụ 0 là phái nào cũng đc 1 là TV ... cứ test dần dần

Còn ở V4 chắc chắn sẽ có đủ 10 bộ Res Kim ô :)

K být đúng k nữa nhớ mang máng :)
K đúng thì tha tội dùm.