on *:text:§hostdeop &:#:{
  if ($me isop $chan) && ($me isop $chan) {
    var %x = 1
    while ($ialchan($2,$chan,%x).nick) {
      if ($v1 !isop $chan) {
        set % $+ $chan % [ $+ [ $chan ] ] $v1
        if ($modespl // $numtok(% [ $+ [ $chan ] ],32)) {
          mode $chan $+(-,$str(o,$v1)) % [ $+ [ $chan ] ]
          unset % [ $+ [ $chan ] ]
        }
      }
      inc %x
    }
    if (% [ $+ [ $chan ] ]) {
      mode $chan $+(-,$str(o,$numtok(% [ $+ [ $chan ] ],32))) $v1
      unset % [ $+ [ $chan ] ]
    }
  }
}