--телепорт
function c9010333_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)		
		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 >60 then
		role.RoleGotoNewMap(MapID, 1, RoleID, 2301826433, 530, 1000, 230)
	end
end
end
aux.RegisterCreatureEvent(9010333, 7, "c9010333_On_Talk")


function w01_GetOnePerfectMap(MapID, InstanceID, RoleID)
	return	1
end
aux.RegisterMapEvent("w01",  14, "w01_GetOnePerfectMap")


function w01_CanEnterWhenOnline(MapID, RoleID)

	return 2301826433, 530, 1000, 230
end
aux.RegisterMapEvent("w01",  12, "w01_CanEnterWhenOnline")


function w01_GetExporMapAndCoord(MapID, InstanceID, RoleID)
	return 1, 3424073512,610,23094,669
end
aux.RegisterMapEvent("w01",  13, "w01_GetExporMapAndCoord")


function w01_CanEnter(MapID, InstanceID, RoleID)
	return 1
end
aux.RegisterMapEvent("w01",  15, "w01_CanEnter")


function w01_OnPlayerLeave(MapID, InstanceID,RoleID)

end
aux.RegisterMapEvent("w01", 3, "w01_OnPlayerLeave")


function w01_OnPlayerEnter(MapID, InstanceID,RoleID)

end
aux.RegisterMapEvent("w01", 2, "w01_OnPlayerEnter")

function w01_OnRoleEnterArea1(MapID, InstanceID, RoleID, ObjAreaID)
 if ObjAreaID == 746 then
 unit.AddBuff(MapID, InstanceID, RoleID, 9808601, RoleID)
end
end
aux.RegisterMapEvent("w01", 7, "w01_OnRoleEnterArea1")