WoWInterface SVN impMotD

Compare Revisions

  • This comparison shows the changes necessary to convert path 
    /
    from Rev 1 to Rev 2
    ↔ Reverse comparison
  •

Rev 1 → Rev 2

trunk/impMotD/impMotD.toc New file
0,0 → 1,8
## Interface: 30300
## Title: impMotD
## Notes: Displays the Guild MotD in a seperated window.
## Version: rwowi:revision
## Author: Hati-EK
 
 
core.lua
\ No newline at end of file
trunk/impMotD/core.lua New file
0,0 → 1,94
--[[
##AddOn : impMotD
##Subfile : CooldownIconsR_Range.lua
##Author : Hati-EK
--]]
 
--Carryframe
local imotd = CreateFrame('Frame','Improved_MotD_Frame',UIParent)
imotd:SetWidth(300)
imotd:SetHeight(100)
imotd:SetPoint("CENTER",UIParent,"CENTER",0,0)
imotd:SetFrameStrata("TOOLTIP")
--Background Texture (Pure Black)
imotd.bg = imotd:CreateTexture(imotd:GetName().."_Texture")
imotd.bg:SetTexture(0,0,0,1)
imotd.bg:SetAllPoints(imotd)
--Guildname
imotd.gname = imotd:CreateFontString(imotd:GetName().."_GuildName", "ARTWORK")
imotd.gname:SetPoint("TOP", imotd, "TOP", 0, 0)
imotd.gname:SetFont("Fonts\\FRIZQT__.TTF",16,"OUTLINE")
imotd.gname:SetTextColor(0, 1, 0)
imotd.gname:SetText(imotd.g)
imotd.gname:SetWidth(300)
imotd.gname:Show()
--MotD
imotd.text = imotd:CreateFontString(imotd:GetName().."_Text", "ARTWORK")
imotd.text:SetPoint("TOPLEFT", imotd, "TOPLEFT", 0, -18)
imotd.text:SetFont("Fonts\\FRIZQT__.TTF",12,"OUTLINE")
imotd.text:SetTextColor(0, 1, 0)
imotd.text:SetText()
imotd.text:SetWidth(300)
imotd.text:Show()
--Ok/Cancel Button
imotd.okBtn = CreateFrame("Button",imotd:GetName().."_OkBtn",imotd)
imotd.okBtn:SetWidth(50)
imotd.okBtn:SetHeight(10)
imotd.okBtn:SetPoint("BOTTOM", imotd ,"BOTTOM", 0, 0)
--[[ unnecessary
imotd.okBtn.t = imotd.okBtn:CreateTexture(imotd.okBtn:GetName().."_Texture")
imotd.okBtn.t:SetAllPoints(imotd.okBtn)
imotd.okBtn.t:SetTexture(0,0,0,1)]]
imotd.okBtn.txt = imotd.okBtn:CreateFontString(imotd.okBtn:GetName().."_Text","ARTWORK")
imotd.okBtn.txt:SetPoint("Center", imotd.okBtn, "Center",0,0)
imotd.okBtn.txt:SetFont("Fonts\\FRIZQT__.TTF",12,"OUTLINE")
imotd.okBtn.txt:SetTextColor(1,1,1)
imotd.okBtn.txt:SetText("Ok")
imotd.okBtn:RegisterForClicks("AnyUp")
imotd.okBtn:SetScript("OnClick",
function(self, button, down)
imotd:Hide()
end)
 
 
--#Script
--GetGuildName After Init - as this is delayed
local counter = 0
imotd:SetScript('OnUpdate',function(self,elapsed)
if not self.lastUpdate then
self.lastUpdate=0
end
self.lastUpdate = self.lastUpdate+elapsed
while (self.lastUpdate > 1) do
counter=counter+1
local guild = GetGuildInfo('player')
if guild then
self.gname:SetText(guild.."-MotD")
self.text:SetText(GetGuildRosterMOTD())
self:SetScript('OnUpdate',nil)
return
--player has no Guild
elseif counter>100 then
self:SetScript('OnUpdate',nil)
return
end
self.lastUpdate = self.lastUpdate - 1
end
end)
--Show if MotD changes
function imotd:GUILD_MOTD(motd)
local guild = GetGuildInfo('player')
if guild then
self.gname:SetText(guild)
end
self.text:SetText(motd)
self:Show()
end
 
imotd:RegisterEvent('GUILD_MOTD')
imotd:SetScript('OnEvent',function(self,event,...)
self[event](self,...)
end)