Quote Search

;Quote search.
  if ($$3 == search) {
    if (%k9.quote.mainswitch == 1) { 
      set %k9.quote.search $read(%k9.quote.file, w, $$4- $+ )
      msg $chan $quoteparser(%k9.quote.search)
      ignore -u10 $address( $+ $nick $+ ,2) 
    }
    elseif ($quoteparser(%k9.quote.search) == $null) {
      msg $chan Sorry, the quote cannot be found.
      ignore -u10 $address( $+ $nick $+ ,2)

      else { 
        msg $chan Error: Quote System is off.
        ignore -u10 $address( $+ $nick $+ ,2) 
      }
    }