4 May
2015
4 May
'15
7:40 p.m.
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