on *:text:*:#: {
var %dir = system/data/quotes.ini
if ($1 = $setting(quotes,prefix) $+ quote) && ($setting(quotes,sendquotes) = 1) {
var %u = $iif($2,$+(n.,$2),$ini(%dir,$r(1,$ini(%dir,0)))), %t = $ini(%dir,%u,0)
if (%t != 0) {
var %n = $r(1,%t), %i = $ini(%dir,%u,%n), %ii = $gettok(%i,2-,46)
msg $chan Quote by: $gettok(%u,2-,46) on $asctime(%ii,ddd doo mmm/yy @ h:nnt)) ( $+ $duration($calc($ctime - %ii)) ago)
msg $chan %u $+ : $readini(%dir,%u,%i)
}
}
elseif ($1 = $setting(quotes,prefix) $+ addquote) && ($setting(quotes,chatterquotes) = 1) {
if ($3) {
writeini %dir $+(n.,$2) $+(n.,$ctime) $3-
notice $nick Added $3- on $asctime(ddd doo mmm/yy @ h:nnt) for $2
_quote_refresh
}
}
}