WoWInterface SVN MapofAzeroth
Compare Revisions
- This comparison shows the changes necessary to convert path
/
- from Rev 28 to Rev 27
- ↔ Reverse comparison
Rev 28 → Rev 27
LICENSE.txt
New file
0,0 → 1,6
\ No newline at end of file
| Copyright (c) 2010, Map of Azeroth |
| All Rights Reserved |
| Credit goes to Dan Gilbert for Atlas. |
| Credit goes to Ckknight for Cartographer. |
| Credit goes to anybody who made something for either Cartographer or Atlas for what they made. |
Maps/VaultOfArchavon.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/BlackTempleBasement.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/TheNexus.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/BlackfathomDeepsEnt.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/BlackrockDepths.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/AuchindounEnt.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/MagistersTerrace.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/SMLibrary.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/TheRuinsofAhnQiraj.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/SunwellPlateau.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/Maraudon.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/BlackTempleTop.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/BlackrockSpireLower.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/CoTBlackMorass.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/BlackwingLair.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/UlduarHallsofLightning.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/AzjolNerub.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/TheOculus.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/WailingCaverns.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/KarazhanStart.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/CoTHyjal.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/UlduarHallsofStone.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/DireMaulEast.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/FHHallsOfReflection.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/AuchManaTombs.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/Gnomeregan.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/CFRSerpentshrineCavern.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/AuchAuchenaiCrypts.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/HCTheShatteredHalls.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/SMCathedral.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/UldamanEnt.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/TrialOfTheCrusader.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/TheTempleofAhnQiraj.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/TheDeadmines.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/TheEyeOfEternity.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/BlackfathomDeeps.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/IcecrownCitadelA.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/IcecrownCitadelB.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/FHPitOfSaron.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/IcecrownCitadelC.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/Naxxramas.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/BlackrockSpireEnt.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/ZulAman.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/VioletHold.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/DireMaulEnt.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/SMArmory.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/BlackrockSpireUpper.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/RubySanctum.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/DireMaulNorth.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/MaraudonEnt.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/TrialOfTheChampion.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/CFRTheSteamvault.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/Stratholme.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/AuchSethekkHalls.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/RazorfenKraul.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/TempestKeepBotanica.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/GnomereganEnt.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/CoilfangReservoirEnt.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/TempestKeepTheEye.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/FHTheForgeOfSouls.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/CFRTheSlavePens.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/TheStockade.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/RagefireChasm.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/RazorfenDowns.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/BlackTempleStart.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/CFRTheUnderbog.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/TheDeadminesEnt.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/OnyxiasLair.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/DrakTharonKeep.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/AuchShadowLabyrinth.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/UtgardePinnacle.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/MoltenCore.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/HCMagtheridonsLair.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/CoTOldHillsbrad.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/HCBloodFurnace.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/TempestKeepArcatraz.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/Uldaman.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/AhnKahet.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/SMGraveyard.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/TempestKeepMechanar.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/KarazhanEnd.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/ShadowfangKeep.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/GruulsLair.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/Gundrak.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/Scholomance.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/UlduarA.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/UlduarB.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/UlduarC.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/UlduarD.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/UlduarE.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/ZulFarrak.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/DireMaulWest.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/KarazhanEnt.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/TheSunkenTemple.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/ZulGurub.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/HCHellfireRamparts.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/TheSunkenTempleEnt.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/WailingCavernsEnt.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/ObsidianSanctum.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/SMEnt.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/CoTOldStratholme.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/CoTEnt.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
Maps/UtgardeKeep.blp
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes :
Added: svn:mime-type
+ application/octet-stream
FogClear.lua
--- Changelog.txt (revision 0)
+++ Changelog.txt (revision 27)
@@ -0,0 +1,6 @@
+Revamped the addon.
+Re-organized the addon.
+Added files and folders back.
+Disabled keybindings.
+Fixed errors.
+________________________________________________________
\ No newline at end of file
ZoneInfo.lua
Waypoints.lua
--- MapofAzeroth.lua (revision 0)
+++ MapofAzeroth.lua (revision 27)
@@ -0,0 +1,105 @@
+-- Map of Azeroth
+-- Copyright 2010
+
+-- BINDINGs labels
+BINDING_HEADER_MAPOFAZEROTH ="Map of Azeroth"
+BINDING_NAME_MARKER_TOGGLE ="Toggle Markers"
+BINDING_NAME_OPTION_TOGGLE ="Toggle Options"
+--
+
+local gui = LibStub("AceGUI-3.0")
+local reg = LibStub("AceConfigRegistry-3.0")
+local dialog = LibStub("AceConfigDialog-3.0")
+
+MapofAzeroth = LibStub("AceAddon-3.0"):NewAddon("MapofAzeroth", "AceConsole-3.0")
+local Ace3 = MapofAzeroth
+
+local selectedgroup
+local frame
+local select
+local status = {}
+local configs = {}
+
+local function frameOnClose()
+ gui:Release(frame)
+ frame = nil
+end
+
+local function RefreshConfigs()
+ for name in reg:IterateOptionsTables() do
+ configs[name] = name
+ end
+end
+
+local function ConfigSelected(widget, event, value)
+ selectedgroup = value
+ dialog:Open(value, widget)
+end
+
+local old_CloseSpecialWindows
+
+function Ace3:Open()
+ if not old_CloseSpecialWindows then
+ old_CloseSpecialWindows = CloseSpecialWindows
+ CloseSpecialWindows = function()
+ local found = old_CloseSpecialWindows()
+ if frame then
+ frame:Hide()
+ return true
+ end
+ return found
+ end
+ end
+ RefreshConfigs()
+ if next(configs) == nil then
+ self:Print("No Configs are Registered")
+ return
+ end
+
+ if not frame then
+ frame = gui:Create("Frame")
+ frame:ReleaseChildren()
+ frame:SetTitle("Ace3 Options")
+ frame:SetLayout("FILL")
+ frame:SetCallback("OnClose", frameOnClose)
+
+ select = gui:Create("DropdownGroup")
+ select:SetGroupList(configs)
+ select:SetCallback("OnGroupSelected", ConfigSelected)
+ frame:AddChild(select)
+ end
+ if not selectedgroup then
+ selectedgroup = next(configs)
+ end
+ select:SetGroup(selectedgroup)
+ frame:Show()
+end
+
+local function RefreshOnUpdate(this)
+ select:SetGroup(selectedgroup)
+ this:SetScript("OnUpdate", nil)
+end
+
+function Ace3:ConfigTableChanged(event, appName)
+ if selectedgroup == appName and frame then
+ frame.frame:SetScript("OnUpdate", RefreshOnUpdate)
+ end
+end
+
+reg.RegisterCallback(Ace3, "ConfigTableChange", "ConfigTableChanged")
+
+function Ace3:PrintCmd(input)
+ input = input:trim():match("^(.-);*$")
+ local func, err = loadstring("LibStub(\"AceConsole-3.0\"):Print(" .. input .. ")")
+ if not func then
+ LibStub("AceConsole-3.0"):Print("Error: " .. err)
+ else
+ func()
+ end
+end
+
+function Ace3:OnInitialize()
+ self:RegisterChatCommand("ace3", function() self:Open() end)
+ self:RegisterChatCommand("rl", function() ReloadUI() end)
+ self:RegisterChatCommand("print", "PrintCmd")
+end
Maps.lua
MapofAzeroth.toc
New file
0,0 → 1,39
\ No newline at end of file
| ## Interface: 30300 |
| ## X-Curse-Packaged-Version: v1.0 Alpha |
| ## X-Curse-Project-Name: Map of Azeroth |
| ## X-Curse-Project-ID: map-azeroth |
| ## Title: Map of Azeroth |
| ## Notes: Season One |
| ## Author: Tilteri |
| ## X-Website: http://www.curseforge.com |
| ## X-Category: Map & Minimap |
| ## X-License: All Rights Reserved |
| LibStub\LibStub.lua |
| CallbackHandler-1.0\CallbackHandler-1.0.xml |
| AceAddon-3.0\AceAddon-3.0.xml |
| AceEvent-3.0\AceEvent-3.0.xml |
| AceHook-3.0\AceHook-3.0.xml |
| AceDB-3.0\AceDB-3.0.xml |
| AceDBOptions-3.0\AceDBOptions-3.0.xml |
| AceLocale-3.0\AceLocale-3.0.xml |
| AceConsole-3.0\AceConsole-3.0.xml |
| AceGUI-3.0\AceGUI-3.0.xml |
| AceConfig-3.0\AceConfig-3.0.xml |
| LibTourist-3.0\LibTourist-3.0.xml |
| LibWindow-1.1\LibWindow-1.1.xml |
| LibGuildPositions-1.0\LibGuildPositions-1.0.xml |
| MapofAzeroth.lua |
| Coordinates.lua |
| FogClear.lua |
| GroupIcons.lua |
| GuildPositions.lua |
| InstanceLoot.lua |
| LookNFeel.lua |
| Waypoints.lua |
| ZoneInfo.lua |
| Markers.lua |
| Maps.lua |
Markers.lua
--- Libs/AceDBOptions-3.0/AceDBOptions-3.0.xml (revision 0)
+++ Libs/AceDBOptions-3.0/AceDBOptions-3.0.xml (revision 27)
@@ -0,0 +1,4 @@
+
+
+
\ No newline at end of file
Libs/AceDBOptions-3.0/AceDBOptions-3.0.lua
New file
0,0 → 1,396
| --- AceDBOptions-3.0 provides a universal AceConfig options screen for managing AceDB-3.0 profiles. |
| -- @class file |
| -- @name AceDBOptions-3.0 |
| -- @release $Id: AceDBOptions-3.0.lua 765 2009-04-03 19:14:41Z nevcairiel $ |
| local ACEDBO_MAJOR, ACEDBO_MINOR = "AceDBOptions-3.0", 10 |
| local AceDBOptions, oldminor = LibStub:NewLibrary(ACEDBO_MAJOR, ACEDBO_MINOR) |
| if not AceDBOptions then return end -- No upgrade needed |
| AceDBOptions.optionTables = AceDBOptions.optionTables or {} |
| AceDBOptions.handlers = AceDBOptions.handlers or {} |
| --[[ |
| Localization of AceDBOptions-3.0 |
| ]] |
| local L = { |
| default = "Default", |
| intro = "You can change the active database profile, so you can have different settings for every character.", |
| reset_desc = "Reset the current profile back to its default values, in case your configuration is broken, or you simply want to start over.", |
| reset = "Reset Profile", |
| reset_sub = "Reset the current profile to the default", |
| choose_desc = "You can either create a new profile by entering a name in the editbox, or choose one of the already exisiting profiles.", |
| new = "New", |
| new_sub = "Create a new empty profile.", |
| choose = "Existing Profiles", |
| choose_sub = "Select one of your currently available profiles.", |
| copy_desc = "Copy the settings from one existing profile into the currently active profile.", |
| copy = "Copy From", |
| delete_desc = "Delete existing and unused profiles from the database to save space, and cleanup the SavedVariables file.", |
| delete = "Delete a Profile", |
| delete_sub = "Deletes a profile from the database.", |
| delete_confirm = "Are you sure you want to delete the selected profile?", |
| profiles = "Profiles", |
| profiles_sub = "Manage Profiles", |
| } |
| local LOCALE = GetLocale() |
| if LOCALE == "deDE" then |
| L["default"] = "Standard" |
| L["intro"] = "Hier kannst du das aktive Datenbankprofile \195\164ndern, damit du verschiedene Einstellungen f\195\188r jeden Charakter erstellen kannst, wodurch eine sehr flexible Konfiguration m\195\182glich wird." |
| L["reset_desc"] = "Setzt das momentane Profil auf Standardwerte zur\195\188ck, f\195\188r den Fall das mit der Konfiguration etwas schief lief oder weil du einfach neu starten willst." |
| L["reset"] = "Profil zur\195\188cksetzen" |
| L["reset_sub"] = "Das aktuelle Profil auf Standard zur\195\188cksetzen." |
| L["choose_desc"] = "Du kannst ein neues Profil erstellen, indem du einen neuen Namen in der Eingabebox 'Neu' eingibst, oder w\195\164hle eines der vorhandenen Profile aus." |
| L["new"] = "Neu" |
| L["new_sub"] = "Ein neues Profil erstellen." |
| L["choose"] = "Vorhandene Profile" |
| L["choose_sub"] = "W\195\164hlt ein bereits vorhandenes Profil aus." |
| L["copy_desc"] = "Kopiere die Einstellungen von einem vorhandenen Profil in das aktive Profil." |
| L["copy"] = "Kopieren von..." |
| L["delete_desc"] = "L\195\182sche vorhandene oder unbenutzte Profile aus der Datenbank um Platz zu sparen und um die SavedVariables Datei 'sauber' zu halten." |
| L["delete"] = "Profil l\195\182schen" |
| L["delete_sub"] = "L\195\182scht ein Profil aus der Datenbank." |
| L["delete_confirm"] = "Willst du das ausgew\195\164hlte Profil wirklich l\195\182schen?" |
| L["profiles"] = "Profile" |
| L["profiles_sub"] = "Profile verwalten" |
| elseif LOCALE == "frFR" then |
| L["default"] = "D\195\169faut" |
| L["intro"] = "Vous pouvez changer le profil actuel afin d'avoir des param\195\168tres diff\195\169rents pour chaque personnage, permettant ainsi d'avoir une configuration tr\195\168s flexible." |
| L["reset_desc"] = "R\195\169initialise le profil actuel au cas o\195\185 votre configuration est corrompue ou si vous voulez tout simplement faire table rase." |
| L["reset"] = "R\195\169initialiser le profil" |
| L["reset_sub"] = "R\195\169initialise le profil actuel avec les param\195\168tres par d\195\169faut." |
| L["choose_desc"] = "Vous pouvez cr\195\169er un nouveau profil en entrant un nouveau nom dans la bo\195\174te de saisie, ou en choississant un des profils d\195\169j\195\160 existants." |
| L["new"] = "Nouveau" |
| L["new_sub"] = "Cr\195\169\195\169e un nouveau profil vierge." |
| L["choose"] = "Profils existants" |
| L["choose_sub"] = "Permet de choisir un des profils d\195\169j\195\160 disponibles." |
| L["copy_desc"] = "Copie les param\195\168tres d'un profil d\195\169j\195\160 existant dans le profil actuellement actif." |
| L["copy"] = "Copier \195\160 partir de" |
| L["delete_desc"] = "Supprime les profils existants inutilis\195\169s de la base de donn\195\169es afin de gagner de la place et de nettoyer le fichier SavedVariables." |
| L["delete"] = "Supprimer un profil" |
| L["delete_sub"] = "Supprime un profil de la base de donn\195\169es." |
| L["delete_confirm"] = "Etes-vous s\195\187r de vouloir supprimer le profil s\195\169lectionn\195\169 ?" |
| L["profiles"] = "Profils" |
| L["profiles_sub"] = "Gestion des profils" |
| elseif LOCALE == "koKR" then |
| L["default"] = "기본ê°" |
| L["intro"] = "모ë ìºë¦í°ì ë¤ìí ì¤ì ê³¼ ì¬ì©ì¤ì¸ ë°ì´í°ë² ì´ì¤ íë¡í, ì´ëê²ì´ëì§ ë§¤ì° ë¤ë£¨ê¸° ì½ê² ë°ê¿ì ììµëë¤." |
| L["reset_desc"] = "ë¨ìí ë¤ì ìë¡ê² 구ì±ì ìíë ê²½ì°, íì¬ íë¡íì 기본ê°ì¼ë¡ ì´ê¸°í í©ëë¤." |
| L["reset"] = "íë¡í ì´ê¸°í" |
| L["reset_sub"] = "íì¬ì íë¡íì 기본ê°ì¼ë¡ ì´ê¸°í í©ëë¤" |
| L["choose_desc"] = "ìë¡ì´ ì´ë¦ì ì ë ¥íê±°ë, ì´ë¯¸ ìë íë¡íì¤ íë를 ì ííì¬ ìë¡ì´ íë¡íì ë§ë¤ ì ììµëë¤." |
| L["new"] = "ìë¡ì´ íë¡í" |
| L["new_sub"] = "ìë¡ì´ íë¡íì ë§ëëë¤." |
| L["choose"] = "íë¡í ì í" |
| L["choose_sub"] = "ë¹ì ì´ íì¬ ì´ì©í ì ìë íë¡íì ì íí©ëë¤." |
| L["copy_desc"] = "íì¬ ì¬ì©ì¤ì¸ íë¡íì, ì íí íë¡íì ì¤ì ì ë³µì¬í©ëë¤." |
| L["copy"] = "ë³µì¬" |
| L["delete_desc"] = "ë°ì´í°ë² ì´ì¤ì ì¬ì©ì¤ì´ê±°ë ì ì¥ë íë¡íì¼ ìì ë¡ SavedVariables íì¼ì ì 리ì ê³µê° ì ì½ì´ ë©ëë¤." |
| L["delete"] = "íë¡í ìì " |
| L["delete_sub"] = "ë°ì´í°ë² ì´ì¤ì íë¡íì ìì í©ëë¤." |
| L["delete_confirm"] = "ì ë§ë¡ ì íí íë¡íì ìì 를 ìíìëê¹?" |
| L["profiles"] = "íë¡í" |
| L["profiles_sub"] = "íë¡í ì¤ì " |
| elseif LOCALE == "esES" then |
| L["default"] = "Por defecto" |
| L["intro"] = "Puedes cambiar el perfil activo de tal manera que cada personaje tenga diferentes configuraciones." |
| L["reset_desc"] = "Reinicia el perfil actual a los valores por defectos, en caso de que se haya estropeado la configuración o quieras volver a empezar de nuevo." |
| L["reset"] = "Reiniciar Perfil" |
| L["reset_sub"] = "Reinicar el perfil actual al de por defecto" |
| L["choose_desc"] = "Puedes crear un nuevo perfil introduciendo un nombre en el recuadro o puedes seleccionar un perfil de los ya existentes." |
| L["new"] = "Nuevo" |
| L["new_sub"] = "Crear un nuevo perfil vacio." |
| L["choose"] = "Perfiles existentes" |
| L["choose_sub"] = "Selecciona uno de los perfiles disponibles." |
| L["copy_desc"] = "Copia los ajustes de un perfil existente al perfil actual." |
| L["copy"] = "Copiar de" |
| L["delete_desc"] = "Borra los perfiles existentes y sin uso de la base de datos para ganar espacio y limpiar el archivo SavedVariables." |
| L["delete"] = "Borrar un Perfil" |
| L["delete_sub"] = "Borra un perfil de la base de datos." |
| L["delete_confirm"] = "¿Estas seguro que quieres borrar el perfil seleccionado?" |
| L["profiles"] = "Perfiles" |
| L["profiles_sub"] = "Manejar Perfiles" |
| elseif LOCALE == "zhTW" then |
| L["default"] = "é è¨" |
| L["intro"] = "ä½ å¯ä»¥é¸æä¸åæ´»åçè³æè¨å®æªï¼éæ¨£ä½ çæ¯åè§è²å°±å¯ä»¥ææä¸åçè¨å®å¼ï¼å¯ä»¥çµ¦ä½ çæ件è¨å®å¸¶ä¾æ¥µå¤§çéæ´»æ§ã" |
| L["reset_desc"] = "å°ç¶åçè¨å®æªæ¢å¾©å°å®çé è¨å¼ï¼ç¨æ¼ä½ çè¨å®æªæå£ï¼æè ä½ åªæ¯æ³éä¾çæ æ³ã" |
| L["reset"] = "éç½®è¨å®æª" |
| L["reset_sub"] = "å°ç¶åçè¨å®æªæ¢å¾©çºé è¨å¼" |
| L["choose_desc"] = "ä½ å¯ä»¥ééå¨ææ¬æ¡å §è¼¸å ¥ä¸ååååµç«ä¸åæ°çè¨å®æªï¼ä¹å¯ä»¥é¸æä¸åå·²ç¶åå¨çè¨å®æªã" |
| L["new"] = "æ°å»º" |
| L["new_sub"] = "æ°å»ºä¸å空çè¨å®æªã" |
| L["choose"] = "ç¾æçè¨å®æª" |
| L["choose_sub"] = "å¾ç¶åå¯ç¨çè¨å®æªè£é¢é¸æä¸åã" |
| L["copy_desc"] = "å¾ç¶åæåå·²ä¿åçè¨å®æªè¤è£½å°ç¶åæ£ä½¿ç¨çè¨å®æªã" |
| L["copy"] = "è¤è£½èª" |
| L["delete_desc"] = "å¾è³æ庫è£åªé¤ä¸å使ç¨çè¨å®æªï¼ä»¥ç¯ç空éï¼ä¸¦ä¸æ¸ çSavedVariablesæªã" |
| L["delete"] = "åªé¤ä¸åè¨å®æª" |
| L["delete_sub"] = "å¾è³æ庫è£åªé¤ä¸åè¨å®æªã" |
| L["delete_confirm"] = "ä½ ç¢ºå®è¦åªé¤æé¸æçè¨å®æªåï¼" |
| L["profiles"] = "è¨å®æª" |
| L["profiles_sub"] = "管çè¨å®æª" |
| elseif LOCALE == "zhCN" then |
| L["default"] = "é»è®¤" |
| L["intro"] = "ä½ å¯ä»¥éæ©ä¸ä¸ªæ´»å¨çæ°æ®é ç½®æ件ï¼è¿æ ·ä½ çæ¯ä¸ªè§è²å°±å¯ä»¥æ¥æä¸åç设置å¼ï¼å¯ä»¥ç»ä½ çæ件é 置带æ¥æ大ççµæ´»æ§ã" |
| L["reset_desc"] = "å°å½åçé ç½®æ件æ¢å¤å°å®çé»è®¤å¼ï¼ç¨äºä½ çé ç½®æ件æåï¼æè ä½ åªæ¯æ³éæ¥çæ åµã" |
| L["reset"] = "éç½®é ç½®æ件" |
| L["reset_sub"] = "å°å½åçé ç½®æ件æ¢å¤ä¸ºé»è®¤å¼" |
| L["choose_desc"] = "ä½ å¯ä»¥éè¿å¨ææ¬æ¡å è¾å ¥ä¸ä¸ªåååç«ä¸ä¸ªæ°çé ç½®æ件ï¼ä¹å¯ä»¥éæ©ä¸ä¸ªå·²ç»åå¨çé ç½®æ件ã" |
| L["new"] = "æ°å»º" |
| L["new_sub"] = "æ°å»ºä¸ä¸ªç©ºçé ç½®æ件ã" |
| L["choose"] = "ç°æçé ç½®æ件" |
| L["choose_sub"] = "ä»å½åå¯ç¨çé ç½®æ件éé¢éæ©ä¸ä¸ªã" |
| L["copy_desc"] = "ä»å½åæ个已ä¿åçé ç½®æ件å¤å¶å°å½åæ£ä½¿ç¨çé ç½®æ件ã" |
| L["copy"] = "å¤å¶èª" |
| L["delete_desc"] = "ä»æ°æ®åºéå é¤ä¸å使ç¨çé ç½®æ件ï¼ä»¥èç空é´ï¼å¹¶ä¸æ¸ çSavedVariablesæ件ã" |
| L["delete"] = "å é¤ä¸ä¸ªé ç½®æ件" |
| L["delete_sub"] = "ä»æ°æ®åºéå é¤ä¸ä¸ªé ç½®æ件ã" |
| L["delete_confirm"] = "ä½ ç¡®å®è¦å é¤æéæ©çé ç½®æ件ä¹ï¼" |
| L["profiles"] = "é ç½®æ件" |
| L["profiles_sub"] = "管çé ç½®æ件" |
| elseif LOCALE == "ruRU" then |
| L["default"] = "Ðо ÑмолÑаниÑ" |
| L["intro"] = "ÐзменÑÑ Ð°ÐºÑивнÑй пÑоÑилÑ, Ð²Ñ Ð¼Ð¾Ð¶ÐµÑе задаÑÑ ÑазлиÑнÑе наÑÑÑойки модиÑикаÑий Ð´Ð»Ñ ÐºÐ°Ð¶Ð´Ð¾Ð³Ð¾ пеÑÑонажа." |
| L["reset_desc"] = "ÐÑли ваÑа конÑигÑÑаÑии иÑпоÑÑена или еÑли Ð²Ñ Ñ Ð¾ÑиÑе наÑÑÑоиÑÑ Ð²ÑÑ Ð·Ð°Ð½Ð¾Ð²Ð¾ - ÑбÑоÑÑÑе ÑекÑÑий пÑоÑÐ¸Ð»Ñ Ð½Ð° ÑÑандаÑÑнÑе знаÑениÑ." |
| L["reset"] = "СбÑÐ¾Ñ Ð¿ÑоÑилÑ" |
| L["reset_sub"] = "СбÑÐ¾Ñ ÑекÑÑего пÑоÑÐ¸Ð»Ñ Ð½Ð° ÑÑандаÑÑнÑй" |
| L["choose_desc"] = "ÐÑ Ð¼Ð¾Ð¶ÐµÑе ÑоздаÑÑ Ð½Ð¾Ð²Ñй пÑоÑилÑ, Ð²Ð²ÐµÐ´Ñ Ð½Ð°Ð·Ð²Ð°Ð½Ð¸Ðµ в поле ввода, или вÑбÑаÑÑ Ð¾Ð´Ð¸Ð½ из Ñже ÑÑÑеÑÑвÑÑÑÐ¸Ñ Ð¿ÑоÑилей." |
| L["new"] = "ÐовÑй" |
| L["new_sub"] = "СоздаÑÑ Ð½Ð¾Ð²Ñй ÑиÑÑÑй пÑоÑилÑ" |
| L["choose"] = "СÑÑеÑÑвÑÑÑие пÑоÑили" |
| L["choose_sub"] = "ÐÑÐ±Ð¾Ñ Ð¾Ð´Ð¸Ð½Ð¾Ð³Ð¾ из Ñже доÑÑÑпнÑÑ Ð¿ÑоÑилей" |
| L["copy_desc"] = "СкопиÑоваÑÑ Ð½Ð°ÑÑÑойки из вÑбÑанного пÑоÑÐ¸Ð»Ñ Ð² акÑивнÑй." |
| L["copy"] = "СкопиÑоваÑÑ Ð¸Ð·" |
| L["delete_desc"] = "УдалиÑÑ ÑÑÑеÑÑвÑÑÑий и неиÑполÑзÑемÑй пÑоÑÐ¸Ð»Ñ Ð¸Ð· ÐÐ Ð´Ð»Ñ ÑÐ¾Ñ ÑÐ°Ð½ÐµÐ½Ð¸Ñ Ð¼ÐµÑÑа, и оÑиÑÑиÑÑ SavedVariables Ñайл." |
| L["delete"] = "УдалиÑÑ Ð¿ÑоÑилÑ" |
| L["delete_sub"] = "Удаление пÑоÑÐ¸Ð»Ñ Ð¸Ð· ÐÐ" |
| L["delete_confirm"] = "ÐÑ ÑвеÑенÑ, ÑÑо Ð²Ñ Ñ Ð¾ÑиÑе ÑдалиÑÑ Ð²ÑбÑаннÑй пÑоÑилÑ?" |
| L["profiles"] = "ÐÑоÑили" |
| L["profiles_sub"] = "УпÑавление пÑоÑилÑми" |
| end |
| local defaultProfiles |
| local tmpprofiles = {} |
| -- Get a list of available profiles for the specified database. |
| -- You can specify which profiles to include/exclude in the list using the two boolean parameters listed below. |
| -- @param db The db object to retrieve the profiles from |
| -- @param common If true, getProfileList will add the default profiles to the return list, even if they have not been created yet |
| -- @param nocurrent If true, then getProfileList will not display the current profile in the list |
| -- @return Hashtable of all profiles with the internal name as keys and the display name as value. |
| local function getProfileList(db, common, nocurrent) |
| local profiles = {} |
| -- copy existing profiles into the table |
| local currentProfile = db:GetCurrentProfile() |
| for i,v in pairs(db:GetProfiles(tmpprofiles)) do |
| if not (nocurrent and v == currentProfile) then |
| profiles[v] = v |
| end |
| end |
| -- add our default profiles to choose from ( or rename existing profiles) |
| for k,v in pairs(defaultProfiles) do |
| if (common or profiles[k]) and not (nocurrent and k == currentProfile) then |
| profiles[k] = v |
| end |
| end |
| return profiles |
| end |
| --[[ |
| OptionsHandlerPrototype |
| prototype class for handling the options in a sane way |
| ]] |
| local OptionsHandlerPrototype = {} |
| --[[ Reset the profile ]] |
| function OptionsHandlerPrototype:Reset() |
| self.db:ResetProfile() |
| end |
| --[[ Set the profile to value ]] |
| function OptionsHandlerPrototype:SetProfile(info, value) |
| self.db:SetProfile(value) |
| end |
| --[[ returns the currently active profile ]] |
| function OptionsHandlerPrototype:GetCurrentProfile() |
| return self.db:GetCurrentProfile() |
| end |
| --[[ |
| List all active profiles |
| you can control the output with the .arg variable |
| currently four modes are supported |
| (empty) - return all available profiles |
| "nocurrent" - returns all available profiles except the currently active profile |
| "common" - returns all avaialble profiles + some commonly used profiles ("char - realm", "realm", "class", "Default") |
| "both" - common except the active profile |
| ]] |
| function OptionsHandlerPrototype:ListProfiles(info) |
| local arg = info.arg |
| local profiles |
| if arg == "common" and not self.noDefaultProfiles then |
| profiles = getProfileList(self.db, true, nil) |
| elseif arg == "nocurrent" then |
| profiles = getProfileList(self.db, nil, true) |
| elseif arg == "both" then -- currently not used |
| profiles = getProfileList(self.db, (not self.noDefaultProfiles) and true, true) |
| else |
| profiles = getProfileList(self.db) |
| end |
| return profiles |
| end |
| function OptionsHandlerPrototype:HasNoProfiles(info) |
| local profiles = self:ListProfiles(info) |
| return ((not next(profiles)) and true or false) |
| end |
| --[[ Copy a profile ]] |
| function OptionsHandlerPrototype:CopyProfile(info, value) |
| self.db:CopyProfile(value) |
| end |
| --[[ Delete a profile from the db ]] |
| function OptionsHandlerPrototype:DeleteProfile(info, value) |
| self.db:DeleteProfile(value) |
| end |
| --[[ fill defaultProfiles with some generic values ]] |
| local function generateDefaultProfiles(db) |
| defaultProfiles = { |
| ["Default"] = L["default"], |
| [db.keys.char] = db.keys.char, |
| [db.keys.realm] = db.keys.realm, |
| [db.keys.class] = UnitClass("player") |
| } |
| end |
| --[[ create and return a handler object for the db, or upgrade it if it already existed ]] |
| local function getOptionsHandler(db, noDefaultProfiles) |
| if not defaultProfiles then |
| generateDefaultProfiles(db) |
| end |
| local handler = AceDBOptions.handlers[db] or { db = db, noDefaultProfiles = noDefaultProfiles } |
| for k,v in pairs(OptionsHandlerPrototype) do |
| handler[k] = v |
| end |
| AceDBOptions.handlers[db] = handler |
| return handler |
| end |
| --[[ |
| the real options table |
| ]] |
| local optionsTable = { |
| desc = { |
| order = 1, |
| type = "description", |
| name = L["intro"] .. "\n", |
| }, |
| descreset = { |
| order = 9, |
| type = "description", |
| name = L["reset_desc"], |
| }, |
| reset = { |
| order = 10, |
| type = "execute", |
| name = L["reset"], |
| desc = L["reset_sub"], |
| func = "Reset", |
| }, |
| choosedesc = { |
| order = 20, |
| type = "description", |
| name = "\n" .. L["choose_desc"], |
| }, |
| new = { |
| name = L["new"], |
| desc = L["new_sub"], |
| type = "input", |
| order = 30, |
| get = false, |
| set = "SetProfile", |
| }, |
| choose = { |
| name = L["choose"], |
| desc = L["choose_sub"], |
| type = "select", |
| order = 40, |
| get = "GetCurrentProfile", |
| set = "SetProfile", |
| values = "ListProfiles", |
| arg = "common", |
| }, |
| copydesc = { |
| order = 50, |
| type = "description", |
| name = "\n" .. L["copy_desc"], |
| }, |
| copyfrom = { |
| order = 60, |
| type = "select", |
| name = L["copy"], |
| desc = L["copy_desc"], |
| get = false, |
| set = "CopyProfile", |
| values = "ListProfiles", |
| disabled = "HasNoProfiles", |
| arg = "nocurrent", |
| }, |
| deldesc = { |
| order = 70, |
| type = "description", |
| name = "\n" .. L["delete_desc"], |
| }, |
| delete = { |
| order = 80, |
| type = "select", |
| name = L["delete"], |
| desc = L["delete_sub"], |
| get = false, |
| set = "DeleteProfile", |
| values = "ListProfiles", |
| disabled = "HasNoProfiles", |
| arg = "nocurrent", |
| confirm = true, |
| confirmText = L["delete_confirm"], |
| }, |
| } |
| --- Get/Create a option table that you can use in your addon to control the profiles of AceDB-3.0. |
| -- @param db The database object to create the options table for. |
| -- @return The options table to be used in AceConfig-3.0 |
| -- @usage |
| -- -- Assuming `options` is your top-level options table and `self.db` is your database: |
| -- options.args.profiles = LibStub("AceDBOptions-3.0"):GetOptionsTable(self.db) |
| function AceDBOptions:GetOptionsTable(db, noDefaultProfiles) |
| local tbl = AceDBOptions.optionTables[db] or { |
| type = "group", |
| name = L["profiles"], |
| desc = L["profiles_sub"], |
| } |
| tbl.handler = getOptionsHandler(db, noDefaultProfiles) |
| tbl.args = optionsTable |
| AceDBOptions.optionTables[db] = tbl |
| return tbl |
| end |
| -- upgrade existing tables |
| for db,tbl in pairs(AceDBOptions.optionTables) do |
| tbl.handler = getOptionsHandler(db) |
| tbl.args = optionsTable |
| end |
Libs/AceEvent-3.0/AceEvent-3.0.xml
New file
0,0 → 1,4
\ No newline at end of file
| <Ui xmlns="http://www.blizzard.com/wow/ui/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.blizzard.com/wow/ui/ |
| ..\FrameXML\UI.xsd"> |
| <Script file="AceEvent-3.0.lua"/> |
| </Ui> |
Libs/AceEvent-3.0/AceEvent-3.0.lua
New file
0,0 → 1,125
| --- AceEvent-3.0 provides event registration and secure dispatching. |
| -- All dispatching is done using **CallbackHandler-1.0**. AceEvent is a simple wrapper around |
| -- CallbackHandler, and dispatches all game events or addon message to the registrees. |
| -- |
| -- **AceEvent-3.0** can be embeded into your addon, either explicitly by calling AceEvent:Embed(MyAddon) or by |
| -- specifying it as an embeded library in your AceAddon. All functions will be available on your addon object |
| -- and can be accessed directly, without having to explicitly call AceEvent itself.\\ |
| -- It is recommended to embed AceEvent, otherwise you'll have to specify a custom `self` on all calls you |
| -- make into AceEvent. |
| -- @class file |
| -- @name AceEvent-3.0 |
| -- @release $Id: AceEvent-3.0.lua 766 2009-04-04 08:26:05Z nevcairiel $ |
| local MAJOR, MINOR = "AceEvent-3.0", 3 |
| local AceEvent = LibStub:NewLibrary(MAJOR, MINOR) |
| if not AceEvent then return end |
| local CallbackHandler = LibStub:GetLibrary("CallbackHandler-1.0") |
| AceEvent.frame = AceEvent.frame or CreateFrame("Frame", "AceEvent30Frame") -- our event frame |
| AceEvent.embeds = AceEvent.embeds or {} -- what objects embed this lib |
| -- APIs and registry for blizzard events, using CallbackHandler lib |
| if not AceEvent.events then |
| AceEvent.events = CallbackHandler:New(AceEvent, |
| "RegisterEvent", "UnregisterEvent", "UnregisterAllEvents") |
| end |
| function AceEvent.events:OnUsed(target, eventname) |
| AceEvent.frame:RegisterEvent(eventname) |
| end |
| function AceEvent.events:OnUnused(target, eventname) |
| AceEvent.frame:UnregisterEvent(eventname) |
| end |
| -- APIs and registry for IPC messages, using CallbackHandler lib |
| if not AceEvent.messages then |
| AceEvent.messages = CallbackHandler:New(AceEvent, |
| "RegisterMessage", "UnregisterMessage", "UnregisterAllMessages" |
| ) |
| AceEvent.SendMessage = AceEvent.messages.Fire |
| end |
| --- embedding and embed handling |
| local mixins = { |
| "RegisterEvent", "UnregisterEvent", |
| "RegisterMessage", "UnregisterMessage", |
| "SendMessage", |
| "UnregisterAllEvents", "UnregisterAllMessages", |
| } |
| --- Register for a Blizzard Event. |
| -- The callback will always be called with the event as the first argument, and if supplied, the `arg` as second argument. |
| -- Any arguments to the event will be passed on after that. |
| -- @name AceEvent:RegisterEvent |
| -- @class function |
| -- @paramsig event[, callback [, arg]] |
| -- @param event The event to register for |
| -- @param callback The callback function to call when the event is triggered (funcref or method, defaults to a method with the event name) |
| -- @param arg An optional argument to pass to the callback function |
| --- Unregister an event. |
| -- @name AceEvent:UnregisterEvent |
| -- @class function |
| -- @paramsig event |
| -- @param event The event to unregister |
| --- Register for a custom AceEvent-internal message. |
| -- The callback will always be called with the event as the first argument, and if supplied, the `arg` as second argument. |
| -- Any arguments to the event will be passed on after that. |
| -- @name AceEvent:RegisterMessage |
| -- @class function |
| -- @paramsig message[, callback [, arg]] |
| -- @param message The message to register for |
| -- @param callback The callback function to call when the message is triggered (funcref or method, defaults to a method with the event name) |
| -- @param arg An optional argument to pass to the callback function |
| --- Unregister a message |
| -- @name AceEvent:UnregisterMessage |
| -- @class function |
| -- @paramsig message |
| -- @param message The message to unregister |
| --- Send a message over the AceEvent-3.0 internal message system to other addons registered for this message. |
| -- @name AceEvent:SendMessage |
| -- @class function |
| -- @paramsig message, ... |
| -- @param message The message to send |
| -- @param ... Any arguments to the message |
| -- Embeds AceEvent into the target object making the functions from the mixins list available on target:.. |
| -- @param target target object to embed AceEvent in |
| function AceEvent:Embed(target) |
| for k, v in pairs(mixins) do |
| target[v] = self[v] |
| end |
| self.embeds[target] = true |
| return target |
| end |
| -- AceEvent:OnEmbedDisable( target ) |
| -- target (object) - target object that is being disabled |
| -- |
| -- Unregister all events messages etc when the target disables. |
| -- this method should be called by the target manually or by an addon framework |
| function AceEvent:OnEmbedDisable(target) |
| target:UnregisterAllEvents() |
| target:UnregisterAllMessages() |
| end |
| -- Script to fire blizzard events into the event listeners |
| local events = AceEvent.events |
| AceEvent.frame:SetScript("OnEvent", function(this, event, ...) |
| events:Fire(event, ...) |
| end) |
| --- Finally: upgrade our old embeds |
| for target, v in pairs(AceEvent.embeds) do |
| AceEvent:Embed(target) |
| end |
Libs/AceConsole-3.0/AceConsole-3.0.xml
New file
0,0 → 1,4
\ No newline at end of file
| <Ui xmlns="http://www.blizzard.com/wow/ui/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.blizzard.com/wow/ui/ |
| ..\FrameXML\UI.xsd"> |
| <Script file="AceConsole-3.0.lua"/> |
| </Ui> |
Libs/AceConsole-3.0/AceConsole-3.0.lua
New file
0,0 → 1,250
| --- **AceConsole-3.0** provides registration facilities for slash commands. |
| -- You can register slash commands to your custom functions and use the `GetArgs` function to parse them |
| -- to your addons individual needs. |
| -- |
| -- **AceConsole-3.0** can be embeded into your addon, either explicitly by calling AceConsole:Embed(MyAddon) or by |
| -- specifying it as an embeded library in your AceAddon. All functions will be available on your addon object |
| -- and can be accessed directly, without having to explicitly call AceConsole itself.\\ |
| -- It is recommended to embed AceConsole, otherwise you'll have to specify a custom `self` on all calls you |
| -- make into AceConsole. |
| -- @class file |
| -- @name AceConsole-3.0 |
| -- @release $Id: AceConsole-3.0.lua 859 2009-10-05 16:09:42Z mikk $ |
| local MAJOR,MINOR = "AceConsole-3.0", 7 |
| local AceConsole, oldminor = LibStub:NewLibrary(MAJOR, MINOR) |
| if not AceConsole then return end -- No upgrade needed |
| AceConsole.embeds = AceConsole.embeds or {} -- table containing objects AceConsole is embedded in. |
| AceConsole.commands = AceConsole.commands or {} -- table containing commands registered |
| AceConsole.weakcommands = AceConsole.weakcommands or {} -- table containing self, command => func references for weak commands that don't persist through enable/disable |
| -- local upvalues |
| local _G = _G |
| local pairs = pairs |
| local select = select |
| local type = type |
| local tostring = tostring |
| local strfind = string.find |
| local strsub = string.sub |
| local max = math.max |
| local format = format |
| local tconcat = table.concat |
| -- GLOBALS: DEFAULT_CHAT_FRAME, error, SlashCmdList, hash_SlashCmdList |
| local tmp={} |
| local function Print(self,frame,...) |
| local n=0 |
| if self ~= AceConsole then |
| n=n+1 |
| tmp[n] = "|cff33ff99"..tostring( self ).."|r:" |
| end |
| for i=1, select("#", ...) do |
| n=n+1 |
| tmp[n] = tostring(select(i, ...)) |
| end |
| frame:AddMessage( tconcat(tmp," ",1,n) ) |
| end |
| --- Print to DEFAULT_CHAT_FRAME or given ChatFrame (anything with an .AddMessage function) |
| -- @paramsig [chatframe ,] ... |
| -- @param chatframe Custom ChatFrame to print to (or any frame with an .AddMessage function) |
| -- @param ... List of any values to be printed |
| function AceConsole:Print(...) |
| local frame = ... |
| if type(frame) == "table" and frame.AddMessage then -- Is first argument something with an .AddMessage member? |
| return Print(self, frame, select(2,...)) |
| else |
| return Print(self, DEFAULT_CHAT_FRAME, ...) |
| end |
| end |
| --- Formatted (using format()) print to DEFAULT_CHAT_FRAME or given ChatFrame (anything with an .AddMessage function) |
| -- @paramsig [chatframe ,] "format"[, ...] |
| -- @param chatframe Custom ChatFrame to print to (or any frame with an .AddMessage function) |
| -- @param format Format string - same syntax as standard Lua format() |
| -- @param ... Arguments to the format string |
| function AceConsole:Printf(...) |
| local frame = ... |
| if type(frame) == "table" and frame.AddMessage then -- Is first argument something with an .AddMessage member? |
| return Print(self, frame, format(select(2,...))) |
| else |
| return Print(self, DEFAULT_CHAT_FRAME, format(...)) |
| end |
| end |
| --- Register a simple chat command |
| -- @param command Chat command to be registered WITHOUT leading "/" |
| -- @param func Function to call when the slash command is being used (funcref or methodname) |
| -- @param persist if false, the command will be soft disabled/enabled when aceconsole is used as a mixin (default: true) |
| function AceConsole:RegisterChatCommand( command, func, persist ) |
| if type(command)~="string" then error([[Usage: AceConsole:RegisterChatCommand( "command", func[, persist ]): 'command' - expected a string]], 2) end |
| if persist==nil then persist=true end -- I'd rather have my addon's "/addon enable" around if the author screws up. Having some extra slash regged when it shouldnt be isn't as destructive. True is a better default. /Mikk |
| local name = "ACECONSOLE_"..command:upper() |
| if type( func ) == "string" then |
| SlashCmdList[name] = function(input, editBox) |
| self[func](self, input, editBox) |
| end |
| else |
| SlashCmdList[name] = func |
| end |
| _G["SLASH_"..name.."1"] = "/"..command:lower() |
| AceConsole.commands[command] = name |
| -- non-persisting commands are registered for enabling disabling |
| if not persist then |
| if not AceConsole.weakcommands[self] then AceConsole.weakcommands[self] = {} end |
| AceConsole.weakcommands[self][command] = func |
| end |
| return true |
| end |
| --- Unregister a chatcommand |
| -- @param command Chat command to be unregistered WITHOUT leading "/" |
| function AceConsole:UnregisterChatCommand( command ) |
| local name = AceConsole.commands[command] |
| if name then |
| SlashCmdList[name] = nil |
| _G["SLASH_" .. name .. "1"] = nil |
| hash_SlashCmdList["/" .. command:upper()] = nil |
| AceConsole.commands[command] = nil |
| end |
| end |
| --- Get an iterator over all Chat Commands registered with AceConsole |
| -- @return Iterator (pairs) over all commands |
| function AceConsole:IterateChatCommands() return pairs(AceConsole.commands) end |
| local function nils(n, ...) |
| if n>1 then |
| return nil, nils(n-1, ...) |
| elseif n==1 then |
| return nil, ... |
| else |
| return ... |
| end |
| end |
| --- Retreive one or more space-separated arguments from a string. |
| -- Treats quoted strings and itemlinks as non-spaced. |
| -- @param string The raw argument string |
| -- @param numargs How many arguments to get (default 1) |
| -- @param startpos Where in the string to start scanning (default 1) |
| -- @return Returns arg1, arg2, ..., nextposition\\ |
| -- Missing arguments will be returned as nils. 'nextposition' is returned as 1e9 at the end of the string. |
| function AceConsole:GetArgs(str, numargs, startpos) |
| numargs = numargs or 1 |
| startpos = max(startpos or 1, 1) |
| local pos=startpos |
| -- find start of new arg |
| pos = strfind(str, "[^ ]", pos) |
| if not pos then -- whoops, end of string |
| return nils(numargs, 1e9) |
| end |
| if numargs<1 then |
| return pos |
| end |
| -- quoted or space separated? find out which pattern to use |
| local delim_or_pipe |
| local ch = strsub(str, pos, pos) |
| if ch=='"' then |
| pos = pos + 1 |
| delim_or_pipe='([|"])' |
| elseif ch=="'" then |
| pos = pos + 1 |
| delim_or_pipe="([|'])" |
| else |
| delim_or_pipe="([| ])" |
| end |
| startpos = pos |
| while true do |
| -- find delimiter or hyperlink |
| local ch,_ |
| pos,_,ch = strfind(str, delim_or_pipe, pos) |
| if not pos then break end |
| if ch=="|" then |
| -- some kind of escape |
| if strsub(str,pos,pos+1)=="|H" then |
| -- It's a |H....|hhyper link!|h |
| pos=strfind(str, "|h", pos+2) -- first |h |
| if not pos then break end |
| pos=strfind(str, "|h", pos+2) -- second |h |
| if not pos then break end |
| elseif strsub(str,pos, pos+1) == "|T" then |
| -- It's a |T....|t texture |
| pos=strfind(str, "|t", pos+2) |
| if not pos then break end |
| end |
| pos=pos+2 -- skip past this escape (last |h if it was a hyperlink) |
| else |
| -- found delimiter, done with this arg |
| return strsub(str, startpos, pos-1), AceConsole:GetArgs(str, numargs-1, pos+1) |
| end |
| end |
| -- search aborted, we hit end of string. return it all as one argument. (yes, even if it's an unterminated quote or hyperlink) |
| return strsub(str, startpos), nils(numargs-1, 1e9) |
| end |
| --- embedding and embed handling |
| local mixins = { |
| "Print", |
| "Printf", |
| "RegisterChatCommand", |
| "UnregisterChatCommand", |
| "GetArgs", |
| } |
| -- Embeds AceConsole into the target object making the functions from the mixins list available on target:.. |
| -- @param target target object to embed AceBucket in |
| function AceConsole:Embed( target ) |
| for k, v in pairs( mixins ) do |
| target[v] = self[v] |
| end |
| self.embeds[target] = true |
| return target |
| end |
| function AceConsole:OnEmbedEnable( target ) |
| if AceConsole.weakcommands[target] then |
| for command, func in pairs( AceConsole.weakcommands[target] ) do |
| target:RegisterChatCommand( command, func, false, true ) -- nonpersisting and silent registry |
| end |
| end |
| end |
| function AceConsole:OnEmbedDisable( target ) |
| if AceConsole.weakcommands[target] then |
| for command, func in pairs( AceConsole.weakcommands[target] ) do |
| target:UnregisterChatCommand( command ) -- TODO: this could potentially unregister a command from another application in case of command conflicts. Do we care? |
| end |
| end |
| end |
| for addon in pairs(AceConsole.embeds) do |
| AceConsole:Embed(addon) |
| end |
Libs/AceGUI-3.0/AceGUI-3.0.lua
New file
0,0 → 1,841
| --- **AceGUI-3.0** provides access to numerous widgets which can be used to create GUIs. |
| -- AceGUI is used by AceConfigDialog to create the option GUIs, but you can use it by itself |
| -- to create any custom GUI. There are more extensive examples in the test suite in the Ace3 |
| -- stand-alone distribution. |
| -- |
| -- **Note**: When using AceGUI-3.0 directly, please do not modify the frames of the widgets directly, |
| -- as any "unknown" change to the widgets will cause addons that get your widget out of the widget pool |
| -- to misbehave. If you think some part of a widget should be modifiable, please open a ticket, and we'll |
| -- implement a proper API to modify it. |
| -- @usage |
| -- local AceGUI = LibStub("AceGUI-3.0") |
| -- -- Create a container frame |
| -- local f = AceGUI:Create("Frame") |
| -- f:SetCallback("OnClose",function(widget) AceGUI:Release(widget) end) |
| -- f:SetTitle("AceGUI-3.0 Example") |
| -- f:SetStatusText("Status Bar") |
| -- f:SetLayout("Flow") |
| -- -- Create a button |
| -- local btn = AceGUI:Create("Button") |
| -- btn:SetWidth(170) |
| -- btn:SetText("Button !") |
| -- btn:SetCallback("OnClick", function() print("Click!") end) |
| -- -- Add the button to the container |
| -- f:AddChild(btn) |
| -- @class file |
| -- @name AceGUI-3.0 |
| -- @release $Id: AceGUI-3.0.lua 847 2009-09-25 11:51:36Z nevcairiel $ |
| local ACEGUI_MAJOR, ACEGUI_MINOR = "AceGUI-3.0", 28 |
| local AceGUI, oldminor = LibStub:NewLibrary(ACEGUI_MAJOR, ACEGUI_MINOR) |
| if not AceGUI then return end -- No upgrade needed |
| --local con = LibStub("AceConsole-3.0",true) |
| AceGUI.WidgetRegistry = AceGUI.WidgetRegistry or {} |
| AceGUI.LayoutRegistry = AceGUI.LayoutRegistry or {} |
| AceGUI.WidgetBase = AceGUI.WidgetBase or {} |
| AceGUI.WidgetContainerBase = AceGUI.WidgetContainerBase or {} |
| AceGUI.WidgetVersions = AceGUI.WidgetVersions or {} |
| -- local upvalues |
| local WidgetRegistry = AceGUI.WidgetRegistry |
| local LayoutRegistry = AceGUI.LayoutRegistry |
| local WidgetVersions = AceGUI.WidgetVersions |
| local pcall = pcall |
| local select = select |
| local pairs = pairs |
| local ipairs = ipairs |
| local type = type |
| local assert = assert |
| local tinsert = tinsert |
| local tremove = tremove |
| local CreateFrame = CreateFrame |
| local UIParent = UIParent |
| --[[ |
| xpcall safecall implementation |
| ]] |
| local xpcall = xpcall |
| local function errorhandler(err) |
| return geterrorhandler()(err) |
| end |
| local function CreateDispatcher(argCount) |
| local code = [[ |
| local xpcall, eh = ... |
| local method, ARGS |
| local function call() return method(ARGS) end |
| local function dispatch(func, ...) |
| method = func |
| if not method then return end |
| ARGS = ... |
| return xpcall(call, eh) |
| end |
| return dispatch |
| ]] |
| local ARGS = {} |
| for i = 1, argCount do ARGS[i] = "arg"..i end |
| code = code:gsub("ARGS", table.concat(ARGS, ", ")) |
| return assert(loadstring(code, "safecall Dispatcher["..argCount.."]"))(xpcall, errorhandler) |
| end |
| local Dispatchers = setmetatable({}, {__index=function(self, argCount) |
| local dispatcher = CreateDispatcher(argCount) |
| rawset(self, argCount, dispatcher) |
| return dispatcher |
| end}) |
| Dispatchers[0] = function(func) |
| return xpcall(func, errorhandler) |
| end |
| local function safecall(func, ...) |
| return Dispatchers[select('#', ...)](func, ...) |
| end |
| -- Recycling functions |
| local new, del |
| do |
| AceGUI.objPools = AceGUI.objPools or {} |
| local objPools = AceGUI.objPools |
| --Returns a new instance, if none are available either returns a new table or calls the given contructor |
| function new(type,constructor,...) |
| if not type then |
| type = "table" |
| end |
| if not objPools[type] then |
| objPools[type] = {} |
| end |
| local newObj = tremove(objPools[type]) |
| if not newObj then |
| newObj = constructor and constructor(...) or {} |
| end |
| return newObj |
| end |
| -- Releases an instance to the Pool |
| function del(obj,type) |
| if not type then |
| type = "table" |
| end |
| if not objPools[type] then |
| objPools[type] = {} |
| end |
| for i,v in ipairs(objPools[type]) do |
| if v == obj then |
| error("Attempt to Release Widget that is already released") |
| return |
| end |
| end |
| tinsert(objPools[type],obj) |
| end |
| end |
| ------------------- |
| -- API Functions -- |
| ------------------- |
| -- Gets a widget Object |
| --- Create a new Widget of the given type. |
| -- This function will instantiate a new widget (or use one from the widget pool), and call the |
| -- OnAcquire function on it, before returning. |
| -- @param type The type of the widget. |
| -- @return The newly created widget. |
| function AceGUI:Create(type) |
| local reg = WidgetRegistry |
| if reg[type] then |
| local widget = new(type,reg[type]) |
| if rawget(widget,'Acquire') then |
| widget.OnAcquire = widget.Acquire |
| widget.Acquire = nil |
| elseif rawget(widget,'Aquire') then |
| widget.OnAcquire = widget.Aquire |
| widget.Aquire = nil |
| end |
| if rawget(widget,'Release') then |
| widget.OnRelease = rawget(widget,'Release') |
| widget.Release = nil |
| end |
| if widget.OnAcquire then |
| widget:OnAcquire() |
| else |
| error(("Widget type %s doesn't supply an OnAcquire Function"):format(type)) |
| end |
| -- Set the default Layout ('List') |
| safecall(widget.SetLayout, widget, 'List') |
| safecall(widget.ResumeLayout, widget) |
| return widget |
| end |
| end |
| --- Releases a widget Object. |
| -- This function calls OnRelease on the widget and places it back in the widget pool. |
| -- Any data on the widget is being erased, and the widget will be hidden.\\ |
| -- If this widget is a Container-Widget, all of its Child-Widgets will be releases as well. |
| -- @param widget The widget to release |
| function AceGUI:Release(widget) |
| safecall( widget.PauseLayout, widget ) |
| widget:Fire("OnRelease") |
| safecall( widget.ReleaseChildren, widget ) |
| if widget.OnRelease then |
| widget:OnRelease() |
| else |
| error(("Widget type %s doesn't supply an OnRelease Function"):format(type)) |
| end |
| for k in pairs(widget.userdata) do |
| widget.userdata[k] = nil |
| end |
| for k in pairs(widget.events) do |
| widget.events[k] = nil |
| end |
| widget.width = nil |
| widget.relWidth = nil |
| widget.height = nil |
| widget.relHeight = nil |
| widget.noAutoHeight = nil |
| widget.frame:ClearAllPoints() |
| widget.frame:Hide() |
| widget.frame:SetParent(UIParent) |
| widget.frame.width = nil |
| widget.frame.height = nil |
| if widget.content then |
| widget.content.width = nil |
| widget.content.height = nil |
| end |
| del(widget,widget.type) |
| end |
| ----------- |
| -- Focus -- |
| ----------- |
| --- Called when a widget has taken focus. |
| -- e.g. Dropdowns opening, Editboxes gaining kb focus |
| -- @param widget The widget that should be focused |
| function AceGUI:SetFocus(widget) |
| if self.FocusedWidget and self.FocusedWidget ~= widget then |
| safecall(self.FocusedWidget.ClearFocus, self.FocusedWidget) |
| end |
| self.FocusedWidget = widget |
| end |
| --- Called when something has happened that could cause widgets with focus to drop it |
| -- e.g. titlebar of a frame being clicked |
| function AceGUI:ClearFocus() |
| if self.FocusedWidget then |
| safecall(self.FocusedWidget.ClearFocus, self.FocusedWidget) |
| self.FocusedWidget = nil |
| end |
| end |
| ------------- |
| -- Widgets -- |
| ------------- |
| --[[ |
| Widgets must provide the following functions |
| OnAcquire() - Called when the object is acquired, should set everything to a default hidden state |
| OnRelease() - Called when the object is Released, should remove any anchors and hide the Widget |
| And the following members |
| frame - the frame or derivitive object that will be treated as the widget for size and anchoring purposes |
| type - the type of the object, same as the name given to :RegisterWidget() |
| Widgets contain a table called userdata, this is a safe place to store data associated with the wigdet |
| It will be cleared automatically when a widget is released |
| Placing values directly into a widget object should be avoided |
| If the Widget can act as a container for other Widgets the following |
| content - frame or derivitive that children will be anchored to |
| The Widget can supply the following Optional Members |
| :OnWidthSet(width) - Called when the width of the widget is changed |
| :OnHeightSet(height) - Called when the height of the widget is changed |
| Widgets should not use the OnSizeChanged events of thier frame or content members, use these methods instead |
| AceGUI already sets a handler to the event |
| :LayoutFinished(width, height) - called after a layout has finished, the width and height will be the width and height of the |
| area used for controls. These can be nil if the layout used the existing size to layout the controls. |
| ]] |
| -------------------------- |
| -- Widget Base Template -- |
| -------------------------- |
| do |
| local function fixlevels(parent,...) |
| local i = 1 |
| local child = select(i, ...) |
| while child do |
| child:SetFrameLevel(parent:GetFrameLevel()+1) |
| fixlevels(child, child:GetChildren()) |
| i = i + 1 |
| child = select(i, ...) |
| end |
| end |
| local WidgetBase = AceGUI.WidgetBase |
| WidgetBase.SetParent = function(self, parent) |
| local frame = self.frame |
| frame:SetParent(nil) |
| frame:SetParent(parent.content) |
| self.parent = parent |
| --fixlevels(parent.frame,parent.frame:GetChildren()) |
| end |
| WidgetBase.SetCallback = function(self, name, func) |
| if type(func) == "function" then |
| self.events[name] = func |
| end |
| end |
| WidgetBase.Fire = function(self, name, ...) |
| if self.events[name] then |
| local success, ret = safecall(self.events[name], self, name, ...) |
| if success then |
| return ret |
| end |
| end |
| end |
| WidgetBase.SetWidth = function(self, width) |
| self.frame:SetWidth(width) |
| self.frame.width = width |
| if self.OnWidthSet then |
| self:OnWidthSet(width) |
| end |
| end |
| WidgetBase.SetRelativeWidth = function(self, width) |
| if width <= 0 or width > 1 then |
| error(":SetRelativeWidth(width): Invalid relative width.", 2) |
| end |
| self.relWidth = width |
| self.width = "relative" |
| end |
| WidgetBase.SetHeight = function(self, height) |
| self.frame:SetHeight(height) |
| self.frame.height = height |
| if self.OnHeightSet then |
| self:OnHeightSet(height) |
| end |
| end |
| --[[ WidgetBase.SetRelativeHeight = function(self, height) |
| if height <= 0 or height > 1 then |
| error(":SetRelativeHeight(height): Invalid relative height.", 2) |
| end |
| self.relHeight = height |
| self.height = "relative" |
| end ]] |
| WidgetBase.IsVisible = function(self) |
| return self.frame:IsVisible() |
| end |
| WidgetBase.IsShown= function(self) |
| return self.frame:IsShown() |
| end |
| WidgetBase.Release = function(self) |
| AceGUI:Release(self) |
| end |
| WidgetBase.SetPoint = function(self, ...) |
| return self.frame:SetPoint(...) |
| end |
| WidgetBase.ClearAllPoints = function(self) |
| return self.frame:ClearAllPoints() |
| end |
| WidgetBase.GetNumPoints = function(self) |
| return self.frame:GetNumPoints() |
| end |
| WidgetBase.GetPoint = function(self, ...) |
| return self.frame:GetPoint(...) |
| end |
| WidgetBase.GetUserDataTable = function(self) |
| return self.userdata |
| end |
| WidgetBase.SetUserData = function(self, key, value) |
| self.userdata[key] = value |
| end |
| WidgetBase.GetUserData = function(self, key) |
| return self.userdata[key] |
| end |
| WidgetBase.IsFullHeight = function(self) |
| return self.height == "fill" |
| end |
| WidgetBase.SetFullHeight = function(self, isFull) |
| if isFull then |
| self.height = "fill" |
| else |
| self.height = nil |
| end |
| end |
| WidgetBase.IsFullWidth = function(self) |
| return self.width == "fill" |
| end |
| WidgetBase.SetFullWidth = function(self, isFull) |
| if isFull then |
| self.width = "fill" |
| else |
| self.width = nil |
| end |
| end |
| -- local function LayoutOnUpdate(this) |
| -- this:SetScript("OnUpdate",nil) |
| -- this.obj:PerformLayout() |
| -- end |
| local WidgetContainerBase = AceGUI.WidgetContainerBase |
| WidgetContainerBase.PauseLayout = function(self) |
| self.LayoutPaused = true |
| end |
| WidgetContainerBase.ResumeLayout = function(self) |
| self.LayoutPaused = nil |
| end |
| WidgetContainerBase.PerformLayout = function(self) |
| if self.LayoutPaused then |
| return |
| end |
| safecall(self.LayoutFunc,self.content, self.children) |
| end |
| --call this function to layout, makes sure layed out objects get a frame to get sizes etc |
| WidgetContainerBase.DoLayout = function(self) |
| self:PerformLayout() |
| -- if not self.parent then |
| -- self.frame:SetScript("OnUpdate", LayoutOnUpdate) |
| -- end |
| end |
| WidgetContainerBase.AddChild = function(self, child, beforeWidget) |
| if beforeWidget then |
| local siblingIndex = 1 |
| for _, widget in pairs(self.children) do |
| if widget == beforeWidget then |
| break |
| end |
| siblingIndex = siblingIndex + 1 |
| end |
| tinsert(self.children, siblingIndex, child) |
| else |
| tinsert(self.children, child) |
| end |
| child:SetParent(self) |
| child.frame:Show() |
| self:DoLayout() |
| end |
| WidgetContainerBase.AddChildren = function(self, ...) |
| for i = 1, select("#", ...) do |
| local child = select(i, ...) |
| tinsert(self.children, child) |
| child:SetParent(self) |
| child.frame:Show() |
| end |
| self:DoLayout() |
| end |
| WidgetContainerBase.ReleaseChildren = function(self) |
| local children = self.children |
| for i = 1,#children do |
| AceGUI:Release(children[i]) |
| children[i] = nil |
| end |
| end |
| WidgetContainerBase.SetLayout = function(self, Layout) |
| self.LayoutFunc = AceGUI:GetLayout(Layout) |
| end |
| WidgetContainerBase.SetAutoAdjustHeight = function(self, adjust) |
| if adjust then |
| self.noAutoHeight = nil |
| else |
| self.noAutoHeight = true |
| end |
| end |
| local function FrameResize(this) |
| local self = this.obj |
| if this:GetWidth() and this:GetHeight() then |
| if self.OnWidthSet then |
| self:OnWidthSet(this:GetWidth()) |
| end |
| if self.OnHeightSet then |
| self:OnHeightSet(this:GetHeight()) |
| end |
| end |
| end |
| local function ContentResize(this) |
| if this:GetWidth() and this:GetHeight() then |
| this.width = this:GetWidth() |
| this.height = this:GetHeight() |
| this.obj:DoLayout() |
| end |
| end |
| setmetatable(WidgetContainerBase,{__index=WidgetBase}) |
| --One of these function should be called on each Widget Instance as part of its creation process |
| --- Register a widget-class as a container for newly created widgets. |
| -- @param widget The widget class |
| function AceGUI:RegisterAsContainer(widget) |
| widget.children = {} |
| widget.userdata = {} |
| widget.events = {} |
| widget.base = WidgetContainerBase |
| widget.content.obj = widget |
| widget.frame.obj = widget |
| widget.content:SetScript("OnSizeChanged",ContentResize) |
| widget.frame:SetScript("OnSizeChanged",FrameResize) |
| setmetatable(widget,{__index=WidgetContainerBase}) |
| widget:SetLayout("List") |
| end |
| --- Register a widget-class as a widget. |
| -- @param widget The widget class |
| function AceGUI:RegisterAsWidget(widget) |
| widget.userdata = {} |
| widget.events = {} |
| widget.base = WidgetBase |
| widget.frame.obj = widget |
| widget.frame:SetScript("OnSizeChanged",FrameResize) |
| setmetatable(widget,{__index=WidgetBase}) |
| end |
| end |
| ------------------ |
| -- Widget API -- |
| ------------------ |
| --- Registers a widget Constructor, this function returns a new instance of the Widget |
| -- @param Name The name of the widget |
| -- @param Constructor The widget constructor function |
| -- @param Version The version of the widget |
| function AceGUI:RegisterWidgetType(Name, Constructor, Version) |
| assert(type(Constructor) == "function") |
| assert(type(Version) == "number") |
| local oldVersion = WidgetVersions[Name] |
| if oldVersion and oldVersion >= Version then return end |
| WidgetVersions[Name] = Version |
| WidgetRegistry[Name] = Constructor |
| end |
| --- Registers a Layout Function |
| -- @param Name The name of the layout |
| -- @param LayoutFunc Reference to the layout function |
| function AceGUI:RegisterLayout(Name, LayoutFunc) |
| assert(type(LayoutFunc) == "function") |
| if type(Name) == "string" then |
| Name = Name:upper() |
| end |
| LayoutRegistry[Name] = LayoutFunc |
| end |
| --- Get a Layout Function from the registry |
| -- @param Name The name of the layout |
| function AceGUI:GetLayout(Name) |
| if type(Name) == "string" then |
| Name = Name:upper() |
| end |
| return LayoutRegistry[Name] |
| end |
| AceGUI.counts = AceGUI.counts or {} |
| --- A type-based counter to count the number of widgets created. |
| -- This is used by widgets that require a named frame, e.g. when a Blizzard |
| -- Template requires it. |
| -- @param type The widget type |
| function AceGUI:GetNextWidgetNum(type) |
| if not self.counts[type] then |
| self.counts[type] = 0 |
| end |
| self.counts[type] = self.counts[type] + 1 |
| return self.counts[type] |
| end |
| --[[ Widget Template |
| -------------------------- |
| -- Widget Name -- |
| -------------------------- |
| do |
| local Type = "Type" |
| local function OnAcquire(self) |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| end |
| local function Constructor() |
| local frame = CreateFrame("Frame",nil,UIParent) |
| local self = {} |
| self.type = Type |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.frame = frame |
| frame.obj = self |
| --Container Support |
| --local content = CreateFrame("Frame",nil,frame) |
| --self.content = content |
| --AceGUI:RegisterAsContainer(self) |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor) |
| end |
| ]] |
| ------------- |
| -- Layouts -- |
| ------------- |
| --[[ |
| A Layout is a func that takes 2 parameters |
| content - the frame that widgets will be placed inside |
| children - a table containing the widgets to layout |
| ]] |
| -- Very simple Layout, Children are stacked on top of each other down the left side |
| AceGUI:RegisterLayout("List", |
| function(content, children) |
| local height = 0 |
| local width = content.width or content:GetWidth() or 0 |
| for i, child in ipairs(children) do |
| local frame = child.frame |
| frame:ClearAllPoints() |
| frame:Show() |
| if i == 1 then |
| frame:SetPoint("TOPLEFT",content,"TOPLEFT",0,0) |
| else |
| frame:SetPoint("TOPLEFT",children[i-1].frame,"BOTTOMLEFT",0,0) |
| end |
| if child.width == "fill" then |
| child:SetWidth(width) |
| frame:SetPoint("RIGHT",content,"RIGHT") |
| if child.OnWidthSet then |
| child:OnWidthSet(content.width or content:GetWidth()) |
| end |
| if child.DoLayout then |
| child:DoLayout() |
| end |
| elseif child.width == "relative" then |
| child:SetWidth(width * child.relWidth) |
| if child.OnWidthSet then |
| child:OnWidthSet(content.width or content:GetWidth()) |
| end |
| if child.DoLayout then |
| child:DoLayout() |
| end |
| end |
| height = height + (frame.height or frame:GetHeight() or 0) |
| end |
| safecall( content.obj.LayoutFinished, content.obj, nil, height ) |
| end |
| ) |
| -- A single control fills the whole content area |
| AceGUI:RegisterLayout("Fill", |
| function(content, children) |
| if children[1] then |
| children[1]:SetWidth(content:GetWidth() or 0) |
| children[1]:SetHeight(content:GetHeight() or 0) |
| children[1].frame:SetAllPoints(content) |
| children[1].frame:Show() |
| safecall( content.obj.LayoutFinished, content.obj, nil, children[1].frame:GetHeight() ) |
| end |
| end |
| ) |
| AceGUI:RegisterLayout("Flow", |
| function(content, children) |
| --used height so far |
| local height = 0 |
| --width used in the current row |
| local usedwidth = 0 |
| --height of the current row |
| local rowheight = 0 |
| local rowoffset = 0 |
| local lastrowoffset |
| local width = content.width or content:GetWidth() or 0 |
| --control at the start of the row |
| local rowstart |
| local rowstartoffset |
| local lastrowstart |
| local isfullheight |
| local frameoffset |
| local lastframeoffset |
| local oversize |
| for i, child in ipairs(children) do |
| oversize = nil |
| local frame = child.frame |
| local frameheight = frame.height or frame:GetHeight() or 0 |
| local framewidth = frame.width or frame:GetWidth() or 0 |
| lastframeoffset = frameoffset |
| -- HACK: Why did we set a frameoffset of (frameheight / 2) ? |
| -- That was moving all widgets half the widgets size down, is that intended? |
| -- Actually, it seems to be neccessary for many cases, we'll leave it in for now. |
| -- If widgets seem to anchor weirdly with this, provide a valid alignoffset for them. |
| -- TODO: Investigate moar! |
| frameoffset = child.alignoffset or (frameheight / 2) |
| if child.width == "relative" then |
| framewidth = width * child.relWidth |
| end |
| frame:Show() |
| frame:ClearAllPoints() |
| if i == 1 then |
| -- anchor the first control to the top left |
| frame:SetPoint("TOPLEFT",content,"TOPLEFT",0,0) |
| rowheight = frameheight |
| rowoffset = frameoffset |
| rowstart = frame |
| rowstartoffset = frameoffset |
| usedwidth = framewidth |
| if usedwidth > width then |
| oversize = true |
| end |
| else |
| -- if there isn't available width for the control start a new row |
| -- if a control is "fill" it will be on a row of its own full width |
| if usedwidth == 0 or ((framewidth) + usedwidth > width) or child.width == "fill" then |
| if isfullheight then |
| -- a previous row has already filled the entire height, there's nothing we can usefully do anymore |
| -- (maybe error/warn about this?) |
| break |
| end |
| --anchor the previous row, we will now know its height and offset |
| rowstart:SetPoint("TOPLEFT",content,"TOPLEFT",0,-(height+(rowoffset-rowstartoffset)+3)) |
| height = height + rowheight + 3 |
| --save this as the rowstart so we can anchor it after the row is complete and we have the max height and offset of controls in it |
| rowstart = frame |
| rowstartoffset = frameoffset |
| rowheight = frameheight |
| rowoffset = frameoffset |
| usedwidth = framewidth |
| if usedwidth > width then |
| oversize = true |
| end |
| -- put the control on the current row, adding it to the width and checking if the height needs to be increased |
| else |
| --handles cases where the new height is higher than either control because of the offsets |
| --math.max(rowheight-rowoffset+frameoffset, frameheight-frameoffset+rowoffset) |
| --offset is always the larger of the two offsets |
| rowoffset = math.max(rowoffset, frameoffset) |
| rowheight = math.max(rowheight,rowoffset+(frameheight/2)) |
| --print("type:", child.type, "offset:",frameoffset-lastframeoffset) |
| frame:SetPoint("TOPLEFT",children[i-1].frame,"TOPRIGHT",0,frameoffset-lastframeoffset) |
| usedwidth = framewidth + usedwidth |
| end |
| end |
| if child.width == "fill" then |
| child:SetWidth(width) |
| frame:SetPoint("RIGHT",content,"RIGHT",0,0) |
| usedwidth = 0 |
| rowstart = frame |
| rowstartoffset = frameoffset |
| if child.OnWidthSet then |
| child:OnWidthSet(width) |
| end |
| if child.DoLayout then |
| child:DoLayout() |
| end |
| rowheight = frame.height or frame:GetHeight() or 0 |
| rowoffset = child.alignoffset or (rowheight / 2) |
| rowstartoffset = rowoffset |
| elseif child.width == "relative" then |
| child:SetWidth(width * child.relWidth) |
| if child.OnWidthSet then |
| child:OnWidthSet(width) |
| end |
| if child.DoLayout then |
| child:DoLayout() |
| end |
| elseif oversize then |
| if width > 1 then |
| frame:SetPoint("RIGHT",content,"RIGHT",0,0) |
| end |
| end |
| if child.height == "fill" then |
| frame:SetPoint("BOTTOM",content,"BOTTOM") |
| isfullheight = true |
| end |
| end |
| --anchor the last row, if its full height needs a special case since its height has just been changed by the anchor |
| if isfullheight then |
| rowstart:SetPoint("TOPLEFT",content,"TOPLEFT",0,-height) |
| elseif rowstart then |
| rowstart:SetPoint("TOPLEFT",content,"TOPLEFT",0,-(height+(rowoffset-rowstartoffset)+3)) |
| end |
| height = height + rowheight + 3 |
| safecall( content.obj.LayoutFinished, content.obj, nil, height ) |
| end |
| ) |
Libs/AceGUI-3.0/widgets/AceGUIWidget-Icon.lua
New file
0,0 → 1,141
| local AceGUI = LibStub("AceGUI-3.0") |
| -------------------------- |
| -- Label -- |
| -------------------------- |
| do |
| local Type = "Icon" |
| local Version = 10 |
| local function OnAcquire(self) |
| self:SetHeight(110) |
| self:SetWidth(110) |
| self:SetLabel("") |
| self:SetImage(nil) |
| self:SetImageSize(64, 64) |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| self:SetDisabled(false) |
| end |
| local function SetLabel(self, text) |
| if text and text ~= "" then |
| self.label:Show() |
| self.label:SetText(text) |
| self.frame:SetHeight(self.image:GetHeight() + 25) |
| else |
| self.label:Hide() |
| self.frame:SetHeight(self.image:GetHeight() + 10) |
| end |
| end |
| local function SetImage(self, path, ...) |
| local image = self.image |
| image:SetTexture(path) |
| if image:GetTexture() then |
| self.imageshown = true |
| local n = select('#', ...) |
| if n == 4 or n == 8 then |
| image:SetTexCoord(...) |
| end |
| else |
| self.imageshown = nil |
| end |
| end |
| local function SetImageSize(self, width, height) |
| self.image:SetWidth(width) |
| self.image:SetHeight(height) |
| --self.frame:SetWidth(width + 30) |
| if self.label:IsShown() then |
| self.frame:SetHeight(height + 25) |
| else |
| self.frame:SetHeight(height + 10) |
| end |
| end |
| local function SetDisabled(self, disabled) |
| self.disabled = disabled |
| if disabled then |
| self.frame:Disable() |
| self.label:SetTextColor(0.5,0.5,0.5) |
| self.image:SetVertexColor(0.5, 0.5, 0.5, 0.5) |
| else |
| self.frame:Enable() |
| self.label:SetTextColor(1,1,1) |
| self.image:SetVertexColor(1, 1, 1) |
| end |
| end |
| local function OnClick(this, button) |
| this.obj:Fire("OnClick", button) |
| AceGUI:ClearFocus() |
| end |
| local function OnEnter(this) |
| this.obj.highlight:Show() |
| this.obj:Fire("OnEnter") |
| end |
| local function OnLeave(this) |
| this.obj.highlight:Hide() |
| this.obj:Fire("OnLeave") |
| end |
| local function Constructor() |
| local frame = CreateFrame("Button",nil,UIParent) |
| local self = {} |
| self.type = Type |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.SetLabel = SetLabel |
| self.frame = frame |
| self.SetImage = SetImage |
| self.SetImageSize = SetImageSize |
| -- SetText should be deprecated along the way |
| self.SetText = SetLabel |
| self.SetDisabled = SetDisabled |
| frame.obj = self |
| frame:SetHeight(110) |
| frame:SetWidth(110) |
| frame:EnableMouse(true) |
| frame:SetScript("OnClick", OnClick) |
| frame:SetScript("OnLeave", OnLeave) |
| frame:SetScript("OnEnter", OnEnter) |
| local label = frame:CreateFontString(nil,"BACKGROUND","GameFontHighlight") |
| label:SetPoint("BOTTOMLEFT",frame,"BOTTOMLEFT",0,0) |
| label:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",0,0) |
| label:SetJustifyH("CENTER") |
| label:SetJustifyV("TOP") |
| label:SetHeight(18) |
| self.label = label |
| local image = frame:CreateTexture(nil,"BACKGROUND") |
| self.image = image |
| image:SetWidth(64) |
| image:SetHeight(64) |
| image:SetPoint("TOP",frame,"TOP",0,-5) |
| local highlight = frame:CreateTexture(nil,"OVERLAY") |
| self.highlight = highlight |
| highlight:SetAllPoints(image) |
| highlight:SetTexture("Interface\\PaperDollInfoFrame\\UI-Character-Tab-Highlight") |
| highlight:SetTexCoord(0,1,0.23,0.77) |
| highlight:SetBlendMode("ADD") |
| highlight:Hide() |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| end |
Libs/AceGUI-3.0/widgets/AceGUIWidget-BlizOptionsGroup.lua
New file
0,0 → 1,150
| local AceGUI = LibStub("AceGUI-3.0") |
| ------------- |
| -- Widgets -- |
| ------------- |
| --[[ |
| Widgets must provide the following functions |
| Acquire() - Called when the object is aquired, should set everything to a default hidden state |
| Release() - Called when the object is Released, should remove any anchors and hide the Widget |
| And the following members |
| frame - the frame or derivitive object that will be treated as the widget for size and anchoring purposes |
| type - the type of the object, same as the name given to :RegisterWidget() |
| Widgets contain a table called userdata, this is a safe place to store data associated with the wigdet |
| It will be cleared automatically when a widget is released |
| Placing values directly into a widget object should be avoided |
| If the Widget can act as a container for other Widgets the following |
| content - frame or derivitive that children will be anchored to |
| The Widget can supply the following Optional Members |
| ]] |
| ---------------------------------- |
| -- Blizzard Options Group -- |
| ---------------------------------- |
| --[[ |
| Group Designed to be added to the bliz interface options panel |
| ]] |
| do |
| local Type = "BlizOptionsGroup" |
| local Version = 7 |
| local function OnAcquire(self) |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| self:SetName() |
| end |
| local function okay(this) |
| this.obj:Fire("okay") |
| end |
| local function cancel(this) |
| this.obj:Fire("cancel") |
| end |
| local function defaults(this) |
| this.obj:Fire("defaults") |
| end |
| local function SetName(self, name, parent) |
| self.frame.name = name |
| self.frame.parent = parent |
| end |
| local function OnShow(this) |
| this.obj:Fire("OnShow") |
| end |
| local function OnHide(this) |
| this.obj:Fire("OnHide") |
| end |
| local function OnWidthSet(self, width) |
| local content = self.content |
| local contentwidth = width - 63 |
| if contentwidth < 0 then |
| contentwidth = 0 |
| end |
| content:SetWidth(contentwidth) |
| content.width = contentwidth |
| end |
| local function OnHeightSet(self, height) |
| local content = self.content |
| local contentheight = height - 26 |
| if contentheight < 0 then |
| contentheight = 0 |
| end |
| content:SetHeight(contentheight) |
| content.height = contentheight |
| end |
| local function SetTitle(self, title) |
| local content = self.content |
| content:ClearAllPoints() |
| if not title or title == "" then |
| content:SetPoint("TOPLEFT",self.frame,"TOPLEFT",10,-10) |
| self.label:SetText("") |
| else |
| content:SetPoint("TOPLEFT",self.frame,"TOPLEFT",10,-40) |
| self.label:SetText(title) |
| end |
| content:SetPoint("BOTTOMRIGHT",self.frame,"BOTTOMRIGHT",-10,10) |
| end |
| local function Constructor() |
| local frame = CreateFrame("Frame") |
| local self = {} |
| self.type = Type |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.frame = frame |
| self.SetName = SetName |
| self.OnWidthSet = OnWidthSet |
| self.OnHeightSet = OnHeightSet |
| self.SetTitle = SetTitle |
| frame.obj = self |
| frame.okay = okay |
| frame.cancel = cancel |
| frame.defaults = defaults |
| frame:Hide() |
| frame:SetScript("OnHide",OnHide) |
| frame:SetScript("OnShow",OnShow) |
| local label = frame:CreateFontString(nil,"OVERLAY","GameFontNormalLarge") |
| self.label = label |
| label:SetPoint("TOPLEFT", frame, "TOPLEFT", 15, -15) |
| label:SetPoint("BOTTOMRIGHT", frame, "TOPRIGHT", 10, -45) |
| label:SetJustifyH("LEFT") |
| label:SetJustifyV("TOP") |
| --Container Support |
| local content = CreateFrame("Frame",nil,frame) |
| self.content = content |
| content.obj = self |
| content:SetPoint("TOPLEFT",frame,"TOPLEFT",15,-10) |
| content:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",-10,10) |
| AceGUI:RegisterAsContainer(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| end |
Libs/AceGUI-3.0/widgets/AceGUIWidget-Frame.lua
New file
0,0 → 1,299
| local AceGUI = LibStub("AceGUI-3.0") |
| ---------------- |
| -- Main Frame -- |
| ---------------- |
| --[[ |
| Events : |
| OnClose |
| ]] |
| do |
| local Type = "Frame" |
| local Version = 8 |
| local FrameBackdrop = { |
| bgFile="Interface\\DialogFrame\\UI-DialogBox-Background", |
| edgeFile="Interface\\DialogFrame\\UI-DialogBox-Border", |
| tile = true, tileSize = 32, edgeSize = 32, |
| insets = { left = 8, right = 8, top = 8, bottom = 8 } |
| } |
| local PaneBackdrop = { |
| bgFile = "Interface\\ChatFrame\\ChatFrameBackground", |
| edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border", |
| tile = true, tileSize = 16, edgeSize = 16, |
| insets = { left = 3, right = 3, top = 5, bottom = 3 } |
| } |
| local function frameOnClose(this) |
| this.obj:Fire("OnClose") |
| end |
| local function closeOnClick(this) |
| this.obj:Hide() |
| end |
| local function frameOnMouseDown(this) |
| AceGUI:ClearFocus() |
| end |
| local function titleOnMouseDown(this) |
| this:GetParent():StartMoving() |
| AceGUI:ClearFocus() |
| end |
| local function frameOnMouseUp(this) |
| local frame = this:GetParent() |
| frame:StopMovingOrSizing() |
| local self = frame.obj |
| local status = self.status or self.localstatus |
| status.width = frame:GetWidth() |
| status.height = frame:GetHeight() |
| status.top = frame:GetTop() |
| status.left = frame:GetLeft() |
| end |
| local function sizerseOnMouseDown(this) |
| this:GetParent():StartSizing("BOTTOMRIGHT") |
| AceGUI:ClearFocus() |
| end |
| local function sizersOnMouseDown(this) |
| this:GetParent():StartSizing("BOTTOM") |
| AceGUI:ClearFocus() |
| end |
| local function sizereOnMouseDown(this) |
| this:GetParent():StartSizing("RIGHT") |
| AceGUI:ClearFocus() |
| end |
| local function sizerOnMouseUp(this) |
| this:GetParent():StopMovingOrSizing() |
| end |
| local function SetTitle(self,title) |
| self.titletext:SetText(title) |
| end |
| local function SetStatusText(self,text) |
| self.statustext:SetText(text) |
| end |
| local function Hide(self) |
| self.frame:Hide() |
| end |
| local function Show(self) |
| self.frame:Show() |
| end |
| local function OnAcquire(self) |
| self.frame:SetParent(UIParent) |
| self.frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| self:ApplyStatus() |
| end |
| local function OnRelease(self) |
| self.status = nil |
| for k in pairs(self.localstatus) do |
| self.localstatus[k] = nil |
| end |
| end |
| -- called to set an external table to store status in |
| local function SetStatusTable(self, status) |
| assert(type(status) == "table") |
| self.status = status |
| self:ApplyStatus() |
| end |
| local function ApplyStatus(self) |
| local status = self.status or self.localstatus |
| local frame = self.frame |
| self:SetWidth(status.width or 700) |
| self:SetHeight(status.height or 500) |
| if status.top and status.left then |
| frame:SetPoint("TOP",UIParent,"BOTTOM",0,status.top) |
| frame:SetPoint("LEFT",UIParent,"LEFT",status.left,0) |
| else |
| frame:SetPoint("CENTER",UIParent,"CENTER") |
| end |
| end |
| local function OnWidthSet(self, width) |
| local content = self.content |
| local contentwidth = width - 34 |
| if contentwidth < 0 then |
| contentwidth = 0 |
| end |
| content:SetWidth(contentwidth) |
| content.width = contentwidth |
| end |
| local function OnHeightSet(self, height) |
| local content = self.content |
| local contentheight = height - 57 |
| if contentheight < 0 then |
| contentheight = 0 |
| end |
| content:SetHeight(contentheight) |
| content.height = contentheight |
| end |
| local function Constructor() |
| local frame = CreateFrame("Frame",nil,UIParent) |
| local self = {} |
| self.type = "Frame" |
| self.Hide = Hide |
| self.Show = Show |
| self.SetTitle = SetTitle |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.SetStatusText = SetStatusText |
| self.SetStatusTable = SetStatusTable |
| self.ApplyStatus = ApplyStatus |
| self.OnWidthSet = OnWidthSet |
| self.OnHeightSet = OnHeightSet |
| self.localstatus = {} |
| self.frame = frame |
| frame.obj = self |
| frame:SetWidth(700) |
| frame:SetHeight(500) |
| frame:SetPoint("CENTER",UIParent,"CENTER",0,0) |
| frame:EnableMouse() |
| frame:SetMovable(true) |
| frame:SetResizable(true) |
| frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| frame:SetScript("OnMouseDown", frameOnMouseDown) |
| frame:SetBackdrop(FrameBackdrop) |
| frame:SetBackdropColor(0,0,0,1) |
| frame:SetScript("OnHide",frameOnClose) |
| frame:SetMinResize(400,200) |
| frame:SetToplevel(true) |
| local closebutton = CreateFrame("Button",nil,frame,"UIPanelButtonTemplate") |
| closebutton:SetScript("OnClick", closeOnClick) |
| closebutton:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",-27,17) |
| closebutton:SetHeight(20) |
| closebutton:SetWidth(100) |
| closebutton:SetText(CLOSE) |
| self.closebutton = closebutton |
| closebutton.obj = self |
| local statusbg = CreateFrame("Frame",nil,frame) |
| statusbg:SetPoint("BOTTOMLEFT",frame,"BOTTOMLEFT",15,15) |
| statusbg:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",-132,15) |
| statusbg:SetHeight(24) |
| statusbg:SetBackdrop(PaneBackdrop) |
| statusbg:SetBackdropColor(0.1,0.1,0.1) |
| statusbg:SetBackdropBorderColor(0.4,0.4,0.4) |
| self.statusbg = statusbg |
| local statustext = statusbg:CreateFontString(nil,"OVERLAY","GameFontNormal") |
| self.statustext = statustext |
| statustext:SetPoint("TOPLEFT",statusbg,"TOPLEFT",7,-2) |
| statustext:SetPoint("BOTTOMRIGHT",statusbg,"BOTTOMRIGHT",-7,2) |
| statustext:SetHeight(20) |
| statustext:SetJustifyH("LEFT") |
| statustext:SetText("") |
| local title = CreateFrame("Frame",nil,frame) |
| self.title = title |
| title:EnableMouse() |
| title:SetScript("OnMouseDown",titleOnMouseDown) |
| title:SetScript("OnMouseUp", frameOnMouseUp) |
| local titlebg = frame:CreateTexture(nil,"OVERLAY") |
| titlebg:SetTexture("Interface\\DialogFrame\\UI-DialogBox-Header") |
| titlebg:SetTexCoord(0.31,0.67,0,0.63) |
| titlebg:SetPoint("TOP",frame,"TOP",0,12) |
| titlebg:SetWidth(100) |
| titlebg:SetHeight(40) |
| local titlebg_l = frame:CreateTexture(nil,"OVERLAY") |
| titlebg_l:SetTexture("Interface\\DialogFrame\\UI-DialogBox-Header") |
| titlebg_l:SetTexCoord(0.21,0.31,0,0.63) |
| titlebg_l:SetPoint("RIGHT",titlebg,"LEFT",0,0) |
| titlebg_l:SetWidth(30) |
| titlebg_l:SetHeight(40) |
| local titlebg_right = frame:CreateTexture(nil,"OVERLAY") |
| titlebg_right:SetTexture("Interface\\DialogFrame\\UI-DialogBox-Header") |
| titlebg_right:SetTexCoord(0.67,0.77,0,0.63) |
| titlebg_right:SetPoint("LEFT",titlebg,"RIGHT",0,0) |
| titlebg_right:SetWidth(30) |
| titlebg_right:SetHeight(40) |
| title:SetAllPoints(titlebg) |
| local titletext = title:CreateFontString(nil,"OVERLAY","GameFontNormal") |
| titletext:SetPoint("TOP",titlebg,"TOP",0,-14) |
| self.titletext = titletext |
| local sizer_se = CreateFrame("Frame",nil,frame) |
| sizer_se:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",0,0) |
| sizer_se:SetWidth(25) |
| sizer_se:SetHeight(25) |
| sizer_se:EnableMouse() |
| sizer_se:SetScript("OnMouseDown",sizerseOnMouseDown) |
| sizer_se:SetScript("OnMouseUp", sizerOnMouseUp) |
| self.sizer_se = sizer_se |
| local line1 = sizer_se:CreateTexture(nil, "BACKGROUND") |
| self.line1 = line1 |
| line1:SetWidth(14) |
| line1:SetHeight(14) |
| line1:SetPoint("BOTTOMRIGHT", -8, 8) |
| line1:SetTexture("Interface\\Tooltips\\UI-Tooltip-Border") |
| local x = 0.1 * 14/17 |
| line1:SetTexCoord(0.05 - x, 0.5, 0.05, 0.5 + x, 0.05, 0.5 - x, 0.5 + x, 0.5) |
| local line2 = sizer_se:CreateTexture(nil, "BACKGROUND") |
| self.line2 = line2 |
| line2:SetWidth(8) |
| line2:SetHeight(8) |
| line2:SetPoint("BOTTOMRIGHT", -8, 8) |
| line2:SetTexture("Interface\\Tooltips\\UI-Tooltip-Border") |
| local x = 0.1 * 8/17 |
| line2:SetTexCoord(0.05 - x, 0.5, 0.05, 0.5 + x, 0.05, 0.5 - x, 0.5 + x, 0.5) |
| local sizer_s = CreateFrame("Frame",nil,frame) |
| sizer_s:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",-25,0) |
| sizer_s:SetPoint("BOTTOMLEFT",frame,"BOTTOMLEFT",0,0) |
| sizer_s:SetHeight(25) |
| sizer_s:EnableMouse() |
| sizer_s:SetScript("OnMouseDown",sizersOnMouseDown) |
| sizer_s:SetScript("OnMouseUp", sizerOnMouseUp) |
| self.sizer_s = sizer_s |
| local sizer_e = CreateFrame("Frame",nil,frame) |
| sizer_e:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",0,25) |
| sizer_e:SetPoint("TOPRIGHT",frame,"TOPRIGHT",0,0) |
| sizer_e:SetWidth(25) |
| sizer_e:EnableMouse() |
| sizer_e:SetScript("OnMouseDown",sizereOnMouseDown) |
| sizer_e:SetScript("OnMouseUp", sizerOnMouseUp) |
| self.sizer_e = sizer_e |
| --Container Support |
| local content = CreateFrame("Frame",nil,frame) |
| self.content = content |
| content.obj = self |
| content:SetPoint("TOPLEFT",frame,"TOPLEFT",17,-27) |
| content:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",-17,40) |
| AceGUI:RegisterAsContainer(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| end |
Libs/AceGUI-3.0/widgets/AceGUIWidget-InlineGroup.lua
New file
0,0 → 1,136
| local AceGUI = LibStub("AceGUI-3.0") |
| ------------- |
| -- Widgets -- |
| ------------- |
| --[[ |
| Widgets must provide the following functions |
| Acquire() - Called when the object is aquired, should set everything to a default hidden state |
| Release() - Called when the object is Released, should remove any anchors and hide the Widget |
| And the following members |
| frame - the frame or derivitive object that will be treated as the widget for size and anchoring purposes |
| type - the type of the object, same as the name given to :RegisterWidget() |
| Widgets contain a table called userdata, this is a safe place to store data associated with the wigdet |
| It will be cleared automatically when a widget is released |
| Placing values directly into a widget object should be avoided |
| If the Widget can act as a container for other Widgets the following |
| content - frame or derivitive that children will be anchored to |
| The Widget can supply the following Optional Members |
| ]] |
| -------------------------- |
| -- Inline Group -- |
| -------------------------- |
| --[[ |
| This is a simple grouping container, no selection |
| It will resize automatically to the height of the controls added to it |
| ]] |
| do |
| local Type = "InlineGroup" |
| local Version = 5 |
| local function OnAcquire(self) |
| self:SetWidth(300) |
| self:SetHeight(100) |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| end |
| local PaneBackdrop = { |
| bgFile = "Interface\\ChatFrame\\ChatFrameBackground", |
| edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border", |
| tile = true, tileSize = 16, edgeSize = 16, |
| insets = { left = 3, right = 3, top = 5, bottom = 3 } |
| } |
| local function SetTitle(self,title) |
| self.titletext:SetText(title) |
| end |
| local function LayoutFinished(self, width, height) |
| if self.noAutoHeight then return end |
| self:SetHeight((height or 0) + 40) |
| end |
| local function OnWidthSet(self, width) |
| local content = self.content |
| local contentwidth = width - 20 |
| if contentwidth < 0 then |
| contentwidth = 0 |
| end |
| content:SetWidth(contentwidth) |
| content.width = contentwidth |
| end |
| local function OnHeightSet(self, height) |
| local content = self.content |
| local contentheight = height - 20 |
| if contentheight < 0 then |
| contentheight = 0 |
| end |
| content:SetHeight(contentheight) |
| content.height = contentheight |
| end |
| local function Constructor() |
| local frame = CreateFrame("Frame",nil,UIParent) |
| local self = {} |
| self.type = Type |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.SetTitle = SetTitle |
| self.frame = frame |
| self.LayoutFinished = LayoutFinished |
| self.OnWidthSet = OnWidthSet |
| self.OnHeightSet = OnHeightSet |
| frame.obj = self |
| frame:SetHeight(100) |
| frame:SetWidth(100) |
| frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| local titletext = frame:CreateFontString(nil,"OVERLAY","GameFontNormal") |
| titletext:SetPoint("TOPLEFT",frame,"TOPLEFT",14,0) |
| titletext:SetPoint("TOPRIGHT",frame,"TOPRIGHT",-14,0) |
| titletext:SetJustifyH("LEFT") |
| titletext:SetHeight(18) |
| self.titletext = titletext |
| local border = CreateFrame("Frame",nil,frame) |
| self.border = border |
| border:SetPoint("TOPLEFT",frame,"TOPLEFT",3,-17) |
| border:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",-3,3) |
| border:SetBackdrop(PaneBackdrop) |
| border:SetBackdropColor(0.1,0.1,0.1,0.5) |
| border:SetBackdropBorderColor(0.4,0.4,0.4) |
| --Container Support |
| local content = CreateFrame("Frame",nil,border) |
| self.content = content |
| content.obj = self |
| content:SetPoint("TOPLEFT",border,"TOPLEFT",10,-10) |
| content:SetPoint("BOTTOMRIGHT",border,"BOTTOMRIGHT",-10,10) |
| AceGUI:RegisterAsContainer(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| end |
Libs/AceGUI-3.0/widgets/AceGUIWidget-DropDown.lua
New file
0,0 → 1,694
| --[[ $Id: AceGUIWidget-DropDown.lua 839 2009-09-08 08:27:15Z nevcairiel $ ]]-- |
| local min, max, floor = math.min, math.max, math.floor |
| local AceGUI = LibStub("AceGUI-3.0") |
| local function fixlevels(parent,...) |
| local i = 1 |
| local child = select(i, ...) |
| while child do |
| child:SetFrameLevel(parent:GetFrameLevel()+1) |
| fixlevels(child, child:GetChildren()) |
| i = i + 1 |
| child = select(i, ...) |
| end |
| end |
| local function fixstrata(strata, parent, ...) |
| local i = 1 |
| local child = select(i, ...) |
| parent:SetFrameStrata(strata) |
| while child do |
| fixstrata(strata, child, child:GetChildren()) |
| i = i + 1 |
| child = select(i, ...) |
| end |
| end |
| do |
| local widgetType = "Dropdown-Pullout" |
| local widgetVersion = 3 |
| --[[ Static data ]]-- |
| local backdrop = { |
| bgFile = "Interface\\ChatFrame\\ChatFrameBackground", |
| edgeFile = "Interface\\DialogFrame\\UI-DialogBox-Border", |
| edgeSize = 32, |
| tileSize = 32, |
| tile = true, |
| insets = { left = 11, right = 12, top = 12, bottom = 11 }, |
| } |
| local sliderBackdrop = { |
| bgFile = "Interface\\Buttons\\UI-SliderBar-Background", |
| edgeFile = "Interface\\Buttons\\UI-SliderBar-Border", |
| tile = true, tileSize = 8, edgeSize = 8, |
| insets = { left = 3, right = 3, top = 3, bottom = 3 } |
| } |
| local defaultWidth = 200 |
| local defaultMaxHeight = 600 |
| --[[ UI Event Handlers ]]-- |
| -- HACK: This should be no part of the pullout, but there |
| -- is no other 'clean' way to response to any item-OnEnter |
| -- Used to close Submenus when an other item is entered |
| local function OnEnter(item) |
| local self = item.pullout |
| for k, v in ipairs(self.items) do |
| if v.CloseMenu and v ~= item then |
| v:CloseMenu() |
| end |
| end |
| end |
| -- See the note in Constructor() for each scroll related function |
| local function OnMouseWheel(this, value) |
| this.obj:MoveScroll(value) |
| end |
| local function OnScrollValueChanged(this, value) |
| this.obj:SetScroll(value) |
| end |
| local function OnSizeChanged(this) |
| this.obj:FixScroll() |
| end |
| --[[ Exported methods ]]-- |
| -- exported |
| local function SetScroll(self, value) |
| local status = self.scrollStatus |
| local frame, child = self.scrollFrame, self.itemFrame |
| local height, viewheight = frame:GetHeight(), child:GetHeight() |
| local offset |
| if height > viewheight then |
| offset = 0 |
| else |
| offset = floor((viewheight - height) / 1000 * value) |
| end |
| child:ClearAllPoints() |
| child:SetPoint("TOPLEFT", frame, "TOPLEFT", 0, offset) |
| child:SetPoint("TOPRIGHT", frame, "TOPRIGHT", self.slider:IsShown() and -12 or 0, offset) |
| status.offset = offset |
| status.scrollvalue = value |
| end |
| -- exported |
| local function MoveScroll(self, value) |
| local status = self.scrollStatus |
| local frame, child = self.scrollFrame, self.itemFrame |
| local height, viewheight = frame:GetHeight(), child:GetHeight() |
| if height > viewheight then |
| self.slider:Hide() |
| else |
| self.slider:Show() |
| local diff = height - viewheight |
| local delta = 1 |
| if value < 0 then |
| delta = -1 |
| end |
| self.slider:SetValue(min(max(status.scrollvalue + delta*(1000/(diff/45)),0), 1000)) |
| end |
| end |
| -- exported |
| local function FixScroll(self) |
| local status = self.scrollStatus |
| local frame, child = self.scrollFrame, self.itemFrame |
| local height, viewheight = frame:GetHeight(), child:GetHeight() |
| local offset = status.offset or 0 |
| if viewheight < height then |
| self.slider:Hide() |
| child:SetPoint("TOPRIGHT", frame, "TOPRIGHT", 0, offset) |
| self.slider:SetValue(0) |
| else |
| self.slider:Show() |
| local value = (offset / (viewheight - height) * 1000) |
| if value > 1000 then value = 1000 end |
| self.slider:SetValue(value) |
| self:SetScroll(value) |
| if value < 1000 then |
| child:ClearAllPoints() |
| child:SetPoint("TOPLEFT", frame, "TOPLEFT", 0, offset) |
| child:SetPoint("TOPRIGHT", frame, "TOPRIGHT", -12, offset) |
| status.offset = offset |
| end |
| end |
| end |
| -- exported, AceGUI callback |
| local function OnAcquire(self) |
| self.frame:SetParent(UIParent) |
| --self.itemFrame:SetToplevel(true) |
| end |
| -- exported, AceGUI callback |
| local function OnRelease(self) |
| self:Clear() |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| end |
| -- exported |
| local function AddItem(self, item) |
| self.items[#self.items + 1] = item |
| local h = #self.items * 16 |
| self.itemFrame:SetHeight(h) |
| self.frame:SetHeight(min(h + 34, self.maxHeight)) -- +34: 20 for scrollFrame placement (10 offset) and +14 for item placement |
| item.frame:SetPoint("LEFT", self.itemFrame, "LEFT") |
| item.frame:SetPoint("RIGHT", self.itemFrame, "RIGHT") |
| item:SetPullout(self) |
| item:SetOnEnter(OnEnter) |
| end |
| -- exported |
| local function Open(self, point, relFrame, relPoint, x, y) |
| local items = self.items |
| local frame = self.frame |
| local itemFrame = self.itemFrame |
| frame:SetPoint(point, relFrame, relPoint, x, y) |
| local height = 8 |
| for i, item in pairs(items) do |
| if i == 1 then |
| item:SetPoint("TOP", itemFrame, "TOP", 0, -2) |
| else |
| item:SetPoint("TOP", items[i-1].frame, "BOTTOM", 0, 1) |
| end |
| item:Show() |
| height = height + 16 |
| end |
| itemFrame:SetHeight(height) |
| fixstrata("TOOLTIP", frame, frame:GetChildren()) |
| frame:Show() |
| self:Fire("OnOpen") |
| end |
| -- exported |
| local function Close(self) |
| self.frame:Hide() |
| self:Fire("OnClose") |
| end |
| -- exported |
| local function Clear(self) |
| local items = self.items |
| for i, item in pairs(items) do |
| AceGUI:Release(item) |
| items[i] = nil |
| end |
| end |
| -- exported |
| local function IterateItems(self) |
| return ipairs(self.items) |
| end |
| -- exported |
| local function SetHideOnLeave(self, val) |
| self.hideOnLeave = val |
| end |
| -- exported |
| local function SetMaxHeight(self, height) |
| self.maxHeight = height or defaultMaxHeight |
| if self.frame:GetHeight() > height then |
| self.frame:SetHeight(height) |
| elseif (self.itemFrame:GetHeight() + 34) < height then |
| self.frame:SetHeight(self.itemFrame:GetHeight() + 34) -- see :AddItem |
| end |
| end |
| -- exported |
| local function GetRightBorderWidth(self) |
| return 6 + (self.slider:IsShown() and 12 or 0) |
| end |
| -- exported |
| local function GetLeftBorderWidth(self) |
| return 6 |
| end |
| --[[ Constructor ]]-- |
| local function Constructor() |
| local count = AceGUI:GetNextWidgetNum(widgetType) |
| local frame = CreateFrame("Frame", "AceGUI30Pullout"..count, UIParent) |
| local self = {} |
| self.count = count |
| self.type = widgetType |
| self.frame = frame |
| frame.obj = self |
| self.OnAcquire = OnAcquire |
| self.OnRelease = OnRelease |
| self.AddItem = AddItem |
| self.Open = Open |
| self.Close = Close |
| self.Clear = Clear |
| self.IterateItems = IterateItems |
| self.SetHideOnLeave = SetHideOnLeave |
| self.SetScroll = SetScroll |
| self.MoveScroll = MoveScroll |
| self.FixScroll = FixScroll |
| self.SetMaxHeight = SetMaxHeight |
| self.GetRightBorderWidth = GetRightBorderWidth |
| self.GetLeftBorderWidth = GetLeftBorderWidth |
| self.items = {} |
| self.scrollStatus = { |
| scrollvalue = 0, |
| } |
| self.maxHeight = defaultMaxHeight |
| frame:SetBackdrop(backdrop) |
| frame:SetBackdropColor(0, 0, 0) |
| frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| frame:SetClampedToScreen(true) |
| frame:SetWidth(defaultWidth) |
| frame:SetHeight(self.maxHeight) |
| --frame:SetToplevel(true) |
| -- NOTE: The whole scroll frame code is copied from the AceGUI-3.0 widget ScrollFrame |
| local scrollFrame = CreateFrame("ScrollFrame", nil, frame) |
| local itemFrame = CreateFrame("Frame", nil, scrollFrame) |
| self.scrollFrame = scrollFrame |
| self.itemFrame = itemFrame |
| scrollFrame.obj = self |
| itemFrame.obj = self |
| local slider = CreateFrame("Slider", "AceGUI30PulloutScrollbar"..count, scrollFrame) |
| slider:SetOrientation("VERTICAL") |
| slider:SetHitRectInsets(0, 0, -10, 0) |
| slider:SetBackdrop(sliderBackdrop) |
| slider:SetWidth(8) |
| slider:SetThumbTexture("Interface\\Buttons\\UI-SliderBar-Button-Vertical") |
| slider:SetFrameStrata("FULLSCREEN_DIALOG") |
| self.slider = slider |
| slider.obj = self |
| scrollFrame:SetScrollChild(itemFrame) |
| scrollFrame:SetPoint("TOPLEFT", frame, "TOPLEFT", 6, -12) |
| scrollFrame:SetPoint("BOTTOMRIGHT", frame, "BOTTOMRIGHT", -6, 12) |
| scrollFrame:EnableMouseWheel(true) |
| scrollFrame:SetScript("OnMouseWheel", OnMouseWheel) |
| scrollFrame:SetScript("OnSizeChanged", OnSizeChanged) |
| scrollFrame:SetToplevel(true) |
| scrollFrame:SetFrameStrata("FULLSCREEN_DIALOG") |
| itemFrame:SetPoint("TOPLEFT", scrollFrame, "TOPLEFT", 0, 0) |
| itemFrame:SetPoint("TOPRIGHT", scrollFrame, "TOPRIGHT", -12, 0) |
| itemFrame:SetHeight(400) |
| itemFrame:SetToplevel(true) |
| itemFrame:SetFrameStrata("FULLSCREEN_DIALOG") |
| slider:SetPoint("TOPLEFT", scrollFrame, "TOPRIGHT", -16, 0) |
| slider:SetPoint("BOTTOMLEFT", scrollFrame, "BOTTOMRIGHT", -16, 0) |
| slider:SetScript("OnValueChanged", OnScrollValueChanged) |
| slider:SetMinMaxValues(0, 1000) |
| slider:SetValueStep(1) |
| slider:SetValue(0) |
| scrollFrame:Show() |
| itemFrame:Show() |
| slider:Hide() |
| self:FixScroll() |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(widgetType, Constructor, widgetVersion) |
| end |
| do |
| local widgetType = "Dropdown" |
| local widgetVersion = 21 |
| --[[ Static data ]]-- |
| --[[ UI event handler ]]-- |
| local function Control_OnEnter(this) |
| this.obj:Fire("OnEnter") |
| end |
| local function Control_OnLeave(this) |
| this.obj:Fire("OnLeave") |
| end |
| local function Dropdown_OnHide(this) |
| local self = this.obj |
| if self.open then |
| self.pullout:Close() |
| end |
| end |
| local function Dropdown_TogglePullout(this) |
| local self = this.obj |
| if self.open then |
| self.open = nil |
| self.pullout:Close() |
| AceGUI:ClearFocus() |
| else |
| self.open = true |
| self.pullout:SetWidth(self.frame:GetWidth()) |
| self.pullout:Open("TOPLEFT", self.frame, "BOTTOMLEFT", 0, self.label:IsShown() and -2 or 0) |
| AceGUI:SetFocus(self) |
| end |
| end |
| local function OnPulloutOpen(this) |
| local self = this.userdata.obj |
| local value = self.value |
| if not self.multiselect then |
| for i, item in this:IterateItems() do |
| item:SetValue(item.userdata.value == value) |
| end |
| end |
| self.open = true |
| end |
| local function OnPulloutClose(this) |
| local self = this.userdata.obj |
| self.open = nil |
| self:Fire("OnClosed") |
| end |
| local function ShowMultiText(self) |
| local text |
| for i, widget in self.pullout:IterateItems() do |
| if widget.type == "Dropdown-Item-Toggle" then |
| if widget:GetValue() then |
| if text then |
| text = text..", "..widget:GetText() |
| else |
| text = widget:GetText() |
| end |
| end |
| end |
| end |
| self:SetText(text) |
| end |
| local function OnItemValueChanged(this, event, checked) |
| local self = this.userdata.obj |
| if self.multiselect then |
| self:Fire("OnValueChanged", this.userdata.value, checked) |
| ShowMultiText(self) |
| else |
| if checked then |
| self:SetValue(this.userdata.value) |
| self:Fire("OnValueChanged", this.userdata.value) |
| else |
| this:SetValue(true) |
| end |
| if self.open then |
| self.pullout:Close() |
| end |
| end |
| end |
| --[[ Exported methods ]]-- |
| -- exported, AceGUI callback |
| local function OnAcquire(self) |
| local pullout = AceGUI:Create("Dropdown-Pullout") |
| self.pullout = pullout |
| pullout.userdata.obj = self |
| pullout:SetCallback("OnClose", OnPulloutClose) |
| pullout:SetCallback("OnOpen", OnPulloutOpen) |
| self.pullout.frame:SetFrameLevel(self.frame:GetFrameLevel() + 1) |
| fixlevels(self.pullout.frame, self.pullout.frame:GetChildren()) |
| self:SetHeight(44) |
| self:SetWidth(200) |
| end |
| -- exported, AceGUI callback |
| local function OnRelease(self) |
| if self.open then |
| self.pullout:Close() |
| end |
| AceGUI:Release(self.pullout) |
| self.pullout = nil |
| self:SetText("") |
| self:SetLabel("") |
| self:SetDisabled(false) |
| self:SetMultiselect(false) |
| self.value = nil |
| self.list = nil |
| self.open = nil |
| self.hasClose = nil |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| end |
| -- exported |
| local function SetDisabled(self, disabled) |
| self.disabled = disabled |
| if disabled then |
| self.text:SetTextColor(0.5,0.5,0.5) |
| self.button:Disable() |
| self.label:SetTextColor(0.5,0.5,0.5) |
| else |
| self.button:Enable() |
| self.label:SetTextColor(1,.82,0) |
| self.text:SetTextColor(1,1,1) |
| end |
| end |
| -- exported |
| local function ClearFocus(self) |
| if self.open then |
| self.pullout:Close() |
| end |
| end |
| -- exported |
| local function SetText(self, text) |
| self.text:SetText(text or "") |
| end |
| -- exported |
| local function SetLabel(self, text) |
| if text and text ~= "" then |
| self.label:SetText(text) |
| self.label:Show() |
| self.dropdown:SetPoint("TOPLEFT",self.frame,"TOPLEFT",-15,-18) |
| self.frame:SetHeight(44) |
| else |
| self.label:SetText("") |
| self.label:Hide() |
| self.dropdown:SetPoint("TOPLEFT",self.frame,"TOPLEFT",-15,0) |
| self.frame:SetHeight(26) |
| end |
| end |
| -- exported |
| local function SetValue(self, value) |
| if self.list then |
| self:SetText(self.list[value] or "") |
| end |
| self.value = value |
| end |
| -- exported |
| local function GetValue(self) |
| return self.value |
| end |
| -- exported |
| local function SetItemValue(self, item, value) |
| if not self.multiselect then return end |
| for i, widget in self.pullout:IterateItems() do |
| if widget.userdata.value == item then |
| if widget.SetValue then |
| widget:SetValue(value) |
| end |
| end |
| end |
| ShowMultiText(self) |
| end |
| -- exported |
| local function SetItemDisabled(self, item, disabled) |
| for i, widget in self.pullout:IterateItems() do |
| if widget.userdata.value == item then |
| widget:SetDisabled(disabled) |
| end |
| end |
| end |
| local function AddListItem(self, value, text) |
| local item = AceGUI:Create("Dropdown-Item-Toggle") |
| item:SetText(text) |
| item.userdata.obj = self |
| item.userdata.value = value |
| item:SetCallback("OnValueChanged", OnItemValueChanged) |
| self.pullout:AddItem(item) |
| end |
| local function AddCloseButton(self) |
| if not self.hasClose then |
| local close = AceGUI:Create("Dropdown-Item-Execute") |
| close:SetText(CLOSE) |
| self.pullout:AddItem(close) |
| self.hasClose = true |
| end |
| end |
| -- exported |
| local sortlist = {} |
| local function SetList(self, list) |
| self.list = list |
| self.pullout:Clear() |
| self.hasClose = nil |
| if not list then return end |
| for v in pairs(list) do |
| sortlist[#sortlist + 1] = v |
| end |
| table.sort(sortlist) |
| for i, value in pairs(sortlist) do |
| AddListItem(self, value, list[value]) |
| sortlist[i] = nil |
| end |
| if self.multiselect then |
| ShowMultiText(self) |
| AddCloseButton(self) |
| end |
| end |
| -- exported |
| local function AddItem(self, value, text) |
| if self.list then |
| self.list[value] = text |
| AddListItem(self, value, text) |
| end |
| end |
| -- exported |
| local function SetMultiselect(self, multi) |
| self.multiselect = multi |
| if multi then |
| ShowMultiText(self) |
| AddCloseButton(self) |
| end |
| end |
| -- exported |
| local function GetMultiselect(self) |
| return self.multiselect |
| end |
| --[[ Constructor ]]-- |
| local function Constructor() |
| local count = AceGUI:GetNextWidgetNum(widgetType) |
| local frame = CreateFrame("Frame", nil, UIParent) |
| local dropdown = CreateFrame("Frame", "AceGUI30DropDown"..count, frame, "UIDropDownMenuTemplate") |
| local self = {} |
| self.type = widgetType |
| self.frame = frame |
| self.dropdown = dropdown |
| self.count = count |
| frame.obj = self |
| dropdown.obj = self |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.ClearFocus = ClearFocus |
| self.SetText = SetText |
| self.SetValue = SetValue |
| self.GetValue = GetValue |
| self.SetList = SetList |
| self.SetLabel = SetLabel |
| self.SetDisabled = SetDisabled |
| self.AddItem = AddItem |
| self.SetMultiselect = SetMultiselect |
| self.GetMultiselect = GetMultiselect |
| self.SetItemValue = SetItemValue |
| self.SetItemDisabled = SetItemDisabled |
| self.alignoffset = 31 |
| frame:SetHeight(44) |
| frame:SetWidth(200) |
| frame:SetScript("OnHide",Dropdown_OnHide) |
| dropdown:ClearAllPoints() |
| dropdown:SetPoint("TOPLEFT",frame,"TOPLEFT",-15,0) |
| dropdown:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",17,0) |
| dropdown:SetScript("OnHide", nil) |
| local left = _G[dropdown:GetName() .. "Left"] |
| local middle = _G[dropdown:GetName() .. "Middle"] |
| local right = _G[dropdown:GetName() .. "Right"] |
| middle:ClearAllPoints() |
| right:ClearAllPoints() |
| middle:SetPoint("LEFT", left, "RIGHT", 0, 0) |
| middle:SetPoint("RIGHT", right, "LEFT", 0, 0) |
| right:SetPoint("TOPRIGHT", dropdown, "TOPRIGHT", 0, 17) |
| local button = _G[dropdown:GetName() .. "Button"] |
| self.button = button |
| button.obj = self |
| button:SetScript("OnEnter",Control_OnEnter) |
| button:SetScript("OnLeave",Control_OnLeave) |
| button:SetScript("OnClick",Dropdown_TogglePullout) |
| local text = _G[dropdown:GetName() .. "Text"] |
| self.text = text |
| text.obj = self |
| text:ClearAllPoints() |
| text:SetPoint("RIGHT", right, "RIGHT" ,-43, 2) |
| text:SetPoint("LEFT", left, "LEFT", 25, 2) |
| local label = frame:CreateFontString(nil,"OVERLAY","GameFontNormalSmall") |
| label:SetPoint("TOPLEFT",frame,"TOPLEFT",0,0) |
| label:SetPoint("TOPRIGHT",frame,"TOPRIGHT",0,0) |
| label:SetJustifyH("LEFT") |
| label:SetHeight(18) |
| label:Hide() |
| self.label = label |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(widgetType, Constructor, widgetVersion) |
| end |
Libs/AceGUI-3.0/widgets/AceGUIWidget-EditBox.lua
New file
0,0 → 1,222
| local AceGUI = LibStub("AceGUI-3.0") |
| local Type = "EditBox" |
| local Version = 12 |
| local _G=_G |
| if not AceGUIEditBoxInsertLink then |
| -- upgradeable hook |
| hooksecurefunc("ChatEdit_InsertLink", function(...) return _G.AceGUIEditBoxInsertLink(...) end) |
| end |
| function _G.AceGUIEditBoxInsertLink(text) |
| for i = 1, AceGUI:GetNextWidgetNum(Type)-1 do |
| local editbox = _G["AceGUI-3.0EditBox"..i] |
| if editbox and editbox:IsVisible() and editbox:HasFocus() then |
| editbox:Insert(text) |
| return true |
| end |
| end |
| end |
| -------------------------- |
| -- Edit box -- |
| -------------------------- |
| --[[ |
| Events : |
| OnTextChanged |
| OnEnterPressed |
| ]] |
| do |
| local function OnAcquire(self) |
| self:SetHeight(26) |
| self:SetWidth(200) |
| self:SetDisabled(false) |
| self:SetLabel() |
| self.showbutton = true |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| self:SetDisabled(false) |
| end |
| local function Control_OnEnter(this) |
| this.obj:Fire("OnEnter") |
| end |
| local function Control_OnLeave(this) |
| this.obj:Fire("OnLeave") |
| end |
| local function EditBox_OnEscapePressed(this) |
| this:ClearFocus() |
| end |
| local function ShowButton(self) |
| if self.showbutton then |
| self.button:Show() |
| self.editbox:SetTextInsets(0,20,3,3) |
| end |
| end |
| local function HideButton(self) |
| self.button:Hide() |
| self.editbox:SetTextInsets(0,0,3,3) |
| end |
| local function EditBox_OnEnterPressed(this) |
| local self = this.obj |
| local value = this:GetText() |
| local cancel = self:Fire("OnEnterPressed",value) |
| if not cancel then |
| HideButton(self) |
| end |
| end |
| local function Button_OnClick(this) |
| local editbox = this.obj.editbox |
| editbox:ClearFocus() |
| EditBox_OnEnterPressed(editbox) |
| end |
| local function EditBox_OnReceiveDrag(this) |
| local self = this.obj |
| local type, id, info = GetCursorInfo() |
| if type == "item" then |
| self:SetText(info) |
| self:Fire("OnEnterPressed",info) |
| ClearCursor() |
| elseif type == "spell" then |
| local name, rank = GetSpellName(id, info) |
| if rank and rank:match("%d") then |
| name = name.."("..rank..")" |
| end |
| self:SetText(name) |
| self:Fire("OnEnterPressed",name) |
| ClearCursor() |
| end |
| HideButton(self) |
| AceGUI:ClearFocus() |
| end |
| local function EditBox_OnTextChanged(this) |
| local self = this.obj |
| local value = this:GetText() |
| if tostring(value) ~= tostring(self.lasttext) then |
| self:Fire("OnTextChanged",value) |
| self.lasttext = value |
| ShowButton(self) |
| end |
| end |
| local function SetDisabled(self, disabled) |
| self.disabled = disabled |
| if disabled then |
| self.editbox:EnableMouse(false) |
| self.editbox:ClearFocus() |
| self.editbox:SetTextColor(0.5,0.5,0.5) |
| self.label:SetTextColor(0.5,0.5,0.5) |
| else |
| self.editbox:EnableMouse(true) |
| self.editbox:SetTextColor(1,1,1) |
| self.label:SetTextColor(1,.82,0) |
| end |
| end |
| local function SetText(self, text) |
| self.lasttext = text or "" |
| self.editbox:SetText(text or "") |
| self.editbox:SetCursorPosition(0) |
| HideButton(self) |
| end |
| local function SetLabel(self, text) |
| if text and text ~= "" then |
| self.label:SetText(text) |
| self.label:Show() |
| self.editbox:SetPoint("TOPLEFT",self.frame,"TOPLEFT",7,-18) |
| self:SetHeight(44) |
| self.alignoffset = 30 |
| else |
| self.label:SetText("") |
| self.label:Hide() |
| self.editbox:SetPoint("TOPLEFT",self.frame,"TOPLEFT",7,0) |
| self:SetHeight(26) |
| self.alignoffset = 12 |
| end |
| end |
| local function Constructor() |
| local num = AceGUI:GetNextWidgetNum(Type) |
| local frame = CreateFrame("Frame",nil,UIParent) |
| local editbox = CreateFrame("EditBox","AceGUI-3.0EditBox"..num,frame,"InputBoxTemplate") |
| local self = {} |
| self.type = Type |
| self.num = num |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.SetDisabled = SetDisabled |
| self.SetText = SetText |
| self.SetLabel = SetLabel |
| self.frame = frame |
| frame.obj = self |
| self.editbox = editbox |
| editbox.obj = self |
| self.alignoffset = 30 |
| frame:SetHeight(44) |
| frame:SetWidth(200) |
| editbox:SetScript("OnEnter",Control_OnEnter) |
| editbox:SetScript("OnLeave",Control_OnLeave) |
| editbox:SetAutoFocus(false) |
| editbox:SetFontObject(ChatFontNormal) |
| editbox:SetScript("OnEscapePressed",EditBox_OnEscapePressed) |
| editbox:SetScript("OnEnterPressed",EditBox_OnEnterPressed) |
| editbox:SetScript("OnTextChanged",EditBox_OnTextChanged) |
| editbox:SetScript("OnReceiveDrag", EditBox_OnReceiveDrag) |
| editbox:SetScript("OnMouseDown", EditBox_OnReceiveDrag) |
| editbox:SetTextInsets(0,0,3,3) |
| editbox:SetMaxLetters(256) |
| editbox:SetPoint("BOTTOMLEFT",frame,"BOTTOMLEFT",6,0) |
| editbox:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",0,0) |
| editbox:SetHeight(19) |
| local label = frame:CreateFontString(nil,"OVERLAY","GameFontNormalSmall") |
| label:SetPoint("TOPLEFT",frame,"TOPLEFT",0,-2) |
| label:SetPoint("TOPRIGHT",frame,"TOPRIGHT",0,-2) |
| label:SetJustifyH("LEFT") |
| label:SetHeight(18) |
| self.label = label |
| local button = CreateFrame("Button",nil,editbox,"UIPanelButtonTemplate") |
| button:SetWidth(40) |
| button:SetHeight(20) |
| button:SetPoint("RIGHT",editbox,"RIGHT",-2,0) |
| button:SetText(OKAY) |
| button:SetScript("OnClick", Button_OnClick) |
| button:Hide() |
| self.button = button |
| button.obj = self |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| end |
Libs/AceGUI-3.0/widgets/AceGUIWidget-Heading.lua
New file
0,0 → 1,73
| local AceGUI = LibStub("AceGUI-3.0") |
| -------------------------- |
| -- Heading -- |
| -------------------------- |
| do |
| local Type = "Heading" |
| local Version = 5 |
| local function OnAcquire(self) |
| self:SetText("") |
| self:SetFullWidth() |
| self:SetHeight(18) |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| end |
| local function SetText(self, text) |
| self.label:SetText(text or "") |
| if (text or "") == "" then |
| self.left:SetPoint("RIGHT",self.frame,"RIGHT",-3,0) |
| self.right:Hide() |
| else |
| self.left:SetPoint("RIGHT",self.label,"LEFT",-5,0) |
| self.right:Show() |
| end |
| end |
| local function Constructor() |
| local frame = CreateFrame("Frame",nil,UIParent) |
| local self = {} |
| self.type = Type |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.SetText = SetText |
| self.frame = frame |
| frame.obj = self |
| frame:SetHeight(18) |
| local label = frame:CreateFontString(nil,"BACKGROUND","GameFontNormal") |
| label:SetPoint("TOP",frame,"TOP",0,0) |
| label:SetPoint("BOTTOM",frame,"BOTTOM",0,0) |
| label:SetJustifyH("CENTER") |
| label:SetHeight(18) |
| self.label = label |
| local left = frame:CreateTexture(nil, "BACKGROUND") |
| self.left = left |
| left:SetHeight(8) |
| left:SetPoint("LEFT",frame,"LEFT",3,0) |
| left:SetPoint("RIGHT",label,"LEFT",-5,0) |
| left:SetTexture("Interface\\Tooltips\\UI-Tooltip-Border") |
| left:SetTexCoord(0.81, 0.94, 0.5, 1) |
| local right = frame:CreateTexture(nil, "BACKGROUND") |
| self.right = right |
| right:SetHeight(8) |
| right:SetPoint("RIGHT",frame,"RIGHT",-3,0) |
| right:SetPoint("LEFT",label,"RIGHT",5,0) |
| right:SetTexture("Interface\\Tooltips\\UI-Tooltip-Border") |
| right:SetTexCoord(0.81, 0.94, 0.5, 1) |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| end |
Libs/AceGUI-3.0/widgets/AceGUIWidget-SimpleGroup.lua
New file
0,0 → 1,97
| local AceGUI = LibStub("AceGUI-3.0") |
| ------------- |
| -- Widgets -- |
| ------------- |
| --[[ |
| Widgets must provide the following functions |
| Acquire() - Called when the object is aquired, should set everything to a default hidden state |
| Release() - Called when the object is Released, should remove any anchors and hide the Widget |
| And the following members |
| frame - the frame or derivitive object that will be treated as the widget for size and anchoring purposes |
| type - the type of the object, same as the name given to :RegisterWidget() |
| Widgets contain a table called userdata, this is a safe place to store data associated with the wigdet |
| It will be cleared automatically when a widget is released |
| Placing values directly into a widget object should be avoided |
| If the Widget can act as a container for other Widgets the following |
| content - frame or derivitive that children will be anchored to |
| The Widget can supply the following Optional Members |
| ]] |
| -------------------------- |
| -- Simple Group -- |
| -------------------------- |
| --[[ |
| This is a simple grouping container, no selection, no borders |
| It will resize automatically to the height of the controls added to it |
| ]] |
| do |
| local Type = "SimpleGroup" |
| local Version = 5 |
| local function OnAcquire(self) |
| self:SetWidth(300) |
| self:SetHeight(100) |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| end |
| local function LayoutFinished(self, width, height) |
| if self.noAutoHeight then return end |
| self:SetHeight(height or 0) |
| end |
| local function OnWidthSet(self, width) |
| local content = self.content |
| content:SetWidth(width) |
| content.width = width |
| end |
| local function OnHeightSet(self, height) |
| local content = self.content |
| content:SetHeight(height) |
| content.height = height |
| end |
| local function Constructor() |
| local frame = CreateFrame("Frame",nil,UIParent) |
| local self = {} |
| self.type = Type |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.frame = frame |
| self.LayoutFinished = LayoutFinished |
| self.OnWidthSet = OnWidthSet |
| self.OnHeightSet = OnHeightSet |
| frame.obj = self |
| frame:SetHeight(100) |
| frame:SetWidth(100) |
| frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| --Container Support |
| local content = CreateFrame("Frame",nil,frame) |
| self.content = content |
| content.obj = self |
| content:SetPoint("TOPLEFT",frame,"TOPLEFT",0,0) |
| content:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",0,0) |
| AceGUI:RegisterAsContainer(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| end |
Libs/AceGUI-3.0/widgets/AceGUIWidget-Window.lua
New file
0,0 → 1,309
| local AceGUI = LibStub("AceGUI-3.0") |
| ---------------- |
| -- Main Frame -- |
| ---------------- |
| --[[ |
| Events : |
| OnClose |
| ]] |
| do |
| local Type = "Window" |
| local Version = 1 |
| local function frameOnClose(this) |
| this.obj:Fire("OnClose") |
| end |
| local function closeOnClick(this) |
| this.obj:Hide() |
| end |
| local function frameOnMouseDown(this) |
| AceGUI:ClearFocus() |
| end |
| local function titleOnMouseDown(this) |
| this:GetParent():StartMoving() |
| AceGUI:ClearFocus() |
| end |
| local function frameOnMouseUp(this) |
| local frame = this:GetParent() |
| frame:StopMovingOrSizing() |
| local self = frame.obj |
| local status = self.status or self.localstatus |
| status.width = frame:GetWidth() |
| status.height = frame:GetHeight() |
| status.top = frame:GetTop() |
| status.left = frame:GetLeft() |
| end |
| local function sizerseOnMouseDown(this) |
| this:GetParent():StartSizing("BOTTOMRIGHT") |
| AceGUI:ClearFocus() |
| end |
| local function sizersOnMouseDown(this) |
| this:GetParent():StartSizing("BOTTOM") |
| AceGUI:ClearFocus() |
| end |
| local function sizereOnMouseDown(this) |
| this:GetParent():StartSizing("RIGHT") |
| AceGUI:ClearFocus() |
| end |
| local function sizerOnMouseUp(this) |
| this:GetParent():StopMovingOrSizing() |
| end |
| local function SetTitle(self,title) |
| self.titletext:SetText(title) |
| end |
| local function SetStatusText(self,text) |
| -- self.statustext:SetText(text) |
| end |
| local function Hide(self) |
| self.frame:Hide() |
| end |
| local function Show(self) |
| self.frame:Show() |
| end |
| local function OnAcquire(self) |
| self.frame:SetParent(UIParent) |
| self.frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| self:ApplyStatus() |
| end |
| local function OnRelease(self) |
| self.status = nil |
| for k in pairs(self.localstatus) do |
| self.localstatus[k] = nil |
| end |
| end |
| -- called to set an external table to store status in |
| local function SetStatusTable(self, status) |
| assert(type(status) == "table") |
| self.status = status |
| self:ApplyStatus() |
| end |
| local function ApplyStatus(self) |
| local status = self.status or self.localstatus |
| local frame = self.frame |
| self:SetWidth(status.width or 700) |
| self:SetHeight(status.height or 500) |
| if status.top and status.left then |
| frame:SetPoint("TOP",UIParent,"BOTTOM",0,status.top) |
| frame:SetPoint("LEFT",UIParent,"LEFT",status.left,0) |
| else |
| frame:SetPoint("CENTER",UIParent,"CENTER") |
| end |
| end |
| local function OnWidthSet(self, width) |
| local content = self.content |
| local contentwidth = width - 34 |
| if contentwidth < 0 then |
| contentwidth = 0 |
| end |
| content:SetWidth(contentwidth) |
| content.width = contentwidth |
| end |
| local function OnHeightSet(self, height) |
| local content = self.content |
| local contentheight = height - 57 |
| if contentheight < 0 then |
| contentheight = 0 |
| end |
| content:SetHeight(contentheight) |
| content.height = contentheight |
| end |
| local function Constructor() |
| local frame = CreateFrame("Frame",nil,UIParent) |
| local self = {} |
| self.type = "Window" |
| self.Hide = Hide |
| self.Show = Show |
| self.SetTitle = SetTitle |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.SetStatusText = SetStatusText |
| self.SetStatusTable = SetStatusTable |
| self.ApplyStatus = ApplyStatus |
| self.OnWidthSet = OnWidthSet |
| self.OnHeightSet = OnHeightSet |
| self.localstatus = {} |
| self.frame = frame |
| frame.obj = self |
| frame:SetWidth(700) |
| frame:SetHeight(500) |
| frame:SetPoint("CENTER",UIParent,"CENTER",0,0) |
| frame:EnableMouse() |
| frame:SetMovable(true) |
| frame:SetResizable(true) |
| frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| frame:SetScript("OnMouseDown", frameOnMouseDown) |
| frame:SetScript("OnHide",frameOnClose) |
| frame:SetMinResize(240,240) |
| frame:SetToplevel(true) |
| local titlebg = frame:CreateTexture(nil, "BACKGROUND") |
| titlebg:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Title-Background]]) |
| titlebg:SetPoint("TOPLEFT", 9, -6) |
| titlebg:SetPoint("BOTTOMRIGHT", frame, "TOPRIGHT", -28, -24) |
| local dialogbg = frame:CreateTexture(nil, "BACKGROUND") |
| dialogbg:SetTexture([[Interface\Tooltips\UI-Tooltip-Background]]) |
| dialogbg:SetPoint("TOPLEFT", 8, -24) |
| dialogbg:SetPoint("BOTTOMRIGHT", -6, 8) |
| dialogbg:SetVertexColor(0, 0, 0, .75) |
| local topleft = frame:CreateTexture(nil, "BORDER") |
| topleft:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Border]]) |
| topleft:SetWidth(64) |
| topleft:SetHeight(64) |
| topleft:SetPoint("TOPLEFT") |
| topleft:SetTexCoord(0.501953125, 0.625, 0, 1) |
| local topright = frame:CreateTexture(nil, "BORDER") |
| topright:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Border]]) |
| topright:SetWidth(64) |
| topright:SetHeight(64) |
| topright:SetPoint("TOPRIGHT") |
| topright:SetTexCoord(0.625, 0.75, 0, 1) |
| local top = frame:CreateTexture(nil, "BORDER") |
| top:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Border]]) |
| top:SetHeight(64) |
| top:SetPoint("TOPLEFT", topleft, "TOPRIGHT") |
| top:SetPoint("TOPRIGHT", topright, "TOPLEFT") |
| top:SetTexCoord(0.25, 0.369140625, 0, 1) |
| local bottomleft = frame:CreateTexture(nil, "BORDER") |
| bottomleft:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Border]]) |
| bottomleft:SetWidth(64) |
| bottomleft:SetHeight(64) |
| bottomleft:SetPoint("BOTTOMLEFT") |
| bottomleft:SetTexCoord(0.751953125, 0.875, 0, 1) |
| local bottomright = frame:CreateTexture(nil, "BORDER") |
| bottomright:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Border]]) |
| bottomright:SetWidth(64) |
| bottomright:SetHeight(64) |
| bottomright:SetPoint("BOTTOMRIGHT") |
| bottomright:SetTexCoord(0.875, 1, 0, 1) |
| local bottom = frame:CreateTexture(nil, "BORDER") |
| bottom:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Border]]) |
| bottom:SetHeight(64) |
| bottom:SetPoint("BOTTOMLEFT", bottomleft, "BOTTOMRIGHT") |
| bottom:SetPoint("BOTTOMRIGHT", bottomright, "BOTTOMLEFT") |
| bottom:SetTexCoord(0.376953125, 0.498046875, 0, 1) |
| local left = frame:CreateTexture(nil, "BORDER") |
| left:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Border]]) |
| left:SetWidth(64) |
| left:SetPoint("TOPLEFT", topleft, "BOTTOMLEFT") |
| left:SetPoint("BOTTOMLEFT", bottomleft, "TOPLEFT") |
| left:SetTexCoord(0.001953125, 0.125, 0, 1) |
| local right = frame:CreateTexture(nil, "BORDER") |
| right:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Border]]) |
| right:SetWidth(64) |
| right:SetPoint("TOPRIGHT", topright, "BOTTOMRIGHT") |
| right:SetPoint("BOTTOMRIGHT", bottomright, "TOPRIGHT") |
| right:SetTexCoord(0.1171875, 0.2421875, 0, 1) |
| local close = CreateFrame("Button", nil, frame, "UIPanelCloseButton") |
| close:SetPoint("TOPRIGHT", 2, 1) |
| close:SetScript("OnClick", closeOnClick) |
| self.closebutton = close |
| close.obj = self |
| local titletext = frame:CreateFontString(nil, "ARTWORK") |
| titletext:SetFontObject(GameFontNormal) |
| titletext:SetPoint("TOPLEFT", 12, -8) |
| titletext:SetPoint("TOPRIGHT", -32, -8) |
| self.titletext = titletext |
| local title = CreateFrame("Button", nil, frame) |
| title:SetPoint("TOPLEFT", titlebg) |
| title:SetPoint("BOTTOMRIGHT", titlebg) |
| title:EnableMouse() |
| title:SetScript("OnMouseDown",titleOnMouseDown) |
| title:SetScript("OnMouseUp", frameOnMouseUp) |
| self.title = title |
| local sizer_se = CreateFrame("Frame",nil,frame) |
| sizer_se:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",0,0) |
| sizer_se:SetWidth(25) |
| sizer_se:SetHeight(25) |
| sizer_se:EnableMouse() |
| sizer_se:SetScript("OnMouseDown",sizerseOnMouseDown) |
| sizer_se:SetScript("OnMouseUp", sizerOnMouseUp) |
| self.sizer_se = sizer_se |
| local line1 = sizer_se:CreateTexture(nil, "BACKGROUND") |
| self.line1 = line1 |
| line1:SetWidth(14) |
| line1:SetHeight(14) |
| line1:SetPoint("BOTTOMRIGHT", -8, 8) |
| line1:SetTexture("Interface\\Tooltips\\UI-Tooltip-Border") |
| local x = 0.1 * 14/17 |
| line1:SetTexCoord(0.05 - x, 0.5, 0.05, 0.5 + x, 0.05, 0.5 - x, 0.5 + x, 0.5) |
| local line2 = sizer_se:CreateTexture(nil, "BACKGROUND") |
| self.line2 = line2 |
| line2:SetWidth(8) |
| line2:SetHeight(8) |
| line2:SetPoint("BOTTOMRIGHT", -8, 8) |
| line2:SetTexture("Interface\\Tooltips\\UI-Tooltip-Border") |
| local x = 0.1 * 8/17 |
| line2:SetTexCoord(0.05 - x, 0.5, 0.05, 0.5 + x, 0.05, 0.5 - x, 0.5 + x, 0.5) |
| local sizer_s = CreateFrame("Frame",nil,frame) |
| sizer_s:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",-25,0) |
| sizer_s:SetPoint("BOTTOMLEFT",frame,"BOTTOMLEFT",0,0) |
| sizer_s:SetHeight(25) |
| sizer_s:EnableMouse() |
| sizer_s:SetScript("OnMouseDown",sizersOnMouseDown) |
| sizer_s:SetScript("OnMouseUp", sizerOnMouseUp) |
| self.sizer_s = sizer_s |
| local sizer_e = CreateFrame("Frame",nil,frame) |
| sizer_e:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",0,25) |
| sizer_e:SetPoint("TOPRIGHT",frame,"TOPRIGHT",0,0) |
| sizer_e:SetWidth(25) |
| sizer_e:EnableMouse() |
| sizer_e:SetScript("OnMouseDown",sizereOnMouseDown) |
| sizer_e:SetScript("OnMouseUp", sizerOnMouseUp) |
| self.sizer_e = sizer_e |
| --Container Support |
| local content = CreateFrame("Frame",nil,frame) |
| self.content = content |
| content.obj = self |
| content:SetPoint("TOPLEFT",frame,"TOPLEFT",12,-32) |
| content:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",-12,13) |
| AceGUI:RegisterAsContainer(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| end |
Libs/AceGUI-3.0/widgets/AceGUIWidget-DropDownGroup.lua
New file
0,0 → 1,168
| local AceGUI = LibStub("AceGUI-3.0") |
| --[[ |
| Selection Group controls all have an interface to select a group for thier contents |
| None of them will auto size to thier contents, and should usually be used with a scrollframe |
| unless you know that the controls will fit inside |
| ]] |
| -------------------------- |
| -- Dropdown Group -- |
| -------------------------- |
| --[[ |
| Events : |
| OnGroupSelected |
| ]] |
| do |
| local Type = "DropdownGroup" |
| local Version = 12 |
| local function OnAcquire(self) |
| self.dropdown:SetText("") |
| self:SetDropdownWidth(200) |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| self.dropdown.list = nil |
| self.status = nil |
| for k in pairs(self.localstatus) do |
| self.localstatus[k] = nil |
| end |
| end |
| local PaneBackdrop = { |
| bgFile = "Interface\\ChatFrame\\ChatFrameBackground", |
| edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border", |
| tile = true, tileSize = 16, edgeSize = 16, |
| insets = { left = 3, right = 3, top = 5, bottom = 3 } |
| } |
| local function SetTitle(self,title) |
| self.titletext:SetText(title) |
| end |
| local function SelectedGroup(self,event,value) |
| local group = self.parentgroup |
| local status = group.status or group.localstatus |
| status.selected = value |
| self.parentgroup:Fire("OnGroupSelected", value) |
| end |
| local function SetGroupList(self,list) |
| self.dropdown:SetList(list) |
| end |
| -- called to set an external table to store status in |
| local function SetStatusTable(self, status) |
| assert(type(status) == "table") |
| self.status = status |
| end |
| local function SetGroup(self,group) |
| self.dropdown:SetValue(group) |
| local status = self.status or self.localstatus |
| status.selected = group |
| self:Fire("OnGroupSelected", group) |
| end |
| local function OnWidthSet(self, width) |
| local content = self.content |
| local contentwidth = width - 26 |
| if contentwidth < 0 then |
| contentwidth = 0 |
| end |
| content:SetWidth(contentwidth) |
| content.width = contentwidth |
| end |
| local function OnHeightSet(self, height) |
| local content = self.content |
| local contentheight = height - 63 |
| if contentheight < 0 then |
| contentheight = 0 |
| end |
| content:SetHeight(contentheight) |
| content.height = contentheight |
| end |
| local function LayoutFinished(self, width, height) |
| self:SetHeight((height or 0) + 63) |
| end |
| local function SetDropdownWidth(self, width) |
| self.dropdown:SetWidth(width) |
| end |
| local function Constructor() |
| local frame = CreateFrame("Frame") |
| local self = {} |
| self.type = Type |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.SetTitle = SetTitle |
| self.SetGroupList = SetGroupList |
| self.SetGroup = SetGroup |
| self.SetStatusTable = SetStatusTable |
| self.SetDropdownWidth = SetDropdownWidth |
| self.OnWidthSet = OnWidthSet |
| self.OnHeightSet = OnHeightSet |
| self.LayoutFinished = LayoutFinished |
| self.localstatus = {} |
| self.frame = frame |
| frame.obj = self |
| frame:SetHeight(100) |
| frame:SetWidth(100) |
| frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| local titletext = frame:CreateFontString(nil,"OVERLAY","GameFontNormal") |
| titletext:SetPoint("TOPLEFT",frame,"TOPLEFT",4,0) |
| titletext:SetPoint("TOPRIGHT",frame,"TOPRIGHT",-4,0) |
| titletext:SetJustifyH("LEFT") |
| titletext:SetHeight(18) |
| self.titletext = titletext |
| local dropdown = AceGUI:Create("Dropdown") |
| self.dropdown = dropdown |
| dropdown.frame:SetParent(frame) |
| dropdown.parentgroup = self |
| dropdown:SetCallback("OnValueChanged",SelectedGroup) |
| dropdown.frame:SetPoint("TOPLEFT",titletext,"BOTTOMLEFT",-6,3) |
| dropdown.frame:Show() |
| dropdown:SetLabel("") |
| local border = CreateFrame("Frame",nil,frame) |
| self.border = border |
| border:SetPoint("TOPLEFT",frame,"TOPLEFT",0,-40) |
| border:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",0,3) |
| border:SetBackdrop(PaneBackdrop) |
| border:SetBackdropColor(0.1,0.1,0.1,0.5) |
| border:SetBackdropBorderColor(0.4,0.4,0.4) |
| --Container Support |
| local content = CreateFrame("Frame",nil,border) |
| self.content = content |
| content.obj = self |
| content:SetPoint("TOPLEFT",border,"TOPLEFT",10,-10) |
| content:SetPoint("BOTTOMRIGHT",border,"BOTTOMRIGHT",-10,10) |
| AceGUI:RegisterAsContainer(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| end |
Libs/AceGUI-3.0/widgets/AceGUIWidget-ScrollFrame.lua
New file
0,0 → 1,241
| local AceGUI = LibStub("AceGUI-3.0") |
| ------------- |
| -- Widgets -- |
| ------------- |
| --[[ |
| Widgets must provide the following functions |
| Acquire() - Called when the object is aquired, should set everything to a default hidden state |
| Release() - Called when the object is Released, should remove any anchors and hide the Widget |
| And the following members |
| frame - the frame or derivitive object that will be treated as the widget for size and anchoring purposes |
| type - the type of the object, same as the name given to :RegisterWidget() |
| Widgets contain a table called userdata, this is a safe place to store data associated with the wigdet |
| It will be cleared automatically when a widget is released |
| Placing values directly into a widget object should be avoided |
| If the Widget can act as a container for other Widgets the following |
| content - frame or derivitive that children will be anchored to |
| The Widget can supply the following Optional Members |
| ]] |
| -------------------------- |
| -- Scroll Frame -- |
| -------------------------- |
| do |
| local Type = "ScrollFrame" |
| local Version = 6 |
| local function OnAcquire(self) |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| self.status = nil |
| for k in pairs(self.localstatus) do |
| self.localstatus[k] = nil |
| end |
| self.scrollframe:SetPoint("BOTTOMRIGHT",self.frame,"BOTTOMRIGHT",0,0) |
| self.scrollbar:Hide() |
| self.scrollBarShown = nil |
| self.content.height, self.content.width = nil, nil |
| end |
| local function SetScroll(self, value) |
| local status = self.status or self.localstatus |
| local frame, child = self.scrollframe, self.content |
| local viewheight = frame:GetHeight() |
| local height = child:GetHeight() |
| local offset |
| if viewheight > height then |
| offset = 0 |
| else |
| offset = floor((height - viewheight) / 1000.0 * value) |
| end |
| child:ClearAllPoints() |
| child:SetPoint("TOPLEFT",frame,"TOPLEFT",0,offset) |
| child:SetPoint("TOPRIGHT",frame,"TOPRIGHT",0,offset) |
| status.offset = offset |
| status.scrollvalue = value |
| end |
| local function MoveScroll(self, value) |
| local status = self.status or self.localstatus |
| local frame, child = self.scrollframe, self.content |
| local height, viewheight = frame:GetHeight(), child:GetHeight() |
| if height > viewheight then |
| self.scrollbar:Hide() |
| else |
| self.scrollbar:Show() |
| local diff = height - viewheight |
| local delta = 1 |
| if value < 0 then |
| delta = -1 |
| end |
| self.scrollbar:SetValue(math.min(math.max(status.scrollvalue + delta*(1000/(diff/45)),0), 1000)) |
| end |
| end |
| local function FixScroll(self) |
| if self.updateLock then return end |
| self.updateLock = true |
| local status = self.status or self.localstatus |
| local frame, child = self.scrollframe, self.content |
| local height, viewheight = frame:GetHeight(), child:GetHeight() |
| local offset = status.offset |
| if not offset then |
| offset = 0 |
| end |
| local curvalue = self.scrollbar:GetValue() |
| if viewheight < height then |
| if self.scrollBarShown then |
| self.scrollBarShown = nil |
| self.scrollbar:Hide() |
| self.scrollbar:SetValue(0) |
| self.scrollframe:SetPoint("BOTTOMRIGHT",self.frame,"BOTTOMRIGHT",0,0) |
| self:DoLayout() |
| end |
| else |
| if not self.scrollBarShown then |
| self.scrollBarShown = true |
| self.scrollbar:Show() |
| self.scrollframe:SetPoint("BOTTOMRIGHT",self.frame,"BOTTOMRIGHT",-20,0) |
| self:DoLayout() |
| end |
| local value = (offset / (viewheight - height) * 1000) |
| if value > 1000 then value = 1000 end |
| self.scrollbar:SetValue(value) |
| self:SetScroll(value) |
| if value < 1000 then |
| child:ClearAllPoints() |
| child:SetPoint("TOPLEFT",frame,"TOPLEFT",0,offset) |
| child:SetPoint("TOPRIGHT",frame,"TOPRIGHT",0,offset) |
| status.offset = offset |
| end |
| end |
| self.updateLock = nil |
| end |
| local function OnMouseWheel(this,value) |
| this.obj:MoveScroll(value) |
| end |
| local function OnScrollValueChanged(this, value) |
| this.obj:SetScroll(value) |
| end |
| local function FixScrollOnUpdate(this) |
| this:SetScript("OnUpdate", nil) |
| this.obj:FixScroll() |
| end |
| local function OnSizeChanged(this) |
| this:SetScript("OnUpdate", FixScrollOnUpdate) |
| --this.obj:FixScroll() |
| end |
| local function LayoutFinished(self,width,height) |
| self.content:SetHeight(height or 0 + 20) |
| self:FixScroll() |
| end |
| -- called to set an external table to store status in |
| local function SetStatusTable(self, status) |
| assert(type(status) == "table") |
| self.status = status |
| if not status.scrollvalue then |
| status.scrollvalue = 0 |
| end |
| end |
| local createdcount = 0 |
| local function OnWidthSet(self, width) |
| local content = self.content |
| content.width = width |
| end |
| local function OnHeightSet(self, height) |
| local content = self.content |
| content.height = height |
| end |
| local function Constructor() |
| local frame = CreateFrame("Frame",nil,UIParent) |
| local self = {} |
| self.type = Type |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.MoveScroll = MoveScroll |
| self.FixScroll = FixScroll |
| self.SetScroll = SetScroll |
| self.LayoutFinished = LayoutFinished |
| self.SetStatusTable = SetStatusTable |
| self.OnWidthSet = OnWidthSet |
| self.OnHeightSet = OnHeightSet |
| self.localstatus = {} |
| self.frame = frame |
| frame.obj = self |
| --Container Support |
| local scrollframe = CreateFrame("ScrollFrame",nil,frame) |
| local content = CreateFrame("Frame",nil,scrollframe) |
| createdcount = createdcount + 1 |
| local scrollbar = CreateFrame("Slider",("AceConfigDialogScrollFrame%dScrollBar"):format(createdcount),scrollframe,"UIPanelScrollBarTemplate") |
| local scrollbg = scrollbar:CreateTexture(nil,"BACKGROUND") |
| scrollbg:SetAllPoints(scrollbar) |
| scrollbg:SetTexture(0,0,0,0.4) |
| self.scrollframe = scrollframe |
| self.content = content |
| self.scrollbar = scrollbar |
| scrollbar.obj = self |
| scrollframe.obj = self |
| content.obj = self |
| scrollframe:SetScrollChild(content) |
| scrollframe:SetPoint("TOPLEFT",frame,"TOPLEFT",0,0) |
| scrollframe:SetPoint("BOTTOMRIGHT",self.frame,"BOTTOMRIGHT",0,0) |
| scrollframe:EnableMouseWheel(true) |
| scrollframe:SetScript("OnMouseWheel", OnMouseWheel) |
| scrollframe:SetScript("OnSizeChanged", OnSizeChanged) |
| content:SetPoint("TOPLEFT",scrollframe,"TOPLEFT",0,0) |
| content:SetPoint("TOPRIGHT",scrollframe,"TOPRIGHT",0,0) |
| content:SetHeight(400) |
| scrollbar:SetPoint("TOPLEFT",scrollframe,"TOPRIGHT",4,-16) |
| scrollbar:SetPoint("BOTTOMLEFT",scrollframe,"BOTTOMRIGHT",4,16) |
| scrollbar:SetScript("OnValueChanged", OnScrollValueChanged) |
| scrollbar:SetMinMaxValues(0,1000) |
| scrollbar:SetValueStep(1) |
| scrollbar:SetValue(0) |
| scrollbar:SetWidth(16) |
| scrollbar:Hide() |
| self.localstatus.scrollvalue = 0 |
| --self:FixScroll() |
| AceGUI:RegisterAsContainer(self) |
| --AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| end |
Libs/AceGUI-3.0/widgets/AceGUIWidget-DropDown-Items.lua
New file
0,0 → 1,453
| --[[ $Id: AceGUIWidget-DropDown-Items.lua 808 2009-05-07 14:45:15Z ammo $ ]]-- |
| local AceGUI = LibStub("AceGUI-3.0") |
| local function fixlevels(parent,...) |
| local i = 1 |
| local child = select(i, ...) |
| while child do |
| child:SetFrameLevel(parent:GetFrameLevel()+1) |
| fixlevels(child, child:GetChildren()) |
| i = i + 1 |
| child = select(i, ...) |
| end |
| end |
| local function fixstrata(strata, parent, ...) |
| local i = 1 |
| local child = select(i, ...) |
| parent:SetFrameStrata(strata) |
| while child do |
| fixstrata(strata, child, child:GetChildren()) |
| i = i + 1 |
| child = select(i, ...) |
| end |
| end |
| -- ItemBase is the base "class" for all dropdown items. |
| -- Each item has to use ItemBase.Create(widgetType) to |
| -- create an initial 'self' value. |
| -- ItemBase will add common functions and ui event handlers. |
| -- Be sure to keep basic usage when you override functions. |
| local ItemBase = { |
| -- NOTE: The ItemBase version is added to each item's version number |
| -- to ensure proper updates on ItemBase changes. |
| -- Use at least 1000er steps. |
| version = 1000, |
| counter = 0, |
| } |
| function ItemBase.Frame_OnEnter(this) |
| local self = this.obj |
| if self.useHighlight then |
| self.highlight:Show() |
| end |
| self:Fire("OnEnter") |
| if self.specialOnEnter then |
| self.specialOnEnter(self) |
| end |
| end |
| function ItemBase.Frame_OnLeave(this) |
| local self = this.obj |
| self.highlight:Hide() |
| self:Fire("OnLeave") |
| if self.specialOnLeave then |
| self.specialOnLeave(self) |
| end |
| end |
| -- exported, AceGUI callback |
| function ItemBase.OnAcquire(self) |
| self.frame:SetToplevel(true) |
| self.frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| end |
| -- exported, AceGUI callback |
| function ItemBase.OnRelease(self) |
| self:SetDisabled(false) |
| self.pullout = nil |
| self.frame:SetParent(nil) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| end |
| -- exported |
| -- NOTE: this is called by a Dropdown-Pullout. |
| -- Do not call this method directly |
| function ItemBase.SetPullout(self, pullout) |
| self.pullout = pullout |
| self.frame:SetParent(nil) |
| self.frame:SetParent(pullout.itemFrame) |
| self.parent = pullout.itemFrame |
| fixlevels(pullout.itemFrame, pullout.itemFrame:GetChildren()) |
| end |
| -- exported |
| function ItemBase.SetText(self, text) |
| self.text:SetText(text or "") |
| end |
| -- exported |
| function ItemBase.GetText(self) |
| return self.text:GetText() |
| end |
| -- exported |
| function ItemBase.SetPoint(self, ...) |
| self.frame:SetPoint(...) |
| end |
| -- exported |
| function ItemBase.Show(self) |
| self.frame:Show() |
| end |
| -- exported |
| function ItemBase.Hide(self) |
| self.frame:Hide() |
| end |
| -- exported |
| function ItemBase.SetDisabled(self, disabled) |
| self.disabled = disabled |
| if disabled then |
| self.useHighlight = false |
| self.text:SetTextColor(.5, .5, .5) |
| else |
| self.useHighlight = true |
| self.text:SetTextColor(1, 1, 1) |
| end |
| end |
| -- exported |
| -- NOTE: this is called by a Dropdown-Pullout. |
| -- Do not call this method directly |
| function ItemBase.SetOnLeave(self, func) |
| self.specialOnLeave = func |
| end |
| -- exported |
| -- NOTE: this is called by a Dropdown-Pullout. |
| -- Do not call this method directly |
| function ItemBase.SetOnEnter(self, func) |
| self.specialOnEnter = func |
| end |
| function ItemBase.Create(type) |
| -- NOTE: Most of the following code is copied from AceGUI-3.0/Dropdown widget |
| local count = AceGUI:GetNextWidgetNum(type) |
| local frame = CreateFrame("Button", "AceGUI30DropDownItem"..count) |
| local self = {} |
| self.frame = frame |
| frame.obj = self |
| self.type = type |
| self.useHighlight = true |
| frame:SetHeight(17) |
| frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| local text = frame:CreateFontString(nil,"OVERLAY","GameFontNormalSmall") |
| text:SetTextColor(1,1,1) |
| text:SetJustifyH("LEFT") |
| text:SetPoint("TOPLEFT",frame,"TOPLEFT",18,0) |
| text:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",-8,0) |
| self.text = text |
| local highlight = frame:CreateTexture(nil, "OVERLAY") |
| highlight:SetTexture("Interface\\QuestFrame\\UI-QuestTitleHighlight") |
| highlight:SetBlendMode("ADD") |
| highlight:SetHeight(14) |
| highlight:ClearAllPoints() |
| highlight:SetPoint("RIGHT",frame,"RIGHT",-3,0) |
| highlight:SetPoint("LEFT",frame,"LEFT",5,0) |
| highlight:Hide() |
| self.highlight = highlight |
| local check = frame:CreateTexture("OVERLAY") |
| check:SetWidth(16) |
| check:SetHeight(16) |
| check:SetPoint("LEFT",frame,"LEFT",3,-1) |
| check:SetTexture("Interface\\Buttons\\UI-CheckBox-Check") |
| check:Hide() |
| self.check = check |
| local sub = frame:CreateTexture("OVERLAY") |
| sub:SetWidth(16) |
| sub:SetHeight(16) |
| sub:SetPoint("RIGHT",frame,"RIGHT",-3,-1) |
| sub:SetTexture("Interface\\ChatFrame\\ChatFrameExpandArrow") |
| sub:Hide() |
| self.sub = sub |
| frame:SetScript("OnEnter", ItemBase.Frame_OnEnter) |
| frame:SetScript("OnLeave", ItemBase.Frame_OnLeave) |
| self.OnAcquire = ItemBase.OnAcquire |
| self.OnRelease = ItemBase.OnRelease |
| self.SetPullout = ItemBase.SetPullout |
| self.GetText = ItemBase.GetText |
| self.SetText = ItemBase.SetText |
| self.SetDisabled = ItemBase.SetDisabled |
| self.SetPoint = ItemBase.SetPoint |
| self.Show = ItemBase.Show |
| self.Hide = ItemBase.Hide |
| self.SetOnLeave = ItemBase.SetOnLeave |
| self.SetOnEnter = ItemBase.SetOnEnter |
| return self |
| end |
| --[[ |
| Template for items: |
| -- Item: |
| -- |
| do |
| local widgetType = "Dropdown-Item-" |
| local widgetVersion = 1 |
| local function Constructor() |
| local self = ItemBase.Create(widgetType) |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(widgetType, Constructor, widgetVersion + ItemBase.version) |
| end |
| --]] |
| -- Item: Header |
| -- A single text entry. |
| -- Special: Different text color and no highlight |
| do |
| local widgetType = "Dropdown-Item-Header" |
| local widgetVersion = 1 |
| local function OnEnter(this) |
| local self = this.obj |
| self:Fire("OnEnter") |
| if self.specialOnEnter then |
| self.specialOnEnter(self) |
| end |
| end |
| local function OnLeave(this) |
| local self = this.obj |
| self:Fire("OnLeave") |
| if self.specialOnLeave then |
| self.specialOnLeave(self) |
| end |
| end |
| -- exported, override |
| local function SetDisabled(self, disabled) |
| ItemBase.SetDisabled(self, disabled) |
| if not disabled then |
| self.text:SetTextColor(1, 1, 0) |
| end |
| end |
| local function Constructor() |
| local self = ItemBase.Create(widgetType) |
| self.SetDisabled = SetDisabled |
| self.frame:SetScript("OnEnter", OnEnter) |
| self.frame:SetScript("OnLeave", OnLeave) |
| self.text:SetTextColor(1, 1, 0) |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(widgetType, Constructor, widgetVersion + ItemBase.version) |
| end |
| -- Item: Execute |
| -- A simple button |
| do |
| local widgetType = "Dropdown-Item-Execute" |
| local widgetVersion = 1 |
| local function Frame_OnClick(this, button) |
| local self = this.obj |
| if self.disabled then return end |
| self:Fire("OnClick") |
| if self.pullout then |
| self.pullout:Close() |
| end |
| end |
| local function Constructor() |
| local self = ItemBase.Create(widgetType) |
| self.frame:SetScript("OnClick", Frame_OnClick) |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(widgetType, Constructor, widgetVersion + ItemBase.version) |
| end |
| -- Item: Toggle |
| -- Some sort of checkbox for dropdown menus. |
| -- Does not close the pullout on click. |
| do |
| local widgetType = "Dropdown-Item-Toggle" |
| local widgetVersion = 2 |
| local function UpdateToggle(self) |
| if self.value then |
| self.check:Show() |
| else |
| self.check:Hide() |
| end |
| end |
| local function OnRelease(self) |
| ItemBase.OnRelease(self) |
| self:SetValue(nil) |
| end |
| local function Frame_OnClick(this, button) |
| local self = this.obj |
| if self.disabled then return end |
| self.value = not self.value |
| UpdateToggle(self) |
| self:Fire("OnValueChanged", self.value) |
| end |
| -- exported |
| local function SetValue(self, value) |
| self.value = value |
| UpdateToggle(self) |
| end |
| -- exported |
| local function GetValue(self) |
| return self.value |
| end |
| local function Constructor() |
| local self = ItemBase.Create(widgetType) |
| self.frame:SetScript("OnClick", Frame_OnClick) |
| self.SetValue = SetValue |
| self.GetValue = GetValue |
| self.OnRelease = OnRelease |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(widgetType, Constructor, widgetVersion + ItemBase.version) |
| end |
| -- Item: Menu |
| -- Shows a submenu on mouse over |
| -- Does not close the pullout on click |
| do |
| local widgetType = "Dropdown-Item-Menu" |
| local widgetVersion = 2 |
| local function OnEnter(this) |
| local self = this.obj |
| self:Fire("OnEnter") |
| if self.specialOnEnter then |
| self.specialOnEnter(self) |
| end |
| self.highlight:Show() |
| if not self.disabled and self.submenu then |
| self.submenu:Open("TOPLEFT", self.frame, "TOPRIGHT", self.pullout:GetRightBorderWidth(), 0, self.frame:GetFrameLevel() + 100) |
| end |
| end |
| local function OnHide(this) |
| local self = this.obj |
| if self.submenu then |
| self.submenu:Close() |
| end |
| end |
| -- exported |
| local function SetMenu(self, menu) |
| assert(menu.type == "Dropdown-Pullout") |
| self.submenu = menu |
| end |
| -- exported |
| local function CloseMenu(self) |
| self.submenu:Close() |
| end |
| local function Constructor() |
| local self = ItemBase.Create(widgetType) |
| self.sub:Show() |
| self.frame:SetScript("OnEnter", OnEnter) |
| self.frame:SetScript("OnHide", OnHide) |
| self.SetMenu = SetMenu |
| self.CloseMenu = CloseMenu |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(widgetType, Constructor, widgetVersion + ItemBase.version) |
| end |
| -- Item: Separator |
| -- A single line to separate items |
| do |
| local widgetType = "Dropdown-Item-Separator" |
| local widgetVersion = 1 |
| -- exported, override |
| local function SetDisabled(self, disabled) |
| ItemBase.SetDisabled(self, disabled) |
| self.useHighlight = false |
| end |
| local function Constructor() |
| local self = ItemBase.Create(widgetType) |
| self.SetDisabled = SetDisabled |
| local line = self.frame:CreateTexture(nil, "OVERLAY") |
| line:SetHeight(1) |
| line:SetTexture(.5, .5, .5) |
| line:SetPoint("LEFT", self.frame, "LEFT", 10, 0) |
| line:SetPoint("RIGHT", self.frame, "RIGHT", -10, 0) |
| self.text:Hide() |
| self.useHighlight = false |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(widgetType, Constructor, widgetVersion + ItemBase.version) |
| end |
Libs/AceGUI-3.0/widgets/AceGUIWidget-Button.lua
New file
0,0 → 1,100
| local AceGUI = LibStub("AceGUI-3.0") |
| -------------------------- |
| -- Button -- |
| -------------------------- |
| do |
| local Type = "Button" |
| local Version = 12 |
| local function OnAcquire(self) |
| -- restore default values |
| self:SetHeight(24) |
| self:SetWidth(200) |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| self:SetDisabled(false) |
| end |
| local function Button_OnClick(this, ...) |
| this.obj:Fire("OnClick", ...) |
| AceGUI:ClearFocus() |
| end |
| local function Button_OnEnter(this) |
| this.obj:Fire("OnEnter") |
| end |
| local function Button_OnLeave(this) |
| this.obj:Fire("OnLeave") |
| end |
| local function SetText(self, text) |
| self.text:SetText(text or "") |
| end |
| local function SetDisabled(self, disabled) |
| self.disabled = disabled |
| if disabled then |
| self.frame:Disable() |
| else |
| self.frame:Enable() |
| end |
| end |
| local function Constructor() |
| local num = AceGUI:GetNextWidgetNum(Type) |
| local name = "AceGUI30Button"..num |
| local frame = CreateFrame("Button",name,UIParent,"UIPanelButtonTemplate2") |
| local self = {} |
| self.num = num |
| self.type = Type |
| self.frame = frame |
| local left = _G[name .. "Left"] |
| local right = _G[name .. "Right"] |
| local middle = _G[name .. "Middle"] |
| left:SetPoint("TOP", frame, "TOP", 0, 0) |
| left:SetPoint("BOTTOM", frame, "BOTTOM", 0, 0) |
| right:SetPoint("TOP", frame, "TOP", 0, 0) |
| right:SetPoint("BOTTOM", frame, "BOTTOM", 0, 0) |
| middle:SetPoint("TOP", frame, "TOP", 0, 0) |
| middle:SetPoint("BOTTOM", frame, "BOTTOM", 0, 0) |
| local text = frame:GetFontString() |
| self.text = text |
| text:ClearAllPoints() |
| text:SetPoint("TOPLEFT",frame,"TOPLEFT", 15, -1) |
| text:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT", -15, 1) |
| text:SetJustifyV("MIDDLE") |
| frame:SetScript("OnClick",Button_OnClick) |
| frame:SetScript("OnEnter",Button_OnEnter) |
| frame:SetScript("OnLeave",Button_OnLeave) |
| self.SetText = SetText |
| self.SetDisabled = SetDisabled |
| frame:EnableMouse(true) |
| frame:SetHeight(24) |
| frame:SetWidth(200) |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.frame = frame |
| frame.obj = self |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| end |
Libs/AceGUI-3.0/widgets/AceGUIWidget-TreeGroup.lua
New file
0,0 → 1,726
| local AceGUI = LibStub("AceGUI-3.0") |
| -- Recycling functions |
| local new, del |
| do |
| local pool = setmetatable({},{__mode='k'}) |
| function new() |
| local t = next(pool) |
| if t then |
| pool[t] = nil |
| return t |
| else |
| return {} |
| end |
| end |
| function del(t) |
| for k in pairs(t) do |
| t[k] = nil |
| end |
| pool[t] = true |
| end |
| end |
| -------------- |
| -- TreeView -- |
| -------------- |
| do |
| local Type = "TreeGroup" |
| local Version = 22 |
| local DEFAULT_TREE_WIDTH = 175 |
| local DEFAULT_TREE_SIZABLE = true |
| local PaneBackdrop = { |
| bgFile = "Interface\\ChatFrame\\ChatFrameBackground", |
| edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border", |
| tile = true, tileSize = 16, edgeSize = 16, |
| insets = { left = 3, right = 3, top = 5, bottom = 3 } |
| } |
| local DraggerBackdrop = { |
| bgFile = "Interface\\Tooltips\\UI-Tooltip-Background", |
| edgeFile = nil, |
| tile = true, tileSize = 16, edgeSize = 0, |
| insets = { left = 3, right = 3, top = 7, bottom = 7 } |
| } |
| local function OnAcquire(self) |
| self:SetTreeWidth(DEFAULT_TREE_WIDTH,DEFAULT_TREE_SIZABLE) |
| self:EnableButtonTooltips(true) |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| self.status = nil |
| for k, v in pairs(self.localstatus) do |
| if k == "groups" then |
| for k2 in pairs(v) do |
| v[k2] = nil |
| end |
| else |
| self.localstatus[k] = nil |
| end |
| end |
| self.localstatus.scrollvalue = 0 |
| self.localstatus.treewidth = DEFAULT_TREE_WIDTH |
| self.localstatus.treesizable = DEFAULT_TREE_SIZABLE |
| end |
| local function GetButtonParents(line) |
| local parent = line.parent |
| if parent and parent.value then |
| return parent.value, GetButtonParents(parent) |
| end |
| end |
| local function GetButtonUniqueValue(line) |
| local parent = line.parent |
| if parent and parent.value then |
| return GetButtonUniqueValue(parent).."\001"..line.value |
| else |
| return line.value |
| end |
| end |
| local function ButtonOnClick(this) |
| local self = this.obj |
| self:Fire("OnClick",this.uniquevalue, this.selected) |
| if not this.selected then |
| self:SetSelected(this.uniquevalue) |
| this.selected = true |
| this:LockHighlight() |
| self:RefreshTree() |
| end |
| AceGUI:ClearFocus() |
| end |
| local function ExpandOnClick(this) |
| local button = this.button |
| local self = button.obj |
| local status = (self.status or self.localstatus).groups |
| status[button.uniquevalue] = not status[button.uniquevalue] |
| self:RefreshTree() |
| end |
| local function ButtonOnDoubleClick(button) |
| local self = button.obj |
| local status = self.status or self.localstatus |
| local status = (self.status or self.localstatus).groups |
| status[button.uniquevalue] = not status[button.uniquevalue] |
| self:RefreshTree() |
| end |
| local function EnableButtonTooltips(self, enable) |
| self.enabletooltips = enable |
| end |
| local function Button_OnEnter(this) |
| local self = this.obj |
| self:Fire("OnButtonEnter", this.uniquevalue, this) |
| if self.enabletooltips then |
| GameTooltip:SetOwner(this, "ANCHOR_NONE") |
| GameTooltip:SetPoint("LEFT",this,"RIGHT") |
| GameTooltip:SetText(this.text:GetText() or "", 1, .82, 0, 1) |
| GameTooltip:Show() |
| end |
| end |
| local function Button_OnLeave(this) |
| local self = this.obj |
| self:Fire("OnButtonLeave", this.uniquevalue, this) |
| if self.enabletooltips then |
| GameTooltip:Hide() |
| end |
| end |
| local buttoncount = 1 |
| local function CreateButton(self) |
| local button = CreateFrame("Button",("AceGUI30TreeButton%d"):format(buttoncount),self.treeframe, "OptionsListButtonTemplate") |
| buttoncount = buttoncount + 1 |
| button.obj = self |
| local icon = button:CreateTexture(nil, "OVERLAY") |
| icon:SetWidth(14) |
| icon:SetHeight(14) |
| button.icon = icon |
| button:SetScript("OnClick",ButtonOnClick) |
| button:SetScript("OnDoubleClick", ButtonOnDoubleClick) |
| button:SetScript("OnEnter",Button_OnEnter) |
| button:SetScript("OnLeave",Button_OnLeave) |
| button.toggle.button = button |
| button.toggle:SetScript("OnClick",ExpandOnClick) |
| return button |
| end |
| local function UpdateButton(button, treeline, selected, canExpand, isExpanded) |
| local self = button.obj |
| local toggle = button.toggle |
| local frame = self.frame |
| local text = treeline.text or "" |
| local icon = treeline.icon |
| local level = treeline.level |
| local value = treeline.value |
| local uniquevalue = treeline.uniquevalue |
| local disabled = treeline.disabled |
| button.treeline = treeline |
| button.value = value |
| button.uniquevalue = uniquevalue |
| if selected then |
| button:LockHighlight() |
| button.selected = true |
| else |
| button:UnlockHighlight() |
| button.selected = false |
| end |
| local normalTexture = button:GetNormalTexture() |
| local line = button.line |
| button.level = level |
| if ( level == 1 ) then |
| button:SetNormalFontObject("GameFontNormal") |
| button:SetHighlightFontObject("GameFontHighlight") |
| button.text:SetPoint("LEFT", (icon and 16 or 0) + 8, 2) |
| else |
| button:SetNormalFontObject("GameFontHighlightSmall") |
| button:SetHighlightFontObject("GameFontHighlightSmall") |
| button.text:SetPoint("LEFT", (icon and 16 or 0) + 8 * level, 2) |
| end |
| if disabled then |
| button:EnableMouse(false) |
| button.text:SetText("|cff808080"..text..FONT_COLOR_CODE_CLOSE) |
| else |
| button.text:SetText(text) |
| button:EnableMouse(true) |
| end |
| if icon then |
| button.icon:SetTexture(icon) |
| button.icon:SetPoint("LEFT", button, "LEFT", 8 * level, (level == 1) and 0 or 1) |
| else |
| button.icon:SetTexture(nil) |
| end |
| if canExpand then |
| if not isExpanded then |
| toggle:SetNormalTexture("Interface\\Buttons\\UI-PlusButton-UP") |
| toggle:SetPushedTexture("Interface\\Buttons\\UI-PlusButton-DOWN") |
| else |
| toggle:SetNormalTexture("Interface\\Buttons\\UI-MinusButton-UP") |
| toggle:SetPushedTexture("Interface\\Buttons\\UI-MinusButton-DOWN") |
| end |
| toggle:Show() |
| else |
| toggle:Hide() |
| end |
| end |
| local function OnScrollValueChanged(this, value) |
| if this.obj.noupdate then return end |
| local self = this.obj |
| local status = self.status or self.localstatus |
| status.scrollvalue = value |
| self:RefreshTree() |
| AceGUI:ClearFocus() |
| end |
| -- called to set an external table to store status in |
| local function SetStatusTable(self, status) |
| assert(type(status) == "table") |
| self.status = status |
| if not status.groups then |
| status.groups = {} |
| end |
| if not status.scrollvalue then |
| status.scrollvalue = 0 |
| end |
| if not status.treewidth then |
| status.treewidth = DEFAULT_TREE_WIDTH |
| end |
| if not status.treesizable then |
| status.treesizable = DEFAULT_TREE_SIZABLE |
| end |
| self:SetTreeWidth(status.treewidth,status.treesizable) |
| self:RefreshTree() |
| end |
| --sets the tree to be displayed |
| --[[ |
| example tree |
| Alpha |
| Bravo |
| -Charlie |
| -Delta |
| -Echo |
| Foxtrot |
| tree = { |
| { |
| value = "A", |
| text = "Alpha" |
| }, |
| { |
| value = "B", |
| text = "Bravo", |
| children = { |
| { |
| value = "C", |
| text = "Charlie" |
| }, |
| { |
| value = "D", |
| text = "Delta" |
| children = { |
| { |
| value = "E", |
| text = "Echo" |
| } |
| } |
| } |
| } |
| }, |
| { |
| value = "F", |
| text = "Foxtrot" |
| }, |
| } |
| ]] |
| local function SetTree(self, tree, filter) |
| self.filter = filter |
| if tree then |
| assert(type(tree) == "table") |
| end |
| self.tree = tree |
| self:RefreshTree() |
| end |
| local function ShouldDisplayLevel(tree) |
| local result = false |
| for k, v in ipairs(tree) do |
| if v.children == nil and v.visible ~= false then |
| result = true |
| elseif v.children then |
| result = result or ShouldDisplayLevel(v.children) |
| end |
| if result then return result end |
| end |
| return false |
| end |
| local function addLine(self, v, tree, level, parent) |
| local line = new() |
| line.value = v.value |
| line.text = v.text |
| line.icon = v.icon |
| line.disabled = v.disabled |
| line.tree = tree |
| line.level = level |
| line.parent = parent |
| line.visible = v.visible |
| line.uniquevalue = GetButtonUniqueValue(line) |
| if v.children then |
| line.hasChildren = true |
| else |
| line.hasChildren = nil |
| end |
| self.lines[#self.lines+1] = line |
| return line |
| end |
| local function BuildLevel(self, tree, level, parent) |
| local groups = (self.status or self.localstatus).groups |
| local hasChildren = self.hasChildren |
| for i, v in ipairs(tree) do |
| if v.children then |
| if not self.filter or ShouldDisplayLevel(v.children) then |
| local line = addLine(self, v, tree, level, parent) |
| if groups[line.uniquevalue] then |
| self:BuildLevel(v.children, level+1, line) |
| end |
| end |
| elseif v.visible ~= false or not self.filter then |
| addLine(self, v, tree, level, parent) |
| end |
| end |
| end |
| --fire an update after one frame to catch the treeframes height |
| local function FirstFrameUpdate(this) |
| local self = this.obj |
| this:SetScript("OnUpdate",nil) |
| self:RefreshTree() |
| end |
| local function ResizeUpdate(this) |
| this.obj:RefreshTree() |
| end |
| local function RefreshTree(self) |
| local buttons = self.buttons |
| local lines = self.lines |
| for i, v in ipairs(buttons) do |
| v:Hide() |
| end |
| while lines[1] do |
| local t = tremove(lines) |
| for k in pairs(t) do |
| t[k] = nil |
| end |
| del(t) |
| end |
| if not self.tree then return end |
| --Build the list of visible entries from the tree and status tables |
| local status = self.status or self.localstatus |
| local groupstatus = status.groups |
| local tree = self.tree |
| local treeframe = self.treeframe |
| self:BuildLevel(tree, 1) |
| local numlines = #lines |
| local maxlines = (math.floor(((self.treeframe:GetHeight()or 0) - 20 ) / 18)) |
| local first, last |
| if numlines <= maxlines then |
| --the whole tree fits in the frame |
| status.scrollvalue = 0 |
| self:ShowScroll(false) |
| first, last = 1, numlines |
| else |
| self:ShowScroll(true) |
| --scrolling will be needed |
| self.noupdate = true |
| self.scrollbar:SetMinMaxValues(0, numlines - maxlines) |
| --check if we are scrolled down too far |
| if numlines - status.scrollvalue < maxlines then |
| status.scrollvalue = numlines - maxlines |
| self.scrollbar:SetValue(status.scrollvalue) |
| end |
| self.noupdate = nil |
| first, last = status.scrollvalue+1, status.scrollvalue + maxlines |
| end |
| local buttonnum = 1 |
| for i = first, last do |
| local line = lines[i] |
| local button = buttons[buttonnum] |
| if not button then |
| button = self:CreateButton() |
| buttons[buttonnum] = button |
| button:SetParent(treeframe) |
| button:SetFrameLevel(treeframe:GetFrameLevel()+1) |
| button:ClearAllPoints() |
| if i == 1 then |
| if self.showscroll then |
| button:SetPoint("TOPRIGHT", self.treeframe,"TOPRIGHT",-22,-10) |
| button:SetPoint("TOPLEFT", self.treeframe, "TOPLEFT", 0, -10) |
| else |
| button:SetPoint("TOPRIGHT", self.treeframe,"TOPRIGHT",0,-10) |
| button:SetPoint("TOPLEFT", self.treeframe, "TOPLEFT", 0, -10) |
| end |
| else |
| button:SetPoint("TOPRIGHT", buttons[buttonnum-1], "BOTTOMRIGHT",0,0) |
| button:SetPoint("TOPLEFT", buttons[buttonnum-1], "BOTTOMLEFT",0,0) |
| end |
| end |
| UpdateButton(button, line, status.selected == line.uniquevalue, line.hasChildren, groupstatus[line.uniquevalue] ) |
| button:Show() |
| buttonnum = buttonnum + 1 |
| end |
| end |
| local function SetSelected(self, value) |
| local status = self.status or self.localstatus |
| if status.selected ~= value then |
| status.selected = value |
| self:Fire("OnGroupSelected", value) |
| end |
| end |
| local function BuildUniqueValue(...) |
| local n = select('#', ...) |
| if n == 1 then |
| return ... |
| else |
| return (...).."\001"..BuildUniqueValue(select(2,...)) |
| end |
| end |
| local function Select(self, uniquevalue, ...) |
| self.filter = false |
| local status = self.status or self.localstatus |
| local groups = status.groups |
| for i = 1, select('#', ...) do |
| groups[BuildUniqueValue(select(i, ...))] = true |
| end |
| status.selected = uniquevalue |
| self:RefreshTree() |
| self:Fire("OnGroupSelected", uniquevalue) |
| end |
| local function SelectByPath(self, ...) |
| self:Select(BuildUniqueValue(...), ...) |
| end |
| --Selects a tree node by UniqueValue |
| local function SelectByValue(self, uniquevalue) |
| self:Select(uniquevalue,string.split("\001", uniquevalue)) |
| end |
| local function ShowScroll(self, show) |
| self.showscroll = show |
| if show then |
| self.scrollbar:Show() |
| if self.buttons[1] then |
| self.buttons[1]:SetPoint("TOPRIGHT", self.treeframe,"TOPRIGHT",-22,-10) |
| end |
| else |
| self.scrollbar:Hide() |
| if self.buttons[1] then |
| self.buttons[1]:SetPoint("TOPRIGHT", self.treeframe,"TOPRIGHT",0,-10) |
| end |
| end |
| end |
| local function OnWidthSet(self, width) |
| local content = self.content |
| local treeframe = self.treeframe |
| local status = self.status or self.localstatus |
| status.fullwidth = width |
| local contentwidth = width - status.treewidth - 20 |
| if contentwidth < 0 then |
| contentwidth = 0 |
| end |
| content:SetWidth(contentwidth) |
| content.width = contentwidth |
| local maxtreewidth = math.min(400, width - 50) |
| if maxtreewidth > 100 and status.treewidth > maxtreewidth then |
| self:SetTreeWidth(maxtreewidth, status.treesizable) |
| end |
| treeframe:SetMaxResize(maxtreewidth,1600) |
| end |
| local function OnHeightSet(self, height) |
| local content = self.content |
| local contentheight = height - 20 |
| if contentheight < 0 then |
| contentheight = 0 |
| end |
| content:SetHeight(contentheight) |
| content.height = contentheight |
| end |
| local function TreeOnMouseWheel(this, delta) |
| local self = this.obj |
| if self.showscroll then |
| local scrollbar = self.scrollbar |
| local min, max = scrollbar:GetMinMaxValues() |
| local value = scrollbar:GetValue() |
| local newvalue = math.min(max,math.max(min,value - delta)) |
| if value ~= newvalue then |
| scrollbar:SetValue(newvalue) |
| end |
| end |
| end |
| local function SetTreeWidth(self, treewidth, resizable) |
| if not resizable then |
| if type(treewidth) == 'number' then |
| resizable = false |
| elseif type(treewidth) == 'boolean' then |
| resizable = treewidth |
| treewidth = DEFAULT_TREE_WIDTH |
| else |
| resizable = false |
| treewidth = DEFAULT_TREE_WIDTH |
| end |
| end |
| self.treeframe:SetWidth(treewidth) |
| self.dragger:EnableMouse(resizable) |
| local status = self.status or self.localstatus |
| status.treewidth = treewidth |
| status.treesizable = resizable |
| -- recalculate the content width |
| if status.fullwidth then |
| self:OnWidthSet(status.fullwidth) |
| end |
| end |
| local function draggerLeave(this) |
| this:SetBackdropColor(1, 1, 1, 0) |
| end |
| local function draggerEnter(this) |
| this:SetBackdropColor(1, 1, 1, 0.8) |
| end |
| local function draggerDown(this) |
| local treeframe = this:GetParent() |
| treeframe:StartSizing("RIGHT") |
| end |
| local function draggerUp(this) |
| local treeframe = this:GetParent() |
| local self = treeframe.obj |
| local frame = treeframe:GetParent() |
| treeframe:StopMovingOrSizing() |
| --treeframe:SetScript("OnUpdate", nil) |
| treeframe:SetUserPlaced(false) |
| --Without this :GetHeight will get stuck on the current height, causing the tree contents to not resize |
| treeframe:SetHeight(0) |
| treeframe:SetPoint("TOPLEFT",frame,"TOPLEFT",0,0) |
| treeframe:SetPoint("BOTTOMLEFT",frame,"BOTTOMLEFT",0,0) |
| local status = self.status or self.localstatus |
| status.treewidth = treeframe:GetWidth() |
| treeframe.obj:Fire("OnTreeResize",treeframe:GetWidth()) |
| -- recalculate the content width |
| treeframe.obj:OnWidthSet(status.fullwidth) |
| -- update the layout of the content |
| treeframe.obj:DoLayout() |
| end |
| local function LayoutFinished(self, width, height) |
| if self.noAutoHeight then return end |
| self:SetHeight((height or 0) + 20) |
| end |
| local createdcount = 0 |
| local function Constructor() |
| local frame = CreateFrame("Frame",nil,UIParent) |
| local self = {} |
| self.type = Type |
| self.lines = {} |
| self.levels = {} |
| self.buttons = {} |
| self.hasChildren = {} |
| self.localstatus = {} |
| self.localstatus.groups = {} |
| self.filter = false |
| local treeframe = CreateFrame("Frame",nil,frame) |
| treeframe.obj = self |
| treeframe:SetPoint("TOPLEFT",frame,"TOPLEFT",0,0) |
| treeframe:SetPoint("BOTTOMLEFT",frame,"BOTTOMLEFT",0,0) |
| treeframe:SetWidth(DEFAULT_TREE_WIDTH) |
| treeframe:SetScript("OnUpdate",FirstFrameUpdate) |
| treeframe:SetScript("OnSizeChanged",ResizeUpdate) |
| treeframe:EnableMouseWheel(true) |
| treeframe:SetScript("OnMouseWheel", TreeOnMouseWheel) |
| treeframe:SetBackdrop(PaneBackdrop) |
| treeframe:SetBackdropColor(0.1,0.1,0.1,0.5) |
| treeframe:SetBackdropBorderColor(0.4,0.4,0.4) |
| treeframe:SetResizable(true) |
| treeframe:SetMinResize(100, 1) |
| treeframe:SetMaxResize(400,1600) |
| local dragger = CreateFrame("Frame", nil, treeframe) |
| dragger:SetWidth(8) |
| dragger:SetPoint("TOP", treeframe, "TOPRIGHT") |
| dragger:SetPoint("BOTTOM", treeframe, "BOTTOMRIGHT") |
| dragger:SetBackdrop(DraggerBackdrop) |
| dragger:SetBackdropColor(1, 1, 1, 0) |
| dragger:SetScript("OnMouseDown", draggerDown) |
| dragger:SetScript("OnMouseUp", draggerUp) |
| dragger:SetScript("OnEnter", draggerEnter) |
| dragger:SetScript("OnLeave", draggerLeave) |
| self.dragger = dragger |
| self.treeframe = treeframe |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.SetTree = SetTree |
| self.SetTreeWidth = SetTreeWidth |
| self.RefreshTree = RefreshTree |
| self.SetStatusTable = SetStatusTable |
| self.BuildLevel = BuildLevel |
| self.CreateButton = CreateButton |
| self.SetSelected = SetSelected |
| self.ShowScroll = ShowScroll |
| self.SetStatusTable = SetStatusTable |
| self.Select = Select |
| self.SelectByValue = SelectByValue |
| self.SelectByPath = SelectByPath |
| self.OnWidthSet = OnWidthSet |
| self.OnHeightSet = OnHeightSet |
| self.EnableButtonTooltips = EnableButtonTooltips |
| self.Filter = Filter |
| self.LayoutFinished = LayoutFinished |
| self.frame = frame |
| frame.obj = self |
| createdcount = createdcount + 1 |
| local scrollbar = CreateFrame("Slider",("AceConfigDialogTreeGroup%dScrollBar"):format(createdcount),treeframe,"UIPanelScrollBarTemplate") |
| self.scrollbar = scrollbar |
| local scrollbg = scrollbar:CreateTexture(nil,"BACKGROUND") |
| scrollbg:SetAllPoints(scrollbar) |
| scrollbg:SetTexture(0,0,0,0.4) |
| scrollbar.obj = self |
| self.noupdate = true |
| scrollbar:SetPoint("TOPRIGHT",treeframe,"TOPRIGHT",-10,-26) |
| scrollbar:SetPoint("BOTTOMRIGHT",treeframe,"BOTTOMRIGHT",-10,26) |
| scrollbar:SetScript("OnValueChanged", OnScrollValueChanged) |
| scrollbar:SetMinMaxValues(0,0) |
| self.localstatus.scrollvalue = 0 |
| scrollbar:SetValueStep(1) |
| scrollbar:SetValue(0) |
| scrollbar:SetWidth(16) |
| self.noupdate = nil |
| local border = CreateFrame("Frame",nil,frame) |
| self.border = border |
| border:SetPoint("TOPLEFT",treeframe,"TOPRIGHT", 0,0) |
| border:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",0,0) |
| border:SetBackdrop(PaneBackdrop) |
| border:SetBackdropColor(0.1,0.1,0.1,0.5) |
| border:SetBackdropBorderColor(0.4,0.4,0.4) |
| --Container Support |
| local content = CreateFrame("Frame",nil,border) |
| self.content = content |
| content.obj = self |
| content:SetPoint("TOPLEFT",border,"TOPLEFT",10,-10) |
| content:SetPoint("BOTTOMRIGHT",border,"BOTTOMRIGHT",-10,10) |
| AceGUI:RegisterAsContainer(self) |
| --AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| end |
Libs/AceGUI-3.0/widgets/AceGUIWidget-ColorPicker.lua
New file
0,0 → 1,174
| local AceGUI = LibStub("AceGUI-3.0") |
| -------------------------- |
| -- ColorPicker -- |
| -------------------------- |
| do |
| local Type = "ColorPicker" |
| local Version = 11 |
| local function OnAcquire(self) |
| self.HasAlpha = false |
| self:SetColor(0,0,0,1) |
| self:SetHeight(24) |
| self:SetWidth(200) |
| end |
| local function SetLabel(self, text) |
| self.text:SetText(text) |
| end |
| local function SetColor(self,r,g,b,a) |
| self.r = r |
| self.g = g |
| self.b = b |
| self.a = a or 1 |
| self.colorSwatch:SetVertexColor(r,g,b,a) |
| end |
| local function Control_OnEnter(this) |
| this.obj:Fire("OnEnter") |
| end |
| local function Control_OnLeave(this) |
| this.obj:Fire("OnLeave") |
| end |
| local function SetHasAlpha(self, HasAlpha) |
| self.HasAlpha = HasAlpha |
| end |
| local function ColorCallback(self,r,g,b,a,isAlpha) |
| if not self.HasAlpha then |
| a = 1 |
| end |
| self:SetColor(r,g,b,a) |
| if ColorPickerFrame:IsVisible() then |
| --colorpicker is still open |
| self:Fire("OnValueChanged",r,g,b,a) |
| else |
| --colorpicker is closed, color callback is first, ignore it, |
| --alpha callback is the final call after it closes so confirm now |
| if isAlpha then |
| self:Fire("OnValueConfirmed",r,g,b,a) |
| end |
| end |
| end |
| local function ColorSwatch_OnClick(this) |
| HideUIPanel(ColorPickerFrame) |
| local self = this.obj |
| if not self.disabled then |
| ColorPickerFrame:SetFrameStrata("FULLSCREEN_DIALOG") |
| ColorPickerFrame.func = function() |
| local r,g,b = ColorPickerFrame:GetColorRGB() |
| local a = 1 - OpacitySliderFrame:GetValue() |
| ColorCallback(self,r,g,b,a) |
| end |
| ColorPickerFrame.hasOpacity = self.HasAlpha |
| ColorPickerFrame.opacityFunc = function() |
| local r,g,b = ColorPickerFrame:GetColorRGB() |
| local a = 1 - OpacitySliderFrame:GetValue() |
| ColorCallback(self,r,g,b,a,true) |
| end |
| local r, g, b, a = self.r, self.g, self.b, self.a |
| if self.HasAlpha then |
| ColorPickerFrame.opacity = 1 - (a or 0) |
| end |
| ColorPickerFrame:SetColorRGB(r, g, b) |
| ColorPickerFrame.cancelFunc = function() |
| ColorCallback(self,r,g,b,a,true) |
| end |
| ShowUIPanel(ColorPickerFrame) |
| end |
| AceGUI:ClearFocus() |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| end |
| local function SetDisabled(self, disabled) |
| self.disabled = disabled |
| if self.disabled then |
| self.frame:Disable() |
| self.text:SetTextColor(0.5,0.5,0.5) |
| else |
| self.frame:Enable() |
| self.text:SetTextColor(1,1,1) |
| end |
| end |
| local function Constructor() |
| local frame = CreateFrame("Button",nil,UIParent) |
| local self = {} |
| self.type = Type |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.SetLabel = SetLabel |
| self.SetColor = SetColor |
| self.SetDisabled = SetDisabled |
| self.SetHasAlpha = SetHasAlpha |
| self.frame = frame |
| frame.obj = self |
| local text = frame:CreateFontString(nil,"OVERLAY","GameFontHighlight") |
| self.text = text |
| text:SetJustifyH("LEFT") |
| text:SetTextColor(1,1,1) |
| frame:SetHeight(24) |
| frame:SetWidth(200) |
| text:SetHeight(24) |
| frame:SetScript("OnClick", ColorSwatch_OnClick) |
| frame:SetScript("OnEnter",Control_OnEnter) |
| frame:SetScript("OnLeave",Control_OnLeave) |
| local colorSwatch = frame:CreateTexture(nil, "OVERLAY") |
| self.colorSwatch = colorSwatch |
| colorSwatch:SetWidth(19) |
| colorSwatch:SetHeight(19) |
| colorSwatch:SetTexture("Interface\\ChatFrame\\ChatFrameColorSwatch") |
| local texture = frame:CreateTexture(nil, "BACKGROUND") |
| colorSwatch.texture = texture |
| texture:SetWidth(16) |
| texture:SetHeight(16) |
| texture:SetTexture(1,1,1) |
| texture:Show() |
| local checkers = frame:CreateTexture(nil, "BACKGROUND") |
| colorSwatch.checkers = checkers |
| checkers:SetTexture("Tileset\\Generic\\Checkers") |
| checkers:SetDesaturated(true) |
| checkers:SetVertexColor(1,1,1,0.75) |
| checkers:SetTexCoord(.25,0,0.5,.25) |
| checkers:SetWidth(14) |
| checkers:SetHeight(14) |
| checkers:Show() |
| local highlight = frame:CreateTexture(nil, "BACKGROUND") |
| self.highlight = highlight |
| highlight:SetTexture("Interface\\QuestFrame\\UI-QuestTitleHighlight") |
| highlight:SetBlendMode("ADD") |
| highlight:SetAllPoints(frame) |
| highlight:Hide() |
| texture:SetPoint("CENTER", colorSwatch, "CENTER") |
| checkers:SetPoint("CENTER", colorSwatch, "CENTER") |
| colorSwatch:SetPoint("LEFT", frame, "LEFT", 0, 0) |
| text:SetPoint("LEFT",colorSwatch,"RIGHT",2,0) |
| text:SetPoint("RIGHT",frame,"RIGHT") |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| end |
Libs/AceGUI-3.0/widgets/AceGUIWidget-InteractiveLabel.lua
New file
0,0 → 1,209
| local AceGUI = LibStub("AceGUI-3.0") |
| -------------------------- |
| -- Label -- |
| -------------------------- |
| do |
| local Type = "InteractiveLabel" |
| local Version = 6 |
| local function OnAcquire(self) |
| self:SetHeight(18) |
| self:SetWidth(200) |
| self:SetText("") |
| self:SetImage(nil) |
| self:SetColor() |
| self:SetFontObject() |
| self:SetHighlight() |
| self:SetHighlightTexCoord() |
| end |
| local function OnRelease(self) |
| self:SetDisabled(false) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| end |
| local function UpdateImageAnchor(self) |
| local width = self.frame.width or self.frame:GetWidth() or 0 |
| local image = self.image |
| local label = self.label |
| local frame = self.frame |
| local height |
| label:ClearAllPoints() |
| image:ClearAllPoints() |
| if self.imageshown then |
| local imagewidth = image:GetWidth() |
| if (width - imagewidth) < 200 or (label:GetText() or "") == "" then |
| --image goes on top centered when less than 200 width for the text, or if there is no text |
| image:SetPoint("TOP",frame,"TOP",0,0) |
| label:SetPoint("TOP",image,"BOTTOM",0,0) |
| label:SetPoint("LEFT",frame,"LEFT",0,0) |
| label:SetWidth(width) |
| height = image:GetHeight() + label:GetHeight() |
| else |
| --image on the left |
| local imageheight = image:GetHeight() |
| local labelheight = label:GetHeight() |
| --center image with label |
| if imageheight > labelheight then |
| image:SetPoint("TOPLEFT",frame,"TOPLEFT",0,0) |
| label:SetPoint("LEFT",image,"RIGHT",0,0) |
| else |
| label:SetPoint("TOPLEFT",frame,"TOPLEFT",imagewidth,0) |
| image:SetPoint("RIGHT",label,"LEFT",0,0) |
| end |
| label:SetWidth(width - imagewidth) |
| height = math.max(imageheight, labelheight) |
| end |
| else |
| --no image shown |
| label:SetPoint("TOPLEFT",frame,"TOPLEFT",0,0) |
| label:SetWidth(width) |
| height = self.label:GetHeight() |
| end |
| self.resizing = true |
| self.frame:SetHeight(height) |
| self.frame.height = height |
| self.resizing = nil |
| end |
| local function SetText(self, text) |
| self.label:SetText(text or "") |
| UpdateImageAnchor(self) |
| end |
| local function SetColor(self, r, g, b) |
| if not (r and g and b) then |
| r, g, b = 1, 1, 1 |
| end |
| self.label:SetVertexColor(r, g, b) |
| end |
| local function OnWidthSet(self, width) |
| if self.resizing then return end |
| UpdateImageAnchor(self) |
| end |
| local function SetImage(self, path, ...) |
| local image = self.image |
| image:SetTexture(path) |
| if image:GetTexture() then |
| self.imageshown = true |
| local n = select('#', ...) |
| if n == 4 or n == 8 then |
| image:SetTexCoord(...) |
| end |
| else |
| self.imageshown = nil |
| end |
| UpdateImageAnchor(self) |
| end |
| local function SetFont(self, font, height, flags) |
| self.label:SetFont(font, height, flags) |
| end |
| local function SetFontObject(self, font) |
| self.label:SetFontObject(font or GameFontHighlightSmall) |
| end |
| local function SetImageSize(self, width, height) |
| self.image:SetWidth(width) |
| self.image:SetHeight(height) |
| UpdateImageAnchor(self) |
| end |
| local function SetHighlight(self, ...) |
| self.highlight:SetTexture(...) |
| end |
| local function SetHighlightTexCoord(self, ...) |
| if select('#', ...) >= 1 then |
| self.highlight:SetTexCoord(...) |
| else |
| self.highlight:SetTexCoord(0, 1, 0, 1) |
| end |
| end |
| local function SetDisabled(self,disabled) |
| self.disabled = disabled |
| if disabled then |
| self.frame:EnableMouse(false) |
| self.label:SetTextColor(0.5, 0.5, 0.5) |
| else |
| self.frame:EnableMouse(true) |
| self.label:SetTextColor(1, 1, 1) |
| end |
| end |
| local function OnEnter(this) |
| this.obj.highlight:Show() |
| this.obj:Fire("OnEnter") |
| end |
| local function OnLeave(this) |
| this.obj.highlight:Hide() |
| this.obj:Fire("OnLeave") |
| end |
| local function OnClick(this, ...) |
| this.obj:Fire("OnClick", ...) |
| AceGUI:ClearFocus() |
| end |
| local function Constructor() |
| local frame = CreateFrame("Frame",nil,UIParent) |
| local self = {} |
| self.type = Type |
| frame:EnableMouse(true) |
| frame:SetScript("OnEnter", OnEnter) |
| frame:SetScript("OnLeave", OnLeave) |
| frame:SetScript("OnMouseDown", OnClick) |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.SetText = SetText |
| self.SetColor = SetColor |
| self.frame = frame |
| self.OnWidthSet = OnWidthSet |
| self.SetImage = SetImage |
| self.SetImageSize = SetImageSize |
| self.SetFont = SetFont |
| self.SetFontObject = SetFontObject |
| self.SetHighlight = SetHighlight |
| self.SetHighlightTexCoord = SetHighlightTexCoord |
| self.SetDisabled = SetDisabled |
| frame.obj = self |
| frame:SetHeight(18) |
| frame:SetWidth(200) |
| local label = frame:CreateFontString(nil,"BACKGROUND","GameFontHighlightSmall") |
| label:SetPoint("TOPLEFT",frame,"TOPLEFT",0,0) |
| label:SetWidth(200) |
| label:SetJustifyH("LEFT") |
| label:SetJustifyV("TOP") |
| self.label = label |
| local highlight = frame:CreateTexture(nil, "OVERLAY") |
| highlight:SetTexture(nil) |
| highlight:SetAllPoints() |
| highlight:SetBlendMode("ADD") |
| highlight:Hide() |
| self.highlight = highlight |
| local image = frame:CreateTexture(nil,"BACKGROUND") |
| self.image = image |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| end |
Libs/AceGUI-3.0/widgets/AceGUIWidget-Label.lua
New file
0,0 → 1,145
| local AceGUI = LibStub("AceGUI-3.0") |
| -------------------------- |
| -- Label -- |
| -------------------------- |
| do |
| local Type = "Label" |
| local Version = 11 |
| local function OnAcquire(self) |
| self:SetHeight(18) |
| self:SetWidth(200) |
| self:SetText("") |
| self:SetImage(nil) |
| self:SetColor() |
| self:SetFontObject() |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| end |
| local function UpdateImageAnchor(self) |
| local width = self.frame.width or self.frame:GetWidth() or 0 |
| local image = self.image |
| local label = self.label |
| local frame = self.frame |
| local height |
| label:ClearAllPoints() |
| image:ClearAllPoints() |
| if self.imageshown then |
| local imagewidth = image:GetWidth() |
| if (width - imagewidth) < 200 or (label:GetText() or "") == "" then |
| --image goes on top centered when less than 200 width for the text, or if there is no text |
| image:SetPoint("TOP",frame,"TOP",0,0) |
| label:SetPoint("TOP",image,"BOTTOM",0,0) |
| label:SetPoint("LEFT",frame,"LEFT",0,0) |
| label:SetWidth(width) |
| height = image:GetHeight() + label:GetHeight() |
| else |
| --image on the left |
| image:SetPoint("TOPLEFT",frame,"TOPLEFT",0,0) |
| label:SetPoint("TOPLEFT",image,"TOPRIGHT",4,0) |
| label:SetWidth(width - imagewidth) |
| height = math.max(image:GetHeight(), label:GetHeight()) |
| end |
| else |
| --no image shown |
| label:SetPoint("TOPLEFT",frame,"TOPLEFT",0,0) |
| label:SetWidth(width) |
| height = self.label:GetHeight() |
| end |
| self.resizing = true |
| self.frame:SetHeight(height) |
| self.frame.height = height |
| self.resizing = nil |
| end |
| local function SetText(self, text) |
| self.label:SetText(text or "") |
| UpdateImageAnchor(self) |
| end |
| local function SetColor(self, r, g, b) |
| if not (r and g and b) then |
| r, g, b = 1, 1, 1 |
| end |
| self.label:SetVertexColor(r, g, b) |
| end |
| local function OnWidthSet(self, width) |
| if self.resizing then return end |
| UpdateImageAnchor(self) |
| end |
| local function SetImage(self, path, ...) |
| local image = self.image |
| image:SetTexture(path) |
| if image:GetTexture() then |
| self.imageshown = true |
| local n = select('#', ...) |
| if n == 4 or n == 8 then |
| image:SetTexCoord(...) |
| end |
| else |
| self.imageshown = nil |
| end |
| UpdateImageAnchor(self) |
| end |
| local function SetFont(self, font, height, flags) |
| self.label:SetFont(font, height, flags) |
| end |
| local function SetFontObject(self, font) |
| self.label:SetFontObject(font or GameFontHighlightSmall) |
| end |
| local function SetImageSize(self, width, height) |
| self.image:SetWidth(width) |
| self.image:SetHeight(height) |
| UpdateImageAnchor(self) |
| end |
| local function Constructor() |
| local frame = CreateFrame("Frame",nil,UIParent) |
| local self = {} |
| self.type = Type |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.SetText = SetText |
| self.SetColor = SetColor |
| self.frame = frame |
| self.OnWidthSet = OnWidthSet |
| self.SetImage = SetImage |
| self.SetImageSize = SetImageSize |
| self.SetFont = SetFont |
| self.SetFontObject = SetFontObject |
| frame.obj = self |
| frame:SetHeight(18) |
| frame:SetWidth(200) |
| local label = frame:CreateFontString(nil,"BACKGROUND","GameFontHighlightSmall") |
| label:SetPoint("TOPLEFT",frame,"TOPLEFT",0,0) |
| label:SetWidth(200) |
| label:SetJustifyH("LEFT") |
| label:SetJustifyV("TOP") |
| self.label = label |
| local image = frame:CreateTexture(nil,"BACKGROUND") |
| self.image = image |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| end |
Libs/AceGUI-3.0/widgets/AceGUIWidget-MultiLineEditBox.lua
New file
0,0 → 1,318
| --[[ |
| --Multiline Editbox Widget, Originally by bam |
| --]] |
| local assert, error, ipairs, next, pairs, select, tonumber, tostring, type, unpack, pcall, xpcall = |
| assert, error, ipairs, next, pairs, select, tonumber, tostring, type, unpack, pcall, xpcall |
| local getmetatable, setmetatable, rawequal, rawget, rawset, getfenv, setfenv, loadstring, debugstack = |
| getmetatable, setmetatable, rawequal, rawget, rawset, getfenv, setfenv, loadstring, debugstack |
| local math, string, table = math, string, table |
| local find, format, gmatch, gsub, tolower, match, toupper, join, split, trim = |
| string.find, string.format, string.gmatch, string.gsub, string.lower, string.match, string.upper, string.join, string.split, string.trim |
| local concat, insert, maxn, remove, sort = table.concat, table.insert, table.maxn, table.remove, table.sort |
| local max, min, abs, ceil, floor = math.max, math.min, math.abs, math.ceil, math.floor |
| local LibStub = assert(LibStub) |
| local ChatFontNormal = ChatFontNormal |
| local ClearCursor = ClearCursor |
| local CreateFrame = CreateFrame |
| local GetCursorInfo = GetCursorInfo |
| local GetSpellName = GetSpellName |
| local UIParent = UIParent |
| local UISpecialFrames = UISpecialFrames |
| -- No global variables after this! |
| local _G = getfenv() |
| local AceGUI = LibStub("AceGUI-3.0") |
| local Version = 10 |
| --------------------- |
| -- Common Elements -- |
| --------------------- |
| local FrameBackdrop = { |
| bgFile="Interface\\DialogFrame\\UI-DialogBox-Background", |
| edgeFile="Interface\\DialogFrame\\UI-DialogBox-Border", |
| tile = true, tileSize = 32, edgeSize = 32, |
| insets = { left = 8, right = 8, top = 8, bottom = 8 } |
| } |
| local PaneBackdrop = { |
| bgFile = "Interface\\ChatFrame\\ChatFrameBackground", |
| edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border", |
| tile = true, tileSize = 16, edgeSize = 16, |
| insets = { left = 3, right = 3, top = 5, bottom = 3 } |
| } |
| local ControlBackdrop = { |
| bgFile = "Interface\\Tooltips\\UI-Tooltip-Background", |
| edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border", |
| tile = true, tileSize = 16, edgeSize = 16, |
| insets = { left = 3, right = 3, top = 3, bottom = 3 } |
| } |
| -------------------------- |
| -- Edit box -- |
| -------------------------- |
| --[[ |
| Events : |
| OnTextChanged |
| OnEnterPressed |
| ]] |
| do |
| local Type = "MultiLineEditBox" |
| local MultiLineEditBox = {} |
| local function EditBox_OnEnterPressed(this) |
| local self = this.obj |
| local value = this:GetText() |
| local cancel = self:Fire("OnEnterPressed",value) |
| if not cancel then |
| self.button:Disable() |
| end |
| end |
| local function Button_OnClick(this) |
| local editbox = this.obj.editbox |
| editbox:ClearFocus() |
| EditBox_OnEnterPressed(editbox) |
| end |
| local function EditBox_OnReceiveDrag(this) |
| local self = this.obj |
| local type, id, info = GetCursorInfo() |
| if type == "item" then |
| self:SetText(info) |
| self:Fire("OnEnterPressed",info) |
| ClearCursor() |
| elseif type == "spell" then |
| local name, rank = GetSpellName(id, info) |
| if rank and rank:match("%d") then |
| name = name.."("..rank..")" |
| end |
| self:SetText(name) |
| self:Fire("OnEnterPressed",name) |
| ClearCursor() |
| end |
| --self.button:Disable() |
| AceGUI:ClearFocus() |
| end |
| function MultiLineEditBox:OnAcquire() |
| self:SetWidth(200) |
| self:SetHeight(116) |
| self:SetNumLines(4) |
| self:SetDisabled(false) |
| self:ShowButton(true) |
| end |
| function MultiLineEditBox:OnRelease() |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| self:SetDisabled(false) |
| end |
| function MultiLineEditBox:SetDisabled(disabled) |
| self.disabled = disabled |
| if disabled then |
| self.editbox:EnableMouse(false) |
| self.scrollframe:EnableMouse(false) |
| self.editbox:ClearFocus() |
| self.editbox:SetTextColor(0.5, 0.5, 0.5) |
| self.label:SetTextColor(0.5,0.5,0.5) |
| else |
| self.editbox:EnableMouse(true) |
| self.scrollframe:EnableMouse(true) |
| self.editbox:SetTextColor(1, 1, 1) |
| self.label:SetTextColor(1,.82,0) |
| end |
| end |
| function MultiLineEditBox:SetText(text) |
| text = text or "" |
| local editbox = self.editbox |
| local oldText = editbox:GetText() |
| local dummy = format(" %s", text) |
| self.lasttext = dummy -- prevents OnTextChanged from firing |
| editbox:SetText(dummy) |
| editbox:HighlightText(0, 1) |
| self.lasttext = oldText |
| editbox:Insert("") |
| end |
| function MultiLineEditBox:SetLabel(text) |
| if (text or "") == "" then |
| self.backdrop:SetPoint("TOPLEFT",self.frame,"TOPLEFT",0,0) |
| self.label:Hide() |
| self.label:SetText("") |
| else |
| self.backdrop:SetPoint("TOPLEFT",self.frame,"TOPLEFT",0,-20) |
| self.label:Show() |
| self.label:SetText(text) |
| end |
| end |
| function MultiLineEditBox:SetNumLines(number) |
| number = number or 4 |
| self:SetHeight(60 + (14*number)) |
| end |
| function MultiLineEditBox:GetText() |
| return self.editbox:GetText() |
| end |
| function MultiLineEditBox:ShowButton(show) |
| if show then |
| self.backdrop:SetPoint("BOTTOMRIGHT",self.frame,"BOTTOMRIGHT",0,22) |
| self.button:Show() |
| else |
| self.backdrop:SetPoint("BOTTOMRIGHT",self.frame,"BOTTOMRIGHT",0,0) |
| self.button:Hide() |
| end |
| end |
| local function Constructor() |
| local frame = CreateFrame("Frame", nil, UIParent) |
| local backdrop = CreateFrame("Frame", nil, frame) |
| local self = {} |
| for k, v in pairs(MultiLineEditBox) do self[k] = v end |
| self.type = Type |
| self.frame = frame |
| self.backdrop = backdrop |
| frame.obj = self |
| backdrop:SetBackdrop(ControlBackdrop) |
| backdrop:SetBackdropColor(0, 0, 0) |
| backdrop:SetBackdropBorderColor(0.4, 0.4, 0.4) |
| backdrop:SetPoint("TOPLEFT",frame,"TOPLEFT",0, -20) |
| backdrop:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",0,22) |
| local scrollframe = CreateFrame("ScrollFrame", format("%s@%s@%s", Type, "ScrollFrame", tostring(self)), backdrop, "UIPanelScrollFrameTemplate") |
| scrollframe:SetPoint("TOPLEFT", 5, -6) |
| scrollframe:SetPoint("BOTTOMRIGHT", -28, 6) |
| scrollframe.obj = self |
| self.scrollframe = scrollframe |
| --local scrollchild = CreateFrame("Frame", nil, scrollframe) |
| --scrollframe:SetScrollChild(scrollchild) |
| --scrollchild:SetHeight(2) |
| --scrollchild:SetWidth(2) |
| local label = frame:CreateFontString(nil,"OVERLAY","GameFontNormalSmall") |
| label:SetPoint("TOPLEFT",frame,"TOPLEFT",0,-2) |
| label:SetPoint("TOPRIGHT",frame,"TOPRIGHT",0,-2) |
| label:SetJustifyH("LEFT") |
| label:SetHeight(18) |
| self.label = label |
| local editbox = CreateFrame("EditBox", nil, scrollframe) |
| self.editbox = editbox |
| editbox.obj = self |
| editbox:SetPoint("TOPLEFT") |
| editbox:SetPoint("BOTTOMLEFT") |
| editbox:SetHeight(50) |
| editbox:SetWidth(50) |
| editbox:SetMultiLine(true) |
| -- editbox:SetMaxLetters(7500) |
| editbox:SetTextInsets(5, 5, 3, 3) |
| editbox:EnableMouse(true) |
| editbox:SetAutoFocus(false) |
| editbox:SetFontObject(ChatFontNormal) |
| scrollframe:SetScrollChild(editbox) |
| local button = CreateFrame("Button",nil,scrollframe,"UIPanelButtonTemplate") |
| button:SetWidth(80) |
| button:SetHeight(20) |
| button:SetPoint("BOTTOMLEFT",frame,"BOTTOMLEFT",0,2) |
| button:SetText(ACCEPT) |
| button:SetScript("OnClick", Button_OnClick) |
| button:SetFrameLevel(editbox:GetFrameLevel() + 1) |
| button:Disable() |
| button:Hide() |
| self.button = button |
| button.obj = self |
| scrollframe:EnableMouse(true) |
| scrollframe:SetScript("OnMouseUp", function() editbox:SetFocus() end) |
| scrollframe:SetScript("OnEnter", function(this) this.obj:Fire("OnEnter") end) |
| scrollframe:SetScript("OnLeave", function(this) this.obj:Fire("OnLeave") end) |
| editbox:SetScript("OnEnter", function(this) this.obj:Fire("OnEnter") end) |
| editbox:SetScript("OnLeave", function(this) this.obj:Fire("OnLeave") end) |
| local function FixSize() |
| --scrollchild:SetHeight(scrollframe:GetHeight()) |
| --scrollchild:SetWidth(scrollframe:GetWidth()) |
| editbox:SetWidth(scrollframe:GetWidth()) |
| end |
| scrollframe:SetScript("OnShow", FixSize) |
| scrollframe:SetScript("OnSizeChanged", FixSize) |
| editbox:SetScript("OnEscapePressed", editbox.ClearFocus) |
| editbox:SetScript("OnTextChanged", function(_, ...) |
| scrollframe:UpdateScrollChildRect() |
| local value = editbox:GetText() |
| if value ~= self.lasttext then |
| self:Fire("OnTextChanged", value) |
| self.lasttext = value |
| self.button:Enable() |
| end |
| end) |
| editbox:SetScript("OnReceiveDrag", EditBox_OnReceiveDrag) |
| editbox:SetScript("OnMouseDown", EditBox_OnReceiveDrag) |
| do |
| local cursorOffset, cursorHeight |
| local idleTime |
| local function FixScroll(_, elapsed) |
| if cursorOffset and cursorHeight then |
| idleTime = 0 |
| local height = scrollframe:GetHeight() |
| local range = scrollframe:GetVerticalScrollRange() |
| local scroll = scrollframe:GetVerticalScroll() |
| local size = height + range |
| cursorOffset = -cursorOffset |
| while cursorOffset < scroll do |
| scroll = scroll - (height / 2) |
| if scroll < 0 then scroll = 0 end |
| scrollframe:SetVerticalScroll(scroll) |
| end |
| while cursorOffset + cursorHeight > scroll + height and scroll < range do |
| scroll = scroll + (height / 2) |
| if scroll > range then scroll = range end |
| scrollframe:SetVerticalScroll(scroll) |
| end |
| elseif not idleTime or idleTime > 2 then |
| frame:SetScript("OnUpdate", nil) |
| idleTime = nil |
| else |
| idleTime = idleTime + elapsed |
| end |
| cursorOffset = nil |
| end |
| editbox:SetScript("OnCursorChanged", function(_, x, y, w, h) |
| cursorOffset, cursorHeight = y, h |
| if not idleTime then |
| frame:SetScript("OnUpdate", FixScroll) |
| end |
| end) |
| end |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
| end |
Libs/AceGUI-3.0/widgets/AceGUIWidget-Slider.lua
New file
0,0 → 1,258
| local AceGUI = LibStub("AceGUI-3.0") |
| -------------------------- |
| -- Slider -- |
| -------------------------- |
| do |
| local Type = "Slider" |
| local Version = 8 |
| local function OnAcquire(self) |
| self:SetWidth(200) |
| self:SetHeight(44) |
| self:SetDisabled(false) |
| self:SetIsPercent(nil) |
| self:SetSliderValues(0,100,1) |
| self:SetValue(0) |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| self.slider:EnableMouseWheel(false) |
| self:SetDisabled(false) |
| end |
| local function Control_OnEnter(this) |
| this.obj:Fire("OnEnter") |
| end |
| local function Control_OnLeave(this) |
| this.obj:Fire("OnLeave") |
| end |
| local function UpdateText(self) |
| local value = self.value or 0 |
| if self.ispercent then |
| self.editbox:SetText(("%s%%"):format(math.floor(value*1000+0.5)/10)) |
| else |
| self.editbox:SetText(math.floor(value*100+0.5)/100) |
| end |
| end |
| local function UpdateLabels(self) |
| local min, max = (self.min or 0), (self.max or 100) |
| if self.ispercent then |
| self.lowtext:SetFormattedText("%s%%",(min * 100)) |
| self.hightext:SetFormattedText("%s%%",(max * 100)) |
| else |
| self.lowtext:SetText(min) |
| self.hightext:SetText(max) |
| end |
| end |
| local function Slider_OnValueChanged(this) |
| local self = this.obj |
| if not this.setup then |
| local newvalue |
| newvalue = this:GetValue() |
| if newvalue ~= self.value and not self.disabled then |
| self.value = newvalue |
| self:Fire("OnValueChanged", newvalue) |
| end |
| if self.value then |
| local value = self.value |
| UpdateText(self) |
| end |
| end |
| end |
| local function Slider_OnMouseUp(this) |
| local self = this.obj |
| self:Fire("OnMouseUp",this:GetValue()) |
| end |
| local function Slider_OnMouseWheel(this, v) |
| local self = this.obj |
| if not self.disabled then |
| local value = self.value |
| if v > 0 then |
| value = math.min(value + (self.step or 1),self.max) |
| else |
| value = math.max(value - (self.step or 1), self.min) |
| end |
| self.slider:SetValue(value) |
| end |
| end |
| local function SetDisabled(self, disabled) |
| self.disabled = disabled |
| if disabled then |
| self.slider:EnableMouse(false) |
| self.label:SetTextColor(.5,.5,.5) |
| self.hightext:SetTextColor(.5,.5,.5) |
| self.lowtext:SetTextColor(.5,.5,.5) |
| --self.valuetext:SetTextColor(.5,.5,.5) |
| self.editbox:SetTextColor(.5,.5,.5) |
| self.editbox:EnableMouse(false) |
| self.editbox:ClearFocus() |
| else |
| self.slider:EnableMouse(true) |
| self.label:SetTextColor(1,.82,0) |
| self.hightext:SetTextColor(1,1,1) |
| self.lowtext:SetTextColor(1,1,1) |
| --self.valuetext:SetTextColor(1,1,1) |
| self.editbox:SetTextColor(1,1,1) |
| self.editbox:EnableMouse(true) |
| end |
| end |
| local function SetValue(self, value) |
| self.slider.setup = true |
| self.slider:SetValue(value) |
| self.value = value |
| UpdateText(self) |
| self.slider.setup = nil |
| end |
| local function SetLabel(self, text) |
| self.label:SetText(text) |
| end |
| local function SetSliderValues(self, min, max, step) |
| local frame = self.slider |
| frame.setup = true |
| self.min = min |
| self.max = max |
| self.step = step |
| frame:SetMinMaxValues(min or 0,max or 100) |
| UpdateLabels(self) |
| frame:SetValueStep(step or 1) |
| if self.value then |
| frame:SetValue(self.value) |
| end |
| frame.setup = nil |
| end |
| local function EditBox_OnEscapePressed(this) |
| this:ClearFocus() |
| end |
| local function EditBox_OnEnterPressed(this) |
| local self = this.obj |
| local value = this:GetText() |
| if self.ispercent then |
| value = value:gsub('%%','') |
| value = tonumber(value) / 100 |
| else |
| value = tonumber(value) |
| end |
| if value then |
| self:Fire("OnMouseUp",value) |
| end |
| end |
| local function SetIsPercent(self, value) |
| self.ispercent = value |
| UpdateLabels(self) |
| UpdateText(self) |
| end |
| local function FrameOnMouseDown(this) |
| this.obj.slider:EnableMouseWheel(true) |
| AceGUI:ClearFocus() |
| end |
| local SliderBackdrop = { |
| bgFile = "Interface\\Buttons\\UI-SliderBar-Background", |
| edgeFile = "Interface\\Buttons\\UI-SliderBar-Border", |
| tile = true, tileSize = 8, edgeSize = 8, |
| insets = { left = 3, right = 3, top = 6, bottom = 6 } |
| } |
| local function Constructor() |
| local frame = CreateFrame("Frame",nil,UIParent) |
| local self = {} |
| self.type = Type |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.frame = frame |
| frame.obj = self |
| self.SetDisabled = SetDisabled |
| self.SetValue = SetValue |
| self.SetSliderValues = SetSliderValues |
| self.SetLabel = SetLabel |
| self.SetIsPercent = SetIsPercent |
| self.alignoffset = 25 |
| frame:EnableMouse(true) |
| frame:SetScript("OnMouseDown",FrameOnMouseDown) |
| self.slider = CreateFrame("Slider",nil,frame) |
| local slider = self.slider |
| slider:SetScript("OnEnter",Control_OnEnter) |
| slider:SetScript("OnLeave",Control_OnLeave) |
| slider:SetScript("OnMouseUp", Slider_OnMouseUp) |
| slider.obj = self |
| slider:SetOrientation("HORIZONTAL") |
| slider:SetHeight(15) |
| slider:SetHitRectInsets(0,0,-10,0) |
| slider:SetBackdrop(SliderBackdrop) |
| --slider:EnableMouseWheel(true) |
| slider:SetScript("OnMouseWheel", Slider_OnMouseWheel) |
| local label = frame:CreateFontString(nil,"OVERLAY","GameFontNormal") |
| label:SetPoint("TOPLEFT",frame,"TOPLEFT",0,0) |
| label:SetPoint("TOPRIGHT",frame,"TOPRIGHT",0,0) |
| label:SetJustifyH("CENTER") |
| label:SetHeight(15) |
| self.label = label |
| self.lowtext = slider:CreateFontString(nil,"ARTWORK","GameFontHighlightSmall") |
| self.lowtext:SetPoint("TOPLEFT",slider,"BOTTOMLEFT",2,3) |
| self.hightext = slider:CreateFontString(nil,"ARTWORK","GameFontHighlightSmall") |
| self.hightext:SetPoint("TOPRIGHT",slider,"BOTTOMRIGHT",-2,3) |
| local editbox = CreateFrame("EditBox",nil,frame) |
| editbox:SetAutoFocus(false) |
| editbox:SetFontObject(GameFontHighlightSmall) |
| editbox:SetPoint("TOP",slider,"BOTTOM",0,0) |
| editbox:SetHeight(14) |
| editbox:SetWidth(70) |
| editbox:SetJustifyH("CENTER") |
| editbox:EnableMouse(true) |
| editbox:SetScript("OnEscapePressed",EditBox_OnEscapePressed) |
| editbox:SetScript("OnEnterPressed",EditBox_OnEnterPressed) |
| self.editbox = editbox |
| editbox.obj = self |
| local bg = editbox:CreateTexture(nil,"BACKGROUND") |
| editbox.bg = bg |
| bg:SetTexture("Interface\\ChatFrame\\ChatFrameBackground") |
| bg:SetVertexColor(0,0,0,0.25) |
| bg:SetAllPoints(editbox) |
| slider:SetThumbTexture("Interface\\Buttons\\UI-SliderBar-Button-Horizontal") |
| frame:SetWidth(200) |
| frame:SetHeight(44) |
| slider:SetPoint("TOP",label,"BOTTOM",0,0) |
| slider:SetPoint("LEFT",frame,"LEFT",3,0) |
| slider:SetPoint("RIGHT",frame,"RIGHT",-3,0) |
| slider:SetValue(self.value or 0) |
| slider:SetScript("OnValueChanged",Slider_OnValueChanged) |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| end |
Libs/AceGUI-3.0/widgets/AceGUIWidget-TabGroup.lua
New file
0,0 → 1,376
| local AceGUI = LibStub("AceGUI-3.0") |
| ------------- |
| -- Widgets -- |
| ------------- |
| --[[ |
| Widgets must provide the following functions |
| Acquire() - Called when the object is aquired, should set everything to a default hidden state |
| Release() - Called when the object is Released, should remove any anchors and hide the Widget |
| And the following members |
| frame - the frame or derivitive object that will be treated as the widget for size and anchoring purposes |
| type - the type of the object, same as the name given to :RegisterWidget() |
| Widgets contain a table called userdata, this is a safe place to store data associated with the wigdet |
| It will be cleared automatically when a widget is released |
| Placing values directly into a widget object should be avoided |
| If the Widget can act as a container for other Widgets the following |
| content - frame or derivitive that children will be anchored to |
| The Widget can supply the following Optional Members |
| ]] |
| -------------------------- |
| -- Tab Group -- |
| -------------------------- |
| do |
| local Type = "TabGroup" |
| local Version = 22 |
| local PaneBackdrop = { |
| bgFile = "Interface\\ChatFrame\\ChatFrameBackground", |
| edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border", |
| tile = true, tileSize = 16, edgeSize = 16, |
| insets = { left = 3, right = 3, top = 5, bottom = 3 } |
| } |
| local function OnAcquire(self) |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| self.status = nil |
| for k in pairs(self.localstatus) do |
| self.localstatus[k] = nil |
| end |
| self.tablist = nil |
| for _, tab in pairs(self.tabs) do |
| tab:Hide() |
| end |
| self:SetTitle() |
| end |
| local function Tab_SetText(self, text) |
| self:_SetText(text) |
| local width = self.obj.frame.width or self.obj.frame:GetWidth() or 0 |
| PanelTemplates_TabResize(self, 0, nil, width) |
| end |
| local function UpdateTabLook(self) |
| if self.disabled then |
| PanelTemplates_SetDisabledTabState(self) |
| elseif self.selected then |
| PanelTemplates_SelectTab(self) |
| else |
| PanelTemplates_DeselectTab(self) |
| end |
| end |
| local function Tab_SetSelected(self, selected) |
| self.selected = selected |
| UpdateTabLook(self) |
| end |
| local function Tab_OnClick(self) |
| if not (self.selected or self.disabled) then |
| self.obj:SelectTab(self.value) |
| end |
| end |
| local function Tab_SetDisabled(self, disabled) |
| self.disabled = disabled |
| UpdateTabLook(self) |
| end |
| local function Tab_OnEnter(this) |
| local self = this.obj |
| self:Fire("OnTabEnter", self.tabs[this.id].value, this) |
| end |
| local function Tab_OnLeave(this) |
| local self = this.obj |
| self:Fire("OnTabLeave", self.tabs[this.id].value, this) |
| end |
| local function Tab_OnShow(this) |
| _G[this:GetName().."HighlightTexture"]:SetWidth(this:GetTextWidth() + 30) |
| end |
| local function CreateTab(self, id) |
| local tabname = "AceGUITabGroup"..self.num.."Tab"..id |
| local tab = CreateFrame("Button",tabname,self.border,"OptionsFrameTabButtonTemplate") |
| tab.obj = self |
| tab.id = id |
| tab.text = _G[tabname .. "Text"] |
| tab.text:ClearAllPoints() |
| tab.text:SetPoint("LEFT", tab, "LEFT", 14, -3) |
| tab.text:SetPoint("RIGHT", tab, "RIGHT", -12, -3) |
| tab:SetScript("OnClick",Tab_OnClick) |
| tab:SetScript("OnEnter",Tab_OnEnter) |
| tab:SetScript("OnLeave",Tab_OnLeave) |
| tab:SetScript("OnShow", Tab_OnShow) |
| tab._SetText = tab.SetText |
| tab.SetText = Tab_SetText |
| tab.SetSelected = Tab_SetSelected |
| tab.SetDisabled = Tab_SetDisabled |
| return tab |
| end |
| local function SetTitle(self, text) |
| self.titletext:SetText(text or "") |
| if text and text ~= "" then |
| self.alignoffset = 25 |
| else |
| self.alignoffset = 18 |
| end |
| self:BuildTabs() |
| end |
| -- called to set an external table to store status in |
| local function SetStatusTable(self, status) |
| assert(type(status) == "table") |
| self.status = status |
| end |
| local function SelectTab(self, value) |
| local status = self.status or self.localstatus |
| local found |
| for i, v in ipairs(self.tabs) do |
| if v.value == value then |
| v:SetSelected(true) |
| found = true |
| else |
| v:SetSelected(false) |
| end |
| end |
| status.selected = value |
| if found then |
| self:Fire("OnGroupSelected",value) |
| end |
| end |
| local function SetTabs(self, tabs) |
| self.tablist = tabs |
| self:BuildTabs() |
| end |
| local widths = {} |
| local rowwidths = {} |
| local rowends = {} |
| local function BuildTabs(self) |
| local hastitle = (self.titletext:GetText() and self.titletext:GetText() ~= "") |
| local status = self.status or self.localstatus |
| local tablist = self.tablist |
| local tabs = self.tabs |
| if not tablist then return end |
| local width = self.frame.width or self.frame:GetWidth() or 0 |
| for i = #widths, 1, -1 do |
| widths[i] = nil |
| end |
| for i = #rowwidths, 1, -1 do |
| rowwidths[i] = nil |
| end |
| for i = #rowends, 1, -1 do |
| rowends[i] = nil |
| end |
| --Place Text into tabs and get thier initial width |
| for i, v in ipairs(tablist) do |
| local tab = tabs[i] |
| if not tab then |
| tab = self:CreateTab(i) |
| tabs[i] = tab |
| end |
| tab:Show() |
| tab:SetText(v.text) |
| tab:SetDisabled(v.disabled) |
| tab.value = v.value |
| widths[i] = tab:GetWidth() - 6 --tabs are anchored 10 pixels from the right side of the previous one to reduce spacing, but add a fixed 4px padding for the text |
| end |
| for i = (#tablist)+1, #tabs, 1 do |
| tabs[i]:Hide() |
| end |
| --First pass, find the minimum number of rows needed to hold all tabs and the initial tab layout |
| local numtabs = #tablist |
| local numrows = 1 |
| local usedwidth = 0 |
| for i = 1, #tablist do |
| --If this is not the first tab of a row and there isn't room for it |
| if usedwidth ~= 0 and (width - usedwidth - widths[i]) < 0 then |
| rowwidths[numrows] = usedwidth + 10 --first tab in each row takes up an extra 10px |
| rowends[numrows] = i - 1 |
| numrows = numrows + 1 |
| usedwidth = 0 |
| end |
| usedwidth = usedwidth + widths[i] |
| end |
| rowwidths[numrows] = usedwidth + 10 --first tab in each row takes up an extra 10px |
| rowends[numrows] = #tablist |
| --Fix for single tabs being left on the last row, move a tab from the row above if applicable |
| if numrows > 1 then |
| --if the last row has only one tab |
| if rowends[numrows-1] == numtabs-1 then |
| --if there are more than 2 tabs in the 2nd last row |
| if (numrows == 2 and rowends[numrows-1] > 2) or (rowends[numrows] - rowends[numrows-1] > 2) then |
| --move 1 tab from the second last row to the last, if there is enough space |
| if (rowwidths[numrows] + widths[numtabs-1]) <= width then |
| rowends[numrows-1] = rowends[numrows-1] - 1 |
| rowwidths[numrows] = rowwidths[numrows] + widths[numtabs-1] |
| rowwidths[numrows-1] = rowwidths[numrows-1] - widths[numtabs-1] |
| end |
| end |
| end |
| end |
| --anchor the rows as defined and resize tabs to fill thier row |
| local starttab = 1 |
| for row, endtab in ipairs(rowends) do |
| local first = true |
| for tabno = starttab, endtab do |
| local tab = tabs[tabno] |
| tab:ClearAllPoints() |
| if first then |
| tab:SetPoint("TOPLEFT", self.frame, "TOPLEFT", 0, -(hastitle and 14 or 7)-(row-1)*20 ) |
| first = false |
| else |
| tab:SetPoint("LEFT", tabs[tabno-1], "RIGHT", -10, 0) |
| end |
| end |
| -- equal padding for each tab to fill the available width, |
| -- if the used space is above 75% already |
| local padding = 0 |
| if not (numrows == 1 and rowwidths[1] < width*0.75) then |
| padding = (width - rowwidths[row]) / (endtab - starttab+1) |
| end |
| for i = starttab, endtab do |
| PanelTemplates_TabResize(tabs[i], padding + 4, nil, width) |
| end |
| starttab = endtab + 1 |
| end |
| self.borderoffset = (hastitle and 17 or 10)+((numrows)*20) |
| self.border:SetPoint("TOPLEFT",self.frame,"TOPLEFT",3,-self.borderoffset) |
| end |
| local function BuildTabsOnUpdate(this) |
| BuildTabs(this.obj) |
| this:SetScript("OnUpdate", nil) |
| end |
| local function OnWidthSet(self, width) |
| local content = self.content |
| local contentwidth = width - 60 |
| if contentwidth < 0 then |
| contentwidth = 0 |
| end |
| content:SetWidth(contentwidth) |
| content.width = contentwidth |
| BuildTabs(self) |
| self.frame:SetScript("OnUpdate", BuildTabsOnUpdate) |
| end |
| local function OnHeightSet(self, height) |
| local content = self.content |
| local contentheight = height - (self.borderoffset + 23) |
| if contentheight < 0 then |
| contentheight = 0 |
| end |
| content:SetHeight(contentheight) |
| content.height = contentheight |
| end |
| local function LayoutFinished(self, width, height) |
| if self.noAutoHeight then return end |
| self:SetHeight((height or 0) + (self.borderoffset + 23)) |
| end |
| local function Constructor() |
| local frame = CreateFrame("Frame",nil,UIParent) |
| local self = {} |
| self.type = Type |
| self.num = AceGUI:GetNextWidgetNum(Type) |
| self.localstatus = {} |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.SetTitle = SetTitle |
| self.CreateTab = CreateTab |
| self.SelectTab = SelectTab |
| self.BuildTabs = BuildTabs |
| self.SetStatusTable = SetStatusTable |
| self.SetTabs = SetTabs |
| self.LayoutFinished = LayoutFinished |
| self.frame = frame |
| self.OnWidthSet = OnWidthSet |
| self.OnHeightSet = OnHeightSet |
| frame.obj = self |
| frame:SetHeight(100) |
| frame:SetWidth(100) |
| frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| self.alignoffset = 18 |
| local titletext = frame:CreateFontString(nil,"OVERLAY","GameFontNormal") |
| titletext:SetPoint("TOPLEFT",frame,"TOPLEFT",14,0) |
| titletext:SetPoint("TOPRIGHT",frame,"TOPRIGHT",-14,0) |
| titletext:SetJustifyH("LEFT") |
| titletext:SetHeight(18) |
| titletext:SetText("") |
| self.titletext = titletext |
| local border = CreateFrame("Frame",nil,frame) |
| self.border = border |
| self.borderoffset = 27 |
| border:SetPoint("TOPLEFT",frame,"TOPLEFT",3,-27) |
| border:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",-3,3) |
| border:SetBackdrop(PaneBackdrop) |
| border:SetBackdropColor(0.1,0.1,0.1,0.5) |
| border:SetBackdropBorderColor(0.4,0.4,0.4) |
| self.tabs = {} |
| --Container Support |
| local content = CreateFrame("Frame",nil,border) |
| self.content = content |
| content.obj = self |
| content:SetPoint("TOPLEFT",border,"TOPLEFT",10,-10) |
| content:SetPoint("BOTTOMRIGHT",border,"BOTTOMRIGHT",-10,10) |
| AceGUI:RegisterAsContainer(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| end |
Libs/AceGUI-3.0/widgets/AceGUIWidget-Keybinding.lua
New file
0,0 → 1,220
| local AceGUI = LibStub("AceGUI-3.0") |
| -------------------------- |
| -- Keybinding -- |
| -------------------------- |
| do |
| local Type = "Keybinding" |
| local Version = 13 |
| local ControlBackdrop = { |
| bgFile = "Interface\\Tooltips\\UI-Tooltip-Background", |
| edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border", |
| tile = true, tileSize = 16, edgeSize = 16, |
| insets = { left = 3, right = 3, top = 3, bottom = 3 } |
| } |
| local function Control_OnEnter(this) |
| this.obj:Fire("OnEnter") |
| end |
| local function Control_OnLeave(this) |
| this.obj:Fire("OnLeave") |
| end |
| local function keybindingMsgFixWidth(this) |
| this:SetWidth(this.msg:GetWidth()+10) |
| this:SetScript("OnUpdate",nil) |
| end |
| local function Keybinding_OnClick(this, button) |
| if button == "LeftButton" or button == "RightButton" then |
| local self = this.obj |
| if self.waitingForKey then |
| this:EnableKeyboard(false) |
| self.msgframe:Hide() |
| this:UnlockHighlight() |
| self.waitingForKey = nil |
| else |
| this:EnableKeyboard(true) |
| self.msgframe:Show() |
| this:LockHighlight() |
| self.waitingForKey = true |
| end |
| end |
| AceGUI:ClearFocus() |
| end |
| local ignoreKeys = nil |
| local function Keybinding_OnKeyDown(this, key) |
| local self = this.obj |
| if self.waitingForKey then |
| local keyPressed = key |
| if keyPressed == "ESCAPE" then |
| keyPressed = "" |
| else |
| if not ignoreKeys then |
| ignoreKeys = { |
| ["BUTTON1"] = true, ["BUTTON2"] = true, |
| ["UNKNOWN"] = true, |
| ["LSHIFT"] = true, ["LCTRL"] = true, ["LALT"] = true, |
| ["RSHIFT"] = true, ["RCTRL"] = true, ["RALT"] = true, |
| } |
| end |
| if ignoreKeys[keyPressed] then return end |
| if IsShiftKeyDown() then |
| keyPressed = "SHIFT-"..keyPressed |
| end |
| if IsControlKeyDown() then |
| keyPressed = "CTRL-"..keyPressed |
| end |
| if IsAltKeyDown() then |
| keyPressed = "ALT-"..keyPressed |
| end |
| end |
| this:EnableKeyboard(false) |
| self.msgframe:Hide() |
| this:UnlockHighlight() |
| self.waitingForKey = nil |
| if not self.disabled then |
| self:SetKey(keyPressed) |
| self:Fire("OnKeyChanged",keyPressed) |
| end |
| end |
| end |
| local function Keybinding_OnMouseDown(this, button) |
| if button == "LeftButton" or button == "RightButton" then |
| return |
| elseif button == "MiddleButton" then |
| button = "BUTTON3" |
| elseif button == "Button4" then |
| button = "BUTTON4" |
| elseif button == "Button5" then |
| button = "BUTTON5" |
| end |
| Keybinding_OnKeyDown(this, button) |
| end |
| local function OnAcquire(self) |
| self:SetWidth(200) |
| self:SetHeight(44) |
| self:SetLabel("") |
| self:SetKey("") |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| self.waitingForKey = nil |
| self.msgframe:Hide() |
| self:SetDisabled(false) |
| end |
| local function SetDisabled(self, disabled) |
| self.disabled = disabled |
| if disabled then |
| self.button:Disable() |
| self.label:SetTextColor(0.5,0.5,0.5) |
| else |
| self.button:Enable() |
| self.label:SetTextColor(1,1,1) |
| end |
| end |
| local function SetKey(self, key) |
| if (key or "") == "" then |
| self.button:SetText(NOT_BOUND) |
| self.button:SetNormalFontObject("GameFontNormal") |
| else |
| self.button:SetText(key) |
| self.button:SetNormalFontObject("GameFontHighlight") |
| end |
| end |
| local function SetLabel(self, label) |
| self.label:SetText(label or "") |
| if (label or "") == "" then |
| self.alignoffset = nil |
| self:SetHeight(24) |
| else |
| self.alignoffset = 30 |
| self:SetHeight(44) |
| end |
| end |
| local function Constructor() |
| local num = AceGUI:GetNextWidgetNum(Type) |
| local frame = CreateFrame("Frame",nil,UIParent) |
| local button = CreateFrame("Button","AceGUI-3.0 KeybindingButton"..num,frame,"UIPanelButtonTemplate2") |
| local self = {} |
| self.type = Type |
| self.num = num |
| local text = button:GetFontString() |
| text:SetPoint("LEFT",button,"LEFT",7,0) |
| text:SetPoint("RIGHT",button,"RIGHT",-7,0) |
| button:SetScript("OnClick",Keybinding_OnClick) |
| button:SetScript("OnKeyDown",Keybinding_OnKeyDown) |
| button:SetScript("OnEnter",Control_OnEnter) |
| button:SetScript("OnLeave",Control_OnLeave) |
| button:SetScript("OnMouseDown",Keybinding_OnMouseDown) |
| button:RegisterForClicks("AnyDown") |
| button:EnableMouse() |
| button:SetHeight(24) |
| button:SetWidth(200) |
| button:SetPoint("BOTTOMLEFT", frame, "BOTTOMLEFT",0,0) |
| button:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",0,0) |
| frame:SetWidth(200) |
| frame:SetHeight(44) |
| self.alignoffset = 30 |
| self.button = button |
| local label = frame:CreateFontString(nil,"OVERLAY","GameFontHighlight") |
| label:SetPoint("TOPLEFT",frame,"TOPLEFT",0,0) |
| label:SetPoint("TOPRIGHT",frame,"TOPRIGHT",0,0) |
| label:SetJustifyH("CENTER") |
| label:SetHeight(18) |
| self.label = label |
| local msgframe = CreateFrame("Frame",nil,UIParent) |
| msgframe:SetHeight(30) |
| msgframe:SetBackdrop(ControlBackdrop) |
| msgframe:SetBackdropColor(0,0,0) |
| msgframe:SetFrameStrata("FULLSCREEN_DIALOG") |
| msgframe:SetFrameLevel(1000) |
| self.msgframe = msgframe |
| local msg = msgframe:CreateFontString(nil,"OVERLAY","GameFontNormal") |
| msg:SetText("Press a key to bind, ESC to clear the binding or click the button again to cancel") |
| msgframe.msg = msg |
| msg:SetPoint("TOPLEFT",msgframe,"TOPLEFT",5,-5) |
| msgframe:SetScript("OnUpdate", keybindingMsgFixWidth) |
| msgframe:SetPoint("BOTTOM",button,"TOP",0,0) |
| msgframe:Hide() |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.SetLabel = SetLabel |
| self.SetDisabled = SetDisabled |
| self.SetKey = SetKey |
| self.frame = frame |
| frame.obj = self |
| button.obj = self |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| end |
Libs/AceGUI-3.0/widgets/AceGUIWidget-CheckBox.lua
New file
0,0 → 1,252
| local AceGUI = LibStub("AceGUI-3.0") |
| -------------------------- |
| -- Check Box -- |
| -------------------------- |
| --[[ |
| Events : |
| OnValueChanged |
| ]] |
| do |
| local Type = "CheckBox" |
| local Version = 11 |
| local function OnAcquire(self) |
| self:SetValue(false) |
| self.tristate = nil |
| self:SetHeight(24) |
| self:SetWidth(200) |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| self.check:Hide() |
| self.highlight:Hide() |
| self.down = nil |
| self.checked = nil |
| self:SetType() |
| self:SetDisabled(false) |
| self:SetDescription(nil) |
| end |
| local function CheckBox_OnEnter(this) |
| local self = this.obj |
| self.highlight:Show() |
| self:Fire("OnEnter") |
| end |
| local function CheckBox_OnLeave(this) |
| local self = this.obj |
| self.highlight:Hide() |
| self:Fire("OnLeave") |
| end |
| local function CheckBox_OnMouseUp(this) |
| local self = this.obj |
| if not self.disabled then |
| self:ToggleChecked() |
| self:Fire("OnValueChanged",self.checked) |
| self.text:SetPoint("LEFT",self.check,"RIGHT",0,0) |
| end |
| self.down = nil |
| end |
| local function CheckBox_OnMouseDown(this) |
| local self = this.obj |
| if not self.disabled then |
| self.text:SetPoint("LEFT",self.check,"RIGHT",1,-1) |
| self.down = true |
| end |
| AceGUI:ClearFocus() |
| end |
| local function SetDisabled(self,disabled) |
| self.disabled = disabled |
| if disabled then |
| self.frame:Disable() |
| self.text:SetTextColor(0.5,0.5,0.5) |
| SetDesaturation(self.check, true) |
| else |
| self.frame:Enable() |
| self.text:SetTextColor(1,1,1) |
| if self.tristate and self.checked == nil then |
| SetDesaturation(self.check, true) |
| else |
| SetDesaturation(self.check, false) |
| end |
| end |
| end |
| local function SetValue(self,value) |
| local check = self.check |
| self.checked = value |
| if value then |
| SetDesaturation(self.check, false) |
| check:SetWidth(24) |
| check:SetHeight(24) |
| self.check:Show() |
| else |
| --Nil is the unknown tristate value |
| if self.tristate and value == nil then |
| SetDesaturation(self.check, true) |
| check:SetWidth(24) |
| check:SetHeight(24) |
| self.check:Show() |
| else |
| SetDesaturation(self.check, false) |
| check:SetWidth(24) |
| check:SetHeight(24) |
| self.check:Hide() |
| end |
| end |
| end |
| local function SetTriState(self, enabled) |
| self.tristate = enabled |
| self:SetValue(self:GetValue()) |
| end |
| local function GetValue(self) |
| return self.checked |
| end |
| local function SetType(self, type) |
| local checkbg = self.checkbg |
| local check = self.check |
| local highlight = self.highlight |
| if type == "radio" then |
| checkbg:SetTexture("Interface\\Buttons\\UI-RadioButton") |
| checkbg:SetTexCoord(0,0.25,0,1) |
| check:SetTexture("Interface\\Buttons\\UI-RadioButton") |
| check:SetTexCoord(0.5,0.75,0,1) |
| check:SetBlendMode("ADD") |
| highlight:SetTexture("Interface\\Buttons\\UI-RadioButton") |
| highlight:SetTexCoord(0.5,0.75,0,1) |
| else |
| checkbg:SetTexture("Interface\\Buttons\\UI-CheckBox-Up") |
| checkbg:SetTexCoord(0,1,0,1) |
| check:SetTexture("Interface\\Buttons\\UI-CheckBox-Check") |
| check:SetTexCoord(0,1,0,1) |
| check:SetBlendMode("BLEND") |
| highlight:SetTexture("Interface\\Buttons\\UI-CheckBox-Highlight") |
| highlight:SetTexCoord(0,1,0,1) |
| end |
| end |
| local function ToggleChecked(self) |
| local value = self:GetValue() |
| if self.tristate then |
| --cycle in true, nil, false order |
| if value then |
| self:SetValue(nil) |
| elseif value == nil then |
| self:SetValue(false) |
| else |
| self:SetValue(true) |
| end |
| else |
| self:SetValue(not self:GetValue()) |
| end |
| end |
| local function SetLabel(self, label) |
| self.text:SetText(label) |
| end |
| local function SetDescription(self, desc) |
| if desc then |
| if not self.desc then |
| local desc = self.frame:CreateFontString(nil, "OVERLAY", "GameFontHighlightSmall") |
| desc:ClearAllPoints() |
| desc:SetPoint("TOPLEFT", self.check, "TOPRIGHT", 5, -20) |
| desc:SetWidth(self.frame.width - 30) |
| desc:SetJustifyH("LEFT") |
| desc:SetJustifyV("TOP") |
| self.desc = desc |
| end |
| self.desc:Show() |
| --self.text:SetFontObject(GameFontNormal) |
| self.desc:SetText(desc) |
| self:SetHeight(24 + self.desc:GetHeight()) |
| else |
| if self.desc then |
| self.desc:SetText("") |
| self.desc:Hide() |
| end |
| self.text:SetFontObject(GameFontHighlight) |
| self:SetHeight(24) |
| end |
| end |
| local function OnWidthSet(self, width) |
| if self.desc and self.desc:GetText() ~= "" then |
| self.desc:SetWidth(width - 30) |
| self:SetHeight(24 + self.desc:GetHeight()) |
| end |
| end |
| local function Constructor() |
| local frame = CreateFrame("Button",nil,UIParent) |
| local self = {} |
| self.type = Type |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.SetValue = SetValue |
| self.GetValue = GetValue |
| self.SetDisabled = SetDisabled |
| self.SetType = SetType |
| self.ToggleChecked = ToggleChecked |
| self.SetLabel = SetLabel |
| self.SetTriState = SetTriState |
| self.SetDescription = SetDescription |
| self.OnWidthSet = OnWidthSet |
| self.frame = frame |
| frame.obj = self |
| local text = frame:CreateFontString(nil,"OVERLAY","GameFontHighlight") |
| self.text = text |
| frame:SetScript("OnEnter",CheckBox_OnEnter) |
| frame:SetScript("OnLeave",CheckBox_OnLeave) |
| frame:SetScript("OnMouseUp",CheckBox_OnMouseUp) |
| frame:SetScript("OnMouseDown",CheckBox_OnMouseDown) |
| frame:EnableMouse() |
| local checkbg = frame:CreateTexture(nil,"ARTWORK") |
| self.checkbg = checkbg |
| checkbg:SetWidth(24) |
| checkbg:SetHeight(24) |
| checkbg:SetPoint("TOPLEFT",frame,"TOPLEFT",0,0) |
| checkbg:SetTexture("Interface\\Buttons\\UI-CheckBox-Up") |
| local check = frame:CreateTexture(nil,"OVERLAY") |
| self.check = check |
| check:SetWidth(24) |
| check:SetHeight(24) |
| check:SetPoint("CENTER",checkbg,"CENTER",0,0) |
| check:SetTexture("Interface\\Buttons\\UI-CheckBox-Check") |
| local highlight = frame:CreateTexture(nil, "OVERLAY") |
| self.highlight = highlight |
| highlight:SetTexture("Interface\\Buttons\\UI-CheckBox-Highlight") |
| highlight:SetBlendMode("ADD") |
| highlight:SetAllPoints(checkbg) |
| highlight:Hide() |
| text:SetJustifyH("LEFT") |
| frame:SetHeight(24) |
| frame:SetWidth(200) |
| text:SetHeight(18) |
| text:SetPoint("LEFT",check,"RIGHT",0,0) |
| text:SetPoint("RIGHT",frame,"RIGHT",0,0) |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| end |
Libs/AceGUI-3.0/AceGUI-3.0.xml
New file
0,0 → 1,26
\ No newline at end of file
| <Ui xmlns="http://www.blizzard.com/wow/ui/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.blizzard.com/wow/ui/ |
| ..\FrameXML\UI.xsd"> |
| <Script file="AceGUI-3.0.lua"/> |
| <Script file="widgets\AceGUIWidget-Button.lua"/> |
| <Script file="widgets\AceGUIWidget-CheckBox.lua"/> |
| <Script file="widgets\AceGUIWidget-ColorPicker.lua"/> |
| <Script file="widgets\AceGUIWidget-DropDownGroup.lua"/> |
| <Script file="widgets\AceGUIWidget-DropDown.lua"/> |
| <Script file="widgets\AceGUIWidget-DropDown-Items.lua"/> |
| <Script file="widgets\AceGUIWidget-EditBox.lua"/> |
| <Script file="widgets\AceGUIWidget-Frame.lua"/> |
| <Script file="widgets\AceGUIWidget-Window.lua"/> |
| <Script file="widgets\AceGUIWidget-Heading.lua"/> |
| <Script file="widgets\AceGUIWidget-InlineGroup.lua"/> |
| <Script file="widgets\AceGUIWidget-Keybinding.lua"/> |
| <Script file="widgets\AceGUIWidget-ScrollFrame.lua"/> |
| <Script file="widgets\AceGUIWidget-SimpleGroup.lua"/> |
| <Script file="widgets\AceGUIWidget-Slider.lua"/> |
| <Script file="widgets\AceGUIWidget-TabGroup.lua"/> |
| <Script file="widgets\AceGUIWidget-TreeGroup.lua"/> |
| <Script file="widgets\AceGUIWidget-Label.lua"/> |
| <Script file="widgets\AceGUIWidget-MultiLineEditBox.lua"/> |
| <Script file="widgets\AceGUIWidget-BlizOptionsGroup.lua"/> |
| <Script file="widgets\AceGUIWidget-InteractiveLabel.lua"/> |
| <Script file="widgets\AceGUIWidget-Icon.lua"/> |
| </Ui> |
Libs/LibWindow-1.1/LibWindow-1.1.toc
New file
0,0 → 1,15
| ## Interface: 30000 |
| ## LoadOnDemand: 1 |
| ## Title: Lib: Window-1.1 |
| ## Notes: A library that handles the basics of "window" style frames |
| ## Author: Mikk |
| ## eMail: dpsgnome@mail.com |
| ## X-Category: Library |
| ## X-License: Public Domain |
| ## X-Curse-Packaged-Version: r3 |
| ## X-Curse-Project-Name: LibWindow-1.1 |
| ## X-Curse-Project-ID: libwindow-1-1 |
| ## X-Curse-Repository-ID: wow/libwindow-1-1/mainline |
| LibStub.lua |
| LibWindow-1.1\LibWindow-1.1.lua |
Libs/LibWindow-1.1/Changelog-LibWindow-1.1-r3.txt
New file
0,0 → 1,17
| ------------------------------------------------------------------------ |
| r3 | nevcairiel | 2009-01-20 14:27:34 +0000 (Tue, 20 Jan 2009) | 1 line |
| Changed paths: |
| M /trunk/LibWindow-1.1/LibWindow-1.1.lua |
| Fixed error in SavePosition that was causing the scale to not be saved |
| ------------------------------------------------------------------------ |
| r2 | mikk | 2008-11-13 15:47:42 +0000 (Thu, 13 Nov 2008) | 1 line |
| Changed paths: |
| A /trunk/.pkgmeta |
| A /trunk/LibStub.lua |
| A /trunk/LibWindow-1.1 |
| A /trunk/LibWindow-1.1/LibWindow-1.1.lua |
| A /trunk/LibWindow-1.1.toc |
| Initial checkin |
| ------------------------------------------------------------------------ |
Libs/LibWindow-1.1/LibStub.lua
New file
0,0 → 1,51
| -- $Id: LibStub.lua 76 2007-09-03 01:50:17Z mikk $ |
| -- LibStub is a simple versioning stub meant for use in Libraries. http://www.wowace.com/wiki/LibStub for more info |
| -- LibStub is hereby placed in the Public Domain |
| -- Credits: Kaelten, Cladhaire, ckknight, Mikk, Ammo, Nevcairiel, joshborke |
| local LIBSTUB_MAJOR, LIBSTUB_MINOR = "LibStub", 2 -- NEVER MAKE THIS AN SVN REVISION! IT NEEDS TO BE USABLE IN ALL REPOS! |
| local LibStub = _G[LIBSTUB_MAJOR] |
| -- Check to see is this version of the stub is obsolete |
| if not LibStub or LibStub.minor < LIBSTUB_MINOR then |
| LibStub = LibStub or {libs = {}, minors = {} } |
| _G[LIBSTUB_MAJOR] = LibStub |
| LibStub.minor = LIBSTUB_MINOR |
| -- LibStub:NewLibrary(major, minor) |
| -- major (string) - the major version of the library |
| -- minor (string or number ) - the minor version of the library |
| -- |
| -- returns nil if a newer or same version of the lib is already present |
| -- returns empty library object or old library object if upgrade is needed |
| function LibStub:NewLibrary(major, minor) |
| assert(type(major) == "string", "Bad argument #2 to `NewLibrary' (string expected)") |
| minor = assert(tonumber(strmatch(minor, "%d+")), "Minor version must either be a number or contain a number.") |
| local oldminor = self.minors[major] |
| if oldminor and oldminor >= minor then return nil end |
| self.minors[major], self.libs[major] = minor, self.libs[major] or {} |
| return self.libs[major], oldminor |
| end |
| -- LibStub:GetLibrary(major, [silent]) |
| -- major (string) - the major version of the library |
| -- silent (boolean) - if true, library is optional, silently return nil if its not found |
| -- |
| -- throws an error if the library can not be found (except silent is set) |
| -- returns the library object if found |
| function LibStub:GetLibrary(major, silent) |
| if not self.libs[major] and not silent then |
| error(("Cannot find a library instance of %q."):format(tostring(major)), 2) |
| end |
| return self.libs[major], self.minors[major] |
| end |
| -- LibStub:IterateLibraries() |
| -- |
| -- Returns an iterator for the currently registered libraries |
| function LibStub:IterateLibraries() |
| return pairs(self.libs) |
| end |
| setmetatable(LibStub, { __call = LibStub.GetLibrary }) |
| end |
Libs/LibWindow-1.1/LibWindow-1.1/LibWindow-1.1.lua
New file
0,0 → 1,312
| --[[ |
| Name: LibWindow-1.1 |
| Revision: $Rev: 3 $ |
| Author(s): Mikk (dpsgnome@mail.com) |
| Website: http://old.wowace.com/wiki/LibWindow-1.1 |
| Documentation: http://old.wowace.com/wiki/LibWindow-1.1 |
| SVN: http://svn.wowace.com/root/trunk/WindowLib/Window-1.0 |
| Description: A library that handles the basics of "window" style frames: scaling, smart position saving, dragging.. |
| Dependencies: none |
| License: Public Domain |
| ]] |
| local MAJOR = "LibWindow-1.1" |
| local MINOR = tonumber(("$Revision: 3 $"):match("(%d+)")) |
| local lib = LibStub:NewLibrary(MAJOR,MINOR) |
| if not lib then return end |
| local function print(msg) ChatFrame1:AddMessage(MAJOR..": "..tostring(msg)) end |
| lib.utilFrame = lib.utilFrame or CreateFrame("Frame") |
| lib.delayedSavePosition = lib.delayedSavePosition or {} |
| lib.windowData = lib.windowData or {} |
| --[frameref]={ |
| -- names={optional names data from .RegisterConfig()} |
| -- storage= -- tableref where config data is read/written |
| -- altEnable=true/false |
| --} |
| lib.embeds = lib.embeds or {} |
| local mixins = {} -- "FuncName"=true |
| --------------------------------------------------------- |
| -- UTILITIES |
| --------------------------------------------------------- |
| local function getStorageName(frame, name) |
| local names = lib.windowData[frame].names |
| if names then |
| if names[name] then |
| return names[name] |
| end |
| if names.prefix then |
| return names.prefix .. name; |
| end |
| end |
| return name; |
| end |
| local function setStorage(frame, name, value) |
| lib.windowData[frame].storage[getStorageName(frame, name)] = value |
| end |
| local function getStorage(frame, name) |
| return lib.windowData[frame].storage[getStorageName(frame, name)] |
| end |
| lib.utilFrame:SetScript("OnUpdate", function(this) |
| this:Hide() |
| for frame,_ in pairs(lib.delayedSavePosition) do |
| lib.delayedSavePosition[frame] = nil |
| lib.SavePosition(frame) |
| end |
| end) |
| local function queueSavePosition(frame) |
| lib.delayedSavePosition[frame] = true |
| lib.utilFrame:Show() |
| end |
| --------------------------------------------------------- |
| -- IMPORTANT APIS |
| --------------------------------------------------------- |
| mixins["RegisterConfig"]=true |
| function lib.RegisterConfig(frame, storage, names) |
| if not lib.windowData[frame] then |
| lib.windowData[frame] = {} |
| end |
| lib.windowData[frame].names = names |
| lib.windowData[frame].storage = storage |
| --[[ debug |
| frame.tx = frame:CreateTexture() |
| frame.tx:SetTexture(0,0,0, 0.4) |
| frame.tx:SetAllPoints(frame) |
| frame.tx:Show() |
| ]] |
| end |
| --------------------------------------------------------- |
| -- POSITIONING AND SCALING |
| --------------------------------------------------------- |
| local nilParent = { |
| GetWidth = function() |
| return GetScreenWidth() * UIParent:GetScale() |
| end, |
| GetHeight = function() |
| return GetScreenHeight() * UIParent:GetScale() |
| end, |
| GetScale = function() |
| return 1 |
| end, |
| } |
| mixins["SavePosition"]=true |
| function lib.SavePosition(frame) |
| local parent = frame:GetParent() or nilParent |
| -- No, this won't work very well with frames that aren't parented to nil or UIParent |
| local s = frame:GetScale() |
| local left,top = frame:GetLeft()*s, frame:GetTop()*s |
| local right,bottom = frame:GetRight()*s, frame:GetBottom()*s |
| local pwidth, pheight = parent:GetWidth(), parent:GetHeight() |
| local x,y,point; |
| if left < (pwidth-right) and left < abs((left+right)/2 - pwidth/2) then |
| x = left; |
| point="LEFT"; |
| elseif (pwidth-right) < abs((left+right)/2 - pwidth/2) then |
| x = right-pwidth; |
| point="RIGHT"; |
| else |
| x = (left+right)/2 - pwidth/2; |
| point=""; |
| end |
| if bottom < (pheight-top) and bottom < abs((bottom+top)/2 - pheight/2) then |
| y = bottom; |
| point="BOTTOM"..point; |
| elseif (pheight-top) < abs((bottom+top)/2 - pheight/2) then |
| y = top-pheight; |
| point="TOP"..point; |
| else |
| y = (bottom+top)/2 - pheight/2; |
| -- point=""..point; |
| end |
| if point=="" then |
| point = "CENTER" |
| end |
| setStorage(frame, "x", x) |
| setStorage(frame, "y", y) |
| setStorage(frame, "point", point) |
| setStorage(frame, "scale", s) |
| frame:ClearAllPoints() |
| frame:SetPoint(point, frame:GetParent(), point, x/s, y/s); |
| end |
| mixins["RestorePosition"]=true |
| function lib.RestorePosition(frame) |
| local x = getStorage(frame, "x") |
| local y = getStorage(frame, "y") |
| local point = getStorage(frame, "point") |
| local s = getStorage(frame, "scale") |
| if s then |
| frame:SetScale(s) |
| else |
| s = frame:GetScale() |
| end |
| if not x or not y then -- nothing stored in config yet, smack it in the center |
| x=0; y=0; point="CENTER" |
| end |
| x = x/s |
| y = y/s |
| frame:ClearAllPoints() |
| if not point and y==0 then -- errr why did i do this check again? must have been a reason, but i can't remember it =/ |
| point="CENTER" |
| end |
| if not point then -- we have position, but no point, which probably means we're going from data stored by the addon itself before LibWindow was added to it. It was PROBABLY topleft->bottomleft anchored. Most do it that way. |
| frame:SetPoint("TOPLEFT", frame:GetParent(), "BOTTOMLEFT", x, y) |
| -- make it compute a better attachpoint (on next update) |
| queueSavePosition(frame) |
| return |
| end |
| frame:SetPoint(point, frame:GetParent(), point, x, y) |
| end |
| mixins["SetScale"]=true |
| function lib.SetScale(frame, scale) |
| setStorage(frame, "scale", scale) |
| frame:SetScale(scale) |
| lib.RestorePosition(frame) |
| end |
| --------------------------------------------------------- |
| -- DRAG SUPPORT |
| --------------------------------------------------------- |
| function lib.OnDragStart(frame) |
| lib.windowData[frame].isDragging = true |
| frame:StartMoving() |
| end |
| function lib.OnDragStop(frame) |
| frame:StopMovingOrSizing() |
| lib.SavePosition(frame) |
| lib.windowData[frame].isDragging = false |
| if lib.windowData[frame].altEnable and not IsAltKeyDown() then |
| frame:EnableMouse(false) |
| end |
| end |
| local function onDragStart(...) return lib.OnDragStart(...) end -- upgradable |
| local function onDragStop(...) return lib.OnDragStop(...) end -- upgradable |
| mixins["MakeDraggable"]=true |
| function lib.MakeDraggable(frame) |
| assert(lib.windowData[frame]) |
| frame:SetMovable(true) |
| frame:SetScript("OnDragStart", onDragStart) |
| frame:SetScript("OnDragStop", onDragStop) |
| frame:RegisterForDrag("LeftButton") |
| end |
| --------------------------------------------------------- |
| -- MOUSEWHEEL |
| --------------------------------------------------------- |
| function lib.OnMouseWheel(frame, dir) |
| local scale = getStorage(frame, "scale") |
| if dir<0 then |
| scale=max(scale*0.9, 0.1) |
| else |
| scale=min(scale/0.9, 3) |
| end |
| lib.SetScale(frame, scale) |
| end |
| local function onMouseWheel(...) return lib.OnMouseWheel(...) end -- upgradable |
| mixins["EnableMouseWheelScaling"]=true |
| function lib.EnableMouseWheelScaling(frame) |
| frame:SetScript("OnMouseWheel", onMouseWheel) |
| end |
| --------------------------------------------------------- |
| -- ENABLEMOUSE-ON-ALT |
| --------------------------------------------------------- |
| lib.utilFrame:SetScript("OnEvent", function(this, event, key, state) |
| if event=="MODIFIER_STATE_CHANGED" then |
| if key == "LALT" or key == "RALT" then |
| for frame,_ in pairs(lib.altEnabledFrames) do |
| if not lib.windowData[frame].isDragging then -- if it's already dragging, it'll disable mouse on DragStop instead |
| frame:EnableMouse(state == 1) |
| end |
| end |
| end |
| end |
| end) |
| mixins["MakeDraggable"]=true |
| function lib.EnableMouseOnAlt(frame) |
| assert(lib.windowData[frame]) |
| lib.windowData[frame].altEnable = true |
| frame:EnableMouse(not not IsAltKeyDown()) |
| if not lib.altEnabledFrames then |
| lib.altEnabledFrames = {} |
| lib.utilFrame:RegisterEvent("MODIFIER_STATE_CHANGED") |
| end |
| lib.altEnabledFrames[frame] = true |
| end |
| --------------------------------------------------------- |
| -- Embed support (into FRAMES, not addons!) |
| --------------------------------------------------------- |
| function lib:Embed(target) |
| if not target or not target[0] or not target.GetFrameType then |
| error("Usage: LibWindow:Embed(frame)", 1) |
| end |
| for name, _ in pairs(mixins) do |
| target[name] = self[name] |
| end |
| lib.embeds[target] = true |
| return target |
| end |
| for target, _ in pairs(lib.embeds) do |
| lib:Embed(target) |
| end |
Libs/AceAddon-3.0/AceAddon-3.0.xml
New file
0,0 → 1,4
\ No newline at end of file
| <Ui xmlns="http://www.blizzard.com/wow/ui/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.blizzard.com/wow/ui/ |
| ..\FrameXML\UI.xsd"> |
| <Script file="AceAddon-3.0.lua"/> |
| </Ui> |
Libs/AceAddon-3.0/AceAddon-3.0.lua
New file
0,0 → 1,634
| --- **AceAddon-3.0** provides a template for creating addon objects. |
| -- It'll provide you with a set of callback functions that allow you to simplify the loading |
| -- process of your addon.\\ |
| -- Callbacks provided are:\\ |
| -- * **OnInitialize**, which is called directly after the addon is fully loaded. |
| -- * **OnEnable** which gets called during the PLAYER_LOGIN event, when most of the data provided by the game is already present. |
| -- * **OnDisable**, which is only called when your addon is manually being disabled. |
| -- @usage |
| -- -- A small (but complete) addon, that doesn't do anything, |
| -- -- but shows usage of the callbacks. |
| -- local MyAddon = LibStub("AceAddon-3.0"):NewAddon("MyAddon") |
| -- |
| -- function MyAddon:OnInitialize() |
| -- -- do init tasks here, like loading the Saved Variables, |
| -- -- or setting up slash commands. |
| -- end |
| -- |
| -- function MyAddon:OnEnable() |
| -- -- Do more initialization here, that really enables the use of your addon. |
| -- -- Register Events, Hook functions, Create Frames, Get information from |
| -- -- the game that wasn't available in OnInitialize |
| -- end |
| -- |
| -- function MyAddon:OnDisable() |
| -- -- Unhook, Unregister Events, Hide frames that you created. |
| -- -- You would probably only use an OnDisable if you want to |
| -- -- build a "standby" mode, or be able to toggle modules on/off. |
| -- end |
| -- @class file |
| -- @name AceAddon-3.0.lua |
| -- @release $Id: AceAddon-3.0.lua 777 2009-04-04 20:16:09Z nevcairiel $ |
| local MAJOR, MINOR = "AceAddon-3.0", 5 |
| local AceAddon, oldminor = LibStub:NewLibrary(MAJOR, MINOR) |
| if not AceAddon then return end -- No Upgrade needed. |
| AceAddon.frame = AceAddon.frame or CreateFrame("Frame", "AceAddon30Frame") -- Our very own frame |
| AceAddon.addons = AceAddon.addons or {} -- addons in general |
| AceAddon.statuses = AceAddon.statuses or {} -- statuses of addon. |
| AceAddon.initializequeue = AceAddon.initializequeue or {} -- addons that are new and not initialized |
| AceAddon.enablequeue = AceAddon.enablequeue or {} -- addons that are initialized and waiting to be enabled |
| AceAddon.embeds = AceAddon.embeds or setmetatable({}, {__index = function(tbl, key) tbl[key] = {} return tbl[key] end }) -- contains a list of libraries embedded in an addon |
| local tinsert, tconcat = table.insert, table.concat |
| local fmt = string.format |
| local pairs, next, type = pairs, next, type |
| --[[ |
| xpcall safecall implementation |
| ]] |
| local xpcall = xpcall |
| local function errorhandler(err) |
| return geterrorhandler()(err) |
| end |
| local function CreateDispatcher(argCount) |
| local code = [[ |
| local xpcall, eh = ... |
| local method, ARGS |
| local function call() return method(ARGS) end |
| local function dispatch(func, ...) |
| method = func |
| if not method then return end |
| ARGS = ... |
| return xpcall(call, eh) |
| end |
| return dispatch |
| ]] |
| local ARGS = {} |
| for i = 1, argCount do ARGS[i] = "arg"..i end |
| code = code:gsub("ARGS", tconcat(ARGS, ", ")) |
| return assert(loadstring(code, "safecall Dispatcher["..argCount.."]"))(xpcall, errorhandler) |
| end |
| local Dispatchers = setmetatable({}, {__index=function(self, argCount) |
| local dispatcher = CreateDispatcher(argCount) |
| rawset(self, argCount, dispatcher) |
| return dispatcher |
| end}) |
| Dispatchers[0] = function(func) |
| return xpcall(func, errorhandler) |
| end |
| local function safecall(func, ...) |
| -- we check to see if the func is passed is actually a function here and don't error when it isn't |
| -- this safecall is used for optional functions like OnInitialize OnEnable etc. When they are not |
| -- present execution should continue without hinderance |
| if type(func) == "function" then |
| return Dispatchers[select('#', ...)](func, ...) |
| end |
| end |
| -- local functions that will be implemented further down |
| local Enable, Disable, EnableModule, DisableModule, Embed, NewModule, GetModule, GetName, SetDefaultModuleState, SetDefaultModuleLibraries, SetEnabledState, SetDefaultModulePrototype |
| -- used in the addon metatable |
| local function addontostring( self ) return self.name end |
| --- Create a new AceAddon-3.0 addon. |
| -- Any libraries you specified will be embeded, and the addon will be scheduled for |
| -- its OnInitialize and OnEnable callbacks. |
| -- The final addon object, with all libraries embeded, will be returned. |
| -- @paramsig [object ,]name[, lib, ...] |
| -- @param object Table to use as a base for the addon (optional) |
| -- @param name Name of the addon object to create |
| -- @param lib List of libraries to embed into the addon |
| -- @usage |
| -- -- Create a simple addon object |
| -- MyAddon = LibStub("AceAddon-3.0"):NewAddon("MyAddon", "AceEvent-3.0") |
| -- |
| -- -- Create a Addon object based on the table of a frame |
| -- local MyFrame = CreateFrame("Frame") |
| -- MyAddon = LibStub("AceAddon-3.0"):NewAddon(MyFrame, "MyAddon", "AceEvent-3.0") |
| function AceAddon:NewAddon(objectorname, ...) |
| local object,name |
| local i=1 |
| if type(objectorname)=="table" then |
| object=objectorname |
| name=... |
| i=2 |
| else |
| name=objectorname |
| end |
| if type(name)~="string" then |
| error(("Usage: NewAddon([object,] name, [lib, lib, lib, ...]): 'name' - string expected got '%s'."):format(type(name)), 2) |
| end |
| if self.addons[name] then |
| error(("Usage: NewAddon([object,] name, [lib, lib, lib, ...]): 'name' - Addon '%s' already exists."):format(name), 2) |
| end |
| object = object or {} |
| object.name = name |
| local addonmeta = {} |
| local oldmeta = getmetatable(object) |
| if oldmeta then |
| for k, v in pairs(oldmeta) do addonmeta[k] = v end |
| end |
| addonmeta.__tostring = addontostring |
| setmetatable( object, addonmeta ) |
| self.addons[name] = object |
| object.modules = {} |
| object.defaultModuleLibraries = {} |
| Embed( object ) -- embed NewModule, GetModule methods |
| self:EmbedLibraries(object, select(i,...)) |
| -- add to queue of addons to be initialized upon ADDON_LOADED |
| tinsert(self.initializequeue, object) |
| return object |
| end |
| --- Get the addon object by its name from the internal AceAddon registry. |
| -- Throws an error if the addon object cannot be found (except if silent is set). |
| -- @param name unique name of the addon object |
| -- @param silent if true, the addon is optional, silently return nil if its not found |
| -- @usage |
| -- -- Get the Addon |
| -- MyAddon = LibStub("AceAddon-3.0"):GetAddon("MyAddon") |
| function AceAddon:GetAddon(name, silent) |
| if not silent and not self.addons[name] then |
| error(("Usage: GetAddon(name): 'name' - Cannot find an AceAddon '%s'."):format(tostring(name)), 2) |
| end |
| return self.addons[name] |
| end |
| -- - Embed a list of libraries into the specified addon. |
| -- This function will try to embed all of the listed libraries into the addon |
| -- and error if a single one fails. |
| -- |
| -- **Note:** This function is for internal use by :NewAddon/:NewModule |
| -- @paramsig addon, [lib, ...] |
| -- @param addon addon object to embed the libs in |
| -- @param lib List of libraries to embed into the addon |
| function AceAddon:EmbedLibraries(addon, ...) |
| for i=1,select("#", ... ) do |
| local libname = select(i, ...) |
| self:EmbedLibrary(addon, libname, false, 4) |
| end |
| end |
| -- - Embed a library into the addon object. |
| -- This function will check if the specified library is registered with LibStub |
| -- and if it has a :Embed function to call. It'll error if any of those conditions |
| -- fails. |
| -- |
| -- **Note:** This function is for internal use by :EmbedLibraries |
| -- @paramsig addon, libname[, silent[, offset]] |
| -- @param addon addon object to embed the library in |
| -- @param libname name of the library to embed |
| -- @param silent marks an embed to fail silently if the library doesn't exist (optional) |
| -- @param offset will push the error messages back to said offset, defaults to 2 (optional) |
| function AceAddon:EmbedLibrary(addon, libname, silent, offset) |
| local lib = LibStub:GetLibrary(libname, true) |
| if not lib and not silent then |
| error(("Usage: EmbedLibrary(addon, libname, silent, offset): 'libname' - Cannot find a library instance of %q."):format(tostring(libname)), offset or 2) |
| elseif lib and type(lib.Embed) == "function" then |
| lib:Embed(addon) |
| tinsert(self.embeds[addon], libname) |
| return true |
| elseif lib then |
| error(("Usage: EmbedLibrary(addon, libname, silent, offset): 'libname' - Library '%s' is not Embed capable"):format(libname), offset or 2) |
| end |
| end |
| --- Return the specified module from an addon object. |
| -- Throws an error if the addon object cannot be found (except if silent is set) |
| -- @name //addon//:GetModule |
| -- @paramsig name[, silent] |
| -- @param name unique name of the module |
| -- @param silent if true, the module is optional, silently return nil if its not found (optional) |
| -- @usage |
| -- -- Get the Addon |
| -- MyAddon = LibStub("AceAddon-3.0"):GetAddon("MyAddon") |
| -- -- Get the Module |
| -- MyModule = MyAddon:GetModule("MyModule") |
| function GetModule(self, name, silent) |
| if not self.modules[name] and not silent then |
| error(("Usage: GetModule(name, silent): 'name' - Cannot find module '%s'."):format(tostring(name)), 2) |
| end |
| return self.modules[name] |
| end |
| local function IsModuleTrue(self) return true end |
| --- Create a new module for the addon. |
| -- The new module can have its own embeded libraries and/or use a module prototype to be mixed into the module.\\ |
| -- A module has the same functionality as a real addon, it can have modules of its own, and has the same API as |
| -- an addon object. |
| -- @name //addon//:NewModule |
| -- @paramsig name[, prototype|lib[, lib, ...]] |
| -- @param name unique name of the module |
| -- @param prototype object to derive this module from, methods and values from this table will be mixed into the module (optional) |
| -- @param lib List of libraries to embed into the addon |
| -- @usage |
| -- -- Create a module with some embeded libraries |
| -- MyModule = MyAddon:NewModule("MyModule", "AceEvent-3.0", "AceHook-3.0") |
| -- |
| -- -- Create a module with a prototype |
| -- local prototype = { OnEnable = function(self) print("OnEnable called!") end } |
| -- MyModule = MyAddon:NewModule("MyModule", prototype, "AceEvent-3.0", "AceHook-3.0") |
| function NewModule(self, name, prototype, ...) |
| if type(name) ~= "string" then error(("Usage: NewModule(name, [prototype, [lib, lib, lib, ...]): 'name' - string expected got '%s'."):format(type(name)), 2) end |
| if type(prototype) ~= "string" and type(prototype) ~= "table" and type(prototype) ~= "nil" then error(("Usage: NewModule(name, [prototype, [lib, lib, lib, ...]): 'prototype' - table (prototype), string (lib) or nil expected got '%s'."):format(type(prototype)), 2) end |
| if self.modules[name] then error(("Usage: NewModule(name, [prototype, [lib, lib, lib, ...]): 'name' - Module '%s' already exists."):format(name), 2) end |
| -- modules are basically addons. We treat them as such. They will be added to the initializequeue properly as well. |
| -- NewModule can only be called after the parent addon is present thus the modules will be initialized after their parent is. |
| local module = AceAddon:NewAddon(fmt("%s_%s", self.name or tostring(self), name)) |
| module.IsModule = IsModuleTrue |
| module:SetEnabledState(self.defaultModuleState) |
| module.moduleName = name |
| if type(prototype) == "string" then |
| AceAddon:EmbedLibraries(module, prototype, ...) |
| else |
| AceAddon:EmbedLibraries(module, ...) |
| end |
| AceAddon:EmbedLibraries(module, unpack(self.defaultModuleLibraries)) |
| if not prototype or type(prototype) == "string" then |
| prototype = self.defaultModulePrototype or nil |
| end |
| if type(prototype) == "table" then |
| local mt = getmetatable(module) |
| mt.__index = prototype |
| setmetatable(module, mt) -- More of a Base class type feel. |
| end |
| safecall(self.OnModuleCreated, self, module) -- Was in Ace2 and I think it could be a cool thing to have handy. |
| self.modules[name] = module |
| return module |
| end |
| --- Returns the real name of the addon or module, without any prefix. |
| -- @name //addon//:GetName |
| -- @paramsig |
| -- @usage |
| -- print(MyAddon:GetName()) |
| -- -- prints "MyAddon" |
| function GetName(self) |
| return self.moduleName or self.name |
| end |
| --- Enables the Addon, if possible, return true or false depending on success. |
| -- This internally calls AceAddon:EnableAddon(), thus dispatching a OnEnable callback |
| -- and enabling all modules of the addon (unless explicitly disabled).\\ |
| -- :Enable() also sets the internal `enableState` variable to true |
| -- @name //addon//:Enable |
| -- @paramsig |
| -- @usage |
| -- -- Enable MyModule |
| -- MyAddon = LibStub("AceAddon-3.0"):GetAddon("MyAddon") |
| -- MyModule = MyAddon:GetModule("MyModule") |
| -- MyModule:Enable() |
| function Enable(self) |
| self:SetEnabledState(true) |
| return AceAddon:EnableAddon(self) |
| end |
| --- Disables the Addon, if possible, return true or false depending on success. |
| -- This internally calls AceAddon:DisableAddon(), thus dispatching a OnDisable callback |
| -- and disabling all modules of the addon.\\ |
| -- :Disable() also sets the internal `enableState` variable to false |
| -- @name //addon//:Disable |
| -- @paramsig |
| -- @usage |
| -- -- Disable MyAddon |
| -- MyAddon = LibStub("AceAddon-3.0"):GetAddon("MyAddon") |
| -- MyAddon:Disable() |
| function Disable(self) |
| self:SetEnabledState(false) |
| return AceAddon:DisableAddon(self) |
| end |
| --- Enables the Module, if possible, return true or false depending on success. |
| -- Short-hand function that retrieves the module via `:GetModule` and calls `:Enable` on the module object. |
| -- @name //addon//:EnableModule |
| -- @paramsig name |
| -- @usage |
| -- -- Enable MyModule using :GetModule |
| -- MyAddon = LibStub("AceAddon-3.0"):GetAddon("MyAddon") |
| -- MyModule = MyAddon:GetModule("MyModule") |
| -- MyModule:Enable() |
| -- |
| -- -- Enable MyModule using the short-hand |
| -- MyAddon = LibStub("AceAddon-3.0"):GetAddon("MyAddon") |
| -- MyAddon:EnableModule("MyModule") |
| function EnableModule(self, name) |
| local module = self:GetModule( name ) |
| return module:Enable() |
| end |
| --- Disables the Module, if possible, return true or false depending on success. |
| -- Short-hand function that retrieves the module via `:GetModule` and calls `:Disable` on the module object. |
| -- @name //addon//:DisableModule |
| -- @paramsig name |
| -- @usage |
| -- -- Disable MyModule using :GetModule |
| -- MyAddon = LibStub("AceAddon-3.0"):GetAddon("MyAddon") |
| -- MyModule = MyAddon:GetModule("MyModule") |
| -- MyModule:Disable() |
| -- |
| -- -- Disable MyModule using the short-hand |
| -- MyAddon = LibStub("AceAddon-3.0"):GetAddon("MyAddon") |
| -- MyAddon:DisableModule("MyModule") |
| function DisableModule(self, name) |
| local module = self:GetModule( name ) |
| return module:Disable() |
| end |
| --- Set the default libraries to be mixed into all modules created by this object. |
| -- Note that you can only change the default module libraries before any module is created. |
| -- @name //addon//:SetDefaultModuleLibraries |
| -- @paramsig lib[, lib, ...] |
| -- @param lib List of libraries to embed into the addon |
| -- @usage |
| -- -- Create the addon object |
| -- MyAddon = LibStub("AceAddon-3.0"):NewAddon("MyAddon") |
| -- -- Configure default libraries for modules (all modules need AceEvent-3.0) |
| -- MyAddon:SetDefaultModuleLibraries("AceEvent-3.0") |
| -- -- Create a module |
| -- MyModule = MyAddon:NewModule("MyModule") |
| function SetDefaultModuleLibraries(self, ...) |
| if next(self.modules) then |
| error("Usage: SetDefaultModuleLibraries(...): cannot change the module defaults after a module has been registered.", 2) |
| end |
| self.defaultModuleLibraries = {...} |
| end |
| --- Set the default state in which new modules are being created. |
| -- Note that you can only change the default state before any module is created. |
| -- @name //addon//:SetDefaultModuleState |
| -- @paramsig state |
| -- @param state Default state for new modules, true for enabled, false for disabled |
| -- @usage |
| -- -- Create the addon object |
| -- MyAddon = LibStub("AceAddon-3.0"):NewAddon("MyAddon") |
| -- -- Set the default state to "disabled" |
| -- MyAddon:SetDefaultModuleState(false) |
| -- -- Create a module and explicilty enable it |
| -- MyModule = MyAddon:NewModule("MyModule") |
| -- MyModule:Enable() |
| function SetDefaultModuleState(self, state) |
| if next(self.modules) then |
| error("Usage: SetDefaultModuleState(state): cannot change the module defaults after a module has been registered.", 2) |
| end |
| self.defaultModuleState = state |
| end |
| --- Set the default prototype to use for new modules on creation. |
| -- Note that you can only change the default prototype before any module is created. |
| -- @name //addon//:SetDefaultModulePrototype |
| -- @paramsig prototype |
| -- @param prototype Default prototype for the new modules (table) |
| -- @usage |
| -- -- Define a prototype |
| -- local prototype = { OnEnable = function(self) print("OnEnable called!") end } |
| -- -- Set the default prototype |
| -- MyAddon:SetDefaultModulePrototype(prototype) |
| -- -- Create a module and explicitly Enable it |
| -- MyModule = MyAddon:NewModule("MyModule") |
| -- MyModule:Enable() |
| -- -- should print "OnEnable called!" now |
| -- @see NewModule |
| function SetDefaultModulePrototype(self, prototype) |
| if next(self.modules) then |
| error("Usage: SetDefaultModulePrototype(prototype): cannot change the module defaults after a module has been registered.", 2) |
| end |
| if type(prototype) ~= "table" then |
| error(("Usage: SetDefaultModulePrototype(prototype): 'prototype' - table expected got '%s'."):format(type(prototype)), 2) |
| end |
| self.defaultModulePrototype = prototype |
| end |
| --- Set the state of an addon or module |
| -- This should only be called before any enabling actually happend, e.g. in/before OnInitialize. |
| -- @name //addon//:SetEnabledState |
| -- @paramsig state |
| -- @param state the state of an addon or module (enabled=true, disabled=false) |
| function SetEnabledState(self, state) |
| self.enabledState = state |
| end |
| --- Return an iterator of all modules associated to the addon. |
| -- @name //addon//:IterateModules |
| -- @paramsig |
| -- @usage |
| -- -- Enable all modules |
| -- for name, module in MyAddon:IterateModules() do |
| -- module:Enable() |
| -- end |
| local function IterateModules(self) return pairs(self.modules) end |
| -- Returns an iterator of all embeds in the addon |
| -- @name //addon//:IterateEmbeds |
| -- @paramsig |
| local function IterateEmbeds(self) return pairs(AceAddon.embeds[self]) end |
| --- Query the enabledState of an addon. |
| -- @name //addon//:IsEnabled |
| -- @paramsig |
| -- @usage |
| -- if MyAddon:IsEnabled() then |
| -- MyAddon:Disable() |
| -- end |
| local function IsEnabled(self) return self.enabledState end |
| local mixins = { |
| NewModule = NewModule, |
| GetModule = GetModule, |
| Enable = Enable, |
| Disable = Disable, |
| EnableModule = EnableModule, |
| DisableModule = DisableModule, |
| IsEnabled = IsEnabled, |
| SetDefaultModuleLibraries = SetDefaultModuleLibraries, |
| SetDefaultModuleState = SetDefaultModuleState, |
| SetDefaultModulePrototype = SetDefaultModulePrototype, |
| SetEnabledState = SetEnabledState, |
| IterateModules = IterateModules, |
| IterateEmbeds = IterateEmbeds, |
| GetName = GetName, |
| } |
| local function IsModule(self) return false end |
| local pmixins = { |
| defaultModuleState = true, |
| enabledState = true, |
| IsModule = IsModule, |
| } |
| -- Embed( target ) |
| -- target (object) - target object to embed aceaddon in |
| -- |
| -- this is a local function specifically since it's meant to be only called internally |
| function Embed(target) |
| for k, v in pairs(mixins) do |
| target[k] = v |
| end |
| for k, v in pairs(pmixins) do |
| target[k] = target[k] or v |
| end |
| end |
| -- - Initialize the addon after creation. |
| -- This function is only used internally during the ADDON_LOADED event |
| -- It will call the **OnInitialize** function on the addon object (if present), |
| -- and the **OnEmbedInitialize** function on all embeded libraries. |
| -- |
| -- **Note:** Do not call this function manually, unless you're absolutely sure that you know what you are doing. |
| -- @param addon addon object to intialize |
| function AceAddon:InitializeAddon(addon) |
| safecall(addon.OnInitialize, addon) |
| local embeds = self.embeds[addon] |
| for i = 1, #embeds do |
| local lib = LibStub:GetLibrary(embeds[i], true) |
| if lib then safecall(lib.OnEmbedInitialize, lib, addon) end |
| end |
| -- we don't call InitializeAddon on modules specifically, this is handled |
| -- from the event handler and only done _once_ |
| end |
| -- - Enable the addon after creation. |
| -- Note: This function is only used internally during the PLAYER_LOGIN event, or during ADDON_LOADED, |
| -- if IsLoggedIn() already returns true at that point, e.g. for LoD Addons. |
| -- It will call the **OnEnable** function on the addon object (if present), |
| -- and the **OnEmbedEnable** function on all embeded libraries.\\ |
| -- This function does not toggle the enable state of the addon itself, and will return early if the addon is disabled. |
| -- |
| -- **Note:** Do not call this function manually, unless you're absolutely sure that you know what you are doing. |
| -- Use :Enable on the addon itself instead. |
| -- @param addon addon object to enable |
| function AceAddon:EnableAddon(addon) |
| if type(addon) == "string" then addon = AceAddon:GetAddon(addon) end |
| if self.statuses[addon.name] or not addon.enabledState then return false end |
| -- set the statuses first, before calling the OnEnable. this allows for Disabling of the addon in OnEnable. |
| self.statuses[addon.name] = true |
| safecall(addon.OnEnable, addon) |
| -- make sure we're still enabled before continueing |
| if self.statuses[addon.name] then |
| local embeds = self.embeds[addon] |
| for i = 1, #embeds do |
| local lib = LibStub:GetLibrary(embeds[i], true) |
| if lib then safecall(lib.OnEmbedEnable, lib, addon) end |
| end |
| -- enable possible modules. |
| for name, module in pairs(addon.modules) do |
| self:EnableAddon(module) |
| end |
| end |
| return self.statuses[addon.name] -- return true if we're disabled |
| end |
| -- - Disable the addon |
| -- Note: This function is only used internally. |
| -- It will call the **OnDisable** function on the addon object (if present), |
| -- and the **OnEmbedDisable** function on all embeded libraries.\\ |
| -- This function does not toggle the enable state of the addon itself, and will return early if the addon is still enabled. |
| -- |
| -- **Note:** Do not call this function manually, unless you're absolutely sure that you know what you are doing. |
| -- Use :Disable on the addon itself instead. |
| -- @param addon addon object to enable |
| function AceAddon:DisableAddon(addon) |
| if type(addon) == "string" then addon = AceAddon:GetAddon(addon) end |
| if not self.statuses[addon.name] then return false end |
| -- set statuses first before calling OnDisable, this allows for aborting the disable in OnDisable. |
| self.statuses[addon.name] = false |
| safecall( addon.OnDisable, addon ) |
| -- make sure we're still disabling... |
| if not self.statuses[addon.name] then |
| local embeds = self.embeds[addon] |
| for i = 1, #embeds do |
| local lib = LibStub:GetLibrary(embeds[i], true) |
| if lib then safecall(lib.OnEmbedDisable, lib, addon) end |
| end |
| -- disable possible modules. |
| for name, module in pairs(addon.modules) do |
| self:DisableAddon(module) |
| end |
| end |
| return not self.statuses[addon.name] -- return true if we're disabled |
| end |
| --- Get an iterator over all registered addons. |
| -- @usage |
| -- -- Print a list of all installed AceAddon's |
| -- for name, addon in AceAddon:IterateAddons() do |
| -- print("Addon: " .. name) |
| -- end |
| function AceAddon:IterateAddons() return pairs(self.addons) end |
| --- Get an iterator over the internal status registry. |
| -- @usage |
| -- -- Print a list of all enabled addons |
| -- for name, status in AceAddon:IterateAddonStatus() do |
| -- if status then |
| -- print("EnabledAddon: " .. name) |
| -- end |
| -- end |
| function AceAddon:IterateAddonStatus() return pairs(self.statuses) end |
| -- Following Iterators are deprecated, and their addon specific versions should be used |
| -- e.g. addon:IterateEmbeds() instead of :IterateEmbedsOnAddon(addon) |
| function AceAddon:IterateEmbedsOnAddon(addon) return pairs(self.embeds[addon]) end |
| function AceAddon:IterateModulesOfAddon(addon) return pairs(addon.modules) end |
| -- Event Handling |
| local function onEvent(this, event, arg1) |
| if event == "ADDON_LOADED" or event == "PLAYER_LOGIN" then |
| -- if a addon loads another addon, recursion could happen here, so we need to validate the table on every iteration |
| while(#AceAddon.initializequeue > 0) do |
| local addon = tremove(AceAddon.initializequeue, 1) |
| -- this might be an issue with recursion - TODO: validate |
| if event == "ADDON_LOADED" then addon.baseName = arg1 end |
| AceAddon:InitializeAddon(addon) |
| tinsert(AceAddon.enablequeue, addon) |
| end |
| if IsLoggedIn() then |
| while(#AceAddon.enablequeue > 0) do |
| local addon = tremove(AceAddon.enablequeue, 1) |
| AceAddon:EnableAddon(addon) |
| end |
| end |
| end |
| end |
| AceAddon.frame:RegisterEvent("ADDON_LOADED") |
| AceAddon.frame:RegisterEvent("PLAYER_LOGIN") |
| AceAddon.frame:SetScript("OnEvent", onEvent) |
| -- upgrade embeded |
| for name, addon in pairs(AceAddon.addons) do |
| Embed(addon) |
| end |
Libs/AceConfig-3.0/AceConfig-3.0.xml
New file
0,0 → 1,8
\ No newline at end of file
| <Ui xmlns="http://www.blizzard.com/wow/ui/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.blizzard.com/wow/ui/ |
| ..\FrameXML\UI.xsd"> |
| <Include file="AceConfigRegistry-3.0\AceConfigRegistry-3.0.xml"/> |
| <Include file="AceConfigCmd-3.0\AceConfigCmd-3.0.xml"/> |
| <Include file="AceConfigDialog-3.0\AceConfigDialog-3.0.xml"/> |
| <!--<Include file="AceConfigDropdown-3.0\AceConfigDropdown-3.0.xml"/>--> |
| <Script file="AceConfig-3.0.lua"/> |
| </Ui> |
Libs/AceConfig-3.0/AceConfig-3.0.lua
New file
0,0 → 1,56
| --- AceConfig-3.0 wrapper library. |
| -- Provides an API to register an options table with the config registry, |
| -- as well as associate it with a slash command. |
| -- @class file |
| -- @name AceConfig-3.0 |
| -- @release $Id: AceConfig-3.0.lua 802 2009-04-11 12:12:37Z nevcairiel $ |
| --[[ |
| AceConfig-3.0 |
| Very light wrapper library that combines all the AceConfig subcomponents into one more easily used whole. |
| ]] |
| local MAJOR, MINOR = "AceConfig-3.0", 2 |
| local AceConfig = LibStub:NewLibrary(MAJOR, MINOR) |
| if not AceConfig then return end |
| local cfgreg = LibStub("AceConfigRegistry-3.0") |
| local cfgcmd = LibStub("AceConfigCmd-3.0") |
| local cfgdlg = LibStub("AceConfigDialog-3.0") |
| --TODO: local cfgdrp = LibStub("AceConfigDropdown-3.0") |
| -- ------------------------------------------------------------------- |
| -- :RegisterOptionsTable(appName, options, slashcmd, persist) |
| -- |
| -- - appName - (string) application name |
| -- - options - table or function ref, see AceConfigRegistry |
| -- - slashcmd - slash command (string) or table with commands, or nil to NOT create a slash command |
| --- Register a option table with the AceConfig registry. |
| -- You can supply a slash command (or a table of slash commands) to register with AceConfigCmd directly. |
| -- @paramsig appName, options [, slashcmd] |
| -- @param appName The application name for the config table. |
| -- @param options The option table (or a function to generate one on demand) |
| -- @param slashcmd A slash command to register for the option table, or a table of slash commands. |
| -- @usage |
| -- local AceConfig = LibStub("AceConfig-3.0") |
| -- AceConfig:RegisterOptionsTable("MyAddon", myOptions, {"/myslash", "/my"}) |
| function AceConfig:RegisterOptionsTable(appName, options, slashcmd) |
| local ok,msg = pcall(cfgreg.RegisterOptionsTable, self, appName, options) |
| if not ok then error(msg, 2) end |
| if slashcmd then |
| if type(slashcmd) == "table" then |
| for _,cmd in pairs(slashcmd) do |
| cfgcmd:CreateChatCommand(cmd, appName) |
| end |
| else |
| cfgcmd:CreateChatCommand(slashcmd, appName) |
| end |
| end |
| end |
Libs/AceConfig-3.0/AceConfigDialog-3.0/AceConfigDialog-3.0.xml
New file
0,0 → 1,4
\ No newline at end of file
| <Ui xmlns="http://www.blizzard.com/wow/ui/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.blizzard.com/wow/ui/ |
| ..\FrameXML\UI.xsd"> |
| <Script file="AceConfigDialog-3.0.lua"/> |
| </Ui> |
Libs/AceConfig-3.0/AceConfigDialog-3.0/AceConfigDialog-3.0.lua
New file
0,0 → 1,1855
| --- AceConfigDialog-3.0 generates AceGUI-3.0 based windows based on option tables. |
| -- @class file |
| -- @name AceConfigDialog-3.0 |
| -- @release $Id: AceConfigDialog-3.0.lua 836 2009-09-07 07:59:58Z ammo $ |
| local LibStub = LibStub |
| local MAJOR, MINOR = "AceConfigDialog-3.0", 36 |
| local AceConfigDialog = LibStub:NewLibrary(MAJOR, MINOR) |
| if not AceConfigDialog then return end |
| AceConfigDialog.OpenFrames = AceConfigDialog.OpenFrames or {} |
| AceConfigDialog.Status = AceConfigDialog.Status or {} |
| AceConfigDialog.frame = AceConfigDialog.frame or CreateFrame("Frame") |
| AceConfigDialog.frame.apps = AceConfigDialog.frame.apps or {} |
| AceConfigDialog.frame.closing = AceConfigDialog.frame.closing or {} |
| local gui = LibStub("AceGUI-3.0") |
| local reg = LibStub("AceConfigRegistry-3.0") |
| local select = select |
| local pairs = pairs |
| local type = type |
| local assert = assert |
| local tinsert = tinsert |
| local tremove = tremove |
| local error = error |
| local table = table |
| local unpack = unpack |
| local string = string |
| local next = next |
| local math = math |
| local _ |
| --[[ |
| xpcall safecall implementation |
| ]] |
| local xpcall = xpcall |
| local function errorhandler(err) |
| return geterrorhandler()(err) |
| end |
| local function CreateDispatcher(argCount) |
| local code = [[ |
| local xpcall, eh = ... |
| local method, ARGS |
| local function call() return method(ARGS) end |
| local function dispatch(func, ...) |
| method = func |
| if not method then return end |
| ARGS = ... |
| return xpcall(call, eh) |
| end |
| return dispatch |
| ]] |
| local ARGS = {} |
| for i = 1, argCount do ARGS[i] = "arg"..i end |
| code = code:gsub("ARGS", table.concat(ARGS, ", ")) |
| return assert(loadstring(code, "safecall Dispatcher["..argCount.."]"))(xpcall, errorhandler) |
| end |
| local Dispatchers = setmetatable({}, {__index=function(self, argCount) |
| local dispatcher = CreateDispatcher(argCount) |
| rawset(self, argCount, dispatcher) |
| return dispatcher |
| end}) |
| Dispatchers[0] = function(func) |
| return xpcall(func, errorhandler) |
| end |
| local function safecall(func, ...) |
| return Dispatchers[select('#', ...)](func, ...) |
| end |
| local width_multiplier = 170 |
| --[[ |
| Group Types |
| Tree - All Descendant Groups will all become nodes on the tree, direct child options will appear above the tree |
| - Descendant Groups with inline=true and thier children will not become nodes |
| Tab - Direct Child Groups will become tabs, direct child options will appear above the tab control |
| - Grandchild groups will default to inline unless specified otherwise |
| Select- Same as Tab but with entries in a dropdown rather than tabs |
| Inline Groups |
| - Will not become nodes of a select group, they will be effectivly part of thier parent group seperated by a border |
| - If declared on a direct child of a root node of a select group, they will appear above the group container control |
| - When a group is displayed inline, all descendants will also be inline members of the group |
| ]] |
| -- Recycling functions |
| local new, del, copy |
| --newcount, delcount,createdcount,cached = 0,0,0 |
| do |
| local pool = setmetatable({},{__mode='k'}) |
| function new() |
| --newcount = newcount + 1 |
| local t = next(pool) |
| if t then |
| pool[t] = nil |
| return t |
| else |
| --createdcount = createdcount + 1 |
| return {} |
| end |
| end |
| function copy(t) |
| local c = new() |
| for k, v in pairs(t) do |
| c[k] = v |
| end |
| return c |
| end |
| function del(t) |
| --delcount = delcount + 1 |
| for k in pairs(t) do |
| t[k] = nil |
| end |
| pool[t] = true |
| end |
| -- function cached() |
| -- local n = 0 |
| -- for k in pairs(pool) do |
| -- n = n + 1 |
| -- end |
| -- return n |
| -- end |
| end |
| -- picks the first non-nil value and returns it |
| local function pickfirstset(...) |
| for i=1,select("#",...) do |
| if select(i,...)~=nil then |
| return select(i,...) |
| end |
| end |
| end |
| --gets an option from a given group, checking plugins |
| local function GetSubOption(group, key) |
| if group.plugins then |
| for plugin, t in pairs(group.plugins) do |
| if t[key] then |
| return t[key] |
| end |
| end |
| end |
| return group.args[key] |
| end |
| --Option member type definitions, used to decide how to access it |
| --Is the member Inherited from parent options |
| local isInherited = { |
| set = true, |
| get = true, |
| func = true, |
| confirm = true, |
| validate = true, |
| disabled = true, |
| hidden = true |
| } |
| --Does a string type mean a literal value, instead of the default of a method of the handler |
| local stringIsLiteral = { |
| name = true, |
| desc = true, |
| icon = true, |
| usage = true, |
| width = true, |
| image = true, |
| fontSize = true, |
| } |
| --Is Never a function or method |
| local allIsLiteral = { |
| type = true, |
| descStyle = true, |
| imageWidth = true, |
| imageHeight = true, |
| } |
| --gets the value for a member that could be a function |
| --function refs are called with an info arg |
| --every other type is returned |
| local function GetOptionsMemberValue(membername, option, options, path, appName, ...) |
| --get definition for the member |
| local inherits = isInherited[membername] |
| --get the member of the option, traversing the tree if it can be inherited |
| local member |
| if inherits then |
| local group = options |
| if group[membername] ~= nil then |
| member = group[membername] |
| end |
| for i = 1, #path do |
| group = GetSubOption(group, path[i]) |
| if group[membername] ~= nil then |
| member = group[membername] |
| end |
| end |
| else |
| member = option[membername] |
| end |
| --check if we need to call a functon, or if we have a literal value |
| if ( not allIsLiteral[membername] ) and ( type(member) == "function" or ((not stringIsLiteral[membername]) and type(member) == "string") ) then |
| --We have a function to call |
| local info = new() |
| --traverse the options table, picking up the handler and filling the info with the path |
| local handler |
| local group = options |
| handler = group.handler or handler |
| for i = 1, #path do |
| group = GetSubOption(group, path[i]) |
| info[i] = path[i] |
| handler = group.handler or handler |
| end |
| info.options = options |
| info.appName = appName |
| info[0] = appName |
| info.arg = option.arg |
| info.handler = handler |
| info.option = option |
| info.type = option.type |
| info.uiType = 'dialog' |
| info.uiName = MAJOR |
| local a, b, c ,d |
| --using 4 returns for the get of a color type, increase if a type needs more |
| if type(member) == "function" then |
| --Call the function |
| a,b,c,d = member(info, ...) |
| else |
| --Call the method |
| if handler and handler[member] then |
| a,b,c,d = handler[member](handler, info, ...) |
| else |
| error(string.format("Method %s doesn't exist in handler for type %s", member, membername)) |
| end |
| end |
| del(info) |
| return a,b,c,d |
| else |
| --The value isnt a function to call, return it |
| return member |
| end |
| end |
| --[[calls an options function that could be inherited, method name or function ref |
| local function CallOptionsFunction(funcname ,option, options, path, appName, ...) |
| local info = new() |
| local func |
| local group = options |
| local handler |
| --build the info table containing the path |
| -- pick up functions while traversing the tree |
| if group[funcname] ~= nil then |
| func = group[funcname] |
| end |
| handler = group.handler or handler |
| for i, v in ipairs(path) do |
| group = GetSubOption(group, v) |
| info[i] = v |
| if group[funcname] ~= nil then |
| func = group[funcname] |
| end |
| handler = group.handler or handler |
| end |
| info.options = options |
| info[0] = appName |
| info.arg = option.arg |
| local a, b, c ,d |
| if type(func) == "string" then |
| if handler and handler[func] then |
| a,b,c,d = handler[func](handler, info, ...) |
| else |
| error(string.format("Method %s doesn't exist in handler for type func", func)) |
| end |
| elseif type(func) == "function" then |
| a,b,c,d = func(info, ...) |
| end |
| del(info) |
| return a,b,c,d |
| end |
| --]] |
| --tables to hold orders and names for options being sorted, will be created with new() |
| --prevents needing to call functions repeatedly while sorting |
| local tempOrders |
| local tempNames |
| local function compareOptions(a,b) |
| if not a then |
| return true |
| end |
| if not b then |
| return false |
| end |
| local OrderA, OrderB = tempOrders[a] or 100, tempOrders[b] or 100 |
| if OrderA == OrderB then |
| local NameA = (type(tempNames[a] == "string") and tempNames[a]) or "" |
| local NameB = (type(tempNames[b] == "string") and tempNames[b]) or "" |
| return NameA:upper() < NameB:upper() |
| end |
| if OrderA < 0 then |
| if OrderB > 0 then |
| return false |
| end |
| else |
| if OrderB < 0 then |
| return true |
| end |
| end |
| return OrderA < OrderB |
| end |
| --builds 2 tables out of an options group |
| -- keySort, sorted keys |
| -- opts, combined options from .plugins and args |
| local function BuildSortedOptionsTable(group, keySort, opts, options, path, appName) |
| tempOrders = new() |
| tempNames = new() |
| if group.plugins then |
| for plugin, t in pairs(group.plugins) do |
| for k, v in pairs(t) do |
| if not opts[k] then |
| tinsert(keySort, k) |
| opts[k] = v |
| path[#path+1] = k |
| tempOrders[k] = GetOptionsMemberValue("order", v, options, path, appName) |
| tempNames[k] = GetOptionsMemberValue("name", v, options, path, appName) |
| path[#path] = nil |
| end |
| end |
| end |
| end |
| for k, v in pairs(group.args) do |
| if not opts[k] then |
| tinsert(keySort, k) |
| opts[k] = v |
| path[#path+1] = k |
| tempOrders[k] = GetOptionsMemberValue("order", v, options, path, appName) |
| tempNames[k] = GetOptionsMemberValue("name", v, options, path, appName) |
| path[#path] = nil |
| end |
| end |
| table.sort(keySort, compareOptions) |
| del(tempOrders) |
| del(tempNames) |
| end |
| local function DelTree(tree) |
| if tree.children then |
| local childs = tree.children |
| for i = 1, #childs do |
| DelTree(childs[i]) |
| del(childs[i]) |
| end |
| del(childs) |
| end |
| end |
| local function CleanUserData(widget, event) |
| local user = widget:GetUserDataTable() |
| if user.path then |
| del(user.path) |
| end |
| if widget.type == "TreeGroup" then |
| local tree = user.tree |
| widget:SetTree(nil) |
| if tree then |
| for i = 1, #tree do |
| DelTree(tree[i]) |
| del(tree[i]) |
| end |
| del(tree) |
| end |
| end |
| if widget.type == "TabGroup" then |
| widget:SetTabs(nil) |
| if user.tablist then |
| del(user.tablist) |
| end |
| end |
| if widget.type == "DropdownGroup" then |
| widget:SetGroupList(nil) |
| if user.grouplist then |
| del(user.grouplist) |
| end |
| end |
| end |
| -- - Gets a status table for the given appname and options path. |
| -- @param appName The application name as given to `:RegisterOptionsTable()` |
| -- @param path The path to the options (a table with all group keys) |
| -- @return |
| function AceConfigDialog:GetStatusTable(appName, path) |
| local status = self.Status |
| if not status[appName] then |
| status[appName] = {} |
| status[appName].status = {} |
| status[appName].children = {} |
| end |
| status = status[appName] |
| if path then |
| for i = 1, #path do |
| local v = path[i] |
| if not status.children[v] then |
| status.children[v] = {} |
| status.children[v].status = {} |
| status.children[v].children = {} |
| end |
| status = status.children[v] |
| end |
| end |
| return status.status |
| end |
| --- Selects the specified path in the options window. |
| -- The path specified has to match the keys of the groups in the table. |
| -- @param appName The application name as given to `:RegisterOptionsTable()` |
| -- @param ... The path to the key that should be selected |
| function AceConfigDialog:SelectGroup(appName, ...) |
| local path = new() |
| local app = reg:GetOptionsTable(appName) |
| if not app then |
| error(("%s isn't registed with AceConfigRegistry, unable to open config"):format(appName), 2) |
| end |
| local options = app("dialog", MAJOR) |
| local group = options |
| local status = self:GetStatusTable(appName, path) |
| if not status.groups then |
| status.groups = {} |
| end |
| status = status.groups |
| local treevalue |
| local treestatus |
| for n = 1, select('#',...) do |
| local key = select(n, ...) |
| if group.childGroups == "tab" or group.childGroups == "select" then |
| --if this is a tab or select group, select the group |
| status.selected = key |
| --children of this group are no longer extra levels of a tree |
| treevalue = nil |
| else |
| --tree group by default |
| if treevalue then |
| --this is an extra level of a tree group, build a uniquevalue for it |
| treevalue = treevalue.."\001"..key |
| else |
| --this is the top level of a tree group, the uniquevalue is the same as the key |
| treevalue = key |
| if not status.groups then |
| status.groups = {} |
| end |
| --save this trees status table for any extra levels or groups |
| treestatus = status |
| end |
| --make sure that the tree entry is open, and select it. |
| --the selected group will be overwritten if a child is the final target but still needs to be open |
| treestatus.selected = treevalue |
| treestatus.groups[treevalue] = true |
| end |
| --move to the next group in the path |
| group = GetSubOption(group, key) |
| if not group then |
| break |
| end |
| tinsert(path, key) |
| status = self:GetStatusTable(appName, path) |
| if not status.groups then |
| status.groups = {} |
| end |
| status = status.groups |
| end |
| del(path) |
| reg:NotifyChange(appName) |
| end |
| local function OptionOnMouseOver(widget, event) |
| --show a tooltip/set the status bar to the desc text |
| local user = widget:GetUserDataTable() |
| local opt = user.option |
| local options = user.options |
| local path = user.path |
| local appName = user.appName |
| GameTooltip:SetOwner(widget.frame, "ANCHOR_TOPRIGHT") |
| local name = GetOptionsMemberValue("name", opt, options, path, appName) |
| local desc = GetOptionsMemberValue("desc", opt, options, path, appName) |
| local usage = GetOptionsMemberValue("usage", opt, options, path, appName) |
| local descStyle = opt.descStyle |
| if descStyle and descStyle ~= "tooltip" then return end |
| GameTooltip:SetText(name, 1, .82, 0, 1) |
| if opt.type == 'multiselect' then |
| GameTooltip:AddLine(user.text,0.5, 0.5, 0.8, 1) |
| end |
| if type(desc) == "string" then |
| GameTooltip:AddLine(desc, 1, 1, 1, 1) |
| end |
| if type(usage) == "string" then |
| GameTooltip:AddLine("Usage: "..usage, NORMAL_FONT_COLOR.r, NORMAL_FONT_COLOR.g, NORMAL_FONT_COLOR.b, 1) |
| end |
| GameTooltip:Show() |
| end |
| local function OptionOnMouseLeave(widget, event) |
| GameTooltip:Hide() |
| end |
| local function GetFuncName(option) |
| local type = option.type |
| if type == 'execute' then |
| return 'func' |
| else |
| return 'set' |
| end |
| end |
| local function confirmPopup(appName, rootframe, basepath, info, message, func, ...) |
| if not StaticPopupDialogs["ACECONFIGDIALOG30_CONFIRM_DIALOG"] then |
| StaticPopupDialogs["ACECONFIGDIALOG30_CONFIRM_DIALOG"] = {} |
| end |
| local t = StaticPopupDialogs["ACECONFIGDIALOG30_CONFIRM_DIALOG"] |
| for k in pairs(t) do |
| t[k] = nil |
| end |
| t.text = message |
| t.button1 = ACCEPT |
| t.button2 = CANCEL |
| local dialog, oldstrata |
| t.OnAccept = function() |
| safecall(func, unpack(t)) |
| if dialog and oldstrata then |
| dialog:SetFrameStrata(oldstrata) |
| end |
| AceConfigDialog:Open(appName, rootframe, basepath and unpack(basepath)) |
| del(info) |
| end |
| t.OnCancel = function() |
| if dialog and oldstrata then |
| dialog:SetFrameStrata(oldstrata) |
| end |
| AceConfigDialog:Open(appName, rootframe, basepath and unpack(basepath)) |
| del(info) |
| end |
| for i = 1, select('#', ...) do |
| t[i] = select(i, ...) or false |
| end |
| t.timeout = 0 |
| t.whileDead = 1 |
| t.hideOnEscape = 1 |
| dialog = StaticPopup_Show("ACECONFIGDIALOG30_CONFIRM_DIALOG") |
| if dialog then |
| oldstrata = dialog:GetFrameStrata() |
| dialog:SetFrameStrata("TOOLTIP") |
| end |
| end |
| local function ActivateControl(widget, event, ...) |
| --This function will call the set / execute handler for the widget |
| --widget:GetUserDataTable() contains the needed info |
| local user = widget:GetUserDataTable() |
| local option = user.option |
| local options = user.options |
| local path = user.path |
| local info = new() |
| local func |
| local group = options |
| local funcname = GetFuncName(option) |
| local handler |
| local confirm |
| local validate |
| --build the info table containing the path |
| -- pick up functions while traversing the tree |
| if group[funcname] ~= nil then |
| func = group[funcname] |
| end |
| handler = group.handler or handler |
| confirm = group.confirm |
| validate = group.validate |
| for i = 1, #path do |
| local v = path[i] |
| group = GetSubOption(group, v) |
| info[i] = v |
| if group[funcname] ~= nil then |
| func = group[funcname] |
| end |
| handler = group.handler or handler |
| if group.confirm ~= nil then |
| confirm = group.confirm |
| end |
| if group.validate ~= nil then |
| validate = group.validate |
| end |
| end |
| info.options = options |
| info.appName = user.appName |
| info.arg = option.arg |
| info.handler = handler |
| info.option = option |
| info.type = option.type |
| info.uiType = 'dialog' |
| info.uiName = MAJOR |
| local name |
| if type(option.name) == "function" then |
| name = option.name(info) |
| elseif type(option.name) == "string" then |
| name = option.name |
| else |
| name = "" |
| end |
| local usage = option.usage |
| local pattern = option.pattern |
| local validated = true |
| if option.type == "input" then |
| if type(pattern)=="string" then |
| if not strmatch(..., pattern) then |
| validated = false |
| end |
| end |
| end |
| local success |
| if validated and option.type ~= "execute" then |
| if type(validate) == "string" then |
| if handler and handler[validate] then |
| success, validated = safecall(handler[validate], handler, info, ...) |
| if not success then validated = false end |
| else |
| error(string.format("Method %s doesn't exist in handler for type execute", validate)) |
| end |
| elseif type(validate) == "function" then |
| success, validated = safecall(validate, info, ...) |
| if not success then validated = false end |
| end |
| end |
| local rootframe = user.rootframe |
| if type(validated) == "string" then |
| --validate function returned a message to display |
| if rootframe.SetStatusText then |
| rootframe:SetStatusText(validated) |
| else |
| -- TODO: do something else. |
| end |
| PlaySound("igPlayerInviteDecline") |
| del(info) |
| return true |
| elseif not validated then |
| --validate returned false |
| if rootframe.SetStatusText then |
| if usage then |
| rootframe:SetStatusText(name..": "..usage) |
| else |
| if pattern then |
| rootframe:SetStatusText(name..": Expected "..pattern) |
| else |
| rootframe:SetStatusText(name..": Invalid Value") |
| end |
| end |
| else |
| -- TODO: do something else |
| end |
| PlaySound("igPlayerInviteDecline") |
| del(info) |
| return true |
| else |
| local confirmText = option.confirmText |
| --call confirm func/method |
| if type(confirm) == "string" then |
| if handler and handler[confirm] then |
| success, confirm = safecall(handler[confirm], handler, info, ...) |
| if success and type(confirm) == "string" then |
| confirmText = confirm |
| confirm = true |
| elseif not success then |
| confirm = false |
| end |
| else |
| error(string.format("Method %s doesn't exist in handler for type confirm", confirm)) |
| end |
| elseif type(confirm) == "function" then |
| success, confirm = safecall(confirm, info, ...) |
| if success and type(confirm) == "string" then |
| confirmText = confirm |
| confirm = true |
| elseif not success then |
| confirm = false |
| end |
| end |
| --confirm if needed |
| if type(confirm) == "boolean" then |
| if confirm then |
| if not confirmText then |
| local name, desc = option.name, option.desc |
| if type(name) == "function" then |
| name = name(info) |
| end |
| if type(desc) == "function" then |
| desc = desc(info) |
| end |
| confirmText = name |
| if desc then |
| confirmText = confirmText.." - "..desc |
| end |
| end |
| local iscustom = user.rootframe:GetUserData('iscustom') |
| local rootframe |
| if iscustom then |
| rootframe = user.rootframe |
| end |
| local basepath = user.rootframe:GetUserData('basepath') |
| if type(func) == "string" then |
| if handler and handler[func] then |
| confirmPopup(user.appName, rootframe, basepath, info, confirmText, handler[func], handler, info, ...) |
| else |
| error(string.format("Method %s doesn't exist in handler for type func", func)) |
| end |
| elseif type(func) == "function" then |
| confirmPopup(user.appName, rootframe, basepath, info, confirmText, func, info, ...) |
| end |
| --func will be called and info deleted when the confirm dialog is responded to |
| return |
| end |
| end |
| --call the function |
| if type(func) == "string" then |
| if handler and handler[func] then |
| safecall(handler[func],handler, info, ...) |
| else |
| error(string.format("Method %s doesn't exist in handler for type func", func)) |
| end |
| elseif type(func) == "function" then |
| safecall(func,info, ...) |
| end |
| local iscustom = user.rootframe:GetUserData('iscustom') |
| local basepath = user.rootframe:GetUserData('basepath') |
| --full refresh of the frame, some controls dont cause this on all events |
| if option.type == "color" then |
| if event == "OnValueConfirmed" then |
| if iscustom then |
| AceConfigDialog:Open(user.appName, user.rootframe, basepath and unpack(basepath)) |
| else |
| AceConfigDialog:Open(user.appName, basepath and unpack(basepath)) |
| end |
| end |
| elseif option.type == "range" then |
| if event == "OnMouseUp" then |
| if iscustom then |
| AceConfigDialog:Open(user.appName, user.rootframe, basepath and unpack(basepath)) |
| else |
| AceConfigDialog:Open(user.appName, basepath and unpack(basepath)) |
| end |
| end |
| --multiselects don't cause a refresh on 'OnValueChanged' only 'OnClosed' |
| elseif option.type == "multiselect" then |
| user.valuechanged = true |
| else |
| if iscustom then |
| AceConfigDialog:Open(user.appName, user.rootframe, basepath and unpack(basepath)) |
| else |
| AceConfigDialog:Open(user.appName, basepath and unpack(basepath)) |
| end |
| end |
| end |
| del(info) |
| end |
| local function ActivateSlider(widget, event, value) |
| local option = widget:GetUserData('option') |
| local min, max, step = option.min or 0, option.max or 100, option.step |
| if step then |
| value = math.floor((value - min) / step + 0.5) * step + min |
| else |
| value = math.max(math.min(value,max),min) |
| end |
| ActivateControl(widget,event,value) |
| end |
| --called from a checkbox that is part of an internally created multiselect group |
| --this type is safe to refresh on activation of one control |
| local function ActivateMultiControl(widget, event, ...) |
| ActivateControl(widget, event, widget:GetUserData('value'), ...) |
| local user = widget:GetUserDataTable() |
| local iscustom = user.rootframe:GetUserData('iscustom') |
| local basepath = user.rootframe:GetUserData('basepath') |
| if iscustom then |
| AceConfigDialog:Open(user.appName, user.rootframe, basepath and unpack(basepath)) |
| else |
| AceConfigDialog:Open(user.appName, basepath and unpack(basepath)) |
| end |
| end |
| local function MultiControlOnClosed(widget, event, ...) |
| local user = widget:GetUserDataTable() |
| if user.valuechanged then |
| local iscustom = user.rootframe:GetUserData('iscustom') |
| local basepath = user.rootframe:GetUserData('basepath') |
| if iscustom then |
| AceConfigDialog:Open(user.appName, user.rootframe, basepath and unpack(basepath)) |
| else |
| AceConfigDialog:Open(user.appName, basepath and unpack(basepath)) |
| end |
| end |
| end |
| local function FrameOnClose(widget, event) |
| local appName = widget:GetUserData('appName') |
| AceConfigDialog.OpenFrames[appName] = nil |
| gui:Release(widget) |
| end |
| local function CheckOptionHidden(option, options, path, appName) |
| --check for a specific boolean option |
| local hidden = pickfirstset(option.dialogHidden,option.guiHidden) |
| if hidden ~= nil then |
| return hidden |
| end |
| return GetOptionsMemberValue("hidden", option, options, path, appName) |
| end |
| local function CheckOptionDisabled(option, options, path, appName) |
| --check for a specific boolean option |
| local disabled = pickfirstset(option.dialogDisabled,option.guiDisabled) |
| if disabled ~= nil then |
| return disabled |
| end |
| return GetOptionsMemberValue("disabled", option, options, path, appName) |
| end |
| --[[ |
| local function BuildTabs(group, options, path, appName) |
| local tabs = new() |
| local text = new() |
| local keySort = new() |
| local opts = new() |
| BuildSortedOptionsTable(group, keySort, opts, options, path, appName) |
| for i = 1, #keySort do |
| local k = keySort[i] |
| local v = opts[k] |
| if v.type == "group" then |
| path[#path+1] = k |
| local inline = pickfirstset(v.dialogInline,v.guiInline,v.inline, false) |
| local hidden = CheckOptionHidden(v, options, path, appName) |
| if not inline and not hidden then |
| tinsert(tabs, k) |
| text[k] = GetOptionsMemberValue("name", v, options, path, appName) |
| end |
| path[#path] = nil |
| end |
| end |
| del(keySort) |
| del(opts) |
| return tabs, text |
| end |
| ]] |
| local function BuildSelect(group, options, path, appName) |
| local groups = new() |
| local keySort = new() |
| local opts = new() |
| BuildSortedOptionsTable(group, keySort, opts, options, path, appName) |
| for i = 1, #keySort do |
| local k = keySort[i] |
| local v = opts[k] |
| if v.type == "group" then |
| path[#path+1] = k |
| local inline = pickfirstset(v.dialogInline,v.guiInline,v.inline, false) |
| local hidden = CheckOptionHidden(v, options, path, appName) |
| if not inline and not hidden then |
| groups[k] = GetOptionsMemberValue("name", v, options, path, appName) |
| end |
| path[#path] = nil |
| end |
| end |
| del(keySort) |
| del(opts) |
| return groups |
| end |
| local function BuildSubGroups(group, tree, options, path, appName) |
| local keySort = new() |
| local opts = new() |
| BuildSortedOptionsTable(group, keySort, opts, options, path, appName) |
| for i = 1, #keySort do |
| local k = keySort[i] |
| local v = opts[k] |
| if v.type == "group" then |
| path[#path+1] = k |
| local inline = pickfirstset(v.dialogInline,v.guiInline,v.inline, false) |
| local hidden = CheckOptionHidden(v, options, path, appName) |
| if not inline and not hidden then |
| local entry = new() |
| entry.value = k |
| entry.text = GetOptionsMemberValue("name", v, options, path, appName) |
| entry.icon = GetOptionsMemberValue("icon", v, options, path, appName) |
| entry.disabled = CheckOptionDisabled(v, options, path, appName) |
| if not tree.children then tree.children = new() end |
| tinsert(tree.children,entry) |
| if (v.childGroups or "tree") == "tree" then |
| BuildSubGroups(v,entry, options, path, appName) |
| end |
| end |
| path[#path] = nil |
| end |
| end |
| del(keySort) |
| del(opts) |
| end |
| local function BuildGroups(group, options, path, appName, recurse) |
| local tree = new() |
| local keySort = new() |
| local opts = new() |
| BuildSortedOptionsTable(group, keySort, opts, options, path, appName) |
| for i = 1, #keySort do |
| local k = keySort[i] |
| local v = opts[k] |
| if v.type == "group" then |
| path[#path+1] = k |
| local inline = pickfirstset(v.dialogInline,v.guiInline,v.inline, false) |
| local hidden = CheckOptionHidden(v, options, path, appName) |
| if not inline and not hidden then |
| local entry = new() |
| entry.value = k |
| entry.text = GetOptionsMemberValue("name", v, options, path, appName) |
| entry.icon = GetOptionsMemberValue("icon", v, options, path, appName) |
| entry.disabled = CheckOptionDisabled(v, options, path, appName) |
| tinsert(tree,entry) |
| if recurse and (v.childGroups or "tree") == "tree" then |
| BuildSubGroups(v,entry, options, path, appName) |
| end |
| end |
| path[#path] = nil |
| end |
| end |
| del(keySort) |
| del(opts) |
| return tree |
| end |
| local function InjectInfo(control, options, option, path, rootframe, appName) |
| local user = control:GetUserDataTable() |
| for i = 1, #path do |
| user[i] = path[i] |
| end |
| user.rootframe = rootframe |
| user.option = option |
| user.options = options |
| user.path = copy(path) |
| user.appName = appName |
| control:SetCallback("OnRelease", CleanUserData) |
| control:SetCallback("OnLeave", OptionOnMouseLeave) |
| control:SetCallback("OnEnter", OptionOnMouseOver) |
| end |
| --[[ |
| options - root of the options table being fed |
| container - widget that controls will be placed in |
| rootframe - Frame object the options are in |
| path - table with the keys to get to the group being fed |
| --]] |
| local function FeedOptions(appName, options,container,rootframe,path,group,inline) |
| local keySort = new() |
| local opts = new() |
| BuildSortedOptionsTable(group, keySort, opts, options, path, appName) |
| for i = 1, #keySort do |
| local k = keySort[i] |
| local v = opts[k] |
| tinsert(path, k) |
| local hidden = CheckOptionHidden(v, options, path, appName) |
| local name = GetOptionsMemberValue("name", v, options, path, appName) |
| if not hidden then |
| if v.type == "group" then |
| if inline or pickfirstset(v.dialogInline,v.guiInline,v.inline, false) then |
| --Inline group |
| local GroupContainer |
| if name and name ~= "" then |
| GroupContainer = gui:Create("InlineGroup") |
| GroupContainer:SetTitle(name or "") |
| else |
| GroupContainer = gui:Create("SimpleGroup") |
| end |
| GroupContainer.width = "fill" |
| GroupContainer:SetLayout("flow") |
| container:AddChild(GroupContainer) |
| FeedOptions(appName,options,GroupContainer,rootframe,path,v,true) |
| end |
| else |
| --Control to feed |
| local control |
| local name = GetOptionsMemberValue("name", v, options, path, appName) |
| if v.type == "execute" then |
| local imageCoords = GetOptionsMemberValue("imageCoords",v, options, path, appName) |
| local image, width, height = GetOptionsMemberValue("image",v, options, path, appName) |
| if type(image) == 'string' then |
| control = gui:Create("Icon") |
| if not width then |
| width = GetOptionsMemberValue("imageWidth",v, options, path, appName) |
| end |
| if not height then |
| height = GetOptionsMemberValue("imageHeight",v, options, path, appName) |
| end |
| if type(imageCoords) == 'table' then |
| control:SetImage(image, unpack(imageCoords)) |
| else |
| control:SetImage(image) |
| end |
| if type(width) ~= "number" then |
| width = 32 |
| end |
| if type(height) ~= "number" then |
| height = 32 |
| end |
| control:SetImageSize(width, height) |
| control:SetLabel(name) |
| else |
| control = gui:Create("Button") |
| control:SetText(name) |
| end |
| control:SetCallback("OnClick",ActivateControl) |
| elseif v.type == "input" then |
| local controlType = v.dialogControl or v.control or (v.multiline and "MultiLineEditBox") or "EditBox" |
| control = gui:Create(controlType) |
| if not control then |
| error(("Invalid Custom Control Type - %s"):format(tostring(controlType))) |
| end |
| if v.multiline then |
| local lines = 4 |
| if type(v.multiline) == "number" then |
| lines = v.multiline |
| end |
| control:SetHeight(60 + (14*lines)) |
| end |
| control:SetLabel(name) |
| control:SetCallback("OnEnterPressed",ActivateControl) |
| local text = GetOptionsMemberValue("get",v, options, path, appName) |
| if type(text) ~= "string" then |
| text = "" |
| end |
| control:SetText(text) |
| elseif v.type == "toggle" then |
| control = gui:Create("CheckBox") |
| control:SetLabel(name) |
| control:SetTriState(v.tristate) |
| local value = GetOptionsMemberValue("get",v, options, path, appName) |
| control:SetValue(value) |
| control:SetCallback("OnValueChanged",ActivateControl) |
| if v.descStyle == "inline" then |
| local desc = GetOptionsMemberValue("desc", v, options, path, appName) |
| control:SetDescription(desc) |
| end |
| elseif v.type == "range" then |
| control = gui:Create("Slider") |
| control:SetLabel(name) |
| control:SetSliderValues(v.min or 0,v.max or 100, v.bigStep or v.step or 0) |
| control:SetIsPercent(v.isPercent) |
| local value = GetOptionsMemberValue("get",v, options, path, appName) |
| if type(value) ~= "number" then |
| value = 0 |
| end |
| control:SetValue(value) |
| control:SetCallback("OnValueChanged",ActivateSlider) |
| control:SetCallback("OnMouseUp",ActivateSlider) |
| elseif v.type == "select" then |
| local values = GetOptionsMemberValue("values", v, options, path, appName) |
| local controlType = v.dialogControl or v.control or "Dropdown" |
| control = gui:Create(controlType) |
| if not control then |
| error(("Invalid Custom Control Type - %s"):format(tostring(controlType))) |
| end |
| control:SetLabel(name) |
| control:SetList(values) |
| local value = GetOptionsMemberValue("get",v, options, path, appName) |
| if not values[value] then |
| value = nil |
| end |
| control:SetValue(value) |
| control:SetCallback("OnValueChanged",ActivateControl) |
| elseif v.type == "multiselect" then |
| local values = GetOptionsMemberValue("values", v, options, path, appName) |
| local disabled = CheckOptionDisabled(v, options, path, appName) |
| local controlType = v.dialogControl or v.control |
| local valuesort = new() |
| if values then |
| for value, text in pairs(values) do |
| tinsert(valuesort, value) |
| end |
| end |
| table.sort(valuesort) |
| if controlType then |
| control = gui:Create(controlType) |
| if not control then |
| error(("Invalid Custom Control Type - %s"):format(tostring(controlType))) |
| end |
| control:SetMultiselect(true) |
| control:SetLabel(name) |
| control:SetList(values) |
| control:SetDisabled(disabled) |
| control:SetCallback("OnValueChanged",ActivateControl) |
| control:SetCallback("OnClosed", MultiControlOnClosed) |
| local width = GetOptionsMemberValue("width",v,options,path,appName) |
| if width == "double" then |
| control:SetWidth(width_multiplier * 2) |
| elseif width == "half" then |
| control:SetWidth(width_multiplier / 2) |
| elseif width == "full" then |
| control.width = "fill" |
| else |
| control:SetWidth(width_multiplier) |
| end |
| --check:SetTriState(v.tristate) |
| for i = 1, #valuesort do |
| local key = valuesort[i] |
| local value = GetOptionsMemberValue("get",v, options, path, appName, key) |
| control:SetItemValue(key,value) |
| end |
| else |
| control = gui:Create("InlineGroup") |
| control:SetLayout("Flow") |
| control:SetTitle(name) |
| control.width = "fill" |
| control:PauseLayout() |
| local width = GetOptionsMemberValue("width",v,options,path,appName) |
| for i = 1, #valuesort do |
| local value = valuesort[i] |
| local text = values[value] |
| local check = gui:Create("CheckBox") |
| check:SetLabel(text) |
| check:SetUserData('value', value) |
| check:SetUserData('text', text) |
| check:SetDisabled(disabled) |
| check:SetTriState(v.tristate) |
| check:SetValue(GetOptionsMemberValue("get",v, options, path, appName, value)) |
| check:SetCallback("OnValueChanged",ActivateMultiControl) |
| InjectInfo(check, options, v, path, rootframe, appName) |
| control:AddChild(check) |
| if width == "double" then |
| check:SetWidth(width_multiplier * 2) |
| elseif width == "half" then |
| check:SetWidth(width_multiplier / 2) |
| elseif width == "full" then |
| check.width = "fill" |
| else |
| check:SetWidth(width_multiplier) |
| end |
| end |
| control:ResumeLayout() |
| control:DoLayout() |
| end |
| del(valuesort) |
| elseif v.type == "color" then |
| control = gui:Create("ColorPicker") |
| control:SetLabel(name) |
| control:SetHasAlpha(v.hasAlpha) |
| control:SetColor(GetOptionsMemberValue("get",v, options, path, appName)) |
| control:SetCallback("OnValueChanged",ActivateControl) |
| control:SetCallback("OnValueConfirmed",ActivateControl) |
| elseif v.type == "keybinding" then |
| control = gui:Create("Keybinding") |
| control:SetLabel(name) |
| control:SetKey(GetOptionsMemberValue("get",v, options, path, appName)) |
| control:SetCallback("OnKeyChanged",ActivateControl) |
| elseif v.type == "header" then |
| control = gui:Create("Heading") |
| control:SetText(name) |
| control.width = "fill" |
| elseif v.type == "description" then |
| control = gui:Create("Label") |
| control:SetText(name) |
| local fontSize = GetOptionsMemberValue("fontSize",v, options, path, appName) |
| if fontSize == "medium" then |
| control:SetFontObject(GameFontHighlight) |
| elseif fontSize == "large" then |
| control:SetFontObject(GameFontHighlightLarge) |
| else -- small or invalid |
| control:SetFontObject(GameFontHighlightSmall) |
| end |
| local imageCoords = GetOptionsMemberValue("imageCoords",v, options, path, appName) |
| local image, width, height = GetOptionsMemberValue("image",v, options, path, appName) |
| if type(image) == 'string' then |
| if not width then |
| width = GetOptionsMemberValue("imageWidth",v, options, path, appName) |
| end |
| if not height then |
| height = GetOptionsMemberValue("imageHeight",v, options, path, appName) |
| end |
| if type(imageCoords) == 'table' then |
| control:SetImage(image, unpack(imageCoords)) |
| else |
| control:SetImage(image) |
| end |
| if type(width) ~= "number" then |
| width = 32 |
| end |
| if type(height) ~= "number" then |
| height = 32 |
| end |
| control:SetImageSize(width, height) |
| end |
| local width = GetOptionsMemberValue("width",v,options,path,appName) |
| control.width = not width and "fill" |
| end |
| --Common Init |
| if control then |
| if control.width ~= "fill" then |
| local width = GetOptionsMemberValue("width",v,options,path,appName) |
| if width == "double" then |
| control:SetWidth(width_multiplier * 2) |
| elseif width == "half" then |
| control:SetWidth(width_multiplier / 2) |
| elseif width == "full" then |
| control.width = "fill" |
| else |
| control:SetWidth(width_multiplier) |
| end |
| end |
| if control.SetDisabled then |
| local disabled = CheckOptionDisabled(v, options, path, appName) |
| control:SetDisabled(disabled) |
| end |
| InjectInfo(control, options, v, path, rootframe, appName) |
| container:AddChild(control) |
| end |
| end |
| end |
| tremove(path) |
| end |
| container:ResumeLayout() |
| container:DoLayout() |
| del(keySort) |
| del(opts) |
| end |
| local function BuildPath(path, ...) |
| for i = 1, select('#',...) do |
| tinsert(path, (select(i,...))) |
| end |
| end |
| local function TreeOnButtonEnter(widget, event, uniquevalue, button) |
| local user = widget:GetUserDataTable() |
| if not user then return end |
| local options = user.options |
| local option = user.option |
| local path = user.path |
| local appName = user.appName |
| local feedpath = new() |
| for i = 1, #path do |
| feedpath[i] = path[i] |
| end |
| BuildPath(feedpath, string.split("\001", uniquevalue)) |
| local group = options |
| for i = 1, #feedpath do |
| if not group then return end |
| group = GetSubOption(group, feedpath[i]) |
| end |
| local name = GetOptionsMemberValue("name", group, options, feedpath, appName) |
| local desc = GetOptionsMemberValue("desc", group, options, feedpath, appName) |
| GameTooltip:SetOwner(button, "ANCHOR_NONE") |
| if widget.type == "TabGroup" then |
| GameTooltip:SetPoint("BOTTOM",button,"TOP") |
| else |
| GameTooltip:SetPoint("LEFT",button,"RIGHT") |
| end |
| GameTooltip:SetText(name, 1, .82, 0, 1) |
| if type(desc) == "string" then |
| GameTooltip:AddLine(desc, 1, 1, 1, 1) |
| end |
| GameTooltip:Show() |
| end |
| local function TreeOnButtonLeave(widget, event, value, button) |
| GameTooltip:Hide() |
| end |
| local function GroupExists(appName, options, path, uniquevalue) |
| if not uniquevalue then return false end |
| local feedpath = new() |
| local temppath = new() |
| for i = 1, #path do |
| feedpath[i] = path[i] |
| end |
| BuildPath(feedpath, string.split("\001", uniquevalue)) |
| local group = options |
| for i = 1, #feedpath do |
| local v = feedpath[i] |
| temppath[i] = v |
| group = GetSubOption(group, v) |
| if not group or group.type ~= "group" or CheckOptionHidden(group, options, temppath, appName) then |
| del(feedpath) |
| del(temppath) |
| return false |
| end |
| end |
| del(feedpath) |
| del(temppath) |
| return true |
| end |
| local function GroupSelected(widget, event, uniquevalue) |
| local user = widget:GetUserDataTable() |
| local options = user.options |
| local option = user.option |
| local path = user.path |
| local rootframe = user.rootframe |
| local feedpath = new() |
| for i = 1, #path do |
| feedpath[i] = path[i] |
| end |
| BuildPath(feedpath, string.split("\001", uniquevalue)) |
| local group = options |
| for i = 1, #feedpath do |
| group = GetSubOption(group, feedpath[i]) |
| end |
| widget:ReleaseChildren() |
| AceConfigDialog:FeedGroup(user.appName,options,widget,rootframe,feedpath) |
| del(feedpath) |
| end |
| --[[ |
| -- INTERNAL -- |
| This function will feed one group, and any inline child groups into the given container |
| Select Groups will only have the selection control (tree, tabs, dropdown) fed in |
| and have a group selected, this event will trigger the feeding of child groups |
| Rules: |
| If the group is Inline, FeedOptions |
| If the group has no child groups, FeedOptions |
| If the group is a tab or select group, FeedOptions then add the Group Control |
| If the group is a tree group FeedOptions then |
| its parent isnt a tree group: then add the tree control containing this and all child tree groups |
| if its parent is a tree group, its already a node on a tree |
| --]] |
| function AceConfigDialog:FeedGroup(appName,options,container,rootframe,path, isRoot) |
| local group = options |
| --follow the path to get to the curent group |
| local inline |
| local grouptype, parenttype = options.childGroups, "none" |
| --temp path table to pass to callbacks as we traverse the tree |
| local temppath = new() |
| for i = 1, #path do |
| local v = path[i] |
| temppath[i] = v |
| group = GetSubOption(group, v) |
| inline = inline or pickfirstset(v.dialogInline,v.guiInline,v.inline, false) |
| parenttype = grouptype |
| grouptype = group.childGroups |
| end |
| del(temppath) |
| if not parenttype then |
| parenttype = "tree" |
| end |
| --check if the group has child groups |
| local hasChildGroups |
| for k, v in pairs(group.args) do |
| if v.type == "group" and not pickfirstset(v.dialogInline,v.guiInline,v.inline, false) and not CheckOptionHidden(v, options, path, appName) then |
| hasChildGroups = true |
| end |
| end |
| if group.plugins then |
| for plugin, t in pairs(group.plugins) do |
| for k, v in pairs(t) do |
| if v.type == "group" and not pickfirstset(v.dialogInline,v.guiInline,v.inline, false) and not CheckOptionHidden(v, options, path, appName) then |
| hasChildGroups = true |
| end |
| end |
| end |
| end |
| container:SetLayout("flow") |
| local scroll |
| --Add a scrollframe if we are not going to add a group control, this is the inverse of the conditions for that later on |
| if (not (hasChildGroups and not inline)) or (grouptype ~= "tab" and grouptype ~= "select" and (parenttype == "tree" and not isRoot)) then |
| if container.type ~= "InlineGroup" then |
| scroll = gui:Create("ScrollFrame") |
| scroll:SetLayout("flow") |
| scroll.width = "fill" |
| scroll.height = "fill" |
| container:SetLayout("fill") |
| container:AddChild(scroll) |
| container = scroll |
| end |
| end |
| FeedOptions(appName,options,container,rootframe,path,group,nil) |
| if scroll then |
| container:PerformLayout() |
| local status = self:GetStatusTable(appName, path) |
| if not status.scroll then |
| status.scroll = {} |
| end |
| scroll:SetStatusTable(status.scroll) |
| end |
| if hasChildGroups and not inline then |
| if grouptype == "tab" then |
| local tab = gui:Create("TabGroup") |
| InjectInfo(tab, options, group, path, rootframe, appName) |
| tab:SetCallback("OnGroupSelected", GroupSelected) |
| tab:SetCallback("OnTabEnter", TreeOnButtonEnter) |
| tab:SetCallback("OnTabLeave", TreeOnButtonLeave) |
| local status = AceConfigDialog:GetStatusTable(appName, path) |
| if not status.groups then |
| status.groups = {} |
| end |
| tab:SetStatusTable(status.groups) |
| tab.width = "fill" |
| tab.height = "fill" |
| local tabs = BuildGroups(group, options, path, appName) |
| tab:SetTabs(tabs) |
| tab:SetUserData("tablist", tabs) |
| for i = 1, #tabs do |
| local entry = tabs[i] |
| if not entry.disabled then |
| tab:SelectTab((GroupExists(appName, options, path,status.groups.selected) and status.groups.selected) or entry.value) |
| break |
| end |
| end |
| container:AddChild(tab) |
| elseif grouptype == "select" then |
| local select = gui:Create("DropdownGroup") |
| InjectInfo(select, options, group, path, rootframe, appName) |
| select:SetCallback("OnGroupSelected", GroupSelected) |
| local status = AceConfigDialog:GetStatusTable(appName, path) |
| if not status.groups then |
| status.groups = {} |
| end |
| select:SetStatusTable(status.groups) |
| local grouplist = BuildSelect(group, options, path, appName) |
| select:SetGroupList(grouplist) |
| select:SetUserData("grouplist", grouplist) |
| local firstgroup |
| for k, v in pairs(grouplist) do |
| if not firstgroup or k < firstgroup then |
| firstgroup = k |
| end |
| end |
| if firstgroup then |
| select:SetGroup( (GroupExists(appName, options, path,status.groups.selected) and status.groups.selected) or firstgroup) |
| end |
| select.width = "fill" |
| select.height = "fill" |
| container:AddChild(select) |
| --assume tree group by default |
| --if parenttype is tree then this group is already a node on that tree |
| elseif (parenttype ~= "tree") or isRoot then |
| local tree = gui:Create("TreeGroup") |
| InjectInfo(tree, options, group, path, rootframe, appName) |
| tree:EnableButtonTooltips(false) |
| tree.width = "fill" |
| tree.height = "fill" |
| tree:SetCallback("OnGroupSelected", GroupSelected) |
| tree:SetCallback("OnButtonEnter", TreeOnButtonEnter) |
| tree:SetCallback("OnButtonLeave", TreeOnButtonLeave) |
| local status = AceConfigDialog:GetStatusTable(appName, path) |
| if not status.groups then |
| status.groups = {} |
| end |
| local treedefinition = BuildGroups(group, options, path, appName, true) |
| tree:SetStatusTable(status.groups) |
| tree:SetTree(treedefinition) |
| tree:SetUserData("tree",treedefinition) |
| for i = 1, #treedefinition do |
| local entry = treedefinition[i] |
| if not entry.disabled then |
| tree:SelectByValue((GroupExists(appName, options, path,status.groups.selected) and status.groups.selected) or entry.value) |
| break |
| end |
| end |
| container:AddChild(tree) |
| end |
| end |
| end |
| local old_CloseSpecialWindows |
| local function RefreshOnUpdate(this) |
| for appName in pairs(this.closing) do |
| if AceConfigDialog.OpenFrames[appName] then |
| AceConfigDialog.OpenFrames[appName]:Hide() |
| end |
| if AceConfigDialog.BlizOptions and AceConfigDialog.BlizOptions[appName] then |
| local widget = AceConfigDialog.BlizOptions[appName] |
| if not widget:IsVisible() then |
| widget:ReleaseChildren() |
| end |
| end |
| this.closing[appName] = nil |
| end |
| if this.closeAll then |
| for k, v in pairs(AceConfigDialog.OpenFrames) do |
| v:Hide() |
| end |
| this.closeAll = nil |
| end |
| for appName in pairs(this.apps) do |
| if AceConfigDialog.OpenFrames[appName] then |
| local user = AceConfigDialog.OpenFrames[appName]:GetUserDataTable() |
| AceConfigDialog:Open(appName, user.basepath and unpack(user.basepath)) |
| end |
| if AceConfigDialog.BlizOptions and AceConfigDialog.BlizOptions[appName] then |
| local widget = AceConfigDialog.BlizOptions[appName] |
| local user = widget:GetUserDataTable() |
| if widget:IsVisible() then |
| AceConfigDialog:Open(widget:GetUserData('appName'), widget, user.basepath and unpack(user.basepath)) |
| end |
| end |
| this.apps[appName] = nil |
| end |
| this:SetScript("OnUpdate", nil) |
| end |
| --- Close all open options windows |
| function AceConfigDialog:CloseAll() |
| AceConfigDialog.frame.closeAll = true |
| AceConfigDialog.frame:SetScript("OnUpdate", RefreshOnUpdate) |
| if next(self.OpenFrames) then |
| return true |
| end |
| end |
| --- Close a specific options window. |
| -- @param appName The application name as given to `:RegisterOptionsTable()` |
| function AceConfigDialog:Close(appName) |
| if self.OpenFrames[appName] then |
| AceConfigDialog.frame.closing[appName] = true |
| AceConfigDialog.frame:SetScript("OnUpdate", RefreshOnUpdate) |
| return true |
| end |
| end |
| -- Internal -- Called by AceConfigRegistry |
| function AceConfigDialog:ConfigTableChanged(event, appName) |
| AceConfigDialog.frame.apps[appName] = true |
| AceConfigDialog.frame:SetScript("OnUpdate", RefreshOnUpdate) |
| end |
| reg.RegisterCallback(AceConfigDialog, "ConfigTableChange", "ConfigTableChanged") |
| --- Sets the default size of the options window for a specific application. |
| -- @param appName The application name as given to `:RegisterOptionsTable()` |
| -- @param width The default width |
| -- @param height The default height |
| function AceConfigDialog:SetDefaultSize(appName, width, height) |
| local status = AceConfigDialog:GetStatusTable(appName) |
| if type(width) == "number" and type(height) == "number" then |
| status.width = width |
| status.height = height |
| end |
| end |
| --- Open an option window at the specified path (if any). |
| -- This function can optionally feed the group into a pre-created container |
| -- instead of creating a new container frame. |
| -- @paramsig appName [, container][, ...] |
| -- @param appName The application name as given to `:RegisterOptionsTable()` |
| -- @param container An optional container frame to feed the options into |
| -- @param ... The path to open after creating the options window (see `:SelectGroup` for details) |
| function AceConfigDialog:Open(appName, container, ...) |
| if not old_CloseSpecialWindows then |
| old_CloseSpecialWindows = CloseSpecialWindows |
| CloseSpecialWindows = function() |
| local found = old_CloseSpecialWindows() |
| return self:CloseAll() or found |
| end |
| end |
| local app = reg:GetOptionsTable(appName) |
| if not app then |
| error(("%s isn't registed with AceConfigRegistry, unable to open config"):format(appName), 2) |
| end |
| local options = app("dialog", MAJOR) |
| local f |
| local path = new() |
| local name = GetOptionsMemberValue("name", options, options, path, appName) |
| --If an optional path is specified add it to the path table before feeding the options |
| --as container is optional as well it may contain the first element of the path |
| if type(container) == "string" then |
| tinsert(path, container) |
| container = nil |
| end |
| for n = 1, select('#',...) do |
| tinsert(path, (select(n, ...))) |
| end |
| --if a container is given feed into that |
| if container then |
| f = container |
| f:ReleaseChildren() |
| f:SetUserData('appName', appName) |
| f:SetUserData('iscustom', true) |
| if #path > 0 then |
| f:SetUserData('basepath', copy(path)) |
| end |
| local status = AceConfigDialog:GetStatusTable(appName) |
| if not status.width then |
| status.width = 700 |
| end |
| if not status.height then |
| status.height = 500 |
| end |
| if f.SetStatusTable then |
| f:SetStatusTable(status) |
| end |
| if f.SetTitle then |
| f:SetTitle(name or "") |
| end |
| else |
| if not self.OpenFrames[appName] then |
| f = gui:Create("Frame") |
| self.OpenFrames[appName] = f |
| else |
| f = self.OpenFrames[appName] |
| end |
| f:ReleaseChildren() |
| f:SetCallback("OnClose", FrameOnClose) |
| f:SetUserData('appName', appName) |
| if #path > 0 then |
| f:SetUserData('basepath', copy(path)) |
| end |
| f:SetTitle(name or "") |
| local status = AceConfigDialog:GetStatusTable(appName) |
| f:SetStatusTable(status) |
| end |
| self:FeedGroup(appName,options,f,f,path,true) |
| if f.Show then |
| f:Show() |
| end |
| del(path) |
| end |
| AceConfigDialog.BlizOptions = AceConfigDialog.BlizOptions or {} |
| local function FeedToBlizPanel(widget, event) |
| local path = widget:GetUserData('path') |
| AceConfigDialog:Open(widget:GetUserData('appName'), widget, path and unpack(path)) |
| end |
| local function ClearBlizPanel(widget, event) |
| local appName = widget:GetUserData('appName') |
| AceConfigDialog.frame.closing[appName] = true |
| AceConfigDialog.frame:SetScript("OnUpdate", RefreshOnUpdate) |
| end |
| --- Add an option table into the Blizzard Interface Options panel. |
| -- You can optionally supply a descriptive name to use and a parent frame to use, |
| -- as well as a path in the options table.\\ |
| -- If no name is specified, the appName will be used instead. |
| -- |
| -- If you specify a proper `parent` (by name), the interface options will generate a |
| -- tree layout. Note that only one level of children is supported, so the parent always |
| -- has to be a head-level note. |
| -- |
| -- This function returns a reference to the container frame registered with the Interface |
| -- Options. You can use this reference to open the options with the API function |
| -- `InterfaceOptionsFrame_OpenToCategory`. |
| -- @param appName The application name as given to `:RegisterOptionsTable()` |
| -- @param name A descriptive name to display in the options tree (defaults to appName) |
| -- @param parent The parent to use in the interface options tree. |
| -- @param ... The path in the options table to feed into the interface options panel. |
| -- @return The reference to the frame registered into the Interface Options. |
| function AceConfigDialog:AddToBlizOptions(appName, name, parent, ...) |
| local BlizOptions = AceConfigDialog.BlizOptions |
| local key = appName |
| for n = 1, select('#', ...) do |
| key = key..'\001'..select(n, ...) |
| end |
| if not BlizOptions[key] then |
| local group = gui:Create("BlizOptionsGroup") |
| BlizOptions[key] = group |
| group:SetName(name or appName, parent) |
| group:SetTitle(name or appName) |
| group:SetUserData('appName', appName) |
| if select('#', ...) > 0 then |
| local path = {} |
| for n = 1, select('#',...) do |
| tinsert(path, (select(n, ...))) |
| end |
| group:SetUserData('path', path) |
| end |
| group:SetCallback("OnShow", FeedToBlizPanel) |
| group:SetCallback("OnHide", ClearBlizPanel) |
| InterfaceOptions_AddCategory(group.frame) |
| return group.frame |
| else |
| error(("%s has already been added to the Blizzard Options Window with the given path"):format(appName), 2) |
| end |
| end |
Libs/AceConfig-3.0/AceConfigCmd-3.0/AceConfigCmd-3.0.xml
New file
0,0 → 1,4
\ No newline at end of file
| <Ui xmlns="http://www.blizzard.com/wow/ui/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.blizzard.com/wow/ui/ |
| ..\FrameXML\UI.xsd"> |
| <Script file="AceConfigCmd-3.0.lua"/> |
| </Ui> |
Libs/AceConfig-3.0/AceConfigCmd-3.0/AceConfigCmd-3.0.lua
New file
0,0 → 1,757
| --- AceConfigCmd-3.0 handles access to an options table through the "command line" interface via the ChatFrames. |
| -- @class file |
| -- @name AceConfigCmd-3.0 |
| -- @release $Id: AceConfigCmd-3.0.lua 801 2009-04-09 20:34:28Z nevcairiel $ |
| --[[ |
| AceConfigCmd-3.0 |
| Handles commandline optionstable access |
| REQUIRES: AceConsole-3.0 for command registration (loaded on demand) |
| ]] |
| -- TODO: handle disabled / hidden |
| -- TODO: implement handlers for all types |
| -- TODO: plugin args |
| local MAJOR, MINOR = "AceConfigCmd-3.0", 9 |
| local AceConfigCmd = LibStub:NewLibrary(MAJOR, MINOR) |
| if not AceConfigCmd then return end |
| AceConfigCmd.commands = AceConfigCmd.commands or {} |
| local commands = AceConfigCmd.commands |
| local cfgreg = LibStub("AceConfigRegistry-3.0") |
| local AceConsole -- LoD |
| local AceConsoleName = "AceConsole-3.0" |
| local L = setmetatable({}, { -- TODO: replace with proper locale |
| __index = function(self,k) return k end |
| }) |
| local function print(msg) |
| (SELECTED_CHAT_FRAME or DEFAULT_CHAT_FRAME):AddMessage(msg) |
| end |
| -- pickfirstset() - picks the first non-nil value and returns it |
| local function pickfirstset(...) |
| for i=1,select("#",...) do |
| if select(i,...)~=nil then |
| return select(i,...) |
| end |
| end |
| end |
| -- err() - produce real error() regarding malformed options tables etc |
| local function err(info,inputpos,msg ) |
| local cmdstr=" "..strsub(info.input, 1, inputpos-1) |
| error(MAJOR..": /" ..info[0] ..cmdstr ..": "..(msg or "malformed options table"), 2) |
| end |
| -- usererr() - produce chatframe message regarding bad slash syntax etc |
| local function usererr(info,inputpos,msg ) |
| local cmdstr=strsub(info.input, 1, inputpos-1); |
| print("/" ..info[0] .. " "..cmdstr ..": "..(msg or "malformed options table")) |
| end |
| -- callmethod() - call a given named method (e.g. "get", "set") with given arguments |
| local function callmethod(info, inputpos, tab, methodtype, ...) |
| local method = info[methodtype] |
| if not method then |
| err(info, inputpos, "'"..methodtype.."': not set") |
| end |
| info.arg = tab.arg |
| info.option = tab |
| info.type = tab.type |
| if type(method)=="function" then |
| return method(info, ...) |
| elseif type(method)=="string" then |
| if type(info.handler[method])~="function" then |
| err(info, inputpos, "'"..methodtype.."': '"..method.."' is not a member function of "..tostring(info.handler)) |
| end |
| return info.handler[method](info.handler, info, ...) |
| else |
| assert(false) -- type should have already been checked on read |
| end |
| end |
| -- callfunction() - call a given named function (e.g. "name", "desc") with given arguments |
| local function callfunction(info, tab, methodtype, ...) |
| local method = tab[methodtype] |
| info.arg = tab.arg |
| info.option = tab |
| info.type = tab.type |
| if type(method)=="function" then |
| return method(info, ...) |
| else |
| assert(false) -- type should have already been checked on read |
| end |
| end |
| -- do_final() - do the final step (set/execute) along with validation and confirmation |
| local function do_final(info, inputpos, tab, methodtype, ...) |
| if info.validate then |
| local res = callmethod(info,inputpos,tab,"validate",...) |
| if type(res)=="string" then |
| usererr(info, inputpos, "'"..strsub(info.input, inputpos).."' - "..res) |
| return |
| end |
| end |
| -- console ignores .confirm |
| callmethod(info,inputpos,tab,methodtype, ...) |
| end |
| -- getparam() - used by handle() to retreive and store "handler", "get", "set", etc |
| local function getparam(info, inputpos, tab, depth, paramname, types, errormsg) |
| local old,oldat = info[paramname], info[paramname.."_at"] |
| local val=tab[paramname] |
| if val~=nil then |
| if val==false then |
| val=nil |
| elseif not types[type(val)] then |
| err(info, inputpos, "'" .. paramname.. "' - "..errormsg) |
| end |
| info[paramname] = val |
| info[paramname.."_at"] = depth |
| end |
| return old,oldat |
| end |
| -- iterateargs(tab) - custom iterator that iterates both t.args and t.plugins.* |
| local dummytable={} |
| local function iterateargs(tab) |
| if not tab.plugins then |
| return pairs(tab.args) |
| end |
| local argtabkey,argtab=next(tab.plugins) |
| local v |
| return function(_, k) |
| while argtab do |
| k,v = next(argtab, k) |
| if k then return k,v end |
| if argtab==tab.args then |
| argtab=nil |
| else |
| argtabkey,argtab = next(tab.plugins, argtabkey) |
| if not argtabkey then |
| argtab=tab.args |
| end |
| end |
| end |
| end |
| end |
| local function showhelp(info, inputpos, tab, noHead) |
| if not noHead then |
| print("|cff33ff99"..info.appName.."|r: Arguments to |cffffff78/"..info[0].."|r "..strsub(info.input,1,inputpos-1)..":") |
| end |
| local sortTbl = {} -- [1..n]=name |
| local refTbl = {} -- [name]=tableref |
| for k,v in iterateargs(tab) do |
| if not refTbl[k] then -- a plugin overriding something in .args |
| table.insert(sortTbl, k) |
| refTbl[k] = v |
| end |
| end |
| table.sort(sortTbl, function(one, two) |
| local o1 = refTbl[one].order or 100 |
| local o2 = refTbl[two].order or 100 |
| if type(o1) == "function" or type(o1) == "string" then |
| info.order = o1 |
| info[#info+1] = one |
| o1 = callmethod(info, inputpos, refTbl[one], "order") |
| info[#info] = nil |
| info.order = nil |
| end |
| if type(o2) == "function" or type(o1) == "string" then |
| info.order = o2 |
| info[#info+1] = two |
| o2 = callmethod(info, inputpos, refTbl[two], "order") |
| info[#info] = nil |
| info.order = nil |
| end |
| if o1<0 and o2<0 then return o1<o2 end |
| if o2<0 then return true end |
| if o1<0 then return false end |
| if o1==o2 then return tostring(one)<tostring(two) end -- compare names |
| return o1<o2 |
| end) |
| for _,k in ipairs(sortTbl) do |
| local v = refTbl[k] |
| if not pickfirstset(v.cmdHidden, v.hidden, false) then |
| -- recursively show all inline groups |
| local name, desc = v.name, v.desc |
| if type(name) == "function" then |
| name = callfunction(info, v, 'name') |
| end |
| if type(desc) == "function" then |
| desc = callfunction(info, v, 'desc') |
| end |
| if v.type == "group" and pickfirstset(v.cmdInline, v.inline, false) then |
| print(" "..(desc or name)..":") |
| showhelp(info, inputpos, v, true) |
| elseif v.type ~= "description" and v.type ~= "header" then |
| local key = k:gsub(" ", "_") |
| print(" |cffffff78"..key.."|r - "..(desc or name or "")) |
| end |
| end |
| end |
| end |
| local function keybindingValidateFunc(text) |
| if text == nil or text == "NONE" then |
| return nil |
| end |
| text = text:upper() |
| local shift, ctrl, alt |
| local modifier |
| while true do |
| if text == "-" then |
| break |
| end |
| modifier, text = strsplit('-', text, 2) |
| if text then |
| if modifier ~= "SHIFT" and modifier ~= "CTRL" and modifier ~= "ALT" then |
| return false |
| end |
| if modifier == "SHIFT" then |
| if shift then |
| return false |
| end |
| shift = true |
| end |
| if modifier == "CTRL" then |
| if ctrl then |
| return false |
| end |
| ctrl = true |
| end |
| if modifier == "ALT" then |
| if alt then |
| return false |
| end |
| alt = true |
| end |
| else |
| text = modifier |
| break |
| end |
| end |
| if text == "" then |
| return false |
| end |
| if not text:find("^F%d+$") and text ~= "CAPSLOCK" and text:len() ~= 1 and (text:byte() < 128 or text:len() > 4) and not _G["KEY_" .. text] then |
| return false |
| end |
| local s = text |
| if shift then |
| s = "SHIFT-" .. s |
| end |
| if ctrl then |
| s = "CTRL-" .. s |
| end |
| if alt then |
| s = "ALT-" .. s |
| end |
| return s |
| end |
| -- constants used by getparam() calls below |
| local handlertypes = {["table"]=true} |
| local handlermsg = "expected a table" |
| local functypes = {["function"]=true, ["string"]=true} |
| local funcmsg = "expected function or member name" |
| -- handle() - selfrecursing function that processes input->optiontable |
| -- - depth - starts at 0 |
| -- - retfalse - return false rather than produce error if a match is not found (used by inlined groups) |
| local function handle(info, inputpos, tab, depth, retfalse) |
| if not(type(tab)=="table" and type(tab.type)=="string") then err(info,inputpos) end |
| ------------------------------------------------------------------- |
| -- Grab hold of handler,set,get,func,etc if set (and remember old ones) |
| -- Note that we do NOT validate if method names are correct at this stage, |
| -- the handler may change before they're actually used! |
| local oldhandler,oldhandler_at = getparam(info,inputpos,tab,depth,"handler",handlertypes,handlermsg) |
| local oldset,oldset_at = getparam(info,inputpos,tab,depth,"set",functypes,funcmsg) |
| local oldget,oldget_at = getparam(info,inputpos,tab,depth,"get",functypes,funcmsg) |
| local oldfunc,oldfunc_at = getparam(info,inputpos,tab,depth,"func",functypes,funcmsg) |
| local oldvalidate,oldvalidate_at = getparam(info,inputpos,tab,depth,"validate",functypes,funcmsg) |
| --local oldconfirm,oldconfirm_at = getparam(info,inputpos,tab,depth,"confirm",functypes,funcmsg) |
| ------------------------------------------------------------------- |
| -- Act according to .type of this table |
| if tab.type=="group" then |
| ------------ group -------------------------------------------- |
| if type(tab.args)~="table" then err(info, inputpos) end |
| if tab.plugins and type(tab.plugins)~="table" then err(info,inputpos) end |
| -- grab next arg from input |
| local _,nextpos,arg = string.find(info.input, " *([^ ]+) *", inputpos) |
| if not arg then |
| showhelp(info, inputpos, tab) |
| return |
| end |
| nextpos=nextpos+1 |
| -- loop .args and try to find a key with a matching name |
| for k,v in iterateargs(tab) do |
| if not(type(k)=="string" and type(v)=="table" and type(v.type)=="string") then err(info,inputpos, "options table child '"..tostring(k).."' is malformed") end |
| -- is this child an inline group? if so, traverse into it |
| if v.type=="group" and pickfirstset(v.cmdInline, v.inline, false) then |
| info[depth+1] = k |
| if handle(info, inputpos, v, depth+1, true)==false then |
| info[depth+1] = nil |
| -- wasn't found in there, but that's ok, we just keep looking down here |
| else |
| return -- done, name was found in inline group |
| end |
| -- matching name and not a inline group |
| elseif strlower(arg)==strlower(k:gsub(" ", "_")) then |
| info[depth+1] = k |
| return handle(info,nextpos,v,depth+1) |
| end |
| end |
| -- no match |
| if retfalse then |
| -- restore old infotable members and return false to indicate failure |
| info.handler,info.handler_at = oldhandler,oldhandler_at |
| info.set,info.set_at = oldset,oldset_at |
| info.get,info.get_at = oldget,oldget_at |
| info.func,info.func_at = oldfunc,oldfunc_at |
| info.validate,info.validate_at = oldvalidate,oldvalidate_at |
| --info.confirm,info.confirm_at = oldconfirm,oldconfirm_at |
| return false |
| end |
| -- couldn't find the command, display error |
| usererr(info, inputpos, "'"..arg.."' - " .. L["unknown argument"]) |
| return |
| end |
| local str = strsub(info.input,inputpos); |
| if tab.type=="execute" then |
| ------------ execute -------------------------------------------- |
| do_final(info, inputpos, tab, "func") |
| elseif tab.type=="input" then |
| ------------ input -------------------------------------------- |
| local res = true |
| if tab.pattern then |
| if not(type(tab.pattern)=="string") then err(info, inputpos, "'pattern' - expected a string") end |
| if not strmatch(str, tab.pattern) then |
| usererr(info, inputpos, "'"..str.."' - " .. L["invalid input"]) |
| return |
| end |
| end |
| do_final(info, inputpos, tab, "set", str) |
| elseif tab.type=="toggle" then |
| ------------ toggle -------------------------------------------- |
| local b |
| local str = strtrim(strlower(str)) |
| if str=="" then |
| b = callmethod(info, inputpos, tab, "get") |
| if tab.tristate then |
| --cycle in true, nil, false order |
| if b then |
| b = nil |
| elseif b == nil then |
| b = false |
| else |
| b = true |
| end |
| else |
| b = not b |
| end |
| elseif str==L["on"] then |
| b = true |
| elseif str==L["off"] then |
| b = false |
| elseif tab.tristate and str==L["default"] then |
| b = nil |
| else |
| if tab.tristate then |
| usererr(info, inputpos, format(L["'%s' - expected 'on', 'off' or 'default', or no argument to toggle."], str)) |
| else |
| usererr(info, inputpos, format(L["'%s' - expected 'on' or 'off', or no argument to toggle."], str)) |
| end |
| return |
| end |
| do_final(info, inputpos, tab, "set", b) |
| elseif tab.type=="range" then |
| ------------ range -------------------------------------------- |
| local val = tonumber(str) |
| if not val then |
| usererr(info, inputpos, "'"..str.."' - "..L["expected number"]) |
| return |
| end |
| if type(info.step)=="number" then |
| val = val- (val % info.step) |
| end |
| if type(info.min)=="number" and val<info.min then |
| usererr(info, inputpos, val.." - "..format(L["must be equal to or higher than %s"], tostring(info.min)) ) |
| return |
| end |
| if type(info.max)=="number" and val>info.max then |
| usererr(info, inputpos, val.." - "..format(L["must be equal to or lower than %s"], tostring(info.max)) ) |
| return |
| end |
| do_final(info, inputpos, tab, "set", val) |
| elseif tab.type=="select" then |
| ------------ select ------------------------------------ |
| local str = strtrim(strlower(str)) |
| local values = tab.values |
| if type(values) == "function" or type(values) == "string" then |
| info.values = values |
| values = callmethod(info, inputpos, tab, "values") |
| info.values = nil |
| end |
| if str == "" then |
| local b = callmethod(info, inputpos, tab, "get") |
| local fmt = "|cffffff78- [%s]|r %s" |
| local fmt_sel = "|cffffff78- [%s]|r %s |cffff0000*|r" |
| print(L["Options for |cffffff78"..info[#info].."|r:"]) |
| for k, v in pairs(values) do |
| if b == k then |
| print(fmt_sel:format(k, v)) |
| else |
| print(fmt:format(k, v)) |
| end |
| end |
| return |
| end |
| local ok |
| for k,v in pairs(values) do |
| if strlower(k)==str then |
| str = k -- overwrite with key (in case of case mismatches) |
| ok = true |
| break |
| end |
| end |
| if not ok then |
| usererr(info, inputpos, "'"..str.."' - "..L["unknown selection"]) |
| return |
| end |
| do_final(info, inputpos, tab, "set", str) |
| elseif tab.type=="multiselect" then |
| ------------ multiselect ------------------------------------------- |
| local str = strtrim(strlower(str)) |
| local values = tab.values |
| if type(values) == "function" or type(values) == "string" then |
| info.values = values |
| values = callmethod(info, inputpos, tab, "values") |
| info.values = nil |
| end |
| if str == "" then |
| local fmt = "|cffffff78- [%s]|r %s" |
| local fmt_sel = "|cffffff78- [%s]|r %s |cffff0000*|r" |
| print(L["Options for |cffffff78"..info[#info].."|r (multiple possible):"]) |
| for k, v in pairs(values) do |
| if callmethod(info, inputpos, tab, "get", k) then |
| print(fmt_sel:format(k, v)) |
| else |
| print(fmt:format(k, v)) |
| end |
| end |
| return |
| end |
| --build a table of the selections, checking that they exist |
| --parse for =on =off =default in the process |
| --table will be key = true for options that should toggle, key = [on|off|default] for options to be set |
| local sels = {} |
| for v in string.gmatch(str, "[^ ]+") do |
| --parse option=on etc |
| local opt, val = string.match(v,'(.+)=(.+)') |
| --get option if toggling |
| if not opt then |
| opt = v |
| end |
| --check that the opt is valid |
| local ok |
| for k,v in pairs(values) do |
| if strlower(k)==opt then |
| opt = k -- overwrite with key (in case of case mismatches) |
| ok = true |
| break |
| end |
| end |
| if not ok then |
| usererr(info, inputpos, "'"..opt.."' - "..L["unknown selection"]) |
| return |
| end |
| --check that if val was supplied it is valid |
| if val then |
| if val == L["on"] or val == L["off"] or (tab.tristate and val == L["default"]) then |
| --val is valid insert it |
| sels[opt] = val |
| else |
| if tab.tristate then |
| usererr(info, inputpos, format(L["'%s' '%s' - expected 'on', 'off' or 'default', or no argument to toggle."], v, val)) |
| else |
| usererr(info, inputpos, format(L["'%s' '%s' - expected 'on' or 'off', or no argument to toggle."], v, val)) |
| end |
| return |
| end |
| else |
| -- no val supplied, toggle |
| sels[opt] = true |
| end |
| end |
| for opt, val in pairs(sels) do |
| local newval |
| if (val == true) then |
| --toggle the option |
| local b = callmethod(info, inputpos, tab, "get", opt) |
| if tab.tristate then |
| --cycle in true, nil, false order |
| if b then |
| b = nil |
| elseif b == nil then |
| b = false |
| else |
| b = true |
| end |
| else |
| b = not b |
| end |
| newval = b |
| else |
| --set the option as specified |
| if val==L["on"] then |
| newval = true |
| elseif val==L["off"] then |
| newval = false |
| elseif val==L["default"] then |
| newval = nil |
| end |
| end |
| do_final(info, inputpos, tab, "set", opt, newval) |
| end |
| elseif tab.type=="color" then |
| ------------ color -------------------------------------------- |
| local str = strtrim(strlower(str)) |
| if str == "" then |
| --TODO: Show current value |
| return |
| end |
| local r, g, b, a |
| if tab.hasAlpha then |
| if str:len() == 8 and str:find("^%x*$") then |
| --parse a hex string |
| r,g,b,a = tonumber(str:sub(1, 2), 16) / 255, tonumber(str:sub(3, 4), 16) / 255, tonumber(str:sub(5, 6), 16) / 255, tonumber(str:sub(7, 8), 16) / 255 |
| else |
| --parse seperate values |
| r,g,b,a = str:match("^([%d%.]+) ([%d%.]+) ([%d%.]+) ([%d%.]+)$") |
| r,g,b,a = tonumber(r), tonumber(g), tonumber(b), tonumber(a) |
| end |
| if not (r and g and b and a) then |
| usererr(info, inputpos, format(L["'%s' - expected 'RRGGBBAA' or 'r g b a'."], str)) |
| return |
| end |
| if r >= 0.0 and r <= 1.0 and g >= 0.0 and g <= 1.0 and b >= 0.0 and b <= 1.0 and a >= 0.0 and a <= 1.0 then |
| --values are valid |
| elseif r >= 0 and r <= 255 and g >= 0 and g <= 255 and b >= 0 and b <= 255 and a >= 0 and a <= 255 then |
| --values are valid 0..255, convert to 0..1 |
| r = r / 255 |
| g = g / 255 |
| b = b / 255 |
| a = a / 255 |
| else |
| --values are invalid |
| usererr(info, inputpos, format(L["'%s' - values must all be either in the range 0..1 or 0..255."], str)) |
| end |
| else |
| a = 1.0 |
| if str:len() == 6 and str:find("^%x*$") then |
| --parse a hex string |
| r,g,b = tonumber(str:sub(1, 2), 16) / 255, tonumber(str:sub(3, 4), 16) / 255, tonumber(str:sub(5, 6), 16) / 255 |
| else |
| --parse seperate values |
| r,g,b = str:match("^([%d%.]+) ([%d%.]+) ([%d%.]+)$") |
| r,g,b = tonumber(r), tonumber(g), tonumber(b) |
| end |
| if not (r and g and b) then |
| usererr(info, inputpos, format(L["'%s' - expected 'RRGGBB' or 'r g b'."], str)) |
| return |
| end |
| if r >= 0.0 and r <= 1.0 and g >= 0.0 and g <= 1.0 and b >= 0.0 and b <= 1.0 then |
| --values are valid |
| elseif r >= 0 and r <= 255 and g >= 0 and g <= 255 and b >= 0 and b <= 255 then |
| --values are valid 0..255, convert to 0..1 |
| r = r / 255 |
| g = g / 255 |
| b = b / 255 |
| else |
| --values are invalid |
| usererr(info, inputpos, format(L["'%s' - values must all be either in the range 0-1 or 0-255."], str)) |
| end |
| end |
| do_final(info, inputpos, tab, "set", r,g,b,a) |
| elseif tab.type=="keybinding" then |
| ------------ keybinding -------------------------------------------- |
| local str = strtrim(strlower(str)) |
| if str == "" then |
| --TODO: Show current value |
| return |
| end |
| local value = keybindingValidateFunc(str:upper()) |
| if value == false then |
| usererr(info, inputpos, format(L["'%s' - Invalid Keybinding."], str)) |
| return |
| end |
| do_final(info, inputpos, tab, "set", value) |
| elseif tab.type=="description" then |
| ------------ description -------------------- |
| -- ignore description, GUI config only |
| else |
| err(info, inputpos, "unknown options table item type '"..tostring(tab.type).."'") |
| end |
| end |
| --- Handle the chat command. |
| -- This is usually called from a chat command handler to parse the command input as operations on an aceoptions table.\\ |
| -- AceConfigCmd uses this function internally when a slash command is registered with `:CreateChatCommand` |
| -- @param slashcmd The slash command WITHOUT leading slash (only used for error output) |
| -- @param appName The application name as given to `:RegisterOptionsTable()` |
| -- @param input The commandline input (as given by the WoW handler, i.e. without the command itself) |
| -- @usage |
| -- MyAddon = LibStub("AceAddon-3.0"):NewAddon("MyAddon", "AceConsole-3.0") |
| -- -- Use AceConsole-3.0 to register a Chat Command |
| -- MyAddon:RegisterChatCommand("mychat", "ChatCommand") |
| -- |
| -- -- Show the GUI if no input is supplied, otherwise handle the chat input. |
| -- function MyAddon:ChatCommand(input) |
| -- -- Assuming "MyOptions" is the appName of a valid options table |
| -- if not input or input:trim() == "" then |
| -- LibStub("AceConfigDialog-3.0"):Open("MyOptions") |
| -- else |
| -- LibStub("AceConfigCmd-3.0").HandleCommand(MyAddon, "mychat", "MyOptions", input) |
| -- end |
| -- end |
| function AceConfigCmd:HandleCommand(slashcmd, appName, input) |
| local optgetter = cfgreg:GetOptionsTable(appName) |
| if not optgetter then |
| error([[Usage: HandleCommand("slashcmd", "appName", "input"): 'appName' - no options table "]]..tostring(appName)..[[" has been registered]], 2) |
| end |
| local options = assert( optgetter("cmd", MAJOR) ) |
| local info = { -- Don't try to recycle this, it gets handed off to callbacks and whatnot |
| [0] = slashcmd, |
| appName = appName, |
| options = options, |
| input = input, |
| self = self, |
| handler = self, |
| uiType = "cmd", |
| uiName = MAJOR, |
| } |
| handle(info, 1, options, 0) -- (info, inputpos, table, depth) |
| end |
| --- Utility function to create a slash command handler. |
| -- Also registers tab completion with AceTab |
| -- @param slashcmd The slash command WITHOUT leading slash (only used for error output) |
| -- @param appName The application name as given to `:RegisterOptionsTable()` |
| function AceConfigCmd:CreateChatCommand(slashcmd, appName) |
| if not AceConsole then |
| AceConsole = LibStub(AceConsoleName) |
| end |
| if AceConsole.RegisterChatCommand(self, slashcmd, function(input) |
| AceConfigCmd.HandleCommand(self, slashcmd, appName, input) -- upgradable |
| end, |
| true) then -- succesfully registered so lets get the command -> app table in |
| commands[slashcmd] = appName |
| end |
| end |
| --- Utility function that returns the options table that belongs to a slashcommand. |
| -- Designed to be used for the AceTab interface. |
| -- @param slashcmd The slash command WITHOUT leading slash (only used for error output) |
| -- @return The options table associated with the slash command (or nil if the slash command was not registered) |
| function AceConfigCmd:GetChatCommandOptions(slashcmd) |
| return commands[slashcmd] |
| end |
Libs/AceConfig-3.0/AceConfigRegistry-3.0/AceConfigRegistry-3.0.xml
New file
0,0 → 1,4
\ No newline at end of file
| <Ui xmlns="http://www.blizzard.com/wow/ui/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.blizzard.com/wow/ui/ |
| ..\FrameXML\UI.xsd"> |
| <Script file="AceConfigRegistry-3.0.lua"/> |
| </Ui> |
Libs/AceConfig-3.0/AceConfigRegistry-3.0/AceConfigRegistry-3.0.lua
New file
0,0 → 1,336
| --- AceConfigRegistry-3.0 handles central registration of options tables in use by addons and modules.\\ |
| -- Options tables can be registered as raw tables, OR as function refs that return a table.\\ |
| -- Such functions receive three arguments: "uiType", "uiName", "appName". \\ |
| -- * Valid **uiTypes**: "cmd", "dropdown", "dialog". This is verified by the library at call time. \\ |
| -- * The **uiName** field is expected to contain the full name of the calling addon, including version, e.g. "FooBar-1.0". This is verified by the library at call time.\\ |
| -- * The **appName** field is the options table name as given at registration time \\ |
| -- |
| -- :IterateOptionsTables() (and :GetOptionsTable() if only given one argument) return a function reference that the requesting config handling addon must call with valid "uiType", "uiName". |
| -- @class file |
| -- @name AceConfigRegistry-3.0 |
| -- @release $Id: AceConfigRegistry-3.0.lua 832 2009-09-01 11:03:04Z nevcairiel $ |
| local MAJOR, MINOR = "AceConfigRegistry-3.0", 11 |
| local AceConfigRegistry = LibStub:NewLibrary(MAJOR, MINOR) |
| if not AceConfigRegistry then return end |
| AceConfigRegistry.tables = AceConfigRegistry.tables or {} |
| local CallbackHandler = LibStub:GetLibrary("CallbackHandler-1.0") |
| if not AceConfigRegistry.callbacks then |
| AceConfigRegistry.callbacks = CallbackHandler:New(AceConfigRegistry) |
| end |
| ----------------------------------------------------------------------- |
| -- Validating options table consistency: |
| AceConfigRegistry.validated = { |
| -- list of options table names ran through :ValidateOptionsTable automatically. |
| -- CLEARED ON PURPOSE, since newer versions may have newer validators |
| cmd = {}, |
| dropdown = {}, |
| dialog = {}, |
| } |
| local function err(msg, errlvl, ...) |
| local t = {} |
| for i=select("#",...),1,-1 do |
| tinsert(t, (select(i, ...))) |
| end |
| error(MAJOR..":ValidateOptionsTable(): "..table.concat(t,".")..msg, errlvl+2) |
| end |
| local isstring={["string"]=true, _="string"} |
| local isstringfunc={["string"]=true,["function"]=true, _="string or funcref"} |
| local istable={["table"]=true, _="table"} |
| local ismethodtable={["table"]=true,["string"]=true,["function"]=true, _="methodname, funcref or table"} |
| local optstring={["nil"]=true,["string"]=true, _="string"} |
| local optstringfunc={["nil"]=true,["string"]=true,["function"]=true, _="string or funcref"} |
| local optnumber={["nil"]=true,["number"]=true, _="number"} |
| local optmethod={["nil"]=true,["string"]=true,["function"]=true, _="methodname or funcref"} |
| local optmethodfalse={["nil"]=true,["string"]=true,["function"]=true,["boolean"]={[false]=true}, _="methodname, funcref or false"} |
| local optmethodnumber={["nil"]=true,["string"]=true,["function"]=true,["number"]=true, _="methodname, funcref or number"} |
| local optmethodtable={["nil"]=true,["string"]=true,["function"]=true,["table"]=true, _="methodname, funcref or table"} |
| local optmethodbool={["nil"]=true,["string"]=true,["function"]=true,["boolean"]=true, _="methodname, funcref or boolean"} |
| local opttable={["nil"]=true,["table"]=true, _="table"} |
| local optbool={["nil"]=true,["boolean"]=true, _="boolean"} |
| local optboolnumber={["nil"]=true,["boolean"]=true,["number"]=true, _="boolean or number"} |
| local basekeys={ |
| type=isstring, |
| name=isstringfunc, |
| desc=optstringfunc, |
| descStyle=optstring, |
| order=optmethodnumber, |
| validate=optmethodfalse, |
| confirm=optmethodbool, |
| confirmText=optstring, |
| disabled=optmethodbool, |
| hidden=optmethodbool, |
| guiHidden=optmethodbool, |
| dialogHidden=optmethodbool, |
| dropdownHidden=optmethodbool, |
| cmdHidden=optmethodbool, |
| icon=optstringfunc, |
| iconCoords=optmethodtable, |
| handler=opttable, |
| get=optmethodfalse, |
| set=optmethodfalse, |
| func=optmethodfalse, |
| arg={["*"]=true}, |
| width=optstring, |
| } |
| local typedkeys={ |
| header={}, |
| description={ |
| image=optstringfunc, |
| imageCoords=optmethodtable, |
| imageHeight=optnumber, |
| imageWidth=optnumber, |
| fontSize=optstringfunc, |
| }, |
| group={ |
| args=istable, |
| plugins=opttable, |
| inline=optbool, |
| cmdInline=optbool, |
| guiInline=optbool, |
| dropdownInline=optbool, |
| dialogInline=optbool, |
| childGroups=optstring, |
| }, |
| execute={ |
| image=optstringfunc, |
| imageCoords=optmethodtable, |
| imageHeight=optnumber, |
| imageWidth=optnumber, |
| }, |
| input={ |
| pattern=optstring, |
| usage=optstring, |
| control=optstring, |
| dialogControl=optstring, |
| dropdownControl=optstring, |
| multiline=optboolnumber, |
| }, |
| toggle={ |
| tristate=optbool, |
| }, |
| tristate={ |
| }, |
| range={ |
| min=optnumber, |
| max=optnumber, |
| step=optnumber, |
| bigStep=optnumber, |
| isPercent=optbool, |
| }, |
| select={ |
| values=ismethodtable, |
| style={ |
| ["nil"]=true, |
| ["string"]={dropdown=true,radio=true}, |
| _="string: 'dropdown' or 'radio'" |
| }, |
| control=optstring, |
| dialogControl=optstring, |
| dropdownControl=optstring, |
| }, |
| multiselect={ |
| values=ismethodtable, |
| style=optstring, |
| tristate=optbool, |
| control=optstring, |
| dialogControl=optstring, |
| dropdownControl=optstring, |
| }, |
| color={ |
| hasAlpha=optbool, |
| }, |
| keybinding={ |
| -- TODO |
| }, |
| } |
| local function validateKey(k,errlvl,...) |
| errlvl=(errlvl or 0)+1 |
| if type(k)~="string" then |
| err("["..tostring(k).."] - key is not a string", errlvl,...) |
| end |
| if strfind(k, "[%c\127]") then |
| err("["..tostring(k).."] - key name contained control characters", errlvl,...) |
| end |
| end |
| local function validateVal(v, oktypes, errlvl,...) |
| errlvl=(errlvl or 0)+1 |
| local isok=oktypes[type(v)] or oktypes["*"] |
| if not isok then |
| err(": expected a "..oktypes._..", got '"..tostring(v).."'", errlvl,...) |
| end |
| if type(isok)=="table" then -- isok was a table containing specific values to be tested for! |
| if not isok[v] then |
| err(": did not expect "..type(v).." value '"..tostring(v).."'", errlvl,...) |
| end |
| end |
| end |
| local function validate(options,errlvl,...) |
| errlvl=(errlvl or 0)+1 |
| -- basic consistency |
| if type(options)~="table" then |
| err(": expected a table, got a "..type(options), errlvl,...) |
| end |
| if type(options.type)~="string" then |
| err(".type: expected a string, got a "..type(options.type), errlvl,...) |
| end |
| -- get type and 'typedkeys' member |
| local tk = typedkeys[options.type] |
| if not tk then |
| err(".type: unknown type '"..options.type.."'", errlvl,...) |
| end |
| -- make sure that all options[] are known parameters |
| for k,v in pairs(options) do |
| if not (tk[k] or basekeys[k]) then |
| err(": unknown parameter", errlvl,tostring(k),...) |
| end |
| end |
| -- verify that required params are there, and that everything is the right type |
| for k,oktypes in pairs(basekeys) do |
| validateVal(options[k], oktypes, errlvl,k,...) |
| end |
| for k,oktypes in pairs(tk) do |
| validateVal(options[k], oktypes, errlvl,k,...) |
| end |
| -- extra logic for groups |
| if options.type=="group" then |
| for k,v in pairs(options.args) do |
| validateKey(k,errlvl,"args",...) |
| validate(v, errlvl,k,"args",...) |
| end |
| if options.plugins then |
| for plugname,plugin in pairs(options.plugins) do |
| if type(plugin)~="table" then |
| err(": expected a table, got '"..tostring(plugin).."'", errlvl,tostring(plugname),"plugins",...) |
| end |
| for k,v in pairs(plugin) do |
| validateKey(k,errlvl,tostring(plugname),"plugins",...) |
| validate(v, errlvl,k,tostring(plugname),"plugins",...) |
| end |
| end |
| end |
| end |
| end |
| --- Validates basic structure and integrity of an options table \\ |
| -- Does NOT verify that get/set etc actually exist, since they can be defined at any depth |
| -- @param options The table to be validated |
| -- @param name The name of the table to be validated (shown in any error message) |
| -- @param errlvl (optional number) error level offset, default 0 (=errors point to the function calling :ValidateOptionsTable) |
| function AceConfigRegistry:ValidateOptionsTable(options,name,errlvl) |
| errlvl=(errlvl or 0)+1 |
| name = name or "Optionstable" |
| if not options.name then |
| options.name=name -- bit of a hack, the root level doesn't really need a .name :-/ |
| end |
| validate(options,errlvl,name) |
| end |
| --- Fires a "ConfigTableChange" callback for those listening in on it, allowing config GUIs to refresh. |
| -- You should call this function if your options table changed from any outside event, like a game event |
| -- or a timer. |
| -- @param appName The application name as given to `:RegisterOptionsTable()` |
| function AceConfigRegistry:NotifyChange(appName) |
| if not AceConfigRegistry.tables[appName] then return end |
| AceConfigRegistry.callbacks:Fire("ConfigTableChange", appName) |
| end |
| -- ------------------------------------------------------------------- |
| -- Registering and retreiving options tables: |
| -- validateGetterArgs: helper function for :GetOptionsTable (or, rather, the getter functions returned by it) |
| local function validateGetterArgs(uiType, uiName, errlvl) |
| errlvl=(errlvl or 0)+2 |
| if uiType~="cmd" and uiType~="dropdown" and uiType~="dialog" then |
| error(MAJOR..": Requesting options table: 'uiType' - invalid configuration UI type, expected 'cmd', 'dropdown' or 'dialog'", errlvl) |
| end |
| if not strmatch(uiName, "[A-Za-z]%-[0-9]") then -- Expecting e.g. "MyLib-1.2" |
| error(MAJOR..": Requesting options table: 'uiName' - badly formatted or missing version number. Expected e.g. 'MyLib-1.2'", errlvl) |
| end |
| end |
| --- Register an options table with the config registry. |
| -- @param appName The application name as given to `:RegisterOptionsTable()` |
| -- @param options The options table, OR a function reference that generates it on demand. \\ |
| -- See the top of the page for info on arguments passed to such functions. |
| function AceConfigRegistry:RegisterOptionsTable(appName, options) |
| if type(options)=="table" then |
| if options.type~="group" then -- quick sanity checker |
| error(MAJOR..": RegisterOptionsTable(appName, options): 'options' - missing type='group' member in root group", 2) |
| end |
| AceConfigRegistry.tables[appName] = function(uiType, uiName, errlvl) |
| errlvl=(errlvl or 0)+1 |
| validateGetterArgs(uiType, uiName, errlvl) |
| if not AceConfigRegistry.validated[uiType][appName] then |
| AceConfigRegistry:ValidateOptionsTable(options, appName, errlvl) -- upgradable |
| AceConfigRegistry.validated[uiType][appName] = true |
| end |
| return options |
| end |
| elseif type(options)=="function" then |
| AceConfigRegistry.tables[appName] = function(uiType, uiName, errlvl) |
| errlvl=(errlvl or 0)+1 |
| validateGetterArgs(uiType, uiName, errlvl) |
| local tab = assert(options(uiType, uiName, appName)) |
| if not AceConfigRegistry.validated[uiType][appName] then |
| AceConfigRegistry:ValidateOptionsTable(tab, appName, errlvl) -- upgradable |
| AceConfigRegistry.validated[uiType][appName] = true |
| end |
| return tab |
| end |
| else |
| error(MAJOR..": RegisterOptionsTable(appName, options): 'options' - expected table or function reference", 2) |
| end |
| end |
| --- Returns an iterator of ["appName"]=funcref pairs |
| function AceConfigRegistry:IterateOptionsTables() |
| return pairs(AceConfigRegistry.tables) |
| end |
| --- Query the registry for a specific options table. |
| -- If only appName is given, a function is returned which you |
| -- can call with (uiType,uiName) to get the table.\\ |
| -- If uiType&uiName are given, the table is returned. |
| -- @param appName The application name as given to `:RegisterOptionsTable()` |
| -- @param uiType The type of UI to get the table for, one of "cmd", "dropdown", "dialog" |
| -- @param uiName The name of the library/addon querying for the table, e.g. "MyLib-1.0" |
| function AceConfigRegistry:GetOptionsTable(appName, uiType, uiName) |
| local f = AceConfigRegistry.tables[appName] |
| if not f then |
| return nil |
| end |
| if uiType then |
| return f(uiType,uiName,1) -- get the table for us |
| else |
| return f -- return the function |
| end |
| end |
Libs/AceDB-3.0/AceDB-3.0.xml
New file
0,0 → 1,4
\ No newline at end of file
| <Ui xmlns="http://www.blizzard.com/wow/ui/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.blizzard.com/wow/ui/ |
| ..\FrameXML\UI.xsd"> |
| <Script file="AceDB-3.0.lua"/> |
| </Ui> |
Libs/AceDB-3.0/AceDB-3.0.lua
New file
0,0 → 1,695
| --- **AceDB-3.0** manages the SavedVariables of your addon. |
| -- It offers profile management, smart defaults and namespaces for modules.\\ |
| -- Data can be saved in different data-types, depending on its intended usage. |
| -- The most common data-type is the `profile` type, which allows the user to choose |
| -- the active profile, and manage the profiles of all of his characters.\\ |
| -- The following data types are available: |
| -- * **char** Character-specific data. Every character has its own database. |
| -- * **realm** Realm-specific data. All of the players characters on the same realm share this database. |
| -- * **class** Class-specific data. All of the players characters of the same class share this database. |
| -- * **race** Race-specific data. All of the players characters of the same race share this database. |
| -- * **faction** Faction-specific data. All of the players characters of the same faction share this database. |
| -- * **factionrealm** Faction and realm specific data. All of the players characters on the same realm and of the same faction share this database. |
| -- * **global** Global Data. All characters on the same account share this database. |
| -- * **profile** Profile-specific data. All characters using the same profile share this database. The user can control which profile should be used. |
| -- |
| -- Creating a new Database using the `:New` function will return a new DBObject. A database will inherit all functions |
| -- of the DBObjectLib listed here. \\ |
| -- If you create a new namespaced child-database (`:RegisterNamespace`), you'll get a DBObject as well, but note |
| -- that the child-databases cannot individually change their profile, and are linked to their parents profile - and because of that, |
| -- the profile related APIs are not available. Only `:RegisterDefaults` and `:ResetProfile` are available on child-databases. |
| -- |
| -- For more details on how to use AceDB-3.0, see the [[AceDB-3.0 Tutorial]]. |
| -- |
| -- You may also be interested in [[libdualspec-1-0|LibDualSpec-1.0]] to do profile switching automatically when switching specs. |
| -- |
| -- @usage |
| -- MyAddon = LibStub("AceAddon-3.0"):NewAddon("DBExample") |
| -- |
| -- -- declare defaults to be used in the DB |
| -- local defaults = { |
| -- profile = { |
| -- setting = true, |
| -- } |
| -- } |
| -- |
| -- function MyAddon:OnInitialize() |
| -- -- Assuming the .toc says ## SavedVariables: MyAddonDB |
| -- self.db = LibStub("AceDB-3.0"):New("MyAddonDB", defaults, true) |
| -- end |
| -- @class file |
| -- @name AceDB-3.0.lua |
| -- @release $Id: AceDB-3.0.lua 840 2009-09-10 10:24:32Z nevcairiel $ |
| local ACEDB_MAJOR, ACEDB_MINOR = "AceDB-3.0", 17 |
| local AceDB, oldminor = LibStub:NewLibrary(ACEDB_MAJOR, ACEDB_MINOR) |
| if not AceDB then return end -- No upgrade needed |
| local _G = getfenv(0) |
| local type = type |
| local pairs, next = pairs, next |
| local rawget, rawset = rawget, rawset |
| local setmetatable = setmetatable |
| AceDB.db_registry = AceDB.db_registry or {} |
| AceDB.frame = AceDB.frame or CreateFrame("Frame") |
| local CallbackHandler |
| local CallbackDummy = { Fire = function() end } |
| local DBObjectLib = {} |
| --[[------------------------------------------------------------------------- |
| AceDB Utility Functions |
| ---------------------------------------------------------------------------]] |
| -- Simple shallow copy for copying defaults |
| local function copyTable(src, dest) |
| if type(dest) ~= "table" then dest = {} end |
| if type(src) == "table" then |
| for k,v in pairs(src) do |
| if type(v) == "table" then |
| -- try to index the key first so that the metatable creates the defaults, if set, and use that table |
| v = copyTable(v, dest[k]) |
| end |
| dest[k] = v |
| end |
| end |
| return dest |
| end |
| -- Called to add defaults to a section of the database |
| -- |
| -- When a ["*"] default section is indexed with a new key, a table is returned |
| -- and set in the host table. These tables must be cleaned up by removeDefaults |
| -- in order to ensure we don't write empty default tables. |
| local function copyDefaults(dest, src) |
| -- this happens if some value in the SV overwrites our default value with a non-table |
| --if type(dest) ~= "table" then return end |
| for k, v in pairs(src) do |
| if k == "*" or k == "**" then |
| if type(v) == "table" then |
| -- This is a metatable used for table defaults |
| local mt = { |
| -- This handles the lookup and creation of new subtables |
| __index = function(t,k) |
| if k == nil then return nil end |
| local tbl = {} |
| copyDefaults(tbl, v) |
| rawset(t, k, tbl) |
| return tbl |
| end, |
| } |
| setmetatable(dest, mt) |
| -- handle already existing tables in the SV |
| for dk, dv in pairs(dest) do |
| if not rawget(src, dk) and type(dv) == "table" then |
| copyDefaults(dv, v) |
| end |
| end |
| else |
| -- Values are not tables, so this is just a simple return |
| local mt = {__index = function(t,k) return k~=nil and v or nil end} |
| setmetatable(dest, mt) |
| end |
| elseif type(v) == "table" then |
| if not rawget(dest, k) then rawset(dest, k, {}) end |
| if type(dest[k]) == "table" then |
| copyDefaults(dest[k], v) |
| if src['**'] then |
| copyDefaults(dest[k], src['**']) |
| end |
| end |
| else |
| if rawget(dest, k) == nil then |
| rawset(dest, k, v) |
| end |
| end |
| end |
| end |
| -- Called to remove all defaults in the default table from the database |
| local function removeDefaults(db, defaults, blocker) |
| -- remove all metatables from the db, so we don't accidentally create new sub-tables through them |
| setmetatable(db, nil) |
| -- loop through the defaults and remove their content |
| for k,v in pairs(defaults) do |
| if k == "*" or k == "**" then |
| if type(v) == "table" then |
| -- Loop through all the actual k,v pairs and remove |
| for key, value in pairs(db) do |
| if type(value) == "table" then |
| -- if the key was not explicitly specified in the defaults table, just strip everything from * and ** tables |
| if defaults[key] == nil and (not blocker or blocker[key] == nil) then |
| removeDefaults(value, v) |
| -- if the table is empty afterwards, remove it |
| if next(value) == nil then |
| db[key] = nil |
| end |
| -- if it was specified, only strip ** content, but block values which were set in the key table |
| elseif k == "**" then |
| removeDefaults(value, v, defaults[key]) |
| end |
| end |
| end |
| elseif k == "*" then |
| -- check for non-table default |
| for key, value in pairs(db) do |
| if defaults[key] == nil and v == value then |
| db[key] = nil |
| end |
| end |
| end |
| elseif type(v) == "table" and type(db[k]) == "table" then |
| -- if a blocker was set, dive into it, to allow multi-level defaults |
| removeDefaults(db[k], v, blocker and blocker[k]) |
| if next(db[k]) == nil then |
| db[k] = nil |
| end |
| else |
| -- check if the current value matches the default, and that its not blocked by another defaults table |
| if db[k] == defaults[k] and (not blocker or blocker[k] == nil) then |
| db[k] = nil |
| end |
| end |
| end |
| end |
| -- This is called when a table section is first accessed, to set up the defaults |
| local function initSection(db, section, svstore, key, defaults) |
| local sv = rawget(db, "sv") |
| local tableCreated |
| if not sv[svstore] then sv[svstore] = {} end |
| if not sv[svstore][key] then |
| sv[svstore][key] = {} |
| tableCreated = true |
| end |
| local tbl = sv[svstore][key] |
| if defaults then |
| copyDefaults(tbl, defaults) |
| end |
| rawset(db, section, tbl) |
| return tableCreated, tbl |
| end |
| -- Metatable to handle the dynamic creation of sections and copying of sections. |
| local dbmt = { |
| __index = function(t, section) |
| local keys = rawget(t, "keys") |
| local key = keys[section] |
| if key then |
| local defaultTbl = rawget(t, "defaults") |
| local defaults = defaultTbl and defaultTbl[section] |
| if section == "profile" then |
| local new = initSection(t, section, "profiles", key, defaults) |
| if new then |
| -- Callback: OnNewProfile, database, newProfileKey |
| t.callbacks:Fire("OnNewProfile", t, key) |
| end |
| elseif section == "profiles" then |
| local sv = rawget(t, "sv") |
| if not sv.profiles then sv.profiles = {} end |
| rawset(t, "profiles", sv.profiles) |
| elseif section == "global" then |
| local sv = rawget(t, "sv") |
| if not sv.global then sv.global = {} end |
| if defaults then |
| copyDefaults(sv.global, defaults) |
| end |
| rawset(t, section, sv.global) |
| else |
| initSection(t, section, section, key, defaults) |
| end |
| end |
| return rawget(t, section) |
| end |
| } |
| local function validateDefaults(defaults, keyTbl, offset) |
| if not defaults then return end |
| offset = offset or 0 |
| for k in pairs(defaults) do |
| if not keyTbl[k] or k == "profiles" then |
| error(("Usage: AceDBObject:RegisterDefaults(defaults): '%s' is not a valid datatype."):format(k), 3 + offset) |
| end |
| end |
| end |
| local preserve_keys = { |
| ["callbacks"] = true, |
| ["RegisterCallback"] = true, |
| ["UnregisterCallback"] = true, |
| ["UnregisterAllCallbacks"] = true, |
| ["children"] = true, |
| } |
| local realmKey = GetRealmName() |
| local charKey = UnitName("player") .. " - " .. realmKey |
| local _, classKey = UnitClass("player") |
| local _, raceKey = UnitRace("player") |
| local factionKey = UnitFactionGroup("player") |
| local factionrealmKey = factionKey .. " - " .. realmKey |
| -- Actual database initialization function |
| local function initdb(sv, defaults, defaultProfile, olddb, parent) |
| -- Generate the database keys for each section |
| -- Make a container for profile keys |
| if not sv.profileKeys then sv.profileKeys = {} end |
| -- map "true" to our "Default" profile |
| if defaultProfile == true then defaultProfile = "Default" end |
| local profileKey |
| if not parent then |
| -- Try to get the profile selected from the char db |
| profileKey = sv.profileKeys[charKey] or defaultProfile or charKey |
| else |
| -- Use the profile of the parents DB |
| profileKey = parent.keys.profile or defaultProfile or charKey |
| end |
| sv.profileKeys[charKey] = profileKey |
| -- This table contains keys that enable the dynamic creation |
| -- of each section of the table. The 'global' and 'profiles' |
| -- have a key of true, since they are handled in a special case |
| local keyTbl= { |
| ["char"] = charKey, |
| ["realm"] = realmKey, |
| ["class"] = classKey, |
| ["race"] = raceKey, |
| ["faction"] = factionKey, |
| ["factionrealm"] = factionrealmKey, |
| ["profile"] = profileKey, |
| ["global"] = true, |
| ["profiles"] = true, |
| } |
| validateDefaults(defaults, keyTbl, 1) |
| -- This allows us to use this function to reset an entire database |
| -- Clear out the old database |
| if olddb then |
| for k,v in pairs(olddb) do if not preserve_keys[k] then olddb[k] = nil end end |
| end |
| -- Give this database the metatable so it initializes dynamically |
| local db = setmetatable(olddb or {}, dbmt) |
| if not rawget(db, "callbacks") then |
| -- try to load CallbackHandler-1.0 if it loaded after our library |
| if not CallbackHandler then CallbackHandler = LibStub:GetLibrary("CallbackHandler-1.0", true) end |
| db.callbacks = CallbackHandler and CallbackHandler:New(db) or CallbackDummy |
| end |
| -- Copy methods locally into the database object, to avoid hitting |
| -- the metatable when calling methods |
| if not parent then |
| for name, func in pairs(DBObjectLib) do |
| db[name] = func |
| end |
| else |
| -- hack this one in |
| db.RegisterDefaults = DBObjectLib.RegisterDefaults |
| db.ResetProfile = DBObjectLib.ResetProfile |
| end |
| -- Set some properties in the database object |
| db.profiles = sv.profiles |
| db.keys = keyTbl |
| db.sv = sv |
| --db.sv_name = name |
| db.defaults = defaults |
| db.parent = parent |
| -- store the DB in the registry |
| AceDB.db_registry[db] = true |
| return db |
| end |
| -- handle PLAYER_LOGOUT |
| -- strip all defaults from all databases |
| local function logoutHandler(frame, event) |
| if event == "PLAYER_LOGOUT" then |
| for db in pairs(AceDB.db_registry) do |
| db.callbacks:Fire("OnDatabaseShutdown", db) |
| for section, key in pairs(db.keys) do |
| if db.defaults and db.defaults[section] and rawget(db, section) then |
| removeDefaults(db[section], db.defaults[section]) |
| end |
| end |
| end |
| end |
| end |
| AceDB.frame:RegisterEvent("PLAYER_LOGOUT") |
| AceDB.frame:SetScript("OnEvent", logoutHandler) |
| --[[------------------------------------------------------------------------- |
| AceDB Object Method Definitions |
| ---------------------------------------------------------------------------]] |
| --- Sets the defaults table for the given database object by clearing any |
| -- that are currently set, and then setting the new defaults. |
| -- @param defaults A table of defaults for this database |
| function DBObjectLib:RegisterDefaults(defaults) |
| if defaults and type(defaults) ~= "table" then |
| error("Usage: AceDBObject:RegisterDefaults(defaults): 'defaults' - table or nil expected.", 2) |
| end |
| validateDefaults(defaults, self.keys) |
| -- Remove any currently set defaults |
| if self.defaults then |
| for section,key in pairs(self.keys) do |
| if self.defaults[section] and rawget(self, section) then |
| removeDefaults(self[section], self.defaults[section]) |
| end |
| end |
| end |
| -- Set the DBObject.defaults table |
| self.defaults = defaults |
| -- Copy in any defaults, only touching those sections already created |
| if defaults then |
| for section,key in pairs(self.keys) do |
| if defaults[section] and rawget(self, section) then |
| copyDefaults(self[section], defaults[section]) |
| end |
| end |
| end |
| end |
| --- Changes the profile of the database and all of it's namespaces to the |
| -- supplied named profile |
| -- @param name The name of the profile to set as the current profile |
| function DBObjectLib:SetProfile(name) |
| if type(name) ~= "string" then |
| error("Usage: AceDBObject:SetProfile(name): 'name' - string expected.", 2) |
| end |
| -- changing to the same profile, dont do anything |
| if name == self.keys.profile then return end |
| local oldProfile = self.profile |
| local defaults = self.defaults and self.defaults.profile |
| -- Callback: OnProfileShutdown, database |
| self.callbacks:Fire("OnProfileShutdown", self) |
| if oldProfile and defaults then |
| -- Remove the defaults from the old profile |
| removeDefaults(oldProfile, defaults) |
| end |
| self.profile = nil |
| self.keys["profile"] = name |
| self.sv.profileKeys[charKey] = name |
| -- populate to child namespaces |
| if self.children then |
| for _, db in pairs(self.children) do |
| DBObjectLib.SetProfile(db, name) |
| end |
| end |
| -- Callback: OnProfileChanged, database, newProfileKey |
| self.callbacks:Fire("OnProfileChanged", self, name) |
| end |
| --- Returns a table with the names of the existing profiles in the database. |
| -- You can optionally supply a table to re-use for this purpose. |
| -- @param tbl A table to store the profile names in (optional) |
| function DBObjectLib:GetProfiles(tbl) |
| if tbl and type(tbl) ~= "table" then |
| error("Usage: AceDBObject:GetProfiles(tbl): 'tbl' - table or nil expected.", 2) |
| end |
| -- Clear the container table |
| if tbl then |
| for k,v in pairs(tbl) do tbl[k] = nil end |
| else |
| tbl = {} |
| end |
| local curProfile = self.keys.profile |
| local i = 0 |
| for profileKey in pairs(self.profiles) do |
| i = i + 1 |
| tbl[i] = profileKey |
| if curProfile and profileKey == curProfile then curProfile = nil end |
| end |
| -- Add the current profile, if it hasn't been created yet |
| if curProfile then |
| i = i + 1 |
| tbl[i] = curProfile |
| end |
| return tbl, i |
| end |
| --- Returns the current profile name used by the database |
| function DBObjectLib:GetCurrentProfile() |
| return self.keys.profile |
| end |
| --- Deletes a named profile. This profile must not be the active profile. |
| -- @param name The name of the profile to be deleted |
| -- @param silent If true, do not raise an error when the profile does not exist |
| function DBObjectLib:DeleteProfile(name, silent) |
| if type(name) ~= "string" then |
| error("Usage: AceDBObject:DeleteProfile(name): 'name' - string expected.", 2) |
| end |
| if self.keys.profile == name then |
| error("Cannot delete the active profile in an AceDBObject.", 2) |
| end |
| if not rawget(self.sv.profiles, name) and not silent then |
| error("Cannot delete profile '" .. name .. "'. It does not exist.", 2) |
| end |
| self.sv.profiles[name] = nil |
| -- populate to child namespaces |
| if self.children then |
| for _, db in pairs(self.children) do |
| DBObjectLib.DeleteProfile(db, name, true) |
| end |
| end |
| -- Callback: OnProfileDeleted, database, profileKey |
| self.callbacks:Fire("OnProfileDeleted", self, name) |
| end |
| --- Copies a named profile into the current profile, overwriting any conflicting |
| -- settings. |
| -- @param name The name of the profile to be copied into the current profile |
| -- @param silent If true, do not raise an error when the profile does not exist |
| function DBObjectLib:CopyProfile(name, silent) |
| if type(name) ~= "string" then |
| error("Usage: AceDBObject:CopyProfile(name): 'name' - string expected.", 2) |
| end |
| if name == self.keys.profile then |
| error("Cannot have the same source and destination profiles.", 2) |
| end |
| if not rawget(self.sv.profiles, name) and not silent then |
| error("Cannot copy profile '" .. name .. "'. It does not exist.", 2) |
| end |
| -- Reset the profile before copying |
| DBObjectLib.ResetProfile(self) |
| local profile = self.profile |
| local source = self.sv.profiles[name] |
| copyTable(source, profile) |
| -- populate to child namespaces |
| if self.children then |
| for _, db in pairs(self.children) do |
| DBObjectLib.CopyProfile(db, name, true) |
| end |
| end |
| -- Callback: OnProfileCopied, database, sourceProfileKey |
| self.callbacks:Fire("OnProfileCopied", self, name) |
| end |
| --- Resets the current profile to the default values (if specified). |
| -- @param noChildren if set to true, the reset will not be populated to the child namespaces of this DB object |
| function DBObjectLib:ResetProfile(noChildren) |
| local profile = self.profile |
| for k,v in pairs(profile) do |
| profile[k] = nil |
| end |
| local defaults = self.defaults and self.defaults.profile |
| if defaults then |
| copyDefaults(profile, defaults) |
| end |
| -- populate to child namespaces |
| if self.children and not noChildren then |
| for _, db in pairs(self.children) do |
| DBObjectLib.ResetProfile(db) |
| end |
| end |
| -- Callback: OnProfileReset, database |
| self.callbacks:Fire("OnProfileReset", self) |
| end |
| --- Resets the entire database, using the string defaultProfile as the new default |
| -- profile. |
| -- @param defaultProfile The profile name to use as the default |
| function DBObjectLib:ResetDB(defaultProfile) |
| if defaultProfile and type(defaultProfile) ~= "string" then |
| error("Usage: AceDBObject:ResetDB(defaultProfile): 'defaultProfile' - string or nil expected.", 2) |
| end |
| local sv = self.sv |
| for k,v in pairs(sv) do |
| sv[k] = nil |
| end |
| local parent = self.parent |
| initdb(sv, self.defaults, defaultProfile, self) |
| -- fix the child namespaces |
| if self.children then |
| if not sv.namespaces then sv.namespaces = {} end |
| for name, db in pairs(self.children) do |
| if not sv.namespaces[name] then sv.namespaces[name] = {} end |
| initdb(sv.namespaces[name], db.defaults, self.keys.profile, db, self) |
| end |
| end |
| -- Callback: OnDatabaseReset, database |
| self.callbacks:Fire("OnDatabaseReset", self) |
| -- Callback: OnProfileChanged, database, profileKey |
| self.callbacks:Fire("OnProfileChanged", self, self.keys["profile"]) |
| return self |
| end |
| --- Creates a new database namespace, directly tied to the database. This |
| -- is a full scale database in it's own rights other than the fact that |
| -- it cannot control its profile individually |
| -- @param name The name of the new namespace |
| -- @param defaults A table of values to use as defaults |
| function DBObjectLib:RegisterNamespace(name, defaults) |
| if type(name) ~= "string" then |
| error("Usage: AceDBObject:RegisterNamespace(name, defaults): 'name' - string expected.", 2) |
| end |
| if defaults and type(defaults) ~= "table" then |
| error("Usage: AceDBObject:RegisterNamespace(name, defaults): 'defaults' - table or nil expected.", 2) |
| end |
| if self.children and self.children[name] then |
| error ("Usage: AceDBObject:RegisterNamespace(name, defaults): 'name' - a namespace with that name already exists.", 2) |
| end |
| local sv = self.sv |
| if not sv.namespaces then sv.namespaces = {} end |
| if not sv.namespaces[name] then |
| sv.namespaces[name] = {} |
| end |
| local newDB = initdb(sv.namespaces[name], defaults, self.keys.profile, nil, self) |
| if not self.children then self.children = {} end |
| self.children[name] = newDB |
| return newDB |
| end |
| --- Returns an already existing namespace from the database object. |
| -- @param name The name of the new namespace |
| -- @param silent if true, the addon is optional, silently return nil if its not found |
| -- @usage |
| -- local namespace = self.db:GetNamespace('namespace') |
| -- @return the namespace object if found |
| function DBObjectLib:GetNamespace(name, silent) |
| if type(name) ~= "string" then |
| error("Usage: AceDBObject:GetNamespace(name): 'name' - string expected.", 2) |
| end |
| if not silent and not (self.children and self.children[name]) then |
| error ("Usage: AceDBObject:GetNamespace(name): 'name' - namespace does not exist.", 2) |
| end |
| if not self.children then self.children = {} end |
| return self.children[name] |
| end |
| --[[------------------------------------------------------------------------- |
| AceDB Exposed Methods |
| ---------------------------------------------------------------------------]] |
| --- Creates a new database object that can be used to handle database settings and profiles. |
| -- By default, an empty DB is created, using a character specific profile. |
| -- |
| -- You can override the default profile used by passing any profile name as the third argument, |
| -- or by passing //true// as the third argument to use a globally shared profile called "Default". |
| -- |
| -- Note that there is no token replacement in the default profile name, passing a defaultProfile as "char" |
| -- will use a profile named "char", and not a character-specific profile. |
| -- @param tbl The name of variable, or table to use for the database |
| -- @param defaults A table of database defaults |
| -- @param defaultProfile The name of the default profile. If not set, a character specific profile will be used as the default. |
| -- You can also pass //true// to use a shared global profile called "Default". |
| -- @usage |
| -- -- Create an empty DB using a character-specific default profile. |
| -- self.db = LibStub("AceDB-3.0"):New("MyAddonDB") |
| -- @usage |
| -- -- Create a DB using defaults and using a shared default profile |
| -- self.db = LibStub("AceDB-3.0"):New("MyAddonDB", defaults, true) |
| function AceDB:New(tbl, defaults, defaultProfile) |
| if type(tbl) == "string" then |
| local name = tbl |
| tbl = _G[name] |
| if not tbl then |
| tbl = {} |
| setglobal(name, tbl) |
| end |
| end |
| if type(tbl) ~= "table" then |
| error("Usage: AceDB:New(tbl, defaults, defaultProfile): 'tbl' - table expected.", 2) |
| end |
| if defaults and type(defaults) ~= "table" then |
| error("Usage: AceDB:New(tbl, defaults, defaultProfile): 'defaults' - table expected.", 2) |
| end |
| if defaultProfile and type(defaultProfile) ~= "string" and defaultProfile ~= true then |
| error("Usage: AceDB:New(tbl, defaults, defaultProfile): 'defaultProfile' - string or true expected.", 2) |
| end |
| return initdb(tbl, defaults, defaultProfile) |
| end |
| -- upgrade existing databases |
| for db in pairs(AceDB.db_registry) do |
| if not db.parent then |
| for name,func in pairs(DBObjectLib) do |
| db[name] = func |
| end |
| else |
| db.RegisterDefaults = DBObjectLib.RegisterDefaults |
| db.ResetProfile = DBObjectLib.ResetProfile |
| end |
| end |
Libs/LibTourist-3.0/LibStub/LibStub.lua
New file
0,0 → 1,30
| -- LibStub is a simple versioning stub meant for use in Libraries. http://www.wowace.com/wiki/LibStub for more info |
| -- LibStub is hereby placed in the Public Domain Credits: Kaelten, Cladhaire, ckknight, Mikk, Ammo, Nevcairiel, joshborke |
| local LIBSTUB_MAJOR, LIBSTUB_MINOR = "LibStub", 2 -- NEVER MAKE THIS AN SVN REVISION! IT NEEDS TO BE USABLE IN ALL REPOS! |
| local LibStub = _G[LIBSTUB_MAJOR] |
| if not LibStub or LibStub.minor < LIBSTUB_MINOR then |
| LibStub = LibStub or {libs = {}, minors = {} } |
| _G[LIBSTUB_MAJOR] = LibStub |
| LibStub.minor = LIBSTUB_MINOR |
| function LibStub:NewLibrary(major, minor) |
| assert(type(major) == "string", "Bad argument #2 to `NewLibrary' (string expected)") |
| minor = assert(tonumber(strmatch(minor, "%d+")), "Minor version must either be a number or contain a number.") |
| local oldminor = self.minors[major] |
| if oldminor and oldminor >= minor then return nil end |
| self.minors[major], self.libs[major] = minor, self.libs[major] or {} |
| return self.libs[major], oldminor |
| end |
| function LibStub:GetLibrary(major, silent) |
| if not self.libs[major] and not silent then |
| error(("Cannot find a library instance of %q."):format(tostring(major)), 2) |
| end |
| return self.libs[major], self.minors[major] |
| end |
| function LibStub:IterateLibraries() return pairs(self.libs) end |
| setmetatable(LibStub, { __call = LibStub.GetLibrary }) |
| end |
Libs/LibTourist-3.0/lib.xml
New file
0,0 → 1,4
\ No newline at end of file
| <Ui xmlns="http://www.blizzard.com/wow/ui/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.blizzard.com/wow/ui/ |
| ..\FrameXML\UI.xsd"> |
| <Script file="LibTourist-3.0.lua" /> |
| </Ui> |
Libs/LibTourist-3.0/Changelog-LibTourist-3.0-WoW-3.2-release.txt
New file
0,0 → 1,13
| ------------------------------------------------------------------------ |
| r90 | ckknight | 2009-09-08 20:04:29 +0000 (Tue, 08 Sep 2009) | 1 line |
| Changed paths: |
| A /tags/WoW-3.2-release (from /trunk:89) |
| Tagging as WoW-3.2-release |
| ------------------------------------------------------------------------ |
| r89 | rsmozang | 2009-08-05 05:02:56 +0000 (Wed, 05 Aug 2009) | 1 line |
| Changed paths: |
| M /trunk/LibTourist-3.0.lua |
| Added: Trial of the Champion and Trial of the Crusader information |
| ------------------------------------------------------------------------ |
Libs/LibTourist-3.0/LibTourist-3.0.lua
New file
0,0 → 1,3447
| --[[ |
| Name: LibTourist-3.0 |
| Revision: $Rev: 89 $ |
| Author(s): ckknight (ckknight@gmail.com) |
| Website: http://ckknight.wowinterface.com/ |
| Documentation: http://www.wowace.com/wiki/LibTourist-3.0 |
| SVN: http://svn.wowace.com/root/trunk/LibTourist-3.0 |
| Description: A library to provide information about zones and instances. |
| Dependencies: LibBabble-Zone-3.0 |
| License: MIT |
| Note: |
| WOTLK data is unconfirmed / incomplete |
| ]] |
| local MAJOR_VERSION = "LibTourist-3.0" |
| local MINOR_VERSION = 90000 + tonumber(("$Revision: 89 $"):match("(%d+)")) |
| if not LibStub then error(MAJOR_VERSION .. " requires LibStub") end |
| if not LibStub("LibBabble-Zone-3.0") then error(MAJOR_VERSION .. " requires LibBabble-Zone-3.0.") end |
| local Tourist, oldLib = LibStub:NewLibrary(MAJOR_VERSION, MINOR_VERSION) |
| if not Tourist then |
| return |
| end |
| if oldLib then |
| oldLib = {} |
| for k, v in pairs(Tourist) do |
| Tourist[k] = nil |
| oldLib[k] = v |
| end |
| end |
| local BZ = LibStub("LibBabble-Zone-3.0"):GetLookupTable() |
| local BZR = LibStub("LibBabble-Zone-3.0"):GetReverseLookupTable() |
| local playerLevel = 1 |
| local _,race = UnitRace("player") |
| local isHorde = (race == "Orc" or race == "Troll" or race == "Tauren" or race == "Scourge" or race == "BloodElf") |
| local isWestern = GetLocale() == "enUS" or GetLocale() == "deDE" or GetLocale() == "frFR" or GetLocale() == "esES" |
| local Kalimdor, Eastern_Kingdoms, Outland, Northrend = GetMapContinents() |
| if not Outland then |
| Outland = "Outland" |
| end |
| if not Northrend then |
| Northrend = "Northrend" |
| end |
| local Azeroth = BZ["Azeroth"] |
| local X_Y_ZEPPELIN = "%s/%s Zeppelin" |
| local X_Y_BOAT = "%s/%s Boat" |
| local X_Y_PORTAL = "%s/%s Portal" |
| if GetLocale() == "zhCN" then |
| X_Y_ZEPPELIN = "%s/%s é£è" |
| X_Y_BOAT = "%s/%s è¹" |
| X_Y_PORTAL = "%s/%s ä¼ éé¨" |
| elseif GetLocale() == "zhTW" then |
| X_Y_ZEPPELIN = "%s/%s é£è" |
| X_Y_BOAT = "%s/%s è¹" |
| X_Y_PORTAL = "%s/%s å³éé" |
| elseif GetLocale() == "frFR" then |
| X_Y_ZEPPELIN = "Zeppelin %s/%s" |
| X_Y_BOAT = "Bateau %s/%s" |
| X_Y_PORTAL = "Portail %s/%s" |
| elseif GetLocale() == "koKR" then |
| X_Y_ZEPPELIN = "%s/%s ë¹íì " |
| X_Y_BOAT = "%s/%s ë°°" |
| X_Y_PORTAL = "%s/%s ì°¨ì문" |
| end |
| local recZones = {} |
| local recInstances = {} |
| local lows = setmetatable({}, {__index = function() return 0 end}) |
| local highs = setmetatable({}, getmetatable(lows)) |
| local continents = {} |
| local instances = {} |
| local paths = {} |
| local types = {} |
| local groupSizes = {} |
| local groupAltSizes = {} |
| local factions = {} |
| local yardWidths = {} |
| local yardHeights = {} |
| local yardXOffsets = {} |
| local yardYOffsets = {} |
| local fishing = {} |
| local cost = {} |
| local textures = {} |
| local textures_rev = {} |
| local complexes = {} |
| local entrancePortals_zone = {} |
| local entrancePortals_x = {} |
| local entrancePortals_y = {} |
| local function PLAYER_LEVEL_UP(self, level) |
| playerLevel = level or UnitLevel("player") |
| for k in pairs(recZones) do |
| recZones[k] = nil |
| end |
| for k in pairs(recInstances) do |
| recInstances[k] = nil |
| end |
| for k in pairs(cost) do |
| cost[k] = nil |
| end |
| for zone in pairs(lows) do |
| if not self:IsHostile(zone) then |
| local low, high = self:GetLevel(zone) |
| if types[zone] == "Zone" or types[zone] == "PvP Zone" and low and high then |
| if low <= playerLevel and playerLevel <= high then |
| recZones[zone] = true |
| end |
| elseif types[zone] == "Battleground" and low and high then |
| local playerLevel = playerLevel |
| if zone == BZ["Alterac Valley"] then |
| playerLevel = playerLevel - 1 |
| end |
| if playerLevel >= low and (playerLevel == MAX_PLAYER_LEVEL or math.fmod(playerLevel, 10) >= 6) then |
| recInstances[zone] = true |
| end |
| elseif types[zone] == "Instance" and low and high then |
| if low <= playerLevel and playerLevel <= high then |
| recInstances[zone] = true |
| end |
| end |
| end |
| end |
| end |
| -- minimum fishing skill to fish these zones |
| function Tourist:GetFishingLevel(zone) |
| return fishing[zone] |
| end |
| function Tourist:GetLevel(zone) |
| if types[zone] == "Battleground" then |
| if zone == BZ["Strand of the Ancients"] or ((zone == BZ["Eye of the Storm"] or zone == BZ["Alterac Valley"]) and playerLevel >= 71) then |
| return 71, 80 |
| elseif zone == BZ["Eye of the Storm"] or (zone == BZ["Alterac Valley"] and playerLevel >= 61) then |
| return 61, 70 |
| elseif zone == BZ["Alterac Valley"] then |
| return 51, 60 |
| elseif playerLevel >= MAX_PLAYER_LEVEL then |
| return MAX_PLAYER_LEVEL, MAX_PLAYER_LEVEL |
| elseif playerLevel >= 70 then |
| return 70, 79 |
| elseif playerLevel >= 60 then |
| return 60, 69 |
| elseif playerLevel >= 50 then |
| return 50, 59 |
| elseif playerLevel >= 40 then |
| return 40, 49 |
| elseif playerLevel >= 30 then |
| return 30, 39 |
| elseif playerLevel >= 20 or zone == BZ["Arathi Basin"] then |
| return 20, 29 |
| else |
| return 10, 19 |
| end |
| end |
| return lows[zone], highs[zone] |
| end |
| function Tourist:GetLevelColor(zone) |
| if types[zone] == "Battleground" then |
| if (playerLevel < 71 and zone == BZ["Strand of the Ancients"]) or (playerLevel < 61 and zone == BZ["Eye of the Storm"]) or (playerLevel < 51 and zone == BZ["Alterac Valley"]) or (playerLevel < 20 and zone == BZ["Arathi Basin"]) or (playerLevel < 10 and zone == BZ["Warsong Gulch"]) then |
| return 1, 0, 0 |
| end |
| local playerLevel = playerLevel |
| if zone == BZ["Alterac Valley"] or zone == BZ["Eye of the Storm"] or zone == BZ["Strand of the Ancients"] then |
| playerLevel = playerLevel - 1 |
| end |
| if playerLevel == MAX_PLAYER_LEVEL then |
| return 1, 1, 0 |
| end |
| playerLevel = math.fmod(playerLevel, 10) |
| if playerLevel <= 5 then |
| return 1, playerLevel / 10, 0 |
| elseif playerLevel <= 7 then |
| return 1, (playerLevel - 3) / 4, 0 |
| else |
| return (9 - playerLevel) / 2, 1, 0 |
| end |
| end |
| local low, high = lows[zone], highs[zone] |
| if low <= 0 and high <= 0 then |
| -- City |
| return 1, 1, 1 |
| elseif playerLevel == low and playerLevel == high then |
| return 1, 1, 0 |
| elseif playerLevel <= low - 3 then |
| return 1, 0, 0 |
| elseif playerLevel <= low then |
| return 1, (playerLevel - low - 3) / -6, 0 |
| elseif playerLevel <= (low + high) / 2 then |
| return 1, (playerLevel - low) / (high - low) + 0.5, 0 |
| elseif playerLevel <= high then |
| return 2 * (playerLevel - high) / (low - high), 1, 0 |
| elseif playerLevel <= high + 3 then |
| local num = (playerLevel - high) / 6 |
| return num, 1 - num, num |
| else |
| return 0.5, 0.5, 0.5 |
| end |
| end |
| function Tourist:GetFactionColor(zone) |
| if factions[zone] == (isHorde and "Alliance" or "Horde") then |
| return 1, 0, 0 |
| elseif factions[zone] == (isHorde and "Horde" or "Alliance") then |
| return 0, 1, 0 |
| else |
| return 1, 1, 0 |
| end |
| end |
| function Tourist:GetZoneYardSize(zone) |
| return yardWidths[zone], yardHeights[zone] |
| end |
| local ekXOffset = 15525.32200715066 |
| local ekYOffset = 672.3934326738229 |
| local kalXOffset = -8310.762035321373 |
| local kalYOffset = 1815.149000954498 |
| function Tourist:GetYardDistance(zone1, x1, y1, zone2, x2, y2) |
| local zone1_yardXOffset = yardXOffsets[zone1] |
| if not zone1_yardXOffset then |
| return nil |
| end |
| local zone2_yardXOffset = yardXOffsets[zone2] |
| if not zone2_yardXOffset then |
| return nil |
| end |
| local zone1_yardYOffset = yardYOffsets[zone1] |
| local zone2_yardYOffset = yardYOffsets[zone2] |
| local zone1_continent = continents[zone1] |
| local zone2_continent = continents[zone2] |
| if (zone1_continent == Outland) ~= (zone2_continent == Outland) then |
| return nil |
| end |
| local zone1_yardWidth = yardWidths[zone1] |
| local zone1_yardHeight = yardHeights[zone1] |
| local zone2_yardWidth = yardWidths[zone2] |
| local zone2_yardHeight = yardHeights[zone2] |
| local x1_yard = zone1_yardWidth*x1 |
| local y1_yard = zone1_yardHeight*y1 |
| local x2_yard = zone2_yardWidth*x2 |
| local y2_yard = zone2_yardHeight*y2 |
| if zone1 ~= zone2 then |
| x1_yard = x1_yard + zone1_yardXOffset |
| y1_yard = y1_yard + zone1_yardYOffset |
| x2_yard = x2_yard + zone2_yardXOffset |
| y2_yard = y2_yard + zone2_yardYOffset |
| if zone1_continent ~= zone2_continent then |
| if zone1_continent == Kalimdor then |
| x1_yard = x1_yard + kalXOffset |
| y1_yard = y1_yard + kalYOffset |
| elseif zone1_continent == Eastern_Kingdoms then |
| x1_yard = x1_yard + ekXOffset |
| y1_yard = y1_yard + ekYOffset |
| end |
| if zone2_continent == Kalimdor then |
| x2_yard = x2_yard + kalXOffset |
| y2_yard = y2_yard + kalYOffset |
| elseif zone2_continent == Eastern_Kingdoms then |
| x2_yard = x2_yard + ekXOffset |
| y2_yard = y2_yard + ekYOffset |
| end |
| end |
| end |
| local x_diff = x1_yard - x2_yard |
| local y_diff = y1_yard - y2_yard |
| local dist_2 = x_diff*x_diff + y_diff*y_diff |
| return dist_2^0.5 |
| end |
| function Tourist:TransposeZoneCoordinate(x, y, zone1, zone2) |
| if zone1 == zone2 then |
| return x, y |
| end |
| local zone1_yardXOffset = yardXOffsets[zone1] |
| if not zone1_yardXOffset then |
| return nil |
| end |
| local zone2_yardXOffset = yardXOffsets[zone2] |
| if not zone2_yardXOffset then |
| return nil |
| end |
| local zone1_yardYOffset = yardYOffsets[zone1] |
| local zone2_yardYOffset = yardYOffsets[zone2] |
| local zone1_continent = continents[zone1] |
| local zone2_continent = continents[zone2] |
| if (zone1_continent == Outland) ~= (zone2_continent == Outland) then |
| return nil |
| end |
| local zone1_yardWidth = yardWidths[zone1] |
| local zone1_yardHeight = yardHeights[zone1] |
| local zone2_yardWidth = yardWidths[zone2] |
| local zone2_yardHeight = yardHeights[zone2] |
| local x_yard = zone1_yardWidth*x |
| local y_yard = zone1_yardHeight*y |
| x_yard = x_yard + zone1_yardXOffset |
| y_yard = y_yard + zone1_yardYOffset |
| if zone1_continent ~= zone2_continent then |
| if zone1_continent == Kalimdor then |
| x_yard = x_yard + kalXOffset |
| y_yard = y_yard + kalYOffset |
| elseif zone1_continent == Eastern_Kingdoms then |
| x_yard = x_yard + ekXOffset |
| y_yard = y_yard + ekYOffset |
| end |
| if zone2_continent == Kalimdor then |
| x_yard = x_yard - kalXOffset |
| y_yard = y_yard - kalYOffset |
| elseif zone2_continent == Eastern_Kingdoms then |
| x_yard = x_yard - ekXOffset |
| y_yard = y_yard - ekYOffset |
| end |
| end |
| x_yard = x_yard - zone2_yardXOffset |
| y_yard = y_yard - zone2_yardYOffset |
| x = x_yard / zone2_yardWidth |
| y = y_yard / zone2_yardHeight |
| return x, y |
| end |
| local zonesToIterate = setmetatable({}, {__index = function(self, key) |
| local t = {} |
| self[key] = t |
| for k,v in pairs(continents) do |
| if v == key and v ~= k and yardXOffsets[k] then |
| t[#t+1] = k |
| end |
| end |
| return t |
| end}) |
| local kal_yardWidth |
| local kal_yardHeight |
| local ek_yardWidth |
| local ek_yardHeight |
| function Tourist:GetBestZoneCoordinate(x, y, zone) |
| if not kal_yardWidth then |
| kal_yardWidth = yardWidths[Kalimdor] |
| kal_yardHeight = yardHeights[Kalimdor] |
| ek_yardWidth = yardWidths[Eastern_Kingdoms] |
| ek_yardHeight = yardHeights[Eastern_Kingdoms] |
| end |
| local zone_yardXOffset = yardXOffsets[zone] |
| if not zone_yardXOffset then |
| return x, y, zone |
| end |
| local zone_yardYOffset = yardYOffsets[zone] |
| local zone_yardWidth = yardWidths[zone] |
| local zone_yardHeight = yardHeights[zone] |
| local x_yard = zone_yardWidth*x |
| local y_yard = zone_yardHeight*y |
| x_yard = x_yard + zone_yardXOffset |
| y_yard = y_yard + zone_yardYOffset |
| local zone_continent = continents[zone] |
| local azeroth = false |
| if zone_continent == Kalimdor then |
| if x_yard < 0 or y_yard < 0 or x_yard > kal_yardWidth or y_yard > kal_yardHeight then |
| x_yard = x_yard + kalXOffset |
| y_yard = y_yard + kalYOffset |
| azeroth = true |
| end |
| elseif zone_continent == Eastern_Kingdoms then |
| if x_yard < 0 or y_yard < 0 or x_yard > ek_yardWidth or y_yard > ek_yardHeight then |
| x_yard = x_yard + ekXOffset |
| y_yard = y_yard + ekYOffset |
| azeroth = true |
| end |
| end |
| if azeroth then |
| local kal, ek = zone_continent ~= Kalimdor, zone_continent ~= Eastern_Kingdoms |
| if kal and (x_yard < kalXOffset or y_yard < kalYOffset or x_yard > kalXOffset + kal_yardWidth or y_yard > kalYOffset + kal_yardWidth) then |
| kal = false |
| end |
| if ek and (x_yard < ekXOffset or y_yard < ekYOffset or x_yard > ekXOffset + ek_yardWidth or y_yard > ekYOffset + ek_yardWidth) then |
| ek = false |
| end |
| if kal then |
| x_yard = x_yard - kalXOffset |
| y_yard = y_yard - kalYOffset |
| zone_continent = Kalimdor |
| elseif ek then |
| x_yard = x_yard - ekXOffset |
| y_yard = y_yard - ekYOffset |
| zone_continent = Eastern_Kingdoms |
| else |
| return x_yard / yardWidths[Azeroth], y_yard / yardHeights[Azeroth], Azeroth |
| end |
| end |
| local best_zone, best_x, best_y, best_value |
| for _,z in ipairs(zonesToIterate[zone_continent]) do |
| local z_yardXOffset = yardXOffsets[z] |
| local z_yardYOffset = yardYOffsets[z] |
| local z_yardWidth = yardWidths[z] |
| local z_yardHeight = yardHeights[z] |
| local x_yd = x_yard - z_yardXOffset |
| local y_yd = y_yard - z_yardYOffset |
| if x_yd >= 0 and y_yd >= 0 and x_yd <= z_yardWidth and y_yd <= z_yardHeight then |
| if types[z] == "City" then |
| return x_yd/z_yardWidth, y_yd/z_yardHeight, z |
| end |
| local x_tmp = x_yd - z_yardWidth / 2 |
| local y_tmp = y_yd - z_yardHeight / 2 |
| local value = x_tmp*x_tmp + y_tmp*y_tmp |
| if not best_value or value < best_value then |
| best_zone = z |
| best_value = value |
| best_x = x_yd/z_yardWidth |
| best_y = y_yd/z_yardHeight |
| end |
| end |
| end |
| if not best_zone then |
| return x_yard / yardWidths[zone_continent], y_yard / yardHeights[zone_continent], zone_continent |
| end |
| return best_x, best_y, best_zone |
| end |
| local function retNil() return nil end |
| local function retOne(object, state) |
| if state == object then |
| return nil |
| else |
| return object |
| end |
| end |
| local function retNormal(t, position) |
| return (next(t, position)) |
| end |
| local function mysort(a,b) |
| if not lows[a] then |
| return false |
| elseif not lows[b] then |
| return true |
| else |
| local aval, bval = groupSizes[a], groupSizes[b] |
| if aval ~= bval then |
| return aval < bval |
| end |
| aval, bval = lows[a], lows[b] |
| if aval ~= bval then |
| return aval < bval |
| end |
| aval, bval = highs[a], highs[b] |
| if aval ~= bval then |
| return aval < bval |
| end |
| return a < b |
| end |
| end |
| local t = {} |
| local function myiter(t) |
| local n = t.n |
| n = n + 1 |
| local v = t[n] |
| if v then |
| t[n] = nil |
| t.n = n |
| return v |
| else |
| t.n = nil |
| end |
| end |
| function Tourist:IterateZoneInstances(zone) |
| local inst = instances[zone] |
| if not inst then |
| return retNil |
| elseif type(inst) == "table" then |
| for k in pairs(t) do |
| t[k] = nil |
| end |
| for k in pairs(inst) do |
| t[#t+1] = k |
| end |
| table.sort(t, mysort) |
| t.n = 0 |
| return myiter, t, nil |
| else |
| return retOne, inst, nil |
| end |
| end |
| function Tourist:GetInstanceZone(instance) |
| for k, v in pairs(instances) do |
| if v then |
| if type(v) == "string" then |
| if v == instance then |
| return k |
| end |
| else -- table |
| for l in pairs(v) do |
| if l == instance then |
| return k |
| end |
| end |
| end |
| end |
| end |
| end |
| function Tourist:DoesZoneHaveInstances(zone) |
| return not not instances[zone] |
| end |
| local zonesInstances |
| local function initZonesInstances() |
| if not zonesInstances then |
| zonesInstances = {} |
| for zone, v in pairs(lows) do |
| if types[zone] ~= "Transport" then |
| zonesInstances[zone] = true |
| end |
| end |
| end |
| initZonesInstances = nil |
| end |
| function Tourist:IterateZonesAndInstances() |
| if initZonesInstances then |
| initZonesInstances() |
| end |
| return retNormal, zonesInstances, nil |
| end |
| local function zoneIter(_, position) |
| local k = next(zonesInstances, position) |
| while k ~= nil and (types[k] == "Instance" or types[k] == "Battleground") do |
| k = next(zonesInstances, k) |
| end |
| return k |
| end |
| function Tourist:IterateZones() |
| if initZonesInstances then |
| initZonesInstances() |
| end |
| return zoneIter, nil, nil |
| end |
| local function instanceIter(_, position) |
| local k = next(zonesInstances, position) |
| while k ~= nil and (types[k] ~= "Instance" and types[k] ~= "Battleground") do |
| k = next(zonesInstances, k) |
| end |
| return k |
| end |
| function Tourist:IterateInstances() |
| if initZonesInstances then |
| initZonesInstances() |
| end |
| return instanceIter, nil, nil |
| end |
| local function bgIter(_, position) |
| local k = next(zonesInstances, position) |
| while k ~= nil and types[k] ~= "Battleground" do |
| k = next(zonesInstances, k) |
| end |
| return k |
| end |
| function Tourist:IterateBattlegrounds() |
| if initZonesInstances then |
| initZonesInstances() |
| end |
| return bgIter, nil, nil |
| end |
| local function pvpIter(_, position) |
| local k = next(zonesInstances, position) |
| while k ~= nil and types[k] ~= "PvP Zone" do |
| k = next(zonesInstances, k) |
| end |
| return k |
| end |
| function Tourist:IteratePvPZones() |
| if initZonesInstances then |
| initZonesInstances() |
| end |
| return pvpIter, nil, nil |
| end |
| local function allianceIter(_, position) |
| local k = next(zonesInstances, position) |
| while k ~= nil and factions[k] ~= "Alliance" do |
| k = next(zonesInstances, k) |
| end |
| return k |
| end |
| function Tourist:IterateAlliance() |
| if initZonesInstances then |
| initZonesInstances() |
| end |
| return allianceIter, nil, nil |
| end |
| local function hordeIter(_, position) |
| local k = next(zonesInstances, position) |
| while k ~= nil and factions[k] ~= "Horde" do |
| k = next(zonesInstances, k) |
| end |
| return k |
| end |
| function Tourist:IterateHorde() |
| if initZonesInstances then |
| initZonesInstances() |
| end |
| return hordeIter, nil, nil |
| end |
| if isHorde then |
| Tourist.IterateFriendly = Tourist.IterateHorde |
| Tourist.IterateHostile = Tourist.IterateAlliance |
| else |
| Tourist.IterateFriendly = Tourist.IterateAlliance |
| Tourist.IterateHostile = Tourist.IterateHorde |
| end |
| local function contestedIter(_, position) |
| local k = next(zonesInstances, position) |
| while k ~= nil and factions[k] do |
| k = next(zonesInstances, k) |
| end |
| return k |
| end |
| function Tourist:IterateContested() |
| if initZonesInstances then |
| initZonesInstances() |
| end |
| return contestedIter, nil, nil |
| end |
| local function kalimdorIter(_, position) |
| local k = next(zonesInstances, position) |
| while k ~= nil and continents[k] ~= Kalimdor do |
| k = next(zonesInstances, k) |
| end |
| return k |
| end |
| function Tourist:IterateKalimdor() |
| if initZonesInstances then |
| initZonesInstances() |
| end |
| return kalimdorIter, nil, nil |
| end |
| local function easternKingdomsIter(_, position) |
| local k = next(zonesInstances, position) |
| while k ~= nil and continents[k] ~= Eastern_Kingdoms do |
| k = next(zonesInstances, k) |
| end |
| return k |
| end |
| function Tourist:IterateEasternKingdoms() |
| if initZonesInstances then |
| initZonesInstances() |
| end |
| return easternKingdomsIter, nil, nil |
| end |
| local function outlandIter(_, position) |
| local k = next(zonesInstances, position) |
| while k ~= nil and continents[k] ~= Outland do |
| k = next(zonesInstances, k) |
| end |
| return k |
| end |
| function Tourist:IterateOutland() |
| if initZonesInstances then |
| initZonesInstances() |
| end |
| return outlandIter, nil, nil |
| end |
| local function northrendIter(_, position) |
| local k = next(zonesInstances, position) |
| while k ~= nil and continents[k] ~= Northrend do |
| k = next(zonesInstances, k) |
| end |
| return k |
| end |
| function Tourist:IterateNorthrend() |
| if initZonesInstances then |
| initZonesInstances() |
| end |
| return northrendIter, nil, nil |
| end |
| function Tourist:IterateRecommendedZones() |
| return retNormal, recZones, nil |
| end |
| function Tourist:IterateRecommendedInstances() |
| return retNormal, recInstances, nil |
| end |
| function Tourist:HasRecommendedInstances() |
| return next(recInstances) ~= nil |
| end |
| function Tourist:IsInstance(zone) |
| local t = types[zone] |
| return t == "Instance" or t == "Battleground" |
| end |
| function Tourist:IsZone(zone) |
| local t = types[zone] |
| return t ~= "Instance" and t ~= "Battleground" and t ~= "Transport" |
| end |
| function Tourist:GetComplex(zone) |
| return complexes[zone] |
| end |
| function Tourist:IsZoneOrInstance(zone) |
| local t = types[zone] |
| return t and t ~= "Transport" |
| end |
| function Tourist:IsBattleground(zone) |
| local t = types[zone] |
| return t == "Battleground" |
| end |
| function Tourist:IsArena(zone) |
| local t = types[zone] |
| return t == "Arena" |
| end |
| function Tourist:IsPvPZone(zone) |
| local t = types[zone] |
| return t == "PvP Zone" |
| end |
| function Tourist:IsCity(zone) |
| local t = types[zone] |
| return t == "City" |
| end |
| function Tourist:IsAlliance(zone) |
| return factions[zone] == "Alliance" |
| end |
| function Tourist:IsHorde(zone) |
| return factions[zone] == "Horde" |
| end |
| if isHorde then |
| Tourist.IsFriendly = Tourist.IsHorde |
| Tourist.IsHostile = Tourist.IsAlliance |
| else |
| Tourist.IsFriendly = Tourist.IsAlliance |
| Tourist.IsHostile = Tourist.IsHorde |
| end |
| function Tourist:IsContested(zone) |
| return not factions[zone] |
| end |
| function Tourist:GetContinent(zone) |
| return continents[zone] or UNKNOWN |
| end |
| function Tourist:IsInKalimdor(zone) |
| return continents[zone] == Kalimdor |
| end |
| function Tourist:IsInEasternKingdoms(zone) |
| return continents[zone] == Eastern_Kingdoms |
| end |
| function Tourist:IsInOutland(zone) |
| return continents[zone] == Outland |
| end |
| function Tourist:IsInNorthrend(zone) |
| return continents[zone] == Northrend |
| end |
| function Tourist:GetInstanceGroupSize(instance) |
| return groupSizes[instance] or 0 |
| end |
| function Tourist:GetInstanceAltGroupSize(instance) |
| return groupAltSizes[instance] or 0 |
| end |
| function Tourist:GetTexture(zone) |
| return textures[zone] |
| end |
| function Tourist:GetZoneFromTexture(texture) |
| if not texture then |
| return BZ["Azeroth"] |
| end |
| return textures_rev[texture] |
| end |
| function Tourist:GetEnglishZoneFromTexture(texture) |
| if not texture then |
| return "Azeroth" |
| end |
| local zone = textures_rev[texture] |
| if zone then |
| return BZR[zone] |
| end |
| return nil |
| end |
| function Tourist:GetEntrancePortalLocation(instance) |
| return entrancePortals_zone[instance], entrancePortals_x[instance], entrancePortals_y[instance] |
| end |
| local inf = 1/0 |
| local stack = setmetatable({}, {__mode='k'}) |
| local function iterator(S) |
| local position = S['#'] - 1 |
| S['#'] = position |
| local x = S[position] |
| if not x then |
| for k in pairs(S) do |
| S[k] = nil |
| end |
| stack[S] = true |
| return nil |
| end |
| return x |
| end |
| setmetatable(cost, { |
| __index = function(self, vertex) |
| local price = 1 |
| if lows[vertex] > playerLevel then |
| price = price * (1 + math.ceil((lows[vertex] - playerLevel) / 6)) |
| end |
| if factions[vertex] == (isHorde and "Horde" or "Alliance") then |
| price = price / 2 |
| elseif factions[vertex] == (isHorde and "Alliance" or "Horde") then |
| if types[vertex] == "City" then |
| price = price * 10 |
| else |
| price = price * 3 |
| end |
| end |
| if types[x] == "Transport" then |
| price = price * 2 |
| end |
| self[vertex] = price |
| return price |
| end |
| }) |
| function Tourist:IteratePath(alpha, bravo) |
| if paths[alpha] == nil or paths[bravo] == nil then |
| return retNil |
| end |
| local d = next(stack) or {} |
| stack[d] = nil |
| local Q = next(stack) or {} |
| stack[Q] = nil |
| local S = next(stack) or {} |
| stack[S] = nil |
| local pi = next(stack) or {} |
| stack[pi] = nil |
| for vertex, v in pairs(paths) do |
| d[vertex] = inf |
| Q[vertex] = v |
| end |
| d[alpha] = 0 |
| while next(Q) do |
| local u |
| local min = inf |
| for z in pairs(Q) do |
| local value = d[z] |
| if value < min then |
| min = value |
| u = z |
| end |
| end |
| if min == inf then |
| return retNil |
| end |
| Q[u] = nil |
| if u == bravo then |
| break |
| end |
| local adj = paths[u] |
| if type(adj) == "table" then |
| local d_u = d[u] |
| for v in pairs(adj) do |
| local c = d_u + cost[v] |
| if d[v] > c then |
| d[v] = c |
| pi[v] = u |
| end |
| end |
| elseif adj ~= false then |
| local c = d[u] + cost[adj] |
| if d[adj] > c then |
| d[adj] = c |
| pi[adj] = u |
| end |
| end |
| end |
| local i = 1 |
| local last = bravo |
| while last do |
| S[i] = last |
| i = i + 1 |
| last = pi[last] |
| end |
| for k in pairs(pi) do |
| pi[k] = nil |
| end |
| for k in pairs(Q) do |
| Q[k] = nil |
| end |
| for k in pairs(d) do |
| d[k] = nil |
| end |
| stack[pi] = true |
| stack[Q] = true |
| stack[d] = true |
| S['#'] = i |
| return iterator, S |
| end |
| local function retWithOffset(t, key) |
| while true do |
| key = next(t, key) |
| if not key then |
| return nil |
| end |
| if yardYOffsets[key] then |
| return key |
| end |
| end |
| end |
| function Tourist:IterateBorderZones(zone, zonesOnly) |
| local path = paths[zone] |
| if not path then |
| return retNil |
| elseif type(path) == "table" then |
| return zonesOnly and retWithOffset or retNormal, path |
| else |
| if zonesOnly and not yardYOffsets[path] then |
| return retNil |
| end |
| return retOne, path |
| end |
| end |
| do |
| Tourist.frame = oldLib and oldLib.frame or CreateFrame("Frame", MAJOR_VERSION .. "Frame", UIParent) |
| Tourist.frame:UnregisterAllEvents() |
| Tourist.frame:RegisterEvent("PLAYER_LEVEL_UP") |
| Tourist.frame:RegisterEvent("PLAYER_ENTERING_WORLD") |
| Tourist.frame:SetScript("OnEvent", function(frame, event, ...) |
| PLAYER_LEVEL_UP(Tourist, ...) |
| end) |
| local BOOTYBAY_RATCHET_BOAT = string.format(X_Y_BOAT, BZ["Booty Bay"], BZ["Ratchet"]) |
| local MENETHIL_THERAMORE_BOAT = string.format(X_Y_BOAT, BZ["Menethil Harbor"], BZ["Theramore Isle"]) |
| local MENETHIL_HOWLINGFJORD_BOAT = string.format(X_Y_BOAT, BZ["Menethil Harbor"], BZ["Howling Fjord"]) |
| local AUBERDINE_DARNASSUS_BOAT = string.format(X_Y_BOAT, BZ["Auberdine"], BZ["Darnassus"]) |
| local AUBERDINE_AZUREMYST_BOAT = string.format(X_Y_BOAT, BZ["Auberdine"], BZ["Azuremyst Isle"]) |
| local STORMWIND_AUBERDINE_BOAT = string.format(X_Y_BOAT, BZ["Stormwind City"], BZ["Auberdine"]) |
| local STORMWIND_BOREANTUNDRA_BOAT = string.format(X_Y_BOAT, BZ["Stormwind City"], BZ["Borean Tundra"]) |
| local ORGRIMMAR_BOREANTUNDRA_ZEPPELIN = string.format(X_Y_ZEPPELIN, BZ["Orgrimmar"], BZ["Borean Tundra"]) |
| local UNDERCITY_HOWLINGFJORD_ZEPPELIN = string.format(X_Y_ZEPPELIN, BZ["Undercity"], BZ["Howling Fjord"]) |
| local ORGRIMMAR_UNDERCITY_ZEPPELIN = string.format(X_Y_ZEPPELIN, BZ["Orgrimmar"], BZ["Undercity"]) |
| local ORGRIMMAR_GROMGOL_ZEPPELIN = string.format(X_Y_ZEPPELIN, BZ["Orgrimmar"], BZ["Grom'gol Base Camp"]) |
| local UNDERCITY_GROMGOL_ZEPPELIN = string.format(X_Y_ZEPPELIN, BZ["Undercity"], BZ["Grom'gol Base Camp"]) |
| local SHATTRATH_IRONFORGE_PORTAL = string.format(X_Y_PORTAL, BZ["Shattrath City"], BZ["Ironforge"]) |
| local SHATTRATH_STORMWIND_PORTAL = string.format(X_Y_PORTAL, BZ["Shattrath City"], BZ["Stormwind City"]) |
| local SHATTRATH_DARNASSUS_PORTAL = string.format(X_Y_PORTAL, BZ["Shattrath City"], BZ["Darnassus"]) |
| local SHATTRATH_ORGRIMMAR_PORTAL = string.format(X_Y_PORTAL, BZ["Shattrath City"], BZ["Orgrimmar"]) |
| local SHATTRATH_THUNDERBLUFF_PORTAL = string.format(X_Y_PORTAL, BZ["Shattrath City"], BZ["Thunder Bluff"]) |
| local SHATTRATH_UNDERCITY_PORTAL = string.format(X_Y_PORTAL, BZ["Shattrath City"], BZ["Undercity"]) |
| local SHATTRATH_EXODAR_PORTAL = string.format(X_Y_PORTAL, BZ["Shattrath City"], BZ["The Exodar"]) |
| local SHATTRATH_SILVERMOON_PORTAL = string.format(X_Y_PORTAL, BZ["Shattrath City"], BZ["Silvermoon City"]) |
| local SHATTRATH_QUELDANAS_PORTAL = string.format(X_Y_PORTAL, BZ["Shattrath City"], BZ["Isle of Quel'Danas"]) |
| local SHATTRATH_COT_PORTAL = string.format(X_Y_PORTAL, BZ["Shattrath City"], BZ["Caverns of Time"]) |
| local MOAKI_UNUPE_BOAT = string.format(X_Y_BOAT, BZ["Dragonblight"], BZ["Borean Tundra"]) -- TODO localize these to the village names |
| local MOAKI_KAMAGUA_BOAT = string.format(X_Y_BOAT, BZ["Dragonblight"], BZ["Howling Fjord"]) -- TODO localize these to the village names |
| local DALARAN_IRONFORGE_PORTAL = string.format(X_Y_PORTAL, BZ["Dalaran"], BZ["Ironforge"]) |
| local DALARAN_STORMWIND_PORTAL = string.format(X_Y_PORTAL, BZ["Dalaran"], BZ["Stormwind City"]) |
| local DALARAN_DARNASSUS_PORTAL = string.format(X_Y_PORTAL, BZ["Dalaran"], BZ["Darnassus"]) |
| local DALARAN_ORGRIMMAR_PORTAL = string.format(X_Y_PORTAL, BZ["Dalaran"], BZ["Orgrimmar"]) |
| local DALARAN_THUNDERBLUFF_PORTAL = string.format(X_Y_PORTAL, BZ["Dalaran"], BZ["Thunder Bluff"]) |
| local DALARAN_UNDERCITY_PORTAL = string.format(X_Y_PORTAL, BZ["Dalaran"], BZ["Undercity"]) |
| local DALARAN_EXODAR_PORTAL = string.format(X_Y_PORTAL, BZ["Dalaran"], BZ["The Exodar"]) |
| local DALARAN_SILVERMOON_PORTAL = string.format(X_Y_PORTAL, BZ["Dalaran"], BZ["Silvermoon City"]) |
| local DALARAN_SHATTRATH_PORTAL = string.format(X_Y_PORTAL, BZ["Dalaran"], BZ["Shattrath City"]) |
| local DALARAN_COT_PORTAL = string.format(X_Y_PORTAL, BZ["Dalaran"], BZ["Caverns of Time"]) |
| local zones = {} |
| zones[BZ["Eastern Kingdoms"]] = { |
| type = "Continent", |
| yards = 47714.278579261, |
| x_offset = 0, |
| y_offset = 0, |
| continent = Eastern_Kingdoms, |
| } |
| zones[BZ["Kalimdor"]] = { |
| type = "Continent", |
| yards = 36800.210572494, |
| x_offset = 0, |
| y_offset = 0, |
| continent = Kalimdor, |
| } |
| zones[BZ["Outland"]] = { |
| type = "Continent", |
| yards = 17463.5328406368, |
| x_offset = 0, |
| y_offset = 0, |
| continent = Outland, |
| } |
| zones[BZ["Northrend"]] = { |
| type = "Continent", |
| yards = 17751.3962441049, |
| x_offset = 0, |
| y_offset = 0, |
| continent = Northrend, |
| } |
| zones[BZ["Azeroth"]] = { |
| type = "Continent", |
| yards = 44531.82907938571, |
| x_offset = 0, |
| y_offset = 0, |
| } |
| zones[STORMWIND_AUBERDINE_BOAT] = { |
| paths = { |
| [BZ["Stormwind City"]] = true, |
| [BZ["Darkshore"]] = true, |
| }, |
| faction = "Alliance", |
| type = "Transport", |
| } |
| zones[STORMWIND_BOREANTUNDRA_BOAT] = { |
| paths = { |
| [BZ["Stormwind City"]] = true, |
| [BZ["Borean Tundra"]] = true, |
| }, |
| faction = "Alliance", |
| type = "Transport", |
| } |
| zones[ORGRIMMAR_BOREANTUNDRA_ZEPPELIN] = { |
| paths = { |
| [BZ["Durotar"]] = true, |
| [BZ["Borean Tundra"]] = true, |
| }, |
| faction = "Horde", |
| type = "Transport", |
| } |
| zones[UNDERCITY_HOWLINGFJORD_ZEPPELIN] = { |
| paths = { |
| [BZ["Tirisfal Glades"]] = true, |
| [BZ["Howling Fjord"]] = true, |
| }, |
| faction = "Horde", |
| type = "Transport", |
| } |
| zones[AUBERDINE_AZUREMYST_BOAT] = { |
| paths = { |
| [BZ["Darkshore"]] = true, |
| [BZ["Azuremyst Isle"]] = true, |
| }, |
| faction = "Alliance", |
| type = "Transport", |
| } |
| zones[AUBERDINE_DARNASSUS_BOAT] = { |
| paths = { |
| [BZ["Darkshore"]] = true, |
| [BZ["Darnassus"]] = true, |
| }, |
| faction = "Alliance", |
| type = "Transport", |
| } |
| zones[BOOTYBAY_RATCHET_BOAT] = { |
| paths = { |
| [BZ["Stranglethorn Vale"]] = true, |
| [BZ["The Barrens"]] = true, |
| }, |
| type = "Transport", |
| } |
| zones[MENETHIL_HOWLINGFJORD_BOAT] = { |
| paths = { |
| [BZ["Wetlands"]] = true, |
| [BZ["Howling Fjord"]] = true, |
| }, |
| faction = "Alliance", |
| type = "Transport", |
| } |
| zones[MENETHIL_THERAMORE_BOAT] = { |
| paths = { |
| [BZ["Wetlands"]] = true, |
| [BZ["Dustwallow Marsh"]] = true, |
| }, |
| faction = "Alliance", |
| type = "Transport", |
| } |
| zones[ORGRIMMAR_GROMGOL_ZEPPELIN] = { |
| paths = { |
| [BZ["Durotar"]] = true, |
| [BZ["Stranglethorn Vale"]] = true, |
| }, |
| faction = "Horde", |
| type = "Transport", |
| } |
| zones[ORGRIMMAR_UNDERCITY_ZEPPELIN] = { |
| paths = { |
| [BZ["Durotar"]] = true, |
| [BZ["Tirisfal Glades"]] = true, |
| }, |
| faction = "Horde", |
| type = "Transport", |
| } |
| zones[SHATTRATH_DARNASSUS_PORTAL] = { |
| paths = BZ["Darnassus"], |
| type = "Transport", |
| } |
| zones[SHATTRATH_EXODAR_PORTAL] = { |
| paths = BZ["The Exodar"], |
| type = "Transport", |
| } |
| zones[SHATTRATH_IRONFORGE_PORTAL] = { |
| paths = BZ["Ironforge"], |
| type = "Transport", |
| } |
| zones[SHATTRATH_ORGRIMMAR_PORTAL] = { |
| paths = BZ["Orgrimmar"], |
| type = "Transport", |
| } |
| zones[SHATTRATH_SILVERMOON_PORTAL] = { |
| paths = BZ["Silvermoon City"], |
| type = "Transport", |
| } |
| zones[SHATTRATH_STORMWIND_PORTAL] = { |
| paths = BZ["Stormwind City"], |
| type = "Transport", |
| } |
| zones[SHATTRATH_THUNDERBLUFF_PORTAL] = { |
| paths = BZ["Thunder Bluff"], |
| type = "Transport", |
| } |
| zones[SHATTRATH_UNDERCITY_PORTAL] = { |
| paths = BZ["Undercity"], |
| type = "Transport", |
| } |
| zones[SHATTRATH_QUELDANAS_PORTAL] = { |
| paths = BZ["Isle of Quel'Danas"], |
| type = "Transport", |
| } |
| zones[SHATTRATH_COT_PORTAL] = { |
| paths = BZ["Caverns of Time"], |
| type = "Transport", |
| } |
| zones[MOAKI_UNUPE_BOAT] = { |
| paths = { |
| [BZ["Dragonblight"]] = true, |
| [BZ["Borean Tundra"]] = true, |
| }, |
| type = "Transport", |
| } |
| zones[MOAKI_KAMAGUA_BOAT] = { |
| paths = { |
| [BZ["Dragonblight"]] = true, |
| [BZ["Howling Fjord"]] = true, |
| }, |
| type = "Transport", |
| } |
| zones[BZ["The Dark Portal"]] = { |
| paths = { |
| [BZ["Blasted Lands"]] = true, |
| [BZ["Hellfire Peninsula"]] = true, |
| }, |
| type = "Transport", |
| } |
| zones[UNDERCITY_GROMGOL_ZEPPELIN] = { |
| paths = { |
| [BZ["Stranglethorn Vale"]] = true, |
| [BZ["Tirisfal Glades"]] = true, |
| }, |
| faction = "Horde", |
| type = "Transport", |
| } |
| zones[DALARAN_IRONFORGE_PORTAL] = { |
| paths = BZ["Ironforge"], |
| type = "Transport", |
| } |
| zones[DALARAN_STORMWIND_PORTAL] = { |
| paths = BZ["Stormwind City"], |
| type = "Transport", |
| } |
| zones[DALARAN_DARNASSUS_PORTAL] = { |
| paths = BZ["Darnassus"], |
| type = "Transport", |
| } |
| zones[DALARAN_ORGRIMMAR_PORTAL] = { |
| paths = BZ["Orgrimmar"], |
| type = "Transport", |
| } |
| zones[DALARAN_THUNDERBLUFF_PORTAL] = { |
| paths = BZ["Thunder Bluff"], |
| type = "Transport", |
| } |
| zones[DALARAN_UNDERCITY_PORTAL] = { |
| paths = BZ["Undercity"], |
| type = "Transport", |
| } |
| zones[DALARAN_EXODAR_PORTAL] = { |
| paths = BZ["The Exodar"], |
| type = "Transport", |
| } |
| zones[DALARAN_SILVERMOON_PORTAL] = { |
| paths = BZ["Silvermoon City"], |
| type = "Transport", |
| } |
| zones[DALARAN_SHATTRATH_PORTAL] = { |
| paths = BZ["Shattrath City"], |
| type = "Transport", |
| } |
| zones[DALARAN_COT_PORTAL] = { |
| paths = BZ["Caverns of Time"], |
| type = "Transport", |
| } |
| zones[BZ["Alterac Valley"]] = { |
| continent = Eastern_Kingdoms, |
| paths = BZ["Alterac Mountains"], |
| groupSize = 40, |
| type = "Battleground", |
| texture = "AlteracValley", |
| } |
| zones[BZ["Arathi Basin"]] = { |
| continent = Eastern_Kingdoms, |
| paths = BZ["Arathi Highlands"], |
| groupSize = 15, |
| type = "Battleground", |
| texture = "ArathiBasin", |
| fishing_min = 0, -- can't fish here |
| } |
| zones[BZ["Warsong Gulch"]] = { |
| continent = Kalimdor, |
| paths = isHorde and BZ["The Barrens"] or BZ["Ashenvale"], |
| groupSize = 10, |
| type = "Battleground", |
| texture = "WarsongGulch", |
| } |
| zones[BZ["Deeprun Tram"]] = { |
| continent = Eastern_Kingdoms, |
| paths = { |
| [BZ["Stormwind City"]] = true, |
| [BZ["Ironforge"]] = true, |
| }, |
| faction = "Alliance", |
| } |
| zones[BZ["Ironforge"]] = { |
| continent = Eastern_Kingdoms, |
| instances = BZ["Gnomeregan"], |
| paths = { |
| [BZ["Dun Morogh"]] = true, |
| [BZ["Deeprun Tram"]] = true, |
| }, |
| faction = "Alliance", |
| type = "City", |
| fishing_min = 1, |
| } |
| zones[BZ["Silvermoon City"]] = { |
| continent = Eastern_Kingdoms, |
| paths = { |
| [BZ["Eversong Woods"]] = true, |
| [BZ["Undercity"]] = true, |
| }, |
| faction = "Horde", |
| type = "City", |
| fishing_min = 1, |
| } |
| zones[BZ["Stormwind City"]] = { |
| continent = Eastern_Kingdoms, |
| instances = BZ["The Stockade"], |
| paths = { |
| [BZ["Deeprun Tram"]] = true, |
| [BZ["The Stockade"]] = true, |
| [BZ["Elwynn Forest"]] = true, |
| [STORMWIND_AUBERDINE_BOAT] = true, |
| [STORMWIND_BOREANTUNDRA_BOAT] = true, |
| }, |
| faction = "Alliance", |
| type = "City", |
| fishing_min = 1, |
| } |
| zones[BZ["Undercity"]] = { |
| continent = Eastern_Kingdoms, |
| instances = { |
| [BZ["Armory"]] = true, |
| [BZ["Library"]] = true, |
| [BZ["Graveyard"]] = true, |
| [BZ["Cathedral"]] = true, |
| }, |
| paths = { |
| [BZ["Silvermoon City"]] = true, |
| [BZ["Tirisfal Glades"]] = true, |
| }, |
| faction = "Horde", |
| type = "City", |
| fishing_min = 1, |
| } |
| zones[BZ["Dun Morogh"]] = { |
| low = 1, |
| high = 10, |
| continent = Eastern_Kingdoms, |
| instances = BZ["Gnomeregan"], |
| paths = { |
| [BZ["Wetlands"]] = true, |
| [BZ["Gnomeregan"]] = true, |
| [BZ["Ironforge"]] = true, |
| [BZ["Loch Modan"]] = true, |
| }, |
| faction = "Alliance", |
| fishing_min = 1, |
| } |
| zones[BZ["Elwynn Forest"]] = { |
| low = 1, |
| high = 10, |
| continent = Eastern_Kingdoms, |
| instances = BZ["The Stockade"], |
| paths = { |
| [BZ["Westfall"]] = true, |
| [BZ["Redridge Mountains"]] = true, |
| [BZ["Stormwind City"]] = true, |
| [BZ["Duskwood"]] = true, |
| }, |
| faction = "Alliance", |
| fishing_min = 1, |
| } |
| zones[BZ["Eversong Woods"]] = { |
| low = 1, |
| high = 10, |
| continent = Eastern_Kingdoms, |
| paths = { |
| [BZ["Silvermoon City"]] = true, |
| [BZ["Ghostlands"]] = true, |
| }, |
| faction = "Horde", |
| fishing_min = 20, |
| } |
| zones[BZ["Tirisfal Glades"]] = { |
| low = 1, |
| high = 10, |
| continent = Eastern_Kingdoms, |
| instances = { |
| [BZ["Armory"]] = true, |
| [BZ["Library"]] = true, |
| [BZ["Graveyard"]] = true, |
| [BZ["Cathedral"]] = true, |
| }, |
| paths = { |
| [BZ["Western Plaguelands"]] = true, |
| [BZ["Undercity"]] = true, |
| [BZ["Scarlet Monastery"]] = true, |
| [UNDERCITY_GROMGOL_ZEPPELIN] = true, |
| [ORGRIMMAR_UNDERCITY_ZEPPELIN] = true, |
| [UNDERCITY_HOWLINGFJORD_ZEPPELIN] = true, |
| [BZ["Silverpine Forest"]] = true, |
| }, |
| faction = "Horde", |
| fishing_min = 1, |
| } |
| zones[BZ["Amani Pass"]] = { |
| continent = Eastern_Kingdoms, |
| } |
| zones[BZ["Ghostlands"]] = { |
| low = 10, |
| high = 20, |
| continent = Eastern_Kingdoms, |
| instances = BZ["Zul'Aman"], |
| paths = { |
| [BZ["Eastern Plaguelands"]] = true, |
| [BZ["Zul'Aman"]] = true, |
| [BZ["Eversong Woods"]] = true, |
| }, |
| faction = "Horde", |
| fishing_min = 20, |
| } |
| zones[BZ["Loch Modan"]] = { |
| low = 10, |
| high = 20, |
| continent = Eastern_Kingdoms, |
| paths = { |
| [BZ["Wetlands"]] = true, |
| [BZ["Badlands"]] = true, |
| [BZ["Dun Morogh"]] = true, |
| [BZ["Searing Gorge"]] = not isHorde and true or nil, |
| }, |
| faction = "Alliance", |
| fishing_min = 20, |
| } |
| zones[BZ["Silverpine Forest"]] = { |
| low = 10, |
| high = 20, |
| continent = Eastern_Kingdoms, |
| instances = BZ["Shadowfang Keep"], |
| paths = { |
| [BZ["Tirisfal Glades"]] = true, |
| [BZ["Hillsbrad Foothills"]] = true, |
| [BZ["Shadowfang Keep"]] = true, |
| }, |
| faction = "Horde", |
| fishing_min = 20, |
| } |
| zones[BZ["Westfall"]] = { |
| low = 10, |
| high = 20, |
| continent = Eastern_Kingdoms, |
| instances = BZ["The Deadmines"], |
| paths = { |
| [BZ["Duskwood"]] = true, |
| [BZ["Elwynn Forest"]] = true, |
| [BZ["The Deadmines"]] = true, |
| }, |
| faction = "Alliance", |
| fishing_min = 55, |
| } |
| zones[BZ["Redridge Mountains"]] = { |
| low = 15, |
| high = 25, |
| continent = Eastern_Kingdoms, |
| paths = { |
| [BZ["Burning Steppes"]] = true, |
| [BZ["Elwynn Forest"]] = true, |
| [BZ["Duskwood"]] = true, |
| }, |
| fishing_min = 55, |
| } |
| zones[BZ["Duskwood"]] = { |
| low = 18, |
| high = 30, |
| continent = Eastern_Kingdoms, |
| paths = { |
| [BZ["Redridge Mountains"]] = true, |
| [BZ["Stranglethorn Vale"]] = true, |
| [BZ["Westfall"]] = true, |
| [BZ["Deadwind Pass"]] = true, |
| [BZ["Elwynn Forest"]] = true, |
| }, |
| fishing_min = 55, |
| } |
| zones[BZ["Hillsbrad Foothills"]] = { |
| low = 20, |
| high = 30, |
| continent = Eastern_Kingdoms, |
| paths = { |
| [BZ["Alterac Mountains"]] = true, |
| [BZ["The Hinterlands"]] = true, |
| [BZ["Arathi Highlands"]] = true, |
| [BZ["Silverpine Forest"]] = true, |
| }, |
| fishing_min = 55, |
| } |
| zones[BZ["Wetlands"]] = { |
| low = 20, |
| high = 30, |
| continent = Eastern_Kingdoms, |
| paths = { |
| [BZ["Arathi Highlands"]] = true, |
| [MENETHIL_THERAMORE_BOAT] = true, |
| [MENETHIL_HOWLINGFJORD_BOAT] = true, |
| [BZ["Dun Morogh"]] = true, |
| [BZ["Loch Modan"]] = true, |
| }, |
| fishing_min = 55, |
| } |
| zones[BZ["Alterac Mountains"]] = { |
| low = 30, |
| high = 40, |
| continent = Eastern_Kingdoms, |
| instances = BZ["Alterac Valley"], |
| paths = { |
| [BZ["Western Plaguelands"]] = true, |
| [BZ["Alterac Valley"]] = true, |
| [BZ["Hillsbrad Foothills"]] = true, |
| }, |
| fishing_min = 130, |
| } |
| zones[BZ["Arathi Highlands"]] = { |
| low = 30, |
| high = 40, |
| continent = Eastern_Kingdoms, |
| instances = BZ["Arathi Basin"], |
| paths = { |
| [BZ["Wetlands"]] = true, |
| [BZ["Hillsbrad Foothills"]] = true, |
| [BZ["Arathi Basin"]] = true, |
| }, |
| fishing_min = 130, |
| } |
| zones[BZ["Stranglethorn Vale"]] = { |
| low = 30, |
| high = 45, |
| continent = Eastern_Kingdoms, |
| instances = BZ["Zul'Gurub"], |
| paths = { |
| [BZ["Zul'Gurub"]] = true, |
| [BOOTYBAY_RATCHET_BOAT] = true, |
| [BZ["Duskwood"]] = true, |
| [ORGRIMMAR_GROMGOL_ZEPPELIN] = true, |
| [UNDERCITY_GROMGOL_ZEPPELIN] = true, |
| }, |
| fishing_min = 130, |
| } |
| zones[BZ["Badlands"]] = { |
| low = 35, |
| high = 45, |
| continent = Eastern_Kingdoms, |
| instances = BZ["Uldaman"], |
| paths = { |
| [BZ["Uldaman"]] = true, |
| [BZ["Searing Gorge"]] = true, |
| [BZ["Loch Modan"]] = true, |
| }, |
| } |
| zones[BZ["Swamp of Sorrows"]] = { |
| low = 35, |
| high = 45, |
| continent = Eastern_Kingdoms, |
| instances = BZ["The Temple of Atal'Hakkar"], |
| paths = { |
| [BZ["Blasted Lands"]] = true, |
| [BZ["Deadwind Pass"]] = true, |
| [BZ["The Temple of Atal'Hakkar"]] = true, |
| }, |
| fishing_min = 130, |
| } |
| zones[BZ["The Hinterlands"]] = { |
| low = 45, |
| high = 50, |
| continent = Eastern_Kingdoms, |
| paths = { |
| [BZ["Hillsbrad Foothills"]] = true, |
| [BZ["Western Plaguelands"]] = true, |
| }, |
| fishing_min = 205, |
| } |
| zones[BZ["Searing Gorge"]] = { |
| low = 43, |
| high = 50, |
| continent = Eastern_Kingdoms, |
| instances = { |
| [BZ["Blackrock Depths"]] = true, |
| [BZ["Blackwing Lair"]] = true, |
| [BZ["Molten Core"]] = true, |
| [BZ["Blackrock Spire"]] = true, |
| }, |
| paths = { |
| [BZ["Blackrock Mountain"]] = true, |
| [BZ["Badlands"]] = true, |
| [BZ["Loch Modan"]] = not isHorde and true or nil, |
| }, |
| } |
| zones[BZ["Blackrock Mountain"]] = { |
| low = 42, |
| high = 54, |
| continent = Eastern_Kingdoms, |
| instances = { |
| [BZ["Blackrock Depths"]] = true, |
| [BZ["Blackwing Lair"]] = true, |
| [BZ["Molten Core"]] = true, |
| [BZ["Blackrock Spire"]] = true, |
| }, |
| paths = { |
| [BZ["Burning Steppes"]] = true, |
| [BZ["Blackwing Lair"]] = true, |
| [BZ["Molten Core"]] = true, |
| [BZ["Blackrock Depths"]] = true, |
| [BZ["Searing Gorge"]] = true, |
| [BZ["Blackrock Spire"]] = true, |
| }, |
| } |
| zones[BZ["Deadwind Pass"]] = { |
| low = 55, |
| high = 60, |
| continent = Eastern_Kingdoms, |
| instances = BZ["Karazhan"], |
| paths = { |
| [BZ["Duskwood"]] = true, |
| [BZ["Swamp of Sorrows"]] = true, |
| [BZ["Karazhan"]] = true, |
| }, |
| fishing_min = 330, |
| } |
| zones[BZ["Blasted Lands"]] = { |
| low = 45, |
| high = 55, |
| continent = Eastern_Kingdoms, |
| paths = { |
| [BZ["The Dark Portal"]] = true, |
| [BZ["Swamp of Sorrows"]] = true, |
| }, |
| } |
| zones[BZ["Burning Steppes"]] = { |
| low = 50, |
| high = 58, |
| continent = Eastern_Kingdoms, |
| instances = { |
| [BZ["Blackrock Depths"]] = true, |
| [BZ["Blackwing Lair"]] = true, |
| [BZ["Molten Core"]] = true, |
| [BZ["Blackrock Spire"]] = true, |
| }, |
| paths = { |
| [BZ["Blackrock Mountain"]] = true, |
| [BZ["Redridge Mountains"]] = true, |
| }, |
| fishing_min = 330, |
| } |
| zones[BZ["Western Plaguelands"]] = { |
| low = 51, |
| high = 58, |
| continent = Eastern_Kingdoms, |
| instances = BZ["Scholomance"], |
| paths = { |
| [BZ["The Hinterlands"]] = true, |
| [BZ["Eastern Plaguelands"]] = true, |
| [BZ["Tirisfal Glades"]] = true, |
| [BZ["Scholomance"]] = true, |
| [BZ["Alterac Mountains"]] = true, |
| }, |
| fishing_min = 205, |
| } |
| zones[BZ["Eastern Plaguelands"]] = { |
| low = 53, |
| high = 60, |
| continent = Eastern_Kingdoms, |
| instances = BZ["Stratholme"], |
| paths = { |
| [BZ["Western Plaguelands"]] = true, |
| [BZ["Stratholme"]] = true, |
| [BZ["Ghostlands"]] = true, |
| }, |
| type = "PvP Zone", |
| fishing_min = 330, |
| } |
| zones[BZ["The Deadmines"]] = { |
| low = 16, |
| high = 24, |
| continent = Eastern_Kingdoms, |
| paths = BZ["Westfall"], |
| groupSize = 5, |
| faction = "Alliance", |
| type = "Instance", |
| fishing_min = 20, |
| entrancePortal = { BZ["Westfall"], 42.6, 72.2 }, |
| } |
| zones[BZ["Shadowfang Keep"]] = { |
| low = 17, |
| high = 25, |
| continent = Eastern_Kingdoms, |
| paths = BZ["Silverpine Forest"], |
| groupSize = 5, |
| faction = "Horde", |
| type = "Instance", |
| entrancePortal = { BZ["Silverpine Forest"], 43, 67 }, |
| } |
| zones[BZ["The Stockade"]] = { |
| low = 21, |
| high = 29, |
| continent = Eastern_Kingdoms, |
| paths = BZ["Stormwind City"], |
| groupSize = 5, |
| faction = "Alliance", |
| type = "Instance", |
| entrancePortal = { BZ["Stormwind City"], 40.6, 55.8 }, |
| } |
| zones[BZ["Gnomeregan"]] = { |
| low = 24, |
| high = 40, |
| continent = Eastern_Kingdoms, |
| paths = BZ["Dun Morogh"], |
| groupSize = 5, |
| faction = "Alliance", |
| type = "Instance", |
| entrancePortal = { BZ["Dun Morogh"], 24, 38.9 }, |
| } |
| zones[BZ["Scarlet Monastery"]] = { |
| low = 28, |
| high = 44, |
| continent = Eastern_Kingdoms, |
| instances = { |
| [BZ["Armory"]] = true, |
| [BZ["Library"]] = true, |
| [BZ["Graveyard"]] = true, |
| [BZ["Cathedral"]] = true, |
| }, |
| paths = { |
| [BZ["Tirisfal Glades"]] = true, |
| [BZ["Armory"]] = true, |
| [BZ["Library"]] = true, |
| [BZ["Graveyard"]] = true, |
| [BZ["Cathedral"]] = true, |
| }, |
| faction = "Horde", |
| type = "Instance", |
| entrancePortal = { BZ["Tirisfal Glades"], 84.4, 32.9 }, |
| } |
| zones[BZ["Graveyard"]] = { |
| low = 28, |
| high = 44, |
| continent = Eastern_Kingdoms, |
| paths = BZ["Scarlet Monastery"], |
| groupSize = 5, |
| type = "Instance", |
| complex = BZ["Scarlet Monastery"], |
| entrancePortal = { BZ["Tirisfal Glades"], 84.4, 32.9 }, |
| } |
| zones[BZ["Library"]] = { |
| low = 28, |
| high = 44, |
| continent = Eastern_Kingdoms, |
| paths = BZ["Scarlet Monastery"], |
| groupSize = 5, |
| type = "Instance", |
| complex = BZ["Scarlet Monastery"], |
| entrancePortal = { BZ["Tirisfal Glades"], 84.4, 32.9 }, |
| } |
| zones[BZ["Armory"]] = { |
| low = 28, |
| high = 44, |
| continent = Eastern_Kingdoms, |
| paths = BZ["Scarlet Monastery"], |
| groupSize = 5, |
| type = "Instance", |
| complex = BZ["Scarlet Monastery"], |
| entrancePortal = { BZ["Tirisfal Glades"], 84.4, 32.9 }, |
| } |
| zones[BZ["Cathedral"]] = { |
| low = 28, |
| high = 44, |
| continent = Eastern_Kingdoms, |
| paths = BZ["Scarlet Monastery"], |
| groupSize = 5, |
| type = "Instance", |
| complex = BZ["Scarlet Monastery"], |
| entrancePortal = { BZ["Tirisfal Glades"], 84.4, 32.9 }, |
| } |
| zones[BZ["Uldaman"]] = { |
| low = 36, |
| high = 44, |
| continent = Eastern_Kingdoms, |
| paths = BZ["Badlands"], |
| groupSize = 5, |
| type = "Instance", |
| entrancePortal = { BZ["Badlands"], 42.4, 18.6 }, |
| } |
| zones[BZ["The Temple of Atal'Hakkar"]] = { |
| low = 45, |
| high = 54, |
| continent = Eastern_Kingdoms, |
| paths = BZ["Swamp of Sorrows"], |
| groupSize = 5, |
| type = "Instance", |
| fishing_min = 205, |
| entrancePortal = { BZ["Swamp of Sorrows"], 70, 54 }, |
| } |
| zones[BZ["Blackrock Depths"]] = { |
| low = 48, |
| high = 60, |
| continent = Eastern_Kingdoms, |
| paths = { |
| [BZ["Molten Core"]] = true, |
| [BZ["Blackrock Mountain"]] = true, |
| }, |
| groupSize = 5, |
| type = "Instance", |
| entrancePortal = { BZ["Searing Gorge"], 35.4, 84.4 }, |
| } |
| zones[BZ["Blackrock Spire"]] = { |
| low = 53, |
| high = 61, |
| continent = Eastern_Kingdoms, |
| paths = { |
| [BZ["Blackrock Mountain"]] = true, |
| [BZ["Blackwing Lair"]] = true, |
| }, |
| groupSize = 10, |
| type = "Instance", |
| entrancePortal = { BZ["Burning Steppes"], 29.7, 37.5 }, |
| } |
| zones[BZ["Scholomance"]] = { |
| low = 56, |
| high = 61, |
| continent = Eastern_Kingdoms, |
| paths = BZ["Western Plaguelands"], |
| groupSize = 5, |
| type = "Instance", |
| fishing_min = 330, |
| entrancePortal = { BZ["Western Plaguelands"], 69.4, 72.8 }, |
| } |
| zones[BZ["Stratholme"]] = { |
| low = 56, |
| high = 61, |
| continent = Eastern_Kingdoms, |
| paths = BZ["Eastern Plaguelands"], |
| groupSize = 5, |
| type = "Instance", |
| fishing_min = 330, |
| entrancePortal = { BZ["Eastern Plaguelands"], 30.8, 14.4 }, |
| } |
| zones[BZ["Blackwing Lair"]] = { |
| low = 60, |
| high = 62, |
| continent = Eastern_Kingdoms, |
| paths = BZ["Blackrock Mountain"], |
| groupSize = 40, |
| type = "Instance", |
| entrancePortal = { BZ["Burning Steppes"], 29.7, 37.5 }, |
| } |
| zones[BZ["Molten Core"]] = { |
| low = 60, |
| high = 62, |
| continent = Eastern_Kingdoms, |
| paths = BZ["Blackrock Mountain"], |
| groupSize = 40, |
| type = "Instance", |
| entrancePortal = { BZ["Searing Gorge"], 35.4, 84.4 }, |
| } |
| zones[BZ["Zul'Gurub"]] = { |
| low = 60, |
| high = 62, |
| continent = Eastern_Kingdoms, |
| paths = BZ["Stranglethorn Vale"], |
| groupSize = 20, |
| type = "Instance", |
| fishing_min = 330, |
| entrancePortal = { BZ["Stranglethorn Vale"], 52.2, 17.1 }, |
| } |
| zones[BZ["Karazhan"]] = { |
| low = 70, |
| high = 72, |
| continent = Eastern_Kingdoms, |
| paths = BZ["Deadwind Pass"], |
| groupSize = 10, |
| type = "Instance", |
| entrancePortal = { BZ["Deadwind Pass"], 40.9, 73.2 }, |
| } |
| zones[BZ["Zul'Aman"]] = { |
| low = 70, |
| high = 72, |
| continent = Eastern_Kingdoms, |
| paths = BZ["Ghostlands"], |
| groupSize = 10, |
| type = "Instance", |
| entrancePortal = { BZ["Ghostlands"], 77.7, 63.2 }, |
| } |
| zones[BZ["Darnassus"]] = { |
| continent = Kalimdor, |
| paths = { |
| [BZ["Teldrassil"]] = true, |
| [AUBERDINE_DARNASSUS_BOAT] = true, |
| }, |
| faction = "Alliance", |
| type = "City", |
| fishing_min = 1, |
| } |
| zones[BZ["Hyjal"]] = { |
| continent = Kalimdor, |
| } |
| zones[BZ["Moonglade"]] = { |
| continent = Kalimdor, |
| paths = { |
| [BZ["Felwood"]] = true, |
| [BZ["Winterspring"]] = true, |
| }, |
| fishing_min = 205, |
| } |
| zones[BZ["Orgrimmar"]] = { |
| continent = Kalimdor, |
| instances = BZ["Ragefire Chasm"], |
| paths = { |
| [BZ["Durotar"]] = true, |
| [BZ["Ragefire Chasm"]] = true, |
| }, |
| faction = "Horde", |
| type = "City", |
| fishing_min = 1, |
| } |
| zones[BZ["The Exodar"]] = { |
| continent = Kalimdor, |
| paths = BZ["Azuremyst Isle"], |
| faction = "Alliance", |
| type = "City", |
| fishing_min = 1, |
| } |
| zones[BZ["Thunder Bluff"]] = { |
| continent = Kalimdor, |
| paths = BZ["Mulgore"], |
| faction = "Horde", |
| type = "City", |
| fishing_min = 1, |
| } |
| zones[BZ["Azuremyst Isle"]] = { |
| low = 1, |
| high = 10, |
| continent = Kalimdor, |
| paths = { |
| [BZ["The Exodar"]] = true, |
| [BZ["Bloodmyst Isle"]] = true, |
| [AUBERDINE_AZUREMYST_BOAT] = true, |
| }, |
| faction = "Alliance", |
| fishing_min = 20, |
| } |
| zones[BZ["Durotar"]] = { |
| low = 1, |
| high = 10, |
| continent = Kalimdor, |
| instances = BZ["Ragefire Chasm"], |
| paths = { |
| [ORGRIMMAR_UNDERCITY_ZEPPELIN] = true, |
| [ORGRIMMAR_GROMGOL_ZEPPELIN] = true, |
| [ORGRIMMAR_BOREANTUNDRA_ZEPPELIN] = true, |
| [BZ["The Barrens"]] = true, |
| [BZ["Orgrimmar"]] = true, |
| }, |
| faction = "Horde", |
| fishing_min = 1, |
| } |
| zones[BZ["Mulgore"]] = { |
| low = 1, |
| high = 10, |
| continent = Kalimdor, |
| paths = { |
| [BZ["Thunder Bluff"]] = true, |
| [BZ["The Barrens"]] = true, |
| }, |
| faction = "Horde", |
| fishing_min = 1, |
| } |
| zones[BZ["Teldrassil"]] = { |
| low = 1, |
| high = 10, |
| continent = Kalimdor, |
| paths = BZ["Darnassus"], |
| faction = "Alliance", |
| fishing_min = 1, |
| } |
| zones[BZ["Bloodmyst Isle"]] = { |
| low = 10, |
| high = 20, |
| continent = Kalimdor, |
| paths = BZ["Azuremyst Isle"], |
| faction = "Alliance", |
| fishing_min = 1, |
| } |
| zones[BZ["Darkshore"]] = { |
| low = 10, |
| high = 20, |
| continent = Kalimdor, |
| paths = { |
| [AUBERDINE_DARNASSUS_BOAT] = true, |
| [AUBERDINE_AZUREMYST_BOAT] = true, |
| [STORMWIND_AUBERDINE_BOAT] = true, |
| [BZ["Ashenvale"]] = true, |
| }, |
| faction = "Alliance", |
| fishing_min = 20, |
| } |
| zones[BZ["The Barrens"]] = { |
| low = 10, |
| high = 25, |
| continent = Kalimdor, |
| instances = { |
| [BZ["Razorfen Kraul"]] = true, |
| [BZ["Wailing Caverns"]] = true, |
| [BZ["Razorfen Downs"]] = true, |
| [BZ["Warsong Gulch"]] = isHorde and true or nil, |
| }, |
| paths = { |
| [BZ["Thousand Needles"]] = true, |
| [BZ["Razorfen Kraul"]] = true, |
| [BZ["Ashenvale"]] = true, |
| [BZ["Durotar"]] = true, |
| [BZ["Wailing Caverns"]] = true, |
| [BOOTYBAY_RATCHET_BOAT] = true, |
| [BZ["Dustwallow Marsh"]] = true, |
| [BZ["Razorfen Downs"]] = true, |
| [BZ["Stonetalon Mountains"]] = true, |
| [BZ["Mulgore"]] = true, |
| [BZ["Warsong Gulch"]] = isHorde and true or nil, |
| }, |
| faction = "Horde", |
| fishing_min = 20, |
| } |
| zones[BZ["Stonetalon Mountains"]] = { |
| low = 15, |
| high = 27, |
| continent = Kalimdor, |
| paths = { |
| [BZ["Desolace"]] = true, |
| [BZ["The Barrens"]] = true, |
| [BZ["Ashenvale"]] = true, |
| }, |
| fishing_min = 55, |
| } |
| zones[BZ["Ashenvale"]] = { |
| low = 18, |
| high = 30, |
| continent = Kalimdor, |
| instances = { |
| [BZ["Blackfathom Deeps"]] = true, |
| [BZ["Warsong Gulch"]] = not isHorde and true or nil, |
| }, |
| paths = { |
| [BZ["Azshara"]] = true, |
| [BZ["The Barrens"]] = true, |
| [BZ["Blackfathom Deeps"]] = true, |
| [BZ["Warsong Gulch"]] = not isHorde and true or nil, |
| [BZ["Felwood"]] = true, |
| [BZ["Darkshore"]] = true, |
| [BZ["Stonetalon Mountains"]] = true, |
| }, |
| fishing_min = 55, |
| } |
| zones[BZ["Thousand Needles"]] = { |
| low = 25, |
| high = 35, |
| continent = Kalimdor, |
| paths = { |
| [BZ["Feralas"]] = true, |
| [BZ["The Barrens"]] = true, |
| [BZ["Tanaris"]] = true, |
| }, |
| fishing_min = 130, |
| } |
| zones[BZ["Desolace"]] = { |
| low = 30, |
| high = 40, |
| continent = Kalimdor, |
| instances = BZ["Maraudon"], |
| paths = { |
| [BZ["Feralas"]] = true, |
| [BZ["Stonetalon Mountains"]] = true, |
| [BZ["Maraudon"]] = true, |
| }, |
| fishing_min = 130, |
| } |
| zones[BZ["Dustwallow Marsh"]] = { |
| low = 35, |
| high = 45, |
| continent = Kalimdor, |
| instances = BZ["Onyxia's Lair"], |
| paths = { |
| [BZ["Onyxia's Lair"]] = true, |
| [BZ["The Barrens"]] = true, |
| [MENETHIL_THERAMORE_BOAT] = true, |
| }, |
| fishing_min = 130, |
| } |
| zones[BZ["Feralas"]] = { |
| low = 40, |
| high = 50, |
| continent = Kalimdor, |
| instances = BZ["Dire Maul"], |
| paths = { |
| [BZ["Thousand Needles"]] = true, |
| [BZ["Desolace"]] = true, |
| [BZ["Dire Maul"]] = true, |
| }, |
| fishing_min = 205, |
| } |
| zones[BZ["Tanaris"]] = { |
| low = 40, |
| high = 50, |
| continent = Kalimdor, |
| instances = { |
| [BZ["Zul'Farrak"]] = true, |
| [BZ["Old Hillsbrad Foothills"]] = true, |
| [BZ["The Black Morass"]] = true, |
| [BZ["Hyjal Summit"]] = true, |
| [BZ["The Culling of Stratholme"]] = true, |
| }, |
| paths = { |
| [BZ["Thousand Needles"]] = true, |
| [BZ["Un'Goro Crater"]] = true, |
| [BZ["Zul'Farrak"]] = true, |
| [BZ["Caverns of Time"]] = true, |
| }, |
| fishing_min = 205, |
| } |
| zones[BZ["Azshara"]] = { |
| low = 45, |
| high = 55, |
| continent = Kalimdor, |
| paths = BZ["Ashenvale"], |
| fishing_min = 205, |
| } |
| zones[BZ["Felwood"]] = { |
| low = 48, |
| high = 55, |
| continent = Kalimdor, |
| paths = { |
| [BZ["Winterspring"]] = true, |
| [BZ["Moonglade"]] = true, |
| [BZ["Ashenvale"]] = true, |
| }, |
| fishing_min = 205, |
| } |
| zones[BZ["Un'Goro Crater"]] = { |
| low = 48, |
| high = 55, |
| continent = Kalimdor, |
| paths = { |
| [BZ["Silithus"]] = true, |
| [BZ["Tanaris"]] = true, |
| }, |
| fishing_min = 205, |
| } |
| zones[BZ["Silithus"]] = { |
| low = 55, |
| high = 60, |
| continent = Kalimdor, |
| instances = { |
| [BZ["Ahn'Qiraj"]] = true, |
| [BZ["Ruins of Ahn'Qiraj"]] = true, |
| }, |
| paths = { |
| [BZ["Ruins of Ahn'Qiraj"]] = true, |
| [BZ["Un'Goro Crater"]] = true, |
| [BZ["Ahn'Qiraj"]] = true, |
| }, |
| type = "PvP Zone", |
| fishing_min = 330, |
| } |
| zones[BZ["Winterspring"]] = { |
| low = 53, |
| high = 60, |
| continent = Kalimdor, |
| paths = { |
| [BZ["Felwood"]] = true, |
| [BZ["Moonglade"]] = true, |
| }, |
| fishing_min = 330, |
| } |
| zones[BZ["Ragefire Chasm"]] = { |
| low = 13, |
| high = 20, |
| continent = Kalimdor, |
| paths = BZ["Orgrimmar"], |
| groupSize = 5, |
| faction = "Horde", |
| type = "Instance", |
| entrancePortal = { BZ["Orgrimmar"], 52.8, 49 }, |
| } |
| zones[BZ["Wailing Caverns"]] = { |
| low = 16, |
| high = 24, |
| continent = Kalimdor, |
| paths = BZ["The Barrens"], |
| groupSize = 5, |
| faction = "Horde", |
| type = "Instance", |
| fishing_min = 20, |
| entrancePortal = { BZ["The Barrens"], 47.3, 35 }, |
| } |
| zones[BZ["Blackfathom Deeps"]] = { |
| low = 20, |
| high = 28, |
| continent = Kalimdor, |
| paths = BZ["Ashenvale"], |
| groupSize = 5, |
| type = "Instance", |
| fishing_min = 20, |
| entrancePortal = { BZ["Ashenvale"], 14.6, 15.3 }, |
| } |
| zones[BZ["Razorfen Kraul"]] = { |
| low = 23, |
| high = 31, |
| continent = Kalimdor, |
| paths = BZ["The Barrens"], |
| groupSize = 5, |
| type = "Instance", |
| entrancePortal = { BZ["The Barrens"], 40.6, 89.6 }, |
| } |
| zones[BZ["Razorfen Downs"]] = { |
| low = 33, |
| high = 41, |
| continent = Kalimdor, |
| paths = BZ["The Barrens"], |
| groupSize = 5, |
| type = "Instance", |
| entrancePortal = { BZ["The Barrens"], 47, 88.1 }, |
| } |
| zones[BZ["Zul'Farrak"]] = { |
| low = 42, |
| high = 50, |
| continent = Kalimdor, |
| paths = BZ["Tanaris"], |
| groupSize = 5, |
| type = "Instance", |
| entrancePortal = { BZ["Tanaris"], 36, 11.7 }, |
| } |
| zones[BZ["Maraudon"]] = { |
| low = 40, |
| high = 52, |
| continent = Kalimdor, |
| paths = BZ["Desolace"], |
| groupSize = 5, |
| type = "Instance", |
| fishing_min = 205, |
| entrancePortal = { BZ["Desolace"], 29, 62.4 }, |
| } |
| zones[BZ["Dire Maul"]] = { |
| low = 54, |
| high = 61, |
| continent = Kalimdor, |
| paths = BZ["Feralas"], |
| groupSize = 5, |
| type = "Instance", |
| entrancePortal = { BZ["Feralas"], 58.5, 44.1 }, |
| } |
| zones[BZ["Onyxia's Lair"]] = { |
| low = 60, |
| high = 62, |
| continent = Kalimdor, |
| paths = BZ["Dustwallow Marsh"], |
| groupSize = 40, |
| type = "Instance", |
| entrancePortal = { BZ["Dustwallow Marsh"], 52, 76 }, |
| } |
| zones[BZ["Ahn'Qiraj"]] = { |
| low = 60, |
| high = 62, |
| continent = Kalimdor, |
| paths = BZ["Silithus"], |
| groupSize = 40, |
| type = "Instance", |
| entrancePortal = { BZ["Silithus"], 29.3, 94 }, |
| } |
| zones[BZ["Ruins of Ahn'Qiraj"]] = { |
| low = 60, |
| high = 62, |
| continent = Kalimdor, |
| paths = BZ["Silithus"], |
| groupSize = 20, |
| type = "Instance", |
| entrancePortal = { BZ["Silithus"], 29.3, 94 }, |
| } |
| zones[BZ["Caverns of Time"]] = { |
| continent = Kalimdor, |
| instances = { |
| [BZ["Old Hillsbrad Foothills"]] = true, |
| [BZ["The Black Morass"]] = true, |
| [BZ["Hyjal Summit"]] = true, |
| [BZ["The Culling of Stratholme"]] = true, |
| }, |
| paths = { |
| [BZ["Tanaris"]] = true, |
| [BZ["Old Hillsbrad Foothills"]] = true, |
| [BZ["The Black Morass"]] = true, |
| [BZ["Hyjal Summit"]] = true, |
| [BZ["The Culling of Stratholme"]] = true, |
| }, |
| entrancePortal = { BZ["Tanaris"], 66.2, 49.3 }, |
| } |
| zones[BZ["Old Hillsbrad Foothills"]] = { |
| low = 66, |
| high = 68, |
| continent = Kalimdor, |
| paths = BZ["Caverns of Time"], |
| groupSize = 5, |
| type = "Instance", |
| complex = BZ["Caverns of Time"], |
| entrancePortal = { BZ["Tanaris"], 66.2, 49.3 }, |
| } |
| zones[BZ["The Black Morass"]] = { |
| low = 69, |
| high = 72, |
| continent = Kalimdor, |
| paths = BZ["Caverns of Time"], |
| groupSize = 5, |
| type = "Instance", |
| complex = BZ["Caverns of Time"], |
| entrancePortal = { BZ["Tanaris"], 66.2, 49.3 }, |
| } |
| zones[BZ["The Culling of Stratholme"]] = { |
| low = 80, |
| high = 80, |
| continent = Kalimdor, |
| paths = BZ["Caverns of Time"], |
| groupSize = 5, |
| type = "Instance", |
| complex = BZ["Caverns of Time"], |
| entrancePortal = { BZ["Tanaris"], 66.2, 49.3 }, |
| } |
| zones[BZ["Hyjal Summit"]] = { |
| low = 70, |
| high = 72, |
| continent = Kalimdor, |
| paths = BZ["Caverns of Time"], |
| groupSize = 25, |
| type = "Instance", |
| complex = BZ["Caverns of Time"], |
| entrancePortal = { BZ["Tanaris"], 66.2, 49.3 }, |
| } |
| zones[BZ["Shattrath City"]] = { |
| continent = Outland, |
| paths = { |
| [SHATTRATH_THUNDERBLUFF_PORTAL] = true, |
| [SHATTRATH_STORMWIND_PORTAL] = true, |
| [SHATTRATH_UNDERCITY_PORTAL] = true, |
| [BZ["Terokkar Forest"]] = true, |
| [SHATTRATH_SILVERMOON_PORTAL] = true, |
| [SHATTRATH_EXODAR_PORTAL] = true, |
| [SHATTRATH_DARNASSUS_PORTAL] = true, |
| [SHATTRATH_ORGRIMMAR_PORTAL] = true, |
| [SHATTRATH_IRONFORGE_PORTAL] = true, |
| [BZ["Nagrand"]] = true, |
| [SHATTRATH_QUELDANAS_PORTAL] = true, |
| --[SHATTRATH_COT_PORTAL] = true, |
| }, |
| type = "City", |
| } |
| zones[BZ["Hellfire Citadel"]] = { |
| continent = Outland, |
| instances = { |
| [BZ["The Blood Furnace"]] = true, |
| [BZ["Hellfire Ramparts"]] = true, |
| [BZ["Magtheridon's Lair"]] = true, |
| [BZ["The Shattered Halls"]] = true, |
| }, |
| paths = { |
| [BZ["Hellfire Peninsula"]] = true, |
| [BZ["The Blood Furnace"]] = true, |
| [BZ["Hellfire Ramparts"]] = true, |
| [BZ["Magtheridon's Lair"]] = true, |
| [BZ["The Shattered Halls"]] = true, |
| }, |
| entrancePortal = { BZ["Hellfire Peninsula"], 46.8, 54.9 }, |
| } |
| zones[BZ["Hellfire Peninsula"]] = { |
| low = 58, |
| high = 63, |
| continent = Outland, |
| instances = { |
| [BZ["The Blood Furnace"]] = true, |
| [BZ["Hellfire Ramparts"]] = true, |
| [BZ["Magtheridon's Lair"]] = true, |
| [BZ["The Shattered Halls"]] = true, |
| }, |
| paths = { |
| [BZ["Zangarmarsh"]] = true, |
| [BZ["The Dark Portal"]] = true, |
| [BZ["Terokkar Forest"]] = true, |
| [BZ["Hellfire Citadel"]] = true, |
| }, |
| type = "PvP Zone", |
| fishing_min = 280, |
| } |
| zones[BZ["Coilfang Reservoir"]] = { |
| continent = Outland, |
| instances = { |
| [BZ["The Underbog"]] = true, |
| [BZ["Serpentshrine Cavern"]] = true, |
| [BZ["The Steamvault"]] = true, |
| [BZ["The Slave Pens"]] = true, |
| }, |
| paths = { |
| [BZ["Zangarmarsh"]] = true, |
| [BZ["The Underbog"]] = true, |
| [BZ["Serpentshrine Cavern"]] = true, |
| [BZ["The Steamvault"]] = true, |
| [BZ["The Slave Pens"]] = true, |
| }, |
| entrancePortal = { BZ["Zangarmarsh"], 50.2, 40.8 }, |
| } |
| zones[BZ["Zangarmarsh"]] = { |
| low = 60, |
| high = 64, |
| continent = Outland, |
| instances = { |
| [BZ["The Underbog"]] = true, |
| [BZ["Serpentshrine Cavern"]] = true, |
| [BZ["The Steamvault"]] = true, |
| [BZ["The Slave Pens"]] = true, |
| }, |
| paths = { |
| [BZ["Coilfang Reservoir"]] = true, |
| [BZ["Blade's Edge Mountains"]] = true, |
| [BZ["Terokkar Forest"]] = true, |
| [BZ["Nagrand"]] = true, |
| [BZ["Hellfire Peninsula"]] = true, |
| }, |
| type = "PvP Zone", |
| fishing_min = 305, |
| } |
| zones[BZ["Ring of Observance"]] = { |
| continent = Outland, |
| instances = { |
| [BZ["Mana-Tombs"]] = true, |
| [BZ["Sethekk Halls"]] = true, |
| [BZ["Shadow Labyrinth"]] = true, |
| [BZ["Auchenai Crypts"]] = true, |
| }, |
| paths = { |
| [BZ["Terokkar Forest"]] = true, |
| [BZ["Mana-Tombs"]] = true, |
| [BZ["Sethekk Halls"]] = true, |
| [BZ["Shadow Labyrinth"]] = true, |
| [BZ["Auchenai Crypts"]] = true, |
| }, |
| entrancePortal = { BZ["Terokkar Forest"], 39.6, 65.5 }, |
| } |
| zones[BZ["Terokkar Forest"]] = { |
| low = 62, |
| high = 65, |
| continent = Outland, |
| instances = { |
| [BZ["Mana-Tombs"]] = true, |
| [BZ["Sethekk Halls"]] = true, |
| [BZ["Shadow Labyrinth"]] = true, |
| [BZ["Auchenai Crypts"]] = true, |
| }, |
| paths = { |
| [BZ["Ring of Observance"]] = true, |
| [BZ["Shadowmoon Valley"]] = true, |
| [BZ["Zangarmarsh"]] = true, |
| [BZ["Shattrath City"]] = true, |
| [BZ["Hellfire Peninsula"]] = true, |
| [BZ["Nagrand"]] = true, |
| }, |
| type = "PvP Zone", |
| fishing_min = 355, |
| } |
| zones[BZ["Nagrand"]] = { |
| low = 64, |
| high = 67, |
| continent = Outland, |
| paths = { |
| [BZ["Zangarmarsh"]] = true, |
| [BZ["Shattrath City"]] = true, |
| [BZ["Terokkar Forest"]] = true, |
| }, |
| type = "PvP Zone", |
| fishing_min = 380, |
| } |
| zones[BZ["Blade's Edge Mountains"]] = { |
| low = 65, |
| high = 68, |
| continent = Outland, |
| instances = BZ["Gruul's Lair"], |
| paths = { |
| [BZ["Netherstorm"]] = true, |
| [BZ["Zangarmarsh"]] = true, |
| [BZ["Gruul's Lair"]] = true, |
| }, |
| } |
| zones[BZ["Tempest Keep"]] = { |
| continent = Outland, |
| instances = { |
| [BZ["The Mechanar"]] = true, |
| [BZ["The Eye"]] = true, |
| [BZ["The Botanica"]] = true, |
| [BZ["The Arcatraz"]] = true, |
| }, |
| paths = { |
| [BZ["Netherstorm"]] = true, |
| [BZ["The Mechanar"]] = true, |
| [BZ["The Eye"]] = true, |
| [BZ["The Botanica"]] = true, |
| [BZ["The Arcatraz"]] = true, |
| }, |
| entrancePortal = { BZ["Netherstorm"], 76.5, 65.1 }, |
| } |
| zones[BZ["Netherstorm"]] = { |
| low = 67, |
| high = 70, |
| continent = Outland, |
| instances = { |
| [BZ["The Mechanar"]] = true, |
| [BZ["The Botanica"]] = true, |
| [BZ["The Arcatraz"]] = true, |
| [BZ["The Eye"]] = true, |
| }, |
| paths = { |
| [BZ["Tempest Keep"]] = true, |
| [BZ["Blade's Edge Mountains"]] = true, |
| }, |
| fishing_min = 380, |
| } |
| zones[BZ["Shadowmoon Valley"]] = { |
| low = 67, |
| high = 70, |
| continent = Outland, |
| instances = BZ["Black Temple"], |
| paths = { |
| [BZ["Terokkar Forest"]] = true, |
| [BZ["Black Temple"]] = true, |
| }, |
| fishing_min = 280, |
| } |
| zones[BZ["Black Temple"]] = { |
| low = 70, |
| high = 72, |
| continent = Outland, |
| paths = BZ["Shadowmoon Valley"], |
| groupSize = 25, |
| type = "Instance", |
| entrancePortal = { BZ["Shadowmoon Valley"], 77.7, 43.7 }, |
| } |
| zones[BZ["Auchenai Crypts"]] = { |
| low = 65, |
| high = 67, |
| continent = Outland, |
| paths = BZ["Ring of Observance"], |
| groupSize = 5, |
| type = "Instance", |
| complex = BZ["Auchindoun"], |
| entrancePortal = { BZ["Terokkar Forest"], 39.6, 65.5 }, |
| } |
| zones[BZ["Shadow Labyrinth"]] = { |
| low = 70, |
| high = 72, |
| continent = Outland, |
| paths = BZ["Ring of Observance"], |
| groupSize = 5, |
| type = "Instance", |
| complex = BZ["Auchindoun"], |
| entrancePortal = { BZ["Terokkar Forest"], 39.6, 65.5 }, |
| } |
| zones[BZ["Sethekk Halls"]] = { |
| low = 67, |
| high = 69, |
| continent = Outland, |
| paths = BZ["Ring of Observance"], |
| groupSize = 5, |
| type = "Instance", |
| complex = BZ["Auchindoun"], |
| entrancePortal = { BZ["Terokkar Forest"], 39.6, 65.5 }, |
| } |
| zones[BZ["Mana-Tombs"]] = { |
| low = 64, |
| high = 66, |
| continent = Outland, |
| paths = BZ["Ring of Observance"], |
| groupSize = 5, |
| type = "Instance", |
| complex = BZ["Auchindoun"], |
| entrancePortal = { BZ["Terokkar Forest"], 39.6, 65.5 }, |
| } |
| zones[BZ["Hellfire Ramparts"]] = { |
| low = 60, |
| high = 62, |
| continent = Outland, |
| paths = BZ["Hellfire Citadel"], |
| groupSize = 5, |
| type = "Instance", |
| complex = BZ["Hellfire Citadel"], |
| entrancePortal = { BZ["Hellfire Peninsula"], 46.8, 54.9 }, |
| } |
| zones[BZ["The Blood Furnace"]] = { |
| low = 61, |
| high = 63, |
| continent = Outland, |
| paths = BZ["Hellfire Citadel"], |
| groupSize = 5, |
| type = "Instance", |
| complex = BZ["Hellfire Citadel"], |
| entrancePortal = { BZ["Hellfire Peninsula"], 46.8, 54.9 }, |
| } |
| zones[BZ["The Shattered Halls"]] = { |
| low = 70, |
| high = 72, |
| continent = Outland, |
| paths = BZ["Hellfire Citadel"], |
| groupSize = 5, |
| type = "Instance", |
| complex = BZ["Hellfire Citadel"], |
| entrancePortal = { BZ["Hellfire Peninsula"], 46.8, 54.9 }, |
| } |
| zones[BZ["Magtheridon's Lair"]] = { |
| low = 70, |
| high = 72, |
| continent = Outland, |
| paths = BZ["Hellfire Citadel"], |
| groupSize = 25, |
| type = "Instance", |
| complex = BZ["Hellfire Citadel"], |
| entrancePortal = { BZ["Hellfire Peninsula"], 46.8, 54.9 }, |
| } |
| zones[BZ["The Slave Pens"]] = { |
| low = 62, |
| high = 64, |
| continent = Outland, |
| paths = BZ["Coilfang Reservoir"], |
| groupSize = 5, |
| type = "Instance", |
| complex = BZ["Coilfang Reservoir"], |
| entrancePortal = { BZ["Zangarmarsh"], 50.2, 40.8 }, |
| } |
| zones[BZ["The Underbog"]] = { |
| low = 63, |
| high = 65, |
| continent = Outland, |
| paths = BZ["Coilfang Reservoir"], |
| groupSize = 5, |
| type = "Instance", |
| complex = BZ["Coilfang Reservoir"], |
| entrancePortal = { BZ["Zangarmarsh"], 50.2, 40.8 }, |
| } |
| zones[BZ["The Steamvault"]] = { |
| low = 70, |
| high = 72, |
| continent = Outland, |
| paths = BZ["Coilfang Reservoir"], |
| groupSize = 5, |
| type = "Instance", |
| complex = BZ["Coilfang Reservoir"], |
| entrancePortal = { BZ["Zangarmarsh"], 50.2, 40.8 }, |
| } |
| zones[BZ["Serpentshrine Cavern"]] = { |
| low = 70, |
| high = 72, |
| continent = Outland, |
| paths = BZ["Coilfang Reservoir"], |
| groupSize = 25, |
| type = "Instance", |
| complex = BZ["Coilfang Reservoir"], |
| entrancePortal = { BZ["Zangarmarsh"], 50.2, 40.8 }, |
| } |
| zones[BZ["Gruul's Lair"]] = { |
| low = 70, |
| high = 72, |
| continent = Outland, |
| paths = BZ["Blade's Edge Mountains"], |
| groupSize = 25, |
| type = "Instance", |
| entrancePortal = { BZ["Blade's Edge Mountains"], 68, 24 }, |
| } |
| zones[BZ["The Mechanar"]] = { |
| low = 69, |
| high = 72, |
| continent = Outland, |
| paths = BZ["Tempest Keep"], |
| groupSize = 5, |
| type = "Instance", |
| complex = BZ["Tempest Keep"], |
| entrancePortal = { BZ["Netherstorm"], 76.5, 65.1 }, |
| } |
| zones[BZ["The Botanica"]] = { |
| low = 70, |
| high = 72, |
| continent = Outland, |
| paths = BZ["Tempest Keep"], |
| groupSize = 5, |
| type = "Instance", |
| complex = BZ["Tempest Keep"], |
| entrancePortal = { BZ["Netherstorm"], 76.5, 65.1 }, |
| } |
| zones[BZ["The Arcatraz"]] = { |
| low = 70, |
| high = 72, |
| continent = Outland, |
| paths = BZ["Tempest Keep"], |
| groupSize = 5, |
| type = "Instance", |
| complex = BZ["Tempest Keep"], |
| entrancePortal = { BZ["Netherstorm"], 76.5, 65.1 }, |
| } |
| zones[BZ["The Eye"]] = { |
| low = 70, |
| high = 72, |
| continent = Outland, |
| paths = BZ["Tempest Keep"], |
| groupSize = 25, |
| type = "Instance", |
| complex = BZ["Tempest Keep"], |
| entrancePortal = { BZ["Netherstorm"], 76.5, 65.1 }, |
| } |
| zones[BZ["Eye of the Storm"]] = { |
| low = 61, |
| high = 70, |
| continent = Outland, |
| groupSize = 25, |
| type = "Battleground", |
| texture = "NetherstormArena", |
| } |
| zones[BZ["Strand of the Ancients"]] = { |
| low = 71, |
| high = 80, |
| continent = Northrend, |
| groupSize = 25, |
| type = "Battleground", |
| texture = "StrandoftheAncients", |
| } |
| -- arenas |
| zones[BZ["Blade's Edge Arena"]] = { |
| low = 70, |
| high = 70, |
| continent = Outland, |
| type = "Arena", |
| } |
| zones[BZ["Nagrand Arena"]] = { |
| low = 70, |
| high = 70, |
| continent = Outland, |
| type = "Arena", |
| } |
| zones[BZ["Ruins of Lordaeron"]] = { |
| low = 70, |
| high = 70, |
| continent = Kalimdor, |
| type = "Arena", |
| } |
| -- 2.4 zones |
| zones[BZ["Isle of Quel'Danas"]] = { |
| continent = Eastern_Kingdoms, |
| low = 70, |
| high = 70, |
| paths = { |
| [BZ["Magisters' Terrace"]] = true, |
| [BZ["Sunwell Plateau"]] = true, |
| }, |
| instances = { |
| [BZ["Magisters' Terrace"]] = true, |
| [BZ["Sunwell Plateau"]] = true, |
| }, |
| fishing_min = 355, |
| } |
| zones[BZ["Magisters' Terrace"]] = { |
| low = 70, |
| high = 72, |
| continent = Eastern_Kingdoms, |
| paths = BZ["Isle of Quel'Danas"], |
| groupSize = 5, |
| type = "Instance", |
| entrancePortal = { BZ["Isle of Quel'Danas"], 61.3, 30.9 }, |
| } |
| zones[BZ["Sunwell Plateau"]] = { |
| low = 70, |
| high = 72, |
| continent = Eastern_Kingdoms, |
| paths = BZ["Isle of Quel'Danas"], |
| groupSize = 25, |
| type = "Instance", |
| entrancePortal = { BZ["Isle of Quel'Danas"], 44.3, 45.7 }, |
| } |
| -- WOTLK Zones |
| zones[BZ["Dalaran"]] = { |
| continent = Northrend, |
| paths = { |
| [BZ["Crystalsong Forest"]] = true, |
| [BZ["The Violet Hold"]] = true, |
| [DALARAN_IRONFORGE_PORTAL] = true, |
| [DALARAN_STORMWIND_PORTAL] = true, |
| [DALARAN_DARNASSUS_PORTAL] = true, |
| [DALARAN_ORGRIMMAR_PORTAL] = true, |
| [DALARAN_THUNDERBLUFF_PORTAL] = true, |
| [DALARAN_UNDERCITY_PORTAL] = true, |
| [DALARAN_EXODAR_PORTAL] = true, |
| [DALARAN_SILVERMOON_PORTAL] = true, |
| [DALARAN_SHATTRATH_PORTAL] = true, |
| [DALARAN_COT_PORTAL] = true, |
| }, |
| instances = BZ["The Violet Hold"], |
| type = "City", |
| texture = "Dalaran", |
| fishing_min = 430, |
| } |
| zones[BZ["Plaguelands: The Scarlet Enclave"]] = { |
| low = 55, |
| high = 58, |
| continent = Eastern_Kingdoms, |
| yards = 3162.5, |
| x_offset = 0, |
| y_offset = 0, |
| texture = "ScarletEnclave", |
| } |
| zones[BZ["Borean Tundra"]] = { |
| low = 68, |
| high = 72, |
| continent = Northrend, |
| paths = { |
| [BZ["Coldarra"]] = true, |
| [BZ["Dragonblight"]] = true, |
| [BZ["Sholazar Basin"]] = true, |
| [STORMWIND_BOREANTUNDRA_BOAT] = true, |
| [ORGRIMMAR_BOREANTUNDRA_ZEPPELIN] = true, |
| [MOAKI_UNUPE_BOAT] = true, |
| }, |
| instances = { |
| [BZ["The Nexus"]] = true, |
| [BZ["The Oculus"]] = true, |
| [BZ["The Eye of Eternity"]] = true, |
| }, |
| fishing_min = 380, |
| } |
| zones[BZ["Coldarra"]] = { |
| continent = Northrend, |
| paths = { |
| [BZ["Coldarra"]] = true, |
| [BZ["The Nexus"]] = true, |
| [BZ["The Oculus"]] = true, |
| [BZ["The Eye of Eternity"]] = true, |
| }, |
| instances = { |
| [BZ["The Nexus"]] = true, |
| [BZ["The Oculus"]] = true, |
| [BZ["The Eye of Eternity"]] = true, |
| }, |
| fishing_min = 380, |
| } |
| zones[BZ["Howling Fjord"]] = { |
| low = 68, |
| high = 72, |
| continent = Northrend, |
| paths = { |
| [BZ["Grizzly Hills"]] = true, |
| [MENETHIL_HOWLINGFJORD_BOAT] = true, |
| [UNDERCITY_HOWLINGFJORD_ZEPPELIN] = true, |
| [MOAKI_KAMAGUA_BOAT] = true, |
| [BZ["Utgarde Keep"]] = true, |
| [BZ["Utgarde Pinnacle"]] = true, |
| }, |
| instances = { |
| [BZ["Utgarde Keep"]] = true, |
| [BZ["Utgarde Pinnacle"]] = true, |
| }, |
| fishing_min = 380, |
| } |
| zones[BZ["Dragonblight"]] = { |
| low = 71, |
| high = 74, |
| continent = Northrend, |
| paths = { |
| [BZ["Borean Tundra"]] = true, |
| [BZ["Grizzly Hills"]] = true, |
| [BZ["Zul'Drak"]] = true, |
| [BZ["Crystalsong Forest"]] = true, |
| [MOAKI_UNUPE_BOAT] = true, |
| [MOAKI_KAMAGUA_BOAT] = true, |
| [BZ["Azjol-Nerub"]] = true, |
| [BZ["Ahn'kahet: The Old Kingdom"]] = true, |
| [BZ["Naxxramas"]] = true, |
| [BZ["The Obsidian Sanctum"]] = true, |
| }, |
| instances = { |
| [BZ["Azjol-Nerub"]] = true, |
| [BZ["Ahn'kahet: The Old Kingdom"]] = true, |
| [BZ["Naxxramas"]] = true, |
| [BZ["The Obsidian Sanctum"]] = true, |
| }, |
| fishing_min = 430, |
| } |
| zones[BZ["Grizzly Hills"]] = { |
| low = 73, |
| high = 75, |
| continent = Northrend, |
| paths = { |
| [BZ["Howling Fjord"]] = true, |
| [BZ["Dragonblight"]] = true, |
| [BZ["Zul'Drak"]] = true, |
| [BZ["Drak'Tharon Keep"]] = true, |
| }, |
| instances = BZ["Drak'Tharon Keep"], |
| fishing_min = 380, |
| } |
| zones[BZ["Zul'Drak"]] = { |
| low = 74, |
| high = 77, |
| continent = Northrend, |
| paths = { |
| [BZ["Dragonblight"]] = true, |
| [BZ["Grizzly Hills"]] = true, |
| [BZ["Crystalsong Forest"]] = true, |
| [BZ["Gundrak"]] = true, |
| }, |
| instances = BZ["Gundrak"], |
| fishing_min = 380, |
| } |
| zones[BZ["Sholazar Basin"]] = { |
| low = 76, |
| high = 78, |
| continent = Northrend, |
| paths = BZ["Borean Tundra"], |
| fishing_min = 430, |
| } |
| zones[BZ["Crystalsong Forest"]] = { |
| low = 77, |
| high = 80, |
| continent = Northrend, |
| paths = { |
| --[BZ["Dalaran"]] = true, |
| [BZ["Dragonblight"]] = true, |
| [BZ["Zul'Drak"]] = true, |
| [BZ["The Storm Peaks"]] = true, |
| }, |
| fishing_min = 405, |
| } |
| zones[BZ["The Storm Peaks"]] = { |
| low = 77, |
| high = 80, |
| continent = Northrend, |
| paths = { |
| [BZ["Crystalsong Forest"]] = true, |
| [BZ["Halls of Stone"]] = true, |
| [BZ["Halls of Lightning"]] = true, |
| [BZ["Ulduar"]] = true, |
| }, |
| instances = { |
| [BZ["Halls of Stone"]] = true, |
| [BZ["Halls of Lightning"]] = true, |
| [BZ["Ulduar"]] = true, |
| }, |
| fishing_min = 455, |
| } |
| zones[BZ["Icecrown"]] = { |
| low = 77, |
| high = 80, |
| continent = Northrend, |
| --paths = { |
| -- [BZ["Icecrown Citadel"]] = true, |
| --}, |
| --instances = { |
| -- [BZ["Icecrown Citadel"]] = true, |
| --}, |
| fishing_min = 455, |
| } |
| zones[BZ["Wintergrasp"]] = { |
| low = 77, |
| high = 80, |
| continent = Northrend, |
| paths = BZ["Vault of Archavon"], |
| instances = BZ["Vault of Archavon"], |
| type = "PvP Zone", |
| fishing_min = 430, |
| } |
| -- WOTLK Dungeons |
| zones[BZ["Utgarde Keep"]] = { |
| low = 70, |
| high = 72, |
| continent = Northrend, |
| paths = BZ["Howling Fjord"], |
| groupSize = 5, |
| type = "Instance", |
| entrancePortal = { BZ["Howling Fjord"], 58, 45 }, -- TODO: Validate |
| } |
| zones[BZ["Utgarde Pinnacle"]] = { |
| low = 80, |
| high = 80, |
| continent = Northrend, |
| paths = BZ["Howling Fjord"], |
| groupSize = 5, |
| type = "Instance", |
| entrancePortal = { BZ["Howling Fjord"], 58, 45 }, -- TODO: Validate |
| } |
| zones[BZ["The Nexus"]] = { |
| low = 71, |
| high = 73, |
| continent = Northrend, |
| paths = BZ["Coldarra"], |
| groupSize = 5, |
| type = "Instance", |
| --entrancePortal = { BZ["Borean Tundra"], 58, 45 }, -- TODO |
| } |
| zones[BZ["The Oculus"]] = { |
| low = 80, |
| high = 80, |
| continent = Northrend, |
| paths = BZ["Coldarra"], |
| groupSize = 5, |
| type = "Instance", |
| --entrancePortal = { BZ["Borean Tundra"], 58, 45 }, -- TODO |
| } |
| zones[BZ["The Eye of Eternity"]] = { |
| low = 80, |
| high = 80, |
| continent = Northrend, |
| paths = BZ["Coldarra"], |
| groupSize = 10, |
| altGroupSize = 25, |
| type = "Instance", |
| --entrancePortal = { BZ["Borean Tundra"], 58, 45 }, -- TODO |
| } |
| zones[BZ["Azjol-Nerub"]] = { |
| low = 72, |
| high = 74, |
| continent = Northrend, |
| paths = BZ["Dragonblight"], |
| groupSize = 5, |
| type = "Instance", |
| --entrancePortal = { BZ["Dragonblight"], 58, 45 }, -- TODO |
| } |
| zones[BZ["Ahn'kahet: The Old Kingdom"]] = { |
| low = 73, |
| high = 75, |
| continent = Northrend, |
| paths = BZ["Dragonblight"], |
| groupSize = 5, |
| type = "Instance", |
| --entrancePortal = { BZ["Dragonblight"], 58, 45 }, -- TODO |
| } |
| zones[BZ["Naxxramas"]] = { |
| low = 80, |
| high = 80, |
| continent = Northrend, |
| paths = BZ["Dragonblight"], |
| groupSize = 10, |
| altGroupSize = 25, |
| type = "Instance", |
| entrancePortal = { BZ["Dragonblight"], 90, 46 }, -- TODO |
| } |
| zones[BZ["The Obsidian Sanctum"]] = { |
| low = 80, |
| high = 80, |
| continent = Northrend, |
| paths = BZ["Dragonblight"], |
| groupSize = 10, |
| altGroupSize = 25, |
| type = "Instance", |
| entrancePortal = { BZ["Dragonblight"], 60, 54 }, -- TODO |
| } |
| zones[BZ["Drak'Tharon Keep"]] = { |
| low = 74, |
| high = 76, |
| continent = Northrend, |
| paths = BZ["Grizzly Hills"], |
| groupSize = 5, |
| type = "Instance", |
| --entrancePortal = { BZ["Grizzly Hills"], 58, 45 }, -- TODO |
| } |
| zones[BZ["Gundrak"]] = { |
| low = 76, |
| high = 78, |
| continent = Northrend, |
| paths = BZ["Zul'Drak"], |
| groupSize = 5, |
| type = "Instance", |
| --entrancePortal = { BZ["Zul'Drak"], 58, 45 }, -- TODO |
| } |
| zones[BZ["Halls of Stone"]] = { |
| low = 77, |
| high = 79, |
| continent = Northrend, |
| paths = BZ["The Storm Peaks"], |
| groupSize = 5, |
| type = "Instance", |
| --entrancePortal = { BZ["The Storm Peaks"], 58, 45 }, -- TODO |
| } |
| zones[BZ["Halls of Lightning"]] = { |
| low = 80, |
| high = 80, |
| continent = Northrend, |
| paths = BZ["The Storm Peaks"], |
| groupSize = 5, |
| type = "Instance", |
| --entrancePortal = { BZ["The Storm Peaks"], 58, 45 }, -- TODO |
| } |
| zones[BZ["Ulduar"]] = { |
| low = 80, |
| high = 80, |
| continent = Northrend, |
| paths = BZ["The Storm Peaks"], |
| groupSize = 10, |
| altGroupSize = 25, |
| type = "Instance", |
| --entrancePortal = { BZ["The Storm Peaks"], 58, 45 }, -- TODO |
| fishing_min = 550, |
| } |
| zones[BZ["Trial of the Champion"]] = { |
| low = 80, |
| high = 80, |
| continent = Northrend, |
| paths = BZ["Icecrown"], |
| groupSize = 5, |
| type = "Instance", |
| } |
| zones[BZ["Trial of the Crusader"]] = { |
| low = 80, |
| high = 80, |
| continent = Northrend, |
| paths = BZ["Icecrown"], |
| groupSize = 10, |
| altGroupSize = 25, |
| type = "Instance", |
| } |
| zones[BZ["The Violet Hold"]] = { |
| low = 80, |
| high = 80, |
| continent = Northrend, |
| paths = BZ["Dalaran"], |
| groupSize = 5, |
| type = "Instance", |
| --entrancePortal = { BZ["The Storm Peaks"], 58, 45 }, -- TODO |
| } |
| --zones[BZ["Icecrown Citadel"]] = { |
| -- low = 80, |
| -- high = 80, |
| -- continent = Northrend, |
| -- paths = BZ["Icecrown"], |
| -- groupSize = 25, |
| -- type = "Instance", |
| --entrancePortal = { BZ["Icecrown"], 58, 45 }, -- TODO |
| --} |
| zones[BZ["Vault of Archavon"]] = { |
| low = 80, |
| high = 80, |
| continent = Northrend, |
| paths = BZ["Wintergrasp"], |
| groupSize = 10, |
| altGroupSize = 25, |
| type = "Instance", |
| } |
| zones[BZ["The Frozen Sea"]] = { |
| continent = Northrend, |
| fishing_min = 480, |
| } |
| local continentNames = { GetMapContinents() } |
| local doneZones = {} |
| for continentID, continentName in ipairs(continentNames) do |
| SetMapZoom(continentID) |
| if zones[continentName] then |
| zones[continentName].texture = GetMapInfo() |
| end |
| local zoneNames = { GetMapZones(continentID) } |
| local continentYards = zones[continentName].yards |
| for _ = 1, #zoneNames do |
| local x, y |
| local name, fileName, texPctX, texPctY, texX, texY, scrollX, scrollY |
| local finish = GetTime() + 0.1 |
| repeat |
| if finish < GetTime() then |
| name = nil |
| break |
| end |
| x, y = math.random(), math.random() |
| name, fileName, texPctX, texPctY, texX, texY, scrollX, scrollY = UpdateMapHighlight(x, y) |
| until name and not doneZones[name] |
| if name == nil then |
| break |
| end |
| doneZones[name] = true |
| if fileName == "EversongWoods" or fileName == "Ghostlands" or fileName == "Sunwell" or fileName == "SilvermoonCity" then |
| scrollX = scrollX - 0.00168 |
| scrollY = scrollY + 0.01 |
| end |
| if zones[name] then |
| zones[name].yards = texX * continentYards |
| zones[name].x_offset = scrollX * continentYards |
| zones[name].y_offset = scrollY * continentYards * 2/3 |
| zones[name].texture = fileName |
| end |
| end |
| end |
| SetMapToCurrentZone() |
| for k,v in pairs(zones) do |
| lows[k] = v.low or 0 |
| highs[k] = v.high or 0 |
| continents[k] = v.continent or UNKNOWN |
| instances[k] = v.instances |
| paths[k] = v.paths or false |
| types[k] = v.type or "Zone" |
| groupSizes[k] = v.groupSize |
| groupAltSizes[k] = v.altGroupSize |
| factions[k] = v.faction |
| yardWidths[k] = v.yards |
| yardHeights[k] = v.yards and v.yards * 2/3 or nil |
| yardXOffsets[k] = v.x_offset |
| yardYOffsets[k] = v.y_offset |
| fishing[k] = v.fishing_min |
| textures[k] = v.texture |
| complexes[k] = v.complex |
| if v.texture then |
| textures_rev[v.texture] = k |
| end |
| if v.entrancePortal then |
| entrancePortals_zone[k] = v.entrancePortal[1] |
| entrancePortals_x[k] = v.entrancePortal[2] |
| entrancePortals_y[k] = v.entrancePortal[3] |
| end |
| end |
| zones = nil |
| PLAYER_LEVEL_UP(Tourist) |
| end |
Libs/LibTourist-3.0/LICENSE.txt
New file
0,0 → 1,22
\ No newline at end of file
| Copyright (C) 2006-2007 ckknight |
| Permission is hereby granted, free of charge, to any person |
| obtaining a copy of this software and associated documentation |
| files (the "Software"), to deal in the Software without |
| restriction, including without limitation the rights to use, |
| copy, modify, merge, publish, distribute, sublicense, and/or sell |
| copies of the Software, and to permit persons to whom the |
| Software is furnished to do so, subject to the following |
| conditions: |
| The above copyright notice and this permission notice shall be |
| included in all copies or substantial portions of the Software. |
| THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, |
| EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES |
| OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND |
| NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT |
| HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, |
| WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING |
| FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR |
| OTHER DEALINGS IN THE SOFTWARE. |
Libs/LibTourist-3.0/LibTourist-3.0.toc
New file
0,0 → 1,17
| ## Interface: 30100 |
| ## LoadOnDemand: 1 |
| ## Title: Lib: Tourist-3.0 |
| ## Notes: A library to provide information about zones and instances. |
| ## Author: ckknight |
| ## X-eMail: ckknight@gmail.com |
| ## X-Category: Library |
| ## Dependencies: LibBabble-Zone-3.0 |
| ## X-License: MIT |
| ## X-Credits: Abydos |
| ## X-Curse-Packaged-Version: WoW-3.2-release |
| ## X-Curse-Project-Name: LibTourist-3.0 |
| ## X-Curse-Project-ID: libtourist-3-0 |
| ## X-Curse-Repository-ID: wow/libtourist-3-0/mainline |
| LibStub\LibStub.lua |
| lib.xml |
Libs/LibGuildPositions-1.0/LibGuildPositions-1.0.lua
New file
0,0 → 1,312
| --[[ |
| Name: LibGuildPositions-1.0 |
| Revision: $Rev: 37 $ |
| Author: Cameron Kenneth Knight (ckknight@gmail.com) |
| Website: http://www.wowace.com/ |
| Description: Communicates with guild members for their positions on the world map |
| License: MIT |
| ]] |
| local MAJOR_VERSION = "LibGuildPositions-1.0" |
| local MINOR_VERSION = 90000 + tonumber(("$Revision: 37 $"):match("%d+")) or 0 |
| -- #AUTODOC_NAMESPACE lib |
| local lib, oldMinor = LibStub:NewLibrary(MAJOR_VERSION, MINOR_VERSION) |
| if not lib then |
| return |
| end |
| local COMM_PREFIX = "LGP" |
| local _G = _G |
| local pairs = _G.pairs |
| local next = _G.next |
| local IsInGuild = _G.IsInGuild |
| local GetNumGuildMembers = _G.GetNumGuildMembers |
| local GetGuildRosterInfo = _G.GetGuildRosterInfo |
| local GetTime = _G.GetTime |
| local IsInInstance = _G.IsInInstance |
| local GetPlayerMapPosition = _G.GetPlayerMapPosition |
| local GetMapInfo = _G.GetMapInfo |
| local string_char = _G.string.char |
| local math_floor = _G.math.floor |
| local math_max = _G.math.max |
| local frame = lib.frame |
| if not frame then |
| frame = _G.CreateFrame("Frame") |
| lib.frame = frame |
| end |
| frame:UnregisterAllEvents() |
| frame:SetScript("OnUpdate", nil) |
| frame:SetScript("OnEvent", nil) |
| frame:Show() |
| local callbacks = lib.callbacks |
| if not callbacks then |
| callbacks = LibStub("CallbackHandler-1.0"):New(lib) |
| lib.callbacks = callbacks |
| end |
| if not lib.IsGCPFHooked then |
| --[[ |
| Hooking the OnShow, which registers the event, to unregister it so that |
| the Guild Control Panel (for guildmasters) will not "reset" every 15 |
| seconds because this library performs GuildRoster() every 15 seconds. |
| ]] |
| hooksecurefunc("GuildControlPopupFrame_OnShow", function() |
| GuildControlPopupFrame:UnregisterEvent("GUILD_ROSTER_UPDATE") |
| end) |
| lib.IsGCPFHooked = true |
| end |
| local guildieX = {} |
| local guildieY = {} |
| local guildieZone = {} |
| local guildieExpireTime = {} |
| local function iter(_, guildieName) |
| local guildieName, x = next(guildieX, guildieName) |
| if not guildieName then |
| return nil |
| end |
| local y = guildieY[guildieName] |
| local zone = guildieZone[guildieName] |
| return guildieName, x, y, zone |
| end |
| --[[ |
| Notes: |
| x and y are in the range [0, 1] |
| zone is the map texture that the guild member is in, not the localized name. |
| Returns: |
| iterator that returns name, x, y, and zone |
| Example: |
| for name, x, y, zone in LibStub("LibGuildPositions-1.0"):IterateGuildMembers() do |
| -- do stuff here |
| end |
| ]] |
| function lib:IterateGuildMembers() |
| return iter |
| end |
| --[[ |
| Notes: |
| x and y are in the range [0, 1] |
| zone is the map texture that the guild member is in, not the localized name. |
| Returns: |
| x, y, zone - the horizontal position, vertical position, and map texture of the guild member. All nil if unknown or not on the map or offline. |
| Example: |
| for name, x, y, zone in LibStub("LibGuildPositions-1.0"):GetPositionOfMember() do |
| -- do stuff here |
| end |
| ]] |
| function lib:GetPositionOfMember(name) |
| local x = guildieX[name] |
| if x then |
| return x, guildieY[name], guildieZone[name] |
| else |
| return nil, nil, nil |
| end |
| end |
| local clear_byte = ("C"):byte() |
| local position_byte = ("P"):byte() |
| local numGuildies = 0 |
| local nextGuildRoster = 0 |
| _G.hooksecurefunc("GuildRoster", function() |
| nextGuildRoster = GetTime() + 15 |
| end) |
| local function SendMessage(data) |
| _G.SendAddonMessage(COMM_PREFIX, data, "GUILD") |
| end |
| local events = {} |
| function events.ADDON_LOADED() |
| if _G.ChatThrottleLib then |
| local ChatThrottleLib = _G.ChatThrottleLib |
| function SendMessage(data) |
| ChatThrottleLib:SendAddonMessage("NORMAL", COMM_PREFIX, data, "GUILD", nil, MAJOR_VERSION) |
| end |
| frame:UnregisterEvent("ADDON_LOADED") |
| events.ADDON_LOADED = nil |
| end |
| end |
| local groupMembers = {} |
| _G.groupMembers = groupMembers |
| function events.RAID_ROSTER_UPDATE(event) |
| local prefix, amount = "raid", GetNumRaidMembers() |
| if amount == 0 then |
| prefix, amount = "party", GetNumPartyMembers() |
| end |
| for k in pairs(groupMembers) do |
| groupMembers[k] = nil |
| end |
| for i = 1, amount do |
| local name, realm = UnitName(prefix .. i) |
| if not realm or realm == "" then |
| groupMembers[name] = true |
| if guildieX[name] then |
| guildieX[name] = nil |
| guildieY[name] = nil |
| guildieZone[name] = nil |
| guildieExpireTime[name] = nil |
| callbacks:Fire("Clear", name) |
| end |
| end |
| end |
| end |
| events.PARTY_MEMBERS_CHANGED = events.RAID_ROSTER_UPDATE |
| events.PLAYER_LOGIN = events.RAID_ROSTER_UPDATE |
| local playerName = UnitName("player") |
| function events.CHAT_MSG_ADDON(event, prefix, message, distribution, sender) |
| if prefix ~= COMM_PREFIX or distribution ~= "GUILD" or playerName == sender or groupMembers[sender] then |
| return |
| end |
| local b = message:byte() |
| if not b then |
| return |
| end |
| if b == clear_byte then |
| guildieX[sender] = nil |
| guildieY[sender] = nil |
| guildieZone[sender] = nil |
| guildieExpireTime[sender] = nil |
| callbacks:Fire("Clear", sender) |
| elseif b == position_byte then |
| local x_1, x_2, y_1, y_2, zone_len = message:byte(2, 6) |
| if not zone_len then |
| return |
| end |
| local x = ((x_1-1)*255 + (x_2-1)) / (255^2) |
| local y = ((y_1-1)*255 + (y_2-1)) / (255^2) |
| zone_len = zone_len-1 |
| local zone = message:sub(7, 6+zone_len) |
| guildieX[sender] = x |
| guildieY[sender] = y |
| guildieZone[sender] = zone |
| guildieExpireTime[sender] = GetTime() + 120 |
| callbacks:Fire("Position", sender, x, y, zone) |
| end |
| end |
| function events.PLAYER_GUILD_UPDATE() |
| if IsInGuild() then |
| _G.GuildRoster() |
| else |
| numGuildies = 0 |
| end |
| end |
| local nextSpamTime |
| local safe = {} |
| function events.GUILD_ROSTER_UPDATE() |
| if IsInGuild() then |
| numGuildies = 0 |
| nextGuildRoster = GetTime() + 15 |
| for i = 1, GetNumGuildMembers(true) do |
| local name, _, _, _, _, _, _, _, online = GetGuildRosterInfo(i) |
| if online then |
| safe[name] = true |
| numGuildies = numGuildies + 1 |
| end |
| end |
| else |
| numGuildies = 0 |
| end |
| for name in pairs(guildieX) do |
| if not safe[name] then |
| guildieX[name] = nil |
| guildieY[name] = nil |
| guildieZone[name] = nil |
| guildieExpireTime[name] = nil |
| callbacks:Fire("Clear", name) |
| end |
| end |
| for name in pairs(safe) do |
| safe[name] = nil |
| end |
| if not nextSpamTime then |
| nextSpamTime = 0 |
| end |
| end |
| for event in pairs(events) do |
| frame:RegisterEvent(event) |
| end |
| frame:SetScript("OnEvent", function(this, event, ...) |
| events[event](event, ...) |
| end) |
| local clearedLast = false |
| local last_x, last_y, last_zone |
| local last_sendTime = 0 |
| local nextOnUpdate = 0 |
| frame:SetScript("OnUpdate", function(this, elapsed) |
| local currentTime = GetTime() |
| if nextOnUpdate > currentTime then |
| return |
| end |
| nextOnUpdate = currentTime + 2 |
| if currentTime > nextGuildRoster then |
| if _G.IsInGuild() then |
| _G.GuildRoster() |
| end |
| end |
| if nextSpamTime and currentTime > nextSpamTime then |
| nextSpamTime = currentTime + math_max(10, numGuildies/4) |
| if numGuildies >= 2 then -- yourself and someone else at least |
| if IsInInstance() then |
| if not clearedLast then |
| clearedLast = true |
| SendMessage(string_char(clear_byte)) |
| end |
| else |
| local x, y = GetPlayerMapPosition("player") |
| local zone = GetMapInfo() |
| if (x ~= last_x or y ~= last_y or zone ~= last_zone or last_sendTime < currentTime-90) and x ~= 0 and y ~= 0 and zone then |
| last_x = x |
| last_y = y |
| last_zone = zone |
| last_sendTime = currentTime |
| x = math_floor(x * 255^2 + 0.5) |
| y = math_floor(y * 255^2 + 0.5) |
| local x_1 = math_floor(x / 255) + 1 |
| local x_2 = (x % 255) + 1 |
| local y_1 = math_floor(y / 255) + 1 |
| local y_2 = (y % 255) + 1 |
| clearedLast = false |
| SendMessage(string_char(position_byte, x_1, x_2, y_1, y_2, #zone+1) .. zone) |
| end |
| end |
| end |
| end |
| for name, time in pairs(guildieExpireTime) do |
| if currentTime > time then |
| guildieX[name] = nil |
| guildieY[name] = nil |
| guildieZone[name] = nil |
| guildieExpireTime[name] = nil |
| callbacks:Fire("Clear", name) |
| end |
| end |
| end) |
Libs/LibGuildPositions-1.0/LibGuildPositions-1.0.toc
New file
0,0 → 1,13
| ## Interface: 30000 |
| ## Title: Lib: GuildPositions-1.0 |
| ## Notes: Communicates with guild members for their positions on the world map |
| ## Author: ckknight |
| ## X-eMail: ckknight@gmail.com |
| ## Version: 1.0 |
| ## X-Category: Library |
| ## X-License: MIT |
| ## OptionalDeps: ChatThrottleLib |
| LibStub\LibStub.lua |
| CallbackHandler-1.0\CallbackHandler-1.0.lua |
| lib.xml |
Libs/LibGuildPositions-1.0/LibStub/LibStub.lua
New file
0,0 → 1,51
| -- $Id: LibStub.lua 48018 2007-09-03 01:50:17Z mikk $ |
| -- LibStub is a simple versioning stub meant for use in Libraries. http://www.wowace.com/wiki/LibStub for more info |
| -- LibStub is hereby placed in the Public Domain |
| -- Credits: Kaelten, Cladhaire, ckknight, Mikk, Ammo, Nevcairiel, joshborke |
| local LIBSTUB_MAJOR, LIBSTUB_MINOR = "LibStub", 2 -- NEVER MAKE THIS AN SVN REVISION! IT NEEDS TO BE USABLE IN ALL REPOS! |
| local LibStub = _G[LIBSTUB_MAJOR] |
| -- Check to see is this version of the stub is obsolete |
| if not LibStub or LibStub.minor < LIBSTUB_MINOR then |
| LibStub = LibStub or {libs = {}, minors = {} } |
| _G[LIBSTUB_MAJOR] = LibStub |
| LibStub.minor = LIBSTUB_MINOR |
| -- LibStub:NewLibrary(major, minor) |
| -- major (string) - the major version of the library |
| -- minor (string or number ) - the minor version of the library |
| -- |
| -- returns nil if a newer or same version of the lib is already present |
| -- returns empty library object or old library object if upgrade is needed |
| function LibStub:NewLibrary(major, minor) |
| assert(type(major) == "string", "Bad argument #2 to `NewLibrary' (string expected)") |
| minor = assert(tonumber(strmatch(minor, "%d+")), "Minor version must either be a number or contain a number.") |
| local oldminor = self.minors[major] |
| if oldminor and oldminor >= minor then return nil end |
| self.minors[major], self.libs[major] = minor, self.libs[major] or {} |
| return self.libs[major], oldminor |
| end |
| -- LibStub:GetLibrary(major, [silent]) |
| -- major (string) - the major version of the library |
| -- silent (boolean) - if true, library is optional, silently return nil if its not found |
| -- |
| -- throws an error if the library can not be found (except silent is set) |
| -- returns the library object if found |
| function LibStub:GetLibrary(major, silent) |
| if not self.libs[major] and not silent then |
| error(("Cannot find a library instance of %q."):format(tostring(major)), 2) |
| end |
| return self.libs[major], self.minors[major] |
| end |
| -- LibStub:IterateLibraries() |
| -- |
| -- Returns an iterator for the currently registered libraries |
| function LibStub:IterateLibraries() |
| return pairs(self.libs) |
| end |
| setmetatable(LibStub, { __call = LibStub.GetLibrary }) |
| end |
Libs/LibGuildPositions-1.0/lib.xml
New file
0,0 → 1,4
\ No newline at end of file
| <Ui xmlns="http://www.blizzard.com/wow/ui/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.blizzard.com/wow/ui/ |
| ..\FrameXML\UI.xsd"> |
| <Script file="LibGuildPositions-1.0.lua" /> |
| </Ui> |
Libs/LibGuildPositions-1.0/CallbackHandler-1.0/CallbackHandler-1.0.xml
New file
0,0 → 1,4
\ No newline at end of file
| <Ui xmlns="http://www.blizzard.com/wow/ui/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.blizzard.com/wow/ui/ |
| ..\FrameXML\UI.xsd"> |
| <Script file="CallbackHandler-1.0.lua"/> |
| </Ui> |
Libs/LibGuildPositions-1.0/CallbackHandler-1.0/CallbackHandler-1.0.lua
New file
0,0 → 1,239
| --[[ $Id: CallbackHandler-1.0.lua 60697 2008-02-09 16:51:20Z nevcairiel $ ]] |
| local MAJOR, MINOR = "CallbackHandler-1.0", 3 |
| local CallbackHandler = LibStub:NewLibrary(MAJOR, MINOR) |
| if not CallbackHandler then return end -- No upgrade needed |
| local meta = {__index = function(tbl, key) tbl[key] = {} return tbl[key] end} |
| local type = type |
| local pcall = pcall |
| local pairs = pairs |
| local assert = assert |
| local concat = table.concat |
| local loadstring = loadstring |
| local next = next |
| local select = select |
| local type = type |
| local xpcall = xpcall |
| local function errorhandler(err) |
| return geterrorhandler()(err) |
| end |
| local function CreateDispatcher(argCount) |
| local code = [[ |
| local next, xpcall, eh = ... |
| local method, ARGS |
| local function call() method(ARGS) end |
| local function dispatch(handlers, ...) |
| local index |
| index, method = next(handlers) |
| if not method then return end |
| local OLD_ARGS = ARGS |
| ARGS = ... |
| repeat |
| xpcall(call, eh) |
| index, method = next(handlers, index) |
| until not method |
| ARGS = OLD_ARGS |
| end |
| return dispatch |
| ]] |
| local ARGS, OLD_ARGS = {}, {} |
| for i = 1, argCount do ARGS[i], OLD_ARGS[i] = "arg"..i, "old_arg"..i end |
| code = code:gsub("OLD_ARGS", concat(OLD_ARGS, ", ")):gsub("ARGS", concat(ARGS, ", ")) |
| return assert(loadstring(code, "safecall Dispatcher["..argCount.."]"))(next, xpcall, errorhandler) |
| end |
| local Dispatchers = setmetatable({}, {__index=function(self, argCount) |
| local dispatcher = CreateDispatcher(argCount) |
| rawset(self, argCount, dispatcher) |
| return dispatcher |
| end}) |
| -------------------------------------------------------------------------- |
| -- CallbackHandler:New |
| -- |
| -- target - target object to embed public APIs in |
| -- RegisterName - name of the callback registration API, default "RegisterCallback" |
| -- UnregisterName - name of the callback unregistration API, default "UnregisterCallback" |
| -- UnregisterAllName - name of the API to unregister all callbacks, default "UnregisterAllCallbacks". false == don't publish this API. |
| function CallbackHandler:New(target, RegisterName, UnregisterName, UnregisterAllName, OnUsed, OnUnused) |
| -- TODO: Remove this after beta has gone out |
| assert(not OnUsed and not OnUnused, "ACE-80: OnUsed/OnUnused are deprecated. Callbacks are now done to registry.OnUsed and registry.OnUnused") |
| RegisterName = RegisterName or "RegisterCallback" |
| UnregisterName = UnregisterName or "UnregisterCallback" |
| if UnregisterAllName==nil then -- false is used to indicate "don't want this method" |
| UnregisterAllName = "UnregisterAllCallbacks" |
| end |
| -- we declare all objects and exported APIs inside this closure to quickly gain access |
| -- to e.g. function names, the "target" parameter, etc |
| -- Create the registry object |
| local events = setmetatable({}, meta) |
| local registry = { recurse=0, events=events } |
| -- registry:Fire() - fires the given event/message into the registry |
| function registry:Fire(eventname, ...) |
| if not rawget(events, eventname) or not next(events[eventname]) then return end |
| local oldrecurse = registry.recurse |
| registry.recurse = oldrecurse + 1 |
| Dispatchers[select('#', ...) + 1](events[eventname], eventname, ...) |
| registry.recurse = oldrecurse |
| if registry.insertQueue and oldrecurse==0 then |
| -- Something in one of our callbacks wanted to register more callbacks; they got queued |
| for eventname,callbacks in pairs(registry.insertQueue) do |
| local first = not rawget(events, eventname) or not next(events[eventname]) -- test for empty before. not test for one member after. that one member may have been overwritten. |
| for self,func in pairs(callbacks) do |
| events[eventname][self] = func |
| -- fire OnUsed callback? |
| if first and registry.OnUsed then |
| registry.OnUsed(registry, target, eventname) |
| first = nil |
| end |
| end |
| end |
| registry.insertQueue = nil |
| end |
| end |
| -- Registration of a callback, handles: |
| -- self["method"], leads to self["method"](self, ...) |
| -- self with function ref, leads to functionref(...) |
| -- "addonId" (instead of self) with function ref, leads to functionref(...) |
| -- all with an optional arg, which, if present, gets passed as first argument (after self if present) |
| target[RegisterName] = function(self, eventname, method, ... --[[actually just a single arg]]) |
| if type(eventname) ~= "string" then |
| error("Usage: "..RegisterName.."(eventname, method[, arg]): 'eventname' - string expected.", 2) |
| end |
| method = method or eventname |
| local first = not rawget(events, eventname) or not next(events[eventname]) -- test for empty before. not test for one member after. that one member may have been overwritten. |
| if type(method) ~= "string" and type(method) ~= "function" then |
| error("Usage: "..RegisterName.."(\"eventname\", \"methodname\"): 'methodname' - string or function expected.", 2) |
| end |
| local regfunc |
| if type(method) == "string" then |
| -- self["method"] calling style |
| if type(self) ~= "table" then |
| error("Usage: "..RegisterName.."(\"eventname\", \"methodname\"): self was not a table?", 2) |
| elseif self==target then |
| error("Usage: "..RegisterName.."(\"eventname\", \"methodname\"): do not use Library:"..RegisterName.."(), use your own 'self'", 2) |
| elseif type(self[method]) ~= "function" then |
| error("Usage: "..RegisterName.."(\"eventname\", \"methodname\"): 'methodname' - method '"..tostring(method).."' not found on self.", 2) |
| end |
| if select("#",...)>=1 then -- this is not the same as testing for arg==nil! |
| local arg=select(1,...) |
| regfunc = function(...) self[method](self,arg,...) end |
| else |
| regfunc = function(...) self[method](self,...) end |
| end |
| else |
| -- function ref with self=object or self="addonId" |
| if type(self)~="table" and type(self)~="string" then |
| error("Usage: "..RegisterName.."(self or \"addonId\", eventname, method): 'self or addonId': table or string expected.", 2) |
| end |
| if select("#",...)>=1 then -- this is not the same as testing for arg==nil! |
| local arg=select(1,...) |
| regfunc = function(...) method(arg,...) end |
| else |
| regfunc = method |
| end |
| end |
| if events[eventname][self] or registry.recurse<1 then |
| -- if registry.recurse<1 then |
| -- we're overwriting an existing entry, or not currently recursing. just set it. |
| events[eventname][self] = regfunc |
| -- fire OnUsed callback? |
| if registry.OnUsed and first then |
| registry.OnUsed(registry, target, eventname) |
| end |
| else |
| -- we're currently processing a callback in this registry, so delay the registration of this new entry! |
| -- yes, we're a bit wasteful on garbage, but this is a fringe case, so we're picking low implementation overhead over garbage efficiency |
| registry.insertQueue = registry.insertQueue or setmetatable({},meta) |
| registry.insertQueue[eventname][self] = regfunc |
| end |
| end |
| -- Unregister a callback |
| target[UnregisterName] = function(self, eventname) |
| if not self or self==target then |
| error("Usage: "..UnregisterName.."(eventname): bad 'self'", 2) |
| end |
| if type(eventname) ~= "string" then |
| error("Usage: "..UnregisterName.."(eventname): 'eventname' - string expected.", 2) |
| end |
| if rawget(events, eventname) and events[eventname][self] then |
| events[eventname][self] = nil |
| -- Fire OnUnused callback? |
| if registry.OnUnused and not next(events[eventname]) then |
| registry.OnUnused(registry, target, eventname) |
| end |
| end |
| if registry.insertQueue and rawget(registry.insertQueue, eventname) and registry.insertQueue[eventname][self] then |
| registry.insertQueue[eventname][self] = nil |
| end |
| end |
| -- OPTIONAL: Unregister all callbacks for given selfs/addonIds |
| if UnregisterAllName then |
| target[UnregisterAllName] = function(...) |
| if select("#",...)<1 then |
| error("Usage: "..UnregisterAllName.."([whatFor]): missing 'self' or \"addonId\" to unregister events for.", 2) |
| end |
| if select("#",...)==1 and ...==target then |
| error("Usage: "..UnregisterAllName.."([whatFor]): supply a meaningful 'self' or \"addonId\"", 2) |
| end |
| for i=1,select("#",...) do |
| local self = select(i,...) |
| if registry.insertQueue then |
| for eventname, callbacks in pairs(registry.insertQueue) do |
| if callbacks[self] then |
| callbacks[self] = nil |
| end |
| end |
| end |
| for eventname, callbacks in pairs(events) do |
| if callbacks[self] then |
| callbacks[self] = nil |
| -- Fire OnUnused callback? |
| if registry.OnUnused and not next(callbacks) then |
| registry.OnUnused(registry, target, eventname) |
| end |
| end |
| end |
| end |
| end |
| end |
| return registry |
| end |
| -- CallbackHandler purposefully does NOT do explicit embedding. Nor does it |
| -- try to upgrade old implicit embeds since the system is selfcontained and |
| -- relies on closures to work. |
Libs/LibGuildPositions-1.0/Changelog-LibGuildPositions-1.0-WoW-3.0-release-2.txt
New file
0,0 → 1,133
| ------------------------------------------------------------------------ |
| r41 | ckknight | 2008-10-15 19:44:25 +0000 (Wed, 15 Oct 2008) | 1 line |
| Changed paths: |
| A /tags/WoW-3.0-release-2 (from /trunk:40) |
| Tagging as WoW-3.0-release-2. |
| ------------------------------------------------------------------------ |
| r39 | stanzilla | 2008-10-14 16:54:27 +0000 (Tue, 14 Oct 2008) | 1 line |
| Changed paths: |
| M /trunk/LibGuildPositions-1.0.toc |
| Update TOC for WotLK |
| ------------------------------------------------------------------------ |
| r38 | nevcairiel | 2008-10-12 11:39:46 +0000 (Sun, 12 Oct 2008) | 1 line |
| Changed paths: |
| M /trunk/LibGuildPositions-1.0.toc |
| Patch 3.0 prep: Remove LoD from Libraries that have no load manager (LoD+OptDep Bug) |
| ------------------------------------------------------------------------ |
| r37 | nevcairiel | 2008-10-09 21:52:52 +0000 (Thu, 09 Oct 2008) | 1 line |
| Changed paths: |
| M /trunk/LibGuildPositions-1.0.lua |
| WoWAce Post-Processing: Virtually inflate Library Revision numbers for proper upgrade path |
| ------------------------------------------------------------------------ |
| r36 | root | 2008-09-29 21:26:38 +0000 (Mon, 29 Sep 2008) | 1 line |
| Changed paths: |
| A /trunk/.pkgmeta |
| Facilitate WowAce-on-CurseForge transition |
| ------------------------------------------------------------------------ |
| r34 | root | 2008-09-29 20:58:17 +0000 (Mon, 29 Sep 2008) | 1 line |
| Changed paths: |
| D /tmp/trunk/LibGuildPositions-1.0 |
| A /trunk (from /tmp/trunk/LibGuildPositions-1.0:33) |
| Importing old repo data under /trunk |
| ------------------------------------------------------------------------ |
| r31 | ckknight | 2008-06-30 15:18:32 +0000 (Mon, 30 Jun 2008) | 2 lines |
| Changed paths: |
| M /tmp/trunk/LibGuildPositions-1.0/LibGuildPositions-1.0.lua |
| LibGuildPositions-1.0 - Make sure to check group members on login |
| - fixes http://wow.curseforge.com/projects/cartographer3/tickets/67-party-and-guild-poi-shows-up-at-same-time/ |
| ------------------------------------------------------------------------ |
| r30 | ckknight | 2008-06-24 18:36:35 +0000 (Tue, 24 Jun 2008) | 1 line |
| Changed paths: |
| M /tmp/trunk/LibGuildPositions-1.0/LibGuildPositions-1.0.lua |
| M /tmp/trunk/LibGuildPositions-1.0/LibGuildPositions-1.0.toc |
| LibGuildPositions-1.0 - relicense from LGPL v2.1 to MIT |
| ------------------------------------------------------------------------ |
| r29 | saroz | 2008-06-15 17:16:07 +0000 (Sun, 15 Jun 2008) | 1 line |
| Changed paths: |
| M /tmp/trunk/LibGuildPositions-1.0/LibGuildPositions-1.0.lua |
| LibGuildPositions-1.0: Don't leave debug shit in, thanks. |
| ------------------------------------------------------------------------ |
| r28 | ckknight | 2008-06-15 16:00:11 +0000 (Sun, 15 Jun 2008) | 1 line |
| Changed paths: |
| M /tmp/trunk/LibGuildPositions-1.0/LibGuildPositions-1.0.lua |
| LibGuildPositions-1.0 - ignore guildies who are in your group, send clear events when they become part of your group, it will act as if they aren't guildies at all. |
| ------------------------------------------------------------------------ |
| r26 | ckknight | 2008-04-25 02:33:29 +0000 (Fri, 25 Apr 2008) | 1 line |
| Changed paths: |
| M /tmp/trunk/LibGuildPositions-1.0/LibGuildPositions-1.0.lua |
| LibGuildPositions-1.0 - actually set clearedLast |
| ------------------------------------------------------------------------ |
| r25 | ckknight | 2008-04-23 21:32:31 +0000 (Wed, 23 Apr 2008) | 1 line |
| Changed paths: |
| M /tmp/trunk/LibGuildPositions-1.0/LibGuildPositions-1.0.lua |
| LibGuildPositions-1.0 - remove debug line, fix a logic error |
| ------------------------------------------------------------------------ |
| r24 | ckknight | 2008-04-23 21:28:46 +0000 (Wed, 23 Apr 2008) | 1 line |
| Changed paths: |
| M /tmp/trunk/LibGuildPositions-1.0/LibGuildPositions-1.0.lua |
| LibGuildPositions-1.0 - only run the OnUpdate every 2 seconds |
| ------------------------------------------------------------------------ |
| r23 | ckknight | 2008-04-21 17:03:52 +0000 (Mon, 21 Apr 2008) | 3 lines |
| Changed paths: |
| A /tmp/trunk/LibGuildPositions-1.0/CallbackHandler-1.0 |
| A /tmp/trunk/LibGuildPositions-1.0/CallbackHandler-1.0/CallbackHandler-1.0.lua |
| A /tmp/trunk/LibGuildPositions-1.0/CallbackHandler-1.0/CallbackHandler-1.0.xml |
| M /tmp/trunk/LibGuildPositions-1.0/LibGuildPositions-1.0.lua |
| M /tmp/trunk/LibGuildPositions-1.0/LibGuildPositions-1.0.toc |
| LibGuildPositions-1.0 - use CallbackHandler-1.0 |
| - don't use the oldLib system, as CallbackHandler-1.0 messes up that way. |
| - callbacks are "Position", name, x, y, zone and "Clear", name |
| ------------------------------------------------------------------------ |
| r22 | xinhuan | 2008-04-19 23:31:09 +0000 (Sat, 19 Apr 2008) | 1 line |
| Changed paths: |
| M /tmp/trunk/LibGuildPositions-1.0/LibGuildPositions-1.0.lua |
| LibGuildPositions-1.0: Add a hook to stop the Guild Control Panel from resetting every 15 seconds (for guildmasters) as this library calls GuildRoster() every 15 seconds. |
| ------------------------------------------------------------------------ |
| r21 | ckknight | 2008-04-19 19:57:26 +0000 (Sat, 19 Apr 2008) | 3 lines |
| Changed paths: |
| M /tmp/trunk/LibGuildPositions-1.0/LibGuildPositions-1.0.lua |
| LibGuildPositions-1.0 - fix a logic error in sending positions |
| - don't receive messages from yourself |
| - make sure to actually set the last sent time |
| ------------------------------------------------------------------------ |
| r20 | ckknight | 2008-04-19 09:29:26 +0000 (Sat, 19 Apr 2008) | 1 line |
| Changed paths: |
| M /tmp/trunk/LibGuildPositions-1.0/LibGuildPositions-1.0.lua |
| LibGuildPositions-1.0 - fix ChatThrottleLib support |
| ------------------------------------------------------------------------ |
| r19 | ckknight | 2008-04-19 07:39:20 +0000 (Sat, 19 Apr 2008) | 2 lines |
| Changed paths: |
| M /tmp/trunk/LibGuildPositions-1.0/LibGuildPositions-1.0.lua |
| LibGuildPositions-1.0 - add an expire time for each guild member that lasts 2 minutes. After said 2 minutes are up and no new messages have arrived from the guild member, it is assumed that the guildie reloadui'd without the lib enabled or something similar. |
| - if standing in one place and not moving, send a single message every 90 seconds. |
| ------------------------------------------------------------------------ |
| r18 | ckknight | 2008-04-19 07:11:49 +0000 (Sat, 19 Apr 2008) | 2 lines |
| Changed paths: |
| A /tmp/trunk/LibGuildPositions-1.0 |
| A /tmp/trunk/LibGuildPositions-1.0/LibGuildPositions-1.0.lua |
| A /tmp/trunk/LibGuildPositions-1.0/LibGuildPositions-1.0.toc |
| A /tmp/trunk/LibGuildPositions-1.0/LibStub |
| A /tmp/trunk/LibGuildPositions-1.0/LibStub/LibStub.lua |
| A /tmp/trunk/LibGuildPositions-1.0/lib.xml |
| LibGuildPositions-1.0 - initial commit |
| This communicates your position with guild members as well as providing position information about guild members. |
| ------------------------------------------------------------------------ |
Libs/LibStub/LibStub.lua
New file
0,0 → 1,30
| -- LibStub is a simple versioning stub meant for use in Libraries. http://www.wowace.com/wiki/LibStub for more info |
| -- LibStub is hereby placed in the Public Domain Credits: Kaelten, Cladhaire, ckknight, Mikk, Ammo, Nevcairiel, joshborke |
| local LIBSTUB_MAJOR, LIBSTUB_MINOR = "LibStub", 2 -- NEVER MAKE THIS AN SVN REVISION! IT NEEDS TO BE USABLE IN ALL REPOS! |
| local LibStub = _G[LIBSTUB_MAJOR] |
| if not LibStub or LibStub.minor < LIBSTUB_MINOR then |
| LibStub = LibStub or {libs = {}, minors = {} } |
| _G[LIBSTUB_MAJOR] = LibStub |
| LibStub.minor = LIBSTUB_MINOR |
| function LibStub:NewLibrary(major, minor) |
| assert(type(major) == "string", "Bad argument #2 to `NewLibrary' (string expected)") |
| minor = assert(tonumber(strmatch(minor, "%d+")), "Minor version must either be a number or contain a number.") |
| local oldminor = self.minors[major] |
| if oldminor and oldminor >= minor then return nil end |
| self.minors[major], self.libs[major] = minor, self.libs[major] or {} |
| return self.libs[major], oldminor |
| end |
| function LibStub:GetLibrary(major, silent) |
| if not self.libs[major] and not silent then |
| error(("Cannot find a library instance of %q."):format(tostring(major)), 2) |
| end |
| return self.libs[major], self.minors[major] |
| end |
| function LibStub:IterateLibraries() return pairs(self.libs) end |
| setmetatable(LibStub, { __call = LibStub.GetLibrary }) |
| end |
Libs/AceLocale-3.0/AceLocale-3.0.xml
New file
0,0 → 1,4
\ No newline at end of file
| <Ui xmlns="http://www.blizzard.com/wow/ui/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.blizzard.com/wow/ui/ |
| ..\FrameXML\UI.xsd"> |
| <Script file="AceLocale-3.0.lua"/> |
| </Ui> |
Libs/AceLocale-3.0/AceLocale-3.0.lua
New file
0,0 → 1,128
| --- **AceLocale-3.0** manages localization in addons, allowing for multiple locale to be registered with fallback to the base locale for untranslated strings. |
| -- @class file |
| -- @name AceLocale-3.0 |
| -- @release $Id: AceLocale-3.0.lua 766 2009-04-04 08:26:05Z nevcairiel $ |
| local MAJOR,MINOR = "AceLocale-3.0", 2 |
| local AceLocale, oldminor = LibStub:NewLibrary(MAJOR, MINOR) |
| if not AceLocale then return end -- no upgrade needed |
| local gameLocale = GetLocale() |
| if gameLocale == "enGB" then |
| gameLocale = "enUS" |
| end |
| AceLocale.apps = AceLocale.apps or {} -- array of ["AppName"]=localetableref |
| AceLocale.appnames = AceLocale.appnames or {} -- array of [localetableref]="AppName" |
| -- This metatable is used on all tables returned from GetLocale |
| local readmeta = { |
| __index = function(self, key) -- requesting totally unknown entries: fire off a nonbreaking error and return key |
| rawset(self, key, key) -- only need to see the warning once, really |
| geterrorhandler()(MAJOR..": "..tostring(AceLocale.appnames[self])..": Missing entry for '"..tostring(key).."'") |
| return key |
| end |
| } |
| -- This metatable is used on all tables returned from GetLocale if the silent flag is true, it does not issue a warning on unknown keys |
| local readmetasilent = { |
| __index = function(self, key) -- requesting totally unknown entries: return key |
| rawset(self, key, key) -- only need to invoke this function once |
| return key |
| end |
| } |
| -- Remember the locale table being registered right now (it gets set by :NewLocale()) |
| -- NOTE: Do never try to register 2 locale tables at once and mix their definition. |
| local registering |
| -- local assert false function |
| local assertfalse = function() assert(false) end |
| -- This metatable proxy is used when registering nondefault locales |
| local writeproxy = setmetatable({}, { |
| __newindex = function(self, key, value) |
| rawset(registering, key, value == true and key or value) -- assigning values: replace 'true' with key string |
| end, |
| __index = assertfalse |
| }) |
| -- This metatable proxy is used when registering the default locale. |
| -- It refuses to overwrite existing values |
| -- Reason 1: Allows loading locales in any order |
| -- Reason 2: If 2 modules have the same string, but only the first one to be |
| -- loaded has a translation for the current locale, the translation |
| -- doesn't get overwritten. |
| -- |
| local writedefaultproxy = setmetatable({}, { |
| __newindex = function(self, key, value) |
| if not rawget(registering, key) then |
| rawset(registering, key, value == true and key or value) |
| end |
| end, |
| __index = assertfalse |
| }) |
| --- Register a new locale (or extend an existing one) for the specified application. |
| -- :NewLocale will return a table you can fill your locale into, or nil if the locale isn't needed for the players |
| -- game locale. |
| -- @paramsig application, locale[, isDefault[, silent]] |
| -- @param application Unique name of addon / module |
| -- @param locale Name of the locale to register, e.g. "enUS", "deDE", etc. |
| -- @param isDefault If this is the default locale being registered (your addon is written in this language, generally enUS) |
| -- @param silent If true, the locale will not issue warnings for missing keys. Can only be set on the default locale. |
| -- @usage |
| -- -- enUS.lua |
| -- local L = LibStub("AceLocale-3.0"):NewLocale("TestLocale", "enUS", true) |
| -- L["string1"] = true |
| -- |
| -- -- deDE.lua |
| -- local L = LibStub("AceLocale-3.0"):NewLocale("TestLocale", "deDE") |
| -- if not L then return end |
| -- L["string1"] = "Zeichenkette1" |
| -- @return Locale Table to add localizations to, or nil if the current locale is not required. |
| function AceLocale:NewLocale(application, locale, isDefault, silent) |
| if silent and not isDefault then |
| error("Usage: NewLocale(application, locale[, isDefault[, silent]]): 'silent' can only be specified for the default locale", 2) |
| end |
| -- GAME_LOCALE allows translators to test translations of addons without having that wow client installed |
| -- Ammo: I still think this is a bad idea, for instance an addon that checks for some ingame string will fail, just because some other addon |
| -- gives the user the illusion that they can run in a different locale? Ditch this whole thing or allow a setting per 'application'. I'm of the |
| -- opinion to remove this. |
| local gameLocale = GAME_LOCALE or gameLocale |
| if locale ~= gameLocale and not isDefault then |
| return -- nop, we don't need these translations |
| end |
| local app = AceLocale.apps[application] |
| if not app then |
| app = setmetatable({}, silent and readmetasilent or readmeta) |
| AceLocale.apps[application] = app |
| AceLocale.appnames[app] = application |
| end |
| registering = app -- remember globally for writeproxy and writedefaultproxy |
| if isDefault then |
| return writedefaultproxy |
| end |
| return writeproxy |
| end |
| --- Returns localizations for the current locale (or default locale if translations are missing). |
| -- Errors if nothing is registered (spank developer, not just a missing translation) |
| -- @param application Unique name of addon / module |
| -- @param silent If true, the locale is optional, silently return nil if it's not found (defaults to false, optional) |
| -- @return The locale table for the current language. |
| function AceLocale:GetLocale(application, silent) |
| if not silent and not AceLocale.apps[application] then |
| error("Usage: GetLocale(application[, silent]): 'application' - No locales registered for '"..tostring(application).."'", 2) |
| end |
| return AceLocale.apps[application] |
| end |
Libs/CallbackHandler-1.0/CallbackHandler-1.0.xml
New file
0,0 → 1,4
\ No newline at end of file
| <Ui xmlns="http://www.blizzard.com/wow/ui/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.blizzard.com/wow/ui/ |
| ..\FrameXML\UI.xsd"> |
| <Script file="CallbackHandler-1.0.lua"/> |
| </Ui> |
Libs/CallbackHandler-1.0/CallbackHandler-1.0.lua
New file
0,0 → 1,239
| --[[ $Id: CallbackHandler-1.0.lua 846 2009-09-17 10:51:12Z ammo $ ]] |
| local MAJOR, MINOR = "CallbackHandler-1.0", 5 |
| local CallbackHandler = LibStub:NewLibrary(MAJOR, MINOR) |
| if not CallbackHandler then return end -- No upgrade needed |
| local meta = {__index = function(tbl, key) tbl[key] = {} return tbl[key] end} |
| local type = type |
| local pcall = pcall |
| local pairs = pairs |
| local assert = assert |
| local concat = table.concat |
| local loadstring = loadstring |
| local next = next |
| local select = select |
| local type = type |
| local xpcall = xpcall |
| local function errorhandler(err) |
| return geterrorhandler()(err) |
| end |
| local function CreateDispatcher(argCount) |
| local code = [[ |
| local next, xpcall, eh = ... |
| local method, ARGS |
| local function call() method(ARGS) end |
| local function dispatch(handlers, ...) |
| local index |
| index, method = next(handlers) |
| if not method then return end |
| local OLD_ARGS = ARGS |
| ARGS = ... |
| repeat |
| xpcall(call, eh) |
| index, method = next(handlers, index) |
| until not method |
| ARGS = OLD_ARGS |
| end |
| return dispatch |
| ]] |
| local ARGS, OLD_ARGS = {}, {} |
| for i = 1, argCount do ARGS[i], OLD_ARGS[i] = "arg"..i, "old_arg"..i end |
| code = code:gsub("OLD_ARGS", concat(OLD_ARGS, ", ")):gsub("ARGS", concat(ARGS, ", ")) |
| return assert(loadstring(code, "safecall Dispatcher["..argCount.."]"))(next, xpcall, errorhandler) |
| end |
| local Dispatchers = setmetatable({}, {__index=function(self, argCount) |
| local dispatcher = CreateDispatcher(argCount) |
| rawset(self, argCount, dispatcher) |
| return dispatcher |
| end}) |
| -------------------------------------------------------------------------- |
| -- CallbackHandler:New |
| -- |
| -- target - target object to embed public APIs in |
| -- RegisterName - name of the callback registration API, default "RegisterCallback" |
| -- UnregisterName - name of the callback unregistration API, default "UnregisterCallback" |
| -- UnregisterAllName - name of the API to unregister all callbacks, default "UnregisterAllCallbacks". false == don't publish this API. |
| function CallbackHandler:New(target, RegisterName, UnregisterName, UnregisterAllName, OnUsed, OnUnused) |
| -- TODO: Remove this after beta has gone out |
| assert(not OnUsed and not OnUnused, "ACE-80: OnUsed/OnUnused are deprecated. Callbacks are now done to registry.OnUsed and registry.OnUnused") |
| RegisterName = RegisterName or "RegisterCallback" |
| UnregisterName = UnregisterName or "UnregisterCallback" |
| if UnregisterAllName==nil then -- false is used to indicate "don't want this method" |
| UnregisterAllName = "UnregisterAllCallbacks" |
| end |
| -- we declare all objects and exported APIs inside this closure to quickly gain access |
| -- to e.g. function names, the "target" parameter, etc |
| -- Create the registry object |
| local events = setmetatable({}, meta) |
| local registry = { recurse=0, events=events } |
| -- registry:Fire() - fires the given event/message into the registry |
| function registry:Fire(eventname, ...) |
| if not rawget(events, eventname) or not next(events[eventname]) then return end |
| local oldrecurse = registry.recurse |
| registry.recurse = oldrecurse + 1 |
| Dispatchers[select('#', ...) + 1](events[eventname], eventname, ...) |
| registry.recurse = oldrecurse |
| if registry.insertQueue and oldrecurse==0 then |
| -- Something in one of our callbacks wanted to register more callbacks; they got queued |
| for eventname,callbacks in pairs(registry.insertQueue) do |
| local first = not rawget(events, eventname) or not next(events[eventname]) -- test for empty before. not test for one member after. that one member may have been overwritten. |
| for self,func in pairs(callbacks) do |
| events[eventname][self] = func |
| -- fire OnUsed callback? |
| if first and registry.OnUsed then |
| registry.OnUsed(registry, target, eventname) |
| first = nil |
| end |
| end |
| end |
| registry.insertQueue = nil |
| end |
| end |
| -- Registration of a callback, handles: |
| -- self["method"], leads to self["method"](self, ...) |
| -- self with function ref, leads to functionref(...) |
| -- "addonId" (instead of self) with function ref, leads to functionref(...) |
| -- all with an optional arg, which, if present, gets passed as first argument (after self if present) |
| target[RegisterName] = function(self, eventname, method, ... --[[actually just a single arg]]) |
| if type(eventname) ~= "string" then |
| error("Usage: "..RegisterName.."(eventname, method[, arg]): 'eventname' - string expected.", 2) |
| end |
| method = method or eventname |
| local first = not rawget(events, eventname) or not next(events[eventname]) -- test for empty before. not test for one member after. that one member may have been overwritten. |
| if type(method) ~= "string" and type(method) ~= "function" then |
| error("Usage: "..RegisterName.."(\"eventname\", \"methodname\"): 'methodname' - string or function expected.", 2) |
| end |
| local regfunc |
| if type(method) == "string" then |
| -- self["method"] calling style |
| if type(self) ~= "table" then |
| error("Usage: "..RegisterName.."(\"eventname\", \"methodname\"): self was not a table?", 2) |
| elseif self==target then |
| error("Usage: "..RegisterName.."(\"eventname\", \"methodname\"): do not use Library:"..RegisterName.."(), use your own 'self'", 2) |
| elseif type(self[method]) ~= "function" then |
| error("Usage: "..RegisterName.."(\"eventname\", \"methodname\"): 'methodname' - method '"..tostring(method).."' not found on self.", 2) |
| end |
| if select("#",...)>=1 then -- this is not the same as testing for arg==nil! |
| local arg=select(1,...) |
| regfunc = function(...) self[method](self,arg,...) end |
| else |
| regfunc = function(...) self[method](self,...) end |
| end |
| else |
| -- function ref with self=object or self="addonId" |
| if type(self)~="table" and type(self)~="string" then |
| error("Usage: "..RegisterName.."(self or \"addonId\", eventname, method): 'self or addonId': table or string expected.", 2) |
| end |
| if select("#",...)>=1 then -- this is not the same as testing for arg==nil! |
| local arg=select(1,...) |
| regfunc = function(...) method(arg,...) end |
| else |
| regfunc = method |
| end |
| end |
| if events[eventname][self] or registry.recurse<1 then |
| -- if registry.recurse<1 then |
| -- we're overwriting an existing entry, or not currently recursing. just set it. |
| events[eventname][self] = regfunc |
| -- fire OnUsed callback? |
| if registry.OnUsed and first then |
| registry.OnUsed(registry, target, eventname) |
| end |
| else |
| -- we're currently processing a callback in this registry, so delay the registration of this new entry! |
| -- yes, we're a bit wasteful on garbage, but this is a fringe case, so we're picking low implementation overhead over garbage efficiency |
| registry.insertQueue = registry.insertQueue or setmetatable({},meta) |
| registry.insertQueue[eventname][self] = regfunc |
| end |
| end |
| -- Unregister a callback |
| target[UnregisterName] = function(self, eventname) |
| if not self or self==target then |
| error("Usage: "..UnregisterName.."(eventname): bad 'self'", 2) |
| end |
| if type(eventname) ~= "string" then |
| error("Usage: "..UnregisterName.."(eventname): 'eventname' - string expected.", 2) |
| end |
| if rawget(events, eventname) and events[eventname][self] then |
| events[eventname][self] = nil |
| -- Fire OnUnused callback? |
| if registry.OnUnused and not next(events[eventname]) then |
| registry.OnUnused(registry, target, eventname) |
| end |
| end |
| if registry.insertQueue and rawget(registry.insertQueue, eventname) and registry.insertQueue[eventname][self] then |
| registry.insertQueue[eventname][self] = nil |
| end |
| end |
| -- OPTIONAL: Unregister all callbacks for given selfs/addonIds |
| if UnregisterAllName then |
| target[UnregisterAllName] = function(...) |
| if select("#",...)<1 then |
| error("Usage: "..UnregisterAllName.."([whatFor]): missing 'self' or \"addonId\" to unregister events for.", 2) |
| end |
| if select("#",...)==1 and ...==target then |
| error("Usage: "..UnregisterAllName.."([whatFor]): supply a meaningful 'self' or \"addonId\"", 2) |
| end |
| for i=1,select("#",...) do |
| local self = select(i,...) |
| if registry.insertQueue then |
| for eventname, callbacks in pairs(registry.insertQueue) do |
| if callbacks[self] then |
| callbacks[self] = nil |
| end |
| end |
| end |
| for eventname, callbacks in pairs(events) do |
| if callbacks[self] then |
| callbacks[self] = nil |
| -- Fire OnUnused callback? |
| if registry.OnUnused and not next(callbacks) then |
| registry.OnUnused(registry, target, eventname) |
| end |
| end |
| end |
| end |
| end |
| end |
| return registry |
| end |
| -- CallbackHandler purposefully does NOT do explicit embedding. Nor does it |
| -- try to upgrade old implicit embeds since the system is selfcontained and |
| -- relies on closures to work. |
Libs/AceHook-3.0/AceHook-3.0.xml
New file
0,0 → 1,4
\ No newline at end of file
| <Ui xmlns="http://www.blizzard.com/wow/ui/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.blizzard.com/wow/ui/ |
| ..\FrameXML\UI.xsd"> |
| <Script file="AceHook-3.0.lua"/> |
| </Ui> |
Libs/AceHook-3.0/AceHook-3.0.lua
New file
0,0 → 1,511
| --- **AceHook-3.0** offers safe Hooking/Unhooking of functions, methods and frame scripts. |
| -- Using AceHook-3.0 is recommended when you need to unhook your hooks again, so the hook chain isn't broken |
| -- when you manually restore the original function. |
| -- |
| -- **AceHook-3.0** can be embeded into your addon, either explicitly by calling AceHook:Embed(MyAddon) or by |
| -- specifying it as an embeded library in your AceAddon. All functions will be available on your addon object |
| -- and can be accessed directly, without having to explicitly call AceHook itself.\\ |
| -- It is recommended to embed AceHook, otherwise you'll have to specify a custom `self` on all calls you |
| -- make into AceHook. |
| -- @class file |
| -- @name AceHook-3.0 |
| -- @release $Id: AceHook-3.0.lua 766 2009-04-04 08:26:05Z nevcairiel $ |
| local ACEHOOK_MAJOR, ACEHOOK_MINOR = "AceHook-3.0", 5 |
| local AceHook, oldminor = LibStub:NewLibrary(ACEHOOK_MAJOR, ACEHOOK_MINOR) |
| if not AceHook then return end -- No upgrade needed |
| AceHook.embeded = AceHook.embeded or {} |
| AceHook.registry = AceHook.registry or setmetatable({}, {__index = function(tbl, key) tbl[key] = {} return tbl[key] end }) |
| AceHook.handlers = AceHook.handlers or {} |
| AceHook.actives = AceHook.actives or {} |
| AceHook.scripts = AceHook.scripts or {} |
| AceHook.onceSecure = AceHook.onceSecure or {} |
| AceHook.hooks = AceHook.hooks or {} |
| -- local upvalues |
| local registry = AceHook.registry |
| local handlers = AceHook.handlers |
| local actives = AceHook.actives |
| local scripts = AceHook.scripts |
| local onceSecure = AceHook.onceSecure |
| local _G = _G |
| local format = string.format |
| local next = next |
| local pairs = pairs |
| local type = type |
| -- functions for later definition |
| local donothing, createHook, hook |
| local protectedScripts = { |
| OnClick = true, |
| } |
| -- upgrading of embeded is done at the bottom of the file |
| local mixins = { |
| "Hook", "SecureHook", |
| "HookScript", "SecureHookScript", |
| "Unhook", "UnhookAll", |
| "IsHooked", |
| "RawHook", "RawHookScript" |
| } |
| -- AceHook:Embed( target ) |
| -- target (object) - target object to embed AceHook in |
| -- |
| -- Embeds AceEevent into the target object making the functions from the mixins list available on target:.. |
| function AceHook:Embed( target ) |
| for k, v in pairs( mixins ) do |
| target[v] = self[v] |
| end |
| self.embeded[target] = true |
| -- inject the hooks table safely |
| target.hooks = target.hooks or {} |
| return target |
| end |
| -- AceHook:OnEmbedDisable( target ) |
| -- target (object) - target object that is being disabled |
| -- |
| -- Unhooks all hooks when the target disables. |
| -- this method should be called by the target manually or by an addon framework |
| function AceHook:OnEmbedDisable( target ) |
| target:UnhookAll() |
| end |
| function createHook(self, handler, orig, secure, failsafe) |
| local uid |
| local method = type(handler) == "string" |
| if failsafe and not secure then |
| -- failsafe hook creation |
| uid = function(...) |
| if actives[uid] then |
| if method then |
| self[handler](self, ...) |
| else |
| handler(...) |
| end |
| end |
| return orig(...) |
| end |
| -- /failsafe hook |
| else |
| -- all other hooks |
| uid = function(...) |
| if actives[uid] then |
| if method then |
| return self[handler](self, ...) |
| else |
| return handler(...) |
| end |
| elseif not secure then -- backup on non secure |
| return orig(...) |
| end |
| end |
| -- /hook |
| end |
| return uid |
| end |
| function donothing() end |
| function hook(self, obj, method, handler, script, secure, raw, forceSecure, usage) |
| if not handler then handler = method end |
| -- These asserts make sure AceHooks's devs play by the rules. |
| assert(not script or type(script) == "boolean") |
| assert(not secure or type(secure) == "boolean") |
| assert(not raw or type(raw) == "boolean") |
| assert(not forceSecure or type(forceSecure) == "boolean") |
| assert(usage) |
| -- Error checking Battery! |
| if obj and type(obj) ~= "table" then |
| error(format("%s: 'object' - nil or table expected got %s", usage, type(obj)), 3) |
| end |
| if type(method) ~= "string" then |
| error(format("%s: 'method' - string expected got %s", usage, type(method)), 3) |
| end |
| if type(handler) ~= "string" and type(handler) ~= "function" then |
| error(format("%s: 'handler' - nil, string, or function expected got %s", usage, type(handler)), 3) |
| end |
| if type(handler) == "string" and type(self[handler]) ~= "function" then |
| error(format("%s: 'handler' - Handler specified does not exist at self[handler]", usage), 3) |
| end |
| if script then |
| if not secure and obj:IsProtected() and protectedScripts[method] then |
| error(format("Cannot hook secure script %q; Use SecureHookScript(obj, method, [handler]) instead.", method), 3) |
| end |
| if not obj or not obj.GetScript or not obj:HasScript(method) then |
| error(format("%s: You can only hook a script on a frame object", usage), 3) |
| end |
| else |
| local issecure |
| if obj then |
| issecure = onceSecure[obj] and onceSecure[obj][method] or issecurevariable(obj, method) |
| else |
| issecure = onceSecure[method] or issecurevariable(method) |
| end |
| if issecure then |
| if forceSecure then |
| if obj then |
| onceSecure[obj] = onceSecure[obj] or {} |
| onceSecure[obj][method] = true |
| else |
| onceSecure[method] = true |
| end |
| elseif not secure then |
| error(format("%s: Attempt to hook secure function %s. Use `SecureHook' or add `true' to the argument list to override.", usage, method), 3) |
| end |
| end |
| end |
| local uid |
| if obj then |
| uid = registry[self][obj] and registry[self][obj][method] |
| else |
| uid = registry[self][method] |
| end |
| if uid then |
| if actives[uid] then |
| -- Only two sane choices exist here. We either a) error 100% of the time or b) always unhook and then hook |
| -- choice b would likely lead to odd debuging conditions or other mysteries so we're going with a. |
| error(format("Attempting to rehook already active hook %s.", method)) |
| end |
| if handlers[uid] == handler then -- turn on a decative hook, note enclosures break this ability, small memory leak |
| actives[uid] = true |
| return |
| elseif obj then -- is there any reason not to call unhook instead of doing the following several lines? |
| if self.hooks and self.hooks[obj] then |
| self.hooks[obj][method] = nil |
| end |
| registry[self][obj][method] = nil |
| else |
| if self.hooks then |
| self.hooks[method] = nil |
| end |
| registry[self][method] = nil |
| end |
| handlers[uid], actives[uid], scripts[uid] = nil, nil, nil |
| uid = nil |
| end |
| local orig |
| if script then |
| orig = obj:GetScript(method) or donothing |
| elseif obj then |
| orig = obj[method] |
| else |
| orig = _G[method] |
| end |
| if not orig then |
| error(format("%s: Attempting to hook a non existing target", usage), 3) |
| end |
| uid = createHook(self, handler, orig, secure, not (raw or secure)) |
| if obj then |
| self.hooks[obj] = self.hooks[obj] or {} |
| registry[self][obj] = registry[self][obj] or {} |
| registry[self][obj][method] = uid |
| if not secure then |
| self.hooks[obj][method] = orig |
| end |
| if script then |
| -- If the script is empty before, HookScript will not work, so use SetScript instead |
| -- This will make the hook insecure, but shouldnt matter, since it was empty before. |
| -- It does not taint the full frame. |
| if not secure or orig == donothing then |
| obj:SetScript(method, uid) |
| elseif secure then |
| obj:HookScript(method, uid) |
| end |
| else |
| if not secure then |
| obj[method] = uid |
| else |
| hooksecurefunc(obj, method, uid) |
| end |
| end |
| else |
| registry[self][method] = uid |
| if not secure then |
| _G[method] = uid |
| self.hooks[method] = orig |
| else |
| hooksecurefunc(method, uid) |
| end |
| end |
| actives[uid], handlers[uid], scripts[uid] = true, handler, script and true or nil |
| end |
| --- Hook a function or a method on an object. |
| -- The hook created will be a "safe hook", that means that your handler will be called |
| -- before the hooked function ("Pre-Hook"), and you don't have to call the original function yourself, |
| -- however you cannot stop the execution of the function, or modify any of the arguments/return values.\\ |
| -- This type of hook is typically used if you need to know if some function got called, and don't want to modify it. |
| -- @paramsig [object], method, [handler], [hookSecure] |
| -- @param object The object to hook a method from |
| -- @param method If object was specified, the name of the method, or the name of the function to hook. |
| -- @param handler The handler for the hook, a funcref or a method name. (Defaults to the name of the hooked function) |
| -- @param hookSecure If true, AceHook will allow hooking of secure functions. |
| -- @usage |
| -- -- create an addon with AceHook embeded |
| -- MyAddon = LibStub("AceAddon-3.0"):NewAddon("HookDemo", "AceHook-3.0") |
| -- |
| -- function MyAddon:OnEnable() |
| -- -- Hook ActionButton_UpdateHotkeys, overwriting the secure status |
| -- self:Hook("ActionButton_UpdateHotkeys", true) |
| -- end |
| -- |
| -- function MyAddon:ActionButton_UpdateHotkeys(button, type) |
| -- print(button:GetName() .. " is updating its HotKey") |
| -- end |
| function AceHook:Hook(object, method, handler, hookSecure) |
| if type(object) == "string" then |
| method, handler, hookSecure, object = object, method, handler, nil |
| end |
| if handler == true then |
| handler, hookSecure = nil, true |
| end |
| hook(self, object, method, handler, false, false, false, hookSecure or false, "Usage: Hook([object], method, [handler], [hookSecure])") |
| end |
| --- RawHook a function or a method on an object. |
| -- The hook created will be a "raw hook", that means that your handler will completly replace |
| -- the original function, and your handler has to call the original function (or not, depending on your intentions).\\ |
| -- The original function will be stored in `self.hooks[object][method]` or `self.hooks[functionName]` respectively.\\ |
| -- This type of hook can be used for all purposes, and is usually the most common case when you need to modify arguments |
| -- or want to control execution of the original function. |
| -- @paramsig [object], method, [handler], [hookSecure] |
| -- @param object The object to hook a method from |
| -- @param method If object was specified, the name of the method, or the name of the function to hook. |
| -- @param handler The handler for the hook, a funcref or a method name. (Defaults to the name of the hooked function) |
| -- @param hookSecure If true, AceHook will allow hooking of secure functions. |
| -- @usage |
| -- -- create an addon with AceHook embeded |
| -- MyAddon = LibStub("AceAddon-3.0"):NewAddon("HookDemo", "AceHook-3.0") |
| -- |
| -- function MyAddon:OnEnable() |
| -- -- Hook ActionButton_UpdateHotkeys, overwriting the secure status |
| -- self:RawHook("ActionButton_UpdateHotkeys", true) |
| -- end |
| -- |
| -- function MyAddon:ActionButton_UpdateHotkeys(button, type) |
| -- if button:GetName() == "MyButton" then |
| -- -- do stuff here |
| -- else |
| -- self.hooks.ActionButton_UpdateHotkeys(button, type) |
| -- end |
| -- end |
| function AceHook:RawHook(object, method, handler, hookSecure) |
| if type(object) == "string" then |
| method, handler, hookSecure, object = object, method, handler, nil |
| end |
| if handler == true then |
| handler, hookSecure = nil, true |
| end |
| hook(self, object, method, handler, false, false, true, hookSecure or false, "Usage: RawHook([object], method, [handler], [hookSecure])") |
| end |
| --- SecureHook a function or a method on an object. |
| -- This function is a wrapper around the `hooksecurefunc` function in the WoW API. Using AceHook |
| -- extends the functionality of secure hooks, and adds the ability to unhook once the hook isn't |
| -- required anymore, or the addon is being disabled.\\ |
| -- Secure Hooks should be used if the secure-status of the function is vital to its function, |
| -- and taint would block execution. Secure Hooks are always called after the original function was called |
| -- ("Post Hook"), and you cannot modify the arguments, return values or control the execution. |
| -- @paramsig [object], method, [handler] |
| -- @param object The object to hook a method from |
| -- @param method If object was specified, the name of the method, or the name of the function to hook. |
| -- @param handler The handler for the hook, a funcref or a method name. (Defaults to the name of the hooked function) |
| function AceHook:SecureHook(object, method, handler) |
| if type(object) == "string" then |
| method, handler, object = object, method, nil |
| end |
| hook(self, object, method, handler, false, true, false, false, "Usage: SecureHook([object], method, [handler])") |
| end |
| --- Hook a script handler on a frame. |
| -- The hook created will be a "safe hook", that means that your handler will be called |
| -- before the hooked script ("Pre-Hook"), and you don't have to call the original function yourself, |
| -- however you cannot stop the execution of the function, or modify any of the arguments/return values.\\ |
| -- This is the frame script equivalent of the :Hook safe-hook. It would typically be used to be notified |
| -- when a certain event happens to a frame. |
| -- @paramsig frame, script, [handler] |
| -- @param frame The Frame to hook the script on |
| -- @param script The script to hook |
| -- @param handler The handler for the hook, a funcref or a method name. (Defaults to the name of the hooked script) |
| -- @usage |
| -- -- create an addon with AceHook embeded |
| -- MyAddon = LibStub("AceAddon-3.0"):NewAddon("HookDemo", "AceHook-3.0") |
| -- |
| -- function MyAddon:OnEnable() |
| -- -- Hook the OnShow of FriendsFrame |
| -- self:HookScript(FriendsFrame, "OnShow", "FriendsFrameOnShow") |
| -- end |
| -- |
| -- function MyAddon:FriendsFrameOnShow(frame) |
| -- print("The FriendsFrame was shown!") |
| -- end |
| function AceHook:HookScript(frame, script, handler) |
| hook(self, frame, script, handler, true, false, false, false, "Usage: HookScript(object, method, [handler])") |
| end |
| --- RawHook a script handler on a frame. |
| -- The hook created will be a "raw hook", that means that your handler will completly replace |
| -- the original script, and your handler has to call the original script (or not, depending on your intentions).\\ |
| -- The original script will be stored in `self.hooks[frame][script]`.\\ |
| -- This type of hook can be used for all purposes, and is usually the most common case when you need to modify arguments |
| -- or want to control execution of the original script. |
| -- @paramsig frame, script, [handler] |
| -- @param frame The Frame to hook the script on |
| -- @param script The script to hook |
| -- @param handler The handler for the hook, a funcref or a method name. (Defaults to the name of the hooked script) |
| -- @usage |
| -- -- create an addon with AceHook embeded |
| -- MyAddon = LibStub("AceAddon-3.0"):NewAddon("HookDemo", "AceHook-3.0") |
| -- |
| -- function MyAddon:OnEnable() |
| -- -- Hook the OnShow of FriendsFrame |
| -- self:RawHookScript(FriendsFrame, "OnShow", "FriendsFrameOnShow") |
| -- end |
| -- |
| -- function MyAddon:FriendsFrameOnShow(frame) |
| -- -- Call the original function |
| -- self.hooks[frame].OnShow(frame) |
| -- -- Do our processing |
| -- -- .. stuff |
| -- end |
| function AceHook:RawHookScript(frame, script, handler) |
| hook(self, frame, script, handler, true, false, true, false, "Usage: RawHookScript(object, method, [handler])") |
| end |
| --- SecureHook a script handler on a frame. |
| -- This function is a wrapper around the `frame:HookScript` function in the WoW API. Using AceHook |
| -- extends the functionality of secure hooks, and adds the ability to unhook once the hook isn't |
| -- required anymore, or the addon is being disabled.\\ |
| -- Secure Hooks should be used if the secure-status of the function is vital to its function, |
| -- and taint would block execution. Secure Hooks are always called after the original function was called |
| -- ("Post Hook"), and you cannot modify the arguments, return values or control the execution. |
| -- @paramsig frame, script, [handler] |
| -- @param frame The Frame to hook the script on |
| -- @param script The script to hook |
| -- @param handler The handler for the hook, a funcref or a method name. (Defaults to the name of the hooked script) |
| function AceHook:SecureHookScript(frame, script, handler) |
| hook(self, frame, script, handler, true, true, false, false, "Usage: SecureHookScript(object, method, [handler])") |
| end |
| --- Unhook from the specified function, method or script. |
| -- @paramsig [obj], method |
| -- @param obj The object or frame to unhook from |
| -- @param method The name of the method, function or script to unhook from. |
| function AceHook:Unhook(obj, method) |
| local usage = "Usage: Unhook([obj], method)" |
| if type(obj) == "string" then |
| method, obj = obj, nil |
| end |
| if obj and type(obj) ~= "table" then |
| error(format("%s: 'obj' - expecting nil or table got %s", usage, type(obj)), 2) |
| end |
| if type(method) ~= "string" then |
| error(format("%s: 'method' - expeting string got %s", usage, type(method)), 2) |
| end |
| local uid |
| if obj then |
| uid = registry[self][obj] and registry[self][obj][method] |
| else |
| uid = registry[self][method] |
| end |
| if not uid or not actives[uid] then |
| -- Declining to error on an unneeded unhook since the end effect is the same and this would just be annoying. |
| return false |
| end |
| actives[uid], handlers[uid] = nil, nil |
| if obj then |
| registry[self][obj][method] = nil |
| registry[self][obj] = next(registry[self][obj]) and registry[self][obj] or nil |
| -- if the hook reference doesnt exist, then its a secure hook, just bail out and dont do any unhooking |
| if not self.hooks[obj] or not self.hooks[obj][method] then return true end |
| if scripts[uid] and obj:GetScript(method) == uid then -- unhooks scripts |
| obj:SetScript(method, self.hooks[obj][method] ~= donothing and self.hooks[obj][method] or nil) |
| scripts[uid] = nil |
| elseif obj and self.hooks[obj] and self.hooks[obj][method] and obj[method] == uid then -- unhooks methods |
| obj[method] = self.hooks[obj][method] |
| end |
| self.hooks[obj][method] = nil |
| self.hooks[obj] = next(self.hooks[obj]) and self.hooks[obj] or nil |
| else |
| registry[self][method] = nil |
| -- if self.hooks[method] doesn't exist, then this is a SecureHook, just bail out |
| if not self.hooks[method] then return true end |
| if self.hooks[method] and _G[method] == uid then -- unhooks functions |
| _G[method] = self.hooks[method] |
| end |
| self.hooks[method] = nil |
| end |
| return true |
| end |
| --- Unhook all existing hooks for this addon. |
| function AceHook:UnhookAll() |
| for key, value in pairs(registry[self]) do |
| if type(key) == "table" then |
| for method in pairs(value) do |
| self:Unhook(key, method) |
| end |
| else |
| self:Unhook(key) |
| end |
| end |
| end |
| --- Check if the specific function, method or script is already hooked. |
| -- @paramsig [obj], method |
| -- @param obj The object or frame to unhook from |
| -- @param method The name of the method, function or script to unhook from. |
| function AceHook:IsHooked(obj, method) |
| -- we don't check if registry[self] exists, this is done by evil magicks in the metatable |
| if type(obj) == "string" then |
| if registry[self][obj] and actives[registry[self][obj]] then |
| return true, handlers[registry[self][obj]] |
| end |
| else |
| if registry[self][obj] and registry[self][obj][method] and actives[registry[self][obj][method]] then |
| return true, handlers[registry[self][obj][method]] |
| end |
| end |
| return false, nil |
| end |
| --- Upgrade our old embeded |
| for target, v in pairs( AceHook.embeded ) do |
| AceHook:Embed( target ) |
| end |
Coordinates.lua
--- Bindings.xml (revision 0)
+++ Bindings.xml (revision 27)
@@ -0,0 +1,8 @@
+
+
+ Toggle Markers()
+
+
+ Toggle Options()
+
+
\ No newline at end of file
GuildPositions.lua
WoWInterface
AddOn Sites
© 2004 - 2022 MMOUI
vBulletin © 2024, Jelsoft Enterprises Ltd