alias Lazy_rpt {
  var %` $regsubex($2-,/(\W+)/ig,$null) 
  hinc -mu10 $1 $md5(%`)
  if $hget($1,$md5(%`)) >= 2 {
    ban -ku600 # $1 2 hobbaa!
    hfree $1
  }
}
on *:text:*:#: {
  Lazy_rpt $nick $chan $1-
}