egghelp/eggheads community

Help in tcl script

2003-09-25T14:37:21-04:00

your welcome.

Statistics: Posted by caesar — Thu Sep 25, 2003 2:37 pm

2003-09-25T14:25:58-04:00

OK, 10x a lot!

Statistics: Posted by Jag — Thu Sep 25, 2003 2:25 pm

2003-09-25T14:12:31-04:00

yes, or:

Code:

if {[regexp -all {[?]} $text] > 6} { do something.. }

notice the > that indicates bigger than x.. you should use it in case someone uses more than x..

Statistics: Posted by caesar — Thu Sep 25, 2003 2:12 pm

2003-09-25T14:07:19-04:00

so, the command supposed to be:

Code:

set count [regexp -all {[?]} $text]if {$count == "6"} { ....

Statistics: Posted by Jag — Thu Sep 25, 2003 2:07 pm

2003-09-25T14:01:32-04:00

Code:

set count [regexp -all {[?]} $text]

replace text with what you got in your proc..

Statistics: Posted by caesar — Thu Sep 25, 2003 2:01 pm

2003-09-25T06:28:14-04:00

hi,

i want to build a script that if someone write 6 times "?" in a sentence the eggdrop will kick him.

this command is the same as:

Code:

$count

in mirc-scripting

or the if command in mirc-scripting:

Code:

if ($count($1-,?) > 6)

Thanks for the help

Statistics: Posted by Jag — Thu Sep 25, 2003 6:28 am