ESOUI SVN TaosGroupUltimate

--[[

        Addon: Taos Group Ultimate

        Author: TProg Taonnor

        Created by @Taonnor

]]--

--[[

        Global variables

]]--

local DEBUG_ACTIVE = true

--[[

        Class SimpleList

]]--

SimpleList = {}

--[[

        Class Members

]]--

--[[

        Sets visibility of labels

]]--

function SimpleList.RefreshList()

        logDebug("SimpleList.RefreshList()")

        for i=1, GROUP_SIZE_MAX, 1 do

                local row = SimpleListControlContainerScrollChild:GetNamedChild("Row" .. i)

        if (row ~= nil) then

                    if (DoesUnitExist("group" .. i)) then

                            row:GetNamedChild("SenderNameValueLabel"):SetText(GetUnitName("group" .. i))

                row:GetNamedChild("UltimateValueLabel"):SetText("-")

                            row:GetNamedChild("ReadyValueLabel"):SetText("0")

                            row:SetHidden(false)

                    else

                            row:SetHidden(true)

                            row:GetNamedChild("SenderNameValueLabel"):SetText("-")

                            row:GetNamedChild("UltimateValueLabel"):SetText("-")

                            row:GetNamedChild("ReadyValueLabel"):SetText("0")

                    end

        else

            logDebug("row nil " .. i)

        end

        end

end

--[[

        Updates list row

]]--

function SimpleList.UpdateListRow(rowId, ultimateName, relativeUltimate, isPlayerDead)

        logDebug("SimpleList.UpdateListRow()")

        if (rowId ~= nil and rowId ~= "" and

                ultimateName ~= nil and ultimateName ~= "" and

                relativeUltimate ~= nil and relativeUltimate >= 0 and relativeUltimate <= 100) then

                local row = SimpleListControlContainerScrollChild:GetNamedChild("Row" .. rowId)

                if (row ~= nil) then

                        row:GetNamedChild("UltimateValueLabel"):SetText(ultimateName)

                        row:GetNamedChild("ReadyValueLabel"):SetText(relativeUltimate)

                        if (isPlayerDead) then

                row:GetNamedChild("SenderNameValueLabel"):SetColor(1.0, 0.0, 0.0, 1)

                            row:GetNamedChild("UltimateValueLabel"):SetColor(1.0, 0.0, 0.0, 1)

                            row:GetNamedChild("ReadyValueLabel"):SetColor(1.0, 0.0, 0.0, 1)

            elseif (relativeUltimate == 100) then

                                row:GetNamedChild("SenderNameValueLabel"):SetColor(0.0, 1.0, 0.0, 1)

                                row:GetNamedChild("UltimateValueLabel"):SetColor(0.0, 1.0, 0.0, 1)

                                row:GetNamedChild("ReadyValueLabel"):SetColor(0.0, 1.0, 0.0, 1)

                        else

                                row:GetNamedChild("SenderNameValueLabel"):SetColor(1.0, 1.0, 1.0, 1)

                                row:GetNamedChild("UltimateValueLabel"):SetColor(1.0, 1.0, 1.0, 1)

                                row:GetNamedChild("ReadyValueLabel"):SetColor(1.0, 1.0, 1.0, 1)

                        end

                else

                        logDebug("row nil " .. rowId)

                end

        else

                logDebug("ignored; rowId: " .. rowId .. ", ultimateName: " .. ultimateName .. ", relativeUltimate: " .. relativeUltimate)

        end

end

--[[

        UpdateMovable sets the Movable and MouseEnabled flag in UI elements

]]--

function SimpleList.SetMovable(isMovable)

    SimpleListControl:SetMovable(isMovable)

        SimpleListControl:SetMouseEnabled(isMovable)

end

--[[

        RestorePosition sets SimpleList on settings position

]]--

function SimpleList.RestorePosition(posX, posY)

        SimpleListControl:ClearAnchors()

        SimpleListControl:SetAnchor(TOPLEFT, GuiRoot, TOPLEFT, posX, posY)

end

--[[

        OnGroupUltimateSimpleListMoveStop saves current SimpleList position to settings

]]--

function SimpleList.OnGroupUltimateSimpleListMoveStop()

        local left = SimpleListControl:GetLeft()

        local top = SimpleListControl:GetTop()

    Settings.SavedVariables.PosX = left

    Settings.SavedVariables.PosY = top

end

function SimpleList.SetHidden(isHidden)

    SimpleListControl:SetHidden(isHidden)

end

--[[

        CreateGroupUltimateSimpleListRows creates group ultimate rows

]]--

function SimpleList.CreateGroupUltimateSimpleListRows()

        for i=1, GROUP_SIZE_MAX, 1 do

                local row = CreateControlFromVirtual("$(parent)Row", SimpleListControlContainerScrollChild, "GroupUltimateSimpleListRow", i)

                row:SetHidden(true) -- initial not visible

                if i == 1 then

            row:SetAnchor(TOPLEFT, SimpleListControlContainerScrollChild, TOPLEFT, 0, 0)

        else

            row:SetAnchor(TOP, lastRow, BOTTOM, 0, 0)

        end

                lastRow = row

        end

end

--[[

        Initialize initializes SimpleList

]]--

function SimpleList.Initialize(isHidden, isMovable, posX, posY)

    SimpleList:SetHidden(isHidden)

    SimpleList:SetMovable(isMovable)

    SimpleList:RestorePosition(posX, posY)

    SimpleList:CreateGroupUltimateSimpleListRows()

    CALLBACK_MANAGER:RegisterCallback("TGU-GroupChanged", SimpleList.RefreshList)

    CALLBACK_MANAGER:RegisterCallback("TGU-MapPingChanged", SimpleList.UpdateListRow)

end