While loops such as:

    var %x = 1
    while (%x <= $numtok($readini(nets.ini,channels,%name),32)) {
      did -a netsadd 7 $gettok($readini(nets.ini,channels,%name),%x,32)
      inc %x
    }

Can be written as:

    var %x = 1
    while $gettok($readini(nets.ini,channels,%name),%x,32) {
      did -a netsadd 7 $v1
      inc %x
    }

Basically any time you find yourself doing a
while (%x <= $ident(0)) looking at the total you
can often do something like the above and use
the $ifmatch or the even shorter $v1 identifier