Osirius = 0
lovushka = 0
Menes_faza = 0
function c9010583_Die(MapID, InstanceID, CreatureID, CreatureTypeID, KillerID)
local monsterNum = map.GetMapScriptData(2453654675,InstanceID,1,1)
if monsterNum == nil or monsterNum < 0 then
	monsterNum = 0
end	
local num = 1 - monsterNum
if num > 0 then
	map.SetMapScriptData(2453654675,InstanceID,1,1,monsterNum+1)
else
	map.MapCreateCreature(MapID, InstanceID, 9010596, 79, 14115, 199)
	

	role.AddRoleItem(MapID, InstanceID, RoleID, 4400376, 1, 6, 8, 420)
	role.AddRoleItem(MapID, InstanceID, RoleID, 3500210, 5, 6, 8, 420)
	local MsgID = msg.BeginMsgEvent()	
	msg.AddMsgEvent(MsgID,101,950929)
	msg.DispatchMapMsgEvent(MsgID, MapID, InstanceID)
	--Горгульи
	map.MapCreateCreature(MapID, InstanceID, 9010600, 159, 14114, 238)
	map.MapCreateCreature(MapID, InstanceID, 9010600, 186, 14114, 230)
	map.MapCreateCreature(MapID, InstanceID, 9010600, 184, 14114, 260)
	map.MapCreateCreature(MapID, InstanceID, 9010600, 185, 14114, 293)
	map.MapCreateCreature(MapID, InstanceID, 9010600, 184, 14114, 316)
	map.MapCreateCreature(MapID, InstanceID, 9010600, 185, 14114, 343)
	map.MapCreateCreature(MapID, InstanceID, 9010600, 186, 14114, 367)
	map.MapCreateCreature(MapID, InstanceID, 9010600, 156, 14114, 365)
	map.MapCreateCreature(MapID, InstanceID, 9010600, 159, 14114, 344)
	map.MapCreateCreature(MapID, InstanceID, 9010600, 158, 14114, 318)
	map.MapCreateCreature(MapID, InstanceID, 9010600, 159, 14114, 290)
	map.MapCreateCreature(MapID, InstanceID, 9010600, 160, 14114, 265)
	-- Страж
	map.MapCreateCreature(MapID, InstanceID, 9010575, 171, 14114, 357)
	map.MapCreateCreature(MapID, InstanceID, 9010575, 171, 14114, 357)
	map.MapCreateCreature(MapID, InstanceID, 9010575, 171, 14114, 357)
	map.MapCreateCreature(MapID, InstanceID, 9010575, 171, 14114, 357)
	map.MapCreateCreature(MapID, InstanceID, 9010575, 178, 14114, 334)
	map.MapCreateCreature(MapID, InstanceID, 9010575, 178, 14114, 334)
	map.MapCreateCreature(MapID, InstanceID, 9010575, 164, 14114, 239)
	map.MapCreateCreature(MapID, InstanceID, 9010575, 164, 14114, 239)
	map.MapCreateCreature(MapID, InstanceID, 9010575, 171, 14114, 306)
	map.MapCreateCreature(MapID, InstanceID, 9010575, 171, 14114, 306)
	map.MapCreateCreature(MapID, InstanceID, 9010575, 171, 14114, 306)
	map.MapCreateCreature(MapID, InstanceID, 9010575, 171, 14114, 306)
	map.MapCreateCreature(MapID, InstanceID, 9010575, 179, 14114, 278)
	map.MapCreateCreature(MapID, InstanceID, 9010575, 179, 14114, 278)
	map.MapCreateCreature(MapID, InstanceID, 9010575, 163, 14114, 274)
	map.MapCreateCreature(MapID, InstanceID, 9010575, 163, 14114, 274)
	map.MapCreateCreature(MapID, InstanceID, 9010575, 171, 14114, 247)
	map.MapCreateCreature(MapID, InstanceID, 9010575, 171, 14114, 247)
	map.MapCreateCreature(MapID, InstanceID, 9010575, 171, 14114, 247)
	map.MapCreateCreature(MapID, InstanceID, 9010575, 171, 14114, 247)
	-- Ужас
	map.MapCreateCreature(MapID, InstanceID, 9010576, 171, 14114, 357)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 171, 14114, 357)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 171, 14114, 357)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 171, 14114, 357)			
	map.MapCreateCreature(MapID, InstanceID, 9010576, 171, 14114, 306)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 171, 14114, 306)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 171, 14114, 306)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 171, 14114, 306)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 171, 14114, 247)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 171, 14114, 247)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 171, 14114, 247)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 171, 14114, 247)
	--Страж
	map.MapCreateCreature(MapID, InstanceID, 9010576, 127, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 127, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 127, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 127, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 127, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 157, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 157, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 157, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 157, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 157, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 180, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 180, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 180, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 180, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 180, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 207, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 207, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 207, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 207, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010576, 207, 14114, 421)
	--Гончая
	map.MapCreateCreature(MapID, InstanceID, 9010579, 127, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010579, 127, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010579, 127, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010579, 127, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010579, 127, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010579, 157, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010579, 157, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010579, 157, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010579, 157, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010579, 157, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010579, 180, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010579, 180, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010579, 180, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010579, 180, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010579, 180, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010579, 207, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010579, 207, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010579, 207, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010579, 207, 14114, 421)
	map.MapCreateCreature(MapID, InstanceID, 9010579, 207, 14114, 421)
	--Анубис
	local anubis = map.MapCreateCreature(MapID, InstanceID, 9010584, 170, 14114, 493)
	map.SetMapScriptData(2453654675,InstanceID,1,3,anubis)
			
end
end	

aux.RegisterCreatureEvent(9010583, 4, "c9010583_Die")

function c9010596_On_Talk(MapID, InstanceID, TargetID, TargetTypeID, RoleID, TalkIndex)
local rolelevel = role.GetRoleLevel(MapID, InstanceID, RoleID)
if TalkIndex == -1 then
	local MsgID = msg.BeginMsgEvent()
	msg.AddMsgEvent(MsgID, 20, 950925)				
	msg.AddMsgEvent(MsgID, 24, TargetID)
	msg.AddMsgEvent(MsgID, 21, 4)
	msg.AddMsgEvent(MsgID, 1, 950926)					
	msg.AddMsgEvent(MsgID, 21, 5)
	msg.AddMsgEvent(MsgID, 1, 100002)				
	msg.DispatchRoleMsgEvent(RoleID, MsgID)
elseif TalkIndex == 4 then
	map.OpenCloseDoor(MapID, InstanceID, 2402, 1)
	local MsgID = msg.BeginMsgEvent()	
	msg.AddMsgEvent(MsgID,101,950930)
	msg.DispatchMapMsgEvent(MsgID, MapID, InstanceID)	
end
end
aux.RegisterCreatureEvent(9010596, 7, "c9010596_On_Talk")

function s9101801_Cast(MapID, InstanceID, SkillID, OwnerID)
local MsgID = msg.BeginMsgEvent()	
msg.AddMsgEvent(MsgID,101,950911)
msg.DispatchMapMsgEvent(MsgID, MapID, InstanceID)
local anubis = map.GetMapScriptData(2453654675,InstanceID,1,3)
unit.AddBuff(2453654675, InstanceID, anubis, 9834401, anubis)
unit.AddBuff(2453654675, InstanceID, anubis, 9837201, anubis)
end
aux.RegisterSkillEvent(9101801, 1, "s9101801_Cast")


function c9010584_Die(MapID, InstanceID,RoleID, CreatureID, CreatureTypeID, KillerID)

	role.AddRoleItem(MapID, InstanceID, RoleID, 4400376, 1, 6, 8, 420)
	role.AddRoleItem(MapID, InstanceID, RoleID, 3500210, 5, 6, 8, 420)
local MsgID = msg.BeginMsgEvent()	
msg.AddMsgEvent(MsgID,101,950931)
msg.DispatchMapMsgEvent(MsgID, MapID, InstanceID)
map.OpenCloseDoor(MapID, InstanceID, 2405, 1)
--Горгульи
map.MapCreateCreature(MapID, InstanceID, 9010600, 247, 14114, 425)
map.MapCreateCreature(MapID, InstanceID, 9010600, 280, 14114, 247)
map.MapCreateCreature(MapID, InstanceID, 9010600, 315, 14114, 247)
map.MapCreateCreature(MapID, InstanceID, 9010600, 349, 14114, 247)
map.MapCreateCreature(MapID, InstanceID, 9010600, 249, 14114, 451)
map.MapCreateCreature(MapID, InstanceID, 9010600, 282, 14114, 451)
map.MapCreateCreature(MapID, InstanceID, 9010600, 317, 14114, 453)
map.MapCreateCreature(MapID, InstanceID, 9010600, 346, 14114, 450)
map.MapCreateCreature(MapID, InstanceID, 9010600, 383, 13802, 424)
map.MapCreateCreature(MapID, InstanceID, 9010600, 379, 13802, 454)
-- Гончая
map.MapCreateCreature(MapID, InstanceID, 9010579, 256, 14114, 439)
map.MapCreateCreature(MapID, InstanceID, 9010579, 256, 14114, 439)
map.MapCreateCreature(MapID, InstanceID, 9010579, 256, 14114, 439)
map.MapCreateCreature(MapID, InstanceID, 9010579, 256, 14114, 439)
map.MapCreateCreature(MapID, InstanceID, 9010579, 280, 14114, 448)
map.MapCreateCreature(MapID, InstanceID, 9010579, 280, 14114, 448)
map.MapCreateCreature(MapID, InstanceID, 9010579, 283, 14114, 431)
map.MapCreateCreature(MapID, InstanceID, 9010579, 283, 14114, 431)
map.MapCreateCreature(MapID, InstanceID, 9010579, 310, 14114, 439)
map.MapCreateCreature(MapID, InstanceID, 9010579, 310, 14114, 439)
map.MapCreateCreature(MapID, InstanceID, 9010579, 310, 14114, 439)
map.MapCreateCreature(MapID, InstanceID, 9010579, 310, 14114, 439)
map.MapCreateCreature(MapID, InstanceID, 9010579, 333, 14114, 449)
map.MapCreateCreature(MapID, InstanceID, 9010579, 333, 14114, 449)
map.MapCreateCreature(MapID, InstanceID, 9010579, 334, 14114, 431)
map.MapCreateCreature(MapID, InstanceID, 9010579, 334, 14114, 431)
map.MapCreateCreature(MapID, InstanceID, 9010579, 373, 13802, 439)
map.MapCreateCreature(MapID, InstanceID, 9010579, 373, 13802, 439)
map.MapCreateCreature(MapID, InstanceID, 9010579, 373, 13802, 439)
-- Дух
map.MapCreateCreature(MapID, InstanceID, 9010578, 256, 14114, 439)
map.MapCreateCreature(MapID, InstanceID, 9010578, 256, 14114, 439)
map.MapCreateCreature(MapID, InstanceID, 9010578, 256, 14114, 439)
map.MapCreateCreature(MapID, InstanceID, 9010578, 256, 14114, 439)
map.MapCreateCreature(MapID, InstanceID, 9010578, 280, 14114, 448)
map.MapCreateCreature(MapID, InstanceID, 9010578, 280, 14114, 448)
map.MapCreateCreature(MapID, InstanceID, 9010578, 283, 14114, 431)
map.MapCreateCreature(MapID, InstanceID, 9010578, 283, 14114, 431)
map.MapCreateCreature(MapID, InstanceID, 9010578, 310, 14114, 439)
map.MapCreateCreature(MapID, InstanceID, 9010578, 310, 14114, 439)
map.MapCreateCreature(MapID, InstanceID, 9010578, 310, 14114, 439)
map.MapCreateCreature(MapID, InstanceID, 9010578, 310, 14114, 439)
map.MapCreateCreature(MapID, InstanceID, 9010578, 333, 14114, 449)
map.MapCreateCreature(MapID, InstanceID, 9010578, 333, 14114, 449)
map.MapCreateCreature(MapID, InstanceID, 9010578, 334, 14114, 431)
map.MapCreateCreature(MapID, InstanceID, 9010578, 334, 14114, 431)
map.MapCreateCreature(MapID, InstanceID, 9010578, 373, 13802, 439)
map.MapCreateCreature(MapID, InstanceID, 9010578, 373, 13802, 439)
map.MapCreateCreature(MapID, InstanceID, 9010578, 373, 13802, 439)
-- Страж
map.MapCreateCreature(MapID, InstanceID, 9010575, 554, 13802, 453)
map.MapCreateCreature(MapID, InstanceID, 9010575, 554, 13802, 453)
map.MapCreateCreature(MapID, InstanceID, 9010575, 554, 13802, 453)
map.MapCreateCreature(MapID, InstanceID, 9010575, 554, 13802, 453)
map.MapCreateCreature(MapID, InstanceID, 9010575, 554, 13802, 453)
map.MapCreateCreature(MapID, InstanceID, 9010575, 554, 13802, 453)
map.MapCreateCreature(MapID, InstanceID, 9010575, 554, 13802, 453)
map.MapCreateCreature(MapID, InstanceID, 9010575, 554, 13802, 453)
map.MapCreateCreature(MapID, InstanceID, 9010575, 554, 13802, 453)
map.MapCreateCreature(MapID, InstanceID, 9010575, 554, 13802, 453)
map.MapCreateCreature(MapID, InstanceID, 9010575, 549, 13802, 486)
map.MapCreateCreature(MapID, InstanceID, 9010575, 549, 13802, 486)
map.MapCreateCreature(MapID, InstanceID, 9010575, 549, 13802, 486)
map.MapCreateCreature(MapID, InstanceID, 9010575, 549, 13802, 486)
map.MapCreateCreature(MapID, InstanceID, 9010575, 549, 13802, 486)
map.MapCreateCreature(MapID, InstanceID, 9010575, 549, 13802, 486)
map.MapCreateCreature(MapID, InstanceID, 9010575, 549, 13802, 486)
map.MapCreateCreature(MapID, InstanceID, 9010575, 549, 13802, 486)
map.MapCreateCreature(MapID, InstanceID, 9010575, 549, 13802, 486)
map.MapCreateCreature(MapID, InstanceID, 9010575, 549, 13802, 486)
map.MapCreateCreature(MapID, InstanceID, 9010575, 548, 13802, 528)
map.MapCreateCreature(MapID, InstanceID, 9010575, 548, 13802, 528)
map.MapCreateCreature(MapID, InstanceID, 9010575, 548, 13802, 528)
map.MapCreateCreature(MapID, InstanceID, 9010575, 548, 13802, 528)
map.MapCreateCreature(MapID, InstanceID, 9010575, 548, 13802, 528)
map.MapCreateCreature(MapID, InstanceID, 9010575, 548, 13802, 528)
map.MapCreateCreature(MapID, InstanceID, 9010575, 548, 13802, 528)
map.MapCreateCreature(MapID, InstanceID, 9010575, 548, 13802, 528)
map.MapCreateCreature(MapID, InstanceID, 9010575, 548, 13802, 528)
map.MapCreateCreature(MapID, InstanceID, 9010575, 548, 13802, 528)
map.MapCreateCreature(MapID, InstanceID, 9010575, 513, 13802, 534)
map.MapCreateCreature(MapID, InstanceID, 9010575, 513, 13802, 534)
map.MapCreateCreature(MapID, InstanceID, 9010575, 513, 13802, 534)
map.MapCreateCreature(MapID, InstanceID, 9010575, 513, 13802, 534)
map.MapCreateCreature(MapID, InstanceID, 9010575, 513, 13802, 534)
map.MapCreateCreature(MapID, InstanceID, 9010575, 513, 13802, 534)
map.MapCreateCreature(MapID, InstanceID, 9010575, 513, 13802, 534)
map.MapCreateCreature(MapID, InstanceID, 9010575, 513, 13802, 534)
map.MapCreateCreature(MapID, InstanceID, 9010575, 513, 13802, 534)
map.MapCreateCreature(MapID, InstanceID, 9010575, 513, 13802, 534)
map.MapCreateCreature(MapID, InstanceID, 9010575, 474, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010575, 474, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010575, 474, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010575, 474, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010575, 474, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010575, 474, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010575, 474, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010575, 474, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010575, 474, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010575, 474, 13802, 533)
-- Паук
map.MapCreateCreature(MapID, InstanceID, 9010577, 423, 13802, 535)
map.MapCreateCreature(MapID, InstanceID, 9010582, 423, 13802, 535)
map.MapCreateCreature(MapID, InstanceID, 9010582, 423, 13802, 535)
map.MapCreateCreature(MapID, InstanceID, 9010582, 423, 13802, 535)
map.MapCreateCreature(MapID, InstanceID, 9010582, 423, 13802, 535)
map.MapCreateCreature(MapID, InstanceID, 9010582, 423, 13802, 535)
map.MapCreateCreature(MapID, InstanceID, 9010577, 412, 13802, 525)
map.MapCreateCreature(MapID, InstanceID, 9010582, 412, 13802, 525)
map.MapCreateCreature(MapID, InstanceID, 9010582, 412, 13802, 525)
map.MapCreateCreature(MapID, InstanceID, 9010582, 412, 13802, 525)
map.MapCreateCreature(MapID, InstanceID, 9010582, 412, 13802, 525)
map.MapCreateCreature(MapID, InstanceID, 9010582, 412, 13802, 525)
map.MapCreateCreature(MapID, InstanceID, 9010577, 392, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010582, 392, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010582, 392, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010582, 392, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010582, 392, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010582, 392, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010577, 396, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010582, 396, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010582, 396, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010582, 396, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010582, 396, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010582, 396, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010577, 335, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010582, 335, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010582, 335, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010582, 335, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010582, 335, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010582, 335, 13802, 533)
map.MapCreateCreature(MapID, InstanceID, 9010577, 348, 13802, 546)
map.MapCreateCreature(MapID, InstanceID, 9010582, 348, 13802, 546)
map.MapCreateCreature(MapID, InstanceID, 9010582, 348, 13802, 546)
map.MapCreateCreature(MapID, InstanceID, 9010582, 348, 13802, 546)
map.MapCreateCreature(MapID, InstanceID, 9010582, 348, 13802, 546)
map.MapCreateCreature(MapID, InstanceID, 9010582, 348, 13802, 546)
end

aux.RegisterCreatureEvent(9010584, 4, "c9010584_Die")

function c9010575_Die(MapID, InstanceID, TargetID, TargetTypeID, RoleID, CreatureID, CreatureTypeID, KillerID)
local monsterNum2 = map.GetMapScriptData(2453654675,InstanceID,1,4)
if monsterNum2 == nil or monsterNum2 < 0 then
	monsterNum2 = 0
end	
local num = 69 - monsterNum2
if num > 0 then
	map.SetMapScriptData(2453654675,InstanceID,1,4,monsterNum2+1)
else
map.MapCreateCreature(MapID, InstanceID, 9010597, 364, 13802, 590)
role.AddRoleItem(MapID, InstanceID, RoleID, 6900596, 1, -1, 8, 420)

end
end
aux.RegisterCreatureEvent(9010575, 4, "c9010575_Die")

function c9010597_On_Talk(MapID, InstanceID, TargetID, TargetTypeID, RoleID, TalkIndex)
local rolelevel = role.GetRoleLevel(MapID, InstanceID, RoleID)
if TalkIndex == -1 then
	local MsgID = msg.BeginMsgEvent()
	msg.AddMsgEvent(MsgID, 20, 950927)				
	msg.AddMsgEvent(MsgID, 24, TargetID)
	msg.AddMsgEvent(MsgID, 21, 4)
	msg.AddMsgEvent(MsgID, 1, 950926)					
	msg.AddMsgEvent(MsgID, 21, 5)
	msg.AddMsgEvent(MsgID, 1, 100002)				
	msg.DispatchRoleMsgEvent(RoleID, MsgID)
elseif TalkIndex == 4 then
	if Osirius == 0 then
		local MsgID = msg.BeginMsgEvent()	
		msg.AddMsgEvent(MsgID,101,950934)
		msg.DispatchMapMsgEvent(MsgID, MapID, InstanceID)
		Osirius = 1
		local Osir = map.MapCreateCreature(MapID, InstanceID, 9010585, 463, 13802, 425)
		map.SetMapScriptData(2453654675,InstanceID,1,5,Osir)
    end
end
end
aux.RegisterCreatureEvent(9010597, 7, "c9010597_On_Talk")

function c9010585_Die(MapID, InstanceID,TargetID, TargetTypeID, RoleID, CreatureID, CreatureTypeID, KillerID)
map.OpenCloseDoor(MapID, InstanceID, 2406, 1)
	role.AddRoleItem(MapID, InstanceID, RoleID, 4400376, 1, 6, 8, 420)
	role.AddRoleItem(MapID, InstanceID, RoleID, 3500210, 5, 6, 8, 420)

local lovuska1 = map.MapCreateCreature(MapID, InstanceID, 9010602, 459, 13481, 331)
local kord = {}
kord[1] ={459,318}
kord[2] ={459,305}
kord[3] ={459,291}
kord[4] ={459,277}
kord[5] ={459,263}
kord[6] ={459,249}
kord[7] ={459,235}

kord[8] ={453,324}
kord[9] ={453,310}
kord[10] ={453,296}
kord[11] ={453,282}
kord[12] ={453,268}
kord[13] ={453,254}
kord[14] ={453,240}

kord[15] ={465,324}
kord[16] ={465,310}
kord[17] ={465,296}
kord[18] ={465,282}
kord[19] ={465,268}
kord[20] ={465,254}
kord[21] ={465,240}
for i = 1,21 do
	local lovuska1 = map.MapCreateCreature(MapID, InstanceID, 9010601, kord[i][1], 13481, kord[i][2])
end

--Дух
map.MapCreateCreature(MapID, InstanceID, 9010578, 442, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010578, 442, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010578, 442, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010578, 442, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010578, 442, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010578, 445, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010578, 445, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010578, 445, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010578, 445, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010578, 445, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010578, 467, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010578, 467, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010578, 467, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010578, 467, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010578, 467, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010578, 486, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010578, 486, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010578, 486, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010578, 486, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010578, 486, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010578, 467, 13815, 107)
map.MapCreateCreature(MapID, InstanceID, 9010578, 467, 13815, 107)
map.MapCreateCreature(MapID, InstanceID, 9010578, 467, 13815, 107)
map.MapCreateCreature(MapID, InstanceID, 9010578, 467, 13815, 107)
map.MapCreateCreature(MapID, InstanceID, 9010578, 467, 13815, 107)

--Ужас
map.MapCreateCreature(MapID, InstanceID, 9010576, 442, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010576, 442, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010576, 442, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010576, 442, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010576, 442, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010576, 445, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010576, 445, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010576, 445, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010576, 445, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010576, 445, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010576, 467, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010576, 467, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010576, 467, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010576, 467, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010576, 467, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010576, 486, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010576, 486, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010576, 486, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010576, 486, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010576, 486, 13815, 134)
map.MapCreateCreature(MapID, InstanceID, 9010576, 467, 13815, 107)
map.MapCreateCreature(MapID, InstanceID, 9010576, 467, 13815, 107)
map.MapCreateCreature(MapID, InstanceID, 9010576, 467, 13815, 107)
map.MapCreateCreature(MapID, InstanceID, 9010576, 467, 13815, 107)
map.MapCreateCreature(MapID, InstanceID, 9010576, 467, 13815, 107)

local Menes = map.MapCreateCreature(MapID, InstanceID, 9010586, 462, 13815, 64)
map.SetMapScriptData(2453654675,InstanceID,1,6,Menes)
end


aux.RegisterCreatureEvent(9010585, 4, "c9010585_Die")

function m9010585_Atak(MapID, InstanceID, CreatureID, GetID)
local b = math.random(100)
if b<= 10 then
	local MsgID = msg.BeginMsgEvent()	
	msg.AddMsgEvent(MsgID,101,950915)
	msg.DispatchMapMsgEvent(MsgID, MapID, InstanceID)
	local Osir = map.GetMapScriptData(2453654675,InstanceID,1,5)
	unit.AddBuff(2453654675, InstanceID, Osir, 9834501, Osir)
	local svet = map.MapCreateCreature(MapID, InstanceID, 9010587, 440, 13802, 439)
	local tma = map.MapCreateCreature(MapID, InstanceID, 9010588, 479, 13802, 442)
end
end
aux.RegisterCreatureEvent(9010585, 14, "m9010585_Atak")

function c9010587_On_Talk(MapID, InstanceID, TargetID, TargetTypeID, RoleID, TalkIndex)
unit.AddBuff(MapID, InstanceID, RoleID,9834901,RoleID)
map.MapDeleteCreature(2453654675, InstanceID, TargetID)	
end
aux.RegisterCreatureEvent(9010587, 7, "c9010587_On_Talk")

function c9010588_On_Talk(MapID, InstanceID, TargetID, TargetTypeID, RoleID, TalkIndex)
local Osir = map.GetMapScriptData(2453654675,InstanceID,1,5)
unit.AddBuff(MapID, InstanceID, RoleID,9835001,RoleID)
map.MapDeleteCreature(2453654675, InstanceID, TargetID)
unit.CancelBuff(2453654675, InstanceID, Osir, 9834501)	
end
aux.RegisterCreatureEvent(9010588, 7, "c9010588_On_Talk")

function c9010602_On_Disappear(MapID, InstanceID, TargetID, TargetTypeID)
local lovuska1 = map.MapCreateCreature(MapID, InstanceID, 9010603, 459, 13481, 331)
end
aux.RegisterCreatureEvent(9010602, 13, "c9010602_On_Disappear")

function c9010603_On_Disappear(MapID, InstanceID, TargetID, TargetTypeID)
if lovushka == 0 then
local lovuska1 = map.MapCreateCreature(MapID, InstanceID, 9010602, 459, 13481, 331)
local kord = {}
kord[1] ={459,317}
kord[2] ={459,305}
kord[3] ={459,291}
kord[4] ={459,277}
kord[5] ={459,263}
kord[6] ={459,249}
kord[7] ={459,235}

kord[8] ={453,324}
kord[9] ={453,310}
kord[10] ={453,296}
kord[11] ={453,282}
kord[12] ={453,268}
kord[13] ={453,254}
kord[14] ={453,240}

kord[15] ={465,324}
kord[16] ={465,310}
kord[17] ={465,296}
kord[18] ={465,282}
kord[19] ={465,268}
kord[20] ={465,254}
kord[21] ={465,240}

for i = 1,21 do
	local lovuska1 = map.MapCreateCreature(MapID, InstanceID, 9010601, kord[i][1], 13481, kord[i][2])
end
lovushka = 1
else
local lovuska1 = map.MapCreateCreature(MapID, InstanceID, 9010602, 465, 13481, 331)
local kord = {}
kord[1] ={465,317}
kord[2] ={465,305}
kord[3] ={465,291}
kord[4] ={465,277}
kord[5] ={465,263}
kord[6] ={465,249}
kord[7] ={465,235}

kord[8] ={453,317}
kord[9] ={453,305}
kord[10] ={453,291}
kord[11] ={453,277}
kord[12] ={453,263}
kord[13] ={453,249}
kord[14] ={453,235}

kord[15] ={459,324}
kord[16] ={459,310}
kord[17] ={459,296}
kord[18] ={459,282}
kord[19] ={459,268}
kord[20] ={459,254}
kord[21] ={459,240}
kord[22] ={453,331}


for i = 1,22 do
	local lovuska1 = map.MapCreateCreature(MapID, InstanceID, 9010601, kord[i][1], 13481, kord[i][2])
end
lovushka = 0
end
end
aux.RegisterCreatureEvent(9010603, 13, "c9010603_On_Disappear")

function m9010586_Atak(MapID, InstanceID, CreatureID, GetID)
local x,y,z = unit.GetPosition(MapID, InstanceID, CreatureID)
local b = math.random(100)
if b<= 20 then
	local skarabey = map.MapCreateCreature(MapID, InstanceID, 9010589, x, y, z)
	
end
HpPercent = unit.GetAttValue(MapID, InstanceID, CreatureID, 9) * 100 / unit.GetAttValue(MapID, InstanceID, CreatureID, 8)
HpPercent = math.floor(HpPercent)
local Menes = map.GetMapScriptData(2453654675,InstanceID,1,6)
unit.AddBuff(2453654675, InstanceID, Menes, 9835901, Menes)

end
aux.RegisterCreatureEvent(9010586, 14, "m9010586_Atak")

function c9010589_Die(MapID, InstanceID, CreatureID, CreatureTypeID, KillerID)
local x,y,z = unit.GetPosition(MapID, InstanceID, CreatureID)
map.MapCreateCreature(MapID, InstanceID, 9010590, x, y, z)
local Menes = map.GetMapScriptData(2453654675,InstanceID,1,6)
unit.AddBuff(2453654675, InstanceID, Menes, 9835901, Menes)
	role.AddRoleItem(MapID, InstanceID, RoleID, 4400376, 1, 6, 8, 420)
	role.AddRoleItem(MapID, InstanceID, RoleID, 3500210, 5, 6, 8, 420)
	
end
aux.RegisterCreatureEvent(9010589, 4, "c9010589_Die")

function c9010586_Die(MapID, InstanceID, CreatureID, CreatureTypeID, KillerID)
local x,y,z = unit.GetPosition(MapID, InstanceID, CreatureID)
map.MapCreateCreature(MapID, InstanceID, 9010591, x, y, z)
map.MapCreateCreature(MapID, InstanceID, 9010598, 440, 13815, 60)
	role.AddRoleItem(MapID, InstanceID, RoleID, 4400376, 1, 6, 8, 420)
	role.AddRoleItem(MapID, InstanceID, RoleID, 3500210, 5, 6, 8, 420)

end
aux.RegisterCreatureEvent(9010586, 4, "c9010586_Die")

function c9010598_On_Talk(MapID, InstanceID, TargetID, TargetTypeID, RoleID, TalkIndex)
if TalkIndex == -1 then
	local MsgID = msg.BeginMsgEvent()
	msg.AddMsgEvent(MsgID, 20, 950928)				
	msg.AddMsgEvent(MsgID, 24, TargetID)
	msg.AddMsgEvent(MsgID, 21, 4)
	msg.AddMsgEvent(MsgID, 1, 100001)					
	msg.AddMsgEvent(MsgID, 21, 5)
	msg.AddMsgEvent(MsgID, 1, 100002)				
	msg.DispatchRoleMsgEvent(RoleID, MsgID)
elseif TalkIndex == 4 then
	role.RoleGotoNewMap(MapID, InstanceID, RoleID, 3424073512, 630, 23094, 630)	
end
end
aux.RegisterCreatureEvent(9010598, 7, "c9010598_On_Talk")