//
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.
|