Code:
on *:text:*:#: {
  var %a = 1,%bt = cheater,hdf,whateverhere,ntg,arschloch,hitler,sack,heil,nazi,huso
  while ($gettok(%bt,%a,44)) {
    if ($(*,$v1,*) iswm $strip($1)) {
      var %i $time $nick $1-
      write -a $qt($+($mircdirlogs\Trigger\,$date(dd.mm.yyyy),Trigger.log)) $strip(%i,buc)
      if (!$window(@TriggerBox)) { window @TriggerBox }
      echo @TriggerBox %i
    }
    inc %a
  }
}


untested, but a little shorter than yours wink