egghelp/eggheads community

first warn, then kick

2007-01-28T15:27:43-04:00

thanks, that one works better

Statistics: Posted by BCyo+8C4 — Sun Jan 28, 2007 3:27 pm

first warn, then kick

2007-01-28T10:08:38-04:00

Although it is fine as is, you can use [string match] instead.

Code:

if {![string match {*[ðóñ]*} $text]} {return 0}

Statistics: Posted by Sir_Fz — Sun Jan 28, 2007 10:08 am

first warn, then kick

2007-01-28T09:27:01-04:00

i tried it and cpu usage went up 2% any other ideas to prevent this? isn't there some setting/command/whatever to tell eggdrop to perform one action per line in chat only?

Statistics: Posted by BCyo+8C4 — Sun Jan 28, 2007 9:27 am

first warn, then kick

2007-01-28T08:42:38-04:00

I wouldn't count on it. It will work fine.

Statistics: Posted by metroid — Sun Jan 28, 2007 8:42 am

first warn, then kick

2007-01-28T08:41:04-04:00

won't that require way more ressources as it has to regexp every single line said on chat? it's not like this is a quite chat, a days log is about 1-2mb and i fear this would kill the bot.

Statistics: Posted by BCyo+8C4 — Sun Jan 28, 2007 8:41 am

first warn, then kick

2007-01-28T08:01:52-04:00

Code:

bind pubm - * englishproc english {nick host hand chan text} {   if {([isop $nick $chan]) || ([ishalfop $nick $chan]) || ([isvoice $nick $chan])} {      return 1   }   if {![regexp {[ðóñ]} $text]} {return 0}   if {[throttled $nick,$chan 90]} {      putkick $chan $nick "speak english (autokick)"   } else {      putserv "PRIVMSG $chan :$nick - Please speak english in this channel!"   }}proc throttled {id time} {   global throttled   if {[info exists throttled($id)]} {      return 1   } else {      set throttled($id) [clock sec]      utimer $time [list unset throttled($id)]      return 0   }}

Statistics: Posted by Sir_Fz — Sun Jan 28, 2007 8:01 am

first warn, then kick

2007-01-28T07:49:17-04:00

Hi,
I got this to work in some parts, but there's still problems.
I check for certain russian letters and then warn the users. If the line contains only one of those letters it works fine, but if there's more than one in the line the script warns + kicks.

Code:

bind pubm - "*ð*"englishbind pubm - "*ó*"englishbind pubm - "*ñ*"englishproc english {nick host hand chan text} {if {([isop $nick $chan]) || ([ishalfop $nick $chan]) || ([isvoice $nick $chan])} {return 1;}if {[throttled $nick,$chan 90]} {putkick $chan $nick "speak english (autokick)"} else {putserv "PRIVMSG $chan :$nick - Please speak english in this channel!"}}proc throttled {id time} {global throttledif {[info exists throttled($id)]} {return 1;} else { set throttled($id) [clock sec] utimer $time [list unset throttled($id)]return 0;}}

Statistics: Posted by BCyo+8C4 — Sun Jan 28, 2007 7:49 am

first warn, then kick

2007-01-27T20:25:01-04:00

Perhaps this might be useful.

Statistics: Posted by Sir_Fz — Sat Jan 27, 2007 8:25 pm

first warn, then kick

2007-01-27T20:07:59-04:00

How would I go if I wanted to first warn a user and if he does it again in less then x seconds kick him?
I guess I'd need to create a timer when warning and then check whether such a time exists, but I don't really know how I'd do that. Could someone provide me with an short example please?

Sorry if this was asked before, couldn't find anything

Statistics: Posted by BCyo+8C4 — Sat Jan 27, 2007 8:07 pm