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