LoTROInterface SVN SequenceBars

UserEventsTab = class(Thurallor.UI.TabCard);

function UserEventsTab:Constructor(manager)

    Thurallor.UI.TabCard.Constructor(self, false, false);

    self.manager = manager;

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

    self:SetInteriorControl(self.inside);

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

    self:Localize();

end

function UserEventsTab:Localize()

    self:CloseSubwindows();

    self:Redraw();

    self:SetTabText(L:GetText("/DirectoryWindow/EventHeading"));

    local function LocalizeButton(button, text)

        local label = Turbine.UI.Label();

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

        label:SetText(text);

        label:AutoSize();

        button:SetText(text);

        button:SetWidth(label:GetWidth() + 12);

    end

    for _, buttonName in pairs(L:GetItems("/DirectoryWindow/EventButtons")) do

        LocalizeButton(self[buttonName], L:GetText("/DirectoryWindow/EventButtons/" .. buttonName));

    end

    self:ShowButtons();

end

function UserEventsTab:EventIsDeletable(eventName)

    local barList = self.manager:GetEventGenerators(eventName);

    local nodeList = self.manager:GetEventListeners(eventName);

    return not (barList or nodeList);

end

function UserEventsTab:ShowButtons()

    for _, buttonName in pairs(L:GetItems("/DirectoryWindow/EventButtons")) do

        self[buttonName]:SetVisible(false);

    end

    self.createEventButton:SetVisible(true);

    if (self.selectedEvent) then

        if (self:EventIsDeletable(self.selectedEvent)) then

            self.deleteEventButton:SetVisible(true);

        end

        if (self.manager:GetEventHotkeys(self.selectedEvent)) then

            self.removeHotkeyButton:SetVisible(true);

        else

            self.addHotkeyButton:SetVisible(true);

        end

        if (self.manager:GetEventChatTriggers(self.selectedEvent)) then

            self.removeChatTriggerButton:SetVisible(true);

        else

            self.addChatTriggerButton:SetVisible(true);

        end

    end

    -- Redistribute the buttons

    local buttons = self.buttons:GetControls();

    local left = 0;

    for c = 1, buttons:GetCount() do

        local ctl = buttons:Get(c);

        ctl:SetLeft(left);

        if (ctl:IsVisible()) then

            left = left + ctl:GetWidth() + 4;

        end

    end

end

function UserEventsTab:Redraw()

    if (not self.instructions) then

        local label = Turbine.UI.Label();

        label:SetParent(self.inside);

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

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

        label:SetForeColor(Turbine.UI.Color.PaleGoldenrod);

        self.instructions = label;

    end

    local lines = L:GetNumber("/DirectoryWindow/EventInstructionsLines") + 1;

    self.instructions:SetHeight(lines * 14);

    self.instructions:SetText(L:GetText("/DirectoryWindow/EventInstructions"));

    if (self.tableCtl) then

        self.tableCtl:SetParent(nil);

    end

    self.tableCtl = EventTableControl(self.manager);

    self.tableCtl:SetParent(self.inside);

    self.tableCtl:SetPosition(0, self.instructions:GetHeight() + 2);

    AddCallback(self.tableCtl, "SelectionChanged", function(ctl, args)

        self:EventSelected(args.New);

    end);

    AddCallback(self.tableCtl, "HotkeyClicked", function(_, args)

        self:ReplaceHotkey(args);

    end);

    AddCallback(self.tableCtl, "ChatTriggerClicked", function(_, args)

        self:ReplaceChatTrigger(args);

    end);

    if (not self.buttons) then

        self.buttons = Turbine.UI.Control();

        self.buttons:SetParent(self.inside);

        for _, buttonName in ipairs({

            "createEventButton",

            "deleteEventButton",

            "addHotkeyButton",

            "removeHotkeyButton",

            "addChatTriggerButton",

            "removeChatTriggerButton"

        }) do

            self[buttonName] = Turbine.UI.Lotro.Button();

            self[buttonName]:SetParent(self.buttons);

            self[buttonName].Click = function(ctl) self:ButtonClicked(buttonName) end

        end

    end

    self:SetSize(self:GetSize());

end

function UserEventsTab:SetSize(width, height)

    Thurallor.UI.TabCard.SetSize(self, width, height);

    self.inside:SetSize(width - 10, height - 30);

    self.instructions:SetWidth(width - 10);

    self.buttons:SetSize(width - 10, 20);

    self.buttons:SetTop(height - 50);

    self.tableCtl:SetSize(width - 10, height - 82);

end

function UserEventsTab:CloseSubwindows()

    if (self.hotkeyWindow) then

        self.hotkeyWindow:Close();

        self.hotkeyWindow = nil;

    end

    if (self.chatTriggerWindow) then

        self.chatTriggerWindow:Close();

        self.chatTriggerWindow = nil;

    end

end

function UserEventsTab:EventSelected(eventName)

    self:CloseSubwindows();

    self.selectedEvent = eventName;

    self:ShowButtons();

end

function UserEventsTab:ButtonClicked(buttonName)

    if (buttonName == "createEventButton") then

        local newEventText = L:GetText("/SequenceEditor/NewEvent");

        local eventName = newEventText;

        local i = 1;

        while (self.tableCtl:GetRow(eventName)) do

            i = i + 1;

            eventName = newEventText .. " " .. tostring(i);

        end

        self.tableCtl:CreateEvent(eventName);

    elseif (buttonName == "deleteEventButton") then

        self.tableCtl:DeleteEvent(self.selectedEvent);

    elseif (buttonName == "addHotkeyButton") then

        self:ReplaceHotkey();

    elseif (buttonName == "addChatTriggerButton") then

        self:ReplaceChatTrigger();

    elseif (buttonName == "removeHotkeyButton") then

        self.manager:ClearEventHotkeys(self.selectedEvent);

        self.tableCtl:UpdateCellContents(self.selectedEvent);

        self:ShowButtons();

    elseif (buttonName == "removeChatTriggerButton") then

        self.manager:ClearEventChatTriggers(self.selectedEvent);

        self.tableCtl:UpdateCellContents(self.selectedEvent);

        self:ShowButtons();

    end

end

function UserEventsTab:ReplaceHotkey()

    self:CloseSubwindows();

    self.hotkeyWindow = HotkeyAssignWindow();

    self.hotkeyWindow.KeySelected = function(_, args)

        self.manager:ClearEventHotkeys(self.selectedEvent);

        self.manager:SetEventHotkey(self.selectedEvent, args.Action, args.Event, args.Text);

        self.tableCtl:UpdateCellContents(self.selectedEvent);

        self:ShowButtons();

        self.hotkeyWindow = nil;

    end

    self.hotkeyWindow.Canceled = function()

        self.hotkeyWindow = nil;

    end

end

function UserEventsTab:ReplaceChatTrigger(args)

        args = args or {};

        self:CloseSubwindows();

        self.chatTriggerWindow = ChatTriggerWindow(args.ChatType, args.Pattern);

        self.chatTriggerWindow.Accepted = function(_, args)

            self.manager:ClearEventChatTriggers(self.selectedEvent);

            self.manager:SetEventChatTrigger(self.selectedEvent, args.ChatType, args.Pattern, args.Text);

            self.tableCtl:UpdateCellContents(self.selectedEvent);

            self:ShowButtons();

            self.chatTriggerWindow = nil;

        end

        self.chatTriggerWindow.Canceled = function()

            self.chatTriggerWindow = nil;

        end

end