on @*:text:*:#:{ var %a = 1, %b = $0 while %a <= %b { if $len($gettok($1-,%a,32)) => 100 { ban -k $chan $nick 100+ characters in the first word %a = %b } inc %a }