This is the new home of the egghelp.org community forum.
All data has been migrated (including user logins/passwords) to a new phpBB version.
For more information, see this announcement post. Click the X in the top right-corner of this box to dismiss this message.
Help for those learning Tcl or writing their own scripts.
-
sdays
- Halfop
- Posts: 98
- Joined: Sat Oct 21, 2006 4:46 am
Post
by sdays »
Okay, when a op on bot deops a guest he removes op and kbs him, i want this to work only when a user deops bot owner or master
Code: Select all
setudef flag deoprm
bind mode - "* -o" deop:rm
proc deop:rm {nick uhost hand chan mc deop} {
if {[channel get $chan deoprm] && ![matchattr $hand nmb|nmb $chan]} {
set banmask *!*@[lindex [split [getchanhost $nick $chan] @] 1]
catch {deluser $hand}
save
putlog "Removed $hand Reason: Deoped bot or a admin on $chan."
putserv "MODE $chan -o+b $nick $banmask"
putserv "kick $chan $nick :Cya loser."
}
}
-
Sir_Fz
- Revered One
- Posts: 3794
- Joined: Sun Apr 27, 2003 3:10 pm
- Location: Lebanon
-
Contact:
Post
by Sir_Fz »
Code: Select all
setudef flag deoprm
bind mode - "* -o" deop:rm
proc deop:rm {nick uhost hand chan mc deop} {
if {[channel get $chan deoprm] && ![matchattr $hand nmb|nmb $chan] && [matchattr [nick2hand $deop $chan] nm|nm $chan]} {
set banmask *!*@[lindex [split [getchanhost $nick $chan] @] 1]
catch {deluser $hand}
save
putlog "Removed $hand Reason: Deoped bot or a admin on $chan."
putserv "MODE $chan -o+b $nick $banmask"
putserv "kick $chan $nick :Cya loser."
}
}