-- Priest spells...
	[GetSpellInfo(139)]      = {position = 3, color = {r = 0,g = .9, b = 0, a = 1},},   -- "Renew", Green
	[GetSpellInfo(17)]       = {position = 2, color = {r = .9,g = .9, b = .9, a = 1},}, -- "Power Word: Shield", White
	[GetSpellInfo(21562)]    = {position = 1, color = {r = .9,g = 0, b = 0, a = 1},},   -- "Power Word: Fortitude", Red
	[GetSpellInfo(6346)]     = {position = 1, color = {r = 0,g = .9, b = .9, a = 1},},  -- "Fear Ward", Yellow
	[GetSpellInfo(27863)]    = {position = 1, color = {r = 0,g = 0, b = .9, a = 1},},   -- "Shadow Protection", Blue
	[GetSpellInfo(33076)]    = {position = 1, color = {r = .9,g = 0, b = .9, a = 1},},  -- "Prayer of Mending", 
	-- Priest debuffs...
	[GetSpellInfo(6788)]     = {position = 2, color = {r = 0,g = 0, b = .9, a = 1},},   -- "Weakened Soul", Blue

	-- Debuff Types
	Poison                   = {position = 5, color = {r = 0,g = .9, b = .1, a = 1},},  -- Greenish
	Magic                    = {position = 6, color = {r = 0,g = .3, b = .9, a = 1},},  -- Bluish
	Curse                    = {position = 4, color = {r = .9,g = 0, b = .7, a = 1},},  -- Purple
	Disease                  = {position = 4, color = {r = .7,g = .7, b = 1, a = 1},},

local sgShown = true

{lots of code}
..
{all the way to the bottom}

function sgParseCommand(cmd)
    local param1, param2, param3 = cmd:lower():match("^([%S]+)%s*([%S]*)%s*(.*)$");
    param1, param2 = param1 or "", param2 or "";
    if param1 == "toggle" or param1 == "" then
        if sgShown == true then
            ShotGlassRaidFrames.HandleFrame:Hide()
            sgShown = false
        else
            ShotGlassRaidFrames.HandleFrame:Show()
            sgShown = true
        end
    end
end -- function sgParseCommand

ShotGlassRaidFrames = CreateGroupHeader()
ShotGlassRaidFrames.TrackedAuras = TrackedAuras

SLASH_SHOTGLASS1 = "/shotglass";
SlashCmdList["SHOTGLASS"] = sgParseCommand;

if class == "PRIEST" then
    {add priest buffs/debufs}
elseif class == "DRUID" then
    {add druid buffs/debuffs}
elseif class == "SHAMAN" then
    {add shammy buffs/debuffs}
end
{add general spells}

local TrackedAuras = { 
    [GetSpellInfo(774)] = {position = 1, priority = 1, color = {r = .8,g = 0, b = .8, a = 1},}, -- Rejuvenation, Purple
    ....
}
....
function UnitEventHandlers.UNIT_AURA(self, unit)
    ..
    local prioritytable = {0,0,0,0,0,0,}
    ..
    if unit == unitid then 
        ..
	-- Check Buffs
        for index = 1, 40 do
            ..
            if auratarget then 
                if auratarget.priority > prioritytable[auratarget.position] then
                    {set up aura indicators}
                    ..
                    prioritytable[auratarget.position] = prioritytable[auratarget.position]
                end
            end