fiberoptics drawing tools    
     

movie 5:sea anenome
 

// the fiberoptic drawing tools were a response to
// problem set 9 which challenged us to effectively
// use a larger canvas size of 200X200 pixels
// interactively, emphasizing the difference
// is between the two display sizes.

// the deep sea anemone on a 100 x 100 
// pixel sunken treasure chest // mouseover within 100 x 100 chest area // and "no name" <-- anagram for anemome, ha ha! // mouse outside of that area // and "sea" the anenome. load dbngraphics.dbn antialias 100 paper 90 set bck 80 set for 20 set h0 100 set v0 100 repeat r 5 5 { Forever { set h1 <mouse 1> set v1 <mouse 2> // anemone eye pen 100 line h1 v1 (h1-1) (v1) // anenome tentacle pen (for+50) // endpoint circle <mouse 1> <mouse 2> 2 50 line h0 v0 h1 v1 // treasure chest Pen 90 Repeat A 0 100 { Line A 0 A 100 } } } // the chest is static. the anenome is motivated.