var %p = 1,%s = 1 while (%p <= $chan(0)) { did -a $dname 1 $chan(%p) $iif(%s <= $scid(0),$+([,$scid(%s).network,])) inc %p inc %s }
var %s = 1 while ($scon(%s)) { var %p = 1 while ($chan(%p)) { did -a $dname 1 $chan(%p) $iif(%s <= $scon(0),$+([,$scon(%s).network,])) inc %p } inc %s }
while ($scon(%s)) { var %p = 1
while ($scon(%s)) { scon %s var %p = 1