[Akryn]

However it is dependent upon having the exact quotes and emotes

Oh I see, well just change it to this:

local me = CreateFrame("Frame")

me:RegisterEvent("CHAT_MSG_MONSTER_EMOTE")
me:RegisterEvent("CHAT_MSG_MONSTER_SAY")
me:RegisterEvent("CHAT_MSG_MONSTER_WHISPER")
--add any others...that's probably good enough

me.listOfNames = {
     "NPC A",
     "NPC B",
     "etc...",
}

me.EventHandler(self, event, _, name)
      for i = 1, #self.listOfNames do
           if name:find(self.listOfNames[i]) then
                 PlaySound("RaidWarning")
                 RaidWarningFrame:AddMessage("Heads Up!  Your quest NPC needs help!!!")
                 return
           end
      end
end

me:SetScript("OnEvent", me.EventHandler)