egghelp/eggheads community

geek

hi, I need to mod sentinel.tcl detection of LINE/TEXT flood, to exempt users with "f" flag script already don't ban f flag users, but I would like their lines are excluded from count of lines/text script is here I think to modify proc sl_avflood line 233 of pastebin from if {![onchan $nick...

geek

this is a compressed archive file

to extract use:

tar xzvf tcl.tar.gz

geek

CrazyCat wrote:The goal seems to be to make the karma going to 0 when it has not been modified for a time. Lesser (positive or negative) is your karma and slower it will decrease (tend to 0)

now I understand

thanks man!

geek

I try this tcl:
https://github.com/starlilyth/IRC-Eggdr ... rma4.4.tcl

It works good

but I looking at the code and I don't understand what is the needed of modtime column in the db and the use of xtime, ytime, yytime, etc in proc karmaupdate

what are they for?

geek

to avoid the "lag" problem, I put the rest of the code in ldm:whoraw instead of ldm:who but now when bot enter in a new channel, I think eggdrop performs a global "WHO #channel" command and so it runs my procedure that catch raw 352 too :) How can solve this problem? with utimer ...

geek

perfect SpiKe^^

very thanks

geek

I have this very simple piece of code: proc ldmtest {nick host hand chan arg} { # # nel RFC 2812 sezione 2.3.1 vengono specificati i caratteri ammessi nel nickname # # oltre a lettere e numeri sono permessi i seguenti: [ ] \ ` _ ^ { | } - # set RE {[^a-zA-Z0-9\s\[\]\\`_\^\{\|\}-]} if { [regexp -all ...

geek

ok, very thanks

geek

thanks CrazyCat

complete netbots.tcl v4.10 of 8/8/2005 from slennox

but yes, I try it in my bots and they seem to work still good

my only doubt is about ipv6...

geek

I find that netbots are still the best well written tcl.. but last release was for egg1.6

are netbots still working in new eggdrops 1.8.4?

or are there some compatibility errors and security issue?

geek

yes tnx, global var ::ldmident works BUT there is a kind of "lag" between the WHO command and the availability of the value compute in ldm:whoraw SO the first execution I get "no such variable", the following I get a result but is "the old" ident, lol THIS OCCURS: (fres...

geek

1. ident is too generic, better to use something like ldmident yes :) 2. your variable is set with the answer of the /who command, but the /who is initiated by your ldm:who proc. So you can't already have this value. you mean in ldm:who: example1) puthelp "PRIVMSG #test :$::ldmident" puts...

geek

and if I want pass a variable from ldm:whoraw to ldm:who ?

something like:

Code: Select all

proc ldm:whoraw {from key text} {

   set ident [lindex $text 2]

   return
}

and in ldm:who

Code: Select all

puthelp "PRIVMSG #test :$ident"

I get always Tcl error: can't read "ident": no such variable

geek

CrazyCat wrote: You can have multiple scripts using the same raw number without any trouble.

thanks :)

CrazyCat wrote:This is a quite good idea to use utimer to unbind, but you can have side effects.

what kind of side effects?

geek

The ldm:whoraw will catch any who response sent to the eggdrop. and if are there more than one scripts that catch the same raw number? is it a problem? very tnx CrazyCat It is what I usually do. ... The idea is to create the bind that you will need. Then, a few seconds later, unbind it. yes, I'll u...

egghelp/eggheads community

Search found 47 matches

very little modification

how does this tcl work?

strange behavior from llength

netbots