| View previous topic :: View next topic |
| Author |
Message |
Salik83
Voice
Joined: 19 Apr 2009
Posts: 6
Location: Pk
|
 Posted: Mon Apr 20, 2009 3:27 pm Post subject: Need help with avoice.. |
 |
|
hello guys,
i have some autovoice tcl, but i just want to add some ips so user wont get voice matching those ips.
or some code that will add user if global op or master type in channel .human nick and nick will automatically added to the channel +g list? :/ sorry for my bad english! |
|
| Back to top |
|
 |
Madalin
Master
Joined: 24 Jun 2005
Posts: 310
Location: Constanta, Romania
|
| Posted: Fri Feb 01, 2013 5:19 pm Post subject: |
|
|
The code for the ips that will wont be voiced
| Code: |
bind join - "#channel *" onjoin:autovoice
set temp(excepts) [list "chanrank.com" "domain.com"]
proc onjoin:autovoice {nick uhost hand chan} {
global temp
if {$nick == $::botnick} { return }
foreach i [split $temp(excepts)] { if {[string match -nocase "*$i*" [lindex [split $uhost @] 1]]} { return } }
}
|
The .human script
| Code: |
bind PUB n .human human:pub
proc human:pub {nick uhost hand chan arg} {
set who [lindex [split $arg] 0]
if {![onchan $who $chan]} { putserv "PRIVMSG $chan :\002$nick\002 - $who is not on chan"; return }
if {[validuser [nick2hand $who]]} {
chattr [nick2hand $who] +g $chan
putserv "PRIVMSG $chan :\002$nick\002 - Succesfully added \00312$who\003 to autovoice list"
} else {
adduser $who "*!*@[lindex [split [getchanhost $who $chan] @] 1]"
chattr $who +g $chan
putserv "PRIVMSG $chan :\002$nick\002 - Succesfully added \00312$who\003 to autovoice list"
}
}
|
_________________
https://github.com/MadaliNTCL - To chat with me: https://tawk.to/MadaliNTCL |
|
| Back to top |
|
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
