Merry Christmas to you too. I wish health and happiness to all pharo community and their families. By the way your graphic eats away 90% of my dual core 1.4 Cpu. Have to close the window because it overheats my macbook air almost immediately. On Wed, Dec 25, 2013 at 10:05 AM, Alexandre Bergel <alexandre.bergel@me.com>wrote:
Merry Christmas to all of you!
In a fresh 3.0 image:
-=-=--=-=--=-=--=-=--=-=- Gofer new smalltalkhubUser: 'ronsaldo' project: 'roassal3d'; package: 'ConfigurationOfRoassal3d'; load. (Smalltalk at: #ConfigurationOfRoassal3d) loadDevelopment -=-=--=-=--=-=--=-=--=-=-
Then do it:
-=-=--=-=--=-=--=-=--=-=- | view text x y el r | text := ' xx xx xxxxx xxxxx xxxxx x x xxxxx x x xxxxx x xxxxx xxxxx xx xx x xxxxx x x x x x x x x x x x x x x x x x x x x x x x x x x xxx xxxx xxxx xxx x xxxxx xxxx x xxxxx x x x xxxxx xxxxx x x x x x x x x x x x x x x x x x x x x x x x xxxxx x x x x x xxxxx x x x x x xxxxx x x x x x xxxxx '. view := R3View new. x := 0. y := 0.
mat := R3Material new diffuse: Color lightGray. mat specular: Color green. mat shininess: 10.0.
text linesDo: [ :line | line do: [ :c | (c = $x) ifTrue: [ el := (R3CubeShape new color: Color green) element. el on: R3MouseClickDown do: [ :evt | R3Blink on: evt element. r := (R3Rotate on: evt element by: (R3Vector3 newX: -0.5)). view addAnimation: r ]. el translateByX: x y: y negated z: 0. view add: el ]. x := x + 1 ]. x := 0. y := y + 1. ].
view lightingModel: R3MultipassPerPixelLighting new.
view addInteraction: R3MouseControl new; addInteraction: R3KeyControlForMac new. view open -=-=--=-=--=-=--=-=--=-=-
Use keys: W A S D Click on letters
Enjoy!
Cheers, The Profilers
-- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.