> 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.Strange, does not happen to me. I have a recent macbook air. Anyway, this is not surprising.
Alexandre
>
>
> 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
> ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
>
>
>
>
>
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel �http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.