PDA

View Full Version : Hàm Mở Rộng Cho Sourcejx49.lua



niduti
05-01-2012, 07:00 PM
Cái Này Dành Cho Member Gà Lua Và Đang Develop Server Trên Nền JX49 Thôi Nhé Vào Đề Nào:

Các Bạn Vào Foder Script\Global Mở File Sourcejx49.lua = Text Document Và Kéo Xuống Dưới Cùng Coppy Đoạn Code Sau Vào:

function ThemDanhVong(id)
AddRepute(id)
Msg2Player("Ban Nhan Duoc "..id.." Diem Danh Vong !")
end

function KyNang(id)
HaveMagic(id)
end

function ThemKyNang(id,lv)
AddMagic(id,lv)
Msg2Player("Xin Chuc Mung Ban Da Lanh Hoi Duoc Tuyet Ky !")
end

function ResetTask()
for i=1,500 do SetTask(i,0) end
end

function XoaTatCaSkill()
for i=1,500 do DelMagic(i) end
AddMagic(1,1)
AddMagic(2,1)
AddMagic(53,1)
Msg2Player("Da Xoa Bang Skill !")
KickOutSelf()
end

function KiemTraVatPham(id)
GetItemCount(id)
end

function ThemVatPham(id)
AddEventItem(id)
Msg2Player("Ban Nhan Duoc 1 Vat Pham !")
end

Thật Ra Nó Là Hàm Việt Hóa Từ English Sang Vietnamese Thôi Chứ Không Có Gì Cả Hỗ Trợ Cho Các Bạn Dễ Nhớ Khi Develop JX !
Cách Dùng: Đã Thể Hiện Qua Tên Function



---------------------------------------------------------------------------------------------------------------------------



Hàm AddItemHK . Work Good in THD 2.0 Server


function AddItemHK(monphai)
if monphai == "thieulam" then
AddItem(0,4,4,9,nh,0,10)
AddItem(0,2,31,9,nh,0,10)
AddItem(0,6,4,9,nh,0,10)
AddItem(0,5,6,9,nh,0,10)
AddItem(0,8,4,9,nh,0,10)
AddItem(0,7,16,9,nh,0,10)
AddItem(0,9,4,9,nh,0,10)
AddItem(0,3,5,9,nh,0,10)
AddItem(0,3,5,9,nh,0,10)
Msg2Player("Nhan duoc trang bi HKMP Thieu Lam.")
elseif monphai == "thienvuong" then
AddItem(0,4,5,9,nh,0,10)
AddItem(0,2,32,9,nh,0,10)
AddItem(0,6,5,9,nh,0,10)
AddItem(0,5,7,9,nh,0,10)
AddItem(0,8,5,9,nh,0,10)
AddItem(0,7,17,9,nh,0,10)
AddItem(0,9,5,9,nh,0,10)
AddItem(0,3,6,9,nh,0,10)
AddItem(0,3,6,9,nh,0,10)
AddItem(0,10,7,10,nh,0,10)
Msg2Player("Nhan duoc trang bi HKMP Thien Vuong.")
elseif monphai == "duongmon" then
AddItem(0,4,6,9,nh,0,10)
AddItem(0,2,33,9,nh,0,10)
AddItem(0,6,6,9,nh0,10)
AddItem(0,5,8,9,nh,0,10)
AddItem(0,8,6,9,nh,0,10)
AddItem(0,7,18,9,nh,0,10)
AddItem(0,9,6,9,nh,0,10)
AddItem(0,3,7,9,nh,0,10)
AddItem(0,3,7,9,nh,0,10)
Msg2Player("Nhan duoc trang bi HKMP Duong Mon.")
elseif monphai == "ngudoc" then
AddItem(0,4,7,9,nh,0,10)
AddItem(0,2,34,9,nh,0,10)
AddItem(0,6,7,9,nh,0,10)
AddItem(0,5,9,9,nh,0,10)
AddItem(0,8,7,9,nh,0,10)
AddItem(0,7,19,9,nh,0,10)
AddItem(0,9,7,9,nh,0,10)
AddItem(0,3,8,9,nh,0,10)
AddItem(0,3,8,9,nh,0,10)
Msg2Player("Nhan duoc trang bi HKMP Ngu Doc.")
elseif monphai == "ngami" then
AddItem(0,4,8,9,nh,0,10)
AddItem(0,2,35,9,nh,0,10)
AddItem(0,6,8,9,nh,0,10)
AddItem(0,5,10,9,nh,0,10)
AddItem(0,8,8,9,nh,0,10)
AddItem(0,7,20,9,nh,0,10)
AddItem(0,9,8,9,nh,0,10)
AddItem(0,3,9,9,nh,0,10)
AddItem(0,3,9,9,nh,0,10)
Msg2Player("Nhan duoc trang bi HKMP Nga My.")
elseif monphai == "thuyyen" then
AddItem(0,4,9,9,nh,0,10)
AddItem(0,2,36,9,nh,0,10)
AddItem(0,6,9,9,nh,0,10)
AddItem(0,5,11,9,nh,0,10)
AddItem(0,8,9,9,nh,0,10)
AddItem(0,7,21,9,nh,0,10)
AddItem(0,9,9,9,nh,0,10)
AddItem(0,3,10,9,nh,0,10)
AddItem(0,3,10,9,nh,0,10)
Msg2Player("Nhan duoc trang bi HKMP Thuy Yen.")
elseif monphai == "caibang" then
AddItem(0,4,10,9,nh,0,10)
AddItem(0,2,37,9,nh,0,10)
AddItem(0,6,10,9,nh,0,10)
AddItem(0,5,12,9,nh,0,10)
AddItem(0,8,10,9,nh,0,10)
AddItem(0,7,22,9,nh,0,10)
AddItem(0,9,10,9,nh,0,10)
AddItem(0,3,11,9,nh,0,10)
AddItem(0,3,11,9,nh,0,10)
Msg2Player("Nhan duoc trang bi HKMP Cai Bang.")
elseif monphai == "thiennhan" then
AddItem(0,4,11,9,nh,0,10)
AddItem(0,2,38,9,nh,0,10)
AddItem(0,6,11,9,nh,0,10)
AddItem(0,5,13,9,nh,0,10)
AddItem(0,8,11,9,nh,0,10)
AddItem(0,7,23,9,nh,0,10)
AddItem(0,9,11,9,nh,0,10)
AddItem(0,3,12,9,nh,0,10)
AddItem(0,3,12,9,nh,0,10)
Msg2Player("Nhan duoc trang bi HKMP Thien Nhan.")
elseif monphai == "vodang" then
AddItem(0,4,12,9,nh,0,10)
AddItem(0,2,39,9,nh,0,10)
AddItem(0,6,12,9,nh,0,10)
AddItem(0,5,14,9,nh,0,10)
AddItem(0,8,12,9,nh,0,10)
AddItem(0,7,24,9,nh,0,10)
AddItem(0,9,12,9,nh,0,10)
AddItem(0,3,13,9,nh,0,10)
AddItem(0,3,13,9,nh,0,10)
Msg2Player("Nhan duoc trang bi HKMP Vo Dang.")
elseif monphai == "conlon" then
AddItem(0,4,13,9,nh,0,10)
AddItem(0,2,40,9,nh,0,10)
AddItem(0,6,13,9,nh,0,10)
AddItem(0,5,15,9,nh,0,10)
AddItem(0,8,13,9,nh,0,10)
AddItem(0,7,25,9,nh,0,10)
AddItem(0,9,13,9,nh,0,10)
AddItem(0,3,14,9,nh,0,10)
AddItem(0,3,14,9,nh,0,10)
AddItem(0,10,7,10,nh,0,10)
Msg2Player("Nhan duoc trang bi HKMP Con Lon.")
elseif monphai == nil then
Msg2Player("Hay chon mon phai ma ban can additem")
end
end;