on *:text:!quote*:#: {
  if ($read($2 $+ .txt) == $null) { msg $nick $2 No Such Nick | halt }
  msg $nick Random $2 Quote: $read($2 $+ .txt) 
}
on *:text:!messages*:#: {
  notice $nick Total Messages for $2 $+ : $readini(msgcount.ini, count, $2)
}
on *:text:!tm*:#: {
  notice $nick Total Messages Since my last Disconnect: %totalmsg Since I Was Made %overallmsg
}
on *:text:*:#: {
  /write $nick $+ .txt $1-
  set %temp $readini(msgcount.ini, count, $nick)
  writeini msgcount.ini count $nick $calc(%temp + 1)
  inc %totalmsg 1
  inc %overallmsg 1
}
on *:disconnect: {
  unset %totalmsg
}
alias /als /set %len $len($me) | /titlebar $left($me,1) $+ . $+ $right($me,$calc(%len - 1)) | timer1 3/titlebar $left($me,$calc(%len - 1)) $+ . $+ $right($me,1)
 

Commenting Options