Try this. Save the emotes to a text file called emotes and then use /emotes

Code:
alias emotes { 
  var %len $lines(emotes.txt)
  var %i 0
  while (%i <= %len) {
    var %emote $read(emotes.txt,n,%i)
    if ($istok(%emotes,%emote,124) == $false) { set %emotes %emotes $+ %emote $+ $chr(124) }   
    inc %i 
  }
  set %emotes $left(%emotes,-1)
}

ON @*:TEXT:*:#: {
  if ($nick !isop #) {
    if ( $regex($1-,/\b $+ %emotes $+ \b/g) >= 5 ) {
      msg # Stop spamming emotes, $nick $+ !
      msg # .timeout $nick 120
    }
  }
}