/ScriptServ

menu channel {
  KLøWñ× War
  .Unmasker:/unmask.ip $$?"IP 203.60.23.XXX" $$?"Nick"
  .Reset:reset
  .Autocycle
  ..On:set %autocycle On | echo -a  [02K07L13ø12W05ñ07×1] 4,5::::::::::14,4AUTO15CYCL14E4,5::::::::::15ON
  ..Off:set %autocycle Off | echo -a [02K07L13ø12W05ñ07×1] 4,5::::::::::14,4AUTO15CYCL14E4,5::::::::::15OFF
  .DeOp Kick prot
  ..On:set %kdprot On
  ..Off:set %kdprot Off
  .Op Guarding
  ..On:set %noops On | /echo -a [02K07L13ø12W05ñ07×1]4,5::::::::::14,4OP G15UARD14ING4,5::::::::::9ON
  ..Off:set %noops Off | /echo -a [02K07L13ø12W05ñ07×1]4,5::::::::::14,4OP G15UARD14ING4,5::::::::::9OFF
  .Sysop scan
  ..private:privatesscan
  ..Public:/publicsscan
  .-
  .Assault:run Hack\Assault.exe
  .Battle Pong:run Hack\Battlep.exe
  .Click 2.2:run Hack\Click22.exe
  .CTCP Flood Bots:run Hack\zfn4.exe
  .Devine 3:run Hack\Divint3.exe
  .Exploit Gen:run Hack\Exploit.exe 
  .Gimp:run Hack\Gimp.exe
  .Nuker:run Hack\Nuke.exe
  .Netbus:run Hack\Netbus.exe
  .OOB:run Hack\OOB.exe
  .Pantherm:run Hack\pantherm.exe
  .Port Scanner:run Hack\PORTSCAN.EXE
  .Wingate Scanner:run Hack\wGateScan-2_2.exe
}
;SYSOP SCANNER
alias privatesscan {
  set %sysopscan echo -a
  %sysopscan %vername Sysop scan %vername
  who * o
  .enable #sysop
}
alias publicsscan {
  if ($active != Status Window) {
    set %sysopscan msg $active
    %sysopscan %vername Sysop scan %vername
    who * o
    .enable #sysop
  }
}
#sysop off
raw 352:*:{ 
  if ($left($2,1) == $chr(35)) { set %sysoproom room : $2 }
  else { unset %sysoproom }
  %sysopscan 14name:1 $6 mask: ~ $+ $3 $+ @ $+ $4 %sysoproom
  halt
}
raw 315:*:{ %sysopscan %vername End of scan %vername | .disable #sysop | halt }
#sysop end

ctcp 1:time:*: {
  echo -a  [02K07L13ø12W05ñ07×1] 2CTCP Timed By $nick
  .ctcpreply $nick TIME 2Time And Date Is $day $asctime(mmmm d) $+ th $asctime(h:nntt) | halt 
}

ctcp 1:version:*: {
  if (%version == Full) { echo -a [02K07L13ø12W05ñ07×1] 4,5:::::::15,4VERS14IONE15D By14 $nick4,5::::::: | .ctcpreply $nick  VERSION 9,1K07L13ø12W05ñ07× 4BY KLoWnDJearl 6for 12M4ir8c14 $version $bits $+ bit on 15 Win $+ $os 14The local time and date is 9 $fulldate | .ignore -tu7 * | halt }
  elseif (%version == BitchX) { echo -a [02K07L13ø12W05ñ07×1] 4,5:::::::15,4VERS14IONE15D By14 $nick4,5::::::: | .ctcpreply $nick VERSION BitchX-75p1+ by panasync - Linux 2.3.8 : Keep it to yourself! | .ignore -tu7 * | halt }
  elseif (%version == BitchX Spec) { echo -a [02K07L13ø12W05ñ07×1] 4,5:::::::15,4VERS14IONE15D By14 $nick4,5::::::: | .ctcpreply $nick VERSION BitchX-75p2-8+ Tcl1.3f+ IRCX+ Private by panasync - Linux 2.3.8 + paste.irc : Keep it to yourself! | .ignore -tu7 * | halt }
}
ctcp 1:clientinfo:*: {
  if (%clientinfo == 1) { echo -a [02K07L13ø12W05ñ07×1] 4,5:::::::15,4CLIENT14INFOE15D By14 $nick4,5:::::: | .ctcpreply $nick CLIENTINFO SED UTC ACTION DCC CDCC BDCC XDCC VERSION CLIENTINFO USERINFO ERRMSG FINGER TIME PING ECHO INVITE WHOAMI OP OPS UNBAN IDENT XLINK UPTIME  :Use CLIENTINFO <COMMAND> to get more specific information | .ignore -tu7 * | halt }
  elseif (%clientinfo == 2) { echo -a [02K07L13ø12W05ñ07×1] 4,5:::::::15,4CLIENT14INFOE15D By14 $nick4,5:::::: | .ctcpreply $nick CLIENTINFO  ACTION AWAY CLIENTINFO DCC EMAIL NETMEET PING SOUND TIME USERINFO URL VERSION | .ignore -tu7 * | halt }
  elseif (%clientinfo == 3) { echo -a [02K07L13ø12W05ñ07×1] 4,5:::::::15,4CLIENT14INFOE15D By14 $nick4,5:::::: | .ctcpreply $nick CLIENTINFO SED VERSION CLIENTINFO USERINFO ERRMSG FINGER TIME ACTION DCC UTC PING | .ignore -tu7 * |  halt }
  elseif (%clientinfo == 4) { .ignore -tu7   | halt }
}
;KICK COUNTER
On 1:KICK:#: {
  if ($nick == $me) {
    inc %kick.counter 1
  }
}
;COMIC KICKER
on 1:text:*#*Appears*as*:#:{
  if (%comicapp == On) { if ($me !isop $chan) { halt } | /kick # $nick  02K07L13ø12W05ñ07× 14CoM15Ic Iz14 Real15ly L14amE | halt }
  if (%comicapp == Off) { halt }
}
on 1:TEXT:(#*)*:#:{
  if (%comicmode == On) { if ($me !isop $chan) { halt } | /kick # $nick  02K07L13ø12W05ñ07× 14CoM15Ic Iz14 Real15ly L14amE | halt }
  if (%comicmode == Off) { halt }
}
;SWEAR KICKER
on 1:TEXT:*:#: {
  if (%Kick.Swear == Off) { halt }
  if ($nick !isop $chan) {
    if (%Kick.Swear == On) {
      if ((fuck isin $1-) || (fucker isin $1-) || (cunt isin $1-) ||  (fucking isin $1-) || (asshole isin $1-) || (pussy isin $1-) || (shit isin $1-) || (Bitch isin $1-) || (%Badword-Filter-1 isin $1-) || (%Badword-Filter-2 isin $1-) || (%Badword-Filter3 isin $1-)) {
        if (%Ban.The.User.Aswell == on) { .mode $chan +b $address 4 } | kick $chan $nick 02K07L13ø12W05ñ07× 2No Swearing $k-msg-b
      }
    }
  }
}
:AUTOCYCLE
on 1:PART:#: { 
  if (%autocycle == Off) { halt }
  if (%autocycle == On) { 
    set %peeps $nick($chan,0) 
    if (%peeps == 2) {
      if ($me != $nick) {
        if ($me !isop $chan) {
          set %chan $chan 
          echo 4 -a %vers Channel Is Empty  Now Cycling In-Out To Get Ops In $chan 
          raw -q part #
          raw -q join %chan
        }
      }
    }
  }
}
on 1:QUIT: { 
  if (%autocycle == Off) { halt }
  if (%autocycle == On) {
    set %peeps $nick($chan,0) 
    if (%peeps == 2) {  
      if ($me != $nick) { 
        if ($me !isop $chan) {
          set %chan $chan 
          echo 4 -a %vers Channel Is Empty  Now Cycling In-Out To Get Ops In $chan 
          raw -q part #
          raw -q join %chan
        }
      }
    }
  }
}
on 1:OP:#: {
  if ($me = $nick) { halt }
  if ($opnick = $me) { halt }
  if ($me !isop $chan) { halt }
  if (%noops == Off) { halt }
  if (%noops == On) { 
    mode # -o $nick | msg #  02K07L13ø12W05ñ07× 2Op Guard
    mode # -o $opnick | halt
  }
}