Something

massvoice {
  var %x = 1
  while (%x <= $nick($chan,0)) {
    mode $chan +v $nick($chan,%x)
  inc %x }
}

massdevoice {
  var %x = 1
  while (%x <= $nick($chan,0)) {
    mode $chan -v $nick($chan,%x)
  inc %x }
}

masshalfop {
  var %x = 1
  while (%x <= $nick($chan,0)) {
    mode $chan +h $nick($chan,%x)
  inc %x }
}

massdehalfop {
  var %x = 1
  while (%x <= $nick($chan,0)) {
    mode $chan -h $nick($chan,%x)
  inc %x }
}

massop {
  var %x = 1
  while (%x <= $nick($chan,0)) {
    mode $chan +o $nick($chan,%x)
  inc %x }
}

massdeop {
  var %x = 1
  while (%x <= $nick($chan,0)) {
    mode $chan -o $nick($chan,%x)
  inc %x }
}

mhl {
  var %x = 1
  while (%x <= $nick($chan,0)) {
    if (%x == 1) {
      clipboard $nick($chan,%x)
    inc %x }
    elseif (%x == $nick($chan,0)) { 
      clipboard -a $chr(15) and $nick($chan,%x) $+ $chr(46)
    inc %x }
    else { 
      clipboard -a $chr(44) $nick($chan,%x)
    inc %x }
  }
  msg $chan hi $cb
}