This is the new home of the egghelp.org community forum.
All data has been migrated (including user logins/passwords) to a new phpBB version.


For more information, see this announcement post. Click the X in the top right-corner of this box to dismiss this message.

nickserv autologin script with autorecover

Old posts that have not been replied to for several years.
Locked
L
Lolita
Voice
Posts: 13
Joined: Sun Jul 24, 2005 4:11 pm

nickserv autologin script with autorecover

Post by Lolita »

i searched for some script for nickserv with autorecover command if bots nick is in use ...
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: Select all

# nickserv event driven identify script

set nickserv "NickServ"
set chanserv "ChanServ"
set mynick "Devastation"
set mypass "*"
set recovery 1
set mydebug 1

bind evnt - init-server my-initserver
#bind motd - "*For more information please see http://noneatall/*" my-initserver
bind notc - "*nickname is registered*" identnick
bind notc - "*password accepted*" authsuccess
bind raw - 436 { set recovery 1 }
bind need - "% op" needop

proc my-initserver {type} {
nickservices
}


proc nickservices {} {
global mydebug passauth channels recovery
if {$mydebug} { putlog "Nickservices started" }

# turn channels off until ident complete
chanoff
if {$recovery} { recovernick }

# ok we are done Smile
if {$mydebug} { putlog "Nickservices finished" }
}

proc authsuccess {} {
global mydebug
if {$mydebug} { putlog "Authenticaion Success" }

# turn channels back on
chanon

unbind notc - "password accepted" authsuccess
unbind notc - "please choose a different nick" identnick
unbind raw - 436 { set recovery 1 }
}


# turn all channels on
proc chanon {} {
global mydebug channels
if {$mydebug} { putlog "Channels set active" }
foreach ch [channels] {
channel set $ch -inactive
}
}

# turn all channels off
proc chanoff {} {
global mydebug channels
if {$mydebug} { putlog "Channels set inactive" }
foreach ch [channels] {
channel set $ch +inactive
}
}

proc recovernick {} {
global mydebug mynick mypass nick nickserv
if {$mydebug} { putlog "Recovering nick" }
bind notc - "RELEASE $mynick" releasenick
putserv "PRIVMSG $nickserv :RECOVER $mynick $mypass"
}

proc releasenick {} {
global mydebug mynick mypass nick nickserv
if {$mydebug} { putlog "Releasing nick" }
unbind notc - "RELEASE $mynick" releasenick
bind notc - "your nick has been released" revertnick
putserv "PRIVMSG $nickserv :RELEASE $mynick $mypass"
}

proc revertnick {} {
global mydebug nick mynick
if {$mydebug} { putlog "Reverting nick" }
unbind notc - "your nick has been released" revertnick
set nick mynick
}

proc identnick {} {
global mydebug nickserv mypass
if {$mydebug} { putlog "Identify myself" }
putserv "PRIVMSG $nickserv :IDENTIFY $mypass"
}

proc needop {channel type} {
global mydebug chanserv nick
if {$mydebug} { putlog "I need ops" }
putserv "PRIVMSG $chanserv :OP $channel $nick"
}
User avatar
Sir_Fz
Revered One
Posts: 3794
Joined: Sun Apr 27, 2003 3:10 pm
Location: Lebanon
Contact:

Post by Sir_Fz »

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.
User avatar
CrazyCat
Revered One
Posts: 1293
Joined: Sun Jan 13, 2002 8:00 pm
Location: France
Contact:

Post by CrazyCat »

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.
L
Lolita
Voice
Posts: 13
Joined: Sun Jul 24, 2005 4:11 pm

Post by Lolita »

Sir_Fz wrote: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
CrazyCat wrote: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 ):
User avatar
CrazyCat
Revered One
Posts: 1293
Joined: Sun Jan 13, 2002 8:00 pm
Location: France
Contact:

Post by CrazyCat »

Ok, I understand, I must redo it...
damned, a new boss want me to work!!! :D
L
Lolita
Voice
Posts: 13
Joined: Sun Jul 24, 2005 4:11 pm

Post by Lolita »

hmm nwm, it didn't worked cos i have set server type 1 (irc net), and it thinks that +r is restricted and not registred so it does reconect ...
Locked