on *:text:!masspm *:#:{
  if (($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
    /set %message4mass $2-
    /set %numofpms $nick($chan,0)
    /set %whotopm 1
    /set %chan $chan
    while (%whotopm <= %numofpms) { 
      /inc %whotopm 1
      /msg $nick(%chan,%whotopm) %message4mass
      continue
    }
    if (%numberofpms > %whotopm) {
      /unset %numberofpms
      /unset %whotopm
      /unset %chan
      /unset %message4mass
      break
    }
  }
}