[fun] animated rotating text
Locked
 
|
Hi!
I’ve just stumbled on this rather old piece of code. It animates some text. Kind of fun :-) In case you have never seen it, you may try: RTExample new rotatingLabelsAnimated Here is the code: -=—=-=-=—=-=-=—=-=-=—=-= | v shape timer | v := RTView new. timer := VITimer new cycleLength: 2. shape := RTRotatedLabel new. shape angleInDegree: [ :cls | | valueEnd | valueEnd := cls numberOfMethods negated / 1.5. VIAnimatedValue new evaluator: [ :t | 0 interpolateTo: valueEnd at: t ]; timer: timer; yourself. ]. shape text: [ :cls | ' ', cls name ]. shape color: (Color black alpha: 0.2). v addAll: (shape elementsOn: Collection withAllSubclasses). v canvas color: Color white. v addAnimation: TRResetAllShapes new. timer start. v open -=—=-=-=—=-=-=—=-=-=—=-= -- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;. _______________________________________________ Moose-dev mailing list [hidden email] https://www.iam.unibe.ch/mailman/listinfo/moose-dev |
|
|
Nice! Changing the time and the... "angle ratio" of rotation creates
beautiful animations. Some test here: http://ws.stfx.eu/3SD6U8XSFOJS Cheers, Offray El 03/03/15 a las 11:57, Alexandre Bergel escribió: > Hi! > > I’ve just stumbled on this rather old piece of code. It animates some text. Kind of fun :-) > In case you have never seen it, you may try: > > RTExample new rotatingLabelsAnimated > > Here is the code: > -=—=-=-=—=-=-=—=-=-=—=-= > | v shape timer | > v := RTView new. > timer := VITimer new cycleLength: 2. > > shape := RTRotatedLabel new. > shape angleInDegree: [ :cls | > | valueEnd | > valueEnd := cls numberOfMethods negated / 1.5. > VIAnimatedValue new > evaluator: [ :t | 0 interpolateTo: valueEnd at: t ]; > timer: timer; > yourself. ]. > > shape text: [ :cls | ' ', cls name ]. > shape color: (Color black alpha: 0.2). > v addAll: (shape elementsOn: Collection withAllSubclasses). > > v canvas color: Color white. > v addAnimation: TRResetAllShapes new. > timer start. > v open > -=—=-=-=—=-=-=—=-=-=—=-= > _______________________________________________ Moose-dev mailing list [hidden email] https://www.iam.unibe.ch/mailman/listinfo/moose-dev |
|
|
he he!!
Excellent! In the release of Roassal! Alexandre > On Mar 4, 2015, at 8:07 PM, Offray Vladimir Luna Cárdenas <[hidden email]> wrote: > > Nice! Changing the time and the... "angle ratio" of rotation creates beautiful animations. Some test here: > > http://ws.stfx.eu/3SD6U8XSFOJS > > Cheers, > > Offray > > El 03/03/15 a las 11:57, Alexandre Bergel escribió: >> Hi! >> >> I’ve just stumbled on this rather old piece of code. It animates some text. Kind of fun :-) >> In case you have never seen it, you may try: >> >> RTExample new rotatingLabelsAnimated >> >> Here is the code: >> -=—=-=-=—=-=-=—=-=-=—=-= >> | v shape timer | >> v := RTView new. >> timer := VITimer new cycleLength: 2. >> >> shape := RTRotatedLabel new. >> shape angleInDegree: [ :cls | >> | valueEnd | >> valueEnd := cls numberOfMethods negated / 1.5. >> VIAnimatedValue new >> evaluator: [ :t | 0 interpolateTo: valueEnd at: t ]; >> timer: timer; >> yourself. ]. >> >> shape text: [ :cls | ' ', cls name ]. >> shape color: (Color black alpha: 0.2). >> v addAll: (shape elementsOn: Collection withAllSubclasses). >> >> v canvas color: Color white. >> v addAnimation: TRResetAllShapes new. >> timer start. >> v open >> -=—=-=-=—=-=-=—=-=-=—=-= >> > > > _______________________________________________ > Moose-dev mailing list > [hidden email] > https://www.iam.unibe.ch/mailman/listinfo/moose-dev -- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;. _______________________________________________ Moose-dev mailing list [hidden email] https://www.iam.unibe.ch/mailman/listinfo/moose-dev |
|
|
In reply to this post by Offray
Your example is beautiful. We need more like this!
Alexandre > On Mar 4, 2015, at 8:07 PM, Offray Vladimir Luna Cárdenas <[hidden email]> wrote: > > Nice! Changing the time and the... "angle ratio" of rotation creates beautiful animations. Some test here: > > http://ws.stfx.eu/3SD6U8XSFOJS > > Cheers, > > Offray > > El 03/03/15 a las 11:57, Alexandre Bergel escribió: >> Hi! >> >> I’ve just stumbled on this rather old piece of code. It animates some text. Kind of fun :-) >> In case you have never seen it, you may try: >> >> RTExample new rotatingLabelsAnimated >> >> Here is the code: >> -=—=-=-=—=-=-=—=-=-=—=-= >> | v shape timer | >> v := RTView new. >> timer := VITimer new cycleLength: 2. >> >> shape := RTRotatedLabel new. >> shape angleInDegree: [ :cls | >> | valueEnd | >> valueEnd := cls numberOfMethods negated / 1.5. >> VIAnimatedValue new >> evaluator: [ :t | 0 interpolateTo: valueEnd at: t ]; >> timer: timer; >> yourself. ]. >> >> shape text: [ :cls | ' ', cls name ]. >> shape color: (Color black alpha: 0.2). >> v addAll: (shape elementsOn: Collection withAllSubclasses). >> >> v canvas color: Color white. >> v addAnimation: TRResetAllShapes new. >> timer start. >> v open >> -=—=-=-=—=-=-=—=-=-=—=-= >> > > > _______________________________________________ > Moose-dev mailing list > [hidden email] > https://www.iam.unibe.ch/mailman/listinfo/moose-dev -- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;. _______________________________________________ Moose-dev mailing list [hidden email] https://www.iam.unibe.ch/mailman/listinfo/moose-dev |
«
Return to Moose
|
1 view|%1 views
| Free forum by Nabble | Edit this page |