ESOUI SVN TaosGroupUltimate

--[[

        Addon: Taos Group Ultimate

        Author: TProg Taonnor

        Created by @Taonnor

]]--

--[[

        Global variables

]]--

local MAJOR = "1"

local MINOR = "0"

local PATCH = "0"

local REFRESHRATE = 1000

local ACTION_BAR_ULTIMATE_SLOT_INDEX = ACTION_BAR_ULTIMATE_SLOT_INDEX + 1 -- 8, the constant is 7, but its wrong

--[[

        Class GroupUltimate

]]--

GroupUltimate = {}

--[[

        Class Members

]]--

GroupUltimate.Name = "TaosGroupUltimate"

GroupUltimate.IsInAvA = false

GroupUltimate.LastMapPingTimestamp = GetTimeStamp()

GroupUltimate.Default = {

                        ["PosX"] = 0,

                        ["PosY"] = 0,

                        ["Movable"] = true,

                }

--[[

        UpdateDeath updates SessionDeaths with adding new death

]]--

function GroupUltimate.UpdateDeath(eventID)

        if (GroupUltimate.IsInAvA) then

                -- TODO: And alive?!

        end

end

--[[

        UpdateZone updates the IsInAva member and set visibility of GroupUltimateWindow

]]--

function GroupUltimate.UpdateZone(eventCode)

        GroupUltimate.IsInAvA = IsPlayerInAvAWorld()

    GroupUltimateWindow:SetHidden(not GroupUltimate.IsInAvA)

end

--[[

        Called on map ping; Updates ultimate view if possible ping

]]--

function GroupUltimate.OnMapPing(eventCode, pingEventType, pingType, pingTag, offsetX, offsetY, isLocalPlayerOwner)

    if GroupUltimate.IsPossiblePing(offsetX, offsetY) then

                GroupUltimate.UpdateUltimateView(pingTag, offsetX, offsetY)

    end

end

--[[

        Called on power changing; Call send data if ultimate

]]--

function GroupUltimate.OnPowerUpdate(eventCode, unitTag, powerIndex, powerType, powerValue, powerMax, powerEffectiveMax)

        if (unitTag ~= 'player') then return end -- only care about the player

        if (powerType ~= POWERTYPE_ULTIMATE) then return end -- only care about ultimate

        GroupUltimate.SendData(powerValue)

end

--[[

        SendData updates session

]]--

function GroupUltimate.SendData(powerValue)

        if (GroupUltimate.IsInAvA) then return end

        if IsUnitGrouped("player") then return end

        local currentTimestamp = GetTimeStamp()

        if ((currentTimestamp - roupUltimate.LastMapPingTimestamp) > REFRESHRATE) then

                local abilityID = GetSlotBoundId(ACTION_BAR_ULTIMATE_SLOT_INDEX)

                local abilityCost = math_max(1, GetSlotAbilityCost(ACTION_BAR_ULTIMATE_SLOT_INDEX))

                local relativeUltimate = math.floor((powerValue / abilityCost) * 100)

                if (relativeUltimate > 100) then

                        relativeUltimate = 100

                end

                d("abilityID: " tostring(abilityID)) -- TODO: eventually needed mapping to correct x values for map pings!

                d("relativeUltimate: " tostring(relativeUltimate))

                PingMap(MAP_PIN_TYPE_PING, MAP_TYPE_LOCATION_CENTERED, abilityID, relativeUltimate)

                GroupUltimate.LastMapPingTimestamp = GetTimeStamp()

        end

end

--[[

        UpdateUltimates updates ultimate view

]]--

function GroupUltimate.UpdateUltimateView(pingTag, ultimateId, ultimateValue)

        local senderName = GetUnitName(pingTag)

        local ultimateName = GetAbilityName(ultimateId)

        local ultimatePercent = ultimateValue

        -- GetAbilityIcon(number abilityId) -> Icon?!

        ApSessionFurtherWindowValueSenderName:SetText(senderName)

        ApSessionFurtherWindowValueUltimate:SetText(ultimateName)

        ApSessionFurtherWindowValueUltimatePercent:SetText(ultimatePercent)

end

--[[

        Check if map ping is in possible range

]]--

function GroupUltimate.IsPossiblePing(offsetx, offsety)

        return true -- TODO: check in specific range

end

--[[

        UpdateMovable sets the Movable and MouseEnabled flag in UI elements

]]--

function GroupUltimate.SetMovable()

    GroupUltimateWindow:SetMovable(GroupUltimate.Settings.Movable)

        GroupUltimateWindow:SetMouseEnabled(GroupUltimate.Settings.Movable)

end

--[[

        MakeSettingsWindow creates settings window

]]--

function GroupUltimate.MakeSettingsWindow()

        local panelData = {

                type = "panel",

                name = "Taos Group Ultimate",

                author = "TProg Taonnor",

                version = MAJOR .. "." .. MINOR .. "." .. PATCH,

                slashCommand = "/taosGroupUltimate",

                registerForDefaults = true

        }

        local optionsData = {

                [1] = {

                        type = "header",

                        name = GetString(TAS_OPTIONS_HEADER),

                },

                [2] = {

                        type = "checkbox",

                        name = GetString(TAS_OPTIONS_DRAG_LABEL),

                        tooltip = GetString(TAS_OPTIONS_DRAG_TOOLTIP),

                        getFunc = function() return GroupUltimate.Settings.Movable end,

                        setFunc = function(value)

                                GroupUltimate.Settings.Movable = value

                GroupUltimate.SetMovable()

                        end,

                        default = GroupUltimate.Default.Movable

                },

        }

        local LAM = LibStub("LibAddonMenu-2.0")

        LAM:RegisterAddonPanel("TaosGroupUltimateSettings", panelData)

        LAM:RegisterOptionControls("TaosGroupUltimateSettings", optionsData)

end

--[[

        RestorePosition sets GroupUltimateWindow on settings position

]]--

function GroupUltimate.RestorePosition()

        GroupUltimateWindow:ClearAnchors()

        GroupUltimateWindow:SetAnchor(TOPLEFT,

                                                                  GuiRoot,

                                                                  TOPLEFT,

                                                                  ApSession.Settings.PosX,

                                                                  ApSession.Settings.PosY)

end

--[[

        OnGroupUltimateWindowMoveStop saves current GroupUltimateWindow position to settings

]]--

function GroupUltimate.OnGroupUltimateWindowMoveStop()

        local left = GroupUltimateWindow:GetLeft()

        local top = GroupUltimateWindow:GetTop()

        GroupUltimate.Settings.PosX = left

        GroupUltimate.Settings.PosY = top

end

--[[

        GroupUltimate:initialize initializes addon

]]--

function GroupUltimate:initialize()

        GroupUltimate.Settings = ZO_SavedVars:NewAccountWide(GroupUltimate.Name, 1 , nil, GroupUltimate.Default)

        GroupUltimate.MakeSettingsWindow()

        GroupUltimate.RestorePosition()

        GroupUltimate.UpdateZone()

    GroupUltimate.SetMovable()

        -- Register events

        EVENT_MANAGER:RegisterForEvent(GroupUltimate.name, EVENT_MAP_PING, GroupUltimate.OnMapPing)

        EVENT_MANAGER:RegisterForEvent(GroupUltimate.name, EVENT_POWER_UPDATE, GroupUltimate.OnPowerUpdate)

        EVENT_MANAGER:RegisterForEvent(GroupUltimate.Name, EVENT_PLAYER_DEAD , GroupUltimate.UpdateDeath) -- grey up icon?

        EVENT_MANAGER:RegisterForEvent(GroupUltimate.Name, EVENT_PLAYER_ACTIVATED, GroupUltimate.UpdateZone) -- only cyro?

        -- Start timer

        --EVENT_MANAGER:RegisterForUpdate(GroupUltimate.Name, REFRESHRATE, GroupUltimate.SendData) -- eventually not needed, send data via ultimate points changed

end

--[[

        OnAddOnLoaded if TaosGroupUltimate is loaded, initialize

]]--

local function OnAddOnLoaded(eventCode, addOnName)

        if addOnName == GroupUltimate.Name then

                GroupUltimate:initialize()

        end

end

EVENT_MANAGER:RegisterForEvent(GroupUltimate.Name, EVENT_ADD_ON_LOADED, OnAddOnLoaded);