Forums Scripts & Popups multiselect nicks in a dialog

dialog user.list {
  size -1 -1 110 110
  option dbu
  list  2, 5 5 100 90, multsel extsel
  button "Send Message",4, 40 95 40 10
}

On *:Dialog:user.list:init:*: {
  didtok $dname 2 32 Adam Bob Chris Dave Evan Fred Gary Henry
}

On *:Dialog:user.list:sclick:4: {
  if ($did($dname,2,0).sel) {
    var %x = 1, %msg = $$?="message?"
    while (%x <= $did($dname,2,0).sel) { 
      msg $did($dname,2,$did($dname,2,%x).sel) %msg
      inc %x
    }
  }
}