cnl_ping              = cnl_ping or {}
cnl_ping.epics        = cnl_ping.epics or {}
cnl_ping.epics.list   = {
  VK = {
    ["2.fafnir"]            = "dark fafnir",
  },

  BH = {
    ["lucifer"]           = "luci",
    ["telebrion"]         = "teleb",
    ["iggwilv"]           = "iggwilv",
    ["uhhhl"]             = "uhhhl",
    ["atlas"]             = "atlas",
    ["kzartaxen"]         = "kzar",
    ["helios-sun-god"]    = "helios",
    ["takhisis"]          = "takh",
    ["tasha"]             = "tasha",
    ["baraneth"]          = "bara",
    ["lupine"]            = "lupine",
    ["klklklpa"]          = "klklklpa",
    ["oth"]               = "oth",
    ["lo-hoal-rose"]      = "lo-haol",
  },

  AH = {
    ["Angzakstigilrash"]  = "carp",
    ["bazg"]              = "bazg",
    ["breath-death"]      = "breath",
    ["contagion-epic"]    = "contagion",
    ["arcane-ooze"]       = "ooze",
    ["maleficent"]        = "malef",
    ["omnimental"]        = "omni",
    ["kezthall"]          = "kezthall",
  },

  SS = {
    ["acid-golem"]        = "acid",
    ["vouhx"]             = "vouhx",
    ["alhoon"]            = "alhoon",
    ["skerrit"]           = "skerrit",
    ["snow-lion"]         = "lion",
    ["pale-night-mother"] = "pale",
    ["miska"]             = "miska",
    ["keadral"]           = "keadral",
    ["zallah"]            = "zallah",
  },

  IS = {
    ["tepeyollotl"]       = "tepe",
    ["roberts"]           = "roberts",
    ["roedrig"]           = "roedrig",
    ["higgins"]           = "higgins",
    ["hydra-valdh"]       = "hydra",
  },

  LY = {
    ["xerxes"]            = "xerxes",
    ["koshey"]            = "koshey",
    ["ra-fire-god"]       = "ra",
  },

  EU = {
    ["dispater"]          = "dispater",
    ["mephistopheles"]    = "mephis",
    ["moloch-devil-king"] = "moloch",
    ["baalzebul"]         = "baal",
    ["mammon"]            = "mammon",
    ["asmodeus"]          = "asmo",
    ["cryonax"]           = "cryonax",
  },
}

function epic(self)
  -- clean up any existing triggers
  if cnl_ping.epics.trigId then killTrigger(cnl_ping.epics.trigId) end

  -- init the things
  cnl_ping.epics.counter  = 0
  cnl_ping.epics.hits     = {}
  cnl_ping.epics.self     = self

  -- why did I want to do this again?
  local trig_prefix       = "epic_"..math.random(9999)

  --
  local regex = "^You tell (.*) '"..trig_prefix .."(..)(.*)'$|^No-one by that name here..$"
  cnl_ping.epics.trigId = tempRegexTrigger(regex,cnl_ping.epics.gather)

  for cont,epics in pairs(cnl_ping.epics.list) do
    for k,v in pairs(epics) do
      cnl_ping.epics.counter = cnl_ping.epics.counter + 1
      send(
        "tell "..
        k ..
        " "..
        trig_prefix ..
        cont ..
        v
      )
    end
  end
end

function cnl_ping.epics.gather()
  cecho("<red>*\n")
  cnl_ping.epics.counter = cnl_ping.epics.counter - 1

  if matches[2] then
    if cnl_ping.epics.hits[matches[3]] then
      cnl_ping.epics.hits[matches[3]] = cnl_ping.epics.hits[matches[3]] .. " | "..matches[4]
    else
      cnl_ping.epics.hits[matches[3]] = "[" .. matches[3] .. "] "..matches[4]
    end
  end

  if cnl_ping.epics.counter == 0 then
    cecho("<yellow>killTrigger("..cnl_ping.epics.trigId..")\n")
    killTrigger(cnl_ping.epics.trigId)

    local found_epics = false

    for k,v in pairs(cnl_ping.epics.hits) do
        local v_col = v
        v_col = v_col:gsub("%[EU%]",r.col.mud.red..r.col.mud.unbold.."["..r.col.mud.bold.."EU"..r.col.mud.unbold.."]"..r.col.mud.white)
        v_col = v_col:gsub("%[SS%]",r.col.mud.yellow..r.col.mud.unbold.."["..r.col.mud.bold.."SS"..r.col.mud.unbold.."]"..r.col.mud.white)
        v_col = v_col:gsub("%[BH%]",r.col.mud.green..r.col.mud.unbold.."["..r.col.mud.bold.."BH"..r.col.mud.unbold.."]"..r.col.mud.white)
        v_col = v_col:gsub("%[LY%]",r.col.mud.purple..r.col.mud.unbold.."["..r.col.mud.bold.."LY"..r.col.mud.unbold.."]"..r.col.mud.white)
        v_col = v_col:gsub("%[AH%]",r.col.mud.cyan..r.col.mud.unbold.."["..r.col.mud.bold.."AH"..r.col.mud.unbold.."]"..r.col.mud.white)
        v_col = v_col:gsub("%[IS%]",r.col.mud.blue..r.col.mud.unbold.."["..r.col.mud.bold.."IS"..r.col.mud.unbold.."]"..r.col.mud.white)
        v_col = v_col:gsub("%[VK%]",r.col.mud.white..r.col.mud.unbold.."["..r.col.mud.bold.."VK"..r.col.mud.unbold.."]"..r.col.mud.white)

        send("grouptell "..v_col)
        found_epics = true
    end

    if not found_epics then
      send("grouptell No epics found!")
    end
  end

end