Hỏi về script gọi boss Tần Thủy Hoàng = câu hồn ngọc

[quancoi000]

như đề, ai có cho mình xin nguyên vẹn code đó với nhé! tks nhiều!
:-*:-*:-*:-*:-*:-*:-*:-*:-*:-*:-*

[ken07]

của bạn đây



--ٟܶٴܪԱ
--sunduoliang
--2008.10.30

local tbItem = Item:GetClass("gaojigouhunyu");
tbItem.tbBoss =
{
--ֈܶ
['boss'] = {
--bossĻԆìIdìϥѐ
{"<color=gold>Tan thuy hoang<color>", 2426 , 150,5},
{"<color=gold>Tần Thủy Hoàng Mị ảnh<color>", 2475 ,5,150},
{"<color=gold>Tần Thủy Hoàng Mị ảnh1<color>", 2475 ,0,150,32},
{"<color=gold>Nhu Tiểu Thúy <color>", 2934 , 1,95},
{"<color=green>Trương Thiện Đức (Mộc)<color>",2935, 2,95},
{"<color=green>Triệu ứng tiên Mộc<color>",2979, 2,95},
{"<color=blue>Cổ Dật Sơn (Thủy)<color>",2936, 3,95},
{"<color=red>Ô Thanh Sơn (Hỏa)<color>",2937, 4,95},
{"<color=wheat>Trần Vô Mệnh (Thổ)<color>",2938, 5,95},
{"<color=gold>Vạn Tuyết Sơn (Kim)<color>", 2401 , 6,45},
{"<color=green>Hình Bộ Đầu (Mộc)<color>",2402, 7,45},
{"<color=blue>Vạn Lão Điên (Thủy)<color>",2403, 8,45},
{"<color=red>Cao Sĩ Hiền (Hỏa)<color>",2404, 9,45},
{"<color=wheat>Thác Bạc Sơn Xuyên (Thổ)<color>",2405, 10,45},
{"<color=gold>Dương Liễu (Kim)<color>", 2406 , 11,75},
{"<color=green>Thần Thương Phương Vấn (Mộc)<color>",2407, 12,75},
{"<color=blue>Triệu Ứng Tiên (Thủy)<color>",2408, 13,75},
{"<color=red>Hướng Ngọc Tiên (Hỏa)<color>",2409, 14,75},
{"<color=wheat>Man Tăng Bất Giới Hòa Thượng (Thổ)<color>",2410, 15,75},
}
}

local tbEvent =
{
Player.ProcessBreakEvent.emEVENT_MOVE,
Player.ProcessBreakEvent.emEVENT_ATTACK,
Player.ProcessBreakEvent.emEVENT_SITE,
Player.ProcessBreakEvent.emEVENT_USEITEM,
Player.ProcessBreakEvent.emEVENT_ARRANGEITEM,
Player.ProcessBreakEvent.emEVENT_DROPITEM,
Player.ProcessBreakEvent.emEVENT_SENDMAIL,
Player.ProcessBreakEvent.emEVENT_TRADE,
Player.ProcessBreakEvent.emEVENT_CHANGEFIGHTSTATE,
Player.ProcessBreakEvent.emEVENT_CLIENTCOMMAND,
Player.ProcessBreakEvent.emEVENT_LOGOUT,
Player.ProcessBreakEvent.emEVENT_DEATH,
Player.ProcessBreakEvent.emEVENT_ATTACKED,
}

function tbItem:OnUse()
--local nLevel = 95;
local tbOpt = {};
for nId, tbBoss in ipairs(self.tbBoss['boss']) do
table.insert(tbOpt, {tbBoss[1], self.CallBoss, self, it.dwId, nId, tbBoss[4]});
end
table.insert(tbOpt, {"Để ta nghĩ lại"});
Dialog:Say("Hãy chọn Boss muốn gọi", tbOpt);
end

function tbItem:CallBoss(nItemId, nId, nLevel, nSure)
local pItem = KItem.GetObjById(nItemId);
if not pItem then
return
end
--if me.nFightState == 0 then
--Dialog:Say("Chỉ có thể sử dụng Câu Hồn Ngọc tại Bí động của Gia Tộc");
--return 0;
--end
if not nSure then
local szMsg = string.format("Ngươi có chắc muốn triệu hồi <color=yellow> %s <color>?", self.tbBoss['boss'][nId][1]);
local tbOpt = {
{"Vâng, triệu hồi ngay!", self.CallProcess, self, nItemId, nId, nLevel},
{"Để suy nghĩ lại"},
}
Dialog:Say(szMsg, tbOpt);
return 0;
end
if me.DelItem(pItem) ~= 1 then
return;
end
local nMapId, nPosX, nPosY = me.GetWorldPos();
local pNpc = KNpc.Add2(self.tbBoss['boss'][nId][2], nLevel, self.tbBoss['boss'][nId][3], nMapId, nPosX, nPosY, 0, 1);
if pNpc then
me.Msg(string.format("Triệu hồi thành công %s", self.tbBoss['boss'][nId][1]));
end
end

function tbItem:CallProcess(nItemId, nId, nLevel)
GeneralProcess:StartProcess("Đang triệu hồi...", 5 * Env.GAME_FPS, {self.CallBoss, self, nItemId, nId, nLevel, 1}, nil, tbEvent);
end