serv

                Never    
C++
       
on ^*:NOTICE:*:?:{
  if ($nick == ChanServ) || ($nick == NickServ) || ($nick == MemoServ && $_chk.service($nick)) {
    if (!$window($+(@,$nick,_,$cid))) { window -Bemizvk[0] $+(@,$nick,_,$cid) }
    echo -t $+(@,$nick,_,$cid) $1-
    haltdef
  }
}

alias _chk.service {
  var %a = $notify($1).addr
  if ($numtok(%a,64) == 2 && $numtok(%a,46) == 1) { return $true }
  else { return $false }
}

on *:INPUT:@*serv:{ if (/ != $left($1,1)) { $lower($left($remove($active,@),1) $+ s) $1- } }

menu *Nickserv {
  $style(2) $server:{}
  -
  identify $window(@Nickserv).title:{ .ns IDENTIFY $$?*="Password:" }
  register $window(@Nickserv).title:{ .ns REGISTER $$?*="Password:" $$?="@mail:" }
  -
  kill nick:{ .ns GHOST $$?="Enter nickname to ghost:" $$?*="Password:" }
  -
  drop nick?:{ .ns DROP $$?="Enter nickname to drop:" }
  -
  release nick:{ .ns RELEASE $$?="Enter nickname to release:" $$?*="Password:" }
}
menu *Chanserv {
  $style(2) $server:{}
  -
  identify $chan:{ .cs identify $$?="Enter channel:" $$?*="Password:" }
  register $chan:{ .cs register $$?="Enter channel:" $$?*="Password:" registered with J0kescript XP }
  -
  # info:{ .cs info $$?="Enter channel:" }
}
menu *serv {
  -
  clear:{ cls }
}

Raw Text