try !addquote to add a quote.
!read to read a quote

on *:load: { write -c C:\quotes.txt | set %QuoteN 0 } 
on *:unload: { write -c C:\quotes.txt | unset %QuoteN } 
on *:text:!AddQuote*:#: { if ($2) { inc %QuoteN 1 | write -l $+ %QuoteN C:\quotes.txt %QuoteN 7Quote5 %QuoteN $+ 1:5" $+ $2- $+ " 1- 7Set by5 $nick $+ 1 7on1 $adate $+ . | msg # 7Added quote1 "5 $+ $2- $+ 1"7 by5 $nick $+ . } 
  else { 
    msg # 3Please add a quote! 
  }
}
on *:text:!read*:#: { if (!$2) { msg # $read(C:\quotes.txt) 
  }
  elseif ($2) && ($2 isin $read(C:\quotes.txt,$2)) {
    msg # $read(C:\quotes.txt,$2) 
  }
  elseif ($2 !isin $read(C:\quotes.txt,$2)) {
    msg # 3Quote not found!  Please try another number!
  }
}
alias rquotes {
  .timerquote 0 4 msg # $read(C:\quotes.txt)
}