alias nickfolder {
var %c = 1,%l = $lines($_txtdir(identify.txt)),%nick
while (%c <= %l) {
var %q = $read($_txtdir(identify.txt), tn,%c),%nick = $wd(%q,1,32),%network = $wd(%q,2,32)
if (%network == *) || ($findtok(%network,$network,44)) { var %nicks %nicks %nick }
inc %c
}
var %nick = $sorttok(%nicks,32), %z = 1
while ($wd(%nick, %z,32)) {
var %n = $wd(%nick, %z,32)
if ($1 == %z) return $iif(%n == $me,$style(1) %n,%n)) :metlogin %n
inc %z
}
}