egghelp.org community

simo · Owner Joined: 22 Mar 2015 Posts: 941

i was wondering is there was an easier way to count the digits used in a sentence and counted untill threshold has been reached within time frame
while without having to loop thru all words in a the sentence over and over in other words if a nick wich has digits in it is mentioned the tcl should not count that

using this at the moment:

CrazyCat · Posted: Fri Oct 22, 2021 7:05 pm Post subject:

Trying to understand...
You want to count digits in text lines, but only if they are not in a mentionned nick ?

To remove the nicks from a line, use the ldiff proc:

simo · Owner Joined: 22 Mar 2015 Posts: 941

thanks for your reply CC i tried that and it still seem to execute when nick with more than threshold digits is mentioned in sentence

simo · Owner Joined: 22 Mar 2015 Posts: 941

CrazyCat · Posted: Sat Oct 23, 2021 8:08 am Post subject:

Normal, you make a string tolower on text, and ldiff use -exact by default.

Change the second line:

simo · Owner Joined: 22 Mar 2015 Posts: 941

that seems to do it excellent thanks CC much apriciated

simo · Owner Joined: 22 Mar 2015 Posts: 941

tested again and it accures if someone says like

Guest52474:
or any chars placed after the nick actually like Guest52474: :Guest52474 Guest52474. Guest52474) (Guest52474 and so on

it triggers while Guest52474 is a nick on channel

this is what i got so far:

CrazyCat · Posted: Mon Nov 01, 2021 11:06 am Post subject:

You can try to remove non-word chars from the line before checking it:
Add:

simo · Owner Joined: 22 Mar 2015 Posts: 941

tested it that seems to do it thanks again CC much apriciated

simo · Owner Joined: 22 Mar 2015 Posts: 941

tested again and found it doesnt strip all non alphanumeric characters

CrazyCat · Posted: Mon Nov 01, 2021 7:25 pm Post subject:

underscore (_) is a word character in regexp.

If another character is not stripped, give an example, I won't try to find which one is not stripped.

And if you want to strip the underscore too, replace \W with [^a-zA-Z0-9]
_________________
https://www.eggdrop.fr - French IRC network
Offer me a coffee - Do not ask me help in PM, we are a community.

SpiKe^^ · Posted: Mon Nov 01, 2021 8:44 pm Post subject:

simo · Owner Joined: 22 Mar 2015 Posts: 941

that seems to work thanks Spike^^
thanks CC as well much apreciated all working well now

simo · Owner Joined: 22 Mar 2015 Posts: 941

heres what im working with so far the nicks removal from $text is provided by spike^^ ive integrated that it all works fine but when nicks like Guest12345 are used in the manner of :

<somenick> Guest12345: hey how are you

it counts the digits of the mentioned nick as well

simo · Owner Joined: 22 Mar 2015 Posts: 941

wildcard might not be a bad idea if its the only solution as we use minimum of 3 chars to be used in nick length

i tried using foreach word [split $text] { if {[lsearch -nocase *$nkls* $word] == -1} { append tmptx "$word " } }

didnt seem to check with wildcard