Mine

on 1:ACTION:*:#:{
  %hlctr = 1

  while (%hlctr <= 7) {
    %hlword = $gettok($highlight(choong), %hlctr, 44)
    inc %hlctr
    if (%hlword isin $1-) {
      window -nze @highlight 
      aline @highlight $time ( $+ $date $+ )
      aline @highlight $chan $+ / $+ $nick $+ : $1-
      aline @highlight ---
      halt
    }
  }  
}

on 1:TEXT:*:#:{
  %hlctr = 1

  while (%hlctr <= 7) {
    %hlword = $gettok($highlight(choong), %hlctr, 44)
    inc %hlctr
    if (%hlword isin $1-) {
      window -nze @highlight 
      aline @highlight $time ( $+ $date $+ )
      aline @highlight $chan $+ / $+ $nick $+ : $1-
      aline @highlight ---
      halt
    }
  }  
}