Tercio@0: local floor = floor
Tercio@0: local min = min
Tercio@0: local UnitExists = UnitExists
Tercio@0: local GetPlayerMapPosition = GetPlayerMapPosition
Tercio@0: local UnitHealth = UnitHealth
Tercio@4: local GetNumGroupMembers = GetNumGroupMembers
Tercio@4: local abs = abs
Tercio@0: 
Tercio@0: local f = CreateFrame ("frame", "Hansgar_And_Franzok_Assist", UIParent)
Tercio@0: f:SetFrameStrata ("DIALOG")
Tercio@5: f.version = "v0.6"
Tercio@0: 
Tercio@4: local tframe = CreateFrame ("frame", "Hansgar_And_Franzok_Assist_PTrack", UIParent)
Tercio@4: 
Tercio@0: f:SetSize (155, 156)
Tercio@0: f:SetBackdrop ({bgFile = "Interface\\Tooltips\\UI-Tooltip-Background", tile = true, tileSize = 16, insets = {left = -1, right = -1, top = -1, bottom = -1},
Tercio@0: edgeFile = "Interface\\AddOns\\Hansgar_And_Franzok_Assist\\border_2", edgeSize = 8})
Tercio@0: f:SetPoint ("center", UIParent, "center")
Tercio@0: f:SetBackdropColor (0, 0, 0, 0)
Tercio@0: f:SetBackdropBorderColor (0, 0, 0, 1)
Tercio@0: f:SetMovable (true)
Tercio@0: f:EnableMouse (true)
Tercio@5: f.all_blocks = {}
Tercio@0: f:Hide()
Tercio@0: 
Tercio@0: local title = f:CreateFontString (nil, "overlay", "GameFontNormal")
Tercio@0: title:SetText ("Hansgar & Franzok Assist")
Tercio@0: title:SetPoint ("center", f, "center")
Tercio@0: title:SetPoint ("bottom", f, "top", 0, 2)
Tercio@0: 
Tercio@0: --
Tercio@0: local frame_event = CreateFrame ("frame", "Hansgar_And_Franzok_AssistEvents", f)
Tercio@0: frame_event:RegisterEvent ("ENCOUNTER_START")
Tercio@0: frame_event:RegisterEvent ("ENCOUNTER_END")
Tercio@0: frame_event:RegisterEvent ("ADDON_LOADED")
Tercio@0: 
Tercio@0: --
Tercio@0: local player_bar = CreateFrame ("statusbar", "Hansgar_And_Franzok_AssistPlayerBar", f)
Tercio@0: player_bar:SetPoint ("topleft", f, "bottomleft", 0, -3)
Tercio@0: player_bar:SetPoint ("topright", f, "bottomright", 0, -3)
Tercio@0: player_bar:SetHeight (14)
Tercio@0: player_bar:SetStatusBarColor (0, 0, 0, 0)
Tercio@0: player_bar:SetMinMaxValues (0, 100)
Tercio@0: player_bar:SetValue (0)
Tercio@0: f.player_bar = player_bar
Tercio@0: 
Tercio@0: player_bar.texture = player_bar:CreateTexture (nil, "overlay")
Tercio@0: player_bar.texture:SetTexture ("Interface\\AddOns\\Hansgar_And_Franzok_Assist\\bar_skyline")
Tercio@0: player_bar:SetStatusBarTexture (player_bar.texture)
Tercio@0: 
Tercio@0: --
Tercio@0: 
Tercio@4: local player_pos_frame = CreateFrame ("frame", "Hansgar_And_Franzok_Assist_DanceBar", UIParent)
Tercio@4: player_pos_frame:SetPoint ("topleft", player_bar, "bottomleft", 0, -3)
Tercio@4: player_pos_frame:SetPoint ("topright", player_bar, "bottomright", 0, -3)
Tercio@4: player_pos_frame:SetHeight (14)
Tercio@4: player_pos_frame:SetBackdrop ({bgFile = "Interface\\Tooltips\\UI-Tooltip-Background", tile = true, tileSize = 16, insets = {left = -1, right = -1, top = -1, bottom = -1},
Tercio@4: edgeFile = "Interface\\AddOns\\Hansgar_And_Franzok_Assist\\border_2", edgeSize = 8})
Tercio@4: player_pos_frame:SetBackdropColor (0, 0, 0, 1)
Tercio@4: player_pos_frame:Hide()
Tercio@4: 
Tercio@4: --red
Tercio@4: local t1 = player_pos_frame:CreateTexture (nil, "artwork")
Tercio@4: t1:SetPoint ("left", player_pos_frame, "left")
Tercio@4: t1:SetSize (player_pos_frame:GetWidth()*0.30, 14)
Tercio@4: t1:SetTexture (1, 1, 1)
Tercio@4: --t1:SetTexCoord (260/512, 430/512, 29/256, 82/256)
Tercio@4: t1:SetVertexColor (1, 0.2, 0.2, 0.4)
Tercio@4: 
Tercio@4: --green
Tercio@4: local t2 = player_pos_frame:CreateTexture (nil, "artwork")
Tercio@4: t2:SetPoint ("left", t1, "right")
Tercio@4: t2:SetSize (player_pos_frame:GetWidth()*0.15, 14)
Tercio@4: t2:SetTexture (0.2, 1, 0.2, 0.4)
Tercio@4: 
Tercio@4: --red
Tercio@4: local middle = player_pos_frame:CreateTexture (nil, "artwork")
Tercio@4: middle:SetPoint ("left", t2, "right")
Tercio@4: middle:SetSize (player_pos_frame:GetWidth()*0.10, 14)
Tercio@4: middle:SetTexture (1, 1, 1)
Tercio@4: --middle:SetTexCoord (260/512, 430/512, 29/256, 82/256)
Tercio@4: middle:SetVertexColor (1, 0.2, 0.2, 0.4)
Tercio@4: 
Tercio@4: --green
Tercio@4: local t3 = player_pos_frame:CreateTexture (nil, "artwork")
Tercio@4: t3:SetPoint ("left", middle, "right")
Tercio@4: t3:SetSize (player_pos_frame:GetWidth()*0.15, 14)
Tercio@4: t3:SetTexture (0.2, 1, 0.2, 0.4)
Tercio@4: 
Tercio@4: --red
Tercio@4: local t4 = player_pos_frame:CreateTexture (nil, "artwork")
Tercio@4: t4:SetPoint ("left", t3, "right")
Tercio@4: t4:SetSize (player_pos_frame:GetWidth()*0.30, 14)
Tercio@4: t4:SetTexture (1, 1, 1)
Tercio@4: --t4:SetTexCoord (260/512, 430/512, 29/256, 82/256)
Tercio@4: t4:SetVertexColor (1, 0.2, 0.2, 0.4)
Tercio@4: 
Tercio@4: local div = player_pos_frame:CreateTexture (nil, "overlay")
Tercio@4: div:SetPoint ("left", player_pos_frame, "left", 0, 0)
Tercio@4: div:SetTexture (1, 1, 1, 1)
Tercio@4: div:SetSize (1, 16)
Tercio@4: div:Hide()
Tercio@4: --
Tercio@4: 
Tercio@4: local AceTimer = LibStub:GetLibrary ("AceTimer-3.0")
Tercio@4: AceTimer:Embed (f)
Tercio@4: local AceComm = LibStub:GetLibrary ("AceComm-3.0")
Tercio@4: AceComm:Embed (f)
Tercio@4: 
Tercio@5: function f:CommReceived (_, data, _, source)
Tercio@5: 	if (data == "US") then
Tercio@5: 		f:SendCommMessage ("HAFR", UnitName ("player") .. " " .. f.version, "RAID")
Tercio@5: 	else
Tercio@5: 		f.users [data] = true
Tercio@5: 	end
Tercio@5: end
Tercio@5: function f:ShowUsers()
Tercio@5: 	f.users_schedule = nil
Tercio@5: 	
Tercio@5: 	local users_frame = Hansgar_And_Franzok_Assist_UsersPanel
Tercio@5: 	if (not users_frame) then
Tercio@5: 		users_frame = CreateFrame ("frame", "Hansgar_And_Franzok_Assist_UsersPanel", UIParent)
Tercio@5: 		users_frame:SetBackdrop ({bgFile = "Interface\\Tooltips\\UI-Tooltip-Background", tile = true, tileSize = 16, insets = {left = -1, right = -1, top = -1, bottom = -1},
Tercio@5: 		edgeFile = "Interface\\AddOns\\Hansgar_And_Franzok_Assist\\border_2", edgeSize = 8})
Tercio@5: 		users_frame:SetBackdropColor (0, 0, 0, 1)
Tercio@5: 		tinsert (UISpecialFrames, "Hansgar_And_Franzok_Assist_UsersPanel")
Tercio@5: 		users_frame:SetSize (200, 500)
Tercio@5: 		users_frame:SetPoint ("right", f, "left", -15, 0)
Tercio@5: 		users_frame.text = users_frame:CreateFontString (nil, "overlay", "GameFontHighlight")
Tercio@5: 		users_frame.text:SetPoint ("topleft", users_frame, "topleft", 10, -10)
Tercio@5: 		users_frame.text:SetJustifyH ("left")
Tercio@5: 		
Tercio@5: 		users_frame.title = users_frame:CreateFontString (nil, "overlay", "GameFontNormal")
Tercio@5: 		users_frame.title:SetText ("Hansgar & Franzok Assist: Users")
Tercio@5: 		users_frame.title:SetPoint ("center", users_frame, "center")
Tercio@5: 		users_frame.title:SetPoint ("bottom", users_frame, "top", 0, 2)
Tercio@5: 		
Tercio@5: 	end
Tercio@5: 	
Tercio@5: 	local s = ""
Tercio@5: 	
Tercio@5: 	for key, value in pairs (f.users) do
Tercio@5: 		s = s .. "|cFF33FF33" .. key .. "\n"
Tercio@5: 	end
Tercio@5: 	
Tercio@5: 	s = s .. "|r\n\n\n|cFFFFFFFFOut of Date or Not installed:|r\n\n"
Tercio@5: 	
Tercio@5: 	for i = 1, GetNumGroupMembers() do
Tercio@5: 		local name = UnitName ("raid" .. i)
Tercio@5: 		if (not s:find (name)) then
Tercio@5: 			s = s .. "|cFFFF3333" .. name .. "|r\n"
Tercio@5: 		end
Tercio@5: 	end
Tercio@5: 	
Tercio@5: 	users_frame.text:SetText (s)
Tercio@5: 	
Tercio@5: 	users_frame:Show()
Tercio@5: 	
Tercio@5: end
Tercio@5: f:RegisterComm ("HAFR", "CommReceived")
Tercio@5: 
Tercio@0: local db
Tercio@0: 
Tercio@4: f.block_tracker = {}
Tercio@4: 
Tercio@0: frame_event:SetFrameStrata ("FULLSCREEN")
Tercio@0: 
Tercio@0: frame_event:SetScript ("OnEvent", function (self, event, ...)
Tercio@0: 
Tercio@0: 	if (event == "ADDON_LOADED" and select (1, ...) == "Hansgar_And_Franzok_Assist") then
Tercio@0: 
Tercio@0: 		db = Hansgar_And_Franzok_DB
Tercio@0: 		if (not db) then
Tercio@0: 			db = {}
Tercio@0: 			Hansgar_And_Franzok_DB = db
Tercio@0: 		end
Tercio@4: 		--
Tercio@0: 		db.STAMPERS_DELAY = db.STAMPERS_DELAY or 5
Tercio@4: 		if (db.CD_NUMBER == nil) then
Tercio@4: 			db.CD_NUMBER = false
Tercio@4: 		end
Tercio@4: 		if (db.SHOW_DANCE == nil) then
Tercio@4: 			db.SHOW_DANCE = true
Tercio@4: 		end
Tercio@5: 		if (db.FRAME_LOCK == nil) then
Tercio@5: 			db.FRAME_LOCK = false
Tercio@5: 		end
Tercio@4: 		--
Tercio@0: 		SLASH_Hansgar_And_Franzok_Assist1, SLASH_Hansgar_And_Franzok_Assist2 = "/hansgar", "/franzok"
Tercio@0: 		function SlashCmdList.Hansgar_And_Franzok_Assist (msg, editbox)
Tercio@0: 		
Tercio@0: 			local command, rest = msg:match ("^(%S*)%s*(.-)$")
Tercio@0: 		
Tercio@5: 			if (command == "users") then
Tercio@5: 				if (f.users_schedule) then
Tercio@5: 					print ("|cFFFFAA00Hansgar and Franzok Assist|r please wait 5 seconds...")
Tercio@5: 				elseif (IsInRaid()) then
Tercio@5: 					f.users = {}
Tercio@5: 					f:SendCommMessage ("HAFR", "US", "RAID")
Tercio@5: 					f.users_schedule = f:ScheduleTimer ("ShowUsers", 5)
Tercio@5: 					print ("|cFFFFAA00Hansgar and Franzok Assist|r please wait 5 seconds...")
Tercio@5: 				else
Tercio@5: 					print ("|cFFFFAA00Hansgar and Franzok Assist|r you aren't in a raid group.")
Tercio@5: 				end
Tercio@5: 			
Tercio@5: 			elseif (command == "delay") then
Tercio@0: 				local t = tonumber (rest)
Tercio@0: 				if (t) then
Tercio@0: 					db.STAMPERS_DELAY = t
Tercio@0: 					print ("|cFFFFAA00Hansgar and Franzok Assist|r delay set to: ", t)
Tercio@0: 				else
Tercio@0: 					print ("|cFFFFAA00Hansgar and Franzok Assist|r invalid time.", t)
Tercio@0: 				end
Tercio@0: 				
Tercio@0: 			elseif (command == "test" or command == "show") then
Tercio@0: 				if (f.StampersPhase) then
Tercio@4: 					f:EndTrackPlayerPosition()
Tercio@0: 					return f:StopTracking()
Tercio@0: 				end
Tercio@4: 				
Tercio@0: 				f:StartTracking()
Tercio@4: 				f:StartTrackPlayerPosition()
Tercio@0: 				
Tercio@0: 			elseif (command == "hide") then
Tercio@0: 				if (f.StampersPhase) then
Tercio@0: 					return f:StopTracking()
Tercio@0: 				end
Tercio@4: 				f:EndTrackPlayerPosition()
Tercio@0: 
Tercio@5: 			elseif (command == "lock") then
Tercio@5: 				f:SetLockState()
Tercio@5: 				
Tercio@5: 				if (db.FRAME_LOCK) then
Tercio@5: 					print ("|cFFFFAA00Hansgar and Franzok Assist|r frame locked.")
Tercio@5: 				else
Tercio@5: 					print ("|cFFFFAA00Hansgar and Franzok Assist|r frame unlocked.")
Tercio@5: 				end
Tercio@5: 			
Tercio@4: 			elseif (command == "dance") then
Tercio@4: 				db.SHOW_DANCE = not db.SHOW_DANCE
Tercio@4: 				if (db.SHOW_DANCE) then
Tercio@4: 					if (f.on_encounter) then
Tercio@4: 						f:StartTrackPlayerPosition()
Tercio@4: 					end
Tercio@4: 					print ("|cFFFFAA00Hansgar and Franzok Assist|r dance bars enabled.")
Tercio@4: 				else
Tercio@4: 					f:EndTrackPlayerPosition()
Tercio@4: 					print ("|cFFFFAA00Hansgar and Franzok Assist|r dance bars disabled.")
Tercio@4: 				end
Tercio@4: 			
Tercio@4: 			elseif (command == "cooldown") then
Tercio@4: 				db.CD_NUMBER = not db.CD_NUMBER
Tercio@4: 				f:RefreshCooldownSettings()
Tercio@4: 				
Tercio@0: 			else
Tercio@5: 				print ("|cFFFFAA00Hansgar and Franzok Assist|r |cFF00FF00" .. f.version .. "|r Commands:")
Tercio@5: 				print ("|cFFFFFF00/hansgar lock|r: toggle lock and unlock on the frame.")
Tercio@5: 				print ("|cFFFFFF00/hansgar test show hide|r: active the addon on test mode or hide it.")
Tercio@0: 				print ("|cFFFFFF00/hansgar delay <time>|r: time in seconds until the percentage goes from 0 to 100.")
Tercio@5: 				print ("|cFFFFFF00/hansgar dance|r: toggle dance bar (used to dodge regular stampers and searing plates).")
Tercio@5: 				print ("|cFFFFFF00/hansgar users|r: show who is using the addon in the raid.")
Tercio@5: 				print ("|cFFFFFF00/hansgar cooldown|r: show the countdown text for each stamper go back up to the ceiling.")
Tercio@0: 			end
Tercio@0: 		end
Tercio@0: 		
Tercio@0: 	elseif (event == "ENCOUNTER_START" or event == "ENCOUNTER_END") then
Tercio@0: 	
Tercio@0: 		local encounterID, encounterName, difficultyID, raidSize = select (1, ...)
Tercio@4: 		
Tercio@4: 		if (encounterID == 1693) then
Tercio@4: 			if (event == "ENCOUNTER_START") then
Tercio@4: 				f.on_encounter = true
Tercio@4: 			elseif (event == "ENCOUNTER_END") then
Tercio@4: 				f.on_encounter = false
Tercio@4: 			end
Tercio@4: 		end
Tercio@4: 		
Tercio@4: 		if (encounterID == 1693 and db.SHOW_DANCE) then
Tercio@4: 			if (event == "ENCOUNTER_START") then
Tercio@4: 				SetMapToCurrentZone()
Tercio@4: 				f:StartTrackPlayerPosition()
Tercio@4: 			elseif (event == "ENCOUNTER_END") then
Tercio@4: 				f:EndTrackPlayerPosition()
Tercio@4: 			end
Tercio@4: 		end
Tercio@4: 		
Tercio@0: 		if (encounterID == 1693 and difficultyID == 16) then
Tercio@0: 		
Tercio@0: 			if (event == "ENCOUNTER_START") then
Tercio@0: 			
Tercio@0: 				print ("|cFFFFAA00Hansgar and Franzok Assist|r: addon enabled, good look!")
Tercio@0: 			
Tercio@0: 				if (f.StampersPhase) then
Tercio@0: 					f:StopTracking()
Tercio@0: 				end
Tercio@0: 				f:RegisterEvent ("COMBAT_LOG_EVENT_UNFILTERED")
Tercio@0: 				
Tercio@0: 			elseif (event == "ENCOUNTER_END") then
Tercio@0: 				f:UnregisterEvent ("COMBAT_LOG_EVENT_UNFILTERED")
Tercio@0: 				
Tercio@0: 				if (f.StampersPhase) then
Tercio@0: 					f:StopTracking()
Tercio@0: 				end
Tercio@4: 				
Tercio@4: 				f:EndTrackPlayerPosition()
Tercio@0: 			end
Tercio@0: 		end
Tercio@0: 	end
Tercio@0: 
Tercio@0: end)
Tercio@0: 
Tercio@0: --
Tercio@2: --f:RegisterEvent ("COMBAT_LOG_EVENT_UNFILTERED")
Tercio@0: 
Tercio@0: f:SetScript ("OnEvent", function (self, event, time, token, _, who_serial, who_name, who_flags, _, target_serial, target_name, target_flags, _, spellid, spellname, spellschool, buff_type, ...)
Tercio@0: 
Tercio@2: 	if (token == "SPELL_AURA_APPLIED" and spellid == 162124 and not f.StampersPhase) then
Tercio@0: 		f:StartTracking()
Tercio@5: 		f:EndTrackPlayerPosition()
Tercio@0: 		
Tercio@2: 	elseif (token == "SPELL_AURA_REMOVED" and spellid == 162124 and f.StampersPhase) then
Tercio@0: 		f:StopTracking()
Tercio@5: 		if (db.SHOW_DANCE) then
Tercio@5: 			f:StartTrackPlayerPosition()
Tercio@5: 		end
Tercio@0: 		
Tercio@0: 	end
Tercio@0: 
Tercio@0: end)
Tercio@0: 
Tercio@0: local frame_tracker = CreateFrame ("frame", "Hansgar_And_Franzok_AssistTracker", UIParent)
Tercio@0: local on_update_tracker = function (self, elapsed)
Tercio@0: 	
Tercio@4: 	local raid_size = GetNumGroupMembers()
Tercio@4: 	
Tercio@4: 	for i = 1, raid_size do
Tercio@0: 		local x, y = GetPlayerMapPosition ("raid"..i)
Tercio@0: 		if (UnitExists ("raid"..i) and UnitHealth ("raid"..i) > 1 and x and y) then
Tercio@0: 			local block = f:WhichBlock (x, y)
Tercio@0: 			if (block) then
Tercio@0: 				if (not f.block_tracker [block]) then --> was a clear block
Tercio@0: 					f.block_tracker [block] = GetTime()
Tercio@0: 					f:Paint (f.all_blocks [block])
Tercio@0: 				end
Tercio@0: 			end
Tercio@0: 		end
Tercio@0: 	end
Tercio@0: 	
Tercio@0: 	local px, py = GetPlayerMapPosition ("player")
Tercio@0: 	local player_block = f:WhichBlock (px, py)
Tercio@4: 	if (player_block and raid_size > 0) then
Tercio@0: 		
Tercio@0: 		local time_limit_at = f.block_tracker [player_block] + db.STAMPERS_DELAY
Tercio@0: 		local time_now = GetTime()
Tercio@0: 		
Tercio@0: 		f.player_bar:SetValue ((time_limit_at - time_now) / db.STAMPERS_DELAY * 100)
Tercio@0: 		f.player_bar:Show()
Tercio@0: 		
Tercio@0: 		local block_frame = f.all_blocks [player_block]
Tercio@0: 		f.player_loc_box:SetPoint ("center", block_frame, "center")
Tercio@0: 		f.player_loc_box:Show()
Tercio@0: 		player_bar:Show()
Tercio@0: 	else
Tercio@0: 		f.player_loc_box:Hide()
Tercio@0: 		f.player_bar:Hide()
Tercio@0: 	end
Tercio@0: end
Tercio@0: 
Tercio@0: function f:StartTracking()
Tercio@0: 
Tercio@0: 	print ("|cFFFFAA00Hansgar and Franzok Assist|r: Smart Stampers phase started.")
Tercio@0: 
Tercio@0: 	f.StampersPhase = true
Tercio@0: 
Tercio@0: 	if (not f.frames_built) then
Tercio@0: 		f:CreateWindow()
Tercio@0: 	end
Tercio@0: 	
Tercio@0: 	f:ResetBlocks()
Tercio@0: 	f.player_loc_box:Hide()
Tercio@0: 
Tercio@0: 	f.block_tracker = f.block_tracker or {}
Tercio@0: 	table.wipe (f.block_tracker)
Tercio@0: 	
Tercio@0: 	SetMapToCurrentZone()
Tercio@0: 	
Tercio@0: 	frame_tracker:SetScript ("OnUpdate", on_update_tracker)
Tercio@0: 	f:Show()
Tercio@0: end
Tercio@0: 
Tercio@0: function f:StopTracking()
Tercio@0: 	print ("|cFFFFAA00Hansgar and Franzok Assist|r: Smart Stampers phase ended.")
Tercio@0: 
Tercio@0: 	f.StampersPhase = false
Tercio@0: 	frame_tracker:SetScript ("OnUpdate", nil)
Tercio@0: 	table.wipe (f.block_tracker)
Tercio@0: 	f.player_loc_box:Hide()
Tercio@0: 	f:Hide()
Tercio@0: end
Tercio@0: 
Tercio@0: local on_mouse_down = function (self)
Tercio@5: 	if (not self.isMoving and not db.FRAME_LOCK) then
Tercio@0: 		self.isMoving = true
Tercio@0: 		f:StartMoving()
Tercio@0: 	end
Tercio@0: end
Tercio@0: local on_mouse_up = function (self)
Tercio@0: 	if (self.isMoving) then
Tercio@0: 		self.isMoving = nil
Tercio@0: 		f:StopMovingOrSizing()
Tercio@0: 	end
Tercio@0: end
Tercio@0: 
Tercio@0: local painting = function (self, elapsed)
Tercio@0: 	self.step = self.step + elapsed
Tercio@0: 	self.total_time = self.total_time + elapsed
Tercio@0: 	
Tercio@0: 	if (self.step > 0.2) then
Tercio@0: 		self.step = 0
Tercio@0: 		local percent = self.total_time / db.STAMPERS_DELAY * 100
Tercio@0: 		
Tercio@0: 		percent = min (percent, 100)
Tercio@0: 		
Tercio@0: 		local r, g, b = f:percent_color (percent, true)
Tercio@0: 		self:SetBackdropColor (r, g, b, 0.5)
Tercio@0: 		
Tercio@0: 		self.number:SetText (floor (percent) .. "%")
Tercio@0: 		self.number:SetTextColor (1, 1, 1, 1)
Tercio@0: 		
Tercio@0: 		if (percent == 100) then
Tercio@0: 			self:SetScript ("OnUpdate", nil)
Tercio@0: 			self.stamper_icon:Show()
Tercio@0: 			self.number:Hide()
Tercio@5: 			self.cooldown:Show()
Tercio@4: 			self.cooldown:SetCooldown (GetTime(), 37 - db.STAMPERS_DELAY, 0, 0)
Tercio@0: 		end
Tercio@0: 	end
Tercio@0: end
Tercio@4: 
Tercio@4: function f:UnPaint (block)
Tercio@4: 	f:ResetBlock (block)
Tercio@4: end
Tercio@0: function f:Paint (block)
Tercio@0: 	block.step = 0
Tercio@0: 	block.total_time = 0
Tercio@0: 	block:SetScript ("OnUpdate", painting)
Tercio@4: 	local unpaint = f:ScheduleTimer ("UnPaint", 37, block)
Tercio@4: 	block.unpaint_process = unpaint
Tercio@4: end
Tercio@4: 
Tercio@4: function f:ResetBlock (block)
Tercio@4: 	block:SetScript ("OnUpdate", nil)
Tercio@4: 	block:SetBackdropColor (.8, .8, .8, 0.5)
Tercio@4: 	block.number:SetText (block.id)
Tercio@4: 	block.number:SetTextColor (1, 1, 1, 0.5)
Tercio@4: 	block.number:Show()
Tercio@4: 	block.stamper_icon:Hide()
Tercio@4: 	block.cooldown:SetCooldown (0, 0, 0, 0)
Tercio@5: 	block.cooldown:Hide()
Tercio@4: 	
Tercio@4: 	f.block_tracker [block.id] = nil
Tercio@4: 	if (block.unpaint_process) then
Tercio@4: 		f:CancelTimer (block.unpaint_process)
Tercio@4: 		block.unpaint_process = nil
Tercio@4: 	end
Tercio@0: end
Tercio@0: 
Tercio@0: function f:ResetBlocks()
Tercio@0: 	for _, block in ipairs (f.all_blocks) do
Tercio@4: 		f:ResetBlock (block)
Tercio@4: 	end
Tercio@4: end
Tercio@4: 
Tercio@4: function f:RefreshCooldownSettings()
Tercio@4: 	for _, block in ipairs (f.all_blocks) do
Tercio@4: 		if (not db.CD_NUMBER) then
Tercio@4: 			block.cooldown:SetHideCountdownNumbers (true)
Tercio@4: 			block.cooldown:SetDrawEdge (false)
Tercio@4: 		else
Tercio@4: 			block.cooldown:SetHideCountdownNumbers (false)
Tercio@4: 			block.cooldown:SetDrawEdge (true)
Tercio@4: 		end
Tercio@0: 	end
Tercio@0: end
Tercio@0: 
Tercio@5: function f:SetLockState()
Tercio@5: 	db.FRAME_LOCK = not db.FRAME_LOCK
Tercio@5: 	if (db.FRAME_LOCK) then
Tercio@5: 		--locked
Tercio@5: 		f:EnableMouse (false)
Tercio@5: 		for _, block in ipairs (f.all_blocks) do
Tercio@5: 			block:EnableMouse (false)
Tercio@5: 		end
Tercio@5: 	else
Tercio@5: 		--unlocked
Tercio@5: 		f:EnableMouse (true)
Tercio@5: 		for _, block in ipairs (f.all_blocks) do
Tercio@5: 			block:EnableMouse (true)
Tercio@5: 		end
Tercio@5: 	end
Tercio@5: end
Tercio@5: 
Tercio@0: function f:CreateWindow()
Tercio@0: 	local x = 0
Tercio@0: 	local y = 0
Tercio@0: 	
Tercio@0: 	f.player_loc_box = frame_event:CreateTexture (nil, "overlay")
Tercio@0: 	f.player_loc_box:SetSize (32, 40)
Tercio@0: 	f.player_loc_box:SetTexture ([[Interface\ContainerFrame\UI-Icon-QuestBorder]])
Tercio@0: 	f.player_loc_box:Hide()
Tercio@0: 	
Tercio@0: 	f.all_blocks = {}
Tercio@0: 	
Tercio@0: 	for i = 1, 20 do
Tercio@0: 		
Tercio@0: 		local block = CreateFrame ("frame", "Hansgar_And_Franzok_Assist_Block" .. i, f)
Tercio@0: 		block:SetSize (30, 38)
Tercio@0: 		block:SetBackdrop ({bgFile = "Interface\\Tooltips\\UI-Tooltip-Background", tile = true, tileSize = 16, insets = {left = 0, right = 0, top = 0, bottom = 0},
Tercio@0: 		})
Tercio@0: 		block:SetBackdropBorderColor (0, 0, 0, 1)
Tercio@0: 		block:SetBackdropColor (.8, .8, .8, 0.5)
Tercio@0: 		block:SetPoint ("TopLeft", f, "TopLeft", x, y)
Tercio@0: 		
Tercio@0: 		block:SetScript ("OnMouseDown", on_mouse_down)
Tercio@0: 		block:SetScript ("OnMouseUp", on_mouse_up)
Tercio@0: 		
Tercio@4: 		local cooldown = CreateFrame ("cooldown", "Hansgar_And_Franzok_Assist_BlockCooldown" .. i, block, "CooldownFrameTemplate")
Tercio@4: 		cooldown:SetAllPoints()
Tercio@4: 		cooldown:SetFrameLevel (block:GetFrameLevel()+2)
Tercio@4: 		
Tercio@4: 		if (not db.CD_NUMBER) then
Tercio@4: 			cooldown:SetHideCountdownNumbers (true)
Tercio@4: 			cooldown:SetDrawEdge (false)
Tercio@4: 		end
Tercio@4: 		
Tercio@4: 		block.cooldown = cooldown
Tercio@4: 		
Tercio@0: 		block.id = i
Tercio@0: 		
Tercio@0: 		local number = block:CreateFontString (nil, "artwork", "GameFontHighlight")
Tercio@0: 		number:SetPoint ("center", block, "center")
Tercio@0: 		number:SetText (i)
Tercio@0: 		number:SetTextColor (1, 1, 1, 0.5)
Tercio@0: 		block.number = number
Tercio@0: 		
Tercio@0: 		local stamper_icon = block:CreateTexture (nil, "overlay")
Tercio@0: 		stamper_icon:SetTexture ([[Interface\ICONS\Warrior_talent_icon_LambsToTheSlaughter]])
Tercio@0: 		stamper_icon:SetTexCoord (4/64, 60/64, 4/64, 60/64)
Tercio@0: 		stamper_icon:SetSize (24, 24)
Tercio@0: 		stamper_icon:SetPoint ("center", block, "center")
Tercio@0: 		stamper_icon:Hide()
Tercio@0: 		block.stamper_icon = stamper_icon
Tercio@0: 		
Tercio@0: 		x = x + 31
Tercio@0: 		if (x >= 155) then
Tercio@0: 			x = 0
Tercio@0: 			y = y - 40
Tercio@0: 		end
Tercio@0: 		
Tercio@0: 		tinsert (f.all_blocks, block)
Tercio@0: 		
Tercio@0: 	end
Tercio@0: 	
Tercio@5: 	f:SetLockState()
Tercio@5: 	
Tercio@0: 	f.frames_built = true
Tercio@0: 	
Tercio@0: end
Tercio@0: 
Tercio@4: local safe_track = {
Tercio@4: 	--space 1
Tercio@4: 	{
Tercio@4: 		block = {x1 = 0.50154542922974, x2 = 0.49563668874741},
Tercio@4: 		left = {x1 = 0.49963343143463, x2 = 0.49963343143463 - 0.000935000000000}, 
Tercio@4: 		right = {x1 = 0.49710285663605, x2 = 0.49710285663605 + 0.001012229919432}, 
Tercio@4: 		-- {x1 = 0.49963343143463, y1 = 0.73492467403412} -- {x1 = 0.49710285663605, y1 = 0.74445152282715}
Tercio@4: 	},
Tercio@4: 	--space 2
Tercio@4: 	{
Tercio@4: 		block = {x1 = 0.4858917593956, x2 = 0.48044270277023},
Tercio@4: 		left = {x1 = 0.48433673381805, x2 = 0.48433673381805 - 0.00091059207916}, 
Tercio@4: 		right = {x1 = 0.48206025362015, x2 = 0.48206025362015 + 0.00075059207916},
Tercio@4: 		-- {x1 = 0.48433673381805, y1 = 0.74292266368866} -- {x1 = 0.48206025362015, y1 = 0.78930181264877}
Tercio@4: 	},
Tercio@4: 	--space 3
Tercio@4: 	{
Tercio@4: 		block = {x1 = 0.47047740221024, x2 = 0.4648859500885},
Tercio@4: 		left = {x1 = 0.46893924474716, x2 = 0.46893924474716 - 0.001032948493956},  
Tercio@4: 		right = {x1 = 0.46635687351227, x2 = 0.46635687351227 + 0.001032948493956},
Tercio@4: 		--{x1 = 0.46893924474716, y1 = 0.7981019616127} -- {x1 = 0.46635687351227, y1 = 0.73558133840561}
Tercio@4: 	},
Tercio@4: 	--space 4
Tercio@4: 	{
Tercio@4: 		block = {x1 = 0.45503282546997, x2 = 0.44976264238358},
Tercio@4: 		left = {x1 = 0.4533554315567, x2 = 0.4533554315567 - 0.000774573974608}, 
Tercio@4: 		right = {x1 = 0.45124399662018, x2 = 0.45124399662018 + 0.000770009999999},
Tercio@4: 		--{x1 = 0.4533554315567, y1 = 0.74078941345215} -- {x1 = 0.45124399662018, y1 = 0.74088287353516}
Tercio@4: 	}
Tercio@4: }
Tercio@4: Hansgar_safe_track = safe_track
Tercio@4: 
Tercio@4: --	/hansgar test
Tercio@4: --	/run Hansgar_safe_track [1].block.x1 = 0.50154542922974
Tercio@4: 
Tercio@4: local red_alpha_disabled = 0.15
Tercio@4: local red_alpha_enabled = 0.5
Tercio@4: 
Tercio@4: local green_alpha_disabled = 0.05
Tercio@4: local green_alpha_enabled = 0.9
Tercio@4: 
Tercio@4: local track_function = function (self, elapsed)
Tercio@4: 	
Tercio@4: 	local x, _ = GetPlayerMapPosition ("player")
Tercio@4: 	local block
Tercio@4: 	
Tercio@4: 	for i = 1, #safe_track do
Tercio@4: 		local loc = safe_track [i]
Tercio@4: 		if (x >= loc.block.x2 and x <= loc.block.x1) then
Tercio@4: 			block = i
Tercio@4: 			break
Tercio@4: 		end
Tercio@4: 	end
Tercio@4: 	
Tercio@4: 	if (block) then
Tercio@4: 	
Tercio@4: 		player_pos_frame:Show()
Tercio@4: 		block = safe_track [block]
Tercio@4: 		
Tercio@4: 		if (x >= block.left.x2 and x <= block.left.x1) then
Tercio@4: 			t2:SetTexture (0.1, 1, 0.1, green_alpha_enabled)
Tercio@4: 			t3:SetTexture (0.2, 1, 0.2, green_alpha_disabled)
Tercio@4: 			
Tercio@4: 			t1:SetVertexColor (1, 0.2, 0.2, red_alpha_disabled) --red
Tercio@4: 			t4:SetVertexColor (1, 0.2, 0.2, red_alpha_disabled) --red 
Tercio@4: 			middle:SetVertexColor (1, 0.2, 0.2, red_alpha_disabled) --red
Tercio@4: 			
Tercio@4: 		elseif (x <= block.right.x2 and x >= block.right.x1) then
Tercio@4: 			t3:SetTexture (0.1, 1, 0.1, green_alpha_enabled)
Tercio@4: 			t2:SetTexture (0.2, 1, 0.2, green_alpha_disabled)
Tercio@4: 			
Tercio@4: 			t1:SetVertexColor (1, 0.2, 0.2, red_alpha_disabled) --red
Tercio@4: 			t4:SetVertexColor (1, 0.2, 0.2, red_alpha_disabled) --red 
Tercio@4: 			middle:SetVertexColor (1, 0.2, 0.2, red_alpha_disabled) --red
Tercio@4: 			
Tercio@4: 		else
Tercio@4: 			t1:SetVertexColor (1, 0.2, 0.2, red_alpha_enabled) --red
Tercio@4: 			t4:SetVertexColor (1, 0.2, 0.2, red_alpha_enabled) --red 
Tercio@4: 			middle:SetVertexColor (1, 0.2, 0.2, red_alpha_enabled) --red
Tercio@4: 			
Tercio@4: 			t2:SetTexture (0.2, 1, 0.2, green_alpha_disabled)
Tercio@4: 			t3:SetTexture (0.2, 1, 0.2, green_alpha_disabled)
Tercio@4: 			
Tercio@4: 		end
Tercio@4: 		
Tercio@4: 		--x = x - block.block.x2
Tercio@4: 		--local at = abs ((x / (block.block.x1 - block.block.x2) * 100) - 100)
Tercio@4: 		--div:SetPoint ("left", player_pos_frame, "left", self.width_pixel * at, 0)
Tercio@4: 
Tercio@4: 	else
Tercio@4: 		player_pos_frame:Hide()
Tercio@4: 	end
Tercio@4: end
Tercio@4: 
Tercio@4: function f:StartTrackPlayerPosition()
Tercio@4: 
Tercio@4: 	--> under development
Tercio@5: 	--if (true) then
Tercio@5: 	--	return
Tercio@5: 	--end
Tercio@4: 
Tercio@4: 	player_pos_frame:Show()
Tercio@4: 	tframe.width = player_pos_frame:GetWidth()
Tercio@4: 	tframe.width_pixel = tframe.width / 100
Tercio@4: 	tframe:SetScript ("OnUpdate", track_function)
Tercio@4: end
Tercio@4: function f:EndTrackPlayerPosition()
Tercio@4: 	player_pos_frame:Hide()
Tercio@4: 	tframe:SetScript ("OnUpdate", nil)
Tercio@4: end
Tercio@4: 
Tercio@0: local locs = {
Tercio@0: 	--block 1:
Tercio@1: 	{x1 = 0.51103663444519, y1 = 0.79726493358612, x2 = 0.50061076879501, y2 = 0.8241291642189},
Tercio@0: 	--block 2:
Tercio@1: 	{x1 = 0.49670505523682, y1 = 0.79692482948303, x2 = 0.48469054698944, y2 = 0.82489335536957},	
Tercio@0: 	--block 3:
Tercio@1: 	{x1 = 0.48130965232849, y1 = 0.79742962121964, x2 = 0.46962946653366, y2 = 0.82453238964081},
Tercio@0: 	--block 4:
Tercio@1: 	{x1 = 0.46575212478638, y1 = 0.79766929149628, x2 = 0.45400339365005, y2 = 0.82176661491394},	
Tercio@0: 	--block 5:
Tercio@1: 	{x1 = 0.45073217153549, y1 = 0.79751670360565, x2 = 0.43945103883743, y2 = 0.82504689693451},	
Tercio@0: 
Tercio@0: 	--block 6
Tercio@1: 	{x1 = 0.51104211807251, y1 = 0.76532691717148, x2 = 0.50021582841873, y2 = 0.79546189308167},
Tercio@1: 	--block 7
Tercio@1: 	{x1 = 0.4964514374733, y1 = 0.76603573560715, x2 = 0.48449218273163, y2 = 0.79527854919434},	
Tercio@1: 	--block 8
Tercio@1: 	{x1 = 0.48101079463959, y1 = 0.76503103971481, x2 = 0.46944016218185, y2 = 0.79543298482895},
Tercio@1: 	--block 9
Tercio@1: 	{x1 = 0.46541726589203, y1 = 0.7654857635498, x2 = 0.45369201898575, y2 = 0.79529416561127},
Tercio@1: 	--block 10
Tercio@1: 	{x1 = 0.45051556825638, y1 = 0.76583826541901, x2 = 0.43931984901428, y2 = 0.79570162296295},
Tercio@1: 	
Tercio@1: 
Tercio@1: 	--block 11
Tercio@0: 	{x1 = 0.51104187965393, y1 = 0.73422884941101, x2 = 0.49990028142929, y2 = 0.76343530416489},
Tercio@1: 	--block 12
Tercio@0: 	{x1 = 0.49673527479172, y1 = 0.73338270187378, x2 = 0.48483556509018, y2 = 0.76356953382492},
Tercio@1: 	--block 13
Tercio@0: 	{x1 = 0.48133307695389, y1 = 0.73373115062714, x2 = 0.46920585632324, y2 = 0.76366758346558},
Tercio@1: 	--block 14
Tercio@0: 	{x1 = 0.46568286418915, y1 = 0.73440700769424, x2 = 0.45381307601929, y2 = 0.76358675956726},
Tercio@1: 	--block 15
Tercio@0: 	{x1 = 0.45046973228455, y1 = 0.73361301422119, x2 = 0.43929302692413, y2 = 0.76388084888458},
Tercio@0: 
Tercio@0: 	--block 16
Tercio@1: 	{x1 = 0.51104891300201, y1 = 0.70877063274384, x2 = 0.50024521350861, y2 = 0.73220580816269},
Tercio@0: 	--block 17
Tercio@1: 	{x1 = 0.49676024913788, y1 = 0.70914703607559, x2 = 0.48485481739044, y2 = 0.73210543394089},
Tercio@0: 	--block 18
Tercio@1: 	{x1 = 0.48142266273499, y1 = 0.70876735448837, x2 = 0.46925610303879, y2 = 0.73205661773682},
Tercio@0: 	--block 19
Tercio@1: 	{x1 = 0.46603119373322, y1 = 0.70929777622223, x2 = 0.45397216081619, y2 = 0.73167610168457},
Tercio@0: 	--block 20
Tercio@1: 	{x1 = 0.45079308748245, y1 = 0.70926278829575, x2 = 0.43927478790283, y2 = 0.73225915431976},
Tercio@0: }
Tercio@0: 
Tercio@0: function f:WhichBlock (x, y)
Tercio@0: 	for i = 1, #locs do
Tercio@0: 		local loc = locs [i]
Tercio@0: 		if (x >= loc.x2 and x <= loc.x1 and y >= loc.y1 and y <= loc.y2) then
Tercio@0: 			return i
Tercio@0: 		end
Tercio@0: 	end
Tercio@0: end
Tercio@0: 
Tercio@0: function f:percent_color (value, inverted)
Tercio@0: 	local r, g
Tercio@0: 	if (value < 50) then
Tercio@0: 		r = 255
Tercio@0: 	else
Tercio@0: 		r = floor ( 255 - (value * 2 - 100) * 255 / 100)
Tercio@0: 	end
Tercio@0: 	
Tercio@0: 	if (value > 50) then
Tercio@0: 		g = 255
Tercio@0: 	else
Tercio@0: 		g = floor ( (value * 2) * 255 / 100)
Tercio@0: 	end
Tercio@0: 	
Tercio@0: 	if (inverted) then
Tercio@0: 		return g/255, r/255, 0
Tercio@0: 	else
Tercio@0: 		return r/255, g/255, 0
Tercio@0: 	end
Tercio@0: end