All pastes #365942 Raw Edit

Miscellany

public text v1 · immutable
#365942 ·published 2007-02-21 11:30 UTC
rendered paste body
on *:TEXT:!Seen*:#:{
  if ($chr(36) isin $1-) { HALT }
  if ($2 == $null) { HALT }
  if ($2 == $me) { msg $chan $nick $+ : idiot. | HALT }
  if ($2 == $nick) { msg $chan $nick $+ : idiot. | HALT }
  if ($2 ison $chan) { msg $chan $2 is on $chan right now! | HALT }
  if ($ini(seenusers.ini, $2, Lastseen) == $null) { msg $chan I have not seen $2 $+ . | HALT }
  else { msg $chan I last saw $2 ( $+ $readini(seenusers.ini, $2, addr) $+ ) $duration($calc($ctime - $readini(seenusers.ini, $2, time))) ago $readini(seenusers.ini, $2, lastseen) | HALT }
}

on *:JOIN:#:{ writeini seenusers.ini $nick time $ctime | writeini seenusers.ini $nick addr $address | writeini seenusers.ini $nick Lastseen Joining $chan on $date(ddd mmm dd yyyy) @ $time(h:nn tt) }
on *:PART:#:{
  if ($chr(36) isin $1-) { HALT }
  else { writeini seenusers.ini $nick time $ctime | writeini seenusers.ini $nick addr $address | writeini seenusers.ini $nick Lastseen Parting $chan on $date(ddd mmm dd yyyy) @ $time(h:nn tt) stating: $1- }
}

on *:KICK:#:{
  if ($chr(36) isin $1-) { HALT }
  else { writeini seenusers.ini $knick addr $address | writeini seenusers.ini $knick time $ctime | writeini seenusers.ini $knick addr $address | writeini seenusers.ini $knick Lastseen Being kicked from $chan by $nick on $date(ddd mmm dd yyyy) @ $time(h:nn tt) stating: $1- }
}

on *:NICK:{ writeini seenusers.ini $nick time $ctime | writeini seenusers.ini $newnick time $ctime | writeini seenusers.ini $newnick addr $address | writeini seenusers.ini $nick addr $address | writeini seenusers.ini $nick Lastseen Changing nicks to $newnick on $date(ddd mmm dd yyyy) @ $time(h:nn tt) | writeini seenusers.ini $newnick Lastseen Changing nicks to $newnick on $date(ddd mmm dd yyyy) @ $time(h:nn tt) }
on *:QUIT:{
  if ($chr(36) isin $1-) { HALT }
  else { writeini seenusers.ini $nick time $ctime | writeini seenusers.ini $nick addr $address | writeini seenusers.ini $nick Lastseen Quiting on $date(ddd mmm dd yyyy) @ $time(h:nn tt) stating: $1- }
}