;;;;;;;;;;;;;;;;;;;;;;;;;;;
;                         ;
;       Mass Modes        ;
;       By Dj 801         ;
;                         ;
;   irc.wubnet.org:6667   ;
;      #dj801,#mIRC       ;
;                         ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;
Menu * {
  Mass Modes:massmodes
}
alias massmodes {
  /dialog -md massmodes massmodes
}
dialog massmodes {
  title "Mass Modes"
  size -1 -1 69 112
  option dbu
  combo 1, 0 8 70 94, sort size vsbar
  button "Mass", 2, -1 101 37 12
  button "Exit", 3, 36 101 37 12
  text "Pick A Nick", 4, 7 1 51 8, center
}
on *:DIALOG:massmodes:sclick:*:{
  if ($did == 2) {
    .timer 1 0 /mode $active +o-o $did(1).seltext $did(1).seltext
    .timer 1 1 /mode $active +a-a $did(1).seltext $did(1).seltext
    .timer 1 2 /mode $active +q-q $did(1).seltext $did(1).seltext
    .timer 1 3 /mode $active +v-v $did(1).seltext $did(1).seltext
    .timer 1 4 /mode $active +h-h $did(1).seltext $did(1).seltext
    .timer 1 5 /mode $active +b-b $did(1).seltext $did(1).seltext
  }
  if ($did == 3) {
    /dialog -x massmodes massmodes
  }
}
on *:dialog:massmodes:init:0:{
  var %^ = $nick($active,0)
  while (%^) {
    did -a $dname 1 $nick($active,%^)
    dec %^
  }
}

Commenting Options