Advertisement
Guest User

MyBG LUA

a guest
Jul 1st, 2011
162
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.22 KB | None | 0 0
  1. -- for inline color to chat frame
  2. -- |c alpha red green blue 00= On ff= Off
  3.  
  4. local myBG_Color = {
  5. ["White"] = "|cffffffff",
  6. ["Red"] = "|cffff0000",
  7. ["Green"] = "|cff009900",
  8. ["Pink"] = "|cffff00ff",
  9. ["Blue"] = "|cff00ffff";
  10. }
  11.  
  12. local myBG_Name = myBG_Color.Green.."MyBG|r";
  13.  
  14. function MyBG_OnUpdate(self)
  15. -- does nothing at the moment
  16. end
  17.  
  18. function MyBG_OnLoad(frame)
  19.  
  20. DEFAULT_CHAT_FRAME:AddMessage( myBG_Name.." Loaded. Use /mybg h to toggle visibility, g or /brag to dump to guild chat" )
  21. SlashCmdList[ "MYBG" ] = MyBG_OnSlash
  22. SLASH_MYBG1 = "/mybg"
  23. SLASH_MYBG2 = "/brag"
  24. -- frame:RegisterEvent("UPDATE_BATTLEFIELD_SCORE")
  25. -- self:RegisterEvent("UPDATE_BATTLEFIELD_SCORE")
  26.  
  27. end
  28.  
  29. function MyBG_OnEvent(self, event, ...)
  30.  
  31. local myName = UnitName("player")
  32. local bgData_L1 = myName..": "
  33. local bgData_L2 = ""
  34. local bgData_L3 = ""
  35. local bgData_L4 = ""
  36.  
  37. -- if we are in a raid or BG then we can get the data
  38. if (UnitInRaid(myName)) then
  39. -- hack
  40. if not MyBG_Frame:IsShown() then
  41. MyBG_Frame:Show() ;
  42. end
  43. RequestBattlefieldScoreData()
  44. local numPlayers = GetNumBattlefieldScores()
  45. for bgIndex = 1, numPlayers do
  46. local bgName, bgKB, bgHK, bgDeaths, bgHonor, bgFaction, bgRace, bgClass, bgToken, bgDmg, bgHeals = GetBattlefieldScore(bgIndex)
  47. --DEFAULT_CHAT_FRAME:AddMessage(bgName)
  48. if bgName == myName then
  49. bgData_L1 = bgName.. ": Hn: "..bgHonor
  50. bgData_L2 = "Dmg: " .. bgDmg
  51. bgData_L3 = "Heals: " .. bgHeals
  52. bgData_L4 = "KB: "..bgKB.." HK: "..bgHK
  53. end
  54. end
  55. end
  56. MyBG_Frame_L1:SetText(bgData_L1)
  57. MyBG_Frame_L2:SetText(bgData_L2)
  58. MyBG_Frame_L3:SetText(bgData_L3)
  59. MyBG_Frame_L4:SetText(bgData_L4)
  60.  
  61. end
  62.  
  63. function MyBG_OnSlash( arguments )
  64.  
  65. local chatFrame = "Guild"
  66. local myName = UnitName("player")
  67. local bgData_L1 = myName
  68. local bgData_L2 = "Dmg: "
  69. local bgData_L3 = "Heals: "
  70. local bgData_L4 = "KB: HK: "
  71.  
  72.  
  73. if (arguments == "g" or arguments == "G" or arguments == "") then
  74. -- dump current result to guid chat
  75.  
  76. local numPlayers = GetNumBattlefieldScores()
  77. for bgIndex = 1, numPlayers do
  78. local bgName, bgKB, bgHK, bgDeaths, bgHonor, bgFaction, bgRace, bgClass, bgToken, bgDmg, bgHeals = GetBattlefieldScore(bgIndex)
  79. if bgName == myName then
  80. bgData_L1 = myName.. ": Hn: "..bgHonor
  81. bgData_L2 = "Dmg: " .. bgDmg
  82. bgData_L3 = "Heals: " .. bgHeals
  83. bgData_L4 = "KB: "..bgKB.." HK: "..bgHK
  84. end
  85. end
  86. SendChatMessage(bgData_L1,"Guild")
  87. SendChatMessage(bgData_L2,chatFrame)
  88. SendChatMessage(bgData_L3, chatFrame)
  89. SendChatMessage(bgData_L4, chatFrame)
  90.  
  91.  
  92. elseif (arguments == "h" ) then
  93. if (MyBG_Frame:IsShown() ) then
  94. MyBG_Frame:Hide() ;
  95. else
  96. MyBG_Frame:Show() ;
  97. end
  98. end
  99. end
  100.  
  101.  
  102.  
  103.  
  104. function MyBG_OnEnter(self)
  105.  
  106. GameTooltip_SetDefaultAnchor(GameTooltip, self) ;
  107. GameTooltip:SetText("MyBG",0,0,1);
  108. GameTooltip:AddLine("Your BG Stats",0.5,0.5,0.5);
  109. GameTooltip:AddLine("Drag this frame and drop it");
  110. GameTooltip:AddLine("It will stay there per character");
  111. GameTooltip:AddLine("/mybg h toggles visibility");
  112. GameTooltipTextLeft1:SetTextColor(1,1,1) ;
  113. GameTooltipTextLeft2:SetTextColor(1,0.5,1) ;
  114. GameTooltip:Hide();
  115. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement