egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2005-07-25T22:44:05-04:00 https://forum.eggheads.org/app.php/feed/topic/10131 2005-07-25T22:44:05-04:00 2005-07-25T22:44:05-04:00 https://forum.eggheads.org/viewtopic.php?p=53298#p53298 <![CDATA[nickserv autologin script with autorecover]]> Statistics: Posted by Lolita — Mon Jul 25, 2005 10:44 pm

]]> 2005-07-25T16:35:21-04:00 2005-07-25T16:35:21-04:00 https://forum.eggheads.org/viewtopic.php?p=53268#p53268 <![CDATA[nickserv autologin script with autorecover]]> damned, a new boss want me to work!!! :D

Statistics: Posted by CrazyCat — Mon Jul 25, 2005 4:35 pm

]]> 2005-07-25T13:58:45-04:00 2005-07-25T13:58:45-04:00 https://forum.eggheads.org/viewtopic.php?p=53254#p53254 <![CDATA[nickserv autologin script with autorecover]]>
I don't know how this script worked for you, all its procs lack their arguments. Read tcl-commands.doc to know about the binds and their procs.
hmm nvm, there is somehing bad in script and it doesn't work with proc arguments too
You can use my script, it's simple and works fine.
It works using two ways:
- eggdrop connect, send the identification
- on a nickserv notice (this nick is registered.....), send the identification again.
your script doesn't have release if my bot nick is owned by someone else ):

Statistics: Posted by Lolita — Mon Jul 25, 2005 1:58 pm

]]> 2005-07-25T13:54:43-04:00 2005-07-25T13:54:43-04:00 https://forum.eggheads.org/viewtopic.php?p=53252#p53252 <![CDATA[nickserv autologin script with autorecover]]> my script, it's simple and works fine.
It works using two ways:
- eggdrop connect, send the identification
- on a nickserv notice (this nick is registered.....), send the identification again.

Statistics: Posted by CrazyCat — Mon Jul 25, 2005 1:54 pm

]]> 2005-07-25T12:43:47-04:00 2005-07-25T12:43:47-04:00 https://forum.eggheads.org/viewtopic.php?p=53238#p53238 <![CDATA[nickserv autologin script with autorecover]]> Statistics: Posted by Sir_Fz — Mon Jul 25, 2005 12:43 pm

]]> 2005-07-25T12:30:16-04:00 2005-07-25T12:30:16-04:00 https://forum.eggheads.org/viewtopic.php?p=53234#p53234 <![CDATA[nickserv autologin script with autorecover]]> i found this scipt on forums (and this is only script which at last half worked for me), but it doesn't working so i fixed it a little, but still having Tcl error [identnick]: wrong # args: should be "identnick" error when it try to identify afeter gets its nick recovered

Code: 

# nickserv event driven identify scriptset nickserv "NickServ"set chanserv "ChanServ"set mynick "Devastation"set mypass "*"set recovery 1set mydebug 1bind evnt - init-server my-initserver#bind motd - "*For more information please see http://noneatall/*" my-initserverbind notc - "*nickname is registered*" identnickbind notc - "*password accepted*" authsuccessbind raw - 436 { set recovery 1 }bind need - "% op" needopproc my-initserver {type} {nickservices}proc nickservices {} {global mydebug passauth channels recoveryif {$mydebug} { putlog "Nickservices started" }# turn channels off until ident completechanoffif {$recovery} { recovernick }# ok we are done Smileif {$mydebug} { putlog "Nickservices finished" }}proc authsuccess {} {global mydebugif {$mydebug} { putlog "Authenticaion Success" }# turn channels back onchanonunbind notc - "password accepted" authsuccessunbind notc - "please choose a different nick" identnickunbind raw - 436 { set recovery 1 }}# turn all channels onproc chanon {} {global mydebug channelsif {$mydebug} { putlog "Channels set active" }foreach ch [channels] {channel set $ch -inactive}}# turn all channels offproc chanoff {} {global mydebug channelsif {$mydebug} { putlog "Channels set inactive" }foreach ch [channels] {channel set $ch +inactive}}proc recovernick {} {global mydebug mynick mypass nick nickservif {$mydebug} { putlog "Recovering nick" }bind notc - "RELEASE $mynick" releasenickputserv "PRIVMSG $nickserv :RECOVER $mynick $mypass"}proc releasenick {} {global mydebug mynick mypass nick nickservif {$mydebug} { putlog "Releasing nick" }unbind notc - "RELEASE $mynick" releasenickbind notc - "your nick has been released" revertnickputserv "PRIVMSG $nickserv :RELEASE $mynick $mypass"}proc revertnick {} {global mydebug nick mynickif {$mydebug} { putlog "Reverting nick" }unbind notc - "your nick has been released" revertnickset nick mynick}proc identnick {} {global mydebug nickserv mypassif {$mydebug} { putlog "Identify myself" }putserv "PRIVMSG $nickserv :IDENTIFY $mypass"}proc needop {channel type} {global mydebug chanserv nickif {$mydebug} { putlog "I need ops" }putserv "PRIVMSG $chanserv :OP $channel $nick"}

Statistics: Posted by Lolita — Mon Jul 25, 2005 12:30 pm

]]>