Trích ra 1 file cho anh em coi chơi:
Do link quá nặng nên có thể die, các bạn tự leech sang link khác nhé
<b><font color=red>[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>]</font></b> (<b><font color=red>[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>]</font></b>)
<b><font color=red>[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>]</font></b>
Password: tranhba.com
Include("\\script\\lib\\globalfunctions.lua");
g_ItemName = "Túi Phong Yên Đãi Khởi ";
g_NeedRoom = 16;
g_NeedWeight = 300;
TSK_COUNTER = 1798;
function OnUse(nItemIdx)
local nCurCount = GetTask(TSK_COUNTER)+1;
local selTab = {
format("Được rồi. Bắt đầu mở thôi!/#open(%d)",nItemIdx),
"Xem bên trong có gì đã!/see_item",
"Tạm thời không mở/nothing",
}
Say("Đây là lần thứ <color=yellow>"..nCurCount.."<color> ngươi mở <color=yellow>"..g_ItemName.."<color>. Xin bạn lưu ý: mở 2 túi nhận đựoc 1 Quân Công, mở 10 túi nhận được 1 Bạch Ngọc Thạch, mở 20 túi nhận được 1 Trấn Phái quyển - trung, mở 80 túi nhận được 1 Long Huyết hoàn, mở 150 túi nhận được 1 Chiến Thần hoàn, mở 200 túi nhận được 1 Bôn Tiêu hoặc 1 Đằng Vụ, mở 240 túi nhận được 1 Trấn Phái quyển - hạ. Bạn xác nhận mở <color=yellow>"..g_ItemName.."<color> chứ? <color=red>Chú ý <color>: Bạn cần phải có "..g_NeedRoom.." chỗ trống và "..g_NeedWeight.."Sức lực; người chưa gia nhập Lưu Phái sẽ ngẫu nhiên nhận được Trấn Phái quyển của Lưu Phái.",getn(selTab),selTab);
end;
function see_item()
local szItems = " 1 Bàn Long Bích 1, Danh Vọng ngẫu nhiên 50-100 điểm, 1 mặt nạ Sát Thủ Đường, 1 Rương vũ khí Bạc, 3 Sinh đồ chứng thư, 3 Tú tài chứng thư, 3 Cử nhân chứng thư, Quân Công Chương, bạch Ngọc thạch, đối chiếu Lưu Phái Thấn phái quyển- trung, Long Huyết hoàn, Chiến Thần hoàn, 1 Bôn Tiêu hoặc Đằng Vụ ngẫu nhiên, với Lưu Phái Trấn Phái quyển -hạ tương ứng lưu phái";
Talk(1,"","Mỗi '"..g_ItemName.." có thể mở được các vật phẩm: "..szItems..". Chúc bạn may mắn!");
end;
tZJCP =
{
[0] = {{"Dịch Cân Kinh-trung",2,1,917},{"Tẩy Tủy Kinh-trung",2,1,923},{"Như Lai Thần Chưởng-trung",2,1,920},{"Hấp Tinh Trận-trung",2,1,926},{"Vạn Tướng Thần Công-trung",2,1,929},{"Thiên Âm Trấn Hồn Khúc-trung",2,1,932},{"Giáng Long Thập Bát Chưởng-trung",2,1,935},{"Đả Cẩu Côn Trận-trung",2,1,938},{"Vô Thượng Thái Cực Kiếm-trung",2,1,941},{"Thái Cực Thần Công-trung",2,1,944},{"Liên Hoàn Toàn Long Thương-trung",2,1,947},{"Bá Vương Tường Phụng Tiễn-trung",2,1,950},{"Vô ảnh Ma Cổ-trung",2,1,953},{"Vô Thiên Ma Công-trung",2,1,956}},
[1] = {{"Dịch Cân Kinh-trung",2,1,917},{"Tẩy Tủy Kinh-trung",2,1,923},{"Như Lai Thần Chưởng-trung",2,1,920}},
[2] = {{"Dịch Cân Kinh-trung",2,1,917}},
[3] = {{"Tẩy Tủy Kinh-trung",2,1,923}},
[4] = {{"Như Lai Thần Chưởng-trung",2,1,920}},
[5] = {{"Hấp Tinh Trận-trung",2,1,926}},
[6] = {{"Hấp Tinh Trận-trung",2,1,926}},
[7] = {{"Vạn Tướng Thần Công-trung",2,1,929},{"Thiên Âm Trấn Hồn Khúc-trung",2,1,932}},
[8] = {{"Vạn Tướng Thần Công-trung",2,1,929}},
[9] = {{"Thiên Âm Trấn Hồn Khúc-trung",2,1,932}},
[10] = {{"Giáng Long Thập Bát Chưởng-trung",2,1,935},{"Đả Cẩu Côn Trận-trung",2,1,938}},
[11] = {{"Giáng Long Thập Bát Chưởng-trung",2,1,935}},
[12] = {{"Đả Cẩu Côn Trận-trung",2,1,938}},
[13] = {{"Vô Thượng Thái Cực Kiếm-trung",2,1,941},{"Thái Cực Thần Công-trung",2,1,944}},
[14] = {{"Vô Thượng Thái Cực Kiếm-trung",2,1,941}},
[15] = {{"Thái Cực Thần Công-trung",2,1,944}},
[16] = {{"Liên Hoàn Toàn Long Thương-trung",2,1,947},{"Bá Vương Tường Phụng Tiễn-trung",2,1,950}},
[17] = {{"Liên Hoàn Toàn Long Thương-trung",2,1,947}},
[18] = {{"Bá Vương Tường Phụng Tiễn-trung",2,1,950}},
[19] = {{"Vô Thiên Ma Công-trung",2,1,956},{"Vô ảnh Ma Cổ-trung",2,1,953}},
[20] = {{"Vô Thiên Ma Công-trung",2,1,956}},
[21] = {{"Vô ảnh Ma Cổ-trung",2,1,953}},
}
tXJCP =
{
[0] = {{"Dịch Cân Kinh-hạ ",2,1,918},{"Tẩy Tủy Kinh-hạ ",2,1,924},{"Như Lai Thần Chưởng-hạ ",2,1,921},{"Hấp Tinh Trận-hạ ",2,1,927},{"Vạn Tướng Thần Công-hạ ",2,1,930},{"Thiên Âm Trấn Hồn Khúc-hạ ",2,1,933},{"Giáng Long Thập Bát Chưởng-hạ ",2,1,936},{"Đả Cẩu Côn Trận-hạ ",2,1,939},{"Vô Thượng Thái Cực Kiếm-hạ ",2,1,942},{"Thái Cực Thần Công-hạ ",2,1,945},{"Liên Hoàn Toàn Long Thương-hạ ",2,1,948},{"Bá Vương Tường Phụng Tiễn-hạ ",2,1,951},{"Vô ảnh Ma Cổ-hạ ",2,1,954},{"Vô Thiên Ma Công-hạ ",2,1,957}},
[1] = {{"Dịch Cân Kinh-hạ ",2,1,918},{"Tẩy Tủy Kinh-hạ ",2,1,924},{"Như Lai Thần Chưởng-hạ ",2,1,921}},
[2] = {{"Dịch Cân Kinh-hạ ",2,1,918}},
[3] = {{"Tẩy Tủy Kinh-hạ ",2,1,924}},
[4] = {{"Như Lai Thần Chưởng-hạ ",2,1,921}},
[5] = {{"Hấp Tinh Trận-hạ ",2,1,927}},
[6] = {{"Hấp Tinh Trận-hạ ",2,1,927}},
[7] = {{"Vạn Tướng Thần Công-hạ ",2,1,930},{"Thiên Âm Trấn Hồn Khúc-hạ ",2,1,933}},
[8] = {{"Vạn Tướng Thần Công-hạ ",2,1,930}},
[9] = {{"Thiên Âm Trấn Hồn Khúc-hạ ",2,1,933}},
[10] = {{"Giáng Long Thập Bát Chưởng-hạ ",2,1,936},{"Đả Cẩu Côn Trận-hạ ",2,1,939}},
[11] = {{"Giáng Long Thập Bát Chưởng-hạ ",2,1,936}},
[12] = {{"Đả Cẩu Côn Trận-hạ ",2,1,939}},
[13] = {{"Vô Thượng Thái Cực Kiếm-hạ ",2,1,942},{"Thái Cực Thần Công-hạ ",2,1,945}},
[14] = {{"Vô Thượng Thái Cực Kiếm-hạ ",2,1,942}},
[15] = {{"Thái Cực Thần Công-hạ ",2,1,945}},
[16] = {{"Liên Hoàn Toàn Long Thương-hạ ",2,1,948},{"Bá Vương Tường Phụng Tiễn-hạ ",2,1,951}},
[17] = {{"Liên Hoàn Toàn Long Thương-hạ ",2,1,948}},
[18] = {{"Bá Vương Tường Phụng Tiễn-hạ ",2,1,951}},
[19] = {{"Vô ảnh Ma Cổ-hạ ",2,1,954},{"Vô Thiên Ma Công-hạ ",2,1,957}},
[20] = {{"Vô Thiên Ma Công-hạ ",2,1,957}},
[21] = {{"Vô ảnh Ma Cổ-hạ ",2,1,954}},
}
function open(nItemIdx)
local nCurCount = GetTask(TSK_COUNTER)+1; --à±ầ°ấầàÚẳá´ẻ¿êặụ
local nRoute = GetPlayerRoute();
if gf_JudgeRoomWeight(g_NeedRoom,g_NeedWeight) == 1 then
if DelItemByIndex(nItemIdx,1) == 1 then
SetTask(TSK_COUNTER,nCurCount);
local nRand = 0;
local nRetCode,nItemIdx = 0,0;
nRetCode,nItemIdx = AddItem(2,1,1000,1); --ÅÍÁỳốà1áửấ±ẽị7èỡ
SetItemExpireTime(nItemIdx,7*24*3600);
Msg2Player("Bạn nhận được 1 Bàn Long Bích");
ModifyReputation(random(50,100),0);
nRetCode,nItemIdx = AddItem(2,1,1087,1); --ẫ±ấệèÃÃổắò1áử
Msg2Player("Bạn nhận được 1 Mặt nạ Sát Thủ Đường ");
nRetCode,nItemIdx = AddItem(2,1,1147,1);
SetItemExpireTime(nItemIdx,7*24*3600);
Msg2Player("Bạn nhận được 1 Rương vũ khí Bạc");
nRand = random(1,100);
if nRand <= 60 then
AddItem(2,0,597,3);
Msg2Player("Bạn đạt được 3 Sinh Viên Chứng Thư");
elseif nRand <= 90 then
AddItem(2,0,598,3);
Msg2Player("Bạn đạt được 3 Tú Tài Chứng Thư");
else
AddItem(2,0,599,3);
Msg2Player("Bạn đạt được 3 Cử Nhân chứng thư");
end;
if mod(nCurCount,2) == 0 then --ắỹạƯếÂ
nRetCode,nItemIdx = AddItem(2,1,9999,1);
Msg2Player("Bạn nhận được 1 Quân Công Chương");
end;
give_item(2,1,1024,1,"1 Bạch Ngọc thạch",50,10);
nRand = random(1,100);
if nRand <= 3 then
give_zpcp(tZJCP);
end;
if mod(nCurCount,20) == 0 then
give_zpcp(tZJCP);
end;
nRand = random(1,1000);
give_item(2,1,1002,1,"1 Long Huyết hoàn",5,80,7);
give_item(2,1,1005,1,"1 Chiến Thần hoàn",4,150,7);
nRand = random(1,1000);
if nRand <= 2 then --±ẳẽỹằũèÚẻớậổằỳ1ặƠ
if random(1,2) == 1 then
szItemName = "1 Bôn tiêu";
AddItem(0,105,16,1,1,-1,-1,-1,-1,-1,-1);
show_msg(szItemName,1)
else
szItemName = "1 Đằng Vụ";
AddItem(0,105,20,1,1,-1,-1,-1,-1,-1,-1);
show_msg(szItemName,1)
end;
end;
if mod(nCurCount,200) == 0 then
if random(1,2) == 1 then
szItemName = "1 Bôn tiêu";
AddItem(0,105,16,1,1,-1,-1,-1,-1,-1,-1);
show_msg(szItemName,1)
else
szItemName = "1 Đằng Vụ";
AddItem(0,105,20,1,1,-1,-1,-1,-1,-1,-1);
show_msg(szItemName,1)
end;
end;
nRand = random(1,1000);
if nRand <= 2 then
give_zpcp(tXJCP);
end;
if mod(nCurCount,240) == 0 then
give_zpcp(tXJCP);
end;
WriteLog("["..g_ItemName.."]:"..GetName().."thứ"..nCurCount.." mở "..g_ItemName);
end;
else
Talk(1,"","Khoảng trống hoặcsức lựccủa bạn không đủ. Xin kiểm tra lại hành trang trước!"..g_ItemName.."!");
end;
end;
function show_msg(szItemName,bGlobalMsg)
Msg2Player("Bạn nhận được "..szItemName);
if bGlobalMsg == 1 then
Msg2Global(GetName().."Mở '"..g_ItemName.." nhận được "..szItemName);
end;
WriteLog("["..g_ItemName.."]:"..GetName().."Nhận được"..szItemName);
end;
function give_zpcp(tbZPCP)
local nRoute = GetPlayerRoute();
local nRand = random(1,getn(tbZPCP[nRoute]));
local nId1 = tbZPCP[nRoute][nRand][2];
local nId2 = tbZPCP[nRoute][nRand][3];
local nId3 = tbZPCP[nRoute][nRand][4];
local szName = tbZPCP[nRoute][nRand][1];
AddItem(nId1,nId2,nId3,1);
show_msg(szName,1);
end;
function give_item(nID1,nID2,nID3,nCount,szItemName,nP,nMod Count,nDate)
local nCurCount = GetTask(TSK_COUNTER);
local nRand = random(1,1000);
local nRetCode,nItemIdx = 0,0;
if nRand <= nP then
nRetCode,nItemIdx = AddItem(nID1,nID2,nID3,nCount);
if nDate ~= nil then
SetItemExpireTime(nItemIdx,nDate*24*3600);
end;
show_msg(szItemName,1);
end;
if mod(nCurCount,nModCount) == 0 then
nRetCode,nItemIdx = AddItem(nID1,nID2,nID3,nCount);
show_msg(szItemName,1);
if nDate ~= nil then
SetItemExpireTime(nItemIdx,nDate*24*3600);
end;
end;
end;
function nothing()
end;
đ m cái server nó nằm trong này giải nén ra rồi chèn part vào mẹ đéo có cái gì mà chạy được server nổ VCL 30 char
<b><font color=red>[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>]</font></b> o3:o3:o3:o3:o3