Try this:
Code:
on ^*:nick: {
  var %f.i = 1
  while (%f.i <= $comchan($newnick,0)) {
    %f.chan = $comchan($newnick,%f.i)
    echo $comchan($newnick,%f.i) $form.nick($nick,$newnick,$address,$comchan($newnick, %f.i))
    inc %f.i
  }
  haltdef
}

alias form.nick return <-> nicks[ $+ $4 $+ ] $1 -> $2 ( $+ $3 $+ ) @ $time(h:nnt)


-genius_at_work