/script cbha()

		for i = 1, cbhConstants.buttons do
			if string.find(cbhMacroText[cbhValues.roleset][i], "\13") then
				-- string.gsub("Hello banana", "banana", "Lua user")
				tt[i] = "suppressmacrofailures\13"..cbhMacroText[cbhValues.roleset][i]
				tt[i] = string.gsub(string.gsub(tt[i], "##", "@" .. k), "\13", "\n")
			elseif string.find(cbhMacroText[cbhValues.roleset][i], "group##") then
				tt[i] = string.gsub(cbhMacroText[cbhValues.roleset][i], "@group##", "@"..k)
			elseif string.find(cbhMacroText[cbhValues.roleset][i], "##") then
				tt[i] = string.gsub(cbhMacroText[cbhValues.roleset][i], "##", "@"..k)
			else
				tt[i] = cbhMacroText[cbhValues.roleset][i]
			end
			tt[i] = "/script cbha("..tnum..")\n"..tt[i]
		end

-- Registers event handler.
function solfRegisterEventHandler(eventTable, handler, addonName, handlerDescription)
	table.insert(eventTable, {handler, addonName, handlerDescription})
end

-- Create CBH frames for showing 'action in process' stuff...
cbh.groupAction = {}
for i = 1, 20 do
	cbh.groupAction[i] = UI.CreateFrame("Text", "CBH Action "..i, cbh.groupBF[i])
end

local orig_cbhCreateGroups = cbhCreateGroups;
function solfCBH_addlCreateGroups()
	for a = 1, kMaxGroups do	-- 4 groups of 5
		for i = 1, kMaxGroupMembers do	-- creates each of the 5 units for each group
			frameNumber = i + ((a-1) * kMaxGroupMembers) -- Step through each frame number (1-20 currently)

			cbh.groupAction[frameNumber]:SetFontColor(1, 1, 1, 1)
			cbh.groupAction[frameNumber]:SetLayer(1)
			cbh.groupAction[frameNumber]:SetPoint("BOTTOMCENTER", cbh.groupBF[frameNumber], "BOTTOMCENTER", 0, -(cbhValues.mbheight))
			cbh.groupAction[frameNumber]:SetFontSize(cbhValues.fontsize)
			cbh.groupAction[frameNumber]:SetText("            ")
			cbh.groupAction[frameNumber]:SetBackgroundColor(1,1,1,0)
			cbh.groupAction[frameNumber]:SetVisible(true)

--			cbh.groupStatus[frameNumber]:SetBackgroundColor(1,0,0,1)
		end
	end
end
function solfCBH_cbhCreateGroups()
	orig_cbhCreateGroups()
	solfCBH_addlCreateGroups()
end
cbhCreateGroups = solfCBH_cbhCreateGroups
--solfCBH_addlCreateGroups() -- self invoke to build stuff since we are too late to hook initial invocation

local cbhActionFrameNumber;
local cbhActionStatus = "idle" -- idle, executing (notification that action is being executed), maybe (when action may start executing shortly or not), pending (when action will execute later)
local cbhActionMaybeTime = 0 -- when 'maybe' status was set
local cbhActionMaybeWindow = 0.3 -- time frame allowed for 'maybe' action to actually happen
local cbhActionExecutionStart = 0 -- time when execution started
local cbhActionExecutionDuration = 0.2 -- how long execution 'flashes'
local cbhGCD = false -- GCD indicator
local cbhPlayerCasting = false
function cbha(frameNumber)
--	print(frameNumber)
	
	if frameNumber == nil then
		-- Try to find mouseover unit
		local moUnit = Inspect.Unit.Detail("mouseover")
		if moUnit == nil then
			return -- Unknown unit, just return
		end

		frameNumber = GetIndexFromID(moUnit.id)
		if frameNumber == nil then
			return -- Unknown frame, just return
		end
	end

	if (cbhActionFrameNumber ~= nil) then
		cbh.groupAction[cbhActionFrameNumber]:SetBackgroundColor(1,1,1,0)
	end

	if cbhPlayerCasting then
		cbh.groupAction[frameNumber]:SetBackgroundColor(1,0,0,1)
		cbhActionStatus = "pending"
	else
		cbhActionStatus = "maybe"
		cbhActionMaybeTime = Inspect.Time.Frame()
	end
	cbhActionFrameNumber = frameNumber
end

-- Determines whether cooldown-related event is because of GCD. true -- GCD, false -- not (something off-gcd for example)
function cbhIsGCDAction(cooldowns)
	local gcds = 0
	local ability, cd;
	for ability, cd in pairs(cooldowns) do
		if (cd == 0) or (cd == 1) or (cd == 1.5) then
			gcds = gcds + 1
		end
		if (gcds > 2) then
--			print("GCD!")
			return true
		end
	end

--	print("not gcd")
	return false
end

function cbhCDStart(cooldowns)
	if cbhIsGCDAction(cooldowns) then
		cbhGCD = true
		cbhPlayerCasting = true
--		print("GCD!")
	end

	-- This executes regardless of whether it was GCD or off-gcd action.
	if (cbhActionStatus == "pending") or (cbhActionStatus == "maybe") then
		if cbhValues.solfHideGreenFlash then
			cbhActionStatus = "idle"
			cbh.groupAction[cbhActionFrameNumber]:SetBackgroundColor(0,0,0,0)
		else
			cbhActionStatus = "executing"
			cbh.groupAction[cbhActionFrameNumber]:SetBackgroundColor(0,1,0,1)
			cbhActionExecutionStart = Inspect.Time.Frame()
		end
	end
end
solfRegisterEventHandler(Event.Ability.New.Cooldown.Begin, cbhCDStart, "ClickBoxHealer", "CD start")

function cbhCDEnd(cooldowns)
	if cbhIsGCDAction(cooldowns) then
		cbhGCD = false
--		print("gcd over")
		if (Inspect.Unit.Castbar("player") == nil) then
			cbhPlayerCastOver()
		end
	end
end
solfRegisterEventHandler(Event.Ability.New.Cooldown.End, cbhCDEnd, "ClickBoxHealer", "CD end")

function cbhAddlOnUpdate()
	local time = Inspect.Time.Frame()
	if (cbhActionStatus == "maybe") then
		local diff = time - cbhActionMaybeTime
		if (diff < 0) or (diff > cbhActionMaybeWindow) then
			cbhActionStatus = "idle"
			cbhActionFrameNumber = nil
		end
	end

	if cbhPlayerCasting then
		if not cbhGCD then
			if (Inspect.Unit.Castbar("player") == nil) then
				cbhPlayerCastOver()
			end
		end
	end

	if (cbhActionStatus == "executing") then
		local diff = time - cbhActionExecutionStart
		local alpha = 1.0 - (diff / cbhActionExecutionDuration)
		if alpha <= 0 then
			cbh.groupAction[cbhActionFrameNumber]:SetBackgroundColor(1,1,1,0)
			cbhActionStatus = "idle"
			cbhActionFrameNumber = nil
		else
			cbh.groupAction[cbhActionFrameNumber]:SetBackgroundColor(0,1,0,alpha)
		end
	end
end
solfRegisterEventHandler(Event.System.Update.Begin, cbhAddlOnUpdate, "ClickBoxHealer", "Additional OnUpdate handler")

function cbhPlayerCastOver()
--	print("cast over")
	cbhPlayerCasting = false
	if cbhActionStatus == "pending" then
		if (cbhActionFrameNumber ~= nil) then
			cbh.groupAction[cbhActionFrameNumber]:SetBackgroundColor(1,1,1,0)
			cbhActionStatus = "maybe"
			cbhActionMaybeTime = Inspect.Time.Frame()
		end
	end
end

			cbh.UnitBuffTable[unitident] = {}
			for i = 1, 5 do
				cbh.groupHoTs[j][i]:SetVisible(false)
			end
			cbhBuffAdd(unitID.id, buffList(unitident))
			--cbhBuffRemove(unitID.id, buffList(unitident))

			-- Reset aggro indicator
			cbh.groupBF[j]:SetTexture("ClickBoxHealer", "Textures/nbackframe.png")
			
			-- Also fix debuff indicator
			cbh.groupStatus[j]:SetBackgroundColor(0, 0, 0, 0)

				if cbh.UnitBuffTable[xunitident] ~= nil then
					local unitBuffList = buffList(unitID.id)
					for buffID, buffTable in pairs(cbh.UnitBuffTable[xunitident]) do
						-- Catches debuffs that are expired but did not trigger BuffRemove call
						-- Sometimes the buff list isn't available so we need to prevent nil operations --
						if (unitBuffList == nil) or (not unitBuffList[buffID]) then
								local bs = {}
								bs[buffID] = "something"
--								print("removing: "..cbh.UnitBuffTable[xunitident][buffID].name)
								cbhBuffRemove(unitID.id, bs)
						elseif cbh.UnitBuffTable[xunitident][buffID].buffType ~= "buff" then
						elseif cbh.UnitBuffTable[xunitident][buffID].duration ~= nil and cbh.UnitBuffTable[xunitident][buffID].begin ~= nil and cbh.UnitBuffTable[xunitident][buffID].remaining ~= nil and cbh.UnitBuffTable[xunitident][buffID].slot ~= nil then

						-- Count how many debuffs we have remaining...
						local dRem = 0
						local di, dv
						for di, dv in pairs(cbh.UnitBuffTable[retIdent]) do
							if dv.buffType ~= "buff" then
								dRem = dRem + 1
							end
						end
						-- If we have one debuff, it's the one currently being removed, so make sure we have no remaining debuff flags.
						if dRem < 2 then
							cbh.UnitStatus[retnum][22] = 0
							cbh.UnitStatus[retnum][23] = 0
							cbh.UnitStatus[retnum][24] = 0
							cbh.UnitStatus[retnum][25] = 0
							recolor = true
						end
						-- If you need to recolor, figure out which color to change to
						if recolor then

				if cbh.UnitBuffTable[xunitident] ~= nil then
					local unitBuffList = nil -- lazy init for performance reasons
					for buffID, buffTable in pairs(cbh.UnitBuffTable[xunitident]) do
						-- Catches debuffs that are expired but did not trigger BuffRemove call
						if cbh.UnitBuffTable[xunitident][buffID].buffType ~= "buff" then
							if unitBuffList == nil then
								unitBuffList = buffList(unitID.id) -- lazy init
							end
							-- Sometimes the buff list isn't available so we need to prevent nil operations --
							if (unitBuffList == nil) or (not unitBuffList[buffID]) then
									local bs = {}
									bs[buffID] = "something"
--									print("removing: "..cbh.UnitBuffTable[xunitident][buffID].name)
									cbhBuffRemove(unitID.id, bs)
							end
						elseif cbh.UnitBuffTable[xunitident][buffID].duration ~= nil and cbh.UnitBuffTable[xunitident][buffID].begin ~= nil and cbh.UnitBuffTable[xunitident][buffID].remaining ~= nil and cbh.UnitBuffTable[xunitident][buffID].slot ~= nil then
...