tekkub / squeenix
watch download tarball
public
Forks1Right
Watchers3Right
Description: WoW Addon - Square Minimap and more
Homepage: http://www.tekkub.net/
Clone URL: git://github.com/tekkub/squeenix.git
Click here to lend your support to: squeenix and make a donation at www.pledgie.com !
squeenix / Config.lua
100644 125 lines (92 sloc) 4.752 kb
raw blame history 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125

if not Squeenix then return end
local Squeenix = Squeenix
 
 
----------------------
--      Locals      --
----------------------
 
local tekcheck = LibStub("tekKonfig-Checkbox")
local tekbutton = LibStub("tekKonfig-Button")
local tekslider = LibStub("tekKonfig-Slider")
local tekdropdown = LibStub("tekKonfig-Dropdown")
local GAP = 8
 
 
---------------------
--      Panel      --
---------------------
 
local frame = CreateFrame("Frame", nil, InterfaceOptionsFramePanelContainer)
frame.name = "Squeenix"
frame:Hide()
frame:SetScript("OnShow", function(frame)
	local Squeenix = Squeenix
	local title, subtitle = LibStub("tekKonfig-Heading").new(frame, "Squeenix", "General settings for the Squeenix square minimap.")
 
 
	local lockpos = tekcheck.new(frame, nil, "Lock minimap", "TOPLEFT", subtitle, "BOTTOMLEFT", -2, -GAP)
	lockpos.tiptext = "Locks the minimap to prevent accidental movement"
	local checksound = lockpos:GetScript("OnClick")
	lockpos:SetScript("OnClick", function(self) checksound(self); Squeenix.db.unlocked = not Squeenix.db.unlocked; Squeenix:SetPosition() end)
	lockpos:SetChecked(not Squeenix.db.unlocked)
 
 
	local resetpos = tekbutton.new_small(frame, "TOP", lockpos, "CENTER", 0, 11)
	resetpos:SetPoint("RIGHT", -16, 0)
	resetpos:SetText("Reset")
	resetpos.tiptext = "Reset the minimap to the default position"
	resetpos:SetScript("OnClick", function(self) Squeenix.db.x, Squeenix.db.y, Squeenix.db.anchorframe, Squeenix.db.anchor = nil; Squeenix:SetPosition() end)
 
 
	local showcompass = tekcheck.new(frame, nil, "Show full compass", "TOPLEFT", lockpos, "BOTTOMLEFT", 0, -GAP)
	showcompass.tiptext = "Add 'ESW' compass directions to the map"
	showcompass:SetScript("OnClick", function(self) checksound(self); Squeenix.db.hidecompass = not Squeenix.db.hidecompass; Squeenix:ShowCompass() end)
	showcompass:SetChecked(not Squeenix.db.hidecompass)
 
 
	local refresh = tekbutton.new_small(frame, "TOP", showcompass, "CENTER", 0, 11)
	refresh:SetPoint("RIGHT", -16, 0)
	refresh:SetText("Refresh")
	refresh.tiptext = "Refresh the minimap, should fix blanked out maps."
	refresh:SetScript("OnClick", function(self) Minimap:SetMaskTexture("Interface\\AddOns\\Squeenix\\Mask.blp") end)
 
 
	local scrollzoom = tekcheck.new(frame, nil, "Use mousewheel zoom", "TOPLEFT", showcompass, "BOTTOMLEFT", 0, -GAP)
	scrollzoom.tiptext = "Zoom the minimap using the mouse scroll wheel"
	scrollzoom:SetScript("OnClick", function(self) checksound(self); Squeenix.db.noscrollzoom = not Squeenix.db.noscrollzoom end)
	scrollzoom:SetChecked(not Squeenix.db.noscrollzoom)
 
 
	local scaleslider, scaleslidertext, scalecontainer = tekslider.new(frame, string.format("Scale: %.2f", Squeenix.db.scale or 1), 0.5, 2, "TOPLEFT", scrollzoom, "BOTTOMLEFT", 2, -GAP)
	scaleslider.tiptext = "Set the minimap scale."
	scaleslider:SetValue(Squeenix.db.scale or 1)
	scaleslider:SetValueStep(.05)
	scaleslider:SetScript("OnValueChanged", function(self)
		Squeenix.db.scale = self:GetValue()
		scaleslidertext:SetText(string.format("Scale: %.2f", Squeenix.db.scale or 1))
		Squeenix:SetScale()
	end)
 
 
	local borderdropdown, borderdropdowntext, borderdropdowncontainer = tekdropdown.new(frame, "Border style", "TOPLEFT", scalecontainer, "BOTTOMLEFT", 0, -GAP)
	borderdropdowntext:SetText(Squeenix.db.border or "Rounded")
	borderdropdown.tiptext = "Change the minimap border style."
 
	local function OnClick()
		UIDropDownMenu_SetSelectedValue(borderdropdown, this.value)
		borderdropdowntext:SetText(this.value)
		Squeenix:SetBorder(this.value)
	end
	UIDropDownMenu_Initialize(borderdropdown, function()
		local selected, info = UIDropDownMenu_GetSelectedValue(borderdropdown) or "Rounded", UIDropDownMenu_CreateInfo()
 
		for name in pairs(Squeenix.borders) do
			info.text = name
			info.value = name
			info.func = OnClick
			info.checked = name == selected
			UIDropDownMenu_AddButton(info)
		end
	end)
 
 
	frame:SetScript("OnShow", nil)
end)
 
InterfaceOptions_AddCategory(frame)
 
 
-----------------------------
--      Slash command      --
-----------------------------
 
SLASH_SQUEENIX1 = "/squee"
SLASH_SQUEENIX2 = "/squeenix"
SlashCmdList.SQUEENIX = function(input)
	if input:find("refresh") then Minimap:SetMaskTexture("Interface\\AddOns\\Squeenix\\Mask.blp")
	else InterfaceOptionsFrame_OpenToCategory(frame) end
end
 
 
----------------------------------------
--      Quicklaunch registration      --
----------------------------------------
 
LibStub:GetLibrary("LibDataBroker-1.1"):NewDataObject("Squeenix", {
	type = "launcher",
	icon = "Interface\\Icons\\INV_Gizmo_BronzeFramework_01",
	OnClick = function()
		if IsShiftKeyDown() then Minimap:SetMaskTexture("Interface\\AddOns\\Squeenix\\Mask.blp")
		else InterfaceOptionsFrame_OpenToCategory(frame) end
	end,
})