Import Mapster from upstream@1c451d2 (tag 1.3.9)

upstream: https://github.com/Nevcairiel/Mapster tag: 1.3.9 commit: 1c451d24d299d44002b1e182f848aa3a3e7faa6b interface: 30300 (WotLK 3.3.5 — last Mapster version targeting our client)
2026-05-25 13:02:23 +02:00
parent b36de765c0
commit 8d89a6d180
30 changed files with 3266 additions and 0 deletions
@@ -0,0 +1,174 @@
+--[[
+Copyright (c) 2009, Hendrik "Nevcairiel" Leppkes < h.leppkes@gmail.com >
+All rights reserved.
+]]
+
+local Mapster = LibStub("AceAddon-3.0"):GetAddon("Mapster")
+local L = LibStub("AceLocale-3.0"):GetLocale("Mapster")
+
+local MODNAME = "Coords"
+local Coords = Mapster:NewModule(MODNAME)
+
+local GetCursorPosition = GetCursorPosition
+local GetPlayerMapPosition = GetPlayerMapPosition
+local WorldMapDetailFrame = WorldMapDetailFrame
+local display, cursortext, playertext
+local texttemplate, text = "%%s: %%.%df, %%.%df"
+
+local MouseXY, OnUpdate
+
+local db
+local defaults = { 
+	profile = {
+		accuracy = 1,
+	}
+}
+
+local optGetter, optSetter
+do
+	local mod = Coords
+	function optGetter(info)
+		local key = info[#info]
+		return db[key]
+	end
+
+	function optSetter(info, value)
+		local key = info[#info]
+		db[key] = value
+		mod:Refresh()
+	end
+end
+
+local options
+local function getOptions()
+	if not options then
+		options = {
+			type = "group",
+			name = L["Coordinates"],
+			arg = MODNAME,
+			get = optGetter,
+			set = optSetter,
+			args = {
+				intro = {
+					order = 1,
+					type = "description",
+					name = L["The Coordinates module adds a display of your current location, and the coordinates of your mouse cursor to the World Map frame."],
+				},
+				enabled = {
+					order = 2,
+					type = "toggle",
+					name = L["Enable Coordinates"],
+					get = function() return Mapster:GetModuleEnabled(MODNAME) end,
+					set = function(info, value) Mapster:SetModuleEnabled(MODNAME, value) end,
+				},
+				accuracydesc = {
+					order = 3,
+					type = "description",
+					name = "\n" .. L["You can control the accuracy of the coordinates, e.g. if you need very exact coordinates you can set this to 2."],
+				},
+				accuracy = {
+					order = 4,
+					type = "range",
+					name = L["Accuracy"],
+					min = 0, max = 2, step = 1,
+				},
+			},
+		}
+	end
+
+	return options
+end
+
+function Coords:OnInitialize()
+	self.db = Mapster.db:RegisterNamespace(MODNAME, defaults)
+	db = self.db.profile
+
+	self:SetEnabledState(Mapster:GetModuleEnabled(MODNAME))
+	Mapster:RegisterModuleOptions(MODNAME, getOptions, L["Coordinates"])
+end
+
+function Coords:OnEnable()
+	if not display then
+		display = CreateFrame("Frame", "Mapster_CoordsFrame", WorldMapFrame)
+
+		cursortext = display:CreateFontString(nil, "ARTWORK", "GameFontNormal")
+		playertext = display:CreateFontString(nil, "ARTWORK", "GameFontNormal")
+
+		self:UpdateMapsize(Mapster.miniMap)
+	end
+	display:SetScript("OnUpdate", OnUpdate)
+	if Mapster.bordersVisible then
+		display:Show()
+	else
+		display:Hide()
+	end
+
+	self:Refresh()
+end
+
+function Coords:OnDisable()
+	display:SetScript("OnUpdate", nil)
+	display:Hide()
+end
+
+function Coords:Refresh()
+	db = self.db.profile
+	if not self:IsEnabled() then return end
+
+	local acc = tonumber(db.accuracy) or 1
+	text = texttemplate:format(acc, acc)
+end
+
+function Coords:UpdateMapsize(mini)
+	-- map was minimized, fix display position
+	if mini then
+		cursortext:SetPoint("BOTTOMLEFT", WorldMapPositioningGuide, "BOTTOM", 15, -2)
+		playertext:SetPoint("BOTTOMRIGHT", WorldMapPositioningGuide, "BOTTOM", -30, -2)
+	else
+		cursortext:SetPoint("BOTTOMLEFT", WorldMapPositioningGuide, "BOTTOM", 50, 10)
+		playertext:SetPoint("BOTTOMRIGHT", WorldMapPositioningGuide, "BOTTOM", -50, 10)
+	end
+end
+
+function Coords:BorderVisibilityChanged(visible)
+	if not display then return end
+	if visible then
+		display:Show()
+	else
+		display:Hide()
+	end
+end
+
+function MouseXY()
+	local left, top = WorldMapDetailFrame:GetLeft(), WorldMapDetailFrame:GetTop()
+	local width, height = WorldMapDetailFrame:GetWidth(), WorldMapDetailFrame:GetHeight()
+	local scale = WorldMapDetailFrame:GetEffectiveScale()
+
+	local x, y = GetCursorPosition()
+	local cx = (x/scale - left) / width
+	local cy = (top - y/scale) / height
+
+	if cx < 0 or cx > 1 or cy < 0 or cy > 1 then
+		return
+	end
+
+	return cx, cy
+end
+
+local cursor, player = L["Cursor"], L["Player"]
+function OnUpdate()
+	local cx, cy = MouseXY()
+	local px, py = GetPlayerMapPosition("player")
+
+	if cx then
+		cursortext:SetFormattedText(text, cursor, 100 * cx, 100 * cy)
+	else
+		cursortext:SetText("")
+	end
+
+	if px == 0 then
+		playertext:SetText("")
+	else
+		playertext:SetFormattedText(text, player, 100 * px, 100 * py)
+	end
+end