local MINCOLOR = 0.5
local COLORINC = 0.2
local INCMOD = 0.5
local MinIL = 284
local MaxIL = 509
 
local slotName = {
    "HeadSlot","NeckSlot","ShoulderSlot","BackSlot","ChestSlot","WristSlot",
    "HandsSlot","WaistSlot","LegsSlot","FeetSlot","Finger0Slot","Finger1Slot",
    "Trinket0Slot","Trinket1Slot","MainHandSlot","SecondaryHandSlot"
}
 
-- Construct your saarch pattern based on the existing global string:)
local S_ITEM_LEVEL   = "^" .. gsub(ITEM_LEVEL, "%%d", "(%%d+)")
-- Create the tooltip:
local scantip = CreateFrame("GameTooltip", "MyScanningTooltip", nil, "GameTooltipTemplate")
scantip:SetOwner(UIParent, "ANCHOR_NONE")
 
local function GetAiL(unit)
    i = 0
    total = 0
    itn = 0
    
    if unit ~= nil then
        for i in ipairs(slotName) do
            itemLink = GetInventoryItemLink(unit, GetInventorySlotInfo(slotName[i]));
            
            if itemLink ~= nil then
                -- Pass the item link to the tooltip:
                scantip:SetHyperlink(itemLink)
 
                -- Scan the tooltip:
                for i = 2, scantip:NumLines() do -- Line 1 is always the name so you can skip it.
                    local text = _G["MyScanningTooltipTextLeft"..i]:GetText()
                    if text and text ~= "" then
                        local currentUpgradedItemLevel = strmatch(text, S_ITEM_LEVEL)
                        if currentUpgradedItemLevel then
                            itn = itn + 1
                            total = total + currentUpgradedItemLevel
                        end
                    end
                end
            end
        end
    end
 
    if total < 1 or itn < 1 then
        return 0
    end
 
    return (total / itn)
end
 
local function GetAiLColor(ail)
    local r, gb
    
    if ail < MinIL then
        r = (ail / MinIL)
        gb = r
    else
        r = MINCOLOR + ((ail / MaxIL) * INCMOD)
        gb = 1.0 - ((ail / MaxIL) * INCMOD)
    end
    
    if r < MINCOLOR then
        r = MINCOLOR
        gb = r
    end
    
    return r, gb
end
 
 
 
 
local function Setup()
    local tooltipGuid
    local tooltipUnit
    
    GameTooltip:HookScript("OnTooltipSetUnit", function(self, ...)
        local ail, r, gb
        local _, unit = GameTooltip:GetUnit()
        tooltipUnit = unit
        tooltipGuid = UnitGUID(unit)
        if (unit and CanInspect(unit)) then
            local isInspectOpen = (InspectFrame and InspectFrame:IsShown()) or (Examiner and Examiner:IsShown())
            if unit and CanInspect(unit) and not isInspectOpen then
                NotifyInspect(unit)
            end
        end
    end)
    
    
    AiLFrame = CreateFrame("Frame", nil, CharacterModelFrame);
    AiLFrame.s = AiLFrame:CreateFontString(nil, "OVERLAY");
    AiLFrame.s:SetPoint("TOPRIGHT", CharacterModelFrame, "TOPRIGHT", -2, -2);
    AiLFrame.s:SetJustifyH("RIGHT");
    AiLFrame.s:SetFontObject(GameFontNormal);
    AiLFrame:RegisterEvent("UNIT_INVENTORY_CHANGED");
    AiLFrame:RegisterEvent("INSPECT_READY")
    AiLFrame:SetScript("OnEvent", function(self, event, unit)
        if (event == "UNIT_INVENTORY_CHANGED") then
            AiLFrame.s:SetText(format("AiL: " .. GetAiL("player")));
        end
        if (event == "INSPECT_READY") then
            if unit == tooltipGuid then
                ail = GetAiL(tooltipUnit)
                if ail ~= 0 then
                    r, gb = GetAiLColor(floor(ail))
                    ClearInspectPlayer()
                    GameTooltip:AddLine(format("AiL: " .. string.format("%0.2f", ail)), r, gb, gb)
                    GameTooltip:Show()
                end
            end
        end
    end);
    AiLFrame:Show();
 
    CharacterModelFrame:HookScript("OnShow", function(self)
        AiLFrame.s:SetText(format("AiL: " .. string.format("%0.2f", GetAiL("player"))))
    end)
    
    local VERSION = GetAddOnMetadata("AiL", "Version");
    DEFAULT_CHAT_FRAME:AddMessage("NOTICE: AiL " .. VERSION .. " sometimes requires you to click on your target for the correct results");
end
 
Setup()