WoWInterface SVN Broker_NameToggle

local BNT = CreateFrame("Frame", "Broker_NameToggle")

BNT.obj = LibStub:GetLibrary("LibDataBroker-1.1"):NewDataObject("Broker_NameToggle", {
        label = "Broker_NameToggle",
        icon = "Interface\\Icons\\Temp",
        text = "NameToggle",
   OnClick = function(_, button)
      if button == "LeftButton" then
         if IsShiftKeyDown() then ToggleCVar("nameplateShowFriends")
         elseif IsControlKeyDown() then ToggleCVar("UnitNameFriendlyCreationName")
         elseif IsAltKeyDown() then ToggleCVar("UnitNameFriendlyPetName")
         else ToggleCVar("UnitNameFriendlyPlayerName")
         end
      elseif button == "RightButton" then
         if IsShiftKeyDown() then ToggleCVar("nameplateShowEnemies")
         elseif IsControlKeyDown() then ToggleCVar("UnitNameEnemyCreationName")
         elseif IsAltKeyDown() then ToggleCVar("UnitNameEnemyPetName")
         else ToggleCVar("UnitNameEnemyPlayerName")
         end
      elseif button == "MiddleButton" then
         if IsShiftKeyDown() then ToggleCVar("UnitNameOwn")
         elseif IsControlKeyDown() then ToggleCVar("UnitNamePlayerPVPTitle")
         elseif IsAltKeyDown() then ToggleCVar("UnitNamePlayerGuild")
         else ToggleCVar("UnitNameNPC")
         end
      elseif button == "Button4" then
         ToggleCVar("UnitNameCompanionName")
      end
   end,
   OnTooltipShow = function(tooltip)
      tooltip:AddLine("|cffffffffBroker_NameToggle|r",1,1,1)
      tooltip:AddLine(" ")
      tooltip:AddDoubleLine("[|cffffffffLeftClick|r]", "Toggle friendly player names")
      tooltip:AddDoubleLine("[|cffffffffAlt+LeftClick|r]", "Toggle friendly pet names")
      tooltip:AddDoubleLine("[|cffffffffCtrl+LeftClick|r]", "Toggle friendly creation names")
      tooltip:AddDoubleLine("[|cffffffffShift+LeftClick|r]", "Toggle friendly nameplates")
      tooltip:AddLine(" ")
      tooltip:AddDoubleLine("[|cffffffffRightClick|r]", "Toggle enemy player names")
      tooltip:AddDoubleLine("[|cffffffffAlt+RightClick|r]", "Toggle enemy player pet names")
      tooltip:AddDoubleLine("[|cffffffffCtrl+RightClick|r]", "Toggle enemy creation names")
      tooltip:AddDoubleLine("[|cffffffffShift+RightClick|r]", "Toggle enemy nameplates")
      tooltip:AddLine(" ")
      tooltip:AddDoubleLine("[|cffffffffMiddleClick|r]", "Toggle non-player names")
      tooltip:AddDoubleLine("[|cffffffffAlt+MiddleClick|r]", "Toggle player guild names")
      tooltip:AddDoubleLine("[|cffffffffCtrl+MiddleClick|r]", "Toggle player titles")
      tooltip:AddDoubleLine("[|cffffffffShift+MiddleClick|r]", "Toggle own name")
      tooltip:AddLine(" ")
      tooltip:AddDoubleLine("[|cffffffffButton4|r]", "Toggle companion names")
      tooltip:Show()
   end,
        }
)

function ToggleCVar(var)
   SetCVar(var, GetCVar(var) == "1" and 0 or 1)
   ChatFrame1:AddMessage("|cffcfb53bNameToggle|r: "..var.." is now "..(GetCVar(var) == "1" and "|cff00ff00shown|r" or "|cffff0000hidden|r")..".")
end