It tells you what channels your on, and on wich network.

• Usage: /CurrentChannels

alias CurrentChannels {
  var %a = 1
  while $scon(%a) {
    var %b = $ifmatch, %c = 1
    scid %b
    while $chan(%c) {
      set %channels %channels $+($chan(%c),$+ $chr(44),$chr(32),at network: $network,$chr(44))
      inc %c
    }
    inc %a
  }
  scid -r
  echo 7 -agt * Channels i'm at: $deltok(%channels,$numtok(%channels,32),44) | unset %channels
}