Multi server away

; Add to mIRC alias.ini (Alt-A)
; /away.loop [<nick-end>[<more text> ...]]
away.loop {
  var %csc $cid
  msg NeonServ #MyPrivateStatusChannel topic 2 $iif($1,$1-,On)
  var %ctr = 0 | var %tot = $scon(0)
  while (%ctr < %tot) {
    inc %ctr
    scon %ctr
    var %net $scon(%ctr).network
    var %sfx $str(`,$hget(networks,%net))
    hinc -m networks %net
    away $1-
    if (!$1) tnick $mnick $+ %sfx
    else tnick $+($lower($mnick),%sfx,|,$1))
  }
  scid %csc
  hfree networks
}