I've come up with this:
on anotherOne
put fld 1 into tString
repeat with n = 1 to 30
if (n >= 10 AND n <=12) OR n = 29 then next repeat
put n & tab & charCount(n,tString) & cr after tList
end repeat
put tList into fld "chars"
end anotherOne
function charCount n,tString
put length(tString) into oLen
replace numToChar(n) with empty in tString
return oLen - length(tString)
end charCount
Of course this won't find chars > 255, but then I have a question -
if you insert "set the useUnicode to true" at the beginning of it, it
still works, however if you do the same with your handler, on my
system, it takes four time longer, and produces no result. Without
the useUnicode setting, surely we're only able to count chars with an
ascii value <= 255...or have I misunderstood this ascii 1-byte, 2-
byte stuff?
Mark
On 1 Mar 2006, at 15:41, Jonathan Lynch wrote:
How is the speed on the script you are using?
Like, if you use this script on a string of several megabytes, how
long does
it take to get a result?
Since you are testing for a number of possible different
characters, you are
going to have to use a repeat for each char loop - I think.
_______________________________________________
use-revolution mailing list
[email protected]
Please visit this url to subscribe, unsubscribe and manage your
subscription preferences:
http://lists.runrev.com/mailman/listinfo/use-revolution
_______________________________________________
use-revolution mailing list
[email protected]
Please visit this url to subscribe, unsubscribe and manage your subscription
preferences:
http://lists.runrev.com/mailman/listinfo/use-revolution
