vanilla-wow-addons – Rev 1
?pathlinks?
-- Display the fish you're catching and/or have caught in a live display
FishingBuddy.WatchFrame = {};
local MAX_FISHINGWATCH_LINES = 20;
local WATCHDRAGGER_SHOW_DELAY = 0.2;
local WATCHDRAGGER_FADE_TIME = 0.15;
local DRAGFRAME_TEXTURES = {
"Background",
"TopLeft",
"TopRight",
"BottomLeft",
"BottomRight",
"Top",
"Bottom",
"Left",
"Right"
};
local function ShowDraggerFrame()
if ( not FishingWatchDragFrame:IsVisible() ) then
local width = FishingWatchFrame:GetWidth();
local height = FishingWatchFrame:GetHeight();
FishingWatchDragFrame:SetHeight(height);
FishingWatchDragFrame:SetWidth(width);
FishingWatchDragFrame:Show();
for index, value in DRAGFRAME_TEXTURES do
UIFrameFadeIn(getglobal("FishingWatchDragFrame"..value), WATCHDRAGGER_FADE_TIME, 0, 0.25);
end
end
end
local function HideDraggerFrame()
if ( FishingWatchDragFrame:IsVisible() ) then
for index, value in DRAGFRAME_TEXTURES do
UIFrameFadeOut(getglobal("FishingWatchDragFrame"..value), WATCHDRAGGER_FADE_TIME, 0.25, 0);
end
FishingWatchDragFrame:Hide();
local qx, qy = UIParent:GetCenter();
local wx, wy = FishingWatchDragFrame:GetCenter();
local where = {};
where.x = qx - wx;
where.y = wy - qy;
FishingBuddy.SetSetting("WatcherLocation", where);
end
end
FishingBuddy.Commands[FishingBuddy.WATCHER] = {};
FishingBuddy.Commands[FishingBuddy.WATCHER].help = FishingBuddy.WATCHER_HELP;
FishingBuddy.Commands[FishingBuddy.WATCHER].func =
function(what)
if ( what and ( what == FishingBuddy.RESET ) ) then
FishingWatchDragFrame:ClearAllPoints();
FishingWatchDragFrame:SetPoint("CENTER", "UIParent",
"CENTER", 0, 0);
FishingWatchDragFrame:Hide();
FishingBuddy.SetSetting("WatcherLocation", nil);
return true;
end
end;
-- handle really old versions
local function UpdateUnknownZones(zone, subzone)
if ( FishingBuddy_Info["FishingHoles"][FishingBuddy.UNKNOWN] ) then
if ( FishingBuddy_Info["FishingHoles"][FishingBuddy.UNKNOWN][subzone] ) then
if ( not FishingBuddy_Info["FishingHoles"][zone] ) then
FishingBuddy_Info["FishingHoles"][zone] = { };
tinsert(FishingBuddy.SortedZones, zone);
table.sort(FishingBuddy.SortedZones);
end
if ( not FishingBuddy_Info["FishingHoles"][zone][subzone] ) then
FishingBuddy_Info["FishingHoles"][zone][subzone] = { };
end
for k,v in FishingBuddy_Info["FishingHoles"][FishingBuddy.UNKNOWN][subzone] do
FishingBuddy_Info["FishingHoles"][zone][subzone][k] = v;
end
FishingBuddy_Info["FishingHoles"][FishingBuddy.UNKNOWN][subzone] = nil;
end
FishingBuddy.Locations.DataChanged(zone, subzone);
-- Duh, table.getn doesn't work because there aren't any integer
-- keys in this table
if ( next(FishingBuddy_Info["FishingHoles"][FishingBuddy.UNKNOWN]) == nil ) then
FishingBuddy_Info["FishingHoles"][FishingBuddy.UNKNOWN] = nil;
local pos;
while ( pos < table.getn(FishingBuddy.SortedZones) ) do
if ( FishingBuddy.SortedZones[pos] == FishingBuddy.UNKNOWN ) then
break;
end
pos = pos + 1;
end
tremove(FishingBuddy.SortedZones, pos);
end
end
end
-- fix a bug where we were recording 'GetZoneText' instead
-- of 'GetRealZoneText'
local function UpdateRealZones(zone, subzone)
local oldzone = GetZoneText();
if ( FishingBuddy_Info["FishingHoles"][oldzone] and oldzone ~= zone ) then
if ( not FishingBuddy_Info["FishingHoles"][zone] ) then
FishingBuddy_Info["FishingHoles"][zone] = { };
end
for oldsubzone in FishingBuddy_Info["FishingHoles"][oldzone] do
local sub = oldsubzone;
if ( oldsubzone == oldzone ) then
sub = subzone;
end
if ( not FishingBuddy_Info["FishingHoles"][zone][sub] ) then
FishingBuddy_Info["FishingHoles"][zone][sub] = {};
end
for k,v in FishingBuddy_Info["FishingHoles"][oldzone][oldsubzone] do
FishingBuddy_Info["FishingHoles"][zone][sub][k] = v;
end
end
FishingBuddy_Info["FishingHoles"][oldzone] = nil;
end
end
-- Fish watcher functions
FishingBuddy.WatchUpdate = function()
if ( FishingWatchFrame:IsVisible() ) then
FishingWatchFrame:Hide();
for i=1, MAX_FISHINGWATCH_LINES, 1 do
local line = getglobal("FishingWatchLine"..i);
line:Hide();
end
end
local zone, subzone = FishingBuddy.GetZoneInfo();
UpdateUnknownZones(zone, subzone);
UpdateRealZones(zone, subzone);
local fz = FishingBuddy_Info["FishingHoles"][zone];
if ( FishingBuddy.GetSetting("WatchFishies") == 0 or
not fz or not fz[subzone] ) then
return;
end
if ( FishingBuddy.GetSetting("WatchOnlyWhenFishing") == 1 and
not FishingBuddy.IsFishingPole() ) then
return;
end
local current = FishingBuddy.currentFishies;
local ff = FishingBuddy_Info["Fishies"];
local fishsort = {};
local totalCount = 0;
local totalCurrent = 0;
local gotDiffs = false;
for fishid in fz[subzone] do
local info = {};
info.text = ff[fishid].name;
info.count = fz[subzone][fishid];
totalCount = totalCount + info.count;
if ( current[subzone] ) then
info.current = current[subzone][fishid] or 0;
else
info.current = 0;
end
if ( info.current > 0 and info.current ~= info.count ) then
gotDiffs = true;
end
totalCurrent = totalCurrent + info.current;
tinsert(fishsort, info);
end
if ( totalCount == 0 ) then
return;
end
FishingBuddy.FishSort(fishsort);
local fishingWatchMaxWidth = 0;
local tempWidth;
local index = 1;
local start = 1;
local dopercent = FishingBuddy.GetSetting("WatchFishPercent");
if ( FishingBuddy.GetSetting("WatchCurrentZone") == 1 ) then
local entry = getglobal("FishingWatchLine"..index);
local line = zone.." : "..subzone;
entry:SetText(line);
local tempWidth = entry:GetWidth();
if ( tempWidth > fishingWatchMaxWidth ) then
fishingWatchMaxWidth = tempWidth;
end
entry:Show();
index = index + 1;
end
if ( FishingBuddy.GetSetting("WatchCurrentSkill") == 1 ) then
local entry = getglobal("FishingWatchLine"..index);
local skill, mods = FishingBuddy.GetCurrentSkill();
local line = "Skill: |cff00ff00"..skill.."+"..mods.."|r";
if ( StartedFishing ) then
local elapsed = GetTime() - StartedFishing;
local t = math.floor(elapsed);
local seconds = math.mod(t, 60);
t = math.floor(t / 60);
local minutes = math.mod(t, 60);
local hours = math.floor(t / 60);
line = line.." Elapsed: ";
if ( hours < 10 ) then
line = line.."0";
end
line = line..hours..":";
if ( minutes < 10 ) then
line = line.."0";
end
line = line..minutes..":";
if ( seconds < 10 ) then
line = line.."0";
end
line = line..seconds;
end
entry:SetText(line);
local tempWidth = entry:GetWidth();
if ( tempWidth > fishingWatchMaxWidth ) then
fishingWatchMaxWidth = tempWidth;
end
entry:Show();
index = index + 1;
end
for j=1,table.getn(fishsort),1 do
local info = fishsort[j];
if( index <= MAX_FISHINGWATCH_LINES ) then
local entry = getglobal("FishingWatchLine"..index);
local fishie = info.text;
local amount = info.count;
local s,e = string.find(fishie, FishingBuddy.RAW.." ");
if ( s ) then
if ( s > 1 ) then
fishie = string.sub(fishie, 1, s-1)..string.sub(fishie, e+1);
else
fishie = string.sub(fishie, e+1);
end
else
s,e = string.find(fishie, " "..FishingBuddy.RAW);
if ( s ) then
fishie = string.sub(fishie, 1, s-1)..string.sub(fishie, e+1);
end
end
local fishietext = fishie.." ("..amount;
if ( dopercent == 1 ) then
local percent = format("%.1f", ( amount / totalCount ) * 100);
fishietext = fishietext.." : "..percent.."%";
end
if ( gotDiffs ) then
amount = info.current;
local color;
fishietext = fishietext..", |c"..FishingBuddy.Colors.GREEN..amount;
if ( dopercent == 1 ) then
local percent = format("%.1f", ( amount / totalCurrent ) * 100);
fishietext = fishietext.." : "..percent.."%";
end
fishietext = fishietext.."|r";
end
fishietext = fishietext..")";
entry:SetText(fishietext);
tempWidth = entry:GetWidth();
entry:Show();
if ( tempWidth > fishingWatchMaxWidth ) then
fishingWatchMaxWidth = tempWidth;
end
end
index = index + 1;
end
FishingWatchFrame:SetHeight(index * 13);
FishingWatchFrame:SetWidth(fishingWatchMaxWidth + 10);
FishingWatchFrame:Show();
end
FishingBuddy.WatchFrame.OnLoad = function()
local where = FishingBuddy.GetSetting("WatcherLocation");
if ( not where ) then
where = {};
where.x = 0;
where.y = 0;
end
FishingWatchDragFrame:ClearAllPoints();
FishingWatchDragFrame:SetPoint("CENTER", "UIParent", "CENTER",
where.x, where.y);
FishingWatchDragFrame:Hide();
this:ClearAllPoints();
this:SetPoint("TOPRIGHT", "FishingWatchDragFrame", "TOPRIGHT", 0, 0);
end
local hover;
FishingBuddy.WatchFrame.OnUpdate = function(elapsed)
if ( FishingWatchFrame:IsVisible() ) then
if ( MouseIsOver(FishingWatchFrame) ) then
local xPos, yPos = GetCursorPosition();
if ( hover ) then
if ( hover.xPos == xPos and hover.yPos == yPos ) then
hover.hoverTime = hover.hoverTime + elapsed;
else
hover.hoverTime = 0;
hover.xPos = xPos;
hover.yPos = yPos;
end
else
hover = {};
hover.hoverTime = 0;
hover.xPos = xPos;
hover.yPos = yPos;
end
if ( hover.hoverTime > WATCHDRAGGER_SHOW_DELAY ) then
ShowDraggerFrame();
end
else
HideDraggerFrame();
hover = nil;
end
elseif ( hover ) then
HideDraggerFrame();
hover = nil;
end
end