WebSVN – vanilla-wow-addons – Blame – Rev 1

                if entry.custom and not entry.texture and entry.name == "Custom" and entry.button == L"BINDING_NOT_DEFINED" and entry.action == "" then

271

table.remove(editSet, listSelected)

272

listSelected = 0

273

end

274

if tempButton and entry.button ~= tempButton then

275

entry.button = tempButton

276

end

277

if tempModifiers and entry.modifiers ~= tempModifiers then

278

entry.modifiers = tempModifiers

279

end

280

if tempTexture and entry.texture ~= tempTexture then

281

entry.texture = tempTexture

end

end

end

Clique:EditCancel()

287

dewdrop:Close()

288

Clique:SetTutorial("SELECTED")

289

elseif source==CliqueButtonMax then -- "Max Rank" : Remove rank value from table

290

local click = editSet[listSelected]

291

click.rank = nil

292

--Clique:FillListEntry("CliqueEditEntry",listSelected)

293

self:ListScrollUpdate()

294

Clique:BuildActionTable()

295

elseif source==CliqueButtonHelp then

296

if CliqueTutorial:IsVisible() then

297

CliqueTutorial:Hide()

298

else

299

CliqueTutorial:Show()

300

end

301

end

302

Clique:ValidateButtons()

303

end

304

305

--[[ CliqueListFrame functions (note most of work done in Clique.ButtonOnClick) ]]

306

-- the central list update function: shows help if needed, highlights, validates buttons, etc.  Call anytime clickCasts changes

307

-- when a list entry on ClickListFrame is clicked: select or unselect entry

308

function Clique:ListOnClick()

309

local idx = FauxScrollFrame_GetOffset(CliqueListScroll) + this:GetID()

310

maybeDoubleClick = idx

311

listSelected = (listSelected==idx) and 0 or idx

312

Clique:ListScrollUpdate()

313

end

314

315

-- when a list entry on ClickListFrame is double clicked: edit entry irregardless of selection

316

function Clique:ListOnDoubleClick()

317

if maybeDoubleClick then

318

listSelected = maybeDoubleClick

319

Clique:ButtonOnClick(CliqueButtonEdit)

end

end

--[[ CliqueEditFrame functions (note most of work done in Clique.ButtonOnClick) ]]

324

-- go from ClickEditFrame to ClickListFrame

325

function Clique:EditCancel()

326

CliqueEditFrame:Hide()

327

CliqueListFrame:Show()

328

listSelected = 0

329

Clique:ListScrollUpdate()

330

CliqueIconSelectFrame:Hide()

331

end

332

333

-- updates key binding from when the user does a click combo on the entry above the edit box

334

function Clique:EditSelectedBinding()

335

local click = editSet[listSelected]

336

a = IsAltKeyDown() or 0

337

s = IsShiftKeyDown() or 0

338

c = IsControlKeyDown() or 0

339

340

local modifiers = 0

341

modifiers = bit.bor(modifiers, a * 1)

342

modifiers = bit.bor(modifiers, c * 2)

343

modifiers = bit.bor(modifiers, s * 4)

344

345

if self:CheckBinding(arg1, modifiers) then

return

end

click.button = arg1

350

click.modifiers = modifiers

351

352

CliqueEditBindingName:SetText(Clique:GetBindingText(listSelected))

353

Clique:BuildActionTable()

354

end

355

356

function Clique:DropDown_OnShow()

357

self.work = self:ClearTable(self.work)

358

for k,v in pairs(self.db.char) do

359

table.insert(self.work, k)

360

end

361

table.sort(self.work)

362

363

UIDropDownMenu_Initialize(this, Clique.DropDown_Initialize);

364

UIDropDownMenu_SetSelectedValue(CliqueDropDown, editSet)

365

Clique:ListScrollUpdate()

366

end

367

368

function Clique.DropDown_Initialize()

369

local info = {}

370

371

for k,v in ipairs(Clique.work) do

372

info = {};

373

info.text = v;

374

info.value = Clique.db.char[v];

375

info.func = Clique.DropDown_OnClick;

376

UIDropDownMenu_AddButton(info);

end

end

function Clique.DropDown_OnClick()

381

UIDropDownMenu_SetSelectedValue(CliqueDropDown, this.value);

382

editSet = this.value

383

listSelected = 0

384

Clique:ListScrollUpdate()

385

end

386

387

function Clique:EnableTooltips()

388

-- Set Dropdown selection

389

self:SetTooltip(CliqueDropDown, L"TT_DROPDOWN")

390

--[[

391

self:SetTooltip(CliqueList1, L"TT_LIST_ENTRY")

392

self:SetTooltip(CliqueList2, L"TT_LIST_ENTRY")

393

self:SetTooltip(CliqueList3, L"TT_LIST_ENTRY")

394

self:SetTooltip(CliqueList4, L"TT_LIST_ENTRY")

395

self:SetTooltip(CliqueList5, L"TT_LIST_ENTRY")

396

self:SetTooltip(CliqueList6, L"TT_LIST_ENTRY")

397

--]]

398

self:SetTooltip(CliqueButtonDelete, L"TT_DEL_BUTTON")

399

self:SetTooltip(CliqueButtonMax, L"TT_MAX_BUTTON")

400

self:SetTooltip(CliqueButtonNew, L"TT_NEW_BUTTON")

401

self:SetTooltip(CliqueButtonEdit, L"TT_EDIT_BUTTON")

402

self:SetTooltip(CliqueButtonOk, L"TT_OK_BUTTON")

403

--self:SetTooltip(CliqueEditEntry, L"TT_EDIT_BINDING")

404

405

--self:SetTooltip(CliqueNameEditBox, L"TT_NAME_EDITBOX")

406

self:SetTooltip(CliqueButtonSave, L"TT_SAVE_BUTTON")

407

self:SetTooltip(CliqueButtonCancel, L"TT_CANCEL_BUTTON")

408

self:SetTooltip(CliqueTextEditBox, L"TT_TEXT_EDITBOX")

409

self:SetTooltip(CliquePulloutTab, L"TT_PULLOUT_TAB")

410

end

411

412

function Clique:SetTutorial(screen)

413

local message = ""

414

415

if screen == "MAIN" then

416

		message = "Using Clique is very simple.  Find a spell in the spellbook to the left, and then click on it.  When clicking you can hold any number of modifiers (Alt, Control and Shift) and you can use any button on your mouse (Left, Right, Middle, Button4 and Button5.)  This will add a spell to the list above.\n\nYou can also use the \"New\" button to add a custom lua script."

417

elseif screen == "SELECTED" then

418

		message = "You have selected a spell or custom script.  If this is a spell (from the spellbook) and you'd like to always cast the highest rank, click the \"Max\" button.\n\nYou can also use the \"Edit\" button to change the binding of a spell, or the name/lua code of a custom script."

419

elseif screen == "EDIT" then

420

		message = "You are in the edit screen.  You can re-bind this cast by clicking the button above.  In custom scripts, you can use Clique.unit to refer to the unit we're clicking on.\n\nYou may also right-click in the edit box to pop up a list of custom functions that are available to you.  See the documentation for more details."

421

end

422

423

CliqueTutorialText:SetText(message)

424

end

425

426

function Clique:UpdateIconFrame()

427

local MAX_MACROS = 18;

428

local NUM_MACRO_ICONS_SHOWN = 20;

429

local NUM_ICONS_PER_ROW = 5;

430

local NUM_ICON_ROWS = 4;

431

local MACRO_ICON_ROW_HEIGHT = 36;

432

local macroPopupOffset = FauxScrollFrame_GetOffset(CliqueIconScrollFrame);

433

local numMacroIcons = GetNumMacroIcons();

434

435

-- Icon list

436

for i=1, NUM_MACRO_ICONS_SHOWN do

437

macroPopupIcon = getglobal("CliqueIcon"..i.."Icon");

438

macroPopupButton = getglobal("CliqueIcon"..i);

439

440

if not macroPopupButton.icon then

441

macroPopupButton.icon = macroPopupIcon

442

end

443

444

index = (macroPopupOffset * NUM_ICONS_PER_ROW) + i;

445

if ( index <= numMacroIcons ) then

446

macroPopupIcon:SetTexture(GetMacroIconInfo(index));

447

macroPopupButton:Show();

448

else

449

macroPopupIcon:SetTexture("");

450

macroPopupButton:Hide();

451

end

452

macroPopupButton:SetChecked(nil);

453

end

454

455

    FauxScrollFrame_Update(CliqueIconScrollFrame, ceil(numMacroIcons / NUM_ICONS_PER_ROW) , NUM_ICON_ROWS, MACRO_ICON_ROW_HEIGHT );

456

end

457

458

function Clique:SetSpellIcon(texture)

459

editSet[listSelected].texture = texture

460

CliqueEditIconTexture:SetTexture(texture)

461

end

462

463

function Clique:ClickSpellIcon()

464

Clique:SetSpellIcon(this.icon:GetTexture())

465

CliqueIconSelectFrame:Hide()

466

if editSet[listSelected].custom then

467

CliqueTextEditBox:Show()

end

end

--[[---------------------------------------------------------------------------------

472

Handle the function dropdown, with registrations

473

----------------------------------------------------------------------------------]]

474

475

local function InsertEditBox(text)

476

CliqueEditBox:Insert(text.."\n")

477

end

478

479

function Clique:RegisterCustomFunction(code, display, tooltip)

480

if not code or type(code) ~= "string" then

481

error("Bad argument #1 to 'RegisterCustomFunction', (string expected got " .. type(code) .. ")")

482

end

483

if not display or type(display) ~= "string" then

484

error("Bad argument #2 to 'RegisterCustomFunction', (string expected got " .. type(display) .. ")")

485

end

486

if not tooltip or type(tooltip) ~= "string" then

487

error("Bad argument #3 to 'RegisterCustomFunction', (string expected got " .. type(tooltip) .. ")")

488

end

489

490

-- Create the table if it doesn't exist

491

if not self.CustomFunctions then self.CustomFunctions = {} end

492

493

local t = {["code"] = code, ["display"] = display, ["tooltip"] = tooltip}

494

table.insert(self.CustomFunctions, t)

495

end

496

497

local function DewDropMenu()

498

dewdrop:AddLine(

499

'text', "Custom Functions",

500

'isTitle', true)

501

502

for k,v in ipairs(Clique.CustomFunctions) do

503

Clique:LevelDebug(2, "Adding Custom Function %s", v.display)

504

dewdrop:AddLine(

505

'text', v.display,

506

'closeWhenClicked', true,

507

'arg1', v.code,

508

'func', InsertEditBox,

509

'tooltipText', v.tooltip)

end

end

function Clique:DropMenu(frame)

514

dewdrop:Open(frame, 'children', DewDropMenu, 'cursorX', true, 'cursorY', true)

515

end

516

517

StaticPopupDialogs["CLIQUE_PASSIVE_SKILL"] = {

518

text = "You can't bind a passive skill.",

519

button1 = TEXT(OKAY),

520

OnAccept = function()

end,

timeout = 0,

hideOnEscape = 1

}

StaticPopupDialogs["CLIQUE_BINDING_PROBLEM"] = {

527

text = "That combination is already bound. Delete the old one before trying to re-bind.",

528

button1 = TEXT(OKAY),

529

OnAccept = function()

end,

timeout = 0,

hideOnEscape = 1

};

StaticPopupDialogs["CLIQUE_AUTOSELFCAST"] = {

536

	text = "Clique will not work properly if Blizzard's AutoSelfCast is enabled.  Please disable it under the Interface Options.",

537

button1 = TEXT(OKAY),

538

OnAccept = function()

end,

timeout = 0,

hideOnEscape = 1

};

vanilla-wow-addons – Blame information for rev 1