Code:

####             ####   #### ###          #      ####                                 #    ##  # ##### #   #  #    #  #   #    # #    # #### # # #   #   ####   #### ###        # # #   #   # #  ##   #   #      #    # #    #   #   #   ##### #   # ##### #      #### #  #       #   #    ############################################################### Commands:  !aop uses +a op , !pop plain op , !hophalf op,# !avoice voices### This Scrip can only be used by bot ouners # There is The command to deleate Auto-ops# Witch can only be used by masters## INFO:Whin editing this script for some # reason it doent like ".rehash" so# if you want to get rid of an error like# "TCL error [pub:dop]: can't read "tnick": # no such variable" # Just type ".die" and restart your bot## put the bots owner nick hereset owner "SniperAC"## Just an auto "AOP,access,sop"set autoop "aop"## All servers have diff Numbers for all of the blow# aop is +a op users (cant be kicked)# pop is Plain-op users# hop is half-op users#set aop "10"set pop "5"set hop "4"set voice "3"## Put Chanserv Services nickset chans "chanserv"## ***** W-A-R-N-I-N-G ******#       STOP EDITING#   EDIT AT YOUR OWN RISK!#bind pub n !aop pub:aopbind pub n !pop pub:popbind pub n !hop pub:hopbind pub n !dop pub:dopbind pub n !avoice pub:v#proc pub:aop { nick uhost handle chan text } { global aop botnick chans autoop owner if { $nick == $owner } { if {[string length $text] > 0} {  set tnick [lindex $text 0]} puthelp "PRIVMSG $chans :$autoop $chan add $tnick $aop"  putlog "$nick Added $tnick to aop list" }}##proc pub:pop { nick uhost handle chan text } { global botnick chans pop autoop aop owner if { $nick == $owner } { if {[string length $text] > 0} {  set tnick [lindex $text 0]} puthelp "PRIVMSG $chans :$autoop $chan add $tnick $pop"  putlog "$nick added $tnick to Plain- OP list" } }##proc pub:hop { nick uhost handle chan text } { global botnick hop chans autoop  owner if { $nick == $owner } { if {[string length $text] > 0} {  set tnick [lindex $text 0]} puthelp "PRIVMSG $chans :$autoop $chan add $tnick $hop"  putlog "$nick Added $tnick to Half-OP list" } }##proc pub:dop { nick uhost handle chan text } { global botnick chans autoop owner if { $nick == $owner } { if {[string length $text] > 0} {  set tnick [lindex $text 0]} puthelp "PRIVMSG $chans :$autoop $chan del $tnick"  putlog "$nick Deleated $tnick" }  }##proc pub:v { nick uhost handle chan text } { global botnick voice chans autoop owner if { $nick == $owner } { if {[string length $text] > 0} {  set tnick [lindex $text 0]} puthelp "PRIVMSG $chans :$autoop $chan add $tnick $voice"  putlog "$nick Added $tnick to Voice list" }  } # This script was made for Eggdrop1.6.6 in one night 2001/DEC/2# Scripted by SniperAC# This is My first script so go easy on it please# Thanks to PPSlim,Wcc from# http://www.egghelp.org /# http://www.egghelp.org/forum/viewforum.php?forum=2# Thanks to them too ^^# Thanks to The scripters of "Nickserv.tcl" and "optools.tcl"# I looked inside their scripts for examples....#No thanks to Phantasm/My brother that didn't want to help meputlog "\037loaded SniperAC's ChanServ auto-op"# If for some odd reason :-x this script should go out of date# or error out E-mail Xairranger@hotmail.com this e-mail will # never go way ;-) your E-mail will not go unancerd...

Code:

AdminServServices Scripts