[squeak-dev] The Trunk: MorphicExtras-mt.294.mcz

commits at source.squeak.org commits at source.squeak.org
Mon Apr 26 13:08:07 UTC 2021


Marcel Taeumel uploaded a new version of MorphicExtras to project The Trunk:
http://source.squeak.org/trunk/MorphicExtras-mt.294.mcz

==================== Summary ====================

Name: MorphicExtras-mt.294
Author: mt
Time: 26 April 2021, 3:08:04.000131 pm
UUID: c6d8ad6a-4132-bc46-95e0-57a6854b0ce6
Ancestors: MorphicExtras-eem.293

Adds missing example for moving-eye morph.

=============== Diff against MorphicExtras-eem.293 ===============

Item was added:
+ ----- Method: MovingEyeMorph class>>extraExampleSqueakGhostIsWatchingYou (in category 'examples') -----
+ extraExampleSqueakGhostIsWatchingYou
+ 	"MovingEyeMorph extraExampleSqueakGhostIsWatchingYou openInHand"
+ 
+ 	| logoMorph leftEye rightEye |
+ 	logoMorph := (Form squeakLogo "collectColors: #negated") asMorph.
+ 	leftEye := (self color: Color white irisColor: Color black)
+ 		extent: logoMorph extent * (0.1 @ 0.15);
+ 		center: (logoMorph pointAtFraction: 0.39 @ 0.55);
+ 		yourself.
+ 	rightEye := (self color: Color white irisColor: Color black)
+ 		extent: logoMorph extent * (0.1 @ 0.15);
+ 		center: (logoMorph pointAtFraction: 0.59 @ 0.56);
+ 		yourself.
+ 	logoMorph addAllMorphs: {leftEye. rightEye}.
+ 	^ logoMorph.!



More information about the Squeak-dev mailing list