egghelp.org community Forum Index
[ egghelp.org home | forum home ]
egghelp.org community
Discussion of eggdrop bots, shell accounts and tcl scripts.
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

adminserv

 
Post new topic   Reply to topic    egghelp.org community Forum Index -> Scripting Help
View previous topic :: View next topic  
Author Message
barman
Voice


Joined: 19 Sep 2007
Posts: 22

PostPosted: Wed Oct 18, 2017 4:20 pm    Post subject: adminserv Reply with quote

Hello

I want to use the adminserv but there is 1 thing i want to change in the script: i want the automated recognition away.

Thx
Back to top
View user's profile Send private message
SpiKe^^
Owner


Joined: 12 May 2006
Posts: 515
Location: Tennessee, USA

PostPosted: Wed Oct 18, 2017 6:05 pm    Post subject: Reply with quote

Can you post that script to here and maybe explain the issue some please.
_________________
SpiKe^^

Get BogusTrivia 2.06.4.7 at www.mytclscripts.com
Back to top
View user's profile Send private message Visit poster's website
barman
Voice


Joined: 19 Sep 2007
Posts: 22

PostPosted: Sat Oct 28, 2017 3:05 pm    Post subject: Reply with quote

SpiKe^^ wrote:
Can you post that script to here and maybe explain the issue some please.

http://tclarchive.org/search.php?str=adminserv&cb1=t&cb2=a&cb3=d&sub.x=0&sub.y=0

When you logout when you part the chan ok, but when you login back, it recognize you automatically and i don't want that
Back to top
View user's profile Send private message
barman
Voice


Joined: 19 Sep 2007
Posts: 22

PostPosted: Thu Dec 28, 2017 1:44 pm    Post subject: adminserv Reply with quote

I've seen that the script does not store new nick registrations. Can somebody help?
Code:

#---------------------------------------------------
# AdminServ v2.0 (stable)
#
# *
#
# AdminServ is a channel service bot,
# intended primarily to act as a
# complete combination of ChanServ,
# NickServ, OpServ, HelpServ, and
# Global.
#
# For questions & comments, you may
# visit http://adminserv.cmx-networks.net
# or irc.hazenet.org on channel
# #adminserv
#
# *
#
# Nickserv.c
#
# *
#
# $Id: nickserv.c,v 2.0 2004/04/20 18:49:55 emac Exp $
#
#---------------------------------------------------

bind msg - register auth_register
bind msg - ident auth_auth
bind msg - auth auth_auth

proc auth_register {nick uhost hand arg} {
 global channel official
 global botnick admin
 if {$nick == $botnick} {return}
 if {[getting-users]} {notice $nick "Sorry, there is currently a userfile transfer going on. Try back in a couple of seconds." ; return}
   set account [lindex $arg 0]
   set pass [lindex $arg 1]
   set email [lindex $arg 2]
   if {$hand != "*"} { notice $nick "You Are already identified to account \002$hand\002." ; return }
   if {[validuser $account]} { notice $nick "That Account is already registered to somone else." ; return}
   if {$account == ""} { notice $nick "\002register\002 requires more parameters." ; notice $nick "/msg $botnick register <account> <password> \[email\]" ; notice $nick "Registers an account with \002$botnick\002 and adds your current hostmask. Each time you are seen by \002$botnick\002, you are automatically authed. You may do /msg $botnick auth <account> <password> only when your hostmask changes." ; return}
   if {$pass == ""} { notice $nick "Please Enter Password." ; return}
   if {$email == ""} { notice $nick "Please Enter a E-Mail Address." ; return}
   set host [join \*!\*[join [split $uhost "~"]] ""]
   adduser $account $host
   chpass $account $pass
   setuser $account XTRA "AUTH" "1"
   setuser $account XTRA "EMAIL" "$email"
   putcmdlog "<<$nick>> !$account! Registered $account ($host) with email address: $email"
   notice $nick "Account \002$account\002 has been registered for you with the hostmask \002$host\002 and email address set to \002$email\002."
   notice $nick "If you have any problems, please contact the staff in $official(channel)"
}

proc auth_auth {nick uhost hand arg} {
global channel staff
  global botnick
   set found 0
   set account [lindex $arg 0]
   set pass [lindex $arg 1]
   if {$hand != "*"} { notice $nick "You Are already identified to account: \002$hand\002." ; return }
   if {![validuser $account]} { notice $nick "Your Account does not exist, are you sure you registered?." ; return}
   if {![passwdok $account $pass]} {notice $nick "Incorrect password; please try again." ; return}
   set host [join \*!\*[join [split $uhost "~"]] ""]
   setuser $account HOSTS $host
   notice $nick "I recognize you."
   if {[matchattr $account A] == 1} {
   putquick "notice $staff(channel) :$nick \[$uhost\] identified to ADMINISTRATOR account $account."
   }
   if {[matchattr $account N] == 1} {
   putquick "notice $staff(channel) :$nick \[$uhost\] identified to NETWORK HELPER account $account."
   }
   if {[matchattr $account H] == 1} {
   putquick "notice $staff(channel) :$nick \[$uhost\] identified to HELPER account $account."
   }
}

putlog "AdminServ nickserv.c loaded"


barman wrote:
SpiKe^^ wrote:
Can you post that script to here and maybe explain the issue some please.

http://tclarchive.org/search.php?str=adminserv&cb1=t&cb2=a&cb3=d&sub.x=0&sub.y=0

When you logout when you part the chan ok, but when you login back, it recognize you automatically and i don't want that
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    egghelp.org community Forum Index -> Scripting Help All times are GMT - 4 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


Forum hosting provided by Reverse.net

Powered by phpBB © 2001, 2005 phpBB Group
subGreen style by ktauber