RSBot Quotes

on *:text:*:#rsbot: {
  $iif($nick == Quotes,noop,halt)
  if ($3 == added) {
    write RSBotQuotes.txt $2
    set %currentquote $remove($2,#)
  }
  elseif ($3 == does) {
    halt
  }
  else {
    write RSBotQuotes.txt $2-
    write -i RSBotQuotes.txt
  }
}