egghelp/eggheads community

Fun Kicking - Match trigger anywhere not just first word...

2015-02-12T07:49:56-04:00

If you use string match -nocase there's no need for the string tolower as the first will match either way if it's upper, lower or mixed case.

Statistics: Posted by caesar — Thu Feb 12, 2015 7:49 am

Fun Kicking - Match trigger anywhere not just first word...

2015-02-11T19:04:00-04:00

Spike,

I was performing a .die on the PL and then restarting in the shell. But that was not doing it! Your idea of double escaping the *'s did the trick, but I had to do it like this adding the additional *'s to each end.

Code:

proc funkicker {nick host hand chan txt} {  set txt [string tolower $txt]  if {([string match -nocase "*\\*\\*test\\*\\**" $txt])} {  puthelp "PRIVMSG $chan :$nick, this is a test message"  }  return 0}

Then it all came together! Thank you for the assistance.

Statistics: Posted by chadrt — Wed Feb 11, 2015 7:04 pm

Fun Kicking - Match trigger anywhere not just first word...

2015-02-11T07:46:15-04:00

My guess is you did not restart the bot to remove all of your old binds in the testing before this bind:)

You must restart the bot to remove all prior binds.

You might also try this as your pattern: {\*\*test\*\*} :or: "\\*\\*test\\*\\*"

Statistics: Posted by SpiKe^^ — Wed Feb 11, 2015 7:46 am

Fun Kicking - Match trigger anywhere not just first word...

2015-02-11T06:51:11-04:00

Ok so after reading http://www.eggheads.org/support/egghtml ... mands.html I have found that using "pubm" will look for the word to provide the proc but it is interpreting the * as a wildcard and not as a character is there a way to stop this?

I thought maybe I could escape the characters but that didnt work.

I tried to use a string match but it also interprets the * as a wildcard.

EDIT:

string match ?-nocase? pattern string
See if pattern matches string; return 1 if it does, 0 if it does not. If -nocase is specified, then the pattern attempts to match against the string in a case insensitive manner. For the two strings to match, their contents must be identical except that the following special sequences may appear in pattern:

*
Matches any sequence of characters in string, including a null string.

?
Matches any single character in string.

[chars]
Matches any character in the set given by chars. If a sequence of the form x-y appears in chars, then any character between x and y, inclusive, will match. When used with -nocase, the end points of the range are converted to lower case first. Whereas {[A-z]} matches “_” when matching case-sensitively (since “_” falls between the “Z” and “a”), with -nocase this is considered like {[A-Za-z]} (and probably what was meant in the first place).

\x
Matches the single character x. This provides a way of avoiding the special interpretation of the characters *?[]\ in pattern.

So according to this from the TCL manual I should be able to escape the * in the string match. But even this is not working. Here is my code that I have been testing with.

Code:

bind pubm - * funkickerproc funkicker {nick host hand chan txt} {  set txt [string tolower $txt]  if {([string match -nocase "\*\*test\*\*" $txt])} {  puthelp "PRIVMSG $chan :$nick, this is a test message"  }  return 0}

This should have made it recognize **test** but it is not instead it is recognizing just plain old "test" all by itself.

(Sorry for my rambling I just want you all to see I am trying to read and do my homework before blindly asking you to complete my idea for me!)

Statistics: Posted by chadrt — Wed Feb 11, 2015 6:51 am

Fun Kicking - Match trigger anywhere not just first word...

2015-02-11T05:40:39-04:00

I have this script that provides some fun kicking in the chat room that I built but I would like it to match the trigger word anywhere in the text. Right now it only works if it is the first word in the line from the user.

Code:

#### TEST TO PROVIDE FUN KICKS IN CHAT ####bind pub - **goodnight** fun1bind pub - **poof** fun2bind pub - **badboy** fun3bind pub - **badgirl** fun3proc fun1 {nick host hand chan text} {putserv "KICK $chan $nick :Goodnight and sweet dreams!"}proc fun2 {nick host hand chan text} {putserv "KICK $chan $nick :With a wave of the Magic Wand you disappear!"}proc fun3 {nick host hand chan text} {putserv "KICK $chan $nick :You have been very very bad!!!!!"

If a user types this then it works:
**goodnight** everyone I am tired

Want it to work like this too:
Oh my gosh I am so tired **goodnight** everyone!

So that no matter where in the text it would pick it up! Any ideas on this little modification?

Statistics: Posted by chadrt — Wed Feb 11, 2015 5:40 am