LoTROInterface SVN SequenceBars

NodeLabel = class(Turbine.UI.Label);

function NodeLabel:Constructor(node, object)

    Turbine.UI.Label.Constructor(self);

    self.node = node;

    self.object = object;

    self:SetFont(Turbine.UI.Lotro.Font.TrajanPro15);

    self:SetTextAlignment(Turbine.UI.ContentAlignment.MiddleLeft);

    self:SetFontStyle(Turbine.UI.FontStyle.Outline);

    self:SetOutlineColor(Turbine.UI.Color.Black);

    self:SetMultiline(false);

    self:SetHeight(20);

    self:UpdateText();

    self.skipSizeChanged = 1;

end

function NodeLabel:UpdateText()

    self:SetForeColor(self.object:GetColor());

    self:SetText(self.object:GetName());

end

ShowHideButton = class(Turbine.UI.Lotro.Button);

function ShowHideButton:Constructor(node, object)

    Turbine.UI.Lotro.Button.Constructor(self);

    self.node = node;

    self.object = object;

    self:SetFont(Turbine.UI.Lotro.Font.TrajanPro13);

    self:SetWidth(ShowHideButton.buttonWidth);

    object.HiddenChanged = function()

        self:UpdateText();

    end

    self:UpdateText();

end

function ShowHideButton:UpdateText()

    local hidden = self.object.settings.hidden;

    self:SetFont(Turbine.UI.Lotro.Font.TrajanPro13); -- reapply font for Cyrillic

    if (hidden) then

        self:SetText(ShowHideButton.showText);

    else

        self:SetText(ShowHideButton.hideText);

    end

    self:SetVisible(not self.object:IsParentHidden());

end

function ShowHideButton:Click()

    self.object:SetHidden(not self.object:IsHidden());

end

OptionsPanel = class(Turbine.UI.Control);

function OptionsPanel:Constructor(manager)

    Turbine.UI.Control.Constructor(self);

    self.manager = manager;

    self.skipSizeChanged = 0;

    self.skipUpdate = 0;

    self.tabs = Thurallor.UI.TabCardStack();

    self.tabs:SetParent(self);

    self.tab1 = Thurallor.UI.TabCard();

    self.tab1:SetTabLeft(0);

    self.tab1.inside = Turbine.UI.Control();

    self.tab1:SetInteriorControl(self.tab1.inside);

    self.tab1:SetInteriorAlignment(Turbine.UI.ContentAlignment.TopLeft);

    local left, top = 10, 10;

    self.tab1.language = Turbine.UI.Label();

    self.tab1.language:SetParent(self.tab1.inside);

    self.tab1.language:SetFont(Turbine.UI.Lotro.Font.TrajanPro14);

    self.tab1.language:SetPosition(left, top);

    self.tab1.language:SetSize(100, 16);

    top = top + 16;

    local languages = { "English", "German", "French", "Russian" };

    local peers = {};

    self.tab1.languageButtons = {};

    for l = 1, #languages do

        language = languages[l];

        local radioButton = Thurallor.UI.RadioButton(self.tab1.inside);

        radioButton.language = languages[l];

        radioButton:SetFont(Turbine.UI.Lotro.Font.TrajanPro14);

        radioButton:SetSize(300, 16);

        radioButton:SetPosition(left, top);

        radioButton.Clicked = function(sender)

            self.manager:SetLanguage(Turbine.Language[sender.language]);

--            self:Localize();

--            self:RefreshDirectory();

        end

        self.tab1.languageButtons[radioButton.language] = radioButton;

        table.insert(peers, radioButton);

        top = top + 16;

    end

    Thurallor.UI.RadioButton.LinkPeers(peers);

    top = top + 16;

    self.tab1.snapToGrid = Turbine.UI.Lotro.CheckBox();

    self.tab1.snapToGrid:SetParent(self.tab1.inside);

    self.tab1.snapToGrid:SetFont(Turbine.UI.Lotro.Font.TrajanPro14);

    self.tab1.snapToGrid:SetPosition(left, top);

    self.tab1.snapToGrid:SetSize(200, 16);

    self.tab1.snapToGrid.CheckedChanged = function(sender)

        self.manager:SetSnapToGrid(sender:IsChecked());

    end

    top = top + 32;

    self.tab1.uiScaleLabel = Turbine.UI.Label();

    self.tab1.uiScaleLabel:SetParent(self.tab1.inside);

    self.tab1.uiScaleLabel:SetFont(Turbine.UI.Lotro.Font.TrajanPro14);

    self.tab1.uiScaleLabel:SetPosition(left, top);

    self.tab1.uiScaleLabel:SetSize(200, 16);

    top = top + 16;

    self.tab1.uiScale = Turbine.UI.Lotro.ScrollBar();

    self.tab1.uiScale:SetParent(self.tab1.inside);

    self.tab1.uiScale:SetPosition(left, top);

    self.tab1.uiScale:SetSize(200, 10);

    self.tab1.uiScale:SetMinimum(13);

    self.tab1.uiScale:SetMaximum(96);

    self.tab1.uiScale:SetSmallChange(1);

    self.tab1.uiScale:SetLargeChange(10);

    self.tab1.uiScale.ValueChanged = function(sb)

        local scale = sb:GetValue();

        self.manager:SetUIScale(scale);

        self.tab1.uiScaleLabel:SetText(L:GetText("/PluginManager/OptionsTab/GlobalSettingsTab/UiScale") .. ": " .. string.format("%d", scale * 100 / 32) .. "%");

    end

    top = top + 26;

    self.tab1.uiOpacityLabel = Turbine.UI.Label();

    self.tab1.uiOpacityLabel:SetParent(self.tab1.inside);

    self.tab1.uiOpacityLabel:SetFont(Turbine.UI.Lotro.Font.TrajanPro14);

    self.tab1.uiOpacityLabel:SetPosition(left, top);

    self.tab1.uiOpacityLabel:SetSize(200, 16);

    top = top + 16;

    self.tab1.uiOpacity = Turbine.UI.Lotro.ScrollBar();

    self.tab1.uiOpacity:SetParent(self.tab1.inside);

    self.tab1.uiOpacity:SetPosition(left, top);

    self.tab1.uiOpacity:SetSize(200, 10);

    self.tab1.uiOpacity:SetMinimum(0);

    self.tab1.uiOpacity:SetMaximum(100);

    self.tab1.uiOpacity:SetSmallChange(1);

    self.tab1.uiOpacity:SetLargeChange(10);

    self.tab1.uiOpacity.ValueChanged = function(sb)

        local opacity = sb:GetValue();

        self.manager:SetUIOpacity(opacity / 100);

        self.tab1.uiOpacityLabel:SetText(L:GetText("/PluginManager/OptionsTab/GlobalSettingsTab/UiOpacity") .. ": " .. opacity .. "%");

    end

    top = top + 16;

    local width, height = 300, top + 10;

    self.tab1.inside:SetSize(width, height);

    self:RefreshGlobalSettings();

    self.tab2 = Thurallor.UI.TabCard();

    self.tab2.inside = Turbine.UI.Control();

    self.tab2.inside:SetSize(width, height);

    self.tab2:SetInteriorControl(self.tab2.inside);

    self.tab2:SetInteriorAlignment(Turbine.UI.ContentAlignment.TopCenter);

    self.tabs:SetSize(width + 20, height + 40);

    self:SetSize(width + 20, height + 40);

    self.tabs:AddTabCard(self.tab1);

    self.tabs:AddTabCard(self.tab2);

    self.instructions = Turbine.UI.Label();

    self.instructions:SetParent(self.tab2.inside);

    self.instructions:SetMultiline(true);

    self.instructions.height = 32;

    self.instructions:SetHeight(self.instructions.height);

    self.instructions:SetFont(Turbine.UI.Lotro.Font.TrajanPro14);

    self.instructions:SetForeColor(Turbine.UI.Color.PaleGoldenrod);

    self:Localize();

    -- For drag-and-drop operations

    self.carrierWindow = Turbine.UI.Window();

    self.carrierWindow:SetZOrder(2147483647);

    self.carrierWindow:SetOpacity(0.75);

    self.carrierWindow:SetMouseVisible(false);

    plugin.GetOptionsPanel = function()

        return self;

    end

end

function OptionsPanel:ShowRefreshButton()

    local prevContext = L:SetContext("/PluginManager/OptionsTab/");

    if (not self.refreshButton) then

        self.refreshButton = Turbine.UI.Lotro.Button();

        self.refreshButton:SetSize(L:GetNumber("ShowHideButtonWidth"), 20);

        self.refreshButton.Click = function()

            self:RefreshDirectory();

        end

    end

    self.refreshButton:SetText(L:GetText("Show"));

    self.refreshButton:SetFont(Turbine.UI.Lotro.Font.TrajanPro13); -- reapply font for Cyrillic

    self.tab2:SetInteriorControl(self.refreshButton);

    L:SetContext(prevContext);

end

function OptionsPanel:ShowGlobalSettings()

    Turbine.PluginManager.ShowOptions(Plugins.SequenceBars);

    self.tabs:BringToFront(self.tab1);

    self:RefreshGlobalSettings();

end

function OptionsPanel:ShowDirectory()

    Turbine.PluginManager.ShowOptions(Plugins.SequenceBars);

    self.tabs:BringToFront(self.tab2);

    self:RefreshDirectory();

end

function OptionsPanel:Localize()

    -- Reapply fonts for Cyrillic support

    self.tab1.tabText:SetFont(Turbine.UI.Lotro.Font.TrajanPro15);

    self.tab2.tabText:SetFont(Turbine.UI.Lotro.Font.TrajanPro15);

    for object in values({

        self.tab1.language,

        self.tab1.languageButtons["English"],

        self.tab1.languageButtons["French"],

        self.tab1.languageButtons["German"],

        self.tab1.languageButtons["Russian"],

        self.tab1.snapToGrid,

        self.instructions,

        self.tab1.uiScaleLabel,

        self.tab1.uiOpacityLabel

    }) do

        object:SetFont(Turbine.UI.Lotro.Font.TrajanPro14);

    end

    local tab1Width = L:GetNumber("/PluginManager/OptionsTab/GlobalSettingsTabWidth");

    self.tab1:SetTabWidth(tab1Width);

    self.tab1:SetTabText(L:GetText("/PluginManager/OptionsTab/GlobalSettings"));

    self.tab1.language:SetText(L:GetText("/PluginManager/OptionsTab/GlobalSettingsTab/Language"));

    for language in keys(self.tab1.languageButtons) do

        self.tab1.languageButtons[language]:SetText(L:GetText("/PluginManager/OptionsTab/GlobalSettingsTab/LanguageMenu/" .. language));

    end

    self.tab1.snapToGrid:SetText(L:GetText("/PluginManager/OptionsTab/GlobalSettingsTab/SnapToGrid"));

    self.tab1.uiScale:ValueChanged();

    self.tab1.uiOpacity:ValueChanged();

    self.tab2:SetTabLeft(tab1Width);

    self.tab2:SetTabWidth(L:GetNumber("/PluginManager/OptionsTab/DirectoryTabWidth"));

    self.tab2:SetTabText(L:GetText("/PluginManager/OptionsTab/Directory"));

    self.instructions:SetText(L:GetText("/PluginManager/OptionsTab/Instructions"));

    ShowHideButton.buttonWidth = L:GetNumber("/PluginManager/OptionsTab/ShowHideButtonWidth");

    ShowHideButton.showText = L:GetText("/PluginManager/OptionsTab/Show");

    ShowHideButton.hideText = L:GetText("/PluginManager/OptionsTab/Hide");

end

function OptionsPanel:RefreshGlobalSettings()

    for language in keys(self.tab1.languageButtons) do

        self.tab1.languageButtons[language]:SetChecked(self.manager.settings.language == Turbine.Language[language]);

    end

    self.tab1.snapToGrid:SetChecked(self.manager.settings.snapToGrid);

    self.tab1.uiScale:SetValue(self.manager.settings.uiScale);

    self.tab1.uiOpacity:SetValue(self.manager.settings.uiOpacity * 100);

end

function OptionsPanel:RefreshDirectory()

    if (not self:IsDisplayed() or (not self.tab2:IsInFront())) then

        return self:ShowRefreshButton();

    end

    self.tab2:SetInteriorControl(self.tab2.inside);

    self:Localize();

    if (self.tree) then

        self.tree:SetPosition(10,10);

        self.tree:SetParent(nil);

    end

    self.tree = self:AddTreeNode(nil, self.manager);

    self.tree:SetParent(self.tab2.inside);

    self.tree:SetTop(self.instructions.height);

    self.tree.SizeChanged = function()

        local newHeight = self.instructions.height + self.tree:GetHeight();

        newHeight = math.max(newHeight, self.tab1.inside:GetHeight());

        self.tab2.inside:SetHeight(newHeight);

        self:SetHeight(newHeight + 40);

    end

    self.tree.SizeChanged();

    self.width = 0;

    self:SizeChanged();

end

function OptionsPanel:SetHeight(height)

    Turbine.UI.Control.SetHeight(self, height);

    self.tabs:SetHeight(height);

end

function OptionsPanel:SizeChanged()

    if (self.skipSizeChanged > 0) then

        self.skipSizeChanged = self.skipSizeChanged - 1;

        return;

    end

    local width = self:GetWidth();

    if (self.width ~= width) then

        self.width = width;

        self.tabs:SetWidth(self.width);

        self.tab2.inside:SetWidth(self.width - 20);

        if (self.tree) then

            self.instructions:SetWidth(self.width - 20);

            self.tree:SetWidth(self.width - 20);

        end

    end

end

function OptionsPanel:AddTreeNode(parentNode, object)

    local newNode = Thurallor.UI.TreeControl();

    newNode.object = object;

    -- Add a text box for the name of the group or bar.

    newNode.label = NodeLabel(newNode, object);

    newNode:AddColumn(newNode.label, 1);

    -- Add the "Show" or "Hide" button.

    newNode.showHideButton = ShowHideButton(newNode, object);

    newNode:AddColumn(newNode.showHideButton, 0);

    if (parentNode) then

        parentNode:AddChild(newNode);

    end

    -- Add subnodes, if any, alphabetized

    local childIDs = {};

    if (object:CanHaveChildren()) then

        childIDs = object:GetChildIDs();

        table.sort(childIDs, function (a, b) return object:GetChild(a):GetName() < object:GetChild(b):GetName(); end);

        for c = 1, #childIDs, 1 do

            local childID = childIDs[c];

            local child = object:GetChild(childID);

            self:AddTreeNode(newNode, child);

        end

    end

    newNode:SetExpanded(not object.nodeCollapsed);

    -- Add mouse behaviors

    newNode.IconClicked = function(sender, args)

        object.nodeCollapsed = not newNode.expanded;

    end

    newNode.label.MouseClick = function(sender, args)

        -- Right-click displays the settings menu.

        if (args.Button == Turbine.UI.MouseButton.Right) then

            sender.node.object:ShowSettingsMenu(true);

        end

    end

    newNode.label.MouseDoubleClick = function(sender, args)

        -- Left-double-click opens the caption editor.

        if (args.Button == Turbine.UI.MouseButton.Left) then

            sender.node.object:EditCaption(newNode.label);

        end

    end

    newNode.label.MouseDown = function(sender, args)

        if ((args.Button == Turbine.UI.MouseButton.Left) and (sender ~= self.tree.label)) then

            sender.mouseDown = true;

            sender.originalLeft, sender.originalTop = sender.node:GetParent():PointToScreen(sender.node:GetPosition());

            sender.originalMouseX, sender.originalMouseY = Turbine.UI.Display.GetMouseX(), Turbine.UI.Display.GetMouseY();

        end

    end

    newNode.label.MouseMove = function(sender)

        if (sender.mouseDown) then

            -- Detach from tree

            if (not sender.detached) then

                sender.originalParentNode = sender.node:GetParentTreeControl();

                sender.originalChildNumber = sender.originalParentNode:RemoveChild(sender.node);

                self.carrierWindow:SetVisible(true);

                self.carrierWindow:SetSize(sender.node:GetSize());

                sender.node:SetParent(self.carrierWindow);

                sender.node:SetPosition(0, 0);

                self.carrierWindow:SetPosition(sender.originalLeft, sender.originalTop);

                sender.node:SetColumnWidth(3, 0);

                sender.detached = true;

            end

            local newMouseX, newMouseY = Turbine.UI.Display.GetMouseX(), Turbine.UI.Display.GetMouseY();

            local deltaX, deltaY = newMouseX - sender.originalMouseX, newMouseY - sender.originalMouseY;

            local left = sender.originalLeft + deltaX;

            local top = sender.originalTop + deltaY;

            self.carrierWindow:SetPosition(left, top);

            if (sender.previousHighlight) then

                sender.previousHighlight:SetBackColor(nil);

                sender.previousHighlight = nil;

            end

            -- Figure out if we're over another textBox

            local hoveringOverNode, target = self.tree:IsMouseInside();

            if (hoveringOverNode) then

                local source = sender.node;

                if (

                    (target.object:CanHaveChildren()) and

                    (target ~= source) and

                    (not source.object:Contains(target.object)) and

                    (source.object.parent ~= target.object)

                ) then

                    sender.targetObject = target.object;

--Puts("target object is " .. object.settings.type .. " " .. Serialize(object.settings.caption.text));

                    target.label:SetBackColor(Turbine.UI.Color(1, 0.25, 0.25, 0.75));

                    sender.previousHighlight = target.label;

                    return;

                end

            end

            sender.targetObject = nil;

        end

    end

    newNode.label.MouseUp = function(sender, args)

        if (args.Button == Turbine.UI.MouseButton.Left) then

            sender.mouseDown = false;

            if (sender.detached) then

                local newMouseX, newMouseY = Turbine.UI.Display.GetMouseX(), Turbine.UI.Display.GetMouseY();

                local deltaX, deltaY = newMouseX - sender.originalMouseX, newMouseY - sender.originalMouseY;

                -- Do the object transfer

                sender.node:SetParent(nil);

                if (sender.targetObject) then

                    local sourceObject = sender.node.object;

                    if (sourceObject.settings.type == "bar") then

                        self.manager:TransferBar(sourceObject.objectID, sourceObject.parent, sender.targetObject);

                    else

                        self.manager:TransferGroup(sourceObject.objectID, sourceObject.parent, sender.targetObject);

                    end

                else

                    -- Reattach to tree

                    self.carrierWindow:SetVisible(false);

                    sender.node:SetColumnWidth(3, ShowHideButton.buttonWidth);

                    sender.originalParentNode:InsertChild(sender.node, sender.originalChildNumber);

                    sender.detached = false;

                end

            end

        end

    end

    return newNode;

end