--личная усадьба
function hb01_OnInit(MapID,InstanceID,CreatureID,CreatureTypeID)
	
		map.MapCreateColCreature(MapID, InstanceID, 5800091, 765,6333,1820, 1, "")
	
end
aux.RegisterMapEvent("hb01", 0, "hb01_OnInit")

--колодец
function c6020001_On_Invest(MapID, InstanceID, TargetID, TargetTypeID, RoleID, TalkIndex)
  --бафф
	if role.IsRoleHaveBuff(MapID, InstanceID, RoleID, 90034) then
			role.AddRoleItem(MapID, InstanceID, RoleID, 4100007, 5, -1, 8, 102)
		else	
			local bhave = role.IsRoleHaveBuff(MapID, InstanceID, RoleID, 90034)
		if bhave ~= true then
			role.AddRoleItem(MapID, InstanceID, RoleID, 4100007, 5, -1, 8, 102)
			role.RemoveFromRole(MapID, InstanceID, RoleID, 4100007, 4, 102) 
			return 1 			
		end
	end
end

aux.RegisterCreatureEvent(6020001, 6, "c6020001_On_Invest")

--Восточный телепорт 1
function I6600612_Use(MapID, InstanceID, TypeID, RoleID)
	role.RoleGotoNewMap(MapID, InstanceID, RoleID, 201103695, 1730, 625, 750)
end
aux.RegisterItemEvent(6600612, 1, "I6600612_Use")

--Восточный телепорт 2
function I6600613_Use(MapID, InstanceID, TypeID, RoleID)
	role.RoleGotoNewMap(MapID, InstanceID, RoleID, 201103695, 2160, 1189, 1125)
end
aux.RegisterItemEvent(6600613, 1, "I6600613_Use")

--Западный телепорт 1
function I6600614_Use(MapID, InstanceID, TypeID, RoleID)
	role.RoleGotoNewMap(MapID, InstanceID, RoleID, 201103695,385, 618, 1090)
end
aux.RegisterItemEvent(6600614, 1, "I6600614_Use")

--Западный телепорт 2
function I6600615_Use(MapID, InstanceID, TypeID, RoleID)
	role.RoleGotoNewMap(MapID, InstanceID, RoleID, 201103695,940, 337, 900)
end
aux.RegisterItemEvent(6600615, 1, "I6600615_Use")

--Эльфийская деревня
function I6600616_Use(MapID, InstanceID, TypeID, RoleID)
	role.RoleGotoNewMap(MapID, InstanceID, RoleID, 201103695, 645, 6222, 1873)
end
aux.RegisterItemEvent(6600616, 1, "I6600616_Use")