Re: Scrolling text: Changing text color, etc.

*To*: mathgroup at smc.vnet.net*Subject*: [mg106862] Re: Scrolling text: Changing text color, etc.*From*: magma <maderri2 at gmail.com>*Date*: Mon, 25 Jan 2010 05:07:50 -0500 (EST)*References*: <30325919.1264250336093.JavaMail.root@n11> <hjh8b1$rae$1@smc.vnet.net>

Building on David Park's idea, but without the animation gear (and splitting the blanks): cc = 0 Dynamic@Style[ Row[RotateLeft[{C, a, l, c, u, l, u, s, " ", III, ",", " ", P, g, " ", 109, " ", " ", " "}, cc]], 16, Red, Bold] Do[cc = i; Pause[.1], {i, 100}]