JB, Jim, Guglielmo
Okay, this is the final version of the script which does seem
considerably faster than where I started.
Thanks to all. Hope this was a useful walk-through.
Any other suggestions on ways to improve?
---------------------------------------------
function convertTextToBinary varText
repeat with n = 1 to the number of chars of varText
put chartonum(char n of varText) into theNum
put baseConvert(theNum,10,2) into tBaseConverted
put char -8 to -1 of ("00000000" & tBaseConverted ) into
tBaseConverted
put tBaseConverted after tConverted
end repeat
return tConverted
end convertTextToBinary
_______________________________________________
use-livecode mailing list
[email protected]
Please visit this url to subscribe, unsubscribe and manage your subscription
preferences:
http://lists.runrev.com/mailman/listinfo/use-livecode
