egghelp/eggheads community

Auto -mi

2013-01-05T02:42:53-04:00

Haven't really had an issue with people leaving +M or +R on lately, so I kind of forgot about this, but I still haven't really been able to find (or modify) a script to do just what I'm looking for.

I run AllProtection which sets modes to stop floods for a minute, but if people keep rejoining and flooding numerous times, the ops set either +M or +R. The problem is (especially with +R) that it gets left on accidentally for hours at a time and the channel dwindles down to half the normal size.

This is what I'm looking for, and hopefully someone can help me out if they're feeling generous and/or bored.

1) Trigger the timer to start only when +M and/or +R were set. Not a timer that just runs every 30 minutes, because if +M/+R were set at the 25th minute, it's going to unlock the channel in 5 mins and not the 30 I was hoping for.

2) Make the bot check to see if someone else removed the +M/+R before that 30 minutes, so that it doesn't set -M/-R when it wasn't even set anymore.

After thinking about it, I guess I don't really care about it being dynamic since I would probably never change it anyways after it's initially set.

Statistics: Posted by bryanwny — Sat Jan 05, 2013 2:42 am

Auto -mi

2012-10-08T18:52:43-04:00

I tried out metroids version of this script, because I liked the fact of being able to turn it on/off and changing the modes easily from DCC chat if needed.

Is there any way to make the bot actually check after the timer if the mode is still actually on, before removing it? Sometimes another OP will remove the +i, and the bot still sets -i later when it isn't necessary.

Statistics: Posted by bryanwny — Mon Oct 08, 2012 6:52 pm

Auto -mi

2008-02-18T09:28:09-04:00

code

Tnx!!

Statistics: Posted by ThE-UnNaMeD — Mon Feb 18, 2008 9:28 am

Auto -mi

2008-02-17T15:11:50-04:00

Another advice, since reapply:mode only calls pushmode, with the exact same number of arguments, in the same order - why not simply call pusmode in the first place?

Statistics: Posted by nml375 — Sun Feb 17, 2008 3:11 pm

Auto -mi

2008-02-17T14:21:12-04:00

You still haven't corrected the main mistake:

Code:

if {[string match $remmodes *$mode*]} {

As I already said before that wildcards are used on the 1st operand of [string match] and not on the 2nd. So what you meant here is

Code:

if {[string match *$mode* $remmodes]} {

Then it would make some sense, however this does not care about whether the modes where set at the same time or separately.

I didn't say that your code is completely wrong metroid, learn to accept critic.

Statistics: Posted by Sir_Fz — Sun Feb 17, 2008 2:21 pm

Auto -mi

2008-02-17T12:17:48-04:00

Forgot about the + in $mode. So that's fixed.
And I'm fully aware that MODE only sends 1 mode through which is why I used pushmode.

pushmode [arg]
Description: sends out a channel mode change (ex: pushmode #lame +o
goober) through the bot's queuing system. All the mode changes will
be sent out at once (combined into one line as much as possible) after
the script finishes, or when 'flushmode' is called.
Returns: nothing
Module: irc

And in this case, it will wait long enough to set the other modes too.

Don't be too quick to say that my code is completely wrong when there was only a small mistake there.

Statistics: Posted by metroid — Sun Feb 17, 2008 12:17 pm

Auto -mi

2008-02-17T10:24:10-04:00

Tcl-commands.doc:

MODE (stackable)
bind mode
proc-name

Description: mode changes are broken down into their component
parts before being sent here, so the will always
be a single mode, such as "+m" or "-o". target will show the
argument of the mode change (for o/v/b/e/I) or "" if the set
mode does not take an argument. The bot's automatic response
to a mode change will happen AFTER all matching Tcl procs are
called. The mask will be matched against '#channel +/-modes'
and can contain wildcards.

So, in your case metroid, $mode will never contain more than one mode. Also, the wildcards in [string match] can only be applied on the first operand and not the 2nd. Another problem with your code is that it's reapplying the mode which is not what's requested, and of course setting +$mode is not valid since mode already contains the '+' char.

Statistics: Posted by Sir_Fz — Sun Feb 17, 2008 10:24 am

Auto -mi

2008-02-17T19:43:45-04:00

A simple and dynamic form of this script would be:

Use ".chanset #channel remove-modes mir" to make the bot remove +mir after seconds.

Code:

setudef str remove-modesbind MODE -|- "% +*" check:modeproc check:mode {nickname hostname handle channel mode target} {    if {[set remmodes [channel get $channel "remove-modes"]] == ""} {        return 0    }    set mode [string trimleft $mode "+"]    if {[string match *$mode* $remmodes]} {        utimer 60 [list pushmode $channel -$mode]    }}

edit: whatever.

Statistics: Posted by metroid — Sun Feb 17, 2008 10:15 am

Auto -mi

2008-02-16T14:00:51-04:00

Code:

bind mode - {% +m} rem:mibind mode - {% +i} rem:mibind mode - {% +r} rem:miproc rem:mi {nick uhost hand chan mc targ} { global remmi set remmi($mc:$chan) 1 if {![info exists remmi(+m:$chan)] || ![info exists remmi(+r:$chan)] || ![info exists remmi(+i:$chan)]} {  return 0 } if {$remmi(+m:$chan) && $remmi(+i:$chan) && $remmi(+r:$chan)} {  utimer 30 [list rem:modes $chan] }}proc rem:modes chan { global remmi pushmode $chan -m pushmode $chan -i pushmode $chan -r set remmi(+m:$chan) [set remmi(+i:$chan) [set remmi(+r:$chan) 0]]}

Statistics: Posted by Sir_Fz — Sat Feb 16, 2008 2:00 pm

problem

2008-02-16T09:01:09-04:00

ok i tried to test it and add for +r mode too.

Code:

bind mode - {% +m} rem:mi bind mode - {% +i} rem:mi bind mode - {% +r} rem:miproc rem:mi {nick uhost hand chan mc targ} {  global remmi  set remmi($mc:$chan) 1  if {![info exists remmi(+m:$chan)] || ![info exists remmi(+r:$chan)] || ![info exists remmi(+i:$chan)]} {   return 0  }  if {$remmi(+m:$chan) && {$remmi(+i:$chan) && $remmi(+r:$chan)} {   utimer 30 [list rem:modes $chan]  } } proc rem:modes chan {  global remmi  pushmode $chan -m  pushmode $chan -i pushmode $chan -r  set remmi(+m:$chan) [set remmi(+i:$chan) [set remmi(+r:$chan) 0]

and i get the following error :
missing close-brace
while executing
"proc rem:mi {nick uhost hand chan mc targ} {
global remmi
set remmi($mc:$chan) 1
if {![info exists remmi(+m:$chan)] || ![info exists remmi(+r:$c..."
(file "scripts/quitamodos.tcl" line 5)
invoked from within

Please what must i do to solve it ? Thanks

Statistics: Posted by noobman — Sat Feb 16, 2008 9:01 am

Auto -mi

2008-02-16T08:04:48-04:00

Yes, that's correct.

Statistics: Posted by Sir_Fz — Sat Feb 16, 2008 8:04 am

and to set it in 30 seconds ?

2008-02-16T07:38:43-04:00

Code:

timer 2 [list rem:modes $chan]

it means after 2 min, remove +mi , and to can change it to 30 seconds ?

is it

Code:

utimer 30 [list rem:modes $chan]

??

thanks.

Statistics: Posted by noobman — Sat Feb 16, 2008 7:38 am

Auto -mi

2008-02-16T06:51:29-04:00

Code:

bind mode - {% +m} rem:mibind mode - {% +i} rem:miproc rem:mi {nick uhost hand chan mc targ} { global remmi set remmi($mc:$chan) 1 if {![info exists remmi(+m:$chan)] || ![info exists remmi(+i:$chan)]} {  return 0 } if {$remmi(+m:$chan) && $remmi(+i:$chan)} {  timer 2 [list rem:modes $chan] }}proc rem:modes chan { global remmi pushmode $chan -m pushmode $chan -i set remmi(+m:$chan) [set remmi(+i:$chan) 0]}

Statistics: Posted by Sir_Fz — Sat Feb 16, 2008 6:51 am

Auto -mi

2008-02-16T05:00:34-04:00

If someone sets +mi automatically does -mi after 2min.
i think it's easy, but i don't know how to make it..

Statistics: Posted by ThE-UnNaMeD — Sat Feb 16, 2008 5:00 am