Jethro commented on a Page, Welcome Back Greeter  -  Mar 20, 2009

Hash table version:

on !*:JOIN:#: {
  if ($istok($hget(nicknames,$chan),$nick,32)) { .notice $nick Welcome back to $chan $+ , $nick $+ . Glad to see you here again! =] }
  else { .notice $nick Welcome to $chan $+ , $nick $+ . We hope you make this your new hangout spot. }
}
on !*:PART:#: { hadd -m nicknames $chan $addtok($hget(nicknames,$chan),$nick,32) }
on !*:QUIT: {
  var %x = $comchan($nick,0)
  while (%x) {
    hadd -m nicknames $comchan($nick,%x) $addtok($hget(nicknames,$comchan($nick,%x),$nick,32))
    dec %x
  }
}
on *:CONNECT: {
  if (!$hget(nicknames)) { hmake nicknames 100 }
  if ($isfile(nicknames.hsh)) { hload nicknames nicknames.hsh }
}
on me:*:PART:#: { hsave -o nicknames nicknames.hsh }
on *:DISCONNECT: { hsave -o nicknames nicknames.hsh }
on *:EXIT: { hsave -o nicknames nicknames.hsh }
 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.