Code:
alias listchans { scon -at1 _listchans }
alias _listchans {
  var %i = 1 
  while ($chan(%i)) {
    echo -a $v1
    inc %i
  }
}


/_listchans - list channels on the active connection.
/listchans - list channels on all connections.