Eric- Wednesday, July 20, 2005, 7:52:08 AM, you wrote:
How'd you manage to get 30 milliseconds run time? The best I can do is about 130. Is your machine just that much faster than mine? Here's the fastest code I could come up with - any suggestions on speeding it up? on mouseUp local tLine, tTestString local x local tBlnPossible local tDictionary, tElements, tPossibles local tTime put "working..." into field "status" put empty into field "possibles" put the milliseconds into tTime put field "dictionary" into tDictionary put field "elements" into tElements repeat for each line tLine in tDictionary put true into tBlnPossible repeat with x=1 to 9 step 2 put char x to x+1 of tLine into tTestString if tTestString is not among the lines of tElements then put false into tBlnPossible exit repeat end if end repeat if tBlnPossible then put tLine & cr after tPossibles end if end repeat put the milliseconds - tTime && "milliseconds" into field "elapsed" put tPossibles into field "possibles" put "found" && the number of lines in field "possibles" \ && "possible answers" into field "status" end mouseUp -- -Mark Wieder [EMAIL PROTECTED] _______________________________________________ use-revolution mailing list use-revolution@lists.runrev.com Please visit this url to subscribe, unsubscribe and manage your subscription preferences: http://lists.runrev.com/mailman/listinfo/use-revolution