Alexandre
I'm trying to understand the logic.
what is angleInDegree:
Do you know if only one TRVIAnimatedValue would work instead of creating
one each
I would like to understand why TRVIAnimatedValue new is not stored
somewhere.
Le 22/1/16 à 14:46, Alexandre Bergel a écrit :
Just insect that code :-)
-=-=-=-=-=-=-=-=-=
v := RTView new.
seconds := 7.
timer := TRVITimer new cycleLength: seconds.
rotationRatio := 0.2.
shape := RTRotatedLabel new.
shape
angleInDegree: [ :cls |
| valueEnd |
valueEnd := cls numberOfMethods negated / rotationRatio.
TRVIAnimatedValue 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: RTResetAllShape new.
timer start.
v
-=-=-=-=-=-=-=-=-=
Cheers,
Alexandre
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel
http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
_______________________________________________
Moose-dev mailing list
Moose-dev(a)list.inf.unibe.ch
https://www.list.inf.unibe.ch/listinfo/moose-dev