WebSVN – vanilla-wow-addons – Blame – Rev 1 – /c/CT_BarMod/CT

1

office

1

tinsert(UISpecialFrames, "CT_BarModOptionsFrame");

2

CT_BarModOptions_Options = { };

3

4

function CT_BarModOptions_Slider_OnShow(slider)

5

if ( not slider ) then

6

slider = this;

7

end

8

	if ( not CT_BarModOptions_Options[UnitName("player")] or not CT_BarModOptions_Options[UnitName("player")][slider:GetID()] ) then

return;

end

local names = {

"Left Hotbar Scaling",

13

"Right Hotbar Scaling",

14

"Left Sidebar Scaling",

15

"Right Sidebar Scaling",

16

"Top Hotbar Scaling",

17

"Main Bar Scaling"

18

};

19

getglobal(slider:GetName().."High"):SetText("150%");

20

getglobal(slider:GetName().."Low"):SetText("50%")

21

	getglobal(slider:GetName() .. "Text"):SetText(names[slider:GetID()] .. " - " .. floor(CT_BarModOptions_Options[UnitName("player")][slider:GetID()]*100+0.5) .. "%");

22

23

slider:SetMinMaxValues(0.5, 1.5);

24

slider:SetValueStep(0.01);

25

slider:SetValue(CT_BarModOptions_Options[UnitName("player")][slider:GetID()]);

26

27

if ( slider:GetID() == 6 ) then

28

slider.tooltipText = "Requires Main Bar's texture to be hidden using CT_BottomBar in order to take effect.";

29

end

30

31

local prefix = "CT"..slider:GetID() .. "_";

32

if ( slider:GetID() == 1 ) then

33

prefix = "CT_"; -- First bar is prefixed CT and not CT1

34

elseif ( slider:GetID() == 6 ) then

35

		if ( not CT_BottomBar_HiddenFrames or not CT_BottomBar_HiddenFrames[UnitName("player")]["BarHotbarBackgroundLeft"] or not CT_BottomBar_Enabled[UnitName("player")] ) then

36

return;

37

end

38

prefix = ""; -- Main bar has no prefix

39

end

40

41

for i = 1, 12, 1 do

42

getglobal(prefix .. "ActionButton" .. i):SetScale(CT_BarModOptions_Options[UnitName("player")][slider:GetID()]);

43

if ( prefix == "" ) then

44

getglobal("BonusActionButton" .. i):SetScale(CT_BarModOptions_Options[UnitName("player")][slider:GetID()]);

end

end

end

function CT_BarModOptions_Slider_OnValueChanged()

50

local names = {

51

"Left Hotbar Scaling",

52

"Right Hotbar Scaling",

53

"Left Sidebar Scaling",

54

"Right Sidebar Scaling",

55

"Top Hotbar Scaling",

"Main Bar Scaling"

};

CT_BarModOptions_Options[UnitName("player")][this:GetID()] = floor(this:GetValue()*100+0.5)/100;

60

getglobal(this:GetName() .. "Text"):SetText(names[this:GetID()] .. " - " .. floor(this:GetValue()*100+0.5) .. "%");

61

62

local prefix = "CT"..this:GetID() .. "_";

63

if ( this:GetID() == 1 ) then

64

prefix = "CT_"; -- First bar is prefixed CT and not CT1

65

elseif ( this:GetID() == 6 ) then

66

		if ( not CT_BottomBar_HiddenFrames or not CT_BottomBar_HiddenFrames[UnitName("player")]["BarHotbarBackgroundLeft"] or not CT_BottomBar_Enabled[UnitName("player")] ) then

67

return;

68

end

69

prefix = ""; -- Main bar has no prefix

70

end

71

72

for i = 1, 12, 1 do

73

getglobal(prefix .. "ActionButton" .. i):SetScale(CT_BarModOptions_Options[UnitName("player")][this:GetID()]);

74

if ( prefix == "" ) then

75

getglobal("BonusActionButton" .. i):SetScale(CT_BarModOptions_Options[UnitName("player")][this:GetID()]);

end

end

end

function CT_BarModOptions_LoadOptions()

81

if ( not CT_BarModOptions_Options[UnitName("player")] ) then

82

CT_BarModOptions_Options[UnitName("player")] = { 1, 1, 1, 1, 1, 1 };

83

if ( CT_BottomBar_RotatedFrames and not CT_BottomBar_RotatedFrames[UnitName("player")] ) then

84

CT_BottomBar_RotatedFrames[UnitName("player")] = {};

85

end

86

if ( CT_BottomBar_HiddenFrames and not CT_BottomBar_HiddenFrames[UnitName("player")] ) then

87

CT_BottomBar_HiddenFrames[UnitName("player")] = {};

88

end

89

elseif ( getn(CT_BarModOptions_Options[UnitName("player")]) < 6 ) then

90

for i = getn(CT_BarModOptions_Options[UnitName("player")])+1, 6, 1 do

91

tinsert(CT_BarModOptions_Options[UnitName("player")], 1);

92

end

93

end

94

CT_BarModOptions_Slider_OnShow(CT_BarModOptionsFrameScalingSliderHotbarLeft);

95

CT_BarModOptions_Slider_OnShow(CT_BarModOptionsFrameScalingSliderHotbarRight);

96

CT_BarModOptions_Slider_OnShow(CT_BarModOptionsFrameScalingSliderSidebarLeft);

97

CT_BarModOptions_Slider_OnShow(CT_BarModOptionsFrameScalingSliderSidebarRight);

98

CT_BarModOptions_Slider_OnShow(CT_BarModOptionsFrameScalingSliderHotbarTop);

99

CT_BarModOptions_Slider_OnShow(CT_BarModOptionsFrameScalingSliderMainBar);

100

CT_BarModOptions_RemoveSpaceBars(CT_BarModOptions_Options[UnitName("player")]["removeBars"]);

101

CT_BarModOptions_RemoveSpaceBags(CT_BarModOptions_Options[UnitName("player")]["removeBags"]);

102

CT_BarModOptions_RemoveSpaceSpecial(CT_BarModOptions_Options[UnitName("player")]["removeSpecial"]);

103

CT_BarModOptionsFrameScalingCheckButtonBars:SetChecked(CT_BarModOptions_Options[UnitName("player")]["removeBars"]);

104

CT_BarModOptionsFrameScalingCheckButtonBags:SetChecked(CT_BarModOptions_Options[UnitName("player")]["removeBags"]);

105

	CT_BarModOptionsFrameScalingCheckButtonSpecial:SetChecked(CT_BarModOptions_Options[UnitName("player")]["removeSpecial"]);

106

107

for i = 1, 5, 1 do

108

CT_BarModOptions_EnableBar(i, CT_BarModOptions_Options[UnitName("player")]["bar" .. i], 1);

109

end

110

CT_BarModOptions_SetOption(1, CT_BarModOptions_Options[UnitName("player")]["hidegrid"]);

111

CT_BarModOptions_SetOption(2, CT_BarModOptions_Options[UnitName("player")]["buttonlock"]);

112

CT_BarModOptions_SetOption(3, CT_BarModOptions_Options[UnitName("player")]["pagelock"]);

113

CT_BarModOptions_SetButtons(CT_BarModOptions_Options[UnitName("player")]["leftbarbuttons"] or 3);

114

CT_BarModOptions_SetButtons(CT_BarModOptions_Options[UnitName("player")]["rightbarbuttons"] or 6);

115

end

116

117

function CT_BarModOptions_RemoveSpaceBars(checked)

118

if ( not CT_BarModOptions_Options[UnitName("player")] ) then

119

CT_BarModOptions_Options[UnitName("player")] = { 1, 1, 1, 1, 1, 1 };

120

end

121

122

if ( CT_BottomBar_RotatedFrames and not CT_BottomBar_RotatedFrames[UnitName("player")] ) then

123

CT_BottomBar_RotatedFrames[UnitName("player")] = { };

124

end

125

if ( CT_BottomBar_HiddenFrames and not CT_BottomBar_HiddenFrames[UnitName("player")] ) then

126

CT_BottomBar_HiddenFrames[UnitName("player")] = { };

127

end

128

CT_BarModOptions_Options[UnitName("player")]["removeBars"] = checked;

129

if ( not CT_BottomBar_Enabled ) then

130

return;

131

end

132

local offset, mainOffset = 6, 6;

133

if ( checked ) then

134

offset = 3;

135

end

136

	if ( checked and CT_BottomBar_HiddenFrames and ( CT_BottomBar_HiddenFrames[UnitName("player")]["BarHotbarBackgroundLeft"] or CT_BottomBar_RotatedFrames[UnitName("player")]["Bars"] ) and CT_BottomBar_Enabled[UnitName("player")] ) then

137

mainOffset = 3;

138

end

139

for i = 2, 12, 1 do

140

for y = 1, 5, 1 do

141

local prefix = "CT" .. y;

if ( y == 1 ) then

prefix = "CT";

end

if ( ( not CT_SidebarAxis and ( y ~= 3 and y ~= 4 ) ) or CT_SidebarAxis[y] == 2 ) then

146

getglobal(prefix .. "_ActionButton" .. i):ClearAllPoints();

147

getglobal(prefix .. "_ActionButton" .. i):SetPoint("LEFT", prefix .. "_ActionButton" .. i-1, "RIGHT", offset, 0);

148

else

149

getglobal(prefix .. "_ActionButton" .. i):ClearAllPoints();

150

getglobal(prefix .. "_ActionButton" .. i):SetPoint("TOP", prefix .. "_ActionButton" .. i-1, "BOTTOM", 0, -offset);

151

end

152

end

153

getglobal("ActionButton" .. i):ClearAllPoints();

154

getglobal("BonusActionButton" .. i):ClearAllPoints();

155

		if ( CT_BottomBar_RotatedFrames and CT_BottomBar_RotatedFrames[UnitName("player")]["Bars"] and CT_BottomBar_Enabled[UnitName("player")] ) then

156

getglobal("ActionButton" .. i):SetPoint("TOP", "ActionButton" .. i-1, "BOTTOM", 0, -mainOffset);

157

getglobal("BonusActionButton" .. i):SetPoint("TOP", "BonusActionButton" .. i-1, "BOTTOM", 0, -mainOffset);

158

		elseif ( CT_BottomBar_HiddenFrames and CT_BottomBar_HiddenFrames[UnitName("player")]["BarHotbarBackgroundLeft"] and CT_BottomBar_Enabled[UnitName("player")] ) then

159

getglobal("ActionButton" .. i):SetPoint("LEFT", "ActionButton" .. i-1, "RIGHT", mainOffset, 0);

160

getglobal("BonusActionButton" .. i):SetPoint("LEFT", "BonusActionButton" .. i-1, "RIGHT", mainOffset, 0);

161

else

162

getglobal("ActionButton" .. i):SetPoint("LEFT", "ActionButton" .. i-1, "RIGHT", 6, 0);

163

getglobal("BonusActionButton" .. i):SetPoint("LEFT", "BonusActionButton" .. i-1, "RIGHT", 6, 0);

end

end

end

function CT_BarModOptions_RemoveSpaceBags(checked)

169

CT_BarModOptions_Options[UnitName("player")]["removeBags"] = checked;

170

if ( not CT_BottomBar_Enabled or CT_BottomBar_HiddenFrames[UnitName("player")]["Bags"] ) then

return;

end

local enabled;

	if ( ( CT_BottomBar_HiddenFrames[UnitName("player")]["BagsBackground"] or CT_BottomBar_RotatedFrames[UnitName("player")]["Bags"] ) and CT_BottomBar_Enabled[UnitName("player")] ) then

175

enabled = 1;

176

local offset = 5;

177

if ( checked ) then

offset = 2;

end

local tbl = {

[0] = "MainMenuBarBackpackButton",

182

"CharacterBag0Slot",

183

"CharacterBag1Slot",

184

"CharacterBag2Slot",

185

"CharacterBag3Slot"

186

};

187

for i = 1, 4, 1 do

188

getglobal(tbl[i]):ClearAllPoints();

189

if ( CT_BottomBar_RotatedFrames[UnitName("player")]["Bags"] ) then

190

getglobal(tbl[i]):SetPoint("TOP", tbl[i-1], "BOTTOM", 0, -offset);

191

else

192

getglobal(tbl[i]):SetPoint("RIGHT", tbl[i-1], "LEFT", -offset, 0);

end

end

end

if ( CT_BottomBar_Enabled[UnitName("player")] ) then

197

if ( CT_BottomBar_RotatedFrames[UnitName("player")]["Bags"]) then

198

MainMenuBarBackpackButton:ClearAllPoints();

199

MainMenuBarBackpackButton:SetPoint("TOPLEFT", "CT_BottomBarFrameBags", "TOPLEFT", 7, -4);

200

elseif ( checked and enabled ) then

201

MainMenuBarBackpackButton:ClearAllPoints();

202

MainMenuBarBackpackButton:SetPoint("TOPRIGHT", "CT_BottomBarFrameBags", "TOPRIGHT", -24, -4);

203

else

204

MainMenuBarBackpackButton:ClearAllPoints();

205

MainMenuBarBackpackButton:SetPoint("TOPRIGHT", "CT_BottomBarFrameBags", "TOPRIGHT", -8, -4);

206

end

207

else

208

MainMenuBarBackpackButton:ClearAllPoints();

209

MainMenuBarBackpackButton:SetPoint("BOTTOMRIGHT", "MainMenuBarArtFrame", "BOTTOMRIGHT", -6, 2);

210

local tbl = {

211

[0] = "MainMenuBarBackpackButton",

212

"CharacterBag0Slot",

213

"CharacterBag1Slot",

214

"CharacterBag2Slot",

215

"CharacterBag3Slot"

216

};

217

for i = 1, 4, 1 do

218

getglobal(tbl[i]):ClearAllPoints();

219

getglobal(tbl[i]):SetPoint("RIGHT", tbl[i-1], "LEFT", -5, 0);

end

end

end

function CT_BarModOptions_RemoveSpaceSpecial(checked)

225

CT_BarModOptions_Options[UnitName("player")]["removeSpecial"] = checked;

226

if ( not CT_BottomBar_Enabled ) then

227

return;

228

end

229

local offset, offsetss = 8, 6;

230

if ( checked and CT_BottomBar_Enabled and CT_BottomBar_Enabled[UnitName("player")] ) then

231

if ( CT_BABar_DragFrame_Orientation == "V" or CT_BottomBar_HiddenFrames[UnitName("player")]["ClassBackground"] ) then

232

offsetss = 3;

233

end

234

if ( CT_PetBar_DragFrame_Orientation == "V" or CT_BottomBar_HiddenFrames[UnitName("player")]["ClassBackground"] ) then

offset = 3;

end

end

for i = 2, 10, 1 do

239

getglobal("ShapeshiftButton" .. i):ClearAllPoints();

240

if ( CT_BABar_DragFrame_Orientation and CT_BABar_DragFrame_Orientation == "V" ) then

241

getglobal("ShapeshiftButton" .. i):SetPoint("TOP", "ShapeshiftButton" .. i-1, "BOTTOM", 0, -offsetss);

242

else

243

getglobal("ShapeshiftButton" .. i):SetPoint("LEFT", "ShapeshiftButton" .. i-1, "RIGHT", offsetss, 0);

244

end

245

getglobal("PetActionButton" .. i):ClearAllPoints();

246

if ( CT_PetBar_DragFrame_Orientation and CT_PetBar_DragFrame_Orientation == "V" ) then

247

getglobal("PetActionButton" .. i):SetPoint("TOP", "PetActionButton" .. i-1, "BOTTOM", 0, -offset);

248

else

249

getglobal("PetActionButton" .. i):SetPoint("LEFT", "PetActionButton" .. i-1, "RIGHT", offset, 0);

end

end

end

function CT_BarModOptions_OpenFrame()

255

if ( CT_BarModOptionsFrame:IsVisible() ) then

256

CT_BarModOptionsFrame:Hide();

257

else

258

CT_BarModOptionsFrame:Show();

259

end

260

end

261

CT_RegisterMod("Bar Options", "Display Dialog", 2, "Interface\\Icons\\Ability_Rogue_Ambush", "Opens the Bar Options dialogs, where you\ncan modify various hotbar properties.", "switch", nil, CT_BarModOptions_OpenFrame);

262

263

function CT_BarModOptions_LoadButton()

264

if ( this:GetID() <= 3 ) then

265

getglobal(this:GetName() .. "Name"):SetText(3+(this:GetID()*3));

266

else

267

getglobal(this:GetName() .. "Name"):SetText(3+((this:GetID()-3)*3));

end

end

function CT_BarModOptions_EnableBar(id, checked, isLoading)

272

CT_BarModOptions_Options[UnitName("player")]["bar" .. id] = checked;

273

local objs = { "LHBCB", "RHBCB", "LSBCB", "RSBCB", "THBCB" };

274

local names = { "CT_HotbarLeft", "CT_HotbarRight", "CT_SidebarFrame", "CT_SidebarFrame2", "CT_HotbarTop" };

275

	local dragnames = { "CT_HotbarLeft_Drag", "CT_HotbarRight_Drag", "CT_SidebarLeft_Drag", "CT_SidebarRight_Drag", "CT_HotbarTop_Drag" };

276

getglobal("CT_BarModOptionsFrameOptionsDisplay" .. objs[id]):SetChecked(checked);

277

if ( checked ) then

278

getglobal(names[id]):Show();

279

if ( CT_MF_ShowFrames ) then

280

getglobal(dragnames[id]):Show();

281

end

282

if ( id == 1 and isLoading ) then

283

if ( not CT_BABar_Drag:IsUserPlaced() ) then

284

CT_BABar_Drag:SetPoint("BOTTOMLEFT", "UIParent", "BOTTOM", -461, 128);

285

end

286

if ( not CT_PetBar_Drag:IsUserPlaced() ) then

287

CT_PetBar_Drag:SetPoint("BOTTOMLEFT", "UIParent", "BOTTOM", -453, 122);

end

end

else

if ( id == 1 and not isLoading ) then

292

CT_LeftHotbar_OnHide();

293

end

294

getglobal(names[id]):Hide();

295

end

296

if ( id == 1 and not isLoading and checked ) then

297

local x = CT_PetBar_Drag:GetLeft()-(UIParent:GetRight()/2);

298

local y = CT_PetBar_Drag:GetBottom()+40;

299

CT_PetBar_Drag:ClearAllPoints();

300

CT_PetBar_Drag:SetPoint("BOTTOMLEFT", "UIParent", "BOTTOM", x, y);

301

x = CT_BABar_Drag:GetLeft()-(UIParent:GetRight()/2);

302

y = CT_BABar_Drag:GetBottom()+40;

303

CT_BABar_Drag:ClearAllPoints();

304

CT_BABar_Drag:SetPoint("BOTTOMLEFT", "UIParent", "BOTTOM", x, y);

305

elseif ( id == 1 and isLoading and not checked ) then

306

elseif ( id == 4 ) then

CT_Bag_Update();

end

end

function CT_BarModOptions_SetButtons(id)

312

if ( id <= 3 ) then

313

for i = 1, 3, 1 do

314

if ( i ~= id ) then

315

getglobal("CT_BarModOptionsFrameOptionsLSB" .. i):SetChecked(false);

316

else

317

getglobal("CT_BarModOptionsFrameOptionsLSB" .. i):SetChecked(true);

318

end

319

end

320

CT_LSidebar_Buttons = 3+(id*3);

321

for i=1, 12, 1 do

322

if ( i > CT_LSidebar_Buttons ) then

323

getglobal("CT3_ActionButton" .. i):Hide();

324

else

325

getglobal("CT3_ActionButton" .. i):Show();

end

end

-- Left Sidebar

CT_BarModOptions_Options[UnitName("player")]["leftbarbuttons"] = id;

330

else

331

for i = 1, 3, 1 do

332

if ( i ~= (id-3) ) then

333

getglobal("CT_BarModOptionsFrameOptionsRSB" .. i):SetChecked(false);

334

else

335

getglobal("CT_BarModOptionsFrameOptionsRSB" .. i):SetChecked(true);

336

end

337

end

338

CT_RSidebar_Buttons = 3+((id-3)*3);

339

for i=1, 12, 1 do

340

if ( i > CT_RSidebar_Buttons ) then

341

getglobal("CT4_ActionButton" .. i):Hide();

342

else

343

getglobal("CT4_ActionButton" .. i):Show();

end

end

-- Right Sidebar

CT_BarModOptions_Options[UnitName("player")]["rightbarbuttons"] = id;

end

end

function CT_BarModOptions_SetOption(id, checked)

352

local objs = { "HideGridCB", "ButtonLockCB", "PageLockCB" };

353

getglobal("CT_BarModOptionsFrameOptions" .. objs[id]):SetChecked(checked);

354

if ( id == 1 ) then

355

-- Hide Button Grid

356

CT_BarModOptions_Options[UnitName("player")]["hidegrid"] = checked;

357

CT_ShowGrid = not checked;

358

if ( not checked ) then

359

local bar1, bar2, bar3, bar4, bar5, bar6, bar7, bar8, bar9, bar10, bar11;

360

for i=1, 12, 1 do

361

				bar1, bar2, bar3, bar4 = getglobal("MultiBarBottomLeftButton" .. i), getglobal("MultiBarBottomRightButton" .. i), getglobal("MultiBarLeftButton" .. i), getglobal("MultiBarRightButton" .. i);

362

				bar5, bar6, bar7, bar8 = getglobal("CT_ActionButton" .. i), getglobal("CT2_ActionButton" .. i), getglobal("CT5_ActionButton" .. i), getglobal("CT3_ActionButton" .. i);

363

				bar9, bar10, bar11 = getglobal("CT3_ActionButton" .. i), getglobal("ActionButton" .. i), getglobal("BonusActionButton" .. i);

364

365

-- Set the showgrid variable

bar1.showgrid = 3;

bar2.showgrid = 3;

bar3.showgrid = 3;

bar4.showgrid = 3;

bar5.showgrid = 3;

bar6.showgrid = 3;

bar7.showgrid = 3;

bar8.showgrid = 3;

bar9.showgrid = 3;

bar10.showgrid = 3;

376

bar11.showgrid = 3;

-- Show the bars

bar1:Show();

bar2:Show();

bar3:Show();

bar4:Show();

bar5:Show();

bar6:Show();

bar7:Show();

-- Show these only if they're in use

387

if ( CT_Sidebar_ButtonInUse(getglobal("CT3_ActionButton" .. i)) ) then

388

bar8:Show();

389

end

390

if ( CT_Sidebar_ButtonInUse(getglobal("CT4_ActionButton" .. i)) ) then

bar9:Show();

end

-- Show the appropriate main/bonus bar

395

				if ( not CT_BottomBar_Enabled or not CT_BottomBar_HiddenFrames[UnitName("player")]["BarHotbar"] or not CT_BottomBar_Enabled[UnitName("player")] ) then

396

if ( GetBonusBarOffset() > 0 ) then

bar10:Hide();

bar11:Show();

else

bar10:Show();

bar11:Hide();