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.
Old posts that have not been replied to for several years.
suffering
Voice
Posts: 27 Joined: Fri May 27, 2005 4:34 am
Post
by suffering » Fri Aug 12, 2005 11:29 am
hi, i want a simple tcl when smone use the channel ctcp command the bot ban(chan ban) and kick him from the channel.
demond
Revered One
Posts: 3073 Joined: Sat Jun 12, 2004 9:58 am
Location: San Francisco, CA
Contact:
Post
by demond » Fri Aug 12, 2005 11:44 am
Code: Select all
set r "no chan ctcps"
bind ctcp - * foo
proc foo {n u h d k t} {
if ![isbotnick $d] {
newchanban $d [maskhost $n!$u] $::nick $::r
putkick $d $n $::r
}
}
suffering
Voice
Posts: 27 Joined: Fri May 27, 2005 4:34 am
Post
by suffering » Mon Aug 15, 2005 6:27 pm
thats one kicks also on /me actions... i only want for channel ctcp ... /ctcp #chan ping... and do not kick operators
demond
Revered One
Posts: 3073 Joined: Sat Jun 12, 2004 9:58 am
Location: San Francisco, CA
Contact:
Post
by demond » Mon Aug 15, 2005 6:55 pm
/me is chan ctcp
Sir_Fz
Revered One
Posts: 3794 Joined: Sun Apr 27, 2003 3:10 pm
Location: Lebanon
Contact:
Post
by Sir_Fz » Mon Aug 15, 2005 8:14 pm
Code: Select all
set r "no chan ctcps"
bind ctcp - * foo
proc foo {n u h d k t} {
if {([string first # $d] != 0) || [string equal -nocase "action" $k]} {return 0}
if {![isbotnick $d] && ![isop $n $d]} {
newchanban $d [maskhost $n!$u] $::nick $::r
putkick $d $n $::r
}
}
This will not kick for actions and will exempt channel ops.