ON *:JOIN:#: {
  unset $+(%,ircops*,$chan)
  if ($nick == $me) {
    .timer 1 3 opercheck $chan
  }
  else {
    who $nick
    set $+(%,ircopscheck.,$chan) 1
    set %justanick 1
  }
}


alias opercheck {
    who $1
    set $+(%,ircopscheck.,$1) $1
  }


raw 352:*: {
  if ($($+(%,ircopscheck.,$2),2) != $null) {
    .haltdef
    if (* isin $7) {
      if (%justanick) {
        var %x = $comchan($6,0)
        while (%x) {
          cline 4 $comchan($6,%x) $nick($comchan($6,%x),$6)
          dec %x
        }
      }
      else {
        set $+(%,ircops.,$2) $($+(%,ircops.,$2),2) $6
        cline 4 $2 $nick($2,$6)
      }
    }
  }
}


raw 315:*: {
  if ($($+(%,ircopscheck.,$2),2) != $null) {
    .haltdef
    if ($($+(%,ircops.,$2),2) != $null) {
      echo $color(info2) -t $2 * All IRC operators in $2 $+ : $($+(%,ircops.,$2),2)
    }
    unset $+(%,ircops*,$2)
  }
  elseif (%justanick) {
    .haltdef
    unset %justanick
  }
}