Help with the nicklist, and the inviting

menu channel {
  Invite:dialog -ma mid mid
}
menu channel {
  Invite:/invite $str($nick($chan,%i) $+ $chr(32),4) %ichan 
}
menu nicklist {
  MI
  .1 User:/invite $1 %ichan
  .5 Users:/invite $1 %ichan
  .All Users:/invite $1 %ichan
  .Custom:dialog -me mid mid
}
dialog mid {
  title "Mass Invite"
  size -1 -1 120 78
  option dbu
  list 1, 2 9 50 50, size
  text , 2, 2 1 50 8
  combo 3, 58 20 58 10, drop
  edit "", 4, 86 40 30 10
  text "Choose an amount...", 5, 76 11 40 8
  text "Or enter in a number", 6, 58 32 58 8
  button "Cancel", 9, 23 63 37 12, cancel
  button "Invite", 10, 64 63 37 12
}
on *:DIALOG:mid:init:*:{
  did -a mid 2 $active
  did -a mid 3 1 User : 1
  did -a mid 3 2 Users : 2
  did -a mid 3 5 Users : 5
  did -a mid 3 10 Users : 10
  did -a mid 3 All Users : All
  var %i = 0
  while (%i < $nick($active,0)) {
    inc %i 1 
    did -a mid $nick($active,%i)
  }
}
on *:DIALOG:mid:sclick:3:{
  did -r mid 4
}
on *:DIALOG:mid:sclick:10:{
  if ($did($dname,1).seltext == $null) { .echo -q $input(No user specified,o) | halt }
  else { if ($did($dname,3).seltext == $null) && (($did($dname,4).text == $null) || ($did($dname,4).text !isnum 1-)) {
      var %ichan = 60 
    }
    elseif  ($did($dname,4).text != $null) {
      var %ichan = $did($dname,4).text
    }
    elseif ($did($dname,3).seltext != $null) {
      var %ichan = $gettok($did($dname,3).seltext,2,58)
    }
  }
  invite $str($nick($chan,%i) $+ $chr(32),4) %ichan
  dialog -x mid
}