WoWInterface SVN UrbanAchiever

[/] [trunk/] [Options.lua] - Blame information for rev 99

Details | Compare with Previous | View Log


function UrbanAchiever:CreateOptions()
        local panel = CreateFrame("Frame")
        panel.name = "Urban Achiever"
 
        local title = panel:CreateFontString(nil, "ARTWORK", "GameFontNormalLarge")
        title:SetPoint("TOPLEFT", 15, -16)
        title:SetText("Urban Achiever")
        title:SetJustifyH("LEFT")
        title:SetJustifyV("TOP")
 
        local subText = panel:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
        subText:SetPoint("TOPLEFT", title, "BOTTOMLEFT", 0, -8)
        subText:SetText(UAReplacementFrame)
        subText:SetNonSpaceWrap(true)
        subText:SetJustifyH("LEFT")
        subText:SetJustifyV("TOP")
 
        local statTitle = panel:CreateFontString(nil, "ARTWORK", "GameFontNormal")
        statTitle:SetText(UAOptions)
        statTitle:SetPoint("TOPLEFT", subText, "BOTTOMLEFT", 0, -10)
 
        local sC = CreateFrame("CheckButton", "UACB", panel, "OptionsCheckButtonTemplate")
        sC:SetPoint("TOPLEFT", statTitle, "BOTTOMLEFT", 0, -10)
        sC.text = getglobal(sC:GetName() .. "Text")
        sC.text:SetText(UADisplayStatiCriter)
        sC.tooltipText = UADSCTooltipStr1;
        sC:SetChecked(UASVPC.statCriteria)
        sC:SetScript("OnClick", function()
                if sC:GetChecked() then
                        PlaySound("igMainMenuOptionCheckBoxOn")
                else
                        PlaySound("igMainMenuOptionCheckBoxOff")
                end
                UASVPC.statCriteria = not UASVPC.statCriteria
                sC:SetChecked(UASVPC.statCriteria)
        end)
 
        local mC = CreateFrame("CheckButton", "UACB2", panel, "OptionsCheckButtonTemplate")
        mC:SetPoint("TOPLEFT", sC, "BOTTOMLEFT", 0, -10)
        mC.text = getglobal(mC:GetName() .. "Text")
        mC.text:SetText(UAColorMoney)
        mC.tooltipText = UAShowMoneyStr1 .. " |cffffd70012|r.|cffc7c7cf34|r.|cffeda55f56|r " .. UAShowMoneyStr2 .. " 12|TInterface\\MoneyFrame\\UI-GoldIcon:14:14:2:0|t 34|TInterface\\MoneyFrame\\UI-SilverIcon:14:14:2:0|t 56|TInterface\\MoneyFrame\\UI-CopperIcon:14:14:2:0|t"
        mC:SetChecked(UASVPC.moneyAsColor)
        mC:SetScript("OnClick", function()
                if mC:GetChecked() then
                        PlaySound("igMainMenuOptionCheckBoxOn")
                else
                        PlaySound("igMainMenuOptionCheckBoxOff")
                end
                UASVPC.moneyAsColor = not UASVPC.moneyAsColor
                mC:SetChecked(UASVPC.moneyAsColor)
        end)
 
        local dS = CreateFrame("CheckButton", "UACB3", panel, "OptionsCheckButtonTemplate")
        dS:SetPoint("TOPLEFT", mC, "BOTTOMLEFT", 0, -10)
        dS.text = getglobal(dS:GetName() .. "Text")
        dS.text:SetText(UADisplaySummaryCriter)
        dS.tooltipText = UADSCTooltipStr2;
        dS:SetChecked(UASVPC.specificCriteria)
        dS:SetScript("OnClick", function()
                if dS:GetChecked() then
                        PlaySound("igMainMenuOptionCheckBoxOn")
                else
                        PlaySound("igMainMenuOptionCheckBoxOff")
                end
                UASVPC.specificCriteria = not UASVPC.specificCriteria
                dS:SetChecked(UASVPC.specificCriteria)
        end)
 
        local tT = CreateFrame("CheckButton", "UACB4", panel, "OptionsCheckButtonTemplate")
        tT:SetPoint("TOPLEFT", dS, "BOTTOMLEFT", 0, -10)
        tT.text = getglobal(tT:GetName() .. "Text")
        tT.text:SetText(UAAutoTrackA)
        tT.tooltipText = UAAutoTrackATootltip
        tT:SetChecked(UASVPC.trackTimed)
        tT:SetScript("OnClick", function()
                if tT:GetChecked() then
                        PlaySound("igMainMenuOptionCheckBoxOn")
                else
                        PlaySound("igMainMenuOptionCheckBoxOff")
                end
                UASVPC.trackTimed = not UASVPC.trackTimed
                tT:SetChecked(UASVPC.trackTimed)
        end)
 
        InterfaceOptions_AddCategory(panel)
        UrbanAchiever:AddHelpPanel()
end
 
function UrbanAchiever:AddHelpPanel()
        local panel = CreateFrame("Frame")
        panel.name = UAHelp;
        panel.parent = "Urban Achiever"
 
        local title = panel:CreateFontString(nil, "ARTWORK", "GameFontNormalLarge")
        title:SetPoint("TOPLEFT", 15, -16)
        title:SetText("Urban Achiever - " .. UAHelp)
        title:SetJustifyH("LEFT")
        title:SetJustifyV("TOP")
 
        local subText = panel:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
        subText:SetPoint("TOPLEFT", title, "BOTTOMLEFT", 0, -8)
        subText:SetText(UAOMG)
        subText:SetNonSpaceWrap(true)
        subText:SetJustifyH("LEFT")
        subText:SetJustifyV("TOP")
 
        local iconTitle = panel:CreateFontString(nil, "ARTWORK", "GameFontNormal")
        iconTitle:SetText(UAIcon)
        iconTitle:SetPoint("TOPLEFT", subText, "BOTTOMLEFT", 0, -10)
 
        local iconIcons = panel:CreateFontString(nil, "ARTWORK", "GameFontNormal")
        iconIcons:SetTextColor(1,1,1)
        iconIcons:SetPoint("TOPLEFT", iconTitle, "BOTTOMLEFT")
        iconIcons:SetText("|cffff0000!|r\n" ..
                "|cff00ff00T|r\n" ..
                "+/-\n"
        )
 
        local iconBody = panel:CreateFontString(nil, "ARTWORK", "GameFontNormal")
        iconBody:SetJustifyH("LEFT")
        iconBody:SetWidth(370)
        iconBody:SetTextColor(1,1,1)
        iconBody:SetText(UARewardStr .. UATrackedStr .. UAMoreStr)
        iconBody:SetPoint("TOPLEFT", iconIcons, "TOPRIGHT", 0, -6)
 
        local trackerTitle = panel:CreateFontString(nil, "ARTWORK", "GameFontNormal")
        trackerTitle:SetText(UATracker)
        trackerTitle:SetPoint("TOPLEFT", iconIcons, "BOTTOMLEFT", 0, -15)
 
        local trackerBody = panel:CreateFontString(nil, "ARTWORK", "GameFontNormal")
        trackerBody:SetJustifyH("LEFT")
        trackerBody:SetWidth(390)
        trackerBody:SetTextColor(1,1,1)
        trackerBody:SetText("|cff00ff00" .. UABindTrackedStr .. "|cff00ff00" .. UABindShowStr .. "|cff00ff00" .. UABindRemoveTrackedStr)
        trackerBody:SetPoint("TOPLEFT", trackerTitle, "BOTTOMLEFT")
 
        InterfaceOptions_AddCategory(panel)
end

Line No.	Rev	Author	Line
1	43	Syzgyn-40270	function UrbanAchiever:CreateOptions()
2		Syzgyn-40270	local panel = CreateFrame("Frame")
3		Syzgyn-40270	panel.name = "Urban Achiever"
4		Syzgyn-40270
5		Syzgyn-40270	local title = panel:CreateFontString(nil, "ARTWORK", "GameFontNormalLarge")
6		Syzgyn-40270	title:SetPoint("TOPLEFT", 15, -16)
7		Syzgyn-40270	title:SetText("Urban Achiever")
8		Syzgyn-40270	title:SetJustifyH("LEFT")
9		Syzgyn-40270	title:SetJustifyV("TOP")
10		Syzgyn-40270
11		Syzgyn-40270	local subText = panel:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
12		Syzgyn-40270	subText:SetPoint("TOPLEFT", title, "BOTTOMLEFT", 0, -8)
13	89	Tomate-202285	subText:SetText(UAReplacementFrame)
14	43	Syzgyn-40270	subText:SetNonSpaceWrap(true)
15		Syzgyn-40270	subText:SetJustifyH("LEFT")
16		Syzgyn-40270	subText:SetJustifyV("TOP")
17		Syzgyn-40270
18	50	Syzgyn-40270	local statTitle = panel:CreateFontString(nil, "ARTWORK", "GameFontNormal")
19	89	Tomate-202285	statTitle:SetText(UAOptions)
20	70	Syzgyn-40270	statTitle:SetPoint("TOPLEFT", subText, "BOTTOMLEFT", 0, -10)
21	50	Syzgyn-40270
22		Syzgyn-40270	local sC = CreateFrame("CheckButton", "UACB", panel, "OptionsCheckButtonTemplate")
23		Syzgyn-40270	sC:SetPoint("TOPLEFT", statTitle, "BOTTOMLEFT", 0, -10)
24		Syzgyn-40270	sC.text = getglobal(sC:GetName() .. "Text")
25	87	Tomate-202285	sC.text:SetText(UADisplayStatiCriter)
26	99	Tomate-202285	sC.tooltipText = UADSCTooltipStr1;
27	50	Syzgyn-40270	sC:SetChecked(UASVPC.statCriteria)
28		Syzgyn-40270	sC:SetScript("OnClick", function()
29		Syzgyn-40270	if sC:GetChecked() then
30		Syzgyn-40270	PlaySound("igMainMenuOptionCheckBoxOn")
31		Syzgyn-40270	else
32		Syzgyn-40270	PlaySound("igMainMenuOptionCheckBoxOff")
33		Syzgyn-40270	end
34		Syzgyn-40270	UASVPC.statCriteria = not UASVPC.statCriteria
35		Syzgyn-40270	sC:SetChecked(UASVPC.statCriteria)
36		Syzgyn-40270	end)
37		Syzgyn-40270
38	51	Syzgyn-40270	local mC = CreateFrame("CheckButton", "UACB2", panel, "OptionsCheckButtonTemplate")
39		Syzgyn-40270	mC:SetPoint("TOPLEFT", sC, "BOTTOMLEFT", 0, -10)
40		Syzgyn-40270	mC.text = getglobal(mC:GetName() .. "Text")
41	87	Tomate-202285	mC.text:SetText(UAColorMoney)
42	89	Tomate-202285	mC.tooltipText = UAShowMoneyStr1 .. " \|cffffd70012\|r.\|cffc7c7cf34\|r.\|cffeda55f56\|r " .. UAShowMoneyStr2 .. " 12\|TInterface\\MoneyFrame\\UI-GoldIcon:14:14:2:0\|t 34\|TInterface\\MoneyFrame\\UI-SilverIcon:14:14:2:0\|t 56\|TInterface\\MoneyFrame\\UI-CopperIcon:14:14:2:0\|t"
43	51	Syzgyn-40270	mC:SetChecked(UASVPC.moneyAsColor)
44		Syzgyn-40270	mC:SetScript("OnClick", function()
45		Syzgyn-40270	if mC:GetChecked() then
46		Syzgyn-40270	PlaySound("igMainMenuOptionCheckBoxOn")
47		Syzgyn-40270	else
48		Syzgyn-40270	PlaySound("igMainMenuOptionCheckBoxOff")
49		Syzgyn-40270	end
50		Syzgyn-40270	UASVPC.moneyAsColor = not UASVPC.moneyAsColor
51		Syzgyn-40270	mC:SetChecked(UASVPC.moneyAsColor)
52		Syzgyn-40270	end)
53		Syzgyn-40270
54	58	Syzgyn-40270	local dS = CreateFrame("CheckButton", "UACB3", panel, "OptionsCheckButtonTemplate")
55		Syzgyn-40270	dS:SetPoint("TOPLEFT", mC, "BOTTOMLEFT", 0, -10)
56		Syzgyn-40270	dS.text = getglobal(dS:GetName() .. "Text")
57	87	Tomate-202285	dS.text:SetText(UADisplaySummaryCriter)
58	99	Tomate-202285	dS.tooltipText = UADSCTooltipStr2;
59	58	Syzgyn-40270	dS:SetChecked(UASVPC.specificCriteria)
60		Syzgyn-40270	dS:SetScript("OnClick", function()
61		Syzgyn-40270	if dS:GetChecked() then
62		Syzgyn-40270	PlaySound("igMainMenuOptionCheckBoxOn")
63		Syzgyn-40270	else
64		Syzgyn-40270	PlaySound("igMainMenuOptionCheckBoxOff")
65		Syzgyn-40270	end
66		Syzgyn-40270	UASVPC.specificCriteria = not UASVPC.specificCriteria
67		Syzgyn-40270	dS:SetChecked(UASVPC.specificCriteria)
68		Syzgyn-40270	end)
69		Syzgyn-40270
70		Syzgyn-40270	local tT = CreateFrame("CheckButton", "UACB4", panel, "OptionsCheckButtonTemplate")
71		Syzgyn-40270	tT:SetPoint("TOPLEFT", dS, "BOTTOMLEFT", 0, -10)
72		Syzgyn-40270	tT.text = getglobal(tT:GetName() .. "Text")
73	87	Tomate-202285	tT.text:SetText(UAAutoTrackA)
74		Tomate-202285	tT.tooltipText = UAAutoTrackATootltip
75	58	Syzgyn-40270	tT:SetChecked(UASVPC.trackTimed)
76		Syzgyn-40270	tT:SetScript("OnClick", function()
77		Syzgyn-40270	if tT:GetChecked() then
78		Syzgyn-40270	PlaySound("igMainMenuOptionCheckBoxOn")
79		Syzgyn-40270	else
80		Syzgyn-40270	PlaySound("igMainMenuOptionCheckBoxOff")
81		Syzgyn-40270	end
82		Syzgyn-40270	UASVPC.trackTimed = not UASVPC.trackTimed
83		Syzgyn-40270	tT:SetChecked(UASVPC.trackTimed)
84		Syzgyn-40270	end)
85		Syzgyn-40270
86	43	Syzgyn-40270	InterfaceOptions_AddCategory(panel)
87	54	Syzgyn-40270	UrbanAchiever:AddHelpPanel()
88	43	Syzgyn-40270	end
89	54	Syzgyn-40270
90		Syzgyn-40270	function UrbanAchiever:AddHelpPanel()
91		Syzgyn-40270	local panel = CreateFrame("Frame")
92	87	Tomate-202285	panel.name = UAHelp;
93	54	Syzgyn-40270	panel.parent = "Urban Achiever"
94		Syzgyn-40270
95		Syzgyn-40270	local title = panel:CreateFontString(nil, "ARTWORK", "GameFontNormalLarge")
96		Syzgyn-40270	title:SetPoint("TOPLEFT", 15, -16)
97	87	Tomate-202285	title:SetText("Urban Achiever - " .. UAHelp)
98	54	Syzgyn-40270	title:SetJustifyH("LEFT")
99		Syzgyn-40270	title:SetJustifyV("TOP")
100		Syzgyn-40270
101		Syzgyn-40270	local subText = panel:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
102		Syzgyn-40270	subText:SetPoint("TOPLEFT", title, "BOTTOMLEFT", 0, -8)
103	87	Tomate-202285	subText:SetText(UAOMG)
104	54	Syzgyn-40270	subText:SetNonSpaceWrap(true)
105		Syzgyn-40270	subText:SetJustifyH("LEFT")
106		Syzgyn-40270	subText:SetJustifyV("TOP")
107		Syzgyn-40270
108		Syzgyn-40270	local iconTitle = panel:CreateFontString(nil, "ARTWORK", "GameFontNormal")
109	89	Tomate-202285	iconTitle:SetText(UAIcon)
110	54	Syzgyn-40270	iconTitle:SetPoint("TOPLEFT", subText, "BOTTOMLEFT", 0, -10)
111		Syzgyn-40270
112		Syzgyn-40270	local iconIcons = panel:CreateFontString(nil, "ARTWORK", "GameFontNormal")
113		Syzgyn-40270	iconIcons:SetTextColor(1,1,1)
114		Syzgyn-40270	iconIcons:SetPoint("TOPLEFT", iconTitle, "BOTTOMLEFT")
115		Syzgyn-40270	iconIcons:SetText("\|cffff0000!\|r\n" ..
116		Syzgyn-40270	"\|cff00ff00T\|r\n" ..
117		Syzgyn-40270	"+/-\n"
118		Syzgyn-40270	)
119		Syzgyn-40270
120		Syzgyn-40270	local iconBody = panel:CreateFontString(nil, "ARTWORK", "GameFontNormal")
121		Syzgyn-40270	iconBody:SetJustifyH("LEFT")
122	55	Syzgyn-40270	iconBody:SetWidth(370)
123	54	Syzgyn-40270	iconBody:SetTextColor(1,1,1)
124	87	Tomate-202285	iconBody:SetText(UARewardStr .. UATrackedStr .. UAMoreStr)
125	54	Syzgyn-40270	iconBody:SetPoint("TOPLEFT", iconIcons, "TOPRIGHT", 0, -6)
126		Syzgyn-40270
127		Syzgyn-40270	local trackerTitle = panel:CreateFontString(nil, "ARTWORK", "GameFontNormal")
128	89	Tomate-202285	trackerTitle:SetText(UATracker)
129	54	Syzgyn-40270	trackerTitle:SetPoint("TOPLEFT", iconIcons, "BOTTOMLEFT", 0, -15)
130		Syzgyn-40270
131		Syzgyn-40270	local trackerBody = panel:CreateFontString(nil, "ARTWORK", "GameFontNormal")
132		Syzgyn-40270	trackerBody:SetJustifyH("LEFT")
133		Syzgyn-40270	trackerBody:SetWidth(390)
134		Syzgyn-40270	trackerBody:SetTextColor(1,1,1)
135	87	Tomate-202285	trackerBody:SetText("\|cff00ff00" .. UABindTrackedStr .. "\|cff00ff00" .. UABindShowStr .. "\|cff00ff00" .. UABindRemoveTrackedStr)
136	54	Syzgyn-40270	trackerBody:SetPoint("TOPLEFT", trackerTitle, "BOTTOMLEFT")
137		Syzgyn-40270
138		Syzgyn-40270	InterfaceOptions_AddCategory(panel)
139		Syzgyn-40270	end