on @1:text:*:#:{
  if ($nick !isop $chan) {
    if (%>reps_ [ $+ [ $nick ] ] == $1- ) { inc %>repsa_ [ $+ [ $nick ] ] }
    if (%>reps_ [ $+ [ $nick ] ] == $null)  { set -u10 %>reps_ [ $+ [ $nick ] ] $1- | inc -u10 %>repsa_ [ $+ [ $nick ] ] }
    if (%>repsa_ [ $+ [ $nick ] ] == 2) {
      mode $chan +b ~Tblock:* $+ $2- $+ * 
      unset %*_ [ $+ [ $nick ] ] | goto end
    } 
  }
}