Its a script that keeps track of people on networks. Its simple and not entirely bug free, but it does what its suposed to.

    alias wie {

      if ($readini(db.ini, jnick, $address($1,1)) != $null) || ($readini(db.ini, jnick, $address($1,2)) != $null) {
        echo -at $chan $1 can also be known as " $+ $readini(db.ini, jnick, $address($1,1)) $+ " or " $+ $readini(db.ini, jnick, $address($1,2)) $+ "
        halt
      }
      echo -at ERROR! No such user (he has to be online) or look on address with /wiea <address>
    }

    alias wiea {
      if ($readini(db.ini, jnick, $1) != $null) {
        echo -at $chan $1 can also be known as " $+ $readini(db.ini, jnick, $1) $+ "
        halt
      }
      echo -a ERROR! No such address found! Could try /wie <nick>
    }
    ON *:NICK:{
      if ($newnick !isin $readini(db.ini, jnick, $address($newnick,1))) {
        writeini -n db.ini jnick $address($newnick,1) $readini(db.ini, jnick, $address($newnick,1)) $newnick
      }
      if ($newnick !isin $readini(db.ini, jnick, $address($newnick,2))) {
        writeini -n db.ini jnick $address($newnick,2) $readini(db.ini, jnick, $address($newnick,2)) $newnick
      }
      echo -t $chan $newnick can also be known as " $+ $readini(db.ini, jnick, $address($newnick,1)) $+ " or " $+ $readini(db.ini, jnick, $address($newnick,2)) $+ "
    }
    ON *:JOIN:#:{
      if ($nick !isin $readini(db.ini, jnick, $address($nick,1))) {
        writeini -n db.ini jnick $address($nick,1) $readini(db.ini, jnick, $address($nick,1)) $nick
      }
      if ($nick !isin $readini(db.ini, jnick, $address($nick,2))) {
        writeini -n db.ini jnick $address($nick,2) $readini(db.ini, jnick, $address($nick,2)) $nick
      }
      echo -tm $chan $nick can also be known as " $+ $readini(db.ini, jnick, $address($nick,1)) $+ " or " $+ $readini(db.ini, jnick, $address($nick,2)) $+ "
    }