mIRC NickCompleter

menu status,menubar {
  $iif(%NickCompleter,$style(1)) NickCompleter ( $+ $iif(%NickCompleter,On,Off) $+ ) {
    if (%NickCompleter) { unset %NickCompleter | .disable #NickCompleter | echo -a $timestamp 9,1Nick Completer 4CLOSE }
    else { set %NickCompleter on | .enable #NickCompleter | echo -a $timestamp 9,1Nick Completer 3OPEN }
  }
}

#NickCompleter on
alias NickCompleter {
  var %r = $r(1,$len($1))
  if ($1 isvo #) { return [04+ $+ $chr(3) $+ 02 $+ $left($1,$calc(%r - 1)) $+ $chr(31) $+ $chr(3) $+ $gettok(02 03 04 05 06 07 10 12 13,$r(1,10),32)  $+ $+ $mid($1,%r,1) $+ $chr(15) $+ $chr(3) $+ 02 $+ $right($1,$calc(-1 * %r)) $+ $chr(15) $+ ]
    halt
  }
  elseif ($1 isop #) {  return [04@ $+ $chr(3) $+ 02 $+ $left($1,$calc(%r - 1)) $+ $chr(31) $+ $chr(3) $+ $gettok(02 03 04 05 06 07 10 12 13,$r(1,10),32)  $+ $+ $mid($1,%r,1) $+ $chr(15) $+ $chr(3) $+ 02 $+ $right($1,$calc(-1 * %r)) $+ $chr(15) $+ ]
    halt
  }
  elseif ($1 ishop #) {  return [04% $+ $chr(3) $+ 02 $+ $left($1,$calc(%r - 1)) $+ $chr(31) $+ $chr(3) $+ $gettok(02 03 04 05 06 07 10 12 13,$r(1,10),32)  $+ $+ $mid($1,%r,1) $+ $chr(15) $+ $chr(3) $+ 02 $+ $right($1,$calc(-1 * %r)) $+ $chr(15) $+ ]
    halt
  }
  else {
    return [[ $+ $chr(3) $+ 02 $+ $left($1,$calc(%r - 1)) $+ $chr(31) $+ $chr(3) $+ $gettok(02 03 04 05 06 07 10 12 13,$r(1,10),32)  $+ $+ $mid($1,%r,1) $+ $chr(15) $+ $chr(3) $+ 02 $+ $right($1,$calc(-1 * %r)) $+ $chr(15) $+ ] $2-
    halt
  }
}
on *:INPUT:*:{
  if ($server != $null) {
    if ($inpaste) || ($ctrlenter) || ($left($1,1) != /) && (c !isin $active(#).mode) {
      var %max = $numtok($1-,32)
      var %c = 0
      var %sentence = $1-
      while (%c <= %max) {
        inc %c
        if ($gettok($1-,%c,32) ison $active) {
          var %sentence = $replace(%sentence,$gettok($1-,%c,32),$NickCompleter(  [ $+ [ $gettok($1-,%c,32) ] $+ ]  ))
        }
      }
      msg $active %sentence | halt
    }
  }
}
#NickCompleter end