[Pharo-dev] Merry Christmas!

Erwan Douaille douailleerwan at gmail.com
Wed Dec 25 04:12:03 EST 2013


Merry christmas everyone :)

I really like the 3D script ;)


2013/12/25 Alexandre Bergel <alexandre.bergel at me.com>

> > 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 at 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
> ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
>
>
>
>
>


-- 
Best regards,

Douaille Erwan <douaille.erwan at gmail.com>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.pharo.org/pipermail/pharo-dev_lists.pharo.org/attachments/20131225/ef8d8afd/attachment-0002.html>


More information about the Pharo-dev mailing list