egghelp/eggheads community

on connect akill the bad nick

2004-02-02T12:04:02-04:00

CrazyCat : well, duh! he pasted the local client connection:

-irc[dot]server[dot]com- *** Notice -- Client connecting on port 6667: adopav (~poqvds@202.165.253.12) [clients]

Statistics: Posted by caesar — Mon Feb 02, 2004 12:04 pm

on connect akill the bad nick

2004-02-02T07:06:21-04:00

Take care, this will work only on local server, the message isn't the same if you have more than 1 server and if the bad client connects to a different server than where the bot is connected.
You'd better check for Client connecting

Ok I Understand.

Akill command will be like this maybe

Code:

set banmask *!*@[lindex [split $from @] 1] putserv "PRIVMSG OperServ :AKILL ADD +30d $banmask :BadNick"

But i don't know howto whois and detect bad realname and bad ident

can u write the full code plz

actually i wanted something what can detect the flood bot nick ident or realname auto and akill them on connect

have a look at http://forum.egghelp.org/viewtopic.php?t=6756

Thanks for helping me

Statistics: Posted by Guest — Mon Feb 02, 2004 7:06 am

on connect akill the bad nick

2004-02-02T04:19:49-04:00

Thanks alot for this code and can you tell me how i can banned bad ident and real name same way

Perform a /whois $nick and then parse raw 311:
311 RPL_WHOISUSER
" * :"

Statistics: Posted by CrazyCat — Mon Feb 02, 2004 4:19 am

on connect akill the bad nick

2004-02-02T04:16:33-04:00

Code:

set akillnicks {  "nick1"  "nick2"  "nick3"  "etc."}bind raw - NOTICE client:connectproc client:connect {from keyword args} {  global akillnicks  if {[string match "*Client connecting on port*" $args]} {    set usernick [lindex [split $args] 9]    foreach nick $akillnicks {      if {[string equal -nocase $nick $usernick]} {        # your akill thing here        break      }    }  }}

Take care, this will work only on local server, the message isn't the same if you have more than 1 server and if the bad client connects to a different server than where the bot is connected.
You'd better check for Client connecting

Statistics: Posted by CrazyCat — Mon Feb 02, 2004 4:16 am

on connect akill the bad nick

2004-02-02T01:12:35-04:00

Thanks alot for this code and can you tell me how i can banned bad ident and real name same way

Thanks

Statistics: Posted by Guest — Mon Feb 02, 2004 1:12 am

on connect akill the bad nick

2004-02-01T16:20:38-04:00

try this:

Code:

set akillnicks {  "nick1"  "nick2"  "nick3"  "etc."}bind raw - NOTICE client:connectproc client:connect {from keyword args} {  global akillnicks  if {[string match "*Client connecting on port*" $args]} {    set usernick [lindex [split $args] 9]    foreach nick $akillnicks {      if {[string equal -nocase $nick $usernick]} {        # your akill thing here        break      }    }  }}

Statistics: Posted by caesar — Sun Feb 01, 2004 4:20 pm

on connect akill the bad nick

2004-02-01T15:15:36-04:00

is there any tcl for on connect akill for the bad nick?
or what will be the code to on connect?

like:

-irc[dot]server[dot]com- *** Notice -- Client connecting on port 6667: adopav (~poqvds@202.165.253.12) [clients]
-
-irc[dot]server[dot]com- *** Global -- from OperServ: BOT added an AKILL for *@202.165.253.12 ([BOT] Badnick) (expires in 69 days)

Thanks

Statistics: Posted by Guest — Sun Feb 01, 2004 3:15 pm