egghelp/eggheads community

[repeat code] need a change in an action check

2004-11-24T17:53:03-04:00

well i'm using repeat.tcl (netbot version) but this version had a nice warning/kick/ban (3strike) procedure.

btw it does have timers

Statistics: Posted by dotslasher — Wed Nov 24, 2004 5:53 pm

[repeat code] need a change in an action check

2004-11-24T16:26:18-04:00

you need to keep repeat info on per channel basis, in different arrays

but this script seems naive to me, it doesn't have repeat timer/settings; I'd suggest you find another, properly implemented - there should be no shortage of antirepeat scripts, 90% of them would be crap, but still there must be good ones

Statistics: Posted by demond — Wed Nov 24, 2004 4:26 pm

[repeat code] need a change in an action check

2004-11-24T16:01:39-04:00

oops... disregard my previous posting, I now see what you mean

Statistics: Posted by demond — Wed Nov 24, 2004 4:01 pm

[repeat code] need a change in an action check

2004-11-24T15:58:33-04:00

on the contrary - it's that simple

your repeat_action proc binds to CTCP, that is, /ame and /amsg; I presume there is another handler proc for public channel messages

therefore, unbinding repeat_action will eliminate repeat check/punishment for /ame and /amsg only

Statistics: Posted by demond — Wed Nov 24, 2004 3:58 pm

[repeat code] need a change in an action check

2004-11-24T15:27:08-04:00

hehe its not that simple, i still want it to kick for repeat actions in a single chan, i just want it to allow amsgs because it sees an amsg to 3 chans where the script is activated as a repeat.

lil example:

#chan1
[07:01] *person tests his amsg
#chan2
[07:01] *person tests his amsg
#chan3
[07:01] *person tests his amsg
[07:01] *Eggdrop kicks person from #chan3 (reason: No repeating)

---> 3 repeats according to the script
this would have to be allowed.

now the following thing has to be disallowed.
#chan1
[07:01] *person tests his amsg
[07:01] *person tests his amsg
[07:01] *person tests his amsg
[07:01] *Eggdrop kicks person from #chan1 (reason: No repeating)

i hope i made myself clear this time

Statistics: Posted by dotslasher — Wed Nov 24, 2004 3:27 pm

[repeat code] need a change in an action check

2004-11-24T15:17:57-04:00

unbind repeat_action

Statistics: Posted by demond — Wed Nov 24, 2004 3:17 pm

[repeat code] need a change in an action check

2004-11-24T14:59:29-04:00

Code:

#---------------------------------------------------------------------------------------------# ACTION repeating (channel actions)#---------------------------------------------------------------------------------------------proc repeat_action {nick uhost hand dest keyword text} {  global botnick altnick repeat_last repeat_num repeatkick repeatmsg repeatban repeatbantime repeatonoff inuse timercalled  if {$repeatonoff([string tolower $dest]) == 0 } { return }  set type ""  set text [trimctrl $text]  if {$dest == $botnick || $dest == $altnick || [matchattr $hand f|f $dest]} {return 0}  if [info exists repeat_last([set n [string tolower $nick]])] {      # Tell other bots I'm handling (or check to see if its being handled.      set canprocess [check_handling 0]      if {$canprocess == 1} { return 1 }      set inuse 1           if {[string compare [string tolower $repeat_last($n)] [string tolower $text]] == 0} {            set type "EXACT MATCH"            repeat_dostuff $nick $uhost $hand $dest $text $n $type            set repeat_last($n) $text            clear_handling            return         } \         elseif {[mask_check $n $text [string tolower $repeat_last($n)]] == 1} {            set type "Mask check FAIL"            repeat_dostuff $nick $uhost $hand $dest $text $n $type            set repeat_last($n) $text            clear_handling            return         } \         elseif {[letter_check $n $text $dest [string tolower $repeat_last($n)] 1 ""] == 1} {            set type "Letter check FAIL"            repeat_dostuff $nick $uhost $hand $dest $text $n $type            set repeat_last($n) $text            clear_handling            return         }       if {$timercalled == 1} {         catch {unset repeat_last}         catch {unset repeat_num}         set timercalled 0      }      set inuse 0            # Clear "Im handling" botflags      clear_handling  }  set repeat_num($n) 1  set repeat_last($n) $text}

script comes from: http://www.egghelp.org/tclhtml/3478-4-0 ... oleman.htm

now here is the question: i was wondering what i should change for the script to stop kicking/checking for amsgs/ame, and only check for repeats per channel. Cus i dont wanna kick/ban on an /amsg or when some1 goes away and it does an /ame with his away reason.

Statistics: Posted by dotslasher — Wed Nov 24, 2004 2:59 pm