ON *:JOIN:#earthbound: {
  if ((krewsforum.net isin $server) && ($nick != $me)) {
    if $address($nick, 2) != $read(earthboundaddr.txt, w, $address($nick, 2)) {
      write earthboundaddr.txt $address($nick, 2)
    } 
  }
}
ON *:PART:#earthbound: {
  if ((krewsforum.net isin $server) && ($nick != $me)) {
    if ($address($nick, 2) == $read(earthboundaddr.txt, w, $address($nick, 2))) {
      if %earthbound.nick != $nick {
        sajoin $nick #earthbound
      }
      else {
        unset %earthbound.nick
      }
    }
  }
}
ON *:NOTICE:*:*: {
  if krewsforum.net isin $server && $nick != $me {
    if $1 == $chr(83) $+ $chr(101) $+ $chr(120) && $address($nick, 2) == $read(earthboundaddr.txt, w, $address($nick, 2)) {
      set %earthbound.nick $nick
      sapart $nick #earthbound
      .notice $nick Freedom has been granted.
      msg #earthbound $nick has just solved the easter egg.
      .msg chanserv aop #earthbound add $nick
      write -df earthboundaddr.txt $address($nick, 2) hi
    }
  }
}
ON *:JOIN:*: {
  if krewsforum.net isin $server && $nick != $me {
    if $address($nick, 2) == $read(earthboundaddr.txt, w, $address($nick, 2)) && $nick !ison #earthbound {
      sajoin $nick #earthbound
    }
  }
}
ON *:KICK:#earthbound: {
  if $address($knick, 2) == $read(earthboundaddr.txt, w, $address($knick, 2)) {
    sajoin $knick #earthbound
  }
}