vanilla-wow-addons – Blame information for rev 1

Subversion Repositories:
Rev:
Rev Author Line No. Line
1 office 1 local parts = { "Head", "Shoulders", "Chest", "Wrists", "Hands", "Waist", "Legs", "Feet", "Weapon", "Shield", "OffWeapon", "Ranged" };
2  
3 function CT_DurabilityVisible()
4 for key, val in parts do
5 if ( getglobal("Durability" .. val):IsVisible() ) then
6 return 1;
7 end
8 end
9 return nil;
10 end
11  
12 function CT_CastBarFrame_OnLoad()
13 this:RegisterEvent("SPELLCAST_CHANNEL_START");
14 this:RegisterEvent("SPELLCAST_CHANNEL_UPDATE");
15 this:RegisterEvent("SPELLCAST_STOP");
16 this:RegisterEvent("SPELLCAST_FAILED");
17 this:RegisterEvent("SPELLCAST_START");
18 this:RegisterEvent("SPELLCAST_INTERRUPTED");
19 this:RegisterEvent("SPELLCAST_DELAYED");
20 CT_CastBarFrame_Update();
21 end
22  
23 function CT_CastBarFrame_OnEvent(event)
24 if ( event == "SPELLCAST_CHANNEL_START" ) then
25 CT_CastBarFrame.spellName = arg2;
26 elseif ( event == "SPELLCAST_START" ) then
27 CT_CastBarFrame.spellName = arg1;
28 end
29 if ( event == "SPELLCAST_CHANNEL_START" or event == "SPELLCAST_CHANNEL_UPDATE" or event == "SPELLCAST_STOP" or event == "SPELLCAST_FAILED" or event == "SPELLCAST_START" or event == "SPELLCAST_INTERUPTED" or event == "SPELLCAST_DELAYED" ) then
30 CT_CastBarFrame_Update();
31 end
32 end
33  
34 CT_CastBarFrame_oldCastingBarFrame_OnUpdate = CastingBarFrame_OnUpdate;
35 function CT_CastBarFrame_newCastingBarFrame_OnUpdate(elapsed)
36 CT_CastBarFrame_oldCastingBarFrame_OnUpdate(elapsed);
37 local doDisplay;
38 if ( CT_Mods[CT_MASTERMOD_MODNAME_CASTTIME] and CT_Mods[CT_MASTERMOD_MODNAME_CASTTIME]["modStatus"] == "on" ) then
39 doDisplay = 1;
40 end
41 if ( CastingBarFrame.casting ) then
42 if ( doDisplay ) then
43 CastingBarText:SetText(CT_CastBarFrame.spellName .. string.format(" (%.1fs)", CastingBarFrame.maxValue - GetTime() ) );
44 else
45 CastingBarText:SetText(CT_CastBarFrame.spellName);
46 end
47 elseif ( CastingBarFrame.channeling ) then
48 if ( doDisplay ) then
49 CastingBarText:SetText(CT_CastBarFrame.spellName .. string.format(" (%.1fs)", CastingBarFrame.endTime - GetTime() ) );
50 else
51 CastingBarText:SetText(CT_CastBarFrame.spellName);
52 end
53 end
54 end
55 CastingBarFrame_OnUpdate = CT_CastBarFrame_newCastingBarFrame_OnUpdate;
56  
57 local function castingtimefunc(modId)
58 local val = CT_Mods[modId]["modStatus"];
59 if ( val == "on" ) then
60 CT_Print(CT_MASTERMOD_CASTTIMEON, 1, 1, 0);
61 else
62 CT_Print(CT_MASTERMOD_CASTTIMEOFF, 1, 1, 0);
63 end
64 end
65 CT_RegisterMod(CT_MASTERMOD_MODNAME_CASTTIME, CT_MASTERMOD_SUBNAME_CASTTIME, 4, "Interface\\Icons\\INV_Misc_PocketWatch_03", CT_MASTERMOD_TOOLTIP_CASTTIME, "off", nil, castingtimefunc);
66  
67 CT_AddMovable("CT_CastBarFrame", CT_MASTERMOD_MOVABLE_CASTBAR, "BOTTOM", "BOTTOM", "UIParent", 0, 135, function(status)
68 if ( status and CastingBarFrameStatusBar:IsVisible() ) then
69 CT_CastBarFrame:Show();
70 else
71 CT_CastBarFrame:Hide();
72 end
73 end, CT_CastBarFrame_Update);
74  
75  
76 CT_AddMovable("CT_QuestWatch_Drag", CT_MASTERMOD_MOVABLE_QUESTTRACKER, "TOPRIGHT", "TOPRIGHT", "UIParent", -200, -425, function(status)
77 if ( status ) then
78 CT_QuestWatch_Drag:Show()
79 else
80 CT_QuestWatch_Drag:Hide();
81 end
82 end);
83 CT_AddMovable("CT_Durability_Drag", CT_MASTERMOD_MOVABLE_DURABILITYDOLL, "TOP", "TOP", "UIParent", 0, 0, function(status)
84 if ( status ) then
85 CT_Durability_Drag:Show()
86 else
87 CT_Durability_Drag:Hide();
88 end
89 end);
90  
91 function CT_CastBarFrame_Update()
92 if ( CastingBarFrameStatusBar:IsVisible() ) then
93 if ( not CT_CastBarFrame:IsVisible() ) then
94 CastingBarFlash:ClearAllPoints();
95 CastingBarFlash:SetPoint("TOP", "CT_CastBarFrame", "TOP", 0, 20);
96 CastingBarText:ClearAllPoints();
97 CastingBarText:SetPoint("TOP", "CT_CastBarFrame", "TOP", 0, -3);
98 CastingBarFrameStatusBar:ClearAllPoints();
99 CastingBarFrameStatusBar:SetPoint("CENTER", "CT_CastBarFrame", "CENTER", 0, -3);
100  
101 CastingBarFrame:ClearAllPoints();
102 CastingBarFrame:SetPoint("TOP", "CT_CastBarFrame", "TOP", 0, -8);
103 if ( CT_MF_ShowFrames ) then
104 CT_CastBarFrame:Show();
105 end
106 end
107 else
108 CT_CastBarFrame:Hide();
109 end
110 end