From 63ff1b4792182cd427f2d37cead8d1dd9359c257 Mon Sep 17 00:00:00 2001
From: shagu <ericmauser@googlemail.com>
Date: Sun, 20 May 2018 14:58:28 +0200
Subject: [PATCH] farmmode: add initial farm mode module

* type /farm to toggle
* requires the latest version of pfQuest
---
 modules/farmmode.lua | 128 +++++++++++++++++++++++++++++++++++++++++++
 pfUI.toc             |   3 +-
 2 files changed, 130 insertions(+), 1 deletion(-)
 create mode 100644 modules/farmmode.lua

diff --git a/modules/farmmode.lua b/modules/farmmode.lua
new file mode 100644
index 00000000..899fa4ab
--- /dev/null
+++ b/modules/farmmode.lua
@@ -0,0 +1,128 @@
+pfUI:RegisterModule("farmmode", function ()
+  local function ToggleFarmMode()
+    if pfUI.farmmap:IsShown() then
+      pfUI.farmmap:Hide()
+    else
+      pfUI.farmmap:Show()
+    end
+  end
+
+  local function MoveNodes(layer)
+    -- pfMap entries (pfQuest / pfDB)
+    if pfMap and pfMap.drawlayer then
+      pfMap.drawlayer = layer
+      for id, pin in pairs(pfMap.mpins) do
+        pin:SetParent(layer)
+      end
+      pfMap:UpdateMinimap()
+    end
+  end
+
+  local function UpdateMinimap()
+    -- haven't found anything better to
+    -- force update the map textures
+    Minimap_ZoomIn()
+    Minimap_ZoomOut()
+  end
+
+  _G.SLASH_PFFARMMAP1, _G.SLASH_PFFARMMAP2 = "/farm", "/farmmode"
+  _G.SlashCmdList.PFFARMMAP = ToggleFarmMode
+
+  pfUI.farmmap = CreateFrame("Minimap", "pfFarmMap", UIParent)
+  pfUI.farmmap:Hide()
+  pfUI.farmmap:SetFrameStrata("LOW")
+  pfUI.farmmap:SetWidth(300)
+	pfUI.farmmap:SetHeight(300)
+  pfUI.farmmap:SetClampedToScreen(1)
+  pfUI.farmmap:SetPoint("TOPLEFT", UIParent, "TOPLEFT", 200, -200)
+  pfUI.farmmap:SetAlpha(.8)
+  pfUI.farmmap:SetMovable(1)
+  pfUI.farmmap:EnableMouse(1)
+  pfUI.farmmap:EnableMouseWheel(1)
+  pfUI.farmmap:RegisterForDrag("LeftButton")
+  pfUI.farmmap:SetScript("OnMouseWheel", function()
+    if IsControlKeyDown() then
+      this:SetWidth(this:GetWidth() + (arg1 > 0 and 10 or -10))
+      this:SetHeight(this:GetHeight() + (arg1 > 0 and 10 or -10))
+      Minimap_ZoomIn()
+      Minimap_ZoomOut()
+    elseif IsShiftKeyDown() then
+      this:SetAlpha(this:GetAlpha() + (arg1 > 0 and 0.1 or (this:GetAlpha() > 0.1 and -0.1 or 0)))
+      SaveMovable(this)
+    else
+      if(arg1 > 0) then Minimap_ZoomIn() else Minimap_ZoomOut() end
+    end
+  end)
+
+  pfUI.farmmap:SetScript("OnDragStart", function()
+    this:StartMoving()
+  end)
+
+  pfUI.farmmap:SetScript("OnDragStop",  function()
+    this:StopMovingOrSizing()
+    SaveMovable(this)
+  end)
+
+  pfUI.farmmap:SetScript("OnShow", function()
+    Minimap:Hide()
+
+    -- move existing nodes to new minimap
+    MoveNodes(pfUI.farmmap)
+
+    -- move tracking frame
+    if pfUI.tracking then
+      pfUI.tracking:ClearAllPoints()
+      pfUI.tracking:SetPoint("TOPLEFT", pfUI.farmmap, -10, -10)
+    end
+
+    -- save old minimap height
+    if pfUI.minimap then
+      this.mmoldsize = pfUI.minimap:GetHeight()
+      pfUI.minimap:SetHeight(16)
+      pfUI.farmmap.button:Show()
+    end
+
+    -- refresh minimap content
+    UpdateMinimap()
+  end)
+
+  pfUI.farmmap:SetScript("OnHide", function()
+    Minimap:Show()
+
+    -- move existing nodes to new minimap
+    MoveNodes(Minimap)
+
+    -- move tracking frame
+    if pfUI.tracking then
+      pfUI.tracking:ClearAllPoints()
+      pfUI.tracking:SetPoint("TOPLEFT", pfUI.minimap, -10, -10)
+      UpdateMovable(pfUI.tracking)
+    end
+
+    -- save old minimap height
+    if pfUI.minimap then
+      pfUI.minimap:SetHeight(this.mmoldsize)
+      pfUI.farmmap.button:Hide()
+    end
+
+    -- refresh minimap content
+    UpdateMinimap()
+  end)
+
+  if pfUI.minimap then
+    pfUI.farmmap.button = CreateFrame("Button", "pfFarmMapButton", pfUI.minimap)
+    pfUI.farmmap.button:Hide()
+    pfUI.farmmap.button:SetPoint("TOPLEFT", pfUI.minimap, "TOPLEFT", 0, 0)
+    pfUI.farmmap.button:SetPoint("BOTTOMRIGHT", pfUI.minimap, "BOTTOMRIGHT", 0, 0)
+    pfUI.farmmap.button:SetFrameStrata("MEDIUM")
+    pfUI.farmmap.button:SetScript("OnClick", ToggleFarmMode)
+
+    pfUI.farmmap.button.txt = pfUI.farmmap.button:CreateFontString("pfFarmMapText", "LOW", "GameFontWhite")
+    pfUI.farmmap.button.txt:SetFont(pfUI.font_default, C.global.font_size, "OUTLINE")
+    pfUI.farmmap.button.txt:SetPoint("CENTER", 0, 0)
+    pfUI.farmmap.button.txt:SetText("|cff33ffcc FARM MODE")
+  end
+
+  CreateBackdrop(pfUI.farmmap)
+  LoadMovable(pfUI.farmmap)
+end)
diff --git a/pfUI.toc b/pfUI.toc
index 985f8625..c2d51ac7 100644
--- a/pfUI.toc
+++ b/pfUI.toc
@@ -2,7 +2,7 @@
 ## Title: |cff33ffccpf|cffffffffUI
 ## Author: Shagu
 ## Notes: A complete user interface replacement.
-## Version: 3.9.0
+## Version: 3.10.0
 ## SavedVariables: pfUI_profiles, pfUI_gold
 ## SavedVariablesPerCharacter: pfUI_config, pfUI_init, pfUI_playerDB
 
@@ -91,3 +91,4 @@ modules\hdgraphic.lua
 modules\share.lua
 modules\tracking.lua
 modules\easteregg.lua
+modules\farmmode.lua