| View previous topic :: View next topic |
| Author |
Message |
Jane`Lane
Voice
Joined: 30 Sep 2004
Posts: 15
Location: Rome, Italy
|
 Posted: Thu Jun 15, 2006 4:59 pm Post subject: TCL vs limit abuse |
 |
|
dear friends,
I was looking for a tcl script to
kick, ban and deflag people who perform action like remove the chan limit (-l) or change it.
I've found several scripts in the archive, but: the best one is written in deutch, and I can't understand anything .____.
moreover it just provides to kick...
can anyone help me and write this script???
thanks for your help 
_________________
Being Jane Lane Is What I Do Best |
|
| Back to top |
|
 |
demond
Revered One
Joined: 12 Jun 2004
Posts: 3073
Location: San Francisco, CA
|
| Posted: Fri Jun 16, 2006 1:32 am Post subject: |
|
|
| Code: |
set reason "don't touch that dial"
bind mode - {% +l} foo
bind mode - {% -l} foo
proc foo {n u h c m v} {
if ![botisop $c] return
# ignore server and botmaster modes
if {$n=="" || [matchattr $h m|m $c]} return
# "deflag" the offending party
if {$h != "*"} {chattr $h -o|-o $c}
# ...and punish them with 10-min ban & kick
newchanban $c [maskhost $n!$u] $::nick $::reason 10
putkick $c $n $::reason
}
|
_________________
connection, sharing, dcc problems? click <here>
before asking for scripting help, read <this>
use [code] tag when posting logs, code |
|
| Back to top |
|
|
Jane`Lane
Voice
Joined: 30 Sep 2004
Posts: 15
Location: Rome, Italy
|
| Posted: Mon Jun 19, 2006 5:15 pm Post subject: |
|
|
dear demond,
first of all, thanks for your answer!!!
and, by the way, where should I paste this code???
| Quote: | newchanban $c [maskhost $n!$u] $::nick $::reason 10
putkick $c $n $::reason |
how can I add the kick reason???
furthermore, is this code able to kick user even if they just change the limit???
thanks again for helping!!! 
_________________
Being Jane Lane Is What I Do Best |
|
| Back to top |
|
|
Jane`Lane
Voice
Joined: 30 Sep 2004
Posts: 15
Location: Rome, Italy
|
| Posted: Tue Jun 20, 2006 4:07 pm Post subject: |
|
|
...anyone knows??? 
_________________
Being Jane Lane Is What I Do Best |
|
| Back to top |
|
|
Alchera
Revered One
Joined: 11 Aug 2003
Posts: 3344
Location: Ballarat Victoria, Australia
|
| Posted: Tue Jun 20, 2006 6:42 pm Post subject: |
|
|
| Jane`Lane wrote: | | ...anyone knows??? |
| Code: | | set reason "don't touch that dial" |
That takes care of where to plonk the reason.
Re-read demond's code, it is all there.
_________________
Add [SOLVED] to the thread title if your issue has been.
Search | FAQ | RTM |
|
| Back to top |
|
|
Jane`Lane
Voice
Joined: 30 Sep 2004
Posts: 15
Location: Rome, Italy
|
| Posted: Wed Jun 21, 2006 1:08 pm Post subject: |
|
|
...actually it doesn't work:
I added it on one of my eggdrops... and it banned another one, who has the rule to raise the limit!!!
_________________
Being Jane Lane Is What I Do Best |
|
| Back to top |
|
|
Sir_Fz
Revered One
Joined: 27 Apr 2003
Posts: 3793
Location: Lebanon
|
| Posted: Wed Jun 21, 2006 7:18 pm Post subject: |
|
|
Does the other bot have +m flag on your bot? because that's the flag being exempted in demond's code.
_________________
Follow me on GitHub
- Opposing
Public Tcl scripts |
|
| Back to top |
|
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
