egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2002-01-06T21:57:00-04:00 https://forum.eggheads.org/app.php/feed/topic/786 2002-01-06T21:57:00-04:00 2002-01-06T21:57:00-04:00 https://forum.eggheads.org/viewtopic.php?p=3551#p3551 <![CDATA[percentage ?]]>

Code: 

proc PercentageCaps {string} {  set i [string length $string]  regsub -all -- {[A-Z]} $string string  return [expr ([string length $string] - ${i}) / $i]}
Note: It returns it as a floating point value. Just multiply it by 100 to get the percentage

When you pass it the text from a channel message, it will return the percentage of Caps.

Statistics: Posted by ppslim — Sun Jan 06, 2002 9:57 pm

]]> 2002-01-06T16:19:00-04:00 2002-01-06T16:19:00-04:00 https://forum.eggheads.org/viewtopic.php?p=3541#p3541 <![CDATA[percentage ?]]> i mean when someone type something in a channel how to know percentage of CAPS, or percentage of whatever you want :smile:

excuse my english :-/

Statistics: Posted by Guest — Sun Jan 06, 2002 4:19 pm

]]>