I found this while trolling the search feature on here

Code:
on *:text:*:#:{
  if (!%caps.floodprotection) {
    inc -u2 %caps.floodprotection
    var %caps = $regex($1-,/[A-Z]/g)
    if (%caps > 5) { msg $chan Stop talking in $round($calc(%caps / $len($1-) * 100),2) $+ % and stuff $nick }
  }
}  


Trouble is, if someone writes a decent size sentence that will have 5 caps or more randomly it gets triggered, how would i change it to trigger on say 5 or more caps in a row BLAHBLAH and not blaH blaH blaH blaH blaH

thanks.