on *:LOAD: {
  echo 9,1 Thanks for Loading 801`s Quote System
  /set %qo $$?="Bot Owner:"
}
on *:TEXT:*:#: { 
  if ($1 = .qrand) {
    set %quote $read(quotes.txt) 
    msg $chan 2Quote $chr(91) $+ $readn $+ $chr(92) $+ $lines(Quotes.txt) $+ $chr(93) 3 $+ %quote 
  }
  if ($1 == .q) {
    if ($2 isalnum) && ($2 <= $lines(Quotes.txt)) { 
      msg $chan 2Quote $chr(91) $+ $2 $+ $chr(92) $+ $lines(Quotes.txt) $+ $chr(93) 3- $read(quotes.txt, $2) 
    } 
  }
  if ($1 == .qadd) {
    write quotes.txt $2-
    msg $chan 2Your quote was Succesfully Added as Quote $chr(35) $+ $lines(Quotes.txt) $+ . 
    t Quote $chr(35) $+ $lines(Quotes.txt) - $2- 
  }
  if ($1 = .qdel) {
    if ($nick isin %qo) {
      write -dl $2 quotes.txt 
      msg $chan 2Quote $chr(35) $+ $2 has been deleted. 
    }
    else msg $chan 2Olny %qo can Delete a quote.
  }
  if ($1 == .qlist) {
    msg $chan 5Total number of quotes: 2 $+ $lines(Quotes.txt) 
  }
  if ($1 == .qlast) {
    msg $chan 2Last quote: 5 $+  $chr(91) $+ $chr(35) $+ $lines(Quotes.txt) $+ $chr(92) $+ $lines(Quotes.txt) $+ $chr(93)  $read(Quotes.txt, $lines(Quotes.txt))
  }
  if ($1 == .qhelp) {
    .notice $nick 5 $+ .qrand 2Will show a random Quote.
    .notice $nick 5 $+ .q <number> 2Will Show you a specific Quote.
    .notice $nick 5 $+ .qadd <text> 2 Will Add a Quote.
    .notice $nick 5 $+ .qdel <number> 2 Will Delete a Specific Quote.
    .notice $nick 5 $+ .qlist 2 Will Tell You How Many Quotes There Is.
    .notice $nick 5 $+ .qlast 2 Will Tell you The Last Quote Added.
  }
}
 

Commenting Options