On 21 Jan 2011, at 19:26, Mark Wieder wrote:
> Roger-
>
> Friday, January 21, 2011, 10:10:17 AM, you wrote:
>
>> Testing, 1, 2, 3 . . . .
>
> 5, 8, 13, 21 . . .
on mouseUp
put 2 into x
put 2 into theResult
repeat while the mouse is up
add one to x
put false into isDivisable
repeat for each item theItem in theResult
if x mod theItem = 0 then
put true into isDivisable
exit repeat
end if
end repeat
if isDivisable then
next repeat
else
put comma & x after theResult
end if
end repeat
put theResult
end mouseUp
_______________________________________________
use-livecode mailing list
use-livecode@lists.runrev.com
Please visit this url to subscribe, unsubscribe and manage your subscription
preferences:
http://lists.runrev.com/mailman/listinfo/use-livecode
