Andrew6810
231 lines
6.8 KiB
Lua
231 lines
6.8 KiB
Lua
local IsleOfConquest = DBM:NewMod("IsleofConquest", "DBM-PvP", 2)
|
|
local L = IsleOfConquest:GetLocalizedStrings()
|
|
|
|
IsleOfConquest:RemoveOption("HealthFrame")
|
|
|
|
IsleOfConquest:SetZone(DBM_DISABLE_ZONE_DETECTION)
|
|
|
|
IsleOfConquest:RegisterEvents(
|
|
"ZONE_CHANGED_NEW_AREA", -- Required for BG start
|
|
"CHAT_MSG_MONSTER_YELL",
|
|
"CHAT_MSG_BG_SYSTEM_ALLIANCE",
|
|
"CHAT_MSG_BG_SYSTEM_HORDE",
|
|
"CHAT_MSG_BG_SYSTEM_NEUTRAL",
|
|
"UNIT_DIED"
|
|
)
|
|
|
|
local allyTowerIcon = "Interface\\AddOns\\DBM-PvP\\Textures\\GuardTower"
|
|
local allyColor = {r = 0, g = 0, b = 1}
|
|
local hordeTowerIcon = "Interface\\AddOns\\DBM-PvP\\Textures\\OrcTower"
|
|
local hordeColor = {r = 1, g = 0, b = 0}
|
|
|
|
local warnSiegeEngine = IsleOfConquest:NewAnnounce("WarnSiegeEngine", 3)
|
|
local warnSiegeEngineSoon = IsleOfConquest:NewAnnounce("WarnSiegeEngineSoon", 2)
|
|
|
|
local startTimer = IsleOfConquest:NewTimer(62, "TimerStart")
|
|
local POITimer = IsleOfConquest:NewTimer(61, "TimerPOI") -- point of interest
|
|
local timerSiegeEngine = IsleOfConquest:NewTimer(180, "TimerSiegeEngine")
|
|
|
|
|
|
local function isInArgs(val, ...) -- search for val in all args (...)
|
|
for i=1, select("#", ...), 1 do
|
|
local v = select(i, ...)
|
|
if v == val then
|
|
return true
|
|
end
|
|
end
|
|
return false
|
|
end
|
|
|
|
local poi = {}
|
|
local function isPoi(id)
|
|
return (id >= 16 and id <= 20) -- Quarry
|
|
or (id >= 135 and id <= 139) -- Workshop
|
|
or (id >= 140 and id <= 144) -- Hangar
|
|
or (id >= 145 and id <= 149) -- Docks
|
|
or (id >= 150 and id <= 154) -- Refinerie
|
|
or (id >= 9 and id <= 12) -- Keep
|
|
end
|
|
function getPoiState(id)
|
|
if isInArgs(id, 18, 136, 141, 146, 151) then return 1 -- alliance
|
|
elseif isInArgs(id, 20, 138, 143, 148, 153) then return 2 -- horde
|
|
elseif isInArgs(id, 16, 135, 140, 145, 150) then return 3 -- if getPoiState(id) == 3 then --- untaken
|
|
elseif isInArgs(id, 17, 137, 142, 147, 152) then return 4 -- if getPoiState(id) == 4 then --- alliance takes
|
|
elseif isInArgs(id, 19, 139, 144, 149, 154) then return 5 -- if getPoiState(id) == 5 then --- horde takes
|
|
else return 0
|
|
end
|
|
end
|
|
|
|
--
|
|
-- 16 Quarry - Uncontrolled
|
|
-- 17 Quarry - In Conflict (to Alliance)
|
|
-- 18 Quarry - Alliance Controlled
|
|
-- 19 Quarry - In Conflict (to Horde)
|
|
-- 20 Quarry - Horde Controlled
|
|
--
|
|
-- 135 Workshop - Uncontrolled
|
|
-- 136 Workshop - Alliance
|
|
-- 137 Workshop - In Conflict (to Alliance)
|
|
-- 138 Workshop - Horde Controlled
|
|
-- 139 Workshop - In Conflict (to Horde)
|
|
--
|
|
-- 140 Hangar - Uncontrolled
|
|
-- 141 Hangar - Alliance
|
|
-- 142 Hangar - In Conflict (to Alliance)
|
|
-- 143 Hangar - Horde Controlled
|
|
-- 144 Hangar - In Conflict (to Horde)
|
|
--
|
|
-- 145 Docks - Uncontrolled
|
|
-- 146 Docks - Alliance
|
|
-- 147 Docks - In Conflict (to Alliance)
|
|
-- 148 Docks - Horde
|
|
-- 149 Docks - In Conflict (to Horde)
|
|
--
|
|
-- 150 Refinerie - Uncontrolled
|
|
-- 151 Refinerie - Alliance
|
|
-- 152 Refiniere - In Conflict (to Alliance)
|
|
-- 153 Refinerie - Horde Controlled
|
|
-- 154 Refinerie - In Conflict (to Horde)
|
|
--
|
|
-- 77 Horde Gate - OK
|
|
-- 78 - i think its at half hp
|
|
-- 79 Horde Gate - Destroyed
|
|
--
|
|
-- 80 Alliance Gate - OK
|
|
-- 81 - i think its at half hp
|
|
-- 82 Allianz Gate - Destroyed
|
|
--
|
|
-- 9 Keep - In Conflict (to Allianz)
|
|
-- 10 Keep - Horde Controlled
|
|
-- 11 Keep - Alliance
|
|
-- 12 Keep - In Conflict (to Horde)
|
|
--
|
|
|
|
|
|
local bgzone = false
|
|
do
|
|
local function initialize(self)
|
|
if select(2, IsInInstance()) == "pvp" and GetRealZoneText() == L.ZoneName then
|
|
bgzone = true
|
|
for i=1, GetNumMapLandmarks(), 1 do
|
|
local name, _, textureIndex = GetMapLandmarkInfo(i)
|
|
if name and textureIndex then
|
|
if isPoi(textureIndex) then
|
|
poi[i] = textureIndex
|
|
end
|
|
end
|
|
end
|
|
elseif bgzone then
|
|
self:Stop()
|
|
bgzone = false
|
|
end
|
|
end
|
|
|
|
IsleOfConquest.OnInitialize = initialize
|
|
IsleOfConquest.ZONE_CHANGED_NEW_AREA = initialize
|
|
end
|
|
|
|
local scheduleCheck
|
|
|
|
function IsleOfConquest:CHAT_MSG_BG_SYSTEM_NEUTRAL(arg1)
|
|
if not bgzone then return end
|
|
if arg1 == L.BgStart60 then
|
|
startTimer:Start()
|
|
elseif arg1 == L.BgStart30 then
|
|
startTimer:Update(31, 62)
|
|
elseif arg1 == L.BgStart15 then
|
|
startTimer:Update(47, 62)
|
|
end
|
|
scheduleCheck(self)
|
|
end
|
|
|
|
local function checkForUpdates()
|
|
if not bgzone then return end
|
|
for k,v in pairs(poi) do
|
|
local name, _, textureIndex = GetMapLandmarkInfo(k)
|
|
if name and textureIndex then
|
|
-- new state vs old state
|
|
if getPoiState(v) <= 3 and getPoiState(textureIndex) > 3 then
|
|
-- poi is now in conflict, we have to start a bar :)
|
|
POITimer:Start(nil, name)
|
|
if k == 13 then -- Workshop is under attack, Siege Engine building is cancelled
|
|
timerSiegeEngine:Cancel()
|
|
warnSiegeEngineSoon:Cancel()
|
|
end
|
|
if getPoiState(textureIndex) == 4 then -- alliance takes
|
|
POITimer:SetColor(allyColor, name)
|
|
POITimer:UpdateIcon(allyTowerIcon, name)
|
|
else
|
|
POITimer:SetColor(hordeColor, name)
|
|
POITimer:UpdateIcon(hordeTowerIcon, name)
|
|
end
|
|
elseif getPoiState(textureIndex) <= 2 then
|
|
-- poi is now longer in conflict, remove the bars
|
|
POITimer:Stop(name)
|
|
end
|
|
poi[k] = textureIndex
|
|
end
|
|
end
|
|
end
|
|
|
|
function scheduleCheck(self)
|
|
self:Schedule(1, checkForUpdates)
|
|
end
|
|
|
|
function IsleOfConquest:CHAT_MSG_MONSTER_YELL(msg)
|
|
if msg == L.GoblinStartAlliance or msg == L.GoblinBrokenAlliance or msg:find(L.GoblinStartAlliance) or msg:find(L.GoblinBrokenAlliance) then
|
|
self:SendSync("SEStart", "Alliance")
|
|
elseif msg == L.GoblinStartHorde or msg == L.GoblinBrokenHorde or msg:find(L.GoblinStartHorde) or msg:find(L.GoblinBrokenHorde) then
|
|
self:SendSync("SEStart", "Horde")
|
|
elseif msg == L.GoblinHalfwayAlliance or msg:find(L.GoblinHalfwayAlliance) then
|
|
self:SendSync("SEHalfway", "Alliance")
|
|
elseif msg == L.GoblinHalfwayHorde or msg:find(L.GoblinHalfwayHorde) then
|
|
self:SendSync("SEHalfway", "Horde")
|
|
elseif msg == L.GoblinFinishedAlliance or msg:find(L.GoblinFinishedAlliance) then
|
|
self:SendSync("SEFinish", "Alliance")
|
|
elseif msg == L.GoblinFinishedHorde or msg:find(L.GoblinFinishedHorde) then
|
|
self:SendSync("SEFinish", "Horde")
|
|
else
|
|
checkForUpdates()
|
|
end
|
|
end
|
|
|
|
function IsleOfConquest:UNIT_DIED(args)
|
|
local cid = self:GetCIDFromGUID(args.destGUID)
|
|
if cid == 34476 then
|
|
self:SendSync("SEBroken", "Alliance")
|
|
elseif cid == 35069 then
|
|
self:SendSync("SEBroken", "Horde")
|
|
end
|
|
end
|
|
|
|
IsleOfConquest.CHAT_MSG_BG_SYSTEM_ALLIANCE = scheduleCheck
|
|
IsleOfConquest.CHAT_MSG_BG_SYSTEM_HORDE = scheduleCheck
|
|
|
|
function IsleOfConquest:OnSync(msg, arg)
|
|
if msg == "SEStart" then
|
|
timerSiegeEngine:Start(178)
|
|
warnSiegeEngineSoon:Schedule(168)
|
|
if arg == "Alliance" then
|
|
timerSiegeEngine:SetColor(allyColor)
|
|
elseif arg == "Horde" then
|
|
timerSiegeEngine:SetColor(hordeColor)
|
|
end
|
|
elseif msg == "SEHalfway" then
|
|
warnSiegeEngineSoon:Cancel()
|
|
timerSiegeEngine:Start(89)
|
|
warnSiegeEngineSoon:Schedule(79)
|
|
if arg == "Alliance" then
|
|
timerSiegeEngine:SetColor(allyColor)
|
|
elseif arg == "Horde" then
|
|
timerSiegeEngine:SetColor(hordeColor)
|
|
end
|
|
elseif msg == "SEFinish" then
|
|
warnSiegeEngineSoon:Cancel()
|
|
timerSiegeEngine:Cancel()
|
|
warnSiegeEngine:Show()
|
|
end
|
|
end
|
|
|
|
|