WoWInterface SVN PVPScan
Compare Revisions
- This comparison shows the changes necessary to convert path
/
- from Rev 2 to Rev 3
- ↔ Reverse comparison
Rev 2 → Rev 3
trunk/Details_ClassSpellList.lua
File deleted
\ No newline at end of file
trunk/libs.xml
File deleted
\ No newline at end of file
trunk/PVPScan.xml
File deleted
\ No newline at end of file
trunk/PVPScan.lua
File deleted
trunk/PVPScan.toc
File deleted
\ No newline at end of file
trunk/PVPScan/Details_ClassSpellList.lua
New file
0,0 → 1,1023
\ No newline at end of file
| -- this list has been copied from Details! addon with the author authorization. |
| -- it holds all spells from all classes and help try guessing what is the class of random character. |
| PVPScan.ClassSpellList = { |
| --death knight |
| [152280] = "DEATHKNIGHT", -- "Defile" |
| [152279] = "DEATHKNIGHT", -- "Breath of Sindragosa" |
| [165569] = "DEATHKNIGHT", -- "Frozen Runeblade" |
| [156000] = "DEATHKNIGHT", -- "Defile" |
| [50401] = "DEATHKNIGHT", -- "Razorice" |
| [155166] = "DEATHKNIGHT", -- "Mark of Sindragosa" |
| [66198] = "DEATHKNIGHT", -- "Obliterate Off-Hand" |
| [52212] = "DEATHKNIGHT", -- "Death and Decay" |
| [168828] = "DEATHKNIGHT", -- "Necrosis" |
| [66196] = "DEATHKNIGHT", -- "Frost Strike Off-Hand" |
| [66216] = "DEATHKNIGHT", -- "Plague Strike Off-Hand" |
| [108194] = "DEATHKNIGHT", -- Asphyxiate |
| [50977] = "DEATHKNIGHT", -- Death Gate |
| [108199] = "DEATHKNIGHT", -- Gorefiend's Grasp |
| [108201] = "DEATHKNIGHT", -- Desecrated Ground |
| [48265] = "DEATHKNIGHT", -- Unholy Presence |
| [77606] = "DEATHKNIGHT", -- Dark Simulacrum |
| [61999] = "DEATHKNIGHT", -- Raise Ally |
| [108196] = "DEATHKNIGHT", --Death Siphon |
| [47541] = "DEATHKNIGHT", -- Death Coil |
| --[48721] = "DEATHKNIGHT", -- Blood Boil |
| [42650] = "DEATHKNIGHT", -- Army of the Dead |
| [130736] = "DEATHKNIGHT", -- Soul Reaper |
| [45524] = "DEATHKNIGHT", -- Chains of Ice |
| [57330] = "DEATHKNIGHT", -- Horn of Winter |
| [45462] = "DEATHKNIGHT", -- Plague Strike |
| [85948] = "DEATHKNIGHT", -- Festering Strike |
| --[56815] = "DEATHKNIGHT", -- Rune Strike |
| [63560] = "DEATHKNIGHT", -- Dark Transformation |
| [108200] = "DEATHKNIGHT", -- Remorseless Winter |
| [49222] = "DEATHKNIGHT", -- Bone Shield |
| [45477] = "DEATHKNIGHT", -- Icy Touch |
| [43265] = "DEATHKNIGHT", -- Death and Decay |
| [77575] = "DEATHKNIGHT", -- Outbreak |
| [51271] = "DEATHKNIGHT", -- Pillar of Frost |
| [115989] = "DEATHKNIGHT", -- Unholy Blight |
| [48792] = "DEATHKNIGHT", -- Icebound Fortitude |
| --[55050] = "DEATHKNIGHT", -- Heart Strike |
| [55233] = "DEATHKNIGHT", -- Vampiric Blood |
| [49576] = "DEATHKNIGHT", -- Death Grip |
| [119975] = "DEATHKNIGHT", -- Conversion |
| [56222] = "DEATHKNIGHT", -- Dark Command |
| [114866] = "DEATHKNIGHT", -- Soul Reaper |
| --[73975] = "DEATHKNIGHT", -- Necrotic Strike |
| [45529] = "DEATHKNIGHT", -- Blood Tap |
| [130735] = "DEATHKNIGHT", -- Soul Reaper |
| [50842] = "DEATHKNIGHT", -- Pestilence |
| [48743] = "DEATHKNIGHT", -- Death Pact |
| [47528] = "DEATHKNIGHT", -- Mind Freeze |
| [123693] = "DEATHKNIGHT", -- Plague Leech |
| [3714] = "DEATHKNIGHT", -- Path of Frost |
| [48263] = "DEATHKNIGHT", -- Blood Presence |
| [49039] = "DEATHKNIGHT", -- Lichborne |
| [49028] = "DEATHKNIGHT", -- Dancing Rune Weapon |
| [47568] = "DEATHKNIGHT", -- Empower Rune Weapon |
| [96268] = "DEATHKNIGHT", -- Death's Advance |
| --[49016] = "DEATHKNIGHT", -- Unholy Frenzy |
| [49206] = "DEATHKNIGHT", -- Summon Gargoyle |
| [48266] = "DEATHKNIGHT", -- Frost Presence |
| --[45902] = "DEATHKNIGHT", -- Blood Strike |
| [77535] = "DEATHKNIGHT", --Blood Shield (heal) |
| [45470] = "DEATHKNIGHT", --Death Strike (heal) |
| [53365] = "DEATHKNIGHT", --Unholy Strength (heal) |
| [48707] = "DEATHKNIGHT", -- Anti-Magic Shell (heal) |
| [48982] = "DEATHKNIGHT", --rune tap |
| [49020] = "DEATHKNIGHT", --obliterate |
| [49143] = "DEATHKNIGHT", --frost strike |
| [55095] = "DEATHKNIGHT", --frost fever |
| [55078] = "DEATHKNIGHT", --blood plague |
| [49184] = "DEATHKNIGHT", --howling blast |
| [49998] = "DEATHKNIGHT", --death strike |
| [55090] = "DEATHKNIGHT",--scourge strike |
| [47632] = "DEATHKNIGHT",--death coil |
| --druid |
| [145110] = "DRUID", -- "Ysera's Gift" |
| [155777] = "DRUID", -- "Rejuvenation (Germination)" |
| [101024] = "DRUID", -- "Glyph of Ferocious Bite" |
| [124988] = "DRUID", -- "Nature's Vigil" |
| [172176] = "DRUID", -- "Dream of Cenarius" |
| [102352] = "DRUID", -- "Cenarion Ward" |
| [162359] = "DRUID", -- "Genesis" |
| [157982] = "DRUID", -- "Tranquility" |
| [155835] = "DRUID", -- "Bristling Fur" |
| [20484] = "DRUID", -- "Rebirth" |
| [106839] = "DRUID", -- "Skull Bash" |
| [42231] = "DRUID", -- "Hurricane" |
| [164815] = "DRUID", -- "Sunfire" |
| [164812] = "DRUID", -- "Moonfire" |
| [106785] = "DRUID", -- "Swipe" |
| [50288] = "DRUID", -- "Starfall" |
| [152221] = "DRUID", -- "Stellar Flare" |
| [80313] = "DRUID", -- "Pulverize" |
| [124991] = "DRUID", -- "Nature's Vigil" |
| [33917] = "DRUID", -- "Mangle" |
| --[80965] = "DRUID", -- Skull Bash |
| --[16689] = "DRUID", -- Nature's Grasp |
| [102417] = "DRUID", -- Wild Charge |
| --[5229] = "DRUID", -- Enrage |
| [78675] = "DRUID", -- Solar Beam |
| [102351] = "DRUID", -- Cenarion Ward |
| --[9005] = "DRUID", -- Pounce |
| [114282] = "DRUID", -- Treant Form |
| [5215] = "DRUID", -- Prowl |
| [52610] = "DRUID", -- Savage Roar |
| [22570] = "DRUID", -- Maim |
| [102401] = "DRUID", -- Wild Charge |
| [33831] = "DRUID", -- Force of Nature |
| [102355] = "DRUID", -- Faerie Swarm |
| [102706] = "DRUID", -- Force of Nature |
| [16914] = "DRUID", -- Hurricane |
| [2908] = "DRUID", -- Soothe |
| --[62078] = "DRUID", -- Swipe |
| [102793] = "DRUID", -- Ursol's Vortex |
| [106996] = "DRUID", -- Astral Storm |
| --[6785] = "DRUID", -- Ravage |
| [106898] = "DRUID", -- Stampeding Roar |
| [33891] = "DRUID", -- Incarnation: Tree of Life |
| [102359] = "DRUID", -- Mass Entanglement |
| [108293] = "DRUID", -- Heart of the Wild |
| [5211] = "DRUID", -- Mighty Bash |
| --[102795] = "DRUID", -- Bear Hug |
| [108291] = "DRUID", -- Heart of the Wild |
| [18562] = "DRUID", --Swiftmend |
| --[106922] = "DRUID", -- Might of Ursoc |
| [132158] = "DRUID", -- Nature's Swiftness |
| [33763] = "DRUID", -- Lifebloom |
| [1126] = "DRUID", -- Mark of the Wild |
| [6807] = "DRUID", -- Maul |
| [33745] = "DRUID", -- Lacerate |
| [145205] = "DRUID", -- Wild Mushroom |
| [77761] = "DRUID", -- Stampeding Roar |
| --[102791] = "DRUID", -- Wild Mushroom: Bloom |
| [16953] = "DRUID", -- Primal Fury |
| [102693] = "DRUID", -- Force of Nature |
| [145518] = "DRUID", -- Genesis |
| [22812] = "DRUID", -- Barkskin |
| [770] = "DRUID", -- Faerie Fire |
| [106951] = "DRUID", -- Berserk |
| [124974] = "DRUID", -- Nature's Vigil |
| [105697] = "DRUID", -- Virmen's Bite |
| [5225] = "DRUID", -- Track Humanoids |
| [102280] = "DRUID", -- Displacer Beast |
| [102543] = "DRUID", -- Incarnation: King of the Jungle |
| [1850] = "DRUID", -- Dash |
| [77764] = "DRUID", -- Stampeding Roar |
| [22568] = "DRUID", -- Ferocious Bite |
| --[779] = "DRUID", -- Swipe |
| [147349] = "DRUID", -- Wild Mushroom |
| [77758] = "DRUID", -- Thrash |
| [108294] = "DRUID", -- Heart of the Wild |
| [106830] = "DRUID", -- Thrash |
| [108292] = "DRUID", -- Heart of the Wild |
| [768] = "DRUID", -- Cat Form |
| --[127538] = "DRUID", -- Savage Roar |
| [61336] = "DRUID", -- Survival Instincts |
| --[114236] = "DRUID", -- Shred! |
| [146323] = "DRUID", -- Inward Contemplation |
| [22842] = "DRUID", -- Frenzied Regeneration |
| [108238] = "DRUID", -- Renewal |
| [16979] = "DRUID", -- Wild Charge |
| [50334] = "DRUID", -- Berserk |
| [102558] = "DRUID", -- Incarnation: Son of Ursoc |
| [6795] = "DRUID", -- Growl |
| [48505] = "DRUID", -- Starfall |
| [78674] = "DRUID", -- Starsurge |
| [102560] = "DRUID", -- Incarnation: Chosen of Elune |
| [112071] = "DRUID", -- Celestial Alignment |
| [61391] = "DRUID", -- Typhoon |
| [24858] = "DRUID", -- Moonkin Form |
| [136086] = "DRUID", -- Archer's Grace |
| [127663] = "DRUID", -- Astral Communion |
| [49376] = "DRUID", -- Wild Charge |
| [62606] = "DRUID", -- Savage Defense |
| --[80964] = "DRUID", -- Skull Bash |
| [1822] = "DRUID", --rake |
| [1079] = "DRUID", --rip |
| [5221] = "DRUID", --shred |
| --[33876] = "DRUID", --mangle |
| --[33878] = "DRUID", --mangle (energy) |
| --[102545] = "DRUID", --ravage! |
| --[33878] = "DRUID", --mangle (energy gain) |
| [17057] = "DRUID", --bear form (energy gain) |
| [16959] = "DRUID", --primal fury (energy gain) |
| [5217] = "DRUID", --tiger's fury (energy gain) |
| [68285] = "DRUID", --leader of the pack (mana) |
| [5176] = "DRUID", --wrath |
| [93402] = "DRUID", --sunfire |
| [2912] = "DRUID", --starfire |
| [8921] = "DRUID", --moonfire |
| --[81070] = "DRUID", --eclipse |
| --[29166] = "DRUID", --innervate |
| [774] = "DRUID", --rejuvenation |
| --[44203] = "DRUID", --tranquility |
| [48438] = "DRUID", --wild growth |
| [81269] = "DRUID", --shiftmend |
| --[102792] = "DRUID", --wind moshroom: bloom |
| [5185] = "DRUID", --healing touch |
| [8936] = "DRUID", --regrowth |
| [33778] = "DRUID", --lifebloom |
| [48503] = "DRUID", --living seed |
| --[50464] = "DRUID", --nourish |
| --hunter |
| [53353] = "HUNTER", -- "Chimaera Shot" |
| [164851] = "HUNTER", -- "Kill Shot" |
| [164857] = "HUNTER", -- "Survivalist" |
| [115927] = "HUNTER", -- "Liberation" |
| [132764] = "HUNTER", -- "Dire Beast" |
| [160206] = "HUNTER", -- "Lone Wolf: Power of the Primates" |
| [13813] = "HUNTER", -- "Explosive Trap" |
| [60192] = "HUNTER", -- "Freezing Trap" |
| [172106] = "HUNTER", -- "Aspect of the Fox" |
| [162537] = "HUNTER", -- "Poisoned Ammo" |
| [162536] = "HUNTER", -- "Incendiary Ammo" |
| [13812] = "HUNTER", -- "Explosive Trap" |
| [157708] = "HUNTER", -- "Kill Shot" |
| [120761] = "HUNTER", -- "Glaive Toss" |
| [171454] = "HUNTER", -- "Chimaera Shot" |
| [162541] = "HUNTER", -- "Incendiary Ammo" |
| --[19503] = "HUNTER",-- Scatter Shot HUNTER |
| [83245] = "HUNTER",-- Call Pet 5 HUNTER |
| [51753] = "HUNTER",-- Camouflage HUNTER |
| --[13165] = "HUNTER",-- Aspect of the Hawk HUNTER |
| [109259] = "HUNTER",-- Powershot HUNTER |
| [53271] = "HUNTER",-- Master's Call HUNTER |
| [20736] = "HUNTER",-- Distracting Shot HUNTER |
| [1543] = "HUNTER",-- Flare HUNTER |
| [3674] = "HUNTER",-- Black Arrow |
| [117050] = "HUNTER",-- Glaive Toss |
| --[1978] = "HUNTER",-- Serpent Sting |
| [781] = "HUNTER",-- Disengage |
| [34026] = "HUNTER",-- Kill Command |
| [82948] = "HUNTER",-- Snake Trap |
| [2643] = "HUNTER",-- Multi-Shot |
| [109248] = "HUNTER",-- Binding Shot |
| [149365] = "HUNTER",-- Dire Beast |
| [120679] = "HUNTER",-- Dire Beast |
| [82726] = "HUNTER",-- Fervor |
| [3045] = "HUNTER",-- Rapid Fire |
| [883] = "HUNTER",-- Call Pet 1 |
| [19574] = "HUNTER",-- Bestial Wrath |
| [148467] = "HUNTER",-- Deterrence |
| [109304] = "HUNTER",-- Exhilaration |
| [82939] = "HUNTER",-- Explosive Trap |
| [19386] = "HUNTER",-- Wyvern Sting |
| [131894] = "HUNTER",-- A Murder of Crows |
| [13159] = "HUNTER",-- Aspect of the Pack |
| [109260] = "HUNTER",-- Aspect of the Iron Hawk |
| [121818] = "HUNTER",-- Stampede |
| [19434] = "HUNTER",-- Aimed Shot |
| [82941] = "HUNTER",-- Ice Trap |
| [83242] = "HUNTER",-- Call Pet 2 |
| [120697] = "HUNTER",-- Lynx Rush |
| [56641] = "HUNTER",-- Steady Shot |
| [82692] = "HUNTER",-- Focus Fire |
| --[34490] = "HUNTER",-- Silencing Shot |
| [53209] = "HUNTER",-- Chimera Shot |
| --[82928] = "HUNTER",-- Aimed Shot! |
| [83243] = "HUNTER",-- Call Pet 3 |
| [5116] = "HUNTER",-- Concussive Shot |
| [1130] = "HUNTER",--'s Mark |
| [34477] = "HUNTER",-- Misdirection |
| [19263] = "HUNTER",-- Deterrence |
| [147362] = "HUNTER",-- Counter Shot |
| [19801] = "HUNTER",-- Tranquilizing Shot |
| --[82654] = "HUNTER",-- Widow Venom |
| [2641] = "HUNTER",-- Dismiss Pet |
| [83244] = "HUNTER",-- Call Pet 4 |
| [5118] = "HUNTER",-- Aspect of the Cheetah |
| [120360] = "HUNTER",-- Barrage |
| [19577] = "HUNTER",-- Intimidation |
| [131900] = "HUNTER",--a murder of crows |
| [118253] = "HUNTER",--serpent sting |
| [77767] = "HUNTER",--cobra shot |
| [3044] = "HUNTER",--arcane shot |
| [53301] = "HUNTER",--explosive shot |
| [120361] = "HUNTER",--barrage |
| [53351] = "HUNTER",--kill shot |
| --mage |
| [87023] = "MAGE", -- "Cauterize" |
| [152087] = "MAGE", -- "Prismatic Crystal" |
| [157750] = "MAGE", -- "Summon Water Elemental" |
| [159916] = "MAGE", -- "Amplify Magic" |
| [157913] = "MAGE", -- "Evanesce" |
| [153561] = "MAGE", -- "Meteor" |
| [157978] = "MAGE", -- "Unstable Magic" |
| [157980] = "MAGE", -- "Supernova" |
| [153564] = "MAGE", -- "Meteor" |
| [44461] = "MAGE", -- "Living Bomb" |
| [148022] = "MAGE", -- "Icicle" |
| [155152] = "MAGE", -- "Prismatic Crystal" |
| [108839] = "MAGE",-- Ice Floes |
| [7302] = "MAGE",-- Frost Armor |
| [31661] = "MAGE",-- Dragon's Breath |
| [53140] = "MAGE",-- Teleport: Dalaran |
| [11417] = "MAGE",-- Portal: Orgrimmar |
| [42955] = "MAGE",-- Conjure Refreshment |
| [44457] = "MAGE",-- Living Bomb |
| [1953] = "MAGE",-- Blink |
| [108843] = "MAGE",-- Blazing Speed |
| --[131078] = "MAGE",-- Icy Veins |
| [12043] = "MAGE",-- Presence of Mind |
| [108978] = "MAGE",-- Alter Time |
| [55342] = "MAGE",-- Mirror Image |
| [84714] = "MAGE",-- Frozen Orb |
| [45438] = "MAGE",-- Ice Block |
| [115610] = "MAGE",-- Temporal Shield |
| [110960] = "MAGE",-- Greater Invisibility |
| [110959] = "MAGE",-- Greater Invisibility |
| [11129] = "MAGE",-- Combustion |
| [11958] = "MAGE",-- Cold Snap |
| [61316] = "MAGE",-- Dalaran Brilliance |
| [112948] = "MAGE",-- Frost Bomb |
| [2139] = "MAGE",-- Counterspell |
| [80353] = "MAGE",-- Time Warp |
| [2136] = "MAGE",-- Fire Blast |
| [7268] = "MAGE",-- Arcane Missiles |
| [111264] = "MAGE",-- Ice Ward |
| [114923] = "MAGE",-- Nether Tempest |
| [2120] = "MAGE",-- Flamestrike |
| [44425] = "MAGE",-- Arcane Barrage |
| [12042] = "MAGE",-- Arcane Power |
| [1459] = "MAGE",-- Arcane Brilliance |
| [127140] = "MAGE",-- Alter Time |
| [116011] = "MAGE",-- Rune of Power |
| [116014] = "MAGE",-- Rune of Power |
| [132627] = "MAGE",-- Teleport: Vale of Eternal Blossoms |
| [31687] = "MAGE",-- Summon Water Elemental |
| [3567] = "MAGE",-- Teleport: Orgrimmar |
| [30449] = "MAGE",-- Spellsteal |
| [44572] = "MAGE",-- Deep Freeze |
| [113724] = "MAGE",-- Ring of Frost |
| [132626] = "MAGE",-- Portal: Vale of Eternal Blossoms |
| [12472] = "MAGE",-- Icy Veins |
| [116] = "MAGE",--frost bolt |
| [30455] = "MAGE",--ice lance |
| [84721] = "MAGE",--frozen orb |
| [1449] = "MAGE",--arcane explosion |
| [113092] = "MAGE",--frost bomb |
| [115757] = "MAGE",--frost nova |
| [44614] = "MAGE",--forstfire bolt |
| [42208] = "MAGE",--blizzard |
| [11426] = "MAGE",--Ice Barrier (heal) |
| [11366] = "MAGE",--pyroblast |
| [133] = "MAGE",--fireball |
| [108853] = "MAGE",--infernoblast |
| [2948] = "MAGE",--scorch |
| [30451] = "MAGE",--arcane blase |
| [12051] = "MAGE",--evocation |
| --monk |
| [116995] = "MONK", -- "Surging Mist" |
| [162530] = "MONK", -- "Rushing Jade Wind" |
| [157675] = "MONK", -- "Chi Explosion" |
| [157590] = "MONK", -- "Breath of the Serpent" |
| [128591] = "MONK", -- "Blackout Kick" |
| [122281] = "MONK", -- "Healing Elixirs" |
| [124101] = "MONK", -- "Zen Sphere: Detonate" |
| [119031] = "MONK", -- "Gift of the Serpent" |
| [137562] = "MONK", -- "Nimble Brew" |
| [157535] = "MONK", -- "Breath of the Serpent" |
| [152173] = "MONK", -- "Serenity" |
| [152175] = "MONK", -- "Hurricane Strike" |
| [148187] = "MONK", -- "Rushing Jade Wind" |
| [124098] = "MONK", -- "Zen Sphere" |
| [125033] = "MONK", -- "Zen Sphere: Detonate" |
| [158221] = "MONK", -- "Hurricane Strike" |
| [115129] = "MONK", -- "Expel Harm" |
| [152174] = "MONK", -- "Chi Explosion" |
| [123586] = "MONK", -- "Flying Serpent Kick" |
| [115176] = "MONK", -- Zen Meditation cooldown |
| [115203] = "MONK", -- Fortifying Brew |
| --[115213] = "MONK", -- Avert Harm |
| [124081] = "MONK", -- Zen Sphere |
| [125355] = "MONK", -- Healing Sphere |
| [122278] = "MONK", -- Dampen Harm |
| [115450] = "MONK", -- Detox |
| [121827] = "MONK", -- Roll |
| [115315] = "MONK", -- Summon Black Ox Statue |
| [115399] = "MONK", -- Chi Brew |
| [101643] = "MONK", -- Transcendence |
| [115546] = "MONK", -- Provoke |
| [115294] = "MONK", -- Mana Tea |
| [116680] = "MONK", -- Thunder Focus Tea |
| [115070] = "MONK", -- Stance of the Wise Serpent |
| [115069] = "MONK", -- Stance of the Sturdy Ox |
| [119381] = "MONK", -- Leg Sweep |
| [115695] = "MONK", -- Jab |
| [137639] = "MONK", -- Storm, Earth, and Fire |
| --[115073] = "MONK", -- Spinning Fire Blossom |
| [115008] = "MONK", -- Chi Torpedo |
| [121828] = "MONK", -- --Chi Torpedo |
| [115180] = "MONK", -- Dizzying Haze |
| [123986] = "MONK", -- Chi Burst |
| [130654] = "MONK", -- Chi Burst |
| [148135] = "MONK", -- Chi Burst |
| [119392] = "MONK", -- Charging Ox Wave |
| [116095] = "MONK", -- Disable |
| [115687] = "MONK", -- Jab |
| [117993] = "MONK", -- Chi Torpedo |
| [100780] = "MONK", -- Jab |
| [116740] = "MONK", -- Tigereye Brew |
| [124682] = "MONK", -- Enveloping Mist |
| [101545] = "MONK", -- Flying Serpent Kick |
| [109132] = "MONK", -- Roll |
| [122470] = "MONK", -- Touch of Karma |
| [117418] = "MONK", -- Fists of Fury |
| [113656] = "MONK", -- Fists of Fury |
| [115698] = "MONK", -- Jab |
| [115460] = "MONK", -- Healing Sphere |
| [115098] = "MONK", -- Chi Wave |
| --[115464] = "MONK", -- Healing Sphere |
| [115151] = "MONK", -- Renewing Mist |
| [117952] = "MONK", -- Crackling Jade Lightning |
| [122783] = "MONK", -- Diffuse Magic |
| [115078] = "MONK", -- Paralysis |
| [116705] = "MONK", -- Spear Hand Strike |
| [123904] = "MONK", -- Invoke Xuen, the White Tiger |
| --[116709] = "MONK", -- Spear Hand Strike |
| [147489] = "MONK", -- Expel Harm |
| [101546] = "MONK", -- Spinning Crane Kick |
| [115313] = "MONK", -- Summon Jade Serpent Statue |
| [135920] = "MONK", -- Gift of the Serpent |
| [116841] = "MONK", -- Tiger's Lust |
| [116694] = "MONK", -- Surging Mist |
| [116847] = "MONK", -- Rushing Jade Wind |
| [108557] = "MONK", -- Jab |
| [115181] = "MONK", -- Breath of Fire |
| [121253] = "MONK", -- Keg Smash |
| [124506] = "MONK", -- Gift of the Ox |
| [124503] = "MONK", -- Gift of the Ox |
| [115288] = "MONK", -- Energizing Brew |
| [115308] = "MONK", -- Elusive Brew |
| [116781] = "MONK", -- Legacy of the White Tiger |
| [115921] = "MONK", -- Legacy of the Emperor |
| [115693] = "MONK", -- Jab |
| [124507] = "MONK", -- Gift of the Ox |
| [119582] = "MONK", -- Purifying Brew |
| [115080] = "MONK", -- Touch of Death |
| --[135914] = "MONK", -- Healing Sphere |
| [126892] = "MONK", -- Zen Pilgrimage |
| [116849] = "MONK", -- Life Cocoon |
| [116844] = "MONK", -- Ring of Peace |
| [107428] = "MONK", --rising sun kick |
| [100784] = "MONK", --blackout kick |
| [132467] = "MONK", --Chi wave |
| [107270] = "MONK", --spinning crane kick |
| [100787] = "MONK", --tiger palm |
| [123761] = "MONK", --mana tea |
| [119611] = "MONK", --renewing mist |
| [115310] = "MONK", --revival |
| [116670] = "MONK", --uplift |
| [115175] = "MONK", --soothing mist |
| [124041] = "MONK", --gift of the serpent |
| [124040] = "MONK", -- shi torpedo |
| [132120] = "MONK", -- enveloping mist |
| [132463] = "MONK", -- shi wave |
| [117895] = "MONK", --eminence (statue) |
| [115295] = "MONK", --guard |
| [115072] = "MONK", --expel harm |
| --paladin |
| [121129] = "PALADIN", -- "Daybreak" |
| [159375] = "PALADIN", -- "Shining Protector" |
| [130551] = "PALADIN", -- "Word of Glory" |
| [115536] = "PALADIN", -- "Glyph of Protector of the Innocent" |
| [66235] = "PALADIN", -- "Ardent Defender" |
| [152262] = "PALADIN", -- "Seraphim" |
| [20164] = "PALADIN", -- "Seal of Justice" |
| [20170] = "PALADIN", -- "Seal of Justice" |
| [157122] = "PALADIN", -- "Holy Shield" |
| [96172] = "PALADIN", -- "Hand of Light" |
| [101423] = "PALADIN", -- "Seal of Righteousness" |
| [42463] = "PALADIN", -- "Seal of Truth" |
| [25912] = "PALADIN", -- "Holy Shock" |
| [114852] = "PALADIN", -- "Holy Prism" |
| [114919] = "PALADIN", -- "Arcing Light" |
| [31850] = "PALADIN", -- Ardent Defender |
| [31842] = "PALADIN", -- Divine Favor |
| [1044] = "PALADIN", -- Hand of Freedom |
| [114039] = "PALADIN", -- Hand of Purity |
| [4987] = "PALADIN", -- Cleanse |
| [136494] = "PALADIN", -- Word of Glory |
| --[54428] = "PALADIN", -- Divine Plea |
| [7328] = "PALADIN", -- Redemption |
| [116467] = "PALADIN", -- Consecration |
| [31801] = "PALADIN", -- Seal of Truth |
| [20165] = "PALADIN", -- Seal of Insight |
| [20473] = "PALADIN",-- Holy Shock |
| [114158] = "PALADIN",-- Light's Hammer |
| [85673] = "PALADIN",-- Word of Glory |
| [85499] = "PALADIN",-- Speed of Light |
| --[84963] = "PALADIN",-- Inquisition |
| [31884] = "PALADIN",-- Avenging Wrath |
| [24275] = "PALADIN",-- Hammer of Wrath |
| [114165] = "PALADIN",-- Holy Prism |
| [20925] = "PALADIN",-- Sacred Shield |
| [53563] = "PALADIN",-- Beacon of Light |
| [633] = "PALADIN",-- Lay on Hands |
| [88263] = "PALADIN",-- Hammer of the Righteous |
| [53595] = "PALADIN",-- Hammer of the Righteous |
| [53600] = "PALADIN",-- Shield of the Righteous |
| [26573] = "PALADIN",-- Consecration |
| [119072] = "PALADIN",-- Holy Wrath |
| [105593] = "PALADIN",-- Fist of Justice |
| [114163] = "PALADIN",-- Eternal Flame |
| [62124] = "PALADIN",-- Reckoning |
| [121783] = "PALADIN",-- Emancipate |
| [98057] = "PALADIN",-- Grand Crusader |
| [642] = "PALADIN",-- Divine Shield |
| [122032] = "PALADIN",-- Exorcism |
| [20217] = "PALADIN",-- Blessing of Kings |
| [96231] = "PALADIN",-- Rebuke |
| [105809] = "PALADIN",-- Holy Avenger |
| [25780] = "PALADIN",-- Righteous Fury |
| [115750] = "PALADIN",-- Blinding Light |
| [31821] = "PALADIN",-- Devotion Aura |
| [53385] = "PALADIN",-- Divine Storm |
| [20154] = "PALADIN",-- Seal of Righteousness |
| [19740] = "PALADIN",-- Blessing of Might |
| [148039] = "PALADIN",-- Sacred Shield |
| [82326] = "PALADIN",-- Divine Light |
| [35395] = "PALADIN",--cruzade strike |
| [879] = "PALADIN",--exorcism |
| [85256] = "PALADIN",--templar's verdict |
| [20167] = "PALADIN",--seal of insight (mana) |
| [31935] = "PALADIN",--avenger's shield |
| [20271] = "PALADIN", --judgment |
| [35395] = "PALADIN", --cruzader strike |
| [81297] = "PALADIN", --consacration |
| [31803] = "PALADIN", --censure |
| [65148] = "PALADIN", --Sacred Shield |
| [20167] = "PALADIN", --Seal of Insight |
| [86273] = "PALADIN", --illuminated healing |
| [85222] = "PALADIN", --light of dawn |
| [53652] = "PALADIN", --beacon of light |
| [82327] = "PALADIN", --holy radiance |
| [119952] = "PALADIN", --arcing light |
| [25914] = "PALADIN", --holy shock |
| [19750] = "PALADIN", --flash of light |
| --priest |
| [121148] = "PRIEST", -- "Cascade" |
| [94472] = "PRIEST", -- "Atonement" |
| [126154] = "PRIEST", -- "Lightwell Renew" |
| [23455] = "PRIEST", -- "Holy Nova" |
| [140815] = "PRIEST", -- "Power Word: Solace" |
| [56160] = "PRIEST", -- "Glyph of Power Word: Shield" |
| [152116] = "PRIEST", -- "Saving Grace" |
| [147193] = "PRIEST", -- "Shadowy Apparition" |
| [155361] = "PRIEST", -- "Void Entropy" |
| [73325] = "PRIEST", -- "Leap of Faith" |
| [155245] = "PRIEST", -- "Clarity of Purpose" |
| [155521] = "PRIEST", -- "Auspicious Spirits" |
| [148859] = "PRIEST", -- "Shadowy Apparition" |
| [120696] = "PRIEST", -- "Halo" |
| [122128] = "PRIEST", -- "Divine Star" |
| [132157] = "PRIEST", -- "Holy Nova" |
| [19236] = "PRIEST", -- Desperate Prayer |
| [47788] = "PRIEST", -- Guardian Spirit |
| [81206] = "PRIEST", -- Chakra: Sanctuary |
| [62618] = "PRIEST", -- Power Word: Barrier |
| [32375] = "PRIEST", -- Mass Dispel |
| [32546] = "PRIEST", -- Binding Heal |
| [126135] = "PRIEST", -- Lightwell |
| [81209] = "PRIEST", -- Chakra: Chastise |
| [81208] = "PRIEST", -- Chakra: Serenity |
| [2006] = "PRIEST", -- Resurrection |
| [1706] = "PRIEST", -- Levitate |
| [73510] = "PRIEST", -- Mind Spike |
| [127632] = "PRIEST", -- Cascade |
| --[108921] = "PRIEST", -- Psyfiend |
| [88625] = "PRIEST", -- Holy Word: Chastise |
| [121135] = "PRIEST", -- Cascade |
| [122121] = "PRIEST", -- Divine Star |
| [110744] = "PRIEST", -- Divine Star |
| [8122] = "PRIEST", -- Psychic Scream |
| [81700] = "PRIEST", -- Archangel |
| [123258] = "PRIEST", -- Power Word: Shield |
| [48045] = "PRIEST", -- Mind Sear |
| [49821] = "PRIEST", -- Mind Sear |
| [123040] = "PRIEST", -- Mindbender |
| [121536] = "PRIEST", -- Angelic Feather |
| [121557] = "PRIEST", -- Angelic Feather |
| [88685] = "PRIEST", -- Holy Word: Sanctuary |
| [88684] = "PRIEST", -- Holy Word: Serenity |
| [33076] = "PRIEST", -- Prayer of Mending |
| [32379] = "PRIEST", -- Shadow Word: Death |
| [129176] = "PRIEST", -- Shadow Word: Death |
| [586] = "PRIEST", -- Fade |
| [120517] = "PRIEST", -- Halo |
| --[64901] = "PRIEST", -- Hymn of Hope |
| [64843] = "PRIEST", -- Divine Hymn |
| [64844] = "PRIEST", -- Divine Hymn |
| [34433] = "PRIEST", -- Shadowfiend |
| [120644] = "PRIEST", -- Halo |
| [15487] = "PRIEST", -- Silence |
| --[89485] = "PRIEST", -- Inner Focus |
| [109964] = "PRIEST", -- Spirit Shell |
| [129197] = "PRIEST", -- Mind Flay (Insanity) |
| [112833] = "PRIEST", -- Spectral Guise |
| [47750] = "PRIEST", -- Penance |
| [33206] = "PRIEST", -- Pain Suppression |
| [15286] = "PRIEST", -- Vampiric Embrace |
| --[588] = "PRIEST", -- Inner Fire |
| [21562] = "PRIEST", -- Power Word: Fortitude |
| --[73413] = "PRIEST", -- Inner Will |
| [10060] = "PRIEST", -- Power Infusion |
| --[2050] = "PRIEST", -- Heal |
| [15473] = "PRIEST", -- Shadowform |
| [108920] = "PRIEST", -- Void Tendrils |
| [47585] = "PRIEST", -- Dispersion |
| [123259] = "PRIEST", -- Prayer of Mending |
| [34650] = "PRIEST", --mana leech (pet) |
| [589] = "PRIEST", --shadow word: pain |
| [34914] = "PRIEST", --vampiric touch |
| --[34919] = "PRIEST", --vampiric touch (mana) |
| [15407] = "PRIEST", --mind flay |
| [8092] = "PRIEST", --mind blast |
| [15290] = "PRIEST",-- Vampiric Embrace |
| [127626] = "PRIEST",--devouring plague (heal) |
| [2944] = "PRIEST",--devouring plague (damage) |
| [585] = "PRIEST", --smite |
| [47666] = "PRIEST", --penance |
| [14914] = "PRIEST", --holy fire |
| [81751] = "PRIEST", --atonement |
| [47753] = "PRIEST", --divine aegis |
| [33110] = "PRIEST", --prayer of mending |
| [77489] = "PRIEST", --mastery echo of light |
| [596] = "PRIEST", --prayer of healing |
| [34861] = "PRIEST", --circle of healing |
| [139] = "PRIEST", --renew |
| [120692] = "PRIEST", --halo |
| [2060] = "PRIEST", --greater heal |
| [110745] = "PRIEST", --divine star |
| [2061] = "PRIEST", --flash heal |
| [88686] = "PRIEST", --santuary |
| [17] = "PRIEST", --power word: shield |
| --[64904] = "PRIEST", --hymn of hope |
| [129250] = "PRIEST", --power word: solace |
| --rogue |
| [112974] = "ROGUE", -- "Leeching Poison" |
| [13877] = "ROGUE", -- "Blade Flurry" |
| [57934] = "ROGUE", -- "Tricks of the Trade" |
| [152151] = "ROGUE", -- "Shadow Reflection" |
| [3408] = "ROGUE", -- "Crippling Poison" |
| [157584] = "ROGUE", -- "Instant Poison" |
| [114018] = "ROGUE", -- "Shroud of Concealment" |
| [152150] = "ROGUE", -- "Death from Above" |
| [168963] = "ROGUE", -- "Rupture" |
| [22482] = "ROGUE", -- "Blade Flurry" |
| [57841] = "ROGUE", -- "Killing Spree" |
| [57842] = "ROGUE", -- "Killing Spree Off-Hand" |
| [79136] = "ROGUE", -- "Venomous Wound" |
| [157607] = "ROGUE", -- Instant Poison |
| [86392] = "ROGUE", -- "Main Gauche" |
| [74001] = "ROGUE", -- Combat Readiness |
| [14183] = "ROGUE", -- Premeditation |
| [108211] = "ROGUE", -- Leeching Poison |
| --[5761] = "ROGUE", -- Mind-numbing Poison |
| [8679] = "ROGUE", -- Wound Poison |
| [137584] = "ROGUE", -- Shuriken Toss |
| [137585] = "ROGUE", -- Shuriken Toss Off-hand |
| [1833] = "ROGUE", -- Cheap Shot |
| [121733] = "ROGUE", -- Throw |
| [1776] = "ROGUE", -- Gouge |
| [108212] = "ROGUE", -- Burst of Speed |
| [27576] = "ROGUE", -- Mutilate Off-Hand |
| [1329] = "ROGUE", -- Mutilate |
| [5171] = "ROGUE", -- Slice and Dice |
| [2983] = "ROGUE", -- Sprint |
| [1966] = "ROGUE", -- Feint |
| [36554] = "ROGUE", -- Shadowstep |
| [31224] = "ROGUE", -- Cloak of Shadows |
| [1784] = "ROGUE", -- Stealth |
| [84617] = "ROGUE", -- Revealing Strike |
| [13750] = "ROGUE", -- Adrenaline Rush |
| --[121471] = "ROGUE", -- Shadow Blades |
| --[121473] = "ROGUE", -- Shadow Blade |
| [1752] = "ROGUE", -- Sinister Strike |
| [51690] = "ROGUE", -- Killing Spree |
| --[121474] = "ROGUE", -- Shadow Blade Off-hand |
| [1766] = "ROGUE", -- Kick |
| [76577] = "ROGUE", -- Smoke Bomb |
| [5277] = "ROGUE", -- Evasion |
| [137619] = "ROGUE", -- Marked for Death |
| --[8647] = "ROGUE", -- Expose Armor |
| [79140] = "ROGUE", -- Vendetta |
| [51713] = "ROGUE", -- Shadow Dance |
| [2823] = "ROGUE", -- Deadly Poison |
| [115191] = "ROGUE", -- Stealth |
| --[108215] = "ROGUE", -- Paralytic Poison |
| [14185] = "ROGUE", -- Preparation |
| [2094] = "ROGUE", -- Blind |
| [121411] = "ROGUE", -- Crimson Tempest |
| [53] = "ROGUE", --backstab |
| [8680] = "ROGUE", --wound pouson |
| [2098] = "ROGUE", --eviscerate |
| [2818] = "ROGUE", --deadly poison |
| [113780] = "ROGUE", --deadly poison |
| [51723] = "ROGUE", --fan of knifes |
| [111240] = "ROGUE", --dispatch |
| [703] = "ROGUE", --garrote |
| [1943] = "ROGUE", --rupture |
| [114014] = "ROGUE", --shuriken toss |
| [16511] = "ROGUE", --hemorrhage |
| [89775] = "ROGUE", --hemorrhage |
| [8676] = "ROGUE", --amcush |
| [5374] = "ROGUE", --mutilate |
| [32645] = "ROGUE", --envenom |
| [1943] = "ROGUE", --rupture |
| [73651] = "ROGUE", --Recuperate (heal) |
| [35546] = "ROGUE", --combat potency (energy) |
| [98440] = "ROGUE", --relentless strikes (energy) |
| [51637] = "ROGUE", --venomous vim (energy) |
| --shaman |
| [55533] = "SHAMAN", -- "Glyph of Healing Wave" |
| [157503] = "SHAMAN", -- "Cloudburst" |
| [137808] = "SHAMAN", -- "Flames of Life" |
| [114911] = "SHAMAN", -- "Ancestral Guidance" |
| [165344] = "SHAMAN", -- "Ascendance" |
| [157153] = "SHAMAN", -- "Cloudburst Totem" |
| [152256] = "SHAMAN", -- "Storm Elemental Totem" |
| [21169] = "SHAMAN", -- "Reincarnation" |
| [2008] = "SHAMAN", -- "Ancestral Spirit" |
| [73685] = "SHAMAN", -- "Unleash Life" |
| [165462] = "SHAMAN", -- "Unleash Flame" |
| [152255] = "SHAMAN", -- "Liquid Magma" |
| [8190] = "SHAMAN", -- "Magma Totem" |
| [108287] = "SHAMAN", -- "Totemic Projection" |
| [8349] = "SHAMAN", -- "Fire Nova" |
| [77478] = "SHAMAN", -- "Earthquake" |
| [114089] = "SHAMAN", -- "Windlash" |
| [114093] = "SHAMAN", -- "Windlash Off-Hand" |
| [115357] = "SHAMAN", -- "Windstrike" |
| [115360] = "SHAMAN", -- "Windstrike Off-Hand" |
| [88767] = "SHAMAN", -- "Fulmination" |
| [170379] = "SHAMAN", -- "Molten Earth" |
| [177601] = "SHAMAN", -- "Liquid Magma" |
| [10444] = "SHAMAN", -- "Flametongue Attack" |
| [32176] = "SHAMAN", -- "Stormstrike Off-Hand" |
| [51886] = "SHAMAN", -- Cleanse Spirit |
| [98008] = "SHAMAN", -- Spirit Link Totem |
| [8177] = "SHAMAN", -- Grounding Totem |
| [8143] = "SHAMAN", -- Tremor Totem |
| [108273] = "SHAMAN", -- Windwalk Totem |
| [51514] = "SHAMAN", -- Hex |
| --[73682] = "SHAMAN", -- Unleash Frost |
| --[8033] = "SHAMAN", -- Frostbrand Weapon |
| [114074] = "SHAMAN", -- Lava Beam |
| --[120668] = "SHAMAN", --Stormlash Totem |
| [2894] = "SHAMAN", -- Fire Elemental Totem |
| [2825] = "SHAMAN", -- Bloodlust |
| [114049] = "SHAMAN", -- Ascendance |
| [73680] = "SHAMAN", -- Unleash Elements |
| [5394] = "SHAMAN", -- Healing Stream Totem |
| [108280] = "SHAMAN", -- Healing Tide Totem |
| [3599] = "SHAMAN", -- Searing Totem |
| [73920] = "SHAMAN", -- Healing Rain |
| [2645] = "SHAMAN", -- Ghost Wolf |
| [16166] = "SHAMAN", -- Elemental Mastery |
| [108281] = "SHAMAN", -- Ancestral Guidance |
| [108270] = "SHAMAN", -- Stone Bulwark Totem |
| [108285] = "SHAMAN", -- Call of the Elements |
| [115356] = "SHAMAN", -- Stormblast |
| [60103] = "SHAMAN", -- Lava Lash |
| [51533] = "SHAMAN", -- Feral Spirit |
| [17364] = "SHAMAN", -- Stormstrike |
| [16188] = "SHAMAN", -- Ancestral Swiftness |
| [2062] = "SHAMAN", -- Earth Elemental Totem |
| --[8024] = "SHAMAN", -- Flametongue Weapon |
| [51485] = "SHAMAN", -- Earthgrab Totem |
| --[331] = "SHAMAN", -- Healing Wave |
| [61882] = "SHAMAN", -- Earthquake |
| [52127] = "SHAMAN", -- Water Shield |
| [77472] = "SHAMAN", -- Greater Healing Wave |
| [108269] = "SHAMAN", -- Capacitor Totem |
| [79206] = "SHAMAN", -- Spiritwalker's Grace |
| [57994] = "SHAMAN", -- Wind Shear |
| [108271] = "SHAMAN", -- Astral Shift |
| [30823] = "SHAMAN", --istic Rage |
| [77130] = "SHAMAN", -- Purify Spirit |
| [58875] = "SHAMAN", -- Spirit Walk |
| [36936] = "SHAMAN", -- Totemic Recall |
| --[51730] = "SHAMAN", -- Earthliving Weapon |
| [8056] = "SHAMAN", -- Frost Shock |
| --[88765] = "SHAMAN", --rolling thunder (mana) |
| [51490] = "SHAMAN", --thunderstorm (mana) |
| --[82987] = "SHAMAN", --telluric currents glyph (mana) |
| [101033] = "SHAMAN", --resurgence (mana) |
| [51505] = "SHAMAN", --lava burst |
| [8050] = "SHAMAN", --flame shock |
| [117014] = "SHAMAN", --elemental blast |
| [403] = "SHAMAN", --lightning bolt |
| --[45284] = "SHAMAN", --lightning bolt |
| [421] = "SHAMAN", --chain lightining |
| [32175] = "SHAMAN", --stormstrike |
| [25504] = "SHAMAN", --windfury |
| [8042] = "SHAMAN", --earthshock |
| [26364] = "SHAMAN", --lightning shield |
| [117014] = "SHAMAN", --elemental blast |
| [73683] = "SHAMAN", --unleash flame |
| [51522] = "SHAMAN", --primal wisdom (mana) |
| --[63375] = "SHAMAN", --primal wisdom (mana) |
| [114942] = "SHAMAN", --healing tide |
| [73921] = "SHAMAN", --healing rain |
| [1064] = "SHAMAN", --chain heal |
| [52042] = "SHAMAN", --healing stream totem |
| [61295] = "SHAMAN", --riptide |
| --[51945] = "SHAMAN", --earthliving |
| [114083] = "SHAMAN", --restorative mists |
| [8004] = "SHAMAN", --healing surge |
| --warlock |
| [108447] = "WARLOCK", -- "Soul Link" |
| [108508] = "WARLOCK", -- "Mannoroth's Fury" |
| [108482] = "WARLOCK", -- "Unbound Will" |
| [157897] = "WARLOCK", -- "Summon Terrorguard" |
| [111771] = "WARLOCK", -- "Demonic Gateway" |
| [157899] = "WARLOCK", -- "Summon Abyssal" |
| [157757] = "WARLOCK", -- "Summon Doomguard" |
| [119915] = "WARLOCK", -- "Wrathstorm" |
| [137587] = "WARLOCK", -- "Kil'jaeden's Cunning" |
| [1949] = "WARLOCK", -- "Hellfire" |
| [171140] = "WARLOCK", -- "Shadow Lock" |
| [104025] = "WARLOCK", -- "Immolation Aura" |
| [119905] = "WARLOCK", -- "Cauterize Master" |
| [119913] = "WARLOCK", -- "Fellash" |
| [111898] = "WARLOCK", -- "Grimoire: Felguard" |
| [30146] = "WARLOCK", -- "Summon Felguard" |
| [119914] = "WARLOCK", -- "Felstorm" |
| [86121] = "WARLOCK", -- "Soul Swap" |
| [86213] = "WARLOCK", -- "Soul Swap Exhale" |
| [157695] = "WARLOCK", -- "Demonbolt" |
| [86040] = "WARLOCK", -- "Hand of Gul'dan" |
| [124915] = "WARLOCK", -- "Chaos Wave" |
| [22703] = "WARLOCK", -- "Infernal Awakening" |
| [5857] = "WARLOCK", -- "Hellfire" |
| [129476] = "WARLOCK", -- "Immolation Aura" |
| [152108] = "WARLOCK", -- "Cataclysm" |
| [27285] = "WARLOCK", -- "Seed of Corruption" |
| [131740] = "WARLOCK", -- "Corruption" |
| [131737] = "WARLOCK", -- "Agony" |
| [131736] = "WARLOCK", -- "Unstable Affliction" |
| [80240] = "WARLOCK", -- Havoc |
| [112921] = "WARLOCK", -- Summon Abyssal |
| [48020] = "WARLOCK", -- Demonic Circle: Teleport |
| [111397] = "WARLOCK", -- Blood Horror |
| [112869] = "WARLOCK", -- Summon Observer |
| [1454] = "WARLOCK", -- Life Tap |
| [112868] = "WARLOCK", -- Summon Shivarra |
| [112869] = "WARLOCK", -- Summon Observer |
| [120451] = "WARLOCK", -- Flames of Xoroth |
| [29893] = "WARLOCK", -- Create Soulwell |
| [114189] = "WARLOCK", -- Health Funnel |
| [112866] = "WARLOCK", -- Summon Fel Imp |
| [108683] = "WARLOCK", -- Fire and Brimstone |
| [688] = "WARLOCK", -- Summon Imp |
| --[112092] = "WARLOCK", -- Shadow Bolt |
| [113861] = "WARLOCK", -- Dark Soul: Knowledge |
| --[103967] = "WARLOCK", -- Carrion Swarm |
| [112870] = "WARLOCK", -- Summon Wrathguard |
| [104316] = "WARLOCK", -- Imp Swarm |
| [17962] = "WARLOCK", -- Conflagrate |
| [108359] = "WARLOCK", -- Dark Regeneration |
| [110913] = "WARLOCK", -- Dark Bargain |
| [105174] = "WARLOCK", -- Hand of Gul'dan |
| [697] = "WARLOCK", -- Summon Voidwalker |
| [6201] = "WARLOCK", -- Create Healthstone |
| [146739] = "WARLOCK", -- Corruption |
| [109151] = "WARLOCK", -- Demonic Leap |
| [104773] = "WARLOCK", -- Unending Resolve |
| [103958] = "WARLOCK", -- Metamorphosis |
| [119678] = "WARLOCK", -- Soul Swap |
| --[6229] = "WARLOCK", -- Twilight Ward |
| [74434] = "WARLOCK", -- Soulburn |
| [30283] = "WARLOCK", -- Shadowfury |
| [113860] = "WARLOCK", -- Dark Soul: Misery |
| [108503] = "WARLOCK", -- Grimoire of Sacrifice |
| [104232] = "WARLOCK", -- Rain of Fire |
| [6353] = "WARLOCK", -- Soul Fire |
| [689] = "WARLOCK", -- Drain Life |
| [17877] = "WARLOCK", -- Shadowburn |
| [113858] = "WARLOCK", -- Dark Soul: Instability |
| --[1490] = "WARLOCK", -- Curse of the Elements |
| [114635] = "WARLOCK", -- Ember Tap |
| [27243] = "WARLOCK", -- Seed of Corruption |
| --[131623] = "WARLOCK", -- Twilight Ward |
| [6789] = "WARLOCK", -- Mortal Coil |
| [111400] = "WARLOCK", -- Burning Rush |
| [124916] = "WARLOCK", -- Chaos Wave |
| --[1120] = "WARLOCK", -- Drain Soul |
| [109773] = "WARLOCK", -- Dark Intent |
| [112927] = "WARLOCK", -- Summon Terrorguard |
| [1122] = "WARLOCK", -- Summon Infernal |
| [108416] = "WARLOCK", -- Sacrificial Pact |
| [5484] = "WARLOCK", -- Howl of Terror |
| [29858] = "WARLOCK", -- Soulshatter |
| [18540] = "WARLOCK", -- Summon Doomguard |
| --[89420] = "WARLOCK", -- Drain Life |
| [20707] = "WARLOCK", -- Soulstone |
| [132413] = "WARLOCK", -- Shadow Bulwark |
| --[109466] = "WARLOCK", -- Curse of Enfeeblement |
| [48018] = "WARLOCK", -- Demonic Circle: Summon |
| --[77799] = "WARLOCK", --fel flame |
| [63106] = "WARLOCK", --siphon life |
| [1454] = "WARLOCK", --life tap |
| [103103] = "WARLOCK", --malefic grasp |
| [980] = "WARLOCK", --agony |
| [30108] = "WARLOCK", --unstable affliction |
| [172] = "WARLOCK", --corruption |
| [48181] = "WARLOCK", --haunt |
| [29722] = "WARLOCK", --incenerate |
| [348] = "WARLOCK", --Immolate |
| [116858] = "WARLOCK", --Chaos Bolt |
| [114654] = "WARLOCK", --incinerate |
| [108686] = "WARLOCK", --immolate |
| [108685] = "WARLOCK", --conflagrate |
| [104233] = "WARLOCK", --rain of fire |
| [103964] = "WARLOCK", --touch os chaos |
| [686] = "WARLOCK", --shadow bolt |
| --[114328] = "WARLOCK", --shadow bolt glyph |
| [140719] = "WARLOCK", --hellfire |
| [104027] = "WARLOCK", --soul fire |
| [603] = "WARLOCK", --doom |
| [108371] = "WARLOCK", --Harvest life |
| --warrior |
| [117313] = "WARRIOR", -- "Bloodthirst Heal" |
| [118779] = "WARRIOR", -- "Victory Rush" |
| [118340] = "WARRIOR", -- "Impending Victory" |
| [114029] = "WARRIOR", -- "Safeguard" |
| [156291] = "WARRIOR", -- "Gladiator Stance" |
| [772] = "WARRIOR", -- "Rend" |
| [156321] = "WARRIOR", -- "Shield Charge" |
| [3411] = "WARRIOR", -- "Intervene" |
| [12723] = "WARRIOR", -- "Sweeping Strikes" |
| [34428] = "WARRIOR", -- "Victory Rush" |
| [44949] = "WARRIOR", -- "Whirlwind Off-Hand" |
| [176289] = "WARRIOR", -- "Siegebreaker" |
| [174736] = "WARRIOR", -- "Enhanced Rend" |
| [167105] = "WARRIOR", -- "Colossus Smash" |
| [163558] = "WARRIOR", -- "Execute Off-Hand" |
| [95738] = "WARRIOR", -- "Bladestorm Off-Hand" |
| [145585] = "WARRIOR", -- "Storm Bolt Off-Hand" |
| [2565] = "WARRIOR", -- Shield Block |
| [2457] = "WARRIOR", -- Battle Stance |
| [12328] = "WARRIOR", -- Sweeping Strikes |
| [114192] = "WARRIOR", -- Mocking Banner |
| [12323] = "WARRIOR", -- Piercing Howl |
| --[122475] = "WARRIOR", -- Throw |
| --[845] = "WARRIOR", -- Cleave |
| [5246] = "WARRIOR", -- Intimidating Shout |
| --[7386] = "WARRIOR", -- Sunder Armor |
| [107566] = "WARRIOR", -- Staggering Shout |
| [86346] = "WARRIOR", -- Colossus Smash |
| [18499] = "WARRIOR", -- Berserker Rage |
| [107570] = "WARRIOR", -- Storm Bolt |
| [1680] = "WARRIOR", -- Whirlwind |
| [85384] = "WARRIOR", -- Raging Blow Off-Hand |
| [85288] = "WARRIOR", -- Raging Blow |
| [100] = "WARRIOR", -- Charge |
| --[7384] = "WARRIOR", -- Overpower |
| [23881] = "WARRIOR", -- Bloodthirst |
| [118000] = "WARRIOR", -- Dragon Roar |
| [50622] = "WARRIOR", -- Bladestorm |
| [46924] = "WARRIOR", -- Bladestorm |
| [6673] = "WARRIOR", -- Battle Shout |
| [103840] = "WARRIOR", -- Impending Victory |
| [5308] = "WARRIOR", -- Execute |
| [57755] = "WARRIOR", -- Heroic Throw |
| [871] = "WARRIOR", -- Shield Wall |
| [97462] = "WARRIOR", -- Rallying Cry |
| [118038] = "WARRIOR", -- Die by the Sword |
| --[114203] = "WARRIOR", -- Demoralizing Banner |
| [52174] = "WARRIOR", -- Heroic Leap |
| [1719] = "WARRIOR", -- Recklessness |
| --[114207] = "WARRIOR", -- Skull Banner |
| [1715] = "WARRIOR", -- Hamstring |
| [107574] = "WARRIOR", -- Avatar |
| [46968] = "WARRIOR", -- Shockwave |
| [6343] = "WARRIOR", -- Thunder Clap |
| [12292] = "WARRIOR", -- Bloodbath |
| [64382] = "WARRIOR", -- Shattering Throw |
| [114028] = "WARRIOR", -- Mass Spell Reflection |
| [55694] = "WARRIOR", -- Enraged Regeneration |
| [6552] = "WARRIOR", -- Pummel |
| [6572] = "WARRIOR", -- Revenge |
| [112048] = "WARRIOR", -- Shield Barrier |
| [23920] = "WARRIOR", -- Spell Reflection |
| [12975] = "WARRIOR", -- Last Stand |
| [355] = "WARRIOR", -- Taunt |
| [102060] = "WARRIOR", -- Disrupting Shout |
| [100130] = "WARRIOR", --wild strike |
| [96103] = "WARRIOR", --raging blow |
| [12294] = "WARRIOR", --mortal strike |
| [1464] = "WARRIOR", --Slam |
| [23922] = "WARRIOR", --shield slam |
| [20243] = "WARRIOR", --devastate |
| --[11800] = "WARRIOR", --dragon roar |
| [115767] = "WARRIOR", --deep wounds |
| [109128] = "WARRIOR", --charge |
| --[11294] = "WARRIOR", --mortal strike |
| [109128] = "WARRIOR", --charge |
| [12880] = "WARRIOR", --enrage |
| --[29842] = "WARRIOR", --undribled wrath |
| } |
trunk/PVPScan/libs.xml
New file
0,0 → 1,12
\ No newline at end of file
| <Ui xsi:schemaLocation="http://www.blizzard.com/wow/ui/ ..\FrameXML\UI.xsd"> |
| <Script file="Libs\LibStub\LibStub.lua"/> |
| <Include file="Libs\AceAddon-3.0\AceAddon-3.0.xml"/> |
| <Include file="Libs\AceDB-3.0\AceDB-3.0.xml"/> |
| <Include file="Libs\AceConsole-3.0\AceConsole-3.0.xml"/> |
| <Include file="Libs\AceGUI-3.0\AceGUI-3.0.xml"/> |
| <Include file="Libs\AceConfig-3.0\AceConfig-3.0.xml"/> |
| <Include file="Libs\AceDBOptions-3.0\AceDBOptions-3.0.xml"/> |
| <Include file="Libs\AceEvent-3.0\AceEvent-3.0.xml" /> |
| <Include file="Libs\AceTimer-3.0\AceTimer-3.0.xml" /> |
| <Include file="Libs\LibSharedMedia-3.0\lib.xml" /> |
| </Ui> |
trunk/PVPScan/Libs/AceDBOptions-3.0/AceDBOptions-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="AceDBOptions-3.0.lua"/> |
| </Ui> |
trunk/PVPScan/Libs/AceDBOptions-3.0/AceDBOptions-3.0.lua
New file
0,0 → 1,440
| --- 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 1066 2012-09-18 14:36:49Z nevcairiel $ |
| local ACEDBO_MAJOR, ACEDBO_MINOR = "AceDBOptions-3.0", 14 |
| local AceDBOptions, oldminor = LibStub:NewLibrary(ACEDBO_MAJOR, ACEDBO_MINOR) |
| if not AceDBOptions then return end -- No upgrade needed |
| -- Lua APIs |
| local pairs, next = pairs, next |
| -- WoW APIs |
| local UnitClass = UnitClass |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: NORMAL_FONT_COLOR_CODE, FONT_COLOR_CODE_CLOSE |
| AceDBOptions.optionTables = AceDBOptions.optionTables or {} |
| AceDBOptions.handlers = AceDBOptions.handlers or {} |
| --[[ |
| Localization of AceDBOptions-3.0 |
| ]] |
| local L = { |
| choose = "Existing Profiles", |
| choose_desc = "You can either create a new profile by entering a name in the editbox, or choose one of the already existing profiles.", |
| choose_sub = "Select one of your currently available profiles.", |
| copy = "Copy From", |
| copy_desc = "Copy the settings from one existing profile into the currently active profile.", |
| current = "Current Profile:", |
| default = "Default", |
| delete = "Delete a Profile", |
| delete_confirm = "Are you sure you want to delete the selected profile?", |
| delete_desc = "Delete existing and unused profiles from the database to save space, and cleanup the SavedVariables file.", |
| delete_sub = "Deletes a profile from the database.", |
| intro = "You can change the active database profile, so you can have different settings for every character.", |
| new = "New", |
| new_sub = "Create a new empty profile.", |
| profiles = "Profiles", |
| profiles_sub = "Manage Profiles", |
| reset = "Reset Profile", |
| 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_sub = "Reset the current profile to the default", |
| } |
| local LOCALE = GetLocale() |
| if LOCALE == "deDE" then |
| L["choose"] = "Vorhandene Profile" |
| L["choose_desc"] = "Du kannst ein neues Profil erstellen, indem du einen neuen Namen in der Eingabebox 'Neu' eingibst, oder wähle eines der vorhandenen Profile aus." |
| L["choose_sub"] = "Wählt ein bereits vorhandenes Profil aus." |
| L["copy"] = "Kopieren von..." |
| L["copy_desc"] = "Kopiere die Einstellungen von einem vorhandenen Profil in das aktive Profil." |
| -- L["current"] = "Current Profile:" |
| L["default"] = "Standard" |
| L["delete"] = "Profil löschen" |
| L["delete_confirm"] = "Willst du das ausgewählte Profil wirklich löschen?" |
| L["delete_desc"] = "Lösche vorhandene oder unbenutzte Profile aus der Datenbank um Platz zu sparen und um die SavedVariables Datei 'sauber' zu halten." |
| L["delete_sub"] = "Löscht ein Profil aus der Datenbank." |
| L["intro"] = "Hier kannst du das aktive Datenbankprofile ändern, damit du verschiedene Einstellungen für jeden Charakter erstellen kannst, wodurch eine sehr flexible Konfiguration möglich wird." |
| L["new"] = "Neu" |
| L["new_sub"] = "Ein neues Profil erstellen." |
| L["profiles"] = "Profile" |
| L["profiles_sub"] = "Profile verwalten" |
| L["reset"] = "Profil zurücksetzen" |
| L["reset_desc"] = "Setzt das momentane Profil auf Standardwerte zurück, für den Fall das mit der Konfiguration etwas schief lief oder weil du einfach neu starten willst." |
| L["reset_sub"] = "Das aktuelle Profil auf Standard zurücksetzen." |
| elseif LOCALE == "frFR" then |
| L["choose"] = "Profils existants" |
| L["choose_desc"] = "Vous pouvez créer un nouveau profil en entrant un nouveau nom dans la boîte de saisie, ou en choississant un des profils déjà existants." |
| L["choose_sub"] = "Permet de choisir un des profils déjà disponibles." |
| L["copy"] = "Copier à partir de" |
| L["copy_desc"] = "Copie les paramètres d'un profil déjà existant dans le profil actuellement actif." |
| -- L["current"] = "Current Profile:" |
| L["default"] = "Défaut" |
| L["delete"] = "Supprimer un profil" |
| L["delete_confirm"] = "Etes-vous sûr de vouloir supprimer le profil sélectionné ?" |
| L["delete_desc"] = "Supprime les profils existants inutilisés de la base de données afin de gagner de la place et de nettoyer le fichier SavedVariables." |
| L["delete_sub"] = "Supprime un profil de la base de données." |
| L["intro"] = "Vous pouvez changer le profil actuel afin d'avoir des paramètres différents pour chaque personnage, permettant ainsi d'avoir une configuration très flexible." |
| L["new"] = "Nouveau" |
| L["new_sub"] = "Créée un nouveau profil vierge." |
| L["profiles"] = "Profils" |
| L["profiles_sub"] = "Gestion des profils" |
| L["reset"] = "Réinitialiser le profil" |
| L["reset_desc"] = "Réinitialise le profil actuel au cas où votre configuration est corrompue ou si vous voulez tout simplement faire table rase." |
| L["reset_sub"] = "Réinitialise le profil actuel avec les paramètres par défaut." |
| elseif LOCALE == "koKR" then |
| L["choose"] = "íë¡í ì í" |
| L["choose_desc"] = "ìë¡ì´ ì´ë¦ì ì ë ¥íê±°ë, ì´ë¯¸ ìë íë¡íì¤ íë를 ì ííì¬ ìë¡ì´ íë¡íì ë§ë¤ ì ììµëë¤." |
| L["choose_sub"] = "ë¹ì ì´ íì¬ ì´ì©í ì ìë íë¡íì ì íí©ëë¤." |
| L["copy"] = "ë³µì¬" |
| L["copy_desc"] = "íì¬ ì¬ì©ì¤ì¸ íë¡íì, ì íí íë¡íì ì¤ì ì ë³µì¬í©ëë¤." |
| -- L["current"] = "Current Profile:" |
| L["default"] = "기본ê°" |
| L["delete"] = "íë¡í ìì " |
| L["delete_confirm"] = "ì ë§ë¡ ì íí íë¡íì ìì 를 ìíìëê¹?" |
| L["delete_desc"] = "ë°ì´í°ë² ì´ì¤ì ì¬ì©ì¤ì´ê±°ë ì ì¥ë íë¡íì¼ ìì ë¡ SavedVariables íì¼ì ì 리ì ê³µê° ì ì½ì´ ë©ëë¤." |
| L["delete_sub"] = "ë°ì´í°ë² ì´ì¤ì íë¡íì ìì í©ëë¤." |
| L["intro"] = "모ë ìºë¦í°ì ë¤ìí ì¤ì ê³¼ ì¬ì©ì¤ì¸ ë°ì´í°ë² ì´ì¤ íë¡í, ì´ëê²ì´ëì§ ë§¤ì° ë¤ë£¨ê¸° ì½ê² ë°ê¿ì ììµëë¤." |
| L["new"] = "ìë¡ì´ íë¡í" |
| L["new_sub"] = "ìë¡ì´ íë¡íì ë§ëëë¤." |
| L["profiles"] = "íë¡í" |
| L["profiles_sub"] = "íë¡í ì¤ì " |
| L["reset"] = "íë¡í ì´ê¸°í" |
| L["reset_desc"] = "ë¨ìí ë¤ì ìë¡ê² 구ì±ì ìíë ê²½ì°, íì¬ íë¡íì 기본ê°ì¼ë¡ ì´ê¸°í í©ëë¤." |
| L["reset_sub"] = "íì¬ì íë¡íì 기본ê°ì¼ë¡ ì´ê¸°í í©ëë¤" |
| elseif LOCALE == "esES" or LOCALE == "esMX" then |
| L["choose"] = "Perfiles existentes" |
| L["choose_desc"] = "Puedes crear un nuevo perfil introduciendo un nombre en el recuadro o puedes seleccionar un perfil de los ya existentes." |
| L["choose_sub"] = "Selecciona uno de los perfiles disponibles." |
| L["copy"] = "Copiar de" |
| L["copy_desc"] = "Copia los ajustes de un perfil existente al perfil actual." |
| -- L["current"] = "Current Profile:" |
| L["default"] = "Por defecto" |
| L["delete"] = "Borrar un Perfil" |
| L["delete_confirm"] = "¿Estas seguro que quieres borrar el perfil seleccionado?" |
| 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_sub"] = "Borra un perfil de la base de datos." |
| L["intro"] = "Puedes cambiar el perfil activo de tal manera que cada personaje tenga diferentes configuraciones." |
| L["new"] = "Nuevo" |
| L["new_sub"] = "Crear un nuevo perfil vacio." |
| L["profiles"] = "Perfiles" |
| L["profiles_sub"] = "Manejar Perfiles" |
| L["reset"] = "Reiniciar Perfil" |
| 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_sub"] = "Reinicar el perfil actual al de por defecto" |
| elseif LOCALE == "zhTW" then |
| L["choose"] = "ç¾æçè¨å®æª" |
| L["choose_desc"] = "ä½ å¯ä»¥ééå¨ææ¬æ¡å §è¼¸å ¥ä¸ååååµç«ä¸åæ°çè¨å®æªï¼ä¹å¯ä»¥é¸æä¸åå·²ç¶åå¨çè¨å®æªã" |
| L["choose_sub"] = "å¾ç¶åå¯ç¨çè¨å®æªè£é¢é¸æä¸åã" |
| L["copy"] = "è¤è£½èª" |
| L["copy_desc"] = "å¾ç¶åæåå·²ä¿åçè¨å®æªè¤è£½å°ç¶åæ£ä½¿ç¨çè¨å®æªã" |
| -- L["current"] = "Current Profile:" |
| L["default"] = "é è¨" |
| L["delete"] = "åªé¤ä¸åè¨å®æª" |
| L["delete_confirm"] = "ä½ ç¢ºå®è¦åªé¤æé¸æçè¨å®æªåï¼" |
| L["delete_desc"] = "å¾è³æ庫è£åªé¤ä¸å使ç¨çè¨å®æªï¼ä»¥ç¯ç空éï¼ä¸¦ä¸æ¸ çSavedVariablesæªã" |
| L["delete_sub"] = "å¾è³æ庫è£åªé¤ä¸åè¨å®æªã" |
| L["intro"] = "ä½ å¯ä»¥é¸æä¸åæ´»åçè³æè¨å®æªï¼éæ¨£ä½ çæ¯åè§è²å°±å¯ä»¥ææä¸åçè¨å®å¼ï¼å¯ä»¥çµ¦ä½ çæ件è¨å®å¸¶ä¾æ¥µå¤§çéæ´»æ§ã" |
| L["new"] = "æ°å»º" |
| L["new_sub"] = "æ°å»ºä¸å空çè¨å®æªã" |
| L["profiles"] = "è¨å®æª" |
| L["profiles_sub"] = "管çè¨å®æª" |
| L["reset"] = "éç½®è¨å®æª" |
| L["reset_desc"] = "å°ç¶åçè¨å®æªæ¢å¾©å°å®çé è¨å¼ï¼ç¨æ¼ä½ çè¨å®æªæå£ï¼æè ä½ åªæ¯æ³éä¾çæ æ³ã" |
| L["reset_sub"] = "å°ç¶åçè¨å®æªæ¢å¾©çºé è¨å¼" |
| elseif LOCALE == "zhCN" then |
| L["choose"] = "ç°æçé ç½®æ件" |
| L["choose_desc"] = "ä½ å¯ä»¥éè¿å¨ææ¬æ¡å è¾å ¥ä¸ä¸ªåååç«ä¸ä¸ªæ°çé ç½®æ件ï¼ä¹å¯ä»¥éæ©ä¸ä¸ªå·²ç»åå¨çé ç½®æ件ã" |
| L["choose_sub"] = "ä»å½åå¯ç¨çé ç½®æ件éé¢éæ©ä¸ä¸ªã" |
| L["copy"] = "å¤å¶èª" |
| L["copy_desc"] = "ä»å½åæ个已ä¿åçé ç½®æ件å¤å¶å°å½åæ£ä½¿ç¨çé ç½®æ件ã" |
| -- L["current"] = "Current Profile:" |
| L["default"] = "é»è®¤" |
| L["delete"] = "å é¤ä¸ä¸ªé ç½®æ件" |
| L["delete_confirm"] = "ä½ ç¡®å®è¦å é¤æéæ©çé ç½®æ件ä¹ï¼" |
| L["delete_desc"] = "ä»æ°æ®åºéå é¤ä¸å使ç¨çé ç½®æ件ï¼ä»¥èç空é´ï¼å¹¶ä¸æ¸ çSavedVariablesæ件ã" |
| L["delete_sub"] = "ä»æ°æ®åºéå é¤ä¸ä¸ªé ç½®æ件ã" |
| L["intro"] = "ä½ å¯ä»¥éæ©ä¸ä¸ªæ´»å¨çæ°æ®é ç½®æ件ï¼è¿æ ·ä½ çæ¯ä¸ªè§è²å°±å¯ä»¥æ¥æä¸åç设置å¼ï¼å¯ä»¥ç»ä½ çæ件é 置带æ¥æ大ççµæ´»æ§ã" |
| L["new"] = "æ°å»º" |
| L["new_sub"] = "æ°å»ºä¸ä¸ªç©ºçé ç½®æ件ã" |
| L["profiles"] = "é ç½®æ件" |
| L["profiles_sub"] = "管çé ç½®æ件" |
| L["reset"] = "éç½®é ç½®æ件" |
| L["reset_desc"] = "å°å½åçé ç½®æ件æ¢å¤å°å®çé»è®¤å¼ï¼ç¨äºä½ çé ç½®æ件æåï¼æè ä½ åªæ¯æ³éæ¥çæ åµã" |
| L["reset_sub"] = "å°å½åçé ç½®æ件æ¢å¤ä¸ºé»è®¤å¼" |
| elseif LOCALE == "ruRU" then |
| L["choose"] = "СÑÑеÑÑвÑÑÑие пÑоÑили" |
| L["choose_desc"] = "ÐÑ Ð¼Ð¾Ð¶ÐµÑе ÑоздаÑÑ Ð½Ð¾Ð²Ñй пÑоÑилÑ, Ð²Ð²ÐµÐ´Ñ Ð½Ð°Ð·Ð²Ð°Ð½Ð¸Ðµ в поле ввода, или вÑбÑаÑÑ Ð¾Ð´Ð¸Ð½ из Ñже ÑÑÑеÑÑвÑÑÑÐ¸Ñ Ð¿ÑоÑилей." |
| L["choose_sub"] = "ÐÑÐ±Ð¾Ñ Ð¾Ð´Ð¸Ð½Ð¾Ð³Ð¾ из Ñже доÑÑÑпнÑÑ Ð¿ÑоÑилей" |
| L["copy"] = "СкопиÑоваÑÑ Ð¸Ð·" |
| L["copy_desc"] = "СкопиÑоваÑÑ Ð½Ð°ÑÑÑойки из вÑбÑанного пÑоÑÐ¸Ð»Ñ Ð² акÑивнÑй." |
| -- L["current"] = "Current Profile:" |
| L["default"] = "Ðо ÑмолÑаниÑ" |
| L["delete"] = "УдалиÑÑ Ð¿ÑоÑилÑ" |
| L["delete_confirm"] = "ÐÑ ÑвеÑенÑ, ÑÑо Ð²Ñ Ñ Ð¾ÑиÑе ÑдалиÑÑ Ð²ÑбÑаннÑй пÑоÑилÑ?" |
| L["delete_desc"] = "УдалиÑÑ ÑÑÑеÑÑвÑÑÑий и неиÑполÑзÑемÑй пÑоÑÐ¸Ð»Ñ Ð¸Ð· ÐÐ Ð´Ð»Ñ ÑÐ¾Ñ ÑÐ°Ð½ÐµÐ½Ð¸Ñ Ð¼ÐµÑÑа, и оÑиÑÑиÑÑ SavedVariables Ñайл." |
| L["delete_sub"] = "Удаление пÑоÑÐ¸Ð»Ñ Ð¸Ð· ÐÐ" |
| L["intro"] = "ÐзменÑÑ Ð°ÐºÑивнÑй пÑоÑилÑ, Ð²Ñ Ð¼Ð¾Ð¶ÐµÑе задаÑÑ ÑазлиÑнÑе наÑÑÑойки модиÑикаÑий Ð´Ð»Ñ ÐºÐ°Ð¶Ð´Ð¾Ð³Ð¾ пеÑÑонажа." |
| L["new"] = "ÐовÑй" |
| L["new_sub"] = "СоздаÑÑ Ð½Ð¾Ð²Ñй ÑиÑÑÑй пÑоÑилÑ" |
| L["profiles"] = "ÐÑоÑили" |
| L["profiles_sub"] = "УпÑавление пÑоÑилÑми" |
| L["reset"] = "СбÑÐ¾Ñ Ð¿ÑоÑилÑ" |
| L["reset_desc"] = "ÐÑли ваÑа конÑигÑÑаÑии иÑпоÑÑена или еÑли Ð²Ñ Ñ Ð¾ÑиÑе наÑÑÑоиÑÑ Ð²ÑÑ Ð·Ð°Ð½Ð¾Ð²Ð¾ - ÑбÑоÑÑÑе ÑекÑÑий пÑоÑÐ¸Ð»Ñ Ð½Ð° ÑÑандаÑÑнÑе знаÑениÑ." |
| L["reset_sub"] = "СбÑÐ¾Ñ ÑекÑÑего пÑоÑÐ¸Ð»Ñ Ð½Ð° ÑÑандаÑÑнÑй" |
| elseif LOCALE == "itIT" then |
| L["choose"] = "Profili esistenti" |
| L["choose_desc"] = "Puoi creare un nuovo profilo digitando il nome della casella di testo, oppure scegliendone uno tra i profili gia' esistenti." |
| L["choose_sub"] = "Seleziona uno dei profili disponibili." |
| L["copy"] = "Copia Da" |
| L["copy_desc"] = "Copia le impostazioni da un profilo esistente, nel profilo attivo in questo momento." |
| L["current"] = "Profilo Attivo:" |
| L["default"] = "Standard" |
| L["delete"] = "Cancella un profilo" |
| L["delete_confirm"] = "Sei sicuro di voler cancellare il profilo selezionato?" |
| L["delete_desc"] = "Cancella i profili non utilizzati dal database per risparmiare spazio e mantenere puliti i file di configurazione SavedVariables." |
| L["delete_sub"] = "Cancella un profilo dal Database." |
| L["intro"] = "Puoi cambiare il profilo attivo, in modo da usare impostazioni diverse per ogni personaggio." |
| L["new"] = "Nuovo" |
| L["new_sub"] = "Crea un nuovo profilo vuoto." |
| L["profiles"] = "Profili" |
| L["profiles_sub"] = "Gestisci Profili" |
| L["reset"] = "Reimposta Profilo" |
| L["reset_desc"] = "Riporta il tuo profilo attivo alle sue impostazioni di default, nel caso in cui la tua configurazione si sia corrotta, o semplicemente tu voglia re-inizializzarla." |
| L["reset_sub"] = "Reimposta il profilo ai suoi valori di default." |
| 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", |
| }, |
| current = { |
| order = 11, |
| type = "description", |
| name = function(info) return L["current"] .. " " .. NORMAL_FONT_COLOR_CODE .. info.handler:GetCurrentProfile() .. FONT_COLOR_CODE_CLOSE end, |
| width = "default", |
| }, |
| 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 |
trunk/PVPScan/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> |
trunk/PVPScan/Libs/AceEvent-3.0/AceEvent-3.0.lua
New file
0,0 → 1,126
| --- 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 975 2010-10-23 11:26:18Z nevcairiel $ |
| local MAJOR, MINOR = "AceEvent-3.0", 3 |
| local AceEvent = LibStub:NewLibrary(MAJOR, MINOR) |
| if not AceEvent then return end |
| -- Lua APIs |
| local pairs = pairs |
| 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 be called with the optional `arg` as the first argument (if supplied), and the event name as the second (or first, if no arg was supplied) |
| -- 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 be called with the optional `arg` as the first argument (if supplied), and the event name as the second (or first, if no arg was supplied) |
| -- 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 |
trunk/PVPScan/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> |
trunk/PVPScan/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 878 2009-11-02 18:51:58Z nevcairiel $ |
| 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 |
| -- Lua APIs |
| local tconcat, tostring, select = table.concat, tostring, select |
| local type, pairs, error = type, pairs, error |
| local format, strfind, strsub = string.format, string.find, string.sub |
| local max = math.max |
| -- WoW APIs |
| local _G = _G |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: DEFAULT_CHAT_FRAME, 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 |
trunk/PVPScan/Libs/AceGUI-3.0/AceGUI-3.0.xml
New file
0,0 → 1,28
| <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"/> |
| <!-- Container --> |
| <Script file="widgets\AceGUIContainer-BlizOptionsGroup.lua"/> |
| <Script file="widgets\AceGUIContainer-DropDownGroup.lua"/> |
| <Script file="widgets\AceGUIContainer-Frame.lua"/> |
| <Script file="widgets\AceGUIContainer-InlineGroup.lua"/> |
| <Script file="widgets\AceGUIContainer-ScrollFrame.lua"/> |
| <Script file="widgets\AceGUIContainer-SimpleGroup.lua"/> |
| <Script file="widgets\AceGUIContainer-TabGroup.lua"/> |
| <Script file="widgets\AceGUIContainer-TreeGroup.lua"/> |
| <Script file="widgets\AceGUIContainer-Window.lua"/> |
| <!-- Widgets --> |
| <Script file="widgets\AceGUIWidget-Button.lua"/> |
| <Script file="widgets\AceGUIWidget-CheckBox.lua"/> |
| <Script file="widgets\AceGUIWidget-ColorPicker.lua"/> |
| <Script file="widgets\AceGUIWidget-DropDown.lua"/> |
| <Script file="widgets\AceGUIWidget-DropDown-Items.lua"/> |
| <Script file="widgets\AceGUIWidget-EditBox.lua"/> |
| <Script file="widgets\AceGUIWidget-Heading.lua"/> |
| <Script file="widgets\AceGUIWidget-Icon.lua"/> |
| <Script file="widgets\AceGUIWidget-InteractiveLabel.lua"/> |
| <Script file="widgets\AceGUIWidget-Keybinding.lua"/> |
| <Script file="widgets\AceGUIWidget-Label.lua"/> |
| <Script file="widgets\AceGUIWidget-MultiLineEditBox.lua"/> |
| <Script file="widgets\AceGUIWidget-Slider.lua"/> |
| </Ui> |
trunk/PVPScan/Libs/AceGUI-3.0/AceGUI-3.0.lua
New file
0,0 → 1,813
| --- **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 1102 2013-10-25 14:15:23Z nevcairiel $ |
| local ACEGUI_MAJOR, ACEGUI_MINOR = "AceGUI-3.0", 34 |
| local AceGUI, oldminor = LibStub:NewLibrary(ACEGUI_MAJOR, ACEGUI_MINOR) |
| if not AceGUI then return end -- No upgrade needed |
| -- Lua APIs |
| local tconcat, tremove, tinsert = table.concat, table.remove, table.insert |
| local select, pairs, next, type = select, pairs, next, type |
| local error, assert, loadstring = error, assert, loadstring |
| local setmetatable, rawget, rawset = setmetatable, rawget, rawset |
| local math_max = math.max |
| -- WoW APIs |
| local UIParent = UIParent |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: geterrorhandler, LibStub |
| --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 |
| --[[ |
| 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, ...) |
| return Dispatchers[select("#", ...)](func, ...) |
| end |
| -- Recycling functions |
| local newWidget, delWidget |
| do |
| -- Version Upgrade in Minor 29 |
| -- Internal Storage of the objects changed, from an array table |
| -- to a hash table, and additionally we introduced versioning on |
| -- the widgets which would discard all widgets from a pre-29 version |
| -- anyway, so we just clear the storage now, and don't try to |
| -- convert the storage tables to the new format. |
| -- This should generally not cause *many* widgets to end up in trash, |
| -- since once dialogs are opened, all addons should be loaded already |
| -- and AceGUI should be on the latest version available on the users |
| -- setup. |
| -- -- nevcairiel - Nov 2nd, 2009 |
| if oldminor and oldminor < 29 and AceGUI.objPools then |
| AceGUI.objPools = nil |
| end |
| 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 newWidget(type) |
| if not WidgetRegistry[type] then |
| error("Attempt to instantiate unknown widget type", 2) |
| end |
| if not objPools[type] then |
| objPools[type] = {} |
| end |
| local newObj = next(objPools[type]) |
| if not newObj then |
| newObj = WidgetRegistry[type]() |
| newObj.AceGUIWidgetVersion = WidgetVersions[type] |
| else |
| objPools[type][newObj] = nil |
| -- if the widget is older then the latest, don't even try to reuse it |
| -- just forget about it, and grab a new one. |
| if not newObj.AceGUIWidgetVersion or newObj.AceGUIWidgetVersion < WidgetVersions[type] then |
| return newWidget(type) |
| end |
| end |
| return newObj |
| end |
| -- Releases an instance to the Pool |
| function delWidget(obj,type) |
| if not objPools[type] then |
| objPools[type] = {} |
| end |
| if objPools[type][obj] then |
| error("Attempt to Release Widget that is already released", 2) |
| end |
| objPools[type][obj] = true |
| 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) |
| if WidgetRegistry[type] then |
| local widget = newWidget(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(widget.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 |
| delWidget(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 |
| 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 |
| :OnRelease() - Called when the object is Released, should remove any additional anchors and clear any data |
| :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 WidgetBase = AceGUI.WidgetBase |
| WidgetBase.SetParent = function(self, parent) |
| local frame = self.frame |
| frame:SetParent(nil) |
| frame:SetParent(parent.content) |
| self.parent = parent |
| 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") |
| return widget |
| 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}) |
| return widget |
| 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 |
| --- Return the number of created widgets for this type. |
| -- In contrast to GetNextWidgetNum, the number is not incremented. |
| -- @param type The widget type |
| function AceGUI:GetWidgetCount(type) |
| return self.counts[type] or 0 |
| end |
| --- Return the version of the currently registered widget type. |
| -- @param type The widget type |
| function AceGUI:GetWidgetVersion(type) |
| return WidgetVersions[type] |
| 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 = 1, #children do |
| local child = children[i] |
| local frame = child.frame |
| frame:ClearAllPoints() |
| frame:Show() |
| if i == 1 then |
| frame:SetPoint("TOPLEFT", content) |
| else |
| frame:SetPoint("TOPLEFT", children[i-1].frame, "BOTTOMLEFT") |
| end |
| if child.width == "fill" then |
| child:SetWidth(width) |
| frame:SetPoint("RIGHT", content) |
| if child.DoLayout then |
| child:DoLayout() |
| end |
| elseif child.width == "relative" then |
| child:SetWidth(width * child.relWidth) |
| 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) |
| local layoutrecursionblock = nil |
| local function safelayoutcall(object, func, ...) |
| layoutrecursionblock = true |
| object[func](object, ...) |
| layoutrecursionblock = nil |
| end |
| AceGUI:RegisterLayout("Flow", |
| function(content, children) |
| if layoutrecursionblock then return end |
| --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 = 1, #children do |
| local child = children[i] |
| 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) |
| 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)) |
| frame:SetPoint("TOPLEFT", children[i-1].frame, "TOPRIGHT", 0, frameoffset - lastframeoffset) |
| usedwidth = framewidth + usedwidth |
| end |
| end |
| if child.width == "fill" then |
| safelayoutcall(child, "SetWidth", width) |
| frame:SetPoint("RIGHT", content) |
| usedwidth = 0 |
| rowstart = frame |
| rowstartoffset = frameoffset |
| 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 |
| safelayoutcall(child, "SetWidth", width * child.relWidth) |
| if child.DoLayout then |
| child:DoLayout() |
| end |
| elseif oversize then |
| if width > 1 then |
| frame:SetPoint("RIGHT", content) |
| end |
| end |
| if child.height == "fill" then |
| frame:SetPoint("BOTTOM", content) |
| 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) |
trunk/PVPScan/Libs/AceGUI-3.0/widgets/AceGUIContainer-TreeGroup.lua
New file
0,0 → 1,707
| --[[----------------------------------------------------------------------------- |
| TreeGroup Container |
| Container that uses a tree control to switch between groups. |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "TreeGroup", 36 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local next, pairs, ipairs, assert, type = next, pairs, ipairs, assert, type |
| local math_min, math_max, floor = math.min, math.max, floor |
| local select, tremove, unpack, tconcat = select, table.remove, unpack, table.concat |
| -- WoW APIs |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: GameTooltip, FONT_COLOR_CODE_CLOSE |
| -- 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 |
| local DEFAULT_TREE_WIDTH = 175 |
| local DEFAULT_TREE_SIZABLE = true |
| --[[----------------------------------------------------------------------------- |
| Support functions |
| -------------------------------------------------------------------------------]] |
| 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 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 iconCoords = treeline.iconCoords |
| 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", 8 * level, (level == 1) and 0 or 1) |
| else |
| button.icon:SetTexture(nil) |
| end |
| if iconCoords then |
| button.icon:SetTexCoord(unpack(iconCoords)) |
| else |
| button.icon:SetTexCoord(0, 1, 0, 1) |
| 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 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.iconCoords = v.iconCoords |
| 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 |
| --fire an update after one frame to catch the treeframes height |
| local function FirstFrameUpdate(frame) |
| local self = frame.obj |
| frame:SetScript("OnUpdate", nil) |
| self:RefreshTree() |
| end |
| local function BuildUniqueValue(...) |
| local n = select('#', ...) |
| if n == 1 then |
| return ... |
| else |
| return (...).."\001"..BuildUniqueValue(select(2,...)) |
| end |
| end |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function Expand_OnClick(frame) |
| local button = frame.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 Button_OnClick(frame) |
| local self = frame.obj |
| self:Fire("OnClick", frame.uniquevalue, frame.selected) |
| if not frame.selected then |
| self:SetSelected(frame.uniquevalue) |
| frame.selected = true |
| frame:LockHighlight() |
| self:RefreshTree() |
| end |
| AceGUI:ClearFocus() |
| end |
| local function Button_OnDoubleClick(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 Button_OnEnter(frame) |
| local self = frame.obj |
| self:Fire("OnButtonEnter", frame.uniquevalue, frame) |
| if self.enabletooltips then |
| GameTooltip:SetOwner(frame, "ANCHOR_NONE") |
| GameTooltip:SetPoint("LEFT",frame,"RIGHT") |
| GameTooltip:SetText(frame.text:GetText() or "", 1, .82, 0, 1) |
| GameTooltip:Show() |
| end |
| end |
| local function Button_OnLeave(frame) |
| local self = frame.obj |
| self:Fire("OnButtonLeave", frame.uniquevalue, frame) |
| if self.enabletooltips then |
| GameTooltip:Hide() |
| end |
| end |
| local function OnScrollValueChanged(frame, value) |
| if frame.obj.noupdate then return end |
| local self = frame.obj |
| local status = self.status or self.localstatus |
| status.scrollvalue = floor(value + 0.5) |
| self:RefreshTree() |
| AceGUI:ClearFocus() |
| end |
| local function Tree_OnSizeChanged(frame) |
| frame.obj:RefreshTree() |
| end |
| local function Tree_OnMouseWheel(frame, delta) |
| local self = frame.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 Dragger_OnLeave(frame) |
| frame:SetBackdropColor(1, 1, 1, 0) |
| end |
| local function Dragger_OnEnter(frame) |
| frame:SetBackdropColor(1, 1, 1, 0.8) |
| end |
| local function Dragger_OnMouseDown(frame) |
| local treeframe = frame:GetParent() |
| treeframe:StartSizing("RIGHT") |
| end |
| local function Dragger_OnMouseUp(frame) |
| local treeframe = frame: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 |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:SetTreeWidth(DEFAULT_TREE_WIDTH, DEFAULT_TREE_SIZABLE) |
| self:EnableButtonTooltips(true) |
| end, |
| ["OnRelease"] = function(self) |
| 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, |
| ["EnableButtonTooltips"] = function(self, enable) |
| self.enabletooltips = enable |
| end, |
| ["CreateButton"] = function(self) |
| local num = AceGUI:GetNextWidgetNum("TreeGroupButton") |
| local button = CreateFrame("Button", ("AceGUI30TreeButton%d"):format(num), self.treeframe, "OptionsListButtonTemplate") |
| button.obj = self |
| local icon = button:CreateTexture(nil, "OVERLAY") |
| icon:SetWidth(14) |
| icon:SetHeight(14) |
| button.icon = icon |
| button:SetScript("OnClick",Button_OnClick) |
| button:SetScript("OnDoubleClick", Button_OnDoubleClick) |
| button:SetScript("OnEnter",Button_OnEnter) |
| button:SetScript("OnLeave",Button_OnLeave) |
| button.toggle.button = button |
| button.toggle:SetScript("OnClick",Expand_OnClick) |
| return button |
| end, |
| ["SetStatusTable"] = function(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 status.treesizable == nil then |
| status.treesizable = DEFAULT_TREE_SIZABLE |
| end |
| self:SetTreeWidth(status.treewidth,status.treesizable) |
| self:RefreshTree() |
| end, |
| --sets the tree to be displayed |
| ["SetTree"] = function(self, tree, filter) |
| self.filter = filter |
| if tree then |
| assert(type(tree) == "table") |
| end |
| self.tree = tree |
| self:RefreshTree() |
| end, |
| ["BuildLevel"] = function(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, |
| ["RefreshTree"] = function(self,scrollToSelection) |
| 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 |
| status.scrollToSelection = status.scrollToSelection or scrollToSelection -- needs to be cached in case the control hasn't been drawn yet (code bails out below) |
| self:BuildLevel(tree, 1) |
| local numlines = #lines |
| local maxlines = (floor(((self.treeframe:GetHeight()or 0) - 20 ) / 18)) |
| if maxlines <= 0 then return end |
| local first, last |
| scrollToSelection = status.scrollToSelection |
| status.scrollToSelection = nil |
| 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 |
| end |
| self.noupdate = nil |
| first, last = status.scrollvalue+1, status.scrollvalue + maxlines |
| --show selection? |
| if scrollToSelection and status.selected then |
| local show |
| for i,line in ipairs(lines) do -- find the line number |
| if line.uniquevalue==status.selected then |
| show=i |
| end |
| end |
| if not show then |
| -- selection was deleted or something? |
| elseif show>=first and show<=last then |
| -- all good |
| else |
| -- scrolling needed! |
| if show<first then |
| status.scrollvalue = show-1 |
| else |
| status.scrollvalue = show-maxlines |
| end |
| first, last = status.scrollvalue+1, status.scrollvalue + maxlines |
| end |
| end |
| if self.scrollbar:GetValue() ~= status.scrollvalue then |
| self.scrollbar:SetValue(status.scrollvalue) |
| end |
| 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 buttonnum == 1 then |
| if self.showscroll then |
| button:SetPoint("TOPRIGHT", -22, -10) |
| button:SetPoint("TOPLEFT", 0, -10) |
| else |
| button:SetPoint("TOPRIGHT", 0, -10) |
| button:SetPoint("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, |
| ["SetSelected"] = function(self, value) |
| local status = self.status or self.localstatus |
| if status.selected ~= value then |
| status.selected = value |
| self:Fire("OnGroupSelected", value) |
| end |
| end, |
| ["Select"] = function(self, uniquevalue, ...) |
| self.filter = false |
| local status = self.status or self.localstatus |
| local groups = status.groups |
| local path = {...} |
| for i = 1, #path do |
| groups[tconcat(path, "\001", 1, i)] = true |
| end |
| status.selected = uniquevalue |
| self:RefreshTree(true) |
| self:Fire("OnGroupSelected", uniquevalue) |
| end, |
| ["SelectByPath"] = function(self, ...) |
| self:Select(BuildUniqueValue(...), ...) |
| end, |
| ["SelectByValue"] = function(self, uniquevalue) |
| self:Select(uniquevalue, ("\001"):split(uniquevalue)) |
| end, |
| ["ShowScroll"] = function(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, |
| ["OnWidthSet"] = function(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, |
| ["OnHeightSet"] = function(self, height) |
| local content = self.content |
| local contentheight = height - 20 |
| if contentheight < 0 then |
| contentheight = 0 |
| end |
| content:SetHeight(contentheight) |
| content.height = contentheight |
| end, |
| ["SetTreeWidth"] = function(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, |
| ["GetTreeWidth"] = function(self) |
| local status = self.status or self.localstatus |
| return status.treewidth or DEFAULT_TREE_WIDTH |
| end, |
| ["LayoutFinished"] = function(self, width, height) |
| if self.noAutoHeight then return end |
| self:SetHeight((height or 0) + 20) |
| end |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| 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 Constructor() |
| local num = AceGUI:GetNextWidgetNum(Type) |
| local frame = CreateFrame("Frame", nil, UIParent) |
| local treeframe = CreateFrame("Frame", nil, frame) |
| treeframe:SetPoint("TOPLEFT") |
| treeframe:SetPoint("BOTTOMLEFT") |
| treeframe:SetWidth(DEFAULT_TREE_WIDTH) |
| treeframe:EnableMouseWheel(true) |
| 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) |
| treeframe:SetScript("OnUpdate", FirstFrameUpdate) |
| treeframe:SetScript("OnSizeChanged", Tree_OnSizeChanged) |
| treeframe:SetScript("OnMouseWheel", Tree_OnMouseWheel) |
| 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("OnEnter", Dragger_OnEnter) |
| dragger:SetScript("OnLeave", Dragger_OnLeave) |
| dragger:SetScript("OnMouseDown", Dragger_OnMouseDown) |
| dragger:SetScript("OnMouseUp", Dragger_OnMouseUp) |
| local scrollbar = CreateFrame("Slider", ("AceConfigDialogTreeGroup%dScrollBar"):format(num), treeframe, "UIPanelScrollBarTemplate") |
| scrollbar:SetScript("OnValueChanged", nil) |
| scrollbar:SetPoint("TOPRIGHT", -10, -26) |
| scrollbar:SetPoint("BOTTOMRIGHT", -10, 26) |
| scrollbar:SetMinMaxValues(0,0) |
| scrollbar:SetValueStep(1) |
| scrollbar:SetValue(0) |
| scrollbar:SetWidth(16) |
| scrollbar:SetScript("OnValueChanged", OnScrollValueChanged) |
| local scrollbg = scrollbar:CreateTexture(nil, "BACKGROUND") |
| scrollbg:SetAllPoints(scrollbar) |
| scrollbg:SetTexture(0,0,0,0.4) |
| local border = CreateFrame("Frame",nil,frame) |
| border:SetPoint("TOPLEFT", treeframe, "TOPRIGHT") |
| border:SetPoint("BOTTOMRIGHT") |
| 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) |
| content:SetPoint("TOPLEFT", 10, -10) |
| content:SetPoint("BOTTOMRIGHT", -10, 10) |
| local widget = { |
| frame = frame, |
| lines = {}, |
| levels = {}, |
| buttons = {}, |
| hasChildren = {}, |
| localstatus = { groups = {}, scrollvalue = 0 }, |
| filter = false, |
| treeframe = treeframe, |
| dragger = dragger, |
| scrollbar = scrollbar, |
| border = border, |
| content = content, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| treeframe.obj, dragger.obj, scrollbar.obj = widget, widget, widget |
| return AceGUI:RegisterAsContainer(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
trunk/PVPScan/Libs/AceGUI-3.0/widgets/AceGUIWidget-Button.lua
New file
0,0 → 1,109
| --[[----------------------------------------------------------------------------- |
| Button Widget |
| Graphical Button. |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "Button", 23 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local pairs = pairs |
| -- WoW APIs |
| local _G = _G |
| local PlaySound, CreateFrame, UIParent = PlaySound, CreateFrame, UIParent |
| local wowMoP |
| do |
| local _, _, _, interface = GetBuildInfo() |
| wowMoP = (interface >= 50000) |
| end |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function Button_OnClick(frame, ...) |
| AceGUI:ClearFocus() |
| PlaySound("igMainMenuOption") |
| frame.obj:Fire("OnClick", ...) |
| end |
| local function Control_OnEnter(frame) |
| frame.obj:Fire("OnEnter") |
| end |
| local function Control_OnLeave(frame) |
| frame.obj:Fire("OnLeave") |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| -- restore default values |
| self:SetHeight(24) |
| self:SetWidth(200) |
| self:SetDisabled(false) |
| self:SetAutoWidth(false) |
| self:SetText() |
| end, |
| -- ["OnRelease"] = nil, |
| ["SetText"] = function(self, text) |
| self.text:SetText(text) |
| if self.autoWidth then |
| self:SetWidth(self.text:GetStringWidth() + 30) |
| end |
| end, |
| ["SetAutoWidth"] = function(self, autoWidth) |
| self.autoWidth = autoWidth |
| if self.autoWidth then |
| self:SetWidth(self.text:GetStringWidth() + 30) |
| end |
| end, |
| ["SetDisabled"] = function(self, disabled) |
| self.disabled = disabled |
| if disabled then |
| self.frame:Disable() |
| else |
| self.frame:Enable() |
| end |
| end |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local function Constructor() |
| local name = "AceGUI30Button" .. AceGUI:GetNextWidgetNum(Type) |
| local frame = CreateFrame("Button", name, UIParent, wowMoP and "UIPanelButtonTemplate" or "UIPanelButtonTemplate2") |
| frame:Hide() |
| frame:EnableMouse(true) |
| frame:SetScript("OnClick", Button_OnClick) |
| frame:SetScript("OnEnter", Control_OnEnter) |
| frame:SetScript("OnLeave", Control_OnLeave) |
| local text = frame:GetFontString() |
| text:ClearAllPoints() |
| text:SetPoint("TOPLEFT", 15, -1) |
| text:SetPoint("BOTTOMRIGHT", -15, 1) |
| text:SetJustifyV("MIDDLE") |
| local widget = { |
| text = text, |
| frame = frame, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| return AceGUI:RegisterAsWidget(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
trunk/PVPScan/Libs/AceGUI-3.0/widgets/AceGUIWidget-DropDown-Items.lua
New file
0,0 → 1,471
| --[[ $Id: AceGUIWidget-DropDown-Items.lua 996 2010-12-01 18:34:17Z nevcairiel $ ]]-- |
| local AceGUI = LibStub("AceGUI-3.0") |
| -- Lua APIs |
| local select, assert = select, assert |
| -- WoW APIs |
| local PlaySound = PlaySound |
| local CreateFrame = CreateFrame |
| 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 |
| -- Register a dummy LibStub library to retrieve the ItemBase, so other addons can use it. |
| local IBLib = LibStub:NewLibrary("AceGUI-3.0-DropDown-ItemBase", ItemBase.version) |
| if IBLib then |
| IBLib.GetItemBase = function() return ItemBase end |
| 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 = 3 |
| 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 |
| if self.value then |
| PlaySound("igMainMenuOptionCheckBoxOn") |
| else |
| PlaySound("igMainMenuOptionCheckBoxOff") |
| end |
| 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 |
trunk/PVPScan/Libs/AceGUI-3.0/widgets/AceGUIWidget-ColorPicker.lua
New file
0,0 → 1,187
| --[[----------------------------------------------------------------------------- |
| ColorPicker Widget |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "ColorPicker", 21 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local pairs = pairs |
| -- WoW APIs |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: ShowUIPanel, HideUIPanel, ColorPickerFrame, OpacitySliderFrame |
| --[[----------------------------------------------------------------------------- |
| Support functions |
| -------------------------------------------------------------------------------]] |
| 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 |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function Control_OnEnter(frame) |
| frame.obj:Fire("OnEnter") |
| end |
| local function Control_OnLeave(frame) |
| frame.obj:Fire("OnLeave") |
| end |
| local function ColorSwatch_OnClick(frame) |
| HideUIPanel(ColorPickerFrame) |
| local self = frame.obj |
| if not self.disabled then |
| ColorPickerFrame:SetFrameStrata("FULLSCREEN_DIALOG") |
| ColorPickerFrame:SetClampedToScreen(true) |
| 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 |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:SetHeight(24) |
| self:SetWidth(200) |
| self:SetHasAlpha(false) |
| self:SetColor(0, 0, 0, 1) |
| self:SetDisabled(nil) |
| self:SetLabel(nil) |
| end, |
| -- ["OnRelease"] = nil, |
| ["SetLabel"] = function(self, text) |
| self.text:SetText(text) |
| end, |
| ["SetColor"] = function(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, |
| ["SetHasAlpha"] = function(self, HasAlpha) |
| self.HasAlpha = HasAlpha |
| end, |
| ["SetDisabled"] = function(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 |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local function Constructor() |
| local frame = CreateFrame("Button", nil, UIParent) |
| frame:Hide() |
| frame:EnableMouse(true) |
| frame:SetScript("OnEnter", Control_OnEnter) |
| frame:SetScript("OnLeave", Control_OnLeave) |
| frame:SetScript("OnClick", ColorSwatch_OnClick) |
| local colorSwatch = frame:CreateTexture(nil, "OVERLAY") |
| colorSwatch:SetWidth(19) |
| colorSwatch:SetHeight(19) |
| colorSwatch:SetTexture("Interface\\ChatFrame\\ChatFrameColorSwatch") |
| colorSwatch:SetPoint("LEFT") |
| local texture = frame:CreateTexture(nil, "BACKGROUND") |
| texture:SetWidth(16) |
| texture:SetHeight(16) |
| texture:SetTexture(1, 1, 1) |
| texture:SetPoint("CENTER", colorSwatch) |
| texture:Show() |
| local checkers = frame:CreateTexture(nil, "BACKGROUND") |
| checkers:SetWidth(14) |
| checkers:SetHeight(14) |
| checkers:SetTexture("Tileset\\Generic\\Checkers") |
| checkers:SetTexCoord(.25, 0, 0.5, .25) |
| checkers:SetDesaturated(true) |
| checkers:SetVertexColor(1, 1, 1, 0.75) |
| checkers:SetPoint("CENTER", colorSwatch) |
| checkers:Show() |
| local text = frame:CreateFontString(nil,"OVERLAY","GameFontHighlight") |
| text:SetHeight(24) |
| text:SetJustifyH("LEFT") |
| text:SetTextColor(1, 1, 1) |
| text:SetPoint("LEFT", colorSwatch, "RIGHT", 2, 0) |
| text:SetPoint("RIGHT") |
| --local highlight = frame:CreateTexture(nil, "HIGHLIGHT") |
| --highlight:SetTexture("Interface\\QuestFrame\\UI-QuestTitleHighlight") |
| --highlight:SetBlendMode("ADD") |
| --highlight:SetAllPoints(frame) |
| local widget = { |
| colorSwatch = colorSwatch, |
| text = text, |
| frame = frame, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| return AceGUI:RegisterAsWidget(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
trunk/PVPScan/Libs/AceGUI-3.0/widgets/AceGUIWidget-InteractiveLabel.lua
New file
0,0 → 1,101
| --[[----------------------------------------------------------------------------- |
| InteractiveLabel Widget |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "InteractiveLabel", 20 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local select, pairs = select, pairs |
| -- WoW APIs |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: GameFontHighlightSmall |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function Control_OnEnter(frame) |
| frame.obj:Fire("OnEnter") |
| end |
| local function Control_OnLeave(frame) |
| frame.obj:Fire("OnLeave") |
| end |
| local function Label_OnClick(frame, button) |
| frame.obj:Fire("OnClick", button) |
| AceGUI:ClearFocus() |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:LabelOnAcquire() |
| self:SetHighlight() |
| self:SetHighlightTexCoord() |
| self:SetDisabled(false) |
| end, |
| -- ["OnRelease"] = nil, |
| ["SetHighlight"] = function(self, ...) |
| self.highlight:SetTexture(...) |
| end, |
| ["SetHighlightTexCoord"] = function(self, ...) |
| local c = select("#", ...) |
| if c == 4 or c == 8 then |
| self.highlight:SetTexCoord(...) |
| else |
| self.highlight:SetTexCoord(0, 1, 0, 1) |
| end |
| end, |
| ["SetDisabled"] = function(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 |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local function Constructor() |
| -- create a Label type that we will hijack |
| local label = AceGUI:Create("Label") |
| local frame = label.frame |
| frame:EnableMouse(true) |
| frame:SetScript("OnEnter", Control_OnEnter) |
| frame:SetScript("OnLeave", Control_OnLeave) |
| frame:SetScript("OnMouseDown", Label_OnClick) |
| local highlight = frame:CreateTexture(nil, "HIGHLIGHT") |
| highlight:SetTexture(nil) |
| highlight:SetAllPoints() |
| highlight:SetBlendMode("ADD") |
| label.highlight = highlight |
| label.type = Type |
| label.LabelOnAcquire = label.OnAcquire |
| for method, func in pairs(methods) do |
| label[method] = func |
| end |
| return label |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
trunk/PVPScan/Libs/AceGUI-3.0/widgets/AceGUIWidget-Label.lua
New file
0,0 → 1,166
| --[[----------------------------------------------------------------------------- |
| Label Widget |
| Displays text and optionally an icon. |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "Label", 23 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local max, select, pairs = math.max, select, pairs |
| -- WoW APIs |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: GameFontHighlightSmall |
| --[[----------------------------------------------------------------------------- |
| Support functions |
| -------------------------------------------------------------------------------]] |
| local function UpdateImageAnchor(self) |
| if self.resizing then return end |
| local frame = self.frame |
| local width = frame.width or frame:GetWidth() or 0 |
| local image = self.image |
| local label = self.label |
| 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") |
| label:SetPoint("TOP", image, "BOTTOM") |
| label:SetPoint("LEFT") |
| label:SetWidth(width) |
| height = image:GetHeight() + label:GetHeight() |
| else |
| -- image on the left |
| image:SetPoint("TOPLEFT") |
| if image:GetHeight() > label:GetHeight() then |
| label:SetPoint("LEFT", image, "RIGHT", 4, 0) |
| else |
| label:SetPoint("TOPLEFT", image, "TOPRIGHT", 4, 0) |
| end |
| label:SetWidth(width - imagewidth - 4) |
| height = max(image:GetHeight(), label:GetHeight()) |
| end |
| else |
| -- no image shown |
| label:SetPoint("TOPLEFT") |
| label:SetWidth(width) |
| height = label:GetHeight() |
| end |
| self.resizing = true |
| frame:SetHeight(height) |
| frame.height = height |
| self.resizing = nil |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| -- set the flag to stop constant size updates |
| self.resizing = true |
| -- height is set dynamically by the text and image size |
| self:SetWidth(200) |
| self:SetText() |
| self:SetImage(nil) |
| self:SetImageSize(16, 16) |
| self:SetColor() |
| self:SetFontObject() |
| -- reset the flag |
| self.resizing = nil |
| -- run the update explicitly |
| UpdateImageAnchor(self) |
| end, |
| -- ["OnRelease"] = nil, |
| ["OnWidthSet"] = function(self, width) |
| UpdateImageAnchor(self) |
| end, |
| ["SetText"] = function(self, text) |
| self.label:SetText(text) |
| UpdateImageAnchor(self) |
| end, |
| ["SetColor"] = function(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, |
| ["SetImage"] = function(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(...) |
| else |
| image:SetTexCoord(0, 1, 0, 1) |
| end |
| else |
| self.imageshown = nil |
| end |
| UpdateImageAnchor(self) |
| end, |
| ["SetFont"] = function(self, font, height, flags) |
| self.label:SetFont(font, height, flags) |
| end, |
| ["SetFontObject"] = function(self, font) |
| self:SetFont((font or GameFontHighlightSmall):GetFont()) |
| end, |
| ["SetImageSize"] = function(self, width, height) |
| self.image:SetWidth(width) |
| self.image:SetHeight(height) |
| UpdateImageAnchor(self) |
| end, |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local function Constructor() |
| local frame = CreateFrame("Frame", nil, UIParent) |
| frame:Hide() |
| local label = frame:CreateFontString(nil, "BACKGROUND", "GameFontHighlightSmall") |
| label:SetJustifyH("LEFT") |
| label:SetJustifyV("TOP") |
| local image = frame:CreateTexture(nil, "BACKGROUND") |
| -- create widget |
| local widget = { |
| label = label, |
| image = image, |
| frame = frame, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| return AceGUI:RegisterAsWidget(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
trunk/PVPScan/Libs/AceGUI-3.0/widgets/AceGUIWidget-MultiLineEditBox.lua
New file
0,0 → 1,368
| local Type, Version = "MultiLineEditBox", 27 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local pairs = pairs |
| -- WoW APIs |
| local GetCursorInfo, GetSpellInfo, ClearCursor = GetCursorInfo, GetSpellInfo, ClearCursor |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| local _G = _G |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: ACCEPT, ChatFontNormal |
| local wowMoP |
| do |
| local _, _, _, interface = GetBuildInfo() |
| wowMoP = (interface >= 50000) |
| end |
| --[[----------------------------------------------------------------------------- |
| Support functions |
| -------------------------------------------------------------------------------]] |
| if not AceGUIMultiLineEditBoxInsertLink then |
| -- upgradeable hook |
| hooksecurefunc("ChatEdit_InsertLink", function(...) return _G.AceGUIMultiLineEditBoxInsertLink(...) end) |
| end |
| function _G.AceGUIMultiLineEditBoxInsertLink(text) |
| for i = 1, AceGUI:GetWidgetCount(Type) do |
| local editbox = _G[("MultiLineEditBox%uEdit"):format(i)] |
| if editbox and editbox:IsVisible() and editbox:HasFocus() then |
| editbox:Insert(text) |
| return true |
| end |
| end |
| end |
| local function Layout(self) |
| self:SetHeight(self.numlines * 14 + (self.disablebutton and 19 or 41) + self.labelHeight) |
| if self.labelHeight == 0 then |
| self.scrollBar:SetPoint("TOP", self.frame, "TOP", 0, -23) |
| else |
| self.scrollBar:SetPoint("TOP", self.label, "BOTTOM", 0, -19) |
| end |
| if self.disablebutton then |
| self.scrollBar:SetPoint("BOTTOM", self.frame, "BOTTOM", 0, 21) |
| self.scrollBG:SetPoint("BOTTOMLEFT", 0, 4) |
| else |
| self.scrollBar:SetPoint("BOTTOM", self.button, "TOP", 0, 18) |
| self.scrollBG:SetPoint("BOTTOMLEFT", self.button, "TOPLEFT") |
| end |
| end |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function OnClick(self) -- Button |
| self = self.obj |
| self.editBox:ClearFocus() |
| if not self:Fire("OnEnterPressed", self.editBox:GetText()) then |
| self.button:Disable() |
| end |
| end |
| local function OnCursorChanged(self, _, y, _, cursorHeight) -- EditBox |
| self, y = self.obj.scrollFrame, -y |
| local offset = self:GetVerticalScroll() |
| if y < offset then |
| self:SetVerticalScroll(y) |
| else |
| y = y + cursorHeight - self:GetHeight() |
| if y > offset then |
| self:SetVerticalScroll(y) |
| end |
| end |
| end |
| local function OnEditFocusLost(self) -- EditBox |
| self:HighlightText(0, 0) |
| self.obj:Fire("OnEditFocusLost") |
| end |
| local function OnEnter(self) -- EditBox / ScrollFrame |
| self = self.obj |
| if not self.entered then |
| self.entered = true |
| self:Fire("OnEnter") |
| end |
| end |
| local function OnLeave(self) -- EditBox / ScrollFrame |
| self = self.obj |
| if self.entered then |
| self.entered = nil |
| self:Fire("OnLeave") |
| end |
| end |
| local function OnMouseUp(self) -- ScrollFrame |
| self = self.obj.editBox |
| self:SetFocus() |
| self:SetCursorPosition(self:GetNumLetters()) |
| end |
| local function OnReceiveDrag(self) -- EditBox / ScrollFrame |
| local type, id, info = GetCursorInfo() |
| if type == "spell" then |
| info = GetSpellInfo(id, info) |
| elseif type ~= "item" then |
| return |
| end |
| ClearCursor() |
| self = self.obj |
| local editBox = self.editBox |
| if not editBox:HasFocus() then |
| editBox:SetFocus() |
| editBox:SetCursorPosition(editBox:GetNumLetters()) |
| end |
| editBox:Insert(info) |
| self.button:Enable() |
| end |
| local function OnSizeChanged(self, width, height) -- ScrollFrame |
| self.obj.editBox:SetWidth(width) |
| end |
| local function OnTextChanged(self, userInput) -- EditBox |
| if userInput then |
| self = self.obj |
| self:Fire("OnTextChanged", self.editBox:GetText()) |
| self.button:Enable() |
| end |
| end |
| local function OnTextSet(self) -- EditBox |
| self:HighlightText(0, 0) |
| self:SetCursorPosition(self:GetNumLetters()) |
| self:SetCursorPosition(0) |
| self.obj.button:Disable() |
| end |
| local function OnVerticalScroll(self, offset) -- ScrollFrame |
| local editBox = self.obj.editBox |
| editBox:SetHitRectInsets(0, 0, offset, editBox:GetHeight() - offset - self:GetHeight()) |
| end |
| local function OnShowFocus(frame) |
| frame.obj.editBox:SetFocus() |
| frame:SetScript("OnShow", nil) |
| end |
| local function OnEditFocusGained(frame) |
| AceGUI:SetFocus(frame.obj) |
| frame.obj:Fire("OnEditFocusGained") |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self.editBox:SetText("") |
| self:SetDisabled(false) |
| self:SetWidth(200) |
| self:DisableButton(false) |
| self:SetNumLines() |
| self.entered = nil |
| self:SetMaxLetters(0) |
| end, |
| ["OnRelease"] = function(self) |
| self:ClearFocus() |
| end, |
| ["SetDisabled"] = function(self, disabled) |
| local editBox = self.editBox |
| if disabled then |
| editBox:ClearFocus() |
| editBox:EnableMouse(false) |
| editBox:SetTextColor(0.5, 0.5, 0.5) |
| self.label:SetTextColor(0.5, 0.5, 0.5) |
| self.scrollFrame:EnableMouse(false) |
| self.button:Disable() |
| else |
| editBox:EnableMouse(true) |
| editBox:SetTextColor(1, 1, 1) |
| self.label:SetTextColor(1, 0.82, 0) |
| self.scrollFrame:EnableMouse(true) |
| end |
| end, |
| ["SetLabel"] = function(self, text) |
| if text and text ~= "" then |
| self.label:SetText(text) |
| if self.labelHeight ~= 10 then |
| self.labelHeight = 10 |
| self.label:Show() |
| end |
| elseif self.labelHeight ~= 0 then |
| self.labelHeight = 0 |
| self.label:Hide() |
| end |
| Layout(self) |
| end, |
| ["SetNumLines"] = function(self, value) |
| if not value or value < 4 then |
| value = 4 |
| end |
| self.numlines = value |
| Layout(self) |
| end, |
| ["SetText"] = function(self, text) |
| self.editBox:SetText(text) |
| end, |
| ["GetText"] = function(self) |
| return self.editBox:GetText() |
| end, |
| ["SetMaxLetters"] = function (self, num) |
| self.editBox:SetMaxLetters(num or 0) |
| end, |
| ["DisableButton"] = function(self, disabled) |
| self.disablebutton = disabled |
| if disabled then |
| self.button:Hide() |
| else |
| self.button:Show() |
| end |
| Layout(self) |
| end, |
| ["ClearFocus"] = function(self) |
| self.editBox:ClearFocus() |
| self.frame:SetScript("OnShow", nil) |
| end, |
| ["SetFocus"] = function(self) |
| self.editBox:SetFocus() |
| if not self.frame:IsShown() then |
| self.frame:SetScript("OnShow", OnShowFocus) |
| end |
| end, |
| ["GetCursorPosition"] = function(self) |
| return self.editBox:GetCursorPosition() |
| end, |
| ["SetCursorPosition"] = function(self, ...) |
| return self.editBox:SetCursorPosition(...) |
| end, |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local backdrop = { |
| bgFile = [[Interface\Tooltips\UI-Tooltip-Background]], |
| edgeFile = [[Interface\Tooltips\UI-Tooltip-Border]], edgeSize = 16, |
| insets = { left = 4, right = 3, top = 4, bottom = 3 } |
| } |
| local function Constructor() |
| local frame = CreateFrame("Frame", nil, UIParent) |
| frame:Hide() |
| local widgetNum = AceGUI:GetNextWidgetNum(Type) |
| local label = frame:CreateFontString(nil, "OVERLAY", "GameFontNormalSmall") |
| label:SetPoint("TOPLEFT", frame, "TOPLEFT", 0, -4) |
| label:SetPoint("TOPRIGHT", frame, "TOPRIGHT", 0, -4) |
| label:SetJustifyH("LEFT") |
| label:SetText(ACCEPT) |
| label:SetHeight(10) |
| local button = CreateFrame("Button", ("%s%dButton"):format(Type, widgetNum), frame, wowMoP and "UIPanelButtonTemplate" or "UIPanelButtonTemplate2") |
| button:SetPoint("BOTTOMLEFT", 0, 4) |
| button:SetHeight(22) |
| button:SetWidth(label:GetStringWidth() + 24) |
| button:SetText(ACCEPT) |
| button:SetScript("OnClick", OnClick) |
| button:Disable() |
| local text = button:GetFontString() |
| text:ClearAllPoints() |
| text:SetPoint("TOPLEFT", button, "TOPLEFT", 5, -5) |
| text:SetPoint("BOTTOMRIGHT", button, "BOTTOMRIGHT", -5, 1) |
| text:SetJustifyV("MIDDLE") |
| local scrollBG = CreateFrame("Frame", nil, frame) |
| scrollBG:SetBackdrop(backdrop) |
| scrollBG:SetBackdropColor(0, 0, 0) |
| scrollBG:SetBackdropBorderColor(0.4, 0.4, 0.4) |
| local scrollFrame = CreateFrame("ScrollFrame", ("%s%dScrollFrame"):format(Type, widgetNum), frame, "UIPanelScrollFrameTemplate") |
| local scrollBar = _G[scrollFrame:GetName() .. "ScrollBar"] |
| scrollBar:ClearAllPoints() |
| scrollBar:SetPoint("TOP", label, "BOTTOM", 0, -19) |
| scrollBar:SetPoint("BOTTOM", button, "TOP", 0, 18) |
| scrollBar:SetPoint("RIGHT", frame, "RIGHT") |
| scrollBG:SetPoint("TOPRIGHT", scrollBar, "TOPLEFT", 0, 19) |
| scrollBG:SetPoint("BOTTOMLEFT", button, "TOPLEFT") |
| scrollFrame:SetPoint("TOPLEFT", scrollBG, "TOPLEFT", 5, -6) |
| scrollFrame:SetPoint("BOTTOMRIGHT", scrollBG, "BOTTOMRIGHT", -4, 4) |
| scrollFrame:SetScript("OnEnter", OnEnter) |
| scrollFrame:SetScript("OnLeave", OnLeave) |
| scrollFrame:SetScript("OnMouseUp", OnMouseUp) |
| scrollFrame:SetScript("OnReceiveDrag", OnReceiveDrag) |
| scrollFrame:SetScript("OnSizeChanged", OnSizeChanged) |
| scrollFrame:HookScript("OnVerticalScroll", OnVerticalScroll) |
| local editBox = CreateFrame("EditBox", ("%s%dEdit"):format(Type, widgetNum), scrollFrame) |
| editBox:SetAllPoints() |
| editBox:SetFontObject(ChatFontNormal) |
| editBox:SetMultiLine(true) |
| editBox:EnableMouse(true) |
| editBox:SetAutoFocus(false) |
| editBox:SetCountInvisibleLetters(false) |
| editBox:SetScript("OnCursorChanged", OnCursorChanged) |
| editBox:SetScript("OnEditFocusLost", OnEditFocusLost) |
| editBox:SetScript("OnEnter", OnEnter) |
| editBox:SetScript("OnEscapePressed", editBox.ClearFocus) |
| editBox:SetScript("OnLeave", OnLeave) |
| editBox:SetScript("OnMouseDown", OnReceiveDrag) |
| editBox:SetScript("OnReceiveDrag", OnReceiveDrag) |
| editBox:SetScript("OnTextChanged", OnTextChanged) |
| editBox:SetScript("OnTextSet", OnTextSet) |
| editBox:SetScript("OnEditFocusGained", OnEditFocusGained) |
| scrollFrame:SetScrollChild(editBox) |
| local widget = { |
| button = button, |
| editBox = editBox, |
| frame = frame, |
| label = label, |
| labelHeight = 10, |
| numlines = 4, |
| scrollBar = scrollBar, |
| scrollBG = scrollBG, |
| scrollFrame = scrollFrame, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| button.obj, editBox.obj, scrollFrame.obj = widget, widget, widget |
| return AceGUI:RegisterAsWidget(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
trunk/PVPScan/Libs/AceGUI-3.0/widgets/AceGUIWidget-Slider.lua
New file
0,0 → 1,285
| --[[----------------------------------------------------------------------------- |
| Slider Widget |
| Graphical Slider, like, for Range values. |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "Slider", 21 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local min, max, floor = math.min, math.max, math.floor |
| local tonumber, pairs = tonumber, pairs |
| -- WoW APIs |
| local PlaySound = PlaySound |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: GameFontHighlightSmall |
| --[[----------------------------------------------------------------------------- |
| Support functions |
| -------------------------------------------------------------------------------]] |
| local function UpdateText(self) |
| local value = self.value or 0 |
| if self.ispercent then |
| self.editbox:SetText(("%s%%"):format(floor(value * 1000 + 0.5) / 10)) |
| else |
| self.editbox:SetText(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 |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function Control_OnEnter(frame) |
| frame.obj:Fire("OnEnter") |
| end |
| local function Control_OnLeave(frame) |
| frame.obj:Fire("OnLeave") |
| end |
| local function Frame_OnMouseDown(frame) |
| frame.obj.slider:EnableMouseWheel(true) |
| AceGUI:ClearFocus() |
| end |
| local function Slider_OnValueChanged(frame) |
| local self = frame.obj |
| if not frame.setup then |
| local newvalue = frame:GetValue() |
| if self.step and self.step > 0 then |
| local min_value = self.min or 0 |
| newvalue = floor((newvalue - min_value) / self.step + 0.5) * self.step + min_value |
| end |
| if newvalue ~= self.value and not self.disabled then |
| self.value = newvalue |
| self:Fire("OnValueChanged", newvalue) |
| end |
| if self.value then |
| UpdateText(self) |
| end |
| end |
| end |
| local function Slider_OnMouseUp(frame) |
| local self = frame.obj |
| self:Fire("OnMouseUp", self.value) |
| end |
| local function Slider_OnMouseWheel(frame, v) |
| local self = frame.obj |
| if not self.disabled then |
| local value = self.value |
| if v > 0 then |
| value = min(value + (self.step or 1), self.max) |
| else |
| value = max(value - (self.step or 1), self.min) |
| end |
| self.slider:SetValue(value) |
| end |
| end |
| local function EditBox_OnEscapePressed(frame) |
| frame:ClearFocus() |
| end |
| local function EditBox_OnEnterPressed(frame) |
| local self = frame.obj |
| local value = frame:GetText() |
| if self.ispercent then |
| value = value:gsub('%%', '') |
| value = tonumber(value) / 100 |
| else |
| value = tonumber(value) |
| end |
| if value then |
| PlaySound("igMainMenuOptionCheckBoxOn") |
| self.slider:SetValue(value) |
| self:Fire("OnMouseUp", value) |
| end |
| end |
| local function EditBox_OnEnter(frame) |
| frame:SetBackdropBorderColor(0.5, 0.5, 0.5, 1) |
| end |
| local function EditBox_OnLeave(frame) |
| frame:SetBackdropBorderColor(0.3, 0.3, 0.3, 0.8) |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:SetWidth(200) |
| self:SetHeight(44) |
| self:SetDisabled(false) |
| self:SetIsPercent(nil) |
| self:SetSliderValues(0,100,1) |
| self:SetValue(0) |
| self.slider:EnableMouseWheel(false) |
| end, |
| -- ["OnRelease"] = nil, |
| ["SetDisabled"] = function(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, |
| ["SetValue"] = function(self, value) |
| self.slider.setup = true |
| self.slider:SetValue(value) |
| self.value = value |
| UpdateText(self) |
| self.slider.setup = nil |
| end, |
| ["GetValue"] = function(self) |
| return self.value |
| end, |
| ["SetLabel"] = function(self, text) |
| self.label:SetText(text) |
| end, |
| ["SetSliderValues"] = function(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, |
| ["SetIsPercent"] = function(self, value) |
| self.ispercent = value |
| UpdateLabels(self) |
| UpdateText(self) |
| end |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| 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 ManualBackdrop = { |
| bgFile = "Interface\\ChatFrame\\ChatFrameBackground", |
| edgeFile = "Interface\\ChatFrame\\ChatFrameBackground", |
| tile = true, edgeSize = 1, tileSize = 5, |
| } |
| local function Constructor() |
| local frame = CreateFrame("Frame", nil, UIParent) |
| frame:EnableMouse(true) |
| frame:SetScript("OnMouseDown", Frame_OnMouseDown) |
| local label = frame:CreateFontString(nil, "OVERLAY", "GameFontNormal") |
| label:SetPoint("TOPLEFT") |
| label:SetPoint("TOPRIGHT") |
| label:SetJustifyH("CENTER") |
| label:SetHeight(15) |
| local slider = CreateFrame("Slider", nil, frame) |
| slider:SetOrientation("HORIZONTAL") |
| slider:SetHeight(15) |
| slider:SetHitRectInsets(0, 0, -10, 0) |
| slider:SetBackdrop(SliderBackdrop) |
| slider:SetThumbTexture("Interface\\Buttons\\UI-SliderBar-Button-Horizontal") |
| slider:SetPoint("TOP", label, "BOTTOM") |
| slider:SetPoint("LEFT", 3, 0) |
| slider:SetPoint("RIGHT", -3, 0) |
| slider:SetValue(0) |
| slider:SetScript("OnValueChanged",Slider_OnValueChanged) |
| slider:SetScript("OnEnter", Control_OnEnter) |
| slider:SetScript("OnLeave", Control_OnLeave) |
| slider:SetScript("OnMouseUp", Slider_OnMouseUp) |
| slider:SetScript("OnMouseWheel", Slider_OnMouseWheel) |
| local lowtext = slider:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall") |
| lowtext:SetPoint("TOPLEFT", slider, "BOTTOMLEFT", 2, 3) |
| local hightext = slider:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall") |
| hightext:SetPoint("TOPRIGHT", slider, "BOTTOMRIGHT", -2, 3) |
| local editbox = CreateFrame("EditBox", nil, frame) |
| editbox:SetAutoFocus(false) |
| editbox:SetFontObject(GameFontHighlightSmall) |
| editbox:SetPoint("TOP", slider, "BOTTOM") |
| editbox:SetHeight(14) |
| editbox:SetWidth(70) |
| editbox:SetJustifyH("CENTER") |
| editbox:EnableMouse(true) |
| editbox:SetBackdrop(ManualBackdrop) |
| editbox:SetBackdropColor(0, 0, 0, 0.5) |
| editbox:SetBackdropBorderColor(0.3, 0.3, 0.30, 0.80) |
| editbox:SetScript("OnEnter", EditBox_OnEnter) |
| editbox:SetScript("OnLeave", EditBox_OnLeave) |
| editbox:SetScript("OnEnterPressed", EditBox_OnEnterPressed) |
| editbox:SetScript("OnEscapePressed", EditBox_OnEscapePressed) |
| local widget = { |
| label = label, |
| slider = slider, |
| lowtext = lowtext, |
| hightext = hightext, |
| editbox = editbox, |
| alignoffset = 25, |
| frame = frame, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| slider.obj, editbox.obj = widget, widget |
| return AceGUI:RegisterAsWidget(widget) |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
trunk/PVPScan/Libs/AceGUI-3.0/widgets/AceGUIContainer-TabGroup.lua
New file
0,0 → 1,350
| --[[----------------------------------------------------------------------------- |
| TabGroup Container |
| Container that uses tabs on top to switch between groups. |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "TabGroup", 35 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local pairs, ipairs, assert, type, wipe = pairs, ipairs, assert, type, wipe |
| -- WoW APIs |
| local PlaySound = PlaySound |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| local _G = _G |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: PanelTemplates_TabResize, PanelTemplates_SetDisabledTabState, PanelTemplates_SelectTab, PanelTemplates_DeselectTab |
| -- local upvalue storage used by BuildTabs |
| local widths = {} |
| local rowwidths = {} |
| local rowends = {} |
| --[[----------------------------------------------------------------------------- |
| Support functions |
| -------------------------------------------------------------------------------]] |
| local function UpdateTabLook(frame) |
| if frame.disabled then |
| PanelTemplates_SetDisabledTabState(frame) |
| elseif frame.selected then |
| PanelTemplates_SelectTab(frame) |
| else |
| PanelTemplates_DeselectTab(frame) |
| end |
| end |
| local function Tab_SetText(frame, text) |
| frame:_SetText(text) |
| local width = frame.obj.frame.width or frame.obj.frame:GetWidth() or 0 |
| PanelTemplates_TabResize(frame, 0, nil, nil, width, frame:GetFontString():GetStringWidth()) |
| end |
| local function Tab_SetSelected(frame, selected) |
| frame.selected = selected |
| UpdateTabLook(frame) |
| end |
| local function Tab_SetDisabled(frame, disabled) |
| frame.disabled = disabled |
| UpdateTabLook(frame) |
| end |
| local function BuildTabsOnUpdate(frame) |
| local self = frame.obj |
| self:BuildTabs() |
| frame:SetScript("OnUpdate", nil) |
| end |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function Tab_OnClick(frame) |
| if not (frame.selected or frame.disabled) then |
| PlaySound("igCharacterInfoTab") |
| frame.obj:SelectTab(frame.value) |
| end |
| end |
| local function Tab_OnEnter(frame) |
| local self = frame.obj |
| self:Fire("OnTabEnter", self.tabs[frame.id].value, frame) |
| end |
| local function Tab_OnLeave(frame) |
| local self = frame.obj |
| self:Fire("OnTabLeave", self.tabs[frame.id].value, frame) |
| end |
| local function Tab_OnShow(frame) |
| _G[frame:GetName().."HighlightTexture"]:SetWidth(frame:GetTextWidth() + 30) |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:SetTitle() |
| end, |
| ["OnRelease"] = function(self) |
| 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 |
| end, |
| ["CreateTab"] = function(self, id) |
| local tabname = ("AceGUITabGroup%dTab%d"):format(self.num, 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", 14, -3) |
| tab.text:SetPoint("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, |
| ["SetTitle"] = function(self, text) |
| self.titletext:SetText(text or "") |
| if text and text ~= "" then |
| self.alignoffset = 25 |
| else |
| self.alignoffset = 18 |
| end |
| self:BuildTabs() |
| end, |
| ["SetStatusTable"] = function(self, status) |
| assert(type(status) == "table") |
| self.status = status |
| end, |
| ["SelectTab"] = function(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, |
| ["SetTabs"] = function(self, tabs) |
| self.tablist = tabs |
| self:BuildTabs() |
| end, |
| ["BuildTabs"] = function(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 |
| wipe(widths) |
| wipe(rowwidths) |
| wipe(rowends) |
| --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 |
| -- the 18 pixel is the typical width of a scrollbar, so we can have a tab group inside a scrolling frame, |
| -- and not have the tabs jump around funny when switching between tabs that need scrolling and those that don't |
| local padding = 0 |
| if not (numrows == 1 and rowwidths[1] < width*0.75 - 18) then |
| padding = (width - rowwidths[row]) / (endtab - starttab+1) |
| end |
| for i = starttab, endtab do |
| PanelTemplates_TabResize(tabs[i], padding + 4, nil, nil, width, tabs[i]:GetFontString():GetStringWidth()) |
| end |
| starttab = endtab + 1 |
| end |
| self.borderoffset = (hastitle and 17 or 10)+((numrows)*20) |
| self.border:SetPoint("TOPLEFT", 1, -self.borderoffset) |
| end, |
| ["OnWidthSet"] = function(self, width) |
| local content = self.content |
| local contentwidth = width - 60 |
| if contentwidth < 0 then |
| contentwidth = 0 |
| end |
| content:SetWidth(contentwidth) |
| content.width = contentwidth |
| self:BuildTabs(self) |
| self.frame:SetScript("OnUpdate", BuildTabsOnUpdate) |
| end, |
| ["OnHeightSet"] = function(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, |
| ["LayoutFinished"] = function(self, width, height) |
| if self.noAutoHeight then return end |
| self:SetHeight((height or 0) + (self.borderoffset + 23)) |
| end |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| 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 Constructor() |
| local num = AceGUI:GetNextWidgetNum(Type) |
| local frame = CreateFrame("Frame",nil,UIParent) |
| frame:SetHeight(100) |
| frame:SetWidth(100) |
| frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| local titletext = frame:CreateFontString(nil,"OVERLAY","GameFontNormal") |
| titletext:SetPoint("TOPLEFT", 14, 0) |
| titletext:SetPoint("TOPRIGHT", -14, 0) |
| titletext:SetJustifyH("LEFT") |
| titletext:SetHeight(18) |
| titletext:SetText("") |
| local border = CreateFrame("Frame", nil, frame) |
| border:SetPoint("TOPLEFT", 1, -27) |
| border:SetPoint("BOTTOMRIGHT", -1, 3) |
| border:SetBackdrop(PaneBackdrop) |
| border:SetBackdropColor(0.1, 0.1, 0.1, 0.5) |
| border:SetBackdropBorderColor(0.4, 0.4, 0.4) |
| local content = CreateFrame("Frame", nil, border) |
| content:SetPoint("TOPLEFT", 10, -7) |
| content:SetPoint("BOTTOMRIGHT", -10, 7) |
| local widget = { |
| num = num, |
| frame = frame, |
| localstatus = {}, |
| alignoffset = 18, |
| titletext = titletext, |
| border = border, |
| borderoffset = 27, |
| tabs = {}, |
| content = content, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| return AceGUI:RegisterAsContainer(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
trunk/PVPScan/Libs/AceGUI-3.0/widgets/AceGUIWidget-Keybinding.lua
New file
0,0 → 1,239
| --[[----------------------------------------------------------------------------- |
| Keybinding Widget |
| Set Keybindings in the Config UI. |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "Keybinding", 24 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local pairs = pairs |
| -- WoW APIs |
| local IsShiftKeyDown, IsControlKeyDown, IsAltKeyDown = IsShiftKeyDown, IsControlKeyDown, IsAltKeyDown |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: NOT_BOUND |
| local wowMoP |
| do |
| local _, _, _, interface = GetBuildInfo() |
| wowMoP = (interface >= 50000) |
| end |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function Control_OnEnter(frame) |
| frame.obj:Fire("OnEnter") |
| end |
| local function Control_OnLeave(frame) |
| frame.obj:Fire("OnLeave") |
| end |
| local function Keybinding_OnClick(frame, button) |
| if button == "LeftButton" or button == "RightButton" then |
| local self = frame.obj |
| if self.waitingForKey then |
| frame:EnableKeyboard(false) |
| self.msgframe:Hide() |
| frame:UnlockHighlight() |
| self.waitingForKey = nil |
| else |
| frame:EnableKeyboard(true) |
| self.msgframe:Show() |
| frame:LockHighlight() |
| self.waitingForKey = true |
| end |
| end |
| AceGUI:ClearFocus() |
| end |
| local ignoreKeys = { |
| ["BUTTON1"] = true, ["BUTTON2"] = true, |
| ["UNKNOWN"] = true, |
| ["LSHIFT"] = true, ["LCTRL"] = true, ["LALT"] = true, |
| ["RSHIFT"] = true, ["RCTRL"] = true, ["RALT"] = true, |
| } |
| local function Keybinding_OnKeyDown(frame, key) |
| local self = frame.obj |
| if self.waitingForKey then |
| local keyPressed = key |
| if keyPressed == "ESCAPE" then |
| keyPressed = "" |
| else |
| 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 |
| frame:EnableKeyboard(false) |
| self.msgframe:Hide() |
| frame:UnlockHighlight() |
| self.waitingForKey = nil |
| if not self.disabled then |
| self:SetKey(keyPressed) |
| self:Fire("OnKeyChanged", keyPressed) |
| end |
| end |
| end |
| local function Keybinding_OnMouseDown(frame, 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(frame, button) |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:SetWidth(200) |
| self:SetLabel("") |
| self:SetKey("") |
| self.waitingForKey = nil |
| self.msgframe:Hide() |
| self:SetDisabled(false) |
| self.button:EnableKeyboard(false) |
| end, |
| -- ["OnRelease"] = nil, |
| ["SetDisabled"] = function(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, |
| ["SetKey"] = function(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, |
| ["GetKey"] = function(self) |
| local key = self.button:GetText() |
| if key == NOT_BOUND then |
| key = nil |
| end |
| return key |
| end, |
| ["SetLabel"] = function(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, |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| 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 keybindingMsgFixWidth(frame) |
| frame:SetWidth(frame.msg:GetWidth() + 10) |
| frame:SetScript("OnUpdate", nil) |
| end |
| local function Constructor() |
| local name = "AceGUI30KeybindingButton" .. AceGUI:GetNextWidgetNum(Type) |
| local frame = CreateFrame("Frame", nil, UIParent) |
| local button = CreateFrame("Button", name, frame, wowMoP and "UIPanelButtonTemplate" or "UIPanelButtonTemplate2") |
| button:EnableMouse(true) |
| button:RegisterForClicks("AnyDown") |
| button:SetScript("OnEnter", Control_OnEnter) |
| button:SetScript("OnLeave", Control_OnLeave) |
| button:SetScript("OnClick", Keybinding_OnClick) |
| button:SetScript("OnKeyDown", Keybinding_OnKeyDown) |
| button:SetScript("OnMouseDown", Keybinding_OnMouseDown) |
| button:SetPoint("BOTTOMLEFT") |
| button:SetPoint("BOTTOMRIGHT") |
| button:SetHeight(24) |
| button:EnableKeyboard(false) |
| local text = button:GetFontString() |
| text:SetPoint("LEFT", 7, 0) |
| text:SetPoint("RIGHT", -7, 0) |
| local label = frame:CreateFontString(nil, "OVERLAY", "GameFontHighlight") |
| label:SetPoint("TOPLEFT") |
| label:SetPoint("TOPRIGHT") |
| label:SetJustifyH("CENTER") |
| label:SetHeight(18) |
| local msgframe = CreateFrame("Frame", nil, UIParent) |
| msgframe:SetHeight(30) |
| msgframe:SetBackdrop(ControlBackdrop) |
| msgframe:SetBackdropColor(0,0,0) |
| msgframe:SetFrameStrata("FULLSCREEN_DIALOG") |
| msgframe:SetFrameLevel(1000) |
| msgframe:SetToplevel(true) |
| 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", 5, -5) |
| msgframe:SetScript("OnUpdate", keybindingMsgFixWidth) |
| msgframe:SetPoint("BOTTOM", button, "TOP") |
| msgframe:Hide() |
| local widget = { |
| button = button, |
| label = label, |
| msgframe = msgframe, |
| frame = frame, |
| alignoffset = 30, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| button.obj = widget |
| return AceGUI:RegisterAsWidget(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
trunk/PVPScan/Libs/AceGUI-3.0/widgets/AceGUIWidget-CheckBox.lua
New file
0,0 → 1,295
| --[[----------------------------------------------------------------------------- |
| Checkbox Widget |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "CheckBox", 22 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local select, pairs = select, pairs |
| -- WoW APIs |
| local PlaySound = PlaySound |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: SetDesaturation, GameFontHighlight |
| --[[----------------------------------------------------------------------------- |
| Support functions |
| -------------------------------------------------------------------------------]] |
| local function AlignImage(self) |
| local img = self.image:GetTexture() |
| self.text:ClearAllPoints() |
| if not img then |
| self.text:SetPoint("LEFT", self.checkbg, "RIGHT") |
| self.text:SetPoint("RIGHT") |
| else |
| self.text:SetPoint("LEFT", self.image,"RIGHT", 1, 0) |
| self.text:SetPoint("RIGHT") |
| end |
| end |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function Control_OnEnter(frame) |
| frame.obj:Fire("OnEnter") |
| end |
| local function Control_OnLeave(frame) |
| frame.obj:Fire("OnLeave") |
| end |
| local function CheckBox_OnMouseDown(frame) |
| local self = frame.obj |
| if not self.disabled then |
| if self.image:GetTexture() then |
| self.text:SetPoint("LEFT", self.image,"RIGHT", 2, -1) |
| else |
| self.text:SetPoint("LEFT", self.checkbg, "RIGHT", 1, -1) |
| end |
| end |
| AceGUI:ClearFocus() |
| end |
| local function CheckBox_OnMouseUp(frame) |
| local self = frame.obj |
| if not self.disabled then |
| self:ToggleChecked() |
| if self.checked then |
| PlaySound("igMainMenuOptionCheckBoxOn") |
| else -- for both nil and false (tristate) |
| PlaySound("igMainMenuOptionCheckBoxOff") |
| end |
| self:Fire("OnValueChanged", self.checked) |
| AlignImage(self) |
| end |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:SetType() |
| self:SetValue(false) |
| self:SetTriState(nil) |
| -- height is calculated from the width and required space for the description |
| self:SetWidth(200) |
| self:SetImage() |
| self:SetDisabled(nil) |
| self:SetDescription(nil) |
| end, |
| -- ["OnRelease"] = nil, |
| ["OnWidthSet"] = function(self, width) |
| if self.desc then |
| self.desc:SetWidth(width - 30) |
| if self.desc:GetText() and self.desc:GetText() ~= "" then |
| self:SetHeight(28 + self.desc:GetHeight()) |
| end |
| end |
| end, |
| ["SetDisabled"] = function(self, disabled) |
| self.disabled = disabled |
| if disabled then |
| self.frame:Disable() |
| self.text:SetTextColor(0.5, 0.5, 0.5) |
| SetDesaturation(self.check, true) |
| if self.desc then |
| self.desc:SetTextColor(0.5, 0.5, 0.5) |
| end |
| 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 |
| if self.desc then |
| self.desc:SetTextColor(1, 1, 1) |
| end |
| end |
| end, |
| ["SetValue"] = function(self,value) |
| local check = self.check |
| self.checked = value |
| if value then |
| SetDesaturation(self.check, false) |
| self.check:Show() |
| else |
| --Nil is the unknown tristate value |
| if self.tristate and value == nil then |
| SetDesaturation(self.check, true) |
| self.check:Show() |
| else |
| SetDesaturation(self.check, false) |
| self.check:Hide() |
| end |
| end |
| self:SetDisabled(self.disabled) |
| end, |
| ["GetValue"] = function(self) |
| return self.checked |
| end, |
| ["SetTriState"] = function(self, enabled) |
| self.tristate = enabled |
| self:SetValue(self:GetValue()) |
| end, |
| ["SetType"] = function(self, type) |
| local checkbg = self.checkbg |
| local check = self.check |
| local highlight = self.highlight |
| local size |
| if type == "radio" then |
| size = 16 |
| checkbg:SetTexture("Interface\\Buttons\\UI-RadioButton") |
| checkbg:SetTexCoord(0, 0.25, 0, 1) |
| check:SetTexture("Interface\\Buttons\\UI-RadioButton") |
| check:SetTexCoord(0.25, 0.5, 0, 1) |
| check:SetBlendMode("ADD") |
| highlight:SetTexture("Interface\\Buttons\\UI-RadioButton") |
| highlight:SetTexCoord(0.5, 0.75, 0, 1) |
| else |
| size = 24 |
| 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 |
| checkbg:SetHeight(size) |
| checkbg:SetWidth(size) |
| end, |
| ["ToggleChecked"] = function(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, |
| ["SetLabel"] = function(self, label) |
| self.text:SetText(label) |
| end, |
| ["SetDescription"] = function(self, desc) |
| if desc then |
| if not self.desc then |
| local desc = self.frame:CreateFontString(nil, "OVERLAY", "GameFontHighlightSmall") |
| desc:ClearAllPoints() |
| desc:SetPoint("TOPLEFT", self.checkbg, "TOPRIGHT", 5, -21) |
| 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(28 + self.desc:GetHeight()) |
| else |
| if self.desc then |
| self.desc:SetText("") |
| self.desc:Hide() |
| end |
| --self.text:SetFontObject(GameFontHighlight) |
| self:SetHeight(24) |
| end |
| end, |
| ["SetImage"] = function(self, path, ...) |
| local image = self.image |
| image:SetTexture(path) |
| if image:GetTexture() then |
| local n = select("#", ...) |
| if n == 4 or n == 8 then |
| image:SetTexCoord(...) |
| else |
| image:SetTexCoord(0, 1, 0, 1) |
| end |
| end |
| AlignImage(self) |
| end |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local function Constructor() |
| local frame = CreateFrame("Button", nil, UIParent) |
| frame:Hide() |
| frame:EnableMouse(true) |
| frame:SetScript("OnEnter", Control_OnEnter) |
| frame:SetScript("OnLeave", Control_OnLeave) |
| frame:SetScript("OnMouseDown", CheckBox_OnMouseDown) |
| frame:SetScript("OnMouseUp", CheckBox_OnMouseUp) |
| local checkbg = frame:CreateTexture(nil, "ARTWORK") |
| checkbg:SetWidth(24) |
| checkbg:SetHeight(24) |
| checkbg:SetPoint("TOPLEFT") |
| checkbg:SetTexture("Interface\\Buttons\\UI-CheckBox-Up") |
| local check = frame:CreateTexture(nil, "OVERLAY") |
| check:SetAllPoints(checkbg) |
| check:SetTexture("Interface\\Buttons\\UI-CheckBox-Check") |
| local text = frame:CreateFontString(nil, "OVERLAY", "GameFontHighlight") |
| text:SetJustifyH("LEFT") |
| text:SetHeight(18) |
| text:SetPoint("LEFT", checkbg, "RIGHT") |
| text:SetPoint("RIGHT") |
| local highlight = frame:CreateTexture(nil, "HIGHLIGHT") |
| highlight:SetTexture("Interface\\Buttons\\UI-CheckBox-Highlight") |
| highlight:SetBlendMode("ADD") |
| highlight:SetAllPoints(checkbg) |
| local image = frame:CreateTexture(nil, "OVERLAY") |
| image:SetHeight(16) |
| image:SetWidth(16) |
| image:SetPoint("LEFT", checkbg, "RIGHT", 1, 0) |
| local widget = { |
| checkbg = checkbg, |
| check = check, |
| text = text, |
| highlight = highlight, |
| image = image, |
| frame = frame, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| return AceGUI:RegisterAsWidget(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
trunk/PVPScan/Libs/AceGUI-3.0/widgets/AceGUIWidget-Icon.lua
New file
0,0 → 1,144
| --[[----------------------------------------------------------------------------- |
| Icon Widget |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "Icon", 21 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local select, pairs, print = select, pairs, print |
| -- WoW APIs |
| local CreateFrame, UIParent, GetBuildInfo = CreateFrame, UIParent, GetBuildInfo |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function Control_OnEnter(frame) |
| frame.obj:Fire("OnEnter") |
| end |
| local function Control_OnLeave(frame) |
| frame.obj:Fire("OnLeave") |
| end |
| local function Button_OnClick(frame, button) |
| frame.obj:Fire("OnClick", button) |
| AceGUI:ClearFocus() |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:SetHeight(110) |
| self:SetWidth(110) |
| self:SetLabel() |
| self:SetImage(nil) |
| self:SetImageSize(64, 64) |
| self:SetDisabled(false) |
| end, |
| -- ["OnRelease"] = nil, |
| ["SetLabel"] = function(self, text) |
| if text and text ~= "" then |
| self.label:Show() |
| self.label:SetText(text) |
| self:SetHeight(self.image:GetHeight() + 25) |
| else |
| self.label:Hide() |
| self:SetHeight(self.image:GetHeight() + 10) |
| end |
| end, |
| ["SetImage"] = function(self, path, ...) |
| local image = self.image |
| image:SetTexture(path) |
| if image:GetTexture() then |
| local n = select("#", ...) |
| if n == 4 or n == 8 then |
| image:SetTexCoord(...) |
| else |
| image:SetTexCoord(0, 1, 0, 1) |
| end |
| end |
| end, |
| ["SetImageSize"] = function(self, width, height) |
| self.image:SetWidth(width) |
| self.image:SetHeight(height) |
| --self.frame:SetWidth(width + 30) |
| if self.label:IsShown() then |
| self:SetHeight(height + 25) |
| else |
| self:SetHeight(height + 10) |
| end |
| end, |
| ["SetDisabled"] = function(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, 1) |
| end |
| end |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local function Constructor() |
| local frame = CreateFrame("Button", nil, UIParent) |
| frame:Hide() |
| frame:EnableMouse(true) |
| frame:SetScript("OnEnter", Control_OnEnter) |
| frame:SetScript("OnLeave", Control_OnLeave) |
| frame:SetScript("OnClick", Button_OnClick) |
| local label = frame:CreateFontString(nil, "BACKGROUND", "GameFontHighlight") |
| label:SetPoint("BOTTOMLEFT") |
| label:SetPoint("BOTTOMRIGHT") |
| label:SetJustifyH("CENTER") |
| label:SetJustifyV("TOP") |
| label:SetHeight(18) |
| local image = frame:CreateTexture(nil, "BACKGROUND") |
| image:SetWidth(64) |
| image:SetHeight(64) |
| image:SetPoint("TOP", 0, -5) |
| local highlight = frame:CreateTexture(nil, "HIGHLIGHT") |
| highlight:SetAllPoints(image) |
| highlight:SetTexture("Interface\\PaperDollInfoFrame\\UI-Character-Tab-Highlight") |
| highlight:SetTexCoord(0, 1, 0.23, 0.77) |
| highlight:SetBlendMode("ADD") |
| local widget = { |
| label = label, |
| image = image, |
| frame = frame, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| -- SetText is deprecated, but keep it around for a while. (say, to WoW 4.0) |
| if (select(4, GetBuildInfo()) < 40000) then |
| widget.SetText = widget.SetLabel |
| else |
| widget.SetText = function(self, ...) print("AceGUI-3.0-Icon: SetText is deprecated! Use SetLabel instead!"); self:SetLabel(...) end |
| end |
| return AceGUI:RegisterAsWidget(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
trunk/PVPScan/Libs/AceGUI-3.0/widgets/AceGUIContainer-BlizOptionsGroup.lua
New file
0,0 → 1,138
| --[[----------------------------------------------------------------------------- |
| BlizOptionsGroup Container |
| Simple container widget for the integration of AceGUI into the Blizzard Interface Options |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "BlizOptionsGroup", 21 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local pairs = pairs |
| -- WoW APIs |
| local CreateFrame = CreateFrame |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function OnShow(frame) |
| frame.obj:Fire("OnShow") |
| end |
| local function OnHide(frame) |
| frame.obj:Fire("OnHide") |
| end |
| --[[----------------------------------------------------------------------------- |
| Support functions |
| -------------------------------------------------------------------------------]] |
| local function okay(frame) |
| frame.obj:Fire("okay") |
| end |
| local function cancel(frame) |
| frame.obj:Fire("cancel") |
| end |
| local function default(frame) |
| frame.obj:Fire("default") |
| end |
| local function refresh(frame) |
| frame.obj:Fire("refresh") |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:SetName() |
| self:SetTitle() |
| end, |
| -- ["OnRelease"] = nil, |
| ["OnWidthSet"] = function(self, width) |
| local content = self.content |
| local contentwidth = width - 63 |
| if contentwidth < 0 then |
| contentwidth = 0 |
| end |
| content:SetWidth(contentwidth) |
| content.width = contentwidth |
| end, |
| ["OnHeightSet"] = function(self, height) |
| local content = self.content |
| local contentheight = height - 26 |
| if contentheight < 0 then |
| contentheight = 0 |
| end |
| content:SetHeight(contentheight) |
| content.height = contentheight |
| end, |
| ["SetName"] = function(self, name, parent) |
| self.frame.name = name |
| self.frame.parent = parent |
| end, |
| ["SetTitle"] = function(self, title) |
| local content = self.content |
| content:ClearAllPoints() |
| if not title or title == "" then |
| content:SetPoint("TOPLEFT", 10, -10) |
| self.label:SetText("") |
| else |
| content:SetPoint("TOPLEFT", 10, -40) |
| self.label:SetText(title) |
| end |
| content:SetPoint("BOTTOMRIGHT", -10, 10) |
| end |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local function Constructor() |
| local frame = CreateFrame("Frame") |
| frame:Hide() |
| -- support functions for the Blizzard Interface Options |
| frame.okay = okay |
| frame.cancel = cancel |
| frame.default = default |
| frame.refresh = refresh |
| frame:SetScript("OnHide", OnHide) |
| frame:SetScript("OnShow", OnShow) |
| local label = frame:CreateFontString(nil, "OVERLAY", "GameFontNormalLarge") |
| label:SetPoint("TOPLEFT", 10, -15) |
| label:SetPoint("BOTTOMRIGHT", frame, "TOPRIGHT", 10, -45) |
| label:SetJustifyH("LEFT") |
| label:SetJustifyV("TOP") |
| --Container Support |
| local content = CreateFrame("Frame", nil, frame) |
| content:SetPoint("TOPLEFT", 10, -10) |
| content:SetPoint("BOTTOMRIGHT", -10, 10) |
| local widget = { |
| label = label, |
| frame = frame, |
| content = content, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| return AceGUI:RegisterAsContainer(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
trunk/PVPScan/Libs/AceGUI-3.0/widgets/AceGUIContainer-Frame.lua
New file
0,0 → 1,311
| --[[----------------------------------------------------------------------------- |
| Frame Container |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "Frame", 24 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local pairs, assert, type = pairs, assert, type |
| local wipe = table.wipe |
| -- WoW APIs |
| local PlaySound = PlaySound |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: CLOSE |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function Button_OnClick(frame) |
| PlaySound("gsTitleOptionExit") |
| frame.obj:Hide() |
| end |
| local function Frame_OnClose(frame) |
| frame.obj:Fire("OnClose") |
| end |
| local function Frame_OnMouseDown(frame) |
| AceGUI:ClearFocus() |
| end |
| local function Title_OnMouseDown(frame) |
| frame:GetParent():StartMoving() |
| AceGUI:ClearFocus() |
| end |
| local function MoverSizer_OnMouseUp(mover) |
| local frame = mover: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 SizerSE_OnMouseDown(frame) |
| frame:GetParent():StartSizing("BOTTOMRIGHT") |
| AceGUI:ClearFocus() |
| end |
| local function SizerS_OnMouseDown(frame) |
| frame:GetParent():StartSizing("BOTTOM") |
| AceGUI:ClearFocus() |
| end |
| local function SizerE_OnMouseDown(frame) |
| frame:GetParent():StartSizing("RIGHT") |
| AceGUI:ClearFocus() |
| end |
| local function StatusBar_OnEnter(frame) |
| frame.obj:Fire("OnEnterStatusBar") |
| end |
| local function StatusBar_OnLeave(frame) |
| frame.obj:Fire("OnLeaveStatusBar") |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self.frame:SetParent(UIParent) |
| self.frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| self:SetTitle() |
| self:SetStatusText() |
| self:ApplyStatus() |
| self:Show() |
| self:EnableResize(true) |
| end, |
| ["OnRelease"] = function(self) |
| self.status = nil |
| wipe(self.localstatus) |
| end, |
| ["OnWidthSet"] = function(self, width) |
| local content = self.content |
| local contentwidth = width - 34 |
| if contentwidth < 0 then |
| contentwidth = 0 |
| end |
| content:SetWidth(contentwidth) |
| content.width = contentwidth |
| end, |
| ["OnHeightSet"] = function(self, height) |
| local content = self.content |
| local contentheight = height - 57 |
| if contentheight < 0 then |
| contentheight = 0 |
| end |
| content:SetHeight(contentheight) |
| content.height = contentheight |
| end, |
| ["SetTitle"] = function(self, title) |
| self.titletext:SetText(title) |
| self.titlebg:SetWidth((self.titletext:GetWidth() or 0) + 10) |
| end, |
| ["SetStatusText"] = function(self, text) |
| self.statustext:SetText(text) |
| end, |
| ["Hide"] = function(self) |
| self.frame:Hide() |
| end, |
| ["Show"] = function(self) |
| self.frame:Show() |
| end, |
| ["EnableResize"] = function(self, state) |
| local func = state and "Show" or "Hide" |
| self.sizer_se[func](self.sizer_se) |
| self.sizer_s[func](self.sizer_s) |
| self.sizer_e[func](self.sizer_e) |
| end, |
| -- called to set an external table to store status in |
| ["SetStatusTable"] = function(self, status) |
| assert(type(status) == "table") |
| self.status = status |
| self:ApplyStatus() |
| end, |
| ["ApplyStatus"] = function(self) |
| local status = self.status or self.localstatus |
| local frame = self.frame |
| self:SetWidth(status.width or 700) |
| self:SetHeight(status.height or 500) |
| frame:ClearAllPoints() |
| 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") |
| end |
| end |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| 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 Constructor() |
| local frame = CreateFrame("Frame", nil, UIParent) |
| frame:Hide() |
| frame:EnableMouse(true) |
| frame:SetMovable(true) |
| frame:SetResizable(true) |
| frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| frame:SetBackdrop(FrameBackdrop) |
| frame:SetBackdropColor(0, 0, 0, 1) |
| frame:SetMinResize(400, 200) |
| frame:SetToplevel(true) |
| frame:SetScript("OnHide", Frame_OnClose) |
| frame:SetScript("OnMouseDown", Frame_OnMouseDown) |
| local closebutton = CreateFrame("Button", nil, frame, "UIPanelButtonTemplate") |
| closebutton:SetScript("OnClick", Button_OnClick) |
| closebutton:SetPoint("BOTTOMRIGHT", -27, 17) |
| closebutton:SetHeight(20) |
| closebutton:SetWidth(100) |
| closebutton:SetText(CLOSE) |
| local statusbg = CreateFrame("Button", nil, frame) |
| statusbg:SetPoint("BOTTOMLEFT", 15, 15) |
| statusbg:SetPoint("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) |
| statusbg:SetScript("OnEnter", StatusBar_OnEnter) |
| statusbg:SetScript("OnLeave", StatusBar_OnLeave) |
| local statustext = statusbg:CreateFontString(nil, "OVERLAY", "GameFontNormal") |
| statustext:SetPoint("TOPLEFT", 7, -2) |
| statustext:SetPoint("BOTTOMRIGHT", -7, 2) |
| statustext:SetHeight(20) |
| statustext:SetJustifyH("LEFT") |
| statustext:SetText("") |
| 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", 0, 12) |
| titlebg:SetWidth(100) |
| titlebg:SetHeight(40) |
| local title = CreateFrame("Frame", nil, frame) |
| title:EnableMouse(true) |
| title:SetScript("OnMouseDown", Title_OnMouseDown) |
| title:SetScript("OnMouseUp", MoverSizer_OnMouseUp) |
| title:SetAllPoints(titlebg) |
| local titletext = title:CreateFontString(nil, "OVERLAY", "GameFontNormal") |
| titletext:SetPoint("TOP", titlebg, "TOP", 0, -14) |
| 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") |
| titlebg_l:SetWidth(30) |
| titlebg_l:SetHeight(40) |
| local titlebg_r = frame:CreateTexture(nil, "OVERLAY") |
| titlebg_r:SetTexture("Interface\\DialogFrame\\UI-DialogBox-Header") |
| titlebg_r:SetTexCoord(0.67, 0.77, 0, 0.63) |
| titlebg_r:SetPoint("LEFT", titlebg, "RIGHT") |
| titlebg_r:SetWidth(30) |
| titlebg_r:SetHeight(40) |
| local sizer_se = CreateFrame("Frame", nil, frame) |
| sizer_se:SetPoint("BOTTOMRIGHT") |
| sizer_se:SetWidth(25) |
| sizer_se:SetHeight(25) |
| sizer_se:EnableMouse() |
| sizer_se:SetScript("OnMouseDown",SizerSE_OnMouseDown) |
| sizer_se:SetScript("OnMouseUp", MoverSizer_OnMouseUp) |
| local line1 = sizer_se:CreateTexture(nil, "BACKGROUND") |
| 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") |
| 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", -25, 0) |
| sizer_s:SetPoint("BOTTOMLEFT") |
| sizer_s:SetHeight(25) |
| sizer_s:EnableMouse(true) |
| sizer_s:SetScript("OnMouseDown", SizerS_OnMouseDown) |
| sizer_s:SetScript("OnMouseUp", MoverSizer_OnMouseUp) |
| local sizer_e = CreateFrame("Frame", nil, frame) |
| sizer_e:SetPoint("BOTTOMRIGHT", 0, 25) |
| sizer_e:SetPoint("TOPRIGHT") |
| sizer_e:SetWidth(25) |
| sizer_e:EnableMouse(true) |
| sizer_e:SetScript("OnMouseDown", SizerE_OnMouseDown) |
| sizer_e:SetScript("OnMouseUp", MoverSizer_OnMouseUp) |
| --Container Support |
| local content = CreateFrame("Frame", nil, frame) |
| content:SetPoint("TOPLEFT", 17, -27) |
| content:SetPoint("BOTTOMRIGHT", -17, 40) |
| local widget = { |
| localstatus = {}, |
| titletext = titletext, |
| statustext = statustext, |
| titlebg = titlebg, |
| sizer_se = sizer_se, |
| sizer_s = sizer_s, |
| sizer_e = sizer_e, |
| content = content, |
| frame = frame, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| closebutton.obj, statusbg.obj = widget, widget |
| return AceGUI:RegisterAsContainer(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
trunk/PVPScan/Libs/AceGUI-3.0/widgets/AceGUIContainer-InlineGroup.lua
New file
0,0 → 1,103
| --[[----------------------------------------------------------------------------- |
| InlineGroup Container |
| Simple container widget that creates a visible "box" with an optional title. |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "InlineGroup", 21 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local pairs = pairs |
| -- WoW APIs |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:SetWidth(300) |
| self:SetHeight(100) |
| self:SetTitle("") |
| end, |
| -- ["OnRelease"] = nil, |
| ["SetTitle"] = function(self,title) |
| self.titletext:SetText(title) |
| end, |
| ["LayoutFinished"] = function(self, width, height) |
| if self.noAutoHeight then return end |
| self:SetHeight((height or 0) + 40) |
| end, |
| ["OnWidthSet"] = function(self, width) |
| local content = self.content |
| local contentwidth = width - 20 |
| if contentwidth < 0 then |
| contentwidth = 0 |
| end |
| content:SetWidth(contentwidth) |
| content.width = contentwidth |
| end, |
| ["OnHeightSet"] = function(self, height) |
| local content = self.content |
| local contentheight = height - 20 |
| if contentheight < 0 then |
| contentheight = 0 |
| end |
| content:SetHeight(contentheight) |
| content.height = contentheight |
| end |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| 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 Constructor() |
| local frame = CreateFrame("Frame", nil, UIParent) |
| frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| local titletext = frame:CreateFontString(nil, "OVERLAY", "GameFontNormal") |
| titletext:SetPoint("TOPLEFT", 14, 0) |
| titletext:SetPoint("TOPRIGHT", -14, 0) |
| titletext:SetJustifyH("LEFT") |
| titletext:SetHeight(18) |
| local border = CreateFrame("Frame", nil, frame) |
| border:SetPoint("TOPLEFT", 0, -17) |
| border:SetPoint("BOTTOMRIGHT", -1, 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) |
| content:SetPoint("TOPLEFT", 10, -10) |
| content:SetPoint("BOTTOMRIGHT", -10, 10) |
| local widget = { |
| frame = frame, |
| content = content, |
| titletext = titletext, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| return AceGUI:RegisterAsContainer(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
trunk/PVPScan/Libs/AceGUI-3.0/widgets/AceGUIWidget-DropDown.lua
New file
0,0 → 1,734
| --[[ $Id: AceGUIWidget-DropDown.lua 1101 2013-10-25 12:46:47Z nevcairiel $ ]]-- |
| local AceGUI = LibStub("AceGUI-3.0") |
| -- Lua APIs |
| local min, max, floor = math.min, math.max, math.floor |
| local select, pairs, ipairs, type = select, pairs, ipairs, type |
| local tsort = table.sort |
| -- WoW APIs |
| local PlaySound = PlaySound |
| local UIParent, CreateFrame = UIParent, CreateFrame |
| local _G = _G |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: CLOSE |
| 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 = 29 |
| --[[ Static data ]]-- |
| --[[ UI event handler ]]-- |
| local function Control_OnEnter(this) |
| this.obj.button:LockHighlight() |
| this.obj:Fire("OnEnter") |
| end |
| local function Control_OnLeave(this) |
| this.obj.button:UnlockHighlight() |
| 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 |
| PlaySound("igMainMenuOptionCheckBoxOn") -- missleading name, but the Blizzard code uses this sound |
| if self.open then |
| self.open = nil |
| self.pullout:Close() |
| AceGUI:ClearFocus() |
| else |
| self.open = true |
| self.pullout:SetWidth(self.pulloutWidth or 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 |
| self:Fire("OnOpened") |
| 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) |
| self:SetLabel() |
| self:SetPulloutWidth(nil) |
| 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: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,-14) |
| self:SetHeight(40) |
| self.alignoffset = 26 |
| else |
| self.label:SetText("") |
| self.label:Hide() |
| self.dropdown:SetPoint("TOPLEFT",self.frame,"TOPLEFT",-15,0) |
| self:SetHeight(26) |
| self.alignoffset = 12 |
| 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, itemType) |
| if not itemType then itemType = "Dropdown-Item-Toggle" end |
| local exists = AceGUI:GetWidgetVersion(itemType) |
| if not exists then error(("The given item type, %q, does not exist within AceGUI-3.0"):format(tostring(itemType)), 2) end |
| local item = AceGUI:Create(itemType) |
| 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, order, itemType) |
| self.list = list |
| self.pullout:Clear() |
| self.hasClose = nil |
| if not list then return end |
| if type(order) ~= "table" then |
| for v in pairs(list) do |
| sortlist[#sortlist + 1] = v |
| end |
| tsort(sortlist) |
| for i, key in ipairs(sortlist) do |
| AddListItem(self, key, list[key], itemType) |
| sortlist[i] = nil |
| end |
| else |
| for i, key in ipairs(order) do |
| AddListItem(self, key, list[key], itemType) |
| end |
| end |
| if self.multiselect then |
| ShowMultiText(self) |
| AddCloseButton(self) |
| end |
| end |
| -- exported |
| local function AddItem(self, value, text, itemType) |
| if self.list then |
| self.list[value] = text |
| AddListItem(self, value, text, itemType) |
| 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 |
| local function SetPulloutWidth(self, width) |
| self.pulloutWidth = width |
| 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.SetPulloutWidth = SetPulloutWidth |
| self.alignoffset = 26 |
| 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 button_cover = CreateFrame("BUTTON",nil,self.frame) |
| button_cover.obj = self |
| button_cover:SetPoint("TOPLEFT",self.frame,"BOTTOMLEFT",0,25) |
| button_cover:SetPoint("BOTTOMRIGHT",self.frame,"BOTTOMRIGHT") |
| button_cover:SetScript("OnEnter",Control_OnEnter) |
| button_cover:SetScript("OnLeave",Control_OnLeave) |
| button_cover: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 |
trunk/PVPScan/Libs/AceGUI-3.0/widgets/AceGUIWidget-EditBox.lua
New file
0,0 → 1,261
| --[[----------------------------------------------------------------------------- |
| EditBox Widget |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "EditBox", 25 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local tostring, pairs = tostring, pairs |
| -- WoW APIs |
| local PlaySound = PlaySound |
| local GetCursorInfo, ClearCursor, GetSpellInfo = GetCursorInfo, ClearCursor, GetSpellInfo |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| local _G = _G |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: AceGUIEditBoxInsertLink, ChatFontNormal, OKAY |
| --[[----------------------------------------------------------------------------- |
| Support functions |
| -------------------------------------------------------------------------------]] |
| if not AceGUIEditBoxInsertLink then |
| -- upgradeable hook |
| hooksecurefunc("ChatEdit_InsertLink", function(...) return _G.AceGUIEditBoxInsertLink(...) end) |
| end |
| function _G.AceGUIEditBoxInsertLink(text) |
| for i = 1, AceGUI:GetWidgetCount(Type) 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 |
| local function ShowButton(self) |
| if not self.disablebutton 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 |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function Control_OnEnter(frame) |
| frame.obj:Fire("OnEnter") |
| end |
| local function Control_OnLeave(frame) |
| frame.obj:Fire("OnLeave") |
| end |
| local function Frame_OnShowFocus(frame) |
| frame.obj.editbox:SetFocus() |
| frame:SetScript("OnShow", nil) |
| end |
| local function EditBox_OnEscapePressed(frame) |
| AceGUI:ClearFocus() |
| end |
| local function EditBox_OnEnterPressed(frame) |
| local self = frame.obj |
| local value = frame:GetText() |
| local cancel = self:Fire("OnEnterPressed", value) |
| if not cancel then |
| PlaySound("igMainMenuOptionCheckBoxOn") |
| HideButton(self) |
| end |
| end |
| local function EditBox_OnReceiveDrag(frame) |
| local self = frame.obj |
| local type, id, info = GetCursorInfo() |
| if type == "item" then |
| self:SetText(info) |
| self:Fire("OnEnterPressed", info) |
| ClearCursor() |
| elseif type == "spell" then |
| local name = GetSpellInfo(id, info) |
| self:SetText(name) |
| self:Fire("OnEnterPressed", name) |
| ClearCursor() |
| elseif type == "macro" then |
| local name = GetMacroInfo(id) |
| self:SetText(name) |
| self:Fire("OnEnterPressed", name) |
| ClearCursor() |
| end |
| HideButton(self) |
| AceGUI:ClearFocus() |
| end |
| local function EditBox_OnTextChanged(frame) |
| local self = frame.obj |
| local value = frame:GetText() |
| if tostring(value) ~= tostring(self.lasttext) then |
| self:Fire("OnTextChanged", value) |
| self.lasttext = value |
| ShowButton(self) |
| end |
| end |
| local function EditBox_OnFocusGained(frame) |
| AceGUI:SetFocus(frame.obj) |
| end |
| local function Button_OnClick(frame) |
| local editbox = frame.obj.editbox |
| editbox:ClearFocus() |
| EditBox_OnEnterPressed(editbox) |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| -- height is controlled by SetLabel |
| self:SetWidth(200) |
| self:SetDisabled(false) |
| self:SetLabel() |
| self:SetText() |
| self:DisableButton(false) |
| self:SetMaxLetters(0) |
| end, |
| ["OnRelease"] = function(self) |
| self:ClearFocus() |
| end, |
| ["SetDisabled"] = function(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, |
| ["SetText"] = function(self, text) |
| self.lasttext = text or "" |
| self.editbox:SetText(text or "") |
| self.editbox:SetCursorPosition(0) |
| HideButton(self) |
| end, |
| ["GetText"] = function(self, text) |
| return self.editbox:GetText() |
| end, |
| ["SetLabel"] = function(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, |
| ["DisableButton"] = function(self, disabled) |
| self.disablebutton = disabled |
| if disabled then |
| HideButton(self) |
| end |
| end, |
| ["SetMaxLetters"] = function (self, num) |
| self.editbox:SetMaxLetters(num or 0) |
| end, |
| ["ClearFocus"] = function(self) |
| self.editbox:ClearFocus() |
| self.frame:SetScript("OnShow", nil) |
| end, |
| ["SetFocus"] = function(self) |
| self.editbox:SetFocus() |
| if not self.frame:IsShown() then |
| self.frame:SetScript("OnShow", Frame_OnShowFocus) |
| end |
| end |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local function Constructor() |
| local num = AceGUI:GetNextWidgetNum(Type) |
| local frame = CreateFrame("Frame", nil, UIParent) |
| frame:Hide() |
| local editbox = CreateFrame("EditBox", "AceGUI-3.0EditBox"..num, frame, "InputBoxTemplate") |
| editbox:SetAutoFocus(false) |
| editbox:SetFontObject(ChatFontNormal) |
| editbox:SetScript("OnEnter", Control_OnEnter) |
| editbox:SetScript("OnLeave", Control_OnLeave) |
| 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:SetScript("OnEditFocusGained", EditBox_OnFocusGained) |
| editbox:SetTextInsets(0, 0, 3, 3) |
| editbox:SetMaxLetters(256) |
| editbox:SetPoint("BOTTOMLEFT", 6, 0) |
| editbox:SetPoint("BOTTOMRIGHT") |
| editbox:SetHeight(19) |
| local label = frame:CreateFontString(nil, "OVERLAY", "GameFontNormalSmall") |
| label:SetPoint("TOPLEFT", 0, -2) |
| label:SetPoint("TOPRIGHT", 0, -2) |
| label:SetJustifyH("LEFT") |
| label:SetHeight(18) |
| local button = CreateFrame("Button", nil, editbox, "UIPanelButtonTemplate") |
| button:SetWidth(40) |
| button:SetHeight(20) |
| button:SetPoint("RIGHT", -2, 0) |
| button:SetText(OKAY) |
| button:SetScript("OnClick", Button_OnClick) |
| button:Hide() |
| local widget = { |
| alignoffset = 30, |
| editbox = editbox, |
| label = label, |
| button = button, |
| frame = frame, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| editbox.obj, button.obj = widget, widget |
| return AceGUI:RegisterAsWidget(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
trunk/PVPScan/Libs/AceGUI-3.0/widgets/AceGUIWidget-Heading.lua
New file
0,0 → 1,78
| --[[----------------------------------------------------------------------------- |
| Heading Widget |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "Heading", 20 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local pairs = pairs |
| -- WoW APIs |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:SetText() |
| self:SetFullWidth() |
| self:SetHeight(18) |
| end, |
| -- ["OnRelease"] = nil, |
| ["SetText"] = function(self, text) |
| self.label:SetText(text or "") |
| if text and text ~= "" then |
| self.left:SetPoint("RIGHT", self.label, "LEFT", -5, 0) |
| self.right:Show() |
| else |
| self.left:SetPoint("RIGHT", -3, 0) |
| self.right:Hide() |
| end |
| end |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local function Constructor() |
| local frame = CreateFrame("Frame", nil, UIParent) |
| frame:Hide() |
| local label = frame:CreateFontString(nil, "BACKGROUND", "GameFontNormal") |
| label:SetPoint("TOP") |
| label:SetPoint("BOTTOM") |
| label:SetJustifyH("CENTER") |
| local left = frame:CreateTexture(nil, "BACKGROUND") |
| left:SetHeight(8) |
| left:SetPoint("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") |
| right:SetHeight(8) |
| right:SetPoint("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) |
| local widget = { |
| label = label, |
| left = left, |
| right = right, |
| frame = frame, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| return AceGUI:RegisterAsWidget(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
trunk/PVPScan/Libs/AceGUI-3.0/widgets/AceGUIContainer-SimpleGroup.lua
New file
0,0 → 1,69
| --[[----------------------------------------------------------------------------- |
| SimpleGroup Container |
| Simple container widget that just groups widgets. |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "SimpleGroup", 20 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local pairs = pairs |
| -- WoW APIs |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:SetWidth(300) |
| self:SetHeight(100) |
| end, |
| -- ["OnRelease"] = nil, |
| ["LayoutFinished"] = function(self, width, height) |
| if self.noAutoHeight then return end |
| self:SetHeight(height or 0) |
| end, |
| ["OnWidthSet"] = function(self, width) |
| local content = self.content |
| content:SetWidth(width) |
| content.width = width |
| end, |
| ["OnHeightSet"] = function(self, height) |
| local content = self.content |
| content:SetHeight(height) |
| content.height = height |
| end |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local function Constructor() |
| local frame = CreateFrame("Frame", nil, UIParent) |
| frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| --Container Support |
| local content = CreateFrame("Frame", nil, frame) |
| content:SetPoint("TOPLEFT") |
| content:SetPoint("BOTTOMRIGHT") |
| local widget = { |
| frame = frame, |
| content = content, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| return AceGUI:RegisterAsContainer(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
trunk/PVPScan/Libs/AceGUI-3.0/widgets/AceGUIContainer-Window.lua
New file
0,0 → 1,331
| local AceGUI = LibStub("AceGUI-3.0") |
| -- Lua APIs |
| local pairs, assert, type = pairs, assert, type |
| -- WoW APIs |
| local PlaySound = PlaySound |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: GameFontNormal |
| ---------------- |
| -- Main Frame -- |
| ---------------- |
| --[[ |
| Events : |
| OnClose |
| ]] |
| do |
| local Type = "Window" |
| local Version = 4 |
| local function frameOnClose(this) |
| this.obj:Fire("OnClose") |
| end |
| local function closeOnClick(this) |
| PlaySound("gsTitleOptionExit") |
| 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() |
| self:EnableResize(true) |
| self:Show() |
| 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 EnableResize(self, state) |
| local func = state and "Show" or "Hide" |
| self.sizer_se[func](self.sizer_se) |
| self.sizer_s[func](self.sizer_s) |
| self.sizer_e[func](self.sizer_e) |
| 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.EnableResize = EnableResize |
| 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 |
trunk/PVPScan/Libs/AceGUI-3.0/widgets/AceGUIContainer-ScrollFrame.lua
New file
0,0 → 1,204
| --[[----------------------------------------------------------------------------- |
| ScrollFrame Container |
| Plain container that scrolls its content and doesn't grow in height. |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "ScrollFrame", 23 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local pairs, assert, type = pairs, assert, type |
| local min, max, floor, abs = math.min, math.max, math.floor, math.abs |
| -- WoW APIs |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| --[[----------------------------------------------------------------------------- |
| Support functions |
| -------------------------------------------------------------------------------]] |
| local function FixScrollOnUpdate(frame) |
| frame:SetScript("OnUpdate", nil) |
| frame.obj:FixScroll() |
| end |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function ScrollFrame_OnMouseWheel(frame, value) |
| frame.obj:MoveScroll(value) |
| end |
| local function ScrollFrame_OnSizeChanged(frame) |
| frame:SetScript("OnUpdate", FixScrollOnUpdate) |
| end |
| local function ScrollBar_OnScrollValueChanged(frame, value) |
| frame.obj:SetScroll(value) |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:SetScroll(0) |
| self.scrollframe:SetScript("OnUpdate", FixScrollOnUpdate) |
| end, |
| ["OnRelease"] = function(self) |
| self.status = nil |
| for k in pairs(self.localstatus) do |
| self.localstatus[k] = nil |
| end |
| self.scrollframe:SetPoint("BOTTOMRIGHT") |
| self.scrollbar:Hide() |
| self.scrollBarShown = nil |
| self.content.height, self.content.width = nil, nil |
| end, |
| ["SetScroll"] = function(self, value) |
| local status = self.status or self.localstatus |
| local viewheight = self.scrollframe:GetHeight() |
| local height = self.content:GetHeight() |
| local offset |
| if viewheight > height then |
| offset = 0 |
| else |
| offset = floor((height - viewheight) / 1000.0 * value) |
| end |
| self.content:ClearAllPoints() |
| self.content:SetPoint("TOPLEFT", 0, offset) |
| self.content:SetPoint("TOPRIGHT", 0, offset) |
| status.offset = offset |
| status.scrollvalue = value |
| end, |
| ["MoveScroll"] = function(self, value) |
| local status = self.status or self.localstatus |
| local height, viewheight = self.scrollframe:GetHeight(), self.content:GetHeight() |
| if self.scrollBarShown then |
| local diff = height - viewheight |
| local delta = 1 |
| if value < 0 then |
| delta = -1 |
| end |
| self.scrollbar:SetValue(min(max(status.scrollvalue + delta*(1000/(diff/45)),0), 1000)) |
| end |
| end, |
| ["FixScroll"] = function(self) |
| if self.updateLock then return end |
| self.updateLock = true |
| local status = self.status or self.localstatus |
| local height, viewheight = self.scrollframe:GetHeight(), self.content:GetHeight() |
| local offset = status.offset or 0 |
| local curvalue = self.scrollbar:GetValue() |
| -- Give us a margin of error of 2 pixels to stop some conditions that i would blame on floating point inaccuracys |
| -- No-one is going to miss 2 pixels at the bottom of the frame, anyhow! |
| if viewheight < height + 2 then |
| if self.scrollBarShown then |
| self.scrollBarShown = nil |
| self.scrollbar:Hide() |
| self.scrollbar:SetValue(0) |
| self.scrollframe:SetPoint("BOTTOMRIGHT") |
| self:DoLayout() |
| end |
| else |
| if not self.scrollBarShown then |
| self.scrollBarShown = true |
| self.scrollbar:Show() |
| self.scrollframe:SetPoint("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 |
| self.content:ClearAllPoints() |
| self.content:SetPoint("TOPLEFT", 0, offset) |
| self.content:SetPoint("TOPRIGHT", 0, offset) |
| status.offset = offset |
| end |
| end |
| self.updateLock = nil |
| end, |
| ["LayoutFinished"] = function(self, width, height) |
| self.content:SetHeight(height or 0 + 20) |
| self.scrollframe:SetScript("OnUpdate", FixScrollOnUpdate) |
| end, |
| ["SetStatusTable"] = function(self, status) |
| assert(type(status) == "table") |
| self.status = status |
| if not status.scrollvalue then |
| status.scrollvalue = 0 |
| end |
| end, |
| ["OnWidthSet"] = function(self, width) |
| local content = self.content |
| content.width = width |
| end, |
| ["OnHeightSet"] = function(self, height) |
| local content = self.content |
| content.height = height |
| end |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local function Constructor() |
| local frame = CreateFrame("Frame", nil, UIParent) |
| local num = AceGUI:GetNextWidgetNum(Type) |
| local scrollframe = CreateFrame("ScrollFrame", nil, frame) |
| scrollframe:SetPoint("TOPLEFT") |
| scrollframe:SetPoint("BOTTOMRIGHT") |
| scrollframe:EnableMouseWheel(true) |
| scrollframe:SetScript("OnMouseWheel", ScrollFrame_OnMouseWheel) |
| scrollframe:SetScript("OnSizeChanged", ScrollFrame_OnSizeChanged) |
| local scrollbar = CreateFrame("Slider", ("AceConfigDialogScrollFrame%dScrollBar"):format(num), scrollframe, "UIPanelScrollBarTemplate") |
| scrollbar:SetPoint("TOPLEFT", scrollframe, "TOPRIGHT", 4, -16) |
| scrollbar:SetPoint("BOTTOMLEFT", scrollframe, "BOTTOMRIGHT", 4, 16) |
| scrollbar:SetMinMaxValues(0, 1000) |
| scrollbar:SetValueStep(1) |
| scrollbar:SetValue(0) |
| scrollbar:SetWidth(16) |
| scrollbar:Hide() |
| -- set the script as the last step, so it doesn't fire yet |
| scrollbar:SetScript("OnValueChanged", ScrollBar_OnScrollValueChanged) |
| local scrollbg = scrollbar:CreateTexture(nil, "BACKGROUND") |
| scrollbg:SetAllPoints(scrollbar) |
| scrollbg:SetTexture(0, 0, 0, 0.4) |
| --Container Support |
| local content = CreateFrame("Frame", nil, scrollframe) |
| content:SetPoint("TOPLEFT") |
| content:SetPoint("TOPRIGHT") |
| content:SetHeight(400) |
| scrollframe:SetScrollChild(content) |
| local widget = { |
| localstatus = { scrollvalue = 0 }, |
| scrollframe = scrollframe, |
| scrollbar = scrollbar, |
| content = content, |
| frame = frame, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| scrollframe.obj, scrollbar.obj = widget, widget |
| return AceGUI:RegisterAsContainer(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
trunk/PVPScan/Libs/AceGUI-3.0/widgets/AceGUIContainer-DropDownGroup.lua
New file
0,0 → 1,157
| --[[----------------------------------------------------------------------------- |
| DropdownGroup Container |
| Container controlled by a dropdown on the top. |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "DropdownGroup", 21 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local assert, pairs, type = assert, pairs, type |
| -- WoW APIs |
| local CreateFrame = CreateFrame |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| 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 |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self.dropdown:SetText("") |
| self:SetDropdownWidth(200) |
| self:SetTitle("") |
| end, |
| ["OnRelease"] = function(self) |
| self.dropdown.list = nil |
| self.status = nil |
| for k in pairs(self.localstatus) do |
| self.localstatus[k] = nil |
| end |
| end, |
| ["SetTitle"] = function(self, title) |
| self.titletext:SetText(title) |
| self.dropdown.frame:ClearAllPoints() |
| if title and title ~= "" then |
| self.dropdown.frame:SetPoint("TOPRIGHT", -2, 0) |
| else |
| self.dropdown.frame:SetPoint("TOPLEFT", -1, 0) |
| end |
| end, |
| ["SetGroupList"] = function(self,list,order) |
| self.dropdown:SetList(list,order) |
| end, |
| ["SetStatusTable"] = function(self, status) |
| assert(type(status) == "table") |
| self.status = status |
| end, |
| ["SetGroup"] = function(self,group) |
| self.dropdown:SetValue(group) |
| local status = self.status or self.localstatus |
| status.selected = group |
| self:Fire("OnGroupSelected", group) |
| end, |
| ["OnWidthSet"] = function(self, width) |
| local content = self.content |
| local contentwidth = width - 26 |
| if contentwidth < 0 then |
| contentwidth = 0 |
| end |
| content:SetWidth(contentwidth) |
| content.width = contentwidth |
| end, |
| ["OnHeightSet"] = function(self, height) |
| local content = self.content |
| local contentheight = height - 63 |
| if contentheight < 0 then |
| contentheight = 0 |
| end |
| content:SetHeight(contentheight) |
| content.height = contentheight |
| end, |
| ["LayoutFinished"] = function(self, width, height) |
| self:SetHeight((height or 0) + 63) |
| end, |
| ["SetDropdownWidth"] = function(self, width) |
| self.dropdown:SetWidth(width) |
| end |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| 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 Constructor() |
| local frame = CreateFrame("Frame") |
| frame:SetHeight(100) |
| frame:SetWidth(100) |
| frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| local titletext = frame:CreateFontString(nil, "OVERLAY", "GameFontNormal") |
| titletext:SetPoint("TOPLEFT", 4, -5) |
| titletext:SetPoint("TOPRIGHT", -4, -5) |
| titletext:SetJustifyH("LEFT") |
| titletext:SetHeight(18) |
| local dropdown = AceGUI:Create("Dropdown") |
| dropdown.frame:SetParent(frame) |
| dropdown.frame:SetFrameLevel(dropdown.frame:GetFrameLevel() + 2) |
| dropdown:SetCallback("OnValueChanged", SelectedGroup) |
| dropdown.frame:SetPoint("TOPLEFT", -1, 0) |
| dropdown.frame:Show() |
| dropdown:SetLabel("") |
| local border = CreateFrame("Frame", nil, frame) |
| border:SetPoint("TOPLEFT", 0, -26) |
| border:SetPoint("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) |
| content:SetPoint("TOPLEFT", 10, -10) |
| content:SetPoint("BOTTOMRIGHT", -10, 10) |
| local widget = { |
| frame = frame, |
| localstatus = {}, |
| titletext = titletext, |
| dropdown = dropdown, |
| border = border, |
| content = content, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| dropdown.parentgroup = widget |
| return AceGUI:RegisterAsContainer(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
trunk/PVPScan/Libs/LibSharedMedia-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="LibSharedMedia-3.0.lua" /> |
| </Ui> |
trunk/PVPScan/Libs/LibSharedMedia-3.0/LibSharedMedia-3.0.lua
New file
0,0 → 1,237
| --[[ |
| Name: LibSharedMedia-3.0 |
| Revision: $Revision: 69 $ |
| Author: Elkano (elkano@gmx.de) |
| Inspired By: SurfaceLib by Haste/Otravi (troeks@gmail.com) |
| Website: http://www.wowace.com/projects/libsharedmedia-3-0/ |
| Description: Shared handling of media data (fonts, sounds, textures, ...) between addons. |
| Dependencies: LibStub, CallbackHandler-1.0 |
| License: LGPL v2.1 |
| ]] |
| local MAJOR, MINOR = "LibSharedMedia-3.0", 4030402 -- increase manualy on changes |
| local lib = LibStub:NewLibrary(MAJOR, MINOR) |
| if not lib then return end |
| local _G = getfenv(0) |
| local pairs = _G.pairs |
| local type = _G.type |
| local band = _G.bit.band |
| local table_insert = _G.table.insert |
| local table_sort = _G.table.sort |
| local locale = GetLocale() |
| local locale_is_western |
| local LOCALE_MASK = 0 |
| lib.LOCALE_BIT_koKR = 1 |
| lib.LOCALE_BIT_ruRU = 2 |
| lib.LOCALE_BIT_zhCN = 4 |
| lib.LOCALE_BIT_zhTW = 8 |
| lib.LOCALE_BIT_western = 128 |
| local CallbackHandler = LibStub:GetLibrary("CallbackHandler-1.0") |
| lib.callbacks = lib.callbacks or CallbackHandler:New(lib) |
| lib.DefaultMedia = lib.DefaultMedia or {} |
| lib.MediaList = lib.MediaList or {} |
| lib.MediaTable = lib.MediaTable or {} |
| lib.MediaType = lib.MediaType or {} |
| lib.OverrideMedia = lib.OverrideMedia or {} |
| local defaultMedia = lib.DefaultMedia |
| local mediaList = lib.MediaList |
| local mediaTable = lib.MediaTable |
| local overrideMedia = lib.OverrideMedia |
| -- create mediatype constants |
| lib.MediaType.BACKGROUND = "background" -- background textures |
| lib.MediaType.BORDER = "border" -- border textures |
| lib.MediaType.FONT = "font" -- fonts |
| lib.MediaType.STATUSBAR = "statusbar" -- statusbar textures |
| lib.MediaType.SOUND = "sound" -- sound files |
| -- populate lib with default Blizzard data |
| -- BACKGROUND |
| if not lib.MediaTable.background then lib.MediaTable.background = {} end |
| lib.MediaTable.background["None"] = [[]] |
| lib.MediaTable.background["Blizzard Dialog Background"] = [[Interface\DialogFrame\UI-DialogBox-Background]] |
| lib.MediaTable.background["Blizzard Dialog Background Dark"] = [[Interface\DialogFrame\UI-DialogBox-Background-Dark]] |
| lib.MediaTable.background["Blizzard Dialog Background Gold"] = [[Interface\DialogFrame\UI-DialogBox-Gold-Background]] |
| lib.MediaTable.background["Blizzard Low Health"] = [[Interface\FullScreenTextures\LowHealth]] |
| lib.MediaTable.background["Blizzard Marble"] = [[Interface\FrameGeneral\UI-Background-Marble]] |
| lib.MediaTable.background["Blizzard Out of Control"] = [[Interface\FullScreenTextures\OutOfControl]] |
| lib.MediaTable.background["Blizzard Parchment"] = [[Interface\AchievementFrame\UI-Achievement-Parchment-Horizontal]] |
| lib.MediaTable.background["Blizzard Parchment 2"] = [[Interface\AchievementFrame\UI-GuildAchievement-Parchment-Horizontal]] |
| lib.MediaTable.background["Blizzard Rock"] = [[Interface\FrameGeneral\UI-Background-Rock]] |
| lib.MediaTable.background["Blizzard Tabard Background"] = [[Interface\TabardFrame\TabardFrameBackground]] |
| lib.MediaTable.background["Blizzard Tooltip"] = [[Interface\Tooltips\UI-Tooltip-Background]] |
| lib.MediaTable.background["Solid"] = [[Interface\Buttons\WHITE8X8]] |
| lib.DefaultMedia.background = "None" |
| -- BORDER |
| if not lib.MediaTable.border then lib.MediaTable.border = {} end |
| lib.MediaTable.border["None"] = [[]] |
| lib.MediaTable.border["Blizzard Achievement Wood"] = [[Interface\AchievementFrame\UI-Achievement-WoodBorder]] |
| lib.MediaTable.border["Blizzard Chat Bubble"] = [[Interface\Tooltips\ChatBubble-Backdrop]] |
| lib.MediaTable.border["Blizzard Dialog"] = [[Interface\DialogFrame\UI-DialogBox-Border]] |
| lib.MediaTable.border["Blizzard Dialog Gold"] = [[Interface\DialogFrame\UI-DialogBox-Gold-Border]] |
| lib.MediaTable.border["Blizzard Party"] = [[Interface\CHARACTERFRAME\UI-Party-Border]] |
| lib.MediaTable.border["Blizzard Tooltip"] = [[Interface\Tooltips\UI-Tooltip-Border]] |
| lib.DefaultMedia.border = "None" |
| -- FONT |
| if not lib.MediaTable.font then lib.MediaTable.font = {} end |
| local SML_MT_font = lib.MediaTable.font |
| if locale == "koKR" then |
| LOCALE_MASK = lib.LOCALE_BIT_koKR |
| -- |
| SML_MT_font["êµµì ê¸ê¼´"] = [[Fonts\2002B.TTF]] |
| SML_MT_font["기본 ê¸ê¼´"] = [[Fonts\2002.TTF]] |
| SML_MT_font["ë°ë¯¸ì§ ê¸ê¼´"] = [[Fonts\K_Damage.TTF]] |
| SML_MT_font["íì¤í¸ ê¸ê¼´"] = [[Fonts\K_Pagetext.TTF]] |
| -- |
| lib.DefaultMedia["font"] = "기본 ê¸ê¼´" -- someone from koKR please adjust if needed |
| -- |
| elseif locale == "zhCN" then |
| LOCALE_MASK = lib.LOCALE_BIT_zhCN |
| -- |
| SML_MT_font["伤害æ°å"] = [[Fonts\ARKai_C.ttf]] |
| SML_MT_font["é»è®¤"] = [[Fonts\ARKai_T.ttf]] |
| SML_MT_font["è天"] = [[Fonts\ARHei.ttf]] |
| -- |
| lib.DefaultMedia["font"] = "é»è®¤" -- someone from zhCN please adjust if needed |
| -- |
| elseif locale == "zhTW" then |
| LOCALE_MASK = lib.LOCALE_BIT_zhTW |
| -- |
| SML_MT_font["æ示è¨æ¯"] = [[Fonts\bHEI00M.ttf]] |
| SML_MT_font["è天"] = [[Fonts\bHEI01B.ttf]] |
| SML_MT_font["å·å®³æ¸å"] = [[Fonts\bKAI00M.ttf]] |
| SML_MT_font["é è¨"] = [[Fonts\bLEI00D.ttf]] |
| -- |
| lib.DefaultMedia["font"] = "é è¨" -- someone from zhTW please adjust if needed |
| elseif locale == "ruRU" then |
| LOCALE_MASK = lib.LOCALE_BIT_ruRU |
| -- |
| SML_MT_font["Arial Narrow"] = [[Fonts\ARIALN.TTF]] |
| SML_MT_font["Friz Quadrata TT"] = [[Fonts\FRIZQT__.TTF]] |
| SML_MT_font["Morpheus"] = [[Fonts\MORPHEUS.TTF]] |
| SML_MT_font["Nimrod MT"] = [[Fonts\NIM_____.ttf]] |
| SML_MT_font["Skurri"] = [[Fonts\SKURRI.TTF]] |
| -- |
| lib.DefaultMedia.font = "Friz Quadrata TT" |
| -- |
| else |
| LOCALE_MASK = lib.LOCALE_BIT_western |
| locale_is_western = true |
| -- |
| SML_MT_font["Arial Narrow"] = [[Fonts\ARIALN.TTF]] |
| SML_MT_font["Friz Quadrata TT"] = [[Fonts\FRIZQT__.TTF]] |
| SML_MT_font["Morpheus"] = [[Fonts\MORPHEUS.TTF]] |
| SML_MT_font["Skurri"] = [[Fonts\SKURRI.TTF]] |
| -- |
| lib.DefaultMedia.font = "Friz Quadrata TT" |
| -- |
| end |
| -- STATUSBAR |
| if not lib.MediaTable.statusbar then lib.MediaTable.statusbar = {} end |
| lib.MediaTable.statusbar["Blizzard"] = [[Interface\TargetingFrame\UI-StatusBar]] |
| lib.MediaTable.statusbar["Blizzard Character Skills Bar"] = [[Interface\PaperDollInfoFrame\UI-Character-Skills-Bar]] |
| lib.DefaultMedia.statusbar = "Blizzard" |
| -- SOUND |
| if not lib.MediaTable.sound then lib.MediaTable.sound = {} end |
| lib.MediaTable.sound["None"] = [[Interface\Quiet.ogg]] -- Relies on the fact that PlaySound[File] doesn't error on non-existing input. |
| lib.DefaultMedia.sound = "None" |
| local function rebuildMediaList(mediatype) |
| local mtable = mediaTable[mediatype] |
| if not mtable then return end |
| if not mediaList[mediatype] then mediaList[mediatype] = {} end |
| local mlist = mediaList[mediatype] |
| -- list can only get larger, so simply overwrite it |
| local i = 0 |
| for k in pairs(mtable) do |
| i = i + 1 |
| mlist[i] = k |
| end |
| table_sort(mlist) |
| end |
| function lib:Register(mediatype, key, data, langmask) |
| if type(mediatype) ~= "string" then |
| error(MAJOR..":Register(mediatype, key, data, langmask) - mediatype must be string, got "..type(mediatype)) |
| end |
| if type(key) ~= "string" then |
| error(MAJOR..":Register(mediatype, key, data, langmask) - key must be string, got "..type(key)) |
| end |
| mediatype = mediatype:lower() |
| if mediatype == lib.MediaType.FONT and ((langmask and band(langmask, LOCALE_MASK) == 0) or not (langmask or locale_is_western)) then return false end |
| if not mediaTable[mediatype] then mediaTable[mediatype] = {} end |
| local mtable = mediaTable[mediatype] |
| if mtable[key] then return false end |
| mtable[key] = data |
| rebuildMediaList(mediatype) |
| self.callbacks:Fire("LibSharedMedia_Registered", mediatype, key) |
| return true |
| end |
| function lib:Fetch(mediatype, key, noDefault) |
| local mtt = mediaTable[mediatype] |
| local overridekey = overrideMedia[mediatype] |
| local result = mtt and ((overridekey and mtt[overridekey] or mtt[key]) or (not noDefault and defaultMedia[mediatype] and mtt[defaultMedia[mediatype]])) or nil |
| return result ~= "" and result or nil |
| end |
| function lib:IsValid(mediatype, key) |
| return mediaTable[mediatype] and (not key or mediaTable[mediatype][key]) and true or false |
| end |
| function lib:HashTable(mediatype) |
| return mediaTable[mediatype] |
| end |
| function lib:List(mediatype) |
| if not mediaTable[mediatype] then |
| return nil |
| end |
| if not mediaList[mediatype] then |
| rebuildMediaList(mediatype) |
| end |
| return mediaList[mediatype] |
| end |
| function lib:GetGlobal(mediatype) |
| return overrideMedia[mediatype] |
| end |
| function lib:SetGlobal(mediatype, key) |
| if not mediaTable[mediatype] then |
| return false |
| end |
| overrideMedia[mediatype] = (key and mediaTable[mediatype][key]) and key or nil |
| self.callbacks:Fire("LibSharedMedia_SetGlobal", mediatype, overrideMedia[mediatype]) |
| return true |
| end |
| function lib:GetDefault(mediatype) |
| return defaultMedia[mediatype] |
| end |
| function lib:SetDefault(mediatype, key) |
| if mediaTable[mediatype] and mediaTable[mediatype][key] and not defaultMedia[mediatype] then |
| defaultMedia[mediatype] = key |
| return true |
| else |
| return false |
| end |
| end |
trunk/PVPScan/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> |
trunk/PVPScan/Libs/AceAddon-3.0/AceAddon-3.0.lua
New file
0,0 → 1,659
| --- **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 1036 2011-08-16 22:45:05Z nevcairiel $ |
| local MAJOR, MINOR = "AceAddon-3.0", 11 |
| 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 |
| -- Lua APIs |
| local tinsert, tconcat, tremove = table.insert, table.concat, table.remove |
| local fmt, tostring = string.format, tostring |
| local select, pairs, next, type, unpack = select, pairs, next, type, unpack |
| local loadstring, assert, error = loadstring, assert, error |
| local setmetatable, getmetatable, rawset, rawget = setmetatable, getmetatable, rawset, rawget |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: LibStub, IsLoggedIn, geterrorhandler |
| --[[ |
| 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.orderedModules = {} |
| 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 |
| tinsert(self.orderedModules, 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, skipPMixins) |
| for k, v in pairs(mixins) do |
| target[k] = v |
| end |
| if not skipPMixins then |
| for k, v in pairs(pmixins) do |
| target[k] = target[k] or v |
| end |
| 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. |
| local modules = addon.orderedModules |
| for i = 1, #modules do |
| self:EnableAddon(modules[i]) |
| 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. |
| local modules = addon.orderedModules |
| for i = 1, #modules do |
| self:DisableAddon(modules[i]) |
| 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) |
| -- 2011-08-17 nevcairiel - ignore the load event of Blizzard_DebugTools, so a potential startup error isn't swallowed up |
| if (event == "ADDON_LOADED" and arg1 ~= "Blizzard_DebugTools") 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, true) |
| end |
| -- 2010-10-27 nevcairiel - add new "orderedModules" table |
| if oldminor and oldminor < 10 then |
| for name, addon in pairs(AceAddon.addons) do |
| addon.orderedModules = {} |
| for module_name, module in pairs(addon.modules) do |
| tinsert(addon.orderedModules, module) |
| end |
| end |
| end |
trunk/PVPScan/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> |
trunk/PVPScan/Libs/AceConfig-3.0/AceConfig-3.0.lua
New file
0,0 → 1,57
| --- 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 969 2010-10-07 02:11:48Z shefki $ |
| --[[ |
| 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") |
| --TODO: local cfgdlg = LibStub("AceConfigDialog-3.0", true) |
| --TODO: local cfgdrp = LibStub("AceConfigDropdown-3.0", true) |
| -- Lua APIs |
| local pcall, error, type, pairs = pcall, error, type, pairs |
| -- ------------------------------------------------------------------- |
| -- :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). http://www.wowace.com/addons/ace3/pages/ace-config-3-0-options-tables/ |
| -- @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 |
trunk/PVPScan/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> |
trunk/PVPScan/Libs/AceConfig-3.0/AceConfigDialog-3.0/AceConfigDialog-3.0.lua
New file
0,0 → 1,1947
| --- 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 1089 2013-09-13 14:32:35Z nevcairiel $ |
| local LibStub = LibStub |
| local MAJOR, MINOR = "AceConfigDialog-3.0", 58 |
| local AceConfigDialog, oldminor = 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 {} |
| AceConfigDialog.frame.closeAllOverride = AceConfigDialog.frame.closeAllOverride or {} |
| local gui = LibStub("AceGUI-3.0") |
| local reg = LibStub("AceConfigRegistry-3.0") |
| -- Lua APIs |
| local tconcat, tinsert, tsort, tremove, tsort = table.concat, table.insert, table.sort, table.remove, table.sort |
| local strmatch, format = string.match, string.format |
| local assert, loadstring, error = assert, loadstring, error |
| local pairs, next, select, type, unpack, wipe, ipairs = pairs, next, select, type, unpack, wipe, ipairs |
| local rawset, tostring, tonumber = rawset, tostring, tonumber |
| local math_min, math_max, math_floor = math.min, math.max, math.floor |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: NORMAL_FONT_COLOR, GameTooltip, StaticPopupDialogs, ACCEPT, CANCEL, StaticPopup_Show |
| -- GLOBALS: PlaySound, GameFontHighlight, GameFontHighlightSmall, GameFontHighlightLarge |
| -- GLOBALS: CloseSpecialWindows, InterfaceOptions_AddCategory, geterrorhandler |
| local emptyTbl = {} |
| --[[ |
| 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, ...) |
| 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 |
| wipe(t) |
| 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(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 |
| tsort(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 |
| if user.orderlist then |
| del(user.orderlist) |
| 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 |
| t.preferredIndex = STATICPOPUP_NUMDIALOGS |
| local dialog, oldstrata |
| t.OnAccept = function() |
| safecall(func, unpack(t)) |
| if dialog and oldstrata then |
| dialog:SetFrameStrata(oldstrata) |
| end |
| AceConfigDialog:Open(appName, rootframe, unpack(basepath or emptyTbl)) |
| del(info) |
| end |
| t.OnCancel = function() |
| if dialog and oldstrata then |
| dialog:SetFrameStrata(oldstrata) |
| end |
| AceConfigDialog:Open(appName, rootframe, unpack(basepath or emptyTbl)) |
| 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(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(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(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(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") or emptyTbl |
| --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, unpack(basepath)) |
| else |
| AceConfigDialog:Open(user.appName, unpack(basepath)) |
| end |
| end |
| elseif option.type == "range" then |
| if event == "OnMouseUp" then |
| if iscustom then |
| AceConfigDialog:Open(user.appName, user.rootframe, unpack(basepath)) |
| else |
| AceConfigDialog:Open(user.appName, 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, unpack(basepath)) |
| else |
| AceConfigDialog:Open(user.appName, 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 (not option.softMin and 0 or nil), option.max or (not option.softMax and 100 or nil), option.step |
| if min then |
| if step then |
| value = math_floor((value - min) / step + 0.5) * step + min |
| end |
| value = math_max(value, min) |
| end |
| if max then |
| value = math_min(value, max) |
| 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") or emptyTbl |
| if iscustom then |
| AceConfigDialog:Open(user.appName, user.rootframe, unpack(basepath)) |
| else |
| AceConfigDialog:Open(user.appName, 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") or emptyTbl |
| if iscustom then |
| AceConfigDialog:Open(user.appName, user.rootframe, unpack(basepath)) |
| else |
| AceConfigDialog:Open(user.appName, 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 order = 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) |
| tinsert(order, k) |
| end |
| path[#path] = nil |
| end |
| end |
| del(opts) |
| del(keySort) |
| return groups, order |
| 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.iconCoords = GetOptionsMemberValue("iconCoords", 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 |
| geterrorhandler()(("Invalid Custom Control Type - %s"):format(tostring(controlType))) |
| control = gui:Create(v.multiline and "MultiLineEditBox" or "EditBox") |
| end |
| if v.multiline and control.SetNumLines then |
| control:SetNumLines(tonumber(v.multiline) or 4) |
| 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 |
| local image = GetOptionsMemberValue("image", v, options, path, appName) |
| local imageCoords = GetOptionsMemberValue("imageCoords", v, options, path, appName) |
| if type(image) == "string" then |
| if type(imageCoords) == "table" then |
| control:SetImage(image, unpack(imageCoords)) |
| else |
| control:SetImage(image) |
| end |
| end |
| elseif v.type == "range" then |
| control = gui:Create("Slider") |
| control:SetLabel(name) |
| control:SetSliderValues(v.softMin or v.min or 0, v.softMax or 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) |
| if v.style == "radio" then |
| local disabled = CheckOptionDisabled(v, options, path, appName) |
| local width = GetOptionsMemberValue("width",v,options,path,appName) |
| control = gui:Create("InlineGroup") |
| control:SetLayout("Flow") |
| control:SetTitle(name) |
| control.width = "fill" |
| control:PauseLayout() |
| local optionValue = GetOptionsMemberValue("get",v, options, path, appName) |
| local t = {} |
| for value, text in pairs(values) do |
| t[#t+1]=value |
| end |
| tsort(t) |
| for k, value in ipairs(t) do |
| local text = values[value] |
| local radio = gui:Create("CheckBox") |
| radio:SetLabel(text) |
| radio:SetUserData("value", value) |
| radio:SetUserData("text", text) |
| radio:SetDisabled(disabled) |
| radio:SetType("radio") |
| radio:SetValue(optionValue == value) |
| radio:SetCallback("OnValueChanged", ActivateMultiControl) |
| InjectInfo(radio, options, v, path, rootframe, appName) |
| control:AddChild(radio) |
| if width == "double" then |
| radio:SetWidth(width_multiplier * 2) |
| elseif width == "half" then |
| radio:SetWidth(width_multiplier / 2) |
| elseif width == "full" then |
| radio.width = "fill" |
| else |
| radio:SetWidth(width_multiplier) |
| end |
| end |
| control:ResumeLayout() |
| control:DoLayout() |
| else |
| local controlType = v.dialogControl or v.control or "Dropdown" |
| control = gui:Create(controlType) |
| if not control then |
| geterrorhandler()(("Invalid Custom Control Type - %s"):format(tostring(controlType))) |
| control = gui:Create("Dropdown") |
| end |
| local itemType = v.itemControl |
| if itemType and not gui:GetWidgetVersion(itemType) then |
| geterrorhandler()(("Invalid Custom Item Type - %s"):format(tostring(itemType))) |
| itemType = nil |
| end |
| control:SetLabel(name) |
| control:SetList(values, nil, itemType) |
| local value = GetOptionsMemberValue("get",v, options, path, appName) |
| if not values[value] then |
| value = nil |
| end |
| control:SetValue(value) |
| control:SetCallback("OnValueChanged", ActivateControl) |
| end |
| 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 |
| tsort(valuesort) |
| if controlType then |
| control = gui:Create(controlType) |
| if not control then |
| geterrorhandler()(("Invalid Custom Control Type - %s"):format(tostring(controlType))) |
| end |
| end |
| if control then |
| 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(GetOptionsMemberValue("hasAlpha",v, options, path, appName)) |
| 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, ("\001"):split(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, ("\001"):split(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, ("\001"):split(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" |
| for i = 1, #path do |
| local v = path[i] |
| group = GetSubOption(group, v) |
| inline = inline or pickfirstset(v.dialogInline,v.guiInline,v.inline, false) |
| parenttype = grouptype |
| grouptype = group.childGroups |
| end |
| 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" and container.type ~= "SimpleGroup" 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 |
| local name = GetOptionsMemberValue("name", group, options, path, appName) |
| 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") |
| select:SetTitle(name) |
| 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, orderlist = BuildSelect(group, options, path, appName) |
| select:SetGroupList(grouplist, orderlist) |
| select:SetUserData("grouplist", grouplist) |
| select:SetUserData("orderlist", orderlist) |
| local firstgroup = orderlist[1] |
| 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 |
| for key, widget in pairs(AceConfigDialog.BlizOptions[appName]) do |
| if not widget:IsVisible() then |
| widget:ReleaseChildren() |
| end |
| end |
| end |
| this.closing[appName] = nil |
| end |
| if this.closeAll then |
| for k, v in pairs(AceConfigDialog.OpenFrames) do |
| if not this.closeAllOverride[k] then |
| v:Hide() |
| end |
| end |
| this.closeAll = nil |
| wipe(this.closeAllOverride) |
| end |
| for appName in pairs(this.apps) do |
| if AceConfigDialog.OpenFrames[appName] then |
| local user = AceConfigDialog.OpenFrames[appName]:GetUserDataTable() |
| AceConfigDialog:Open(appName, unpack(user.basepath or emptyTbl)) |
| end |
| if AceConfigDialog.BlizOptions and AceConfigDialog.BlizOptions[appName] then |
| for key, widget in pairs(AceConfigDialog.BlizOptions[appName]) do |
| local user = widget:GetUserDataTable() |
| if widget:IsVisible() then |
| AceConfigDialog:Open(widget:GetUserData("appName"), widget, unpack(user.basepath or emptyTbl)) |
| end |
| end |
| end |
| this.apps[appName] = nil |
| end |
| this:SetScript("OnUpdate", nil) |
| end |
| -- Upgrade the OnUpdate script as well, if needed. |
| if AceConfigDialog.frame:GetScript("OnUpdate") then |
| AceConfigDialog.frame:SetScript("OnUpdate", RefreshOnUpdate) |
| 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) |
| if AceConfigDialog.frame.closeAll then |
| -- close all is set, but thats not good, since we're just opening here, so force it |
| AceConfigDialog.frame.closeAllOverride[appName] = true |
| end |
| end |
| -- convert pre-39 BlizOptions structure to the new format |
| if oldminor and oldminor < 39 and AceConfigDialog.BlizOptions then |
| local old = AceConfigDialog.BlizOptions |
| local new = {} |
| for key, widget in pairs(old) do |
| local appName = widget:GetUserData("appName") |
| if not new[appName] then new[appName] = {} end |
| new[appName][key] = widget |
| end |
| AceConfigDialog.BlizOptions = new |
| else |
| AceConfigDialog.BlizOptions = AceConfigDialog.BlizOptions or {} |
| end |
| local function FeedToBlizPanel(widget, event) |
| local path = widget:GetUserData("path") |
| AceConfigDialog:Open(widget:GetUserData("appName"), widget, unpack(path or emptyTbl)) |
| 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[appName] then |
| BlizOptions[appName] = {} |
| end |
| if not BlizOptions[appName][key] then |
| local group = gui:Create("BlizOptionsGroup") |
| BlizOptions[appName][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 |
trunk/PVPScan/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> |
trunk/PVPScan/Libs/AceConfig-3.0/AceConfigCmd-3.0/AceConfigCmd-3.0.lua
New file
0,0 → 1,794
| --- 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 1045 2011-12-09 17:58:40Z nevcairiel $ |
| --[[ |
| AceConfigCmd-3.0 |
| Handles commandline optionstable access |
| REQUIRES: AceConsole-3.0 for command registration (loaded on demand) |
| ]] |
| -- TODO: plugin args |
| local MAJOR, MINOR = "AceConfigCmd-3.0", 13 |
| 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" |
| -- Lua APIs |
| local strsub, strsplit, strlower, strmatch, strtrim = string.sub, string.split, string.lower, string.match, string.trim |
| local format, tonumber, tostring = string.format, tonumber, tostring |
| local tsort, tinsert = table.sort, table.insert |
| local select, pairs, next, type = select, pairs, next, type |
| local error, assert = error, assert |
| -- WoW APIs |
| local _G = _G |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: LibStub, SELECTED_CHAT_FRAME, DEFAULT_CHAT_FRAME |
| 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 |
| -- 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" |
| -- 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 checkhidden(info, inputpos, tab) |
| if tab.cmdHidden~=nil then |
| return tab.cmdHidden |
| end |
| local hidden = tab.hidden |
| if type(hidden) == "function" or type(hidden) == "string" then |
| info.hidden = hidden |
| hidden = callmethod(info, inputpos, tab, 'hidden') |
| info.hidden = nil |
| end |
| return hidden |
| end |
| local function showhelp(info, inputpos, tab, depth, 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 |
| tinsert(sortTbl, k) |
| refTbl[k] = v |
| end |
| end |
| tsort(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 i = 1, #sortTbl do |
| local k = sortTbl[i] |
| local v = refTbl[k] |
| if not checkhidden(info, inputpos, v) then |
| if v.type ~= "description" and v.type ~= "header" 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)..":") |
| local oldhandler,oldhandler_at = getparam(info, inputpos, v, depth, "handler", handlertypes, handlermsg) |
| showhelp(info, inputpos, v, depth, true) |
| info.handler,info.handler_at = oldhandler,oldhandler_at |
| else |
| local key = k:gsub(" ", "_") |
| print(" |cffffff78"..key.."|r - "..(desc or name or "")) |
| end |
| 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 |
| -- 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 = (info.input):find(" *([^ ]+) *", inputpos) |
| if not arg then |
| showhelp(info, inputpos, tab, depth) |
| 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 str:gmatch("[^ ]+") do |
| --parse option=on etc |
| local opt, val = v:match('(.+)=(.+)') |
| --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 |
| local hasAlpha = tab.hasAlpha |
| if type(hasAlpha) == "function" or type(hasAlpha) == "string" then |
| info.hasAlpha = hasAlpha |
| hasAlpha = callmethod(info, inputpos, tab, 'hasAlpha') |
| info.hasAlpha = nil |
| end |
| if 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 |
trunk/PVPScan/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> |
trunk/PVPScan/Libs/AceConfig-3.0/AceConfigRegistry-3.0/AceConfigRegistry-3.0.lua
New file
0,0 → 1,347
| --- 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 1045 2011-12-09 17:58:40Z nevcairiel $ |
| local MAJOR, MINOR = "AceConfigRegistry-3.0", 14 |
| 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 |
| -- Lua APIs |
| local tinsert, tconcat = table.insert, table.concat |
| local strfind, strmatch = string.find, string.match |
| local type, tostring, select, pairs = type, tostring, select, pairs |
| local error, assert = error, assert |
| ----------------------------------------------------------------------- |
| -- 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(): "..tconcat(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, |
| image=optstringfunc, |
| imageCoords=optmethodtable, |
| }, |
| tristate={ |
| }, |
| range={ |
| min=optnumber, |
| softMin=optnumber, |
| max=optnumber, |
| softMax=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, |
| itemControl=optstring, |
| }, |
| multiselect={ |
| values=ismethodtable, |
| style=optstring, |
| tristate=optbool, |
| control=optstring, |
| dialogControl=optstring, |
| dropdownControl=optstring, |
| }, |
| color={ |
| hasAlpha=optmethodbool, |
| }, |
| 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 |
trunk/PVPScan/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> |
trunk/PVPScan/Libs/AceDB-3.0/AceDB-3.0.lua
New file
0,0 → 1,742
| --- **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 1096 2013-09-13 15:05:40Z nevcairiel $ |
| local ACEDB_MAJOR, ACEDB_MINOR = "AceDB-3.0", 23 |
| local AceDB, oldminor = LibStub:NewLibrary(ACEDB_MAJOR, ACEDB_MINOR) |
| if not AceDB then return end -- No upgrade needed |
| -- Lua APIs |
| local type, pairs, next, error = type, pairs, next, error |
| local setmetatable, getmetatable, rawset, rawget = setmetatable, getmetatable, rawset, rawget |
| -- WoW APIs |
| local _G = _G |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: LibStub |
| 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 |
| local factionrealmregionKey = factionrealmKey .. " - " .. string.sub(GetCVar("realmList"), 1, 2):upper() |
| local localeKey = GetLocale():lower() |
| -- Actual database initialization function |
| local function initdb(sv, defaults, defaultProfile, olddb, parent) |
| -- Generate the database keys for each section |
| -- map "true" to our "Default" profile |
| if defaultProfile == true then defaultProfile = "Default" end |
| local profileKey |
| if not parent then |
| -- Make a container for profile keys |
| if not sv.profileKeys then sv.profileKeys = {} end |
| -- Try to get the profile selected from the char db |
| profileKey = sv.profileKeys[charKey] or defaultProfile or charKey |
| -- save the selected profile for later |
| sv.profileKeys[charKey] = profileKey |
| else |
| -- Use the profile of the parents DB |
| profileKey = parent.keys.profile or defaultProfile or charKey |
| -- clear the profileKeys in the DB, namespaces don't need to store them |
| sv.profileKeys = nil |
| end |
| -- 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, |
| ["factionrealmregion"] = factionrealmregionKey, |
| ["profile"] = profileKey, |
| ["locale"] = localeKey, |
| ["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 |
| -- and cleans up empty sections |
| local function logoutHandler(frame, event) |
| if event == "PLAYER_LOGOUT" then |
| for db in pairs(AceDB.db_registry) do |
| db.callbacks:Fire("OnDatabaseShutdown", db) |
| db:RegisterDefaults(nil) |
| -- cleanup sections that are empty without defaults |
| local sv = rawget(db, "sv") |
| for section in pairs(db.keys) do |
| if rawget(sv, section) then |
| -- global is special, all other sections have sub-entrys |
| -- also don't delete empty profiles on main dbs, only on namespaces |
| if section ~= "global" and (section ~= "profiles" or rawget(db, "parent")) then |
| for key in pairs(sv[section]) do |
| if not next(sv[section][key]) then |
| sv[section][key] = nil |
| end |
| end |
| end |
| if not next(sv[section]) then |
| sv[section] = nil |
| end |
| 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 |
| -- if the storage exists, save the new profile |
| -- this won't exist on namespaces. |
| if self.sv.profileKeys then |
| self.sv.profileKeys[charKey] = name |
| end |
| -- 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.profiles, name) and not silent then |
| error("Cannot delete profile '" .. name .. "'. It does not exist.", 2) |
| end |
| self.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 |
| -- switch all characters that use this profile back to the default |
| if self.sv.profileKeys then |
| for key, profile in pairs(self.sv.profileKeys) do |
| if profile == name then |
| self.sv.profileKeys[key] = nil |
| end |
| 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.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, nil, true) |
| local profile = self.profile |
| local source = self.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 |
| -- @param noCallbacks if set to true, won't fire the OnProfileReset callback |
| function DBObjectLib:ResetProfile(noChildren, noCallbacks) |
| 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, nil, noCallbacks) |
| end |
| end |
| -- Callback: OnProfileReset, database |
| if not noCallbacks then |
| self.callbacks:Fire("OnProfileReset", self) |
| end |
| 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 = {} |
| _G[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 |
trunk/PVPScan/Libs/LibDBIcon-1.0/LibDBIcon-1.0.lua
New file
0,0 → 1,361
| --[[ |
| Name: DBIcon-1.0 |
| Revision: $Rev: 34 $ |
| Author(s): Rabbit (rabbit.magtheridon@gmail.com) |
| Description: Allows addons to register to recieve a lightweight minimap icon as an alternative to more heavy LDB displays. |
| Dependencies: LibStub |
| License: GPL v2 or later. |
| ]] |
| --[[ |
| Copyright (C) 2008-2011 Rabbit |
| This program is free software; you can redistribute it and/or |
| modify it under the terms of the GNU General Public License |
| as published by the Free Software Foundation; either version 2 |
| of the License, or (at your option) any later version. |
| This program is distributed in the hope that it will be useful, |
| but WITHOUT ANY WARRANTY; without even the implied warranty of |
| MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| GNU General Public License for more details. |
| You should have received a copy of the GNU General Public License |
| along with this program; if not, write to the Free Software |
| Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. |
| ]] |
| ----------------------------------------------------------------------- |
| -- DBIcon-1.0 |
| -- |
| -- Disclaimer: Most of this code was ripped from Barrel but fixed, streamlined |
| -- and cleaned up a lot so that it no longer sucks. |
| -- |
| local DBICON10 = "LibDBIcon-1.0" |
| local DBICON10_MINOR = tonumber(("$Rev: 34 $"):match("(%d+)")) |
| if not LibStub then error(DBICON10 .. " requires LibStub.") end |
| local ldb = LibStub("LibDataBroker-1.1", true) |
| if not ldb then error(DBICON10 .. " requires LibDataBroker-1.1.") end |
| local lib = LibStub:NewLibrary(DBICON10, DBICON10_MINOR) |
| if not lib then return end |
| lib.disabled = lib.disabled or nil |
| lib.objects = lib.objects or {} |
| lib.callbackRegistered = lib.callbackRegistered or nil |
| lib.callbacks = lib.callbacks or LibStub("CallbackHandler-1.0"):New(lib) |
| lib.notCreated = lib.notCreated or {} |
| function lib:IconCallback(event, name, key, value, dataobj) |
| if lib.objects[name] then |
| if key == "icon" then |
| lib.objects[name].icon:SetTexture(value) |
| elseif key == "iconCoords" then |
| lib.objects[name].icon:UpdateCoord() |
| elseif key == "iconR" then |
| local _, g, b = lib.objects[name].icon:GetVertexColor() |
| lib.objects[name].icon:SetVertexColor(value, g, b) |
| elseif key == "iconG" then |
| local r, _, b = lib.objects[name].icon:GetVertexColor() |
| lib.objects[name].icon:SetVertexColor(r, value, b) |
| elseif key == "iconB" then |
| local r, g = lib.objects[name].icon:GetVertexColor() |
| lib.objects[name].icon:SetVertexColor(r, g, value) |
| end |
| end |
| end |
| if not lib.callbackRegistered then |
| ldb.RegisterCallback(lib, "LibDataBroker_AttributeChanged__icon", "IconCallback") |
| ldb.RegisterCallback(lib, "LibDataBroker_AttributeChanged__iconCoords", "IconCallback") |
| ldb.RegisterCallback(lib, "LibDataBroker_AttributeChanged__iconR", "IconCallback") |
| ldb.RegisterCallback(lib, "LibDataBroker_AttributeChanged__iconG", "IconCallback") |
| ldb.RegisterCallback(lib, "LibDataBroker_AttributeChanged__iconB", "IconCallback") |
| lib.callbackRegistered = true |
| end |
| -- Tooltip code ripped from StatBlockCore by Funkydude |
| local function getAnchors(frame) |
| local x, y = frame:GetCenter() |
| if not x or not y then return "CENTER" end |
| local hhalf = (x > UIParent:GetWidth()*2/3) and "RIGHT" or (x < UIParent:GetWidth()/3) and "LEFT" or "" |
| local vhalf = (y > UIParent:GetHeight()/2) and "TOP" or "BOTTOM" |
| return vhalf..hhalf, frame, (vhalf == "TOP" and "BOTTOM" or "TOP")..hhalf |
| end |
| local function onEnter(self) |
| if self.isMoving then return end |
| local obj = self.dataObject |
| if obj.OnTooltipShow then |
| GameTooltip:SetOwner(self, "ANCHOR_NONE") |
| GameTooltip:SetPoint(getAnchors(self)) |
| obj.OnTooltipShow(GameTooltip) |
| GameTooltip:Show() |
| elseif obj.OnEnter then |
| obj.OnEnter(self) |
| end |
| end |
| local function onLeave(self) |
| local obj = self.dataObject |
| GameTooltip:Hide() |
| if obj.OnLeave then obj.OnLeave(self) end |
| end |
| -------------------------------------------------------------------------------- |
| local onClick, onMouseUp, onMouseDown, onDragStart, onDragStop, onDragEnd, updatePosition |
| do |
| local minimapShapes = { |
| ["ROUND"] = {true, true, true, true}, |
| ["SQUARE"] = {false, false, false, false}, |
| ["CORNER-TOPLEFT"] = {false, false, false, true}, |
| ["CORNER-TOPRIGHT"] = {false, false, true, false}, |
| ["CORNER-BOTTOMLEFT"] = {false, true, false, false}, |
| ["CORNER-BOTTOMRIGHT"] = {true, false, false, false}, |
| ["SIDE-LEFT"] = {false, true, false, true}, |
| ["SIDE-RIGHT"] = {true, false, true, false}, |
| ["SIDE-TOP"] = {false, false, true, true}, |
| ["SIDE-BOTTOM"] = {true, true, false, false}, |
| ["TRICORNER-TOPLEFT"] = {false, true, true, true}, |
| ["TRICORNER-TOPRIGHT"] = {true, false, true, true}, |
| ["TRICORNER-BOTTOMLEFT"] = {true, true, false, true}, |
| ["TRICORNER-BOTTOMRIGHT"] = {true, true, true, false}, |
| } |
| function updatePosition(button) |
| local angle = math.rad(button.db and button.db.minimapPos or button.minimapPos or 225) |
| local x, y, q = math.cos(angle), math.sin(angle), 1 |
| if x < 0 then q = q + 1 end |
| if y > 0 then q = q + 2 end |
| local minimapShape = GetMinimapShape and GetMinimapShape() or "ROUND" |
| local quadTable = minimapShapes[minimapShape] |
| if quadTable[q] then |
| x, y = x*80, y*80 |
| else |
| local diagRadius = 103.13708498985 --math.sqrt(2*(80)^2)-10 |
| x = math.max(-80, math.min(x*diagRadius, 80)) |
| y = math.max(-80, math.min(y*diagRadius, 80)) |
| end |
| button:SetPoint("CENTER", Minimap, "CENTER", x, y) |
| end |
| end |
| function onClick(self, b) if self.dataObject.OnClick then self.dataObject.OnClick(self, b) end end |
| function onMouseDown(self) self.isMouseDown = true; self.icon:UpdateCoord() end |
| function onMouseUp(self) self.isMouseDown = false; self.icon:UpdateCoord() end |
| do |
| local function onUpdate(self) |
| local mx, my = Minimap:GetCenter() |
| local px, py = GetCursorPosition() |
| local scale = Minimap:GetEffectiveScale() |
| px, py = px / scale, py / scale |
| if self.db then |
| self.db.minimapPos = math.deg(math.atan2(py - my, px - mx)) % 360 |
| else |
| self.minimapPos = math.deg(math.atan2(py - my, px - mx)) % 360 |
| end |
| updatePosition(self) |
| end |
| function onDragStart(self) |
| self:LockHighlight() |
| self.isMouseDown = true |
| self.icon:UpdateCoord() |
| self:SetScript("OnUpdate", onUpdate) |
| self.isMoving = true |
| GameTooltip:Hide() |
| end |
| end |
| function onDragStop(self) |
| self:SetScript("OnUpdate", nil) |
| self.isMouseDown = false |
| self.icon:UpdateCoord() |
| self:UnlockHighlight() |
| self.isMoving = nil |
| end |
| local defaultCoords = {0, 1, 0, 1} |
| local function updateCoord(self) |
| local coords = self:GetParent().dataObject.iconCoords or defaultCoords |
| local deltaX, deltaY = 0, 0 |
| if not self:GetParent().isMouseDown then |
| deltaX = (coords[2] - coords[1]) * 0.05 |
| deltaY = (coords[4] - coords[3]) * 0.05 |
| end |
| self:SetTexCoord(coords[1] + deltaX, coords[2] - deltaX, coords[3] + deltaY, coords[4] - deltaY) |
| end |
| local function createButton(name, object, db) |
| local button = CreateFrame("Button", "LibDBIcon10_"..name, Minimap) |
| button.dataObject = object |
| button.db = db |
| button:SetFrameStrata("MEDIUM") |
| button:SetSize(31, 31) |
| button:SetFrameLevel(8) |
| button:RegisterForClicks("anyUp") |
| button:RegisterForDrag("LeftButton") |
| button:SetHighlightTexture("Interface\\Minimap\\UI-Minimap-ZoomButton-Highlight") |
| local overlay = button:CreateTexture(nil, "OVERLAY") |
| overlay:SetSize(53, 53) |
| overlay:SetTexture("Interface\\Minimap\\MiniMap-TrackingBorder") |
| overlay:SetPoint("TOPLEFT") |
| local background = button:CreateTexture(nil, "BACKGROUND") |
| background:SetSize(20, 20) |
| background:SetTexture("Interface\\Minimap\\UI-Minimap-Background") |
| background:SetPoint("TOPLEFT", 7, -5) |
| local icon = button:CreateTexture(nil, "ARTWORK") |
| icon:SetSize(17, 17) |
| icon:SetTexture(object.icon) |
| icon:SetPoint("TOPLEFT", 7, -6) |
| button.icon = icon |
| button.isMouseDown = false |
| local r, g, b = icon:GetVertexColor() |
| icon:SetVertexColor(object.iconR or r, object.iconG or g, object.iconB or b) |
| icon.UpdateCoord = updateCoord |
| icon:UpdateCoord() |
| button:SetScript("OnEnter", onEnter) |
| button:SetScript("OnLeave", onLeave) |
| button:SetScript("OnClick", onClick) |
| if not db or not db.lock then |
| button:SetScript("OnDragStart", onDragStart) |
| button:SetScript("OnDragStop", onDragStop) |
| end |
| button:SetScript("OnMouseDown", onMouseDown) |
| button:SetScript("OnMouseUp", onMouseUp) |
| lib.objects[name] = button |
| if lib.loggedIn then |
| updatePosition(button) |
| if not db or not db.hide then button:Show() |
| else button:Hide() end |
| end |
| lib.callbacks:Fire("LibDBIcon_IconCreated", button, name) -- Fire 'Icon Created' callback |
| end |
| -- We could use a metatable.__index on lib.objects, but then we'd create |
| -- the icons when checking things like :IsRegistered, which is not necessary. |
| local function check(name) |
| if lib.notCreated[name] then |
| createButton(name, lib.notCreated[name][1], lib.notCreated[name][2]) |
| lib.notCreated[name] = nil |
| end |
| end |
| lib.loggedIn = lib.loggedIn or false |
| -- Wait a bit with the initial positioning to let any GetMinimapShape addons |
| -- load up. |
| if not lib.loggedIn then |
| local f = CreateFrame("Frame") |
| f:SetScript("OnEvent", function() |
| for _, object in pairs(lib.objects) do |
| updatePosition(object) |
| if not lib.disabled and (not object.db or not object.db.hide) then object:Show() |
| else object:Hide() end |
| end |
| lib.loggedIn = true |
| f:SetScript("OnEvent", nil) |
| f = nil |
| end) |
| f:RegisterEvent("PLAYER_LOGIN") |
| end |
| local function getDatabase(name) |
| return lib.notCreated[name] and lib.notCreated[name][2] or lib.objects[name].db |
| end |
| function lib:Register(name, object, db) |
| if not object.icon then error("Can't register LDB objects without icons set!") end |
| if lib.objects[name] or lib.notCreated[name] then error("Already registered, nubcake.") end |
| if not lib.disabled and (not db or not db.hide) then |
| createButton(name, object, db) |
| else |
| lib.notCreated[name] = {object, db} |
| end |
| end |
| function lib:Lock(name) |
| if not lib:IsRegistered(name) then return end |
| if lib.objects[name] then |
| lib.objects[name]:SetScript("OnDragStart", nil) |
| lib.objects[name]:SetScript("OnDragStop", nil) |
| end |
| local db = getDatabase(name) |
| if db then db.lock = true end |
| end |
| function lib:Unlock(name) |
| if not lib:IsRegistered(name) then return end |
| if lib.objects[name] then |
| lib.objects[name]:SetScript("OnDragStart", onDragStart) |
| lib.objects[name]:SetScript("OnDragStop", onDragStop) |
| end |
| local db = getDatabase(name) |
| if db then db.lock = nil end |
| end |
| function lib:Hide(name) |
| if not lib.objects[name] then return end |
| lib.objects[name]:Hide() |
| end |
| function lib:Show(name) |
| if lib.disabled then return end |
| check(name) |
| lib.objects[name]:Show() |
| updatePosition(lib.objects[name]) |
| end |
| function lib:IsRegistered(name) |
| return (lib.objects[name] or lib.notCreated[name]) and true or false |
| end |
| function lib:Refresh(name, db) |
| if lib.disabled then return end |
| check(name) |
| local button = lib.objects[name] |
| if db then button.db = db end |
| updatePosition(button) |
| if not button.db or not button.db.hide then |
| button:Show() |
| else |
| button:Hide() |
| end |
| if not button.db or not button.db.lock then |
| button:SetScript("OnDragStart", onDragStart) |
| button:SetScript("OnDragStop", onDragStop) |
| else |
| button:SetScript("OnDragStart", nil) |
| button:SetScript("OnDragStop", nil) |
| end |
| end |
| function lib:GetMinimapButton(name) |
| return lib.objects[name] |
| end |
| function lib:EnableLibrary() |
| lib.disabled = nil |
| for name, object in pairs(lib.objects) do |
| if not object.db or not object.db.hide then |
| object:Show() |
| updatePosition(object) |
| end |
| end |
| for name, data in pairs(lib.notCreated) do |
| if not data.db or not data.db.hide then |
| createButton(name, data[1], data[2]) |
| lib.notCreated[name] = nil |
| end |
| end |
| end |
| function lib:DisableLibrary() |
| lib.disabled = true |
| for name, object in pairs(lib.objects) do |
| object:Hide() |
| end |
| end |
trunk/PVPScan/Libs/LibDataBroker-1.1/LibDataBroker-1.1.lua
New file
0,0 → 1,66
| assert(LibStub, "LibDataBroker-1.1 requires LibStub") |
| assert(LibStub:GetLibrary("CallbackHandler-1.0", true), "LibDataBroker-1.1 requires CallbackHandler-1.0") |
| local lib, oldminor = LibStub:NewLibrary("LibDataBroker-1.1", 3) |
| if not lib then return end |
| oldminor = oldminor or 0 |
| lib.callbacks = lib.callbacks or LibStub:GetLibrary("CallbackHandler-1.0"):New(lib) |
| lib.attributestorage, lib.namestorage, lib.proxystorage = lib.attributestorage or {}, lib.namestorage or {}, lib.proxystorage or {} |
| local attributestorage, namestorage, callbacks = lib.attributestorage, lib.namestorage, lib.callbacks |
| if oldminor < 2 then |
| lib.domt = { |
| __metatable = "access denied", |
| __index = function(self, key) return attributestorage[self] and attributestorage[self][key] end, |
| } |
| end |
| if oldminor < 3 then |
| lib.domt.__newindex = function(self, key, value) |
| if not attributestorage[self] then attributestorage[self] = {} end |
| if attributestorage[self][key] == value then return end |
| attributestorage[self][key] = value |
| local name = namestorage[self] |
| if not name then return end |
| callbacks:Fire("LibDataBroker_AttributeChanged", name, key, value, self) |
| callbacks:Fire("LibDataBroker_AttributeChanged_"..name, name, key, value, self) |
| callbacks:Fire("LibDataBroker_AttributeChanged_"..name.."_"..key, name, key, value, self) |
| callbacks:Fire("LibDataBroker_AttributeChanged__"..key, name, key, value, self) |
| end |
| end |
| if oldminor < 2 then |
| function lib:NewDataObject(name, dataobj) |
| if self.proxystorage[name] then return end |
| if dataobj then |
| assert(type(dataobj) == "table", "Invalid dataobj, must be nil or a table") |
| self.attributestorage[dataobj] = {} |
| for i,v in pairs(dataobj) do |
| self.attributestorage[dataobj][i] = v |
| dataobj[i] = nil |
| end |
| end |
| dataobj = setmetatable(dataobj or {}, self.domt) |
| self.proxystorage[name], self.namestorage[dataobj] = dataobj, name |
| self.callbacks:Fire("LibDataBroker_DataObjectCreated", name, dataobj) |
| return dataobj |
| end |
| end |
| if oldminor < 1 then |
| function lib:DataObjectIterator() |
| return pairs(self.proxystorage) |
| end |
| function lib:GetDataObjectByName(dataobjectname) |
| return self.proxystorage[dataobjectname] |
| end |
| function lib:GetNameByDataObject(dataobject) |
| return self.namestorage[dataobject] |
| end |
| end |
trunk/PVPScan/Libs/LibStub/tests/test.lua
New file
0,0 → 1,41
\ No newline at end of file
| debugstack = debug.traceback |
| strmatch = string.match |
| loadfile("../LibStub.lua")() |
| local lib, oldMinor = LibStub:NewLibrary("Pants", 1) -- make a new thingy |
| assert(lib) -- should return the library table |
| assert(not oldMinor) -- should not return the old minor, since it didn't exist |
| -- the following is to create data and then be able to check if the same data exists after the fact |
| function lib:MyMethod() |
| end |
| local MyMethod = lib.MyMethod |
| lib.MyTable = {} |
| local MyTable = lib.MyTable |
| local newLib, newOldMinor = LibStub:NewLibrary("Pants", 1) -- try to register a library with the same version, should silently fail |
| assert(not newLib) -- should not return since out of date |
| local newLib, newOldMinor = LibStub:NewLibrary("Pants", 0) -- try to register a library with a previous, should silently fail |
| assert(not newLib) -- should not return since out of date |
| local newLib, newOldMinor = LibStub:NewLibrary("Pants", 2) -- register a new version |
| assert(newLib) -- library table |
| assert(rawequal(newLib, lib)) -- should be the same reference as the previous |
| assert(newOldMinor == 1) -- should return the minor version of the previous version |
| assert(rawequal(lib.MyMethod, MyMethod)) -- verify that values were saved |
| assert(rawequal(lib.MyTable, MyTable)) -- verify that values were saved |
| local newLib, newOldMinor = LibStub:NewLibrary("Pants", "Blah 3 Blah") -- register a new version with a string minor version (instead of a number) |
| assert(newLib) -- library table |
| assert(newOldMinor == 2) -- previous version was 2 |
| local newLib, newOldMinor = LibStub:NewLibrary("Pants", "Blah 4 and please ignore 15 Blah") -- register a new version with a string minor version (instead of a number) |
| assert(newLib) |
| assert(newOldMinor == 3) -- previous version was 3 (even though it gave a string) |
| local newLib, newOldMinor = LibStub:NewLibrary("Pants", 5) -- register a new library, using a normal number instead of a string |
| assert(newLib) |
| assert(newOldMinor == 4) -- previous version was 4 (even though it gave a string) |
trunk/PVPScan/Libs/LibStub/tests/test2.lua
New file
0,0 → 1,27
| debugstack = debug.traceback |
| strmatch = string.match |
| loadfile("../LibStub.lua")() |
| for major, library in LibStub:IterateLibraries() do |
| -- check that MyLib doesn't exist yet, by iterating through all the libraries |
| assert(major ~= "MyLib") |
| end |
| assert(not LibStub:GetLibrary("MyLib", true)) -- check that MyLib doesn't exist yet by direct checking |
| assert(not pcall(LibStub.GetLibrary, LibStub, "MyLib")) -- don't silently fail, thus it should raise an error. |
| local lib = LibStub:NewLibrary("MyLib", 1) -- create the lib |
| assert(lib) -- check it exists |
| assert(rawequal(LibStub:GetLibrary("MyLib"), lib)) -- verify that :GetLibrary("MyLib") properly equals the lib reference |
| assert(LibStub:NewLibrary("MyLib", 2)) -- create a new version |
| local count=0 |
| for major, library in LibStub:IterateLibraries() do |
| -- check that MyLib exists somewhere in the libraries, by iterating through all the libraries |
| if major == "MyLib" then -- we found it! |
| count = count +1 |
| assert(rawequal(library, lib)) -- verify that the references are equal |
| end |
| end |
| assert(count == 1) -- verify that we actually found it, and only once |
trunk/PVPScan/Libs/LibStub/tests/test3.lua
New file
0,0 → 1,14
\ No newline at end of file
| debugstack = debug.traceback |
| strmatch = string.match |
| loadfile("../LibStub.lua")() |
| local proxy = newproxy() -- non-string |
| assert(not pcall(LibStub.NewLibrary, LibStub, proxy, 1)) -- should error, proxy is not a string, it's userdata |
| local success, ret = pcall(LibStub.GetLibrary, proxy, true) |
| assert(not success or not ret) -- either error because proxy is not a string or because it's not actually registered. |
| assert(not pcall(LibStub.NewLibrary, LibStub, "Something", "No number in here")) -- should error, minor has no string in it. |
| assert(not LibStub:GetLibrary("Something", true)) -- shouldn't've created it from the above statement |
trunk/PVPScan/Libs/LibStub/tests/test4.lua
New file
0,0 → 1,41
\ No newline at end of file
| debugstack = debug.traceback |
| strmatch = string.match |
| loadfile("../LibStub.lua")() |
| -- Pretend like loaded libstub is old and doesn't have :IterateLibraries |
| assert(LibStub.minor) |
| LibStub.minor = LibStub.minor - 0.0001 |
| LibStub.IterateLibraries = nil |
| loadfile("../LibStub.lua")() |
| assert(type(LibStub.IterateLibraries)=="function") |
| -- Now pretend that we're the same version -- :IterateLibraries should NOT be re-created |
| LibStub.IterateLibraries = 123 |
| loadfile("../LibStub.lua")() |
| assert(LibStub.IterateLibraries == 123) |
| -- Now pretend that a newer version is loaded -- :IterateLibraries should NOT be re-created |
| LibStub.minor = LibStub.minor + 0.0001 |
| loadfile("../LibStub.lua")() |
| assert(LibStub.IterateLibraries == 123) |
| -- Again with a huge number |
| LibStub.minor = LibStub.minor + 1234567890 |
| loadfile("../LibStub.lua")() |
| assert(LibStub.IterateLibraries == 123) |
| print("OK") |
trunk/PVPScan/Libs/LibStub/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 |
trunk/PVPScan/Libs/LibStub/LibStub.toc
New file
0,0 → 1,13
| ## Interface: 40200 |
| ## Title: Lib: LibStub |
| ## Notes: Universal Library Stub |
| ## Credits: Kaelten, Cladhaire, ckknight, Mikk, Ammo, Nevcairiel |
| ## X-Website: http://www.wowace.com/addons/libstub/ |
| ## X-Category: Library |
| ## X-License: Public Domain |
| ## X-Curse-Packaged-Version: r95 |
| ## X-Curse-Project-Name: LibStub |
| ## X-Curse-Project-ID: libstub |
| ## X-Curse-Repository-ID: wow/libstub/mainline |
| LibStub.lua |
trunk/PVPScan/PVPScan.xml
New file
0,0 → 1,165
\ No newline at end of file
| <Ui xsi:schemaLocation="http://www.blizzard.com/wow/ui/ ..\FrameXML\UI.xsd"> |
| <Script file="PVPScan.lua"/> |
| <Frame name="PVPScanFrame" frameStrata="HIGH" hidden="false" parent="UIParent" movable="true"> |
| <Size> |
| <AbsDimension x="150" y="60"/> |
| </Size> |
| <Anchors> |
| <Anchor point="CENTER" relativeTo="$parent" relativePoint="CENTER" x="0" y="0"/> |
| </Anchors> |
| <Backdrop bgFile="Interface\Tooltips\UI-Tooltip-Background" tile="true"> |
| <TileSize> |
| <AbsValue val="64"/> |
| </TileSize> |
| </Backdrop> |
| <Scripts> |
| <OnEnter> |
| PVPScanOnFrameEnter (self) |
| </OnEnter> |
| <OnLeave> |
| PVPScanOnFrameLeave (self) |
| </OnLeave> |
| <OnMouseDown> |
| PVPScanOnFrameMouseDown (self, button) |
| </OnMouseDown> |
| <OnMouseUp> |
| PVPScanOnFrameMouseUp (self, button) |
| </OnMouseUp> |
| <OnLoad> |
| self:SetBackdropColor (0, 0, 0, 1) |
| </OnLoad> |
| </Scripts> |
| <Layers> |
| <Layer level="OVERLAY"> |
| <FontString name="$parentText" text="PVPScan Anchor" inherits="GameFontHighlightSmall" justifyH="CENTER" parentKey="text"> |
| <FontHeight val="20"/> |
| <Anchors> |
| <Anchor point="CENTER" relativeTo="$parent" relativePoint="CENTER"/> |
| </Anchors> |
| </FontString> |
| </Layer> |
| </Layers> |
| </Frame> |
| <Button name="PVPScanSpotBarTemplate" frameStrata="HIGH" hidden="true" parent="PVPScanFrame" movable="false" virtual="true" inherits="SecureActionButtonTemplate"> |
| <Attributes> |
| <Attribute name="type" type="string" value="macro"/> |
| </Attributes> |
| <Size> |
| <AbsDimension x="32" y="32"/> |
| </Size> |
| <Layers> |
| <Layer level="ARTWORK"> |
| <Texture name="$parentClassTexture" parentKey="classtexture" file="Interface\PaperDollInfoFrame\UI-Character-Skills-Bar"> |
| <Size> |
| <AbsDimension x="150" y="20"/> |
| </Size> |
| <Anchors> |
| <Anchor point="LEFT" relativeTo="$parent" relativePoint="LEFT"/> |
| </Anchors> |
| </Texture> |
| </Layer> |
| <Layer level="OVERLAY"> |
| <Texture name="$parentClassIcon" parentKey="classicon" file="Interface\InventoryItems\WoWUnknownItem01"> |
| <Size> |
| <AbsDimension x="20" y="20"/> |
| </Size> |
| <Anchors> |
| <Anchor point="LEFT" relativeTo="$parent" relativePoint="LEFT"/> |
| </Anchors> |
| </Texture> |
| <FontString name="$parentName" text="Enemy Name" inherits="GameFontHighlightSmall" justifyH="LEFT" parentKey="name"> |
| <FontHeight val="10"/> |
| <Anchors> |
| <Anchor point="LEFT" relativeTo="$parentClassIcon" relativePoint="RIGHT" x="2" y="0"/> |
| </Anchors> |
| </FontString> |
| </Layer> |
| </Layers> |
| <Scripts> |
| <OnMouseUp> |
| PVPScanSpotBarClick (self); |
| </OnMouseUp> |
| </Scripts> |
| </Button> |
| <Button name="PVPScanSpotBarInCombatTemplate" frameStrata="HIGH" hidden="true" parent="PVPScanFrame" movable="false" virtual="true"> |
| <Size> |
| <AbsDimension x="150" y="20"/> |
| </Size> |
| <Layers> |
| <Layer level="BACKGROUND"> |
| <Texture name="$parentClassTexture" parentKey="classtexture" file="Interface\PaperDollInfoFrame\UI-Character-Skills-Bar"> |
| <Size> |
| <AbsDimension x="150" y="20"/> |
| </Size> |
| <Anchors> |
| <Anchor point="LEFT" relativeTo="$parent" relativePoint="LEFT"/> |
| </Anchors> |
| </Texture> |
| </Layer> |
| <Layer level="BORDER"> |
| <Texture name="$parentClassIcon" parentKey="classicon" file="Interface\InventoryItems\WoWUnknownItem01"> |
| <Size> |
| <AbsDimension x="20" y="20"/> |
| </Size> |
| <Anchors> |
| <Anchor point="LEFT" relativeTo="$parent" relativePoint="LEFT"/> |
| </Anchors> |
| </Texture> |
| <FontString name="$parentName" text="Enemy Name" inherits="GameFontHighlightSmall" justifyH="LEFT" parentKey="name"> |
| <FontHeight val="10"/> |
| <Anchors> |
| <Anchor point="LEFT" relativeTo="$parentClassIcon" relativePoint="RIGHT" x="2" y="0"/> |
| </Anchors> |
| </FontString> |
| </Layer> |
| <Layer level="ARTWORK"> |
| <Texture name="$parentInCombatShadow" parentKey="inCombatShadow" file="Interface\Tooltips\UI-Tooltip-Background"> |
| <Size> |
| <AbsDimension x="150" y="20"/> |
| </Size> |
| <Anchors> |
| <Anchor point="TOPLEFT" relativeTo="$parentClassTexture" relativePoint="TOPLEFT"/> |
| <Anchor point="BOTTOMRIGHT" relativeTo="$parentClassTexture" relativePoint="BOTTOMRIGHT"/> |
| </Anchors> |
| </Texture> |
| </Layer> |
| <Layer level="OVERLAY"> |
| <Texture name="$parentInCombatIcon" parentKey="inCombat" file="Interface\CHARACTERFRAME\Disconnect-Icon"> |
| <Size> |
| <AbsDimension x="20" y="20"/> |
| </Size> |
| <TexCoords left="0.18" right="0.82" top="0.18" bottom="0.82"/> |
| <Anchors> |
| <Anchor point="RIGHT" relativeTo="$parent" relativePoint="RIGHT"/> |
| </Anchors> |
| </Texture> |
| </Layer> |
| </Layers> |
| <Scripts> |
| <OnLoad> |
| self.inCombatShadow:SetVertexColor (0, 0, 0, .6); |
| </OnLoad> |
| </Scripts> |
| </Button> |
| </Ui> |
trunk/PVPScan/PVPScan.lua
New file
0,0 → 1,645
| PVPScan = LibStub ("AceAddon-3.0"):NewAddon ("PVPScan", "AceConsole-3.0", "AceEvent-3.0", "AceTimer-3.0") |
| local PVPScan = PVPScan |
| local LDB = LibStub ("LibDataBroker-1.1", true) |
| local LDBIcon = LDB and LibStub ("LibDBIcon-1.0", true) |
| local SharedMedia = LibStub:GetLibrary("LibSharedMedia-3.0") |
| local _bit_band = bit.band |
| local GetTime = GetTime |
| local REACTION_HOSTILE = 0x00000040 |
| local REACTION_NEUTRAL = 0x00000020 |
| local OBJECT_TYPE_PLAYER = 0x00000400 |
| PVPScan.IsInBattleground = false |
| PVPScan.IsInCity = false |
| PVPScan.IsInArena = false |
| PVPScan.IsInOutDoors = true |
| PVPScan.ScanEnabled = true |
| local default_db = { |
| profile = { |
| SpotBarHeight = 20, |
| SpotBarAmount = 5, |
| SpotBarWidth = 150, |
| SpotBarTexture = "Blizzard Character Skills Bar", |
| SpotBarTimeOut = 10, |
| SpotBarCooldown = 5, |
| SpotBarPlayerCooldown = 10, |
| Locked = false, |
| SoundPlay = false, |
| SoundFile = "", |
| Minimap = {hide = false, radius = 160, minimapPos = 220}, |
| }, |
| } |
| function PVPScan:OnEnable() |
| end |
| function PVPScan:OnDisable() |
| end |
| local OptionsTable = { |
| name = "PVPScan", |
| type = "group", |
| args = { |
| SpotBarHeight = { |
| type = "range", |
| name = "Bar Height", |
| desc = "Change the height of spot bars.", |
| min = 10, |
| max = 40, |
| step = 1, |
| get = function() return PVPScan.db.profile.SpotBarHeight end, |
| set = function (self, val) PVPScan.db.profile.SpotBarHeight = val; PVPScan:RefreshSpotBars() end, |
| order = 1, |
| }, |
| SpotBarWidth = { |
| type = "range", |
| name = "Bar Width", |
| desc = "Change the width of spot bars.", |
| min = 50, |
| max = 250, |
| step = 1, |
| get = function() return PVPScan.db.profile.SpotBarWidth end, |
| set = function (self, val) PVPScan.db.profile.SpotBarWidth = val; PVPScan:RefreshSpotBars() end, |
| order = 2, |
| }, |
| SpotBarAmount = { |
| type = "range", |
| name = "Bar Amount", |
| desc = "Change the amount of spot bars.", |
| min = 1, |
| max = 40, |
| step = 1, |
| get = function() return PVPScan.db.profile.SpotBarAmount end, |
| set = function (self, val) PVPScan.db.profile.SpotBarAmount = val; PVPScan:RefreshSpotBars() end, |
| order = 3, |
| }, |
| SpotBarTexture = { |
| type = "select", |
| name = "Bar Texture", |
| desc = "Choose the texture used on target bars.", |
| values = function() |
| local TextureTable = {} |
| for name, _ in pairs (SharedMedia:HashTable ("statusbar")) do |
| TextureTable [name] = name |
| end |
| return TextureTable |
| end, |
| get = function() return PVPScan.db.profile.SpotBarTexture end, |
| set = function (self, file) PVPScan.db.profile.SpotBarTexture = file; PVPScan:RefreshSpotBars() end, |
| order = 4, |
| }, |
| SpotBarTimeOut = { |
| type = "range", |
| name = "Time Out", |
| desc = "How many time wait until the bar auto hide.", |
| min = 5, |
| max = 120, |
| step = 5, |
| get = function() return PVPScan.db.profile.SpotBarTimeOut end, |
| set = function (self, val) PVPScan.db.profile.SpotBarTimeOut = val; end, |
| order = 9, |
| }, |
| Locked = { |
| type = "toggle", |
| name = "Lock Scan Frame", |
| desc = "Lock or unlock the SpotBars Frame.", |
| order = 5, |
| get = function() return PVPScan.db.profile.Locked end, |
| set = function (self, val) PVPScan.db.profile.Locked = not PVPScan.db.profile.Locked; PVPScan:LockScanFrame (PVPScan.db.profile.Locked) end, |
| }, |
| SoundPlay = { |
| type = "toggle", |
| name = "Play Sound", |
| desc = "Play a sound when a enemy is found.", |
| order = 7, |
| get = function() return PVPScan.db.profile.SoundPlay end, |
| set = function (self, val) PVPScan.db.profile.SoundPlay = not PVPScan.db.profile.SoundPlay end, |
| }, |
| SoundFile = { |
| type = "select", |
| name = "Sound File", |
| desc = "Choose the sound to play when a enemy is found.", |
| values = function() |
| local SoundTable = {} |
| for name, _ in pairs (SharedMedia:HashTable ("sound")) do |
| SoundTable [name] = name |
| end |
| return SoundTable |
| end, |
| get = function() return PVPScan.db.profile.SoundFile end, |
| set = function (self, file) PVPScan.db.profile.SoundFile = file end, |
| order = 8, |
| }, |
| Minimap = { |
| type = "toggle", |
| name = "Hide Minimap Icon", |
| desc = "Show or hide the minimap icon.", |
| order = 6, |
| get = function() return PVPScan.db.profile.Minimap.hide end, |
| set = function (self, val) |
| PVPScan.db.profile.Minimap.hide = not PVPScan.db.profile.Minimap.hide |
| LDBIcon:Refresh ("PVPScan", PVPScan.db.profile.Minimap) |
| if (PVPScan.db.profile.Minimap.hide) then |
| LDBIcon:Hide ("PVPScan") |
| else |
| LDBIcon:Show ("PVPScan") |
| end |
| end, |
| }, |
| }, |
| } |
| function PVPScan:OnInitialize() |
| --declarar primeiro o db usando a global que é declarada no toc. |
| self.db = LibStub ("AceDB-3.0"):New ("PVPScanDB", default_db, true) |
| --declara agora as opções da tab raiz |
| LibStub("AceConfig-3.0"):RegisterOptionsTable ("PVPScan", OptionsTable) |
| PVPScan.OptionsFrame1 = LibStub ("AceConfigDialog-3.0"):AddToBlizOptions ("PVPScan", "PVPScan") |
| --sub tab |
| LibStub ("AceConfig-3.0"):RegisterOptionsTable ("PVPScan-Profiles", LibStub ("AceDBOptions-3.0"):GetOptionsTable (self.db)) |
| PVPScan.OptionsFrame2 = LibStub ("AceConfigDialog-3.0"):AddToBlizOptions ("PVPScan-Profiles", "Profiles", "PVPScan") |
| if LDB then |
| local databroker = LDB:NewDataObject ("PVPScan", { |
| type = "launcher", |
| icon = [[Interface\PvPRankBadges\PvPRank15]], |
| --HotCornerIgnore = true, |
| OnClick = function (self, button) |
| InterfaceOptionsFrame_OpenToCategory ("PVPScan") |
| InterfaceOptionsFrame_OpenToCategory ("PVPScan") |
| end |
| }) |
| if (databroker and not LDBIcon:IsRegistered ("PVPScan")) then |
| LDBIcon:Register ("PVPScan", databroker, PVPScan.db.profile.Minimap) |
| end |
| end |
| PVPScan:RefreshSpotBars() |
| PVPScan:LockScanFrame (PVPScan.db.profile.Locked) |
| PVPScan.EventFrame:SetScript ("OnEvent", PVPScan.OnParserEvent) |
| end |
| PVPScan:RegisterChatCommand ("pvpscan", function() |
| InterfaceOptionsFrame_OpenToCategory ("PVPScan") |
| InterfaceOptionsFrame_OpenToCategory ("PVPScan") |
| end) |
| ------------------------------------------------------------------------------------------------------------------------------------------------------------ |
| --> general |
| function PVPScan:ChangeZones() |
| local name, type, difficulty, difficultyName, maxPlayers, playerDifficulty, isDynamicInstance, mapID, instanceGroupSize = GetInstanceInfo() |
| local pvpType, isFFA, faction = GetZonePVPInfo() |
| PVPScan.IsInBattleground = false |
| PVPScan.IsInCity = false |
| PVPScan.IsInArena = false |
| PVPScan.IsInOutDoors = false |
| PVPScan.ScanEnabled = false |
| if (pvpType == "contested" and (not type or type == "none")) then |
| PVPScan.IsInOutDoors = true |
| PVPScan.ScanEnabled = true |
| elseif (type == "pvp") then |
| PVPScan.IsInBattleground = true |
| elseif (type == "arena") then |
| PVPScan.IsInArena = true |
| elseif (type and (type == "scenario" or type == "party" or type == "raid" or pvpType == "friendly" or pvpType == "sanctuary")) then |
| PVPScan.ScanEnabled = false |
| else |
| PVPScan.IsInOutDoors = true |
| PVPScan.ScanEnabled = true |
| end |
| if (PVPScan.ScanEnabled) then |
| PVPScan:EnableScan() |
| else |
| PVPScan:DisableScan() |
| end |
| end |
| PVPScan:RegisterEvent ("ZONE_CHANGED_NEW_AREA", "ChangeZones") |
| PVPScan:RegisterEvent ("PLAYER_ENTERING_WORLD", "ChangeZones") |
| function PVPScan:EnableScan() |
| PVPScan.EventFrame:RegisterEvent ("COMBAT_LOG_EVENT_UNFILTERED") |
| PVPScan:RefreshSpotBars() |
| PVPScan.NextBarCheckForHide = GetTime() + PVPScan.db.profile.SpotBarTimeOut |
| PVPScan.BarChecker = PVPScan:ScheduleRepeatingTimer ("CheckBarTimeOut", 5) |
| end |
| function PVPScan:DisableScan() |
| PVPScan.EventFrame:UnregisterEvent ("COMBAT_LOG_EVENT_UNFILTERED") |
| PVPScan:RefreshSpotBars() |
| if (PVPScan.BarChecker) then |
| PVPScan:CancelTimer (PVPScan.BarChecker, true) |
| PVPScan.BarChecker = nil |
| end |
| end |
| function PVPScan:LockScanFrame (IsLocked) |
| if (IsLocked) then |
| PVPScanFrame.text:SetText ("") |
| PVPScanFrame:SetBackdrop (nil) |
| PVPScanFrame:EnableMouse (false) |
| else |
| PVPScanFrame.text:SetText ("PVPScan Anchor") |
| PVPScanFrame:SetBackdrop ({bgFile = [[Interface\Tooltips\UI-Tooltip-Background]], tile = true, TileSize = 64}) |
| PVPScanFrame:SetBackdropColor (0, 0, 0, 1) |
| PVPScanFrame:EnableMouse (true) |
| end |
| end |
| ------------------------------------------------------------------------------------------------------------------------------------------------------------ |
| --> outside world scan |
| --> parser |
| PVPScan.SpotBars = {} -- container para os objetos das barras |
| PVPScan.NeedClass = {} -- container para os jogadores que precisam saber a classe |
| PVPScan.CurrentShownPlayers = {} -- nomes dos jogadores que estão sendo mostrados com o index da barra no valos |
| PVPScan.CooldownShownPlayers = {} -- nomes dos jogadores com o tempo de quando eles podem ser mostrados novamente nas barras |
| PVPScan.EventFrame = CreateFrame ("frame", "PVPScanCombatLobReader", UIParent) |
| PVPScan.EventFrame:RegisterEvent ("COMBAT_LOG_EVENT_UNFILTERED") |
| function PVPScan:OnParserEvent (event, time, token, hidding, who_serial, who_name, who_flags, who_flags2, target_serial, target_name, target_flags, target_flags2, ...) |
| if (PVPScan.NeedClass [who_name]) then |
| local class = PVPScan:GuessClass (...) |
| if (class) then |
| PVPScan:UpdateBar (PVPScan.SpotBars [PVPScan.CurrentShownPlayers [who_name]], who_name, class, true) |
| PVPScan.NeedClass [who_name] = nil |
| end |
| return |
| end |
| if (not PVPScan.CurrentShownPlayers [target_name] and _bit_band (target_flags, OBJECT_TYPE_PLAYER) ~= 0) then --> is player |
| if (_bit_band (target_flags, REACTION_HOSTILE) ~= 0) then --> is hostile |
| local class = PVPScan:GuessClass (...) |
| PVPScan:EnemySpoted (target_name, target_serial, target_flags, class) |
| end |
| end |
| if (not PVPScan.CurrentShownPlayers [who_name] and _bit_band (who_flags, OBJECT_TYPE_PLAYER) ~= 0) then --> is player |
| if (_bit_band (who_flags, REACTION_HOSTILE) ~= 0) then --> is hostile |
| local class = PVPScan:GuessClass (...) |
| PVPScan:EnemySpoted (who_name, who_serial, who_flags, class) |
| end |
| end |
| end |
| function PVPScan:LeftCombatLockdown() |
| if (PVPScan.schedule_frame_update) then |
| PVPScan.schedule_frame_update = false |
| PVPScan:RefreshSpotBars() |
| end |
| PVPScan:CheckNonCombatSpotBars() |
| end |
| function PVPScan:GotCombatLockdown() |
| end |
| function PVPScan:GetNextSpotBar() |
| for i = 1, PVPScan.db.profile.SpotBarAmount do |
| local bar = PVPScan.SpotBars [i] |
| if (not bar) then |
| print (i, #PVPScan.SpotBars) |
| end |
| if (not bar.InUse and bar.Cooldown < GetTime()) then |
| return bar |
| end |
| end |
| return nil |
| end |
| PVPScan:RegisterEvent ("PLAYER_REGEN_DISABLED", "GotCombatLockdown") |
| PVPScan:RegisterEvent ("PLAYER_REGEN_ENABLED", "LeftCombatLockdown") |
| -- found a enemy on the scan |
| function PVPScan:EnemySpoted (name, serial, flags, class) |
| --se nao tiver nome, nao interessa |
| if (not name) then |
| return |
| end |
| --se o player tiver no cooldown para mostrar, ignora-lo |
| if (PVPScan.CooldownShownPlayers [name] and PVPScan.CooldownShownPlayers [name] > GetTime()) then |
| return |
| end |
| local SpotBar = PVPScan:GetNextSpotBar() |
| if (not SpotBar) then |
| return |
| end |
| --seta o cooldown deste jogador |
| PVPScan.CooldownShownPlayers [name] = GetTime() + PVPScan.db.profile.SpotBarPlayerCooldown |
| --seta em qual barra o jogador esta sendo mostrado |
| PVPScan.CurrentShownPlayers [name] = SpotBar.Index |
| --se nao tiver uma classe, agendar uma pesquisa |
| if (not class) then |
| PVPScan.NeedClass [name] = true |
| end |
| --atualiza a barra |
| PVPScan:UpdateBar (SpotBar, name, class) |
| --toca o som se a configuracao permitir |
| if (PVPScan.db.profile.SoundPlay) then |
| local sound = PVPScan.db.profile.SoundFile |
| sound = SharedMedia:Fetch ("sound", sound) |
| if (sound) then |
| PlaySoundFile (sound, "Master") |
| end |
| end |
| end |
| -- frames |
| function PVPScanOnFrameEnter (self) |
| GameTooltip:SetOwner (self, "ANCHOR_TOPLEFT") |
| GameTooltip:ClearLines() |
| GameTooltip:AddLine ("Right Click To Open Options Panel") |
| GameTooltip:Show() |
| end |
| function PVPScanOnFrameLeave (self) |
| GameTooltip:Hide() |
| end |
| function PVPScanOnFrameMouseDown (self, button) |
| if (button == "LeftButton") then |
| if (not self.IsMoving) then |
| self:StartMoving() |
| self.IsMoving = true |
| end |
| end |
| end |
| function PVPScanOnFrameMouseUp (self, button) |
| if (button == "LeftButton") then |
| if (self.IsMoving) then |
| self:StopMovingOrSizing() |
| self.IsMoving = false |
| end |
| elseif (button == "RightButton") then |
| InterfaceOptionsFrame_OpenToCategory ("PVPScan") |
| InterfaceOptionsFrame_OpenToCategory ("PVPScan") |
| end |
| end |
| function PVPScan:CheckNonCombatSpotBars() |
| for i = 1, PVPScan.db.profile.SpotBarAmount do |
| local SpotObject = PVPScan.SpotBars [i] |
| if (SpotObject.InUse and (SpotObject.NonTargetFrame:IsShown() or SpotObject.NeedUpdate)) then |
| PVPScan:UpdateBar (SpotObject, SpotObject.PlayerName, SpotObject.PlayerClass) |
| end |
| end |
| end |
| function PVPScan:UpdateBar (SpotObject, Name, Class, ClassUpdate) |
| SpotObject.IsShown = true |
| SpotObject.InUse = true |
| SpotObject.PlayerName = Name |
| SpotObject.PlayerClass = Class |
| SpotObject.Cooldown = GetTime() + PVPScan.db.profile.SpotBarCooldown |
| SpotObject.ExpireAt = GetTime() + PVPScan.db.profile.SpotBarTimeOut |
| SpotObject.NeedUpdate = false |
| if (ClassUpdate) then |
| if (SpotObject.TargetFrame:IsShown()) then |
| if (not UnitAffectingCombat ("player") and not InCombatLockdown()) then |
| local color = RAID_CLASS_COLORS [Class] |
| local texcoord = CLASS_ICON_TCOORDS [Class] |
| SpotObject.TargetFrame.classtexture:SetVertexColor (color.r, color.g, color.b) |
| SpotObject.TargetFrame.classicon:SetTexture ([[Interface\Glues\CHARACTERCREATE\UI-CHARACTERCREATE-CLASSES]]) |
| SpotObject.TargetFrame.classicon:SetTexCoord (unpack (texcoord)) |
| else |
| SpotObject.NeedUpdate = true |
| end |
| else |
| local color = RAID_CLASS_COLORS [Class] |
| local texcoord = CLASS_ICON_TCOORDS [Class] |
| SpotObject.NonTargetFrame.classtexture:SetVertexColor (color.r, color.g, color.b) |
| SpotObject.NonTargetFrame.classicon:SetTexture ([[Interface\Glues\CHARACTERCREATE\UI-CHARACTERCREATE-CLASSES]]) |
| SpotObject.NonTargetFrame.classicon:SetTexCoord (unpack (texcoord)) |
| end |
| end |
| if (UnitAffectingCombat ("player") or InCombatLockdown()) then |
| --> enable in combat bat |
| if (Class) then |
| local color = RAID_CLASS_COLORS [Class] |
| local texcoord = CLASS_ICON_TCOORDS [Class] |
| SpotObject.NonTargetFrame.classtexture:SetVertexColor (color.r, color.g, color.b) |
| SpotObject.NonTargetFrame.classicon:SetTexture ([[Interface\Glues\CHARACTERCREATE\UI-CHARACTERCREATE-CLASSES]]) |
| SpotObject.NonTargetFrame.classicon:SetTexCoord (unpack (texcoord)) |
| else |
| SpotObject.NonTargetFrame.classtexture:SetVertexColor (.7, .7, .7) |
| SpotObject.NonTargetFrame.classicon:SetTexture ([[Interface\InventoryItems\WoWUnknownItem01]]) |
| SpotObject.NonTargetFrame.classicon:SetTexCoord (0, 1, 0, 1) |
| end |
| SpotObject.NonTargetFrame.name:SetText (Name) |
| SpotObject.NonTargetFrame:Show() |
| SpotObject.NeedUpdate = true |
| else |
| --> enable spot bar |
| if (Class) then |
| local color = RAID_CLASS_COLORS [Class] |
| local texcoord = CLASS_ICON_TCOORDS [Class] |
| SpotObject.TargetFrame.classtexture:SetVertexColor (color.r, color.g, color.b) |
| SpotObject.TargetFrame.classicon:SetTexture ([[Interface\Glues\CHARACTERCREATE\UI-CHARACTERCREATE-CLASSES]]) |
| SpotObject.TargetFrame.classicon:SetTexCoord (unpack (texcoord)) |
| else |
| SpotObject.TargetFrame.classtexture:SetVertexColor (.7, .7, .7) |
| SpotObject.TargetFrame.classicon:SetTexture ([[Interface\InventoryItems\WoWUnknownItem01]]) |
| SpotObject.TargetFrame.classicon:SetTexCoord (0, 1, 0, 1) |
| end |
| SpotObject.TargetFrame:SetAttribute ("macrotext", "/cleartarget\n/targetexact " .. Name) |
| SpotObject.TargetFrame.name:SetText (Name) |
| SpotObject.TargetFrame.SpotObject = SpotObject |
| SpotObject.NonTargetFrame:Hide() |
| SpotObject.TargetFrame:Show() |
| end |
| end |
| function PVPScan:CheckBarTimeOut() |
| if (not UnitAffectingCombat ("player") and not InCombatLockdown()) then |
| local time = GetTime() |
| for repeat_twice = 1, 2 do |
| for i = 1, PVPScan.db.profile.SpotBarAmount do |
| local SpotObject = PVPScan.SpotBars [i] |
| if (SpotObject.InUse) then |
| --verifica se expirou |
| if (SpotObject.ExpireAt < time) then |
| PVPScan:DisableSpotBar (SpotObject) |
| end |
| else |
| for o = i+1, PVPScan.db.profile.SpotBarAmount do |
| local NextSpotObject = PVPScan.SpotBars [o] |
| if (NextSpotObject.InUse) then --> transferir pra cá |
| --seta a nova barra |
| local PlayerName = NextSpotObject.PlayerName |
| PVPScan:UpdateBar (SpotObject, PlayerName, NextSpotObject.PlayerClass) |
| --desliga a barra antiga |
| PVPScan:DisableSpotBar (NextSpotObject) |
| --seta em qual barra o jogador esta sendo mostrado |
| PVPScan.CurrentShownPlayers [PlayerName] = i |
| break |
| end |
| end |
| end |
| end |
| end |
| end |
| end |
| function PVPScanSpotBarClick (self) |
| if (self.SpotObject) then |
| self.SpotObject.Cooldown = GetTime() + PVPScan.db.profile.SpotBarCooldown |
| self.SpotObject.ExpireAt = GetTime() + PVPScan.db.profile.SpotBarTimeOut |
| end |
| end |
| function PVPScan:DisableSpotBar (SpotObject) |
| SpotObject.TargetFrame:Hide() |
| SpotObject.TargetFrame.SpotObject = nil |
| SpotObject.NonTargetFrame:Hide() |
| SpotObject.IsShown = false |
| SpotObject.NeedUpdate = false |
| SpotObject.InUse = false |
| SpotObject.Cooldown = 0 |
| SpotObject.ExpireAt = 0 |
| local name = SpotObject.PlayerName |
| if (name) then |
| PVPScan.NeedClass [name] = nil |
| PVPScan.CurrentShownPlayers [name] = nil |
| PVPScan.CooldownShownPlayers [name] = nil |
| end |
| SpotObject.PlayerName = nil |
| SpotObject.PlayerClass = nil |
| end |
| function PVPScan:RefreshSpotBars() |
| if (UnitAffectingCombat ("player") or InCombatLockdown()) then |
| PVPScan.schedule_frame_update = true |
| PVPScan:Print ("When the combat finishes, the frame will be updated.") |
| return |
| end |
| if (not PVPScan.ScanEnabled) then |
| PVPScanFrame:Hide() |
| else |
| PVPScanFrame:Show() |
| end |
| local amount_bars = PVPScan.db.profile.SpotBarAmount |
| PVPScanFrame:SetSize (PVPScan.db.profile.SpotBarWidth, 20) |
| --> we need extra bars? |
| if (amount_bars > #PVPScan.SpotBars) then |
| for i = #PVPScan.SpotBars+1, amount_bars do |
| local NewBarObject = { |
| Index = i, |
| TargetFrame = CreateFrame ("Button", "PVPScanSpotBar" .. i, PVPScanFrame, "PVPScanSpotBarTemplate"), |
| NonTargetFrame = CreateFrame ("Button", "PVPScanSpotBarInCombat" .. i, PVPScanFrame, "PVPScanSpotBarInCombatTemplate"), |
| IsShown = false, -- se a barra esta sendo mostrada |
| PlayerName = nil, -- nome do jogador que esta sendo mostrado |
| PlayerClass = nil, |
| NeedUpdate = false, -- se a barra precisa de um update após o termino do combate |
| InUse = false, -- se a barra esta em uso |
| ExpireAt = 0, -- quando a barra ira sumir automaticamente |
| Cooldown = 0, -- tempo para poder por outro jogador nesta barra |
| } |
| NewBarObject.NonTargetFrame:SetFrameLevel (NewBarObject.TargetFrame:GetFrameLevel()+1) |
| local y = (i-1) * PVPScan.db.profile.SpotBarHeight * -1 |
| NewBarObject.TargetFrame:SetPoint ("topleft", PVPScanFrame, "topleft", 0, y) |
| NewBarObject.NonTargetFrame:SetPoint ("topleft", PVPScanFrame, "topleft", 0, y) |
| NewBarObject.TargetFrame:SetSize (PVPScan.db.profile.SpotBarWidth, PVPScan.db.profile.SpotBarHeight) |
| NewBarObject.NonTargetFrame:SetSize (PVPScan.db.profile.SpotBarWidth, PVPScan.db.profile.SpotBarHeight) |
| tinsert (PVPScan.SpotBars, NewBarObject) |
| end |
| end |
| if (#PVPScan.SpotBars > amount_bars) then |
| for i = #PVPScan.SpotBars, amount_bars+1, -1 do |
| PVPScan:DisableSpotBar (PVPScan.SpotBars [i]) |
| end |
| end |
| --> refresh existing |
| for Index, BarObject in ipairs (PVPScan.SpotBars) do |
| local y = (Index-1) * PVPScan.db.profile.SpotBarHeight * -1 |
| --point |
| BarObject.TargetFrame:SetPoint ("topleft", PVPScanFrame, "bottomleft", 0, y) |
| BarObject.NonTargetFrame:SetPoint ("topleft", PVPScanFrame, "bottomleft", 0, y) |
| --size |
| BarObject.TargetFrame:SetSize (PVPScan.db.profile.SpotBarWidth, PVPScan.db.profile.SpotBarHeight) |
| BarObject.NonTargetFrame:SetSize (PVPScan.db.profile.SpotBarWidth, PVPScan.db.profile.SpotBarHeight) |
| --texture size |
| BarObject.TargetFrame.classtexture:SetSize (PVPScan.db.profile.SpotBarWidth, PVPScan.db.profile.SpotBarHeight) |
| BarObject.NonTargetFrame.classtexture:SetSize (PVPScan.db.profile.SpotBarWidth, PVPScan.db.profile.SpotBarHeight) |
| --bar texture |
| BarObject.TargetFrame.classtexture:SetTexture (SharedMedia:Fetch ("statusbar", PVPScan.db.profile.SpotBarTexture) or [[Interface\PaperDollInfoFrame\UI-Character-Skills-Bar]]) |
| BarObject.NonTargetFrame.classtexture:SetTexture (SharedMedia:Fetch ("statusbar", PVPScan.db.profile.SpotBarTexture) or [[Interface\PaperDollInfoFrame\UI-Character-Skills-Bar]]) |
| --icon size |
| BarObject.TargetFrame.classicon:SetSize (PVPScan.db.profile.SpotBarHeight, PVPScan.db.profile.SpotBarHeight) |
| BarObject.NonTargetFrame.classicon:SetSize (PVPScan.db.profile.SpotBarHeight, PVPScan.db.profile.SpotBarHeight) |
| end |
| end |
| --> misc |
| function PVPScan:GuessClass (...) |
| local arg1, arg2, arg3, arg4 = select (1, ...) |
| if (type (arg1) == "number") then |
| return PVPScan.ClassSpellList [arg1] |
| end |
| return nil |
| end |
| ------------------------------------------------------------------------------------------------------------------------------------------------------------ |
| --> battlegrounds |
trunk/PVPScan/PVPScan.toc
New file
0,0 → 1,12
\ No newline at end of file
| ## Interface: 60100 |
| ## Title: PVPScan |
| ## Notes: Track enemies near you |
| ## Version: 0.1 |
| ## SavedVariables: PVPScanDB |
| #@no-lib-strip@ |
| libs.xml |
| #@end-no-lib-strip@ |
| PVPScan.xml |
| Details_ClassSpellList.lua |
WoWInterface
AddOn Sites
© 2004 - 2022 MMOUI
vBulletin © 2024, Jelsoft Enterprises Ltd