FyrMM = {}
FyrMM.Panel = {}
FyrMM.Options = {}
FyrMM.noMap = false
FyrMM.Visible = true
FyrMM.AutoHidden = false
FyrMM.FpsTest = false
FyrMM.Fps = 0
FyrMM.FpsRaw = 0
FyrMM.Initialized = false
FyrMM.pScale = 75
FyrMM.pScalePercent = 0.75
FyrMM.questPinCount = 0
FyrMM.currentLocationsCount = 0
FyrMM.currentPOICount = 0
FyrMM.currentForwardCamps = 0
FyrMM.currentWayshrineCount = 0
FyrMM.AfterCombatUnhidePending = false
FyrMM.AfterCombatUnhideTimeStamp = 0
FyrMM.LastQuestPinRequest = 0
FyrMM.MovementSpeed = 0
FyrMM.MovementSpeedPrevious = 0
FyrMM.MovementSpeedMax = 0
FyrMM.UseOriginalFunctions = true
FyrMM.MeasureMaps = true
FyrMM.DistanceMeasurementStarted = false
FyrMM.InitialPreloadTimeStamp = nil
FyrMM.currentMap = {}
FyrMM.currentMap.MapId = 0
FyrMM.currentMap.PlayerNX = 0
FyrMM.currentMap.PlayerNY = 0
FyrMM.currentMap.mapBuilt = false
FyrMM.currentMap.PlayerMounted = false
FyrMM.currentMap.PlayerSwimming = false
FyrMM.currentMap.movedTimeStamp = 0
FyrMM.currentMap.ZoneIndex = 0
FyrMM.currentMap.MapContent = GetMapContentType()
FyrMM.CheckingZone = false
FyrMM.CustomPinList = {}
FyrMM.CustomPinCheckList = {}
FyrMM.LoadingCustomPins = {}
FyrMM.UpdatingCustomPins = {}
FyrMM.CustomPinsEnabled = true
FyrMM.CustomWaypointsList = {}
FyrMM.IsGroup = false
FyrMM.IsWaypoint = false
FyrMM.Waypoint = nil
FyrMM.IsRally = false
FyrMM.Rally = nil
FyrMM.IsPing = false
FyrMM.Ping = nil
FyrMM.OverMiniMap = false
FyrMM.OverMenu = false
FyrMM.MenuFadingIn = false
FyrMM.MenuFadingOut = false
FyrMM.DisableSubzones = false
FyrMM.Halted = false
FyrMM.HaltTimeOffset = 0
FyrMM.LastReload = 0
FyrMM.DebugMode = false
FyrMM.MapAPI0Present = false
FyrMM.FadingEdges = false
FyrMM.KeepRefreshNeeded = true
FyrMM.GroupRefreshNeeded = true
FyrMM.CustomPinCount = 0
FyrMM.AvailableQuestGivers = {}
FYRMM_ZOOM_MAX = 50
FYRMM_ZOOM_MIN = 1
FYRMM_DEFAULT_ZOOM_LEVEL = 10
FYRMM_ZOOM_INCREMENT_AMOUNT = nil
FYRMM_QUEST_PIN_REQUEST_TIMEOUT = 10000 -- Time in miliseconds to wait for quest pin data
FYRMM_QUEST_PIN_REQUEST_MINIMUM_DELAY = 1000 -- Time in miliseconds to be passed before requesting quest pins again
MM_GetNumMapLocations = GetNumMapLocations -- Location pin count
MM_IsMapLocationVisible = IsMapLocationVisible -- is Location visible
MM_GetMapLocationIcon = GetMapLocationIcon -- Location pin texture
MM_GetNumPOIs = GetNumPOIs -- POI pin count
MM_GetPOIMapInfo = GetPOIMapInfo -- POI pin info
FyrMM.QuestPins = {}
FyrMM.RequestedQuestPins = {}
FyrMM.currentDigSiteCount = 0
FyrMM.TimeFormat = 0
FyrMM.pinZoomScale = 1

local QuestPins = FyrMM.QuestPins
local RequestedQuestPins = FyrMM.RequestedQuestPins

local FreeQuestPinIndex = {}
local CurrentTasks = {}
local NeedQuestPinUpdate = true
local QuestPinsUpdating = false
local QuestTasksPending = false
local CustomPinsCopying = false
local PinRef = nil
local PRCustomPins = nil
local PRMap = nil
local LastQuestPinIndex = 0
local CurrentMap = FyrMM.currentMap
local CurrentMapId = 0
local CurrentTasks = CurrentTasks
local CWSTimeStamp = 0
local AQGTimeStamp = 0
local CleanPOIs = 0
local CustomPinIndex = {}
local CustomPinKeyIndex = {}
local FreeCustomPinIndex = {}
local LastCustomPinIndex = 0
local CustomPinMapId = 0
local PinsList = {}
local PinsIndex = {}
local Wayshrines = {}
local WayshrineDistancesTimStamp = 0
local KeepIndex = {}
local PositionLog3D = {}
local PositionLogCounter = 0
local Treasures = {}
local DragonNextLocation = {}
local Digsites = {}
local AQGList = {}
local AQGListFull = {}
local wuthreads = 0
local ruthreads = 0
local MenuAnimation
local wrc = 0
local mapContentType = 0
local ZOpinData = ZO_MapPin.PIN_DATA
local pi = math.pi
local detectedNewCustomPin = false
local CustomPinCrossReference = {}
local IsCompanionAround = false
local ASSISTED_PIN_TYPES = ZO_MapPin.ASSISTED_PIN_TYPES
local QUEST_PIN_TYPES = ZO_MapPin.QUEST_PIN_TYPES

local questPinTextures = {
    [MAP_PIN_TYPE_ASSISTED_QUEST_CONDITION] = "EsoUI/Art/Compass/quest_icon_assisted.dds",
    [MAP_PIN_TYPE_ASSISTED_QUEST_OPTIONAL_CONDITION] = "EsoUI/Art/Compass/quest_icon_assisted.dds",
    [MAP_PIN_TYPE_ASSISTED_QUEST_ENDING] = "EsoUI/Art/Compass/quest_icon_assisted.dds",
    [MAP_PIN_TYPE_ASSISTED_QUEST_REPEATABLE_CONDITION] = "EsoUI/Art/Compass/repeatableQuest_icon_assisted.dds",
    [MAP_PIN_TYPE_ASSISTED_QUEST_REPEATABLE_OPTIONAL_CONDITION] = "EsoUI/Art/Compass/repeatableQuest_icon_assisted.dds",
    [MAP_PIN_TYPE_ASSISTED_QUEST_REPEATABLE_ENDING] = "EsoUI/Art/Compass/repeatableQuest_icon_assisted.dds",
    [MAP_PIN_TYPE_ASSISTED_QUEST_ZONE_STORY_CONDITION] = "EsoUI/Art/Compass/zoneStoryQuest_icon_assisted.dds",
    [MAP_PIN_TYPE_ASSISTED_QUEST_ZONE_STORY_OPTIONAL_CONDITION] = "EsoUI/Art/Compass/zoneStoryQuest_icon_assisted.dds",
    [MAP_PIN_TYPE_ASSISTED_QUEST_ZONE_STORY_ENDING] = "EsoUI/Art/Compass/zoneStoryQuest_icon_assisted.dds",
    [MAP_PIN_TYPE_TRACKED_QUEST_CONDITION] = "EsoUI/Art/Compass/quest_icon.dds",
    [MAP_PIN_TYPE_TRACKED_QUEST_OPTIONAL_CONDITION] = "EsoUI/Art/Compass/quest_icon.dds",
    [MAP_PIN_TYPE_TRACKED_QUEST_ENDING] = "EsoUI/Art/Compass/quest_icon.dds",
    [MAP_PIN_TYPE_TRACKED_QUEST_REPEATABLE_CONDITION] = "EsoUI/Art/Compass/repeatableQuest_icon.dds",
    [MAP_PIN_TYPE_TRACKED_QUEST_REPEATABLE_OPTIONAL_CONDITION] = "EsoUI/Art/Compass/repeatableQuest_icon.dds",
    [MAP_PIN_TYPE_TRACKED_QUEST_REPEATABLE_ENDING] = "EsoUI/Art/Compass/repeatableQuest_icon.dds",
    [MAP_PIN_TYPE_TRACKED_QUEST_ZONE_STORY_CONDITION] = "EsoUI/Art/Compass/zoneStoryQuest_icon.dds",
    [MAP_PIN_TYPE_TRACKED_QUEST_ZONE_STORY_OPTIONAL_CONDITION] = "EsoUI/Art/Compass/zoneStoryQuest_icon.dds",
    [MAP_PIN_TYPE_TRACKED_QUEST_ZONE_STORY_ENDING] = "EsoUI/Art/Compass/zoneStoryQuest_icon.dds",
    [MAP_PIN_TYPE_QUEST_CONDITION] = "EsoUI/Art/Compass/quest_icon.dds",
    [MAP_PIN_TYPE_QUEST_OPTIONAL_CONDITION] = "EsoUI/Art/Compass/quest_icon.dds",
    [MAP_PIN_TYPE_QUEST_ENDING] = "EsoUI/Art/Compass/quest_icon.dds",
    [MAP_PIN_TYPE_QUEST_REPEATABLE_CONDITION] = "EsoUI/Art/Compass/repeatableQuest_icon.dds",
    [MAP_PIN_TYPE_QUEST_REPEATABLE_OPTIONAL_CONDITION] = "EsoUI/Art/Compass/repeatableQuest_icon.dds",
    [MAP_PIN_TYPE_QUEST_REPEATABLE_ENDING] = "EsoUI/Art/Compass/repeatableQuest_icon.dds",
    [MAP_PIN_TYPE_QUEST_ZONE_STORY_CONDITION] = "EsoUI/Art/Compass/zoneStoryQuest_icon.dds",
    [MAP_PIN_TYPE_QUEST_ZONE_STORY_OPTIONAL_CONDITION] = "EsoUI/Art/Compass/zoneStoryQuest_icon.dds",
    [MAP_PIN_TYPE_QUEST_ZONE_STORY_ENDING] = "EsoUI/Art/Compass/zoneStoryQuest_icon.dds",
    [MAP_PIN_TYPE_TRACKED_QUEST_OFFER_ZONE_STORY] = "EsoUI/Art/Compass/zoneStoryQuest_available_icon.dds"
}

local breadcrumbQuestPinTextures = {

    [MAP_PIN_TYPE_ASSISTED_QUEST_CONDITION] = "EsoUI/Art/Compass/quest_icon_door_assisted.dds",
    [MAP_PIN_TYPE_ASSISTED_QUEST_OPTIONAL_CONDITION] = "EsoUI/Art/Compass/quest_icon_door_assisted.dds",
    [MAP_PIN_TYPE_ASSISTED_QUEST_ENDING] = "EsoUI/Art/Compass/quest_icon_door_assisted.dds",
    [MAP_PIN_TYPE_ASSISTED_QUEST_REPEATABLE_CONDITION] = "EsoUI/Art/Compass/repeatableQuest_icon_door_assisted.dds",
    [MAP_PIN_TYPE_ASSISTED_QUEST_REPEATABLE_OPTIONAL_CONDITION] = "EsoUI/Art/Compass/repeatableQuest_icon_door_assisted.dds",
    [MAP_PIN_TYPE_ASSISTED_QUEST_REPEATABLE_ENDING] = "EsoUI/Art/Compass/repeatableQuest_icon_door_assisted.dds",
    [MAP_PIN_TYPE_ASSISTED_QUEST_ZONE_STORY_CONDITION] = "EsoUI/Art/Compass/zoneStoryQuest_icon_door_assisted.dds",
    [MAP_PIN_TYPE_ASSISTED_QUEST_ZONE_STORY_OPTIONAL_CONDITION] = "EsoUI/Art/Compass/zoneStoryQuest_icon_door_assisted.dds",
    [MAP_PIN_TYPE_ASSISTED_QUEST_ZONE_STORY_ENDING] = "EsoUI/Art/Compass/zoneStoryQuest_icon_door_assisted.dds",
    [MAP_PIN_TYPE_TRACKED_QUEST_CONDITION] = "EsoUI/Art/Compass/quest_icon_door.dds",
    [MAP_PIN_TYPE_TRACKED_QUEST_OPTIONAL_CONDITION] = "EsoUI/Art/Compass/quest_icon_door.dds",
    [MAP_PIN_TYPE_TRACKED_QUEST_ENDING] = "EsoUI/Art/Compass/quest_icon_door.dds",
    [MAP_PIN_TYPE_TRACKED_QUEST_REPEATABLE_CONDITION] = "EsoUI/Art/Compass/repeatableQuest_icon_door.dds",
    [MAP_PIN_TYPE_TRACKED_QUEST_REPEATABLE_OPTIONAL_CONDITION] = "EsoUI/Art/Compass/repeatableQuest_icon_door.dds",
    [MAP_PIN_TYPE_TRACKED_QUEST_REPEATABLE_ENDING] = "EsoUI/Art/Compass/repeatableQuest_icon_door.dds",
    [MAP_PIN_TYPE_TRACKED_QUEST_ZONE_STORY_CONDITION] = "EsoUI/Art/Compass/zoneStoryQuest_icon_door.dds",
    [MAP_PIN_TYPE_TRACKED_QUEST_ZONE_STORY_OPTIONAL_CONDITION] = "EsoUI/Art/Compass/zoneStoryQuest_icon_door.dds",
    [MAP_PIN_TYPE_TRACKED_QUEST_ZONE_STORY_ENDING] = "EsoUI/Art/Compass/zoneStoryQuest_icon_door.dds",
    [MAP_PIN_TYPE_QUEST_CONDITION] = "EsoUI/Art/Compass/quest_icon_door.dds",
    [MAP_PIN_TYPE_QUEST_OPTIONAL_CONDITION] = "EsoUI/Art/Compass/quest_icon_door.dds",
    [MAP_PIN_TYPE_QUEST_ENDING] = "EsoUI/Art/Compass/quest_icon_door.dds",
    [MAP_PIN_TYPE_QUEST_REPEATABLE_CONDITION] = "EsoUI/Art/Compass/repeatableQuest_icon_door.dds",
    [MAP_PIN_TYPE_QUEST_REPEATABLE_OPTIONAL_CONDITION] = "EsoUI/Art/Compass/repeatableQuest_icon_door.dds",
    [MAP_PIN_TYPE_QUEST_REPEATABLE_ENDING] = "EsoUI/Art/Compass/repeatableQuest_icon_door.dds",
    [MAP_PIN_TYPE_QUEST_ZONE_STORY_CONDITION] = "EsoUI/Art/Compass/zoneStoryQuest_icon_door.dds",
    [MAP_PIN_TYPE_QUEST_ZONE_STORY_OPTIONAL_CONDITION] = "EsoUI/Art/Compass/zoneStoryQuest_icon_door.dds",
    [MAP_PIN_TYPE_QUEST_ZONE_STORY_ENDING] = "EsoUI/Art/Compass/zoneStoryQuest_icon_door.dds",
    [MAP_PIN_TYPE_TRACKED_QUEST_OFFER_ZONE_STORY] = "EsoUI/Art/Compass/zoneStoryQuest_available_icon_door.dds"
}

local ZONE_EXPLORATION_PIN_TYPES = ZO_MapPin.SUGGESTION_PIN_TYPES -- showsPinAndArea = true is forward camps and SUGGESTION_PIN_TYPES

local OBJECTIVE_PIN_TYPES = ZO_MapPin.OBJECTIVE_PIN_TYPES

local CustomWaypoints = ZO_MapPin.MAP_PING_PIN_TYPES

----------------------------------------------------------------

local function GetQuestPinCount()
    return FyrMM.questPinCount
end

local function AvailableCustomPins()
    local count = 0
    for _, b in pairs(FyrMM.CustomPinList) do
        count = count + #b
    end
    return count
end

local function IsCustomPinsLoading()
    for _, b in pairs(FyrMM.LoadingCustomPins) do
        if b then
            return b
        end
    end
    return false
end

local function GetQuestFreePinIndex()
    local index = LastQuestPinIndex
    if not tableIsEmpty(FreeQuestPinIndex) then
        index = table.remove(FreeQuestPinIndex)
        return index
    end
    index = index + 1
    LastQuestPinIndex = index
    return index
end

FyrMM.RequestJournalQuestConditionAssistance = RequestJournalQuestConditionAssistance
function RequestJournalQuestConditionAssistance(questIndex, stepIndex, conditionIndex, assisted)
    local taskId = FyrMM.RequestJournalQuestConditionAssistance(questIndex, stepIndex, conditionIndex, assisted)
    local tag = ZO_MapPin.CreateQuestPinTag(questIndex, stepIndex, conditionIndex)
    local currentTime = GetGameTimeMilliseconds()
    if currentTime - FyrMM.LastQuestPinRequest > FYRMM_QUEST_PIN_REQUEST_MINIMUM_DELAY then
        FyrMM.questPinCount = GetQuestPinCount()
        QuestPinsUpdating = true
    end
    if taskId ~= nil and not FyrMM.Halted then
        FyrMM.LastQuestPinRequest = currentTime
        local currentTask = {}
        currentTask = tag
        currentTask.RequestTimeStamp = FyrMM.LastQuestPinRequest
        currentTask.MapId = CurrentMap.MapId
        currentTask.Fetched = true
        currentTask.ZO_MapVisible = ZO_WorldMap:IsHidden()
        CurrentTasks[taskId] = currentTask
    end
    return taskId
end

FyrMM.CancelRequestJournalQuestConditionAssistance = CancelRequestJournalQuestConditionAssistance
function CancelRequestJournalQuestConditionAssistance(taskId)
    if taskId ~= nil and CurrentTasks[taskId] and CurrentTasks[taskId].Fetched then
        CurrentTasks[taskId] = nil
        FyrMM.CancelRequestJournalQuestConditionAssistance(taskId)
    end
end

-----------------------------------------------------------------
-- Utility functions
-----------------------------------------------------------------
function tableIsEmpty(tbl)
    return next(tbl) == nil
end

local function CancelUpdates()
    EVENT_MANAGER:UnregisterForUpdate("FyrMiniMapDelayedRegister")
    -- EVENT_MANAGER:UnregisterForUpdate("FyrMiniMapZoneCheck")
    EVENT_MANAGER:UnregisterForUpdate("FyrMiniMapPOIPins")
    EVENT_MANAGER:UnregisterForUpdate("FyrMiniMapLocationsPins")
    EVENT_MANAGER:UnregisterForUpdate("FyrMiniMapWayshrinesPins")
    EVENT_MANAGER:UnregisterForUpdate("FyrMiniMapCustomPins")
    -- EVENT_MANAGER:UnregisterForUpdate("FyrMiniMapPOIPinsD")
    -- EVENT_MANAGER:UnregisterForUpdate("OnFyrMiniMapInitialPreload")
    EVENT_MANAGER:UnregisterForUpdate("OnFyrMiniMapCustomPinGroupAll")
    FyrMM.UpdatingCustomPins = {}
    FyrMM.LoadingCustomPins = {}
    if PinRef then
        for i, n in pairs(PRCustomPins) do
            if i > MAP_PIN_TYPE_INVALID then
                EVENT_MANAGER:UnregisterForUpdate("OnFyrMiniMapCustomPinGroup" .. tostring(i))
            end
        end
    end
end

local function IsCurrentLocation(pin)
    if not pin then
        return
    end

    local x, y = CurrentMap.PlayerNX, CurrentMap.PlayerNY
    local nX = pin.nX or pin.normalizedX
    local nY = pin.nY or pin.normalizedY

    if not (nX and nY and CurrentMap.TrueMapSize) then
        return false
    end

    local distance = zo_round(CurrentMap.TrueMapSize * math.sqrt((x - nX) ^ 2 + (y - nY) ^ 2) * 7.55) / 10 -- assumed size is 1.325 times larger than approximate effective skill distance in meters.
    local message = zo_strformat(SI_MM_STRING_DISTANCE, distance) .. " m"
    if not InformationTooltip:IsHidden() then
        InformationTooltip:AddLine(message, "", ZO_HIGHLIGHT_TEXT:UnpackRGB())
    end
    if not ZO_MapLocationTooltip:IsHidden() then
        ZO_MapLocationTooltip:AddLine(message, "", ZO_HIGHLIGHT_TEXT:UnpackRGB())
    end

    return CurrentMap.TrueMapSize * math.sqrt((x - nX) ^ 2 + (y - nY) ^ 2) < 14 -- Approximate distance to use a wayshrine
end

local function IsCraftingService(pin)
    if not pin then
        return false
    end

    local tooltipIndex = pin.locationIndex
    if not tooltipIndex then
        return false
    end

    for _, v in pairs(FyrMM.CSProviders) do
        if v then
            for j = 1, GetNumMapLocationTooltipLines(tooltipIndex) do
                local _, tooltipLineText = GetMapLocationTooltipLineInfo(tooltipIndex, j)
                if tooltipLineText:find(v) then
                    return true
                end
            end
        end
    end

    return false
end

local function SetTooltipMessage(pin)
    if not pin then
        return
    end
    if pin:IsFastTravelWayShrine() then
        local nodeIndex = pin:GetFastTravelNodeIndex()
        local known, name = GetFastTravelNodeInfo(nodeIndex)
        if not known then
            name = name .. " (undiscovered)"
        end
        InformationTooltip:AddLine(zo_strformat(SI_WORLD_MAP_LOCATION_NAME, name), "",
            ZO_TOOLTIP_DEFAULT_COLOR:UnpackRGB()) -- Wayshrine name
        if IsCurrentLocation(pin) then
            InformationTooltip:AddLine(GetString(SI_TOOLTIP_WAYSHRINE_CURRENT_LOC), "", ZO_HIGHLIGHT_TEXT:UnpackRGB()) -- Player is near wayshrine
        else
            if IsInAvAZone() then
                InformationTooltip:AddLine(GetString(SI_TOOLTIP_WAYSHRINE_CANT_RECALL_AVA), "",
                    ZO_ERROR_COLOR:UnpackRGB()) -- Can't travel to a wayshrine in Cyrodiil
            else
                local _, premiumTimeLeft = GetRecallCooldown()
                if premiumTimeLeft == 0 then
                    InformationTooltip:AddLine(GetString(SI_TOOLTIP_WAYSHRINE_CLICK_TO_RECALL), "",
                        ZO_HIGHLIGHT_TEXT:UnpackRGB()) -- Recall text line
                    local cost = GetRecallCost()
                    if cost > 0 then
                        if cost <= GetCurrentMoney() then
                            ZO_ItemTooltip_AddMoney(InformationTooltip, cost, SI_TOOLTIP_RECALL_COST,
                                CURRENCY_HAS_ENOUGH)
                        else
                            ZO_ItemTooltip_AddMoney(InformationTooltip, cost, SI_TOOLTIP_RECALL_COST,
                                CURRENCY_NOT_ENOUGH)
                        end
                    end
                else
                    local cooldownText = zo_strformat(SI_TOOLTIP_WAYSHRINE_RECALL_COOLDOWN, ZO_FormatTimeMilliseconds(
                        premiumTimeLeft, TIME_FORMAT_STYLE_DESCRIPTIVE, TIME_FORMAT_PRECISION_SECONDS))
                    InformationTooltip:AddLine(cooldownText, "", ZO_HIGHLIGHT_TEXT:UnpackRGB())
                end
            end
        end
    else
        local poiIndex = pin:GetPOIIndex()
        local zoneIndex = pin:GetPOIZoneIndex()
        local poiName, _, poiStartDesc, poiFinishedDesc = GetPOIInfo(zoneIndex, poiIndex)
        InformationTooltip:AddLine(zo_strformat(SI_WORLD_MAP_LOCATION_NAME, poiName), "",
            ZO_TOOLTIP_DEFAULT_COLOR:UnpackRGB())
        local pinType = select(3, MM_GetPOIMapInfo(zoneIndex, poiIndex))
        if not (ZO_MapPin.POI_PIN_TYPES[pinType]) then
            InformationTooltip:AddLine("(undiscovered)", "", ZO_HIGHLIGHT_TEXT:UnpackRGB())
        end
        if pinType == MAP_PIN_TYPE_POI_COMPLETE then
            if poiFinishedDesc ~= "" then
                InformationTooltip:AddLine(poiFinishedDesc, "", ZO_HIGHLIGHT_TEXT:UnpackRGB())
            end
        else
            if poiStartDesc ~= "" then
                InformationTooltip:AddLine(poiStartDesc, "", ZO_HIGHLIGHT_TEXT:UnpackRGB())
            end
        end
    end
end

function GetCurrentMapTextureFileInfo()
    local tileTexture = (GetMapTileTexture()):lower()
    if tileTexture == nil or tileTexture == "" then
        return "tamriel_0", "tamriel_", "art/maps/tamriel/"
    end
    local pos = select(2, tileTexture:find("maps/([%w%-]+)/"))
    if pos == nil then
        return "tamriel_0", "tamriel_", "art/maps/tamriel/"
    end
    pos = pos + 1
    return string.gsub(string.sub(tileTexture, pos), ".dds", ""),
        string.gsub(string.sub(tileTexture, pos), "0.dds", ""), tileTexture:sub(1, pos - 1)
end

local function GetTrueMapSize()
    local currentMapId = CurrentMap.MapId
    local size = FyrMM.MapSizes[currentMapId] or 1
    return currentMapId, size
end

local function GetMapTextureFileInfo(mapId)
    local tileTexture = GetMapTileTextureForMapId(mapId, 1)
    if tileTexture == nil or tileTexture == "" then
        return "tamriel_0", "tamriel_", "art/maps/tamriel/"
    end
    local _, pos = tileTexture:find("maps/([%w%-]+)/")
    if not pos then
        return "tamriel_0", "tamriel_", "art/maps/tamriel/"
    end
    return string.gsub(string.sub(tileTexture, pos + 1), ".dds", "")
end

function FyrMM.GetMapId()
    return GetCurrentMapId()
end

local function SetMapToZone()
    if FyrMM.DisableSubzones == true and GetMapType() == 1 and not IsUnitInDungeon("player") and not IsPlayerInRaid() and
        not IsActiveWorldBattleground() and not IsInAvAZone() then
        MapZoomOut()
        FyrMM.UpdateLabels()
    end
end

function FyrMM.MapHalfDiagonal()
    FyrMM.DiagonalND = math.sqrt((Fyr_MM_Player:GetRight() - Fyr_MM:GetRight()) ^ 2 +
                                     (Fyr_MM_Player:GetTop() - Fyr_MM:GetTop()) ^ 2)
    return FyrMM.DiagonalND
end

local function IsSubmap()
    return CurrentMap.MapContent == MAP_CONTENT_DUNGEON or GetMapType() == MAPTYPE_SUBZONE
end

local function GetQuestJournalMaxValidIndex()
    local index = 0
    for i = 1, MAX_JOURNAL_QUESTS do
        if (IsValidQuestIndex(i)) and index < i then
            index = i
        end
    end
    return index
end

local function IsAssisted(pinType)
    if pinType then
        return ASSISTED_PIN_TYPES[pinType] ~= nil -- non-existent key = nil
    end
    return false
end

local function IsQuestType(pinType)
    return QUEST_PIN_TYPES[pinType] ~= nil -- non-existent key = nil
end

local function valueExists(i, x)
    for j = 1, #x do -- instead of ipairs to avoid overhead
        if x[j] == i then
            return true
        end
    end
    return false
end

local function questpinDataExists(pinData, array)
    -- Avoid continuous table lookups localize the values instead
    local questIndex, questName, conditionText, conditionIndex, normX, normY, radius, stepIndex = pinData.questIndex,
        pinData.questName, pinData.conditionText, pinData.conditionIndex, pinData.normalizedX, pinData.normalizedY,
        pinData.radius, pinData.stepIndex

    for i, v in pairs(array) do
        if v.questIndex == questIndex and v.questName == questName and v.conditionText == conditionText and
            v.conditionIndex == conditionIndex and v.normalizedX == normX and v.normalizedY == normY and v.radius ==
            radius and v.stepIndex == stepIndex then
            return i
        end
    end
    return nil
end

function FyrMM.SetTargetScale(pin, targetScale)
    if not (pin or targetScale) or (pin.targetScal == targetScale and targetScale == pin:GetScale()) then
        return
    end
    pin.targetScale = targetScale
    local primaryPin, secondaryPin, tertiaryPin = pin.primaryPin, pin.secondaryPin, pin.tertiaryPin
    local newScale

    for i = 1, 10 do
        newScale = zo_deltaNormalizedLerp(pin:GetScale(), pin.targetScale, 0.1 * i)
        zo_callLater(function()
            pin:SetScale(newScale)
            if primaryPin then
                primaryPin:SetScale(newScale)
            end
            if secondaryPin then
                secondaryPin:SetScale(newScale)
            end
            if tertiaryPin then
                tertiaryPin:SetScale(newScale)
            end
        end, i * 50)
    end

    zo_callLater(function()
        pin:SetScale(pin.targetScale)
        if primaryPin then
            primaryPin:SetScale(pin.targetScale)
        end
        if secondaryPin then
            secondaryPin:SetScale(pin.targetScale)
        end
        if tertiaryPin then
            tertiaryPin:SetScale(pin.targetScale)
        end
        pin.targetScale = nil
    end, 550)
end

local function AfterCombatShow()
    if not FyrMM.AfterCombatUnhidePending then
        return
    end
    if GetFrameTimeMilliseconds() - FyrMM.AfterCombatUnhideTimeStamp < 1000 * (FyrMM.SV.AfterCombatUnhideDelay - 1) then
        return
    end
    FyrMM.AfterCombatUnhidePending = false
    if not IsUnitActivelyEngaged("player") then
        FyrMM.AutoHidden = false
        FyrMM.Visible = true
    end
end

local function WayshrineDistances(nDistance)
    if not (FyrMM.SV.BorderPins and FyrMM.SV.BorderWayshrine) or FyrMM.currentWayshrineCount == 0 then
        return
    end

    if CurrentMap.movedTimeStamp == WayshrineDistancesTimeStamp and WayshrineDistancesTimeStamp ~= 0 then
        return
    end

    WayshrineDistancesTimeStamp = CurrentMap.movedTimeStamp

    local gameTime = GetGameTimeMilliseconds()
    local wDi, wDmi, minWD, owDmi = 1, 1, 1, 1

    if FyrMM.DebugMode then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug",
            "WayshrineDistances Start:" .. tostring(FyrMM.currentWayshrineCount))
    end

    if FyrMM.currentWayshrineCount == 1 then
        Wayshrines[1].Closest = Wayshrines[1].isRealWayshrine
        return
    end

    EVENT_MANAGER:RegisterForUpdate("OnFyrMiniMapDistances", 100, -- 150 ~8s 50 ~6s -- 100 ~ loads about the same as 50 on initial load.
function()
            local playerX, playerY = CurrentMap.PlayerNX, CurrentMap.PlayerNY

            if Wayshrines[wDi] and Wayshrines[wDi].isRealWayshrine then
                Wayshrines[wDi].nDistance =
                    math.sqrt((playerX - Wayshrines[wDi].nX) ^ 2 + (playerY - Wayshrines[wDi].nY) ^ 2)
                if Wayshrines[wDi].nDistance < minWD then
                    minWD = Wayshrines[wDi].nDistance
                    wDmi = wDi
                end
            end

            if wDi <= FyrMM.currentWayshrineCount then
                wDi = wDi + 1
                return
            end

            for i, p in pairs(Wayshrines) do
                Wayshrines[i].Closest = (i == wDmi)
                Wayshrines[i].pin.Closest = (i == wDmi)
            end

            if FyrMM.DebugMode then
                CALLBACK_MANAGER:FireCallbacks("FyrMMDebug", "WayshrineDistances Done. (" .. tostring(wDmi) .. ") " ..
                    tostring(GetGameTimeMilliseconds() - gameTime))
            end

            EVENT_MANAGER:UnregisterForUpdate("OnFyrMiniMapDistances")
        end)

end

local function sort(a, b)
    local typeA, typeB = type(a.index), type(b.index) -- avoid repeated calls to the type function

    if typeA == "number" and typeB == "number" then
        return a.index < b.index
    end
    if typeA == "number" and typeB ~= "number" then
        return true
    end
    if typeA ~= "number" and typeB == "number" then
        return false
    end

    return a.index and b.index and tostring(a.index) < tostring(b.index)
end

local function FirstKey(Table, offset)
    if tableIsEmpty(Table) then
        return nil
    end
    if offset == nil then
        offset = 0
    end
    local key = next(Table, offset)
    while key ~= nil do
        if Table[key] ~= nil then
            return key
        end
        key = next(Table, key)
    end
    return nil
end

local function QuestGiverDistances()
    if not (FyrMM.SV.BorderPins and FyrMM.SV.BorderQuestGivers) or #FyrMM.AvailableQuestGivers == 0 then
        return
    end

    local gameTime = GetGameTimeMilliseconds()
    local x, y = CurrentMap.PlayerNX, CurrentMap.PlayerNY
    local AQGListFull = {}
    local multiplier = Fyr_MM:GetWidth()

    for _, v in ipairs(FyrMM.AvailableQuestGivers) do
        if v.nX == nil and v.mpin.normalizedX ~= nil then -- workaround just in case
            v.nX = v.mpin.normalizedX
            v.nY = v.mpin.normalizedY
        end

        if v.nX and v.nY then
            v.nDistance = math.sqrt((x - v.nX) * (x - v.nX) + (y - v.nY) * (y - v.nY))
            AQGListFull[#AQGListFull + 1] = {
                index = math.floor(multiplier * v.nDistance),
                data = v
            }
        end
    end

    table.sort(AQGListFull, sort)

    local AQGList = {}
    if FyrMM.ZoneStoryPin then
        AQGList[#AQGList + 1] = FyrMM.ZoneStoryPin
    end

    for i, n in ipairs(AQGListFull) do
        if i > 5 then
            break
        end
        AQGList[#AQGList + 1] = n.data
    end

    if FyrMM.DebugMode then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug",
            "QuestGiverDistances " .. tostring(GetGameTimeMilliseconds() - gameTime))
    end
end

function FyrMM.MenuTooltip(button, message)
    -- Fyr_MM_Menu:SetAlpha(1)
    FyrMM.OverMenu = true
    Fyr_MM_Close:SetAlpha(1)
    if not message or not button then
        return
    end
    InitializeTooltip(InformationTooltip, Fyr_MM, TOPLEFT, 38, button:GetTop())
    InformationTooltip:AddLine(message, "", ZO_TOOLTIP_DEFAULT_COLOR:UnpackRGB())
end

function FyrMM.TooltipExit()
    FyrMM.OverMenu = false
    -- Fyr_MM_Menu:SetAlpha(0.1)
    Fyr_MM_Close:SetAlpha(0)
    ClearTooltip(InformationTooltip)
end

function FyrMM.PinToggle(value)
    MM_SetLockPosition(value)
    MM_RefreshPanel()
end

function FyrMM.OpenSettingsPanel()
    FyrMM.LAM:OpenToPanel(FyrMM.CPL)
end

function FyrMM.API_Check()
    if FyrMM.SV.UseOriginalAPI then -- if Community Leveling Guides is active and original functions to be used
        if _IsMapLocationVisible then
            MM_IsMapLocationVisible = _IsMapLocationVisible
        end
        if _GetMapLocationIcon then
            MM_GetNumMapLocations = _GetNumMapLocations
        end
        if _GetMapLocationIcon then
            MM_GetMapLocationIcon = _GetMapLocationIcon
        end
        if _G.GetPOIMapInfo then -- _GetPOIMapInfo_ORIG_ZGV
            MM_GetPOIMapInfo = _G.GetPOIMapInfo -- _GetPOIMapInfo_ORIG_ZGV
        end
        if _GetNumMapLocations ~= nil then -- _0GetNumMapLocations
            FyrMM.MapAPI0Present = true
            MM_GetNumMapLocations = _GetNumMapLocations -- _0GetNumMapLocations
        end
        if _IsMapLocationVisible ~= nil then -- _0IsMapLocationVisible
            MM_IsMapLocationVisible = _IsMapLocationVisible -- _0IsMapLocationVisible
        end
        if _GetMapLocationIcon ~= nil then -- _0GetMapLocationIcon
            MM_GetMapLocationIcon = _GetMapLocationIcon -- _0GetMapLocationIcon
        end
        if _G.GetNumPOIs ~= nil then -- _0GetNumPOIs
            MM_GetNumPOIs = _G.GetNumPOIs -- _0GetNumPOIs
        end
        if _G.GetPOIMapInfo ~= nil then -- _0GetPOIMapInfo
            MM_GetPOIMapInfo = _G.GetPOIMapInfo -- _0GetPOIMapInfo
        end
    else
        MM_GetNumMapLocations = GetNumMapLocations
        MM_IsMapLocationVisible = IsMapLocationVisible
        MM_GetMapLocationIcon = GetMapLocationIcon
        MM_GetPOIMapInfo = GetPOIMapInfo
    end
end

function GetCurrentMapSize()
    return CurrentMap and CurrentMap.TrueMapSize or nil -- Returns assumed calculated map size in feet, returns nil no calculated size or not possible to do so
end

local function GetRotatedPosition(x, y) -- Inspired by DeathAngel's RadarMiniMap
    if not CurrentMap.Heading then
        return
    end
    if not (x or CurrentMap.PlayerX) then
        return x, y
    end
    local mWidth, mHeight = Fyr_MM_Scroll_Map:GetDimensions()
    local ix, iy = (x * mWidth) - CurrentMap.PlayerX, (y * mHeight) - CurrentMap.PlayerY
    local rx = math.cos(-CurrentMap.Heading) * ix - math.sin(-CurrentMap.Heading) * iy
    local ry = math.sin(-CurrentMap.Heading) * ix + math.cos(-CurrentMap.Heading) * iy
    return zo_round(rx), zo_round(ry)
end

local function GetNorthFacingPosition(x, y)
    local mWidth, mHeight = Fyr_MM_Scroll_Map:GetDimensions()
    if x and y then
        return math.floor(mWidth * x), math.floor(mHeight * y) -- math.floor is faster than zo_round
    end
    return x, y
end

local function Is_PinInsideWheel(pin)
    if pin.nX == nil and pin.nY == nil and pin.normalizedX == nil and pin.normalizedY == nil then
        return false
    end
    local di = Fyr_MM:GetWidth()
    local x, y = pin:GetCenter()
    local x1, y1 = Fyr_MM_Player:GetCenter()
    local width = pin:GetWidth()

    if pin.radius ~= nil then
        if pin.radius > 0 then
            return math.sqrt((x - x1) * (x - x1) + (y - y1) * (y - y1)) < di / 2 - ((30 / 512) * di) + width / 2 - 10
        end
    end

    if pin.borderInformation ~= nil then
        return math.sqrt((x - x1) * (x - x1) + (y - y1) * (y - y1)) < di / 2 - ((30 / 512) * di) + width / 2 - 10
        -- maybe something to do here with digsite nearest point
    end

    return math.sqrt((x - x1) * (x - x1) + (y - y1) * (y - y1)) < di / 2 - ((30 / 512) * di)

end

local function smoothHeadingRotation() -- added by @Masteroshi430
    local x, y, pheading = CurrentMap.PlayerNX, CurrentMap.PlayerNY,
        CurrentMap.PlayerHeading or GetMapPlayerPosition("player")
    local headingTo = math.abs(pheading - pi * 2)
    if not FyrMM.SV.RotateMap then
        return headingTo
    end
    local heading = CurrentMap.Heading or 0
    local diff = ((headingTo - heading) + math.pi) % (math.pi * 2) - math.pi
    local currentHeading = heading + (diff / 10)
    while currentHeading > (pi * 2) do
        currentHeading = currentHeading - (pi * 2)
    end

    while currentHeading < 0 do
        currentHeading = currentHeading + (pi * 2)
    end
    return currentHeading
end

local function SetDigSitePoints(digSite)
    local borderInformation = digSite.borderInformation
    local RotateMap = FyrMM.SV.RotateMap
    digSite:ClearPoints()

    for i, point in ipairs(borderInformation.borderPoints) do
        if RotateMap then
            if CurrentMap.Heading ~= nil and CurrentMap.PlayerNX ~= nil then

                -- @Masteroshi430 - my method 7th attempt - great success!
                local ix = point.x - 0.5
                local iy = point.y - 0.5
                local sine = math.sin(-CurrentMap.Heading)
                local cosine = math.cos(-CurrentMap.Heading)
                local rx = ((cosine * ix) - (sine * iy))
                local ry = ((sine * ix) + (cosine * iy))
                digSite:AddPoint(rx, ry)
            end
        else
            digSite:AddPoint(point.x, point.y)
        end
    end
end

local function SetPinFunctions(pin)

    if pin.UpdateWheelVisibility == nil then
        pin.UpdateWheelVisibility = function(self)
            if FyrMM.SV.WheelMap then
                self:SetHidden(not Is_PinInsideWheel(self))
            end
        end
    end

    if pin.RefreshAnchor == nil then
        pin.RefreshAnchor = function(self)
            local x, y

            if self.nX ~= nil and self.nY ~= nil then
                x = self.nX
                y = self.nY
            elseif self.normalizedX ~= nil and self.normalizedY ~= nil then
                x = self.normalizedX
                y = self.normalizedY
            end

            if x ~= nil and y ~= nil then
                self:ClearAnchors()
                if FyrMM.SV.RotateMap then
                    if pin.borderInformation ~= nil then
                        SetDigSitePoints(pin)
                        self:SetAnchor(TOPLEFT, Fyr_MM_Scroll, CENTER, GetRotatedPosition(x, y))
                    else
                        self:SetAnchor(CENTER, Fyr_MM_Scroll, CENTER, GetRotatedPosition(x, y))
                    end
                else
                    if FyrMM.SV.WheelMap then
                        self:SetAnchor(CENTER, Fyr_MM_Scroll_Map_Pins, TOPLEFT, GetNorthFacingPosition(x, y))
                        if pin.borderInformation ~= nil then
                            self:SetParent(FyrMM.GetScrollObject(self))
                        end
                    else
                        self:SetAnchor(CENTER, self:GetParent(), TOPLEFT, GetNorthFacingPosition(x, y))
                    end
                end

            end
        end
    end
end

function FyrMM.AxisPosition(a)
    local mmWidth, mmHeight = Fyr_MM:GetDimensions()
    if mmWidth == nil then
        mmWidth = FyrMM.SV.MapWidth
    end
    if mmHeight == nil then
        mmHeight = FyrMM.SV.MapHeight
    end

    local piHalf = pi * 0.5
    local piDoub = pi * 2.0

    mmWidth = mmWidth / 2
    mmHeight = mmHeight / 2

    local na = math.atan((mmWidth) / (mmHeight))
    local nb = piHalf - na
    local npos, epos, spos, wpos

    local nbX2 = nb * 2
    local aMna = a - na
    local aPna = a + na

    if aPna >= piDoub or aMna <= 0 then -- upper border line
        if aMna <= 0 then
            npos = mmWidth + mmHeight * math.sin(a) / math.sin(piHalf - a)
        else
            npos = mmWidth - mmHeight * math.sin(piDoub - a) / math.sin(piHalf - (piDoub - a))
        end
        return npos, 0
    end

    if aMna > 0 and aMna < nbX2 then -- right border line
        if aMna > nb then
            epos = mmHeight + mmWidth * math.sin(aMna - nb) / math.sin(piHalf - (aMna - nb))
        else
            epos = mmWidth * math.sin(aMna) / math.sin(piHalf - (aMna))
        end
        return mmWidth * 2, epos
    end

    if aMna >= nbX2 and a <= 3 * na + nbX2 then -- bottom border line
        if aMna - na > nbX2 then
            spos = mmWidth - mmHeight * math.sin(a - 2 * na - nbX2) / math.sin(piHalf - (a - 2 * na - nbX2))
        else
            spos = mmWidth * 2 - mmHeight * math.sin(aMna - nbX2) / math.sin(piHalf - (aMna - nbX2))
        end
        return spos, mmHeight * 2
    end

    if aPna > piDoub - nbX2 and aPna < piDoub then -- left border line
        if aMna > nb then
            wpos = mmHeight - mmWidth * math.sin(a - 3 * na - 3 * nb) / math.sin(piHalf - (a - 3 * na - 3 * nb))
        else
            wpos = mmHeight - mmWidth * math.sin(a - 3 * na - nbX2) / math.sin(piHalf - (a - 3 * na - nbX2))
        end
        return 0, wpos
    end
end

local function RoundArc(angle)
    if angle > pi * 2 then
        angle = angle - pi * 2
    end
    return angle
end

local function CanDrawCardinalForRotateWheelmap(x, y)
    if not FyrMM.SV.WheelMap then
        return true
    end
    if not FyrMM.SV.CardinalPoints then
        return false
    end

    local top = Fyr_MM:GetTop()
    local left = Fyr_MM:GetLeft()
    local right = Fyr_MM:GetRight()
    local margin = Fyr_MM:GetWidth() / 3.5

    if top ~= y then
        return false
    elseif x < left + margin or x > right - margin then
        return false
    else
        return true
    end
end

local function AxisSwitch()
    for i = 1, Fyr_MM_Axis_Textures:GetNumChildren() do
        local l = Fyr_MM_Axis_Textures:GetChild(i)
        if l ~= nil then
            l:ClearAnchors()

            local x, y = l:GetCenter()
            l:SetHidden(not FyrMM.SV.RotateMap or not CanDrawCardinalForRotateWheelmap(x, y))
            local name = l:GetName()
            name = string.gsub(name, "Fyr_MM_Axis_", "")
            if #name == 1 then
                l:SetDimensions(24, 24)
            else
                l:SetDimensions(32, 24)
            end

        end
    end
    for i = 1, Fyr_MM_Axis_Labels:GetNumChildren() do
        local l = Fyr_MM_Axis_Labels:GetChild(i)
        if l ~= nil then
            l:ClearAnchors()

            local x, y = l:GetCenter()

            l:SetHidden(not FyrMM.SV.RotateMap or not CanDrawCardinalForRotateWheelmap(x, y))
        end
    end
end

function FyrMM.AxisPins()
    if FyrMM.SV.WheelMap and FyrMM.SV.RotateMap and FyrMM.SV.CardinalPoints then
        AxisSwitch()
    elseif (FyrMM.SV.WheelMap and not Fyr_MM_Axis_N:IsHidden()) or
        not (FyrMM.SV.RotateMap and not Fyr_MM_Axis_N:IsHidden()) then
        AxisSwitch()
        return
    end

    if not FyrMM.SV.RotateMap or not CurrentMap.Heading then
        return
    end
    -- Fyr_MM_Axis_Control:SetTopmost(true)

    local n = pi * 2 - CurrentMap.Heading
    local ne = RoundArc(n + pi * 0.25)
    local e = RoundArc(n + pi * 0.5)
    local se = RoundArc(n + pi * 0.75)
    local s = RoundArc(n + pi)
    local sw = RoundArc(n + pi * 1.25)
    local w = RoundArc(n + pi * 1.5)
    local nw = RoundArc(n + pi * 1.75)

    Fyr_MM_Axis_N:ClearAnchors()
    Fyr_MM_Axis_N_Label:ClearAnchors()
    Fyr_MM_Axis_N:SetAnchor(CENTER, Fyr_MM_Axis_Control, TOPLEFT, FyrMM.AxisPosition(n))
    Fyr_MM_Axis_N_Label:SetAnchor(CENTER, Fyr_MM_Axis_Control, TOPLEFT, FyrMM.AxisPosition(n))

    Fyr_MM_Axis_NE:ClearAnchors()
    Fyr_MM_Axis_NE_Label:ClearAnchors()
    Fyr_MM_Axis_NE:SetAnchor(CENTER, Fyr_MM_Axis_Control, TOPLEFT, FyrMM.AxisPosition(ne))
    Fyr_MM_Axis_NE_Label:SetAnchor(CENTER, Fyr_MM_Axis_Control, TOPLEFT, FyrMM.AxisPosition(ne))

    Fyr_MM_Axis_E:ClearAnchors()
    Fyr_MM_Axis_E_Label:ClearAnchors()
    Fyr_MM_Axis_E:SetAnchor(CENTER, Fyr_MM_Axis_Control, TOPLEFT, FyrMM.AxisPosition(e))
    Fyr_MM_Axis_E_Label:SetAnchor(CENTER, Fyr_MM_Axis_Control, TOPLEFT, FyrMM.AxisPosition(e))

    Fyr_MM_Axis_SE:ClearAnchors()
    Fyr_MM_Axis_SE_Label:ClearAnchors()
    Fyr_MM_Axis_SE:SetAnchor(CENTER, Fyr_MM_Axis_Control, TOPLEFT, FyrMM.AxisPosition(se))
    Fyr_MM_Axis_SE_Label:SetAnchor(CENTER, Fyr_MM_Axis_Control, TOPLEFT, FyrMM.AxisPosition(se))

    Fyr_MM_Axis_S:ClearAnchors()
    Fyr_MM_Axis_S_Label:ClearAnchors()
    Fyr_MM_Axis_S:SetAnchor(CENTER, Fyr_MM_Axis_Control, TOPLEFT, FyrMM.AxisPosition(s))
    Fyr_MM_Axis_S_Label:SetAnchor(CENTER, Fyr_MM_Axis_Control, TOPLEFT, FyrMM.AxisPosition(s))

    Fyr_MM_Axis_SW:ClearAnchors()
    Fyr_MM_Axis_SW_Label:ClearAnchors()
    Fyr_MM_Axis_SW:SetAnchor(CENTER, Fyr_MM_Axis_Control, TOPLEFT, FyrMM.AxisPosition(sw))
    Fyr_MM_Axis_SW_Label:SetAnchor(CENTER, Fyr_MM_Axis_Control, TOPLEFT, FyrMM.AxisPosition(sw))

    Fyr_MM_Axis_W:ClearAnchors()
    Fyr_MM_Axis_W_Label:ClearAnchors()
    Fyr_MM_Axis_W:SetAnchor(CENTER, Fyr_MM_Axis_Control, TOPLEFT, FyrMM.AxisPosition(w))
    Fyr_MM_Axis_W_Label:SetAnchor(CENTER, Fyr_MM_Axis_Control, TOPLEFT, FyrMM.AxisPosition(w))

    Fyr_MM_Axis_NW:ClearAnchors()
    Fyr_MM_Axis_NW_Label:ClearAnchors()
    Fyr_MM_Axis_NW:SetAnchor(CENTER, Fyr_MM_Axis_Control, TOPLEFT, FyrMM.AxisPosition(nw))
    Fyr_MM_Axis_NW_Label:SetAnchor(CENTER, Fyr_MM_Axis_Control, TOPLEFT, FyrMM.AxisPosition(nw))
end

local function IsCoordinateInRange(x, y)
    if not CurrentMap.TrueMapSize or not CurrentMap.PlayerNX or not FyrMM.SV.CustomPinViewRange or
        not FyrMM.SV.ViewRangeFiltering then
        return true
    end
    return CurrentMap.TrueMapSize *
               math.sqrt(
            (x - CurrentMap.PlayerNX) * (x - CurrentMap.PlayerNX) + (y - CurrentMap.PlayerNY) *
                (y - CurrentMap.PlayerNY)) <= FyrMM.SV.CustomPinViewRange
end

function FyrMM.SetPinSize(pin, size, _)
    local properSize = math.floor(size / 2) * 2
    if (not pin.radius or pin.radius == 0) and CurrentMap.MapId ~= 16 and CurrentMap.MapId ~= 660 and
        GetMapContentType() ~= MAP_CONTENT_BATTLEGROUND and properSize > 42 then
        properSize = 42
    end
    if (not pin.radius or pin.radius == 0) and CurrentMap.MapId ~= 16 and CurrentMap.MapId ~= 660 and
        GetMapContentType() ~= MAP_CONTENT_BATTLEGROUND and properSize < 23 then
        properSize = 23
    end
    pin:SetDimensions(properSize, properSize)
end

function FyrMM.SetPinAnchor(pin, x, y, AnchorToControl, hidden)
    local newX, newY, currentX, currentY, currentObject, _
    if pin == nil then
        return
    end
    SetPinFunctions(pin)

    if pin.nX == nil and pin.nY == nil and pin.normalizedX == nil and pin.normalizedY == nil then
        PinsList[pin:GetName()] = nil
        pin:ClearAnchors()
        pin:SetHidden()
        return
    end

    if x and y and AnchorToControl then
        _, _, currentObject, _, currentX, currentY = pin:GetAnchor()
        if PinsList[pin:GetName()] == nil then
            PinsList[pin:GetName()] = pin
        end

        if FyrMM.SV.RotateMap then
            newX, newY = GetRotatedPosition(x, y)
            AnchorToControl = Fyr_MM_Scroll
        else
            newX, newY = GetNorthFacingPosition(x, y)
        end

        if newX ~= currentX or newY ~= currentY or currentObject ~= AnchorToControl then
            pin:ClearAnchors()
            if FyrMM.SV.RotateMap then
                if pin.borderInformation ~= nil then
                    pin:SetAnchor(TOPLEFT, AnchorToControl, CENTER, newX, newY)
                else
                    pin:SetAnchor(CENTER, AnchorToControl, CENTER, newX, newY)
                end
            else
                pin:SetAnchor(CENTER, AnchorToControl, TOPLEFT, newX, newY)
            end
        end
    end

    if hidden then
        pin:SetHidden(true)
    else
        if FyrMM.SV.WheelMap and x ~= nil and y ~= nil then
            pin:SetHidden(not Is_PinInsideWheel(pin))
        end
    end
end

local function RescaleLinks()
    if not IsInAvAZone() then
        return
    end
    local mWidth, mHeight = Fyr_MM_Scroll_Map:GetDimensions()
    local Count, l, startX, startY, endX, endY
    for i = 1, 100 do
        l = GetControl("Fyr_MM_Scroll_Map_Links_Link" .. tostring(i))
        if l ~= nil then
            if FyrMM.SV.WheelMap then
                l:SetParent(Fyr_MM_Scroll_CW_Map_Pins)
            else
                l:SetParent(Fyr_MM_Scroll_Map_Links)
            end

            if FyrMM.SV.RotateMap then
                l:ClearAnchors()
                l:SetAnchor(TOPLEFT, Fyr_MM_Scroll, CENTER, GetRotatedPosition(l.startNX, l.startNY))
                l:SetAnchor(BOTTOMRIGHT, Fyr_MM_Scroll, CENTER, GetRotatedPosition(l.endNX, l.endNY))
            else
                startX, startY, endX, endY = l.startNX * mWidth - mWidth / 2, l.startNY * mHeight - mHeight / 2,
                    l.endNX * mWidth - mWidth / 2, l.endNY * mHeight - mHeight / 2
                l:ClearAnchors()
                l:SetAnchor(TOPLEFT, Fyr_MM_Scroll_Map_Links, CENTER, zo_round(startX), zo_round(startY))
                l:SetAnchor(BOTTOMRIGHT, Fyr_MM_Scroll_Map_Links, CENTER, zo_round(endX), zo_round(endY))
            end

        else
            i = 99
        end

        l = GetControl("Fyr_MM_Scroll_Map_LinksNS_Link" .. tostring(i))
        if l ~= nil then
            if FyrMM.SV.RotateMap then
                l:ClearAnchors()
                l:SetAnchor(TOPLEFT, Fyr_MM_Scroll, CENTER, GetRotatedPosition(l.startNX, l.startNY))
                l:SetAnchor(BOTTOMRIGHT, Fyr_MM_Scroll, CENTER, GetRotatedPosition(l.endNX, l.endNY))
            else
                startX, startY, endX, endY = l.startNX * mWidth - mWidth / 2, l.startNY * mHeight - mHeight / 2,
                    l.endNX * mWidth - mWidth / 2, l.endNY * mHeight - mHeight / 2
                l:ClearAnchors()
                l:SetAnchor(TOPLEFT, Fyr_MM_Scroll_Map_Links, CENTER, zo_round(startX), zo_round(startY))
                l:SetAnchor(BOTTOMRIGHT, Fyr_MM_Scroll_Map_Links, CENTER, zo_round(endX), zo_round(endY))
            end

        end
        l = GetControl("Fyr_MM_Scroll_Map_LinksWE_Link" .. tostring(i))
        if l ~= nil then
            if FyrMM.SV.RotateMap then
                l:ClearAnchors()
                l:SetAnchor(TOPLEFT, Fyr_MM_Scroll, CENTER, GetRotatedPosition(l.startNX, l.startNY))
                l:SetAnchor(BOTTOMRIGHT, Fyr_MM_Scroll, CENTER, GetRotatedPosition(l.endNX, l.endNY))
            else
                startX, startY, endX, endY = l.startNX * mWidth - mWidth / 2, l.startNY * mHeight - mHeight / 2,
                    l.endNX * mWidth - mWidth / 2, l.endNY * mHeight - mHeight / 2
                l:ClearAnchors()
                l:SetAnchor(TOPLEFT, Fyr_MM_Scroll_Map_Links, CENTER, zo_round(startX), zo_round(startY))
                l:SetAnchor(BOTTOMRIGHT, Fyr_MM_Scroll_Map_Links, CENTER, zo_round(endX), zo_round(endY))
            end

        end
    end
end

local function UpdateWheelPins()
    if Fyr_MM:IsHidden() then
        return
    end
    local RotateMap = FyrMM.SV.RotateMap
    local WheelMap = FyrMM.SV.WheelMap
    if RotateMap or WheelMap then
        for i, v in pairs(PinsList) do
            if WheelMap then
                v:UpdateWheelVisibility()
            end
            if RotateMap then
                if not v:IsHidden() or v.BorderPin ~= nil then
                    v:RefreshAnchor()
                end
            end
        end
        RescaleLinks()
    end
end

function FyrMM.RegisterRWUpdates() -- never called
    EVENT_MANAGER:RegisterForUpdate("FyrMiniMapRWUpdate", 100, UpdateWheelPins)

end

function FyrMM.UnRegisterRWUpdates() -- never called
    EVENT_MANAGER:UnRegisterForUpdate("FyrMiniMapRWUpdate")
end

local function UpdateCustomPinPositions()
    if not FyrMM.Visible or Fyr_MM:IsHidden() or FyrMM.worldMapShowing or CustomPinsCopying then
        return
    end
    -- local currentZone = CurrentMap.MapId
    local mWidth, mHeight = Fyr_MM_Scroll_Map:GetDimensions()
    local enabled
    for i, p in pairs(PinsList) do
        if p ~= nil then
            if p.m_PinType ~= nil then
                if p.m_PinType == 9999 then -- fix attempt 10/10/2022
                    p:SetHidden(not IsCoordinateInRange(p.nX, p.nY))
                    p:RefreshAnchor()
                elseif p.m_PinType >= MAP_PIN_TYPE_INVALID then
                    if PinRef ~= nil then
                        if PRCustomPins ~= nil then
                            enabled = PRCustomPins[p.m_PinType].enabled
                        end
                    else
                        enabled = ZO_WorldMap_IsCustomPinEnabled(p.m_PinType) -- checks filter for custom pin
                    end

                    if p.nX ~= nil and p.nY ~= nil and enabled then
                        p:SetHidden(not IsCoordinateInRange(p.nX, p.nY))
                        if not p:IsHidden() then
                            if p.pinTexture ~= nil then
                                if p.pinTexture ~= p:GetTextureFileName() then
                                    p:SetTexture(p.pinTexture)
                                end
                            end
                            p:RefreshAnchor()
                        end
                    end
                end

            end
        end
    end
end

local function RescalePinPositions()
    if Fyr_MM:IsHidden() or not CurrentMap.needRescale then
        return
    end
    CurrentMap.needRescale = false
    local mWidth, mHeight = Fyr_MM_Scroll_Map:GetDimensions()
    for i, v in pairs(PinsList) do
        v:RefreshAnchor()
        if v.borderInformation ~= nil then -- antiquity digging sites
            local width = v.borderInformation.borderWidth * mWidth
            local height = v.borderInformation.borderHeight * mHeight
            v:SetDimensions(width, height)
        elseif FyrMM.SV.autoResizePin and v ~= ZO_WorldMap_GetPinManager():GetPlayerPin() and v.m_textureAnimTimeline ==
            nil and CurrentMap.MapId ~= 16 and CurrentMap.MapId ~= 660 and (v.radius == 0 or v.radius == nil) and
            GetMapContentType() ~= MAP_CONTENT_BATTLEGROUND and not v.noZoomResize then

            if v.m_PinType == 9999 then -- Elder Scroll aura
                local size = 64
                FyrMM.SetPinSize(v, size * FyrMM.pScalePercent)
            elseif v.m_PinType then
                local size = 32
                if ZO_MapPin.FAST_TRAVEL_WAYSHRINE_PIN_TYPES[v.m_PinType] or ZO_MapPin.POI_PIN_TYPES[v.m_PinType] or
                    v.m_PinType == MAP_PIN_TYPE_LOCATION then -- scale pin to zoom level only for these types
                    FyrMM.SetPinSize(v, size * FyrMM.pScalePercent * FyrMM.pinZoomScale)
                else
                    FyrMM.SetPinSize(v, size * FyrMM.pScalePercent)
                end
            end
        elseif v.radius and v.radius > 0 then -- resize area pin in case of zoom
            local size = mHeight * v.radius * 2
            v:SetDimensions(size, size)
        end

        if FyrMM.SV.WheelMap then
            v:SetHidden(not Is_PinInsideWheel(v))
            if v.BorderPin then
                v.BorderPin:SetHidden(not v:IsHidden())
            end
        end
    end
    RescaleLinks()
    FyrMM.UpdateQuestPinPositions()
    FyrMM.PlaceBorderPins()
end

local ZoomAnimating = false
local function AnimateZoom(newzoom)
    local step = (newzoom - CurrentMap.ZoomLevel) / 10
    if CurrentMap.ZoomLevel ~= newzoom then
        ZoomAnimating = true

        EVENT_MANAGER:RegisterForUpdate("OnFyrMMZoomAnimate", 1, function()
            FyrMM.SetCurrentMapZoom(CurrentMap.ZoomLevel + step)

            if FyrMM.SV.autoResizePin and CurrentMap.MapId ~= 16 and CurrentMap.MapId ~= 660 and GetMapContentType() ~=
                MAP_CONTENT_BATTLEGROUND then
                -- zoom: 1 to 50 default: 10
                -- should be between 0.1 and 5
                FyrMM.pinZoomScale = (CurrentMap.ZoomLevel) / 10
                -- d("pinzoom: "..FyrMM.pinZoomScale)
            else
                FyrMM.pinZoomScale = 1
            end

            if (CurrentMap.ZoomLevel <= newzoom and step < 0) or (CurrentMap.ZoomLevel >= newzoom and step > 0) then
                EVENT_MANAGER:UnregisterForUpdate("OnFyrMMZoomAnimate")
                FyrMM.SetCurrentMapZoom(newzoom)
                -- FyrMM.UpdateMapTiles(true)
                FyrMM.PositionUpdate()
                CurrentMap.needRescale = true
                RescalePinPositions()
                FyrMM.UpdateMapTiles(true)
                ZoomAnimating = false
            else
                -- FyrMM.UpdateMapTiles(true)
                FyrMM.PositionUpdate()
                CurrentMap.needRescale = true
                RescalePinPositions()
                FyrMM.UpdateMapTiles(true)
            end
        end)

    end
end

local function GetQuestData(pin)
    return pin.m_PinTag[1], pin.m_PinTag[3], pin.m_PinTag[2]
end

local function SetQuestTooltip(pin)
    if pin == nil then
        return
    end
    local tooltipLines = {}
    local line = ""
    local nX = pin.normalizedX
    local nY = pin.normalizedY
    local pinCount = Fyr_MM_Scroll_Map_QuestPins:GetNumChildren()
    for i = 1, pinCount + 10 do
        local l = GetControl("Fyr_MM_Scroll_Map_QuestPins_Pin" .. tostring(i))
        if l ~= nil then
            if not l:IsHidden() or FyrMM.SV.WheelMap then

                line = ""
                if l.normalizedX == nX and l.normalizedY == nY then
                    --					if l.m_PinType == MAP_PIN_TYPE_ASSISTED_QUEST_ENDING or l.m_PinType == MAP_PIN_TYPE_TRACKED_QUEST_ENDING then
                    --						line = GenerateQuestEndingTooltipLine(questIndex)
                    --						if valueExists(line, tooltipLines) then
                    --							line = ""
                    --						else
                    --							InformationTooltip:AppendQuestEnding(l.m_PinTag[1])
                    --						end
                    --					end
                    if QUEST_PIN_TYPES[l.m_PinType] then
                        line = GenerateQuestConditionTooltipLine(GetQuestData(l))
                        if valueExists(line, tooltipLines) then
                            line = ""
                        else
                            InformationTooltip:AppendQuestCondition(GetQuestData(l))
                        end
                    end
                    if GetTrackedIsAssisted(TRACK_TYPE_QUEST, l.questIndex) then
                        l:SetMouseEnabled(true)
                    else
                        l:SetMouseEnabled(false)
                    end
                end
                if line ~= "" then
                    table.insert(tooltipLines, line)
                end
            end
        end
    end
    pin:SetMouseEnabled(true)
end

-- local function GetQuestPinById(Id) -- Returns first visible pin by quest Id
--	for i=1, FyrMM.questPinCount do
--		local l = GetControl("Fyr_MM_Scroll_Map_QuestPins_Pin"..tostring(i))
--		if l ~= nil then
--			if l.questIndex == Id and not l:IsHidden() then
--				return l
--			end
--		end
--	end
--	return nil
-- end

function FyrMM.IsPinVisible(pin) -- Check for pin leaving map limits
    return (pin:GetRight() >= Fyr_MM:GetLeft() + 6 and pin:GetLeft() <= Fyr_MM:GetRight() - 10 and pin:GetBottom() >=
               Fyr_MM:GetTop() + 6 and pin:GetTop() <= Fyr_MM:GetBottom() - 10)
end

function FyrMM.IsValidBorderPin(pin)
    if not FyrMM.SV.BorderPins then
        return false
    end

    local Visible, Tracked
    if FyrMM.SV.WheelMap then
        Visible = Is_PinInsideWheel(pin)
    else
        Visible = FyrMM.IsPinVisible(pin)
    end

    if pin.m_PinType == MAP_PIN_TYPE_GROUP or pin.m_PinType == MAP_PIN_TYPE_GROUP_LEADER then
        if IsUnitOnline(pin.unitTag) then
            if FyrMM.SV.BorderPinsOnlyLeader and not IsUnitGroupLeader("player") and not IsActiveWorldBattleground() then
                Tracked = IsUnitGroupLeader(pin.unitTag) and (GetUnitZone("player") == GetUnitZone(pin.unitTag))
            else
                Tracked = (GetUnitZone("player") == GetUnitZone(pin.unitTag))
            end
        end
    else
        if FyrMM.SV.BorderPinsOnlyAssisted then
            Tracked = GetTrackedIsAssisted(TRACK_TYPE_QUEST, pin.questIndex)
        else
            Tracked = true
        end
    end

    if pin.m_PinType == MAP_PIN_TYPE_ACTIVE_COMPANION then
        Tracked = true
    end

    if CustomWaypoints[pin.m_PinType] then
        Tracked = FyrMM.SV.BorderPinsWaypoint
    end

    if pin.m_Pin ~= nil then
        if pin.m_Pin:IsFastTravelWayShrine() then
            local index, _ = string.gsub(pin:GetName(), "Fyr_MM_Scroll_Map_WayshrinePins_Pin", "")
            if Wayshrines[tonumber(index)] ~= nil then
                if Wayshrines[tonumber(index)].Closest and CurrentMap.MapId and CurrentMap.MapId ~= 16 then -- removes wayshrine border pin on Crodiil map
                    Tracked = FyrMM.SV.BorderWayshrine
                else
                    Tracked = false
                end
            end
        end
    end

    if pin.m_PinType == MAP_PIN_TYPE_LOCATION then
        Tracked = false
        if pin.IsBankPin and FyrMM.SV.BorderPinsBank then
            Tracked = pin.IsBankPin
        end
        if pin.IsStablePin and FyrMM.SV.BorderPinsStables then
            Tracked = pin.IsStablePin
        end
        if pin.IsCraftingServicePin and FyrMM.SV.BorderCrafting then
            Tracked = pin.IsCraftingServicePin
        end
        -- Community Leveling Guides
        if pin.isZGESO then
            Tracked = pin.isZGESO
        end
    end

    -- AVA and Battlegrounds moving pins
    if pin.AVABGtype ~= nil then
        Tracked = true
    end

    -- lost treasure & Map pins treasures & surveys
    if pin.IsTreasure then
        if pin.pinTexture and
            (string.find(pin.pinTexture, "LibTreasure") or string.find(pin.pinTexture, "MapPins/Treasure_")) then
            Tracked = FyrMM.SV.BorderTreasures
        else
            pin.IsTreasure = nil
            Tracked = false
        end
    end

    -- Dragon Next location
    if FyrMM.SV.WorldEvents and pin.IsDragonNextLocation then
        if pin.pinTexture and string.find(pin.pinTexture, "dragonNextLocation") and (pin.nX ~= -1 and pin.nX ~= -1) then
            Tracked = FyrMM.SV.WorldEvents
        else
            pin.IsDragonNextLocation = nil
            Tracked = false
        end
    end

    -- antiquity digging sites
    if pin.borderInformation ~= nil then
        Tracked = FyrMM.SV.BorderTreasures
    end

    -- quest givers and zonestory
    if pin.IsAvailableQuest then
        if pin.m_PinTag ~= nil then
            if pin.m_PinTag.IsAvailableQuest then
                if pin.m_PinTag.isZoneStory and pin == FyrMM.ZoneStoryPin then
                    Tracked = FyrMM.SV.BorderQuestGivers
                elseif not pin.m_PinTag.isZoneStory then
                    Tracked = FyrMM.SV.BorderQuestGivers
                else
                    Tracked = false
                end
            else
                pin.IsAvailableQuest = nil
            end
        else
            pin.IsAvailableQuest = nil
        end
    end

    -- world events           -- has to stay on bottom
    if pin.context ~= nil and FyrMM.SV.WorldEvents then
        if pin.weDistance then
            if GetMapType() == MAPTYPE_SUBZONE then -- world events within X subzone map are displayed on border
                local distance = CurrentMap.TrueMapSize or 1
                local weDistance = distance *
                                       math.sqrt(
                        (pin.nX - CurrentMap.PlayerNX) * (pin.nX - CurrentMap.PlayerNX) + (pin.nY - CurrentMap.PlayerNY) *
                            (pin.nY - CurrentMap.PlayerNY))

                if weDistance <= distance then
                    Tracked = true
                else
                    Tracked = false
                end
                -- d(CurrentMap.filename.." subzone tms "..distance.." dist "..weDistance)
            else -- world events within zone map / 8 are displayed on border
                local TrueMapSize = CurrentMap.TrueMapSize or 1
                local distance = TrueMapSize / 8
                if pin.weDistance <= distance then
                    Tracked = true
                else
                    Tracked = false
                end
                -- d(CurrentMap.filename.." tms "..distance.." dist "..pin.weDistance)
            end
        else
            Tracked = false
        end
    end

    return not Visible and Tracked
end

local function GetNumBorderPins()
    local totalPins = Fyr_MM_Axis_Border_Pins:GetNumChildren()
    local count = 0
    for i = 1, totalPins do
        local l = Fyr_MM_Axis_Border_Pins:GetChild(i)
        if l ~= nil then
            if l.pin then
                count = count + 1
            else
                l:SetHidden(true)
            end
        end
    end
    return count
end

local function RemoveBorderPin(pin)
    if pin ~= nil then
        pin:SetHidden(true)
        pin:SetMouseEnabled(false)
        pin:ClearAnchors()
        -- pin:SetTexture(nil)
        --		pin:SetHandler("OnMouseEnter", function() return end)
        --		pin:SetHandler("OnMouseExit", function() return end)
        --		pin:SetHandler("OnMouseUp", function() return end)
        if pin.pin then
            if pin.pin.OnBorder then
                pin.pin.OnBorder = nil
            end
            if pin.pin.BorderPin then
                pin.pin.BorderPin = nil
            end
            pin.pin = nil -- test 30/04/2023
        end
    end
end

local function CleanUpMisc()
    local t = GetGameTimeMilliseconds()
    if not IsInAvAZone() then
        KeepIndex = {}
        local LinksDone = false
        local LinksNSDone = false
        local LinksWEDone = false
        local LocksDone = false
        for i = 1, 100 do
            l = GetControl("Fyr_MM_Scroll_Map_Links_Link" .. tostring(i))
            if l ~= nil then
                l:ClearAnchors()
                l:SetHidden(true)
                l:SetMouseEnabled(false)
            else
                LinksDone = true
            end
            l = GetControl("Fyr_MM_Scroll_Map_LinksNS_Link" .. tostring(i))
            if l ~= nil then
                l:ClearAnchors()
                l:SetHidden(true)
                l:SetMouseEnabled(false)
            else
                LinksNSDone = true
            end
            l = GetControl("Fyr_MM_Scroll_Map_LinksWE_Link" .. tostring(i))
            if l ~= nil then
                l:ClearAnchors()
                l:SetHidden(true)
                l:SetMouseEnabled(false)
            else
                LinksWEDone = true
            end
            l = GetControl("Fyr_MM_Scroll_Map_Locks_Lock" .. tostring(i))
            if l ~= nil then
                l:ClearAnchors()
                l.normalizedX = nil
                l.normalizedY = nil
                l:SetHidden(true)
                l:SetMouseEnabled(false)
                -- l:SetTexture(nil)
                l:SetDimensions(0, 0)
            else
                LocksDone = true
            end
            if LinksDone and LinksNSDone and LinksWEDone and LocksDone then
                i = 100
            end
        end
    end

    FyrMM.CustomPinCount = 0
    FreeCustomPinIndex = {}
    CustomPinIndex = {}
    CustomPinKeyIndex = {}
    LastCustomPinIndex = 0
    FyrMM.Reloading = false

    FyrMM.InitialPreload()

    -- Some InitialPreload functions are moved here to speed up things 21/04/2023 --  CAUSING DISPLAY BUGS WITH CUSTOM PINS
    -- YO FyrMM.SetMapToPlayerLocation() -- test 21/04/2023
    -- YO CurrentMap.ZoneIndex = GetCurrentMapZoneIndex() -- test 21/04/2023
    -- FyrMM.UpdateMapInfo() -- test 21/04/2023
    -- FyrMM.UpdateMapTiles(true) -- test 21/04/2023
    -- YO FyrMM.GroupEvent() -- test 21/04/2023
    -- YO FyrMM.UpdateQuestPins() -- test 21/04/2023

    -- YO if IsInAvAZone() then FyrMM.RequestKeepRefresh() end -- test 21/04/2023
    -- YO FyrMM.PlaceWaypointBorderPins() -- test 01/05/2023
    -- YO FyrMM.LoadCustomPinList() -- test 01/05/2023
    -- YO FyrMM.UpdateAntiquityDigSites() -- test 21/04/2023
    -- YO FyrMM.RegisterUpdates() -- test 21/04/2023

    if FyrMM.DebugMode then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug", "CleanUpMisc " .. tostring(GetGameTimeMilliseconds() - t))
    end
end

local function RemoveCustomPin(p)
    if p == nil then --[[ d("RemoveCustomPin pin is nil") --]]
        return
    end
    if p.BorderPin ~= nil then
        RemoveBorderPin(p.BorderPin)
    end

    local key = tostring(p.nX) .. ":" .. tostring(p.nY) .. ":" .. tostring(p.radius)
    if p.m_PinType ~= nil then
        if FyrMM.CustomPinCheckList[p.m_PinType] ~= nil then
            if FyrMM.CustomPinCheckList[p.m_PinType][key] ~= nil then
                FyrMM.CustomPinCheckList[p.m_PinType][key].Id = 0
            end
        end
    end

    p:ClearAnchors()
    p:SetHidden(true)
    p.m_PinTag = nil
    p.MapId = nil
    p.radius = nil
    p.nX = nil
    p.nY = nil
    p.IsTreasure = nil
    p.IsAvailableQuest = nil
    p.pinTexture = nil

    -- if p.Key == nil then d("p.Key == nil, could not remove that pin") end
    -- if p.Index == nil then d("p.Index == nil, could not remove that pin") end

    if FyrMM.CustomPinList[p.m_PinType] ~= nil then
        if FyrMM.CustomPinList[p.m_PinType][p.Key] ~= nil then
            if FyrMM.CustomPinList[p.m_PinType][p.Key].pin ~= nil then
                FyrMM.CustomPinList[p.m_PinType][p.Key].pin = nil
                FyrMM.CustomPinList[p.m_PinType][p.Key] = nil
            end
        end
    end

    if not tableIsEmpty(CustomPinIndex) then
        if p.Index ~= nil then
            table.insert(FreeCustomPinIndex, p.Index)
            FyrMM.CustomPinCount = FyrMM.CustomPinCount - 1
        end

        if CustomPinIndex[p.m_PinType] ~= nil and p.Index ~= nil then
            if CustomPinIndex[p.m_PinType][p.Index] ~= nil then
                CustomPinIndex[p.m_PinType][p.Index] = nil
            end
            --			if p.Key ~= nil then
            --				CustomPinKeyIndex[p.m_PinType][p.Key] = nil
            --			end
        end
    end

    if p:GetName() ~= nil then
        if PinsList[p:GetName()] ~= nil then
            PinsList[p:GetName()] = nil
        end
    end

    p.Key = nil
    p.m_PinType = nil
    p.Index = nil
    p = nil
    -- d("pin was removed")
end

local function CheckCustomPinConsistence(Type)
    local pin
    if Type == nil then
        for i, n in pairs(CustomPinKeyIndex) do
            if FyrMM.CustomPinList[i] == nil then
                for j, index in pairs(n) do
                    pin = GetControl("Fyr_MM_Scroll_Map_Pins_Pin" .. tostring(index))
                    RemoveCustomPin(pin)
                    CustomPinKeyIndex[i][j] = nil
                end
            else
                if #n ~= #FyrMM.CustomPinList[i] then
                    for j, index in pairs(n) do
                        if FyrMM.CustomPinList[i][j] == nil then
                            pin = GetControl("Fyr_MM_Scroll_Map_Pins_Pin" .. tostring(index))
                            RemoveCustomPin(pin)
                            CustomPinKeyIndex[i][j] = nil
                        end
                    end
                end
            end
        end
    else
        if CustomPinKeyIndex[Type] == nil then
            return
        end
        if FyrMM.CustomPinList[Type] == nil then
            for j, index in pairs(CustomPinKeyIndex[Type]) do
                pin = GetControl("Fyr_MM_Scroll_Map_Pins_Pin" .. tostring(index))
                RemoveCustomPin(pin)
                CustomPinKeyIndex[Type][j] = nil
            end
        else
            if #CustomPinKeyIndex[Type] ~= #FyrMM.CustomPinList[Type] then
                for j, index in pairs(CustomPinKeyIndex[Type]) do
                    if FyrMM.CustomPinList[Type][j] == nil then
                        pin = GetControl("Fyr_MM_Scroll_Map_Pins_Pin" .. tostring(index))
                        RemoveCustomPin(pin)
                        CustomPinKeyIndex[Type][j] = nil
                    end
                end
            end
        end
    end
end

local function CleanUpPins()
    -- faster ways for cleaning up pins result in occasional pins not removing
    if not tableIsEmpty(PinsList) then
        local cui = 0
        local chunk = FyrMM.SV.ChunkSize or 50
        local delay = FyrMM.SV.ChunkDelay or 50

        if FyrMM.DebugMode then
            CALLBACK_MANAGER:FireCallbacks("FyrMMDebug",
                "CleanUpPins Start:" .. tostring(chunk) .. "..." .. tostring(delay))
        end

        EVENT_MANAGER:RegisterForUpdate("FyrMiniMapCleanupPinsTask", delay, function()
            local c = 0
            local k = false
            cui = cui + 1
            local t = GetGameTimeMilliseconds()
            for i, l in pairs(PinsList) do
                c = c + 1
                if c >= chunk then
                    if FyrMM.DebugMode then
                        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug", "CleanUpPins " .. tostring(cui) .. " " ..
                            tostring(GetGameTimeMilliseconds() - t))
                    end
                    return
                end
                if l ~= nil then
                    if l.m_PinType ~= nil and l.m_PinType >= MAP_PIN_TYPE_INVALID then -- is custom pin
                        RemoveCustomPin(l)
                        k = true
                    end
                    if not k then -- is regular pin
                        if l.BorderPin then
                            RemoveBorderPin(l.BorderPin)
                        end
                        l:ClearAnchors()
                        l:SetHidden(true)
                        l:SetMouseEnabled(false)
                        l.nX = nil
                        l.nY = nil
                        l:ClearAnchors()
                        l:SetHidden(true)
                        l:SetMouseEnabled(false)
                        -- l:SetTexture(nil)
                        l:SetDimensions(0, 0)
                        l.m_PinTag = nil
                        l.m_PinType = nil
                        l.m_Pin = nil
                        l.IsAvailableQuest = nil
                        l.normalizedX = nil
                        l.normalizedY = nil
                        l.radius = nil
                        l.MapId = nil
                        l.Index = nil
                        l.questName = nil
                        l.PinToolTipText = nil
                        l.primaryPin = nil
                        l.secondaryPin = nil
                        l.tertiaryPin = nil
                        l.MM_Tag = nil
                        l.pinAge = nil
                        l.IsTreasure = nil
                        l.isDps = nil
                        l.isHeal = nil
                        l.isTank = nil
                        l.ClassId = nil
                        l.isLeader = nil
                        PinsList[i] = nil
                    end

                end
            end
            if tableIsEmpty(PinsList) then
                if FyrMM.DebugMode then
                    CALLBACK_MANAGER:FireCallbacks("FyrMMDebug",
                        "CleanUpPins Done. " .. tostring(GetGameTimeMilliseconds() - t))
                end
                EVENT_MANAGER:UnregisterForUpdate("FyrMiniMapCleanupPinsTask")
                CleanUpMisc()
                return
            end
        end)

    else
        FyrMM.Reloading = false
    end
end

local function GetNewBorderPinIndex()
    if Fyr_MM_Axis_Border_Pins:GetNumChildren() == 0 then
        return 1
    end
    if Fyr_MM_Axis_Border_Pins:GetNumChildren() ~= GetNumBorderPins() then
        for i = 1, Fyr_MM_Axis_Border_Pins:GetNumChildren() do
            local l = Fyr_MM_Axis_Border_Pins:GetChild(i)
            if l ~= nil then
                if l.pin == nil then
                    return i
                end
            end
        end
    end
    return Fyr_MM_Axis_Border_Pins:GetNumChildren() + 1
end

local function GetTextureForBorderPin(pin)
    local texture = ""

    if pin.IsTreasure then
        if pin.pinTexture ~= nil then
            return pin.pinTexture
        end

    elseif pin.IsDragonNextLocation then
        if pin.pinTexture ~= nil then
            return pin.pinTexture
        end

        -- zone stories
    elseif pin.IsAvailableQuest then
        if pin.m_PinTag.isZoneStory or ZO_MapPin.SUGGESTION_PIN_TYPES[pin.m_PinType] then
            if pin.m_PinType == MAP_PIN_TYPE_SKYSHARD_SUGGESTED then
                return "EsoUI/Art/MapPins/skyshard_seen.dds"
            else
                return "esoui/art/lfg/gamepad/lfg_menuicon_zonestories.dds"
            end
        else
            if pin.pinTexture ~= nil then
                return pin.pinTexture
            end
        end

        -- antiquities
    elseif pin.borderInformation ~= nil then
        return "/esoui/art/icons/servicemappins/servicepin_antiquities.dds"

    elseif pin.m_PinType == MAP_PIN_TYPE_PLAYER_WAYPOINT then
        return "EsoUI/Art/MapPins/UI_Worldmap_pin_customDestination.dds"

    elseif pin.m_PinType == MAP_PIN_TYPE_RALLY_POINT then
        return "MiniMap/Textures/rally.dds"

    elseif pin.m_PinType == MAP_PIN_TYPE_PING then
        return "MiniMap/Textures/ping.dds"

    elseif pin.m_PinType == MAP_PIN_TYPE_LOCATION then
        if pin.m_PinTag[2] ~= nil then
            return pin.m_PinTag[2]
        end

    elseif pin.m_PinType == MAP_PIN_TYPE_GROUP or pin.m_PinType == MAP_PIN_TYPE_GROUP_LEADER then
        if pin.pinTexture ~= nil then
            return pin.pinTexture
        end

    elseif pin.m_PinType == MAP_PIN_TYPE_ACTIVE_COMPANION then

        if pin.pinTexture ~= nil then
            return pin.pinTexture
        end

        -- dragons & world events
    elseif pin.context ~= nil then
        return pin.pinTexture

    elseif QUEST_PIN_TYPES[pin.m_PinType] then
        if pin.m_PinTag.isBreadcrumb then
            return breadcrumbQuestPinTextures[pin.m_PinType]
        else
            return questPinTextures[pin.m_PinType]
        end

    elseif pin.m_Pin ~= nil then
        if pin.m_Pin:IsFastTravelWayShrine() then
            if pin.m_Pin.m_PinTag[2] ~= nil then
                return pin.m_Pin.m_PinTag[2]
            else
                return "/esoui/art/icons/poi_wayshrine_complete.dds"
            end
        end

        -- AVA and Battlegrounds
    elseif ZO_MapPin.OBJECTIVE_PIN_TYPES[pin.m_PinType] or ZO_MapPin.RETURN_OBJECTIVE_PIN_TYPES[pin.m_PinType] or
        ZO_MapPin.SPAWN_OBJECTIVE_PIN_TYPES[pin.m_PinType] then
        return ZO_MapPin.PIN_DATA[pin.m_PinType].texture
    elseif pin.m_PinType == 9999 then -- Elder Scroll aura
        return "MiniMap/Textures/scroll_aura.dds"
    end

end

local function ProcessQuestPinClick(pin)
    local PinHandlers = {}
    local Pins = {}
    local HandlerCount = 0
    local Handler = {}
    local entries = {}
    local entry = ""
    Handler.Callback = function(questIndex)
        FOCUSED_QUEST_TRACKER:ForceAssist(questIndex)
    end
    Handler.Name = zo_strformat(SI_WORLD_MAP_ACTION_SELECT_QUEST, GetJournalQuestName(pin.questIndex))
    table.insert(PinHandlers, Handler)
    table.insert(Pins, pin)
    for i = 1, FyrMM.questPinCount do
        local p = GetControl("Fyr_MM_Scroll_Map_QuestPins_Pin" .. tostring(i))
        if p ~= nil then
            if p ~= pin and p.normalizedX == pin.normalizedX and p.normalizedY == pin.normalizedY and not p:IsHidden() then
                entry = zo_strformat(SI_WORLD_MAP_ACTION_SELECT_QUEST, GetJournalQuestName(p.questIndex))
                if not valueExists(entry, entries) then
                    HandlerCount = HandlerCount + 1
                    local Handler = {}
                    Handler.Callback = function(questIndex)
                        FOCUSED_QUEST_TRACKER:ForceAssist(questIndex)
                    end
                    Handler.Name = zo_strformat(SI_WORLD_MAP_ACTION_SELECT_QUEST, GetJournalQuestName(p.questIndex))
                    table.insert(PinHandlers, Handler)
                    table.insert(Pins, p)
                    table.insert(entries, entry)
                end
            end
        end
    end
    if HandlerCount <= 1 then
        PinHandlers[1].Callback(Pins[1].questIndex)
    else
        ClearMenu()
        for i = 1, HandlerCount do
            local Handler = PinHandlers[i]
            local questIndex = Pins[i].questIndex
            local Name = Handler.Name
            if type(Name) == "function" then
                Name = Name(Pins[i])
            end
            AddMenuItem(Name, function()
                Handler.Callback(questIndex)
            end)
        end
        ShowMenu(pin)
    end
end

local function PinOnMouseExit(pin)
    if pin == nil then
        return
    end
    FyrMM.SetTargetScale(pin, 1)
    if pin.m_PinType == MAP_PIN_TYPE_LOCATION then
        ClearTooltip(ZO_MapLocationTooltip)
    else
        ClearTooltip(InformationTooltip)
    end
end

local function PinOnMouseEnter(pin)
    FyrMM.SetTargetScale(pin, 1.3)
    if not FyrMM.SV.PinTooltips then
        return
    end
    if pin.pinType ~= nil then
        if pin.pinType == MAP_PIN_TYPE_TRACKED_ANTIQUITY_DIG_SITE or pin.pinType == MAP_PIN_TYPE_ANTIQUITY_DIG_SITE then
            InitializeTooltip(InformationTooltip, Fyr_MM, TOPLEFT, 0, 0)
            InformationTooltip:AppendDigSiteAntiquities(pin.Tag)
        end
    end
    if pin.m_PinType ~= nil then
        if QUEST_PIN_TYPES[pin.m_PinType] then
            InitializeTooltip(InformationTooltip, Fyr_MM, TOPLEFT, 0, 0)
            SetQuestTooltip(pin)
            IsCurrentLocation(pin)
            return

        elseif ZONE_EXPLORATION_PIN_TYPES[pin.m_PinType] then
            if ZO_MapPin.TOOLTIP_CREATORS[pin.m_PinType] == nil then
                return
            end
            if ZO_MapPin.TOOLTIP_CREATORS[pin.m_PinType].tooltip then
                InitializeTooltip(InformationTooltip, Fyr_MM, TOPLEFT, 0, 0)
            end
            ZO_MapPin.TOOLTIP_CREATORS[pin.m_PinType].creator(pin.mpin)
            IsCurrentLocation(pin)

        elseif CustomWaypoints[pin.m_PinType] then
            if ZO_MapPin.TOOLTIP_CREATORS[pin.m_PinType] then
                if ZO_MapPin.TOOLTIP_CREATORS[pin.m_PinType].tooltip and
                    ZO_MapPin.TOOLTIP_CREATORS[pin.m_PinType].creator then
                    InitializeTooltip(InformationTooltip, Fyr_MM, TOPLEFT, 0, 0)
                    ZO_MapPin.TOOLTIP_CREATORS[pin.m_PinType].creator(pin)
                    IsCurrentLocation(pin)
                    return
                end
            end

        elseif ZO_MapPin.FAST_TRAVEL_WAYSHRINE_PIN_TYPES[pin.m_PinType] or ZO_MapPin.POI_PIN_TYPES[pin.m_PinType] then
            InitializeTooltip(InformationTooltip, Fyr_MM, TOPLEFT, 0, 0)
            SetTooltipMessage(pin.m_Pin)
            if not ZO_MapPin.FAST_TRAVEL_WAYSHRINE_PIN_TYPES[pin.m_PinType] then
                IsCurrentLocation(pin)
            end
            return

        elseif pin.m_PinType == MAP_PIN_TYPE_LOCATION then
            if ZO_MapPin.TOOLTIP_CREATORS[MAP_PIN_TYPE_LOCATION].tooltip then
                InitializeTooltip(ZO_MapLocationTooltip, Fyr_MM, TOPLEFT, 0, 0)
                ZO_MapPin.TOOLTIP_CREATORS[MAP_PIN_TYPE_LOCATION].creator(pin.m_Pin)
                IsCurrentLocation(pin)
                return
            end

        elseif ZO_MapPin.GROUP_PIN_TYPES[pin.m_PinType] then
            InitializeTooltip(InformationTooltip, Fyr_MM, TOPLEFT, 0, 0)
            InformationTooltip:AppendUnitName(pin.unitTag)
            IsCurrentLocation(pin)
            return

            -- world events and dragons
        elseif pin.context ~= nil then
            InitializeTooltip(InformationTooltip, Fyr_MM, TOPLEFT, 0, 0)
            InformationTooltip:AppendUnitName(pin.unitTag)
            IsCurrentLocation(pin)
            return

        elseif pin.m_PinType >= MAP_PIN_TYPE_INVALID then -- has to stay on bottom
            if ZO_MapPin.TOOLTIP_CREATORS[pin.m_PinType] then
                if ZO_MapPin.TOOLTIP_CREATORS[pin.m_PinType].tooltip and
                    ZO_MapPin.TOOLTIP_CREATORS[pin.m_PinType].creator then
                    InitializeTooltip(InformationTooltip, Fyr_MM, TOPLEFT, 0, 0)
                    ZO_MapPin.TOOLTIP_CREATORS[pin.m_PinType].creator(pin.mpin)
                    IsCurrentLocation(pin)
                    return
                end
            end
        end
    end
end

local function PinOnMouseUp(pin)
    FyrMM.SetTargetScale(pin, 1.3)
    if not FyrMM.SV.PinTooltips then
        return
    end
    if pin.m_PinType ~= nil then
        if QUEST_PIN_TYPES[pin.m_PinType] then
            ProcessQuestPinClick(pin)
            FyrMM.UpdateQuestPins()
        end
        if ZO_MapPin.FAST_TRAVEL_WAYSHRINE_PIN_TYPES[pin.m_PinType] then
            if not IsInAvAZone() and FyrMM.SV.FastTravelEnabled then
                if IsCurrentLocation(pin.m_Pin) then
                    return
                end -- No need to recall if player is near wayshrine
                local nodeIndex = pin.m_Pin:GetFastTravelNodeIndex()
                ZO_Dialogs_ReleaseDialog("FAST_TRAVEL_CONFIRM")
                local name = select(2, GetFastTravelNodeInfo(nodeIndex))
                ZO_Dialogs_ShowDialog("FAST_TRAVEL_CONFIRM", {
                    nodeIndex = nodeIndex,
                    recall = true
                }, {
                    mainTextParams = {name}
                })
            end
        end
    end
end

local function BorderPinOnMouseExit(pin)
    if pin == nil then
        return
    end
    if pin.pin == nil then
        return
    end
    FyrMM.SetTargetScale(pin, 1)
    if pin.pin.m_PinType then
        if pin.pin.m_PinType == MAP_PIN_TYPE_LOCATION then
            ClearTooltip(ZO_MapLocationTooltip)
        else
            ClearTooltip(InformationTooltip)
        end
    else
        if pin.pin.borderInformation ~= nil then
            ClearTooltip(InformationTooltip)
        end
    end
end

local function BorderPinOnMouseEnter(pin)
    if pin.pin == nil then
        RemoveBorderPin(pin)
        return
    end
    FyrMM.SetTargetScale(pin, 1.3)
    if not FyrMM.SV.PinTooltips then
        return
    end
    if pin.pin.borderInformation ~= nil then
        InitializeTooltip(InformationTooltip, Fyr_MM, TOPLEFT, 0, 0)
        InformationTooltip:AppendDigSiteAntiquities(pin.pin.Tag)
        IsCurrentLocation(pin.pin)
        return
    end
    if pin.pin.m_PinType then
        if pin.pin.m_PinType == MAP_PIN_TYPE_LOCATION then
            if ZO_MapPin.TOOLTIP_CREATORS[MAP_PIN_TYPE_LOCATION].tooltip then
                InitializeTooltip(ZO_MapLocationTooltip, Fyr_MM, TOPLEFT, 0, 0)
                ZO_MapPin.TOOLTIP_CREATORS[MAP_PIN_TYPE_LOCATION].creator(pin.pin.m_Pin)
            end
            IsCurrentLocation(pin.pin)
            return
        else
            if ZO_MapPin.FAST_TRAVEL_WAYSHRINE_PIN_TYPES[pin.pin.m_PinType] then
                InitializeTooltip(InformationTooltip, Fyr_MM, TOPLEFT, 0, 0)
                SetTooltipMessage(pin.pin.m_Pin)
                return
            end
            if pin.pin.IsTreasure or pin.pin.IsAvailableQuest then
                if ZO_MapPin.TOOLTIP_CREATORS[pin.pin.m_PinType] == nil then
                    return
                end
                if ZO_MapPin.TOOLTIP_CREATORS[pin.pin.m_PinType].tooltip then
                    InitializeTooltip(InformationTooltip, Fyr_MM, TOPLEFT, 0, 0)
                end
                ZO_MapPin.TOOLTIP_CREATORS[pin.pin.m_PinType].creator(pin.pin.mpin)
                IsCurrentLocation(pin.pin)
                return
            end
            if pin.pin.m_PinType == MAP_PIN_TYPE_GROUP or pin.pin.m_PinType == MAP_PIN_TYPE_GROUP_LEADER then
                InitializeTooltip(InformationTooltip, Fyr_MM, TOPLEFT, 0, 0)
                InformationTooltip:AppendUnitName(pin.pin.unitTag)
                IsCurrentLocation(pin.pin)
                return
            end
            if ZO_MapPin.MAP_PING_PIN_TYPES[pin.pin.m_PinType] then
                InitializeTooltip(InformationTooltip, Fyr_MM, TOPLEFT, 0, 0)
                InformationTooltip:AppendMapPing(pin.pin.m_PinType, "player")
                IsCurrentLocation(pin.pin)
            end
            if QUEST_PIN_TYPES[pin.pin.m_PinType] then
                InitializeTooltip(InformationTooltip, Fyr_MM, TOPLEFT, 0, 0)
                InformationTooltip:AppendQuestCondition(GetQuestData(pin.pin))
                IsCurrentLocation(pin.pin)
            end
        end
    end
end

local function SetBorderPinHandlers(pin)
    if pin == nil then
        local l
        for i = 1, Fyr_MM_Axis_Border_Pins:GetNumChildren() + 50 do
            l = GetControl("Fyr_MM_Axis_Border_Pins_Pin" .. tostring(i))
            if l ~= nil then
                if l.pin ~= nil then
                    if CustomWaypoints[l.pin.m_PinType] then
                        RemoveBorderPin(l)
                    end
                end
            else
                return
            end
        end
        return
    end
    pin:SetHandler("OnMouseEnter", BorderPinOnMouseEnter)
    pin:SetHandler("OnMouseExit", BorderPinOnMouseExit)
    pin:SetMouseEnabled(true)
end

function FyrMM.CreateBorderPin(pin) -- Should have been called create / update border pin
    if pin == nil then
        return
    end
    if pin.m_PinType == nil then
        return
    end
    local borderpin

    local pdata = ZO_MapPin.PIN_DATA[pin.m_PinType]
    local bpsize

    if pin.m_PinType == 9999 then -- Elder Scroll aura
        bpsize = 64
    elseif pdata == nil or pdata.size == nil then
        bpsize = 32
    else
        bpsize = pdata.size
    end

    if not FyrMM.IsValidBorderPin(pin) then
        if pin.BorderPin ~= nil then
            RemoveBorderPin(pin.BorderPin)
        end
        return
    end

    local mmWidth, mmHeight = Fyr_MM:GetDimensions()
    local mmX, mmY = Fyr_MM_Player:GetRight(), Fyr_MM_Player:GetTop()
    local pinX, pinY = math.abs(pin:GetRight() - mmX), math.abs(pin:GetTop() - mmY)
    local m = 0
    if pinX ~= 0 then
        m = pinY / pinX
    end
    local D = mmWidth / 2 - ((38 / 512) * mmWidth)
    local newX, newY
    local na = math.atan((mmWidth / 2) / (mmHeight / 2))
    local nb = pi * 0.5 - na
    local pa = math.atan(pinX / (pinY))
    local pb = pi * 0.5 - pa

    if not pin.BorderPin then -- pin.OnBorder
        local index = GetNewBorderPinIndex()
        borderpin = GetControl("Fyr_MM_Axis_Border_Pin" .. tostring(index))
        if borderpin == nil then
            borderpin = WINDOW_MANAGER:CreateControl("Fyr_MM_Axis_Border_Pin" .. tostring(index),
                Fyr_MM_Axis_Border_Pins, CT_TEXTURE)
        end
        pin.BorderPin = borderpin
        borderpin.pin = pin

        SetBorderPinHandlers(borderpin)
    else
        borderpin = pin.BorderPin
    end

    SetBorderPinHandlers(borderpin)
    pin.OnBorder = true
    borderpin:SetTexture(GetTextureForBorderPin(pin))

    -- antiquities
    if pin.borderInformation ~= nil then
        local antiquityIds = {GetInProgressAntiquitiesForDigSite(pin.Tag)}
        for index, antiquityId in pairs(antiquityIds) do -- removed ipairs for pairs here

            local antiquityData = ANTIQUITY_DATA_MANAGER:GetAntiquityData(antiquityId)
            if not antiquityData:IsInCurrentPlayerZone() then
                RemoveCustomPin(pin)
                break
            end -- fix for antiquities border pins of other zones showing

            local c = GetAntiquityQualityColor(antiquityData:GetQuality())
            if c.r ~= nil then
                borderpin:SetColor(c.r, c.g, c.b, c.a) -- last antiquityId gets the digsite quality color *shrug*
            else
                borderpin:SetColor(1, 1, 1, 1)
            end
        end

        -- group leader colour
    elseif pin.isLeader then
        borderpin:SetColor(FyrMM.SV.LeaderDeadPinColor.r, FyrMM.SV.LeaderDeadPinColor.g, FyrMM.SV.LeaderDeadPinColor.b,
            1)

        -- coloured custom pins
    elseif pin.m_PinType ~= nil and pin.context == nil and not (pin.m_PinTag and pin.m_PinTag.isZoneStory) then

        if pin.tint then -- compatibility with addons which modify pin colors by pin
            if type(pin.tint) ~= "function" then
                borderpin:SetColor(pin.tint:UnpackRGBA())
            else
                if type(pin.tint) == "table" then
                    borderpin:SetColor(pin.tint.r, pin.tint.g, pin.tint.b, pin.tint.a)
                end
            end
        elseif ZOpinData[pin.m_PinType].tint ~= nil then
            if type(ZOpinData[pin.m_PinType].tint) ~= "function" then
                borderpin:SetColor(ZOpinData[pin.m_PinType].tint:UnpackRGBA())
            else
                if borderpin.pin.m_Pin ~= nil then
                    borderpin:SetColor(ZOpinData[pin.m_PinType].tint(borderpin.pin.m_Pin):UnpackRGBA())
                elseif borderpin.pin ~= nil then
                    borderpin:SetColor(ZOpinData[pin.m_PinType].tint(borderpin.pin):UnpackRGBA())
                else
                    borderpin:SetColor(1, 1, 1, 1)
                end
            end
        else
            borderpin:SetColor(1, 1, 1, 1)
        end

    end

    if pin.color then
        borderpin:SetColor(pin.color[1], pin.color[2], pin.color[3], 1)
    end

    if pinX > 0 and pinY > 0 then
        if pa <= na then
            if pin:GetRight() >= mmX then
                newX = mmWidth / 2 + mmHeight / 2 * math.sin(pa) / math.sin(pi * 0.5 - pa)
            else
                newX = mmWidth / 2 - mmHeight / 2 * math.sin(pa) / math.sin(pi * 0.5 - pa)
            end
            if pin:GetTop() < mmY then
                newY = 4
            else
                newY = mmHeight - (bpsize * FyrMM.pScalePercent) / 2 + 2
            end
        else
            if pin:GetRight() > mmX then
                newX = mmWidth - (bpsize * FyrMM.pScalePercent) / 2 + 4
            else
                newX = 2
            end
            pa = pi * 0.5 - (pa - na)
            if pin:GetTop() <= mmY then
                newY = mmHeight / 2 - mmWidth / 2 * math.sin(pa - na) / math.sin(pi * 0.5 - (pa - na))
            else
                newY = mmHeight / 2 + mmWidth / 2 * math.sin(pa - na) / math.sin(pi * 0.5 - (pa - na))
            end
        end
        if pin.m_PinType == MAP_PIN_TYPE_GROUP then
            FyrMM.SetPinSize(borderpin, pin:GetDimensions())
        else
            FyrMM.SetPinSize(borderpin, bpsize * FyrMM.pScalePercent, 0)
        end
        if FyrMM.SV.WheelMap then
            if pin:GetRight() >= mmX and pin:GetTop() >= mmY then
                newX = D / math.sqrt(1 + m * m) + mmWidth / 2
                newY = (m * D) / math.sqrt(1 + m * m) + mmHeight / 2
            end
            if pin:GetRight() >= mmX and pin:GetTop() < mmY then
                newX = D / math.sqrt(1 + m * m) + mmWidth / 2
                newY = mmWidth / 2 - (m * D) / math.sqrt(1 + m * m)
            end
            if pin:GetRight() < mmX and pin:GetTop() < mmY then
                newX = mmWidth / 2 - D / math.sqrt(1 + m * m)
                newY = mmWidth / 2 - (m * D) / math.sqrt(1 + m * m)
            end
            if pin:GetRight() < mmX and pin:GetTop() >= mmY then
                newX = mmWidth / 2 - D / math.sqrt(1 + m * m)
                newY = (m * D) / math.sqrt(1 + m * m) + mmWidth / 2
            end
        end

        borderpin:SetHidden(false)
        borderpin:ClearAnchors()
        borderpin:SetAnchor(CENTER, Fyr_MM_Axis_Control, TOPLEFT, newX, newY)

        -- animated world events
        if pin.context ~= nil then
            borderpin:SetColor(1, 1, 1, 1)
            if ZO_MapPin.WORLD_EVENT_UNIT_PIN_TYPES[pin.m_PinType] then
                if IsUnitInCombat(pin.unitTag) then
                    borderpin:SetColor(1, 0, 0, 1)
                    FyrMM.CheapAnimation(borderpin)
                end
            else
                FyrMM.CheapAnimation(borderpin, true)
            end

        else
            borderpin:SetTransformRotationZ(0)
        end

        if pin.m_PinTag and (pin.m_PinTag.isZoneStory or ZO_MapPin.SUGGESTION_PIN_TYPES[pin.m_PinType]) then
            borderpin:SetColor(1, 1, 1, 1)
            FyrMM.SetPinSize(borderpin, 48 * FyrMM.pScalePercent, 0)
        end

        borderpin:SetDrawLevel(pin:GetDrawLevel())
        borderpin:SetDrawTier(pin:GetDrawTier())
        borderpin:SetDrawLayer(pin:GetDrawLayer())

        -- if pdata.isAnimated then                                                    -- removed animated BORDERPINS to test
        -- if not borderpin.textureAntl then
        -- local an
        -- an, borderpin.textureAntl = CreateSimpleAnimation(ANIMATION_TEXTURE, borderpin)
        -- an:SetHandler("OnStop", function() borderpin:SetTextureCoords(0, 1, 0, 1) end)
        -- end
        -- local anim = borderpin.textureAntl:GetAnimation(1)
        -- anim:SetImageData(pdata.framesWide, pdata.framesHigh)
        -- anim:SetFramerate(pdata.framesPerSecond)
        -- borderpin.textureAntl:SetPlaybackType(ANIMATION_PLAYBACK_LOOP, LOOP_INDEFINITELY)
        -- borderpin.textureAntl:PlayFromStart()
        -- end

    end

    if (pin.nX and pin.nY) or (pin.normalizedX and pin.normalizedY) then -- fade distant pin texture
        local nX = pin.nX or pin.normalizedX
        local nY = pin.nY or pin.normalizedY

        local distance = CurrentMap.TrueMapSize *
                             math.sqrt(
                (nX - CurrentMap.PlayerNX) * (nX - CurrentMap.PlayerNX) + (nY - CurrentMap.PlayerNY) *
                    (nY - CurrentMap.PlayerNY)) or 1
        if distance > 650 then
            distance = 650
        end
        local iDistance = 650 - distance

        local minVal1 = 0 -- min distance value
        local maxVal1 = 650 -- max distance value
        local minVal2 = 0.6 -- min alpha
        local maxVal2 = 1 -- max alpha

        local alpha = ((maxVal2 - minVal2) * (((iDistance) - (minVal1)) / ((maxVal1) - (minVal1)))) + minVal2

        -- d("alpha "..alpha.." distance "..distance)
        borderpin:SetAlpha(alpha)
    else
        borderpin:SetAlpha(1)
    end

    return borderpin
end

function FyrMM.PlaceBorderPins()
    local i, j, l, v
    if ((not FyrMM.Visible or Fyr_MM:IsHidden())) then
        return
    end
    for i = 1, Fyr_MM_Axis_Border_Pins:GetNumChildren() do
        l = Fyr_MM_Axis_Border_Pins:GetChild(i)
        if l ~= nil then
            if FyrMM.SV.BorderPins then
                if not l.pin then
                    l:SetHidden(true)
                else
                    if not FyrMM.IsValidBorderPin(l.pin) then
                        RemoveBorderPin(l)
                    end
                end
            else
                RemoveBorderPin(l)
            end
        end
    end

    if not FyrMM.SV.BorderPins then
        return
    end

    -- border pins for moving or interesting AVA & Battleground pins
    if (not IsInAvAZone() and not IsActiveWorldBattleground()) and AVABGobjectivesToBorderPins then
        AVABGobjectivesToBorderPins = nil
    end
    if FyrMM.SV.borderAVABG then
        local bgContext = ZO_WorldMap_GetBattlegroundQueryType()
        if AVABGobjectivesToBorderPins and not tableIsEmpty(AVABGobjectivesToBorderPins) then
            for i, v in pairs(AVABGobjectivesToBorderPins) do
                if v ~= nil then

                    local type = GetObjectiveType(v.keepId, v.objectiveId, bgContext)
                    local objectiveControlState = GetObjectiveControlState(v.keepId, v.objectiveId, bgContext)
                    local exists = DoesObjectiveExist(v.keepId, v.objectiveId, bgContext)
                    local visible = IsObjectiveObjectVisible(v.keepId, v.objectiveId, bgContext)
                    local gameType = GetBattlegroundGameType(GetCurrentBattlegroundId())

                    if exists and visible then

                        local daedricWeapon = type == OBJECTIVE_DAEDRIC_WEAPON and objectiveControlState ~=
                                                  OBJECTIVE_CONTROL_STATE_UNKNOWN
                        local elderScroll = (type == OBJECTIVE_ARTIFACT_DEFENSIVE or type ==
                                                OBJECTIVE_ARTIFACT_OFFENSIVE or type == OBJECTIVE_ARTIFACT_RETURN) and
                                                (objectiveControlState == OBJECTIVE_CONTROL_STATE_FLAG_HELD or
                                                    objectiveControlState == OBJECTIVE_CONTROL_STATE_FLAG_DROPPED)
                        local captureTheRelicRelic = type == OBJECTIVE_FLAG_CAPTURE
                        local captureTheRelicOwnBase = v.AVABGtype == "spawn"
                        local showAllWithThisGameType = gameType == BATTLEGROUND_GAME_TYPE_DOMINATION or gameType ==
                                                            BATTLEGROUND_GAME_TYPE_CRAZY_KING or gameType ==
                                                            BATTLEGROUND_GAME_TYPE_MURDERBALL

                        if daedricWeapon or elderScroll or captureTheRelicRelic or captureTheRelicOwnBase or
                            showAllWithThisGameType then
                            v.size = 32
                            if elderScroll then
                                v.size = 80
                            end
                            if battlegroundMovingPins then
                                v.size = 64
                            end
                            FyrMM.CreateBorderPin(v)
                        else
                            if v.BorderPin ~= nil then
                                RemoveBorderPin(v.BorderPin)
                            end
                        end

                    else
                        if v.BorderPin ~= nil then
                            RemoveBorderPin(v.BorderPin)
                        end
                    end
                end
            end
        end
    end

    -- waypoints
    FyrMM.PlaceWaypointBorderPins()

    -- border pins
    if Fyr_MM_Axis_Control:IsHidden() and FyrMM.SV.BorderPins then
        Fyr_MM_Axis_Control:SetHidden(false)
    end

    -- quest pins
    for i, v in pairs(QuestPins) do
        if not v.Pin:IsHidden() and FyrMM.IsValidBorderPin(v.Pin) then
            FyrMM.CreateBorderPin(v.Pin)
        end
    end

    -- group pins
    for i = 1, 24 do
        l = GetControl("Fyr_MM_Scroll_Map_Pinsgroup" .. tostring(i))
        if l ~= nil then
            if not l:IsHidden() and FyrMM.IsValidBorderPin(l) then
                FyrMM.CreateBorderPin(l)
            end
        end
    end

    -- Bank - stables - crafting - community leveling guides
    if FyrMM.SV.BorderPinsBank or FyrMM.SV.BorderPinsStables or FyrMM.SV.BorderCrafting or FyrMM.SV.UseOriginalAPI then
        for i = 1, FyrMM.currentLocationsCount do
            l = GetControl("Fyr_MM_Scroll_Map_LocationPins_Pin" .. tostring(i))
            if l ~= nil then
                if l.m_PinType == MAP_PIN_TYPE_LOCATION and FyrMM.IsValidBorderPin(l) then
                    FyrMM.CreateBorderPin(l)
                elseif l.isZGESO and FyrMM.IsValidBorderPin(l) then
                    l.m_PinType = MAP_PIN_TYPE_LOCATION
                    FyrMM.CreateBorderPin(l)
                end
            end
        end
    end

    -- wayshrines
    if FyrMM.SV.BorderWayshrine and FyrMM.currentWayshrineCount > 0 then
        for i, v in ipairs(Wayshrines) do
            if v.Closest then
                l = GetControl("Fyr_MM_Scroll_Map_WayshrinePins_Pin" .. tostring(i))
                if l ~= nil then
                    FyrMM.CreateBorderPin(l)
                end
            end
        end
    end

    -- treasures and antiquities
    if FyrMM.SV.BorderTreasures then
        if not tableIsEmpty(Treasures) then
            for i, v in pairs(Treasures) do
                if v ~= nil then
                    if v.IsTreasure then
                        FyrMM.CreateBorderPin(v)
                    end
                end
            end
        end

    end

    -- Dragon next location
    if FyrMM.SV.WorldEvents then
        if not tableIsEmpty(DragonNextLocation) then
            for i, v in pairs(DragonNextLocation) do
                if v ~= nil then
                    if v.IsDragonNextLocation then
                        FyrMM.CreateBorderPin(v)
                    end
                end
            end
        end

    end

    -- digsites
    if not tableIsEmpty(Digsites) then
        for i, v in pairs(Digsites) do
            if v ~= nil then
                if v.borderInformation ~= nil then
                    FyrMM.CreateBorderPin(v)
                end
            end
        end
    end

    -- Quest givers
    if FyrMM.SV.BorderQuestGivers and not tableIsEmpty(FyrMM.AvailableQuestGivers) then
        if #FyrMM.AvailableQuestGivers <= 5 then
            for i, v in pairs(FyrMM.AvailableQuestGivers) do
                if v ~= nil then
                    if v.IsAvailableQuest then
                        FyrMM.CreateBorderPin(v)
                    end
                end
            end
        else
            if not tableIsEmpty(AQGList) then
                for i = 1, 5 do
                    if AQGList[i] ~= nil then
                        FyrMM.CreateBorderPin(AQGList[i])
                    end
                end
            end
        end
    end
end

function FyrMM.PlaceWaypointBorderPins()
    SetBorderPinHandlers()
    if FyrMM.SV.BorderPinsWaypoint then
        if FyrMM.IsWaypoint then
            if not FyrMM.Waypoint:IsHidden() or not Is_PinInsideWheel(FyrMM.Waypoint) then
                FyrMM.CreateBorderPin(FyrMM.Waypoint)
                if FyrMM.Waypoint.BorderPin then
                    FyrMM.Waypoint.BorderPin:SetHandler("OnMouseEnter", BorderPinOnMouseEnter)
                    FyrMM.Waypoint.BorderPin:SetHandler("OnMouseExit", BorderPinOnMouseExit)
                    FyrMM.Waypoint.BorderPin:SetMouseEnabled(true)
                end
            else
                if FyrMM.Waypoint.BorderPin ~= nil then
                    RemoveBorderPin(FyrMM.Waypoint)
                end
            end
        end
        if FyrMM.IsPing then
            if not FyrMM.Ping:IsHidden() or not Is_PinInsideWheel(FyrMM.Ping) then
                FyrMM.CreateBorderPin(FyrMM.Ping)
                if FyrMM.Ping.BorderPin then
                    FyrMM.Ping.BorderPin:SetHandler("OnMouseEnter", BorderPinOnMouseEnter)
                    FyrMM.Ping.BorderPin:SetHandler("OnMouseExit", BorderPinOnMouseExit)
                    FyrMM.Ping.BorderPin:SetMouseEnabled(true)
                end
            else
                if FyrMM.Ping.BorderPin ~= nil then
                    RemoveBorderPin(FyrMM.Ping)
                end
            end
        end
        if FyrMM.IsRally then
            if not FyrMM.Rally:IsHidden() or not Is_PinInsideWheel(FyrMM.Rally) then
                FyrMM.CreateBorderPin(FyrMM.Rally)
                if FyrMM.Rally.BorderPin then
                    FyrMM.Rally.BorderPin:SetHandler("OnMouseEnter", BorderPinOnMouseEnter)
                    FyrMM.Rally.BorderPin:SetHandler("OnMouseExit", BorderPinOnMouseExit)
                    FyrMM.Rally.BorderPin:SetMouseEnabled(true)

                end
            else
                if FyrMM.Rally.BorderPin ~= nil then
                    RemoveBorderPin(FyrMM.Rally)
                end
            end
        end
    end
end

function FyrMM.isSameZone(PinMapId)
    local _, _, _, pinZone = GetMapInfoById(PinMapId)
    local _, _, _, currentMapZone = GetMapInfoById(CurrentMap.MapId)

    if PinMapId == CurrentMap.MapId or pinZone == currentMapZone then
        return true
    else
        return false
    end
end

-----------------------------------------------------------------
-- Pin Clean up
-----------------------------------------------------------------
local function CleanupMapLocations()
    local t = GetGameTimeMilliseconds()
    local totalPins = Fyr_MM_Scroll_Map_LocationPins:GetNumChildren()
    if totalPins > FyrMM.currentLocationsCount then
        for i = FyrMM.currentLocationsCount + 1, totalPins do
            local l = GetControl("Fyr_MM_Scroll_Map_LocationPins_Pin" .. tostring(i))
            if l ~= nil then
                if l.BorderPin ~= nil then
                    RemoveBorderPin(l.BorderPin)
                end
                l.nX = nil
                l.nY = nil
                l:ClearAnchors()
                l:SetHidden(true)
                l:SetMouseEnabled(false)
                -- l:SetTexture(nil)
                l:SetDimensions(0, 0)
                l.m_Pin = nil
                PinsList[l:GetName()] = nil
            end
        end
    end
    if FyrMM.DebugMode then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug", "CleanupMapLocations " .. tostring(GetGameTimeMilliseconds() - t))
    end
end

local function CleanupWayshrines()
    local t = GetGameTimeMilliseconds()
    local totalPins = Fyr_MM_Scroll_Map_WayshrinePins:GetNumChildren()
    if totalPins > FyrMM.currentWayshrineCount then
        for i = FyrMM.currentWayshrineCount + 1, totalPins do
            local l = GetControl("Fyr_MM_Scroll_Map_WayshrinePins_Pin" .. tostring(i))
            if l ~= nil then
                if l.BorderPin ~= nil then
                    RemoveBorderPin(l.BorderPin)
                end
                l.nX = nil
                l.nY = nil
                l:ClearAnchors()
                l:SetHidden(true)
                l:SetMouseEnabled(false)
                -- l:SetTexture(nil)
                l:SetDimensions(0, 0)
                l.m_Pin = nil
                PinsList[l:GetName()] = nil
            end
        end
    end
    if FyrMM.DebugMode then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug", "CleanupWayshrines " .. tostring(GetGameTimeMilliseconds() - t))
    end
end

local function CleanupPOIs()
    local t = GetGameTimeMilliseconds()
    local totalPins = Fyr_MM_Scroll_Map_POIPins:GetNumChildren()
    if totalPins == 0 then
        return
    end
    if CleanPOIs + FyrMM.currentPOICount ~= totalPins then
        -- if totalPins > FyrMM.currentPOICount then
        CleanPOIs = 0
        for i = FyrMM.currentPOICount + 1, totalPins do
            local l = GetControl("Fyr_MM_Scroll_Map_POIPins_Pin" .. tostring(i))
            if l ~= nil then
                l.nX = nil
                l.nY = nil
                l:ClearAnchors()
                l:SetHidden(true)
                l:SetMouseEnabled(false)
                -- l:SetTexture(nil)
                l:SetDimensions(0, 0)
                l.m_Pin = nil
                PinsList[l:GetName()] = nil
                CleanPOIs = CleanPOIs + 1
            end
        end
    end
    if FyrMM.DebugMode then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug",
            "CleanupPOIs (" .. tostring(FyrMM.currentPOICount + 1) .. " - " .. tostring(totalPins) .. ") (" .. CleanPOIs ..
                ") " .. tostring(GetGameTimeMilliseconds() - t))
    end
end

local function RemoveQuestPin(l)
    if l == nil then
        return
    end
    if l.MM_Tag ~= nil then
        if l.MM_Tag == 1 then
            if l.secondaryPin ~= nil then
                l.secondaryPin.MM_Tag = nil
                RemoveQuestPin(l.secondaryPin)
            end
            if l.tertiaryPin ~= nil then
                l.tertiaryPin.MM_Tag = nil
                RemoveQuestPin(l.tertiaryPin)
            end
        else
            if l.primaryPin ~= nil then
                l.primaryPin.MM_Tag = nil
                RemoveQuestPin(l.primaryPin)
            end
        end
    end
    if l.OnBorder then
        if l.BorderPin then
            l.BorderPin:ClearAnchors()
            l.BorderPin:SetHidden()
            l.BorderPin.pin = nil
            l.BorderPin = nil
        end
        l.OnBorder = nil
    end
    if l.questdataIndex ~= nil then
        if FyrMM.questPinCount > 0 then
            FyrMM.questPinCount = FyrMM.questPinCount - 1
        end
        if QuestPins[l.questdataIndex] ~= nil then
            table.insert(FreeQuestPinIndex, QuestPins[l.questdataIndex].pinIndex)
        end
        QuestPins[l.questdataIndex] = nil
    end

    l:SetParent(Fyr_MM_Scroll_Map_QuestPins)
    l:ClearAnchors()
    l:SetHidden(true)
    l:SetMouseEnabled(false)
    -- l:SetTexture(nil)
    l:SetDimensions(0, 0)
    l.questdataIndex = nil
    l.MM_Tag = nil
    l.m_PinTag = nil
    l.m_PinType = nil
    l.m_Pin = nil
    l.normalizedX = nil
    l.normalizedY = nil
    l.radius = nil
    l.MapId = nil
    l.questIndex = nil
    l.questName = nil
    l.PinToolTipText = nil
    l.primaryPin = nil
    l.secondaryPin = nil
    l.tertiaryPin = nil
    l.pinAge = nil
    PinsList[l:GetName()] = nil
end

local function ClearDigsiteBlob(digSite)
    digSite.pinType = nil
    digSite.m_PinType = nil
    digSite.Tag = nil
    digSite.nX = nil
    digSite.nY = nil
    digSite.MapId = nil
    digSite.borderInformation = nil
    digSite:SetHidden(true)
    digSite:ClearPoints()
    digSite:ClearAnchors()
end

local function CreateDigSiteAreaSidePins(pin, width, height, isTracked)

    local DigSiteAreaSidePinNS
    DigSiteAreaSidePinNS = GetControl("Fyr_MM_Scroll_Map_DigSite" .. tostring(FyrMM.currentDigSiteCount) .. "_NS")
    if DigSiteAreaSidePinNS == nil then
        DigSiteAreaSidePinNS = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_DigSite" ..
                                                                tostring(FyrMM.currentDigSiteCount) .. "_NS",
            Fyr_MM_Scroll_NS_Map_Pins, CT_POLYGON)
    else
        DigSiteAreaSidePinNS:SetParent(Fyr_MM_Scroll_NS_Map_Pins)
    end

    DigSiteAreaSidePinNS.m_PinType = pin.m_PinType
    DigSiteAreaSidePinNS.nX = pin.nX
    DigSiteAreaSidePinNS.nY = pin.nY
    DigSiteAreaSidePinNS.borderInformation = pin.borderInformation
    DigSiteAreaSidePinNS.MapId = pin.MapId
    DigSiteAreaSidePinNS:SetDimensions(width, height)
    DigSiteAreaSidePinNS:SetHidden(not ZO_WorldMap_IsPinGroupShown(MAP_FILTER_DIG_SITES))

    local centerColor = isTracked and ZO_MAP_PIN_TRACKED_DIG_SITE_COLOR or ZO_MAP_PIN_DIG_SITE_COLOR
    local r, g, b = centerColor:UnpackRGB()
    local alpha = 0.39
    DigSiteAreaSidePinNS:SetCenterColor(r, g, b, alpha)
    local borderColor = ZO_MAP_PIN_DIG_SITE_BORDER_COLOR
    DigSiteAreaSidePinNS:SetBorderColor(borderColor:UnpackRGBA())
    DigSiteAreaSidePinNS:SetSmoothingEnabled(true)
    DigSiteAreaSidePinNS:SetBorderThickness(3, 3, 0)
    DigSiteAreaSidePinNS:SetShapeType(SHAPE_CIRCLE)
    DigSiteAreaSidePinNS:SetDrawLayer(1)

    FyrMM.SetPinAnchor(DigSiteAreaSidePinNS, DigSiteAreaSidePinNS.nX, DigSiteAreaSidePinNS.nY, Fyr_MM_Scroll_Map_Pins)
    if FyrMM.SV.WheelMap then
        DigSiteAreaSidePinNS:SetParent(Fyr_MM_Scroll_NS_Map_Pins)
    end
    DigSiteAreaSidePinNS:SetHandler("OnMouseUp", PinOnMouseUp)
    DigSiteAreaSidePinNS:SetHandler("OnMouseEnter", PinOnMouseEnter)
    DigSiteAreaSidePinNS:SetHandler("OnMouseExit", PinOnMouseExit)
    SetDigSitePoints(DigSiteAreaSidePinNS)

    local DigSiteAreaSidePinWE
    DigSiteAreaSidePinWE = GetControl("Fyr_MM_Scroll_Map_DigSite" .. tostring(FyrMM.currentDigSiteCount) .. "_WE")
    if DigSiteAreaSidePinWE == nil then
        DigSiteAreaSidePinWE = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_DigSite" ..
                                                                tostring(FyrMM.currentDigSiteCount) .. "_WE",
            Fyr_MM_Scroll_WE_Map_Pins, CT_POLYGON)
    else
        DigSiteAreaSidePinWE:SetParent(Fyr_MM_Scroll_WE_Map_Pins)
    end

    DigSiteAreaSidePinWE.m_PinType = pin.m_PinType
    DigSiteAreaSidePinWE.nX = pin.nX
    DigSiteAreaSidePinWE.nY = pin.nY
    DigSiteAreaSidePinWE.borderInformation = pin.borderInformation
    DigSiteAreaSidePinWE.MapId = pin.MapId
    DigSiteAreaSidePinWE:SetDimensions(width, height)
    DigSiteAreaSidePinWE:SetHidden(not ZO_WorldMap_IsPinGroupShown(MAP_FILTER_DIG_SITES))
    DigSiteAreaSidePinWE:SetCenterColor(r, g, b, alpha)
    DigSiteAreaSidePinWE:SetBorderColor(borderColor:UnpackRGBA())
    DigSiteAreaSidePinWE:SetSmoothingEnabled(true)
    DigSiteAreaSidePinWE:SetBorderThickness(3, 3, 0)
    DigSiteAreaSidePinWE:SetShapeType(SHAPE_CIRCLE)
    DigSiteAreaSidePinWE:SetDrawLayer(1)
    FyrMM.SetPinAnchor(DigSiteAreaSidePinWE, DigSiteAreaSidePinWE.nX, DigSiteAreaSidePinWE.nY, Fyr_MM_Scroll_Map_Pins)
    if FyrMM.SV.WheelMap then
        DigSiteAreaSidePinWE:SetParent(Fyr_MM_Scroll_WE_Map_Pins)
    end
    DigSiteAreaSidePinWE:SetHandler("OnMouseUp", PinOnMouseUp)
    DigSiteAreaSidePinWE:SetHandler("OnMouseEnter", PinOnMouseEnter)
    DigSiteAreaSidePinWE:SetHandler("OnMouseExit", PinOnMouseExit)
    SetDigSitePoints(DigSiteAreaSidePinWE)

end

local function CreateDigSiteBlob(DigsiteId)
    local centerX, centerZ, isShownInCurrentMap = GetDigSiteNormalizedCenterPosition(DigsiteId)
    if isShownInCurrentMap then

        local isTracked = IsDigSiteAssociatedWithTrackedAntiquity(DigsiteId)
        local points = {}
        local minX = 1.0
        local maxX = 0.0
        local minY = 1.0
        local maxY = 0.0

        local borderPoints = {GetDigSiteNormalizedBorderPoints(DigsiteId)}

        for i = 1, #borderPoints, 2 do -- loop by 2 because we are getting x and z coordinates
            local x = borderPoints[i]
            local y = borderPoints[i + 1] -- UI is going to treat z as y

            minX = zo_min(x, minX)
            maxX = zo_max(x, maxX)

            minY = zo_min(y, minY)
            maxY = zo_max(y, maxY)

            local coordinates = {
                x = x,
                y = y
            }
            table.insert(points, coordinates)
        end

        for index, coordinates in ipairs(points) do
            coordinates.x = zo_normalize(coordinates.x, minX, maxX)
            coordinates.y = zo_normalize(coordinates.y, minY, maxY)
        end

        local borderInformation = {
            borderPoints = points,
            borderWidth = maxX - minX,
            borderHeight = maxY - minY
        }

        local mWidth, mHeight = Fyr_MM_Scroll_Map:GetDimensions()

        local digSite
        FyrMM.currentDigSiteCount = FyrMM.currentDigSiteCount + 1
        digSite = GetControl("Fyr_MM_Scroll_Map_DigSite" .. tostring(FyrMM.currentDigSiteCount))
        if digSite == nil then
            digSite = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_DigSite" .. tostring(FyrMM.currentDigSiteCount),
                Fyr_MM_Scroll_Map_Pins, CT_POLYGON)

            digSite.nDistance = function(self)
                if self.nX == nil then
                    return 1
                end
                return math.sqrt((zo_round(CurrentMap.PlayerNX * 10000) - zo_round(self.nX * 10000)) *
                                     (zo_round(CurrentMap.PlayerNX * 10000) - zo_round(self.nX * 10000)) +
                                     (zo_round(CurrentMap.PlayerNY * 10000) - zo_round(self.nY * 10000)) *
                                     (zo_round(CurrentMap.PlayerNX * 10000) - zo_round(self.nY * 10000))) / 10000
            end
            digSite:SetMouseEnabled(true)
            digSite:SetHandler("OnMouseEnter", PinOnMouseEnter)
            digSite:SetHandler("OnMouseExit", PinOnMouseExit)
            digSite:SetHandler("OnMouseUp", PinOnMouseUp)
        end
        digSite.pinType = isTracked and MAP_PIN_TYPE_TRACKED_ANTIQUITY_DIG_SITE or MAP_PIN_TYPE_ANTIQUITY_DIG_SITE
        digSite.Tag = DigsiteId
        digSite.nX = centerX
        digSite.nY = centerZ

        SetMapToDigSitePosition(DigsiteId)
        digSite.MapId = CurrentMap.MapId
        FyrMM.SetMapToPlayerLocation()

        digSite.borderInformation = borderInformation
        digSite.m_PinType = digSite.pinType
        digSite:SetDrawLayer(1)
        local width = borderInformation.borderWidth * mWidth
        local height = borderInformation.borderHeight * mHeight
        digSite:SetDimensions(width, height)
        local centerColor = isTracked and ZO_MAP_PIN_TRACKED_DIG_SITE_COLOR or ZO_MAP_PIN_DIG_SITE_COLOR
        local r, g, b = centerColor:UnpackRGB()
        local alpha = 0.39
        digSite:SetCenterColor(r, g, b, alpha)
        local borderColor = ZO_MAP_PIN_DIG_SITE_BORDER_COLOR
        digSite:SetBorderColor(borderColor:UnpackRGBA())
        digSite:SetSmoothingEnabled(true)
        digSite:SetBorderThickness(3, 3, 0)
        digSite:SetShapeType(SHAPE_CIRCLE)
        FyrMM.SetPinAnchor(digSite, centerX, centerZ, Fyr_MM_Scroll_Map_Pins)

        if FyrMM.SV.WheelMap then -- root of the problem was here
            if FyrMM.SV.RotateMap then
                digSite:SetParent(Fyr_MM_Scroll_CW_Map_Pins)
            else
                digSite:SetParent(FyrMM.GetScrollObject(digSite))
                -- FyrMM.SetPinAnchor(digSite, centerX, centerZ, Fyr_MM_Scroll_CW_Map_Pins)
            end

            CreateDigSiteAreaSidePins(digSite, width, height, isTracked)
        end

        digSite:SetHidden(not ZO_WorldMap_IsPinGroupShown(MAP_FILTER_DIG_SITES))

        SetDigSitePoints(digSite)
        table.insert(Digsites, digSite)
    end
end

function FyrMM.UpdateAntiquityDigSites()
    if FyrMM.currentDigSiteCount > 0 then
        Digsites = {}
        for i = 1, FyrMM.currentDigSiteCount, 1 do
            local digSite = GetControl("Fyr_MM_Scroll_Map_DigSite" .. tostring(i))
            local digSiteNS = GetControl("Fyr_MM_Scroll_Map_DigSite" .. tostring(i) .. "_NS")
            local digSiteWE = GetControl("Fyr_MM_Scroll_Map_DigSite" .. tostring(i) .. "_WE")
            ClearDigsiteBlob(digSite)
            if FyrMM.SV.WheelMap then
                if digSiteNS then
                    ClearDigsiteBlob(digSiteNS)
                end
                if digSiteWE then
                    ClearDigsiteBlob(digSiteWE)
                end
            end
        end
    end
    FyrMM.currentDigSiteCount = 0
    local numInprogress = GetNumInProgressAntiquities()
    for antiquityIndex = 1, numInprogress, 1 do
        local numDigSites = GetNumDigSitesForInProgressAntiquity(antiquityIndex)
        if numDigSites > 0 then
            if numDigSites == 1 then
                local digSiteId = GetInProgressAntiquityDigSiteId(antiquityIndex, 1)
                if digSiteId > 0 then
                    CreateDigSiteBlob(digSiteId)
                end
            else
                for digSiteIndex = 1, numDigSites, 1 do
                    local digSiteId = GetInProgressAntiquityDigSiteId(antiquityIndex, digSiteIndex)
                    if digSiteId > 0 then
                        CreateDigSiteBlob(digSiteId)
                    end
                end
            end
        end
    end
end

function FyrMM.RemoveInvalidQuestPins()
    local t = GetGameTimeMilliseconds()
    local _
    local compleate
    for i, v in pairs(QuestPins) do
        local l = v.Pin
        if l ~= nil then
            if not l:IsHidden() then
                local a = l.m_PinTag[1]
                local b = l.m_PinTag[3]
                local c = l.m_PinTag[2]
                local qi = l.questIndex
                if l.questIndex ~= nil then
                    if not IsValidQuestIndex(qi) or GetJournalQuestName(qi) ~= l.questName then
                        RemoveQuestPin(l)
                    else
                        if l.m_PinTag ~= nil and l.PinToolTipText ~= nil then
                            if l.PinToolTipText ~= GenerateQuestConditionTooltipLine(a, b, c) then
                                RemoveQuestPin(l)
                            else
                                _, _, _, _, compleate, _ = GetJournalQuestConditionInfo(a, b, c)
                                if compleate then
                                    RemoveQuestPin(l)
                                end
                            end
                        else
                            RemoveQuestPin(l)
                        end
                    end
                else
                    RemoveQuestPin(l)
                end
            end
        end
    end
    if FyrMM.DebugMode then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug",
            "RemoveInvalidQuestPins " .. tostring(GetGameTimeMilliseconds() - t))
    end
end

function FyrMM.UpdateLabels(eventCode, zoneName, subZoneName, newSubzone, someID, subzoneId)
    if not FyrMM.SV then
        return
    end -- too soon

    if Fyr_MM:IsHidden() then
        Fyr_MM_ZoneFrame:SetHidden(true)
        return
    end

    local currentMapName, _ = string.gsub(GetMapName(), "(%w+)[%^]+.*", "%1")
    local currentAreaName = string.gsub(GetPlayerLocationName(), "(%w+)[%^]+.*", "%1")
    if not FyrMM.SV.ZoneNameContents ~= nil then
        if FyrMM.SV.ZoneNameContents == "Classic (Map only)" then
            Fyr_MM_Zone:SetText(currentMapName)
        elseif FyrMM.SV.ZoneNameContents == "Map & Area" then
            if currentMapName ~= currentAreaName then
                Fyr_MM_Zone:SetText(currentMapName .. "\n" .. currentAreaName)
            else
                Fyr_MM_Zone:SetText(currentMapName)
            end
        else
            Fyr_MM_Zone:SetText(currentAreaName)
        end
    else
        Fyr_MM_Zone:SetText(currentMapName)
    end

    local zoneWidth, zoneHeight = Fyr_MM_Zone:GetTextDimensions() or 100, 20
    if string.find(Fyr_MM_Zone:GetText(), "\n") then
        zoneHeight = zoneHeight * 2
    end

    Fyr_MM_ZoneFrame:SetDimensions(zoneWidth + 10, zoneHeight + 3)
    if FyrMM.SV.ZoneFrameLocationOption == "Free" then
        Fyr_MM_ZoneFrame:ClearAnchors()
        Fyr_MM_ZoneFrame:SetAnchor(MM_GetZoneFrameAnchor())
    end
    Fyr_MM_ZoomLevel:SetText(tostring(CurrentMap.ZoomLevel))
end

-----------------------------------------------------------------
-- Updates
-----------------------------------------------------------------

function FyrMM.GetMapMeasureMultiplier()
    -- Based on assumption that player constantly moves at the same speed anywhere - world size has to be adjusted to match it. According to Tamriel distance difference for some specific maps I made a few adjustments for the worldsizes while in those maps.
    -- Maps like Auridon or Glenumbra indicate same player speeds while Cyrodiil, Craglorn and starting maps show compleately different speeds (for mapsize 33440)

    local mapIndex = GetCurrentMapIndex()
    local multiplier = 1
    -- walking = 2.00/2.03 m/s
    -- if mapIndex == 14 then -- cyrodiil
    -- multiplier = 2.2
    -- elseif mapIndex == 18 then -- Bal foyen
    -- multiplier = 1 --1.353
    -- elseif mapIndex == 19 then -- stros m'kai
    -- multiplier = 2.6
    -- elseif mapIndex == 21 then --  kenarthi's roost
    -- multiplier = 2.4865
    -- elseif mapIndex == 22 then -- Bleakrock isle
    -- multiplier = 1 --3.1
    -- elseif mapIndex == 25 then -- craglorn
    -- multiplier = 1 --1.087
    if mapIndex == 39 then -- Greymoor Caverns
        multiplier = 4.5
    end
    -- alik'r, artaeum, auridon, Bal foyen, Bangkorai , Betnikh, Arkhzand cavern, Blackwood, Bleakrock, clockwork city, craglorn, deshaan, eastmarch,
    -- fargrave, glenumbra, gold coast, grahtwood, greenshade, hew's bane, high isle, kenarthi's roost, malabal tor, murkmire, northern elsweyr
    -- reaper's march, rivenspire, shadowfen, southern elsweyr, stonefalls, stormhaven, stros m'kai, summerset, the deadlands, the reach
    -- the rift, western skyrim, wrothgar are multiplier = 1

    return multiplier
end

function FyrMM.MeasureDistance()
    if not FyrMM.MeasureMaps then
        return
    end

    if CurrentMap.TrueMapSize and CurrentMap.TrueMapSize > 1 then
        FyrMM.DistanceMeasurementStarted = false
        return
    end

    local _
    FyrMM.SetMapToPlayerLocation()
    FyrMM.MeasurementXl, FyrMM.MeasurementYl, _ = GetMapPlayerPosition("player")
    local mapIndex = GetCurrentMapIndex()
    if mapIndex == nil then
        MapZoomOut()
        mapIndex = GetCurrentMapIndex()
    end

    if mapIndex ~= 23 then
        SetMapToMapListIndex(1)
    end

    FyrMM.MeasurementX, FyrMM.MeasurementY, _ = GetMapPlayerPosition("player")
    FyrMM.DistanceMeasurementStarted = true
    FyrMM.SetMapToPlayerLocation()
    zo_callLater(FyrMM.FinishDistanceMeasurement, 5000)
end

function FyrMM.FinishDistanceMeasurement()
    if Fyr_MM:IsHidden() or FyrMM.worldMapShowing then
        return
    end
    FyrMM.DistanceMeasurementStarted = false
    if CurrentMap.TrueMapSize > 1 then
        return
    end
    local x, y = FyrMM.MeasurementX, FyrMM.MeasurementY
    FyrMM.SetMapToPlayerLocation()
    local xl, yl = FyrMM.MeasurementXl, FyrMM.MeasurementYl
    local x2l, y2l, _ = GetMapPlayerPosition("player")
    local mapIndex = GetCurrentMapIndex()
    if mapIndex == nil then
        MapZoomOut()
        mapIndex = GetCurrentMapIndex()
    end
    local worldsize, multiplier

    if mapIndex ~= 23 then -- not coldharbour
        SetMapToMapListIndex(1)
        worldsize = 33440 -- Assumed Tamriel size in feet taken from ZygorGuides
    else
        worldsize = 5684 -- Assumed Coldharbour size in feet
    end

    local multiplier = FyrMM.GetMapMeasureMultiplier()

    local x2, y2, _ = GetMapPlayerPosition("player")
    FyrMM.SetMapToPlayerLocation()
    local localdistance = math.sqrt((xl - x2l) * (xl - x2l) + (yl - y2l) * (yl - y2l)) -- Local map distance
    local continentdistance = math.sqrt((x - x2) * (x - x2) + (y - y2) * (y - y2)) -- Tamriel/Coldharbour
    local mapSize = (worldsize * continentdistance / localdistance) * multiplier
    if not (mapSize > 0) then -- Error
        FyrMM.DistanceMeasurementStarted = true
        return
    end
    if FyrMM.SV.MapSizes == nil then
        FyrMM.SV.MapSizes = {}
    end
    if not CurrentMap.filename or CurrentMap.filename == "" then
        local filename, nameNoNum, path = GetCurrentMapTextureFileInfo()
        CurrentMap.filename = string.lower(filename)
    end
    FyrMM.SV.MapSizes[CurrentMap.filename] = mapSize
    CurrentMap.TrueMapSize = mapSize
end

function FyrMM.InCombatAutoHideCheck()
    if not FyrMM.SV.InCombatAutoHide then
        return
    end
    if IsUnitActivelyEngaged("player") then
        FyrMM.AfterCombatUnhidePending = false
        if not Fyr_MM:IsHidden() then
            FyrMM.Visible = false
            FyrMM.AutoHidden = true
        end
    else
        if Fyr_MM:IsHidden() and FyrMM.AutoHidden then
            if not FyrMM.AfterCombatUnhidePending then
                FyrMM.AfterCombatUnhidePending = true
                FyrMM.AfterCombatUnhideTimeStamp = GetFrameTimeMilliseconds()
                zo_callLater(AfterCombatShow, 1000 * FyrMM.SV.AfterCombatUnhideDelay)
            end
        end
    end
end

local function DelayedReload()
    if FyrMM.Reloading then
        return
    end
    zo_callLater(FyrMM.Reload, 100)
end

local function DelayedShow()
    if not Fyr_MM:IsHidden() or FyrMM.Reloading then
        return
    end
    zo_callLater(FyrMM.Show, 100)
end

local frameRatePrevious = GetFramerate()

function FyrMM.HideCheck() -- fires every 100 ticks

    -- if FyrMM.Reloading then --[[ d("Reloading") --]] return end
    -- FyrMM.Refresh = false

    -------- hide compass -------------------------------------------------------------
    if FyrMM.SV.hideCompass == true and not ZO_CompassFrame:IsHidden() then
        ZO_CompassFrame:SetHidden(true)
    end

    -- FPS stuff ----------------------------------------------------------------------
    if FyrMM.SV.ShowFPS or FyrMM.FpsTest then
        local frameRate = GetFramerate()
        frameRatePrevious = (frameRatePrevious + frameRate) / 2

        if (frameRate < 20.0) then
            Fyr_MM_FPS:SetColor(1, 0, 0, 1)
        elseif (frameRate < 30.0) then
            Fyr_MM_FPS:SetColor(1, 0.6, 0, 1)
        elseif (frameRate < 60.0) then
            Fyr_MM_FPS:SetColor(0, 1, 0, 1)
        else
            Fyr_MM_FPS:SetColor(1, 1, 1, 1)
        end
        Fyr_MM_FPS:SetText(string.format(" %.1f", frameRate))

        if not Fyr_MM:IsHidden() and FyrMM.FpsTest then
            if FyrMM.Fps == 0 then
                FyrMM.Fps = frameRate
            else
                FyrMM.Fps = (FyrMM.Fps + frameRate) / 2
            end
        end

        if Fyr_MM:IsHidden() and FyrMM.FpsTest then
            if FyrMM.FpsRaw == 0 then
                FyrMM.FpsRaw = frameRate
            else
                FyrMM.FpsRaw = (FyrMM.FpsRaw + frameRate) / 2
            end
        end
    else
        Fyr_MM_FPS:SetText("")
        Fyr_MM_FPS:SetAlpha(0)
    end

    --------------- clock -------------------------------------------------------------
    if FyrMM.SV.ShowClock then
        if GetSecondsSinceMidnight() ~= FyrMM.SecondsSinceMidnight then
            local TS = ""
            local a = GetTimeString()
            if FyrMM.TimeFormat == 0 then
                Fyr_MM_Time:SetText(a)
            elseif FyrMM.TimeFormat == 2 then
                TS = " " .. string.sub(a, 1, 5) .. " "
                Fyr_MM_Time:SetText(TS)
            else
                local h = tonumber(string.sub(a, 1, 2))
                if h > 12 then
                    local H = tostring(h - 12)
                    if (h - 12) < 10 then
                        H = "0" .. H
                    end
                    TS = (H .. string.sub(a, 3, 5) .. "pm")
                else
                    TS = (string.sub(a, 1, 5) .. "am")
                end
                Fyr_MM_Time:SetText(TS)
            end
            Fyr_MM_Time:SetMouseEnabled(true)
            if Fyr_MM_Time:IsHidden() then
                Fyr_MM_Time:SetHidden(false)
            end
            FyrMM.SecondsSinceMidnight = GetSecondsSinceMidnight()
        end
    else
        Fyr_MM_Time:SetMouseEnabled(false)
        Fyr_MM_Time:SetHidden(true)
    end

    --------------- SHOW / HIDE MINIMAP STUFF ---------------------------------------------------------------------------------------------------

    ------ Protect against minimap conflicts stuff
    if BUI and BUI.MiniMap and BUI.Vars.MiniMap == true then -- disables to avoid conflicts with BUI minimap
        if not FyrMM.minimapConflictMessage then
            d("|ceeeeeeMiniMap by |c006600Fyrakin |ceeeeee v" .. FyrMM.Panel.version .. "|r" ..
                  "|c00BFFF is disabled to avoid conflicts with |cFF0000Bandits User Interface|r|c00BFFF's minimap. To use Minimap by |c006600Fyrakin|r|c00BFFF you need to disable |cFF0000Bandits User Interface|r|c00BFFF's minimap first. Please, always test/compare your minimaps one by one.")
        end
        FyrMM.minimapConflictMessage = true
    elseif AUI and AUI.Minimap and AUI.Minimap.IsEnabled() then -- disables to avoid conflicts with AUI's minimap
        if not FyrMM.minimapConflictMessage then
            d("|ceeeeeeMiniMap by |c006600Fyrakin |ceeeeee v" .. FyrMM.Panel.version .. "|r" ..
                  "|c00BFFF is disabled to avoid conflicts with |cFF0000Advanced User Interface|r|c00BFFF's minimap. To use Minimap by |c006600Fyrakin|r|c00BFFF you need to disable |cFF0000Advanced User Interface|r|c00BFFF's minimap first. Please, always test/compare your minimaps one by one.")
        end
        FyrMM.minimapConflictMessage = true
    elseif VOTANS_MINIMAP and VOTANS_MINIMAP.account.enableMap then -- disables to avoid conflicts with Votan's minimap
        if not FyrMM.minimapConflictMessage then
            d("|ceeeeeeMiniMap by |c006600Fyrakin |ceeeeee v" .. FyrMM.Panel.version .. "|r" ..
                  "|c00BFFF is disabled to avoid conflicts with |cFF0000Votan|r|c00BFFF's minimap. To use Minimap by |c006600Fyrakin|r|c00BFFF you need to disable |cFF0000Votan|r|c00BFFF's minimap first. Please, always test/compare your minimaps one by one.")
        end
        FyrMM.minimapConflictMessage = true
    else
        FyrMM.minimapConflictMessage = false
    end

    -- menus, scenes stuff
    local siegeControlling = IsPlayerControllingSiegeWeapon()
    local menuShowing = not ZO_KeybindStripControl:IsHidden()
    local interactShowing = not ZO_InteractWindow:IsHidden()
    local gameMenuShowing = not ZO_GameMenu_InGame:IsHidden()
    local crownStoreActive = WINDOW_MANAGER:IsSecureRenderModeEnabled() or
                                 not ZO_ProvisionerTopLevelNavigationContainerScroll:IsHidden() or
                                 not ZO_SharedRightPanelBackground:IsHidden()

    if FyrMM.SV.InCombatAutoHide then
        FyrMM.InCombatAutoHideCheck()
    end -- checks for combat autohide and returns FyrMM.AutoHidden

    if siegeControlling and FyrMM.SV.Siege and not FyrMM.manuallyHidden then -- controlling siege weapon
        FyrMM.Visible = true
    elseif (FyrMM.worldMapShowing or FyrMM.FastTravelOpen or TRIBUTE_SCENE:IsShowing() or SCRYING_SCENE:IsShowing() or
        ANTIQUITY_DIGGING_SCENE:IsShowing() or GAME_MENU_SCENE:IsShowing() or crownStoreActive or
        (FyrMM.isInHouse and FyrMM.SV.InHouseAutoHide) or menuShowing or interactShowing or gameMenuShowing or
        FyrMM.AutoHidden or FyrMM.minimapConflictMessage) and ZO_Loot:IsHidden() and
        not LORE_READER_INTERACTION_SCENE:IsShowing() then
        FyrMM.Visible = false
    elseif not FyrMM.manuallyHidden then
        FyrMM.Visible = true
    end

    if FyrMM.manuallyHidden then -- if hidden by user, never show
        FyrMM.Hide()
    elseif FyrMM.Visible == false or FyrMM.noMap == true then -- not visible or no map data
        FyrMM.Hide()
    else -- if everything is good we show the mini map
        DelayedShow()
    end

    if FyrMM.Visible == true and FyrMM.noMap == true then -- reload in case of problem
        FyrMM.noMap = false
        DelayedReload()
        DelayedShow()
        return
    end

    -- checks for Mini compass
    if FyrMM.SV.miniCompassOption and not COMPASS_FRAME:GetBossBarActive() then
        if ZO_CompassFrame:IsHidden() and not Fyr_MM:IsHidden() then
            ZO_CompassFrame:SetHidden(false)
        end
        FyrMM.SetMiniCompass()
    elseif FyrMM.SV.miniCompassOption and COMPASS_FRAME:GetBossBarActive() then
        if FyrMM.SV.miniCompassNoBossBar then
            if not ZO_CompassFrame:IsHidden() then
                ZO_CompassFrame:SetHidden(true)
            end
        else
            FyrMM.compassDefaultWidth = FyrMM.compassDefaultWidth or 650
            local width = ZO_CompassFrame:GetWidth()
            if width ~= FyrMM.compassDefaultWidth then
                ZO_CompassFrame:SetWidth(FyrMM.compassDefaultWidth)
                if width ~= MM_GetMapWidth() - 10 then
                    FyrMM.compassDefaultWidth = width
                end
            end
        end
    end

end

function FyrMM.WorldMapShowHide()
    if ZO_WorldMap:IsHidden() then
        FyrMM.UnregisterUpdates()
        CancelUpdates()
        FyrMM.worldMapShowing = true
        FyrMM.Reloading = true

    else
        CurrentTasks = {}
        FyrMM.worldMapShowing = false
        FyrMM.Reloading = false
        -- zo_callLater(FyrMM.SetMapToPlayerLocation,50)

    end
end

function FyrMM.SetMapToPlayerLocation(stealth)
    local changed = false
    if not Stealth then
        if Fyr_MM:IsHidden() then
            return
        end
    end

    if GetMapFilterType() == 0 and stealth then
        zo_callLater(FyrMM.SetMapToPlayerLocation, 50)
        return
    end
    if FyrMM.worldMapShowing or not ZO_QuestJournal:IsHidden() then
        return
    end
    if FyrMM.DisableSubzones == true and GetMapType() ~= 1 then
        return
    end

    if FyrMM.DisableSubzones == true and GetMapType() == 1 and not IsUnitInDungeon("player") and not IsPlayerInRaid() and
        not IsActiveWorldBattleground() and not IsInAvAZone() then
        SetMapToZone()
        return true
    end

    if SetMapToPlayerLocation() ~= SET_MAP_RESULT_CURRENT_MAP_UNCHANGED then -- SET_MAP_RESULT_CURRENT_MAP_UNCHANGED = 1 SET_MAP_RESULT_FAILED = 0 SET_MAP_RESULT_MAP_CHANGED = 2

        changed = true
        if stealth then
            if FyrMM.DebugMode then
                CALLBACK_MANAGER:FireCallbacks("FyrMMDebug", "OnWorldMapChanged (SetMapToPlayerLocation)" ..
                    tostring(GetGameTimeMilliseconds()))
            end
            CALLBACK_MANAGER:FireCallbacks("OnWorldMapChanged")

        end
    end

    return changed
end

function FyrMM.Hide()
    if Fyr_MM:IsHidden() then
        return
    end
    FyrMM.UnregisterUpdates()
    CancelUpdates()
    Fyr_MM_Wheel_Background:SetHidden(true)
    Fyr_MM_Menu:SetHidden(true)
    Fyr_MM_Coordinates:SetHidden(true)
    Fyr_MM_Axis_Control:SetHidden(true)
    Fyr_MM_Scroll_WheelCenter:SetHidden(true)
    Fyr_MM_Scroll_WheelNS:SetHidden(true)
    Fyr_MM_Scroll_WheelWE:SetHidden(true)
    Fyr_MM_Frame_Wheel:SetHidden(true)
    if not FyrMM.SV.ShowBorder then
        Fyr_MM_Border:SetAlpha(0)
    end
    Fyr_MM:SetMouseEnabled(false)
    Fyr_MM_Menu:SetMouseEnabled(false)
    Fyr_MM_FPS_Frame:SetHidden(true)
    Fyr_MM_Zone_Background:SetHidden(true)
    Fyr_MM_ZoneFrame:SetHidden(true)
    Fyr_MM_Zone:SetText("")
    Fyr_MM_Speed:SetHidden(true)
    Fyr_MM:SetMouseEnabled(false)
    Fyr_MM_Frame_Control:SetMouseEnabled(false)
    Fyr_MM_ZoneFrame:SetMouseEnabled(false)
    Fyr_MM_FPS_Frame:SetMouseEnabled(false)
    Fyr_MM:SetHidden(true)
end

function FyrMM.Show_WheelScrolls()
    FyrMM.UpdateMapTiles(true)
    Fyr_MM_Wheel_Background:SetHidden(not FyrMM.SV.WheelMap)
    Fyr_MM_Scroll_WheelCenter:SetHidden(not FyrMM.SV.WheelMap)
    Fyr_MM_Scroll_WheelNS:SetHidden(not FyrMM.SV.WheelMap)
    Fyr_MM_Scroll_WheelWE:SetHidden(not FyrMM.SV.WheelMap)
    Fyr_MM_Scroll:SetHorizontalScroll(CurrentMap.hpos)
    Fyr_MM_Scroll:SetVerticalScroll(CurrentMap.vpos)
    Fyr_MM_Scroll_WheelCenter:SetHorizontalScroll(CurrentMap.hpos)
    Fyr_MM_Scroll_WheelCenter:SetVerticalScroll(CurrentMap.vpos)
    Fyr_MM_Scroll_WheelNS:SetHorizontalScroll(CurrentMap.hpos)
    Fyr_MM_Scroll_WheelNS:SetVerticalScroll(CurrentMap.vpos)
    Fyr_MM_Scroll_WheelWE:SetHorizontalScroll(CurrentMap.hpos)
    Fyr_MM_Scroll_WheelWE:SetVerticalScroll(CurrentMap.vpos)
end

function FyrMM.Show()
    if FyrMM.Reloading or not Fyr_MM:IsHidden() then
        return
    end -- or not Fyr_MM:IsHidden() was added for optimization 20/04/2023

    if not (IsPlayerControllingSiegeWeapon() and FyrMM.SV.Siege) then
        if not FyrMM.Visible or FyrMM.worldMapShowing or not ZO_KeybindStripControl:IsHidden() or
            not ZO_InteractWindow:IsHidden() or not ZO_GameMenu_InGame:IsHidden() or
            WINDOW_MANAGER:IsSecureRenderModeEnabled() then
            return
        end
    end

    if FyrMM.Halted and FyrMM.Visible and not FyrMM.worldMapShowing and FyrMM.HaltTimeOffset ~= 0 then
        if GetFrameTimeMilliseconds() - FyrMM.HaltTimeOffset > 1000 then
            FyrMM.RegisterUpdates()
        end
    end

    FyrMM.SetMapToPlayerLocation()
    if Fyr_MM:IsHidden() then

        zo_callLater(function()
            FyrMM.UpdateMapTiles(true)
            FyrMM.RegisterUpdates()
        end, 100)

        Fyr_MM_Frame_Wheel:SetHidden(not FyrMM.SV.WheelMap)
        if FyrMM.SV.WheelMap then
            FyrMM.Show_WheelScrolls()
        end
        Fyr_MM_Frame_Control:SetHidden(not FyrMM.SV.WheelMap)
        Fyr_MM:SetHidden(false)
        Fyr_MM_Menu:SetHidden(FyrMM.SV.MenuDisabled)
        Fyr_MM_Menu:SetMouseEnabled(not FyrMM.SV.MenuDisabled)
        Fyr_MM_Zone_Background:SetHidden(not FyrMM.SV.ShowZoneBackground)
        Fyr_MM_ZoneFrame:SetHidden(FyrMM.SV.HideZoneLabel)
        if not FyrMM.SV.HideZoneLabel then
            FyrMM.UpdateLabels()
        end
        Fyr_MM_Coordinates:SetHidden(not FyrMM.SV.ShowPosition)
        Fyr_MM_Axis_Control:SetHidden(not (FyrMM.SV.RotateMap or FyrMM.SV.BorderPins))
        Fyr_MM_FPS_Frame:SetHidden(not FyrMM.SV.ShowFPS)
        Fyr_MM_Speed:SetHidden(not FyrMM.SV.ShowSpeed)
        Fyr_MM_ZoneFrame:SetMouseEnabled(true)
        Fyr_MM:SetMouseEnabled(true)
    end

    if FyrMM.SV.ShowBorder then
        Fyr_MM_Border:SetAlpha(100)
    end

    Fyr_MM:SetMouseEnabled(true)
    FyrMM.RequestQuestPinUpdate() -- test 03/05/2023
    if FyrMM.checkLater == true then
        FyrMM.ZoneCheck()
    end
end

function FyrMM.ZoneUpdate()
    if FyrMM.Reloading then
        return
    end
    if FyrMM.SV.DisableSubzones then
        FyrMM.ZoneCheck()
    end
end

function FyrMM.playerMoved()
    FyrMM.newPos = {CurrentMap.PlayerNX, CurrentMap.PlayerNY} -- GetMapPlayerPosition("player")
    if rawequal(FyrMM.newPos, FyrMM.oldPos) then
        return false
    end
    FyrMM.oldPos = FyrMM.newPos
    return true
end

local function ZoneCheck()

    if Fyr_MM:IsHidden() then
        FyrMM.checkLater = true
        return
    end
    FyrMM.RegisterUpdates() -- Solves the bug where custom pins of parent zone are displayed on current subzone map after porting to a wayshrine in the same subzone 24/07/2022

    if not FyrMM.worldMapShowing then
        if GetMapFilterType() == 0 then
            zo_callLater(ZoneCheck, 50)
            return
        end
        FyrMM.CheckingZone = true

        local filename, _, _ = GetCurrentMapTextureFileInfo()
        if filename == "tamriel_0" then
            FyrMM.CheckingZone = false
            return
        end
        CurrentMap.ZoneIndex = GetCurrentMapZoneIndex()

        if string.lower(CurrentMap.filename) ~= string.lower(filename) then
            FyrMM.UnregisterUpdates()
            CancelUpdates()
            local ZoneIndex = 0
            local mapId = FyrMM.GetMapId()

            if FyrMM.MapSizes[mapId] then
                FyrMM.LoadCustomPinList()
            end

            if ZoneIndex == 0 then
                FyrMM.SetMapToPlayerLocation()
                CALLBACK_MANAGER:FireCallbacks("OnWorldMapChanged")
            else
                CurrentMap.ZoneIndex = ZoneIndex
            end

            FyrMM.UpdateMapInfo()
            FyrMM.UpdateMapTiles(true)
            FyrMM.MovementSpeed = 0
            FyrMM.MovementSpeedPrevious = 0
            FyrMM.MovementSpeedMax = 0
            CustomPinIndex = {}

            if IsInAvAZone() then
                zo_callLater(FyrMM.RequestKeepRefresh, 100) -- WAS 1000
            end

            CurrentMap.PlayerNX, CurrentMap.PlayerNY, CurrentMap.PlayerHeading = GetMapPlayerPosition("player")
            CurrentMap.MapId = mapId
            CurrentMap.MapContent = GetMapContentType()

            CALLBACK_MANAGER:FireCallbacks("OnFyrMiniNewMapEntered")
        end

        if FyrMM.SV.RotateMap then
            Fyr_MM_Scroll:SetHorizontalScroll(0)
            Fyr_MM_Scroll:SetVerticalScroll(0)
        else
            Fyr_MM_Scroll:SetHorizontalScroll(CurrentMap.hpos)
            Fyr_MM_Scroll:SetVerticalScroll(CurrentMap.vpos)
        end

        if FyrMM.SV.WheelMap then
            FyrMM.WheelScroll(CurrentMap.hpos, CurrentMap.vpos)
        end

        FyrMM.customPinsUpdateCount = nil
    end
    FyrMM.CheckingZone = false
    FyrMM.checkLater = false
end

function FyrMM.ZoneCheck()
    if FyrMM.CheckingZone then
        return
    end
    zo_callLater(ZoneCheck, 50)
end

local function TaskExists(tag)
    for i, v in pairs(CurrentTasks) do
        if CurrentTasks[i] ~= nil then
            if GetFrameTimeMilliseconds() - CurrentTasks[i].RequestTimeStamp < FYRMM_QUEST_PIN_REQUEST_TIMEOUT then
                if CurrentTasks[i][1] == tag[1] and CurrentTasks[i][2] == tag[2] and CurrentTasks[i][3] == tag[3] and
                    CurrentTasks[i].isBreadcrumb == tag.isBreadcrumb then
                    return true
                end
            else
                -- CurrentTasks[i] = nil
            end
        end
    end
    return false
end

local function DestroyTasks()
    for i, v in pairs(CurrentTasks) do
        if CurrentTasks[i] ~= nil then
            CurrentTasks[i] = nil
        end
    end
end

local function RemoveObsoleteQuestPins()
    local t = GetGameTimeMilliseconds()
    for i, v in pairs(QuestPins) do
        if questpinDataExists(v, RequestedQuestPins) == nil then
            RemoveQuestPin(v.Pin)
        end
    end
    local pinCount = Fyr_MM_Scroll_Map_QuestPins:GetNumChildren()
    local l
    local nilcount = 0
    for i = 1, pinCount + 100 do
        l = GetControl("Fyr_MM_Scroll_Map_QuestPins_Pin" .. tostring(i))
        if l == nil then
            nilcount = nilcount + 1
            if nilcount > 1 then
                return
            end
        end
        if l ~= nil and l.questdataIndex ~= nil then
            if QuestPins[l.questdataIndex] == nil then
                if l.MM_Tag == nil then
                    RemoveQuestPin(l)
                else
                    if l.MM_Tag == 1 then
                        if l.secondaryPin ~= nil then
                            l.secondaryPin.MM_Tag = nil
                            RemoveQuestPin(l.secondaryPin)
                        end
                        if l.tertiaryPin ~= nil then
                            l.tertiaryPin.MM_Tag = nil
                            RemoveQuestPin(l.tertiaryPin)
                        end
                        l.MM_Tag = nil
                        RemoveQuestPin(l)
                    end
                end
                zo_callLater(FyrMM.RequestQuestPinUpdate, 1000)
            end
        end
    end
    if FyrMM.DebugMode then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug",
            "RemoveObsoleteQuestPins " .. tostring(GetGameTimeMilliseconds() - t))
    end
end

local function AddMissingQuestPins()
    local properType, pinTexture, size
    for i, v in pairs(RequestedQuestPins) do
        if questpinDataExists(v, QuestPins) == nil then
            properType, pinTexture, size = FyrMM.GetQuestPinInfo(MAP_PIN_TYPE_TRACKED_QUEST_CONDITION,
                GetTrackedIsAssisted(TRACK_TYPE_QUEST, v.questIndex), v.isBreadcrumb, v.radius)
            FyrMM.CreateQuestPin(properType, v.tag, v.normalizedX, v.normalizedY, v.radius)
            zo_callLater(FyrMM.RequestQuestPinUpdate, 1000)
        end
    end
end

function FyrMM.checkDuplicateCustompin() -- added by @Masteroshi430 -- testing purposes, should never been called!
    if Fyr_MM_Scroll_Map_Pins:GetNumChildren() == 0 then
        return
    end
    FyrMM.scrollMapPinToCheck = FyrMM.scrollMapPinToCheck or 1

    local pinToTest = Fyr_MM_Scroll_Map_Pins:GetChild(FyrMM.scrollMapPinToCheck)
    local total = 1
    local notFoundYet = true
    for i = 1, Fyr_MM_Scroll_Map_Pins:GetNumChildren() do
        l = Fyr_MM_Scroll_Map_Pins:GetChild(i)
        if l ~= nil and l.nX then
            if FyrMM.scrollMapPinToCheck ~= i and pinToTest.nX == l.nX and pinToTest.nY == l.nY and pinToTest.radius ==
                l.radius then
                local texture = l:GetTextureFileName() or ""
                RemoveCustomPin(l)
                d("custom pin duplicate removed " .. texture)
            end
            if i > FyrMM.scrollMapPinToCheck and notFoundYet == true then
                FyrMM.scrollMapPinToCheck = i
                notFoundYet = false
            end
            total = total + 1
        else
            if i > FyrMM.scrollMapPinToCheck and notFoundYet == true then
                FyrMM.scrollMapPinToCheck = i
            end
        end
    end
    if FyrMM.scrollMapPinToCheck >= 1200 then
        FyrMM.scrollMapPinToCheck = 1
    end

    d("Next tested pin: " .. FyrMM.scrollMapPinToCheck .. " total custom pins: " .. total)
end

function FyrMM.customPinsUpdate(count) -- added by @Masteroshi430
    if FyrMM.Reloading then
        return
    end
    -- d("tries to update custom pins")
    if IsCustomPinsLoading() then
        return
    end
    if count ~= FyrMM.customPinsUpdateCount then
        return
    end

    count = count or 1
    if FyrMM.CustomPinCount ~= AvailableCustomPins() and count < 5 then
        if FyrMM.DebugMode then
            CALLBACK_MANAGER:FireCallbacks("FyrMMDebug",
                "FyrMM.CustomPins Start: (" .. tostring(FyrMM.CustomPinCount) .. ") " ..
                    tostring(GetGameTimeMilliseconds()))
        end
        FyrMM.CustomPins()
        -- d("check custompins attempt "..count)
        zo_callLater(function()
            FyrMM.customPinsUpdate(count + 1)
        end, 1000 + (count * 100))
        FyrMM.customPinsUpdateCount = count + 1
    elseif FyrMM.CustomPinCount ~= AvailableCustomPins() and count > 4 then
        FyrMM.ResetCustomPinList()
        FyrMM.customPinsUpdateCount = nil
        -- d("check custompins attempt "..count..": resetting custompins!")
    else
        FyrMM.customPinsUpdateCount = nil
        if FyrMM.DebugMode then
            CALLBACK_MANAGER:FireCallbacks("FyrMMDebug", "FyrMM.CustomPins End: (" .. tostring(FyrMM.CustomPinCount) ..
                ") " .. tostring(GetGameTimeMilliseconds()))
        end
    end
end

function FyrMM.PinUpdate()
    if FyrMM.Halted then
        return
    end
    if ((not FyrMM.Visible or Fyr_MM:IsHidden()) and FyrMM.Initialized) or FyrMM.worldMapShowing then
        return
    end
    local a = GetGameTimeMilliseconds()
    CurrentMap.ZoneIndex = GetCurrentMapZoneIndex()
    FyrMM.RemoveInvalidQuestPins()
    CheckCustomPinConsistence()

    if FyrMM.currentPOICount == 0 then
        EVENT_MANAGER:RegisterForUpdate("FyrMiniMapPOIPins", 30, function()
            if FyrMM.Reloading then
                return
            end
            FyrMM.POIPins()
            if FyrMM.currentPOICount ~= 0 then
                EVENT_MANAGER:UnregisterForUpdate("FyrMiniMapPOIPins")
                return
            end
        end)
    end

    if FyrMM.currentLocationsCount == 0 then
        EVENT_MANAGER:RegisterForUpdate("FyrMiniMapLocationsPins", 30, function()
            if FyrMM.Reloading then
                return
            end
            FyrMM.LocationPins()
            if FyrMM.currentLocationsCount ~= 0 then
                EVENT_MANAGER:UnregisterForUpdate("FyrMiniMapLocationsPins")
                return
            end
        end)
    end

    if FyrMM.currentWayshrineCount == 0 then
        EVENT_MANAGER:RegisterForUpdate("FyrMiniMapWayshrinesPins", 30, function()
            if FyrMM.Reloading then
                return
            end
            FyrMM.Wayshrines()
            if FyrMM.currentWayshrineCount ~= 0 then
                EVENT_MANAGER:UnregisterForUpdate("FyrMiniMapWayshrinesPins")
                return
            end
        end)
    end

    -- FyrMM.checkDuplicateCustompin() -- testing purposes, should never been called!

    if FyrMM.CustomPinCount ~= AvailableCustomPins() or tableIsEmpty(FyrMM.CustomPinList) or detectedNewCustomPin then

        if tableIsEmpty(FyrMM.CustomPinList) then
            FyrMM.LoadCustomPinList()
        elseif detectedNewCustomPin then
            FyrMM.CheckForNewCustomPins()
        end

        FyrMM.customPinsUpdate()
    end

    if tableIsEmpty(CurrentTasks) and QuestPinsUpdating and not QuestTasksPending then
        RemoveObsoleteQuestPins()
        AddMissingQuestPins()
        GetNumBorderPins()
        QuestPinsUpdating = false
    end

    if (NeedQuestPinUpdate or FyrMM.questPinCount == 0) and GetQuestJournalMaxValidIndex() > 0 then
        if not QuestPinsUpdating then
            if not (tableIsEmpty(CurrentTasks) and GetFrameTimeMilliseconds() - FyrMM.LastQuestPinRequest <
                FYRMM_QUEST_PIN_REQUEST_MINIMUM_DELAY) then
                RequestedQuestPins = {}
                FyrMM.UpdateQuestPins()
                NeedQuestPinUpdate = false
            end
        end
    end

    -- testing only !
    -- if #PinsList ~= PL then PL = #PinsList d(PL.." total pins") end
    -- if Fyr_MM_Scroll_Map_Pins:GetNumChildren() ~= SMP then SMP = Fyr_MM_Scroll_Map_Pins:GetNumChildren() d(SMP.." custom pins") end
    -- if Fyr_MM_Scroll_Map_WayshrinePins:GetNumChildren() ~= WSP then WSP = Fyr_MM_Scroll_Map_WayshrinePins:GetNumChildren() d(WSP.." wayshrine pins") end
    -- if Fyr_MM_Scroll_Map_LocationPins:GetNumChildren() ~= LP then LP = Fyr_MM_Scroll_Map_LocationPins:GetNumChildren() d(LP.." location pins") end
    -- if Fyr_MM_Scroll_Map_POIPins:GetNumChildren() ~= POIP then POIP = Fyr_MM_Scroll_Map_POIPins:GetNumChildren() d(POIP.." POI pins") end
    -- if Fyr_MM_Axis_Border_Pins:GetNumChildren() ~= BP then BP = Fyr_MM_Axis_Border_Pins:GetNumChildren() d(BP.." border pins") end
    -- if Fyr_MM_Scroll_Map_GroupPins:GetNumChildren() ~= GP then GP = Fyr_MM_Scroll_Map_GroupPins:GetNumChildren() d(GP.." group pins") end

    a = GetFrameTimeMilliseconds() - a
    if FyrMM.DebugMode and a > 0 then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug", "FyrMM.PinUpdate " .. tostring(a))
    end
end

function FyrMM.Debug_d(value)
    if FyrMM.DebugMode and FyrMM.SV then
        if FyrMM.SV.DebugLog == nil then
            FyrMM.SV.DebugLog = {}
        end
        local t = GetGameTimeMilliseconds() - math.floor(GetGameTimeMilliseconds() / 1000) * 1000
        d("[" .. GetTimeString() .. string.format("] %s", tostring(value)))
        table.insert(FyrMM.SV.DebugLog,
            "[" .. GetTimeString() .. "." .. tostring(t) .. "] FPS:" .. tostring(zo_round(GetFramerate() * 10) / 10) ..
                " RAM:" .. tostring(zo_round((collectgarbage("count") / 1024) * 100) / 100) .. " MAP:" ..
                tostring(CurrentMap.MapId) .. " LOC:" ..
                string.format("%05.02f, %05.02f", zo_round(CurrentMap.PlayerNX * 10000) / 100,
                    zo_round(CurrentMap.PlayerNY * 10000) / 100) .. " FN:" .. tostring(value))
    else
        FyrMM.SV.DebugLog = nil
    end
    d("debug triggering")
end

function FyrMM.SetMiniCompass()

    if ZO_Compass:GetScale() ~= MM_GetMapWidth() / 350 then
        if not Harvest then
            ZO_Compass:SetScale(MM_GetMapWidth() / 350)
        end
    end
    ZO_Compass:SetDimensions(MM_GetMapWidth() - 10, MM_GetMapWidth() / 20)
    ZO_CompassCenterOverPinLabel:SetScale(MM_GetMapWidth() / 300)
    ZO_CompassFrameLeft:SetDimensions(10, MM_GetMapWidth() / 20)
    ZO_CompassFrameRight:SetDimensions(10, MM_GetMapWidth() / 20)
    ZO_CompassFrame:SetDimensions(MM_GetMapWidth() - 10, MM_GetMapWidth() / 20)

    ZO_CompassCenterOverPinLabel:SetHidden(true) -- hide compass pin text

    ZO_CompassFrame:ClearAnchors()
    if FyrMM.SV.miniCompassLocation == "Top" then
        ZO_CompassFrame:SetAnchor(BOTTOMLEFT, Fyr_MM, TOPLEFT, 5, -5) -- TOP POSITION
    else
        local verticalOffset = 5
        if (not Fyr_MM_Frame_RoundMenu:IsHidden()) and Fyr_MM_Frame_RoundMenu:GetAlpha() ~= 0 then
            verticalOffset = verticalOffset + (Fyr_MM_Frame_RoundMenu:GetHeight() / 3)
        end
        if (not Fyr_MM_Frame_SquareMenu:IsHidden()) and Fyr_MM_Frame_SquareMenu:GetAlpha() ~= 0 then
            verticalOffset = verticalOffset + (Fyr_MM_Frame_SquareMenu:GetHeight() / 3)
        end

        if not Fyr_MM_ZoneFrame:IsHidden() then
            verticalOffset = verticalOffset + Fyr_MM_ZoneFrame:GetHeight()
        end
        ZO_CompassFrame:SetAnchor(TOPLEFT, Fyr_MM, BOTTOMLEFT, 5, verticalOffset) -- BOTTOM POSITION
    end
    ZO_CompassFrame:SetClampedToScreen(true)
    ZO_CompassFrame:SetDrawLayer(-1)
end

function FyrMM.Reload()
    if FyrMM.Reloading then
        return
    end
    local t = GetGameTimeMilliseconds()
    if FyrMM.DebugMode then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug", "FyrMM.Reload Start:")
    end
    FyrMM.Reloading = true
    CancelUpdates()
    CustomPinsCopying = false
    FyrMM.LastReload = GetFrameTimeMilliseconds()
    FyrMM.UnregisterUpdates()
    if not FyrMM.SV.HideZoneLabel then
        FyrMM.UpdateLabels()
    end
    FyrMM.MapHalfDiagonal()
    FyrMM.UpdateMapInfo()
    FyrMM.UpdateMapTiles(true)
    FyrMM.PositionUpdate()

    FreeQuestPinIndex = {}
    QuestPins = {}
    LastQuestPinIndex = 0
    FyrMM.DistanceMeasurementStarted = false
    FyrMM.MovementSpeedMax = 0
    FyrMM.questPinCount = 0
    FyrMM.currentLocationsCount = 0
    FyrMM.currentPOICount = 0
    FyrMM.currentForwardCamps = 0
    FyrMM.currentWayshrineCount = 0
    CleanUpPins()
    FyrMM.MeasureDistance()
    FyrMM.PlaceWaypointBorderPins()
    FyrMM.LoadCustomPinList()
    FyrMM.UpdateAntiquityDigSites()
    if FyrMM.DebugMode then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug", "FyrMM.Reload Done." .. tostring(GetGameTimeMilliseconds() - t))
    end
    -- EVENT_MANAGER:UnregisterForUpdate("MiniMapReload")

end

function FyrMM.WheelScroll(x, y)
    if x and y then
        Fyr_MM_Scroll_WheelCenter:SetHorizontalScroll(x)
        Fyr_MM_Scroll_WheelCenter:SetVerticalScroll(y)
        Fyr_MM_Scroll_WheelNS:SetHorizontalScroll(x)
        Fyr_MM_Scroll_WheelNS:SetVerticalScroll(y)
        Fyr_MM_Scroll_WheelWE:SetHorizontalScroll(x)
        Fyr_MM_Scroll_WheelWE:SetVerticalScroll(y)
    end
end

local function SetSpeedLabel(speed)
    if speed == nil then
        speed = 0
    end
    if speed ~= 0 then
        if FyrMM.SV.SpeedUnit == "ft/s" then
            speed = zo_round(speed * 22.0632) / 100
            Fyr_MM_SpeedLabel:SetText(string.format("%05.02f ft/s", speed))
        end
        if FyrMM.SV.SpeedUnit == "m/s" then
            speed = zo_round(speed * 6.7249) / 100
            Fyr_MM_SpeedLabel:SetText(string.format("%05.02f m/s", speed))
        end
        if FyrMM.SV.SpeedUnit == "%" then
            speed = zo_round(speed * 100) / 100
            Fyr_MM_SpeedLabel:SetText(string.format("%05.01f ", speed) .. "%")
        end
    else
        Fyr_MM_SpeedLabel:SetText("0 " .. FyrMM.SV.SpeedUnit)
    end
    local speedWidth, speedHeight = Fyr_MM_SpeedLabel:GetTextDimensions() or 100, 20
    Fyr_MM_Speed:SetDimensions(speedWidth + 10, speedHeight + 3)
end

local function LogPosition()
    local MapId = FyrMM.GetMapId()
    local size = CurrentMap.TrueMapSize
    local t = GetGameTimeMilliseconds()
    IsCompanionAround = DoesUnitExist("companion")
    CurrentMap.PlayerNX, CurrentMap.PlayerNY, CurrentMap.PlayerHeading = GetMapPlayerPosition("player")
    PositionLogCounter = PositionLogCounter + 1
    PositionLog3D[PositionLogCounter] = {GetUnitWorldPosition("player")}
    PositionLog3D[PositionLogCounter][5] = GetFrameTimeMilliseconds()
    PositionLog3D[PositionLogCounter][6] = CurrentMap.PlayerNX
    PositionLog3D[PositionLogCounter][7] = CurrentMap.PlayerNY
    CurrentMap.CameraHeading = GetPlayerCameraHeading()
    CurrentMap.PlayerTurned = (CurrentMap.Heading ~= math.abs(CurrentMap.PlayerHeading - pi * 2))
    CurrentMap.Heading = smoothHeadingRotation()

    CurrentMap.PlayerMoved = FyrMM.playerMoved()

    if CurrentMap.PlayerHeading < 0 then
        CurrentMap.PlayerHeading = pi * 2 + CurrentMap.PlayerHeading
    end
    if zo_round(CurrentMap.PlayerNX * 100) / 100 <= 0 or zo_round(CurrentMap.PlayerNY * 100) / 100 <= 0 or
        CurrentMap.PlayerNX >= 1 or CurrentMap.PlayerNY >= 1 then
        if not Fyr_MM:IsHidden() then
            zo_callLater(FyrMM.SetMapToPlayerLocation, 50)
        end
    end

    if MapId ~= CurrentMap.MapId and FyrMM.CheckingZone == false then
        FyrMM.ZoneCheck()
    end
    CurrentMap.PlayerX, CurrentMap.PlayerY = Fyr_MM_Scroll_Map:GetDimensions()
    CurrentMap.PlayerX = CurrentMap.PlayerX * CurrentMap.PlayerNX
    CurrentMap.PlayerY = CurrentMap.PlayerY * CurrentMap.PlayerNY
    CurrentMap.currentTimeStamp = t

    if CurrentMap.PlayerMoved then
        CurrentMap.movedTimeStamp = t
    end

    Fyr_MM_Position:SetText(string.format("%05.02f, %05.02f", CurrentMap.PlayerNX * 100, CurrentMap.PlayerNY * 100)) -- thanks Garkin
    local textWidth, textHeight = Fyr_MM_Position:GetTextDimensions() or 100, 20
    Fyr_MM_Position_Background:SetDimensions(textWidth + 10, textHeight + 3)
    Fyr_MM_Player_incombat:SetHidden(not (FyrMM.SV.InCombatState and IsUnitActivelyEngaged("player")))

end

local function SpeedMeasure()
    local PositionLog3D = PositionLog3D -- cache global table
    FyrMM.WaypointPins()
    local multiplier = FyrMM.GetMapMeasureMultiplier()

    if tableIsEmpty(PositionLog3D) then
        return
    end
    local x13d, y13d, z13d, t1, x12d, y12d = unpack(PositionLog3D[1], 2, 7)
    local x23d, y23d, z23d, t2, x22d, y22d
    local d3d, d2d, v13d, va3d = 0, 0, 0, 0
    local size = FyrMM.MapSizes[CurrentMap.MapId] or FyrMM.currentMap.TrueMapSize

    if IsPlayerMoving() then
        local i = 2
        local PositionLogCounter = PositionLogCounter -- cache global variable
        while i <= PositionLogCounter do
            x23d, y23d, z23d, t2, x22d, y22d = unpack(PositionLog3D[i], 2, 7)
            d3d = math.sqrt((x23d - x13d) ^ 2 + (y23d - y13d) ^ 2 + (z23d - z13d) ^ 2)
            v13d = 0.1487 * d3d / math.abs((t2 - t1) / 1000)
            x13d, y13d, z13d, t1, x12d, y12d = x23d, y23d, z23d, t2, x22d, y22d
            va3d = va3d + v13d
            i = i + 1
        end

        if PositionLogCounter == 0 then
            return
        end

        local nsize = 0.0143 * math.sqrt((x23d - x13d) ^ 2 + (y23d - y13d) ^ 2) /
                          math.sqrt((x22d - x12d) ^ 2 + (y22d - y12d) ^ 2)
        if nsize and size and nsize ~= math.huge and size < nsize then
            FyrMM.currentMap.TrueMapSize = nsize
        end
        va3d = va3d / (PositionLogCounter - 1) * multiplier
    end

    local MovementSpeedPrevious = FyrMM.MovementSpeedPrevious -- cache global variable
    if MovementSpeedPrevious ~= nil then
        FyrMM.MovementSpeed = (va3d + MovementSpeedPrevious) / 2
    else
        FyrMM.MovementSpeed = va3d
    end

    if MovementSpeedPrevious ~= FyrMM.MovementSpeed then
        CALLBACK_MANAGER:FireCallbacks("MovementSpeedChanged", va3d)
        FyrMM.MovementSpeedPrevious = FyrMM.MovementSpeed
    end

    if va3d > FyrMM.MovementSpeedMax then
        FyrMM.MovementSpeedMax = va3d
    end

    if FyrMM.SV.ShowSpeed then
        SetSpeedLabel(va3d)
    end
end

function FyrMM.PositionUpdate()
    if not FyrMM.Visible or Fyr_MM:IsHidden() or FyrMM.worldMapShowing or not FyrMM.Initialized or
        not Fyr_MM_Scroll_Map_0 or not CurrentMap.Dx then
        return
    end

    if FyrMM.GetMapId() ~= CurrentMap.MapId and not FyrMM.CheckingZone then
        FyrMM.ZoneCheck()
    end

    local a = GetGameTimeMilliseconds()
    local x = CurrentMap.PlayerNX
    local y = CurrentMap.PlayerNY
    local pheading = CurrentMap.PlayerHeading
    if x == nil or pheading == nil then
        x, y, pheading = GetMapPlayerPosition("player")
    end

    local moved = CurrentMap.PlayerMoved
    CurrentMap.CameraHeading = CurrentMap.CameraHeading or GetPlayerCameraHeading()

    local cpheading = FyrMM.SV.RotateMap and math.abs(pheading - pi * 2) + CurrentMap.CameraHeading or
                          CurrentMap.CameraHeading
    Fyr_MM_Camera:SetTextureRotation(cpheading)

    local hpos = (x * (Fyr_MM_Scroll_Map_0:GetWidth() * CurrentMap.Dx)) - (Fyr_MM_Scroll:GetWidth() / 2)
    local vpos = (y * (Fyr_MM_Scroll_Map_0:GetHeight() * CurrentMap.Dx)) - (Fyr_MM_Scroll:GetHeight() / 2)

    local heading = pheading
    if FyrMM.SV.PPStyle ~= GetString(SI_MM_STRING_PLAYERANDCAMERA) then
        if FyrMM.SV.Heading == "CAMERA" then
            heading = CurrentMap.CameraHeading
        end
        if not moved and FyrMM.SV.Heading == "MIXED" then
            heading = CurrentMap.CameraHeading
        end
    end

    if moved and FyrMM.SV.ViewRangeFiltering then
        UpdateCustomPinPositions()
    end

    if ((x < 1.2 and x > -0.2) and (y < 1.2 and y > -0.2)) then -- Can't let the scroll go too far outside view (Black map issue)
        if not Fyr_MM:IsHidden() and moved then
            FyrMM.SetMapToPlayerLocation()
        end
        CurrentMap.hpos = hpos
        CurrentMap.vpos = vpos

        if FyrMM.SV.RotateMap then
            Fyr_MM_Scroll:SetHorizontalScroll(0)
            Fyr_MM_Scroll:SetVerticalScroll(0)
        else
            Fyr_MM_Scroll:SetHorizontalScroll(hpos)
            Fyr_MM_Scroll:SetVerticalScroll(vpos)
        end

        if FyrMM.SV.WheelMap then
            FyrMM.WheelScroll(CurrentMap.hpos, CurrentMap.vpos)
        end
    else
        CurrentMap.hpos = hpos
        CurrentMap.vpos = vpos

        if FyrMM.SV.RotateMap then
            Fyr_MM_Scroll:SetHorizontalScroll(0)
            Fyr_MM_Scroll:SetVerticalScroll(0)
        else
            Fyr_MM_Scroll:SetHorizontalScroll(CurrentMap.hpos)
            Fyr_MM_Scroll:SetVerticalScroll(CurrentMap.vpos)
        end

        if FyrMM.SV.WheelMap then
            FyrMM.WheelScroll(CurrentMap.hpos, CurrentMap.vpos)
        end
    end

    FyrMM.UpdateMapTiles(moved) -- can cause tiles not updating but should be fixed by now
    CurrentMap.needRescale = true -- REMOVING THIS CAUSES OCCASIONAL PINS DEPHASING ON ROTATING MAPS

    if FyrMM.SV.RotateMap then
        Fyr_MM_Player:SetTextureRotation(0)
        FyrMM.AxisPins()
    else
        Fyr_MM_Player:SetTextureRotation(heading)
    end

    a = GetGameTimeMilliseconds() - a
    if FyrMM.DebugMode and a > 0 then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug", "FyrMM.PositionUpdate " .. tostring(a))
    end
end

-------------------------------------------------------------
-- Map Building
-------------------------------------------------------------
-- get map info for minimap
function FyrMM.UpdateMapInfo(IgnoreZone)
    local t = GetGameTimeMilliseconds()
    CurrentMap.ready = false
    CurrentMap.name = GetMapName()
    CurrentMap.tileTexture = string.lower(GetMapTileTexture())
    CurrentMap.Dx, CurrentMap.Dy = GetMapNumTiles()
    local filename, nameNoNum, path = GetCurrentMapTextureFileInfo()
    CurrentMap.filename = string.lower(filename)
    CurrentMap.nameNoNum = nameNoNum
    CurrentMap.path = path
    CurrentMap.TextureAngle = 0
    local id = FyrMM.GetMapId()

    if string.lower(CurrentMap.filename) == "tamriel_0" then
        CurrentMap.ready = true
        zo_callLater(FyrMM.UpdateMapInfo, 5)
        return
    end

    if CurrentMap.Dx < 2 or CurrentMap.Dy < 2 or CurrentMap.Dx == nil or CurrentMap.Dy == nil then
        if id ~= 0 then
            CurrentMap.Dx, CurrentMap.Dy = GetMapNumTilesForMapId(id)
        else
            CurrentMap.Dx = 3
            CurrentMap.Dy = 3
        end
    end
    CurrentMap.type = GetMapType()
    if not IgnoreZone then
        CurrentMap.ZoneIndex = GetCurrentMapZoneIndex()
    end
    -- if we have no texture we have nothing further to do
    if CurrentMap.tileTexture == "" or CurrentMap.Dx == nil or CurrentMap.Dy == nil then
        FyrMM.noMap = true
        return
    else
        FyrMM.noMap = false
    end

    CurrentMap.numTiles = CurrentMap.Dx * CurrentMap.Dy
    CurrentMap.TrueMapSize = 1
    if id ~= 0 and FyrMM.MapSizes[id] then
        CurrentMap.TrueMapSize = FyrMM.MapSizes[id]
        if FyrMM.SV.MapSizes then
            if FyrMM.SV.MapSizes[CurrentMap.filename] and CurrentMap.TrueMapSize > 1 then
                FyrMM.SV.MapSizes[CurrentMap.filename] = nil
            end
        end
    end

    -- store tile textures in table
    CurrentMap.tiles = {}
    for i = 1, CurrentMap.numTiles do
        table.insert(CurrentMap.tiles, string.lower(GetMapTileTexture(i)))
    end

    if not CurrentMap.filename or CurrentMap.filename == "" then
        local filename, _, _ = GetCurrentMapTextureFileInfo()
        CurrentMap.filename = string.lower(filename)
    end

    if FyrMM.SV.ZoomTable[CurrentMap.filename] == nil then
        FyrMM.SV.ZoomTable[CurrentMap.filename] = FYRMM_DEFAULT_ZOOM_LEVEL
        CurrentMap.ZoomLevel = FYRMM_DEFAULT_ZOOM_LEVEL
    else
        CurrentMap.ZoomLevel = FyrMM.SV.ZoomTable[CurrentMap.filename]
    end

    if FyrMM.SV.autoResizePin and CurrentMap.MapId ~= 16 and CurrentMap.MapId ~= 660 and GetMapContentType() ~=
        MAP_CONTENT_BATTLEGROUND then
        -- zoom: 1 to 50 default: 10
        FyrMM.pinZoomScale = (CurrentMap.ZoomLevel) / 10
    else
        FyrMM.pinZoomScale = 1
    end

    if id ~= 0 then
        CurrentMap.MapId = id
        if CurrentMap.TrueMapSize == 1 then
            if FyrMM.SV.MapSizes[CurrentMap.filename] then
                CurrentMap.TrueMapSize = FyrMM.SV.MapSizes[CurrentMap.filename]
            end
        end

    else

        CurrentMap.MapId = 0 -- "unknown"
        if FyrMM.SV.MapSizes == nil then
            FyrMM.SV.MapSizes = {}
            FyrMM.SV.MapSizes[CurrentMap.filename] = 1
            CurrentMap.TrueMapSize = 1
        else
            if FyrMM.SV.MapSizes[CurrentMap.filename] ~= nil then
                CurrentMap.TrueMapSize = FyrMM.SV.MapSizes[CurrentMap.filename]
            end
        end
    end

    CurrentMap.ready = true
    if FyrMM.DebugMode then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug", "FyrMM.UpdateMapInfo " .. tostring(GetGameTimeMilliseconds() - t))
    end
    CALLBACK_MANAGER:FireCallbacks("OnFyrMiniMapChanged")
end

-- gets tile scale for map
function FyrMM.GetTileDimensions()
    local texW, texH = Fyr_MM_Scroll_Map_0:GetTextureFileDimensions()
    local id = FyrMM.GetMapId()
    if (texW < 256 or texH < 256) or (texW > 1024 or texH > 1024) or texW == nil or texH == nil then
        if CurrentMap.filename ~= nil then
            if mr then
                texW = mr[1]
                texH = texW
            else -- unknown Map
                texW = 256
                texH = 256
            end
        else -- unknown Map
            texW = 256
            texH = 256
        end
    end
    local dx, dy = GetMapNumTilesForMapId(id)
    local zoomlevel = CurrentMap.ZoomLevel
    if zoomlevel == nil then
        zoomlevel = FYRMM_DEFAULT_ZOOM_LEVEL
    end
    local tileX = math.floor(zo_round(((CurrentMap.ZoomLevel / 10) * texW * dx) / dx) / 2) * 2
    local tileY = math.floor(zo_round(((CurrentMap.ZoomLevel / 10) * texW * dy) / dy) / 2) * 2
    return tileX, tileY
end

local Tiles = false
function FyrMM.UpdateMapTiles(stealth)
    local needRescale = false
    if not stealth and ((not FyrMM.Visible or Fyr_MM:IsHidden()) and not FyrMM.Initialized) then
        return
    end
    if not CurrentMap.ready then
        return
    end
    if string.lower(CurrentMap.filename) == "tamriel_0" then
        return
    end

    local MM_TileSizeW, MM_TileSizeH = FyrMM.GetTileDimensions()
    if Fyr_MM_Scroll_Map_0:GetTextureFileName():lower() == CurrentMap.tiles[1]:lower() and
        zo_round(Fyr_MM_Scroll_Map_0:GetWidth()) == zo_round(MM_TileSizeW) and zo_round(Fyr_MM_Scroll_Map_0:GetHeight()) ==
        zo_round(MM_TileSizeH) then
        if stealth == GetFrameTimeMilliseconds() then
            return
        end
    else
        if zo_round(Fyr_MM_Scroll_Map_0:GetWidth()) ~= zo_round(MM_TileSizeW) or
            zo_round(Fyr_MM_Scroll_Map_0:GetHeight()) ~= zo_round(MM_TileSizeH) then
            CurrentMap.needRescale = true
        end
    end -- nothing to update if same map

    if Tiles then
        return
    end
    Tiles = true
    if FyrMM.DebugMode then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug", "FyrMM.UpdateMapTiles " .. tostring(stealth))
    end
    local sa, sb, centerSize
    local i = 0

    local MM_TileSizeW, MM_TileSizeH = FyrMM.GetTileDimensions()
    local mWidth, mHeight = MM_TileSizeW * CurrentMap.Dx, MM_TileSizeH * CurrentMap.Dy
    Fyr_MM_Scroll_Map:SetDimensions(mWidth, mHeight)
    Fyr_MM_Scroll_Map:SetDrawLayer(0) -- 1

    if not FyrMM.SV.WheelMap then
        Fyr_MM_Bg:SetColor(0, 0, 0, 1)
        Fyr_MM_Scroll_WheelNS:SetHidden(true)
        Fyr_MM_Scroll_WheelCenter:SetHidden(true)
        Fyr_MM_Scroll_WheelWE:SetHidden(true)
    else
        Fyr_MM_Bg:SetColor(1, 1, 1, 0)
        Fyr_MM_Border:SetHidden(true)
        sa = Fyr_MM:GetWidth() - ((50 / 512) * Fyr_MM:GetWidth())
        sb = (220 / 512) * Fyr_MM:GetWidth()
        Fyr_MM_Scroll_WheelWE:SetDimensions(sa, sb)
        Fyr_MM_Scroll_WheelNS:SetDimensions(sb, sa)
        Fyr_MM_Frame_Control:SetDimensions(Fyr_MM:GetWidth(), Fyr_MM:GetWidth())
        Fyr_MM_Frame_Wheel:SetDimensions(Fyr_MM:GetWidth() + 8, Fyr_MM:GetWidth() + 8)

        if FyrMM.SV.RotateMap and CurrentMap.Heading then
            Fyr_MM_Frame_Wheel:SetTextureCoordsRotation(CurrentMap.Heading)
        end

        centerSize = math.sqrt(2 * Fyr_MM:GetWidth() * Fyr_MM:GetWidth()) / 2
        Fyr_MM_Scroll_WheelCenter:SetDimensions(centerSize, centerSize)

        if not CurrentMap.PlayerX or not CurrentMap.PlayerY or not CurrentMap.Heading then
            local x, y, pheading = GetMapPlayerPosition("player")
            CurrentMap.PlayerNX = x
            CurrentMap.PlayerNY = y
            CurrentMap.PlayerX, CurrentMap.PlayerY = Fyr_MM_Scroll_Map:GetDimensions()
            CurrentMap.PlayerX = CurrentMap.PlayerX * x
            CurrentMap.PlayerY = CurrentMap.PlayerY * y
            CurrentMap.Heading = smoothHeadingRotation()
        end

    end
    local tilec, tilens, tilewe
    local tileposX, tileposY, x, y
    for a = 1, CurrentMap.Dy do
        for b = 1, CurrentMap.Dx do
            i = i + 1
            local tileControl = GetControl("Fyr_MM_Scroll_Map_" .. tostring(i - 1))
            if tileControl == nil then
                tileControl = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_" .. tostring(i - 1), Fyr_MM_Scroll_Map,
                    CT_TEXTURE)
            end
            local tilens = GetControl("Fyr_MM_Scroll_WNS_Map_" .. tostring(i - 1)) -- top & bottom
            if tilens == nil then
                tilens = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_WNS_Map_" .. tostring(i - 1),
                    Fyr_MM_Scroll_WheelNS, CT_TEXTURE)
            end
            local tilec = GetControl("Fyr_MM_Scroll_CW_Map_" .. tostring(i - 1)) -- corners
            if tilec == nil then
                tilec = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_CW_Map_" .. tostring(i - 1),
                    Fyr_MM_Scroll_WheelCenter, CT_TEXTURE)
            end
            local tilewe = GetControl("Fyr_MM_Scroll_WWE_Map_" .. tostring(i - 1)) -- left and right
            if tilewe == nil then
                tilewe = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_WWE_Map_" .. tostring(i - 1),
                    Fyr_MM_Scroll_WheelWE, CT_TEXTURE)
            end
            tileControl:SetHidden(FyrMM.SV.WheelMap)
            tilens:SetHidden(not FyrMM.SV.WheelMap)
            tilec:SetHidden(not FyrMM.SV.WheelMap)
            tilewe:SetHidden(not FyrMM.SV.WheelMap)
            if tileControl:GetTextureFileName():lower() ~= CurrentMap.tiles[i]:lower() then
                tileControl:SetTexture(CurrentMap.tiles[i])
                tilens:SetTexture(CurrentMap.tiles[i])
                tilec:SetTexture(CurrentMap.tiles[i])
                tilewe:SetTexture(CurrentMap.tiles[i])
            end
            tileControl:SetDimensions(FyrMM.GetTileDimensions())
            tilens:SetDimensions(FyrMM.GetTileDimensions())
            tilec:SetDimensions(FyrMM.GetTileDimensions())
            tilewe:SetDimensions(FyrMM.GetTileDimensions())
            tileControl:SetDrawLayer(0)
            tilens:SetDrawLayer(0)
            tilec:SetDrawLayer(0)
            tilewe:SetDrawLayer(0)
            tilens:ClearAnchors()
            tilec:ClearAnchors()
            tilewe:ClearAnchors()
            tileControl:ClearAnchors()
            if FyrMM.SV.RotateMap then
                if not CurrentMap.PlayerX or not CurrentMap.PlayerY or not CurrentMap.Heading then
                    local x, y, pheading = GetMapPlayerPosition("player")
                    CurrentMap.PlayerNX = x
                    CurrentMap.PlayerNY = y
                    CurrentMap.PlayerX, CurrentMap.PlayerY = Fyr_MM_Scroll_Map:GetDimensions()
                    CurrentMap.PlayerX = CurrentMap.PlayerX * x
                    CurrentMap.PlayerY = CurrentMap.PlayerY * y
                    CurrentMap.Heading = smoothHeadingRotation()
                end
                x = ((b - 0.5) * mWidth / CurrentMap.Dx) - CurrentMap.PlayerX
                y = ((a - 0.5) * mHeight / CurrentMap.Dy) - CurrentMap.PlayerY
                tileposX = (math.cos(-CurrentMap.Heading) * x) - (math.sin(-CurrentMap.Heading) * y)
                tileposY = (math.sin(-CurrentMap.Heading) * x) + (math.cos(-CurrentMap.Heading) * y)
                tileControl:SetTextureRotation(CurrentMap.Heading, 0.5, 0.5);
                tilens:SetTextureRotation(CurrentMap.Heading, 0.5, 0.5);
                tilec:SetTextureRotation(CurrentMap.Heading, 0.5, 0.5);
                tilewe:SetTextureRotation(CurrentMap.Heading, 0.5, 0.5);
                if FyrMM.SV.MapAlpha > 80 then
                    tilens:SetScale(1.0055)
                    tilec:SetScale(1.0055)
                    tilewe:SetScale(1.0055)
                    tileControl:SetScale(1.0055)
                else
                    tilens:SetScale(1)
                    tilec:SetScale(1)
                    tilewe:SetScale(1)
                    tileControl:SetScale(1)
                end
                tileControl:SetAnchor(CENTER, Fyr_MM_Scroll, CENTER, tileposX, tileposY)
                tilens:SetAnchor(CENTER, Fyr_MM_Scroll_WheelNS, CENTER, tileposX, tileposY)
                tilec:SetAnchor(CENTER, Fyr_MM_Scroll_WheelCenter, CENTER, tileposX, tileposY)
                tilewe:SetAnchor(CENTER, Fyr_MM_Scroll_WheelWE, CENTER, tileposX, tileposY)
            else
                tileposX = ((b - 0.5) * mWidth / CurrentMap.Dx) - mWidth / 2
                tileposY = ((a - 0.5) * mHeight / CurrentMap.Dy) - mHeight / 2
                tileControl:SetScale(1)
                tilens:SetScale(1)
                tilec:SetScale(1)
                tilewe:SetScale(1)
                tileControl:SetTextureRotation(0)
                tilens:SetTextureRotation(0)
                tilec:SetTextureRotation(0)
                tilewe:SetTextureRotation(0)
                tileControl:SetAnchor(CENTER, Fyr_MM_Scroll_Map, CENTER, tileposX, tileposY)
                tilens:SetAnchor(CENTER, Fyr_MM_Scroll_Map, CENTER, tileposX, tileposY)
                tilec:SetAnchor(CENTER, Fyr_MM_Scroll_Map, CENTER, tileposX, tileposY)
                tilewe:SetAnchor(CENTER, Fyr_MM_Scroll_Map, CENTER, tileposX, tileposY)
                tileControl:SetAnchor(CENTER, Fyr_MM_Scroll_Map, CENTER, tileposX, tileposY)
                tilens:SetAnchor(CENTER, Fyr_MM_Scroll_Map, CENTER, tileposX, tileposY)
                tilec:SetAnchor(CENTER, Fyr_MM_Scroll_Map, CENTER, tileposX, tileposY)
                tilewe:SetAnchor(CENTER, Fyr_MM_Scroll_Map, CENTER, tileposX, tileposY)

            end

        end
    end
    for j = i, Fyr_MM_Scroll_Map:GetNumChildren() do
        tileControl = GetControl("Fyr_MM_Scroll_Map_" .. tostring(j))
        tilens = GetControl("Fyr_MM_Scroll_WNS_Map_" .. tostring(j))
        tilec = GetControl("Fyr_MM_Scroll_CW_Map_" .. tostring(j))
        tilewe = GetControl("Fyr_MM_Scroll_WWE_Map_" .. tostring(j))
        if (tileControl) then
            tileControl:ClearAnchors()
            tileControl:SetHidden(true)
        end
        if (tilens) then
            tilens:ClearAnchors()
            tilens:SetHidden(true)
        end
        if (tilec) then
            tilec:ClearAnchors()
            tilec:SetHidden(true)
        end
        if (tilewe) then
            tilewe:ClearAnchors()
            tilewe:SetHidden(true)
        end
    end
    if FyrMM.SV.WheelMap then
        CurrentMap.TextureAngle = CurrentMap.Heading
    else
        CurrentMap.TextureAngle = 0
    end
    Tiles = false
end

function FyrMM.GetScrollObject(control)
    local xl = control:GetLeft()
    local xr = control:GetRight()
    local yt = control:GetTop()
    local yb = control:GetBottom()
    if FyrMM.SV.WheelMap then
        if (xr >= Fyr_MM_Scroll_WheelCenter:GetLeft() + 6 and xl <= Fyr_MM_Scroll_WheelCenter:GetRight() - 10 and yb >=
            Fyr_MM_Scroll_WheelCenter:GetTop() + 6 and yt <= Fyr_MM_Scroll_WheelCenter:GetBottom() - 10) then
            return Fyr_MM_Scroll_WheelCenter
        end
        if (xr >= Fyr_MM_Scroll_WheelNS:GetLeft() + 6 and xl <= Fyr_MM_Scroll_WheelNS:GetRight() - 10 and yb >=
            Fyr_MM_Scroll_WheelNS:GetTop() + 6 and yt <= Fyr_MM_Scroll_WheelNS:GetBottom() - 10) then
            return Fyr_MM_Scroll_WheelNS
        end
        if (xr >= Fyr_MM_Scroll_WheelWE:GetLeft() + 6 and xl <= Fyr_MM_Scroll_WheelWE:GetRight() - 10 and yb >=
            Fyr_MM_Scroll_WheelWE:GetTop() + 6 and yt <= Fyr_MM_Scroll_WheelWE:GetBottom() - 10) then
            return Fyr_MM_Scroll_WheelWE
        end
    else
        return Fyr_MM_Scroll_Map
    end
    return Fyr_MM_Scroll_WheelCenter
end

-----------------------------------------------------------------
-- Map Pins
-----------------------------------------------------------------
local function GetPinTexture(pinType, control)
    if type(ZO_MapPin.PIN_DATA[pinType].texture) == 'string' then
        return ZO_MapPin.PIN_DATA[pinType].texture
    elseif type(ZO_MapPin.PIN_DATA[pinType].texture) == 'function' then
        if (control.m_PinTag.isBreadcrumb) then
            return breadcrumbQuestPinTextures[pinType]
        else
            return questPinTextures[pinType]
        end
        return ZO_MapPin.PIN_DATA[pinType].texture(control)
    end
end

local function GetCustomPin()
    local p
    if tableIsEmpty(FreeCustomPinIndex) then
        LastCustomPinIndex = LastCustomPinIndex + 1
        p = GetControl("Fyr_MM_Scroll_Map_Pins_Pin" .. tostring(LastCustomPinIndex))
        if p == nil then
            p = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_Pins_Pin" .. tostring(LastCustomPinIndex),
                Fyr_MM_Scroll_Map_Pins, CT_TEXTURE)
            p:SetHandler("OnMouseEnter", PinOnMouseEnter)
            p:SetHandler("OnMouseExit", PinOnMouseExit)
        end
        p.Index = LastCustomPinIndex
        return p
    else
        for i, n in pairs(FreeCustomPinIndex) do
            p = GetControl("Fyr_MM_Scroll_Map_Pins_Pin" .. tostring(n))
            if p == nil then
                p = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_Pins_Pin" .. tostring(n), Fyr_MM_Scroll_Map_Pins,
                    CT_TEXTURE)
                p:SetHandler("OnMouseEnter", PinOnMouseEnter)
                p:SetHandler("OnMouseExit", PinOnMouseExit)
            end
            p.Index = n
            FreeCustomPinIndex[i] = nil
            return p
        end
    end
end

local function ClearCustomPinReminder() -- never called
    if CustomPinsCopying then
        return
    end
    for i = FyrMM.CustomPinCount + 1, Fyr_MM_Scroll_Map_Pins:GetNumChildren() do
        local l = GetControl("Fyr_MM_Scroll_Map_Pins_Pin" .. tostring(i))
        if l ~= nil then
            if l.BorderPin ~= nil then
                RemoveBorderPin(l.BorderPin)
            end
            l:ClearAnchors()
            l:SetHidden(true)
            l.nX = nil
            l.nY = nil
            l.IsTreasure = nil
            l.IsAvailableQuest = nil
            l.pinTexture = nil
        end
    end
end

local ci = 0
function InsertCustomPin(p, key)
    if p == nil or FyrMM.Reloading then
        return
    end
    if p.m_PinType == nil then
        return
    end
    if ZOpinData == nil then
        return
    end
    if ZOpinData[p.m_PinType] == nil then
        return
    end
    local j = 1
    -- local mapId = CurrentMap.MapId
    local pin, texture, pScalePercent
    pScalePercent = FyrMM.pScalePercent
    if pScalePercent == nil then
        pScalePercent = 1
    end

    local enabled
    if type(p) == "table" then

        if p.IsMapPing then
            -- d("!!!!!!!")
        end

        enabled = true
        if PinRef ~= nil then
            if PRCustomPins ~= nil and p.m_PinType >= MAP_PIN_TYPE_INVALID then
                enabled = PRCustomPins[p.m_PinType].enabled
            end
        else
            if p.m_PinType >= MAP_PIN_TYPE_INVALID then
                enabled = ZO_WorldMap_IsCustomPinEnabled(p.m_PinType) -- checks filter for custom pin
            end
        end

        if CustomPinIndex[p.m_PinType] == nil then
            CustomPinIndex[p.m_PinType] = {}
        end

        if CustomPinKeyIndex[p.m_PinType] == nil then
            CustomPinKeyIndex[p.m_PinType] = {}
        end

        if FyrMM.CustomPinList[p.m_PinType] == nil then
            FyrMM.CustomPinList[p.m_PinType] = {}
        end

        if enabled then
            pin = GetCustomPin()
            if pin.mpin == nil then
                pin.mpin = ZO_MapPin:New(ZO_WorldMapContainer)
            end

            if FyrMM.CustomPinList[p.m_PinType][key] ~= nil then
                FyrMM.CustomPinList[p.m_PinType][key].pin = pin
            end
            j = pin.Index

            if key ~= nil then
                CustomPinKeyIndex[p.m_PinType][key] = j
            end

            FyrMM.CustomPinCount = FyrMM.CustomPinCount + 1
            CustomPinIndex[p.m_PinType][j] = pin
            pin:SetHidden(true) -- updating...
            if pin.BorderPin ~= nil then
                RemoveBorderPin(pin.BorderPin)
            end
            texture = ""
            pin.m_PinType = p.m_PinType
            pin.m_PinTag = p.m_PinTag
            pin.mpin.m_PinType = p.m_PinType
            pin.mpin.m_PinTag = p.m_PinTag
            pin.mpin.normalizedX = p.normalizedX
            pin.mpin.normalizedY = p.normalizedY
            pin.nX = p.normalizedX
            pin.nY = p.normalizedY
            pin.radius = p.radius
            pin.MapId = CurrentMap.MapId
            pin.Index = j
            pin.Key = key
            pin.tint = p.tint
            CustomPinCrossReference[pin.mpin] = pin
            -- pin.GetPinTypeAndTag = function(self) return self.m_PinType, self.m_PinTag end

            if FyrMM.SV.autoResizePin and CurrentMap.MapId ~= 16 and CurrentMap.MapId ~= 660 and GetMapContentType() ~=
                MAP_CONTENT_BATTLEGROUND then
                -- zoom: 1 to 50 default: 10
                FyrMM.pinZoomScale = (CurrentMap.ZoomLevel) / 10
            else
                FyrMM.pinZoomScale = 1
            end

            if not ZO_MapPin.FAST_TRAVEL_WAYSHRINE_PIN_TYPES[pin.m_PinType] and
                not ZO_MapPin.POI_PIN_TYPES[pin.m_PinType] and not pin.m_PinType == MAP_PIN_TYPE_LOCATION then
                pin.noZoomResize = true
            end

            if ZOpinData[p.m_PinType].size ~= nil then
                FyrMM.SetPinSize(pin, ZOpinData[p.m_PinType].size * pScalePercent * FyrMM.pinZoomScale)
            end

            if type(ZOpinData[p.m_PinType].texture) == 'string' then
                texture = ZOpinData[p.m_PinType].texture
            elseif type(ZOpinData[p.m_PinType].texture) == 'function' then
                texture = ZOpinData[p.m_PinType].texture(pin.mpin)
            end

            if p.m_PinType == MAP_PIN_TYPE_PLAYER_WAYPOINT then
                texture = "EsoUI/Art/MapPins/UI_Worldmap_pin_customDestination.dds"
                FyrMM.IsWaypoint = true
                FyrMM.SetPinSize(pin, ZOpinData[p.m_PinType].minSize * pScalePercent)
                if FyrMM.Waypoint ~= nil then
                    if FyrMM.Waypoint.BorderPin ~= nil then
                        RemoveBorderPin(FyrMM.Waypoint.BorderPin)
                    end
                end
                FyrMM.Waypoint = pin
            end

            if p.m_PinType == MAP_PIN_TYPE_RALLY_POINT then
                texture = "MiniMap/Textures/rally.dds"
                FyrMM.SetPinSize(pin, (ZOpinData[MAP_PIN_TYPE_RALLY_POINT].minSize / 3) * pScalePercent)
                FyrMM.IsRally = true
                if FyrMM.Rally ~= nil then
                    if FyrMM.Rally.BorderPin ~= nil then
                        RemoveBorderPin(FyrMM.Rally.BorderPin)
                    end
                end
                FyrMM.Rally = pin
            end

            if p.m_PinType == MAP_PIN_TYPE_PING then
                texture = "MiniMap/Textures/ping.dds"
                FyrMM.SetPinSize(pin, ZOpinData[p.m_PinType].minSize * pScalePercent)
                FyrMM.IsPing = true
                if FyrMM.Ping ~= nil then
                    if FyrMM.Ping.BorderPin ~= nil then
                        RemoveBorderPin(FyrMM.Ping.BorderPin)
                    end
                end
                FyrMM.Ping = pin
            end

            pin.pinTexture = texture
            pin:SetTexture(texture)

            if (string.find(texture, "LibTreasure") or string.find(texture, "MapPins/Treasure_")) then
                pin.IsTreasure = true
                -- pin.MapId = p.m_PinTag.mapId -- was a bad idea
                pin.noZoomResize = true
                table.insert(Treasures, pin)
            end

            if string.find(texture, "dragonNextLocation") then
                pin.IsDragonNextLocation = true
                table.insert(DragonNextLocation, pin)
            end

            pin:SetColor(1, 1, 1, 1)

            if ZOpinData[p.m_PinType].tint ~= nil then -- compatibility with addons which modify pin colors by type
                if type(ZOpinData[p.m_PinType].tint) ~= "function" then
                    pin:SetColor(ZOpinData[p.m_PinType].tint:UnpackRGBA())
                else
                    local c = ZOpinData[p.m_PinType].tint(pin.mpin)
                    if type(c) == "table" then
                        pin:SetColor(c.r, c.g, c.b, c.a)
                    end
                end
            end

            if p.tint then -- compatibility with addons which modify pin colors by pin
                if type(p.tint) ~= "function" then
                    pin:SetColor(p.tint:UnpackRGBA())
                else
                    if type(p.tint) == "table" then
                        pin:SetColor(p.tint.r, p.tint.g, p.tint.b, p.tint.a)
                    end
                end
            end

            if type(p.m_PinTag) == "table" then -- suggested
                if p.m_PinTag.IsAvailableQuest or p.m_PinTag.isZoneStory or ZO_MapPin.SUGGESTION_PIN_TYPES[p.m_PinType] then
                    pin.m_PinTag.IsAvailableQuest = true
                    pin.IsAvailableQuest = true
                    if ZO_MapPin.SUGGESTION_PIN_TYPES[p.m_PinType] and
                        not IsZoneStoryComplete(GetZoneId(GetUnitZoneIndex("player"))) then
                        pin.m_PinTag.isZoneStory = true
                        local _, _, activityId = GetTrackedZoneStoryActivityInfo()
                        pin.m_PinTag.activityId = activityId
                        FyrMM.ZoneStoryPin = pin
                    end
                    table.insert(FyrMM.AvailableQuestGivers, pin)

                    if p.radius and p.radius > 0 and p.m_PinType then
                        local properType, pinTexture, size = FyrMM.GetQuestPinInfo(p.m_PinType, false, false, p.radius)
                        local areaPin = pin
                        areaPin:SetTexture(pinTexture)
                        areaPin:SetDimensions(size, size)
                        local color = ZO_MAP_PIN_NORMAL_COLOR
                        areaPin:SetColor(color:UnpackRGBA())
                        if FyrMM.SV.WheelMap then
                            areaPin:SetParent(Fyr_MM_Scroll_CW_Map_Pins)
                            FyrMM.CreateSuggestedAreaSidePins(areaPin, p.radius)
                        end
                        table.insert(FyrMM.AvailableQuestGivers, areaPin)
                    end

                end
            end

            FyrMM.SetPinAnchor(pin, pin.nX, pin.nY, Fyr_MM_Scroll_Map_Pins)
            local pinHidden = true
            if FyrMM.SV.WheelMap then
                pin:SetHidden(not Is_PinInsideWheel(pin) and pinHidden)
            else
                pin:SetHidden(not pinHidden)
            end
            pin:SetMouseEnabled(true)
            if (FyrMM.IsWaypoint or FyrMM.IsRally or FyrMM.IsPing) and FyrMM.SV.BorderPinsWaypoint then
                FyrMM.PlaceWaypointBorderPins()
            end
        else
            if pin ~= nil then
                if pin.BorderPin ~= nil then
                    RemoveBorderPin(pin.BorderPin)
                end
                pin:ClearAnchors()
                pin:SetHidden(true)
                pin.nX = nil
                pin.nY = nil
                pin.MapId = nil
                pin.Index = nil
                pin.IsTreasure = nil
                pin.IsAvailableQuest = nil
                pin.pinTexture = nil
                PinsList[pin:GetName()] = nil
            end
        end
    end
end

function FyrMM.CustomPins()
    if FyrMM.Halted then
        return
    end
    if not FyrMM.Visible or Fyr_MM:IsHidden() or FyrMM.worldMapShowing then
        return
    end
    local t = GetGameTimeMilliseconds()
    if not tableIsEmpty(FyrMM.CustomPinList) and not IsCustomPinsLoading() then
        Treasures = {}
        DragonNextLocation = {}
        FyrMM.AvailableQuestGivers = {}
        FyrMM.CustomPinCount = 0
        -- FreeCustomPinIndex = {}
        CustomPinIndex = {}
        -- LastCustomPinIndex = 0

        for t, n in pairs(FyrMM.CustomPinList) do
            if not FyrMM.UpdatingCustomPins[t] then
                for i, v in pairs(n) do

                    if v.pin == nil then
                        InsertCustomPin(v, i)
                    else
                        local p = v.pin
                        local pinType = p.m_PinType
                        local Index = p.Index
                        if pinType then
                            Index = CustomPinKeyIndex[p.m_PinType][i]
                        end -- TEST there was a bug here especially with square maps  02/01/2023
                        local Key = p.Key or i -- TEST there was a bug here especially with square maps  02/01/2023
                        p.Key = Key
                        p.Index = Index

                        if pinType ~= nil then
                            if not FyrMM.UpdatingCustomPins[pinType] then

                                if CustomPinIndex[pinType] == nil then
                                    CustomPinIndex[pinType] = {}
                                end
                                CustomPinIndex[pinType][Index] = p
                                CustomPinKeyIndex[pinType][Key] = Index
                                FyrMM.CustomPinCount = FyrMM.CustomPinCount + 1
                                if type(p.m_PinTag) == "table" then
                                    if p.m_PinTag.IsAvailableQuest or p.m_PinTag.isZoneStory or
                                        ZO_MapPin.SUGGESTION_PIN_TYPES[p.m_PinType] then
                                        p.m_PinTag.IsAvailableQuest = true
                                        p.IsAvailableQuest = true
                                        if p.m_PinTag.isZoneStory and
                                            CanZoneStoryContinueTrackingActivities(GetZoneId(GetCurrentMapZoneIndex())) then
                                            local _, _, activityId = GetTrackedZoneStoryActivityInfo()
                                            if p.m_PinTag.activityId == activityId or p.m_PinTag[3] == activityId then
                                                FyrMM.ZoneStoryPin = p
                                            else
                                                if p == FyrMM.ZoneStoryPin then
                                                    if p.tertiaryPin then
                                                        RemoveCustomPin(p.tertiaryPin)
                                                    end
                                                    if p.secondaryPin then
                                                        RemoveCustomPin(p.secondaryPin)
                                                    end
                                                    if p.primaryPin then
                                                        RemoveCustomPin(p.primaryPin)
                                                    end
                                                    RemoveCustomPin(p)
                                                    FyrMM.ZoneStoryPin = nil
                                                end
                                            end
                                        else
                                            if p == FyrMM.ZoneStoryPin then
                                                if p.tertiaryPin then
                                                    RemoveCustomPin(p.tertiaryPin)
                                                end
                                                if p.secondaryPin then
                                                    RemoveCustomPin(p.secondaryPin)
                                                end
                                                if p.primaryPin then
                                                    RemoveCustomPin(p.primaryPin)
                                                end
                                                RemoveCustomPin(p)
                                                FyrMM.ZoneStoryPin = nil
                                            end
                                        end
                                        table.insert(FyrMM.AvailableQuestGivers, p)
                                    end
                                end

                                if p.pinTexture and
                                    (string.find(p.pinTexture, "LibTreasure") or
                                        string.find(p.pinTexture, "MapPins/Treasure_")) then
                                    table.insert(Treasures, p)
                                end
                                if p.pinTexture and string.find(p.pinTexture, "dragonNextLocation") then
                                    table.insert(DragonNextLocation, p)
                                end
                            end
                        end
                    end
                end
            end
        end
    end
    if FyrMM.DebugMode then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug", "FyrMM.CustomPins " .. tostring(GetGameTimeMilliseconds() - t))
    end
end
------------------------------------------------------------
-- Waypoint/Rally Pins
-----------------------------------------------------------
function FyrMM.WaypointPins()
    local wpx, wpy = GetMapPlayerWaypoint()
    if wpx ~= 0 or wpy ~= 0 then
        local waypointPin
        waypointPin = GetControl("Fyr_MM_Scroll_Map_Pins_PlayerWaypoint")
        if waypointPin == nil then
            waypointPin = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_Pins_PlayerWaypoint", Fyr_MM_Scroll_Map_Pins,
                CT_TEXTURE)
            waypointPin.nDistance = function(self)
                if self.nX == nil then
                    return 1
                end
                return math.sqrt((zo_round(CurrentMap.PlayerNX * 10000) - zo_round(self.nX * 10000)) *
                                     (zo_round(CurrentMap.PlayerNX * 10000) - zo_round(self.nX * 10000)) +
                                     (zo_round(CurrentMap.PlayerNY * 10000) - zo_round(self.nY * 10000)) *
                                     (zo_round(CurrentMap.PlayerNX * 10000) - zo_round(self.nY * 10000))) / 10000
            end
            waypointPin:SetHandler("OnMouseEnter", PinOnMouseEnter)
            waypointPin:SetHandler("OnMouseExit", PinOnMouseExit)
            waypointPin:SetHandler("OnMouseUp", PinOnMouseUp)
        end
        local pin
        local pinSize = ZOpinData[MAP_PIN_TYPE_PLAYER_WAYPOINT].minSize * FyrMM.pScalePercent
        if waypointPin.m_Pin then
            pin = waypointPin.m_Pin
        else
            pin = ZO_Object.New(ZO_MapPin)
        end
        pin.m_PinType = MAP_PIN_TYPE_PLAYER_WAYPOINT
        pin.m_PinTag = "waypoint"
        pin.nX = wpx
        pin.nY = wpy
        waypointPin.m_Pin = pin
        waypointPin.MapId = CurrentMap.MapId
        waypointPin.nX = wpx
        waypointPin.nY = wpy
        waypointPin.m_PinType = MAP_PIN_TYPE_PLAYER_WAYPOINT
        waypointPin:SetDrawLayer(1)
        FyrMM.SetPinSize(waypointPin, pinSize, 0)
        waypointPin:SetTexture("EsoUI/Art/MapPins/UI_WorldMap_pin_customDestination.dds")
        waypointPin:SetHidden(false)
        FyrMM.SetPinAnchor(waypointPin, wpx, wpy, Fyr_MM_Scroll_Map_Pins)
        waypointPin:SetMouseEnabled(true)
        FyrMM.Waypoint = waypointPin
        FyrMM.IsWaypoint = true
        -- FyrMM.CheapAnimation(waypointPin, true)
        -- waypointPin.m_textureAnimTimeline = "yes"
    else
        FyrMM.Waypoint = nil
        FyrMM.IsWaypoint = false
        local waypointPin
        waypointPin = GetControl("Fyr_MM_Scroll_Map_Pins_PlayerWaypoint")
        if waypointPin then
            waypointPin.m_Pin = nil
            waypointPin.MapId = 0
            waypointPin.nX = 0
            waypointPin.nY = 0
            waypointPin.m_PinType = 0
            waypointPin:SetTexture("")
            waypointPin:SetHidden(true)
        end
    end
    wpx, wpy = GetMapRallyPoint()
    if wpx ~= 0 or wpy ~= 0 then
        local RallyPin
        RallyPin = GetControl("Fyr_MM_Scroll_Map_Pins_RallyPoint")
        if RallyPin == nil then
            RallyPin = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_Pins_RallyPoint", Fyr_MM_Scroll_Map_Pins,
                CT_TEXTURE)
            RallyPin.nDistance = function(self)
                if self.nX == nil then
                    return 1
                end
                return math.sqrt((zo_round(CurrentMap.PlayerNX * 10000) - zo_round(self.nX * 10000)) *
                                     (zo_round(CurrentMap.PlayerNX * 10000) - zo_round(self.nX * 10000)) +
                                     (zo_round(CurrentMap.PlayerNY * 10000) - zo_round(self.nY * 10000)) *
                                     (zo_round(CurrentMap.PlayerNX * 10000) - zo_round(self.nY * 10000))) / 10000
            end
            RallyPin:SetHandler("OnMouseEnter", PinOnMouseEnter)
            RallyPin:SetHandler("OnMouseExit", PinOnMouseExit)
            RallyPin:SetHandler("OnMouseUp", PinOnMouseUp)
        end
        local pin
        local pinSize = (ZOpinData[MAP_PIN_TYPE_RALLY_POINT].minSize / 3) * FyrMM.pScalePercent
        if RallyPin.m_Pin then
            pin = RallyPin.m_Pin
        else
            pin = ZO_Object.New(ZO_MapPin)
        end
        pin.m_PinType = MAP_PIN_TYPE_RALLY_POINT
        pin.m_PinTag = "rally"
        pin.nX = wpx
        pin.nY = wpy
        RallyPin.m_Pin = pin
        RallyPin.MapId = CurrentMap.MapId
        RallyPin.nX = wpx
        RallyPin.nY = wpy
        RallyPin.m_PinType = MAP_PIN_TYPE_RALLY_POINT
        RallyPin:SetDrawLayer(1)
        FyrMM.SetPinSize(RallyPin, pinSize, 0)
        RallyPin:SetTexture("MiniMap/Textures/rally.dds")
        RallyPin:SetHidden(false)
        FyrMM.SetPinAnchor(RallyPin, wpx, wpy, Fyr_MM_Scroll_Map_Pins)
        RallyPin:SetMouseEnabled(true)
        FyrMM.Rally = RallyPin
        FyrMM.IsRally = true

    else
        FyrMM.Rally = nil
        FyrMM.IsRally = false
        local RallyPin
        RallyPin = GetControl("Fyr_MM_Scroll_Map_Pins_RallyPoint")
        if RallyPin then
            RallyPin.m_Pin = nil
            RallyPin.MapId = 0
            RallyPin.nX = 0
            RallyPin.nY = 0
            RallyPin.m_PinType = 0
            RallyPin:SetTexture("")
            RallyPin:SetHidden(true)
        end
    end
    wpx, wpy = GetMapPing()
    if wpx ~= 0 or wpy ~= 0 then
        local PingPin
        PingPin = GetControl("Fyr_MM_Scroll_Map_Pins_Ping")
        if PingPin == nil then
            PingPin = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_Pins_Ping", Fyr_MM_Scroll_Map_Pins, CT_TEXTURE)
            PingPin.nDistance = function(self)
                if self.nX == nil then
                    return 1
                end
                return math.sqrt((zo_round(CurrentMap.PlayerNX * 10000) - zo_round(self.nX * 10000)) *
                                     (zo_round(CurrentMap.PlayerNX * 10000) - zo_round(self.nX * 10000)) +
                                     (zo_round(CurrentMap.PlayerNY * 10000) - zo_round(self.nY * 10000)) *
                                     (zo_round(CurrentMap.PlayerNX * 10000) - zo_round(self.nY * 10000))) / 10000
            end
            PingPin:SetHandler("OnMouseEnter", PinOnMouseEnter)
            PingPin:SetHandler("OnMouseExit", PinOnMouseExit)
            PingPin:SetHandler("OnMouseUp", PinOnMouseUp)
        end
        local pin
        local pinSize = ZOpinData[MAP_PIN_TYPE_PING].minSize * FyrMM.pScalePercent
        if PingPin.m_Pin then
            pin = PingPin.m_Pin
        else
            pin = ZO_Object.New(ZO_MapPin)
        end
        pin.m_PinType = MAP_PIN_TYPE_PING
        pin.m_PinTag = "rally"
        pin.nX = wpx
        pin.nY = wpy
        PingPin.m_Pin = pin
        PingPin.MapId = CurrentMap.MapId
        PingPin.nX = wpx
        PingPin.nY = wpy
        PingPin.m_PinType = MAP_PIN_TYPE_PING
        PingPin:SetDrawLayer(1)
        FyrMM.SetPinSize(PingPin, pinSize, 0)
        PingPin:SetTexture("MiniMap/Textures/ping.dds")
        PingPin:SetHidden(false)
        FyrMM.SetPinAnchor(PingPin, wpx, wpy, Fyr_MM_Scroll_Map_Pins)
        PingPin:SetMouseEnabled(true)
        FyrMM.Ping = PingPin
        FyrMM.IsPing = true
    else
        FyrMM.Ping = nil
        FyrMM.IsPing = false
        local PingPin
        PingPin = GetControl("Fyr_MM_Scroll_Map_Pins_Ping")
        if PingPin then
            PingPin.m_Pin = nil
            PingPin.MapId = 0
            PingPin.nX = 0
            PingPin.nY = 0
            PingPin.m_PinType = 0
            PingPin:SetTexture("")
            PingPin:SetHidden(true)
        end
    end

end

------------------------------------------------------------
-- Wayshrine Pins
-----------------------------------------------------------
function FyrMM.UpdateWayshrinePinPositions()
    if not FyrMM.Visible or Fyr_MM:IsHidden() or FyrMM.worldMapShowing then
        return
    end
    local currentZone = CurrentMap.MapId
    for i = 1, FyrMM.currentWayshrineCount do
        local l = GetControl("Fyr_MM_Scroll_Map_WayshrinePins_Pin" .. tostring(i))
        if l ~= nil then
            if l.MapId == currentZone then
                l:SetHidden(not ZO_WorldMap_IsPinGroupShown(MAP_FILTER_WAYSHRINES))
                FyrMM.SetPinAnchor(l, l.nX, l.nY, Fyr_MM_Scroll_Map_WayshrinePins)
            else
                l:SetHidden(true)
                l:ClearAnchors()
            end
        end
    end
end

local function CreateWayshrinePin(pinType, tag, nX, nY, isRealWayshrine)
    local wayshrinePin
    wayshrinePin = GetControl("Fyr_MM_Scroll_Map_WayshrinePins_Pin" .. tostring(FyrMM.currentWayshrineCount))
    if wayshrinePin == nil then
        wayshrinePin = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_WayshrinePins_Pin" ..
                                                        tostring(FyrMM.currentWayshrineCount),
            Fyr_MM_Scroll_Map_WayshrinePins, CT_TEXTURE)

        wayshrinePin.nDistance = function(self)
            if self.nX == nil then
                return 1
            end
            return math.sqrt((zo_round(CurrentMap.PlayerNX * 10000) - zo_round(self.nX * 10000)) *
                                 (zo_round(CurrentMap.PlayerNX * 10000) - zo_round(self.nX * 10000)) +
                                 (zo_round(CurrentMap.PlayerNY * 10000) - zo_round(self.nY * 10000)) *
                                 (zo_round(CurrentMap.PlayerNX * 10000) - zo_round(self.nY * 10000))) / 10000
        end
        wayshrinePin:SetHandler("OnMouseEnter", PinOnMouseEnter)
        wayshrinePin:SetHandler("OnMouseExit", PinOnMouseExit)
        wayshrinePin:SetHandler("OnMouseUp", PinOnMouseUp)
    end
    local pin = ZO_Object.New(ZO_MapPin)
    local pinSize = 40 * FyrMM.pScalePercent * FyrMM.pinZoomScale
    pin.m_PinType = pinType
    pin.m_PinTag = tag
    pin.nX = nX
    pin.nY = nY
    wayshrinePin.m_Pin = pin
    wayshrinePin.MapId = CurrentMap.MapId
    wayshrinePin.nX = nX
    wayshrinePin.nY = nY
    wayshrinePin.m_PinType = pinType
    wayshrinePin:SetDrawLayer(1)
    FyrMM.SetPinSize(wayshrinePin, pinSize, 0)
    wayshrinePin:SetTexture(tag[2])
    wayshrinePin.isRealWayshrine = isRealWayshrine

    local wayshrinePinData = ZOpinData[pinType]
    if wayshrinePinData.tint then -- compatibility with addons which modifies wayshrines colors
        if type(wayshrinePinData.tint) ~= "function" then
            wayshrinePin:SetColor(wayshrinePinData.tint:UnpackRGBA())
        else

            if wayshrinePin.m_Pin ~= nil then
                wayshrinePin:SetColor(wayshrinePinData.tint(wayshrinePin.m_Pin):UnpackRGBA())
            else
                wayshrinePin:SetColor(wayshrinePinData.tint(wayshrinePin):UnpackRGBA())
            end
        end
    else
        wayshrinePin:SetColor(1, 1, 1, 1)
    end

    wayshrinePin:SetHidden(not ZO_WorldMap_IsPinGroupShown(MAP_FILTER_WAYSHRINES))
    FyrMM.SetPinAnchor(wayshrinePin, nX, nY, Fyr_MM_Scroll_Map_WayshrinePins)
    wayshrinePin:SetMouseEnabled(true)
    Wayshrines[FyrMM.currentWayshrineCount] = {
        Closest = false,
        nDistance = 1,
        tag = tag,
        nX = nX,
        nY = nY,
        MapId = CurrentMap.MapId,
        pin = wayshrinePin,
        isRealWayshrine = isRealWayshrine
    }
end

function FyrMM.Wayshrines()
    if FyrMM.Halted or GetNumFastTravelNodes() == 0 then
        return
    end
    if not FyrMM.Visible or Fyr_MM:IsHidden() or FyrMM.worldMapShowing then
        return
    end
    local t = GetGameTimeMilliseconds()
    FyrMM.SetMapToPlayerLocation()
    FyrMM.currentWayshrineCount = 0
    Wayshrines = {}
    if string.lower(CurrentMap.filename) ~= "giantsrun_base_0" then
        for nodeIndex = 1, GetNumFastTravelNodes() do
            local known, name, nX, nY, icon, glowIcon, poiType, isShownInCurrentMap = GetFastTravelNodeInfo(nodeIndex)
            if known or FyrMM.SV.ShowUnexploredPins then
                local isRealWayshrine = false
                if poiType == POI_TYPE_WAYSHRINE and isShownInCurrentMap then
                    isRealWayshrine = true
                end -- and icon and string.find(icon, "wayshrine")
                if not known and poiType ~= POI_TYPE_HOUSE and poiType ~= POI_TYPE_GROUP_DUNGEON then
                    icon = "/esoui/art/icons/poi/poi_wayshrine_incomplete.dds"
                    glowIcon = "/esoui/art/icons/poi/poi_wayshrine_glow.dds"
                end
                if not known and poiType == POI_TYPE_HOUSE then
                    icon = "/esoui/art/icons/poi/poi_group_house_unowned.dds"
                    glowIcon = "/esoui/art/icons/poi/poi_group_house_unowned_glow.dds"
                end
                if not known and poiType == POI_TYPE_GROUP_DUNGEON then
                    icon = "/esoui/art/icons/poi/poi_groupinstance_incomplete.dds"
                    glowIcon = "/esoui/art/icons/poi/poi_groupinstance_incomplete_glow.dds"
                end
                local tag = ZO_MapPin.CreateTravelNetworkPinTag(nodeIndex, icon, glowIcon)
                local pinType = MAP_PIN_TYPE_FAST_TRAVEL_WAYSHRINE
                if nX > 0 and nX < 1.0001 and nY > 0 and nY < 1.0001 and isShownInCurrentMap then
                    FyrMM.currentWayshrineCount = FyrMM.currentWayshrineCount + 1
                    CreateWayshrinePin(pinType, tag, nX, nY, isRealWayshrine)
                end
            end
        end
    end
    if FyrMM.DebugMode then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug",
            "FyrMM.Wayshrines (" .. tostring(GetNumFastTravelNodes()) .. ") " .. tostring(GetGameTimeMilliseconds() - t))
    end
    CleanupWayshrines()
end
------------------------------------------------------------
-- POI Pins
------------------------------------------------------------
function FyrMM.UpdatePOIPinPositions()
    for i = 1, FyrMM.currentPOICount do
        local l = GetControl("Fyr_MM_Scroll_Map_POIPins_Pin" .. tostring(i))
        if l ~= nil then
            if l.MapId == CurrentMap.MapId then
                l:SetHidden(not ZO_WorldMap_IsPinGroupShown(MAP_FILTER_OBJECTIVES))
                FyrMM.SetPinAnchor(l, l.nX, l.nY, Fyr_MM_Scroll_Map_POIPins)
            else
                l:SetHidden(true)
                l:ClearAnchors()
            end
        end
    end
end

local function CreatePOIPin(poiIndex)
    local POIPin
    local nX, nY, iconType, icon = MM_GetPOIMapInfo(CurrentMap.ZoneIndex, poiIndex)

    if CraftingStations ~= nil and icon and zo_strfind(icon, "icons/poi/poi_crafting_") then
        return
    end -- Crafting stations mix-up fix by Garkin
    if not (ZO_MapPin.POI_PIN_TYPES[iconType]) and FyrMM.SV.ShowUnexploredPins then
        icon = "/esoui/art/inventory/newitem_icon.dds"
        iconType = MAP_PIN_TYPE_POI_SEEN
    end
    if nX > 0 and nX < 1.0001 and nY > 0 and nY < 1.0001 and (ZO_MapPin.POI_PIN_TYPES[iconType]) then
        if (not IsPOIWayshrine(CurrentMap.ZoneIndex, poiIndex) or iconType == MAP_PIN_TYPE_POI_SEEN) then
            FyrMM.currentPOICount = FyrMM.currentPOICount + 1
            local tag = ZO_MapPin.CreatePOIPinTag(CurrentMap.ZoneIndex, poiIndex, icon)
            POIPin = GetControl("Fyr_MM_Scroll_Map_POIPins_Pin" .. tostring(FyrMM.currentPOICount))
            if POIPin == nil then
                POIPin = WINDOW_MANAGER:CreateControl(
                    "Fyr_MM_Scroll_Map_POIPins_Pin" .. tostring(FyrMM.currentPOICount), Fyr_MM_Scroll_Map_POIPins,
                    CT_TEXTURE)
                POIPin:SetHandler("OnMouseEnter", PinOnMouseEnter)
                POIPin:SetHandler("OnMouseExit", PinOnMouseExit)
            end
            local pin = ZO_Object.New(ZO_MapPin)
            local pinSize = 40 * FyrMM.pScalePercent * FyrMM.pinZoomScale
            if icon == "/esoui/art/inventory/newitem_icon.dds" then
                pinSize = 32 * FyrMM.pScalePercent * FyrMM.pinZoomScale
                POIPin:SetColor(FyrMM.SV.UndiscoveredPOIPinColor.r, FyrMM.SV.UndiscoveredPOIPinColor.g,
                    FyrMM.SV.UndiscoveredPOIPinColor.b, FyrMM.SV.UndiscoveredPOIPinColor.a)
            else
                POIPin:SetColor(1, 1, 1, 1)
            end
            POIPin.poiIndex = poiIndex
            pin.m_PinType = iconType
            pin.m_PinTag = tag
            POIPin.m_Pin = pin
            POIPin.MapId = CurrentMap.MapId
            POIPin.nX = nX
            POIPin.nY = nY
            POIPin.m_PinType = iconType
            POIPin:SetDrawLayer(1)
            FyrMM.SetPinSize(POIPin, pinSize, 0)
            POIPin:SetTexture(icon)

            local POIPinData = ZOpinData[iconType]
            if POIPinData.tint then -- compatibility with addons which modifies POI colors
                if type(POIPinData.tint) ~= "function" then
                    POIPin:SetColor(POIPinData.tint:UnpackRGBA())
                else

                    if POIPin.m_Pin ~= nil then
                        POIPin:SetColor(POIPinData.tint(POIPin.m_Pin):UnpackRGBA())
                    else
                        POIPin:SetColor(POIPinData.tint(POIPin):UnpackRGBA())
                    end
                end
            else
                POIPin:SetColor(1, 1, 1, 1)
            end

            POIPin:SetHidden(not ZO_WorldMap_IsPinGroupShown(MAP_FILTER_OBJECTIVES))
            FyrMM.SetPinAnchor(POIPin, nX, nY, Fyr_MM_Scroll_Map_POIPins)
            POIPin:SetMouseEnabled(true)
        end
    end
end

function FyrMM.POIPins()
    if FyrMM.Halted or MM_GetNumPOIs(CurrentMap.ZoneIndex) == 0 then
        return
    end
    local t = GetGameTimeMilliseconds()
    FyrMM.currentPOICount = 0
    FyrMM.API_Check()
    FyrMM.SetMapToPlayerLocation()
    if string.lower(CurrentMap.filename) ~= "giantsrun_base_0" then
        for i = 1, MM_GetNumPOIs(CurrentMap.ZoneIndex) do
            if FyrMM.Reloading then
                return
            end
            CreatePOIPin(i)
        end
    end
    if FyrMM.DebugMode then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug",
            "FyrMM.POIPins (" .. tostring(MM_GetNumPOIs(CurrentMap.ZoneIndex)) .. ") " ..
                tostring(GetGameTimeMilliseconds() - t))
    end
    if FyrMM.currentPOICount == 0 and Fyr_MM_Scroll_Map_POIPins:GetNumChildren() == CleanPOIs then
        return
    end
    CleanPOIs = 0
    CleanupPOIs()
    -- EVENT_MANAGER:UnregisterForUpdate("FyrMiniMapPOIPinsD")
end

local function DelayedPOIPins()
    zo_callLater(FyrMM.POIPins, 300) -- WORKAROUND 18/07/2022
    -- EVENT_MANAGER:RegisterForUpdate("FyrMiniMapPOIPinsD", 300,  FyrMM.POIPins)
end
------------------------------------------------------------
-- Location Pins
------------------------------------------------------------

function FyrMM.UpdateLocationPinPositions()
    if FyrMM.DebugMode then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug", "MM_UpdateLocationPinPositions (" ..
            tostring(FyrMM.currentLocationsCount) .. ") ")
    end
    for i = 1, FyrMM.currentLocationsCount do
        local l = GetControl("Fyr_MM_Scroll_Map_LocationPins_Pin" .. tostring(i))
        if l ~= nil then
            if l.MapId == CurrentMap.MapId then
                if FyrMM.SV.ShowUnexploredPins then
                    l:SetHidden(false)
                else
                    if l:IsHidden() then
                        l:SetHidden(not MM_IsMapLocationVisible(i))
                    end
                end
                FyrMM.SetPinAnchor(l, l.nX, l.nY, Fyr_MM_Scroll_Map_LocationPins)
            else
                l:SetHidden(true)
                l:ClearAnchors()
            end
        end
    end
end

local function AddLocation(locationIndex)
    local locationPin, isExperienceBoost
    local ll = GetNumMapLocationTooltipLines(locationIndex)
    if ll >= 1 then
        local c1, c2, c3, cN = GetMapLocationTooltipLineInfo(locationIndex, 1)
        if cN == "Experience Boost" then
            return
        end
    end
    if (MM_IsMapLocationVisible(locationIndex) or FyrMM.SV.ShowUnexploredPins) then
        local icon, x, y = MM_GetMapLocationIcon(locationIndex)
        if icon ~= "" and x > 0 and x < 1.0001 and y > 0 and y < 1.0001 then
            FyrMM.currentLocationsCount = FyrMM.currentLocationsCount + 1
            local tag = ZO_MapPin.CreateLocationPinTag(locationIndex, icon)
            locationPin = GetControl("Fyr_MM_Scroll_Map_LocationPins_Pin" .. tostring(FyrMM.currentLocationsCount))
            if locationPin == nil then
                locationPin = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_LocationPins_Pin" ..
                                                               tostring(FyrMM.currentLocationsCount),
                    Fyr_MM_Scroll_Map_LocationPins, CT_TEXTURE)
                locationPin:SetHandler("OnMouseEnter", PinOnMouseEnter)
                locationPin:SetHandler("OnMouseExit", PinOnMouseExit)
            end

            local pinSize = 36 * FyrMM.pScalePercent * FyrMM.pinZoomScale
            local pin = ZO_Object.New(ZO_MapPin)
            locationPin.locationIndex = locationIndex
            pin.m_PinType = MAP_PIN_TYPE_LOCATION
            pin.m_PinTag = tag
            locationPin.m_Pin = pin
            locationPin.m_PinType = MAP_PIN_TYPE_LOCATION
            locationPin.m_PinTag = tag
            locationPin.MapId = CurrentMap.MapId
            locationPin.nX = x
            locationPin.nY = y
            FyrMM.SetPinSize(locationPin, pinSize, 0)
            locationPin:SetDrawLayer(1)
            locationPin:SetTexture(icon)
            locationPin.IsCraftingServicePin = IsCraftingService(locationPin)
            if tag[2] ~= nil then
                if string.sub(tag[2], -8) == "bank.dds" then
                    locationPin.IsBankPin = true
                else
                    locationPin.IsBankPin = false
                end
                if string.sub(tag[2], -10) == "stable.dds" then
                    locationPin.IsStablePin = true
                else
                    locationPin.IsStablePin = false
                end
            end
            if string.sub(icon, 1, 5) ~= "ZGESO" then -- string.sub(icon, 1, 17) ~= "ZygorGuidesViewer"
                if FyrMM.SV.ShowUnexploredPins then
                    locationPin:SetHidden(false)
                else
                    if locationPin:IsHidden() then
                        locationPin:SetHidden(not MM_IsMapLocationVisible(i))
                    end
                end
            else
                locationPin:SetHidden(false)
                locationPin.isZGESO = true
            end

            local locationPinData = ZOpinData[locationPin.m_PinType]
            if locationPinData.tint then -- compatibility with addons which modifies locations colors
                if type(locationPinData.tint) ~= "function" then
                    locationPin:SetColor(locationPinData.tint:UnpackRGBA())
                else

                    if locationPin.m_Pin ~= nil then
                        locationPin:SetColor(locationPinData.tint(locationPin.m_Pin):UnpackRGBA())
                    else
                        locationPin:SetColor(locationPinData.tint(locationPin):UnpackRGBA())
                    end
                end
            else
                locationPin:SetColor(1, 1, 1, 1)
            end

            FyrMM.SetPinAnchor(locationPin, x, y, Fyr_MM_Scroll_Map_LocationPins)
            locationPin:SetMouseEnabled(true)
        end
    end
end

function FyrMM.LocationPins()
    if FyrMM.Halted or MM_GetNumMapLocations() == 0 then
        return
    end -- delay if still halted
    local t = GetGameTimeMilliseconds()
    FyrMM.currentLocationsCount = 0
    FyrMM.API_Check()
    FyrMM.SetMapToPlayerLocation()
    if string.lower(CurrentMap.filename) ~= "giantsrun_base_0" then
        for i = 1, MM_GetNumMapLocations() do
            if FyrMM.Reloading then
                return
            end
            AddLocation(i)
        end
    end
    if FyrMM.DebugMode then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug",
            "FyrMM.LocationPins (" .. tostring(MM_GetNumMapLocations()) .. ") " ..
                tostring(GetGameTimeMilliseconds() - t))
    end
    CleanupMapLocations()
end

------------------------------------------------------------
-- Event Units (Dragons, Cartoklepts)
------------------------------------------------------------
local function RemoveEventUnitPins()
    local num = Fyr_MM_Scroll_Map_EventUnits:GetNumChildren()
    local i, pin
    for i = 1, num do
        pin = Fyr_MM_Scroll_Map_EventUnits:GetChild(i)
        if pin ~= nil then
            pin:SetHidden(true)
            pin:SetMouseEnabled(false)
            pin:ClearAnchors()
            pin.nX = nil
            pin.nY = nil
            pin.unitTag = nil
            pin.nTag = nil
            pin.context = nil
            pin.m_PinType = nil
            if pin.textureAntl then
                pin.textureAntl:Stop()
                pin.textureAntl = nil
            end
            if pin.OnBorder then
                if pin.BorderPin then
                    if pin.BorderPin.textureAntl then
                        pin.BorderPin.textureAntl:Stop()
                        pin.BorderPin.textureAntl = nil
                    end
                    pin.BorderPin:ClearAnchors()
                    pin.BorderPin:SetHidden()
                    pin.BorderPin.pin = nil
                    pin.BorderPin = nil
                end
                pin.OnBorder = nil
            end
        end
    end
end

local function GetNextWorldEventInstanceIdIter(state, var1)
    return GetNextWorldEventInstanceId(var1)
end

local function AddWorldEvent(worldEventInstanceId)
    if ZO_WorldMap_DoesMapHideWorldEventPins() then
        return
    end

    local context = GetWorldEventLocationContext(worldEventInstanceId)
    if context == WORLD_EVENT_LOCATION_CONTEXT_UNIT then
        local numUnits = GetNumWorldEventInstanceUnits(worldEventInstanceId)
        for i = 1, numUnits do
            local unitTag = GetWorldEventInstanceUnitTag(worldEventInstanceId, i)
            local pinType = GetWorldEventInstanceUnitPinType(worldEventInstanceId, unitTag)
            local zoneIndex, poiIndex = GetWorldEventPOIInfo(worldEventInstanceId)

            local pin
            if pinType ~= MAP_PIN_TYPE_INVALID then
                local xLoc, yLoc, _, isInCurrentMap = GetMapPlayerPosition(unitTag)
                if isInCurrentMap then
                    local tag = ZO_MapPin.CreateWorldEventUnitPinTag(worldEventInstanceId, unitTag)
                    if GetControl("Fyr_MM_Scroll_Map_EventUnits_" .. unitTag) == nil then
                        pin = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_EventUnits_" .. unitTag,
                            Fyr_MM_Scroll_Map_EventUnits, CT_TEXTURE)
                        pin:SetHandler("OnMouseEnter", PinOnMouseEnter)
                        pin:SetHandler("OnMouseExit", PinOnMouseExit)
                    end
                    FyrMM.SetEventPin(pinType, unitTag, tag, context)
                end
            end
        end
    elseif context == WORLD_EVENT_LOCATION_CONTEXT_POINT_OF_INTEREST then
        local zoneIndex, poiIndex = GetWorldEventPOIInfo(worldEventInstanceId)
        local nX, nY, pinType, icon, isOnMap, _, discovered, nearby = MM_GetPOIMapInfo(CurrentMap.ZoneIndex, poiIndex)

        local tag = ZO_MapPin.CreateWorldEventPOIPinTag(worldEventInstanceId, CurrentMap.ZoneIndex, poiIndex)
        local pin

        if pinType ~= MAP_PIN_TYPE_INVALID and isOnMap then

            if GetControl("Fyr_MM_Scroll_Map_EventPOIs_" .. poiIndex) == nil then
                pin = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_EventPOIs_" .. poiIndex,
                    Fyr_MM_Scroll_Map_EventUnits, CT_TEXTURE)
                pin:SetHandler("OnMouseEnter", PinOnMouseEnter)
                pin:SetHandler("OnMouseExit", PinOnMouseExit)
            end
            FyrMM.SetEventPOIPin(pinType, tag, poiIndex, context)
        end

    end
end

function FyrMM.SetEventPin(pinType, tag, ntag, context) -- moving world events (dragons, cartoklepts)
    local pin, nX, nY
    local pdata = ZO_MapPin.PIN_DATA[pinType]
    local isDead = IsUnitDead(tag)
    pin = GetControl("Fyr_MM_Scroll_Map_EventUnits_" .. tag)

    if not (DoesUnitExist(tag) and not AreUnitsEqual("player", tag)) then
        if pin ~= nil then
            pin:SetHidden(true)
            pin:SetMouseEnabled(false)
            pin:ClearAnchors()
            pin.nX = nil
            pin.nY = nil
            pin.unitTag = nil
            pin.nTag = nil
            pin.m_PinType = nil
            pin.context = nil
            if pin.textureAntl then
                pin.textureAntl:Stop()
                pin.textureAntl = nil
            end
            if pin.OnBorder then
                if pin.BorderPin then
                    if pin.BorderPin.textureAntl then
                        pin.BorderPin.textureAntl:Stop()
                        pin.BorderPin.textureAntl = nil
                    end
                    pin.BorderPin:ClearAnchors()
                    pin.BorderPin:SetHidden()
                    pin.BorderPin.pin = nil
                    pin.BorderPin = nil
                end
                pin.OnBorder = nil
            end
        end
        return
    end

    if pin == nil then
        return
    end
    nX, nY = GetMapPlayerPosition(tag)
    pin.m_PinType = pinType
    local distance = CurrentMap.TrueMapSize *
                         math.sqrt(
            (nX - CurrentMap.PlayerNX) * (nX - CurrentMap.PlayerNX) + (nY - CurrentMap.PlayerNY) *
                (nY - CurrentMap.PlayerNY))

    local texturetest = GetWorldEventInstanceUnitPinIcon(ntag[1], tag, false) or "not"

    local texture = "esoui/art/icons/mapkey/mapkey_dragon.dds"

    if string.find(texturetest, "dragon") then -- It's a dragon!
        texture = "esoui/art/icons/mapkey/mapkey_dragon.dds" -- /esoui/art/mappins/dragon_fly.dds
    elseif string.find(texturetest, "cartoklept") then -- it's a cartoklept!
        texture = "esoui/art/compass/compass_cartoklept.dds"
    end

    pin:SetTexture(texture)
    pin.pinTexture = texture

    local pinsize = pdata.size
    if pinsize == nil then
        pinsize = 32
    end

    FyrMM.SetPinSize(pin, pinsize * FyrMM.pScalePercent, 0)
    pin.nX = nX
    pin.nY = nY
    pin.unitTag = tag
    pin.nTag = ntag
    pin.context = context
    pin.weDistance = distance
    pin.noZoomResize = true
    pin:SetDrawLayer(3)
    pin:SetMouseEnabled(true)
    FyrMM.SetPinAnchor(pin, nX, nY, Fyr_MM_Scroll_Map_EventUnits)

    if IsUnitInCombat(tag) then
        FyrMM.CheapAnimation(pin)
        pin:SetColor(1, 0, 0, 1)
        pin.m_textureAnimTimeline = "yes"
    else
        pin:SetColor(1, 1, 1, 1)
        pin.m_textureAnimTimeline = nil
    end

    -- if pdata.isAnimated then
    -- --pin:PlayTextureAnimation(pdata.framesWide, pdata.framesHigh, pdata.framesPerSecond)
    -- --pin:StopTextureAnimation()

    -- if not pin.textureAntl then
    -- local an
    -- an, pin.textureAntl = CreateSimpleAnimation(ANIMATION_TEXTURE, pin)
    -- an:SetHandler("OnStop", function() pin:SetTextureCoords(0, 1, 0, 1) end)
    -- end
    -- local anim = pin.textureAntl:GetAnimation(1)
    -- anim:SetImageData(pdata.framesWide, pdata.framesHigh)
    -- anim:SetFramerate(pdata.framesPerSecond)
    -- pin.textureAntl:SetPlaybackType(ANIMATION_PLAYBACK_LOOP, LOOP_INDEFINITELY)
    -- pin.textureAntl:PlayFromStart()
    -- end

    if FyrMM.SV.WheelMap then
        pin:SetHidden(not Is_PinInsideWheel(pin))
    else
        pin:SetHidden(false)
    end

    if FyrMM.IsValidBorderPin(pin) then
        FyrMM.CreateBorderPin(pin)
    end

end

function FyrMM.SetEventPOIPin(pinType, tag, poiIndex, context) -- world events (dolmens, harrow storms etc)
    local pin
    local pdata = ZO_MapPin.PIN_DATA[pinType]

    pin = GetControl("Fyr_MM_Scroll_Map_EventPOIs_" .. poiIndex)

    if pin == nil then
        return
    end
    local nX, nY, pinType, icon, isOnMap, _, discovered, nearby = MM_GetPOIMapInfo(GetCurrentMapZoneIndex(), poiIndex)

    local distance = CurrentMap.TrueMapSize *
                         math.sqrt(
            (nX - CurrentMap.PlayerNX) * (nX - CurrentMap.PlayerNX) + (nY - CurrentMap.PlayerNY) *
                (nY - CurrentMap.PlayerNY))

    if not isOnMap then
        if pin ~= nil then
            pin:SetHidden(true)
            pin:SetMouseEnabled(false)
            pin:ClearAnchors()
            pin.nX = nil
            pin.nY = nil
            pin.unitTag = nil
            pin.nTag = nil
            pin.m_PinType = nil
            pin.context = nil
            if pin.textureAntl then
                pin.textureAntl:Stop()
                pin.textureAntl = nil
            end
            if pin.OnBorder then
                if pin.BorderPin then
                    if pin.BorderPin.textureAntl then
                        pin.BorderPin.textureAntl:Stop()
                        pin.BorderPin.textureAntl = nil
                    end
                    pin.BorderPin:ClearAnchors()
                    pin.BorderPin:SetHidden()
                    pin.BorderPin.pin = nil
                    pin.BorderPin = nil
                end
                pin.OnBorder = nil
            end
        end
        return
    end

    pin.m_PinType = pinType

    -- if pin.m_PinType == MAP_PIN_TYPE_POI_COMPLETE then
    -- pin:SetTexture("EsoUI/Art/MapPins/worldEvent_poi_active_complete.dds")
    -- elseif pin.m_PinType == MAP_PIN_TYPE_POI_SEEN then
    -- pin:SetTexture("EsoUI/Art/MapPins/worldEvent_poi_active_incomplete.dds")
    -- end

    local texture = "esoui/art/zonestories/completiontypeicon_worldevents.dds"
    pin:SetTexture(texture)
    pin.pinTexture = texture

    pin:SetColor(1, 1, 1, 1)
    local pinsize = pdata.size
    if pinsize == nil then
        pinsize = 32
    end
    FyrMM.SetPinSize(pin, pinsize * FyrMM.pScalePercent, 0)
    pin.nX = nX
    pin.nY = nY
    pin.unitTag = tag
    pin.nTag = tag
    pin.context = context
    pin.weDistance = distance
    pin:SetDrawLayer(3)
    pin:SetMouseEnabled(true)
    FyrMM.SetPinAnchor(pin, nX, nY, Fyr_MM_Scroll_Map_EventUnits)

    FyrMM.CheapAnimation(pin, true)
    pin.m_textureAnimTimeline = "yes"

    -- if pdata.isAnimated then
    -- --pin:PlayTextureAnimation(pdata.framesWide, pdata.framesHigh, pdata.framesPerSecond)
    -- --pin:StopTextureAnimation()
    -- if not pin.textureAntl then
    -- local an
    -- an, pin.textureAntl = CreateSimpleAnimation(ANIMATION_TEXTURE, pin)
    -- an:SetHandler("OnStop", function() pin:SetTextureCoords(0, 1, 0, 1) end)
    -- end
    -- local anim = pin.textureAntl:GetAnimation(1)
    -- anim:SetImageData(pdata.framesWide, pdata.framesHigh)
    -- anim:SetFramerate(pdata.framesPerSecond)
    -- pin.textureAntl:SetPlaybackType(ANIMATION_PLAYBACK_LOOP, LOOP_INDEFINITELY)
    -- pin.textureAntl:PlayFromStart()
    -- end

    if FyrMM.SV.WheelMap then
        pin:SetHidden(not Is_PinInsideWheel(pin))
    else
        pin:SetHidden(false)
    end

    if FyrMM.IsValidBorderPin(pin) then
        FyrMM.CreateBorderPin(pin)
    end
end

function FyrMM.RefreshEventUnits()
    RemoveEventUnitPins()
    for worldEventInstanceId in GetNextWorldEventInstanceIdIter do
        AddWorldEvent(worldEventInstanceId)
    end
end

function FyrMM.CheapAnimation(pin, rotate) -- added by @Masteroshi430
    local pinsize = 64
    local pinsizeMax = pinsize + 8
    local pinsizeMin = pinsize - 8

    if FyrMM.animatedPinSize then
        if FyrMM.animatedPinSize == pinsizeMax then
            FyrMM.goDown = true

            FyrMM.animatedPinSize = FyrMM.animatedPinSize - 1
        elseif FyrMM.animatedPinSize == pinsizeMin then
            FyrMM.goDown = false
            FyrMM.animatedPinSize = FyrMM.animatedPinSize + 1
        elseif FyrMM.animatedPinSize > pinsizeMin and FyrMM.goDown == true then
            FyrMM.animatedPinSize = FyrMM.animatedPinSize - 1
        elseif FyrMM.animatedPinSize < pinsizeMax then
            FyrMM.animatedPinSize = FyrMM.animatedPinSize + 1
        end
    else
        FyrMM.animatedPinSize = pinsizeMax
    end

    if rotate then
        if not FyrMM.radians then
            FyrMM.radians = 0
        end
        FyrMM.radians = math.min(math.pi * 2, FyrMM.radians + 0.1)
        if FyrMM.radians == math.pi * 2 then
            FyrMM.radians = 0
        end
        pin:SetTransformRotationZ(FyrMM.radians)
    else
        pin:SetTransformRotationZ(0)
    end

    local properSize = math.floor(FyrMM.animatedPinSize * FyrMM.pScalePercent / 2) * 2
    pin:SetDimensions(properSize, properSize)

end

------------------------------------------------------------
-- Group Pins
------------------------------------------------------------
function FyrMM.GroupEvent()
    FyrMM.GroupRefreshNeeded = true
    FyrMM.RefreshGroup()
end

function FyrMM.SetGroupPinTexture(gmPin, odyTexture)

    local Multiplier = 1
    local gmPinTexture = ""
    if gmPin.unitTag == "companion" then
        gmPinTexture = "EsoUI/Art/MapPins/activeCompanion_pin.dds"
        if odyTexture then
            gmPinTexture = odyTexture
        end

        if gmPin.isMounted then
            gmPinTexture = "MiniMap/Textures/mountedMember.dds"
            Multiplier = 1.25
        elseif gmPin.isStealthed then
            gmPinTexture = "MiniMap/Textures/stealthed.dds"
            Multiplier = 0.1
        elseif gmPin.isSwimming then -- in case companions are able to swim in the future
            gmPinTexture = "MiniMap/Textures/swimming.dds"
            Multiplier = 0.1
        end
        FyrMM.SetPinSize(gmPin, FyrMM.SV.MemberPinSize * FyrMM.pScalePercent * Multiplier, 0)
    else
        if gmPin.isLeader then
            if FyrMM.SV.LeaderPin == "Default" then
                gmPinTexture = "EsoUI/Art/Compass/groupLeader.dds"
            elseif FyrMM.SV.LeaderPin == "Class" then
                gmPinTexture = GetClassIcon(gmPin.ClassId)
            elseif gmPin.isDps then
                gmPinTexture = "EsoUI/Art/LFG/LFG_dps_down.dds"
            elseif gmPin.isHeal then
                gmPinTexture = "EsoUI/Art/LFG/LFG_healer_down.dds"
            elseif gmPin.isTank then
                gmPinTexture = "EsoUI/Art/LFG/LFG_tank_down.dds"
            else
                gmPinTexture = "EsoUI/Art/Compass/groupLeader.dds"
            end

            if odyTexture then
                gmPinTexture = odyTexture
            end
            if FyrMM.GetTargetMarkerPicture(gmPin.unitTag) then
                gmPinTexture = FyrMM.GetTargetMarkerPicture(gmPin.unitTag)
                Multiplier = 0.5
            end

            if gmPin.isMounted and not gmPin.engaged then
                gmPinTexture = "MiniMap/Textures/mountedLeader.dds"
                Multiplier = 1.5
            elseif gmPin.isStealthed and not gmPin.engaged then
                gmPinTexture = "MiniMap/Textures/stealthed.dds"
                Multiplier = 0.1
            elseif gmPin.isSwimming and not gmPin.engaged then
                gmPinTexture = "MiniMap/Textures/swimming.dds"
                Multiplier = 0.1
            end

            if gmPin.isBreadcrumb then
                gmPinTexture = "EsoUI/Art/Compass/groupLeader_door.dds"
            end

            FyrMM.SetPinSize(gmPin, FyrMM.SV.LeaderPinSize * FyrMM.pScalePercent * Multiplier, 0)
        else
            if FyrMM.SV.MemberPin == "Default" then
                gmPinTexture = "EsoUI/Art/MapPins/UI-WorldMapGroupPip.dds" -- "esoui/art/icons/mapkey/mapkey_groupmember.dds"
            elseif FyrMM.SV.MemberPin == "Class" then
                gmPinTexture = GetClassIcon(gmPin.ClassId)
            elseif gmPin.isDps then
                gmPinTexture = "EsoUI/Art/LFG/LFG_dps_down.dds"
            elseif gmPin.isHeal then
                gmPinTexture = "EsoUI/Art/LFG/LFG_healer_down.dds"
            elseif gmPin.isTank then
                gmPinTexture = "EsoUI/Art/LFG/LFG_tank_down.dds"
            else
                gmPinTexture = "EsoUI/Art/MapPins/UI-WorldMapGroupPip.dds" -- "esoui/art/icons/mapkey/mapkey_groupmember.dds"
            end

            if odyTexture then
                gmPinTexture = odyTexture
            end
            if FyrMM.GetTargetMarkerPicture(gmPin.unitTag) then
                gmPinTexture = FyrMM.GetTargetMarkerPicture(gmPin.unitTag)
                Multiplier = 0.5
            end

            if gmPin.isMounted and not gmPin.engaged then
                gmPinTexture = "MiniMap/Textures/mountedMember.dds"
                Multiplier = 1.5
            elseif gmPin.isStealthed and not gmPin.engaged then
                gmPinTexture = "MiniMap/Textures/stealthed.dds"
                Multiplier = 0.1
            elseif gmPin.isSwimming and not gmPin.engaged then
                gmPinTexture = "MiniMap/Textures/swimming.dds"
                Multiplier = 0.1
            end

            if gmPin.isBreadcrumb then
                gmPinTexture = "esoui/art/compass/groupmember_door.dds"
            end

            FyrMM.SetPinSize(gmPin, FyrMM.SV.MemberPinSize * FyrMM.pScalePercent * Multiplier, 0)
        end
    end
    gmPin:SetTexture(gmPinTexture)
    gmPin.pinTexture = gmPinTexture -- we set that here to avoid resetting it for borderpins
end

function FyrMM.GetTargetMarkerPicture(tag)
    if not FyrMM.SV.GroupTargetMarkers then
        return nil
    end
    local targetMarkerType = GetUnitTargetMarkerType(tag)
    if targetMarkerType == TARGET_MARKER_TYPE_ONE then
        return "EsoUI/Art/TargetMarkers/Target_Blue_Square_64.dds"
    elseif targetMarkerType == TARGET_MARKER_TYPE_TWO then
        return "EsoUI/Art/TargetMarkers/Target_Gold_Star_64.dds"
    elseif targetMarkerType == TARGET_MARKER_TYPE_THREE then
        return "EsoUI/Art/TargetMarkers/Target_Green_Circle_64.dds"
    elseif targetMarkerType == TARGET_MARKER_TYPE_FOUR then
        return "EsoUI/Art/TargetMarkers/Target_Orange_Triangle_64.dds"
    elseif targetMarkerType == TARGET_MARKER_TYPE_FIVE then
        return "EsoUI/Art/TargetMarkers/Target_Pink_Moons_64.dds"
    elseif targetMarkerType == TARGET_MARKER_TYPE_SIX then
        return "EsoUI/Art/TargetMarkers/Target_Purple_Oblivion_64.dds"
    elseif targetMarkerType == TARGET_MARKER_TYPE_SEVEN then
        return "EsoUI/Art/TargetMarkers/Target_Red_Weapons_64.dds"
    elseif targetMarkerType == TARGET_MARKER_TYPE_EIGHT then
        return "EsoUI/Art/TargetMarkers/Target_White_Skull_64.dds"
    else
        return nil
    end
end

function FyrMM.SetGroupPin(tag)
    local pin, pin_ic, text, nX, nY
    local isDps, isHeal, isTank = GetGroupMemberRoles(tag)
    local isDead = IsUnitDead(tag)
    pin = GetControl("Fyr_MM_Scroll_Map_GroupPins_" .. tag)
    pin_ic = GetControl("Fyr_MM_Scroll_Map_GroupPins_" .. tag .. "_incombat")
    text = GetControl("Fyr_MM_Scroll_Map_GroupPins_" .. tag .. "_label")
    if not (DoesUnitExist(tag) and not AreUnitsEqual("player", tag) and IsUnitOnline(tag)) then
        if pin ~= nil then
            pin:SetHidden(true)
            pin:SetMouseEnabled(false)
            pin:ClearAnchors()
            pin.isDps = nil
            pin.isHeal = nil
            pin.isTank = nil
            pin.ClassId = nil
            pin.isLeader = nil
            pin.nX = nil
            pin.nY = nil
            pin_ic.nX = nil
            pin_ic.nY = nil
            pin_ic:SetHidden(true)
            pin_ic:ClearAnchors()
            PinsList["Fyr_MM_Scroll_Map_GroupPins_" .. tag] = nil
            PinsList["Fyr_MM_Scroll_Map_GroupPins_" .. tag .. "_incombat"] = nil
            if pin.OnBorder then
                if pin.BorderPin then
                    pin.BorderPin:ClearAnchors()
                    pin.BorderPin:SetHidden()
                    pin.BorderPin.pin = nil
                    pin.BorderPin = nil
                end
                pin.OnBorder = nil
            end
        end
        return
    end

    if pin == nil then
        return
    end
    nX, nY, _, isInCurrentMap = GetMapPlayerPosition(tag)
    pin.isDps = isDps
    pin.isHeal = isHeal
    pin.isTank = isTank
    pin.isLeader = IsUnitGroupLeader(tag)
    pin.isBreadcrumb = false
    pin.isMounted = GetTargetMountedStateInfo(GetRawUnitName(tag)) ~= MOUNTED_STATE_NOT_MOUNTED
    pin.isStealthed = GetUnitStealthState(tag) ~= STEALTH_STATE_NONE
    pin.isSwimming = IsUnitSwimming(tag)

    if DoesUnitExist(tag) and not AreUnitsEqual("player", tag) and IsUnitOnline(tag) then
        local isGroupMemberHiddenByInstance = false
        -- If we're in an instance and it has its own map, it's going to be a dungeon map or house. Don't show on the map if we're on different instances/layers
        -- If it doesn't have its own map, we're okay to show the group member regardless of instance
        if DoesCurrentMapMatchMapForPlayerLocation() and IsGroupMemberInSameWorldAsPlayer(tag) and
            (GetMapContentType() == MAP_CONTENT_DUNGEON or GetCurrentZoneHouseId() ~= 0) then
            if not IsGroupMemberInSameInstanceAsPlayer(tag) then
                -- We're in the same world as the group member, but a different instance
                isGroupMemberHiddenByInstance = true
            elseif not IsGroupMemberInSameLayerAsPlayer(tag) then
                -- We're in the same instance as the group member, but a different layer
                isGroupMemberHiddenByInstance = not IsUnitWorldMapPositionBreadcrumbed(tag)
            end
        end

        if not isGroupMemberHiddenByInstance then
            if isInCurrentMap then
                if IsUnitWorldMapPositionBreadcrumbed(tag) then
                    pin.isBreadcrumb = true
                end
            end
        end
    end

    if pin.isLeader then
        pin.m_PinType = MAP_PIN_TYPE_GROUP_LEADER
        if FyrMM.SV.LeaderPinColor ~= nil and FyrMM.SV.LeaderDeadPinColor ~= nil then
            if isDead then
                pin:SetColor(FyrMM.SV.LeaderDeadPinColor.r, FyrMM.SV.LeaderDeadPinColor.g,
                    FyrMM.SV.LeaderDeadPinColor.b, FyrMM.SV.LeaderDeadPinColor.a)
                text:SetColor(255 - FyrMM.SV.LeaderDeadPinColor.r, 255 - FyrMM.SV.LeaderDeadPinColor.g,
                    255 - FyrMM.SV.LeaderDeadPinColor.b, FyrMM.SV.LeaderDeadPinColor.a)
            else
                pin:SetColor(FyrMM.SV.LeaderPinColor.r, FyrMM.SV.LeaderPinColor.g, FyrMM.SV.LeaderPinColor.b,
                    FyrMM.SV.LeaderPinColor.a)
                text:SetColor(255 - FyrMM.SV.LeaderPinColor.r, 255 - FyrMM.SV.LeaderPinColor.g,
                    255 - FyrMM.SV.LeaderPinColor.b, FyrMM.SV.LeaderPinColor.a)
            end
        else
            text:SetColor(0, 0, 0, 1)
        end
    else
        if tag == "companion" then
            pin.m_PinType = MAP_PIN_TYPE_ACTIVE_COMPANION

        else
            pin.m_PinType = MAP_PIN_TYPE_GROUP
        end
        if FyrMM.SV.MemberPinColor ~= nil and FyrMM.SV.MemberDeadPinColor ~= nil then
            if isDead then
                pin:SetColor(FyrMM.SV.MemberDeadPinColor.r, FyrMM.SV.MemberDeadPinColor.g,
                    FyrMM.SV.MemberDeadPinColor.b, FyrMM.SV.MemberDeadPinColor.a)
                if not tag == "companion" then
                    text:SetColor(255 - FyrMM.SV.MemberDeadPinColor.r, 255 - FyrMM.SV.MemberDeadPinColor.g,
                        255 - FyrMM.SV.MemberDeadPinColor.b, FyrMM.SV.MemberDeadPinColor.a)
                end
            else
                pin:SetColor(FyrMM.SV.MemberPinColor.r, FyrMM.SV.MemberPinColor.g, FyrMM.SV.MemberPinColor.b,
                    FyrMM.SV.MemberPinColor.a)
                if not tag == "companion" then
                    text:SetColor(255 - FyrMM.SV.MemberPinColor.r, 255 - FyrMM.SV.MemberPinColor.g,
                        255 - FyrMM.SV.MemberPinColor.b, FyrMM.SV.MemberPinColor.a)
                end
            end
        else
            text:SetColor(0, 0, 0, 1)
        end
    end

    pin.noZoomResize = true
    pin.ClassId = GetUnitClassId(tag)
    pin.nX = nX
    pin.nY = nY
    pin.unitTag = tag

    if IsUnitActivelyEngaged(tag) and FyrMM.SV.InCombatState and not isDead and IsUnitOnline(tag) then -- IsUnitActivelyEngaged instead of IsUnitInCombat to get individual combat state instead of group combat state

        pin_ic.nX = nX
        pin_ic.nY = nY
        pin_ic:SetHidden(false)

        if pin.isLeader then
            pin_ic:SetAlpha(0.66)
        else
            pin_ic:SetColor(255, 0, 0, 0.5)
        end

        FyrMM.SetPinAnchor(pin_ic, nX, nY, Fyr_MM_Scroll_Map_GroupPins)
    else
        PinsList["Fyr_MM_Scroll_Map_GroupPins_" .. tag .. "_incombat"] = nil
        pin_ic.nX = nil
        pin_ic.nY = nil
        -- pin_ic:SetColor(0,0,0,0)
        pin_ic:SetHidden(true)
        pin_ic:ClearAnchors()
    end

    if not tag == "companion" then
        if FyrMM.SV.ShowGroupLabels then
            text:SetText(tostring(GetGroupIndexByUnitTag(tag)))
            text:SetHidden(false)
        else
            text:SetText("")
        end
    end

    if IsUnitActivelyEngaged(tag) then
        pin.engaged = true
    else
        pin.engaged = false
    end

    if OSI then -- support for OdySupportIcons
        local OPTIONS = OPTIONS or ZO_SavedVars:NewAccountWide("OSIStore", 1, nil, DEFAULT)
        local wmConfig = {
            ["dead"] = OPTIONS.wmdead,
            ["mechanic"] = false,
            ["raid"] = OPTIONS.raidallow,
            ["leader"] = OPTIONS.wmroles,
            ["tank"] = OPTIONS.wmroles,
            ["healer"] = OPTIONS.wmroles,
            ["dps"] = OPTIONS.wmroles,
            ["bg"] = OPTIONS.wmroles,
            ["custom"] = OPTIONS.wmuse,
            ["unique"] = OPTIONS.wmunique,
            ["anim"] = false
        }

        local tex, col, _, hodor = OSI.GetIconDataForPlayer(GetUnitDisplayName(tag), wmConfig, tag)
        if tex then
            FyrMM.SetGroupPinTexture(pin, tex)
            if col then
                pin:SetColor(col[1], col[2], col[3], 1)
                pin.color = col
            end
        else
            FyrMM.SetGroupPinTexture(pin)
        end
    else
        FyrMM.SetGroupPinTexture(pin)
    end

    FyrMM.SetPinSize(pin_ic, pin:GetDesiredHeight() + 10, 0) -- +6

    pin:SetDrawLayer(3)
    pin:SetDrawLevel(ZO_MapPin.PIN_DATA[pin.m_PinType].level)
    pin_ic:SetDrawLayer(2)
    pin:SetMouseEnabled(true)
    FyrMM.SetPinAnchor(pin, nX, nY, Fyr_MM_Scroll_Map_GroupPins)
    PinsList["Fyr_MM_Scroll_Map_GroupPins_" .. tag .. "_incombat"] = nil

    if FyrMM.SV.WheelMap then
        pin:SetHidden(not Is_PinInsideWheel(pin))
    else
        pin:SetHidden(false)
    end

    if FyrMM.IsValidBorderPin(pin) then
        FyrMM.CreateBorderPin(pin)
    end
end

local function ClearGroupPins()
    local pin, pin_ic, tag
    for i = 1, 24 do
        tag = "group" .. tostring(i)
        local pin = GetControl("Fyr_MM_Scroll_Map_GroupPins_" .. tag)
        local pin_ic = GetControl("Fyr_MM_Scroll_Map_GroupPins_" .. tag .. "_incombat")
        if pin ~= nil then
            pin:SetHidden(true)
            pin:SetMouseEnabled(false)
            pin:ClearAnchors()
            pin.isDps = nil
            pin.isHeal = nil
            pin.isTank = nil
            pin.ClassId = nil
            pin.isLeader = nil
            pin.isBreadcrumb = nil
            pin.nX = nil
            pin.nY = nil
            pin_ic.nX = nil
            pin_ic.nY = nil
            pin_ic:SetHidden(true)
            pin_ic:ClearAnchors()
            PinsList["Fyr_MM_Scroll_Map_GroupPins_" .. tag] = nil
            PinsList["Fyr_MM_Scroll_Map_GroupPins_" .. tag .. "_incombat"] = nil
            if pin.OnBorder then
                if pin.BorderPin then
                    pin.BorderPin:ClearAnchors()
                    pin.BorderPin:SetHidden()
                    pin.BorderPin.pin = nil
                    pin.BorderPin = nil
                end
                pin.OnBorder = nil
            end
        end
    end

    if not DoesUnitExist("companion") then
        local pin = GetControl("Fyr_MM_Scroll_Map_GroupPins_companion")
        local pin_ic = GetControl("Fyr_MM_Scroll_Map_GroupPins_companion_incombat")
        if pin ~= nil then
            pin:SetHidden(true)
            pin:SetMouseEnabled(false)
            pin:ClearAnchors()
            pin.isDps = nil
            pin.isHeal = nil
            pin.isTank = nil
            pin.ClassId = nil
            pin.isLeader = nil
            pin.isBreadcrumb = nil
            pin.nX = nil
            pin.nY = nil
            pin_ic.nX = nil
            pin_ic.nY = nil
            pin_ic:SetHidden(true)
            pin_ic:ClearAnchors()
            PinsList["Fyr_MM_Scroll_Map_GroupPins_companion"] = nil
            PinsList["Fyr_MM_Scroll_Map_GroupPins_companion_incombat"] = nil
            if pin.OnBorder then
                if pin.BorderPin then
                    pin.BorderPin:ClearAnchors()
                    pin.BorderPin:SetHidden()
                    pin.BorderPin.pin = nil
                    pin.BorderPin = nil
                end
                pin.OnBorder = nil
            end
        end

    end
end

function FyrMM.RefreshGroup()
    if not FyrMM.GroupRefreshNeeded and not IsCompanionAround then
        return
    end
    local maxgroupsize = 24
    local tag, pin, pin_ic

    if not IsUnitGrouped("player") and not DoesUnitExist("companion") then
        ClearGroupPins()
        return
    end

    if IsUnitGrouped("player") and not DoesUnitExist("companion") then -- fix for companion icons staying when he/she leaves while grouped
        local pin = GetControl("Fyr_MM_Scroll_Map_GroupPins_companion")
        local pin_ic = GetControl("Fyr_MM_Scroll_Map_GroupPins_companion_incombat")
        if pin ~= nil then
            pin:SetHidden(true)
            pin:SetMouseEnabled(false)
            pin:ClearAnchors()
            pin.isDps = nil
            pin.isHeal = nil
            pin.isTank = nil
            pin.ClassId = nil
            pin.isLeader = nil
            pin.isBreadcrumb = nil
            pin.nX = nil
            pin.nY = nil
            pin_ic.nX = nil
            pin_ic.nY = nil
            pin_ic:SetHidden(true)
            pin_ic:ClearAnchors()
            PinsList["Fyr_MM_Scroll_Map_GroupPins_companion"] = nil
            PinsList["Fyr_MM_Scroll_Map_GroupPins_companion_incombat"] = nil
            if pin.OnBorder then
                if pin.BorderPin then
                    pin.BorderPin:ClearAnchors()
                    pin.BorderPin:SetHidden()
                    pin.BorderPin.pin = nil
                    pin.BorderPin = nil
                end
                pin.OnBorder = nil
            end
        end
    end

    local nogroup = GetGroupSize() == 0
    local t = GetGameTimeMilliseconds()

    if GetGroupSize() > 24 then
        maxgroupsize = GetGroupSize()
    end -- Crazy wishfull thinking :)

    for i = 1, maxgroupsize do
        if FyrMM.Reloading then
            return
        end
        tag = "group" .. tostring(i) -- GetGroupUnitTagByIndex(i)
        if maxgroupsize > 24 then -- Very crazy wishfull thinking :)
            if GetControl("Fyr_MM_Scroll_Map_GroupPins_" .. tag) == nil then
                pin = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_GroupPins_" .. tag, Fyr_MM_Scroll_Map_GroupPins,
                    CT_TEXTURE)
                pin:SetHandler("OnMouseEnter", PinOnMouseEnter)
                pin:SetHandler("OnMouseExit", PinOnMouseExit)
            end
            if GetControl("Fyr_MM_Scroll_Map_GroupPins_" .. tag .. "_incombat") == nil then
                pin_ic = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_GroupPins_" .. tag .. "_incombat",
                    Fyr_MM_Scroll_Map_GroupPins, CT_TEXTURE)
                pin_ic:SetTexture("esoui/art/mappins/ava_attackburst_32.dds")
            end
        end
        FyrMM.SetGroupPin(tag)
    end

    if DoesUnitExist("companion") then
        tag = "companion"
        if GetControl("Fyr_MM_Scroll_Map_GroupPins_" .. tag) == nil then
            pin = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_GroupPins_" .. tag, Fyr_MM_Scroll_Map_GroupPins,
                CT_TEXTURE)
            pin:SetHandler("OnMouseEnter", PinOnMouseEnter)
            pin:SetHandler("OnMouseExit", PinOnMouseExit)
        end
        if GetControl("Fyr_MM_Scroll_Map_GroupPins_" .. tag .. "_incombat") == nil then
            pin_ic = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_GroupPins_" .. tag .. "_incombat",
                Fyr_MM_Scroll_Map_GroupPins, CT_TEXTURE)
            pin_ic:SetTexture("esoui/art/mappins/ava_attackburst_32.dds")
            pin_ic:SetColor(255, 0, 0, 0.5)
        end
        FyrMM.SetGroupPin(tag)
    end

    if GetGroupSize() == 0 and not DoesUnitExist("companion") then
        FyrMM.GroupRefreshNeeded = false
    end

    if FyrMM.DebugMode then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug", "FyrMM.RefreshGroup " .. tostring(GetGameTimeMilliseconds() - t))
    end
end

---------------------------------------------------
-- Quest pin updates
---------------------------------------------------
function FyrMM.GetQuestPinInfo(pinType, isassited, isBreadcrumb, radius)
    if radius == nil then
        radius = 0
    end
    local mWidth, mHeight = Fyr_MM_Scroll_Map:GetDimensions()
    local Diameter = radius * 2 * mHeight
    if Diameter < 16 then
        Diameter = 16
    end
    local properType, properTexture
    if (pinType == MAP_PIN_TYPE_ASSISTED_QUEST_CONDITION or pinType == MAP_PIN_TYPE_TRACKED_QUEST_CONDITION) then
        if isassited then
            properType = MAP_PIN_TYPE_ASSISTED_QUEST_CONDITION
        else
            properType = MAP_PIN_TYPE_TRACKED_QUEST_CONDITION
        end
    end
    if (pinType == MAP_PIN_TYPE_ASSISTED_QUEST_OPTIONAL_CONDITION or pinType ==
        MAP_PIN_TYPE_TRACKED_QUEST_OPTIONAL_CONDITION) then
        if isassited then
            properType = MAP_PIN_TYPE_ASSISTED_QUEST_OPTIONAL_CONDITION
        else
            properType = MAP_PIN_TYPE_TRACKED_QUEST_OPTIONAL_CONDITION
        end
    end
    if (pinType == MAP_PIN_TYPE_ASSISTED_QUEST_ENDING or pinType == MAP_PIN_TYPE_TRACKED_QUEST_ENDING) then
        if isassited then
            properType = MAP_PIN_TYPE_ASSISTED_QUEST_ENDING
        else
            properType = MAP_PIN_TYPE_TRACKED_QUEST_ENDING
        end
    end
    if properType == nil then
        properType = pinType
    end
    if radius == 0 then
        if isBreadcrumb then
            return properType, breadcrumbQuestPinTextures[properType], 32 * FyrMM.pScalePercent
        else
            return properType, questPinTextures[properType], 32 * FyrMM.pScalePercent
        end
    else
        if Diameter > 24 then
            if (isassited) then
                return properType, "EsoUI/Art/MapPins/map_assistedAreaPin.dds", Diameter, true
            else
                return properType, "EsoUI/Art/MapPins/map_areaPin.dds", Diameter, true
            end
        else
            if (isassited) then
                return properType, "EsoUI/Art/MapPins/map_assistedAreaPin_32.dds", Diameter, true
            else
                return properType, "EsoUI/Art/MapPins/map_areaPin_32.dds", Diameter, true
            end
        end
    end
end

function FyrMM.ApplyProperQuestPinTextures() -- Discrepany fix
    local l, pinType
    for i = 1, MAX_JOURNAL_QUESTS do
        if (IsValidQuestIndex(i)) then
            for a = 1, FyrMM.questPinCount do
                l = GetControl("Fyr_MM_Scroll_Map_QuestPins_Pin" .. tostring(a))
                if l ~= nil then
                    if l.questIndex == i and not l:IsHidden(true) then
                        if IsAssisted(l.m_PinType) ~= FyrMM.GetQuestPinInfo(GetTrackedByIndex(i)) then -- discrepancy
                            local properType, pinTexture, size =
                                FyrMM.GetQuestPinInfo(l.m_PinType, GetTrackedIsAssisted(TRACK_TYPE_QUEST, l.questIndex),
                                    l.m_PinTag.isBreadcrumb, l.radius)
                            l.m_PinType = properType
                            l:SetTexture(pinTexture)
                            FyrMM.SetPinSize(l, size, 0)
                            if GetTrackedIsAssisted(TRACK_TYPE_QUEST, l.questIndex) then
                                l:SetDrawLayer(3)
                            else
                                l:SetDrawLayer(2)
                            end
                        end
                    end
                end
            end
        end
    end
end

local function UpdateQuestPinPosition(l)
    if l ~= nil then
        if l.MapId == CurrentMap.MapId and l.m_PinTag and l.m_PinTag then
            local properType, pinTexture, size = FyrMM.GetQuestPinInfo(l.m_PinType, GetTrackedIsAssisted(
                TRACK_TYPE_QUEST, l.questIndex), l.m_PinTag.isBreadcrumb, l.radius)
            l.m_PinType = properType
            l:SetTexture(pinTexture)
            FyrMM.SetPinSize(l, size, 0)
            l:SetHidden(not ZO_WorldMap_IsPinGroupShown(MAP_FILTER_QUESTS))
            if GetTrackedIsAssisted(TRACK_TYPE_QUEST, l.questIndex) then
                l:SetDrawLayer(3)
            else
                l:SetDrawLayer(2)
            end
            FyrMM.SetPinAnchor(l, l.normalizedX, l.normalizedY, Fyr_MM_Scroll_Map_QuestPins)
            if FyrMM.SV.WheelMap and l.radius > 0 and l.MM_Tag == nil then
                l:SetParent(Fyr_MM_Scroll_CW_Map_Pins)
            else
                if l.MM_Tag ~= nil then
                    if not FyrMM.SV.WheelMap then
                        if l.MM_Tag == 1 then
                            l:SetParent(Fyr_MM_Scroll_Map_QuestPins)
                        end
                    else
                        if l.radius > 0 then
                            if l.MM_Tag == 1 then
                                l:SetParent(Fyr_MM_Scroll_CW_Map_Pins)
                                if l.secondaryPin ~= nil then
                                    l.secondaryPin:SetTexture(pinTexture)
                                end
                                if l.tertiaryPin ~= nil then
                                    l.tertiaryPin:SetTexture(pinTexture)
                                end
                            end
                            if l.MM_Tag == 2 then
                                l:SetParent(Fyr_MM_Scroll_NS_Map_Pins)
                            end
                            if l.MM_Tag == 3 then
                                l:SetParent(Fyr_MM_Scroll_WE_Map_Pins)
                            end
                        else
                            l.MM_Tag = nil
                            l:SetParent(Fyr_MM_Scroll_Map_QuestPins)
                        end
                    end
                end
            end
            if FyrMM.IsValidBorderPin(l) then
                FyrMM.CreateBorderPin(l)
            end
        else
            l:SetHidden(true)
            l:ClearAnchors()
        end
    end
end

function FyrMM.UpdateQuestPinPositions()
    if QuestPinsUpdating then
        return
    end
    for i, v in pairs(QuestPins) do
        UpdateQuestPinPosition(v.Pin)
        if v.Pin.secondaryPin ~= nil then
            UpdateQuestPinPosition(v.Pin.secondaryPin)
        end
        if v.Pin.tertiaryPin ~= nil then
            UpdateQuestPinPosition(v.Pin.tertiaryPin)
        end
    end
end

local function PlayTextureAnimation(pin, loopCount)
    if not pin.m_textureAnimTimeline then
        local anim
        anim, pin.m_textureAnimTimeline = CreateSimpleAnimation(ANIMATION_TEXTURE, pin)
        anim:SetImageData(32, 1)
        anim:SetFramerate(32)
        anim:SetHandler("OnStop", function()
            pin:SetTextureCoords(0, 1, 0, 1)
        end)
    end
    pin.m_textureAnimTimeline:SetPlaybackType(ANIMATION_PLAYBACK_LOOP, loopCount)
    pin.m_textureAnimTimeline:PlayFromStart()
end

local function ResetAnimation(pin, resetOptions, loopCount, pulseIcon, overlayIcon, postPulseCallback, min, max)
    resetOptions = resetOptions or RESET_ANIM_PREVENT_PLAY

    -- The animated control
    local pulseControl = pin

    if (resetOptions == RESET_ANIM_ALLOW_PLAY) then
        pulseControl:SetHidden(pulseIcon == nil)
        if (pulseIcon) then
            pulseControl:SetTexture(pulseIcon)
            postPulseCallback = postPulseCallback or ZO_MapPin.DoFinalFadeOutAfterPing
            ZO_AlphaAnimation_GetAnimation(pulseControl):PingPong(.3, 1, 750, loopCount, postPulseCallback)
        end
    elseif (resetOptions == RESET_ANIM_HIDE_CONTROL) then
        ZO_AlphaAnimation_GetAnimation(pulseControl):Stop()
        pulseControl:SetHidden(true)
        pulseControl:StopTextureAnimation()
    elseif (resetOptions == RESET_ANIM_PREVENT_PLAY) then
        ZO_AlphaAnimation_GetAnimation(pulseControl):FadeOut(0, 300, ZO_ALPHA_ANIMATION_OPTION_USE_CURRENT_ALPHA,
            ZO_MapPin.HidePulseAfterFadeOut)
    end
end

local function CreateQuestAreaSidePins(pin, assisted)
    local index
    local properType, pinTexture, size = FyrMM.GetQuestPinInfo(pinType,
        GetTrackedIsAssisted(TRACK_TYPE_QUEST, pin.m_PinTag[1]), pin.m_PinTag.isBreadcrumb, pin.radius)
    FyrMM.questPinCount = FyrMM.questPinCount + 1
    local questPinNS
    index = GetQuestFreePinIndex()
    questPinNS = GetControl("Fyr_MM_Scroll_Map_QuestPins_Pin" .. tostring(index))
    if questPinNS == nil then
        questPinNS = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_QuestPins_Pin" .. tostring(index),
            Fyr_MM_Scroll_NS_Map_Pins, CT_TEXTURE)
    else
        questPinNS:SetParent(Fyr_MM_Scroll_NS_Map_Pins)
    end
    questPinNS.m_PinTag = pin.m_PinTag
    questPinNS.questIndex = pin.questIndex
    questPinNS.m_PinType = properType
    questPinNS.PinToolTipText = pin.PinToolTipText
    questPinNS.questName = pin.questName
    questPinNS.normalizedX = pin.normalizedX
    questPinNS.normalizedY = pin.normalizedY
    questPinNS.radius = pin.radius
    questPinNS.MapId = pin.MapId
    questPinNS:SetTexture(pinTexture)
    -- FyrMM.SetPinSize(questPinNS, size, 0)
    questPinNS:SetDimensions(size, size)
    questPinNS.pinAge = pin.pinAge
    questPinNS:SetHidden(not ZO_WorldMap_IsPinGroupShown(MAP_FILTER_QUESTS))
    questPinNS.MM_Tag = 2
    questPinNS.primaryPin = pin
    pin.secondaryPin = questPinNS

    if assisted then
        local assistedColor = ZO_MAP_PIN_ASSISTED_COLOR
        questPinNS:SetColor(assistedColor:UnpackRGBA())
    else
        local color = ZO_MAP_PIN_NORMAL_COLOR
        questPinNS:SetColor(color:UnpackRGBA())
    end

    questPinNS:SetDrawLayer(3)

    FyrMM.SetPinAnchor(questPinNS, questPinNS.normalizedX, questPinNS.normalizedY, Fyr_MM_Scroll_Map_QuestPins)
    questPinNS:SetHandler("OnMouseUp", PinOnMouseUp)
    questPinNS:SetHandler("OnMouseEnter", PinOnMouseEnter)
    questPinNS:SetHandler("OnMouseExit", PinOnMouseExit)

    FyrMM.questPinCount = FyrMM.questPinCount + 1
    local questPinWE
    index = GetQuestFreePinIndex()
    questPinWE = GetControl("Fyr_MM_Scroll_Map_QuestPins_Pin" .. tostring(index))
    if questPinWE == nil then
        questPinWE = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_QuestPins_Pin" .. tostring(index),
            Fyr_MM_Scroll_WE_Map_Pins, CT_TEXTURE)
    else
        questPinWE:SetParent(Fyr_MM_Scroll_WE_Map_Pins)
    end
    questPinWE.m_PinTag = pin.m_PinTag
    questPinWE.questIndex = pin.questIndex
    questPinWE.m_PinType = properType
    questPinWE.PinToolTipText = pin.PinToolTipText
    questPinWE.questName = pin.questName
    questPinWE.normalizedX = pin.normalizedX
    questPinWE.normalizedY = pin.normalizedY
    questPinWE.radius = pin.radius
    questPinWE.MapId = pin.MapId
    questPinWE:SetTexture(pinTexture)
    -- FyrMM.SetPinSize(questPinWE, size, 0)
    questPinWE:SetDimensions(size, size)
    questPinWE.pinAge = pin.pinAge
    questPinWE:SetHidden(not ZO_WorldMap_IsPinGroupShown(MAP_FILTER_QUESTS))
    questPinWE.MM_Tag = 3
    questPinWE.primaryPin = pin
    pin.tertiaryPin = questPinWE

    if assisted then
        local assistedColor = ZO_MAP_PIN_ASSISTED_COLOR
        questPinWE:SetColor(assistedColor:UnpackRGBA())
    else
        local color = ZO_MAP_PIN_NORMAL_COLOR
        questPinWE:SetColor(color:UnpackRGBA())
    end
    questPinWE:SetDrawLayer(3)
    FyrMM.SetPinAnchor(questPinWE, questPinWE.normalizedX, questPinWE.normalizedY, Fyr_MM_Scroll_Map_QuestPins)
    questPinWE:SetHandler("OnMouseUp", PinOnMouseUp)
    questPinWE:SetHandler("OnMouseEnter", PinOnMouseEnter)
    questPinWE:SetHandler("OnMouseExit", PinOnMouseExit)
end

function FyrMM.CreateSuggestedAreaSidePins(pin, radius)
    local index = pin.Index
    local properType, pinTexture, size = FyrMM.GetQuestPinInfo(pin.m_PinType, false, false, radius)

    local suggestedPinNS
    suggestedPinNS = GetControl("Fyr_MM_Scroll_Map_Pins_Pin" .. tostring(index) .. "_NS")
    if suggestedPinNS == nil then
        suggestedPinNS = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_Pins_Pin" .. tostring(index) .. "_NS",
            Fyr_MM_Scroll_NS_Map_Pins, CT_TEXTURE)
    else
        suggestedPinNS:SetParent(Fyr_MM_Scroll_NS_Map_Pins)
    end
    suggestedPinNS.m_PinTag = pin.m_PinTag
    suggestedPinNS.questIndex = pin.questIndex
    suggestedPinNS.m_PinType = pin.m_PinType
    suggestedPinNS.PinToolTipText = pin.PinToolTipText
    suggestedPinNS.questName = pin.questName
    suggestedPinNS.normalizedX = pin.nX
    suggestedPinNS.normalizedY = pin.nY
    suggestedPinNS.radius = pin.radius
    suggestedPinNS.MapId = pin.MapId
    suggestedPinNS:SetTexture(pinTexture)
    suggestedPinNS:SetDimensions(size, size)
    suggestedPinNS.pinAge = pin.pinAge
    suggestedPinNS:SetHidden(false)
    suggestedPinNS.MM_Tag = 2
    suggestedPinNS.primaryPin = pin
    pin.secondaryPin = suggestedPinNS

    local color = ZO_MAP_PIN_NORMAL_COLOR
    suggestedPinNS:SetColor(color:UnpackRGBA())
    suggestedPinNS:SetDrawLayer(3)

    FyrMM.SetPinAnchor(suggestedPinNS, suggestedPinNS.normalizedX, suggestedPinNS.normalizedY,
        Fyr_MM_Scroll_Map_QuestPins)
    suggestedPinNS:SetHandler("OnMouseUp", PinOnMouseUp)
    suggestedPinNS:SetHandler("OnMouseEnter", PinOnMouseEnter)
    suggestedPinNS:SetHandler("OnMouseExit", PinOnMouseExit)

    local suggestedPinWE
    suggestedPinWE = GetControl("Fyr_MM_Scroll_Map_Pins_Pin" .. tostring(index) .. "_WE")
    if suggestedPinWE == nil then
        suggestedPinWE = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_Pins_Pin" .. tostring(index) .. "_WE",
            Fyr_MM_Scroll_WE_Map_Pins, CT_TEXTURE)
    else
        suggestedPinWE:SetParent(Fyr_MM_Scroll_WE_Map_Pins)
    end
    suggestedPinWE.m_PinTag = pin.m_PinTag
    suggestedPinWE.questIndex = pin.questIndex
    suggestedPinWE.m_PinType = pin.m_PinType
    suggestedPinWE.PinToolTipText = pin.PinToolTipText
    suggestedPinWE.questName = pin.questName
    suggestedPinWE.normalizedX = pin.nX
    suggestedPinWE.normalizedY = pin.nY
    suggestedPinWE.radius = pin.radius
    suggestedPinWE.MapId = pin.MapId
    suggestedPinWE:SetTexture(pinTexture)
    suggestedPinWE:SetDimensions(size, size)
    suggestedPinWE.pinAge = pin.pinAge
    suggestedPinWE:SetHidden(false)
    suggestedPinWE.MM_Tag = 3
    suggestedPinWE.primaryPin = pin
    pin.tertiaryPin = suggestedPinWE

    local color = ZO_MAP_PIN_NORMAL_COLOR
    suggestedPinWE:SetColor(color:UnpackRGBA())
    suggestedPinWE:SetDrawLayer(3)

    FyrMM.SetPinAnchor(suggestedPinWE, suggestedPinWE.normalizedX, suggestedPinWE.normalizedY,
        Fyr_MM_Scroll_Map_QuestPins)
    suggestedPinWE:SetHandler("OnMouseUp", PinOnMouseUp)
    suggestedPinWE:SetHandler("OnMouseEnter", PinOnMouseEnter)
    suggestedPinWE:SetHandler("OnMouseExit", PinOnMouseExit)
end

local function CreateForwardCampAreaSidePins(pin, size, usable)

    local pinTexture = "esoui/art/mappins/map_areapin.dds"

    local ForwardCampPinNS
    ForwardCampPinNS = GetControl(
        "Fyr_MM_Scroll_Map_ForwardCamps_Pin" .. tostring(FyrMM.currentForwardCamps) .. "_Blob" .. "_NS")
    if ForwardCampPinNS == nil then
        ForwardCampPinNS = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_ForwardCamps_Pin" ..
                                                            tostring(FyrMM.currentForwardCamps) .. "_Blob" .. "_NS",
            Fyr_MM_Scroll_NS_Map_Pins, CT_TEXTURE)
    else
        ForwardCampPinNS:SetParent(Fyr_MM_Scroll_NS_Map_Pins)
    end

    ForwardCampPinNS.m_PinTag = pin.m_PinTag
    ForwardCampPinNS.questIndex = pin.questIndex
    ForwardCampPinNS.m_PinType = pin.m_PinType
    ForwardCampPinNS.PinToolTipText = pin.PinToolTipText
    ForwardCampPinNS.questName = pin.questName
    ForwardCampPinNS.normalizedX = pin.normalizedX
    ForwardCampPinNS.normalizedY = pin.normalizedY
    ForwardCampPinNS.radius = pin.radius
    ForwardCampPinNS.MapId = pin.MapId
    ForwardCampPinNS:SetTexture(pinTexture)
    -- FyrMM.SetPinSize(ForwardCampPinNS, size, 0)
    ForwardCampPinNS:SetDimensions(size, size)
    ForwardCampPinNS.pinAge = pin.pinAge
    ForwardCampPinNS:SetHidden(not usable)
    ForwardCampPinNS.MM_Tag = 2
    ForwardCampPinNS.primaryPin = pin
    pin.secondaryPin = ForwardCampPinNS

    local color = ZO_MAP_PIN_NORMAL_COLOR
    ForwardCampPinNS:SetColor(color:UnpackRGBA())
    ForwardCampPinNS:SetDrawLayer(3)

    FyrMM.SetPinAnchor(ForwardCampPinNS, ForwardCampPinNS.normalizedX, ForwardCampPinNS.normalizedY,
        Fyr_MM_Scroll_Map_Pins) -- Fyr_MM_Scroll_Map_QuestPins
    ForwardCampPinNS:SetHandler("OnMouseUp", PinOnMouseUp)
    ForwardCampPinNS:SetHandler("OnMouseEnter", PinOnMouseEnter)
    ForwardCampPinNS:SetHandler("OnMouseExit", PinOnMouseExit)

    local ForwardCampPinWE
    ForwardCampPinWE = GetControl(
        "Fyr_MM_Scroll_Map_ForwardCamps_Pin" .. tostring(FyrMM.currentForwardCamps) .. "_Blob" .. "_WE")
    if ForwardCampPinWE == nil then
        ForwardCampPinWE = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_ForwardCamps_Pin" ..
                                                            tostring(FyrMM.currentForwardCamps) .. "_Blob" .. "_WE",
            Fyr_MM_Scroll_WE_Map_Pins, CT_TEXTURE)
    else
        ForwardCampPinWE:SetParent(Fyr_MM_Scroll_WE_Map_Pins)
    end
    ForwardCampPinWE.m_PinTag = pin.m_PinTag
    ForwardCampPinWE.questIndex = pin.questIndex
    ForwardCampPinWE.m_PinType = pin.m_PinType
    ForwardCampPinWE.PinToolTipText = pin.PinToolTipText
    ForwardCampPinWE.questName = pin.questName
    ForwardCampPinWE.normalizedX = pin.normalizedX
    ForwardCampPinWE.normalizedY = pin.normalizedY
    ForwardCampPinWE.radius = pin.radius
    ForwardCampPinWE.MapId = pin.MapId
    ForwardCampPinWE:SetTexture(pinTexture)
    -- FyrMM.SetPinSize(ForwardCampPinWE, size, 0)
    ForwardCampPinWE:SetDimensions(size, size)
    ForwardCampPinWE.pinAge = pin.pinAge
    ForwardCampPinWE:SetHidden(not usable)
    ForwardCampPinWE.MM_Tag = 3
    ForwardCampPinWE.primaryPin = pin
    pin.tertiaryPin = ForwardCampPinWE

    ForwardCampPinWE:SetColor(color:UnpackRGBA())
    ForwardCampPinWE:SetDrawLayer(3)
    FyrMM.SetPinAnchor(ForwardCampPinWE, ForwardCampPinWE.normalizedX, ForwardCampPinWE.normalizedY,
        Fyr_MM_Scroll_Map_Pins) -- Fyr_MM_Scroll_Map_QuestPins
    ForwardCampPinWE:SetHandler("OnMouseUp", PinOnMouseUp)
    ForwardCampPinWE:SetHandler("OnMouseEnter", PinOnMouseEnter)
    ForwardCampPinWE:SetHandler("OnMouseExit", PinOnMouseExit)
end

local function QuestPinExists(pinType, tag, xLoc, yLoc, radius)
    local l
    for i, v in pairs(QuestPins) do
        if v.Pin ~= nil then
            l = v.Pin
            if l.m_PinTag then
                if l.m_PinTag[1] == tag[1] and l.m_PinTag[2] == tag[2] and l.m_PinTag[3] == tag[3] and l.m_PinType ==
                    pinType and l.radius == radius and l.normalizedX == xLoc and l.normalizedY == yLoc then
                    RemoveQuestPin(l)
                end
            end
        end
    end
    return false
end

function FyrMM.CreateQuestPin(pinType, tag, xLoc, yLoc, radius)
    if QuestPinExists(pinType, tag, xLoc, yLoc, radius) then
        return
    end -- dupe elimination
    FyrMM.questPinCount = FyrMM.questPinCount + 1
    local questPin
    local pinData = {}
    local index = GetQuestFreePinIndex()

    questPin = GetControl("Fyr_MM_Scroll_Map_QuestPins_Pin" .. tostring(index))

    if FyrMM.SV.WheelMap and radius > 0 then
        if questPin == nil then
            questPin = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_QuestPins_Pin" .. tostring(index),
                Fyr_MM_Scroll_CW_Map_Pins, CT_TEXTURE)

        else
            questPin:SetParent(Fyr_MM_Scroll_CW_Map_Pins)
        end
    else
        if questPin == nil then
            questPin = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_QuestPins_Pin" .. tostring(index),
                Fyr_MM_Scroll_Map_QuestPins, CT_TEXTURE)
        else
            questPin:SetParent(Fyr_MM_Scroll_Map_QuestPins)
        end
    end

    local properType, pinTexture, size, isAreaPin = FyrMM.GetQuestPinInfo(pinType, GetTrackedIsAssisted(
        TRACK_TYPE_QUEST, tag[1]), tag.isBreadcrumb, radius)
    pinType = properType
    questPin.m_PinTag = tag
    questPin.questIndex = tag[1]
    questPin.m_PinType = properType
    questPin.PinToolTipText = GenerateQuestConditionTooltipLine(tag[1], tag[3], tag[2])
    questPin.questName = GetJournalQuestName(tag[1])
    questPin.normalizedX = xLoc
    questPin.normalizedY = yLoc
    questPin.radius = radius
    questPin.MapId = CurrentMap.MapId

    questPin.pinAge = GetFrameTimeMilliseconds()

    pinData.questIndex = tag[1]
    pinData.questName = GetJournalQuestName(tag[1])
    pinData.conditionText = GenerateQuestConditionTooltipLine(tag[1], tag[3], tag[2])
    pinData.stepIndex = tag[3]
    pinData.conditionIndex = tag[2]
    pinData.pinIndex = index
    pinData.normalizedX = xLoc
    pinData.normalizedY = yLoc
    pinData.radius = radius
    pinData.isBreadcrumb = tag.isBreadcrumb
    pinData.isAssisted = GetTrackedIsAssisted(TRACK_TYPE_QUEST, tag[1])
    pinData.MapId = CurrentMap.MapId
    pinData.Pin = questPin
    pinData.tag = tag

    local questdataIndex = questpinDataExists(pinData, QuestPins)
    if questdataIndex == nil then
        table.insert(QuestPins, pinData)
        questdataIndex = questpinDataExists(pinData, QuestPins)
    else
        QuestPins[questdataIndex] = pinData
    end
    questPin.questdataIndex = questdataIndex
    local questPinData = ZOpinData[pinType]
    if (questPinData ~= nil) then
        local _, pulseTexture, glowTexture = GetPinTexture(pinType, questPin)

        questPin:SetTexture(pinTexture)

        FyrMM.SetPinSize(questPin, size, 0)

        if (pulseTexture) then
            ResetAnimation(questPin, RESET_ANIM_ALLOW_PLAY, LONG_LOOP_COUNT, pulseTexture, overlayTexture,
                ZO_MapPin.DoFinalFadeInAfterPing)
        else
            if (glowTexture) then
                ResetAnimation(questPin, RESET_ANIM_HIDE_CONTROL)
            end
        end
        questPin:SetDrawLevel(zo_max(questPinData.level, 1))
        if (questPinData.isAnimated) then
            PlayTextureAnimation(questPin, LOOP_INDEFINITELY)
        end

        if FyrMM.SV.WheelMap and questPin.radius > 0 then
            questPin.MM_Tag = 1
            CreateQuestAreaSidePins(questPin, pinData.isAssisted)
        else
            if questPin.secondaryPin ~= nil then
                questPin.secondaryPin.MM_Tag = nil
                RemoveQuestPin(questPin.secondaryPin)
            end
            if questPin.tertiaryPin ~= nil then
                questPin.tertiaryPin.MM_Tag = nil
                RemoveQuestPin(questPin.tertiaryPin)
            end
            questPin.MM_Tag = nil
            questPin.primaryPin = nil
            questPin.secondaryPin = nil
            questPin.tertiaryPin = nil
            questPin:SetParent(Fyr_MM_Scroll_Map_QuestPins)
        end

        if questPinData.tint then -- compatibility with addons which modifies questpins colors
            if type(questPinData.tint) ~= "function" then
                questPin:SetColor(questPinData.tint:UnpackRGBA())
            else

                if questPin.m_Pin ~= nil then
                    questPin:SetColor(questPinData.tint(questPin.m_Pin):UnpackRGBA())
                else
                    questPin:SetColor(questPinData.tint(questPin):UnpackRGBA())
                end
            end
        else
            questPin:SetColor(1, 1, 1, 1)
        end

        if isAreaPin then -- apply modified areapin colors from other addons
            if pinData.isAssisted then
                local assistedColor = ZO_MAP_PIN_ASSISTED_COLOR
                questPin:SetColor(assistedColor:UnpackRGBA())
            else
                local color = ZO_MAP_PIN_NORMAL_COLOR
                questPin:SetColor(color:UnpackRGBA())
            end
        end

        questPin:SetHidden(not ZO_WorldMap_IsPinGroupShown(MAP_FILTER_QUESTS))
        FyrMM.SetPinAnchor(questPin, questPin.normalizedX, questPin.normalizedY, Fyr_MM_Scroll_Map_QuestPins)

        if FyrMM.IsValidBorderPin(questPin) then
            FyrMM.CreateBorderPin(questPin)
        end
        if GetTrackedIsAssisted(TRACK_TYPE_QUEST, tag[1]) then
            questPin:SetDrawLayer(3)
        else
            questPin:SetDrawLayer(2)
        end
        questPin:SetHandler("OnMouseUp", PinOnMouseUp)
        questPin:SetHandler("OnMouseEnter", PinOnMouseEnter)
        questPin:SetHandler("OnMouseExit", PinOnMouseExit)
        questPin:SetMouseEnabled(true)
    end
end

local function OnQuestPositionRequestComplete(eventCode, taskId, pinType, xLoc, yLoc, radius, insideCurrentMapWorld,
    isBreadcrumb)
    --	xLoc = zo_round(xLoc * 10000) / 10000
    --	yLoc = zo_round(yLoc * 10000) / 10000
    local tag = CurrentTasks[taskId]
    if (tag and insideCurrentMapWorld) then
        if CurrentTasks[taskId].Fetched then
            zo_callLater(FyrMM.RequestQuestPinUpdate, 100)
            if CurrentTasks[taskId].MapId ~= CurrentMap.MapId then
                CurrentTasks[taskId] = nil
                return
            end
        else
            if CurrentTasks[taskId].ZO_MapVisible then
                return
            end
            local pinData = {}
            pinData.questIndex = tag[1]
            pinData.questName = GetJournalQuestName(tag[1])
            pinData.conditionText = GenerateQuestConditionTooltipLine(tag[1], tag[3], tag[2])
            pinData.stepIndex = tag[3]
            pinData.conditionIndex = tag[2]
            pinData.normalizedX = xLoc
            pinData.normalizedY = yLoc
            pinData.radius = radius
            pinData.isBreadcrumb = isBreadcrumb
            pinData.isAssisted = GetTrackedIsAssisted(TRACK_TYPE_QUEST, tag[1])
            pinData.MapId = CurrentMap.MapId
            pinData.tag = tag
            local requestedquestdataIndex = questpinDataExists(pinData, RequestedQuestPins)
            if requestedquestdataIndex == nil then
                table.insert(RequestedQuestPins, pinData)
            else
                RequestedQuestPins[requestedquestdataIndex] = pinData
            end
            pinData = {}
        end
        if tag.MapId == CurrentMap.MapId then
            tag.isBreadcrumb = isBreadcrumb
            FyrMM.CreateQuestPin(pinType, tag, xLoc, yLoc, radius)
        end
    else
        if isBreadcrumb then
            NeedQuestPinUpdate = true
        end
    end
    if tag then
        CurrentTasks[taskId] = nil
    end
    if tableIsEmpty(CurrentTasks) then
        QuestTasksPending = false
    else
        QuestTasksPending = true
    end
end

local function AddQuestPins(questIndex)
    if (ZO_WorldMap_IsPinGroupShown(MAP_FILTER_QUESTS)) then
        local assisted = GetTrackedIsAssisted(TRACK_TYPE_QUEST, questIndex)
        if (GetJournalQuestIsComplete(questIndex)) then
            local tag = ZO_MapPin.CreateQuestPinTag(questIndex, QUEST_MAIN_STEP_INDEX, 1)
            if not TaskExists(tag) then
                local taskId = FyrMM.RequestJournalQuestConditionAssistance(questIndex, QUEST_MAIN_STEP_INDEX, 1,
                    assisted)
                if taskId ~= nil then
                    FyrMM.LastQuestPinRequest = GetFrameTimeMilliseconds()
                    CurrentTasks[taskId] = {}
                    tag.MapId = CurrentMap.MapId
                    CurrentTasks[taskId] = tag
                    CurrentTasks[taskId].RequestTimeStamp = FyrMM.LastQuestPinRequest
                end
            end
        else
            for stepIndex = QUEST_MAIN_STEP_INDEX, GetJournalQuestNumSteps(questIndex) do
                for conditionIndex = 1, GetJournalQuestNumConditions(questIndex, stepIndex) do
                    local _, _, isFailCondition, isComplete =
                        GetJournalQuestConditionValues(questIndex, stepIndex, conditionIndex)
                    if (not (isFailCondition or isComplete)) then
                        local tag = ZO_MapPin.CreateQuestPinTag(questIndex, stepIndex, conditionIndex)
                        if not TaskExists(tag) then
                            local taskId = FyrMM.RequestJournalQuestConditionAssistance(questIndex, stepIndex,
                                conditionIndex, assisted)
                            if taskId ~= nil then
                                FyrMM.LastQuestPinRequest = GetFrameTimeMilliseconds()
                                CurrentTasks[taskId] = {}
                                tag.MapId = CurrentMap.MapId
                                CurrentTasks[taskId] = tag
                                CurrentTasks[taskId].RequestTimeStamp = FyrMM.LastQuestPinRequest
                            end
                        end
                    end
                end
            end
        end
    end
end

function FyrMM.UpdateQuestPins()
    if FyrMM.Halted then
        return
    end
    if not tableIsEmpty(CurrentTasks) and GetFrameTimeMilliseconds() - FyrMM.LastQuestPinRequest >
        FYRMM_QUEST_PIN_REQUEST_TIMEOUT then
        DestroyTasks()
    end
    if not tableIsEmpty(CurrentTasks) then
        return
    end
    if tableIsEmpty(CurrentTasks) and GetFrameTimeMilliseconds() - FyrMM.LastQuestPinRequest <
        FYRMM_QUEST_PIN_REQUEST_MINIMUM_DELAY then
        return
    end -- anti spam
    FyrMM.questPinCount = GetQuestPinCount()
    QuestPinsUpdating = true
    QuestTasksPending = true
    for i = 1, MAX_JOURNAL_QUESTS do
        if (IsValidQuestIndex(i)) then
            if FyrMM.Reloading then
                return
            end
            AddQuestPins(i)
        end
    end
end

function FyrMM.RequestQuestPinUpdate()
    if Fyr_MM:IsHidden() then
        return
    end -- test 03/05/2023
    NeedQuestPinUpdate = true
    FyrMM.RegisterUpdates() -- fix for questpins not updating after completing quest
end

---------------------------------------------------
-- Keep Network updates
---------------------------------------------------
local function AvAPinOnMouseExit(pin)
    FyrMM.SetTargetScale(pin, 1)
    if pin.tooltipId == 4 then
        ZO_Tooltips_HideTextTooltip()
    else
        ZO_KeepTooltip:SetHidden(true)
    end
end

local function AvAPinOnMouseEnter(pin)
    FyrMM.SetTargetScale(pin, 1.3)
    if not FyrMM.SV.PinTooltips then
        return
    end
    if pin == nil then
        return
    end
    -- if pin.m_PinType == nil then return end
    -- if ZO_MapPin.TOOLTIP_CREATORS[pin.m_PinType] == nil then return end
    -- if not ZO_MapPin.TOOLTIP_CREATORS[pin.m_PinType].tooltip then return end
    -- if ZO_MapPin.TOOLTIP_CREATORS[pin.m_PinType].tooltip ~= ZO_KeepTooltip then return end
    if pin.tooltipId == nil then
        return
    end
    if pin.tooltipId == 1 then
        ZO_KeepTooltip:SetKeep(pin.keepId, ZO_WorldMap_GetBattlegroundQueryType(), 95)
        ZO_KeepTooltip:SetHidden(false)
        ZO_KeepTooltip:ClearAnchors()
        ZO_KeepTooltip:SetAnchor(TOPLEFT, Fyr_MM, TOPRIGHT, 0, 0)
        return
    end
    if pin.tooltipId == 2 then
        ZO_KeepTooltip:SetForwardCamp(pin.m_Pin:GetForwardCampIndex())
        ZO_KeepTooltip:SetHidden(false)
        ZO_KeepTooltip:ClearAnchors()
        ZO_KeepTooltip:SetAnchor(TOPLEFT, Fyr_MM, TOPRIGHT, 0, 0)
        return
    end
    if pin.tooltipId == 3 then
        InitializeTooltip(InformationTooltip, Fyr_MM, TOPLEFT, 0, 0)
        InformationTooltip:AddLine(zo_strformat(SI_AVA_OBJECTIVE_ARTIFACT_TOOLTIP, GetAvAObjectiveInfo(pin.keepId,
            pin.objectiveId, ZO_WorldMap_GetBattlegroundQueryType())))
        return
    end
    if pin.tooltipId == 4 then
        ZO_Tooltips_ShowTextTooltip(self, nil,
            zo_strformat(SI_TOOLTIP_ALLIANCE_RESTRICTED_LINK, GetAllianceName(pin.alliance)))
    end
end

function FyrMM.UpdateKeepNetworkPositions()
    if not IsInAvAZone() or Fyr_MM:IsHidden() or not CurrentMap.ready then
        return
    end
    local mWidth, mHeight = Fyr_MM_Scroll_Map:GetDimensions()
    local Count, l, startX, startY, endX, endY
    for i = 1, 100 do
        l = GetControl("Fyr_MM_Scroll_Map_Links_Link" .. tostring(i))
        if l ~= nil then
            if FyrMM.SV.WheelMap then
                l:SetParent(Fyr_MM_Scroll_CW_Map_Pins)
            else
                l:SetParent(Fyr_MM_Scroll_Map_Links)
            end
            if FyrMM.SV.RotateMap then
                l:ClearAnchors()
                l:SetAnchor(TOPLEFT, Fyr_MM_Scroll, CENTER, GetRotatedPosition(l.startNX, l.startNY))
                l:SetAnchor(BOTTOMRIGHT, Fyr_MM_Scroll, CENTER, GetRotatedPosition(l.endNX, l.endNY))
            else
                startX, startY, endX, endY = zo_round(l.startNX * mWidth - mWidth / 2),
                    zo_round(l.startNY * mHeight - mHeight / 2), zo_round(l.endNX * mWidth - mWidth / 2),
                    zo_round(l.endNY * mHeight - mHeight / 2)
                l:ClearAnchors()
                l:SetAnchor(TOPLEFT, Fyr_MM_Scroll_Map_Links, CENTER, startX, startY)
                l:SetAnchor(BOTTOMRIGHT, Fyr_MM_Scroll_Map_Links, CENTER, endX, endY)
            end
        end
        l = GetControl("Fyr_MM_Scroll_Map_LinksNS_Link" .. tostring(i))
        if l ~= nil then
            if FyrMM.SV.RotateMap then
                l:ClearAnchors()
                l:SetAnchor(TOPLEFT, Fyr_MM_Scroll, CENTER, GetRotatedPosition(l.startNX, l.startNY))
                l:SetAnchor(BOTTOMRIGHT, Fyr_MM_Scroll, CENTER, GetRotatedPosition(l.endNX, l.endNY))
            else
                startX, startY, endX, endY = l.startNX * mWidth - mWidth / 2, l.startNY * mHeight - mHeight / 2,
                    l.endNX * mWidth - mWidth / 2, l.endNY * mHeight - mHeight / 2
                l:ClearAnchors()
                l:SetAnchor(TOPLEFT, Fyr_MM_Scroll_Map_Links, CENTER, startX, startY)
                l:SetAnchor(BOTTOMRIGHT, Fyr_MM_Scroll_Map_Links, CENTER, endX, endY)
            end
        end
        l = GetControl("Fyr_MM_Scroll_Map_LinksWE_Link" .. tostring(i))
        if l ~= nil then
            if FyrMM.SV.RotateMap then
                l:ClearAnchors()
                l:SetAnchor(TOPLEFT, Fyr_MM_Scroll, CENTER, GetRotatedPosition(l.startNX, l.startNY))
                l:SetAnchor(BOTTOMRIGHT, Fyr_MM_Scroll, CENTER, GetRotatedPosition(l.endNX, l.endNY))
            else
                startX, startY, endX, endY = l.startNX * mWidth - mWidth / 2, l.startNY * mHeight - mHeight / 2,
                    l.endNX * mWidth - mWidth / 2, l.endNY * mHeight - mHeight / 2
                l:ClearAnchors()
                l:SetAnchor(TOPLEFT, Fyr_MM_Scroll_Map_Links, CENTER, startX, startY)
                l:SetAnchor(BOTTOMRIGHT, Fyr_MM_Scroll_Map_Links, CENTER, endX, endY)
            end
        end
    end

    Count = Fyr_MM_Scroll_Map_Kill_Locations:GetNumChildren()
    for i = 1, Count do
        l = Fyr_MM_Scroll_Map_Kill_Locations:GetChild(i)
        if l ~= nil then
            if l.normalizedX ~= nil and l.normalizedY ~= nil then
                FyrMM.SetPinAnchor(l, l.normalizedX, l.normalizedY, Fyr_MM_Scroll_Map_Kill_Locations)
            end
        end
    end
    Count = Fyr_MM_Scroll_Map_ForwardCamps:GetNumChildren()
    for i = 1, Count do
        l = Fyr_MM_Scroll_Map_ForwardCamps:GetChild(i)
        if l ~= nil then
            if l.normalizedX ~= nil and l.normalizedY ~= nil then
                FyrMM.SetPinAnchor(l, l.normalizedX, l.normalizedY, Fyr_MM_Scroll_Map_ForwardCamps)
            end
        end
    end
    Count = Fyr_MM_Scroll_Map_Objectives:GetNumChildren()
    for i = 1, Count do
        l = Fyr_MM_Scroll_Map_Objectives:GetChild(i)
        if l ~= nil then
            if l.normalizedX ~= nil and l.normalizedY ~= nil then
                FyrMM.SetPinAnchor(l, l.normalizedX, l.normalizedY, Fyr_MM_Scroll_Map_Objectives)
            end
        end
    end
    for i, v in pairs(KeepIndex) do
        l = GetControl("Fyr_MM_Scroll_Map_Keeps_Keep" .. tostring(v))
        if l ~= nil then
            if l.normalizedX ~= nil and l.normalizedY ~= nil then
                FyrMM.SetPinAnchor(l, l.normalizedX, l.normalizedY, Fyr_MM_Scroll_Map_Keeps)
            end
        end
        l = GetControl("Fyr_MM_Scroll_Map_Keeps_Under_Attack_Keep" .. tostring(i))
        if l ~= nil then
            if l.normalizedX ~= nil and l.normalizedY ~= nil then
                FyrMM.SetPinAnchor(l, l.normalizedX, l.normalizedY, Fyr_MM_Scroll_Map_Keeps)
            end
        end
    end
end

function FyrMM.KeepNetworkCleanupReminder(from, parent)
    if parent == nil then
        return
    end
    local t = GetGameTimeMilliseconds()
    local Count = parent:GetNumChildren()
    for i = from, Count do
        l = parent:GetChild(i)
        if l ~= nil then
            l:ClearAnchors()
            l.nX = nil
            l.nY = nil
            l.m_PinType = nil
            l.tooltipId = nil
            l.continuousUpdate = nil
            l.objectiveId = nil
            l:SetHidden(true)
            l:SetMouseEnabled(false)
            l:SetTexture(nil)
            l:SetDimensions(0, 0)
            PinsList[l:GetName()] = nil
        end
    end
    if FyrMM.DebugMode then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug", "FyrMM.KeepNetworkCleanupReminder " .. parent:GetName() .. " " ..
            tostring(GetGameTimeMilliseconds() - t))
    end
end

function FyrMM.UpdateKeepNetwork()
    if FyrMM.Halted then
        return
    end

    if CurrentMap.MapId < 578 and CurrentMap.MapId > 571 and FyrMM.dirtyLinks then -- clean links once when arriving at base
        KeepIndex = {}
        local LinksDone = false
        local LinksNSDone = false
        local LinksWEDone = false
        local LocksDone = false
        for i = 1, 100 do
            l = GetControl("Fyr_MM_Scroll_Map_Links_Link" .. tostring(i))
            if l ~= nil then
                l:ClearAnchors()
                l:SetHidden(true)
                l:SetMouseEnabled(false)
            else
                LinksDone = true
            end
            l = GetControl("Fyr_MM_Scroll_Map_LinksNS_Link" .. tostring(i))
            if l ~= nil then
                l:ClearAnchors()
                l:SetHidden(true)
                l:SetMouseEnabled(false)
            else
                LinksNSDone = true
            end
            l = GetControl("Fyr_MM_Scroll_Map_LinksWE_Link" .. tostring(i))
            if l ~= nil then
                l:ClearAnchors()
                l:SetHidden(true)
                l:SetMouseEnabled(false)
            else
                LinksWEDone = true
            end
            l = GetControl("Fyr_MM_Scroll_Map_Locks_Lock" .. tostring(i))
            if l ~= nil then
                l:ClearAnchors()
                l.normalizedX = nil
                l.normalizedY = nil
                l:SetHidden(true)
                l:SetMouseEnabled(false)
                -- l:SetTexture(nil)
                l:SetDimensions(0, 0)
            else
                LocksDone = true
            end
            if LinksDone and LinksNSDone and LinksWEDone and LocksDone then
                i = 100
            end
        end
        FyrMM.dirtyLinks = false
    end

    if CurrentMap.MapId == 16 then
        FyrMM.dirtyLinks = true
    end -- set links as dirty when on the Cyrodiil big map

    if CurrentMap.MapId ~= 16 and CurrentMap.MapId ~= 660 and (CurrentMap.MapId > 577 or CurrentMap.MapId < 572) then -- no links & keep display when not on Cyrodiil map, Imperial city, or the 6 bases
        KeepIndex = {}
        local LinksDone = false
        local LinksNSDone = false
        local LinksWEDone = false
        local LocksDone = false
        for i = 1, 100 do
            l = GetControl("Fyr_MM_Scroll_Map_Links_Link" .. tostring(i))
            if l ~= nil then
                l:ClearAnchors()
                l:SetHidden(true)
                l:SetMouseEnabled(false)
            else
                LinksDone = true
            end
            l = GetControl("Fyr_MM_Scroll_Map_LinksNS_Link" .. tostring(i))
            if l ~= nil then
                l:ClearAnchors()
                l:SetHidden(true)
                l:SetMouseEnabled(false)
            else
                LinksNSDone = true
            end
            l = GetControl("Fyr_MM_Scroll_Map_LinksWE_Link" .. tostring(i))
            if l ~= nil then
                l:ClearAnchors()
                l:SetHidden(true)
                l:SetMouseEnabled(false)
            else
                LinksWEDone = true
            end
            l = GetControl("Fyr_MM_Scroll_Map_Locks_Lock" .. tostring(i))
            if l ~= nil then
                l:ClearAnchors()
                l.normalizedX = nil
                l.normalizedY = nil
                l:SetHidden(true)
                l:SetMouseEnabled(false)
                -- l:SetTexture(nil)
                l:SetDimensions(0, 0)
            else
                LocksDone = true
            end
            if LinksDone and LinksNSDone and LinksWEDone and LocksDone then
                i = 100
            end
        end

        if not IsActiveWorldBattleground() then -- if in battleground we continue to display the objectives
            FyrMM.KeepRefreshNeeded = false
            return
        end

    end

    if not IsInAvAZone() or (not FyrMM.Visible or Fyr_MM:IsHidden()) or
        (not CurrentMap.ready and not CurrentMap.mapBuilt) then
        return
    end
    if not FyrMM.KeepRefreshNeeded then
        return
    end

    local t = GetGameTimeMilliseconds()
    local historyPercent = 100.0
    local playerAlliance = GetUnitAlliance("player")
    local bgContext = ZO_WorldMap_GetBattlegroundQueryType()
    local mWidth, mHeight = Fyr_MM_Scroll_Map:GetDimensions()
    FyrMM.KeepNetworkCleanupReminder(1, Fyr_MM_Scroll_Map_Keeps)
    FyrMM.KeepNetworkCleanupReminder(1, Fyr_MM_Scroll_Map_Keeps_Under_Attack)

    for i = 1, GetNumKeeps() do
        if FyrMM.Reloading then
            return
        end
        local keepId, kbgContext = GetKeepKeysByIndex(i)
        KeepIndex[keepId] = nil
        if IsLocalBattlegroundContext(kbgContext) then
            KeepIndex[keepId] = i
            local pinType, normalizedX, normalizedY = GetHistoricalKeepPinInfo(keepId, bgContext, historyPercent)
            --			normalizedX = zo_round(normalizedX * 10000) / 10000
            --			normalizedY = zo_round(normalizedY * 10000) / 10000
            local keepAlliance = GetKeepAlliance(keepId, bgContext)
            local keepUnderAttack = GetKeepUnderAttack(keepId, bgContext)
            local keepUnderAttackPinType = ZO_WorldMap_GetUnderAttackPinForKeepPin(pinType)
            if FyrMM.IsCoordinatesInMap(normalizedX, normalizedY) then
                local uakeepControl = GetControl("Fyr_MM_Scroll_Map_Keeps_Under_Attack_Keep" .. tostring(keepId))
                if keepUnderAttack then
                    if uakeepControl == nil then
                        uakeepControl = WINDOW_MANAGER:CreateControl(
                            "Fyr_MM_Scroll_Map_Keeps_Under_Attack_Keep" .. tostring(keepId),
                            Fyr_MM_Scroll_Map_Keeps_Under_Attack, CT_TEXTURE)
                    end
                    uakeepControl:SetTexture(GetPinTexture(keepUnderAttackPinType, uakeepControl))
                    uakeepControl.nX = normalizedX
                    uakeepControl.nY = normalizedY
                    uakeepControl.keepId = keepId
                    uakeepControl.m_PinType = keepUnderAttackPinType
                    uakeepControl:SetHidden(false)
                    uakeepControl:SetDrawLayer(1)
                    FyrMM.SetPinSize(uakeepControl,
                        ZO_MapPin.PIN_DATA[keepUnderAttackPinType].size * FyrMM.pScalePercent, 0)
                    FyrMM.SetPinAnchor(uakeepControl, normalizedX, normalizedY, Fyr_MM_Scroll_Map_Keeps_Under_Attack)
                else
                    if uakeepControl ~= nil then
                        uakeepControl:ClearAnchors()
                        uakeepControl.nX = nil
                        uakeepControl.nY = nil
                        uakeepControl.m_PinType = nil
                        uakeepControl:SetHidden(true)
                        uakeepControl:SetMouseEnabled(false)
                        uakeepControl:SetTexture(nil)
                        uakeepControl:SetDimensions(0, 0)
                        PinsList[uakeepControl:GetName()] = nil
                    end
                end

                local keepControl = GetControl("Fyr_MM_Scroll_Map_Keeps_Keep" .. tostring(i))
                if keepControl == nil then
                    keepControl = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_Keeps_Keep" .. tostring(i),
                        Fyr_MM_Scroll_Map_Keeps, CT_TEXTURE)
                    keepControl:SetHandler("OnMouseEnter", AvAPinOnMouseEnter)
                    keepControl:SetHandler("OnMouseExit", AvAPinOnMouseExit)
                end
                keepControl.nX = normalizedX
                keepControl.nY = normalizedY
                keepControl:SetTexture(GetPinTexture(pinType, keepControl))
                keepControl.keepId = keepId
                keepControl.m_PinType = pinType
                keepControl:SetDrawLayer(3)
                FyrMM.SetPinSize(keepControl, ZO_MapPin.PIN_DATA[pinType].size * FyrMM.pScalePercent, 0)
                keepControl:SetHidden(false)
                FyrMM.SetPinAnchor(keepControl, normalizedX, normalizedY, Fyr_MM_Scroll_Map_Keeps)
                local pinTooltipInfo = ZO_MapPin.TOOLTIP_CREATORS[pinType]
                keepControl.tooltipId = 1 -- Keeps
                keepControl:SetMouseEnabled(true)
            else
                keepControl = GetControl("Fyr_MM_Scroll_Map_Keeps_Keep" .. tostring(keepId))
                uakeepControl = GetControl("Fyr_MM_Scroll_Map_Keeps_Keep" .. tostring(keepId))
                if keepControl ~= nil then
                    keepControl:SetHidden(true)
                end
                if uakeepControl ~= nil then
                    uakeepControl:SetHidden(true)
                end
            end
        end
    end

    local numForwardCamps = GetNumForwardCamps(bgContext)
    FyrMM.currentForwardCamps = 0
    FyrMM.KeepNetworkCleanupReminder(numForwardCamps + 1, Fyr_MM_Scroll_Map_ForwardCamps)
    for i = 1, numForwardCamps do
        local pinType, normalizedX, normalizedY, radius, usable = GetForwardCampPinInfo(bgContext, i)
        --		normalizedX = zo_round(normalizedX * 10000) / 10000
        --		normalizedY = zo_round(normalizedY * 10000) / 10000
        if (normalizedX > 0 and normalizedX < 1.0001 and normalizedY > 0 and normalizedY < 1.0001) then
            if not usable then
                radius = 0
            end
            FyrMM.currentForwardCamps = FyrMM.currentForwardCamps + 1
            local forwardCampControl = GetControl("Fyr_MM_Scroll_Map_ForwardCamps_Pin" ..
                                                      tostring(FyrMM.currentForwardCamps))
            if forwardCampControl == nil then
                forwardCampControl = WINDOW_MANAGER:CreateControl(
                    "Fyr_MM_Scroll_Map_ForwardCamps_Pin" .. tostring(FyrMM.currentForwardCamps),
                    Fyr_MM_Scroll_Map_ForwardCamps, CT_TEXTURE)
                forwardCampControl:SetHandler("OnMouseEnter", AvAPinOnMouseEnter)
                forwardCampControl:SetHandler("OnMouseExit", AvAPinOnMouseExit)
            end

            local forwardCampBlobControl = GetControl("Fyr_MM_Scroll_Map_ForwardCamps_Pin" ..
                                                          tostring(FyrMM.currentForwardCamps) .. "_Blob")
            if forwardCampBlobControl == nil then
                forwardCampBlobControl = WINDOW_MANAGER:CreateControl(
                    "Fyr_MM_Scroll_Map_ForwardCamps_Pin" .. tostring(FyrMM.currentForwardCamps) .. "_Blob",
                    Fyr_MM_Scroll_Map_ForwardCamps, CT_TEXTURE)
            end

            local pin = ZO_Object.New(ZO_MapPin)
            forwardCampControl.nX = normalizedX
            forwardCampControl.nY = normalizedY
            forwardCampBlobControl.nX = normalizedX
            forwardCampBlobControl.nY = normalizedY
            pin.normalizedX = normalizedX
            pin.normalizedY = normalizedY
            pin.radius = radius
            pin.m_PinType = pinType
            pin.m_PinTag = ZO_MapPin.CreateForwardCampPinTag(i)
            forwardCampBlobControl.m_Pin = pin
            forwardCampBlobControl:SetDrawLayer(3)
            forwardCampBlobControl:SetTexture("esoui/art/mappins/map_areapin.dds")
            local color = ZO_MAP_PIN_NORMAL_COLOR
            forwardCampBlobControl:SetColor(color:UnpackRGBA())
            forwardCampControl.m_Pin = pin
            forwardCampControl.m_PinType = pinType
            forwardCampControl:SetDrawLayer(3)
            forwardCampControl:SetTexture(ZO_MapPin.PIN_DATA[pinType].texture)
            local campIconSize = 64 * FyrMM.pScalePercent
            local campBlobSize = mHeight * radius * 2
            FyrMM.SetPinSize(forwardCampControl, campIconSize, 0)
            forwardCampBlobControl:SetDimensions(campBlobSize, campBlobSize)
            if FyrMM.SV.WheelMap then
                forwardCampBlobControl:SetParent(Fyr_MM_Scroll_CW_Map_Pins)
                CreateForwardCampAreaSidePins(pin, campBlobSize, usable)
            end

            forwardCampControl:SetHidden(false)
            forwardCampBlobControl:SetHidden(not usable)
            FyrMM.SetPinAnchor(forwardCampControl, normalizedX, normalizedY, Fyr_MM_Scroll_Map_ForwardCamps)
            FyrMM.SetPinAnchor(forwardCampBlobControl, normalizedX, normalizedY, Fyr_MM_Scroll_Map_ForwardCamps)
            forwardCampControl.tooltipId = 2
            forwardCampControl:SetMouseEnabled(true)

        end
    end

    --- Kill Locations (Battles)
    ---
    local killPinCount = 0
    FyrMM.KeepNetworkCleanupReminder(GetNumKillLocations() + 1, Fyr_MM_Scroll_Map_Kill_Locations)
    for i = 1, GetNumKillLocations() do
        local pinType, normalizedX, normalizedY = GetKillLocationPinInfo(i)
        --		normalizedX = zo_round(normalizedX * 10000) / 10000
        --		normalizedY = zo_round(normalizedY * 10000) / 10000
        if (pinType ~= MAP_PIN_TYPE_INVALID) then
            if (ZO_WorldMap_IsPinGroupShown(MAP_FILTER_KILL_LOCATIONS)) then
                if ((normalizedX < 1.001 or normalizedY < 1.001) and (normalizedX > -.001 or normalizedY > -.001)) then
                    killPinCount = killPinCount + 1
                    local killPin = GetControl("Fyr_MM_Scroll_Map_Kill_Locations_Pin" .. tostring(killPinCount))
                    if killPin == nil then
                        killPin = WINDOW_MANAGER:CreateControl(
                            "Fyr_MM_Scroll_Map_Kill_Locations_Pin" .. tostring(killPinCount),
                            Fyr_MM_Scroll_Map_Kill_Locations, CT_TEXTURE)
                    end
                    local killPinSize = ZO_MapPin.PIN_DATA[pinType].size * FyrMM.pScalePercent
                    killPin:SetTexture(ZO_MapPin.PIN_DATA[pinType].texture)
                    FyrMM.SetPinSize(killPin, killPinSize, 0)
                    local pin = ZO_Object.New(ZO_MapPin)
                    pin.normalizedX = normalizedX
                    pin.normalizedY = normalizedY
                    pin.m_PinType = pinType
                    pin.m_PinTag = i
                    killPin.m_Pin = pin
                    killPin.m_PinType = pinType
                    killPin.nX = normalizedX
                    killPin.nY = normalizedY
                    killPin:SetDrawLayer(3)
                    killPin:SetHidden(false)
                    FyrMM.SetPinAnchor(killPin, normalizedX, normalizedY, Fyr_MM_Scroll_Map_Kill_Locations)
                end
            end
        end
    end

    local r, g, b
    local numLinks = GetNumKeepTravelNetworkLinks(bgContext)
    local linkControl, linkControlNS, linkControlWE

    for linkIndex = 1, numLinks do
        local linkType, linkOwner, restrictedToAlliance, startNX, startNY, endNX, endNY =
            GetHistoricalKeepTravelNetworkLinkInfo(linkIndex, bgContext, historyPercent)
        --		startNX = zo_round(startNX * 10000) / 10000
        --		startNY = zo_round(startNY * 10000) / 10000
        --		endNX = zo_round(endNX * 10000) / 10000
        --		endNY = zo_round(endNY * 10000) / 10000
        if startNX < 1 or startNY < 1 or endNX < 1 or endNY < 1 then
            local startX, startY, endX, endY = zo_round(startNX * mWidth - mWidth / 2),
                zo_round(startNY * mHeight - mHeight / 2), zo_round(endNX * mWidth - mWidth / 2),
                zo_round(endNY * mHeight - mHeight / 2)
            local linkControl = GetControl("Fyr_MM_Scroll_Map_Links_Link" .. tostring(linkIndex))
            if linkControl == nil then
                linkControl = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_Links_Link" .. tostring(linkIndex),
                    Fyr_MM_Scroll_Map_Links, CT_LINE)
            end
            local linkControlNS = GetControl("Fyr_MM_Scroll_Map_LinksNS_Link" .. tostring(linkIndex))
            if linkControlNS == nil then
                linkControlNS = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_LinksNS_Link" .. tostring(linkIndex),
                    Fyr_MM_Scroll_NS_Map_Pins, CT_LINE)
            end
            local linkControlWE = GetControl("Fyr_MM_Scroll_Map_LinksWE_Link" .. tostring(linkIndex))
            if GetControl("Fyr_MM_Scroll_Map_LinksWE_Link" .. tostring(linkIndex)) == nil then
                linkControlWE = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_LinksWE_Link" .. tostring(linkIndex),
                    Fyr_MM_Scroll_WE_Map_Pins, CT_LINE)
            end
            linkControl.startNX = startNX
            linkControl.startNY = startNY
            linkControl.endNX = endNX
            linkControl.endNY = endNY
            linkControl:SetHidden(false)
            linkControl:SetDrawLayer(1)

            linkControlNS.startNX = startNX
            linkControlNS.startNY = startNY
            linkControlNS.endNX = endNX
            linkControlNS.endNY = endNY
            linkControlNS:SetHidden(false)
            linkControlNS:SetDrawLayer(1)

            linkControlWE.startNX = startNX
            linkControlWE.startNY = startNY
            linkControlWE.endNX = endNX
            linkControlWE.endNY = endNY
            linkControlWE:SetHidden(false)
            linkControlWE:SetDrawLayer(1)

            local linkThickness = math.floor((zo_round(80 * FyrMM.pScalePercent) / 10) / 2) * 2
            if linkThickness < 6 then
                linkThickness = 6
            end
            linkControl:SetThickness(linkThickness)
            linkControlNS:SetThickness(linkThickness)
            linkControlWE:SetThickness(linkThickness)

            if (GetKeepFastTravelInteraction()) then
                if (linkOwner == playerAlliance) then
                    if (linkType == FAST_TRAVEL_LINK_ACTIVE) then
                        linkControl:SetColor(ZO_KeepNetwork.LINK_READY_COLOR:UnpackRGBA())
                        linkControlNS:SetColor(ZO_KeepNetwork.LINK_READY_COLOR:UnpackRGBA())
                        linkControlWE:SetColor(ZO_KeepNetwork.LINK_READY_COLOR:UnpackRGBA())
                    else
                        linkControl:SetColor(ZO_KeepNetwork.LINK_NOT_READY_COLOR:UnpackRGBA())
                        linkControlNS:SetColor(ZO_KeepNetwork.LINK_NOT_READY_COLOR:UnpackRGBA())
                        linkControlWE:SetColor(ZO_KeepNetwork.LINK_NOT_READY_COLOR:UnpackRGBA())
                    end
                else
                    r, g, b = GetAllianceColor(linkOwner):UnpackRGB()
                    linkControl:SetColor(r, g, b, ZO_KeepNetwork.ALLIANCE_OWNER_ALPHA[linkOwner])
                    linkControlNS:SetColor(r, g, b, ZO_KeepNetwork.ALLIANCE_OWNER_ALPHA[linkOwner])
                    linkControlWE:SetColor(r, g, b, ZO_KeepNetwork.ALLIANCE_OWNER_ALPHA[linkOwner])
                end
            else
                r, g, b = GetAllianceColor(linkOwner):UnpackRGB()
                linkControl:SetColor(r, g, b, ZO_KeepNetwork.ALLIANCE_OWNER_ALPHA[linkOwner])
                linkControlNS:SetColor(r, g, b, ZO_KeepNetwork.ALLIANCE_OWNER_ALPHA[linkOwner])
                linkControlWE:SetColor(r, g, b, ZO_KeepNetwork.ALLIANCE_OWNER_ALPHA[linkOwner])
            end
            if (linkType == FAST_TRAVEL_LINK_IN_COMBAT) then
                linkControl:SetTexture("EsoUI/Art/AvA/AvA_transitLine_dashed.dds")
                linkControlNS:SetTexture("EsoUI/Art/AvA/AvA_transitLine_dashed.dds")
                linkControlWE:SetTexture("EsoUI/Art/AvA/AvA_transitLine_dashed.dds")
            else
                linkControl:SetTexture("EsoUI/Art/AvA/AvA_transitLine.dds")
                linkControlNS:SetTexture("EsoUI/Art/AvA/AvA_transitLine.dds")
                linkControlWE:SetTexture("EsoUI/Art/AvA/AvA_transitLine.dds")
            end
            if FyrMM.SV.WheelMap then
                linkControl:SetParent(Fyr_MM_Scroll_CW_Map_Pins)
            else
                linkControl:SetParent(Fyr_MM_Scroll_Map_Links)
            end

            linkControl:ClearAnchors()
            linkControlNS:ClearAnchors()
            linkControlWE:ClearAnchors()

            if FyrMM.SV.RotateMap then
                linkControl:SetAnchor(TOPLEFT, Fyr_MM_Scroll, CENTER, GetRotatedPosition(startNX, startNY))
                linkControl:SetAnchor(BOTTOMRIGHT, Fyr_MM_Scroll, CENTER, GetRotatedPosition(endNX, endNY))
                linkControlNS:SetAnchor(TOPLEFT, Fyr_MM_Scroll, CENTER, GetRotatedPosition(startNX, startNY))
                linkControlNS:SetAnchor(BOTTOMRIGHT, Fyr_MM_Scroll, CENTER, GetRotatedPosition(endNX, endNY))
                linkControlWE:SetAnchor(TOPLEFT, Fyr_MM_Scroll, CENTER, GetRotatedPosition(startNX, startNY))
                linkControlWE:SetAnchor(BOTTOMRIGHT, Fyr_MM_Scroll, CENTER, GetRotatedPosition(endNX, endNY))
            else
                linkControl:SetAnchor(TOPLEFT, Fyr_MM_Scroll_Map_Links, CENTER, startX, startY)
                linkControl:SetAnchor(BOTTOMRIGHT, Fyr_MM_Scroll_Map_Links, CENTER, endX, endY)
                linkControlNS:SetAnchor(TOPLEFT, Fyr_MM_Scroll_Map_Links, CENTER, startX, startY)
                linkControlNS:SetAnchor(BOTTOMRIGHT, Fyr_MM_Scroll_Map_Links, CENTER, endX, endY)
                linkControlWE:SetAnchor(TOPLEFT, Fyr_MM_Scroll_Map_Links, CENTER, startX, startY)
                linkControlWE:SetAnchor(BOTTOMRIGHT, Fyr_MM_Scroll_Map_Links, CENTER, endX, endY)
            end

            -- Link Locks
            if (linkOwner == ALLIANCE_NONE and restrictedToAlliance ~= ALLIANCE_NONE) then
                local lockControl = GetControl("Fyr_MM_Scroll_Map_Locks_Lock" .. tostring(linkIndex))
                if lockControl == nil then
                    lockControl = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_Locks_Lock" .. tostring(linkIndex),
                        Fyr_MM_Scroll_Map_Locks, CT_TEXTURE)
                    lockControl:SetAlpha(0.4)
                end
                lockControl:SetTexture("/esoui/art/ava/ava_transitlocked.dds")
                FyrMM.SetPinSize(lockControl, 16 * FyrMM.pScalePercent, 0)
                lockControl:SetHidden(false)
                r, g, b = GetAllianceColor(restrictedToAlliance):UnpackRGB()
                lockControl:SetColor(r, g, b, 1)
                lockControl.alliance = restrictedToAlliance
                lockControl:SetDrawLayer(2)

                if FyrMM.SV.WheelMap then
                    lockControl:SetParent(Fyr_MM_Scroll_CW_Map_Pins)
                else
                    lockControl:SetParent(Fyr_MM_Scroll_Map_Links)
                end
                lockControl:ClearAnchors()
                lockControl:SetAnchor(CENTER, linkControl, CENTER, 0, 0)

                lockControl.Lock = true
                lockControl.tooltipId = 4
                lockControl:SetHandler("OnMouseEnter", AvAPinOnMouseEnter)
                lockControl:SetHandler("OnMouseExit", AvAPinOnMouseExit)
                lockControl:SetMouseEnabled(true)
            end

        end
    end

    if FyrMM.DebugMode then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug",
            "FyrMM.UpdateKeepNetwork " .. tostring(GetGameTimeMilliseconds() - t))
    end
    FyrMM.KeepRefreshNeeded = false
end

function FyrMM.RequestKeepRefresh()
    FyrMM.KeepRefreshNeeded = true
    FyrMM.lastKeepRefresh = FyrMM.lastKeepRefresh or 0
    if not IsInAvAZone() or FyrMM.SV.HidePvPPins then
        return
    end
    if FyrMM.lastKeepRefresh ~= GetSecondsSinceMidnight() or FyrMM.lastKeepRefresh == 0 then
        FyrMM.UpdateKeepNetwork()
        FyrMM.lastKeepRefresh = GetSecondsSinceMidnight()
        -- d("refreshing keep network "..GetTimeString())
    end
    if FyrMM.DebugMode then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug", "Keep refresh request ")
    end
end

function FyrMM.UpdateAVABGobjectives()

    if FyrMM.Halted or FyrMM.SV.HidePvPPins then
        return
    end
    if (not IsInAvAZone() and not IsActiveWorldBattleground()) or (not FyrMM.Visible or Fyr_MM:IsHidden()) or
        (not CurrentMap.ready and not CurrentMap.mapBuilt) then
        return
    end
    if FyrMM.UpdateAVABGobjectivesBusy then
        return
    end

    FyrMM.UpdateAVABGobjectivesBusy = true

    local bgContext = ZO_WorldMap_GetBattlegroundQueryType()
    local numObjectives = GetNumObjectives()
    FyrMM.KeepNetworkCleanupReminder(1, Fyr_MM_Scroll_Map_Objectives)

    for i = 1, numObjectives do
        local okeepId, objectiveId, obgContext = GetAvAObjectiveKeysByIndex(i)
        if (IsLocalBattlegroundContext(obgContext)) then
            if ZO_WorldMap_IsObjectiveShown(okeepId, objectiveId, obgContext) and
                DoesObjectiveExist(okeepId, objectiveId, obgContext) then
                local opinType, currentX, currentY, continuousUpdate =
                    GetAvAObjectivePinInfo(okeepId, objectiveId, bgContext)
                local spawnPinType, spawnX, spawnY = GetObjectiveSpawnPinInfo(okeepId, objectiveId, bgContext)
                local returnPinType, returnX, returnY, returnContinuousUpdate =
                    GetObjectiveReturnPinInfo(okeepId, objectiveId, bgContext)
                local visible = IsObjectiveObjectVisible(okeepId, objectiveId, bgContext)

                local alliance = GetCarryableObjectiveHoldingAllianceInfo(okeepId, objectiveId, bgContext)
                local auraR, auraG, auraB, auraA = GetAllianceColor(alliance):UnpackRGBA()

                if spawnPinType ~= MAP_PIN_TYPE_INVALID and visible then
                    local objectiveSpawnControl = GetControl(
                        "Fyr_MM_Scroll_Map_Objectives_ObjectiveSpawn" .. tostring(objectiveId))
                    if objectiveSpawnControl == nil then
                        objectiveSpawnControl = WINDOW_MANAGER:CreateControl(
                            "Fyr_MM_Scroll_Map_Objectives_ObjectiveSpawn" .. tostring(objectiveId),
                            Fyr_MM_Scroll_Map_Objectives, CT_TEXTURE)
                        objectiveSpawnControl:SetHandler("OnMouseEnter", AvAPinOnMouseEnter)
                        objectiveSpawnControl:SetHandler("OnMouseExit", PinOnMouseExit)
                    end
                    objectiveSpawnControl.nX = spawnX
                    objectiveSpawnControl.nY = spawnY
                    objectiveSpawnControl.m_PinType = spawnPinType
                    objectiveSpawnControl:SetDrawLayer(3)
                    objectiveSpawnControl:SetDrawLevel(ZO_MapPin.PIN_DATA[spawnPinType].level)
                    objectiveSpawnControl:SetTexture(GetPinTexture(spawnPinType, objectiveSpawnControl))
                    FyrMM.SetPinSize(objectiveSpawnControl, ZO_MapPin.PIN_DATA[spawnPinType].size * FyrMM.pScalePercent,
                        0)
                    objectiveSpawnControl:SetHidden(false)
                    FyrMM.SetPinAnchor(objectiveSpawnControl, spawnX, spawnY, Fyr_MM_Scroll_Map_Objectives)
                    objectiveSpawnControl.keepId = okeepId
                    objectiveSpawnControl.objectiveId = objectiveId
                    objectiveSpawnControl.tooltipId = 3
                    objectiveSpawnControl:SetMouseEnabled(true)

                    if FyrMM.SV.borderAVABG then -- create borderpin
                        AVABGobjectivesToBorderPins = AVABGobjectivesToBorderPins or {}

                        local playerBGalliance = GetUnitBattlegroundAlliance("player")

                        -- chaosball base & your "capture the relic" base
                        local display = false
                        if spawnPinType == MAP_PIN_TYPE_BGPIN_MURDERBALL_SPAWN_NEUTRAL then
                            display = true
                        elseif spawnPinType == MAP_PIN_TYPE_BGPIN_FLAG_SPAWN_FIRE_DRAKES and playerBGalliance == 1 then
                            display = true
                        elseif spawnPinType == MAP_PIN_TYPE_BGPIN_FLAG_SPAWN_PIT_DAEMONS and playerBGalliance == 2 then
                            display = true
                        elseif spawnPinType == MAP_PIN_TYPE_BGPIN_FLAG_SPAWN_STORM_LORDS and playerBGalliance == 3 then
                            display = true
                        end

                        if objectiveSpawnControl and display then
                            objectiveSpawnControl.AVABGtype = "spawn"
                            AVABGobjectivesToBorderPins["spawn" .. tostring(objectiveId)] = objectiveSpawnControl
                        end

                    end

                end

                if returnPinType ~= MAP_PIN_TYPE_INVALID and visible then -- Diamond shape icon
                    local objectiveReturnControl = GetControl(
                        "Fyr_MM_Scroll_Map_Objectives_ObjectiveReturn" .. tostring(objectiveId))
                    if objectiveReturnControl == nil then
                        objectiveReturnControl = WINDOW_MANAGER:CreateControl(
                            "Fyr_MM_Scroll_Map_Objectives_ObjectiveReturn" .. tostring(objectiveId),
                            Fyr_MM_Scroll_Map_Objectives, CT_TEXTURE)
                        objectiveReturnControl:SetHandler("OnMouseEnter", AvAPinOnMouseEnter)
                        objectiveReturnControl:SetHandler("OnMouseExit", PinOnMouseExit)
                    end
                    objectiveReturnControl.nX = currentX
                    objectiveReturnControl.nY = currentY
                    objectiveReturnControl.m_PinType = returnPinType
                    objectiveReturnControl.continuousUpdate = returnContinuousUpdate
                    objectiveReturnControl:SetDrawLayer(3)
                    objectiveReturnControl:SetDrawLevel(ZO_MapPin.PIN_DATA[returnPinType].level)
                    objectiveReturnControl:SetTexture(GetPinTexture(returnPinType, objectiveReturnControl))
                    FyrMM.SetPinSize(objectiveReturnControl,
                        ZO_MapPin.PIN_DATA[returnPinType].size * FyrMM.pScalePercent, 0)
                    objectiveReturnControl:SetHidden(false)
                    FyrMM.SetPinAnchor(objectiveReturnControl, currentX, currentY, Fyr_MM_Scroll_Map_Objectives)
                    objectiveReturnControl.keepId = okeepId
                    objectiveReturnControl.objectiveId = objectiveId
                    objectiveReturnControl.tooltipId = 3
                    objectiveReturnControl:SetMouseEnabled(true)

                    -- if FyrMM.SV.borderAVABG then -- create borderpin
                    -- AVABGobjectivesToBorderPins = AVABGobjectivesToBorderPins or {}
                    -- if objectiveReturnControl then
                    -- objectiveReturnControl.AVABGtype = "return"
                    -- AVABGobjectivesToBorderPins["return"..tostring(objectiveId)] = objectiveReturnControl
                    -- end
                    -- end

                end

                if opinType ~= MAP_PIN_TYPE_INVALID and visible then
                    local objectiveControl = GetControl("Fyr_MM_Scroll_Map_Objectives_Objective" ..
                                                            tostring(objectiveId))
                    if objectiveControl == nil then
                        objectiveControl = WINDOW_MANAGER:CreateControl(
                            "Fyr_MM_Scroll_Map_Objectives_Objective" .. tostring(objectiveId),
                            Fyr_MM_Scroll_Map_Objectives, CT_TEXTURE)
                        objectiveControl:SetHandler("OnMouseEnter", AvAPinOnMouseEnter)
                        objectiveControl:SetHandler("OnMouseExit", PinOnMouseExit)
                    end
                    objectiveControl.nX = currentX
                    objectiveControl.nY = currentY
                    objectiveControl.m_PinType = opinType
                    objectiveControl.continuousUpdate = continuousUpdate
                    objectiveControl:SetDrawLayer(3)
                    objectiveControl:SetDrawLevel(ZO_MapPin.PIN_DATA[opinType].level)
                    objectiveControl:SetTexture(GetPinTexture(opinType, objectiveControl))
                    FyrMM.SetPinSize(objectiveControl, (ZO_MapPin.PIN_DATA[opinType].size * FyrMM.pScalePercent), 0)
                    objectiveControl:SetHidden(false)
                    FyrMM.SetPinAnchor(objectiveControl, currentX, currentY, Fyr_MM_Scroll_Map_Objectives)
                    objectiveControl.keepId = okeepId
                    objectiveControl.objectiveId = objectiveId
                    objectiveControl.tooltipId = 3
                    objectiveControl:SetMouseEnabled(true)

                    if FyrMM.SV.borderAVABG then -- create borderpin
                        AVABGobjectivesToBorderPins = AVABGobjectivesToBorderPins or {}
                        if objectiveControl then
                            objectiveControl.AVABGtype = "objective"
                            AVABGobjectivesToBorderPins["objective" .. tostring(objectiveId)] = objectiveControl
                        end
                    end

                    if objectiveControl then
                        local auraPinType, red, green, blue = GetObjectiveAuraPinInfo(okeepId, objectiveId, bgContext)
                        if auraPinType ~= MAP_PIN_TYPE_INVALID and visible then
                            local objectiveAuraControl = GetControl(
                                "Fyr_MM_Scroll_Map_Objectives_ObjectiveAura" .. tostring(objectiveId))
                            if objectiveAuraControl == nil then
                                objectiveAuraControl = WINDOW_MANAGER:CreateControl(
                                    "Fyr_MM_Scroll_Map_Objectives_ObjectiveAura" .. tostring(objectiveId),
                                    Fyr_MM_Scroll_Map_Objectives, CT_TEXTURE)
                                objectiveAuraControl:SetHandler("OnMouseEnter", AvAPinOnMouseEnter)
                                objectiveAuraControl:SetHandler("OnMouseExit", PinOnMouseExit)
                            end
                            local auraTag = ZO_MapPin.CreateObjectivePinTag(okeepId, objectiveId, bgContext)
                            objectiveAuraControl.nX = currentX
                            objectiveAuraControl.nY = currentY
                            objectiveAuraControl.m_PinType = auraPinType
                            objectiveAuraControl.m_PinTag = auraTag
                            objectiveAuraControl.continuousUpdate = continuousUpdate
                            objectiveAuraControl:SetDrawLayer(3)
                            objectiveAuraControl:SetDrawLevel(ZO_MapPin.PIN_DATA[auraPinType].level)
                            objectiveAuraControl:SetTexture(GetPinTexture(auraPinType, objectiveAuraControl))
                            FyrMM.SetPinSize(objectiveAuraControl,
                                (ZO_MapPin.PIN_DATA[auraPinType].size * FyrMM.pScalePercent), 0)
                            objectiveAuraControl:SetHidden(false)
                            FyrMM.SetPinAnchor(objectiveAuraControl, currentX, currentY, Fyr_MM_Scroll_Map_Objectives)
                            objectiveAuraControl.keepId = okeepId
                            objectiveAuraControl.objectiveId = objectiveId
                            objectiveAuraControl.tooltipId = 3
                            objectiveAuraControl:SetColor(red, green, blue)
                            objectiveAuraControl.tint = ZO_ColorDef:New(red, green, blue)
                            objectiveAuraControl:SetMouseEnabled(true)

                            if FyrMM.SV.borderAVABG then --  create borderpin
                                AVABGobjectivesToBorderPins = AVABGobjectivesToBorderPins or {}
                                if objectiveAuraControl then
                                    objectiveAuraControl.AVABGtype = "aura"
                                    AVABGobjectivesToBorderPins["aura" .. tostring(objectiveId)] = objectiveAuraControl
                                end
                            end

                        elseif visible and ZO_MapPin.PIN_DATA[opinType].level == 105 and alliance ~= ALLIANCE_NONE then -- let's make an aura pin for elder scrolls which doesn't exist in game :)

                            local objectiveAuraControl = GetControl(
                                "Fyr_MM_Scroll_Map_Objectives_ObjectiveAura" .. tostring(objectiveId))
                            if objectiveAuraControl == nil then
                                objectiveAuraControl = WINDOW_MANAGER:CreateControl(
                                    "Fyr_MM_Scroll_Map_Objectives_ObjectiveAura" .. tostring(objectiveId),
                                    Fyr_MM_Scroll_Map_Objectives, CT_TEXTURE)
                                objectiveAuraControl:SetHandler("OnMouseEnter", AvAPinOnMouseEnter)
                                objectiveAuraControl:SetHandler("OnMouseExit", PinOnMouseExit)
                            end
                            local auraTag = ZO_MapPin.CreateObjectivePinTag(okeepId, objectiveId, bgContext)
                            objectiveAuraControl.nX = currentX
                            objectiveAuraControl.nY = currentY
                            objectiveAuraControl.m_PinType = 9999
                            objectiveAuraControl.m_PinTag = auraTag
                            objectiveAuraControl.continuousUpdate = continuousUpdate
                            objectiveAuraControl:SetDrawLayer(3)
                            objectiveAuraControl:SetDrawLevel(104)
                            objectiveAuraControl:SetTexture("MiniMap/Textures/scroll_aura.dds")
                            FyrMM.SetPinSize(objectiveAuraControl, (64 * FyrMM.pScalePercent), 0)
                            objectiveAuraControl:SetHidden(false)
                            FyrMM.SetPinAnchor(objectiveAuraControl, currentX, currentY, Fyr_MM_Scroll_Map_Objectives)
                            objectiveAuraControl.keepId = okeepId
                            objectiveAuraControl.objectiveId = objectiveId
                            objectiveAuraControl.tooltipId = 3
                            objectiveAuraControl:SetColor(auraR, auraG, auraB, auraA)
                            objectiveAuraControl.tint = ZO_ColorDef:New(auraR, auraG, auraB, auraA)
                            objectiveAuraControl:SetMouseEnabled(true)

                            if FyrMM.SV.borderAVABG then --  create borderpin
                                AVABGobjectivesToBorderPins = AVABGobjectivesToBorderPins or {}
                                if objectiveAuraControl then
                                    objectiveAuraControl.AVABGtype = "aura"
                                    AVABGobjectivesToBorderPins["aura" .. tostring(objectiveId)] = objectiveAuraControl
                                end
                            end

                        end
                    end

                end

            end
        end
    end
    FyrMM.UpdateAVABGobjectivesBusy = false
end

-------------------------------------------------------------
-- Miscelaneous functions
-------------------------------------------------------------
function FyrMM.IsCoordinatesInMap(nX, nY)
    if nX <= 1 and nX >= 0 and nY <= 1 and nY >= 0 then
        return true
    else
        return false
    end
end

function FyrMM.SetCurrentMapZoom(newZoom)
    CurrentMap.ZoomLevel = newZoom
    if FyrMM.SV.ZoomTable ~= nil then

        if not CurrentMap.filename or CurrentMap.filename == "" then
            local filename, _, _ = GetCurrentMapTextureFileInfo()
            CurrentMap.filename = string.lower(filename)
        end

        FyrMM.SV.ZoomTable[CurrentMap.filename] = newZoom
        -- d("set new zoom to "..newZoom.." for "..CurrentMap.filename )
    end
    Fyr_MM_ZoomLevel:SetText(newZoom)
end

function FyrMM.UnregisterUpdates(fromRegister)
    if FyrMM.HaltTimeOffset + 1000 > GetFrameTimeMilliseconds() then
        return
    end
    -- if not fromRegister then d("unregister updates") end
    FyrMM.Halted = true
    FyrMM.HaltTimeOffset = GetFrameTimeMilliseconds()
    -- EVENT_MANAGER:UnregisterForUpdate("OnUpdateFyrMMMapView")
    EVENT_MANAGER:UnregisterForUpdate("OnUpdateFyrMMMapPins")
    EVENT_MANAGER:UnregisterForUpdate("OnUpdateFyrMMMapGroupPins")
    -- EVENT_MANAGER:UnregisterForUpdate("OnUpdateFyrMMMapZone")
    EVENT_MANAGER:UnregisterForUpdate("OnUpdateFyrMMMapPosition")
    -- EVENT_MANAGER:UnregisterForUpdate("OnUpdateFyrMMMapKeepNetwork")
    EVENT_MANAGER:UnregisterForUpdate("FyrMiniMapMovingObjectivesUpdate")
    EVENT_MANAGER:UnregisterForUpdate("FyrMiniMapRWUpdate")
    EVENT_MANAGER:UnregisterForUpdate("FyrMiniMapRescale")
    EVENT_MANAGER:UnregisterForUpdate("FyrMiniMapWayshrineDistances")
    EVENT_MANAGER:UnregisterForUpdate("FyrMiniMapQuestGiverDistances")
    EVENT_MANAGER:UnregisterForUpdate("FyrMiniMapBorderPins")
end

function FyrMM.RegisterUpdates()
    if not FyrMM.Halted then
        return
    end
    FyrMM.UnregisterUpdates(true)
    CancelUpdates()
    FyrMM.Halted = false
    FyrMM.HaltTimeOffset = 0
    -- EVENT_MANAGER:RegisterForUpdate("OnUpdateFyrMMMapView", FyrMM.SV.ViewRefreshRate, FyrMM.UpdateMapTiles)
    -- d("register updates")

    EVENT_MANAGER:RegisterForUpdate("OnUpdateFyrMMMapPins", FyrMM.SV.PinRefreshRate, FyrMM.PinUpdate)
    EVENT_MANAGER:RegisterForUpdate("OnUpdateFyrMMMapGroupPins", FyrMM.SV.MapRefreshRate, FyrMM.RefreshGroup)
    -- EVENT_MANAGER:RegisterForUpdate("OnUpdateFyrMMMapZone", FyrMM.SV.ZoneRefreshRate, FyrMM.ZoneUpdate)
    EVENT_MANAGER:RegisterForUpdate("OnUpdateFyrMMMapPosition", FyrMM.SV.MapRefreshRate, FyrMM.PositionUpdate)
    -- EVENT_MANAGER:RegisterForUpdate("OnUpdateFyrMMMapKeepNetwork", FyrMM.SV.KeepNetworkRefreshRate, FyrMM.UpdateKeepNetwork)
    EVENT_MANAGER:RegisterForUpdate("FyrMiniMapMovingObjectivesUpdate", FyrMM.SV.MapRefreshRate,
        FyrMM.UpdateAVABGobjectives)
    EVENT_MANAGER:RegisterForUpdate("FyrMiniMapRWUpdate", 1001, UpdateWheelPins)
    EVENT_MANAGER:RegisterForUpdate("FyrMiniMapRescale", 60, RescalePinPositions)
    EVENT_MANAGER:RegisterForUpdate("FyrMiniMapWayshrineDistances", 5000, WayshrineDistances)
    EVENT_MANAGER:RegisterForUpdate("FyrMiniMapQuestGiverDistances", 2000, QuestGiverDistances)
    EVENT_MANAGER:RegisterForUpdate("FyrMiniMapBorderPins", 2000, FyrMM.PlaceBorderPins)
end

-------------------------------------------------------------
-- On Initialized
-------------------------------------------------------------
function FyrMM.LoadScreen() -- Initialize Player group events

    if not FyrMM.SV.StartupInfo then
        d("|ceeeeeeMiniMap by Fyrakin continued by |c3CB371@Masteroshi430|r |ceeeeee v" .. FyrMM.Panel.version .. "|r")
    end

    FyrMM.SV.PanelVersion = FyrMM.Panel.version

    if FYRMM_ZOOM_INCREMENT_AMOUNT == nil then
        FYRMM_ZOOM_INCREMENT_AMOUNT = 1
    end

    EVENT_MANAGER:RegisterForEvent("MiniMapOnUnitCreated", EVENT_UNIT_CREATED, FyrMM.GroupEvent)
    EVENT_MANAGER:RegisterForEvent("MiniMapOnUnitDestroyed", EVENT_UNIT_DESTROYED, FyrMM.GroupEvent)
    EVENT_MANAGER:RegisterForEvent("MiniMapOnGroupDisbanded", EVENT_GROUP_DISBANDED, FyrMM.GroupEvent)
    EVENT_MANAGER:RegisterForEvent("MiniMapOnLeaderUpdated", EVENT_LEADER_UPDATE, FyrMM.GroupEvent)
    FyrMM.GroupEvent()
    FyrMM.UpdateQuestPins()
    FyrMM.getHouseStatus()

    local pinTooltipInfo = ZO_MapPin.TOOLTIP_CREATORS[MAP_PIN_TYPE_PLAYER]
    Fyr_MM_Player:SetHandler("OnMouseEnter", function(Fyr_MM_Player)
        FyrMM.SetTargetScale(Fyr_MM_Player, 1.3)
        if not FyrMM.SV.PinTooltips then
            return
        end
        InitializeTooltip(InformationTooltip, Fyr_MM, TOPLEFT, 0, 0)
        InformationTooltip:AppendUnitName("player")
    end)
    Fyr_MM_Player:SetHandler("OnMouseExit", function(Fyr_MM_Player)
        FyrMM.SetTargetScale(Fyr_MM_Player, 1)
        ClearTooltip(InformationTooltip)
    end)
    Fyr_MM_Player:SetMouseEnabled(true)
    EVENT_MANAGER:UnregisterForEvent("MiniMap", EVENT_PLAYER_ACTIVATED)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_PLAYER_ACTIVATED, FyrMM.getHouseStatus)
end

function FyrMM.InitialPreload(task)
    if FyrMM.DebugMode then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug", "FyrMM.InitialPreload Start:")
    end
    task = task or 0

    if task == 0 then
        -- d("go")
        FyrMM.InitialPreloadTimeStamp = GetFrameTimeMilliseconds()
        FyrMM.SV.DebugLog = nil
        if FyrMM.Reloading then
            return
        end
    end

    local time = task + 30

    if task == 0 then
        FyrMM.SetMapToPlayerLocation()
        CurrentMap.ZoneIndex = GetCurrentMapZoneIndex()
        zo_callLater(function()
            FyrMM.InitialPreload(task + 1)
        end, time)
        return
    elseif task == 1 then
        FyrMM.UpdateMapInfo()
        zo_callLater(function()
            FyrMM.InitialPreload(task + 1)
        end, time)
        return
    elseif task == 2 then
        FyrMM.UpdateMapTiles(true)
        zo_callLater(function()
            FyrMM.InitialPreload(task + 1)
        end, time)
        return
    elseif task == 3 then
        FyrMM.Show()
        zo_callLater(function()
            FyrMM.InitialPreload(task + 1)
        end, time)
        return
    elseif task == 4 then
        FyrMM.MapHalfDiagonal()
        zo_callLater(function()
            FyrMM.InitialPreload(task + 1)
        end, time)
        return
    elseif task == 5 then
        FyrMM.PositionUpdate()
        zo_callLater(function()
            FyrMM.InitialPreload(task + 1)
        end, time)
        return
    elseif task == 6 then
        FyrMM.GroupEvent()
        zo_callLater(function()
            FyrMM.InitialPreload(task + 1)
        end, time)
        return
    elseif task == 7 then
        FyrMM.UpdateQuestPins()
        zo_callLater(function()
            FyrMM.InitialPreload(task + 1)
        end, time)
        return
    elseif task == 8 then
        CurrentMap.needRescale = true
        RescalePinPositions()
        zo_callLater(function()
            FyrMM.InitialPreload(task + 1)
        end, time)
        return
    elseif task == 9 then
        if FyrMM.SV.BorderPins then
            FyrMM.PlaceBorderPins()
        end
        zo_callLater(function()
            FyrMM.InitialPreload(task + 1)
        end, time)
        return
    elseif task == 10 then
        if IsInAvAZone() then
            FyrMM.RequestKeepRefresh()
        end
        zo_callLater(function()
            FyrMM.InitialPreload(task + 1)
        end, time)
        return
    elseif task == 11 then
        FyrMM.PinUpdate()
        FyrMM.UpdateAntiquityDigSites()
        zo_callLater(function()
            FyrMM.InitialPreload(task + 1)
        end, time)
        return
    elseif task >= 12 then
        if FyrMM.DebugMode then
            CALLBACK_MANAGER:FireCallbacks("FyrMMDebug", "FyrMM.InitialPreload Done." ..
                tostring(GetGameTimeMilliseconds() - FyrMM.InitialPreloadTimeStamp))
        end
        FyrMM.RegisterUpdates()
    end
    -- d("preload time ="..GetFrameTimeMilliseconds()-FyrMM.InitialPreloadTimeStamp) -- 450/500ms is too much!
end

function FyrMM.CheckForNewCustomPins()
    if not tableIsEmpty(FyrMM.CustomPinCheckList) then
        for i, n in pairs(FyrMM.CustomPinCheckList) do
            for p, j in pairs(n) do
                if j.Id == 0 then
                    if j.m_PinType ~= nil and j.normalizedX ~= nil and j.normalizedY ~= nil then
                        local r = {
                            m_PinType = i,
                            m_PinTag = j.m_PinTag,
                            normalizedX = j.normalizedX,
                            normalizedY = j.normalizedY,
                            radius = j.radius
                        }
                        table.insert(FyrMM.CustomPinList[i], r)
                        FyrMM.CustomPinCheckList[i][p].Id = #FyrMM.CustomPinList[i]
                    end
                end
            end
        end
    end
    detectedNewCustomPin = false
end

function FyrMM.FastTravelInteraction(Interacting, Index, EventCode)
    if FyrMM.DebugMode then
        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug", "FyrMM.FastTravelInteraction (" .. tostring(Interacting) .. ") " ..
            tostring(Index))
    end
    if Interacting then
        FyrMM.FastTravelOpen = true
        FyrMM.UnregisterUpdates()
        CancelUpdates()
        FyrMM.Reloading = true
    else
        -- CurrentTasks = {}
        FyrMM.Reloading = false
        FyrMM.FastTravelOpen = false

        -- CurrentMap.filename = "reset" -- test 15/11/2022
        -- if FyrMM.CheckingZone == false then FyrMM.ZoneCheck() end -- test 15/11/2022
    end
end

function FyrMM.LoadCustomPinList()
    if Fyr_MM:IsHidden() then
        return
    end
    -- d("Load custom pins")
    if PRCustomPins then
        if not tableIsEmpty(PRCustomPins) then
            FyrMM.CustomPinList = {}
            FyrMM.CustomPinCheckList = {}
            local t = 0
            for i, n in pairs(PRCustomPins) do
                t = t + 1

                zo_callLater(function()
                    FyrMM.LoadCustomPinGroup(i)
                end, t)

            end
        end
    end
end

function FyrMM.ResetCustomPinList()
    if Fyr_MM:IsHidden() then
        return
    end
    if PRCustomPins then
        if not tableIsEmpty(PRCustomPins) then
            FyrMM.CustomPinList = {}
            FyrMM.CustomPinCheckList = {}

            local t = 0
            for i, n in pairs(PRCustomPins) do
                t = t + 1

                zo_callLater(function()
                    FyrMM.UpdateCustomPinGroup(i)
                end, t)

            end
        end
    end

end

local _FindPin = _G["ZO_WorldMapPins"].FindPin

local function FindPin(obj, pinTypeString, pinType, pinIndex)
    if FyrMM.LoadingCustomPins then
        if FyrMM.LoadingCustomPins[pinType] then
            return nil
        end
    end
    return _FindPin(obj, pinTypeString, pinType, pinIndex)
end
_G["ZO_WorldMapPins"].FindPin = FindPin

local _CreatePin = _G["ZO_WorldMapPins"].CreatePin

local function CreatePin(obj, pinType, pinTag, x, y, radius, borderInformation)
    if obj == nil or pinType == nil then
        return
    end

    if obj ~= nil and PinRef == nil then
        PinRef = obj
        FyrMM.PinRef = obj
        PRCustomPins = obj.customPins
        PRMap = obj.m_Active
        if PinRef ~= nil then
            if PinRef.playerPin ~= nil then
                if PinRef.playerPin.PIN_DATA ~= nil then
                    ZOpinData = PinRef.playerPin.PIN_DATA
                    FyrMM.ZOpinData = ZOpinData
                end
            end
        end
    end

    local mapId = FyrMM.GetMapId()
    if CurrentMap.MapId ~= mapId and not Fyr_MM:IsHidden() and FyrMM.CheckingZone == false then
        FyrMM.ZoneCheck()
        -- if MapId ~= "unknown" then
        -- CurrentMap.MapId = mapId
        -- end
        if FyrMM.DebugMode then
            CALLBACK_MANAGER:FireCallbacks("FyrMMDebug", "CreatePin detected New Map ID:" .. tostring(mapId))
        end
    end

    CustomPinMapId = CurrentMap.MapId

    if not FyrMM.FastTravelOpen and x ~= nil and y ~= nil and CustomWaypoints[pinType] then
        if CustomPinMapId ~= 0 then -- "unknown"
            if pinType == MAP_PIN_TYPE_PING and FyrMM.Ping ~= nil then
                FyrMM.Ping.nX = x
                FyrMM.Ping.nY = y
                FyrMM.Ping:RefreshAnchor()
            end
            if pinType == MAP_PIN_TYPE_RALLY_POINT and FyrMM.Rally ~= nil then
                FyrMM.Rally.nX = x
                FyrMM.Rally.nY = y
                FyrMM.Rally:RefreshAnchor()
            end
            if pinType == MAP_PIN_TYPE_PLAYER_WAYPOINT and FyrMM.Waypoint ~= nil then
                FyrMM.Waypoint.nX = x
                FyrMM.Waypoint.nY = y
                FyrMM.Waypoint:RefreshAnchor()
            end
        end
    end

    local newPin = false
    local key = ""
    local r = {}

    if PRCustomPins[pinType] or ZONE_EXPLORATION_PIN_TYPES[pinType] then

        key = tostring(x) .. ":" .. tostring(y) .. ":" .. tostring(radius)
        r = {
            m_PinType = pinType,
            m_PinTag = pinTag,
            normalizedX = x,
            normalizedY = y,
            radius = radius
        }

        if FyrMM.CustomPinCheckList[pinType] == nil then
            FyrMM.CustomPinCheckList[pinType] = {}
        end

        if CurrentMap.MapId == mapId and not FyrMM.FastTravelOpen then
            if not FyrMM.LoadingCustomPins[pinType] then
                if FyrMM.CustomPinCheckList[pinType][key] == nil then
                    if FyrMM.DebugMode then
                        CALLBACK_MANAGER:FireCallbacks("FyrMMDebug", "Detected new Pin:" .. tostring(pinTag) .. " " ..
                            tostring(pinType))
                    end
                    if pinType ~= nil then
                        if FyrMM.CustomPinList[pinType] == nil then
                            FyrMM.CustomPinList[pinType] = {}
                        end
                        table.insert(FyrMM.CustomPinList[pinType], r)
                        FyrMM.CustomPinCheckList[pinType][key] = r
                        FyrMM.CustomPinCheckList[pinType][key].Id = #FyrMM.CustomPinList[pinType]
                        detectedNewCustomPin = true
                    end
                end
            end
        end
    end

    if FyrMM.LoadingCustomPins[pinType] then

        key = tostring(x) .. ":" .. tostring(y) .. ":" .. tostring(radius) -- added to test
        r = {
            m_PinType = pinType,
            m_PinTag = pinTag,
            normalizedX = x,
            normalizedY = y,
            radius = radius
        } -- added to test

        if FyrMM.DebugMode then
            CALLBACK_MANAGER:FireCallbacks("FyrMMDebug", "Create Pin:" .. tostring(pinTag) .. " " .. tostring(pinType))
        end
        if pinType ~= nil then
            if FyrMM.CustomPinList[pinType] == nil then
                FyrMM.CustomPinList[pinType] = {}
            end
            table.insert(FyrMM.CustomPinList[pinType], r)
            FyrMM.CustomPinCheckList[pinType][key] = r
            FyrMM.CustomPinCheckList[pinType][key].Id = #FyrMM.CustomPinList[pinType]
        end

        local timeout = 100
        if string.sub(PRCustomPins[pinType].pinTypeString, 1, 4) == "DEST" then -- destinations addon pintypes
            timeout = 200
        end

        zo_callLater(function()
            FyrMM.LoadingCustomPins[pinType] = false
        end, timeout) -- was 100

        -- Compatibility with WaypointIt code:
        if WaypointIt then
            local func = function()
                return false
            end
            r.IsGroup = func
            r.IsPOI = func
            r.IsLocation = func
            r.IsQuest = func
            r.IsAvAObjective = func
            r.IsKeep = func
            r.IsMapPing = func
            r.IsKillLocation = func
            r.IsFastTravelKeep = func
            r.IsFastTravelWayShrine = func
            r.IsForwardCamp = func
            r.IsAvARespawn = func
            r.UpdateLocation = function()
            end
            r.GetNormalizedPosition = function(self)
                return self.normalizedX, self.normalizedY
            end
            r.GetPinTypeAndTag = function(self)
                return self.m_PinType, self.m_PinTag
            end
            r.PIN_DATA = ZOpinData
        end
        --
        return r

    else
        if FyrMM.DebugMode then
            CALLBACK_MANAGER:FireCallbacks("FyrMMDebug",
                "Passed Create Pin:" .. tostring(pinTag) .. " " .. tostring(pinType))
        end
        local pin = _CreatePin(obj, pinType, pinTag, x, y, radius, borderInformation)
        return pin
    end
end
_G["ZO_WorldMapPins"].CreatePin = CreatePin

function FyrMM.LoadCustomPinGroup(Type)
    if Fyr_MM:IsHidden() then
        return
    end
    if PRCustomPins ~= nil then
        if PRCustomPins[Type] ~= nil then
            if PRCustomPins[Type].enabled then
                if PRCustomPins[Type].layoutCallback ~= nil then
                    if type(PRCustomPins[Type].layoutCallback) == "function" then
                        local t = GetGameTimeMilliseconds()

                        if FyrMM.LoadingCustomPins[Type] then
                            zo_callLater(function()
                                FyrMM.LoadCustomPinGroup(Type)
                            end, 100)
                            return
                        end
                        if FyrMM.UpdatingCustomPins[Type] then
                            return
                        end
                        if Fyr_MM:IsHidden() then
                            return
                        end
                        if FyrMM.CustomPinList == nil then
                            FyrMM.CustomPinList = {}
                        end
                        FyrMM.CustomPinList[Type] = {}
                        FyrMM.LoadingCustomPins[Type] = true
                        PRCustomPins[Type].layoutCallback(PinRef)
                        zo_callLater(function()
                            FyrMM.LoadingCustomPins[Type] = false
                        end, 100) -- 500
                        if FyrMM.DebugMode then
                            CALLBACK_MANAGER:FireCallbacks("FyrMMDebug",
                                "FyrMM.LoadCustomPinGroup " .. tostring(Type) .. " Done. " ..
                                    tostring(GetGameTimeMilliseconds() - t))
                        end
                    end
                end
            end
        end
    end
end

local function InitFinish()
    FyrMM.Initialized = true
    if FyrMM.SV.MenuAutoHide then
        zo_callLater(FyrMM.MenuFadeOut, 3000)
    end
end

function FyrMM.UpdateCustomPinGroup(pinType)
    --[[ d("UpdateCustomPinGroup triggered for "..pinType) --]]
    if pinType >= MAP_PIN_TYPE_INVALID then

        -- d("UpdateCustomPinGroup "..pinType)
        if FyrMM.UpdatingCustomPins[pinType] then --[[ d("UpdateCustomPinGroup "..pinType.." not done because FyrMM.UpdatingCustomPins[pinType]") --]]
            return
        end
        if Fyr_MM:IsHidden() then --[[ d("UpdateCustomPinGroup "..pinType.." not done because Fyr_MM:IsHidden()") --]]
            return
        end

        if FyrMM.CustomPinList[pinType] ~= nil then
            if #FyrMM.CustomPinList[pinType] == 0 then --[[ d("UpdateCustomPinGroup "..pinType.." FyrMM.CustomPinList[pinType] is empty")--]]
                return
            end

            FyrMM.UpdatingCustomPins[pinType] = true
            for i, n in pairs(FyrMM.CustomPinList[pinType]) do
                if n.pin then
                    local pin = GetControl(n.pin:GetName())
                    -- d("method 1: removing pin "..n.pin:GetName())
                    RemoveCustomPin(pin)
                else
                    local Index = n.Index or i
                    if CustomPinKeyIndex[pinType] ~= nil then
                        local pin = GetControl("Fyr_MM_Scroll_Map_Pins_Pin" ..
                                                   tostring(CustomPinKeyIndex[pinType][Index]))
                        -- d("method 2: removing pin Fyr_MM_Scroll_Map_Pins_Pin"..tostring(CustomPinKeyIndex[pinType][Index]))
                        RemoveCustomPin(pin)
                    end
                end
            end

            zo_callLater(function()
                FyrMM.CustomPinList[pinType] = {}
                FyrMM.UpdatingCustomPins[pinType] = false
                FyrMM.LoadCustomPinGroup(pinType)
                CheckCustomPinConsistence(pinType)
                FyrMM.customPinsUpdateCount = nil
            end, 30)
        else
            --[[ d("UpdateCustomPinGroup FyrMM.CustomPinList[pinType] is nil") --]]
            return
        end
    end
end

local function SetPinLocation(pin, nX, nY, radius)
    pin.nX = nX
    pin.nY = nY
    pin.radius = radius
    if CustomPinCrossReference[pin] then
        CustomPinCrossReference[pin].nX = nX
        CustomPinCrossReference[pin].nY = nY
        CustomPinCrossReference[pin].radius = radius
        FyrMM.SetPinAnchor(CustomPinCrossReference[pin], nX, nY, Fyr_MM_Scroll_Map_Pins)
    end
end

function FyrMM.getHouseStatus() -- we check if we are in a house
    if GetCurrentZoneHouseId() > 0 then
        FyrMM.isInHouse = true
    else
        FyrMM.isInHouse = false
    end
end

local function OnInit() -- Initialize Map and Update events after add-on load
    Fyr_MM_Frame_Control:SetAnchor(CENTER, Fyr_MM, CENTER, 0, 0)
    Fyr_MM_Wheel_Background:SetAnchor(CENTER, Fyr_MM, CENTER, 0, 0)
    Fyr_MM_Wheel_Background:SetTexture("MiniMap/Textures/wheelbackground.dds")
    Fyr_MM_Scroll_WheelNS:SetAnchor(CENTER, Fyr_MM_Scroll, CENTER, 0, 0)
    Fyr_MM_Scroll_WheelWE:SetAnchor(CENTER, Fyr_MM_Scroll, CENTER, 0, 0)
    Fyr_MM_Scroll_WheelCenter:SetAnchor(CENTER, Fyr_MM_Scroll, CENTER, 0, 0)
    MenuAnimation = ZO_AlphaAnimation:New(Fyr_MM_Menu)

    FyrMM.LAM = LibAddonMenu2
    FyrMM.CPL = FyrMM.LAM:RegisterAddonPanel("FyrMiniMap", FyrMM.Panel)
    FyrMM.SettingsPanel = FyrMM.LAM:RegisterOptionControls("FyrMiniMap", FyrMM.Options)

    Fyr_MM:SetHandler("OnMouseWheel", function(self, delta, ctrl, alt, shift)
        if not FyrMM.SV.MouseWheel then
            return
        end
        if delta < 0 then
            FyrMM.ZoomOut()
        elseif delta > 0 then
            FyrMM.ZoomIn()
        end
    end)

    Fyr_MM_Time:SetHandler("OnMouseUp", function(self, button, upInside, ctrl, alt, shift, command) -- not working
        if upInside then
            FyrMM.TimeFormat = FyrMM.TimeFormat + 1
            if FyrMM.TimeFormat > 2 then
                FyrMM.TimeFormat = 0
            end
            FyrMM.SV.TimeFormat = FyrMM.TimeFormat
        end
    end)

    if not FyrMM.SV.HideZoneLabel then
        FyrMM.UpdateLabels()
    end

    EVENT_MANAGER:RegisterForUpdate("OnUpdateFyrMMHideCheck", 100, FyrMM.HideCheck)
    EVENT_MANAGER:RegisterForUpdate("OnUpdateFyrMMLogPosition", 30, LogPosition)
    EVENT_MANAGER:RegisterForUpdate("OnUpdateFyrMMSpeedMeasure", 301, SpeedMeasure)
    EVENT_MANAGER:RegisterForUpdate("OnUpdateFyrMMRefreshEventUnits", 100, FyrMM.RefreshEventUnits)

    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_QUEST_ADDED, function(_, questIndex)
        if IsJournalQuestIndexInTrackedZoneStory(questIndex) then
            RemoveCustomPin(FyrMM.ZoneStoryPin)
            FyrMM.ZoneStoryPin = nil
        end
        FyrMM.RequestQuestPinUpdate()
    end) -- testing 27/11/2022
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_QUEST_ADVANCED, FyrMM.RequestQuestPinUpdate)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_QUEST_COMPLETE_DIALOG, FyrMM.RequestQuestPinUpdate)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_QUEST_COMPLETE, FyrMM.RequestQuestPinUpdate)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_QUEST_CONDITION_COUNTER_CHANGED, FyrMM.RequestQuestPinUpdate)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_QUEST_LIST_UPDATED, FyrMM.RequestQuestPinUpdate)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_QUEST_OFFERED, FyrMM.RequestQuestPinUpdate)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_QUEST_OPTIONAL_STEP_ADVANCED, FyrMM.RequestQuestPinUpdate)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_MOUSE_REQUEST_ABANDON_QUEST, FyrMM.RequestQuestPinUpdate)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_QUEST_REMOVED, FyrMM.RequestQuestPinUpdate)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_QUEST_TOOL_UPDATED, FyrMM.RequestQuestPinUpdate)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_ACTIVE_QUEST_TOOL_CLEARED, FyrMM.RequestQuestPinUpdate)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_ACTIVE_QUEST_TOOL_CHANGED, FyrMM.RequestQuestPinUpdate)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_OBJECTIVES_UPDATED, FyrMM.RequestQuestPinUpdate)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_POI_UPDATED, DelayedPOIPins)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_DISCOVERY_EXPERIENCE, function()
        FyrMM.Wayshrines()
    end)

    -- ava
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_KEEPS_INITIALIZED, FyrMM.RequestKeepRefresh)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_KEEP_ALLIANCE_OWNER_CHANGED, FyrMM.RequestKeepRefresh)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_KEEP_END_INTERACTION, FyrMM.RequestKeepRefresh)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_KEEP_GATE_STATE_CHANGED, FyrMM.RequestKeepRefresh)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_KEEP_GUILD_CLAIM_UPDATE, FyrMM.RequestKeepRefresh)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_KEEP_INITIALIZED, FyrMM.RequestKeepRefresh)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_KEEP_OWNERSHIP_CHANGED_NOTIFICATION, FyrMM.RequestKeepRefresh)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_KEEP_RESOURCE_UPDATE, FyrMM.RequestKeepRefresh)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_KEEP_START_INTERACTION, FyrMM.RequestKeepRefresh)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_KEEP_UNDER_ATTACK_CHANGED, FyrMM.RequestKeepRefresh)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_KILL_LOCATIONS_UPDATED, FyrMM.RequestKeepRefresh)
    EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_FORWARD_CAMPS_UPDATED, FyrMM.RequestKeepRefresh)

    FOCUSED_QUEST_TRACKER:RegisterCallback("QuestTrackerAssistStateChanged", function()
        FyrMM.UpdateQuestPinPositions()
    end)
    FOCUSED_QUEST_TRACKER:RegisterCallback("QuestTrackerRefreshedMapPins", function()
        FyrMM.RequestQuestPinUpdate()
    end)
    CALLBACK_MANAGER:RegisterCallback("OnFyrMiniNewMapEntered", DelayedReload)
    CALLBACK_MANAGER:RegisterCallback("OnFyrMiniMapChanged", FyrMM.UpdateLabels)
    CALLBACK_MANAGER:RegisterCallback("FyrMMDebug", function(value)
        if FyrMM.DebugMode then
            FyrMM.Debug_d(value)
        end
    end)

    CALLBACK_MANAGER:RegisterCallback("OnWorldMapChanged", function(manual)
        local filename, _, _ = GetCurrentMapTextureFileInfo()
        if manual == nil and string.lower(CurrentMap.filename) ~= string.lower(filename) and not FyrMM.FastTravelOpen then
            FyrMM.Refresh = true
            FyrMM.UpdateLabels()
            FyrMM.ZoneCheck()
            return false
        elseif manual == nil and FyrMM.SV.ZoneNameContents ~= "Classic (Map only)" and not FyrMM.FastTravelOpen then -- update zone name for Map & Area and Area only option
            if not FyrMM.SV.HideZoneLabel then
                FyrMM.UpdateLabels()
            end
            return false
        else -- change is manual
            FyrMM.Refresh = false
        end
    end)

    CALLBACK_MANAGER:RegisterCallback("OnWorldMapModeChanged", function(mode)

        zo_callLater(function()
            if ZO_WorldMap:IsHidden() then
                if SetMapToPlayerLocation() ~= SET_MAP_RESULT_CURRENT_MAP_UNCHANGED then
                    CALLBACK_MANAGER:FireCallbacks("OnWorldMapChanged")
                end
                FyrMM.ZoneCheck()
            else
                FyrMM.UnregisterUpdates()
                CancelUpdates()
            end
            -- EVENT_MANAGER:UnregisterForUpdate("FyrMiniMapOnWorldMapModeChanged")
        end, 20)

    end)

    function ZO_WorldMapPins_Manager:RefreshCustomPins(optionalPinType)
        for pinTypeId, pinData in pairs(self.customPins) do
            if optionalPinType == nil or optionalPinType == pinTypeId then
                self:RemovePins(pinData.pinTypeString)

                if optionalPinType == pinTypeId and not Fyr_MM:IsHidden() then
                    FyrMM.UpdateCustomPinGroup(optionalPinType)
                end -- and not Fyr_MM:IsHidden() is aworkaround for destinations addon's pins disapearing when opening world map 21/12/2022

                if pinData.enabled then
                    pinData.layoutCallback(self)
                end
            elseif optionalPinType == pinData.pinTypeString and not Fyr_MM:IsHidden() then
                FyrMM.UpdateCustomPinGroup(pinTypeId) -- compatibility with map pins addon and other addons using pinTypeString to remove pins
            end

        end
    end

    ZO_PreHook(ZO_MapPin, "SetLocation", function(ref, xLoc, yLoc, radius)
        SetPinLocation(ref, xLoc, yLoc, radius)
    end)
    -- ZO_PreHook(ZO_WorldMapPins, "RemovePins", function(ref, PinTypeStr, majorIndex, keyIndex) if PinTypeStr ~= nil and majorIndex ~= nil and keyIndex ~= nil then RemoveCustomPins(PinTypeStr, majorIndex, keyIndex) end end) -- totally unnecessary
    -- SecurePostHook(ZO_WorldMapPins, "RefreshCustomPins", function(ref, pinType) if pinType then FyrMM.UpdateCustomPinGroup(pinType) end  end) -- FyrMM.DelayedResetCustomPinGroup(pinType)

    -- this was causing huge lags 03/05/2023
    -- ZO_PreHook(FISHING_MANAGER or INTERACTIVE_WHEEL_MANAGER, "StopInteraction", function() zo_callLater(FyrMM.RequestQuestPinUpdate,1000)  return false end)

    ZO_PreHook(COMPASS, "PerformFullAreaQuestUpdate", FyrMM.RequestQuestPinUpdate)
    ZO_PreHook(ZO_WorldMap, "SetHidden", FyrMM.WorldMapShowHide)

    -- ZO_PreHookHandler(ZO_GameMenu_InGame, "OnShow", function() zo_callLater(FyrMM.HideCheck,10) end)
    -- ZO_PreHookHandler(ZO_GameMenu_InGame, "OnHide", function() zo_callLater(FyrMM.HideCheck,10) end)
    -- ZO_PreHookHandler(ZO_InteractWindow, "OnShow", function() zo_callLater(FyrMM.HideCheck,10) end)
    -- ZO_PreHookHandler(ZO_InteractWindow, "OnHide", function() zo_callLater(FyrMM.HideCheck,10) end)
    -- ZO_PreHookHandler(ZO_KeybindStripControl, "OnShow", function() zo_callLater(FyrMM.HideCheck,10) end)
    -- ZO_PreHookHandler(ZO_KeybindStripControl, "OnHide", function() zo_callLater(FyrMM.HideCheck,10) end)
    -- ZO_PreHookHandler(ZO_MainMenuCategoryBar, "OnShow", function() zo_callLater(FyrMM.HideCheck,10) end)
    -- ZO_PreHookHandler(ZO_MainMenuCategoryBar, "OnHide", function() zo_callLater(FyrMM.HideCheck,10) end)

    if FyrMM.CustomPinsEnabled then
        for i = 1, 1200 do -- 1200
            local pin = GetControl("Fyr_MM_Scroll_Map_Pins_Pin" .. tostring(i))
            if pin == nil then
                pin = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_Pins_Pin" .. tostring(i), Fyr_MM_Scroll_Map_Pins,
                    CT_TEXTURE)
                pin:SetDrawLayer(1)
                pin:SetHandler("OnMouseEnter", PinOnMouseEnter)
                pin:SetHandler("OnMouseExit", PinOnMouseExit)
                SetPinFunctions(pin)
            end
        end
    end

    for i = 1, 50 do -- 50
        local pin = GetControl("Fyr_MM_Scroll_Map_WayshrinePins_Pin" .. tostring(i))
        if pin == nil then
            pin = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_WayshrinePins_Pin" .. tostring(i),
                Fyr_MM_Scroll_Map_WayshrinePins, CT_TEXTURE)
            pin.nDistance = function(self)
                if self.nX == nil then
                    return 1
                end
                return math.sqrt((zo_round(CurrentMap.PlayerNX * 10000) - zo_round(self.nX * 10000)) *
                                     (zo_round(CurrentMap.PlayerNX * 10000) - zo_round(self.nX * 10000)) +
                                     (zo_round(CurrentMap.PlayerNY * 10000) - zo_round(self.nY * 10000)) *
                                     (zo_round(CurrentMap.PlayerNX * 10000) - zo_round(self.nY * 10000))) / 10000
            end
            pin:SetDrawLayer(1)
            pin:SetHandler("OnMouseEnter", PinOnMouseEnter)
            pin:SetHandler("OnMouseExit", PinOnMouseExit)
            pin:SetHandler("OnMouseUp", PinOnMouseUp)
            SetPinFunctions(pin)
        end
    end
    for i = 1, 50 do -- 50
        local pin = GetControl("Fyr_MM_Scroll_Map_LocationPins_Pin" .. tostring(i))
        if pin == nil then
            pin = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_LocationPins_Pin" .. tostring(i),
                Fyr_MM_Scroll_Map_LocationPins, CT_TEXTURE)
            pin:SetDrawLayer(1)
            pin:SetHandler("OnMouseEnter", PinOnMouseEnter)
            pin:SetHandler("OnMouseExit", PinOnMouseExit)
            SetPinFunctions(pin)
        end
    end

    for i = 1, 100 do -- 100
        local pin = GetControl("Fyr_MM_Scroll_Map_POIPins_Pin" .. tostring(i))
        if pin == nil then
            pin = WINDOW_MANAGER:CreateControl("Fyr_MM_Scroll_Map_POIPins_Pin" .. tostring(i),
                Fyr_MM_Scroll_Map_POIPins, CT_TEXTURE)
            pin:SetDrawLayer(1)
            pin:SetHandler("OnMouseEnter", PinOnMouseEnter)
            pin:SetHandler("OnMouseExit", PinOnMouseExit)
            SetPinFunctions(pin)
        end
    end

    for i = 1, 100 do -- 100
        local pin = GetControl("Fyr_MM_Axis_Border_Pin" .. tostring(i))
        if pin == nil then
            pin = WINDOW_MANAGER:CreateControl("Fyr_MM_Axis_Border_Pin" .. tostring(i), Fyr_MM_Axis_Border_Pins,
                CT_TEXTURE)
            pin:SetDrawLayer(1)
            SetBorderPinHandlers(pin)
        end

    end

    for i = 1, 24 do -- 24
        local pin = GetControl("Fyr_MM_Scroll_Map_GroupPins_group" .. tostring(i))
        if pin ~= nil then
            pin:SetDrawLayer(1)
            pin:SetHandler("OnMouseEnter", PinOnMouseEnter)
            pin:SetHandler("OnMouseExit", PinOnMouseExit)
            SetPinFunctions(pin)
        end
    end

    zo_callLater(InitFinish, 100)

end

function FyrMM.MenuFadeIn()
    if Fyr_MM_Menu:GetAlpha() > 0 or FyrMM.SV.MenuDisabled or FyrMM.MenuFadingIn or Fyr_MM:IsHidden() then
        return
    end
    FyrMM.MenuFadingIn = true
    if FyrMM.SV.ZoneFrameLocationOption == "Default" then
        Fyr_MM_ZoneFrame:ClearAnchors()
        if FyrMM.SV.WheelMap then
            Fyr_MM_ZoneFrame:SetAnchor(TOP, Fyr_MM_Menu, BOTTOM, 0, -Fyr_MM_Menu:GetHeight() / 5)
        else
            Fyr_MM_ZoneFrame:SetAnchor(TOP, Fyr_MM_Menu, BOTTOM, 0, -Fyr_MM_Menu:GetHeight() / 2.5)
        end
        Fyr_MM_ZoneFrame:SetMovable(false)
    end
    if FyrMM.OverMiniMap or FyrMM.OverMenu then
        MenuAnimation:FadeIn(0, 1000, ZO_ALPHA_ANIMATION_OPTION_FORCE_ALPHA, function()
            FyrMM.MenuFadingIn = false
        end)
    end
end

function FyrMM.MenuFadeOut()
    if not FyrMM.SV.MenuAutoHide or FyrMM.OverMiniMap or FyrMM.OverMenu or Fyr_MM_Menu:GetAlpha() == 0 or
        FyrMM.SV.MenuDisabled or FyrMM.MenuFadingOut then
        return
    end
    FyrMM.MenuFadingOut = true
    MenuAnimation:FadeOut(0, 1000, ZO_ALPHA_ANIMATION_OPTION_FORCE_ALPHA, function()
        FyrMM.MenuFadingOut = false
        if FyrMM.SV.ZoneFrameLocationOption == "Default" then
            Fyr_MM_ZoneFrame:ClearAnchors()
            Fyr_MM_ZoneFrame:SetAnchor(TOP, Fyr_MM_Border, BOTTOM)
            Fyr_MM_ZoneFrame:SetMovable(false)
        end
    end)
end

local function UpdateZoomTable()
    if FyrMM.SV.ZoomTable then
        local t = {}
        for i, n in pairs(FyrMM.SV.ZoomTable) do
            t[i] = n
        end
        FyrMM.SV.ZoomTable = t
        FyrMM.SV.MapTable = nil
    end
    if FyrMM.SV.MapTable then
        FyrMM.SV.ZoomTable = {}
        for i, n in pairs(FyrMM.SV.MapTable) do
            FyrMM.SV.ZoomTable[i] = n.ZoomLevel
        end
        FyrMM.SV.MapTable = nil
    end
end

local function OnLoaded(eventCode, addOnName)
    if addOnName ~= "MiniMap" then
        return
    end
    FyrMM.Initialized = false
    MM_CreateDataTables()
    FyrMM.SV = ZO_SavedVars:NewAccountWide("FyrMMSV", 5, nil, FyrMM.Defaults, nil)
    if FyrMM.SV ~= nil then
        UpdateZoomTable()
        MM_LoadSavedVars()
    end
    FyrMM.API_Check()
    Fyr_MM:SetResizeHandleSize(MOUSE_CURSOR_RESIZE_NS)
    Fyr_MM:SetHandler("OnMouseEnter", function()
        FyrMM.OverMiniMap = true
        FyrMM.MenuFadeIn()
        Fyr_MM_Close:SetAlpha(1)
    end)
    Fyr_MM:SetHandler("OnMouseExit", function()
        FyrMM.OverMiniMap = false
        zo_callLater(FyrMM.MenuFadeOut, 3000)
        Fyr_MM_Close:SetAlpha(0)
    end)
    Fyr_MM_Menu:SetHandler("OnMouseEnter", function()
        FyrMM.OverMenu = true
        FyrMM.MenuFadeIn()
        Fyr_MM_Close:SetAlpha(1)
    end)
    Fyr_MM_Menu:SetHandler("OnMouseExit", function()
        FyrMM.OverMenu = false
        zo_callLater(FyrMM.MenuFadeOut, 3000)
        Fyr_MM_Close:SetAlpha(0)
    end)
    Fyr_MM:SetHandler("OnMouseUp", function(self)
        if not FyrMM.SV.LockPosition then
            local width = Fyr_MM:GetWidth()
            local height = Fyr_MM:GetHeight()
            MM_SetMapWidth(width)
            MM_SetMapHeight(height)
            FyrMM.SV.position.offsetX = Fyr_MM:GetLeft()
            FyrMM.SV.position.offsetY = Fyr_MM:GetTop()
            FyrMM.MapHalfDiagonal()
            MM_RefreshPanel()
        else
            local pos = {}
            pos.anchorTo = GetControl(pos.anchorTo)
            Fyr_MM:SetAnchor(FyrMM.SV.position.point, pos.anchorTo, FyrMM.SV.position.relativePoint,
                FyrMM.SV.position.offsetX, FyrMM.SV.position.offsetY)
            Fyr_MM:SetDimensions(FyrMM.SV.MapWidth, FyrMM.SV.MapHeight)
        end
    end)
    Fyr_MM_Coordinates:SetHandler("OnMouseUp", function(self)
        local pos = {}
        _, pos[1], pos[2], pos[3], pos[4], pos[5] = Fyr_MM_Coordinates:GetAnchor()
        if pos[2] ~= nil then
            pos[2] = pos[2]:GetName()
        end
        FyrMM.SV.CoordinatesAnchor = pos
    end)
    Fyr_MM_ZoneFrame:SetHandler("OnMouseUp", function(self)
        local pos = {}
        _, pos[1], pos[2], pos[3], pos[4], pos[5] = Fyr_MM_ZoneFrame:GetAnchor()
        if pos[1] == nil then
            return
        end
        if pos[2] ~= nil then
            pos[2] = pos[2]:GetName()
        end
        pos[1] = 1
        local zoneFrameX, _ = Fyr_MM_ZoneFrame:GetCenter()
        pos[4] = zoneFrameX
        FyrMM.SV.ZoneFrameAnchor = pos
        d("Zone frame anchor set to: " .. pos[1] .. " " .. pos[2] .. " " .. pos[3] .. " " .. pos[4] .. " " .. pos[5])
    end)
    Fyr_MM_Scroll:SetScrollBounding(0)
    Fyr_MM_Player_incombat:SetTexture("esoui/art/mappins/ava_attackburst_32.dds")
    Fyr_MM_Player_incombat:SetAlpha(0.50)
    AxisSwitch()
    zo_callLater(OnInit, 1000)
end

-----------------------------------------
-- Key bind functions
-----------------------------------------

function FyrMM.ZoomOut()
    if not FyrMM.Visible or Fyr_MM:IsHidden() or ZoomAnimating then
        return
    end
    local zoomLevel = CurrentMap.ZoomLevel
    zoomLevel = zoomLevel - FYRMM_ZOOM_INCREMENT_AMOUNT
    if zoomLevel < FYRMM_ZOOM_MIN then
        zoomLevel = FYRMM_ZOOM_MIN
    end
    PlaySound(SOUNDS.MAP_ZOOM_OUT)
    if FyrMM.SV.RotateMap then
        Fyr_MM_Scroll:SetHorizontalScroll(0)
        Fyr_MM_Scroll:SetVerticalScroll(0)
        FyrMM.WheelScroll(0, 0)
    end
    if not ZoomAnimating and zoomLevel ~= CurrentMap.ZoomLevel then
        AnimateZoom(zoomLevel)
    end
end

function FyrMM.ZoomIn()
    if not FyrMM.Visible or Fyr_MM:IsHidden() or ZoomAnimating then
        return
    end
    local zoomLevel = CurrentMap.ZoomLevel
    zoomLevel = zoomLevel + FYRMM_ZOOM_INCREMENT_AMOUNT
    if zoomLevel > FYRMM_ZOOM_MAX then
        zoomLevel = FYRMM_ZOOM_MAX
    end
    PlaySound(SOUNDS.MAP_ZOOM_IN)
    if FyrMM.SV.RotateMap then
        Fyr_MM_Scroll:SetHorizontalScroll(0)
        Fyr_MM_Scroll:SetVerticalScroll(0)
        FyrMM.WheelScroll(0, 0)
    end
    if not ZoomAnimating and zoomLevel ~= CurrentMap.ZoomLevel then
        AnimateZoom(zoomLevel)
    end
end

function FyrMM.ToggleVisible()
    if not FyrMM.worldMapShowing and ZO_InteractWindow:IsHidden() and ZO_KeybindStripControl:IsHidden() then
        if FyrMM.Visible then
            PlaySound(SOUNDS.MAP_WINDOW_CLOSE)
            FyrMM.manuallyHidden = true
        else
            PlaySound(SOUNDS.MAP_WINDOW_OPEN)
            FyrMM.manuallyHidden = false
        end
        FyrMM.Visible = not FyrMM.Visible
    end
end

EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_QUEST_POSITION_REQUEST_COMPLETE, OnQuestPositionRequestComplete)
EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_ADD_ON_LOADED, OnLoaded)
-- EVENT_MANAGER:RegisterForEvent( "MiniMap", EVENT_ZONE_CHANGED, FyrMM.UpdateLabels)
-- EVENT_MANAGER:RegisterForEvent( "MiniMap", EVENT_ZONE_UPDATE, function (eventCode, unitTag, newZoneName) d(eventCode) d(unitTag) d(newZoneName) end)
EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_PLAYER_ACTIVATED, FyrMM.LoadScreen)
EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_START_FAST_TRAVEL_INTERACTION, function(eventCode, index)
    FyrMM.FastTravelInteraction(true, index, eventCode)
end)
EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_END_FAST_TRAVEL_INTERACTION, function(eventCode)
    FyrMM.FastTravelInteraction(false, nil, eventCode)
end)
EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_START_FAST_TRAVEL_KEEP_INTERACTION, function(eventCode, index)
    FyrMM.FastTravelInteraction(true, index, eventCode)
end)
EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_END_FAST_TRAVEL_KEEP_INTERACTION, function(eventCode)
    FyrMM.FastTravelInteraction(false, nil, eventCode)
end)
EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_MOUNTED_STATE_CHANGED, function(eventCode, mounted)
    CurrentMap.PlayerMounted = mounted
end)
EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_PLAYER_NOT_SWIMMING, function(eventCode)
    CurrentMap.PlayerSwimming = false
end)
EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_PLAYER_SWIMMING, function(eventCode)
    CurrentMap.PlayerSwimming = true
end)
EVENT_MANAGER:RegisterForEvent("MiniMap", EVENT_ANTIQUITY_DIG_SITES_UPDATED, function(eventCode, antiquityId)
    FyrMM.UpdateAntiquityDigSites()
end)