<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body text="#000000" bgcolor="#FFFFFF">
<p><font face="Georgia">Cool! Be sure to post a picture of the gizmo
when it's finished.</font><br>
</p>
<br>
<div class="moz-cite-prefix">On 4/7/17 6:11 PM, tim Rowledge wrote:<br>
</div>
<blockquote type="cite"
cite="mid:1DEC60C2-613A-4E98-892C-6E051A4461EF@rowledge.org">
<pre wrap="">
</pre>
<blockquote type="cite">
<pre wrap="">On 07-04-2017, at 12:09 PM, Bob Arning <a class="moz-txt-link-rfc2396E" href="mailto:arning315@comcast.net"><arning315@comcast.net></a> wrote:
photoshop is for sissies. use squeak ;-)
</pre>
</blockquote>
<pre wrap="">
Nice.
|head hat flex|
head := CircleMorph new extent: 40@40.
head color: Color salmon lighter twiceLighter twiceLighter.
head position: 200@200.
head openInWorld.
hat := Form extent: 45@35 depth: 32.
hat fillColor: Color transparent.
hat getCanvas
fillRectangle: (10@0 extent: 25@30) color: Color black;
fillOval: (0@28 extent: 45@7) color: Color black.
hat := hat asMorph.
hat position: 30@ -40.
flex := TransformationMorph new.
flex addMorph: hat.
flex position: 195@170.
flex openInWorld.
0 to: -30 by: -2 do:[:v| flex rotationDegrees: v.
(Delay forMilliseconds: 50) wait.
World displayWorldSafely].
-30 to: 0 by: 2 do:[:v| flex rotationDegrees: v.
(Delay forMilliseconds: 50) wait.
World displayWorldSafely].
(Delay forMilliseconds: 1500) wait.
flex delete.
head delete
I must admit at first I thought you were proposing an image filtering operation until I noticed the lack of filename.
tim
--
tim Rowledge; <a class="moz-txt-link-abbreviated" href="mailto:tim@rowledge.org">tim@rowledge.org</a>; <a class="moz-txt-link-freetext" href="http://www.rowledge.org/tim">http://www.rowledge.org/tim</a>
Useful random insult:- He's not a complete idiot -- some parts are missing.
</pre>
</blockquote>
<br>
</body>
</html>