Xin script gọi boss HKMP

**hvaquang** · 10-09-21, 03:04 AM

Mình chơi offline muốn gọi boss từ lbadmjn, đứng chổ nào gọi nó ra chổ đó luôn. Bác nào có thể cho mình xin script được không. Xin cám ơn các bác nhiều.

**tului** · 10-09-21, 12:31 PM

Gửi bởi hvaquang [Only registered and activated users can see links. ]

Mình chơi offline muốn gọi boss từ lbadmjn, đứng chổ nào gọi nó ra chổ đó luôn. Bác nào có thể cho mình xin script được không. Xin cám ơn các bác nhiều.

Bạn vào theo đường dẫn: /home/jxser/server1/script/item tìm file bosscharm.lua mở lên chép vào:

Code:

Include("\\script\\global\\forbidmap.lua");

--tinhpn 20100809: forbid Tong Map
--local tbUseOnlyInMap = 
--{
--	586,587,588,589,590,591,592,593,594,595,596,597,598,599,600,601,602,603,604,
--}
--local checkOnlyUseInMap = function()
--	local nMapId = SubWorldIdx2MapCopy(SubWorld)
--	for i = 1, getn( %tbUseOnlyInMap ) do		--ÌØÊâµØÍ¼½ûÓÃ
--		if( %tbUseOnlyInMap[i] == nMapId ) then
--			return 1
--		end
--	end
--	return 0
--end

function main(nItemIdx)
--	local _, _, _, nLevel= GetItemProp( nItemIdx );
	local ForbiddenMap = {44, 209, 210, 211, 212, 213, 214, 215, 216, 217, 218, 219, 220, 221, 222, 223, 326, 327, 328, 329, 330, 331, 334, 335, 337, 338, 339, 344, 345, 346, 347, 348, 349, 350, 351, 352, 353, 354, 355, 356, 357, 358, 359, 360, 361, 362, 363, 364, 365, 366, 367, 368, 369, 370, 371, 372, 373, 374}
	local GoldenBoss = {{562, "§¹o Thanh Ch©n Nh©n", 4,120},
					  {563, "Gia LuËt TÞ Ly", 3,120},
					  {564, "Hoµng Nhan TuyÕt Y", 3,120},
					  {565, "§oan Méc DuÖ ", 3,120},
					  {566, "Cæ B¸ch", 0,120},
					  {567, "Chung Linh Tó ", 2,120},
					  {568, "Hµ Linh Phiªu", 2,120},
					  {582, "Lam Y Y", 1,120},
					  {583, "M¹nh Th¬ng L¬ng", 3,120},
					  {739, "V¬ng T¸ ", 0,120},
					  {740, "HuyÒn Gi¸c §¹i S ", 0,120},
					  {741, "§êng BÊt NhiÔm", 1,120},
					  {742, "B¹ch Doanh Doanh", 1,120},
					  {743, "Thanh HiÓu S Th¸i ", 2,120},
					  {744, "Yªn HiÓu Tr¸i", 2,120},
					  {745, "Hµ Nh©n Ng· ", 3,120},
					  {746, "LiÔu Nham", 4,120},
					  {747, "TuyÒn C¬ Tö ", 4,120},
					  {511, "Tr¬ng T«ng ChÝnh",5,370},
			  		  {513, "DiÖu Nh ",5,270},
			  		  {523, "LiÔu Thanh Thanh",5,370}}
			  		  
	local bosspro = {};
	local W,X,Y = GetWorldPos();
	local nMapId = W;
	if ( GetFightState() == 0 ) then	--·ÇÕ½¶·Çø½ûÓÃ
		Msg2Player("Kh«ng ë trong tr¹ng th¸i chiÕn ®Êu th× kh«ng thÓ sö dông");
		return 1
	end
	
	--tinhpn 20100803:  forbid Tong Map
	--if %checkOnlyUseInMap() ~= 1 then
	--	Msg2Player("Kh«ng thÓ sö dông vËt phÈm nµy t¹i ®©y.")
	--	return 1
	--end
	
	for i = 249, 318 do	--Ï´ËèµºÉ½¶´
		if ( i == nMapId ) then
			Msg2Player("N¬i ®©y kh«ng thÓ sö dông vËt phÈm nµy ");
			return 1
		end
	end	
	for i = 375, 415 do	--ÐÂÔöËÎ½ðÕ½³¡µØÍ¼ ËÍÐÅÈÎÎñµØÍ¼ ±ÈÎä´ó»áµØÍ¼
		if ( i == nMapId ) then
			Msg2Player("N¬i ®©y kh«ng thÓ sö dông vËt phÈm nµy ");
			return 1
		end
	end
	for i = 1, getn( ForbiddenMap ) do		--ÌØÊâµØÍ¼½ûÓÃ
		if( ForbiddenMap[i] == nMapId ) then
			Msg2Player("N¬i ®©y kh«ng thÓ sö dông vËt phÈm nµy ");
			return 1
		end
	end
	
	if (CheckAllMaps(nMapId) == 1) then
		Msg2Player("N¬i ®©y kh«ng thÓ sö dông vËt phÈm nµy ");
		return 1
	end
	
	for i = 1, getn(GoldenBoss) do
		bosspro[i] = GoldenBoss[i][4];
	end

	--local doubleodds = 160 - (nLevel - 1) * 10
	--local j = 1;
	--if( random(1,doubleodds) == 1) then
	--	j = 2;
	--end
	
	--for k = 1, j do
		local numth = randomaward(bosspro);
		local GoldenBossId = GoldenBoss[numth][1];
		local GoldenBossName = GoldenBoss[numth][2];
		local GoldenBossSeries = GoldenBoss[numth][3];
		if (GoldenBossSeries == 5) then
			GoldenBossSeries = random( 0, 4);
		end
		local npcindex = AddNpcEx( GoldenBossId, 95, GoldenBossSeries, SubWorldID2Idx(W), X * 32, (Y +  5)* 32, 1, GoldenBossName, 1 );
		SetNpcDeathScript(npcindex, "\\script\\misc\\boss\\callbossdeath.lua");
		WriteLog(date("%Y-%m-%d %H:%M:%S").." "..GetAccount()..", ["..GetName().."] Dïng lÖnh bµi gäi Boss ®Ó gäi Boss Hoµng Kim: "..GoldenBossName);
		Msg2Player("B¹n gäi ra 1 Boss: "..GoldenBossName);
	
	return 0	
end

function randomaward(aryProbability)
	local nRandNum;
	local nSum = 0;
	local nArgCount = getn( aryProbability );
	local nCompareSum = 0;
	for i = 1, nArgCount do
		nSum = nSum + aryProbability[i];
	end
	nRandNum = random(1,nSum);
	for i = 1,nArgCount do
		nCompareSum = nCompareSum + aryProbability[i]
		if( nRandNum <= nCompareSum) then
			return i;
		end
	end
end

--function GetDesc(nItemIdx)
	--local _, _, _, lvl = GetItemProp(nItemIdx);
	--local doubleodds = 160 - (lvl - 1) * 10
	--return "<color=blue>X¸c suÊt gäi ra Boss thø 2: <color=yellow>1/"..doubleodds;
--end

**hvaquang** · 10-09-21, 02:21 PM

Gửi bởi tului [Only registered and activated users can see links. ]

Bạn vào theo đường dẫn: /home/jxser/server1/script/item tìm file bosscharm.lua mở lên chép vào:

Code:

Include("\\script\\global\\forbidmap.lua");

--tinhpn 20100809: forbid Tong Map
--local tbUseOnlyInMap = 
--{
--	586,587,588,589,590,591,592,593,594,595,596,597,598,599,600,601,602,603,604,
--}
--local checkOnlyUseInMap = function()
--	local nMapId = SubWorldIdx2MapCopy(SubWorld)
--	for i = 1, getn( %tbUseOnlyInMap ) do		--ÌØÊâµØÍ¼½ûÓÃ
--		if( %tbUseOnlyInMap[i] == nMapId ) then
--			return 1
--		end
--	end
--	return 0
--end

function main(nItemIdx)
--	local _, _, _, nLevel= GetItemProp( nItemIdx );
	local ForbiddenMap = {44, 209, 210, 211, 212, 213, 214, 215, 216, 217, 218, 219, 220, 221, 222, 223, 326, 327, 328, 329, 330, 331, 334, 335, 337, 338, 339, 344, 345, 346, 347, 348, 349, 350, 351, 352, 353, 354, 355, 356, 357, 358, 359, 360, 361, 362, 363, 364, 365, 366, 367, 368, 369, 370, 371, 372, 373, 374}
	local GoldenBoss = {{562, "§¹o Thanh Ch©n Nh©n", 4,120},
					  {563, "Gia LuËt TÞ Ly", 3,120},
					  {564, "Hoµng Nhan TuyÕt Y", 3,120},
					  {565, "§oan Méc DuÖ ", 3,120},
					  {566, "Cæ B¸ch", 0,120},
					  {567, "Chung Linh Tó ", 2,120},
					  {568, "Hµ Linh Phiªu", 2,120},
					  {582, "Lam Y Y", 1,120},
					  {583, "M¹nh Th¬ng L¬ng", 3,120},
					  {739, "V¬ng T¸ ", 0,120},
					  {740, "HuyÒn Gi¸c §¹i S ", 0,120},
					  {741, "§êng BÊt NhiÔm", 1,120},
					  {742, "B¹ch Doanh Doanh", 1,120},
					  {743, "Thanh HiÓu S Th¸i ", 2,120},
					  {744, "Yªn HiÓu Tr¸i", 2,120},
					  {745, "Hµ Nh©n Ng· ", 3,120},
					  {746, "LiÔu Nham", 4,120},
					  {747, "TuyÒn C¬ Tö ", 4,120},
					  {511, "Tr¬ng T«ng ChÝnh",5,370},
			  		  {513, "DiÖu Nh ",5,270},
			  		  {523, "LiÔu Thanh Thanh",5,370}}
			  		  
	local bosspro = {};
	local W,X,Y = GetWorldPos();
	local nMapId = W;
	if ( GetFightState() == 0 ) then	--·ÇÕ½¶·Çø½ûÓÃ
		Msg2Player("Kh«ng ë trong tr¹ng th¸i chiÕn ®Êu th× kh«ng thÓ sö dông");
		return 1
	end
	
	--tinhpn 20100803:  forbid Tong Map
	--if %checkOnlyUseInMap() ~= 1 then
	--	Msg2Player("Kh«ng thÓ sö dông vËt phÈm nµy t¹i ®©y.")
	--	return 1
	--end
	
	for i = 249, 318 do	--Ï´ËèµºÉ½¶´
		if ( i == nMapId ) then
			Msg2Player("N¬i ®©y kh«ng thÓ sö dông vËt phÈm nµy ");
			return 1
		end
	end	
	for i = 375, 415 do	--ÐÂÔöËÎ½ðÕ½³¡µØÍ¼ ËÍÐÅÈÎÎñµØÍ¼ ±ÈÎä´ó»áµØÍ¼
		if ( i == nMapId ) then
			Msg2Player("N¬i ®©y kh«ng thÓ sö dông vËt phÈm nµy ");
			return 1
		end
	end
	for i = 1, getn( ForbiddenMap ) do		--ÌØÊâµØÍ¼½ûÓÃ
		if( ForbiddenMap[i] == nMapId ) then
			Msg2Player("N¬i ®©y kh«ng thÓ sö dông vËt phÈm nµy ");
			return 1
		end
	end
	
	if (CheckAllMaps(nMapId) == 1) then
		Msg2Player("N¬i ®©y kh«ng thÓ sö dông vËt phÈm nµy ");
		return 1
	end
	
	for i = 1, getn(GoldenBoss) do
		bosspro[i] = GoldenBoss[i][4];
	end

	--local doubleodds = 160 - (nLevel - 1) * 10
	--local j = 1;
	--if( random(1,doubleodds) == 1) then
	--	j = 2;
	--end
	
	--for k = 1, j do
		local numth = randomaward(bosspro);
		local GoldenBossId = GoldenBoss[numth][1];
		local GoldenBossName = GoldenBoss[numth][2];
		local GoldenBossSeries = GoldenBoss[numth][3];
		if (GoldenBossSeries == 5) then
			GoldenBossSeries = random( 0, 4);
		end
		local npcindex = AddNpcEx( GoldenBossId, 95, GoldenBossSeries, SubWorldID2Idx(W), X * 32, (Y +  5)* 32, 1, GoldenBossName, 1 );
		SetNpcDeathScript(npcindex, "\\script\\misc\\boss\\callbossdeath.lua");
		WriteLog(date("%Y-%m-%d %H:%M:%S").." "..GetAccount()..", ["..GetName().."] Dïng lÖnh bµi gäi Boss ®Ó gäi Boss Hoµng Kim: "..GoldenBossName);
		Msg2Player("B¹n gäi ra 1 Boss: "..GoldenBossName);
	
	return 0	
end

function randomaward(aryProbability)
	local nRandNum;
	local nSum = 0;
	local nArgCount = getn( aryProbability );
	local nCompareSum = 0;
	for i = 1, nArgCount do
		nSum = nSum + aryProbability[i];
	end
	nRandNum = random(1,nSum);
	for i = 1,nArgCount do
		nCompareSum = nCompareSum + aryProbability[i]
		if( nRandNum <= nCompareSum) then
			return i;
		end
	end
end

--function GetDesc(nItemIdx)
	--local _, _, _, lvl = GetItemProp(nItemIdx);
	--local doubleodds = 160 - (lvl - 1) * 10
	--return "<color=blue>X¸c suÊt gäi ra Boss thø 2: <color=yellow>1/"..doubleodds;
--end

cái này là gọi 1 lần ra hết boss hay là gọi từng con vậy bác. em hơi mù

**tului** · 10-09-21, 03:08 PM

Gửi bởi hvaquang [Only registered and activated users can see links. ]

cái này là gọi 1 lần ra hết boss hay là gọi từng con vậy bác. em hơi mù

Gọi random, mỗi lần 1 con nhé bạn

Chủ đề: Xin script gọi boss HKMP

Công cụ Chủ đề

Xin script gọi boss HKMP

Ðề: Xin script gọi boss HKMP

Ðề: Xin script gọi boss HKMP

Ðề: Xin script gọi boss HKMP

Các Chủ đề tương tự

[JX] [Linux] Newbie Cần Xin Script Ép Đồ HKMP Từ Mảnh HKMP

[JX] Xin Hỏi Kỹ Về Cách Fixxx Skill 15x về Skill 9x Boss Đại HKMP !

[JX] JX Linux xin code dịch chuyển đến boss hkmp

[JX] xin script gọi boss HKMP

[JX] Xin hỏi về cách chỉnh cho boss HKMP rớt đồ tỷ lệ thấp

Quyền viết bài