You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
1037 lines
36 KiB
1037 lines
36 KiB
local COMPAT, CANAME, T = select(4, GetBuildInfo()), ...
|
|
if T.SkipLocalActionBook then return end
|
|
if T.TenEnv then T.TenEnv() end
|
|
|
|
local MODERN, CI_ERA, CF_CATA = COMPAT >= 10e4, COMPAT < 2e4, COMPAT > 4e4 and COMPAT < 10e4
|
|
local EV = T.Evie
|
|
local AB = T.ActionBook:compatible(2, 31)
|
|
local KR = T.ActionBook:compatible("Kindred", 1,26)
|
|
local RW = T.ActionBook:compatible("Rewire", 1,40)
|
|
assert(EV and AB and KR and RW and 1, "Incompatible library bundle")
|
|
local playerClassLocal, playerClass = UnitClass("player")
|
|
|
|
local stringArgCache = {} do
|
|
local empty = {}
|
|
setmetatable(stringArgCache, {__index=function(t,k)
|
|
if k then
|
|
local at
|
|
for s in k:gmatch("[^/]+") do
|
|
s = s:match("^%s*(%S.-)%s*$")
|
|
if s then
|
|
at = at or {}
|
|
at[#at + 1] = KR:UnescapeCmdOptionsValue(s)
|
|
end
|
|
end
|
|
at = at or empty
|
|
t[k] = at
|
|
return at
|
|
end
|
|
return empty
|
|
end})
|
|
end
|
|
|
|
local RegisterStateConditional do
|
|
local f = CreateFrame("Frame", nil, nil, "SecureHandlerAttributeTemplate")
|
|
f:SetFrameRef("KR", KR:seclib())
|
|
f:Execute('KR, curValue = self:GetFrameRef("KR"), newtable()')
|
|
f:SetAttribute("_onattributechanged", [[-- AB_CondDriver_OAC
|
|
local state = name:match("^state%-(.+)")
|
|
if state and value ~= "_" and curValue[state] ~= nil then
|
|
KR:RunAttribute("UpdateStateConditional", state, value, curValue[state] or "")
|
|
curValue[state] = value or false
|
|
end
|
|
]])
|
|
function RegisterStateConditional(name, cond, usesExtendedConditionals)
|
|
KR:SetStateConditionalValue(name, false)
|
|
f:SetAttributeNoHandler("state-" .. name, "_")
|
|
f:SetAttributeNoHandler("register-name", name)
|
|
f:SetAttributeNoHandler("register-cond", cond)
|
|
f:SetAttributeNoHandler("register-kind", not not usesExtendedConditionals)
|
|
f:Execute([[-- AB_CondStateDriver_Register
|
|
local name, cond = self:GetAttribute("register-name"), self:GetAttribute("register-cond")
|
|
curValue[name] = curValue[name] or false
|
|
if self:GetAttribute("register-kind") then
|
|
KR:SetAttribute("frameref-RegisterStateDriver-frame", self)
|
|
KR:RunAttribute("RegisterStateDriver", name, cond)
|
|
else
|
|
RegisterStateDriver(self, name, cond)
|
|
end
|
|
]])
|
|
end
|
|
end
|
|
|
|
securecall(function() -- zone:Zone/Sub Zone
|
|
local function onZoneUpdate()
|
|
local cz
|
|
for i=1,4 do
|
|
local z = (i == 1 and GetRealZoneText or i == 2 and GetSubZoneText or i == 3 and GetZoneText or GetMinimapZoneText)()
|
|
if z and z ~= "" then
|
|
cz = (cz and (cz .. "/") or "") .. z:gsub("%s*[,/%[%]][[,/%[%]]%s]*", " ")
|
|
end
|
|
end
|
|
KR:SetStateConditionalValue("zone", cz or false)
|
|
end
|
|
onZoneUpdate()
|
|
EV.ZONE_CHANGED = onZoneUpdate
|
|
EV.ZONE_CHANGED_INDOORS = onZoneUpdate
|
|
EV.ZONE_CHANGED_NEW_AREA = onZoneUpdate
|
|
EV.PLAYER_ENTERING_WORLD = onZoneUpdate
|
|
end)
|
|
securecall(function() -- me:Player Name/Class
|
|
KR:SetStateConditionalValue("me", UnitName("player") .. "/" .. playerClassLocal .. "/" .. playerClass)
|
|
end)
|
|
securecall(function() -- spec:id/name
|
|
local s, _, _, cid = nil, UnitClass("player")
|
|
for i=1,MODERN and 5 or 0 do
|
|
local id, name = GetSpecializationInfoForClassID(cid, i)
|
|
if id and name then
|
|
s = ("%s[spec:%d] %d/%d/%s"):format(s and s .. "; " or "", i, i, id, name:lower())
|
|
end
|
|
end
|
|
if s then
|
|
RegisterStateConditional("spec", s, false)
|
|
end
|
|
end)
|
|
securecall(function() -- form:token
|
|
local map, curCnd, pending =
|
|
playerClass == "DRUID" and {
|
|
[GetSpellInfo(40120) or 1]="/flight",
|
|
[GetSpellInfo(33943) or 1]="/flight",
|
|
[GetSpellInfo(1066) or 1]="/aquatic",
|
|
[GetSpellInfo(783) or 1]="/travel",
|
|
[GetSpellInfo(24858) or 1]="/moon/moonkin",
|
|
[GetSpellInfo(768) or 1]="/cat",
|
|
[GetSpellInfo(171745) or 1]="/cat",
|
|
[GetSpellInfo(5487) or 1]="/bear",
|
|
[not MODERN and GetSpellInfo(9634) or 1]="/bear",
|
|
[GetSpellInfo(114282) or 1]="/treant",
|
|
[GetSpellInfo(210053) or 1]="/stag",
|
|
} or
|
|
playerClass == "WARRIOR" and {
|
|
[GetSpellInfo(197690) or 1]="/defensive",
|
|
[GetSpellInfo(386164) or 1]="/battle",
|
|
[GetSpellInfo(386196) or 1]="/berserker",
|
|
[GetSpellInfo(386208) or 1]="/defensive",
|
|
[CI_ERA and GetSpellInfo(412513) or 1]="/gladiator",
|
|
[GetSpellInfo(2457) or 1]="/battle",
|
|
[GetSpellInfo(71) or 1]="/defensive",
|
|
[GetSpellInfo(2458) or 1]="/berserker",
|
|
}
|
|
if map then
|
|
KR:SetAliasConditional("stance", "form")
|
|
local function syncForm()
|
|
local s = ""
|
|
for i=1,10 do
|
|
local _, _, _, fsid = GetShapeshiftFormInfo(i)
|
|
local name = GetSpellInfo(fsid)
|
|
s = ("%s[form:%d] %d%s;"):format(s, i,i, map[name] or "")
|
|
end
|
|
if curCnd ~= s then
|
|
RegisterStateConditional("form", s, false)
|
|
end
|
|
curCnd, pending = s, nil
|
|
return "remove"
|
|
end
|
|
EV.PLAYER_LOGIN = syncForm
|
|
function EV.UPDATE_SHAPESHIFT_FORMS()
|
|
if InCombatLockdown() then
|
|
pending = pending or EV.RegisterEvent("PLAYER_REGEN_ENABLED", syncForm) or 1
|
|
else
|
|
syncForm()
|
|
end
|
|
end
|
|
end
|
|
end)
|
|
securecall(function() -- instance:arena/bg/ratedbg/lfr/raid/scenario + outland/northrend/...
|
|
local mapTypes = {
|
|
party="dungeon", pvp="battleground/bg", ratedbg="ratedbg/rgb", none="world",
|
|
[1116]="world/draenor", [1464]="world/draenor", [1191]="world/draenor/ashran/worldpvp",
|
|
[974]="world/darkmoon faire",
|
|
[870]="world/pandaria", [1064]="world/pandaria",
|
|
[530]="world/outland", [571]="world/northrend",
|
|
[1220]="world/broken isles", [1669]="world/argus",
|
|
[1642]="world/bfa/zandalar", [1643]="world/bfa/kul tiras", [1718]="world/bfa/nazjatar",
|
|
[2222]="world/shadowlands",
|
|
[2453]="world/torghast", -- lobby
|
|
[2162]="torghast", -- towers
|
|
[2444]="world/dragon isles/df",
|
|
[2516]="dungeon/nokhud",
|
|
[2454]="world/zaralek/df",
|
|
[2548]="world/emerald dream/df",
|
|
[2552]="world/khaz algar/tww",
|
|
[2601]="world/khaz algar/tww",
|
|
[2127]="world/siren isle/tww",
|
|
[2706]="world/undermine/tww",
|
|
[2662]="dungeon/dawnbreaker",
|
|
[2769]="raid/undermine",
|
|
[2827]="hvision", [2828]="hvision", [2212]="hvision", [2213]="hvision",
|
|
hvision="scenario/hvision",
|
|
|
|
garrison="world/draenor/garrison",
|
|
[1158]="garrison", [1331]="garrison", [1159]="garrison",
|
|
[1152]="garrison", [1330]="garrison", [1153]="garrison",
|
|
|
|
[1893]="island", -- The Dread Chain
|
|
[1814]="island", -- Havenswood (?)
|
|
[1879]="island", -- Jorundall (?)
|
|
[1897]="island", -- Molten Cay
|
|
[1892]="island", -- The Rotting Mire
|
|
[1898]="island", -- Skittering Hollow
|
|
[1813]="island", -- Un'gol Ruins
|
|
[1955]="island", -- Uncharted Island (tutorial)
|
|
[1882]="island", -- Verdant Wilds
|
|
[1883]="island", -- Whispering Reef
|
|
}
|
|
local mapZoneCheck, zoneChecked = {
|
|
[2512]="world/gta", [2085e6+2512]="world/dragon isles/df/gta"
|
|
}, true
|
|
local function syncInstance(e)
|
|
local _, itype, did, _, _, _, _, imid = GetInstanceInfo()
|
|
local stype = itype == "raid" and did == 7 and "/lfr"
|
|
if mapZoneCheck[imid] then
|
|
if e == "PLAYER_ENTERING_WORLD" and zoneChecked then
|
|
zoneChecked, EV.ZONE_CHANGED_NEW_AREA = false, syncInstance
|
|
end
|
|
local bm = C_Map.GetBestMapForUnit("player")
|
|
itype = mapZoneCheck[bm and bm*1e6 + imid or nil] or mapZoneCheck[imid] or mapTypes[imid]
|
|
elseif mapTypes[imid] then
|
|
itype = mapTypes[imid]
|
|
elseif itype == "pvp" and MODERN and C_PvP.IsRatedBattleground() then
|
|
itype = "ratedbg"
|
|
elseif itype == "none" and MODERN and IsInActiveWorldPVP() then
|
|
itype = "worldpvp"
|
|
elseif itype == "scenario" and C_DelvesUI and C_DelvesUI.HasActiveDelve(imid) then
|
|
itype = "scenario/delve"
|
|
end
|
|
itype = mapTypes[itype] or itype or "daze"
|
|
itype = stype and (itype .. stype) or itype
|
|
KR:SetStateConditionalValue("in", itype)
|
|
if e == "ZONE_CHANGED_NEW_AREA" then
|
|
zoneChecked = true
|
|
return "remove"
|
|
end
|
|
end
|
|
EV.PLAYER_ENTERING_WORLD = syncInstance
|
|
EV.WALK_IN_DATA_UPDATE = syncInstance
|
|
function EV:PLAYER_MAP_CHANGED(_old, _new)
|
|
-- [11.0.2] Delve airlocks: PEW doesn't fire; GetInstanceInfo() returns stale data during PMC
|
|
EV.After(0, syncInstance)
|
|
end
|
|
KR:SetAliasConditional("instance", "in")
|
|
KR:SetStateConditionalValue("in", "daze")
|
|
end)
|
|
securecall(function() -- petcontrol
|
|
local hasControl = (playerClass ~= "HUNTER" and playerClass ~= "WARLOCK") or UnitLevel("player") >= 10
|
|
KR:SetStateConditionalValue("petcontrol", hasControl)
|
|
if not hasControl then
|
|
function EV.PLAYER_LEVEL_UP(_, level)
|
|
if level >= 10 then
|
|
KR:SetStateConditionalValue("petcontrol", "*")
|
|
return "remove"
|
|
end
|
|
end
|
|
end
|
|
end)
|
|
securecall(function() -- outpost
|
|
if not MODERN then
|
|
KR:SetStateConditionalValue("outpost", "")
|
|
return
|
|
end
|
|
local map, state, name = {
|
|
[161676]="garrison", [161332]="garrison",
|
|
[164012]="arena", [164050]="lumber yard/yard",
|
|
[161767]="sanctum", [162075]="arsenal",
|
|
[168499]="brewery", [168487]="brewery", [170108]="smuggling run/run", [170097]="smuggling run/run",
|
|
[164222]="corral", [165803]="corral", [160240]="tankworks", [160241]="tankworks",
|
|
}, false, GetSpellInfo(161691)
|
|
local function syncOutpost()
|
|
local ns = map[select(7, GetSpellInfo(name))]
|
|
if state ~= ns then
|
|
KR:SetStateConditionalValue("outpost", ns or "")
|
|
state = ns
|
|
end
|
|
end
|
|
EV.SPELLS_CHANGED = syncOutpost
|
|
syncOutpost()
|
|
end)
|
|
securecall(function() -- level:floor
|
|
local function syncLevel()
|
|
KR:SetThresholdConditionalValue("level", UnitLevel("player") or 0)
|
|
end
|
|
syncLevel()
|
|
EV.PLAYER_LEVEL_UP = syncLevel
|
|
end)
|
|
securecall(function() -- horde/alliance
|
|
local function syncFactionGroup(e, u)
|
|
if e ~= "UNIT_FACTION" or u == "player" then
|
|
local fg = UnitFactionGroup("player")
|
|
KR:SetStateConditionalValue("horde", fg == "Horde" and "*" or "")
|
|
KR:SetStateConditionalValue("alliance", fg == "Alliance" and "*" or "")
|
|
KR:SetStateConditionalValue("merc", MODERN and UnitIsMercenary("player") and "*" or "")
|
|
end
|
|
end
|
|
syncFactionGroup()
|
|
EV.PLAYER_ENTERING_WORLD, EV.UNIT_FACTION = syncFactionGroup, syncFactionGroup
|
|
KR:SetAliasConditional("mercenary", "merc")
|
|
end)
|
|
securecall(function() -- moving
|
|
KR:SetNonSecureConditional("moving", function()
|
|
return GetUnitSpeed("player") > 0
|
|
end)
|
|
end)
|
|
securecall(function() -- falling
|
|
KR:SetNonSecureConditional("falling", function()
|
|
return IsFalling()
|
|
end)
|
|
end)
|
|
securecall(function() -- ready:spell name/spell id/item name/item id
|
|
KR:SetNonSecureConditional("ready", function(_name, args)
|
|
local gcS, gcL = GetSpellCooldown(61304)
|
|
if not args or args == "" then
|
|
return gcS == 0 and gcL == 0
|
|
end
|
|
|
|
local at = stringArgCache[args]
|
|
local gcE = gcS and gcL and (gcS + gcL) or math.huge
|
|
for i=1,#at do
|
|
local rc = at[i]
|
|
local cdS, cdL, _cdA = GetSpellCooldown(rc)
|
|
if cdL == nil then
|
|
local _, iid = C_Item.GetItemInfo(rc)
|
|
iid = tonumber((iid or rc):match("item:(%d+)"))
|
|
if iid then
|
|
cdS, cdL, _cdA = C_Container.GetItemCooldown(iid)
|
|
end
|
|
end
|
|
if cdL == 0 or (cdS and cdL and (cdS + cdL) <= gcE) then
|
|
return true
|
|
end
|
|
end
|
|
|
|
return false
|
|
end)
|
|
end)
|
|
securecall(function() -- have:item name/id
|
|
KR:SetNonSecureConditional("have", function(_name, args)
|
|
if not args or args == "" then
|
|
return false
|
|
end
|
|
|
|
local at, GetItemCount = stringArgCache[args], C_Item.GetItemCount
|
|
for i=1,#at do
|
|
if (GetItemCount(at[i]) or 0) > 0 then
|
|
return true
|
|
end
|
|
end
|
|
|
|
return false
|
|
end)
|
|
end)
|
|
securecall(function() -- self(de)buff:name, own(de)buff:name, (de)buff:name, cleanse
|
|
local conditionalFilter = {
|
|
selfbuff="HELPFUL", selfdebuff="HARMFUL",
|
|
ownbuff="HELPFUL PLAYER", owndebuff="HARMFUL PLAYER",
|
|
buff="HELPFUL", debuff="HARMFUL",
|
|
}
|
|
local function countSlots(tk, ...)
|
|
return select("#", ...), tk, ...
|
|
end
|
|
local function checkAura(name, args, target)
|
|
target = (name == "selfbuff" or name == "selfdebuff") and "player" or target or "target"
|
|
if not args or args == "" or not UnitExists(target) then
|
|
return false
|
|
end
|
|
local at, query, filter = stringArgCache[args], C_UnitAuras.GetAuraSlots, conditionalFilter[name]
|
|
local count, ctok, a,b,c,d,e
|
|
repeat
|
|
count, ctok, a,b,c,d,e = countSlots(query(target, filter, 5, ctok))
|
|
for i=1, count do
|
|
local dat = C_UnitAuras.GetAuraDataBySlot(target, a)
|
|
local name = dat and dat.name
|
|
for j=1, name and #at or 0 do
|
|
if strcmputf8i(name, at[j]) == 0 then
|
|
return true
|
|
end
|
|
end
|
|
a,b,c,d = b,c,d,e
|
|
end
|
|
until not ctok
|
|
return false
|
|
end
|
|
KR:SetNonSecureConditional("selfbuff", checkAura)
|
|
KR:SetNonSecureConditional("selfdebuff", checkAura)
|
|
KR:SetNonSecureConditional("debuff", checkAura)
|
|
KR:SetNonSecureConditional("owndebuff", checkAura)
|
|
KR:SetNonSecureConditional("buff", checkAura)
|
|
KR:SetNonSecureConditional("ownbuff", checkAura)
|
|
KR:SetNonSecureConditional("cleanse", function(_, _, target)
|
|
target = target or "target"
|
|
return UnitIsFriend("player", target) and select(2,C_UnitAuras.GetAuraSlots(target, "HARMFUL RAID", 1)) ~= nil
|
|
end)
|
|
end)
|
|
securecall(function() -- combo:count
|
|
local power, powerMap = 4, {[265]=7, [267]=14, [258]=13, PALADIN=9, MONK=12}
|
|
local defaultPower = powerMap[playerClass] or 4
|
|
KR:SetNonSecureConditional("combo", function(_name, args)
|
|
return UnitPower("player", power) >= (tonumber(args) or 1)
|
|
end)
|
|
local function syncComboPower()
|
|
power = powerMap[MODERN and GetSpecializationInfo(GetSpecialization() or 0)] or defaultPower
|
|
end
|
|
EV.PLAYER_SPECIALIZATION_CHANGED, EV.PLAYER_ENTERING_WORLD = syncComboPower, syncComboPower
|
|
end)
|
|
securecall(function() -- near:oid/cid
|
|
local argCache, nearValue, nearGroup, holdGroup, holdExpire = {}
|
|
local GROUP_HOLD_TIME = {["tww-herb-overload"]=5, ["tww-mine-overload"]=5}
|
|
local typePrefix, groups = {GameObject="o", Creature="c"}, {}
|
|
for k, v in pairs({
|
|
["herb-overload"] = "o375245/o381199/o381213/o356536/o381202/o381210/o381196/o381205/o375242/o375244/o381214/o381201/o381200/o381212/o375246/o381198/o381203/o381197/o381211/o375243/o381204/o390141/o390140/o390142/o390139/o398761/o398760/o398759/o398762/o398767/o398764/o398765/o398766/o407696/o407688/o407698/o407693",
|
|
["mine-overload"] = "o381516/o375235/o375234/o381515/o381517/o375238/o375239/o381518/o381519/o375240/o390137/o390138/o407669/o407668",
|
|
["tww-herb-overload"] = "o414327/o414329/o414326/o414328/o414325/o414337/o414339/o454053/o454008/o414338/o454084/o414336/o414335/o454066/o454079/o454069/o454074/o423363/o454082/o454067/o423368/o454077/o423364/o423366/o423367/o454072/o454064/o454006/o454050/o414332/o414331/o414330",
|
|
["tww-mine-overload"] = "o413886/o413895/o413905/o430351/o430335/o430352/o413900/o413883/o413890/o413902/o413892/o413884",
|
|
}) do
|
|
for e in v:gmatch("[^/]+") do
|
|
groups[e] = k
|
|
end
|
|
end
|
|
local function checkNearHoldExpire()
|
|
if holdGroup and holdExpire < GetTime() then
|
|
holdGroup, holdExpire = nil
|
|
KR:PokeConditional("near")
|
|
end
|
|
end
|
|
KR:SetNonSecureConditional("near", function(_name, args)
|
|
checkNearHoldExpire()
|
|
if args == nil then
|
|
return nearValue ~= nil
|
|
end
|
|
local ca = argCache[args]
|
|
if ca == nil then
|
|
ca = {}
|
|
for v in args:gmatch("[^%s/][^/]*") do
|
|
ca[v:match("^(.-)%s*$")] = 1
|
|
end
|
|
argCache[args] = ca
|
|
end
|
|
return (ca[nearValue] or ca[nearGroup] or ca[holdGroup]) ~= nil
|
|
end)
|
|
function EV:PLAYER_SOFT_INTERACT_CHANGED(_, guid)
|
|
local ct, oid
|
|
if guid and not InCombatLockdown() then
|
|
ct, oid = guid:match("^(%a+)%-[-%d]+%-(%d+)%-[^-]+$")
|
|
ct = typePrefix[ct]
|
|
oid = ct and ct .. oid or nil
|
|
end
|
|
if oid ~= nearValue then
|
|
local ht = not oid and GROUP_HOLD_TIME[nearGroup]
|
|
if ht then
|
|
holdGroup, holdExpire = nearGroup, GetTime() + ht
|
|
EV.After(ht+1/128, checkNearHoldExpire)
|
|
elseif oid then
|
|
holdGroup, holdExpire = nil
|
|
end
|
|
nearValue, nearGroup = oid, groups[oid]
|
|
KR:PokeConditional("near")
|
|
end
|
|
end
|
|
end)
|
|
securecall(function() -- race:token
|
|
local map, _, raceToken = {
|
|
Scourge="Scourge/Undead/Forsaken",
|
|
LightforgedDraenei="LightforgedDraenei/Lightforged",
|
|
HighmountainTauren="HighmountainTauren/Highmountain",
|
|
MagharOrc="MagharOrc/Maghar",
|
|
ZandalariTroll="ZandalariTroll/Zandalari",
|
|
DarkIronDwarf="DarkIronDwarf/DarkIron",
|
|
}, UnitRace("player")
|
|
KR:SetStateConditionalValue("race", map[raceToken] or raceToken)
|
|
end)
|
|
securecall(function() -- professions
|
|
local ct, ot, syncProfInner = {}, {}
|
|
local map = MODERN and {
|
|
[197]="tail", [165]="lw", [164]="bs",
|
|
[171]="alch", [202]="engi", [333]="ench", [755]="jc", [773]="scri",
|
|
[182]="herb", [186]="mine", [393]="skin",
|
|
[794]="arch", [185]="cook", [356]="fish",
|
|
[20219]="nomeng", [20222]="gobeng",
|
|
}
|
|
map = map or {
|
|
[GetSpellInfo(3908) or ""]="tail",
|
|
[GetSpellInfo(2108) or ""]="lw",
|
|
[GetSpellInfo(2018) or ""]="bs",
|
|
[GetSpellInfo(2259) or ""]="alch",
|
|
[GetSpellInfo(4036) or ""]="engi",
|
|
[GetSpellInfo(7411) or ""]="ench",
|
|
[GetSpellInfo(2366) or ""]="herb",
|
|
[GetSpellInfo(2575) or ""]="mine",
|
|
[GetSpellInfo(8613) or ""]="skin",
|
|
[GetSpellInfo(2550) or ""]="cook",
|
|
[GetSpellInfo(3273) or ""]="faid",
|
|
[GetSpellInfo(7620) or ""]="fish",
|
|
[GetSpellInfo(20221) or ""]="gobeng",
|
|
[GetSpellInfo(20222) or ""]="gobeng",
|
|
[GetSpellInfo(20220) or ""]="nomeng",
|
|
[GetSpellInfo(20219) or ""]="nomeng",
|
|
}
|
|
local spellIDProfs = {
|
|
[264636]="cook3",
|
|
[264620]="tail3", [264626]="tail6",
|
|
[271662]="fish5",
|
|
[264588]="lw6", [264590]="lw7",
|
|
[264479]="eng2", [264481]="eng3", [264483]="eng4", [264485]="eng5", [264488]="eng6", [264490]="eng7", [310542]="eng9",
|
|
-- eng8 is in sync code, because factions
|
|
}
|
|
map[""]=nil
|
|
syncProfInner = MODERN and function(id, ...)
|
|
if id then
|
|
local _1, _2, cur, _cap, ns, sofs, skid, _bonus, specIdx, _ = GetProfessionInfo(id)
|
|
local et, sid = GetSpellBookItemInfo(ns == 2 and sofs and specIdx > -1 and sofs+2 or 0, "spell")
|
|
local e1, e2 = map[skid], map[et == "SPELL" and sid or nil]
|
|
if e1 then ct[e1] = cur end
|
|
if e2 then ct[e2] = cur end
|
|
end
|
|
if select("#", ...) > 0 then
|
|
return syncProfInner(...)
|
|
end
|
|
end or function()
|
|
local idx, wasCollapsed
|
|
for i=1,GetNumSkillLines() do
|
|
local text, isHeader, isExpanded = GetSkillLineInfo(i)
|
|
if isHeader and text == TRADE_SKILLS then
|
|
idx, wasCollapsed = i, not isExpanded
|
|
ExpandSkillHeader(i)
|
|
break
|
|
end
|
|
end
|
|
if not idx then return end
|
|
local j, text, isHeader, _, curSkill = idx+1
|
|
repeat
|
|
j, text, isHeader, _, curSkill = j+1, GetSkillLineInfo(j)
|
|
local skey = map[text]
|
|
if skey and not isHeader then
|
|
ct[skey] = curSkill
|
|
end
|
|
until isHeader or not text
|
|
if wasCollapsed then
|
|
CollapseSkillHeader(idx)
|
|
end
|
|
end
|
|
local function syncProf()
|
|
ct, ot = ot, ct
|
|
for k in pairs(ct) do ct[k] = nil end
|
|
if MODERN then
|
|
syncProfInner(GetProfessions())
|
|
else
|
|
syncProfInner()
|
|
end
|
|
for sid, cnd in pairs(spellIDProfs) do
|
|
ct[cnd] = GetSpellInfo(GetSpellInfo(sid) or "\1") and 1 or nil
|
|
end
|
|
ct["eng8"] = GetSpellInfo(GetSpellInfo(UnitFactionGroup("player") == "Horde" and 265807 or 264492) or "\1") and 1 or nil
|
|
for k,v in pairs(ct) do
|
|
if ot[k] ~= v then
|
|
KR:SetThresholdConditionalValue(k, v)
|
|
ot[k] = v
|
|
end
|
|
end
|
|
for k,v in pairs(ot) do
|
|
if ct[k] ~= v then
|
|
KR:SetThresholdConditionalValue(k, false)
|
|
ot[k] = nil
|
|
end
|
|
end
|
|
end
|
|
for _, v in pairs(map) do
|
|
KR:SetThresholdConditionalValue(v, false)
|
|
end
|
|
for _, v in pairs(spellIDProfs) do
|
|
KR:SetThresholdConditionalValue(v, false)
|
|
end
|
|
for alias, real in ("tailoring:tail leatherworking:lw alchemy:alch engineering:engi enchanting:ench jewelcrafting:jc blacksmithing:bs inscription:scri herbalism:herb archaeology:arch cooking:cook fishing:fish firstaid:faid mining:mine skinning:skin"):gmatch("(%a+):(%a+)") do
|
|
KR:SetAliasConditional(alias, real)
|
|
end
|
|
EV.PLAYER_LOGIN, EV.CHAT_MSG_SKILL = syncProf, syncProf
|
|
end)
|
|
securecall(function() -- pet:stable id; havepet:stable id
|
|
if playerClass ~= "HUNTER" then
|
|
KR:SetStateConditionalValue("havepet", false)
|
|
return
|
|
end
|
|
local pt, noPendingSync = {}, true
|
|
local function syncPet(e)
|
|
if InCombatLockdown() then
|
|
if noPendingSync then
|
|
EV.PLAYER_REGEN_ENABLED, noPendingSync = syncPet, false
|
|
end
|
|
return
|
|
end
|
|
for k in pairs(pt) do pt[k] = nil end
|
|
local o, hpo
|
|
for i=1,5 do
|
|
local _, n, _, r = GetStablePetInfo(i)
|
|
if n and r then
|
|
local k = n == r and n or (n .. "/" .. r)
|
|
pt[k] = (pt[k] or ("[pet:" .. n .. (n ~= r and ",pet:" .. r .. "] " or "] ") .. k)) .. "/" .. i
|
|
hpo = (hpo and hpo .. "/" .. i or i)
|
|
end
|
|
end
|
|
for k, v in pairs(pt) do
|
|
o = k:match("/") and (v .. (o and "; " .. o or "")) or ((o and o .. "; " or "") .. v)
|
|
end
|
|
RegisterStateConditional("pet", "[nopet]; " .. (o and o .. "; 0" or " 0"), false)
|
|
KR:SetStateConditionalValue("havepet", tostring(hpo or ""))
|
|
noPendingSync = true
|
|
return (e == "PLAYER_LOGIN" or e == "PLAYER_REGEN_ENABLED") and "remove"
|
|
end
|
|
KR:SetStateConditionalValue("havepet", false)
|
|
EV.PLAYER_LOGIN, EV.PET_STABLE_UPDATE, EV.PET_INFO_UPDATE, EV.LOCALPLAYER_PET_RENAMED = syncPet, syncPet, syncPet, syncPet
|
|
end)
|
|
securecall(function() -- game:modern/remix/era/sod/cata + era/hc
|
|
KR:SetStateConditionalValue("game", "daze")
|
|
function EV.PLAYER_LOGIN()
|
|
local s
|
|
if CI_ERA then
|
|
local season, st = C_Seasons.GetActiveSeason(), Enum.SeasonID
|
|
s = not season and "era" or
|
|
season == st.SeasonOfDiscovery and "sod" or
|
|
(season == st.Fresh or season == st.FreshHardcore) and "fresh" or
|
|
"era"
|
|
if C_GameRules.IsHardcoreActive() then
|
|
s = s and s .. "/hc" or "hc"
|
|
end
|
|
elseif MODERN then
|
|
s = PlayerGetTimerunningSeasonID() and "remix" or "modern"
|
|
else
|
|
s = "cata"
|
|
end
|
|
KR:SetStateConditionalValue("game", s)
|
|
return "remove"
|
|
end
|
|
end)
|
|
securecall(function() -- visual
|
|
local f = CreateFrame("Frame", nil, nil, "SecureFrameTemplate")
|
|
f:SetAttribute("EvaluateMacroConditional", 'return false')
|
|
KR:SetSecureExternalConditional("visual", f, function() return true end)
|
|
end)
|
|
securecall(function() -- coven:kyrian/venthyr/fae/necro
|
|
KR:SetStateConditionalValue("coven", false)
|
|
KR:SetStateConditionalValue("acoven80", false)
|
|
KR:SetAliasConditional("covenant", "coven")
|
|
KR:SetAliasConditional("acovenant80", "acoven80")
|
|
if not MODERN then
|
|
return
|
|
end
|
|
local cv, covMap = false, {"kyrian", "venthyr", "fae/nightfae", "necro/necrolord"}
|
|
local c8, p8 = false, {1, 4, 3, 2}
|
|
local noPendingSync, noPendingTimer, syncCovenTimer = true, true
|
|
local function syncCoven(e)
|
|
if InCombatLockdown() then
|
|
if noPendingSync then
|
|
EV.PLAYER_REGEN_ENABLED = syncCoven
|
|
end
|
|
return
|
|
end
|
|
noPendingSync = true
|
|
local nv = covMap[C_Covenants.GetActiveCovenantID()] or false
|
|
if nv ~= cv then
|
|
cv = nv
|
|
KR:SetStateConditionalValue("coven", nv)
|
|
end
|
|
if GetAchievementNumCriteria(15646) == 4 then
|
|
local n8 = false
|
|
for i=1,4 do
|
|
if select(3, GetAchievementCriteriaInfo(15646, i)) then
|
|
n8 = n8 and (n8 .. "/" .. covMap[p8[i]]) or covMap[p8[i]]
|
|
end
|
|
end
|
|
if n8 ~= c8 then
|
|
c8 = n8
|
|
KR:SetStateConditionalValue("acoven80", n8)
|
|
end
|
|
elseif noPendingTimer then
|
|
noPendingTimer = false
|
|
EV.After(0.25, syncCovenTimer)
|
|
end
|
|
return e == "PLAYER_REGEN_ENABLED" and "remove"
|
|
end
|
|
function syncCovenTimer()
|
|
noPendingTimer = true
|
|
syncCoven()
|
|
end
|
|
EV.COVENANT_CHOSEN, EV.COVENANT_SANCTUM_RENOWN_LEVEL_CHANGED, EV.PLAYER_ENTERING_WORLD = syncCoven, syncCoven, syncCoven
|
|
end)
|
|
securecall(function() -- worldhover
|
|
KR:SetStateConditionalValue("worldhover", false)
|
|
local wf = CreateFrame("Frame", nil, nil, "ProtectedFrameTemplate-" .. CANAME)
|
|
wf:SetAllPoints(WorldFrame)
|
|
wf:SetPropagateMouseMotion(true)
|
|
wf:SetPropagateMouseClicks(true)
|
|
wf:EnableMouse(false)
|
|
wf:EnableMouseMotion(true)
|
|
wf:SetFrameStrata("BACKGROUND")
|
|
wf:SetFrameLevel(0)
|
|
local function wfOnMotion()
|
|
if not InCombatLockdown() then
|
|
local nv = wf:IsMouseMotionFocus()
|
|
if nv == (KR:EvaluateCmdOptions("[worldhover]") == nil) then
|
|
KR:SetStateConditionalValue("worldhover", nv)
|
|
end
|
|
end
|
|
end
|
|
wf:SetScript("OnEnter", wfOnMotion)
|
|
wf:SetScript("OnLeave", wfOnMotion)
|
|
function EV.PLAYER_REGEN_ENABLED()
|
|
wfOnMotion(wf)
|
|
end
|
|
SecureHandlerSetFrameRef(wf, "KR", KR:seclib())
|
|
SecureStateDriverManager:SetAttribute("setframe", wf)
|
|
SecureStateDriverManager:SetAttribute("setstate", "_wrapentered 1")
|
|
SecureHandlerExecute(wf, [[KR = self:GetFrameRef("KR"); self:SetAttribute("frameref-KR", nil)]])
|
|
SecureHandlerWrapScript(wf, "OnEnter", wf, 'KR:RunAttribute("UpdateStateConditional", "worldhover", "*", nil)')
|
|
SecureHandlerWrapScript(wf, "OnLeave", wf, 'KR:RunAttribute("UpdateStateConditional", "worldhover", nil, "*")')
|
|
end)
|
|
securecall(function() -- imbuedmh, imbuedoh, imbuedrw
|
|
local h = CreateFrame("Frame", nil, nil, "SecureAuraHeaderTemplate")
|
|
SecureHandlerSetFrameRef(h, "KR", KR:seclib())
|
|
SecureHandlerExecute(h, [[KR = self:GetFrameRef("KR")]])
|
|
local t1 = CreateFrame("Frame", nil, h, "SecureFrameTemplate")
|
|
local t2 = CreateFrame("Frame", nil, h, "SecureFrameTemplate")
|
|
local t3 = nil -- MODERN has no ranged slot; BUG[Classic/2408]: SAHT ignores ranged weapon
|
|
h:SetAttribute("unit", "none")
|
|
h:SetAttribute("includeWeapons", -1)
|
|
h:SetAttribute("filter", "NONE")
|
|
for i=1, t3 and 3 or 2 do
|
|
local sf = i == 1 and t1 or i == 2 and t2 or t3
|
|
h:SetAttribute("tempEnchant" .. i, sf)
|
|
sf:SetAttribute('cname', i == 1 and 'imbuedmh' or i == 2 and 'imbuedoh' or 'imbuedrw')
|
|
SecureHandlerWrapScript(sf, 'OnShow', h, [[KR:RunAttribute("UpdateStateConditional", self:GetAttribute("cname"), "*", nil)]])
|
|
SecureHandlerWrapScript(sf, 'OnHide', h, [[KR:RunAttribute("UpdateStateConditional", self:GetAttribute("cname"), nil, "*")]])
|
|
sf:Hide()
|
|
end
|
|
KR:SetStateConditionalValue("imbuedmh", false)
|
|
KR:SetStateConditionalValue("imbuedoh", false)
|
|
h:Show()
|
|
|
|
if not MODERN then
|
|
KR:SetNonSecureConditional("imbuedrw", function(_, _args)
|
|
local isImbued, _expire, _charges, _enchantID = select(9, GetWeaponEnchantInfo())
|
|
return not not isImbued
|
|
end)
|
|
end
|
|
end)
|
|
securecall(function() -- bar:id (future-aware)
|
|
local CMD_SWAP, CMD_SET, NUM_PAGES = SLASH_SWAPACTIONBAR1, SLASH_CHANGEACTIONBAR1, NUM_ACTIONBAR_PAGES
|
|
local argCache = {}
|
|
local f = CreateFrame("Button", nil, nil, "SecureActionButtonTemplate")
|
|
f:SetAttribute("type", "actionbar")
|
|
f:SetAttribute("typerelease", "actionbar")
|
|
f:SetAttribute("pressAndHoldAction", 1)
|
|
f:SetAttribute("cmd-swap", CMD_SWAP)
|
|
f:SetAttribute("num-pages", NUM_PAGES)
|
|
SecureHandlerSetFrameRef(f, "KR", KR:seclib())
|
|
SecureHandlerSetFrameRef(f, "RW", RW:seclib())
|
|
SecureHandlerExecute(f, [[-- AB_bar_init
|
|
argCache = newtable()
|
|
CMD_SWAP = self:GetAttribute("cmd-swap"), self:SetAttribute("cmd-swap", nil)
|
|
NUM_PAGES = self:GetAttribute("num-pages"), self:SetAttribute("num-pages", nil)
|
|
RW = self:GetFrameRef('RW'), self:SetAttribute('frameref-RW', nil)
|
|
KR = self:GetFrameRef('KR'), self:SetAttribute('frameref-KR', nil)
|
|
]])
|
|
f:SetAttribute("RunSlashCmd", [=[-- AB_bar_runslash
|
|
local setTo, cmd, v = nil, ...
|
|
if cmd == CMD_SWAP then
|
|
local a, b = v:match("(%d+)%s+(%d+)")
|
|
a, b = tonumber(a), tonumber(b)
|
|
if a and b and a >= 1 and b >= 1 and a <= NUM_PAGES and b <= NUM_PAGES then
|
|
setTo = KR:RunAttribute("EvaluateCmdOptions", "[bar:" .. a .. "]") and b or a
|
|
end
|
|
else
|
|
local a = tonumber(v)
|
|
if a and a >= 1 and a <= NUM_PAGES then
|
|
setTo = a
|
|
end
|
|
end
|
|
if setTo then
|
|
pendingValue, pendingRunID = setTo, RW:GetAttribute("PyrolysisRunID")
|
|
return cmd .. " " .. v, "notified-click", setTo
|
|
end
|
|
]=])
|
|
f:SetAttribute("RunSlashCmd-PreClick", [[-- AB_bar_runslash_pre
|
|
local cmd, v = ...
|
|
pendingValue, pendingRunID = nil
|
|
self:SetAttribute("action", v)
|
|
]])
|
|
f:SetAttribute("EvaluateMacroConditional", [=[-- AB_bar_evalmc
|
|
local name, cv, target, _mark, futureID = ...
|
|
if name ~= "bar" or not cv or cv == "" then return end
|
|
if futureID == "driver-construct" then
|
|
return nil, "use-scop"
|
|
elseif not pendingRunID or RW:GetAttribute("PyrolysisRunID") ~= pendingRunID then
|
|
pendingValue, pendingRunID = nil
|
|
return nil, "use-scop"
|
|
end
|
|
local am = argCache[cv]
|
|
if am == nil then
|
|
am = newtable()
|
|
for d in cv:gmatch("%s*(%d*)[^/]*/*") do
|
|
am[d ~= "" and d+0 or 0] = true
|
|
end
|
|
argCache[cv], am[0] = am, nil
|
|
end
|
|
return am[pendingValue] ~= nil
|
|
]=])
|
|
|
|
local currentFutureID, currentBarState
|
|
local function hintBarCommand(slash, _unparsed, clause, _target, _, _, _, speculationID)
|
|
if (clause or "") == "" then return end
|
|
if slash == CMD_SWAP then
|
|
local a, b = clause:match("(%d+)%s+(%d+)")
|
|
a, b = tonumber(a), tonumber(b)
|
|
if a and b and a >= 1 and b >= 1 and a <= NUM_PAGES and b <= NUM_PAGES then
|
|
if currentFutureID ~= speculationID then
|
|
currentFutureID, currentBarState = speculationID, GetActionBarPage()
|
|
end
|
|
currentBarState = currentBarState == a and b or a
|
|
end
|
|
else
|
|
local a = tonumber(clause)
|
|
if a and a >= 1 and a <= NUM_PAGES then
|
|
currentFutureID, currentBarState = speculationID, a
|
|
end
|
|
end
|
|
end
|
|
local function hintBarCondition(_name, cv, _target, _, futureID)
|
|
if not cv or cv == "" then
|
|
return false
|
|
end
|
|
local am = argCache[cv]
|
|
if am == nil then
|
|
am = {}
|
|
for d in cv:gmatch("%s*(%d*)[^/]*/*") do
|
|
am[d ~= "" and d+0 or 0] = true
|
|
end
|
|
am[0] = nil
|
|
argCache[cv] = next(am) and am or false
|
|
end
|
|
return am and am[futureID == currentFutureID and currentBarState or GetActionBarPage()] or false
|
|
end
|
|
if RW:IsPyrolysisActive() then
|
|
RW:RegisterCommandEx(CMD_SET, RW:GetCommandFlags(CMD_SET), f)
|
|
RW:RegisterCommandEx(CMD_SWAP, RW:GetCommandFlags(CMD_SWAP), f)
|
|
end
|
|
RW:SetCommandHint(CMD_SET, math.huge, hintBarCommand)
|
|
RW:SetCommandHint(CMD_SWAP, math.huge, hintBarCommand)
|
|
KR:SetSecureExternalConditional("bar", f, hintBarCondition)
|
|
end)
|
|
securecall(function() -- anyflyable
|
|
KR:SetStateConditionalValue("blockedflyable", false)
|
|
KR:SetStateConditionalValue("superflyable", false)
|
|
RegisterStateConditional("anyflyable", ("[superflyable] *; [blockedflyable]; [flyable] %s;"):format(MODERN and "[advflyable] *" or "*"), 1)
|
|
end)
|
|
securecall(function() -- holiday:veil/brew/hend/fire/east/luna
|
|
KR:SetStateConditionalValue("holiday", false)
|
|
if not (MODERN or CF_CATA) then
|
|
return
|
|
end
|
|
local events = {
|
|
[235485]="veil", [235484]="veil", [235482]="veil", veil="winterveil",
|
|
[235441]="brew", [235440]="brew", [235442]="brew", brew="brewfest",
|
|
[235462]="hend", [235461]="hend", [235460]="hend", hend="hallowsend",
|
|
[235474]="fire", [235473]="fire", [235472]="fire", fire="midsummer",
|
|
[235477]="east", [235476]="east", [235475]="east", east="noblegarden",
|
|
[235471]="luna", [235470]="luna", [235469]="luna", luna="lunarfestival",
|
|
[235466]="love", [235467]="love", [235468]="love", love="loveair",
|
|
}
|
|
local function nextHolidayInfo(md, idx)
|
|
local d, x = (md % 100), (idx or 0)+1
|
|
local info = C_Calendar.GetHolidayInfo((md-d)/100, d, x)
|
|
return info and x or nil, info
|
|
end
|
|
local function toEpoch(ct)
|
|
ct.day, ct.min, ct.sec = ct.monthDay, ct.minute or 0, 0
|
|
return time(ct)
|
|
end
|
|
local function syncHoliday()
|
|
local m0, cnow, tnow = C_Calendar.GetMonthInfo(0), C_DateAndTime.GetCurrentCalendarTime(), GetTime()
|
|
local ofs = (cnow.year-m0.year)*12 + cnow.month - m0.month
|
|
local mnow, d = ofs == 0 and m0 or C_Calendar.GetMonthInfo(ofs), cnow.monthDay
|
|
C_Calendar.SetMonth(ofs)
|
|
local cv, nextTime = false
|
|
for i=1,2 do
|
|
for _, info in nextHolidayInfo, i == 1 and d or d < mnow.numDays and d + 1 or 101 do
|
|
local ek, st, et = events[info and info.texture], info and info.startTime, info and info.endTime
|
|
ek = events[ek] or ek
|
|
if ek and st and C_DateAndTime.CompareCalendarTime(cnow, st) >= 0 then
|
|
local nt = GetTime() + toEpoch(st) - toEpoch(cnow) + 60
|
|
nextTime = cv and nt > nextTime and nextTime or nt
|
|
elseif ek and et and C_DateAndTime.CompareCalendarTime(cnow, et) > 0 then
|
|
local nt = GetTime() + toEpoch(et) - toEpoch(cnow)
|
|
nextTime = cv and nt > nextTime and nextTime or nt
|
|
cv = cv and cv .. "/" .. ek or ek -- KR will filter out the duplicates
|
|
end
|
|
end
|
|
end
|
|
C_Calendar.SetMonth(-ofs)
|
|
KR:SetStateConditionalValue("holiday", cv)
|
|
if nextTime and (nextTime - tnow) < 1e5 then
|
|
nextTime = tnow+15 < nextTime and tnow + 15 or nextTime
|
|
local function holidayTick()
|
|
local d = nextTime - GetTime()
|
|
if d <= 0 then
|
|
syncHoliday()
|
|
else
|
|
EV.After(d > 120 and 120 or d, holidayTick)
|
|
end
|
|
end
|
|
holidayTick()
|
|
end
|
|
return "remove"
|
|
end
|
|
EV.PLAYER_LOGIN = syncHoliday
|
|
end)
|
|
securecall(function() -- uslot:(slot token)
|
|
KR:SetStateConditionalValue("uslot", false)
|
|
local state, noPendingSync, slots = "", 1, {}
|
|
for tk, sk in pairs({
|
|
head="HEADSLOT", neck="NECKSLOT", shoulders="SHOULDERSLOT", shirt="SHIRTSLOT", chest="CHESTSLOT",
|
|
waist="WAISTSLOT", legs="LEGSSLOT", feet="FEETSLOT", wrist="WRISTSLOT", hands="HANDSSLOT",
|
|
finger1="FINGER0SLOT", finger2="FINGER1SLOT", trinket1="TRINKET0SLOT", trinket2="TRINKET1SLOT",
|
|
back="BACKSLOT", tabard="TABARDSLOT",
|
|
}) do
|
|
local ok, slot = pcall(GetInventorySlotInfo, sk)
|
|
slots[tk] = ok and slot or nil
|
|
end
|
|
local function syncActiveSlots()
|
|
if InCombatLockdown() then
|
|
return
|
|
end
|
|
local GetItemSpell, o = C_Item.GetItemSpell
|
|
for token, i in next, slots do
|
|
local link, _, sid = token and (GetInventoryItemLink("player", i) or GetInventoryItemID("player", i))
|
|
if link then
|
|
_, sid = GetItemSpell(link)
|
|
end
|
|
if sid and not IsPassiveSpell(sid) then
|
|
o = o and (o .. "/" .. token) or token
|
|
end
|
|
end
|
|
o, noPendingSync = o or "", 1
|
|
if state ~= o then
|
|
state = o
|
|
KR:SetStateConditionalValue("uslot", o)
|
|
end
|
|
end
|
|
local function syncActiveSlotsIfPending()
|
|
if not noPendingSync then
|
|
syncActiveSlots()
|
|
end
|
|
end
|
|
local function cueActiveSlotsSync(e)
|
|
if noPendingSync and not InCombatLockdown() then
|
|
EV.After(0, syncActiveSlots)
|
|
end
|
|
noPendingSync = nil
|
|
return e ~= "PLAYER_EQUIPMENT_CHANGED" and "remove"
|
|
end
|
|
EV.PLAYER_REGEN_DISABLED = syncActiveSlotsIfPending
|
|
EV.PLAYER_REGEN_ENABLED = syncActiveSlotsIfPending
|
|
EV.PLAYER_EQUIPMENT_CHANGED = cueActiveSlotsSync
|
|
EV.PLAYER_ENTERING_WORLD = cueActiveSlotsSync
|
|
EV.PLAYER_EQUIPED_SPELLS_CHANGED = cueActiveSlotsSync
|
|
end)
|
|
|
|
securecall(function() -- Managed role units
|
|
local mh = CreateFrame("Frame", nil, nil, "SecureFrameTemplate")
|
|
SecureHandlerSetFrameRef(mh, "KR", KR:seclib())
|
|
SecureHandlerExecute(mh, [=[-- MRU_Init_Manager
|
|
KR, uf, ul, spare = self:GetFrameRef("KR"), newtable(), newtable(), newtable()
|
|
self:SetAttribute("frameref-KR", nil)
|
|
]=])
|
|
local syncUnits = [==[-- MRU_Sync
|
|
local nl, key, nj, fa = spare, %q, 1
|
|
ul[key], spare, fa = nl, ul[key], uf[key]
|
|
for i=1,40 do
|
|
local u = fa[i]:GetAttribute("unit")
|
|
if u then
|
|
nl[i] = u
|
|
else
|
|
for j=i,#nl do
|
|
nl[j] = nil
|
|
end
|
|
break
|
|
end
|
|
end
|
|
for i=1,#nl do
|
|
local u = nl[i]
|
|
if u ~= playerUnit then
|
|
KR:RunAttribute("SetAliasUnit", key .. nj, u)
|
|
nj = nj + 1
|
|
end
|
|
end
|
|
for i=nj,#spare do
|
|
KR:RunAttribute("SetAliasUnit", key .. i, "raid42")
|
|
end
|
|
self:Show()
|
|
]==]
|
|
local function SpawnHeader(key, ...)
|
|
local h = CreateFrame("Frame", nil, nil, "SecureGroupHeaderTemplate")
|
|
for i=1,40 do
|
|
local c = CreateFrame("Frame", nil, h, "SecureFrameTemplate")
|
|
h:SetAttribute("child" .. i, c)
|
|
SecureHandlerSetFrameRef(mh, "u" .. i, c)
|
|
KR:SetAliasUnit(key .. i, "raid42")
|
|
end
|
|
SecureHandlerExecute(mh, ([[-- MRU_SpawnHeader_Init
|
|
local a, k = newtable(), %q
|
|
for i=1,40 do
|
|
a[i] = self:GetFrameRef("u" .. i)
|
|
self:SetAttribute("frameref-u" .. i, nil)
|
|
end
|
|
uf[k], ul[k] = a, newtable()
|
|
]]):format(key))
|
|
local cu = CreateFrame("Frame", nil, h, "SecureFrameTemplate")
|
|
SecureHandlerWrapScript(cu, "OnHide", mh, syncUnits:format(key))
|
|
h:SetAttribute("child41", cu)
|
|
h:SetAttribute("template", "ImpossibleFrameTemplate")
|
|
h:SetAttribute("templateType", "Frame")
|
|
h:SetAttribute("showRaid", true)
|
|
h:SetAttribute("showParty", true)
|
|
h:SetAttribute("showPlayer", false)
|
|
h:SetAttribute("groupingOrder", "1,2,3,4,5,6,7,8")
|
|
h:SetAttribute("sortMethod", "NAME")
|
|
for i=1, select("#", ...), 2 do
|
|
local k, v = select(i, ...)
|
|
h:SetAttribute(k, v)
|
|
end
|
|
return h
|
|
end
|
|
local ph = CreateFrame("Frame", nil, nil, "SecureGroupHeaderTemplate") do
|
|
local c = CreateFrame("Frame", nil, ph, "SecureFrameTemplate")
|
|
ph:SetAttribute("child1", c)
|
|
SecureHandlerWrapScript(c, "OnAttributeChanged", mh, [=[-- MRU_Player_Change
|
|
if name ~= "unit" or value == playerUnit then return end
|
|
playerUnit = value
|
|
for key, v in pairs(ul) do
|
|
local nj = 1
|
|
for i=1,#v do
|
|
local u = v[i]
|
|
if u ~= playerUnit then
|
|
KR:RunAttribute("SetAliasUnit", key .. nj, u)
|
|
nj = nj + 1
|
|
end
|
|
end
|
|
KR:RunAttribute("SetAliasUnit", key .. nj, "raid42")
|
|
end
|
|
]=])
|
|
ph:SetAttribute("showRaid", true)
|
|
ph:SetAttribute("showParty", false)
|
|
ph:SetAttribute("showPlayer", false)
|
|
ph:SetAttribute("nameList", (UnitName("player")))
|
|
ph:Show()
|
|
end
|
|
SpawnHeader("tank", "roleFilter","TANK"):Show()
|
|
SpawnHeader("mtank", "roleFilter","MAINTANK"):Show()
|
|
SpawnHeader("assist", "roleFilter","MAINASSIST"):Show()
|
|
SpawnHeader("healer", "roleFilter","HEALER"):Show()
|
|
SpawnHeader("dps", "roleFilter","DAMAGER"):Show()
|
|
end)
|