-- TirnaHelper.lua
local _;
local frame = CreateFrame("Frame", "OmaTirna", UIParent);

local function init()
    frame:UnregisterAllEvents();
    frame:SetPoint("TOP", UIParent, "TOP", -300, -250);
    frame:SetWidth(1);
    frame:SetHeight(1);
    for i = 0,2 do
        for j = 0,3 do
            local button = CreateFrame("CheckButton", "OmaTirna"..i..j, frame);
            button:SetPoint("TOPLEFT", frame, "TOPLEFT", i*52, j*42);
            button:SetWidth(50);
            button:SetHeight(40);
            button.normal = button:CreateTexture(nil, "BACKGROUND");
            button.normal:SetAllPoints();
            button.normal:SetColorTexture(0.4, 0.4, 0.4);
            button:SetNormalTexture(button.normal);
            button.check = button:CreateTexture(nil, "BACKGROUND");
            button.check:SetAllPoints();
            button.check:SetColorTexture(0.9, 0.9, 0.9);
            button:SetCheckedTexture(button.check);
        end
    end
    frame:Hide();
end

frame:SetScript("OnEvent", init);
frame:RegisterEvent("PLAYER_LOGIN");

SLASH_OMATIRNA1 = "/tirna";
function SlashCmdList.OMATIRNA()
    if frame:IsShown() then
        frame:Hide();
    else
        frame:Show();
    end
end