[Moose-dev] Re: Nice animation

-- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;. > On May 4, 2015, at 3:20 PM, Offray Vladimir Luna Cárdenas offray@riseup.net wrote: > > Really nice. What if I want to add randomness to the color, lets say on the alpha or the rgb? > > Cheers, > > Offray > > El 04/05/15 a las 12:40, volkert escribió: >> Nice :-) >> >> Am 04.05.2015 um 19:49 schrieb Alexandre Bergel: >>> Hi! >>> >>> If you have an image with Roassal open, give a try: >>> >>> v := RTView new. >>> v when: TRMouseClick do: [ :event | v clean ]. >>> v when: TRMouseMove do: [ :event | >>> e := (RTBox new color: (Color red alpha: 0.2); size: 20 atRandom + >>> 5) element. >>> e translateTo: event positionFromCamera. >>> v add: e. >>> v addAnimation: (RTAccelerationMove to: >>> event positionFromCamera + ((150 atRandom - 75) @ (150 >>> atRandom - 75)) during: 5 on: e) >>> ]. >>> v >>> >>> :-) >>> >>> Cheers, >>> Alexandre >> >> _______________________________________________ >> Moose-dev mailing list >> Moose-dev@iam.unibe.ch >> https://www.iam.unibe.ch/mailman/listinfo/moose-dev >> > > > _______________________________________________ > Moose-dev mailing list > Moose-dev@iam.unibe.ch > https://www.iam.unibe.ch/mailman/listinfo/moose-dev