function br_OnRoleEnterArea1(MapID, InstanceID, RoleID, ObjAreaID)
	local curhour = tonumber(os.date("%H"))
	local curmin = tonumber(os.date("%M"))
	local day = os.date("%A")
	if (day == "Wednesday" or day == "Sunday") and 19 == curhour and curmin == 5 and ObjAreaID == 2531 then
		unit.CancelBuff(MapID, InstanceID, RoleID, 9852401)
	elseif (day == "Wednesday" or day == "Sunday") and 19 == curhour and curmin == 7 and ObjAreaID == 2531 then
		unit.CancelBuff(MapID, InstanceID, RoleID, 9852401)
	elseif (day == "Wednesday" or day == "Sunday") and 19 == curhour and curmin == 8 and ObjAreaID == 2531 then
		unit.CancelBuff(MapID, InstanceID, RoleID, 9852401)
	elseif (day == "Wednesday" or day == "Sunday") and 19 == curhour and curmin == 9 and ObjAreaID == 2531 then
		unit.CancelBuff(MapID, InstanceID, RoleID, 9852401)
	elseif (day == "Wednesday" or day == "Sunday") and 19 == curhour and curmin == 10 and ObjAreaID == 2531 then
		unit.CancelBuff(MapID, InstanceID, RoleID, 9852401)
	elseif (day == "Wednesday" or day == "Sunday") and 19 == curhour and curmin == 6 and ObjAreaID == 2531 then
		unit.CancelBuff(MapID, InstanceID, RoleID, 9852401)
	elseif (day == "Wednesday" or day == "Sunday") and 19 == curhour and curmin == 11 and ObjAreaID == 2533 then
		unit.CancelBuff(MapID, InstanceID, RoleID, 9852401)
	elseif (day == "Wednesday" or day == "Sunday") and 19 == curhour and curmin == 12 and ObjAreaID == 2533 then
		unit.CancelBuff(MapID, InstanceID, RoleID, 9852401)
	elseif (day == "Wednesday" or day == "Sunday") and 19 == curhour and curmin == 13 and ObjAreaID == 2533 then
		unit.CancelBuff(MapID, InstanceID, RoleID, 9852401)
	elseif (day == "Wednesday" or day == "Sunday") and 19 == curhour and curmin == 14 and ObjAreaID == 2533 then
		unit.CancelBuff(MapID, InstanceID, RoleID, 9852401)
	elseif (day == "Wednesday" or day == "Sunday") and 19 == curhour and curmin == 15 and ObjAreaID == 2533 then
		unit.CancelBuff(MapID, InstanceID, RoleID, 9852401)
	elseif (day == "Wednesday" or day == "Sunday") and 19 == curhour and curmin > 15 and ObjAreaID == 2534 then
		unit.CancelBuff(MapID, InstanceID, RoleID, 9852401)
	end
	end

aux.RegisterMapEvent("br", 7, "br_OnRoleEnterArea1")


function c9010697_On_Disappear(MapID, InstanceID, TargetID, TargetTypeID)
 map.MapCreateColCreature(MapID, InstanceID, 9010697, 40, 4340, 40, true, "")
 local RoleTbl = map.GetMapAllRoleID(MapID, InstanceID)

for k,v in pairs(RoleTbl) do
			unit.AddBuff(MapID, InstanceID, v,9852401,v)
		 if table.maxn(RoleTbl) == 1 then
 role.SetRoleScriptData(v, 1, RoleDataType["King_point"],1)
 role.SetRoleScriptData(v, 1, RoleDataType["King_win"], 1)
 role.RoleGotoNewMap(MapID, InstanceID, v, 3424073512, 630, 1000, 630)
 end	

end
end
aux.RegisterCreatureEvent(9010697, 13, "c9010697_On_Disappear")



function c9010698_On_Disappear(MapID, InstanceID, TargetID, TargetTypeID)
 	local kord_1 = {}
kord_1[1] = {1612,722}
kord_1[2] = {1444,800}
kord_1[3] = {1324,820}
kord_1[4] = {1180, 888}
kord_1[5] = {1056 ,980}
kord_1[6] = {950, 1060}
kord_1[7] = {880 ,1150}
kord_1[8] = {782, 1320}
kord_1[9] = {705 ,1502}
kord_1[10] = {676, 1675}
kord_1[11] = {681 ,1833}
kord_1[12] = {705 ,1982}
kord_1[13] = {734 ,2084}
kord_1[14] = {740, 2100}
kord_1[15] = {811 ,2270}
kord_1[16] = {900, 2380}
kord_1[17] = {988 ,2481}
kord_1[18] = {1050, 2520}
kord_1[19] = {1180, 2615}
kord_1[20] = {1310, 2670}
kord_1[21] = {1473, 2736}
kord_1[22] = {1665 ,2740}
kord_1[23] = {1900 ,2700}
kord_1[24] = {2088, 2620}
kord_1[25] = {2241, 2510}
kord_1[26] = {2390 ,2371}
kord_1[27] = {2500, 2198}
kord_1[28] = {2572, 2011}
kord_1[29] = {2600, 1900}
kord_1[30] = {2600 ,1732}
kord_1[31] = {2611 ,1700}
kord_1[32] = {2577 ,1480}
kord_1[33] = {2500 ,1280}
kord_1[34] = {2424, 1161}
kord_1[35] = {2300, 1050}
kord_1[36] = {2180 ,945}
kord_1[37] = {2055,868}
kord_1[38] = {1960,835}
kord_1[39] = {1819,792}
kord_1[40] = {1704,777}
kord_1[41] = {1588,772}
 
	for i = 1,41 do		
map.MapCreateColCreature(MapID, InstanceID, 9010653, kord_1[i][1], 4340, kord_1[i][2], true, "")
end
map.MapCreateColCreature(MapID, InstanceID, 9010697, 40, 4340, 40, true, "")
map.MapCreateColCreature(MapID, InstanceID, 9011653, 40, 4340, 40, true, "")
local MsgID = msg.BeginMsgEvent()
			msg.AddMsgEvent(MsgID, 101, 951036)          
			msg.DispatchMapMsgEvent(MsgID, MapID, InstanceID, -1)
end
aux.RegisterCreatureEvent(9010698, 13, "c9010698_On_Disappear")



function c9010709_On_Disappear(MapID, InstanceID, TargetID, TargetTypeID)
	local kord_2 = {}
	
kord_2[1] = {1710,1170}
kord_2[2] = {1574,1157}
kord_2[3] = {1450,1190}
kord_2[4] = {1330,1245}
kord_2[5] = {1238,1300}
kord_2[6] = {1150,1390}
kord_2[7] = {1104,1464}
kord_2[8] = {1037,1588}
kord_2[9] = {1012,1728}
kord_2[10] = {1008,1845}
kord_2[11] = {1032, 1990}
kord_2[12] = {1084, 2115}
kord_2[13] = {1161, 2228}
kord_2[14] = {1252, 2305}
kord_2[15] = {1358, 2380}
kord_2[16] = {1498, 2430}
kord_2[17] = {1641, 2440}
kord_2[18] = {1800, 2414}
kord_2[19] = {1940, 2355}
kord_2[20] = {2055, 2284}
kord_2[21] = {2131, 2193}
kord_2[22] = {2222 ,2064}
kord_2[23] = {2270, 1905}
kord_2[24] = {2260, 1723}
kord_2[25] = {2236 ,1594}
kord_2[26] = {2194, 1492}
kord_2[27] = {2130, 1400}
kord_2[28] = {2060, 1333}
kord_2[29] = {1968, 1252}
kord_2[30] = {1848 ,2100}
 
	for i = 1,30 do		
map.MapCreateColCreature(MapID, InstanceID, 9010653, kord_2[i][1], 4340, kord_2[i][2], true, "")
end
map.MapCreateColCreature(MapID, InstanceID, 9010697, 40, 4340, 40, true, "")
map.MapCreateColCreature(MapID, InstanceID, 9011653, 40, 4340, 40, true, "")
local MsgID = msg.BeginMsgEvent()
			msg.AddMsgEvent(MsgID, 101, 951036)          
			msg.DispatchMapMsgEvent(MsgID, MapID, InstanceID, -1)
end
aux.RegisterCreatureEvent(9010709, 13, "c9010709_On_Disappear")


function c9010690_On_Disappear(MapID, InstanceID, TargetID, TargetTypeID)
	local kord_3 = {}
kord_3[1] = {1992 ,1900}
kord_3[2] = {2045, 1850}
kord_3[3] = {2115 ,1800}
kord_3[4] = {2185 ,1800}
kord_3[5] = {2250 ,1800}
kord_3[6] = {2318 ,1825}
kord_3[7] = {2377, 1857}
kord_3[8] = {2438 ,1930}
kord_3[9] = {2462 ,1972}
kord_3[10] = {2470 ,2050}
kord_3[11] = {2460 ,2130}
kord_3[12] = {2395 ,2210}
kord_3[13] = {2350 ,2250}
kord_3[14] = {2240, 2300}
kord_3[15] = {2155 ,2285}
kord_3[16] = {2090 ,2250}
kord_3[17] = {2035, 2235}
kord_3[18] = {1990, 2190}
kord_3[19] = {1948 ,2100}
 
	for i = 1,19 do		
map.MapCreateColCreature(MapID, InstanceID, 9010653, kord_3[i][1], 4340, kord_3[i][2], true, "")
end
map.MapCreateColCreature(MapID, InstanceID, 9010697, 40, 4340, 40, true, "")
map.MapCreateColCreature(MapID, InstanceID, 9011653, 40, 4340, 40, true, "")
local MsgID = msg.BeginMsgEvent()
			msg.AddMsgEvent(MsgID, 101, 951036)          
			msg.DispatchMapMsgEvent(MsgID, MapID, InstanceID, -1)
end
aux.RegisterCreatureEvent(9010690, 13, "c9010690_On_Disappear")