PaulyboyUK
Voice
Joined: 09 Oct 2008
Posts: 12
|
 Posted: Mon Nov 10, 2008 5:49 am Post subject: chanserv userlist |
 |
|
hi
i am looking to create a userlist on one channel - it will be required to save as a text file in the format
username1
username2
username3
username4 etc
I have found a chanserv access list script on here but the fomat of the output is no where near - ie
VOP list for #test:
VOP list for #test:
VOP list for #test:
Num Nick
2 PeaceKeeper
the code i am currently using to create this is
| Code: |
# Name of the storage file for the access list.
set accesslist "accesslist.txt"
# Full name of channel services.
set chanserv "chanserv"
#################
# BIND commands #
#################
bind pub n list access:list
#bind notc - "* list for *" write:list
#bind notc - "* VOP *" write:list
proc write:list {nick host hand arg {dest ""}} {
set msg $arg
if {([isbotnick $dest]) && ([string equal $nick "ChanServ"])} {
# Create the storage file for appending.
set acc_fd [open $::accesslist a]
puts $acc_fd $msg
close $acc_fd
}
}
proc access:list {nick uhost hand chan text} {
set type [string tolower $text]
if {[regexp {(sop|aop|vop)} $type]} {
# Remove old storage file
if {[file exists $::accesslist]} {file delete $::accesslist}
putserv "PRIVMSG $::chanserv :$type $chan list"
} else {
return
}
}
# ctrl:filter <string>
# Strip all control characters. Thanks to ppslim.
proc ctrl:filter {str} {
regsub -all -- {\003[0-9]{0,2}(,[0-9]{0,2})?|\017|\037|\002|\026|\006|\007} $str "" str
return $str
}
|
I dont understand the above creates 3 lines of test saying VOP list etc
i need the file to literallyjust have the Voiced users of the channel - and theni can use that file in my other script to dcc mass send files - seems no matter where i go i seemto hit a brick wall - any pointers would be great -
Thanks in anticipation
Paul |
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
