Quote Sys

  alias quoteparse {
  var %k9.quote.buffer = $$1-
  return  Quote $gettok(%k9.quote.buffer,1,32) $+ : " $+ $gettok(%k9.quote.buffer,8-,32) $+ " added by $gettok(%k9.quote.buffer,-2,32) on $gettok(%k9.quote.buffer,2-5,32) at $gettok(%k9.quote.buffer,-3,32)
}

  ;Random quote.
  if ($$3 == random) {
    if (%k9.quote.mainswitch == 1) {
      var %k9.quote.randomq $read(%k9.quote.file)
      msg $chan $quoteparser(%k9.quote.randomq)
    }
    else {
      msg $chan Error: Quote System is off.
      ignore -u15 $address( $+ $nick $+ ,2) 
    }
  }