mIRC Op Notice Window

alias winCreate {
  if (!$2) { return }
  window -ankeSl13 $1
  updateOps $2 $1
}
alias updateOps {
  if (!$2) { return }
  if (!$window($2)) { .timer $+ $2 off }

  if ($window($2)) {
    .clear -l $2
    titlebar $2 [[ $+ $nick($1,0,o) $+ ]] @Ops

    var %i = $nick($1,0,o)
    while (%i) {
      .aline -l $2 @ $+ $nick($1,%i,o)
      dec %i
    }
  }
}
#zonotice on
on *:PART:#: {
  var %WinID = $+(@Ops,-,$chan)
  .timer 1 1 updateOps $chan %winID
}
on *:QUIT: {
  var %WinID = $+(@Ops,-,$chan)
  .timer 1 1 updateOps $chan %winID
}
on *:KICK:# {
  var %WinID = $+(@Ops,-,$chan)
  .timer 1 1 updateOps $chan %winID
}
on *:OP:# {
  var %WinID = $+(@Ops,-,$chan)
  .timer 1 1 updateOps $chan %winID
}
on *:DEOP:# {
  var %WinID = $+(@Ops,-,$chan)
  .timer 1 1 updateOps $chan %winID
}
on ^*:NOTICE:*:# {
  var %WinID = $+(@Ops,-,$chan)
  if ($left($target,1) == @) {
    if (!$window(%WinID)) { winCreate %WinID $chan }
    .aline %winID $timestamp < $+ $nick $+ > $$1-
    window -g1 %winID
    haltdef
  }
}
on ^*:ACTION:*:# {
  var %WinID = $+(@Ops,-,$chan)
  if ($left($target,1) == @) {
    if (!$window(%WinID)) { winCreate %WinID $chan }
    window -g1 %winID
    .aline %winID $timestamp * $nick $$1-
    haltdef
  }
}

on *:CLOSE:@: {
  if (@Ops- isin $target) {
    .timer $+ $target off
  }
}

on *:INPUT:@Ops-*: {
  if ($1 == /me) {
    if ($me isop $gettok($target,2-,$asc(-))) {
      .describe @ $+ $gettok($target,2-,$asc(-)) $$1-
      .aline $target $timestamp * $me $$2-
      haltdef
      halt
    }
  }

  if ($left($1,1) != / || ($left($1,1) == / && $ctrlenter)) {
    if ($me isop $gettok($target,2-,$asc(-))) {
      .notice @ $+ $gettok($target,2-,$asc(-)) $$1-
      .aline $target $timestamp < $+ $me $+ > $$1-
      haltdef
      halt
    }
  }
}
#znotice end

menu status,channel,menubar {
  $iif($group(#zonotice).status == on,$style(1),$style(0)) $+ Use Opnotice Window: $iif($group(#zonotice).status == on,.disable,.enable) #zonotice
}

menu @Ops-* {
  dclick: if ($mouse.lb == $true) { query $remove($sline($active,1),@) }
  $iif(!$mouse.lb, &Clear): clear $active
  -
  $iif(!$mouse.lb, &Close): window -c $active
}

alias onotice {
  var %WinID = $+(@Ops,-,$active)
  if ($group(#zonotice).status == on) {
    if (!$window(%WinID)) { winCreate %WinID $chan }
    .notice @ $+ $gettok(%winID,2-,$asc(-)) $$1-
    .aline %winID $timestamp < $+ $me $+ > $$1-
    halt
  }
  else {
    onotice $1-
  }
}