|r|

Display newDepth: 32.
World color: Color white.
r _ RectangleMorph new
	position: 100@100;
	color: (Color red alpha: 0.5);
	openInWorld.
r heading: 30.