wow/hansgar_and_franzok_assist: Libs/DF/cooltip.lua annotate

annotate Libs/DF/cooltip.lua @ 39:7944c081e5b4

- framework update. - ToC Update.

author	Tercio
date	Tue, 19 Jul 2016 13:23:40 -0300
parents	d1963bd45219
children	a960d5372b0c

rev	line source
Tercio@11	1
Tercio@11	2 local DF = _G ["DetailsFramework"]
Tercio@20	3 if (not DF or not DetailsFrameworkCanLoad) then
Tercio@20	4 return
Tercio@20	5 end
Tercio@20	6
Tercio@11	7 local SharedMedia = LibStub:GetLibrary("LibSharedMedia-3.0")
Tercio@11	8 local _
Tercio@11	9 --lua locals
Tercio@11	10 local _math_floor= math.floor
Tercio@11	11 local _type = type
Tercio@11	12 local _math_abs = math.abs
Tercio@11	13 local _tinsert = tinsert
Tercio@11	14 local _unpack = unpack
Tercio@11	15 local _ipairs = ipairs
Tercio@11	16 local _table_wipe = table.wipe
Tercio@11	17 local _table_insert = table.insert
Tercio@11	18 local _math_max = math.max
Tercio@11	19 --api locals
Tercio@11	20 local _GetScreenWidth = GetScreenWidth
Tercio@11	21 local _GetScreenHeight = GetScreenHeight
Tercio@11	22 local _UIParent = UIParent
Tercio@11	23 local _CreateFrame = CreateFrame
Tercio@11	24
Tercio@20	25 local version = 2
Tercio@11	26
Tercio@11	27 function DF:CreateCoolTip()
Tercio@11	28
Tercio@11	29 ----------------------------------------------------------------------
Tercio@11	30 --> Cooltip Startup
Tercio@11	31 ----------------------------------------------------------------------
Tercio@11	32
Tercio@11	33 if (_G.GameCooltip2 and _G.GameCooltip2.version >= version) then
Tercio@11	34 return
Tercio@11	35 end
Tercio@11	36
Tercio@11	37 --> Start Cooltip Table
Tercio@11	38 local CoolTip = {version = version}
Tercio@11	39 _G.GameCooltip2 = CoolTip
Tercio@11	40
Tercio@11	41 --> Containers
Tercio@11	42 CoolTip.LeftTextTable = {}
Tercio@11	43 CoolTip.LeftTextTableSub = {}
Tercio@11	44 CoolTip.RightTextTable = {}
Tercio@11	45 CoolTip.RightTextTableSub = {}
Tercio@11	46 CoolTip.LeftIconTable = {}
Tercio@11	47 CoolTip.LeftIconTableSub = {}
Tercio@11	48 CoolTip.RightIconTable = {}
Tercio@11	49 CoolTip.RightIconTableSub = {}
Tercio@11	50 CoolTip.Banner = {false, false, false}
Tercio@11	51 CoolTip.TopIconTableSub = {}
Tercio@11	52 CoolTip.StatusBarTable = {}
Tercio@11	53 CoolTip.StatusBarTableSub = {}
Tercio@11	54 CoolTip.WallpaperTable = {}
Tercio@11	55 CoolTip.WallpaperTableSub = {}
Tercio@11	56
Tercio@20	57 CoolTip.PopupFrameTable = {}
Tercio@20	58
Tercio@11	59 CoolTip.FunctionsTableMain = {} --> menus
Tercio@11	60 CoolTip.FunctionsTableSub = {} --> menus
Tercio@11	61 CoolTip.ParametersTableMain = {} --> menus
Tercio@11	62 CoolTip.ParametersTableSub = {} --> menus
Tercio@11	63
Tercio@11	64 CoolTip.FixedValue = nil --> menus
Tercio@11	65 CoolTip.SelectedIndexMain = nil --> menus
Tercio@11	66 CoolTip.SelectedIndexSec = {} --> menus
Tercio@11	67
Tercio@11	68 --options table
Tercio@11	69 CoolTip.OptionsList = {
Tercioo@30	70 ["RightTextMargin"] = true,
Tercio@11	71 ["IconSize"] = true,
Tercio@11	72 ["HeightAnchorMod"] = true,
Tercio@11	73 ["WidthAnchorMod"] = true,
Tercio@11	74 ["MinWidth"] = true,
Tercio@11	75 ["FixedWidth"] = true,
Tercio@11	76 ["FixedHeight"] = true,
Tercio@11	77 ["FixedWidthSub"] = true,
Tercio@11	78 ["FixedHeightSub"] = true,
Tercio@11	79 ["AlignAsBlizzTooltip"] = true,
Tercio@11	80 ["IgnoreSubMenu"] = true,
Tercio@11	81 ["IgnoreButtonAutoHeight"] = true,
Tercio@11	82 ["TextHeightMod"] = true,
Tercio@11	83 ["ButtonHeightMod"] = true,
Tercio@11	84 ["ButtonHeightModSub"] = true,
Tercio@11	85 ["YSpacingMod"] = true,
Tercio@11	86 ["YSpacingModSub"] = true,
Tercio@11	87 ["ButtonsYMod"] = true,
Tercio@11	88 ["ButtonsYModSub"] = true,
Tercio@11	89 ["IconHeightMod"] = true,
Tercio@11	90 ["StatusBarHeightMod"] = true,
Tercio@11	91 ["StatusBarTexture"] = true,
Tercio@11	92 ["TextSize"] = true,
Tercio@11	93 ["TextFont"] = true,
Tercio@11	94 ["TextColor"] = true,
Tercio@11	95 ["TextColorRight"] = true,
Tercio@11	96 ["TextShadow"] = true,
Tercio@11	97 ["LeftTextWidth"] = true,
Tercio@11	98 ["RightTextWidth"] = true,
Tercio@11	99 ["LeftTextHeight"] = true,
Tercio@11	100 ["RightTextHeight"] = true,
Tercio@11	101 ["NoFade"] = true,
Tercio@11	102 ["MyAnchor"] = true,
Tercio@11	103 ["Anchor"] = true,
Tercio@11	104 ["RelativeAnchor"] = true,
Tercio@11	105 ["NoLastSelectedBar"] = true,
Tercio@11	106 ["SubMenuIsTooltip"] = true,
Tercio@11	107 ["LeftBorderSize"] = true,
Tercio@11	108 ["RightBorderSize"] = true,
Tercio@11	109 ["HeighMod"] = true,
Tercio@11	110 ["HeighModSub"] = true,
Tercio@11	111 ["IconBlendMode"] = true,
Tercio@11	112 ["IconBlendModeHover"] = true,
Tercio@11	113 ["SubFollowButton"] = true,
Tercio@11	114 ["IgnoreArrows"] = true,
Tercio@11	115 ["SelectedTopAnchorMod"] = true,
Tercio@11	116 ["SelectedBottomAnchorMod"] = true,
Tercio@11	117 ["SelectedLeftAnchorMod"] = true,
Tercio@11	118 ["SelectedRightAnchorMod"] = true,
Tercio@11	119 }
Tercio@11	120
Tercio@11	121 CoolTip.OptionsTable = {}
Tercio@11	122
Tercio@11	123 --cprops
Tercio@11	124 CoolTip.Indexes = 0 --> amount of lines current on shown
Tercio@11	125 CoolTip.IndexesSub = {} --> amount of lines current on shown
Tercio@11	126 CoolTip.HaveSubMenu = false --> amount of lines current on shown
Tercio@11	127 CoolTip.SubIndexes = 0 --> amount of lines current on shown on sub menu
Tercio@11	128 CoolTip.Type = 1 --> 1 tooltip 2 tooltip with bars 3 menu 4 menu + submenus
Tercio@11	129 CoolTip.Host = nil --> frame to anchor
Tercio@11	130 CoolTip.LastSize = 0 --> last size
Tercio@11	131
Tercio@11	132 CoolTip.LastIndex = 0
Tercio@11	133
Tercio@11	134 CoolTip.internal_x_mod = 0
Tercio@11	135 CoolTip.internal_y_mod = 0
Tercio@11	136 CoolTip.overlap_checked = false
Tercio@11	137
Tercio@11	138 --defaults
Tercio@11	139 CoolTip.default_height = 20
Tercio@11	140 CoolTip.default_text_size = 10.5
Tercio@11	141 CoolTip.default_text_font = "GameFontHighlight"
Tercio@11	142
Tercio@11	143 CoolTip.selected_anchor = {}
Tercio@11	144 CoolTip.selected_anchor.left = 2
Tercio@11	145 CoolTip.selected_anchor.right = 0
Tercio@11	146 CoolTip.selected_anchor.top = 0
Tercio@11	147 CoolTip.selected_anchor.bottom = 0
Tercio@11	148
Tercio@11	149 CoolTip._default_font = SharedMedia:Fetch ("font", "Friz Quadrata TT")
Tercio@11	150
Tercio@11	151 --> Create Frames
Tercio@11	152
Tercio@11	153 --> main frame
Tercio@11	154 local frame1
Tercio@11	155 if (not GameCooltipFrame1) then
Tercio@11	156 frame1 = CreateFrame ("Frame", "GameCooltipFrame1", UIParent, "DFCooltipMainFrameTemplate")
Tercio@11	157 tinsert (UISpecialFrames, "GameCooltipFrame1")
Tercio@11	158 DF:CreateFlashAnimation (frame1)
Tercio@11	159 else
Tercio@11	160 frame1 = GameCooltipFrame1
Tercio@11	161 end
Tercio@11	162
Tercio@11	163 GameCooltipFrame1_FrameBackgroundCenter:SetTexture (DF.folder .. "cooltip_background")
Tercio@11	164 GameCooltipFrame1_FrameBackgroundCenter:SetTexCoord (0.10546875, 0.89453125, 0, 1)
Tercio@11	165 GameCooltipFrame1_FrameBackgroundLeft:SetTexture (DF.folder .. "cooltip_background")
Tercio@11	166 GameCooltipFrame1_FrameBackgroundLeft:SetTexCoord (0, 0.103515625, 0, 1)
Tercio@11	167 GameCooltipFrame1_FrameBackgroundRight:SetTexture (DF.folder .. "cooltip_background")
Tercio@11	168 GameCooltipFrame1_FrameBackgroundRight:SetTexCoord (0.896484375, 1, 0, 1)
Tercio@11	169
Tercio@11	170 --> secondary frame
Tercio@11	171 local frame2
Tercio@11	172 if (not GameCooltipFrame2) then
Tercio@11	173 frame2 = CreateFrame ("Frame", "GameCooltipFrame2", UIParent, "DFCooltipMainFrameTemplate")
Tercio@11	174 tinsert (UISpecialFrames, "GameCooltipFrame2")
Tercio@11	175 DF:CreateFlashAnimation (frame2)
Tercio@11	176 frame2:SetClampedToScreen (true)
Tercio@11	177 else
Tercio@11	178 frame2 = GameCooltipFrame2
Tercio@11	179 end
Tercio@11	180
Tercio@11	181 frame2:SetPoint ("bottomleft", frame1, "bottomright")
Tercio@11	182
Tercio@11	183 GameCooltipFrame2_FrameBackgroundCenter:SetTexture (DF.folder .. "cooltip_background")
Tercio@11	184 GameCooltipFrame2_FrameBackgroundCenter:SetTexCoord (0.10546875, 0.89453125, 0, 1)
Tercio@11	185 GameCooltipFrame2_FrameBackgroundLeft:SetTexture (DF.folder .. "cooltip_background")
Tercio@11	186 GameCooltipFrame2_FrameBackgroundLeft:SetTexCoord (0, 0.103515625, 0, 1)
Tercio@11	187 GameCooltipFrame2_FrameBackgroundRight:SetTexture (DF.folder .. "cooltip_background")
Tercio@11	188 GameCooltipFrame2_FrameBackgroundRight:SetTexCoord (0.896484375, 1, 0, 1)
Tercio@11	189
Tercio@11	190 CoolTip.frame1 = frame1
Tercio@11	191 CoolTip.frame2 = frame2
Tercio@26	192 DF:FadeFrame (frame1, 0)
Tercio@26	193 DF:FadeFrame (frame2, 0)
Tercio@11	194
Tercio@11	195 --> button containers
Tercio@11	196 frame1.Lines = {}
Tercio@11	197 frame2.Lines = {}
Tercio@11	198
Tercio@11	199 ----------------------------------------------------------------------
Tercio@11	200 --> Title Function
Tercio@11	201 ----------------------------------------------------------------------
Tercio@11	202
Tercio@11	203 function CoolTip:SetTitle (_f, text)
Tercio@11	204 if (_f == 1) then
Tercio@11	205 CoolTip.title1 = true
Tercio@11	206 CoolTip.title_text = text
Tercio@11	207 end
Tercio@11	208 end
Tercio@11	209
Tercio@11	210 function CoolTip:SetTitleAnchor (_f, _anchor, ...)
Tercio@11	211 _anchor = string.lower (_anchor)
Tercio@11	212 if (_f == 1) then
Tercio@11	213 self.frame1.titleIcon:ClearAllPoints()
Tercio@11	214 self.frame1.titleText:ClearAllPoints()
Tercio@11	215
Tercio@11	216 if (_anchor == "left") then
Tercio@11	217 self.frame1.titleIcon:SetPoint ("left", frame1, "left", ...)
Tercio@11	218 self.frame1.titleText:SetPoint ("left", frame1.titleIcon, "right")
Tercio@11	219
Tercio@11	220 elseif (_anchor == "center") then
Tercio@11	221 self.frame1.titleIcon:SetPoint ("center", frame1, "center")
Tercio@11	222 self.frame1.titleIcon:SetPoint ("bottom", frame1, "top")
Tercio@11	223 self.frame1.titleText:SetPoint ("left", frame1.titleIcon, "right")
Tercio@11	224 self.frame1.titleText:SetText ("TESTE")
Tercio@11	225
Tercio@11	226 self.frame1.titleText:Show()
Tercio@11	227 self.frame1.titleIcon:Show()
Tercio@11	228
Tercio@11	229 elseif (_anchor == "right") then
Tercio@11	230 self.frame1.titleIcon:SetPoint ("right", frame1, "right", ...)
Tercio@11	231 self.frame1.titleText:SetPoint ("right", frame1.titleIcon, "left")
Tercio@11	232
Tercio@11	233 end
Tercio@11	234 elseif (_f == 2) then
Tercio@11	235 self.frame2.titleIcon:ClearAllPoints()
Tercio@11	236 self.frame2.titleText:ClearAllPoints()
Tercio@11	237 if (_anchor == "left") then
Tercio@11	238 self.frame2.titleIcon:SetPoint ("left", frame2, "left", ...)
Tercio@11	239 self.frame2.titleText:SetPoint ("left", frame2.titleIcon, "right")
Tercio@11	240 elseif (_anchor == "center") then
Tercio@11	241 self.frame2.titleIcon:SetPoint ("center", frame2, "center", ...)
Tercio@11	242 self.frame2.titleText:SetPoint ("left", frame2.titleIcon, "right")
Tercio@11	243 elseif (_anchor == "right") then
Tercio@11	244 self.frame2.titleIcon:SetPoint ("right", frame2, "right", ...)
Tercio@11	245 self.frame2.titleText:SetPoint ("right", frame2.titleIcon, "left")
Tercio@11	246 end
Tercio@11	247 end
Tercio@11	248 end
Tercio@11	249
Tercio@11	250 ----------------------------------------------------------------------
Tercio@11	251 --> Button Hide and Show Functions
Tercio@11	252 ----------------------------------------------------------------------
Tercio@11	253
Tercio@11	254 local elapsedTime = 0
Tercio@11	255
Tercio@11	256 CoolTip.mouseOver = false
Tercio@11	257 CoolTip.buttonClicked = false
Tercio@11	258
Tercio@11	259 frame1:SetScript ("OnEnter", function (self)
Tercio@11	260 if (CoolTip.Type ~= 1 and CoolTip.Type ~= 2) then --> menu
Tercio@11	261 CoolTip.active = true
Tercio@11	262 CoolTip.mouseOver = true
Tercio@20	263 CoolTip.had_interaction = true
Tercio@11	264 self:SetScript ("OnUpdate", nil)
Tercio@26	265 DF:FadeFrame (self, 0)
Tercio@11	266 --rever
Tercio@11	267 if (CoolTip.sub_menus) then
Tercio@26	268 DF:FadeFrame (frame2, 0)
Tercio@11	269 end
Tercio@11	270 end
Tercio@11	271 end)
Tercio@11	272
Tercio@11	273 frame2:SetScript ("OnEnter", function (self)
Tercio@11	274 if (CoolTip.OptionsTable.SubMenuIsTooltip) then
Tercio@11	275 return CoolTip:Close()
Tercio@11	276 end
Tercio@11	277 if (CoolTip.Type ~= 1 and CoolTip.Type ~= 2) then
Tercio@11	278 CoolTip.active = true
Tercio@11	279 CoolTip.mouseOver = true
Tercio@20	280 CoolTip.had_interaction = true
Tercio@11	281 self:SetScript ("OnUpdate", nil)
Tercio@26	282 DF:FadeFrame (self, 0)
Tercio@26	283 DF:FadeFrame (frame1, 0)
Tercio@11	284 end
Tercio@11	285 end)
Tercio@11	286
Tercio@11	287 local OnLeaveUpdateFrame1 = function (self, elapsed)
Tercio@11	288 elapsedTime = elapsedTime+elapsed
Tercio@11	289 if (elapsedTime > 0.7) then
Tercio@11	290 if (not CoolTip.active and not CoolTip.buttonClicked and self == CoolTip.Host) then
Tercio@26	291 DF:FadeFrame (self, 1)
Tercio@26	292 DF:FadeFrame (frame2, 1)
Tercio@11	293 elseif (not CoolTip.active) then
Tercio@26	294 DF:FadeFrame (self, 1)
Tercio@26	295 DF:FadeFrame (frame2, 1)
Tercio@11	296 end
Tercio@11	297 self:SetScript ("OnUpdate", nil)
Tercio@11	298 frame2:SetScript ("OnUpdate", nil)
Tercio@11	299 end
Tercio@11	300 end
Tercio@11	301
Tercio@11	302 frame1:SetScript ("OnLeave", function (self)
Tercio@11	303
Tercio@11	304 if (CoolTip.Type ~= 1 and CoolTip.Type ~= 2) then
Tercio@11	305 CoolTip.active = false
Tercio@11	306 CoolTip.mouseOver = false
Tercio@11	307 elapsedTime = 0
Tercio@11	308 self:SetScript ("OnUpdate", OnLeaveUpdateFrame1)
Tercio@11	309 else
Tercio@11	310 CoolTip.active = false
Tercio@11	311 CoolTip.mouseOver = false
Tercio@11	312 elapsedTime = 0
Tercio@11	313 self:SetScript ("OnUpdate", OnLeaveUpdateFrame1)
Tercio@11	314 end
Tercio@11	315 end)
Tercio@11	316
Tercio@11	317 local OnLeaveUpdateFrame2 = function (self, elapsed)
Tercio@11	318 elapsedTime = elapsedTime+elapsed
Tercio@11	319 if (elapsedTime > 0.7) then
Tercio@11	320 if (not CoolTip.active and not CoolTip.buttonClicked and self == CoolTip.Host) then
Tercio@26	321 DF:FadeFrame (self, 1)
Tercio@26	322 DF:FadeFrame (frame2, 1)
Tercio@11	323 elseif (not CoolTip.active) then
Tercio@26	324 DF:FadeFrame (self, 1)
Tercio@26	325 DF:FadeFrame (frame2, 1)
Tercio@11	326 end
Tercio@11	327 self:SetScript ("OnUpdate", nil)
Tercio@11	328 frame1:SetScript ("OnUpdate", nil)
Tercio@11	329 end
Tercio@11	330 end
Tercio@11	331
Tercio@11	332 frame2:SetScript ("OnLeave", function (self)
Tercio@11	333 if (CoolTip.Type ~= 1 and CoolTip.Type ~= 2) then
Tercio@11	334 CoolTip.active = false
Tercio@11	335 CoolTip.mouseOver = false
Tercio@11	336 elapsedTime = 0
Tercio@11	337 self:SetScript ("OnUpdate", OnLeaveUpdateFrame2)
Tercio@11	338 else
Tercio@11	339 CoolTip.active = false
Tercio@11	340 CoolTip.mouseOver = false
Tercio@11	341 elapsedTime = 0
Tercio@11	342 self:SetScript ("OnUpdate", OnLeaveUpdateFrame2)
Tercio@11	343
Tercio@11	344 end
Tercio@11	345 end)
Tercio@11	346
Tercio@11	347 frame1:SetScript ("OnHide", function (self)
Tercio@11	348 CoolTip.active = false
Tercio@11	349 CoolTip.buttonClicked = false
Tercio@11	350 CoolTip.mouseOver = false
Tercio@11	351 end)
Tercio@11	352
Tercio@11	353
Tercio@11	354 ----------------------------------------------------------------------
Tercio@11	355 --> Button Creation Functions
Tercio@11	356 ----------------------------------------------------------------------
Tercio@11	357
Tercio@11	358 function GameCooltipButtonMouseDown (button)
Tercio@11	359 local mod = CoolTip.OptionsTable.TextHeightMod or 0
Tercio@11	360 button.leftText:SetPoint ("center", button.leftIcon, "center", 0, 0+mod)
Tercio@11	361 button.leftText:SetPoint ("left", button.leftIcon, "right", 4, -1+mod)
Tercio@11	362 end
Tercio@11	363
Tercio@11	364 function GameCooltipButtonMouseUp (button)
Tercio@11	365 local mod = CoolTip.OptionsTable.TextHeightMod or 0
Tercio@11	366 button.leftText:SetPoint ("center", button.leftIcon, "center", 0, 0+mod)
Tercio@11	367 button.leftText:SetPoint ("left", button.leftIcon, "right", 3, 0+mod)
Tercio@11	368 end
Tercio@11	369
Tercio@11	370 function CoolTip:CreateButton (index, frame, name)
Tercio@11	371 local new_button = CreateFrame ("Button", name, frame, "DFCooltipButtonTemplate")
Tercio@11	372 frame.Lines [index] = new_button
Tercio@11	373 return new_button
Tercio@11	374 end
Tercio@11	375
Tercio@11	376 local OnEnterUpdateButton = function (self, elapsed)
Tercio@11	377 elapsedTime = elapsedTime+elapsed
Tercio@11	378 if (elapsedTime > 0.001) then
Tercio@11	379 --> search key: ~onenterupdatemain
Tercio@11	380 CoolTip:ShowSub (self.index)
Tercio@11	381 CoolTip.last_button = self.index
Tercio@11	382 self:SetScript ("OnUpdate", nil)
Tercio@11	383 end
Tercio@11	384 end
Tercio@11	385
Tercio@11	386 local OnLeaveUpdateButton = function (self, elapsed)
Tercio@11	387 elapsedTime = elapsedTime+elapsed
Tercio@11	388 if (elapsedTime > 0.7) then
Tercio@11	389 if (not CoolTip.active and not CoolTip.buttonClicked) then
Tercio@26	390 DF:FadeFrame (frame1, 1)
Tercio@26	391 DF:FadeFrame (frame2, 1)
Tercio@11	392
Tercio@11	393 elseif (not CoolTip.active) then
Tercio@26	394 DF:FadeFrame (frame1, 1)
Tercio@26	395 DF:FadeFrame (frame2, 1)
Tercio@11	396 end
Tercio@11	397 frame1:SetScript ("OnUpdate", nil)
Tercio@11	398 end
Tercio@11	399 end
Tercio@11	400
Tercio@11	401 function CoolTip:NewMainButton (i)
Tercio@11	402 local botao = CoolTip:CreateButton (i, frame1, "GameCooltipMainButton"..i)
Tercio@11	403
Tercio@11	404 --> serach key: ~onenter
Tercio@11	405 botao:SetScript ("OnEnter", function()
Tercio@11	406 if (CoolTip.Type ~= 1 and CoolTip.Type ~= 2 and not botao.isDiv) then
Tercio@11	407 CoolTip.active = true
Tercio@11	408 CoolTip.mouseOver = true
Tercio@20	409 CoolTip.had_interaction = true
Tercio@11	410
Tercio@11	411 frame1:SetScript ("OnUpdate", nil)
Tercio@11	412 frame2:SetScript ("OnUpdate", nil)
Tercio@11	413
Tercio@11	414 botao.background:Show()
Tercio@11	415
Tercio@11	416 if (CoolTip.OptionsTable.IconBlendModeHover) then
Tercio@11	417 botao.leftIcon:SetBlendMode (CoolTip.OptionsTable.IconBlendModeHover)
Tercio@11	418 else
Tercio@11	419 botao.leftIcon:SetBlendMode ("BLEND")
Tercio@11	420 end
Tercio@11	421
Tercio@20	422 if (CoolTip.PopupFrameTable [botao.index]) then
Tercio@20	423 local on_enter, on_leave, param1, param2 = unpack (CoolTip.PopupFrameTable [botao.index])
Tercio@20	424 if (on_enter) then
Tercio@20	425 xpcall (on_enter, geterrorhandler(), frame1, param1, param2)
Tercio@20	426 end
Tercio@20	427
Tercio@20	428 elseif (CoolTip.IndexesSub [botao.index] and CoolTip.IndexesSub [botao.index] > 0) then
Tercio@11	429 if (CoolTip.OptionsTable.SubMenuIsTooltip) then
Tercio@11	430 CoolTip:ShowSub (botao.index)
Tercio@11	431 botao.index = i
Tercio@11	432 else
Tercio@11	433 if (CoolTip.last_button) then
Tercio@11	434 CoolTip:ShowSub (CoolTip.last_button)
Tercio@11	435 else
Tercio@11	436 CoolTip:ShowSub (botao.index)
Tercio@11	437 end
Tercio@11	438 elapsedTime = 0
Tercio@11	439 botao.index = i
Tercio@11	440 botao:SetScript ("OnUpdate", OnEnterUpdateButton)
Tercio@11	441 end
Tercio@11	442
Tercio@11	443 else
Tercio@11	444 --hide second frame
Tercio@26	445 DF:FadeFrame (frame2, 1)
Tercio@11	446 CoolTip.last_button = nil
Tercio@11	447 end
Tercio@11	448 else
Tercio@11	449 CoolTip.mouseOver = true
Tercio@20	450 CoolTip.had_interaction = true
Tercio@11	451 end
Tercio@11	452 end)
Tercio@11	453
Tercio@11	454 botao:SetScript ("OnLeave", function()
Tercio@11	455 if (CoolTip.Type ~= 1 and CoolTip.Type ~= 2 and not botao.isDiv) then
Tercio@11	456 CoolTip.active = false
Tercio@11	457 CoolTip.mouseOver = false
Tercio@11	458 botao:SetScript ("OnUpdate", nil)
Tercio@11	459
Tercio@11	460 botao.background:Hide()
Tercio@11	461
Tercio@11	462 if (CoolTip.OptionsTable.IconBlendMode) then
Tercio@11	463 botao.leftIcon:SetBlendMode (CoolTip.OptionsTable.IconBlendMode)
Tercio@11	464 botao.rightIcon:SetBlendMode (CoolTip.OptionsTable.IconBlendMode)
Tercio@11	465 else
Tercio@11	466 botao.leftIcon:SetBlendMode ("BLEND")
Tercio@11	467 botao.rightIcon:SetBlendMode ("BLEND")
Tercio@11	468 end
Tercio@11	469
Tercio@20	470 if (CoolTip.PopupFrameTable [botao.index]) then
Tercio@20	471 local on_enter, on_leave, param1, param2 = unpack (CoolTip.PopupFrameTable [botao.index])
Tercio@20	472 if (on_leave) then
Tercio@20	473 xpcall (on_leave, geterrorhandler(), frame1, param1, param2)
Tercio@20	474 end
Tercio@20	475 end
Tercio@20	476
Tercio@11	477 elapsedTime = 0
Tercio@11	478 frame1:SetScript ("OnUpdate", OnLeaveUpdateButton)
Tercio@11	479 --CoolTip:HideSub (i)
Tercio@11	480 else
Tercio@11	481 CoolTip.active = false
Tercio@11	482 elapsedTime = 0
Tercio@11	483 frame1:SetScript ("OnUpdate", OnLeaveUpdateButton)
Tercio@11	484 CoolTip.mouseOver = false
Tercio@11	485 end
Tercio@11	486 end)
Tercio@11	487
Tercio@11	488 return botao
Tercio@11	489 end
Tercio@11	490
Tercio@11	491 local OnLeaveUpdateButtonSec = function (self, elapsed)
Tercio@11	492 elapsedTime = elapsedTime+elapsed
Tercio@11	493 if (elapsedTime > 0.7) then
Tercio@11	494 if (not CoolTip.active and not CoolTip.buttonClicked) then
Tercio@26	495 DF:FadeFrame (frame1, 1)
Tercio@26	496 DF:FadeFrame (frame2, 1)
Tercio@11	497 elseif (not CoolTip.active) then
Tercio@26	498 DF:FadeFrame (frame1, 1)
Tercio@26	499 DF:FadeFrame (frame2, 1)
Tercio@11	500 end
Tercio@11	501 frame2:SetScript ("OnUpdate", nil)
Tercio@11	502 end
Tercio@11	503 end
Tercio@11	504
Tercio@11	505 function CoolTip:NewSecondaryButton (i)
Tercio@11	506 local botao = CoolTip:CreateButton (i, frame2, "GameCooltipSecButton"..i)
Tercio@11	507
Tercio@11	508 botao:SetScript ("OnEnter", function()
Tercio@11	509 if (CoolTip.OptionsTable.SubMenuIsTooltip) then
Tercio@11	510 return CoolTip:Close()
Tercio@11	511 end
Tercio@11	512 if (CoolTip.Type ~= 1 and CoolTip.Type ~= 2 and not botao.isDiv) then
Tercio@11	513 CoolTip.active = true
Tercio@11	514 CoolTip.mouseOver = true
Tercio@20	515 CoolTip.had_interaction = true
Tercio@11	516
Tercio@11	517 botao.background:Show()
Tercio@11	518
Tercio@11	519 if (CoolTip.OptionsTable.IconBlendModeHover) then
Tercio@11	520 botao.leftIcon:SetBlendMode (CoolTip.OptionsTable.IconBlendModeHover)
Tercio@11	521 else
Tercio@11	522 botao.leftIcon:SetBlendMode ("BLEND")
Tercio@11	523 end
Tercio@11	524
Tercio@11	525 frame1:SetScript ("OnUpdate", nil)
Tercio@11	526 frame2:SetScript ("OnUpdate", nil)
Tercio@11	527
Tercio@26	528 DF:FadeFrame (frame1, 0)
Tercio@26	529 DF:FadeFrame (frame2, 0)
Tercio@11	530 else
Tercio@11	531 CoolTip.mouseOver = true
Tercio@20	532 CoolTip.had_interaction = true
Tercio@11	533 end
Tercio@11	534 end)
Tercio@11	535
Tercio@11	536 botao:SetScript ("OnLeave", function()
Tercio@11	537 if (CoolTip.Type ~= 1 and CoolTip.Type ~= 2) then
Tercio@11	538 CoolTip.active = false
Tercio@11	539 CoolTip.mouseOver = false
Tercio@11	540
Tercio@11	541 botao.background:Hide()
Tercio@11	542
Tercio@11	543 if (CoolTip.OptionsTable.IconBlendMode) then
Tercio@11	544 botao.leftIcon:SetBlendMode (CoolTip.OptionsTable.IconBlendMode)
Tercio@11	545 botao.rightIcon:SetBlendMode (CoolTip.OptionsTable.IconBlendMode)
Tercio@11	546 else
Tercio@11	547 botao.leftIcon:SetBlendMode ("BLEND")
Tercio@11	548 botao.rightIcon:SetBlendMode ("BLEND")
Tercio@11	549 end
Tercio@11	550
Tercio@11	551 elapsedTime = 0
Tercio@11	552 frame2:SetScript ("OnUpdate", OnLeaveUpdateButtonSec)
Tercio@11	553 else
Tercio@11	554 CoolTip.active = false
Tercio@11	555 CoolTip.mouseOver = false
Tercio@11	556 elapsedTime = 0
Tercio@11	557 frame2:SetScript ("OnUpdate", OnLeaveUpdateButtonSec)
Tercio@11	558 end
Tercio@11	559 end)
Tercio@11	560
Tercio@11	561 return botao
Tercio@11	562 end
Tercio@11	563
Tercio@11	564 ----------------------------------------------------------------------
Tercio@11	565 --> Button Click Functions
Tercio@11	566 ----------------------------------------------------------------------
Tercio@11	567
Tercio@11	568 CoolTip.selected_anchor.left = 4
Tercio@11	569 CoolTip.selected_anchor.right = -4
Tercio@11	570 CoolTip.selected_anchor.top = 0
Tercio@11	571 CoolTip.selected_anchor.bottom = 0
Tercio@11	572
Tercio@11	573 function CoolTip:HideSelectedTexture (frame)
Tercio@11	574 frame.selectedTop:Hide()
Tercio@11	575 frame.selectedBottom:Hide()
Tercio@11	576 frame.selectedMiddle:Hide()
Tercio@11	577 end
Tercio@11	578
Tercio@11	579 function CoolTip:ShowSelectedTexture (frame)
Tercio@11	580 frame.selectedTop:Show()
Tercio@11	581 frame.selectedBottom:Show()
Tercio@11	582 frame.selectedMiddle:Show()
Tercio@11	583 end
Tercio@11	584
Tercio@11	585 function CoolTip:SetSelectedAnchor (frame, button)
Tercio@11	586
Tercio@11	587 local left = CoolTip.selected_anchor.left + (CoolTip.OptionsTable.SelectedLeftAnchorMod or 0)
Tercio@11	588 local right = CoolTip.selected_anchor.right + (CoolTip.OptionsTable.SelectedRightAnchorMod or 0)
Tercio@11	589
Tercio@11	590 local top = CoolTip.selected_anchor.top + (CoolTip.OptionsTable.SelectedTopAnchorMod or 0)
Tercio@11	591 local bottom = CoolTip.selected_anchor.bottom + (CoolTip.OptionsTable.SelectedBottomAnchorMod or 0)
Tercio@11	592
Tercio@11	593 frame.selectedTop:ClearAllPoints()
Tercio@11	594 frame.selectedBottom:ClearAllPoints()
Tercio@11	595
Tercio@11	596 frame.selectedTop:SetPoint ("topleft", button, "topleft", left, top) --
Tercio@11	597 frame.selectedTop:SetPoint ("topright", button, "topright", right, top) --
Tercio@11	598
Tercio@11	599 frame.selectedBottom:SetPoint ("bottomleft", button, "bottomleft", left, bottom) --
Tercio@11	600 frame.selectedBottom:SetPoint ("bottomright", button, "bottomright", right, bottom) --
Tercio@11	601
Tercio@11	602 CoolTip:ShowSelectedTexture (frame)
Tercio@11	603 end
Tercio@11	604
Tercio@11	605 local OnClickFunctionButtonPrincipal = function (self)
Tercio@11	606 if (CoolTip.IndexesSub [self.index] and CoolTip.IndexesSub [self.index] > 0) then
Tercio@11	607 CoolTip:ShowSub (self.index)
Tercio@11	608 CoolTip.last_button = self.index
Tercio@11	609 end
Tercio@11	610
Tercio@11	611 CoolTip.buttonClicked = true
Tercio@11	612 CoolTip:SetSelectedAnchor (frame1, self)
Tercio@11	613
Tercio@11	614 if (not CoolTip.OptionsTable.NoLastSelectedBar) then
Tercio@11	615 CoolTip:ShowSelectedTexture (frame1)
Tercio@11	616
Tercio@11	617 end
Tercio@11	618 CoolTip.SelectedIndexMain = self.index
Tercio@11	619
Tercio@11	620 if (CoolTip.FunctionsTableMain [self.index]) then
Tercio@11	621 local parameterTable = CoolTip.ParametersTableMain [self.index]
Tercio@11	622 CoolTip.FunctionsTableMain [self.index] (_, CoolTip.FixedValue, parameterTable [1], parameterTable [2], parameterTable [3])
Tercio@11	623 end
Tercio@11	624 end
Tercio@11	625
Tercio@11	626 local OnClickFunctionButtonSecundario = function (self)
Tercio@11	627 CoolTip.buttonClicked = true
Tercio@11	628
Tercio@11	629 CoolTip:SetSelectedAnchor (frame2, self)
Tercio@11	630
Tercio@11	631 if (CoolTip.FunctionsTableSub [self.mainIndex] and CoolTip.FunctionsTableSub [self.mainIndex] [self.index]) then
Tercio@11	632 local parameterTable = CoolTip.ParametersTableSub [self.mainIndex] [self.index]
Tercio@11	633 CoolTip.FunctionsTableSub [self.mainIndex] [self.index] (_, CoolTip.FixedValue, parameterTable [1], parameterTable [2], parameterTable [3])
Tercio@11	634 end
Tercio@11	635
Tercio@11	636 local botao_p = frame1.Lines [self.mainIndex]
Tercio@11	637 CoolTip:SetSelectedAnchor (frame1, botao_p)
Tercio@11	638
Tercio@11	639 if (not CoolTip.OptionsTable.NoLastSelectedBar) then
Tercio@11	640 CoolTip:ShowSelectedTexture (frame1)
Tercio@11	641 end
Tercio@11	642
Tercio@11	643 CoolTip.SelectedIndexMain = self.mainIndex
Tercio@11	644 CoolTip.SelectedIndexSec [self.mainIndex] = self.index
Tercio@11	645
Tercio@11	646 end
Tercio@11	647
Tercio@11	648 function CoolTip:TextAndIcon (index, frame, menuButton, leftTextTable, rightTextTable, leftIconTable, rightIconTable, isSub)
Tercio@11	649
Tercio@11	650 --> reset width
Tercio@11	651 menuButton.leftText:SetWidth (0)
Tercio@11	652 menuButton.leftText:SetHeight (0)
Tercio@11	653 menuButton.rightText:SetWidth (0)
Tercio@11	654 menuButton.rightText:SetHeight (0)
Tercio@11	655
Tercioo@30	656 menuButton.rightText:SetPoint ("right", menuButton.rightIcon, "left", CoolTip.OptionsTable.RightTextMargin or -3, 0)
Tercioo@30	657
Tercio@11	658 --> set text
Tercio@11	659 if (leftTextTable) then
Tercio@11	660
Tercio@11	661 menuButton.leftText:SetText (leftTextTable [1])
Tercio@11	662
Tercio@11	663 local r, g, b, a = leftTextTable [2], leftTextTable [3], leftTextTable [4], leftTextTable [5]
Tercio@11	664
Tercio@11	665 if (r == 0 and g == 0 and b == 0 and a == 0) then
Tercio@11	666 if (CoolTip.OptionsTable.TextColor) then
Tercio@11	667 r, g, b, a = DF:ParseColors (CoolTip.OptionsTable.TextColor)
Tercio@11	668 menuButton.leftText:SetTextColor (r, g, b, a)
Tercio@11	669 else
Tercio@11	670 menuButton.leftText:SetTextColor (1, 1, 1, 1)
Tercio@11	671 end
Tercio@11	672 else
Tercio@11	673 menuButton.leftText:SetTextColor (r, g, b, a)
Tercio@11	674 end
Tercio@11	675
Tercio@11	676 if (CoolTip.OptionsTable.TextSize and not leftTextTable [6]) then
Tercio@11	677 DF:SetFontSize (menuButton.leftText, CoolTip.OptionsTable.TextSize)
Tercio@11	678 end
Tercio@11	679
Tercio@11	680 if (CoolTip.OptionsTable.LeftTextWidth) then
Tercio@11	681 menuButton.leftText:SetWidth (CoolTip.OptionsTable.LeftTextWidth)
Tercio@11	682 else
Tercio@11	683 menuButton.leftText:SetWidth (0)
Tercio@11	684 end
Tercio@11	685
Tercio@11	686 if (CoolTip.OptionsTable.LeftTextHeight) then
Tercio@11	687 menuButton.leftText:SetHeight (CoolTip.OptionsTable.LeftTextHeight)
Tercio@11	688 else
Tercio@11	689 menuButton.leftText:SetHeight (0)
Tercio@11	690 end
Tercio@11	691
Tercio@11	692 if (CoolTip.OptionsTable.TextFont and not leftTextTable [7]) then --font
Tercio@11	693
Tercio@11	694 if (_G [CoolTip.OptionsTable.TextFont]) then
Tercio@11	695 menuButton.leftText:SetFontObject (GameFontRed or CoolTip.OptionsTable.TextFont)
Tercio@11	696 else
Tercio@11	697 local font = SharedMedia:Fetch ("font", CoolTip.OptionsTable.TextFont)
Tercio@11	698 local _, size, flags = menuButton.leftText:GetFont()
Tercio@11	699 flags = leftTextTable [8] or CoolTip.OptionsTable.TextShadow or nil
Tercio@11	700 size = leftTextTable [6] or CoolTip.OptionsTable.TextSize or size
Tercio@11	701 menuButton.leftText:SetFont (font, size, flags)
Tercio@11	702 end
Tercio@11	703
Tercio@11	704 elseif (leftTextTable [7]) then
Tercio@11	705 if (_G [leftTextTable [7]]) then
Tercio@11	706 menuButton.leftText:SetFontObject (leftTextTable [7])
Tercio@11	707 local face, size, flags = menuButton.leftText:GetFont()
Tercio@11	708 flags = leftTextTable [8] or CoolTip.OptionsTable.TextShadow or nil
Tercio@11	709 size = leftTextTable [6] or CoolTip.OptionsTable.TextSize or size
Tercio@11	710 menuButton.leftText:SetFont (face, size, flags)
Tercio@11	711 else
Tercio@11	712 local font = SharedMedia:Fetch ("font", leftTextTable [7])
Tercio@11	713 local face, size, flags = menuButton.leftText:GetFont()
Tercio@11	714 flags = leftTextTable [8] or CoolTip.OptionsTable.TextShadow or nil
Tercio@11	715 size = leftTextTable [6] or CoolTip.OptionsTable.TextSize or size
Tercio@11	716 menuButton.leftText:SetFont (face, size, flags)
Tercio@11	717 end
Tercio@11	718 else
Tercio@11	719 menuButton.leftText:SetFont (CoolTip._default_font, leftTextTable [6] or CoolTip.OptionsTable.TextSize or 10, leftTextTable [8] or CoolTip.OptionsTable.TextShadow)
Tercio@11	720 end
Tercio@11	721
Tercio@11	722 local height_mod = CoolTip.OptionsTable.TextHeightMod or 0
Tercio@11	723 menuButton.leftText:SetPoint ("center", menuButton.leftIcon, "center", 0, 0+height_mod)
Tercio@11	724 menuButton.leftText:SetPoint ("left", menuButton.leftIcon, "right", 3, 0+height_mod)
Tercio@11	725
Tercio@11	726 else
Tercio@11	727 menuButton.leftText:SetText ("")
Tercio@11	728 end
Tercio@11	729
Tercio@11	730 if (rightTextTable) then
Tercio@11	731 menuButton.rightText:SetText (rightTextTable [1])
Tercio@11	732
Tercio@11	733 local r, g, b, a = rightTextTable [2], rightTextTable [3], rightTextTable [4], rightTextTable [5]
Tercio@11	734
Tercio@11	735 if (r == 0 and g == 0 and b == 0 and a == 0) then
Tercio@11	736
Tercio@11	737 if (CoolTip.OptionsTable.TextColorRight) then
Tercio@11	738 r, g, b, a = DF:ParseColors (CoolTip.OptionsTable.TextColorRight)
Tercio@11	739 menuButton.rightText:SetTextColor (r, g, b, a)
Tercio@11	740 elseif (CoolTip.OptionsTable.TextColor) then
Tercio@11	741 r, g, b, a = DF:ParseColors (CoolTip.OptionsTable.TextColor)
Tercio@11	742 menuButton.rightText:SetTextColor (r, g, b, a)
Tercio@11	743 else
Tercio@11	744 menuButton.rightText:SetTextColor (1, 1, 1, 1)
Tercio@11	745 end
Tercio@11	746 else
Tercio@11	747 menuButton.rightText:SetTextColor (r, g, b, a)
Tercio@11	748 end
Tercio@11	749
Tercio@11	750 if (CoolTip.OptionsTable.TextSize and not rightTextTable [6]) then
Tercio@11	751 DF:SetFontSize (menuButton.rightText, CoolTip.OptionsTable.TextSize)
Tercio@11	752 end
Tercio@11	753
Tercio@11	754 if (CoolTip.OptionsTable.RightTextWidth) then
Tercio@11	755 menuButton.rightText:SetWidth (CoolTip.OptionsTable.RightTextWidth)
Tercio@11	756 else
Tercio@11	757 menuButton.rightText:SetWidth (0)
Tercio@11	758 end
Tercio@11	759
Tercio@11	760 if (CoolTip.OptionsTable.RightTextHeight) then
Tercio@11	761 menuButton.rightText:SetHeight (CoolTip.OptionsTable.RightTextHeight)
Tercio@11	762 else
Tercio@11	763 menuButton.rightText:SetHeight (0)
Tercio@11	764 end
Tercio@11	765
Tercio@11	766 if (CoolTip.OptionsTable.TextFont and not rightTextTable [7]) then
Tercio@11	767 if (_G [CoolTip.OptionsTable.TextFont]) then
Tercio@11	768 menuButton.rightText:SetFontObject (CoolTip.OptionsTable.TextFont)
Tercio@11	769 else
Tercio@11	770 local font = SharedMedia:Fetch ("font", CoolTip.OptionsTable.TextFont)
Tercio@11	771 local _, size, flags = menuButton.rightText:GetFont()
Tercio@11	772 flags = rightTextTable [8] or CoolTip.OptionsTable.TextShadow or nil
Tercio@11	773 size = rightTextTable [6] or CoolTip.OptionsTable.TextSize or size
Tercio@11	774 menuButton.rightText:SetFont (font, size, flags)
Tercio@11	775 end
Tercio@11	776
Tercio@11	777 elseif (rightTextTable [7]) then
Tercio@11	778 if (_G [rightTextTable [7]]) then
Tercio@11	779 menuButton.rightText:SetFontObject (rightTextTable [7])
Tercio@11	780 local face, size, flags = menuButton.rightText:GetFont()
Tercio@11	781 flags = rightTextTable [8] or CoolTip.OptionsTable.TextShadow or nil
Tercio@11	782 size = rightTextTable [6] or CoolTip.OptionsTable.TextSize or size
Tercio@11	783 menuButton.rightText:SetFont (face, size, flags)
Tercio@11	784 else
Tercio@11	785 local font = SharedMedia:Fetch ("font", rightTextTable [7])
Tercio@11	786 local face, size, flags = menuButton.rightText:GetFont()
Tercio@11	787 flags = rightTextTable [8] or CoolTip.OptionsTable.TextShadow or nil
Tercio@11	788 size = rightTextTable [6] or CoolTip.OptionsTable.TextSize or size
Tercio@11	789 menuButton.rightText:SetFont (face, size, flags)
Tercio@11	790 end
Tercio@11	791
Tercio@11	792 else
Tercio@11	793 menuButton.rightText:SetFont (CoolTip._default_font, rightTextTable [6] or CoolTip.OptionsTable.TextSize or 10, rightTextTable [8] or CoolTip.OptionsTable.TextShadow)
Tercio@11	794 end
Tercio@11	795
Tercio@11	796
Tercio@11	797 else
Tercio@11	798 menuButton.rightText:SetText ("")
Tercio@11	799 end
Tercio@11	800
Tercio@11	801 --> left icon
Tercio@11	802 if (leftIconTable and leftIconTable [1]) then
Tercio@11	803 menuButton.leftIcon:SetTexture (leftIconTable [1])
Tercio@11	804 menuButton.leftIcon:SetWidth (leftIconTable [2])
Tercio@11	805 menuButton.leftIcon:SetHeight (leftIconTable [3])
Tercio@11	806 menuButton.leftIcon:SetTexCoord (leftIconTable [4], leftIconTable [5], leftIconTable [6], leftIconTable [7])
Tercio@11	807
Tercio@11	808 local ColorR, ColorG, ColorB, ColorA = DF:ParseColors (leftIconTable [8])
Tercio@11	809 menuButton.leftIcon:SetVertexColor (ColorR, ColorG, ColorB, ColorA)
Tercio@11	810
Tercio@11	811 if (CoolTip.OptionsTable.IconBlendMode) then
Tercio@11	812 menuButton.leftIcon:SetBlendMode (CoolTip.OptionsTable.IconBlendMode)
Tercio@11	813 else
Tercio@11	814 menuButton.leftIcon:SetBlendMode ("BLEND")
Tercio@11	815 end
Tercio@11	816
Tercio@11	817 menuButton.leftIcon:SetDesaturated (leftIconTable [9])
Tercio@11	818 else
Tercio@11	819 menuButton.leftIcon:SetTexture (nil)
Tercio@11	820 menuButton.leftIcon:SetWidth (1)
Tercio@11	821 menuButton.leftIcon:SetHeight (1)
Tercio@11	822 end
Tercio@11	823
Tercio@11	824 --> right icon
Tercio@11	825 if (rightIconTable and rightIconTable [1]) then
Tercio@11	826 menuButton.rightIcon:SetTexture (rightIconTable [1])
Tercio@11	827 menuButton.rightIcon:SetWidth (rightIconTable [2])
Tercio@11	828 menuButton.rightIcon:SetHeight (rightIconTable [3])
Tercio@11	829 menuButton.rightIcon:SetTexCoord (rightIconTable [4], rightIconTable [5], rightIconTable [6], rightIconTable [7])
Tercio@11	830
Tercio@11	831 local ColorR, ColorG, ColorB, ColorA = DF:ParseColors (rightIconTable [8])
Tercio@11	832 menuButton.rightIcon:SetVertexColor (ColorR, ColorG, ColorB, ColorA)
Tercio@11	833
Tercio@11	834 if (CoolTip.OptionsTable.IconBlendMode) then
Tercio@11	835 menuButton.rightIcon:SetBlendMode (CoolTip.OptionsTable.IconBlendMode)
Tercio@11	836 else
Tercio@11	837 menuButton.rightIcon:SetBlendMode ("BLEND")
Tercio@11	838 end
Tercio@11	839
Tercio@11	840 menuButton.rightIcon:SetDesaturated (rightIconTable [9])
Tercio@11	841 else
Tercio@11	842 menuButton.rightIcon:SetTexture (nil)
Tercio@11	843 menuButton.rightIcon:SetWidth (1)
Tercio@11	844 menuButton.rightIcon:SetHeight (1)
Tercio@11	845 end
Tercio@11	846
Tercio@11	847 --> overwrite icon size
Tercio@11	848 if (CoolTip.OptionsTable.IconSize) then
Tercio@11	849 menuButton.leftIcon:SetWidth (CoolTip.OptionsTable.IconSize)
Tercio@11	850 menuButton.leftIcon:SetHeight (CoolTip.OptionsTable.IconSize)
Tercio@11	851 menuButton.rightIcon:SetWidth (CoolTip.OptionsTable.IconSize)
Tercio@11	852 menuButton.rightIcon:SetHeight (CoolTip.OptionsTable.IconSize)
Tercio@11	853 end
Tercio@11	854
Tercio@11	855 if (CoolTip.Type == 2) then
Tercio@11	856 CoolTip:LeftTextSpace (menuButton)
Tercio@11	857 end
Tercio@11	858
Tercio@11	859 --> string length
Tercio@11	860 if (not isSub) then --> main frame
Tercio@11	861 if (not CoolTip.OptionsTable.FixedWidth) then
Tercio@11	862 if (CoolTip.Type == 1 or CoolTip.Type == 2) then
Tercio@11	863 local stringWidth = menuButton.leftText:GetStringWidth() + menuButton.rightText:GetStringWidth() + menuButton.leftIcon:GetWidth() + menuButton.rightIcon:GetWidth() + 10
Tercio@11	864 if (stringWidth > frame.w) then
Tercio@11	865 frame.w = stringWidth
Tercio@11	866 end
Tercio@11	867 end
Tercio@11	868 else
Tercio@11	869 menuButton.leftText:SetWidth (CoolTip.OptionsTable.FixedWidth - menuButton.leftIcon:GetWidth() - menuButton.rightText:GetStringWidth() - menuButton.rightIcon:GetWidth() - 30)
Tercio@11	870 end
Tercio@11	871 else
Tercio@11	872 if (not CoolTip.OptionsTable.FixedWidthSub) then
Tercio@11	873 if (CoolTip.Type == 1 or CoolTip.Type == 2) then
Tercio@11	874 local stringWidth = menuButton.leftText:GetStringWidth() + menuButton.rightText:GetStringWidth() + menuButton.leftIcon:GetWidth() + menuButton.rightIcon:GetWidth()
Tercio@11	875 if (stringWidth > frame.w) then
Tercio@11	876 frame.w = stringWidth
Tercio@11	877 end
Tercio@11	878 end
Tercio@11	879 else
Tercio@11	880 menuButton.leftText:SetWidth (CoolTip.OptionsTable.FixedWidthSub - menuButton.leftIcon:GetWidth() - 20)
Tercio@11	881 end
Tercio@11	882 end
Tercio@11	883
Tercio@11	884 local height = _math_max ( menuButton.leftIcon:GetHeight(), menuButton.rightIcon:GetHeight(), menuButton.leftText:GetStringHeight(), menuButton.rightText:GetStringHeight() )
Tercio@11	885 if (height > frame.hHeight) then
Tercio@11	886 frame.hHeight = height
Tercio@11	887 end
Tercio@11	888
Tercio@11	889 end
Tercio@11	890
Tercio@11	891 function CoolTip:RefreshSpark (menuButton)
Tercio@11	892 menuButton.spark:ClearAllPoints()
Tercio@11	893 menuButton.spark:SetPoint ("LEFT", menuButton.statusbar, "LEFT", (menuButton.statusbar:GetValue() * (menuButton.statusbar:GetWidth() / 100)) - 3, 0)
Tercio@11	894 menuButton.spark2:ClearAllPoints()
Tercio@11	895 menuButton.spark2:SetPoint ("left", menuButton.statusbar, "left", menuButton.statusbar:GetValue() * (menuButton.statusbar:GetWidth()/100) - 16, 0)
Tercio@11	896 end
Tercio@11	897
Tercio@11	898 function CoolTip:StatusBar (menuButton, StatusBar)
Tercioo@29	899
Tercio@11	900 if (StatusBar) then
Tercio@11	901
Tercio@11	902 menuButton.statusbar:SetValue (StatusBar [1])
Tercio@11	903 menuButton.statusbar:SetStatusBarColor (StatusBar [2], StatusBar [3], StatusBar [4], StatusBar [5])
Tercio@11	904 menuButton.statusbar:SetHeight (20 + (CoolTip.OptionsTable.StatusBarHeightMod or 0))
Tercio@11	905
Tercio@11	906 menuButton.spark2:Hide()
Tercio@11	907 if (StatusBar [6]) then
Tercio@11	908 menuButton.spark:Show()
Tercio@11	909 --menuButton.spark:ClearAllPoints()
Tercio@11	910 --menuButton.spark:SetPoint ("LEFT", menuButton.statusbar, "LEFT", (StatusBar [1] * (menuButton.statusbar:GetWidth() / 100)) - 3, 0)
Tercio@11	911 else
Tercio@11	912 menuButton.spark:Hide()
Tercio@11	913 end
Tercio@11	914
Tercio@11	915 if (StatusBar [7]) then
Tercio@11	916 menuButton.statusbar2:SetValue (StatusBar[7].value)
Tercio@11	917 menuButton.statusbar2.texture:SetTexture (StatusBar[7].texture or [[Interface\RaidFrame\Raid-Bar-Hp-Fill]])
Tercio@11	918 if (StatusBar[7].specialSpark) then
Tercio@11	919 menuButton.spark2:Show()
Tercio@11	920 end
Tercio@11	921 if (StatusBar[7].color) then
Tercio@11	922 local ColorR, ColorG, ColorB, ColorA = DF:ParseColors (StatusBar[7].color)
Tercio@11	923 menuButton.statusbar2:SetStatusBarColor (ColorR, ColorG, ColorB, ColorA)
Tercio@11	924 else
Tercio@11	925 menuButton.statusbar2:SetStatusBarColor (1, 1, 1, 1)
Tercio@11	926 end
Tercio@11	927 else
Tercio@11	928 menuButton.statusbar2:SetValue (0)
Tercio@11	929 menuButton.spark2:Hide()
Tercio@11	930 end
Tercio@11	931
Tercioo@29	932 if (StatusBar [8]) then
Tercioo@29	933 local texture = SharedMedia:Fetch ("statusbar", StatusBar [8], true)
Tercioo@29	934 if (texture) then
Tercioo@29	935 menuButton.statusbar.texture:SetTexture (texture)
Tercioo@29	936 else
Tercioo@29	937 menuButton.statusbar.texture:SetTexture (StatusBar [8])
Tercioo@29	938 end
Tercioo@29	939 elseif (CoolTip.OptionsTable.StatusBarTexture) then
Tercioo@29	940 local texture = SharedMedia:Fetch ("statusbar", CoolTip.OptionsTable.StatusBarTexture, true)
Tercioo@29	941 if (texture) then
Tercioo@29	942 menuButton.statusbar.texture:SetTexture (texture)
Tercioo@29	943 else
Tercioo@29	944 menuButton.statusbar.texture:SetTexture (CoolTip.OptionsTable.StatusBarTexture)
Tercioo@29	945 end
Tercioo@29	946 else
Tercioo@29	947 menuButton.statusbar.texture:SetTexture ("Interface\\PaperDollInfoFrame\\UI-Character-Skills-Bar")
Tercioo@29	948 end
Tercioo@29	949
Tercioo@29	950 --[[
Tercio@11	951 if (CoolTip.OptionsTable.StatusBarTexture) then
Tercio@11	952 menuButton.statusbar.texture:SetTexture (CoolTip.OptionsTable.StatusBarTexture)
Tercio@11	953 else
Tercio@11	954 menuButton.statusbar.texture:SetTexture ("Interface\\PaperDollInfoFrame\\UI-Character-Skills-Bar")
Tercio@11	955 end
Tercioo@29	956 --]]
Tercio@11	957 else
Tercio@11	958 menuButton.statusbar:SetValue (0)
Tercio@11	959 menuButton.statusbar2:SetValue (0)
Tercio@11	960 menuButton.spark:Hide()
Tercio@11	961 menuButton.spark2:Hide()
Tercio@11	962 end
Tercioo@29	963
Tercio@11	964 if (CoolTip.OptionsTable.LeftBorderSize) then
Tercio@11	965 menuButton.statusbar:SetPoint ("left", menuButton, "left", 10 + CoolTip.OptionsTable.LeftBorderSize, 0)
Tercio@11	966 else
Tercio@11	967 menuButton.statusbar:SetPoint ("left", menuButton, "left", 10, 0)
Tercio@11	968 end
Tercio@11	969
Tercio@11	970 if (CoolTip.OptionsTable.RightBorderSize) then
Tercio@11	971 menuButton.statusbar:SetPoint ("right", menuButton, "right", CoolTip.OptionsTable.RightBorderSize + (- 10), 0)
Tercio@11	972 else
Tercio@11	973 menuButton.statusbar:SetPoint ("right", menuButton, "right", -10, 0)
Tercio@11	974 end
Tercio@11	975 end
Tercio@11	976
Tercio@11	977 function CoolTip:SetupMainButton (menuButton, index)
Tercio@11	978 menuButton.index = index
Tercio@11	979
Tercio@11	980 --> setup texts and icons
Tercio@11	981 CoolTip:TextAndIcon (index, frame1, menuButton, CoolTip.LeftTextTable [index], CoolTip.RightTextTable [index], CoolTip.LeftIconTable [index], CoolTip.RightIconTable [index])
Tercio@11	982 --> setup statusbar
Tercio@11	983 CoolTip:StatusBar (menuButton, CoolTip.StatusBarTable [index])
Tercio@11	984
Tercio@11	985 --> click
Tercio@11	986 menuButton:RegisterForClicks ("LeftButtonDown")
Tercio@11	987
Tercio@11	988 --> string length
Tercio@11	989 if (not CoolTip.OptionsTable.FixedWidth) then
Tercio@11	990 local stringWidth = menuButton.leftText:GetStringWidth() + menuButton.rightText:GetStringWidth() + menuButton.leftIcon:GetWidth() + menuButton.rightIcon:GetWidth()
Tercio@11	991 if (stringWidth > frame1.w) then
Tercio@11	992 frame1.w = stringWidth
Tercio@11	993 end
Tercio@11	994 end
Tercio@11	995
Tercio@11	996 --> register click function
Tercio@11	997 menuButton:SetScript ("OnClick", OnClickFunctionButtonPrincipal)
Tercio@11	998 menuButton:Show()
Tercio@11	999 end
Tercio@11	1000
Tercio@11	1001 function CoolTip:SetupSecondaryButton (menuButton, index, mainMenuIndex)
Tercio@11	1002
Tercio@11	1003 menuButton.index = index
Tercio@11	1004 menuButton.mainIndex = mainMenuIndex
Tercio@11	1005
Tercio@11	1006 --> setup texts and icons
Tercio@11	1007 CoolTip:TextAndIcon (index, frame2, menuButton, CoolTip.LeftTextTableSub [mainMenuIndex] and CoolTip.LeftTextTableSub [mainMenuIndex] [index],
Tercio@11	1008 CoolTip.RightTextTableSub [mainMenuIndex] and CoolTip.RightTextTableSub [mainMenuIndex] [index],
Tercio@11	1009 CoolTip.LeftIconTableSub [mainMenuIndex] and CoolTip.LeftIconTableSub [mainMenuIndex] [index],
Tercio@11	1010 CoolTip.RightIconTableSub [mainMenuIndex] and CoolTip.RightIconTableSub [mainMenuIndex] [index], true)
Tercio@11	1011 --> setup statusbar
Tercio@11	1012 CoolTip:StatusBar (menuButton, CoolTip.StatusBarTableSub [mainMenuIndex] and CoolTip.StatusBarTableSub [mainMenuIndex] [index])
Tercio@11	1013
Tercio@11	1014
Tercio@11	1015 --> click
Tercio@11	1016 menuButton:RegisterForClicks ("LeftButtonDown")
Tercio@11	1017
Tercio@11	1018 menuButton:ClearAllPoints()
Tercio@11	1019 menuButton:SetPoint ("center", frame2, "center")
Tercio@11	1020 menuButton:SetPoint ("top", frame2, "top", 0, (((index-1)20)-1)-3)
Tercio@11	1021 menuButton:SetPoint ("left", frame2, "left")
Tercio@11	1022 menuButton:SetPoint ("right", frame2, "right")
Tercio@11	1023
Tercio@26	1024 DF:FadeFrame (menuButton, 0)
Tercio@11	1025
Tercio@11	1026 --> string length
Tercio@11	1027 local stringWidth = menuButton.leftText:GetStringWidth() + menuButton.rightText:GetStringWidth() + menuButton.leftIcon:GetWidth() + menuButton.rightIcon:GetWidth()
Tercio@11	1028 if (stringWidth > frame2.w) then
Tercio@11	1029 frame2.w = stringWidth
Tercio@11	1030 end
Tercio@11	1031
Tercio@11	1032 menuButton:SetScript ("OnClick", OnClickFunctionButtonSecundario)
Tercio@11	1033 menuButton:Show()
Tercio@11	1034
Tercio@11	1035 return true
Tercio@11	1036 end
Tercio@11	1037
Tercio@11	1038 -- -- --------------------------------------------------------------------------------------------------------------
Tercio@11	1039
Tercio@11	1040 function CoolTip:SetupWallpaper (wallpaperTable, wallpaper)
Tercio@11	1041 local texture = wallpaperTable [1]
Tercio@11	1042 if (DF:IsHtmlColor (texture) or type (texture) == "table") then
Tercio@11	1043 local r, g, b, a = DF:ParseColors (texture)
Tercio@11	1044 wallpaper:SetTexture (r, g, b, a)
Tercio@11	1045 else
Tercio@11	1046 wallpaper:SetTexture (texture)
Tercio@11	1047 end
Tercio@11	1048
Tercio@11	1049 wallpaper:SetTexCoord (wallpaperTable[2], wallpaperTable[3], wallpaperTable[4], wallpaperTable[5])
Tercio@11	1050
Tercio@11	1051 local color = wallpaperTable[6]
Tercio@11	1052 if (color) then
Tercio@11	1053 local r, g, b, a = DF:ParseColors (color)
Tercio@11	1054 wallpaper:SetVertexColor (r, g, b, a)
Tercio@11	1055 else
Tercio@11	1056 wallpaper:SetVertexColor (1, 1, 1, 1)
Tercio@11	1057 end
Tercio@11	1058
Tercio@11	1059 if (wallpaperTable[7]) then
Tercio@11	1060 wallpaper:SetDesaturated (true)
Tercio@11	1061 else
Tercio@11	1062 wallpaper:SetDesaturated (false)
Tercio@11	1063 end
Tercio@11	1064
Tercio@11	1065 wallpaper:Show()
Tercio@11	1066 end
Tercio@11	1067
Tercio@11	1068 -- -- --------------------------------------------------------------------------------------------------------------
Tercio@11	1069
Tercio@11	1070 function CoolTip:ShowSub (index)
Tercio@11	1071
Tercio@11	1072 if (CoolTip.OptionsTable.IgnoreSubMenu) then
Tercio@26	1073 DF:FadeFrame (frame2, 1)
Tercio@11	1074 return
Tercio@11	1075 end
Tercio@11	1076
Tercio@11	1077 frame2:SetHeight (6)
Tercio@11	1078
Tercio@11	1079 local amtIndexes = CoolTip.IndexesSub [index]
Tercio@11	1080 if (not amtIndexes) then
Tercio@11	1081 --print ("Sub menu called but sub menu indexes is nil")
Tercio@11	1082 return
Tercio@11	1083 end
Tercio@11	1084
Tercio@11	1085 if (CoolTip.OptionsTable.FixedWidthSub) then
Tercio@11	1086 frame2:SetWidth (CoolTip.OptionsTable.FixedWidthSub)
Tercio@11	1087 end
Tercio@11	1088
Tercio@11	1089 frame2.h = CoolTip.IndexesSub [index] * 20
Tercio@11	1090 frame2.hHeight = 0
Tercio@11	1091 frame2.w = 0
Tercio@11	1092
Tercio@11	1093 --> pegar a fontsize da label principal
Tercio@11	1094 local mainButton = frame1.Lines [index]
Tercio@11	1095 local fontSize = DF:GetFontSize (mainButton.leftText)
Tercio@11	1096
Tercio@11	1097 local GotChecked = false
Tercio@11	1098
Tercio@11	1099 local IsTooltip = CoolTip.OptionsTable.SubMenuIsTooltip
Tercio@11	1100 if (IsTooltip) then
Tercio@11	1101 frame2:EnableMouse (false)
Tercio@11	1102 else
Tercio@11	1103 frame2:EnableMouse (true)
Tercio@11	1104 end
Tercio@11	1105
Tercio@11	1106 for i = 1, CoolTip.IndexesSub [index] do
Tercio@11	1107
Tercio@11	1108 local button = frame2.Lines [i]
Tercio@11	1109
Tercio@11	1110 if (not button) then
Tercio@11	1111 button = CoolTip:NewSecondaryButton (i)
Tercio@11	1112 end
Tercio@11	1113
Tercio@11	1114 local checked = CoolTip:SetupSecondaryButton (button, i, index)
Tercio@11	1115 if (checked) then
Tercio@11	1116 GotChecked = true
Tercio@11	1117 end
Tercio@11	1118
Tercio@11	1119 if (IsTooltip) then
Tercio@11	1120 button:EnableMouse (false)
Tercio@11	1121 else
Tercio@11	1122 button:EnableMouse (true)
Tercio@11	1123 end
Tercio@11	1124 end
Tercio@11	1125
Tercio@11	1126 local selected = CoolTip.SelectedIndexSec [index]
Tercio@11	1127 if (selected) then
Tercio@11	1128
Tercio@11	1129 CoolTip:SetSelectedAnchor (frame2, frame2.Lines [selected])
Tercio@11	1130
Tercio@11	1131 if (not CoolTip.OptionsTable.NoLastSelectedBar) then
Tercio@11	1132 CoolTip:ShowSelectedTexture (frame2)
Tercio@11	1133 end
Tercio@11	1134 else
Tercio@11	1135 CoolTip:HideSelectedTexture (frame2)
Tercio@11	1136 end
Tercio@11	1137
Tercio@11	1138 for i = CoolTip.IndexesSub [index] + 1, #frame2.Lines do
Tercio@26	1139 DF:FadeFrame (frame2.Lines[i], 1)
Tercio@11	1140 end
Tercio@11	1141
Tercio@11	1142 local spacing = 0
Tercio@11	1143 if (CoolTip.OptionsTable.YSpacingModSub) then
Tercio@11	1144 spacing = CoolTip.OptionsTable.YSpacingModSub
Tercio@11	1145 end
Tercio@11	1146
Tercio@11	1147 --> normalize height of all rows
Tercio@11	1148 for i = 1, CoolTip.IndexesSub [index] do
Tercio@11	1149
Tercio@11	1150 local menuButton = frame2.Lines [i]
Tercio@11	1151
Tercio@11	1152 -- CoolTipFrame2.Lines [2].divbar
Tercio@11	1153
Tercio@11	1154 if (menuButton.leftText:GetText() == "$div") then
Tercio@11	1155
Tercio@11	1156 --> height
Tercio@11	1157 menuButton:SetHeight (4)
Tercio@11	1158
Tercio@11	1159 --> points
Tercio@11	1160 menuButton:ClearAllPoints()
Tercio@11	1161
Tercio@11	1162 menuButton:SetPoint ("center", frame2, "center")
Tercio@11	1163 menuButton:SetPoint ("left", frame2, "left")
Tercio@11	1164 menuButton:SetPoint ("right", frame2, "right")
Tercio@11	1165
Tercio@11	1166 menuButton.rightText:SetText ("")
Tercio@11	1167
Tercio@11	1168 local div_size_up = tonumber (CoolTip.RightTextTableSub [index] [i] [2])
Tercio@11	1169 if (not div_size_up) then
Tercio@11	1170 div_size_up = 0
Tercio@11	1171 end
Tercio@11	1172 local div_size_down = tonumber (CoolTip.RightTextTableSub [index] [i] [3])
Tercio@11	1173 if (not div_size_down) then
Tercio@11	1174 div_size_down = 0
Tercio@11	1175 end
Tercio@11	1176
Tercio@11	1177 menuButton:SetPoint ("top", frame2, "top", 0, ( ( (i-1) * frame2.hHeight) * -1) - 4 + (CoolTip.OptionsTable.ButtonsYModSub or 0) + spacing + (2 + (div_size_up or 0)))
Tercio@11	1178
Tercio@11	1179 if (CoolTip.OptionsTable.YSpacingModSub) then
Tercio@11	1180 spacing = spacing + CoolTip.OptionsTable.YSpacingModSub
Tercio@11	1181 end
Tercio@11	1182
Tercio@11	1183 spacing = spacing + 17 + (div_size_down or 0)
Tercio@11	1184
Tercio@11	1185 menuButton.leftText:SetText ("")
Tercio@11	1186 menuButton.isDiv = true
Tercio@11	1187
Tercio@11	1188 if (not menuButton.divbar) then
Tercio@11	1189 CoolTip:CreateDivBar (menuButton)
Tercio@11	1190 else
Tercio@11	1191 menuButton.divbar:Show()
Tercio@11	1192 end
Tercio@11	1193
Tercio@11	1194 menuButton.divbar:SetPoint ("left", menuButton, "left", frame1:GetWidth()*0.10, 0)
Tercio@11	1195 menuButton.divbar:SetPoint ("right", menuButton, "right", -frame1:GetWidth()*0.10, 0)
Tercio@11	1196
Tercio@11	1197 else
Tercio@11	1198 --> height
Tercio@11	1199 menuButton:SetHeight (frame2.hHeight + (CoolTip.OptionsTable.ButtonHeightModSub or 0))
Tercio@11	1200 --> points
Tercio@11	1201 menuButton:ClearAllPoints()
Tercio@11	1202 menuButton:SetPoint ("center", frame2, "center")
Tercio@11	1203 menuButton:SetPoint ("top", frame2, "top", 0, ( ( (i-1) * frame2.hHeight) * -1) - 4 + (CoolTip.OptionsTable.ButtonsYModSub or 0) + spacing)
Tercio@11	1204 if (CoolTip.OptionsTable.YSpacingModSub) then
Tercio@11	1205 spacing = spacing + CoolTip.OptionsTable.YSpacingModSub
Tercio@11	1206 end
Tercio@11	1207 menuButton:SetPoint ("left", frame2, "left")
Tercio@11	1208 menuButton:SetPoint ("right", frame2, "right")
Tercio@11	1209
Tercio@11	1210 if (menuButton.divbar) then
Tercio@11	1211 menuButton.divbar:Hide()
Tercio@11	1212 menuButton.isDiv = false
Tercio@11	1213 end
Tercio@11	1214 end
Tercio@11	1215
Tercio@11	1216 end
Tercio@11	1217
Tercio@11	1218 local mod = CoolTip.OptionsTable.HeighModSub or 0
Tercio@11	1219 frame2:SetHeight ( (frame2.hHeight * CoolTip.IndexesSub [index]) + 12 + (-spacing) + mod)
Tercio@11	1220
Tercio@11	1221 if (CoolTip.TopIconTableSub [index]) then
Tercio@11	1222 local upperImageTable = CoolTip.TopIconTableSub [index]
Tercio@11	1223 frame2.upperImage:SetTexture (upperImageTable [1])
Tercio@11	1224 frame2.upperImage:SetWidth (upperImageTable [2])
Tercio@11	1225 frame2.upperImage:SetHeight (upperImageTable [3])
Tercio@11	1226 frame2.upperImage:SetTexCoord (upperImageTable[4], upperImageTable[5], upperImageTable[6], upperImageTable[7])
Tercio@11	1227 frame2.upperImage:Show()
Tercio@11	1228 else
Tercio@11	1229 frame2.upperImage:Hide()
Tercio@11	1230 end
Tercio@11	1231
Tercio@11	1232 if (CoolTip.WallpaperTableSub [index]) then
Tercio@11	1233 CoolTip:SetupWallpaper (CoolTip.WallpaperTableSub [index], frame2.frameWallpaper)
Tercio@11	1234 else
Tercio@11	1235 frame2.frameWallpaper:Hide()
Tercio@11	1236 end
Tercio@11	1237
Tercio@11	1238 if (not CoolTip.OptionsTable.FixedWidthSub) then
Tercio@11	1239 frame2:SetWidth (frame2.w + 44)
Tercio@11	1240 end
Tercio@11	1241
Tercio@26	1242 DF:FadeFrame (frame2, 0)
Tercio@11	1243
Tercio@11	1244 CoolTip:CheckOverlap()
Tercio@11	1245
Tercio@11	1246 if (CoolTip.OptionsTable.SubFollowButton and not CoolTip.frame2_leftside) then
Tercio@11	1247
Tercio@11	1248 local button = frame1.Lines [index]
Tercio@11	1249
Tercio@11	1250 frame2:ClearAllPoints()
Tercio@11	1251 frame2:SetPoint ("left", button, "right")
Tercio@11	1252
Tercio@11	1253 elseif (CoolTip.OptionsTable.SubFollowButton and CoolTip.frame2_leftside) then
Tercio@11	1254
Tercio@11	1255 local button = frame1.Lines [index]
Tercio@11	1256
Tercio@11	1257 frame2:ClearAllPoints()
Tercio@11	1258 frame2:SetPoint ("right", button, "left")
Tercio@11	1259
Tercio@11	1260 elseif (CoolTip.frame2_leftside) then
Tercio@11	1261 frame2:ClearAllPoints()
Tercio@11	1262 frame2:SetPoint ("bottomright", frame1, "bottomleft")
Tercio@11	1263 else
Tercio@11	1264 frame2:ClearAllPoints()
Tercio@11	1265 frame2:SetPoint ("bottomleft", frame1, "bottomright")
Tercio@11	1266 end
Tercio@11	1267
Tercio@11	1268 end
Tercio@11	1269
Tercio@11	1270 function CoolTip:HideSub()
Tercio@26	1271 DF:FadeFrame (frame2, 1)
Tercio@11	1272 end
Tercio@11	1273
Tercio@11	1274
Tercio@11	1275 function CoolTip:LeftTextSpace (row)
Tercio@11	1276 row.leftText:SetWidth (row:GetWidth() - 30 - row.leftIcon:GetWidth() - row.rightIcon:GetWidth() - row.rightText:GetStringWidth())
Tercio@11	1277 row.leftText:SetHeight (10)
Tercio@11	1278 end
Tercio@11	1279
Tercio@26	1280 --> ~inicio ~start ~tooltip
Tercio@11	1281 function CoolTip:monta_tooltip()
Tercio@11	1282
Tercio@11	1283 --> hide sub frame
Tercio@26	1284 DF:FadeFrame (frame2, 1)
Tercio@11	1285 --> hide select bar
Tercio@11	1286 CoolTip:HideSelectedTexture (frame1)
Tercio@11	1287
Tercio@11	1288 frame1:EnableMouse (false)
Tercio@11	1289
Tercio@11	1290 --> elevator
Tercio@11	1291 local yDown = 5
Tercio@11	1292 --> width
Tercio@11	1293 if (CoolTip.OptionsTable.FixedWidth) then
Tercio@11	1294 frame1:SetWidth (CoolTip.OptionsTable.FixedWidth)
Tercio@11	1295 end
Tercio@11	1296
Tercio@11	1297 frame1.w = CoolTip.OptionsTable.FixedWidth or 0
Tercio@11	1298 frame1.hHeight = 0
Tercio@11	1299 frame2.hHeight = 0
Tercio@11	1300
Tercio@11	1301 CoolTip.active = true
Tercio@11	1302
Tercio@11	1303 for i = 1, CoolTip.Indexes do
Tercio@11	1304
Tercio@11	1305 local button = frame1.Lines [i]
Tercio@11	1306 if (not button) then
Tercio@11	1307 button = CoolTip:NewMainButton (i)
Tercio@11	1308 end
Tercio@11	1309
Tercio@11	1310 button.index = i
Tercio@11	1311
Tercio@11	1312 --> basic stuff
Tercio@11	1313 button:Show()
Tercio@11	1314 button.background:Hide()
Tercio@11	1315 button:SetHeight (CoolTip.OptionsTable.ButtonHeightMod or CoolTip.default_height)
Tercio@11	1316 button:RegisterForClicks()
Tercio@11	1317
Tercio@11	1318 --> setup texts and icons
Tercio@11	1319 CoolTip:TextAndIcon (i, frame1, button, CoolTip.LeftTextTable [i], CoolTip.RightTextTable [i], CoolTip.LeftIconTable [i], CoolTip.RightIconTable [i])
Tercio@11	1320 --> setup statusbar
Tercio@11	1321 CoolTip:StatusBar (button, CoolTip.StatusBarTable [i])
Tercio@11	1322 end
Tercio@11	1323
Tercio@11	1324 --> hide unused lines
Tercio@11	1325 for i = CoolTip.Indexes+1, #frame1.Lines do
Tercio@11	1326 frame1.Lines[i]:Hide()
Tercio@11	1327 end
Tercio@11	1328 CoolTip.NumLines = CoolTip.Indexes
Tercio@11	1329
Tercio@11	1330 local spacing = 0
Tercio@11	1331 if (CoolTip.OptionsTable.YSpacingMod) then
Tercio@11	1332 spacing = CoolTip.OptionsTable.YSpacingMod
Tercio@11	1333 end
Tercio@11	1334
Tercio@11	1335 --> normalize height of all rows
Tercio@11	1336 local temp = -6 + spacing + (CoolTip.OptionsTable.ButtonsYMod or 0)
Tercio@11	1337 for i = 1, CoolTip.Indexes do
Tercio@11	1338 local menuButton = frame1.Lines [i]
Tercio@11	1339
Tercio@11	1340 menuButton:ClearAllPoints()
Tercio@11	1341 menuButton:SetPoint ("center", frame1, "center")
Tercio@11	1342 menuButton:SetPoint ("left", frame1, "left")
Tercio@11	1343 menuButton:SetPoint ("right", frame1, "right")
Tercio@11	1344
Tercio@11	1345 --> height
Tercio@11	1346 if (CoolTip.OptionsTable.AlignAsBlizzTooltip) then
Tercio@11	1347 local height = _math_max (8, menuButton.leftText:GetStringHeight(), menuButton.rightText:GetStringHeight(), menuButton.leftIcon:GetHeight(), menuButton.rightIcon:GetHeight())
Tercio@11	1348 menuButton:SetHeight (height)
Tercio@11	1349 menuButton:SetPoint ("top", frame1, "top", 0, temp)
Tercio@11	1350 temp = temp + ( height * -1)
Tercio@11	1351
Tercio@11	1352 elseif (CoolTip.OptionsTable.IgnoreButtonAutoHeight) then
Tercio@11	1353
Tercio@11	1354 local height = _math_max (menuButton.leftText:GetStringHeight(), menuButton.rightText:GetStringHeight(), menuButton.leftIcon:GetHeight(), menuButton.rightIcon:GetHeight())
Tercio@11	1355 menuButton:SetHeight (height)
Tercio@11	1356 menuButton:SetPoint ("top", frame1, "top", 0, temp)
Tercio@11	1357
Tercio@11	1358 temp = temp + ( height * -1) + spacing + (CoolTip.OptionsTable.ButtonsYMod or 0)
Tercio@11	1359
Tercio@11	1360 else
Tercio@11	1361 menuButton:SetHeight (frame1.hHeight + (CoolTip.OptionsTable.ButtonHeightMod or 0))
Tercio@11	1362 menuButton:SetPoint ("top", frame1, "top", 0, ( ( (i-1) * frame1.hHeight) * -1) - 6 + (CoolTip.OptionsTable.ButtonsYMod or 0) + spacing)
Tercio@11	1363 end
Tercio@11	1364
Tercio@11	1365 --> points
Tercio@11	1366
Tercio@11	1367 if (CoolTip.OptionsTable.YSpacingMod and not CoolTip.OptionsTable.IgnoreButtonAutoHeight) then
Tercio@11	1368 spacing = spacing + CoolTip.OptionsTable.YSpacingMod
Tercio@11	1369 end
Tercio@11	1370
Tercio@11	1371 menuButton:EnableMouse (false)
Tercio@11	1372 end
Tercio@11	1373
Tercio@11	1374 if (not CoolTip.OptionsTable.FixedWidth) then
Tercio@11	1375 if (CoolTip.Type == 2) then --> with bars
Tercio@11	1376 if (CoolTip.OptionsTable.MinWidth) then
Tercio@11	1377 local w = frame1.w + 34
Tercio@11	1378 frame1:SetWidth (math.max (w, CoolTip.OptionsTable.MinWidth))
Tercio@11	1379 else
Tercio@11	1380 frame1:SetWidth (frame1.w + 34)
Tercio@11	1381 end
Tercio@11	1382 else
Tercio@11	1383 --> width stability check
Tercio@11	1384 local width = frame1.w + 24
Tercio@11	1385 if (width > CoolTip.LastSize-5 and width < CoolTip.LastSize+5) then
Tercio@11	1386 width = CoolTip.LastSize
Tercio@11	1387 else
Tercio@11	1388 CoolTip.LastSize = width
Tercio@11	1389 end
Tercio@11	1390
Tercio@11	1391 if (CoolTip.OptionsTable.MinWidth) then
Tercio@11	1392 frame1:SetWidth (math.max (width, CoolTip.OptionsTable.MinWidth))
Tercio@11	1393 else
Tercio@11	1394 frame1:SetWidth (width)
Tercio@11	1395 end
Tercio@11	1396 end
Tercio@11	1397 end
Tercio@11	1398
Tercio@11	1399 if (CoolTip.OptionsTable.FixedHeight) then
Tercio@11	1400 frame1:SetHeight (CoolTip.OptionsTable.FixedHeight)
Tercio@11	1401 else
Tercio@11	1402 if (CoolTip.OptionsTable.AlignAsBlizzTooltip) then
Tercio@11	1403 frame1:SetHeight ( (temp-10) * -1)
Tercio@11	1404 elseif (CoolTip.OptionsTable.IgnoreButtonAutoHeight) then
Tercio@11	1405 frame1:SetHeight ( (temp+spacing) * -1)
Tercio@11	1406 else
Tercioo@29	1407 frame1:SetHeight ( _math_max ( (frame1.hHeight * CoolTip.Indexes) + 8 + ((CoolTip.OptionsTable.ButtonsYMod or 0)*-1), 22 ))
Tercio@11	1408 end
Tercio@11	1409 end
Tercio@11	1410
Tercio@11	1411 if (CoolTip.WallpaperTable [1]) then
Tercio@11	1412 CoolTip:SetupWallpaper (CoolTip.WallpaperTable, frame1.frameWallpaper)
Tercio@11	1413 else
Tercio@11	1414 frame1.frameWallpaper:Hide()
Tercio@11	1415 end
Tercio@11	1416
Tercio@11	1417 --> unhide frame
Tercio@26	1418 DF:FadeFrame (frame1, 0)
Tercio@11	1419 CoolTip:SetMyPoint (host)
Tercio@11	1420
Tercio@11	1421 --> fix sparks
Tercio@11	1422 for i = 1, CoolTip.Indexes do
Tercio@11	1423 local menuButton = frame1.Lines [i]
Tercio@11	1424 if (menuButton.spark:IsShown() or menuButton.spark2:IsShown()) then
Tercio@11	1425 CoolTip:RefreshSpark (menuButton)
Tercio@11	1426 end
Tercio@11	1427 end
Tercio@11	1428 end
Tercio@11	1429
Tercio@11	1430 function CoolTip:CreateDivBar (button)
Tercio@11	1431 button.divbar = button:CreateTexture (nil, "overlay")
Tercio@11	1432
Tercio@11	1433 button.divbar:SetTexture ([[Interface\QUESTFRAME\AutoQuest-Parts]])
Tercio@11	1434 button.divbar:SetTexCoord (238/512, 445/512, 0/64, 4/64)
Tercio@11	1435
Tercio@11	1436 button.divbar:SetHeight (3)
Tercio@11	1437 button.divbar:SetAlpha (0.1)
Tercio@11	1438
Tercio@11	1439 button.divbar:SetDesaturated (true)
Tercio@11	1440 end
Tercio@11	1441
Tercio@26	1442 --> ~inicio ~start ~menu
Tercio@11	1443 function CoolTip:monta_cooltip (host, instancia, options, sub_menus, icones, tamanho1, tamanho2, font, fontsize)
Tercio@11	1444
Tercio@11	1445 if (CoolTip.Indexes == 0) then
Tercio@11	1446 CoolTip:Reset()
Tercio@11	1447 CoolTip:SetType ("tooltip")
Tercio@11	1448 CoolTip:AddLine ("There is no options.")
Tercio@11	1449 CoolTip:ShowCooltip()
Tercio@11	1450 return
Tercio@11	1451 end
Tercio@11	1452
Tercio@11	1453 if (CoolTip.OptionsTable.FixedWidth) then
Tercio@11	1454 frame1:SetWidth (CoolTip.OptionsTable.FixedWidth)
Tercio@11	1455 end
Tercio@11	1456
Tercio@11	1457 frame1.w = CoolTip.OptionsTable.FixedWidth or 0
Tercio@11	1458 frame1.hHeight = 0
Tercio@11	1459 frame2.hHeight = 0
Tercio@11	1460
Tercio@11	1461 frame1:EnableMouse (true)
Tercio@11	1462
Tercio@11	1463 if (CoolTip.HaveSubMenu) then --> zera o segundo frame
Tercio@11	1464 frame2.w = 0
Tercio@11	1465 frame2:SetHeight (6)
Tercio@11	1466 if (CoolTip.SelectedIndexMain and CoolTip.IndexesSub [CoolTip.SelectedIndexMain] and CoolTip.IndexesSub [CoolTip.SelectedIndexMain] > 0) then
Tercio@26	1467 DF:FadeFrame (frame2, 0)
Tercio@11	1468 else
Tercio@26	1469 DF:FadeFrame (frame2, 1)
Tercio@11	1470 end
Tercio@11	1471 else
Tercio@26	1472 DF:FadeFrame (frame2, 1)
Tercio@11	1473 end
Tercio@11	1474
Tercio@11	1475 CoolTip.active = true
Tercio@11	1476
Tercio@11	1477 for i = 1, CoolTip.Indexes do
Tercio@11	1478 local menuButton = frame1.Lines [i]
Tercio@11	1479 if (not menuButton) then
Tercio@11	1480 menuButton = CoolTip:NewMainButton (i)
Tercio@11	1481 end
Tercio@11	1482
Tercio@11	1483 CoolTip:SetupMainButton (menuButton, i)
Tercio@11	1484
Tercio@11	1485 menuButton.background:Hide()
Tercio@11	1486 end
Tercio@11	1487
Tercio@11	1488 --> selected texture
Tercio@11	1489 if (CoolTip.SelectedIndexMain) then
Tercio@11	1490 CoolTip:SetSelectedAnchor (frame1, frame1.Lines [CoolTip.SelectedIndexMain])
Tercio@11	1491
Tercio@11	1492 if (CoolTip.OptionsTable.NoLastSelectedBar) then
Tercio@11	1493 CoolTip:HideSelectedTexture (frame1)
Tercio@11	1494 else
Tercio@11	1495 CoolTip:ShowSelectedTexture (frame1)
Tercio@11	1496 end
Tercio@11	1497 else
Tercio@11	1498 CoolTip:HideSelectedTexture (frame1)
Tercio@11	1499 end
Tercio@11	1500
Tercio@11	1501 if (CoolTip.Indexes < #frame1.Lines) then
Tercio@11	1502 for i = CoolTip.Indexes+1, #frame1.Lines do
Tercio@11	1503 frame1.Lines[i]:Hide()
Tercio@11	1504 end
Tercio@11	1505 end
Tercio@11	1506
Tercio@11	1507 CoolTip.NumLines = CoolTip.Indexes
Tercio@11	1508
Tercio@11	1509 local spacing = 0
Tercio@11	1510 if (CoolTip.OptionsTable.YSpacingMod) then
Tercio@11	1511 spacing = CoolTip.OptionsTable.YSpacingMod
Tercio@11	1512 end
Tercio@11	1513
Tercio@11	1514 if (not CoolTip.OptionsTable.FixedWidth) then
Tercio@11	1515 if (CoolTip.OptionsTable.MinWidth) then
Tercio@11	1516 local w = frame1.w + 24
Tercio@11	1517 frame1:SetWidth (math.max (w, CoolTip.OptionsTable.MinWidth))
Tercio@11	1518 else
Tercio@11	1519 frame1:SetWidth (frame1.w + 24)
Tercio@11	1520 end
Tercio@11	1521 end
Tercio@11	1522
Tercio@11	1523 --> normalize height of all rows
Tercio@11	1524 for i = 1, CoolTip.Indexes do
Tercio@11	1525 local menuButton = frame1.Lines [i]
Tercio@11	1526 menuButton:EnableMouse (true)
Tercio@11	1527
Tercio@11	1528 if (menuButton.leftText:GetText() == "$div") then
Tercio@11	1529
Tercio@11	1530 --> height
Tercio@11	1531 menuButton:SetHeight (4)
Tercio@11	1532 --> points
Tercio@11	1533 menuButton:ClearAllPoints()
Tercio@11	1534 menuButton:SetPoint ("left", frame1, "left")
Tercio@11	1535 menuButton:SetPoint ("right", frame1, "right")
Tercio@11	1536 menuButton:SetPoint ("center", frame1, "center")
Tercio@11	1537
Tercio@11	1538 local div_size_up = tonumber (CoolTip.LeftTextTable [i] [2])
Tercio@11	1539 if (not div_size_up) then
Tercio@11	1540 div_size_up = 0
Tercio@11	1541 end
Tercio@11	1542 local div_size_down = tonumber (CoolTip.LeftTextTable [i] [3])
Tercio@11	1543 if (not div_size_down) then
Tercio@11	1544 div_size_down = 0
Tercio@11	1545 end
Tercio@11	1546
Tercio@11	1547 menuButton:SetPoint ("top", frame1, "top", 0, ( ( (i-1) * frame1.hHeight) * -1) - 4 + (CoolTip.OptionsTable.ButtonsYMod or 0) + spacing - 4 + div_size_up)
Tercio@11	1548 if (CoolTip.OptionsTable.YSpacingMod) then
Tercio@11	1549 spacing = spacing + CoolTip.OptionsTable.YSpacingMod
Tercio@11	1550 end
Tercio@11	1551
Tercio@11	1552 spacing = spacing + 4 + div_size_down
Tercio@11	1553
Tercio@11	1554 menuButton.leftText:SetText ("")
Tercio@11	1555 menuButton.isDiv = true
Tercio@11	1556
Tercio@11	1557 if (not menuButton.divbar) then
Tercio@11	1558 CoolTip:CreateDivBar (menuButton)
Tercio@11	1559 else
Tercio@11	1560 menuButton.divbar:Show()
Tercio@11	1561 end
Tercio@11	1562
Tercio@11	1563 menuButton.divbar:SetPoint ("left", menuButton, "left", frame1:GetWidth()*0.10, 0)
Tercio@11	1564 menuButton.divbar:SetPoint ("right", menuButton, "right", -frame1:GetWidth()*0.10, 0)
Tercio@11	1565
Tercio@11	1566 else
Tercio@11	1567
Tercio@11	1568 --> height
Tercio@11	1569 menuButton:SetHeight (frame1.hHeight + (CoolTip.OptionsTable.ButtonHeightMod or 0))
Tercio@11	1570 --> points
Tercio@11	1571 menuButton:ClearAllPoints()
Tercio@11	1572 menuButton:SetPoint ("center", frame1, "center")
Tercio@11	1573 menuButton:SetPoint ("top", frame1, "top", 0, ( ( (i-1) * frame1.hHeight) * -1) - 4 + (CoolTip.OptionsTable.ButtonsYMod or 0) + spacing)
Tercio@11	1574 if (CoolTip.OptionsTable.YSpacingMod) then
Tercio@11	1575 spacing = spacing + CoolTip.OptionsTable.YSpacingMod
Tercio@11	1576 end
Tercio@11	1577 menuButton:SetPoint ("left", frame1, "left")
Tercio@11	1578 menuButton:SetPoint ("right", frame1, "right")
Tercio@11	1579
Tercio@11	1580 if (menuButton.divbar) then
Tercio@11	1581 menuButton.divbar:Hide()
Tercio@11	1582 menuButton.isDiv = false
Tercio@11	1583 end
Tercio@11	1584 end
Tercio@11	1585
Tercio@11	1586 end
Tercio@11	1587
Tercio@11	1588 if (CoolTip.OptionsTable.FixedHeight) then
Tercio@11	1589 frame1:SetHeight (CoolTip.OptionsTable.FixedHeight)
Tercio@11	1590 else
Tercio@11	1591 local mod = CoolTip.OptionsTable.HeighMod or 0
Tercio@11	1592 frame1:SetHeight (_math_max ( (frame1.hHeight * CoolTip.Indexes) + 12 + (-spacing) + mod, 22 ))
Tercio@11	1593 end
Tercio@11	1594
Tercio@11	1595 --> sub menu arrows
Tercio@11	1596 if (CoolTip.HaveSubMenu and not CoolTip.OptionsTable.IgnoreArrows and not CoolTip.OptionsTable.SubMenuIsTooltip) then
Tercio@11	1597 for i = 1, CoolTip.Indexes do
Tercio@11	1598 if (CoolTip.IndexesSub [i] and CoolTip.IndexesSub [i] > 0) then
Tercio@11	1599 frame1.Lines [i].statusbar.subMenuArrow:Show()
Tercio@11	1600 else
Tercio@11	1601 frame1.Lines [i].statusbar.subMenuArrow:Hide()
Tercio@11	1602 end
Tercio@11	1603 end
Tercio@11	1604
Tercio@11	1605 frame1:SetWidth (frame1:GetWidth() + 16)
Tercio@11	1606 end
Tercio@11	1607
Tercio@11	1608 frame1:ClearAllPoints()
Tercio@11	1609 CoolTip:SetMyPoint (host)
Tercio@11	1610
Tercio@11	1611 if (CoolTip.title1) then
Tercio@11	1612 CoolTip.frame1.titleText:Show()
Tercio@11	1613 CoolTip.frame1.titleIcon:Show()
Tercio@11	1614 CoolTip.frame1.titleText:SetText (CoolTip.title_text)
Tercio@11	1615 CoolTip.frame1.titleIcon:SetWidth (frame1:GetWidth())
Tercio@11	1616 CoolTip.frame1.titleIcon:SetHeight (40)
Tercio@11	1617 end
Tercio@11	1618
Tercio@11	1619 if (CoolTip.WallpaperTable [1]) then
Tercio@11	1620 CoolTip:SetupWallpaper (CoolTip.WallpaperTable, frame1.frameWallpaper)
Tercio@11	1621 else
Tercio@11	1622 frame1.frameWallpaper:Hide()
Tercio@11	1623 end
Tercio@11	1624
Tercio@26	1625 DF:FadeFrame (frame1, 0)
Tercio@11	1626
Tercio@11	1627 for i = 1, CoolTip.Indexes do
Tercio@11	1628 if (CoolTip.SelectedIndexMain and CoolTip.SelectedIndexMain == i) then
Tercio@11	1629 if (CoolTip.HaveSubMenu and CoolTip.IndexesSub [i] and CoolTip.IndexesSub [i] > 0) then
Tercio@11	1630 CoolTip:ShowSub (i)
Tercio@11	1631 end
Tercio@11	1632 end
Tercio@11	1633 end
Tercio@11	1634
Tercio@11	1635 return true
Tercio@11	1636 end
Tercio@11	1637
Tercio@11	1638 function CoolTip:SetMyPoint (host, x_mod, y_mod)
Tercio@11	1639
Tercio@11	1640 local moveX = x_mod or 0
Tercio@11	1641 local moveY = y_mod or 0
Tercio@11	1642
Tercio@11	1643 --> clear all points
Tercio@11	1644 frame1:ClearAllPoints()
Tercio@11	1645
Tercio@11	1646 local anchor = CoolTip.OptionsTable.Anchor or CoolTip.Host
Tercio@11	1647 frame1:SetPoint (CoolTip.OptionsTable.MyAnchor, anchor, CoolTip.OptionsTable.RelativeAnchor, 0 + moveX + CoolTip.OptionsTable.WidthAnchorMod, 10 + CoolTip.OptionsTable.HeightAnchorMod + moveY)
Tercio@11	1648
Tercio@11	1649 if (not x_mod) then
Tercio@11	1650 --> check if cooltip is out of screen bounds
Tercio@11	1651 local center_x = frame1:GetCenter()
Tercio@11	1652
Tercio@11	1653 if (center_x) then
Tercio@11	1654 local screen_x_res = GetScreenWidth()
Tercio@11	1655 local half_x = frame1:GetWidth() / 2
Tercio@11	1656
Tercio@11	1657 if (center_x+half_x > screen_x_res) then
Tercio@11	1658 --> out of right side
Tercio@11	1659 local move_to_left = (center_x + half_x) - screen_x_res
Tercio@11	1660 CoolTip.internal_x_mod = -move_to_left
Tercio@11	1661 return CoolTip:SetMyPoint (host, -move_to_left, 0)
Tercio@11	1662
Tercio@11	1663 elseif (center_x-half_x < 0) then
Tercio@11	1664 --> out of left side
Tercio@11	1665 local move_to_right = center_x - half_x
Tercio@11	1666 CoolTip.internal_x_mod = move_to_right*-1
Tercio@11	1667 return CoolTip:SetMyPoint (host, move_to_right*-1, 0)
Tercio@11	1668 end
Tercio@11	1669 end
Tercio@11	1670 end
Tercio@11	1671
Tercio@11	1672 if (not y_mod) then
Tercio@11	1673 --> check if cooltip is out of screen bounds
Tercio@11	1674 local _, center_y = frame1:GetCenter()
Tercio@11	1675 local screen_y_res = GetScreenHeight()
Tercio@11	1676 local half_y = frame1:GetHeight() / 2
Tercio@11	1677
Tercio@11	1678 if (center_y) then
Tercio@11	1679 if (center_y+half_y > screen_y_res) then
Tercio@11	1680 --> out of top side
Tercio@11	1681 local move_to_down = (center_y + half_y) - screen_y_res
Tercio@11	1682 CoolTip.internal_y_mod = -move_to_down
Tercio@11	1683 return CoolTip:SetMyPoint (host, 0, -move_to_down)
Tercio@11	1684
Tercio@11	1685 elseif (center_y-half_y < 0) then
Tercio@11	1686 --> out of bottom side
Tercio@11	1687 local move_to_up = center_y - half_y
Tercio@11	1688 CoolTip.internal_y_mod = move_to_up*-1
Tercio@11	1689 return CoolTip:SetMyPoint (host, 0, move_to_up*-1)
Tercio@11	1690
Tercio@11	1691 end
Tercio@11	1692 end
Tercio@11	1693 end
Tercio@11	1694
Tercio@11	1695 if (frame2:IsShown() and not CoolTip.overlap_checked) then
Tercio@11	1696
Tercio@11	1697 local frame_2_center_x = frame2:GetCenter()
Tercio@11	1698 if (frame_2_center_x) then
Tercio@11	1699 local frame_2_half_x = frame2:GetWidth() / 2
Tercio@11	1700
Tercio@11	1701 local frame_1_center_x = frame1:GetCenter()
Tercio@11	1702 if (frame_1_center_x) then
Tercio@11	1703
Tercio@11	1704 local frame_1_half_x = frame1:GetWidth() / 2
Tercio@11	1705
Tercio@11	1706 local f1_end_point = frame_1_center_x + frame_1_half_x - 3
Tercio@11	1707 local f2_start_point = frame_2_center_x - frame_2_half_x
Tercio@11	1708
Tercio@11	1709 if (f2_start_point < f1_end_point) then
Tercio@11	1710 local diff = f2_start_point - f1_end_point
Tercio@11	1711 CoolTip.overlap_checked = true
Tercio@11	1712
Tercio@11	1713 frame2:ClearAllPoints()
Tercio@11	1714 frame2:SetPoint ("bottomright", frame1, "bottomleft")
Tercio@11	1715 CoolTip.frame2_leftside = true
Tercio@11	1716 --> diff
Tercio@11	1717 return CoolTip:SetMyPoint (host, CoolTip.internal_x_mod , CoolTip.internal_y_mod)
Tercio@11	1718 end
Tercio@11	1719
Tercio@11	1720 end
Tercio@11	1721 end
Tercio@11	1722
Tercio@11	1723 end
Tercio@11	1724
Tercio@11	1725 end
Tercio@11	1726
Tercio@11	1727 function CoolTip:CheckOverlap()
Tercio@11	1728 if (frame2:IsShown()) then
Tercio@11	1729
Tercio@11	1730 local frame_2_center_x = frame2:GetCenter()
Tercio@11	1731 if (frame_2_center_x) then
Tercio@11	1732 local frame_2_half_x = frame2:GetWidth() / 2
Tercio@11	1733
Tercio@11	1734 local frame_1_center_x = frame1:GetCenter()
Tercio@11	1735 if (frame_1_center_x) then
Tercio@11	1736
Tercio@11	1737 local frame_1_half_x = frame1:GetWidth() / 2
Tercio@11	1738
Tercio@11	1739 local f1_end_point = frame_1_center_x + frame_1_half_x - 3
Tercio@11	1740 local f2_start_point = frame_2_center_x - frame_2_half_x
Tercio@11	1741
Tercio@11	1742 if (f2_start_point < f1_end_point) then
Tercio@11	1743 local diff = f2_start_point - f1_end_point
Tercio@11	1744
Tercio@11	1745 frame2:ClearAllPoints()
Tercio@11	1746 frame2:SetPoint ("bottomright", frame1, "bottomleft")
Tercio@11	1747 CoolTip.frame2_leftside = true
Tercio@11	1748 end
Tercio@11	1749
Tercio@11	1750 end
Tercio@11	1751 end
Tercio@11	1752
Tercio@11	1753 end
Tercio@11	1754 end
Tercio@11	1755
Tercio@11	1756 function CoolTip:GetText (buttonIndex)
Tercio@11	1757 local button1 = frame1.Lines [buttonIndex]
Tercio@11	1758 if (not button1) then
Tercio@11	1759 return "", ""
Tercio@11	1760 else
Tercio@11	1761 return button1.leftText:GetText() or "", button1.rightText:GetText() or ""
Tercio@11	1762 end
Tercio@11	1763 end
Tercio@11	1764
Tercio@11	1765 ----------------------------------------------------------------------
Tercio@11	1766 --> Get the number of lines current shown on cooltip
Tercio@11	1767
Tercio@11	1768 function CoolTip:GetNumLines()
Tercio@11	1769 return CoolTip.NumLines or 0
Tercio@11	1770 end
Tercio@11	1771
Tercio@11	1772 ----------------------------------------------------------------------
Tercio@11	1773 --> Remove all options actived
Tercio@11	1774 --> Set a option on current cooltip
Tercio@11	1775
Tercio@11	1776 function CoolTip:ClearAllOptions()
Tercio@11	1777 for option, _ in pairs (CoolTip.OptionsTable) do
Tercio@11	1778 CoolTip.OptionsTable [option] = nil
Tercio@11	1779 end
Tercio@11	1780
Tercio@11	1781 CoolTip:SetOption ("MyAnchor", "bottom")
Tercio@11	1782 CoolTip:SetOption ("RelativeAnchor", "top")
Tercio@11	1783 CoolTip:SetOption ("WidthAnchorMod", 0)
Tercio@11	1784 CoolTip:SetOption ("HeightAnchorMod", 0)
Tercio@11	1785 end
Tercio@11	1786
Tercio@11	1787 function CoolTip:SetOption (option, value)
Tercio@11	1788 --> check if this options exists
Tercio@11	1789 if (not CoolTip.OptionsList [option]) then
Tercio@11	1790 return --> error
Tercio@11	1791 end
Tercio@11	1792
Tercio@11	1793 --> set options
Tercio@11	1794 CoolTip.OptionsTable [option] = value
Tercio@11	1795 end
Tercio@11	1796
Tercio@11	1797 ----------------------------------------------------------------------
Tercio@11	1798 --> set the anchor of cooltip
Tercio@11	1799 --> parameters: frame [, cooltip anchor point, frame anchor point [, x mod, y mod]]
Tercio@11	1800 --> frame [, x mod, y mod]
Tercio@11	1801
Tercio@11	1802 --> alias
Tercio@11	1803 function CoolTip:GetOwner()
Tercio@11	1804 return CoolTip.Host
Tercio@11	1805 end
Tercio@11	1806
Tercio@11	1807 function CoolTip:SetOwner (frame, myPoint, hisPoint, x, y)
Tercio@11	1808 return CoolTip:SetHost (frame, myPoint, hisPoint, x, y)
Tercio@11	1809 end
Tercio@11	1810
Tercio@11	1811 function CoolTip:SetHost (frame, myPoint, hisPoint, x, y)
Tercio@11	1812 --> check data integrity
Tercio@11	1813 if (type (frame) ~= "table" or not frame.GetObjectType) then
Tercio@11	1814 print ("host need to be a frame")
Tercio@11	1815 return --> error
Tercio@11	1816 end
Tercio@11	1817
Tercio@11	1818 CoolTip.Host = frame
Tercio@11	1819
Tercio@11	1820 CoolTip.frame1:SetFrameLevel (frame:GetFrameLevel()+1)
Tercio@11	1821
Tercio@11	1822 --> defaults
Tercio@11	1823 myPoint = myPoint or CoolTip.OptionsTable.MyAnchor or "bottom"
Tercio@11	1824 hisPoint = hisPoint or CoolTip.OptionsTable.hisPoint or "top"
Tercio@11	1825
Tercio@11	1826 x = x or CoolTip.OptionsTable.WidthAnchorMod or 0
Tercio@11	1827 y = y or CoolTip.OptionsTable.HeightAnchorMod or 0
Tercio@11	1828
Tercio@11	1829 --> check options
Tercio@11	1830 if (type (myPoint) == "string") then
Tercio@11	1831 CoolTip:SetOption ("MyAnchor", myPoint)
Tercio@11	1832 CoolTip:SetOption ("WidthAnchorMod", x)
Tercio@11	1833 elseif (type (myPoint) == "number") then
Tercio@11	1834 CoolTip:SetOption ("HeightAnchorMod", myPoint)
Tercio@11	1835 end
Tercio@11	1836
Tercio@11	1837 if (type (hisPoint) == "string") then
Tercio@11	1838 CoolTip:SetOption ("RelativeAnchor", hisPoint)
Tercio@11	1839 CoolTip:SetOption ("HeightAnchorMod", y)
Tercio@11	1840 elseif (type (hisPoint) == "number") then
Tercio@11	1841 CoolTip:SetOption ("WidthAnchorMod", hisPoint)
Tercio@11	1842 end
Tercio@11	1843 end
Tercio@11	1844
Tercio@11	1845 ----------------------------------------------------------------------
Tercio@11	1846 --> set cooltip type
Tercio@11	1847 --> parameters: type (1 = tooltip \| 2 = tooltip with bars \| 3 = menu)
Tercio@11	1848
Tercio@11	1849 function CoolTip:IsMenu()
Tercio@11	1850 return CoolTip.frame1:IsShown() and CoolTip.Type == 3
Tercio@11	1851 end
Tercio@11	1852
Tercio@11	1853 function CoolTip:IsTooltip()
Tercio@11	1854 return CoolTip.frame1:IsShown() and (CoolTip.Type == 1 or CoolTip.Type == 2)
Tercio@11	1855 end
Tercio@11	1856
Tercio@11	1857 function CoolTip:GetType()
Tercio@11	1858 if (CoolTip.Type == 1 or CoolTip.Type == 2) then
Tercio@11	1859 return "tooltip"
Tercio@11	1860 elseif (CoolTip.Type == 3) then
Tercio@11	1861 return "menu"
Tercio@11	1862 else
Tercio@11	1863 return "none"
Tercio@11	1864 end
Tercio@11	1865 end
Tercio@11	1866
Tercio@11	1867 function CoolTip:SetType (newType)
Tercio@11	1868 if (type (newType) == "string") then
Tercio@11	1869 if (newType == "tooltip") then
Tercio@11	1870 CoolTip.Type = 1
Tercio@11	1871 elseif (newType == "tooltipbar") then
Tercio@11	1872 CoolTip.Type = 2
Tercio@11	1873 elseif (newType == "menu") then
Tercio@11	1874 CoolTip.Type = 3
Tercio@11	1875 else
Tercio@11	1876 --> error
Tercio@11	1877 end
Tercio@11	1878 elseif (type (newType) == "number") then
Tercio@11	1879 if (newType == 1) then
Tercio@11	1880 CoolTip.Type = 1
Tercio@11	1881 elseif (newType == 2) then
Tercio@11	1882 CoolTip.Type = 2
Tercio@11	1883 elseif (newType == 3) then
Tercio@11	1884 CoolTip.Type = 3
Tercio@11	1885 else
Tercio@11	1886 --> error
Tercio@11	1887 end
Tercio@11	1888 else
Tercio@11	1889 --> error
Tercio@11	1890 end
Tercio@11	1891 end
Tercio@11	1892
Tercio@11	1893 --> Set a fixed value for menu
Tercio@11	1894 function CoolTip:SetFixedParameter (value, injected)
Tercio@11	1895 if (injected ~= nil) then
Tercio@11	1896 local frame = value
Tercio@11	1897 if (frame.dframework) then
Tercio@11	1898 frame = frame.widget
Tercio@11	1899 end
Tercio@11	1900 if (frame.CoolTip) then
Tercio@11	1901 frame.CoolTip.FixedValue = injected
Tercio@11	1902 else
Tercio@11	1903 --debug
Tercio@11	1904 end
Tercio@11	1905 end
Tercio@11	1906 CoolTip.FixedValue = value
Tercio@11	1907 end
Tercio@11	1908
Tercio@11	1909 function CoolTip:SetColor (menuType, ...)
Tercio@11	1910 local ColorR, ColorG, ColorB, ColorA = DF:ParseColors (...)
Tercio@11	1911 if ((type (menuType) == "string" and menuType == "main") or (type (menuType) == "number" and menuType == 1)) then
Tercio@11	1912 frame1.framebackgroundLeft:SetVertexColor (ColorR, ColorG, ColorB, ColorA)
Tercio@11	1913 frame1.framebackgroundRight:SetVertexColor (ColorR, ColorG, ColorB, ColorA)
Tercio@11	1914 frame1.framebackgroundCenter:SetVertexColor (ColorR, ColorG, ColorB, ColorA)
Tercio@11	1915
Tercio@11	1916 elseif ((type (menuType) == "string" and menuType == "sec") or (type (menuType) == "number" and menuType == 2)) then
Tercio@11	1917 frame2.framebackgroundLeft:SetVertexColor (ColorR, ColorG, ColorB, ColorA)
Tercio@11	1918 frame2.framebackgroundRight:SetVertexColor (ColorR, ColorG, ColorB, ColorA)
Tercio@11	1919 frame2.framebackgroundCenter:SetVertexColor (ColorR, ColorG, ColorB, ColorA)
Tercio@11	1920
Tercio@11	1921 else
Tercio@11	1922 return --> error
Tercio@11	1923 end
Tercio@11	1924 end
Tercio@11	1925
Tercio@11	1926 --> Set last selected option
Tercio@11	1927 function CoolTip:SetLastSelected (menuType, index, index2)
Tercio@11	1928
Tercio@11	1929 if (CoolTip.Type == 3) then
Tercio@11	1930 if ((type (menuType) == "string" and menuType == "main") or (type (menuType) == "number" and menuType == 1)) then
Tercio@11	1931 CoolTip.SelectedIndexMain = index
Tercio@11	1932 elseif ((type (menuType) == "string" and menuType == "sec") or (type (menuType) == "number" and menuType == 2)) then
Tercio@11	1933 CoolTip.SelectedIndexSec [index] = index2
Tercio@11	1934 else
Tercio@11	1935 return --> error
Tercio@11	1936 end
Tercio@11	1937 else
Tercio@11	1938 return --> error
Tercio@11	1939 end
Tercio@11	1940 end
Tercio@11	1941
Tercio@11	1942 --> serack key: ~select
Tercio@11	1943 function CoolTip:Select (menuType, option, mainIndex)
Tercio@11	1944 if (menuType == 1) then --main menu
Tercio@11	1945 local botao = frame1.Lines [option]
Tercio@11	1946 CoolTip.buttonClicked = true
Tercio@11	1947 CoolTip:SetSelectedAnchor (frame1, botao)
Tercio@11	1948
Tercio@11	1949 --UIFrameFlash (frame1.selected, 0.05, 0.05, 0.2, true, 0, 0)
Tercio@11	1950
Tercio@11	1951 elseif (menuType == 2) then --sub menu
Tercio@11	1952 CoolTip:ShowSub (mainIndex)
Tercio@11	1953 local botao = frame2.Lines [option]
Tercio@11	1954 CoolTip.buttonClicked = true
Tercio@11	1955
Tercio@11	1956 CoolTip:SetSelectedAnchor (frame2, botao)
Tercio@11	1957 end
Tercio@11	1958 end
Tercio@11	1959
Tercio@11	1960 ----------------------------------------------------------------------
Tercio@11	1961 --> Reset cooltip
Tercio@11	1962
Tercioo@29	1963 local default_backdrop = {bgFile = [[Interface\DialogFrame\UI-DialogBox-Background-Dark]], edgeFile = [[Interface\Buttons\WHITE8X8]], tile = true,
Tercioo@29	1964 edgeSize = 1, tileSize = 16, insets = {left = 0, right = 0, top = 0, bottom = 0}}
Tercio@11	1965 local default_backdrop_color = {0.09019, 0.09019, 0.18823, 1}
Tercio@11	1966 local default_backdropborder_color = {1, 1, 1, 1}
Tercio@11	1967
Tercio@11	1968 --borda preta sem usar unpack
Tercio@11	1969
Tercio@11	1970 --> wipe all data ~reset
Tercio@11	1971 function CoolTip:Reset()
Tercio@11	1972
Tercio@11	1973 frame2:ClearAllPoints()
Tercio@11	1974 frame2:SetPoint ("bottomleft", frame1, "bottomright")
Tercio@11	1975
Tercio@11	1976 CoolTip:HideSelectedTexture (frame1)
Tercio@11	1977 CoolTip:HideSelectedTexture (frame2)
Tercio@11	1978
Tercio@11	1979 CoolTip.FixedValue = nil
Tercio@11	1980 CoolTip.HaveSubMenu = false
Tercio@11	1981
Tercio@11	1982 CoolTip.SelectedIndexMain = nil
Tercio@11	1983 _table_wipe (CoolTip.SelectedIndexSec)
Tercio@11	1984
Tercio@11	1985 CoolTip.Indexes = 0
Tercio@11	1986 CoolTip.SubIndexes = 0
Tercio@11	1987 _table_wipe (CoolTip.IndexesSub)
Tercio@11	1988
Tercio@11	1989 CoolTip.internal_x_mod = 0
Tercio@11	1990 CoolTip.internal_y_mod = 0
Tercio@11	1991 CoolTip.current_anchor = nil
Tercio@11	1992 CoolTip.overlap_checked = false
Tercio@11	1993
Tercio@11	1994 CoolTip.frame2_leftside = nil
Tercio@11	1995
Tercio@11	1996 frame1:SetBackdrop (default_backdrop)
Tercio@11	1997 frame1:SetBackdropColor (unpack (default_backdrop_color))
Tercio@11	1998 frame1:SetBackdropBorderColor (unpack (default_backdropborder_color))
Tercio@11	1999
Tercio@11	2000 frame2:SetBackdrop (default_backdrop)
Tercio@11	2001 frame2:SetBackdropColor (unpack (default_backdrop_color))
Tercio@11	2002 frame2:SetBackdropBorderColor (unpack (default_backdropborder_color))
Tercio@11	2003
Tercio@11	2004 --[
Tercio@20	2005 _table_wipe (CoolTip.PopupFrameTable)
Tercio@20	2006
Tercio@11	2007 _table_wipe (CoolTip.LeftTextTable)
Tercio@11	2008 _table_wipe (CoolTip.LeftTextTableSub)
Tercio@11	2009 _table_wipe (CoolTip.RightTextTable)
Tercio@11	2010 _table_wipe (CoolTip.RightTextTableSub)
Tercio@11	2011
Tercio@11	2012 _table_wipe (CoolTip.LeftIconTable)
Tercio@11	2013 _table_wipe (CoolTip.LeftIconTableSub)
Tercio@11	2014 _table_wipe (CoolTip.RightIconTable)
Tercio@11	2015 _table_wipe (CoolTip.RightIconTableSub)
Tercio@11	2016
Tercio@11	2017 _table_wipe (CoolTip.StatusBarTable)
Tercio@11	2018 _table_wipe (CoolTip.StatusBarTableSub)
Tercio@11	2019
Tercio@11	2020 _table_wipe (CoolTip.FunctionsTableMain)
Tercio@11	2021 _table_wipe (CoolTip.FunctionsTableSub)
Tercio@11	2022
Tercio@11	2023 _table_wipe (CoolTip.ParametersTableMain)
Tercio@11	2024 _table_wipe (CoolTip.ParametersTableSub)
Tercio@11	2025
Tercio@11	2026 _table_wipe (CoolTip.WallpaperTable)
Tercio@11	2027 _table_wipe (CoolTip.WallpaperTableSub)
Tercio@11	2028 --]]
Tercio@11	2029
Tercio@11	2030 _table_wipe (CoolTip.TopIconTableSub)
Tercio@11	2031 CoolTip.Banner [1] = false
Tercio@11	2032 CoolTip.Banner [2] = false
Tercio@11	2033 CoolTip.Banner [3] = false
Tercio@11	2034
Tercio@11	2035 frame1.upperImage:Hide()
Tercio@11	2036 frame1.upperImage2:Hide()
Tercio@11	2037 frame1.upperImageText:Hide()
Tercio@11	2038 frame1.upperImageText2:Hide()
Tercio@11	2039
Tercio@11	2040 frame1.frameWallpaper:Hide()
Tercio@11	2041 frame2.frameWallpaper:Hide()
Tercio@11	2042
Tercio@11	2043 frame2.upperImage:Hide()
Tercio@11	2044
Tercio@11	2045 CoolTip.title1 = nil
Tercio@11	2046 CoolTip.title_text = nil
Tercio@11	2047
Tercio@11	2048 CoolTip.frame1.titleText:Hide()
Tercio@11	2049 CoolTip.frame1.titleIcon:Hide()
Tercio@11	2050
Tercio@11	2051 CoolTip:ClearAllOptions()
Tercio@11	2052 CoolTip:SetColor (1, "transparent")
Tercio@11	2053 CoolTip:SetColor (2, "transparent")
Tercio@11	2054
Tercio@11	2055 local f1Lines = frame1.Lines
Tercio@11	2056 for i = 1, #f1Lines do
Tercio@11	2057 f1Lines [i].statusbar.subMenuArrow:Hide()
Tercio@11	2058 end
Tercio@11	2059 end
Tercio@11	2060
Tercio@11	2061 ----------------------------------------------------------------------
Tercio@11	2062 --> Menu functions
Tercio@11	2063
Tercio@11	2064 local _default_color = {1, 1, 1}
Tercio@11	2065 local _default_point = {"center", "center", 0, -3}
Tercio@11	2066
Tercio@11	2067 function CoolTip:AddMenu (menuType, func, param1, param2, param3, leftText, leftIcon, indexUp)
Tercio@11	2068
Tercio@11	2069 if (leftText and indexUp and ((type (menuType) == "string" and menuType == "main") or (type (menuType) == "number" and menuType == 1))) then
Tercio@11	2070 CoolTip.Indexes = CoolTip.Indexes + 1
Tercio@11	2071
Tercio@11	2072 if (not CoolTip.IndexesSub [CoolTip.Indexes]) then
Tercio@11	2073 CoolTip.IndexesSub [CoolTip.Indexes] = 0
Tercio@11	2074 end
Tercio@11	2075
Tercio@11	2076 CoolTip.SubIndexes = 0
Tercio@11	2077 end
Tercio@11	2078
Tercio@11	2079 --> need a previous line
Tercio@11	2080 if (CoolTip.Indexes == 0) then
Tercio@11	2081 print ("Indexes are 0")
Tercio@11	2082 return --> return error
Tercio@11	2083 end
Tercio@11	2084
Tercio@11	2085 --> check data integrity
Tercio@11	2086 if (type (func) ~= "function") then
Tercio@11	2087 print ("No function")
Tercio@11	2088 return --> erroe
Tercio@11	2089 end
Tercio@11	2090
Tercio@11	2091 --> add
Tercio@11	2092
Tercio@11	2093 if ((type (menuType) == "string" and menuType == "main") or (type (menuType) == "number" and menuType == 1)) then
Tercio@11	2094
Tercio@11	2095 local parameterTable
Tercio@11	2096 if (CoolTip.isSpecial) then
Tercio@11	2097 parameterTable = {}
Tercio@11	2098 _table_insert (CoolTip.FunctionsTableMain, CoolTip.Indexes, func)
Tercio@11	2099 _table_insert (CoolTip.ParametersTableMain, CoolTip.Indexes, parameterTable)
Tercio@11	2100 else
Tercio@11	2101
Tercio@11	2102 CoolTip.FunctionsTableMain [CoolTip.Indexes] = func
Tercio@11	2103
Tercio@11	2104 parameterTable = CoolTip.ParametersTableMain [CoolTip.Indexes]
Tercio@11	2105 if (not parameterTable) then
Tercio@11	2106 parameterTable = {}
Tercio@11	2107 CoolTip.ParametersTableMain [CoolTip.Indexes] = parameterTable
Tercio@11	2108 end
Tercio@11	2109 end
Tercio@11	2110
Tercio@11	2111 parameterTable [1] = param1
Tercio@11	2112 parameterTable [2] = param2
Tercio@11	2113 parameterTable [3] = param3
Tercio@11	2114
Tercio@11	2115 if (leftIcon) then
Tercio@11	2116 local iconTable = CoolTip.LeftIconTable [CoolTip.Indexes]
Tercio@11	2117
Tercio@11	2118 if (not iconTable or CoolTip.isSpecial) then
Tercio@11	2119 iconTable = {}
Tercio@11	2120 CoolTip.LeftIconTable [CoolTip.Indexes] = iconTable
Tercio@11	2121 end
Tercio@11	2122
Tercio@11	2123 iconTable [1] = leftIcon
Tercio@11	2124 iconTable [2] = 16 --> default 16
Tercio@11	2125 iconTable [3] = 16 --> default 16
Tercio@11	2126 iconTable [4] = 0 --> default 0
Tercio@11	2127 iconTable [5] = 1 --> default 1
Tercio@11	2128 iconTable [6] = 0 --> default 0
Tercio@11	2129 iconTable [7] = 1 --> default 1
Tercio@11	2130 iconTable [8] = _default_color
Tercio@11	2131 end
Tercio@11	2132
Tercio@11	2133 if (leftText) then
Tercio@11	2134 local lineTable_left = CoolTip.LeftTextTable [CoolTip.Indexes]
Tercio@11	2135
Tercio@11	2136 if (not lineTable_left or CoolTip.isSpecial) then
Tercio@11	2137 lineTable_left = {}
Tercio@11	2138 CoolTip.LeftTextTable [CoolTip.Indexes] = lineTable_left
Tercio@11	2139 end
Tercio@11	2140
Tercio@11	2141 lineTable_left [1] = leftText --> line text
Tercio@11	2142 lineTable_left [2] = 0
Tercio@11	2143 lineTable_left [3] = 0
Tercio@11	2144 lineTable_left [4] = 0
Tercio@11	2145 lineTable_left [5] = 0
Tercio@11	2146 lineTable_left [6] = false
Tercio@11	2147 lineTable_left [7] = false
Tercio@11	2148 lineTable_left [8] = false
Tercio@11	2149
Tercio@11	2150 end
Tercio@11	2151
Tercio@11	2152 elseif ((type (menuType) == "string" and menuType == "sec") or (type (menuType) == "number" and menuType == 2)) then
Tercio@11	2153
Tercio@11	2154 if (CoolTip.SubIndexes == 0) then
Tercio@11	2155 if (not indexUp or not leftText) then
Tercio@11	2156 print ("not indexUp or not leftText")
Tercio@11	2157 return --> error
Tercio@11	2158 end
Tercio@11	2159 end
Tercio@11	2160
Tercio@11	2161 if (indexUp and leftText) then
Tercio@11	2162 CoolTip.SubIndexes = CoolTip.SubIndexes + 1
Tercio@11	2163 CoolTip.IndexesSub [CoolTip.Indexes] = CoolTip.IndexesSub [CoolTip.Indexes] + 1
Tercio@11	2164 elseif (indexUp and not leftText) then
Tercio@11	2165 print ("indexUp and not leftText")
Tercio@11	2166 return --> error [leftText can't be nil if indexUp are true]
Tercio@11	2167 end
Tercio@11	2168
Tercio@11	2169 --> menu container
Tercio@11	2170 local subMenuContainerParameters = CoolTip.ParametersTableSub [CoolTip.Indexes]
Tercio@11	2171 if (not subMenuContainerParameters) then
Tercio@11	2172 subMenuContainerParameters = {}
Tercio@11	2173 CoolTip.ParametersTableSub [CoolTip.Indexes] = subMenuContainerParameters
Tercio@11	2174 end
Tercio@11	2175
Tercio@11	2176 local subMenuContainerFunctions = CoolTip.FunctionsTableSub [CoolTip.Indexes]
Tercio@11	2177 if (not subMenuContainerFunctions or CoolTip.isSpecial) then
Tercio@11	2178 subMenuContainerFunctions = {}
Tercio@11	2179 CoolTip.FunctionsTableSub [CoolTip.Indexes] = subMenuContainerFunctions
Tercio@11	2180 end
Tercio@11	2181
Tercio@11	2182 --> menu table
Tercio@11	2183 local subMenuTablesParameters = subMenuContainerParameters [CoolTip.SubIndexes]
Tercio@11	2184 if (not subMenuTablesParameters or CoolTip.isSpecial) then
Tercio@11	2185 subMenuTablesParameters = {}
Tercio@11	2186 subMenuContainerParameters [CoolTip.SubIndexes] = subMenuTablesParameters
Tercio@11	2187 end
Tercio@11	2188
Tercio@11	2189 --> add
Tercio@11	2190 subMenuContainerFunctions [CoolTip.SubIndexes] = func
Tercio@11	2191
Tercio@11	2192 subMenuTablesParameters [1] = param1
Tercio@11	2193 subMenuTablesParameters [2] = param2
Tercio@11	2194 subMenuTablesParameters [3] = param3
Tercio@11	2195
Tercio@11	2196 --> text and icon
Tercio@11	2197 if (leftIcon) then
Tercio@11	2198
Tercio@11	2199 local subMenuContainerIcons = CoolTip.LeftIconTableSub [CoolTip.Indexes]
Tercio@11	2200 if (not subMenuContainerIcons) then
Tercio@11	2201 subMenuContainerIcons = {}
Tercio@11	2202 CoolTip.LeftIconTableSub [CoolTip.Indexes] = subMenuContainerIcons
Tercio@11	2203 end
Tercio@11	2204 local subMenuTablesIcons = subMenuContainerIcons [CoolTip.SubIndexes]
Tercio@11	2205 if (not subMenuTablesIcons or CoolTip.isSpecial) then
Tercio@11	2206 subMenuTablesIcons = {}
Tercio@11	2207 subMenuContainerIcons [CoolTip.SubIndexes] = subMenuTablesIcons
Tercio@11	2208 end
Tercio@11	2209
Tercio@11	2210 subMenuTablesIcons [1] = leftIcon
Tercio@11	2211 subMenuTablesIcons [2] = 16 --> default 16
Tercio@11	2212 subMenuTablesIcons [3] = 16 --> default 16
Tercio@11	2213 subMenuTablesIcons [4] = 0 --> default 0
Tercio@11	2214 subMenuTablesIcons [5] = 1 --> default 1
Tercio@11	2215 subMenuTablesIcons [6] = 0 --> default 0
Tercio@11	2216 subMenuTablesIcons [7] = 1 --> default 1
Tercio@11	2217 subMenuTablesIcons [8] = _default_color
Tercio@11	2218 end
Tercio@11	2219
Tercio@11	2220 if (leftText) then
Tercio@11	2221
Tercio@11	2222 local subMenuContainerTexts = CoolTip.LeftTextTableSub [CoolTip.Indexes]
Tercio@11	2223 if (not subMenuContainerTexts) then
Tercio@11	2224 subMenuContainerTexts = {}
Tercio@11	2225 CoolTip.LeftTextTableSub [CoolTip.Indexes] = subMenuContainerTexts
Tercio@11	2226 end
Tercio@11	2227 local subMenuTablesTexts = subMenuContainerTexts [CoolTip.SubIndexes]
Tercio@11	2228 if (not subMenuTablesTexts or CoolTip.isSpecial) then
Tercio@11	2229 subMenuTablesTexts = {}
Tercio@11	2230 subMenuContainerTexts [CoolTip.SubIndexes] = subMenuTablesTexts
Tercio@11	2231 end
Tercio@11	2232
Tercio@11	2233 subMenuTablesTexts [1] = leftText --> line text
Tercio@11	2234 subMenuTablesTexts [2] = 0
Tercio@11	2235 subMenuTablesTexts [3] = 0
Tercio@11	2236 subMenuTablesTexts [4] = 0
Tercio@11	2237 subMenuTablesTexts [5] = 0
Tercio@11	2238 subMenuTablesTexts [6] = false
Tercio@11	2239 subMenuTablesTexts [7] = false
Tercio@11	2240 subMenuTablesTexts [8] = false
Tercio@11	2241
Tercio@11	2242 end
Tercio@11	2243
Tercio@11	2244 CoolTip.HaveSubMenu = true
Tercio@11	2245
Tercio@11	2246 else
Tercio@11	2247 return --> error
Tercio@11	2248 end
Tercio@11	2249 end
Tercio@11	2250
Tercio@11	2251 ----------------------------------------------------------------------
Tercio@11	2252 --> adds a statusbar to the last line added.
Tercio@11	2253 --> only works with cooltip type 2 (tooltip with bars)
Tercio@11	2254 --> parameters: value [, color red, color green, color blue, color alpha [, glow]]
Tercio@11	2255 --> can also use a table or html color name in color red and send glow in color green
Tercio@11	2256
Tercioo@29	2257 function CoolTip:AddStatusBar (statusbarValue, frame, ColorR, ColorG, ColorB, ColorA, statusbarGlow, backgroundBar, barTexture)
Tercio@11	2258
Tercio@11	2259 --> need a previous line
Tercio@11	2260 if (CoolTip.Indexes == 0) then
Tercio@11	2261 return --> return error
Tercio@11	2262 end
Tercio@11	2263
Tercio@11	2264 --> check data integrity
Tercio@11	2265 if (type (statusbarValue) ~= "number") then
Tercio@11	2266 return --> error
Tercio@11	2267 end
Tercio@11	2268
Tercio@11	2269 if (type (ColorR) == "table" or type (ColorR) == "string") then
Tercio@11	2270 statusbarGlow, backgroundBar, ColorR, ColorG, ColorB, ColorA = ColorG, ColorB, DF:ParseColors (ColorR)
Tercio@11	2271 elseif (type (ColorR) == "boolean") then
Tercio@11	2272 backgroundBar = ColorG
Tercio@11	2273 statusbarGlow = ColorR
Tercio@11	2274 ColorR, ColorG, ColorB, ColorA = 1, 1, 1, 1
Tercio@11	2275 else
Tercio@11	2276 --> error
Tercio@11	2277 end
Tercio@11	2278
Tercio@11	2279 --> add
Tercio@11	2280 local frameTable
Tercio@11	2281 local statusbarTable
Tercio@11	2282
Tercio@11	2283 if (not frame or (type (frame) == "string" and frame == "main") or (type (frame) == "number" and frame == 1)) then
Tercio@11	2284 frameTable = CoolTip.StatusBarTable
Tercio@11	2285
Tercio@11	2286 if (CoolTip.isSpecial) then
Tercio@11	2287 statusbarTable = {}
Tercio@11	2288 _table_insert (frameTable, CoolTip.Indexes, statusbarTable)
Tercio@11	2289 else
Tercio@11	2290 statusbarTable = frameTable [CoolTip.Indexes]
Tercio@11	2291 if (not statusbarTable) then
Tercio@11	2292 statusbarTable = {}
Tercio@11	2293 _table_insert (frameTable, CoolTip.Indexes, statusbarTable)
Tercio@11	2294 --frameTable [CoolTip.Indexes] = statusbarTable
Tercio@11	2295 end
Tercio@11	2296 end
Tercio@11	2297
Tercio@11	2298 elseif ((type (frame) == "string" and frame == "sub") or (type (frame) == "number" and frame == 2)) then
Tercio@11	2299
Tercio@11	2300 frameTable = CoolTip.StatusBarTableSub
Tercio@11	2301
Tercio@11	2302 local subMenuContainerStatusBar = frameTable [CoolTip.Indexes]
Tercio@11	2303 if (not subMenuContainerStatusBar) then
Tercio@11	2304 subMenuContainerStatusBar = {}
Tercio@11	2305 frameTable [CoolTip.Indexes] = subMenuContainerStatusBar
Tercio@11	2306 end
Tercio@11	2307
Tercio@11	2308 if (CoolTip.isSpecial) then
Tercio@11	2309 statusbarTable = {}
Tercio@11	2310 _table_insert (subMenuContainerStatusBar, CoolTip.SubIndexes, statusbarTable)
Tercio@11	2311 else
Tercio@11	2312 statusbarTable = subMenuContainerStatusBar [CoolTip.SubIndexes]
Tercio@11	2313 if (not statusbarTable) then
Tercio@11	2314 statusbarTable = {}
Tercio@11	2315 _table_insert (subMenuContainerStatusBar, CoolTip.SubIndexes, statusbarTable)
Tercio@11	2316 end
Tercio@11	2317 end
Tercio@11	2318 else
Tercio@11	2319 print ("unknow frame")
Tercio@11	2320 return --> error
Tercio@11	2321 end
Tercio@11	2322
Tercio@11	2323 statusbarTable [1] = statusbarValue
Tercio@11	2324 statusbarTable [2] = ColorR
Tercio@11	2325 statusbarTable [3] = ColorG
Tercio@11	2326 statusbarTable [4] = ColorB
Tercio@11	2327 statusbarTable [5] = ColorA
Tercio@11	2328 statusbarTable [6] = statusbarGlow
Tercio@11	2329 statusbarTable [7] = backgroundBar
Tercioo@29	2330 statusbarTable [8] = barTexture
Tercio@11	2331
Tercio@11	2332 end
Tercio@11	2333
Tercio@11	2334 frame1.frameWallpaper:Hide()
Tercio@11	2335 frame2.frameWallpaper:Hide()
Tercio@11	2336
Tercio@11	2337 function CoolTip:SetWallpaper (index, texture, texcoord, color, desaturate)
Tercio@11	2338
Tercio@11	2339 if (CoolTip.Indexes == 0) then
Tercio@11	2340 return --> return error
Tercio@11	2341 end
Tercio@11	2342
Tercio@11	2343 local frameTable
Tercio@11	2344 local wallpaperTable
Tercio@11	2345
Tercio@11	2346 if ( (type (index) == "number" and index == 1) or (type (index) == "string" and index == "main") ) then
Tercio@11	2347 wallpaperTable = CoolTip.WallpaperTable
Tercio@11	2348
Tercio@11	2349 elseif ( (type (index) == "number" and index == 2) or (type (index) == "string" and index == "sub") ) then
Tercio@11	2350 frameTable = CoolTip.WallpaperTableSub
Tercio@11	2351
Tercio@11	2352 local subMenuContainerWallpapers = frameTable [CoolTip.Indexes]
Tercio@11	2353 if (not subMenuContainerWallpapers) then
Tercio@11	2354 subMenuContainerWallpapers = {}
Tercio@11	2355 frameTable [CoolTip.Indexes] = subMenuContainerWallpapers
Tercio@11	2356 end
Tercio@11	2357
Tercio@11	2358 wallpaperTable = subMenuContainerWallpapers
Tercio@11	2359 end
Tercio@11	2360
Tercio@11	2361 wallpaperTable [1] = texture
Tercio@11	2362 if (texcoord) then
Tercio@11	2363 wallpaperTable [2] = texcoord [1]
Tercio@11	2364 wallpaperTable [3] = texcoord [2]
Tercio@11	2365 wallpaperTable [4] = texcoord [3]
Tercio@11	2366 wallpaperTable [5] = texcoord [4]
Tercio@11	2367 else
Tercio@11	2368 wallpaperTable [2] = 0
Tercio@11	2369 wallpaperTable [3] = 1
Tercio@11	2370 wallpaperTable [4] = 0
Tercio@11	2371 wallpaperTable [5] = 1
Tercio@11	2372 end
Tercio@11	2373 wallpaperTable [6] = color
Tercio@11	2374 wallpaperTable [7] = desaturate
Tercio@11	2375 end
Tercio@11	2376
Tercio@11	2377 function CoolTip:SetBannerText (index, text, anchor, color, fontsize, fontface, fontflag)
Tercio@11	2378 local fontstring
Tercio@11	2379
Tercio@11	2380 if (index == 1) then
Tercio@11	2381 fontstring = frame1.upperImageText
Tercio@11	2382 elseif (index == 2) then
Tercio@11	2383 fontstring = frame1.upperImageText2
Tercio@11	2384 end
Tercio@11	2385
Tercio@11	2386 fontstring:SetText (text or "")
Tercio@11	2387
Tercio@11	2388 if (anchor and index == 1) then
Tercio@11	2389 local myAnchor, hisAnchor, x, y = unpack (anchor)
Tercio@11	2390 fontstring:SetPoint (myAnchor, frame1.upperImage, hisAnchor or myAnchor, x or 0, y or 0)
Tercio@11	2391 elseif (anchor and index == 2) then
Tercio@11	2392 local myAnchor, hisAnchor, x, y = unpack (anchor)
Tercio@11	2393 fontstring:SetPoint (myAnchor, frame1, hisAnchor or myAnchor, x or 0, y or 0)
Tercio@11	2394 end
Tercio@11	2395
Tercio@11	2396 if (color) then
Tercio@11	2397 local r, g, b, a = DF:ParseColors (color)
Tercio@11	2398 fontstring:SetTextColor (r, g, b, a)
Tercio@11	2399 end
Tercio@11	2400
Tercio@11	2401 local face, size, flags = fontstring:GetFont()
Tercio@11	2402 face = fontface or [[Fonts\FRIZQT__.TTF]]
Tercio@11	2403 size = fontsize or 13
Tercio@11	2404 flags = fontflag or nil
Tercio@11	2405 fontstring:SetFont (face, size, flags)
Tercio@11	2406 fontstring:Show()
Tercio@11	2407 end
Tercio@11	2408
Tercio@11	2409 function CoolTip:SetBackdrop (index, backdrop, backdropcolor, bordercolor)
Tercio@11	2410
Tercio@11	2411 local f
Tercio@11	2412 if (index == 1) then
Tercio@11	2413 f = frame1
Tercio@11	2414 elseif (index == 2) then
Tercio@11	2415 f = frame2
Tercio@11	2416 end
Tercio@11	2417
Tercio@11	2418 if (backdrop) then
Tercio@11	2419 f:SetBackdrop (backdrop)
Tercio@11	2420 end
Tercio@11	2421 if (backdropcolor) then
Tercio@11	2422 local r, g, b, a = DF:ParseColors (backdropcolor)
Tercio@11	2423 f:SetBackdropColor (r, g, b, a)
Tercio@11	2424 end
Tercio@11	2425 if (bordercolor) then
Tercio@11	2426 local r, g, b, a = DF:ParseColors (bordercolor)
Tercio@11	2427 f:SetBackdropBorderColor (r, g, b, a)
Tercio@11	2428 end
Tercio@11	2429
Tercio@11	2430 end
Tercio@11	2431
Tercio@11	2432 function CoolTip:SetBannerImage (index, texturepath, width, height, anchor, texcoord, overlay)
Tercio@11	2433
Tercio@11	2434 local texture
Tercio@11	2435
Tercio@11	2436 if (index == 1) then
Tercio@11	2437 texture = frame1.upperImage
Tercio@11	2438 elseif (index == 2) then
Tercio@11	2439 texture = frame1.upperImage2
Tercio@11	2440 end
Tercio@11	2441
Tercio@11	2442 if (texturepath) then
Tercio@11	2443 texture:SetTexture (texturepath)
Tercio@11	2444 end
Tercio@11	2445
Tercio@11	2446 if (width) then
Tercio@11	2447 texture:SetWidth (width)
Tercio@11	2448 end
Tercio@11	2449 if (height) then
Tercio@11	2450 texture:SetHeight (height)
Tercio@11	2451 end
Tercio@11	2452
Tercio@11	2453 if (anchor) then
Tercio@11	2454 if (type (anchor[1]) == "table") then
Tercio@11	2455 for _, t in _ipairs (anchor) do
Tercio@11	2456 local myAnchor, hisAnchor, x, y = unpack (t)
Tercio@11	2457 texture:SetPoint (myAnchor, frame1, hisAnchor or myAnchor, x or 0, y or 0)
Tercio@11	2458 end
Tercio@11	2459 else
Tercio@11	2460 local myAnchor, hisAnchor, x, y = unpack (anchor)
Tercio@11	2461 texture:SetPoint (myAnchor, frame1, hisAnchor or myAnchor, x or 0, y or 0)
Tercio@11	2462 end
Tercio@11	2463 end
Tercio@11	2464
Tercio@11	2465 if (texcoord) then
Tercio@11	2466 local L, R, T, B = unpack (texcoord)
Tercio@11	2467 texture:SetTexCoord (L, R, T, B)
Tercio@11	2468 end
Tercio@11	2469
Tercio@11	2470 if (overlay) then
Tercio@11	2471 texture:SetVertexColor (unpack (overlay))
Tercio@11	2472 end
Tercio@11	2473
Tercio@11	2474 CoolTip.Banner [index] = true
Tercio@11	2475 texture:Show()
Tercio@11	2476
Tercio@11	2477 end
Tercio@11	2478
Tercio@11	2479 ----------------------------------------------------------------------
Tercio@11	2480 --> adds a icon to the last line added.
Tercio@11	2481 --> only works with cooltip type 1 and 2 (tooltip and tooltip with bars)
Tercio@11	2482 --> parameters: icon [, width [, height [, TexCoords L R T B ]]]
Tercio@11	2483 --> texture support string path or texture object
Tercio@11	2484
Tercio@11	2485 function CoolTip:AddTexture (iconTexture, frame, side, iconWidth, iconHeight, L, R, T, B, overlayColor, point, desaturated)
Tercio@11	2486 return CoolTip:AddIcon (iconTexture, frame, side, iconWidth, iconHeight, L, R, T, B, overlayColor, point, desaturated)
Tercio@11	2487 end
Tercio@11	2488 function CoolTip:AddIcon (iconTexture, frame, side, iconWidth, iconHeight, L, R, T, B, overlayColor, point, desaturated)
Tercio@11	2489
Tercio@11	2490 --> need a previous line
Tercio@11	2491 if (CoolTip.Indexes == 0) then
Tercio@11	2492 return --> return error
Tercio@11	2493 end
Tercio@11	2494
Tercio@11	2495 --> check data integrity
Tercio@39	2496 if ( (type (iconTexture) ~= "string" and type (iconTexture) ~= "number") and (type (iconTexture) ~= "table" or not iconTexture.GetObjectType or iconTexture:GetObjectType() ~= "Texture") ) then
Tercio@11	2497 return --> return error
Tercio@11	2498 end
Tercio@11	2499
Tercio@11	2500 side = side or 1
Tercio@11	2501
Tercio@11	2502 local frameTable
Tercio@11	2503 local iconTable
Tercio@11	2504
Tercio@11	2505 if (not frame or (type (frame) == "string" and frame == "main") or (type (frame) == "number" and frame == 1)) then
Tercio@11	2506
Tercio@11	2507 if (not side or (type (side) == "string" and side == "left") or (type (side) == "number" and side == 1)) then
Tercio@11	2508 frameTable = CoolTip.LeftIconTable
Tercio@11	2509
Tercio@11	2510 elseif ((type (side) == "string" and side == "right") or (type (side) == "number" and side == 2)) then
Tercio@11	2511 frameTable = CoolTip.RightIconTable
Tercio@11	2512
Tercio@11	2513 end
Tercio@11	2514
Tercio@11	2515 if (CoolTip.isSpecial) then
Tercio@11	2516 iconTable = {}
Tercio@11	2517 _table_insert (frameTable, CoolTip.Indexes, iconTable)
Tercio@11	2518 else
Tercio@11	2519 iconTable = frameTable [CoolTip.Indexes]
Tercio@11	2520 if (not iconTable) then
Tercio@11	2521 iconTable = {}
Tercio@11	2522 _table_insert (frameTable, CoolTip.Indexes, iconTable)
Tercio@11	2523 --frameTable [CoolTip.Indexes] = iconTable
Tercio@11	2524 end
Tercio@11	2525 end
Tercio@11	2526
Tercio@11	2527 elseif ((type (frame) == "string" and frame == "sub") or (type (frame) == "number" and frame == 2)) then
Tercio@11	2528
Tercio@11	2529 if ((type (side) == "string" and side == "left") or (type (side) == "number" and side == 1)) then
Tercio@11	2530 frameTable = CoolTip.LeftIconTableSub
Tercio@11	2531 elseif ((type (side) == "string" and side == "right") or (type (side) == "number" and side == 2)) then
Tercio@11	2532 frameTable = CoolTip.RightIconTableSub
Tercio@11	2533 elseif ((type (side) == "string" and side == "top") or (type (side) == "number" and side == 3)) then
Tercio@11	2534 CoolTip.TopIconTableSub [CoolTip.Indexes] = CoolTip.TopIconTableSub [CoolTip.Indexes] or {}
Tercio@11	2535 CoolTip.TopIconTableSub [CoolTip.Indexes] [1] = iconTexture
Tercio@11	2536 CoolTip.TopIconTableSub [CoolTip.Indexes] [2] = iconWidth or 16
Tercio@11	2537 CoolTip.TopIconTableSub [CoolTip.Indexes] [3] = iconHeight or 16
Tercio@11	2538 CoolTip.TopIconTableSub [CoolTip.Indexes] [4] = L or 0
Tercio@11	2539 CoolTip.TopIconTableSub [CoolTip.Indexes] [5] = R or 1
Tercio@11	2540 CoolTip.TopIconTableSub [CoolTip.Indexes] [6] = T or 0
Tercio@11	2541 CoolTip.TopIconTableSub [CoolTip.Indexes] [7] = B or 1
Tercio@11	2542 CoolTip.TopIconTableSub [CoolTip.Indexes] [8] = overlayColor or _default_color
Tercio@11	2543 CoolTip.TopIconTableSub [CoolTip.Indexes] [9] = desaturated
Tercio@11	2544 return
Tercio@11	2545 end
Tercio@11	2546
Tercio@11	2547 local subMenuContainerIcons = frameTable [CoolTip.Indexes]
Tercio@11	2548 if (not subMenuContainerIcons) then
Tercio@11	2549 subMenuContainerIcons = {}
Tercio@11	2550 frameTable [CoolTip.Indexes] = subMenuContainerIcons
Tercio@11	2551 end
Tercio@11	2552
Tercio@11	2553 if (CoolTip.isSpecial) then
Tercio@11	2554 iconTable = {}
Tercio@11	2555 subMenuContainerIcons [CoolTip.SubIndexes] = iconTable
Tercio@11	2556 else
Tercio@11	2557 iconTable = subMenuContainerIcons [CoolTip.SubIndexes]
Tercio@11	2558 if (not iconTable) then
Tercio@11	2559 iconTable = {}
Tercio@11	2560 subMenuContainerIcons [CoolTip.SubIndexes] = iconTable
Tercio@11	2561 end
Tercio@11	2562 end
Tercio@11	2563
Tercio@11	2564 else
Tercio@11	2565 return --> error
Tercio@11	2566 end
Tercio@11	2567
Tercio@11	2568 iconTable [1] = iconTexture
Tercio@11	2569 iconTable [2] = iconWidth or 16 --> default 16
Tercio@11	2570 iconTable [3] = iconHeight or 16 --> default 16
Tercio@11	2571 iconTable [4] = L or 0 --> default 0
Tercio@11	2572 iconTable [5] = R or 1 --> default 1
Tercio@11	2573 iconTable [6] = T or 0 --> default 0
Tercio@11	2574 iconTable [7] = B or 1 --> default 1
Tercio@11	2575 iconTable [8] = overlayColor or _default_color --> default 1, 1, 1
Tercio@11	2576 iconTable [9] = desaturated
Tercio@11	2577
Tercio@11	2578 return true
Tercio@11	2579 end
Tercio@11	2580
Tercio@11	2581 ----------------------------------------------------------------------
Tercio@20	2582 --> popup frame
Tercio@20	2583 function CoolTip:AddPopUpFrame (func_on_show, func_on_hide, param1, param2)
Tercio@20	2584
Tercio@20	2585 -- act like a sub menu
Tercio@20	2586 if (CoolTip.Indexes > 0) then
Tercio@20	2587 CoolTip.PopupFrameTable [CoolTip.Indexes] = {func_on_show or false, func_on_hide or false, param1, param2}
Tercio@20	2588 end
Tercio@20	2589
Tercio@20	2590 end
Tercio@20	2591
Tercio@20	2592 ----------------------------------------------------------------------
Tercio@11	2593 --> adds a line.
Tercio@11	2594 --> only works with cooltip type 1 and 2 (tooltip and tooltip with bars)
Tercio@11	2595 --> parameters: left text, right text [, L color R, L color G, L color B, L color A [, R color R, R color G, R color B, R color A [, wrap]]]
Tercio@11	2596
Tercio@11	2597 --> alias
Tercio@11	2598 function CoolTip:AddDoubleLine (leftText, rightText, frame, ColorR1, ColorG1, ColorB1, ColorA1, ColorR2, ColorG2, ColorB2, ColorA2, fontSize, fontFace, fontFlag)
Tercio@11	2599 return CoolTip:AddLine (leftText, rightText, frame, ColorR1, ColorG1, ColorB1, ColorA1, ColorR2, ColorG2, ColorB2, ColorA2, fontSize, fontFace, fontFlag)
Tercio@11	2600 end
Tercio@11	2601
Tercio@11	2602 --> adds a line for tooltips
Tercio@11	2603 function CoolTip:AddLine (leftText, rightText, frame, ColorR1, ColorG1, ColorB1, ColorA1, ColorR2, ColorG2, ColorB2, ColorA2, fontSize, fontFace, fontFlag)
Tercio@11	2604
Tercio@11	2605 --> check data integrity
Tercio@11	2606 local t = type (leftText)
Tercio@11	2607 if (t ~= "string") then
Tercio@11	2608 if (t == "number") then
Tercio@11	2609 leftText = tostring (leftText)
Tercio@11	2610 else
Tercio@11	2611 leftText = ""
Tercio@11	2612 end
Tercio@11	2613 end
Tercio@11	2614
Tercio@11	2615 local t = type (rightText)
Tercio@11	2616 if (t ~= "string") then
Tercio@11	2617 if (t == "number") then
Tercio@11	2618 rightText = tostring (rightText)
Tercio@11	2619 else
Tercio@11	2620 rightText = ""
Tercio@11	2621 end
Tercio@11	2622 end
Tercio@11	2623
Tercio@11	2624 if (type (ColorR1) ~= "number") then
Tercio@11	2625 ColorR2, ColorG2, ColorB2, ColorA2, fontSize, fontFace, fontFlag = ColorG1, ColorB1, ColorA1, ColorR2, ColorG2, ColorB2, ColorA2
Tercio@11	2626
Tercio@11	2627 if (type (ColorR1) == "boolean" or not ColorR1) then
Tercio@11	2628 ColorR1, ColorG1, ColorB1, ColorA1 = 0, 0, 0, 0
Tercio@11	2629 else
Tercio@11	2630 ColorR1, ColorG1, ColorB1, ColorA1 = DF:ParseColors (ColorR1)
Tercio@11	2631 end
Tercio@11	2632 end
Tercio@11	2633
Tercio@11	2634 if (type (ColorR2) ~= "number") then
Tercio@11	2635 fontSize, fontFace, fontFlag = ColorG2, ColorB2, ColorA2
Tercio@11	2636
Tercio@11	2637 if (type (ColorR2) == "boolean" or not ColorR2) then
Tercio@11	2638 ColorR2, ColorG2, ColorB2, ColorA2 = 0, 0, 0, 0
Tercio@11	2639 else
Tercio@11	2640 ColorR2, ColorG2, ColorB2, ColorA2 = DF:ParseColors (ColorR2)
Tercio@11	2641 end
Tercio@11	2642 end
Tercio@11	2643
Tercio@11	2644 local frameTableLeft
Tercio@11	2645 local frameTableRight
Tercio@11	2646 local lineTable_left
Tercio@11	2647 local lineTable_right
Tercio@11	2648
Tercio@11	2649 if (not frame or (type (frame) == "string" and frame == "main") or (type (frame) == "number" and frame == 1)) then
Tercio@11	2650
Tercio@11	2651 CoolTip.Indexes = CoolTip.Indexes + 1
Tercio@11	2652
Tercio@11	2653 if (not CoolTip.IndexesSub [CoolTip.Indexes]) then
Tercio@11	2654 CoolTip.IndexesSub [CoolTip.Indexes] = 0
Tercio@11	2655 end
Tercio@11	2656
Tercio@11	2657 CoolTip.SubIndexes = 0
Tercio@11	2658
Tercio@11	2659 frameTableLeft = CoolTip.LeftTextTable
Tercio@11	2660 frameTableRight = CoolTip.RightTextTable
Tercio@11	2661
Tercio@11	2662 if (CoolTip.isSpecial) then
Tercio@11	2663 lineTable_left = {}
Tercio@11	2664 _table_insert (frameTableLeft, CoolTip.Indexes, lineTable_left)
Tercio@11	2665 lineTable_right = {}
Tercio@11	2666 _table_insert (frameTableRight, CoolTip.Indexes, lineTable_right)
Tercio@11	2667 else
Tercio@11	2668 lineTable_left = frameTableLeft [CoolTip.Indexes]
Tercio@11	2669 lineTable_right = frameTableRight [CoolTip.Indexes]
Tercio@11	2670
Tercio@11	2671 if (not lineTable_left) then
Tercio@11	2672 lineTable_left = {}
Tercio@11	2673 _table_insert (frameTableLeft, CoolTip.Indexes, lineTable_left)
Tercio@11	2674 end
Tercio@11	2675 if (not lineTable_right) then
Tercio@11	2676 lineTable_right = {}
Tercio@11	2677 _table_insert (frameTableRight, CoolTip.Indexes, lineTable_right)
Tercio@11	2678 end
Tercio@11	2679 end
Tercio@11	2680
Tercio@11	2681 elseif ((type (frame) == "string" and frame == "sub") or (type (frame) == "number" and frame == 2)) then
Tercio@11	2682
Tercio@11	2683 CoolTip.SubIndexes = CoolTip.SubIndexes + 1
Tercio@11	2684 CoolTip.IndexesSub [CoolTip.Indexes] = CoolTip.IndexesSub [CoolTip.Indexes] + 1
Tercio@11	2685 CoolTip.HaveSubMenu = true
Tercio@11	2686
Tercio@11	2687 frameTableLeft = CoolTip.LeftTextTableSub
Tercio@11	2688 frameTableRight = CoolTip.RightTextTableSub
Tercio@11	2689
Tercio@11	2690 local subMenuContainerTexts = frameTableLeft [CoolTip.Indexes]
Tercio@11	2691 if (not subMenuContainerTexts) then
Tercio@11	2692 subMenuContainerTexts = {}
Tercio@11	2693 _table_insert (frameTableLeft, CoolTip.Indexes, subMenuContainerTexts)
Tercio@11	2694 end
Tercio@11	2695
Tercio@11	2696 if (CoolTip.isSpecial) then
Tercio@11	2697 lineTable_left = {}
Tercio@11	2698 _table_insert (subMenuContainerTexts, CoolTip.SubIndexes, lineTable_left)
Tercio@11	2699 else
Tercio@11	2700 lineTable_left = subMenuContainerTexts [CoolTip.SubIndexes]
Tercio@11	2701 if (not lineTable_left) then
Tercio@11	2702 lineTable_left = {}
Tercio@11	2703 --subMenuContainerTexts [CoolTip.SubIndexes] = lineTable_left
Tercio@11	2704 _table_insert (subMenuContainerTexts, CoolTip.SubIndexes, lineTable_left)
Tercio@11	2705 end
Tercio@11	2706 end
Tercio@11	2707
Tercio@11	2708 local subMenuContainerTexts = frameTableRight [CoolTip.Indexes]
Tercio@11	2709 if (not subMenuContainerTexts) then
Tercio@11	2710 subMenuContainerTexts = {}
Tercio@11	2711 _table_insert (frameTableRight, CoolTip.Indexes, subMenuContainerTexts)
Tercio@11	2712 --frameTableRight [CoolTip.Indexes] = subMenuContainerTexts
Tercio@11	2713 end
Tercio@11	2714
Tercio@11	2715 if (CoolTip.isSpecial) then
Tercio@11	2716 lineTable_right = {}
Tercio@11	2717 _table_insert (subMenuContainerTexts, CoolTip.SubIndexes, lineTable_right)
Tercio@11	2718 else
Tercio@11	2719 lineTable_right = subMenuContainerTexts [CoolTip.SubIndexes]
Tercio@11	2720 if (not lineTable_right) then
Tercio@11	2721 lineTable_right = {}
Tercio@11	2722 _table_insert (subMenuContainerTexts, CoolTip.SubIndexes, lineTable_right)
Tercio@11	2723 --subMenuContainerTexts [CoolTip.SubIndexes] = lineTable_right
Tercio@11	2724 end
Tercio@11	2725 end
Tercio@11	2726 else
Tercio@11	2727 return --> error
Tercio@11	2728 end
Tercio@11	2729
Tercio@11	2730 lineTable_left [1] = leftText --> line text
Tercio@11	2731 lineTable_left [2] = ColorR1
Tercio@11	2732 lineTable_left [3] = ColorG1
Tercio@11	2733 lineTable_left [4] = ColorB1
Tercio@11	2734 lineTable_left [5] = ColorA1
Tercio@11	2735 lineTable_left [6] = fontSize
Tercio@11	2736 lineTable_left [7] = fontFace
Tercio@11	2737 lineTable_left [8] = fontFlag
Tercio@11	2738
Tercio@11	2739 lineTable_right [1] = rightText --> line text
Tercio@11	2740 lineTable_right [2] = ColorR2
Tercio@11	2741 lineTable_right [3] = ColorG2
Tercio@11	2742 lineTable_right [4] = ColorB2
Tercio@11	2743 lineTable_right [5] = ColorA2
Tercio@11	2744 lineTable_right [6] = fontSize
Tercio@11	2745 lineTable_right [7] = fontFace
Tercio@11	2746 lineTable_right [8] = fontFlag
Tercio@11	2747 end
Tercio@11	2748
Tercio@11	2749 function CoolTip:AddSpecial (widgetType, index, subIndex, ...)
Tercio@11	2750
Tercio@11	2751 local currentIndex = CoolTip.Indexes
Tercio@11	2752 local currentSubIndex = CoolTip.SubIndexes
Tercio@11	2753 CoolTip.isSpecial = true
Tercio@11	2754
Tercio@11	2755 widgetType = string.lower (widgetType)
Tercio@11	2756
Tercio@11	2757 if (widgetType == "line") then
Tercio@11	2758
Tercio@11	2759 if (subIndex) then
Tercio@11	2760 CoolTip.Indexes = index
Tercio@11	2761 CoolTip.SubIndexes = subIndex-1
Tercio@11	2762 else
Tercio@11	2763 CoolTip.Indexes = index-1
Tercio@11	2764 end
Tercio@11	2765
Tercio@11	2766 CoolTip:AddLine (...)
Tercio@11	2767
Tercio@11	2768 if (subIndex) then
Tercio@11	2769 CoolTip.Indexes = currentIndex
Tercio@11	2770 CoolTip.SubIndexes = currentSubIndex+1
Tercio@11	2771 else
Tercio@11	2772 CoolTip.Indexes = currentIndex+1
Tercio@11	2773 end
Tercio@11	2774
Tercio@11	2775 elseif (widgetType == "icon") then
Tercio@11	2776
Tercio@11	2777 CoolTip.Indexes = index
Tercio@11	2778 if (subIndex) then
Tercio@11	2779 CoolTip.SubIndexes = subIndex
Tercio@11	2780 end
Tercio@11	2781
Tercio@11	2782 CoolTip:AddIcon (...)
Tercio@11	2783
Tercio@11	2784 CoolTip.Indexes = currentIndex
Tercio@11	2785 if (subIndex) then
Tercio@11	2786 CoolTip.SubIndexes = currentSubIndex
Tercio@11	2787 end
Tercio@11	2788
Tercio@11	2789 elseif (widgetType == "statusbar") then
Tercio@11	2790
Tercio@11	2791 CoolTip.Indexes = index
Tercio@11	2792 if (subIndex) then
Tercio@11	2793 CoolTip.SubIndexes = subIndex
Tercio@11	2794 end
Tercio@11	2795
Tercio@11	2796 CoolTip:AddStatusBar (...)
Tercio@11	2797
Tercio@11	2798 CoolTip.Indexes = currentIndex
Tercio@11	2799 if (subIndex) then
Tercio@11	2800 CoolTip.SubIndexes = currentSubIndex
Tercio@11	2801 end
Tercio@11	2802
Tercio@11	2803 elseif (widgetType == "menu") then
Tercio@11	2804
Tercio@11	2805 CoolTip.Indexes = index
Tercio@11	2806 if (subIndex) then
Tercio@11	2807 CoolTip.SubIndexes = subIndex
Tercio@11	2808 end
Tercio@11	2809
Tercio@11	2810 CoolTip:AddMenu (...)
Tercio@11	2811
Tercio@11	2812 CoolTip.Indexes = currentIndex
Tercio@11	2813 if (subIndex) then
Tercio@11	2814 CoolTip.SubIndexes = currentSubIndex
Tercio@11	2815 end
Tercio@11	2816
Tercio@11	2817 end
Tercio@11	2818
Tercio@11	2819 CoolTip.isSpecial = false
Tercio@11	2820
Tercio@11	2821 end
Tercio@11	2822
Tercio@11	2823 --> search key: ~fromline
Tercio@11	2824 function CoolTip:AddFromTable (_table)
Tercio@11	2825 for index, menu in _ipairs (_table) do
Tercio@11	2826 if (menu.func) then
Tercio@11	2827 CoolTip:AddMenu (menu.type or 1, menu.func, menu.param1, menu.param2, menu.param3, nil, menu.icon)
Tercio@11	2828 elseif (menu.statusbar) then
Tercio@11	2829 CoolTip:AddStatusBar (menu.value, menu.type or 1, menu.color, true)
Tercio@11	2830 elseif (menu.icon) then
Tercio@11	2831 CoolTip:AddIcon (menu.icon, menu.type or 1, menu.side or 1, menu.width, menu.height, menu.l, menu.r, menu.t, menu.b, menu.color)
Tercio@11	2832 elseif (menu.textleft or menu.textright or menu.text) then
Tercio@11	2833 CoolTip:AddLine (menu.text, "", menu.type, menu.color, menu.color)
Tercio@11	2834 end
Tercio@11	2835 end
Tercio@11	2836 end
Tercio@11	2837
Tercio@11	2838 ----------------------------------------------------------------------
Tercio@11	2839 --> show cooltip
Tercio@11	2840
Tercio@11	2841 --> serach key: ~start
Tercio@11	2842 function CoolTip:Show (frame, menuType, color)
Tercio@20	2843 CoolTip.had_interaction = false
Tercio@11	2844 return CoolTip:ShowCooltip (frame, menuType, color)
Tercio@11	2845 end
Tercio@11	2846
Tercio@11	2847 function CoolTip:ShowCooltip (frame, menuType, color)
Tercio@11	2848
Tercio@20	2849 CoolTip.had_interaction = false
Tercio@20	2850
Tercio@11	2851 if (frame) then
Tercio@11	2852 --> details framework
Tercio@11	2853 if (frame.dframework) then
Tercio@11	2854 frame = frame.widget
Tercio@11	2855 end
Tercio@11	2856 CoolTip:SetHost (frame)
Tercio@11	2857 end
Tercio@11	2858 if (menuType) then
Tercio@11	2859 CoolTip:SetType (menuType)
Tercio@11	2860 end
Tercio@11	2861 if (color) then
Tercio@11	2862 CoolTip:SetColor (1, color)
Tercio@11	2863 CoolTip:SetColor (2, color)
Tercio@11	2864 end
Tercio@11	2865
Tercio@11	2866 if (CoolTip.Type == 1 or CoolTip.Type == 2) then
Tercio@11	2867 return CoolTip:monta_tooltip()
Tercio@11	2868
Tercio@11	2869 elseif (CoolTip.Type == 3) then
Tercio@11	2870 return CoolTip:monta_cooltip()
Tercio@11	2871
Tercio@11	2872 end
Tercio@11	2873 end
Tercio@11	2874
Tercio@11	2875 local emptyOptions = {}
Tercio@11	2876
Tercio@11	2877 function CoolTip:Hide()
Tercio@11	2878 return CoolTip:Close()
Tercio@11	2879 end
Tercio@11	2880
Tercio@11	2881 function CoolTip:Close()
Tercio@11	2882 CoolTip.active = false
Tercio@11	2883 CoolTip.Host = nil
Tercio@26	2884 DF:FadeFrame (frame1, 1)
Tercio@26	2885 DF:FadeFrame (frame2, 1)
Tercio@11	2886
Tercio@11	2887 end
Tercio@11	2888
Tercio@11	2889 --> old function call
Tercio@11	2890 function CoolTip:ShowMe (host, arg2)
Tercio@11	2891 --> ignore if mouse is up me
Tercio@11	2892 if (CoolTip.mouseOver) then
Tercio@11	2893 return
Tercio@11	2894 end
Tercio@11	2895
Tercio@11	2896 if (not host or not arg2) then --> hideme
Tercio@11	2897 CoolTip:Close()
Tercio@11	2898 end
Tercio@11	2899 end
Tercio@11	2900
Tercio@11	2901 --> search key: ~inject
Tercio@11	2902 function CoolTip:ExecFunc (host, fromClick)
Tercio@11	2903
Tercio@11	2904 if (host.dframework) then
Tercio@11	2905 if (not host.widget.CoolTip) then
Tercio@11	2906 host.widget.CoolTip = host.CoolTip
Tercio@11	2907 end
Tercio@11	2908 host = host.widget
Tercio@11	2909 end
Tercio@11	2910
Tercio@11	2911 CoolTip:Reset()
Tercio@11	2912 CoolTip:SetType (host.CoolTip.Type)
Tercio@11	2913 CoolTip:SetFixedParameter (host.CoolTip.FixedValue)
Tercio@11	2914 CoolTip:SetColor ("main", host.CoolTip.MainColor or "transparent")
Tercio@11	2915 CoolTip:SetColor ("sec", host.CoolTip.SubColor or "transparent")
Tercio@11	2916
Tercio@11	2917 CoolTip:SetOwner (host, host.CoolTip.MyAnchor, host.CoolTip.HisAnchor, host.CoolTip.X, host.CoolTip.Y)
Tercio@11	2918
Tercio@11	2919 local options = host.CoolTip.Options
Tercio@11	2920 if (type (options) == "function") then
Tercio@11	2921 options = options()
Tercio@11	2922 end
Tercio@11	2923 if (options) then
Tercio@11	2924 for optionName, optionValue in pairs (options) do
Tercio@11	2925 CoolTip:SetOption (optionName, optionValue)
Tercio@11	2926 end
Tercio@11	2927 end
Tercio@11	2928
Tercio@11	2929 host.CoolTip.BuildFunc()
Tercio@11	2930
Tercio@11	2931 if (CoolTip.Indexes == 0) then
Tercio@11	2932 if (host.CoolTip.Default) then
Tercio@11	2933 CoolTip:SetType ("tooltip")
Tercio@11	2934 CoolTip:AddLine (host.CoolTip.Default, nil, 1, "white")
Tercio@11	2935 end
Tercio@11	2936 end
Tercio@11	2937
Tercio@11	2938 CoolTip:ShowCooltip()
Tercio@11	2939
Tercio@11	2940 if (fromClick) then
Tercio@11	2941 --UIFrameFlash (frame1, )
Tercio@11	2942 frame1:Flash (0.05, 0.05, 0.2, true, 0, 0)
Tercio@11	2943 end
Tercio@11	2944 end
Tercio@11	2945
Tercio@11	2946 local wait = 0.2
Tercio@11	2947
Tercio@11	2948 local InjectOnUpdateEnter = function (self, elapsed)
Tercio@11	2949 elapsedTime = elapsedTime+elapsed
Tercio@11	2950 if (elapsedTime > wait) then
Tercio@11	2951 self:SetScript ("OnUpdate", nil)
Tercio@11	2952 CoolTip:ExecFunc (self)
Tercio@11	2953 end
Tercio@11	2954 end
Tercio@11	2955
Tercio@11	2956 local InjectOnUpdateLeave = function (self, elapsed)
Tercio@11	2957 elapsedTime = elapsedTime+elapsed
Tercio@11	2958 if (elapsedTime > 0.2) then
Tercio@11	2959 if (not CoolTip.mouseOver and not CoolTip.buttonOver and self == CoolTip.Host) then
Tercio@11	2960 CoolTip:ShowMe (false)
Tercio@11	2961 end
Tercio@11	2962 self:SetScript ("OnUpdate", nil)
Tercio@11	2963 end
Tercio@11	2964 end
Tercio@11	2965
Tercio@11	2966 local InjectOnLeave = function (self)
Tercio@11	2967 CoolTip.buttonOver = false
Tercio@11	2968
Tercio@11	2969 if (CoolTip.active) then
Tercio@11	2970 elapsedTime = 0
Tercio@11	2971 self:SetScript ("OnUpdate", InjectOnUpdateLeave)
Tercio@11	2972 else
Tercio@11	2973 self:SetScript ("OnUpdate", nil)
Tercio@11	2974 end
Tercio@11	2975
Tercio@11	2976 if (self.CoolTip.OnLeaveFunc) then
Tercio@11	2977 self.CoolTip.OnLeaveFunc (self)
Tercio@11	2978 end
Tercio@11	2979
Tercio@11	2980 if (self.OldOnLeaveScript) then
Tercio@11	2981 self:OldOnLeaveScript()
Tercio@11	2982 end
Tercio@11	2983 end
Tercio@11	2984
Tercio@11	2985 local InjectOnEnter = function (self)
Tercio@11	2986 CoolTip.buttonOver = true
Tercio@11	2987 if (CoolTip.active) then
Tercio@11	2988 CoolTip:ExecFunc (self)
Tercio@11	2989 else
Tercio@11	2990 elapsedTime = 0
Tercio@11	2991 wait = self.CoolTip.ShowSpeed or 0.2
Tercio@11	2992 self:SetScript ("OnUpdate", InjectOnUpdateEnter)
Tercio@11	2993 end
Tercio@11	2994
Tercio@11	2995 if (self.CoolTip.OnEnterFunc) then
Tercio@11	2996 self.CoolTip.OnEnterFunc (self)
Tercio@11	2997 end
Tercio@11	2998
Tercio@11	2999 if (self.OldOnEnterScript) then
Tercio@11	3000 self:OldOnEnterScript()
Tercio@11	3001 end
Tercio@11	3002 end
Tercio@11	3003
Tercio@11	3004 function CoolTip:CoolTipInject (host, openOnClick)
Tercio@11	3005 if (host.dframework) then
Tercio@11	3006 if (not host.widget.CoolTip) then
Tercio@11	3007 host.widget.CoolTip = host.CoolTip
Tercio@11	3008 end
Tercio@11	3009 host = host.widget
Tercio@11	3010 end
Tercio@11	3011
Tercio@11	3012 local coolTable = host.CoolTip
Tercio@11	3013 if (not coolTable) then
Tercio@11	3014 print ("Host nao tem uma CoolTable.")
Tercio@11	3015 return false
Tercio@11	3016 end
Tercio@11	3017
Tercio@11	3018 host.OldOnEnterScript = host:GetScript ("OnEnter")
Tercio@11	3019 host.OldOnLeaveScript = host:GetScript ("OnLeave")
Tercio@11	3020
Tercio@11	3021 host:SetScript ("OnEnter", InjectOnEnter)
Tercio@11	3022 host:SetScript ("OnLeave", InjectOnLeave)
Tercio@11	3023
Tercio@11	3024 if (openOnClick) then
Tercio@11	3025 if (host:GetObjectType() == "Button") then
Tercio@11	3026 host:SetScript ("OnClick", function() CoolTip:ExecFunc (host, true) end)
Tercio@11	3027 end
Tercio@11	3028 end
Tercio@11	3029
Tercio@11	3030 return ture
Tercio@11	3031 end
Tercio@11	3032
Tercio@11	3033 --> all done
Tercio@11	3034 CoolTip:ClearAllOptions()
Tercio@11	3035
Tercio@39	3036 -- local preset2_backdrop = {bgFile = [[Interface\DialogFrame\UI-DialogBox-Background-Dark]], edgeFile = DF.folder .. "border_3", tile=true,
Tercio@39	3037 -- edgeSize = 16, tileSize = 64, insets = {left = 3, right = 3, top = 4, bottom = 4}}
Tercio@11	3038
Tercio@39	3039 local preset2_backdrop = {bgFile = DF.folder .. "background", edgeFile = [[Interface\Buttons\WHITE8X8]], tile = true,
Tercio@39	3040 edgeSize = 1, tileSize = 16, insets = {left = 0, right = 0, top = 0, bottom = 0}}
Tercio@39	3041 local default_backdrop_color = {0.09019, 0.09019, 0.18823, 0.8}
Tercio@39	3042 local default_backdropborder_color = {1, 1, 1, 1}
Tercio@39	3043
Tercio@39	3044 local gray_table = {0.37, 0.37, 0.37, 0.95}
Tercio@11	3045 local white_table = {1, 1, 1, 1}
Tercio@39	3046 local black_table = {0.2, 0.2, 0.2, 1}
Tercio@11	3047
Tercio@11	3048 function CoolTip:Preset (number)
Tercio@11	3049 self:Reset()
Tercio@11	3050
Tercio@11	3051 if (number == 1) then
Tercio@11	3052 self:SetOption ("TextFont", "Friz Quadrata TT")
Tercio@11	3053 self:SetOption ("TextColor", "orange")
Tercio@11	3054 self:SetOption ("TextSize", 12)
Tercio@11	3055 self:SetOption ("ButtonsYMod", -4)
Tercio@11	3056 self:SetOption ("YSpacingMod", -4)
Tercio@11	3057 self:SetOption ("IgnoreButtonAutoHeight", true)
Tercio@11	3058 self:SetColor (1, 0.5, 0.5, 0.5, 0.5)
Tercio@11	3059
Tercio@11	3060 elseif (number == 2) then
Tercio@11	3061 self:SetOption ("TextFont", "Friz Quadrata TT")
Tercio@11	3062 self:SetOption ("TextColor", "orange")
Tercio@11	3063 self:SetOption ("TextSize", 12)
Tercio@11	3064 self:SetOption ("FixedWidth", 220)
Tercio@11	3065 self:SetOption ("ButtonsYMod", -4)
Tercio@11	3066 self:SetOption ("YSpacingMod", -4)
Tercio@11	3067 self:SetOption ("IgnoreButtonAutoHeight", true)
Tercio@11	3068
Tercio@39	3069 --self:SetColor (1, 0.5, 0.5, 0.5, 0.5)
Tercio@39	3070 self:SetColor (1, 0.5, 0.5, 0.5, 0)
Tercio@39	3071
Tercio@39	3072 self:SetBackdrop (1, preset2_backdrop, gray_table, black_table)
Tercio@11	3073 end
Tercio@11	3074 end
Tercio@11	3075
Tercio@11	3076 return CoolTip
Tercio@11	3077
Tercio@11	3078 end
Tercio@11	3079
Tercio@11	3080 DF:CreateCoolTip()

Mercurial > wow > hansgar_and_franzok_assist

annotate Libs/DF/cooltip.lua @ 39:7944c081e5b4