WoWInterface SVN TipTop

Compare Revisions

  • This comparison shows the changes necessary to convert path
    /branches/2.0
    from Rev 46 to Rev 47
    Reverse comparison

Rev 46 → Rev 47

tiptop.lua
13,6 → 13,7
itemColor = true,
borderColor = {r=.6, g=.6, b=.6, a=1},
healthBar = "TipTop Default",
sbarcolor = {r=0, g=1, b=0, a=1},
sbarbg = "TipTop Default",
sbarbgcolor = {r=0, g=0, b=0, a=.4},
topBar = false,
37,13 → 38,14
local LSM = LibStub("LibSharedMedia-3.0")
local tt = GameTooltip
local ttSBar = GameTooltipStatusBar
local BGPosition
local tooltips = { --GameTooltip,
local ttSBarBG = CreateFrame("Frame", nil, ttSBar)
local BGPosition, color
local qualColors = ITEM_QUALITY_COLORS
local tooltips = { GameTooltip,
ItemRefTooltip,
ShoppingTooltip1,
ShoppingTooltip2,
ShoppingTooltip3,
TipTop}
ShoppingTooltip3}
 
local function SetBackgrounds()
for i = 1, #tooltips do
56,12 → 58,30
})
tooltips[i]:SetBackdropColor(db.bgColor.r, db.bgColor.g, db.bgColor.b, db.alpha)
tooltips[i]:SetBackdropBorderColor(db.borderColor.r, db.borderColor.g, db.borderColor.b, db.borderColor.a)
tt:SetBackdrop(nil)
tt:SetFrameLevel(10)
TipTop:SetFrameLevel(9)
end
tt:SetBackdrop(nil)
tt:SetFrameLevel(10)
TipTop:SetFrameLevel(9)
TipTop:SetScale(db.scale)
TipTop:SetBackdrop({
bgFile = LSM:Fetch("background", db.bg),
insets = {left=db.inset, right=db.inset, top=db.inset, bottom=db.inset},
edgeFile = LSM:Fetch("border", db.border),
edgeSize = db.borderWidth
})
TipTop:SetBackdropColor(db.bgColor.r, db.bgColor.g, db.bgColor.b, db.alpha)
TipTop:SetBackdropBorderColor(db.borderColor.r, db.borderColor.g, db.borderColor.b, db.borderColor.a)
end
 
local function SBarConfig()
ttSBar:SetStatusBarTexture(LSM:Fetch("statusbar", db.healthBar))
ttSBar:SetStatusBarColor(db.sbarcolor.r, db.sbarcolor.g, db.sbarcolor.b, db.sbarcolor.a)
ttSBarBG:SetAllPoints()
ttSBarBG:SetFrameLevel(ttSBar:GetFrameLevel() - 1)
ttSBarBG:SetBackdrop({bgFile = LSM:Fetch("statusbar", db.sbarbg)})
ttSBarBG:SetBackdropColor(db.sbarbgcolor.r, db.sbarbgcolor.g, db.sbarbgcolor.b, db.sbarbgcolor.a)
end
 
local function SBarPosition()
ttSBar:ClearAllPoints()
if db.insideBar then
106,33 → 126,65
end
end
 
--tt:HookScript("OnTooltipSetUnit", function() print("unit") end)
local function BorderClassColor()
if db.classColor then
local _,class = UnitClass("mouseover") --or UnitClass(GameTooltip:GetUnit())
if class then
TipTop:SetBackdropBorderColor(color[class].r - .2, color[class].g - .2, color[class].b - .2, db.borderColor.a)
end
else
local borderColor = db.borderColor
TipTop:SetBackdropBorderColor(borderColor.r, borderColor.g, borderColor.b, borderColor.a)
end
end
 
local function Initialize()
local function MouseoverTargetUpdate()
local borderColor = db.borderColor
TipTop:SetBackdropBorderColor(borderColor.r, borderColor.g, borderColor.b, borderColor.a)
BorderClassColor()
end
 
local function ItemQualityBorder(tip)
if db.itemColor then
local _,item = tip:GetItem()
if item then
local _,_,quality = GetItemInfo(item)
if quality then
local color = qualColors[quality]
if tip == tt then
TipTop:SetBackdropBorderColor(color.r - .2, color.g - .2, color.b - .2, db.borderColor.a)
else
tip:SetBackdropBorderColor(color.r - .2, color.g - .2, color.b - .2, db.borderColor.a)
end
end
end
end
end
 
local function TipShow()
if not tt:GetUnit() and not tt:GetItem() then
local borderColor = db.borderColor
TipTop:SetBackdropBorderColor(borderColor.r, borderColor.g, borderColor.b, borderColor.a)
end
BGPosition()
end
 
local function PlayerLogin()
SetBackgrounds()
SBarPosition()
tt:HookScript("OnShow", BGPosition)
SBarConfig()
 
color = CUSTOM_CLASS_COLORS or RAID_CLASS_COLORS
 
TipTop:UnregisterEvent("PLAYER_LOGIN")
TipTop:RegisterEvent("UPDATE_MOUSEOVER_UNIT")
TipTop:SetScript("OnEvent", MouseoverTargetUpdate)
for i=1,#tooltips do
tooltips[i]:HookScript("OnTooltipSetItem", ItemQualityBorder)
end
end
 
--[[tt:HookScript("OnTooltipSetUnit", function() print("unit: "..tt:GetUnit()) end)
tt:HookScript("OnTooltipSetItem", function() print("item: "..tt:GetItem()) end)
tt:HookScript("OnTooltipSetAchievement", function() print("achievement: ") end)
tt:HookScript("OnTooltipSetEquipmentSet", function() print("set: ") end)
tt:HookScript("OnTooltipSetQuest", function() print("quest: ") end)
tt:HookScript("OnTooltipSetSpell", function() print("spell: "..tt:GetSpell()) end)
]]--
--[[tt:HookScript("OnShow", function()
if tt:GetUnit() then
print("unit")
elseif tt:GetItem() then
print("item")
elseif tt:GetSpell() then
print("spell")
else
print("else")
end
end)
]]--
 
TipTop:RegisterEvent("PLAYER_LOGIN")
TipTop:SetScript("OnEvent", Initialize)
\ No newline at end of file +TipTop:SetScript("OnEvent", PlayerLogin) +TipTop:SetScript("OnShow", TipShow) \ No newline at end of file