vanilla-wow-addons – Blame information for rev 1

Subversion Repositories:
Rev:
Rev Author Line No. Line
1 office 1 DiabloMod_Combat = false;
2 function DiabloMod_OnLoad()
3 this:RegisterEvent("UNIT_HEALTH");
4 this:RegisterEvent("UNIT_MAXHEALTH");
5 this:RegisterEvent("UNIT_RAGE");
6 this:RegisterEvent("UNIT_ENERGY");
7 this:RegisterEvent("UNIT_MANA");
8 this:RegisterEvent("UNIT_RUNIC_POWER");
9 this:RegisterEvent("UNIT_DISPLAYPOWER");
10 this:RegisterEvent("PLAYER_ENTERING_WORLD");
11 this:RegisterEvent("PLAYER_REGEN_DISABLED");
12 this:RegisterEvent("PLAYER_REGEN_ENABLED");
13 MainMenuBarArtFrame:RegisterEvent('KNOWN_CURRENCY_TYPES_UPDATE')
14 MainMenuBarArtFrame:RegisterEvent('CURRENCY_DISPLAY_UPDATE')
15 end
16 function DiabloMod_AdjustOrbs()
17 local healthPercent = (UnitHealth("player")/UnitHealthMax("player"));
18 DiabloMod_HealthText:SetText(UnitHealth("player").." / ".. UnitHealthMax("player"));
19 DiabloMod_RedOrb:SetHeight(healthPercent*86);
20 DiabloMod_RedOrb:SetTexCoord(0, 1, 1-healthPercent, 1);
21 local manaPercent = (UnitMana("player")/UnitManaMax("player"));
22 DiabloMod_ManaText:SetText(UnitMana("player").." / ".. UnitManaMax("player"));
23 DiabloMod_BlueOrb:SetHeight(manaPercent*86);
24 DiabloMod_BlueOrb:SetTexCoord(0, 1, 1-manaPercent, 1);
25 end
26 function DiabloMod_OnEvent(event)
27 if (event=="PLAYER_ENTERING_WORLD") then
28 DiabloMod_InitialiseOrbs();
29 DiabloMod_AdjustOrbs();
30 return;
31 end
32 if (event=="PLAYER_REGEN_DISABLED") then
33 DiabloMod_Combat = true;
34 end
35 if (event=="PLAYER_REGEN_ENABLED") then
36 DiabloMod_Combat = false;
37 end
38 if (event=="UNIT_DISPLAYPOWER") then
39 DiabloMod_InitialiseOrbs();
40 DiabloMod_AdjustOrbs();
41 return;
42 end
43 if (event=="UNIT_HEALTH") then
44 local healthPercent = (UnitHealth("player")/UnitHealthMax("player"));
45 DiabloMod_HealthText:SetText(UnitHealth("player").." / ".. UnitHealthMax("player"));
46 DiabloMod_RedOrb:SetHeight(healthPercent*86);
47 DiabloMod_RedOrb:SetTexCoord(0, 1, 1-healthPercent, 1);
48 return;
49 end
50 if (event=="UNIT_MANA" or event=="UNIT_RAGE" or event=="UNIT_ENERGY" or event=="UNIT_RUNIC_POWER" ) then
51 local manaPercent = (UnitMana("player")/UnitManaMax("player"));
52 DiabloMod_ManaText:SetText(UnitMana("player").." / ".. UnitManaMax("player"));
53 DiabloMod_BlueOrb:SetHeight(manaPercent*86);
54 DiabloMod_BlueOrb:SetTexCoord(0, 1, 1-manaPercent, 1);
55 return;
56 end
57 end
58 function DiabloMod_InitialiseOrbs()
59 DiabloMod_HealthText:SetText(UnitHealth("player").." / ".. UnitHealthMax("player"));
60 --DiabloMod_RedOrb:SetVertexColor(0.85,0.2,0.2);
61 DiabloMod_RedOrb:SetVertexColor(1.0,0.2,0.2);
62 --DiabloMod_RedOrb:SetAlpha(0.95);
63 DiabloMod_RedOrb:SetTexCoord(0, 1, 0, 1);
64 local powerType = UnitPowerType("player");
65 DiabloMod_ManaText:SetText(UnitMana("player").." / ".. UnitManaMax("player"));
66 if (powerType == 0) then -- Mana
67 DiabloMod_BlueOrb:SetVertexColor(0.2,0.2,1.0);
68 --DiabloMod_BlueOrb:SetAlpha(0.95);
69 DiabloMod_BlueOrb:SetTexCoord(0, 1, 0, 1);
70 end
71 if (powerType == 1) then -- Rage
72 DiabloMod_BlueOrb:SetVertexColor(0.75,0.15,0.15);
73 --DiabloMod_BlueOrb:SetAlpha(0.95);
74 DiabloMod_BlueOrb:SetTexCoord(0, 1, 0, 1);
75 end
76 if (powerType == 3) then -- Energy
77 DiabloMod_BlueOrb:SetVertexColor(1.0,0.75,0);
78 --DiabloMod_BlueOrb:SetAlpha(0.95);
79 DiabloMod_BlueOrb:SetTexCoord(0, 1, 0, 1);
80 end
81 if (powerType == 6) then -- Runic_Power
82 DiabloMod_BlueOrb:SetVertexColor(0.2,0.75,1.0);
83 --DiabloMod_BlueOrb:SetAlpha(0.95);
84 DiabloMod_BlueOrb:SetTexCoord(0, 1, 0, 1);
85 end
86 end