Một Cách Hay Để Viết Các Script Nâng Cấp Item

[ohishu]

Việc Viết Các Script Nâng Cấp Item Đối Với Các Developer JXP Có Lẽ Là 1 Phần Ngán Nhất Vì Quá Dài !

Nay Tui Xin Trình Bày 1 Cách Viết Ngắn Gọn = Mảng Thông Qua Script Nâng Cấp Huyền Tinh Ở Version 0.3 TSBĐ

Coi Và Hiểu:

Include("\\script\\source\\sourcejx49.lua")

CTHuyenTinh={ -- Chú Thích: Tên Item , Số Item Để Thăng Cấp !
{"Huyen Tinh [1]",3},
{"Huyen Tinh [2]",3},
{"Huyen Tinh [3]",3},
{"Huyen Tinh [4]",4},
{"Huyen Tinh [5]",4},
{"Huyen Tinh [6]",4},
{"Huyen Tinh [7]",5},
{"Huyen Tinh [8]",5},
{"Huyen Tinh [9]",5},
{"Huyen Tinh [10]",5}
}

function thangcap()
SayEx({"<color=cyan>Tiem Tap Hoa:<color> Thang Cap\nHuyen Tinh <color=red>2 --> 4<color> Thi Can 3 Vien Dong Chat. Sac Xuat <color=red>100%<color>\nHuyen Tinh <color=red>5 --> 7<color> Thi Can 4 Vien Dong Chat. Sac Xuat <color=red>75%<color>\nHuyen Tinh <color=red>8 --> 10<color> Thi Can 5 Vien Dong Chat. Sac Xuat <color=red>50%<color> !",
"Thang Cap HT 2/thangcapht",
"Thang Cap HT 3/thangcapht",
"Thang Cap HT 4/thangcapht",
"Thang Cap HT 5/thangcapht",
"Thang Cap HT 6/thangcapht",
"Thang Cap HT 7/thangcapht",
"Thang Cap HT 8/thangcapht",
"Thang Cap HT 9/thangcapht",
"Thang Cap HT 10/thangcapht",
"Thoat/Exit"})
end

function thangcapht(sel)
id = sel + 1
z = GetItemCount(CTHuyenTinh[id][1])
if id >= 1 and id < 4 then
if GetItemCount(CTHuyenTinh[id][1]) >= CTHuyenTinh[id][2] then
for i=1,CTHuyenTinh[id][2] do DelItem(CTHuyenTinh[id][1]) end
if GetItemCount(CTHuyenTinh[id][1]) == z - CTHuyenTinh[id][2] then
AddEventItem(CTHuyenTinh[id+1][1])
Msg2Player("Ban Nhan Duoc 1 Vien Huyen Tinh Cap "..(id+1).." !")
else
Msg2Player("Ban Khong Co "..CTHuyenTinh[id][2].." Vien "..CTHuyenTinh[id][1].." !")
end
else
Msg2Player("Ban Khong Co "..CTHuyenTinh[id][2].." Vien "..CTHuyenTinh[id][1].." !")
end
elseif id >= 4 and id < 7 then
a = random(1,4) -- Xác Suất
if a > 1 then
if GetItemCount(CTHuyenTinh[id][1]) >= CTHuyenTinh[id][2] then
for i=1,CTHuyenTinh[id][2] do DelItem(CTHuyenTinh[id][1]) end
if GetItemCount(CTHuyenTinh[id][1]) == z - CTHuyenTinh[id][2] then
AddEventItem(CTHuyenTinh[id+1][1])
Msg2Player("Ban Nhan Duoc 1 Vien Huyen Tinh Cap "..(id+1).." !")
else
Msg2Player("Ban Khong Co "..CTHuyenTinh[id][2].." Vien "..CTHuyenTinh[id][1].." !")
end
else
Msg2Player("Ban Khong Co "..CTHuyenTinh[id][2].." Vien "..CTHuyenTinh[id][1].." !")
end
else
Msg2Player("Thang Cap "..CTHuyenTinh[id+1][1].." That Bai !")
end
elseif id >= 7 and id < 10 then
a = random(1,2) -- Xác Suất
if a == 2 then
if GetItemCount(CTHuyenTinh[id][1]) >= CTHuyenTinh[id][2] then
for i=1,CTHuyenTinh[id][2] do DelItem(CTHuyenTinh[id][1]) end
if GetItemCount(CTHuyenTinh[id][1]) == z - CTHuyenTinh[id][2] then
AddEventItem(CTHuyenTinh[id+1][1])
Msg2Player("Ban Nhan Duoc 1 Vien Huyen Tinh Cap "..(id+1).." !")
else
Msg2Player("Ban Khong Co "..CTHuyenTinh[id][2].." Vien "..CTHuyenTinh[id][1].." !")
end
else
Msg2Player("Ban Khong Co "..CTHuyenTinh[id][2].." Vien "..CTHuyenTinh[id][1].." !")
end
else
Msg2Player("Thang Cap "..CTHuyenTinh[id+1][1].." That Bai !")
end
end
end

Hay Thì Thanks Phát Nào

[xuanduan]

ohishu ông chỉnh lại cái sever thái sơn các chức năng free hết dùm cái GM mà bắt nạp KNB :L làm luôn cái skill GM luôn đj rồi up lai thank

[ohishu]

ohishu ông chỉnh lại cái sever thái sơn các chức năng free hết dùm cái GM mà bắt nạp KNB :L làm luôn cái skill GM luôn đj rồi up lai thank

Nguyên Nhân Báo Hết Card Là Do Hầu Hết Các DB Trên CLB Time Hết Hạn Đều Là 10/10/2010 Nên Có Bug Đó

Để Fix Thì Xem Bài Dẫn Của Thái Hòa:

[Only registered and activated users can see links. ]

[nghichtu91]

chừng nào ra save tsbd 3.0 vậy bạn ohishu

[Zin Kull]

chừng nào ra save tsbd 3.0 vậy bạn ohishu

Nghe tin tức gốc từ anh ohishu, tsbđ ver 0.3 là phiên bản onl, khác biệt hoàn toàn thay đỗi tất cả dev từ nền Mướp

[jxvietnam]

thay vì chờ người khác share server hãy lấy time đó tự làm 1 server cho riêng mình.
có thể sẽ ko hay = server người khác nhưng cũng vui vì đó là công sức của mình
script hay đó rút ngắn khá nhiều. Thay đổi số lượng cũng dễ