Re: Text on a curve,

*To*: mathgroup at smc.vnet.net*Subject*: [mg104997] Re: Text on a curve,*From*: "Sjoerd C. de Vries" <sjoerd.c.devries at gmail.com>*Date*: Tue, 17 Nov 2009 05:14:28 -0500 (EST)*References*: <200911131055.FAA11361@smc.vnet.net> <hdqb65$6ps$1@smc.vnet.net>

Hi Syd, You could try Clock[ ] for this: Dynamic[ Clock[{1, 1}, 0.1, 20]; Text[Row[Style[#, 24, Hue[Random[]]] & /@ Characters["Typing onto a curve works."]]]] Cheers -- Sjoerd On Nov 16, 3:51 am, Syd Geraghty <sydgerag... at me.com> wrote: > Hi All, > > The code below is a very interesting attention getting display but how do you control the length of time it is active? > > I have tried using TimeConstrained without luck. > > The code runs continously and I can only stop it by changing the TimeConstrained time limit to 0.00001 as below. > > Using 0.00001 returns $Aborted immediately, setting t=0.0001 runs continuously .... > > TimeConstrained[ > Text[Row[ > Dynamic@Style[#, 24, Refresh[Hue[Random[]], UpdateInterval -> .2]]& /@ > Characters["Typing onto a curve works."]]], 0.00001] > > This question really goes to the whole question of setting timers for interactive displays and forms via Mathematica 7. > > Any and all insight would be greatly appreciated. > > Cheers .... Syd > > Syd Geraghty B.Sc, M.Sc. > > sydgerag... at mac.com > > Mathematica 7.0.1.0 for Mac OS X x86 (64 - bit) (12th September 2009) > MacOS X V 10.6.1 Snow LeopardMacBook Pro 2.33 GHz Intel Core 2 Duo 2GBRAM > > On Nov 13, 2009, at 2:55 AM, Bill wrote: > > > The next section of code presents text that blinks different colors: > > > (* Code part B: *) > > > Text[Row[Dynamic@ > > Style[#, 24, Refresh[Hue[Random[]], UpdateInterval -> .2]] & /@ > > Characters["Typing onto a curve works."]]]

**References**:**Text on a curve, revisited and modified***From:*Bill <WDWNORWALK@aol.com>