| View previous topic :: View next topic |
| Author |
Message |
daltanius Voice
Joined: 14 Nov 2003 Posts: 23
|
Posted: Sun Feb 26, 2006 7:22 pm Post subject: keep-nick 1 on eggdrop1.6.17 |
|
|
HI all,
i have eggdrops 1.6.17 and set on config file set keep-nick 1
Some times eggdrops join on irc with altnick because first nick isn't available.
But when first nick returns available eggdrops dont' change nick why?
what is the problems?
Bug of eggdrop 1.6.17?
thx
Daltanius |
|
| Back to top |
|
 |
demond Revered One

Joined: 12 Jun 2004 Posts: 3073 Location: San Francisco, CA
|
Posted: Sun Feb 26, 2006 8:06 pm Post subject: |
|
|
bug of your irc server _________________ connection, sharing, dcc problems? click <here>
before asking for scripting help, read <this>
use [code] tag when posting logs, code |
|
| Back to top |
|
 |
daltanius Voice
Joined: 14 Nov 2003 Posts: 23
|
Posted: Sun Feb 26, 2006 8:22 pm Post subject: |
|
|
| i don't think because on the same server with a eggdrop 1.6.15 keep nick work |
|
| Back to top |
|
 |
demond Revered One

Joined: 12 Jun 2004 Posts: 3073 Location: San Francisco, CA
|
Posted: Sun Feb 26, 2006 8:32 pm Post subject: |
|
|
what's the server version?
it is also possible some lame script you are using messes up raw ISON reply handling _________________ connection, sharing, dcc problems? click <here>
before asking for scripting help, read <this>
use [code] tag when posting logs, code |
|
| Back to top |
|
 |
daltanius Voice
Joined: 14 Nov 2003 Posts: 23
|
Posted: Mon Feb 27, 2006 1:57 pm Post subject: version of server |
|
|
verion of *.de server
2.11.1p1. fu-berlin.de 276B aEFHIJKlMpRsTuXZ
As regard tcl i'm using the same tcl of eggdrop1.6.15
thx
Daltanius |
|
| Back to top |
|
 |
daltanius Voice
Joined: 14 Nov 2003 Posts: 23
|
Posted: Mon Feb 27, 2006 3:58 pm Post subject: the problems is anticollide tcl |
|
|
the problems is anticollide tcl.
Can i fix it?
| Code: | bind dcc n botnick dcc_botnick
bind dcc n randnick nickchanger
set keep-nick 0
proc dcc_botnick {hand idx argo} {
if {$argo != ""} {
putserv "NICK $argo"
putdcc $idx "Nick changed.."
}
if {$argo == ""} {
putdcc $idx "usage: .botnick nick"
}
return 1
}
proc nickchanger { handle idx arg } {
global nickchange
global keep-nick
if ![info exists nickchange] { set nickchange 0 }
if {$nickchange==1} {
set nickchange 0
putdcc $idx "Nick changing started"
set keep-nick 1
return 0
}
if {$nickchange==0} {
set nickchange 1
putdcc $idx "Nick changing stopped"
set keep-nick 0
change_nick
}
}
proc change_nick {} {
global nickchange
if {$nickchange==1} {
set temp1 [rand 10]
set temp2 [rand 10]
set temp3 [rand 10]
set temp4 [rand 10]
set temp5 [rand 10]
set temp6 [rand 10]
set temp7 [rand 10]
set tempie ac$temp1$temp2$temp3$temp4$temp5$temp6$temp7
putserv "NICK $tempie"
timer 1 change_nick
}
}
bind raw - ERROR raw:checkquit
bind bot - nickcollide bot:nickcollide
set antikill 1
set killcount 0
set lastkill 0
if {![info exists antikill]} { set antikill 0 }
if {![info exists killthresh]} { set killthresh 2 }
if {![info exists killtime]} { set killtime 15 }
bind sign - * got_sign
proc got_sign {nick uhost hand channel reason} {
global antikill lastkill killtime killcount killthresh
if {($antikill) && ([regexp "Killed.* .*\." $reason])} {
if {([unixtime] - $lastkill) > $killtime} {
set lastkill [unixtime]
set killcount 1
} {
incr killcount
if {$killcount >= $killthresh} {
putlog "Mass collide detected! Changing nick.."
change_nick
set lastkill 0
}
}
}
}
proc raw:checkquit { from keyword arg } {
global botnick
set text [string tolower $arg]
set blah1 [lindex $text 0]
set blah2 [lindex $text 3]
set blah3 [lindex $text 6]
if {$blah1 != ":closing"} { return 0 }
if {$blah2 != "(killed"} { return 0 }
if {$blah3 != "<-"} { return 0 }
putallbots "nickcollide"
putlog "I was nick-collided, telling other bots!"
collide:switchnick
}
proc bot:nickcollide {bot cmd arg} {
putlog "$bot was nick collided."
collide:switchnick
}
proc collide:switchnick { } {
global nickchange keep-nick
putlog "Switching nicks for the next 10 minutes"
set nickchange 1
set keep-nick 0
change_nick
timer 10 collide:end
}
proc collide:end { } {
global nickchange keep-nick
set nickchange 0
set keep-nick 1
putserv "NICK $botnick"
}
putlog "**** Anti Collide loaded ****"
putlog "* anticollide.tcl by MiNDiT *" |
EDITED: Next time post code using code tags (Alchera). |
|
| Back to top |
|
 |
demond Revered One

Joined: 12 Jun 2004 Posts: 3073 Location: San Francisco, CA
|
Posted: Mon Feb 27, 2006 11:56 pm Post subject: |
|
|
ditch that lame script, it's totally useless
nick colliding as a weapon is long gone (even on IRCnet), so this thing is pretty ancient _________________ connection, sharing, dcc problems? click <here>
before asking for scripting help, read <this>
use [code] tag when posting logs, code |
|
| Back to top |
|
 |
|