1
0
Fork 0

more deprecated and misc

This commit is contained in:
pigmonkey 2011-05-30 14:45:27 -04:00
parent ff77c954eb
commit cfacbcee8e
3 changed files with 324 additions and 476 deletions

View file

@ -1,478 +1,3 @@
AllTheLittleThings = LibStub("AceAddon-3.0"):NewAddon("ATLT", "AceConsole-3.0", "AceEvent-3.0", "AceTimer-3.0", "AceHook-3.0")
local core = AllTheLittleThings
-- local DedicatedInsanity = {46017,47069,47079,47082,47093,47072,47073,47090,47071,47094,47081,47092,47070,47080,47104,47138,47114,47121,47142,47108,47106,47107,47140,47126,47139,47116,47148,47193,47233,47150,47234,47195,47184,47204,47151,47186,47235,47183,47194,47187,47225,47203,47054,47182,46958,46976,46985,46996,46994,46979,46963,46962,46997,47052,47057,46999,46961,46960,47083,46990,47152,47056,47000,46988,46974,47055,46992,47051,46972,47141,47042,47043,47041,47115,46959,47053,49500,49494,49465,49493,49490,49496,49497,49499,49495,49501,49498,49466,49467,49474,49475,49476,49478,49479,49480,49468,49469,49470,49471,49472,49473,49477,49481,49482,49483,49484,49491,49489,49492,49464,49488,47078,47085,47086,47098,47076,47074,47087,47099,47077,47096,47084,47097,47095,47075,47088,47001,47156,46995,46980,46969,47113,47521,47206,47526,47519,47239,46964,47130,47524,47525,47517,47506,47515,46968,47147,46986,47003,47154,47240,47061,47067,47132,47002,47207,46967,47111,46965,47209,47109,47191,46991,47153,47068,47004,46989,46975,47190,47112,47145,47066,47155,46993,47129,47205,47236,47062,47189,46973,47143,47208,46971,46977,47063,47192,47238,47545,47547,47549,47552,47553,47237,47060,47110,47133,47144,47059,47131,47188,47224,47157,46966,47146,47064,
-- 42210,42229,42234,42244,42250,42257,42262,42267,42272,42277,42282,42287,42292,42319,42324,42329,42334,42348,42354,42366,42386,42392,42483,42487,42492,42498,42504,42515,42521,44423,44424,48402,48404,48406,48408,48410,48412,48414,48420,48422,48424,48426,48428,48432,48435,48438,48440,48442,48444,48507,48509,48511,48513,48515,48517,48519,48521,48523,49185,49189,49191,
-- 40790,40791,40792,40810,40811,40812,40829,40830,40831,40850,40851,40852,40870,40871,40872,40883,40884,40890,40910,40928,40934,40940,40964,40978,40979,40984,40994,40995,41002,41008,41014,41020,41028,41034,41039,41045,41052,41056,41061,41066,41071,41076,41082,41088,41138,41144,41152,41158,41200,41206,41212,41218,41226,41231,41236,41276,41282,41288,41294,41299,41305,41311,41317,41322,41328,41618,41622,41626,41631,41636,41641,41651,41656,41662,41668,41673,41679,41684,41716,41768,41774,41833,41837,41841,41855,41860,41865,41870,41875,41882,41886,41894,41899,41904,41910,41916,41922,41928,41935,41941,41947,41954,41960,41966,41972,41994,41999,42006,42012,42018,42041,42042,42043,42044,42045,42046,42047,42076,42077,42078,42079,42080,42081,42082,42118,42119,42527,42533,42539,42561,42566,42572,42580,42585,42591,42599,42604,42609,42616,42622,42854,46374,49086,49179,49181,49183,49187,
-- 48646,48645,48644,48643,48642,48616,48615,48614,48613,48612,48584,48583,48582,48581,48580,48547,48546,48545,48544,48543,48490,48489,48488,48487,48486,48455,48453,48451,48447,48433,48385,48384,48383,48382,48381,48355,48354,48353,48352,48351,48325,48324,48323,48322,48321,48294,48293,48292,48291,48290,48264,48263,48262,48261,48260,48232,48231,48230,48229,48228,48207,48206,48205,48204,48203,48172,48171,48170,48169,48168,48142,48141,48140,48139,48138,48086,48085,48084,48083,48082,48037,48035,48033,48031,48029,47792,47791,47790,47789,47788,47762,47761,47760,47759,47758,
-- }
local options = {
name = "All The Little Things",
type = 'group',
args = {
officerPhone = {
order = 60,
name = "Officer Phone Records",
desc = "Allows !phone <player>",
type = 'toggle',
get = function(info) return core.db.profile.officerPhone end,
set = function(info, v) core.db.profile.officerPhone = v core:OnEnable() end,
},
},
}
local defaults = {
profile = {
addonDebug = {
x = 100,
y = 100,
},
consolidateThresh = 0,
officerPhone = true,
halloween = 1,
guildXPMarks = { },
}
}
core.guildList = {}
core.rollTally = {}
core.rollTimer = false
core.hallowBuff = nil
function core:OnInitialize()
self.db = LibStub("AceDB-3.0"):New("AllTheLittleThingsDB", defaults, "Default")
self:RegisterChatCommand("atlt", "SlashProcess")
-- options.args.profile = LibStub("AceDBOptions-3.0"):GetOptionsTable(self.db)
LibStub("AceConfig-3.0"):RegisterOptionsTable("ATLT", options)
self.optionsFrame = LibStub("AceConfigDialog-3.0"):AddToBlizOptions("ATLT", "All The Little Things")
end
function core:OnEnable()
if (self.db.profile.officerPhone) then
self:RegisterEvent("CHAT_MSG_OFFICER");
end
self:RegisterEvent("PLAYER_ENTERING_WORLD", "ZoneChange");
self:RegisterEvent("ZONE_CHANGED", "ZoneChange");
self:RegisterEvent("ZONE_CHANGED_NEW_AREA", "ZoneChange");
self:RegisterEvent("PLAYER_DIFFICULTY_CHANGED", "ZoneChange");
self:RegisterEvent("CHAT_MSG_LOOT")
self:RegisterEvent("UNIT_AURA")
self:SecureHook("TargetUnit")
-- self:ScheduleTimer("SetupAddonDebug", 3)
end
function core:SlashProcess(msg)
if msg == "debug" then
self:BugInit()
elseif msg == "rolltally" or msg == "rt" then
elseif msg == "phone" then
-- prints missing phone numbers
self:FindMissingPhones();
elseif msg == "ilevel" or msg == "il" then
self:RaidDump("Tallying iLevel Sums...")
r = {}
for i=1,GetNumRaidMembers() do
s=0
InspectUnit("raid"..i)
for j=1,16 do
l=GetInventoryItemLink("raid"..i,j)
if l~=nil and j~=4 then
_,_,_,v=GetItemInfo(l) s=s+v
end
end
r[i] = {UnitName("raid"..i), s}
end
table.sort(r, function(a, b) return a[2] > b[2] end)
for i,v in pairs(r) do
if v[2] > 0 then
self:RaidDump(v[1]..": "..v[2])
else
self:RaidDump(v[1]..": (out of range)")
end
end
self:RaidDump("---")
elseif msg == "combatlog" or msg == "cl" then
CombatLogClearEntries()
elseif msg == "markxp" then
-- write all current
local db = self.db.profile.guildXPMarks
local num = #db+1
db[num] = {
time = time(),
marks = { },
}
local markSet = db[num].marks
-- build all xp list
for i=1,GetNumGuildMembers() do
local name, rank, _, _, _, _, note = GetGuildRosterInfo(i)
local xp, total = GetGuildRosterContribution(i)
if rank:find("Alt") then
name = note
end
if not markSet[name] then
markSet[name] = 0
end
markSet[name] = markSet[name] + total
end
self:Print(format("Created new mark set #%d; suggested UI reload", num))
elseif msg:find("diff ") then
local setNum = tonumber(msg:match("diff (%d+)"))
local set = setNum and self.db.profile.guildXPMarks[setNum]
if not set then
self:Print(format("Could not find split %d", setNum))
return
end
local markSet = { }
for i=1,GetNumGuildMembers() do
local name, rank, _, _, _, _, note = GetGuildRosterInfo(i)
local xp, total = GetGuildRosterContribution(i)
if rank:find("Alt") then
name = note
end
if not markSet[name] then
markSet[name] = 0
end
markSet[name] = markSet[name] + total
end
local diff = { }
local total = 0
for player, xp in pairs(set.marks) do
if markSet[player] > xp then
local d = markSet[player] - xp
diff[player] = d
total = total + d
end
end
local function printInfo(msg)
-- self:Print(msg)
SendChatMessage(msg, "guild")
end
printInfo(format("Guild XP Difference Since %s:", date("%c", set.time)))
while next(diff) ~= nil do
local max, maxVal = "-", -1
for k,v in pairs(diff) do
if v > maxVal then
max, maxVal = k, v
end
end
printInfo(format("%s - %.1fk (%.1f%%)", max, maxVal/1000, maxVal/total*100))
diff[max] = nil
end
elseif msg == "activitytally" or msg == "at" then
local function printInfo(msg)
-- self:Print(msg)
SendChatMessage(msg, "guild")
end
local mains = {}
local alts = {} -- really a table of the mains as the key, alt totals as the value, but we'll merge later once we can confirm
local capped = {} -- table of mains who hit cap
for i=1,GetNumGuildMembers() do
local name, rank, _, _, _, _, note = GetGuildRosterInfo(i)
local xp, total = GetGuildRosterContribution(i)
local tbl = mains
if self.toggleTotal then
xp = total
end
if rank:find("Alt") then
name, tbl = note, alts
end
if rank ~= "Non-raider" or name == "Ariik" then
if not tbl[name] then
tbl[name] = 0
end
tbl[name] = tbl[name] + xp
if xp == 1575002 then
capped[name] = true
end
end
end
-- total and merge alts
local total = 0
for k,v in pairs(mains) do
mains[k] = mains[k] + (alts[k] or 0)
total = total + mains[k]
end
-- print using selection sort
printInfo("Top contributors for the week; alts included:")
while next(mains) ~= nil do
local max, maxVal = "-", -1
for k,v in pairs(mains) do
if v > maxVal then
max, maxVal = k, v
end
end
printInfo(format("%s%s - %d (%.1f%%)", (capped[max] and "*" or ""), max, maxVal, maxVal/total*100))
mains[max] = nil
end
printInfo("* Denotes capped on at least one character")
elseif msg == "hott" then
self:RaidDump("Checking for Herald Gear...")
for i=1,GetNumRaidMembers() do
s=0
InspectUnit("raid"..i)
for j=1,18 do
l=GetInventoryItemLink("raid"..i,j)
if l~=nil then
_,_,_,v=GetItemInfo(l)
if v>232 then
self:RaidDump(UnitName("raid"..i) .. ": " .. l .. "!!")
elseif v>226 and (j~=16 and j~=18) then
self:RaidDump(UnitName("raid"..i) .. ": " .. l .. "!!")
end
end
end
end
self:RaidDump("Check complete.")
elseif msg == "ttdi" then
local toCheck = {}
local uncheckedPlayers = {}
self:RaidDump("Checking for Dedicated Insanity Gear...")
for i=1,GetNumRaidMembers() do
local name = UnitName("raid"..i)
InspectUnit("raid"..i)
uncheckedPlayers[name] = 0
for j=1,18 do
l=GetInventoryItemLink("raid"..i,j)
if l~=nil then
uncheckedPlayers[name] = uncheckedPlayers[name]+1
_, _, id = strfind(l, "item:(%d+)")
if id then
toCheck[id] = l
end
end
end
end
for i,v in ipairs(DedicatedInsanity) do
if toCheck[tostring(v)] then
SendChatMessage(string.format("%s is not allowed", toCheck[tostring(v)]), "raid")
end
end
for i,v in pairs(uncheckedPlayers) do
if v < 5 then
SendChatMessage(string.format("%s was not checked.", i), "raid")
end
end
self:RaidDump("Check complete.")
else
self:Print("Valid commands:")
self:Print("/atlt disbandraid - Disbands a raid")
self:Print("/atlt inviteguild - Invites everyone in your guild to a raid")
self:Print("/atlt promoteall - Promotes everyone in the raid")
self:Print("/atlt printloot - Prints the loot in raid warning")
self:Print("/atlt clearmarks - Clears all raid marks")
self:Print("/atlt rolltally - Begins recording rolls for 10 seconds")
self:Print("/atlt arathibasin - Prints info on the current AB game")
self:Print("/atlt printloot - Prints the loot in /rw with accompanying letter")
self:Print("/atlt ilevel - Prints the sum of everyone's ilevel gear in raid chat")
self:Print("/atlt combatlog - Fixes a broken combat log")
self:Print("/atlt hott - Raid wide Herald of the Titans check")
self:Print("/atlt ttdi - Raid wide Tribute to Dedicated Insanity check")
end
end
function core:UNIT_AURA(_, unit)
-- if we haven't set the initial value yet, set and quit
if (self.hallowBuff == nil) then
self.hallowBuff = not not UnitDebuff("player", "Tricked or Treated")
-- self:Print("Set to", self.hallowBuff);
return;
end
local function hasBuff()
return not not UnitDebuff("player", "Tricked or Treated")
end
if (unit == "player") then
if (self.hallowBuff and not hasBuff()) then
self:Print("Halloween debuff lost!");
self.hallowBuff = false;
elseif (not self.hallowBuff and hasBuff()) then
self.db.profile.halloween = self.db.profile.halloween + 1;
-- pick transitive
local transitive = TRANSITIVES[math.random(#TRANSITIVES)];
self:Print(format("I will %s %d babies this year", transitive, self.db.profile.halloween))
self.hallowBuff = true;
end
end
end
-- g_allLoots = {}
function core:CHAT_MSG_LOOT(_, message, source)
-- if (message:find("Saampson") and message:find("Shadowfrost Shard")) then
-- SendChatMessage(format("Saampson Shard Count: %d", math.random(15, 50)), "raid");
-- end
-- source = message:match("(.+) receives loot")
-- if not g_allLoots[source] then
-- g_allLoots[source] = 0
-- end
-- g_allLoots[source] = g_allLoots[source] + 1
if message:find("You create") and message:find("Deathblood Venom") and GuildBankFrame and GuildBankFrame:IsVisible() and GetItemCount("Deathblood Venom") >= 4 then
for bag=0,NUM_BAG_SLOTS do
for slot=1,GetContainerNumSlots(bag) do
if GetContainerItemID(bag, slot) == 58142 then
SetCurrentGuildBankTab(5)
UseContainerItem(bag, slot)
end
end
end
end
end
function core:CHAT_MSG_SYSTEM(_, message, source)
if self.db.profile.rollTally and self.rollTimer then
local name, roll, min, max = string.match(message, "(%S+) rolls (%d+) %((%d+)%-(%d+)%)")
if name and roll and min and max then
if min ~= "1" or max ~= "100" then
self:Print(string.format("%s is rolling out of bounds (%d-%d).", name, min, max))
return
end
if not self.rollTally then
self.rollTally = {}
end
if self.rollTally[name] then
self:Print(string.format("%s is rolling again (first: %d, this: %d).", name, self.rollTally[name], roll))
return
end
self.rollTally[name] = roll
end
end
end
function core:RollFinish()
local winner
local ties = {}
for i,v in pairs(self.rollTally) do
if (not winner) or (tonumber(self.rollTally[winner])<tonumber(v)) then
winner = i
ties = {}
elseif self.rollTally[winner] == v then
table.insert(ties, i)
end
end
if not winner then
self:Print("No rolls detected.")
else
if next(ties) then
local roll = self.rollTally[winner]
for i,v in ipairs(ties) do
winner = v .. ", " .. winner
end
self:Print(string.format("%d-way tie between %s (rolled %d). Rerolling...", #ties+1, winner, roll))
self.rollTally = {}
self:ScheduleTimer("RollFinish", 4)
else
self:Print(string.format("%s won the roll with a %d.", winner, self.rollTally[winner]))
end
end
self.rollTimer = false
end
function core:NixAFK(_, _, ...)
return (not not self.db.profile.nixAFK), ...;
end
function core:AchievementFrame_LoadUI(...)
local args = {self.hooks["AchievementFrame_LoadUI"](...)}
AchievementFrame_SetFilter(3)
self:Unhook("AchievementFrame_LoadUI")
return unpack(args);
end
function core:UnitAura(...)
name, rank, icon, count, dispelType, duration, expires, caster, isStealable, shouldConsolidate, spellID = self.hooks["UnitAura"](...)
if expires and (self.db.profile.consolidateThresh > 0) then
if ((expires-GetTime())/60 > self.db.profile.consolidateThresh) or (name:find("Aura") or name:find("Totem")) or (shouldConsolidate == 1) then
shouldConsolidate = 1
else
shouldConsolidate = nil
end
end
return name, rank, icon, count, dispelType, duration, expires, caster, isStealable, shouldConsolidate, spellID
end
function core:CHAT_MSG_OFFICER(_, msg)
local _,_,numA,numB,numC = msg:find("!phone %(?(%d+)%)?.(%d+).(%d+)");
local _,_,name = msg:find("!phone (%w+)");
if (not (numA and numB and numC) and not name) then
return;
end
local setting = GetGuildRosterShowOffline();
SetGuildRosterShowOffline(1);
for i=1,GetNumGuildMembers() do
local p, n = self:CheckPhone(i);
if ((name and p and p:lower():find(name:lower())) or
(numA and n and format("%s-%s-%s", numA, numB, numC)==n)) then
if (n) then
SendChatMessage(format("%s: %s", p, n), "officer");
else
SendChatMessage(format("No %s for %s.", (numA and "name") or "number", p), "officer");
end
end
end
SetGuildRosterShowOffline(setting);
end
function core:CheckPhone(index)
local name, rank, _, _, _, _, _, onote = GetGuildRosterInfo(index);
local a, b, c = onote:match("%(?(%d%d%d)%)?.(%d%d%d).(%d%d%d%d)");
if (not rank:find("Alt") and not rank:find("Non")) then
if (a) then
return name, format("%s-%s-%s", a, b, c);
end
return name, nil;
end
return nil, nil;
end
function core:TargetUnit(name)
if name and GetNumPartyMembers() == 0 and GetNumRaidMembers() == 0 then
self:RegisterEvent("UNIT_TARGET", function(_, unit)
if unit == "player" then
if UnitName("target") and UnitName("target"):lower():find(name:lower()) then
SetRaidTarget("target", 1)
end
self:UnregisterEvent("UNIT_TARGET")
end
end)
end
end
local chatEvents = { local chatEvents = {
"CHAT_MSG_ACHIEVEMENT", "CHAT_MSG_ACHIEVEMENT",
"CHAT_MSG_ADDON", "CHAT_MSG_ADDON",

View file

@ -187,3 +187,246 @@ local function my_hash(key, ...)
end end
return i; return i;
end end
-- Saampson Shards and Deathblood Venom deposit --------------------------------
function core:CHAT_MSG_LOOT(_, message, source)
-- if (message:find("Saampson") and message:find("Shadowfrost Shard")) then
-- SendChatMessage(format("Saampson Shard Count: %d", math.random(15, 50)), "raid");
-- end
-- source = message:match("(.+) receives loot")
-- if not g_allLoots[source] then
-- g_allLoots[source] = 0
-- end
-- g_allLoots[source] = g_allLoots[source] + 1
if message:find("You create") and message:find("Deathblood Venom") and GuildBankFrame and GuildBankFrame:IsVisible() and GetItemCount("Deathblood Venom") >= 4 then
for bag=0,NUM_BAG_SLOTS do
for slot=1,GetContainerNumSlots(bag) do
if GetContainerItemID(bag, slot) == 58142 then
SetCurrentGuildBankTab(5)
UseContainerItem(bag, slot)
end
end
end
end
end
-- Consolidate Thresh
function core:UnitAura(...)
name, rank, icon, count, dispelType, duration, expires, caster, isStealable, shouldConsolidate, spellID = self.hooks["UnitAura"](...)
if expires and (self.db.profile.consolidateThresh > 0) then
if ((expires-GetTime())/60 > self.db.profile.consolidateThresh) or (name:find("Aura") or name:find("Totem")) or (shouldConsolidate == 1) then
shouldConsolidate = 1
else
shouldConsolidate = nil
end
end
return name, rank, icon, count, dispelType, duration, expires, caster, isStealable, shouldConsolidate, spellID
end
-- Slash Commands
function core:SlashProcess(msg)
if msg == "ilevel" or msg == "il" then
self:RaidDump("Tallying iLevel Sums...")
r = {}
for i=1,GetNumRaidMembers() do
s=0
InspectUnit("raid"..i)
for j=1,16 do
l=GetInventoryItemLink("raid"..i,j)
if l~=nil and j~=4 then
_,_,_,v=GetItemInfo(l) s=s+v
end
end
r[i] = {UnitName("raid"..i), s}
end
table.sort(r, function(a, b) return a[2] > b[2] end)
for i,v in pairs(r) do
if v[2] > 0 then
self:RaidDump(v[1]..": "..v[2])
else
self:RaidDump(v[1]..": (out of range)")
end
end
self:RaidDump("---")
elseif msg == "markxp" then
-- write all current
local db = self.db.profile.guildXPMarks
local num = #db+1
db[num] = {
time = time(),
marks = { },
}
local markSet = db[num].marks
-- build all xp list
for i=1,GetNumGuildMembers() do
local name, rank, _, _, _, _, note = GetGuildRosterInfo(i)
local xp, total = GetGuildRosterContribution(i)
if rank:find("Alt") then
name = note
end
if not markSet[name] then
markSet[name] = 0
end
markSet[name] = markSet[name] + total
end
self:Print(format("Created new mark set #%d; suggested UI reload", num))
elseif msg:find("diff ") then
local setNum = tonumber(msg:match("diff (%d+)"))
local set = setNum and self.db.profile.guildXPMarks[setNum]
if not set then
self:Print(format("Could not find split %d", setNum))
return
end
local markSet = { }
for i=1,GetNumGuildMembers() do
local name, rank, _, _, _, _, note = GetGuildRosterInfo(i)
local xp, total = GetGuildRosterContribution(i)
if rank:find("Alt") then
name = note
end
if not markSet[name] then
markSet[name] = 0
end
markSet[name] = markSet[name] + total
end
local diff = { }
local total = 0
for player, xp in pairs(set.marks) do
if markSet[player] > xp then
local d = markSet[player] - xp
diff[player] = d
total = total + d
end
end
local function printInfo(msg)
-- self:Print(msg)
SendChatMessage(msg, "guild")
end
printInfo(format("Guild XP Difference Since %s:", date("%c", set.time)))
while next(diff) ~= nil do
local max, maxVal = "-", -1
for k,v in pairs(diff) do
if v > maxVal then
max, maxVal = k, v
end
end
printInfo(format("%s - %.1fk (%.1f%%)", max, maxVal/1000, maxVal/total*100))
diff[max] = nil
end
elseif msg == "hott" then
self:RaidDump("Checking for Herald Gear...")
for i=1,GetNumRaidMembers() do
s=0
InspectUnit("raid"..i)
for j=1,18 do
l=GetInventoryItemLink("raid"..i,j)
if l~=nil then
_,_,_,v=GetItemInfo(l)
if v>232 then
self:RaidDump(UnitName("raid"..i) .. ": " .. l .. "!!")
elseif v>226 and (j~=16 and j~=18) then
self:RaidDump(UnitName("raid"..i) .. ": " .. l .. "!!")
end
end
end
end
self:RaidDump("Check complete.")
elseif msg == "ttdi" then
local toCheck = {}
local uncheckedPlayers = {}
self:RaidDump("Checking for Dedicated Insanity Gear...")
for i=1,GetNumRaidMembers() do
local name = UnitName("raid"..i)
InspectUnit("raid"..i)
uncheckedPlayers[name] = 0
for j=1,18 do
l=GetInventoryItemLink("raid"..i,j)
if l~=nil then
uncheckedPlayers[name] = uncheckedPlayers[name]+1
_, _, id = strfind(l, "item:(%d+)")
if id then
toCheck[id] = l
end
end
end
end
for i,v in ipairs(DedicatedInsanity) do
if toCheck[tostring(v)] then
SendChatMessage(string.format("%s is not allowed", toCheck[tostring(v)]), "raid")
end
end
for i,v in pairs(uncheckedPlayers) do
if v < 5 then
SendChatMessage(string.format("%s was not checked.", i), "raid")
end
end
self:RaidDump("Check complete.")
else
self:Print("Valid commands:")
self:Print("/atlt disbandraid - Disbands a raid")
self:Print("/atlt inviteguild - Invites everyone in your guild to a raid")
self:Print("/atlt promoteall - Promotes everyone in the raid")
self:Print("/atlt printloot - Prints the loot in raid warning")
self:Print("/atlt clearmarks - Clears all raid marks")
self:Print("/atlt rolltally - Begins recording rolls for 10 seconds")
self:Print("/atlt arathibasin - Prints info on the current AB game")
self:Print("/atlt printloot - Prints the loot in /rw with accompanying letter")
self:Print("/atlt ilevel - Prints the sum of everyone's ilevel gear in raid chat")
self:Print("/atlt combatlog - Fixes a broken combat log")
self:Print("/atlt hott - Raid wide Herald of the Titans check")
self:Print("/atlt ttdi - Raid wide Tribute to Dedicated Insanity check")
end
end
-- Hallow's end
self.hallowBuff = nil
function core:UNIT_AURA(_, unit)
-- if we haven't set the initial value yet, set and quit
if (self.hallowBuff == nil) then
self.hallowBuff = not not UnitDebuff("player", "Tricked or Treated")
-- self:Print("Set to", self.hallowBuff);
return;
end
local function hasBuff()
return not not UnitDebuff("player", "Tricked or Treated")
end
if (unit == "player") then
if (self.hallowBuff and not hasBuff()) then
self:Print("Halloween debuff lost!");
self.hallowBuff = false;
elseif (not self.hallowBuff and hasBuff()) then
self.db.profile.halloween = self.db.profile.halloween + 1;
-- pick transitive
local transitive = TRANSITIVES[math.random(#TRANSITIVES)];
self:Print(format("I will %s %d babies this year", transitive, self.db.profile.halloween))
self.hallowBuff = true;
end
end
end
-- Dedicated Insanity info -----------------------------------------------------
-- local DedicatedInsanity = {46017,47069,47079,47082,47093,47072,47073,47090,47071,47094,47081,47092,47070,47080,47104,47138,47114,47121,47142,47108,47106,47107,47140,47126,47139,47116,47148,47193,47233,47150,47234,47195,47184,47204,47151,47186,47235,47183,47194,47187,47225,47203,47054,47182,46958,46976,46985,46996,46994,46979,46963,46962,46997,47052,47057,46999,46961,46960,47083,46990,47152,47056,47000,46988,46974,47055,46992,47051,46972,47141,47042,47043,47041,47115,46959,47053,49500,49494,49465,49493,49490,49496,49497,49499,49495,49501,49498,49466,49467,49474,49475,49476,49478,49479,49480,49468,49469,49470,49471,49472,49473,49477,49481,49482,49483,49484,49491,49489,49492,49464,49488,47078,47085,47086,47098,47076,47074,47087,47099,47077,47096,47084,47097,47095,47075,47088,47001,47156,46995,46980,46969,47113,47521,47206,47526,47519,47239,46964,47130,47524,47525,47517,47506,47515,46968,47147,46986,47003,47154,47240,47061,47067,47132,47002,47207,46967,47111,46965,47209,47109,47191,46991,47153,47068,47004,46989,46975,47190,47112,47145,47066,47155,46993,47129,47205,47236,47062,47189,46973,47143,47208,46971,46977,47063,47192,47238,47545,47547,47549,47552,47553,47237,47060,47110,47133,47144,47059,47131,47188,47224,47157,46966,47146,47064,
-- 42210,42229,42234,42244,42250,42257,42262,42267,42272,42277,42282,42287,42292,42319,42324,42329,42334,42348,42354,42366,42386,42392,42483,42487,42492,42498,42504,42515,42521,44423,44424,48402,48404,48406,48408,48410,48412,48414,48420,48422,48424,48426,48428,48432,48435,48438,48440,48442,48444,48507,48509,48511,48513,48515,48517,48519,48521,48523,49185,49189,49191,
-- 40790,40791,40792,40810,40811,40812,40829,40830,40831,40850,40851,40852,40870,40871,40872,40883,40884,40890,40910,40928,40934,40940,40964,40978,40979,40984,40994,40995,41002,41008,41014,41020,41028,41034,41039,41045,41052,41056,41061,41066,41071,41076,41082,41088,41138,41144,41152,41158,41200,41206,41212,41218,41226,41231,41236,41276,41282,41288,41294,41299,41305,41311,41317,41322,41328,41618,41622,41626,41631,41636,41641,41651,41656,41662,41668,41673,41679,41684,41716,41768,41774,41833,41837,41841,41855,41860,41865,41870,41875,41882,41886,41894,41899,41904,41910,41916,41922,41928,41935,41941,41947,41954,41960,41966,41972,41994,41999,42006,42012,42018,42041,42042,42043,42044,42045,42046,42047,42076,42077,42078,42079,42080,42081,42082,42118,42119,42527,42533,42539,42561,42566,42572,42580,42585,42591,42599,42604,42609,42616,42622,42854,46374,49086,49179,49181,49183,49187,
-- 48646,48645,48644,48643,48642,48616,48615,48614,48613,48612,48584,48583,48582,48581,48580,48547,48546,48545,48544,48543,48490,48489,48488,48487,48486,48455,48453,48451,48447,48433,48385,48384,48383,48382,48381,48355,48354,48353,48352,48351,48325,48324,48323,48322,48321,48294,48293,48292,48291,48290,48264,48263,48262,48261,48260,48232,48231,48230,48229,48228,48207,48206,48205,48204,48203,48172,48171,48170,48169,48168,48142,48141,48140,48139,48138,48086,48085,48084,48083,48082,48037,48035,48033,48031,48029,47792,47791,47790,47789,47788,47762,47761,47760,47759,47758,
-- }

View file

@ -154,6 +154,9 @@ function mod:ActiveTally(mode)
end end
-- Roll Tally ------------------------------------------------------------------ -- Roll Tally ------------------------------------------------------------------
local rollTally = {}
local rollTimer = false
function core:CHAT_MSG_RAID_WARNING(_, message) function core:CHAT_MSG_RAID_WARNING(_, message)
if self.db.profile.rollTally and string.find(message:lower(), "roll") then if self.db.profile.rollTally and string.find(message:lower(), "roll") then
if self.rollTimer then if self.rollTimer then
@ -161,11 +164,66 @@ function core:CHAT_MSG_RAID_WARNING(_, message)
self:CancelTimer(self.rollTimer) self:CancelTimer(self.rollTimer)
self:RollFinish() self:RollFinish()
end end
self.rollTally = {} rollTally = {}
self.rollTimer = self:ScheduleTimer("RollFinish", 10) self.rollTimer = self:ScheduleTimer("RollFinish", 10)
end end
end end
function core:CHAT_MSG_SYSTEM(_, message, source)
if self.db.profile.rollTally and self.rollTimer then
local name, roll, min, max = string.match(message, "(%S+) rolls (%d+) %((%d+)%-(%d+)%)")
if name and roll and min and max then
if min ~= "1" or max ~= "100" then
self:Print(string.format("%s is rolling out of bounds (%d-%d).", name, min, max))
return
end
if not rollTally then
rollTally = {}
end
if rollTally[name] then
self:Print(string.format("%s is rolling again (first: %d, this: %d).", name, rollTally[name], roll))
return
end
rollTally[name] = roll
end
end
end
function core:RollFinish()
local winner
local ties = {}
for i,v in pairs(rollTally) do
if (not winner) or (tonumber(rollTally[winner])<tonumber(v)) then
winner = i
ties = {}
elseif rollTally[winner] == v then
table.insert(ties, i)
end
end
if not winner then
self:Print("No rolls detected.")
else
if next(ties) then
local roll = rollTally[winner]
for i,v in ipairs(ties) do
winner = v .. ", " .. winner
end
self:Print(string.format("%d-way tie between %s (rolled %d). Rerolling...", #ties+1, winner, roll))
rollTally = {}
self:ScheduleTimer("RollFinish", 4)
else
self:Print(string.format("%s won the roll with a %d.", winner, rollTally[winner]))
end
end
self.rollTimer = false
end
function core:NixAFK(_, _, ...)
return (not not self.db.profile.nixAFK), ...;
end
-- Officer Phone --------------------------------------------------------------- -- Officer Phone ---------------------------------------------------------------
function core:CHAT_MSG_OFFICER(_, msg) function core:CHAT_MSG_OFFICER(_, msg)
local _,_,numA,numB,numC = msg:find("!phone %(?(%d+)%)?.(%d+).(%d+)"); local _,_,numA,numB,numC = msg:find("!phone %(?(%d+)%)?.(%d+).(%d+)");
@ -202,3 +260,25 @@ function core:CheckPhone(index)
end end
return nil, nil; return nil, nil;
end end
-- Mark Star on Target ---------------------------------------------------------
function core:TargetUnit(name)
if name and GetNumPartyMembers() == 0 and GetNumRaidMembers() == 0 then
self:RegisterEvent("UNIT_TARGET", function(_, unit)
if unit == "player" then
if UnitName("target") and UnitName("target"):lower():find(name:lower()) then
SetRaidTarget("target", 1)
end
self:UnregisterEvent("UNIT_TARGET")
end
end)
end
end
-- Achieve Load ----------------------------------------------------------------
function core:AchievementFrame_LoadUI(...)
local args = {self.hooks["AchievementFrame_LoadUI"](...)}
AchievementFrame_SetFilter(3)
self:Unhook("AchievementFrame_LoadUI")
return unpack(args);
end