on *:TEXT:*:#testthisshit: {
  if $lines( $+ $chan $+.txt) == 100 { write -dl1 $chan $+.txt }
  then { write $chan $+ .txt $nick $+ : $1- }
  else { write $chan $+ .txt $nick $+ : $1- }
}