4 May
2015
4 May
'15
7:49 p.m.
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
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.