Miscellany

  ;Quote add.
  if ($$3 == add) {
    if (%k9.quote.mainswitch == 1) {

      var %temp $read(%k9.quote.file, w, $$4-)
      if($readn) { msg $chan $nick, I am afraid that quote already exists. }

      set %k9quote.cid $cid
      set %k9quote.nick $nick
      set %k9quote.chan $chan
      write %k9.quote.file Q $+ $chr(58) $date(ddd) $+ , $date(ddoo) $date(mmm) $+ , $date(yy) $time(HH:nn) $chr(124) $nick $chr(45) $$4-
      msg $chan Quote successfully added.
      mtooltips SpawnTooltip +bs1a 1025 900 0 > K-Nine QuoterBase Alert $chr(4) A new quote has been added to my QuoterBase! $+ $crlf $+ Nick: %k9quote.nick $+ $crlf $+ Channel: %k9quote.chan $chr(4) act_wind
      write -c "C:\Files\quotenum.txt" $lines(%k9.quote.file)
      write %k9.quote.file.php Q $+ $chr(58) $nick $chr(45) " $+ $$4- $+ " $chr(32) $+ $chr(91) $+ $date(dd) $+ / $+ $date(mm) $+ / $+ $date(yy) at $time(HH:nn) $+ $chr(93)
      write "C:\Files\quotenick.txt" $nick
      ignore -u10 $address( $+ $nick $+ ,2)
      /echo -s Uploaded quotes successfully!
      } else { 
      msg $chan Error: Quote System is off.
      ignore -u15 $address( $+ $nick $+ ,2) 
    }
  }