Frank Shearar uploaded a new version of EToys to project The Trunk:
http://source.squeak.org/trunk/EToys-fbs.98.mcz

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

Name: EToys-fbs.98
Author: fbs
Time: 2 June 2013, 7:06:04.768 pm
UUID: ebccf095-beeb-4f50-9f23-b6615cf30393
Ancestors: EToys-fbs.97

Form >> #stencil and Pen >> #putDotOfDiameter:at: are only called from EToys code, so they belong in EToys.

=============== Diff against EToys-fbs.97 ===============

Item was added:
+ ----- Method: Form>>stencil (in category '*EToys-Scripting') -----
+ stencil
+ 	"return a 1-bit deep, black-and-white stencil of myself"
+ 
+ 	| canvas |
+ 	canvas := FormCanvas extent: self extent depth: 1.
+ 	canvas fillColor: (Color white).
+ 
+ 	canvas stencil: self at: 0 at 0  
+ 				sourceRect: (Rectangle origin: 0 at 0 corner: self extent) color: Color black.
+ 
+ 	^ canvas form
+ !

Item was added:
+ ----- Method: Pen>>putDotOfDiameter:at: (in category '*EToys-operations') -----
+ putDotOfDiameter: aDiameter at: aPoint
+ 	"Put a dot of the given size at the given point, using my colot"
+ 
+ 	(FormCanvas on: destForm) 
+ 			fillOval: (Rectangle center: aPoint extent: (aDiameter @ aDiameter))
+ 			color: self color!