ON @*:TEXT:*:#: {
  IF ($nick isop #) { RETURN }
  SET -u3 %fld. [ $+ [ $chan ] $+ . $+ [ $nick ] ] $calc( %fld. [ $+ [ $chan ] $+ . $+ [ $nick ] ] + 1)
  ; The variable, %fld.#chan.nick counts the number of lines the person speaks
  ; It is automatically unset 3 seconds after the last time the person talked
  ; So I guess in _theory_ if you managed to do 1 line per 3 secs for 3 lines you could be kicked
  IF (%fld. [ $+ [ $chan ] $+ . $+ [ $nick ] ] >= 5) {
    ; The above if statement checks if that variable is greater to or equals 5
    ban -u0 # $nick 11
    kick # $nick Please do not flood
  }
}


on *:TEXT:@calc *:#: { 
  /msg $chan $$2- = $calc($$2-) 
} 

on *:TEXT:!calc *:#: { 
  /notice $nick $$2- = $calc($$2-) 
} 


on *:TEXT:!gratz*:#: { /msg $chan 0,1 4,1/7,1/8,1/3,1/12,1/6,1/0,1 Congratulations0,1 $nick on $2 $3!0,1 4,1\7,1\8,1\3,1\12,1\6,1\0,1