victor_c 5/17/04

Dr. Scheme what I learned …

That it is harder to put in code than it is to just draw it in paint but after a few times of entering codes I eventually got the hang of it.

(start 640 480)

(draw-solid-disk(make-posn 180 120) 40'yellow)

(draw-solid-disk(make-posn 160 110) 10'blue)

(draw-solid-disk(make-posn 200 110) 10'blue)

(draw-solid-disk(make-posn 180 150) 5' black)

(draw-solid-rect(make-posn 0 160) 120 60'red)

(draw-solid-rect(make-posn 260 120) 40 100'green)

(draw-solid-rect(make-posn 300 120) 160 20'red)

(draw-solid-rect(make-posn 300 140) 160 80'blue)

(draw-solid-rect(make-posn 140 40) 80 60'green)

(draw-solid-rect(make-posn 160 180) 50 20'red)

(draw-solid-rect(make-posn 140 160) 90 20'red)

(draw-solid-rect(make-posn 160 200) 50 20'blue)

(draw-solid-rect(make-posn 150 210) 40 10'black)

(draw-solid-rect(make-posn 180 210) 40 10'black)

(draw-solid-line(make-posn 185 200)(make-posn 185 220)'white)