Quote script
Platform: mIRC
Published Nov 02, 2009
Updated Nov 02, 2009
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)
}
