connection killer

Please Register to submit score.

Average Score	9.1
Scores Submitted	8
Date Added	Feb 20, 2008
Last Updated	Feb 20, 2008
Tags	connection dialog kill killer snotice

Introduction

ok what this does is kills all new incoming connections to a server. you can add the ip's of ur staff so they can connect. so add them like they are in the snotice's when they connect. you can also give ur staff access to the trigger "!conkill on !conkill off" to use by adding their nick.you MUST be either admin or ircop to use this. paste into a new remote and either click on ur menubar or in a channel to open the dialog. someone may find this useful..enjoy...

Grab the Code

dialog conkill {
  title "Connection Killer"
  size -1 -1 156 132
  option dbu
  box "Address To Allow", 1, 2 1 97 33
  text "Enter Adderss:", 2, 5 10 37 8
  edit "", 3, 5 20 91 9, autohs
  button "Add", 4, 48 10 18 9, flat
  button "Del", 5, 76 10 18 9, flat
  box "Address Allow List", 6, 2 37 97 58
  list 7, 5 48 91 44, size vsbar
  box "Con Killer On/Off", 8, 101 1 53 24
  check "on", 9, 104 12 17 10, flat
  check "off", 10, 133 12 17 10, flat
  edit "", 11, 119 82 31 9, read
  text "Time:", 12, 104 82 14 8
  box "Trigger Access", 13, 101 29 53 25
  check "on", 14, 104 40 17 10, flat
  check "off", 15, 133 40 18 10, flat
  box "Date/Time", 16, 101 58 53 37
  text "Date:", 17, 104 69 14 8
  edit "", 18, 119 69 31 9, read
  box "Add/Del Nicks To Use Trigger", 19, 2 98 97 32
  list 20, 105 107 45 19, size vsbar
  text "Add/Del Nick:", 21, 5 107 33 8
  edit "", 22, 42 107 50 9
  button "Add", 23, 12 117 26 9, flat
  button "Del", 24, 53 117 26 9, flat
  box "Nick Trigger List", 25, 101 98 53 32
}
dialog conkir {
  title "ERROR"
  size -1 -1 91 23
  option dbu
  box "��X�Ǯ��t0��X׻", 1, 1 1 89 21
  text "ERROR! Please Enter An Address", 2, 4 10 84 8
}
dialog conkiw {
  title "ERROR"
  size -1 -1 91 23
  option dbu
  box "��X�Ǯ��t0��X׻", 1, 1 1 89 21
  text "ERROR! Please Enter A Nick", 2, 4 10 84 8
}
on *:load: { 
  echo 12 -a You Have Just Loaded Napa182's Connection Killer 
  echo 12 -a A Script0rs Inc. Production 
  echo -a 14,1(14,1�15,1�0,1�0,1� ��X�Ǯ��t0��X׻ �0,1�15,1�14,1�)�
}
menu menubar,channel {  
  .Connetion killer:{ conkill }
}
alias conkill { dialog $iif($dialog(conkill),-v,-md) conkill conkill }
alias conkir { dialog $iif($dialog(conkir),-v,-md) conkir conkir }
alias conkiw { dialog $iif($dialog(conkiw),-v,-md) conkiw conkiw }
alias datee { did -ra conkill 18 $date(mm.dd.yy) }
alias contime { did -ra conkill 11 $time(h:nn:sst) }
on *:DIALOG:conkill:close:0:{ .timerdatte off | .timercon off }
on *:DIALOG:conkill:init:0:{
  if (%conkill) { did -c conkill 9 }
  if (!%conkill) { did -c conkill 10 }
  if (%trigger) { did -c conkill 14 }
  if (!%trigger) { did -c conkill 15 }
  did -a conkill 11 $time(h:nn:sst) | .timercon 0 1 contime
  did -a conkill 18 $date(mm.dd.yy) | .timerdatte 0 1 datee
  if (%allow) {
    var %conallow = $gettok(%allow,1-,44)
    var %bo = $numtok(%conallow,44), %oh = 1
    while ( %oh <= %bo ) {
      did -a conkill 7 $gettok(%conallow,%oh,44)
      inc %oh
    }
  }
  if (%trignick) {
    var %trigallow = $gettok(%trignick,1-,44)
    var %bo = $numtok(%trigallow,44), %oh = 1
    while ( %oh <= %bo ) {
      did -a conkill 20 $gettok(%trigallow,%oh,44)
      inc %oh
    }
  }
}
on *:DIALOG:conkill:sclick:*:{
  if ($did == 9) { set %conkill on | did -u conkill 10 }
  if ($did == 10) { unset %conkill | did -u conkill 9 }
  if ($did == 14) { set %trigger on | did -u conkill 15 }
  if ($did == 15) { unset %trigger | did -u conkill 14 }
  if ($did == 4) {
    if (!$did(3).text) { 
      conkir 
    }
    else { 
      set %allow $addtok(%allow,( $+ $did(3).text $+ ),44)
      did -r conkill 3
      did -r conkill 7
      var %conallow = $gettok(%allow,1-,44)
      var %bo = $numtok(%conallow,44), %oh = 1
      while ( %oh <= %bo ) {
        did -a conkill 7 $gettok(%conallow,%oh,44)
        inc %oh
      }
    }
  }
  if ($did == 5) { 
    if (!$did(3).text) {
      conkir
    }
    else {
      set %allow $remtok(%allow,( $+ $did(3).text $+ ),1,44)
      did -r conkill 3
      did -r conkill 7
      var %conallow = $gettok(%allow,1-,44)
      var %bo = $numtok(%conallow,44), %oh = 1
      while ( %oh <= %bo ) {
        did -a conkill 7 $gettok(%conallow,%oh,44)
        inc %oh
      }
    }
  }
  if ($did == 23) {
    if (!$did(22).text) {
      conkiw
    }
    else {
      set %trignick $addtok(%trignick,$did(22).text,44)
      did -r conkill 22
      did -r conkill 20
      var %trigallow = $gettok(%trignick,1-,44)
      var %bo = $numtok(%trigallow,44), %oh = 1
      while ( %oh <= %bo ) {
        did -a conkill 20 $gettok(%trigallow,%oh,44)
        inc %oh
      }
    }
  }
  if ($did == 24) {
    if (!$did(22).text) {
      conkiw
    }
    else {
      set %trignick $remtok(%trignick,$did(22).text,1,44)
      did -r conkill 22
      did -r conkill 20
      var %trigallow = $gettok(%trignick,1-,44)
      var %bo = $numtok(%trigallow,44), %oh = 1
      while ( %oh <= %bo ) {
        did -a conkill 20 $gettok(%trigallow,%oh,44)
        inc %oh
      }
    }
  }
}
on *:text:*:#: {
  if ($strip($1) == !conkill) {
    if ($nick isin $gettok(%trignick,1-,44)) && (%trigger == on) {
      if ($strip($2) == on) { 
        set %conkill on
        .msg botserv say $chan Connection Killer Is Now ON!! All Incoming Connection's Will Be Killed
      }
      if ($strip($2) == off) {
        unset %conkill
        .msg botserv say $chan Connection Killer Is Now OFF!!   
      }
    }
  }
}
on *:snotice:*client connecting*:{
  if (%conkill == on) {
    if ($10 isin $gettok(%allow,1-,44)) { 
      halt
    }
    else { Kill $9 Sorry We Are Not Accepting Any New Connections At This Time. Try Back Later }
  }
}

Comments

(8) RSS

Go to Bottom

shideezhi

Comments: 5

mIRC Snippet: connection killer
Posted on Feb 20, 2008 4:53 am

love it

Darkkeeper

Comments: 97

mIRC Snippet: connection killer
Posted on Feb 20, 2008 5:33 am

Very nice napa

napa182

Comments: 775

mIRC Snippet: connection killer
Posted on Feb 20, 2008 1:48 pm

thanks

SLS10

Comments: 34

mIRC Snippet: connection killer
Posted on Feb 20, 2008 9:32 pm

I could see this being used for evil and otherwise naughty things, though. Like an admin of a large channel who's sick of everyone, so they unleash this script on 'em. Of course, highly improbable, but still.

Xitr0

Comments: 2

mIRC Snippet: connection killer
Posted on Feb 20, 2008 9:38 pm

great script napa182

ZiX

Comments: 52

mIRC Snippet: connection killer
Posted on Apr 25, 2008 9:26 am

very nice, napa182

TheWhistler

Comments: 6

mIRC Snippet: connection killer
Posted on Jun 5, 2008 6:34 pm

i like this but couldnt it be made so you can just add certern ip's that you dont wnat to connect to the server , if so that would be greattttttt, i know i could use one ???

AdrianF

Comments: 34

mIRC Snippet: connection killer
Posted on Jun 13, 2008 6:54 am

lol @ whitleer

connection killer

Introduction

Grab the Code

Comments

napa182

My Snippet Tags

Contact

Friends (30)

Sponsors

		Head Admin For irc.EzzyChat.com California ÎÇ ×Ç ÑÎ KÅ
Last seen: Jul 19, 2008 Profile \| Website Friends (30) Snippets (40) Images (1) Comments Received (349) Comments Submitted (775) Forum Posts (135)