--телепорт
function c9010319_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, 950350)--При телепортации на локацию ивента все персонажи делятся на 2 канала: 80-94 уровни, 95-120 уровни. Для каждого канала появится свой босс и его слуги. Убейте босса за 1 час и получите ценные награды. Награды при смерти босса достаются добившей команде. На локации Снежная тюрьма можно использовать снежные навыки.		
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, 4)
		msg.AddMsgEvent(MsgID, 1, 100001)--OK					
		msg.AddMsgEvent(MsgID, 21, 5)
		msg.AddMsgEvent(MsgID, 1, 100002)				
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
	elseif TalkIndex == 4 then
	if rolelevel >79 and rolelevel<95 then
		role.RoleGotoNewMap(MapID, 1, RoleID, 940889436, 530, 1000, 230)
	elseif 	rolelevel>94 then
	    role.RoleGotoNewMap(MapID, 1, RoleID, 940889692, 530, 1000, 230)
	end
end
end
aux.RegisterCreatureEvent(9010319, 7, "c9010319_On_Talk")


function sn_GetOnePerfectMap(MapID, InstanceID, RoleID)
	return	1
end
aux.RegisterMapEvent("sn_01",  14, "sn_GetOnePerfectMap")
aux.RegisterMapEvent("sn_02",  14, "sn_GetOnePerfectMap")


function sn_CanEnterWhenOnline(MapID, RoleID)
	return 3424073512,610,23094,669
end
aux.RegisterMapEvent("sn_01",  12, "sn_CanEnterWhenOnline")
aux.RegisterMapEvent("sn_02",  12, "sn_CanEnterWhenOnline")


function sn_GetExporMapAndCoord(MapID, InstanceID, RoleID)
	return 1, 3424073512,610,23094,669
end
aux.RegisterMapEvent("sn_01",  13, "sn_GetExporMapAndCoord")
aux.RegisterMapEvent("sn_02",  13, "sn_GetExporMapAndCoord")

function sn_CanEnter(MapID, InstanceID, RoleID)
	return 1
end
aux.RegisterMapEvent("sn_01",  15, "sn_CanEnter")
aux.RegisterMapEvent("sn_02",  15, "sn_CanEnter")

function sn_OnPlayerLeave(MapID, InstanceID,RoleID)

end
aux.RegisterMapEvent("sn_01", 3, "sn_OnPlayerLeave")
aux.RegisterMapEvent("sn_02", 3, "sn_OnPlayerLeave")

function sn_OnPlayerEnter(MapID, InstanceID,RoleID)

end
aux.RegisterMapEvent("sn_01", 2, "sn_OnPlayerEnter")
aux.RegisterMapEvent("sn_02", 2, "sn_OnPlayerEnter")

function m9010321_Atak(MapID, InstanceID, CreatureID, GetID)
local a = math.random(2)
local b = math.random(1000)
local x, y ,z = unit.GetPosition(MapID, InstanceID, CreatureID)
if b <=200 then
if a == 1 then
for i = 1,60 do
local c = math.random(200)
local d = math.random(200)
map.MapCreateCreature(MapID, InstanceID, 9010328, 286+c, y, 298+d)
end
else
for i = 1,60 do
local c = math.random(200)
local d = math.random(200)
map.MapCreateCreature(MapID, InstanceID, 9010329, 286+c, y, 298+d)
end
end	 
end
end
aux.RegisterCreatureEvent(9010321, 14, "m9010321_Atak")
aux.RegisterCreatureEvent(9010325, 14, "m9010321_Atak")

function sn_OnRoleEnterArea(MapID, InstanceID, RoleID, ObjAreaID)
 if ObjAreaID == 182 or ObjAreaID == 183 or ObjAreaID == 184 or ObjAreaID == 186 then
 unit.AddBuff(MapID, InstanceID, RoleID, 9836901, RoleID)
end
	
end
aux.RegisterMapEvent("sn_01", 7, "sn_OnRoleEnterArea")
aux.RegisterMapEvent("sn_02", 7, "sn_OnRoleEnterArea")

function c9010321_OnDie(MapID, InstanceID, CreatureID, CreatureTypeID, KillerID) 
local TeamID = role.IsRoleHaveTeam(MapID, InstanceID, KillerID)
if TeamID ~= nil and TeamID ~= 4294967295 then
		local Role = {}
		Role[1], Role[2], Role[3], Role[4], Role[5], Role[6] = role.GetRoleTeamMemID(TeamID)
		for i=1, 6 do
		if Role[i] and Role[i]~= 4294967295 then
	role.AddRoleItem(MapID, InstanceID, KillerID, 7100237, 1, -1, 8, 420)
		
		end
		end
	end
end 
aux.RegisterCreatureEvent(9010321, 4, "c9010321_OnDie")