TCL Script for releasing NickServ Enforcer (DALnet)

[awyeah]

Hello,

I was trying to develop a little script.
I use DALnet which has NickServ services.
Sometimes the services are lagged, and the kill (enforce) switch is on the nick, due to the lagg sometimes, the nicks don't identify with services in less than 60 seconds, or so happens..some times the shell goes down, people start using the nick, enforcers for the nick come on.

I was trying to develop a script, which checks $botname and if it is not the valid nick!ident@host as the shell vhost and is nick!enforcer@enforcer.dal.net, then I might send it a release command from nickserv to release that nick and the bot can regain its nick and op itself on the channels it is on.

Since the eggdrop has timers for catching its $botnick, when it has $altnick, then it would catch the nick.

But I was having problems... I don't know how to read the bind, should it be bind on nick, or should I have to set a timer to check the $botname everytime, but that would be really messy.

Once more, if ($botname != nick!ident@vhost) then I can give out the release or ghost command for nickserv.

The botnick changer, which I found from one of slennox's tcls is in DCC format but should be just simply this:

set newnick [lindex [split $arg] 0]
if {$newnick == ""} {
putserv "NOTICE $nick :Usage: botnick <newnick>"
return 0
}
if {$newnick == "-altnick"} {
set newnick $altnick
}
set nick $newnick


Can this be worked with 'bind pub' and 'bind msg' for executing them other than on DCC windows, with /set nick $newnick.

Some one told me, $botnick is a global bot variable so this can't happen. As the bot tries to regain its original nick, there is a bot internal timer which does so, but we can do it /set nick $botnick or /set nick $altnick, as they are predefined global variables in the .conf file.