;;; Scheme Recursive Art Contest Entry ;;; ;;; Please do not include your name or personal info in this file. ;;; ;;; Title: ;;; ;;; Description: ;;; (define (callssss) (write'piazza!!pizza!!)) (define (square size a b c) (pixel a b c) (pixelsize size) ) (define (draw) (square 32 0 0 "#2069C7") (square 32 0 1 "#ffffff ") (square 32 0 2 "#ffffff ") (square 32 0 3 "#ffffff ") (square 32 0 4 "#ffffff ") (square 32 0 5 "#2554C7") (square 32 0 6 "#2069C7") (square 32 0 7 "#2554C7") (square 32 0 8 "#2069C7") (square 32 0 9 "#2554C7") (square 32 0 10 "#2069C7") (square 32 0 11 "#2554C7") (square 32 0 12 "#2069C7") (square 32 0 13 "#2554C7") (square 32 0 14 "#2069C7") (square 32 0 15 "#2554C7") (square 32 0 16 "#2069C7") (square 32 0 17 "#2554C7") (square 32 0 18 "#2069C7") (square 32 0 19 "#2554C7") (square 32 0 20 "#2069C7") (square 32 1 0 "#2069C7") (square 32 1 1 "#2554C7") (square 32 1 2 "#ffffff") (square 32 1 3 "#2554C7") (square 32 1 4 "#ffffff ") (square 32 1 5 "#2554C7") (square 32 1 6 "#2069C7") (square 32 1 7 "#D2B48C") (square 32 1 8 "#D2B48C") (square 32 1 9 "#D2B48C") (square 32 1 10 "#DEB887") (square 32 1 11 "#DEB887") (square 32 1 12 "#DEB887") (square 32 1 13 "#DEB887") (square 32 1 14 "#DEB887") (square 32 1 15 "#DEB887") (square 32 1 16 "#DEB887") (square 32 1 17 "#DEB887") (square 32 1 18 "#2069C7") (square 32 1 19 "#2554C7") (square 32 1 20 "#2069C7") (square 32 2 0 "#2069C7") (square 32 2 1 "#2554C7") (square 32 2 2 "#2069C7") (square 32 2 3 "#ffffff ") (square 32 2 4 "#2069C7 ") (square 32 2 5 "#2554C7") (square 32 2 6 "#2069C7") (square 32 2 7 "#FFDEAD") (square 32 2 8 "#FFDEAD") (square 32 2 9 "#FFDEAD") (square 32 2 10 "#FFDEAD") (square 32 2 11 "#FFDEAD") (square 32 2 12 "#FFDEAD") (square 32 2 13 "#FFDEAD") (square 32 2 14 "#FFDEAD") (square 32 2 15 "#FFDEAD") (square 32 2 16 "#FFDEAD") (square 32 2 17 "#FFDEAD") (square 32 2 18 "#2069C7") (square 32 2 19 "#2554C7") (square 32 2 20 "#2069C7") (square 32 3 0 "#2069C7") (square 32 3 1 "#2554C7 ") (square 32 3 2 "#2069C7 ") (square 32 3 3 "#2554C7 ") (square 32 3 4 "#2069C7") (square 32 3 5 "#2554C7") (square 32 3 6 "#2069C7") (square 32 3 7 "#A52A2A") (square 32 3 8 "#FFF8DC") (square 32 3 9 "#17202A") (square 32 3 10 "#FFF8DC") (square 32 3 11 "#FCF3CF") (square 32 3 12 "#FFF8DC") (square 32 3 13 "#FFF8DC") (square 32 3 14 "#FFF8DC") (square 32 3 15 " #A52A2A") (square 32 3 16 "#FFF8DC") (square 32 3 17 " #A52A2A") (square 32 3 18 "#2069C7") (square 32 3 19 "#2554C7") (square 32 3 20 "#2069C7") (square 32 4 0 "#2069C7") (square 32 4 1 "#ffffff ") (square 32 4 2 "#ffffff ") (square 32 4 3 "#ffffff ") (square 32 4 4 "#ffffff") (square 32 4 5 "#2554C7") (square 32 4 6 "#2069C7") (square 32 4 7 "#A52A2A") (square 32 4 8 "#FFF8DC") (square 32 4 9 "#FFF8DC") (square 32 4 10 "#FFF8DC") (square 32 4 11 "#C0392B") (square 32 4 12 "#FFF8DC") (square 32 4 13 "#FFF8DC") (square 32 4 14 "#FCF3CF") (square 32 4 15 "#FFF8DC") (square 32 4 16 "#FCF3CF") (square 32 4 17 "#A52A2A") (square 32 4 18 "#2069C7") (square 32 4 19 "#2554C7") (square 32 4 20 "#2069C7") (square 32 5 0 "#2069C7") (square 32 5 1 "#2554C7 ") (square 32 5 2 "#2069C7 ") (square 32 5 3 "#2554C7 ") (square 32 5 4 "#2069C7") (square 32 5 5 "#2554C7") (square 32 5 6 "#2069C7") (square 32 5 7 "#FFF8DC") (square 32 5 8 "#FFF8DC") (square 32 5 9 "#196F3D") (square 32 5 10 "#FCF3CF") (square 32 5 11 "#FFF8DC") (square 32 5 12 "#FFF8DC") (square 32 5 13 "#FCF3CF") (square 32 5 14 "#FFF8DC") (square 32 5 15 "#FCF3CF") (square 32 5 16 "#FFF8DC") (square 32 5 17 "#FCF3CF") (square 32 5 18 "#2069C7") (square 32 5 19 "#2554C7") (square 32 5 20 "#2069C7") (square 32 6 0 "#2069C7") (square 32 6 1 "#ffffff ") (square 32 6 2 "#ffffff ") (square 32 6 3 "#ffffff ") (square 32 6 4 "#2069C7") (square 32 6 5 "#2554C7") (square 32 6 6 "#2069C7") (square 32 6 7 "#2554C7") (square 32 6 8 "#FFF8DC") (square 32 6 9 "#A52A2A") (square 32 6 10 "#FCF3CF") (square 32 6 11 "#FCF3CF") (square 32 6 12 "#FFF8DC") (square 32 6 13 "#FFF8DC") (square 32 6 14 "#FFF8DC") (square 32 6 15 "#196F3D") (square 32 6 16 "#FCF3CF") (square 32 6 17 "#2554C7") (square 32 6 18 "#2069C7") (square 32 6 19 "#2554C7") (square 32 6 20 "#2069C7") (square 32 7 0 "#2069C7") (square 32 7 1 "#2554C7") (square 32 7 2 "#ffffff") (square 32 7 3 "#2554C7") (square 32 7 4 "#ffffff") (square 32 7 5 "#2554C7") (square 32 7 6 "#2069C7") (square 32 7 7 "#2554C7") (square 32 7 8 "#FFF8DC") (square 32 7 9 "#FFF8DC") (square 32 7 10 "#FFF8DC") (square 32 7 11 "#FFF8DC") (square 32 7 12 "#FFF8DC") (square 32 7 13 "#FCF3CF") (square 32 7 14 "#A52A2A") (square 32 7 15 "#FCF3CF") (square 32 7 16 "#FCF3CF") (square 32 7 17 "#2554C7") (square 32 7 18 "#2069C7") (square 32 7 19 "#2554C7") (square 32 7 20 "#2069C7") (square 32 8 0 "#2069C7") (square 32 8 1 "#ffffff ") (square 32 8 2 "#ffffff ") (square 32 8 3 "#ffffff ") (square 32 8 4 "#2069C7") (square 32 8 5 "#2554C7") (square 32 8 6 "#2069C7") (square 32 8 7 "#2554C7") (square 32 8 8 "#2069C7") (square 32 8 9 "#FFF8DC") (square 32 8 10 "#196F3D") (square 32 8 11 "#FCF3CF") (square 32 8 12 "#FFF8DC") (square 32 8 13 "#FCF3CF") (square 32 8 14 "#A52A2A") (square 32 8 15 "#FCF3CF") (square 32 8 16 "#2069C7") (square 32 8 17 "#2554C7") (square 32 8 18 "#2069C7") (square 32 8 19 "#2554C7") (square 32 8 20 "#2069C7") (square 32 9 0 "#2069C7") (square 32 9 1 "#2554C7 ") (square 32 9 2 "#2069C7 ") (square 32 9 3 "#2554C7 ") (square 32 9 4 "#2069C7") (square 32 9 5 "#2554C7") (square 32 9 6 "#2069C7") (square 32 9 7 "#2554C7") (square 32 9 8 "#2069C7") (square 32 9 9 "#FFF8DC") (square 32 9 10 "#FFF8DC") (square 32 9 11 "#FFF8DC") (square 32 9 12 "#FFF8DC") (square 32 9 13 "#FCF3CF") (square 32 9 14 "#FCF3CF") (square 32 9 15 "#FCF3CF") (square 32 9 16 "#2069C7") (square 32 9 17 "#2554C7") (square 32 9 18 "#2069C7") (square 32 9 19 "#2554C7") (square 32 9 20 "#2069C7") (square 32 10 0 "#2069C7") (square 32 10 1 "#ffffff ") (square 32 10 2 "#ffffff") (square 32 10 3 "#2554C7 ") (square 32 10 4 "#ffffff") (square 32 10 5 "#2554C7") (square 32 10 6 "#2069C7") (square 32 10 7 "#2554C7") (square 32 10 8 "#2069C7") (square 32 10 9 "#FFF8DC") (square 32 10 10 "#A52A2A") (square 32 10 11 "#A52A2A") (square 32 10 12 "#FFF8DC") (square 32 10 13 "#FFF8DC") (square 32 10 14 "#FCF3CF") (square 32 10 15 "#FCF3CF") (square 32 10 16 "#2069C7") (square 32 10 17 "#2554C7") (square 32 10 18 "#2069C7") (square 32 10 19 "#2554C7") (square 32 10 20 "#2069C7") (square 32 11 0 "#2069C7") (square 32 11 1 "#ffffff ") (square 32 11 2 "#2069C7 ") (square 32 11 3 "#ffffff") (square 32 11 4 "#ffffff") (square 32 11 5 "#2554C7") (square 32 11 6 "#2069C7") (square 32 11 7 "#2554C7") (square 32 11 8 "#2069C7") (square 32 11 9 "#2554C7") (square 32 11 10 "#FCF3CF") (square 32 11 11 "#FCF3CF") (square 32 11 12 "#FFF8DC") (square 32 11 13 "#FFF8DC") (square 32 11 14 "#FFF8DC") (square 32 11 15 "#2554C7") (square 32 11 16 "#2069C7") (square 32 11 17 "#2554C7") (square 32 11 18 "#2069C7") (square 32 11 19 "#2554C7") (square 32 11 20 "#2069C7") (square 32 12 0 "#2069C7") (square 32 12 1 "#ffffff ") (square 32 12 2 "#2069C7 ") (square 32 12 3 "#2554C7 ") (square 32 12 4 "#ffffff") (square 32 12 5 "#2554C7") (square 32 12 6 "#2069C7") (square 32 12 7 "#2554C7") (square 32 12 8 "#2069C7") (square 32 12 9 "#2554C7") (square 32 12 10 "#FFF8DC") (square 32 12 11 "#FFF8DC") (square 32 12 12 "#FFF8DC") (square 32 12 13 "#FCF3CF") (square 32 12 14 "#FCF3CF") (square 32 12 15 "#2554C7") (square 32 12 16 "#2069C7") (square 32 12 17 "#2554C7") (square 32 12 18 "#2069C7") (square 32 12 19 "#2554C7") (square 32 12 20 "#2069C7") (square 32 13 0 "#2069C7") (square 32 13 1 "#2554C7 ") (square 32 13 2 "#2069C7 ") (square 32 13 3 "#2554C7 ") (square 32 13 4 "#2069C7") (square 32 13 5 "#2554C7") (square 32 13 6 "#2069C7") (square 32 13 7 "#2554C7") (square 32 13 8 "#2069C7") (square 32 13 9 "#2554C7") (square 32 13 10 "#FFF8DC") (square 32 13 11 "#FFF8DC") (square 32 13 12 "#FFF8DC") (square 32 13 13 "#A52A2A") (square 32 13 14 "#FFF8DC") (square 32 13 15 "#2554C7") (square 32 13 16 "#2069C7") (square 32 13 17 "#2554C7") (square 32 13 18 "#2069C7") (square 32 13 19 "#2554C7") (square 32 13 20 "#2069C7") (square 32 14 0 "#2069C7") (square 32 14 1 "#ffffff") (square 32 14 2 "#ffffff") (square 32 14 3 "#2554C7 ") (square 32 14 4 "#ffffff") (square 32 14 5 "#2554C7") (square 32 14 6 "#2069C7") (square 32 14 7 "#2554C7") (square 32 14 8 "#2069C7") (square 32 14 9 "#2554C7") (square 32 14 10 "#2069C7") (square 32 14 11 "#FFF8DC") (square 32 14 12 "#FFF8DC") (square 32 14 13 "#FCF3CF") (square 32 14 14 "#2069C7") (square 32 14 15 "#2554C7") (square 32 14 16 "#2069C7") (square 32 14 17 "#2554C7") (square 32 14 18 "#2069C7") (square 32 14 19 "#2554C7") (square 32 14 20 "#2069C7") (square 32 15 0 "#2069C7") (square 32 15 1 "#ffffff") (square 32 15 2 "#2069C7 ") (square 32 15 3 "#ffffff ") (square 32 15 4 "#ffffff") (square 32 15 5 "#2554C7") (square 32 15 6 "#2069C7") (square 32 15 7 "#2554C7") (square 32 15 8 "#2069C7") (square 32 15 9 "#2554C7") (square 32 15 10 "#2069C7") (square 32 15 11 "#FFF8DC") (square 32 15 12 "#FFF8DC") (square 32 15 13 "#196F3D") (square 32 15 14 "#2069C7") (square 32 15 15 "#2554C7") (square 32 15 16 "#2069C7") (square 32 15 17 "#2554C7") (square 32 15 18 "#2069C7") (square 32 15 19 "#2554C7") (square 32 15 20 "#2069C7") (square 32 16 0 "#2069C7") (square 32 16 1 "#ffffff") (square 32 16 2 "#2069C7 ") (square 32 16 3 "#2554C7 ") (square 32 16 4 "#ffffff") (square 32 16 5 "#2554C7") (square 32 16 6 "#2069C7") (square 32 16 7 "#2554C7") (square 32 16 8 "#2069C7") (square 32 16 9 "#2554C7") (square 32 16 10 "#2069C7") (square 32 16 11 "#FCF3CF") (square 32 16 12 "#FCF3CF") (square 32 16 13 "#17202A") (square 32 16 14 "#2069C7") (square 32 16 15 "#2554C7") (square 32 16 16 "#2069C7") (square 32 16 17 "#2554C7") (square 32 16 18 "#2069C7") (square 32 16 19 "#2554C7") (square 32 16 20 "#2069C7") (square 32 17 0 "#2069C7") (square 32 17 1 "#2554C7 ") (square 32 17 2 "#2069C7 ") (square 32 17 3 "#2554C7 ") (square 32 17 4 "#2069C7") (square 32 17 5 "#2554C7") (square 32 17 6 "#2069C7") (square 32 17 7 "#2554C7") (square 32 17 8 "#2069C7") (square 32 17 9 "#2554C7") (square 32 17 10 "#2069C7") (square 32 17 11 "#FFF8DC") (square 32 17 12 "#17202A") (square 32 17 13 "#FFF8DC") (square 32 17 14 "#2069C7") (square 32 17 15 "#2554C7") (square 32 17 16 "#2069C7") (square 32 17 17 "#2554C7") (square 32 17 18 "#2069C7") (square 32 17 19 "#2554C7") (square 32 17 20 "#2069C7") (square 32 18 0 "#2069C7") (square 32 18 1 "#ffffff") (square 32 18 2 "#ffffff") (square 32 18 3 "#ffffff") (square 32 18 4 "#2069C7") (square 32 18 5 "#2554C7") (square 32 18 6 "#2069C7") (square 32 18 7 "#2554C7") (square 32 18 8 "#2069C7") (square 32 18 9 "#2554C7") (square 32 18 10 "#2069C7") (square 32 18 11 "#2554C7") (square 32 18 12 "#FFF8DC") (square 32 18 13 "#2554C7") (square 32 18 14 "#2069C7") (square 32 18 15 "#2554C7") (square 32 18 16 "#2069C7") (square 32 18 17 "#2554C7") (square 32 18 18 "#2069C7") (square 32 18 19 "#2554C7") (square 32 18 20 "#2069C7") (square 32 19 0 "#2069C7") (square 32 19 1 "#2554C7 ") (square 32 19 2 "#ffffff ") (square 32 19 3 "#2554C7 ") (square 32 19 4 "#ffffff") (square 32 19 5 "#2554C7") (square 32 19 6 "#2069C7") (square 32 19 7 "#2554C7") (square 32 19 8 "#2069C7") (square 32 19 9 "#2554C7") (square 32 19 10 "#2069C7") (square 32 19 11 "#2554C7") (square 32 19 12 "#FFF8DC") (square 32 19 13 "#2554C7") (square 32 19 14 "#2069C7") (square 32 19 15 "#2554C7") (square 32 19 16 "#2069C7") (square 32 19 17 "#2554C7") (square 32 19 18 "#2069C7") (square 32 19 19 "#2554C7") (square 32 19 20 "#2069C7") (pendown) (color "red") (callssss) ) ; Please leave this last line alone. You may add additional procedures above ; this line. (draw)