;;; Scheme Recursive Art Contest Entry
;;;
;;; Please do not include your name or personal info in this file.
;;;
;;; Title: <too many tokens>
;;;
;;; Description:
;;;   <'tis ridiculous
;;;    at naught five till the morrow
;;;    half our code has gone>

(define (square size one two three)
		(pixel one two three)
		(pixelsize size))

(define (draw)
  

  (square 10 2 0 "#FFF8DC")
  (square 10 2 1 "#196F3D")
  (square 10 2 2 "#196F3D")
  
  (square 10 2 5 "#196F3D")
  (square 10 2 6 "#FFF8DC")
  (square 10 2 7 "#FFF8DC")
  (square 10 2 8 "#FFF8DC")
  (square 10 2 9 "#FFF8DC")
  (square 10 2 10 "#FFF8DC")

  (square 10 3 2 "#2069C7")
  (square 10 3 3 "#2069C7")
  (square 10 3 4 "#2069C7")
  (square 10 3 5 "#2069C7") 
  (square 10 3 6 "#2069C7")
  (square 10 3 7 "#2069C7")
  (square 10 3 8 "#2069C7")
  (square 10 3 9 "#2069C7")
  (square 10 3 10 "#2069C7")

 

  (square 10 5 0 "#A52A2A")
  (square 10 5 1 "#A52A2A")
  (square 10 5 2 "#A52A2A")
  (square 10 5 3 "#A52A2A")
  (square 10 5 4 "#A52A2A")
  
  (square 10 5 7 "#A52A2A")
  (square 10 5 8 "#A52A2A")
  (square 10 5 9 "#A52A2A")
  (square 10 5 10 "#A52A2A")

  (square 10 6 0 "#A52A2A")
 
  (square 10 6 4 "#A52A2A")
  (square 10 6 5 "#A52A2A")
  (square 10 6 6 "#A52A2A")
  (square 10 6 7 "#A52A2A")
  (square 10 6 8 "#A52A2A")
  (square 10 6 9 "#A52A2A")
  (square 10 6 10 "#A52A2A")

  (square 10 7 0 "#2554C7")
  (square 10 7 1 "#2554C7")
  (square 10 7 2 "#2554C7")
  (square 10 7 3 "#2554C7")
  (square 10 7 4 "#2554C7")

  (square 10 7 9 "#2554C7")
  (square 10 7 10 "#2554C7")






  (square 10 0 10 "#FFF8DC")
  (square 10 0 11 "#FFF8DC")
  (square 10 0 12 "#FFF8DC")
  (square 10 0 13 "#FFF8DC")
  (square 10 0 14 "#FFF8DC")
  
  (square 10 0 18 "#FFF8DC")
  (square 10 0 19 "#FFF8DC")
  (square 10 0 20 "#FFF8DC")

  (square 10 1 10 "#FFF8DC")
  
  (square 10 1 12 "#196F3D")
  (square 10 1 13 "#196F3D")
  (square 10 1 14 "#196F3D")
  (square 10 1 15 "#196F3D")
  (square 10 1 16 "#196F3D")
  (square 10 1 17 "#196F3D")

  (square 10 1 20 "#FFF8DC")

  (square 10 2 10 "#FFF8DC")
  (square 10 2 11 "#196F3D")
  (square 10 2 12 "#196F3D")
  
  (square 10 2 15 "#196F3D")
  (square 10 2 16 "#FFF8DC")
  (square 10 2 17 "#FFF8DC")
  (square 10 2 18 "#FFF8DC")
  (square 10 2 19 "#FFF8DC")
  (square 10 2 20 "#FFF8DC")

  (square 10 4 10 "#FFF8DC")
  (square 10 4 11 "#196F3D")
  (square 10 4 12 "#196F3D")
  (square 10 4 13 "#196F3D")
  (square 10 4 16 "#196F3D")
  (square 10 4 18 "#FFF8DC")
  (square 10 4 19 "#FFF8DC")
  (square 10 4 20 "#FFF8DC")

  (square 10 5 10 "#A52A2A")
  (square 10 5 11 "#A52A2A")

  (square 10 5 14 "#A52A2A")
  (square 10 5 15 "#A52A2A")
  (square 10 5 16 "#A52A2A")
  (square 10 5 17 "#A52A2A")
  (square 10 5 18 "#A52A2A")
  (square 10 5 19 "#A52A2A")
  (square 10 5 20 "#A52A2A")


  (square 10 7 10 "#2554C7")
  (square 10 7 11 "#2554C7")
  (square 10 7 12 "#2554C7")
  (square 10 7 13 "#2554C7")
  
  (square 10 7 16 "#2554C7")
  (square 10 7 17 "#2554C7")
  (square 10 7 18 "#2554C7")
  (square 10 7 19 "#2554C7")
  (square 10 7 20 "#2554C7")

  (square 10 9 10 "#17202A")
  (square 10 9 11 "#17202A")
  (square 10 9 12 "#17202A")
 
  (square 10 9 15 "#17202A")
  (square 10 9 16 "#17202A")
  (square 10 9 17 "#17202A")
  (square 10 9 18 "#17202A")
  (square 10 9 19 "#17202A")
  (square 10 9 20 "#17202A")



  (square 10 3 20 "#2069C7")
  (square 10 3 21 "#2069C7")
  (square 10 3 22 "#2069C7")
 
  (square 10 3 25 "#2069C7") 
  (square 10 3 26 "#2069C7")
  (square 10 3 27 "#2069C7")
  (square 10 3 28 "#2069C7")
  (square 10 3 29 "#2069C7")
  (square 10 3 30 "#2069C7")

  (square 10 4 20 "#FFF8DC")
  (square 10 4 21 "#196F3D")
  (square 10 4 22 "#196F3D")
  (square 10 4 23 "#196F3D")
  (square 10 4 24 "#196F3D")
  (square 10 4 25 "#196F3D")
 
  (square 10 4 28 "#FFF8DC")
  (square 10 4 29 "#FFF8DC")
  (square 10 4 30 "#FFF8DC")

  (square 10 5 20 "#A52A2A")
  (square 10 5 21 "#A52A2A")
  (square 10 5 22 "#A52A2A")
  (square 10 5 23 "#A52A2A")
  (square 10 5 24 "#A52A2A")
  (square 10 5 25 "#A52A2A")
 
 
  (square 10 5 28 "#A52A2A")
  (square 10 5 29 "#A52A2A")
  (square 10 5 30 "#A52A2A")

  (square 10 6 20 "#A52A2A")
  (square 10 6 21 "#A52A2A")
  (square 10 6 22 "#A52A2A")

  (square 10 6 25 "#A52A2A")
  
  (square 10 6 27 "#A52A2A")
  (square 10 6 28 "#A52A2A")
  (square 10 6 29 "#A52A2A")
  (square 10 6 30 "#A52A2A")

  (square 10 7 20 "#2554C7")
 
  (square 10 7 25 "#2554C7")
  (square 10 7 26 "#2554C7")
  (square 10 7 27 "#2554C7")
  (square 10 7 28 "#2554C7")
  (square 10 7 29 "#2554C7")
  (square 10 7 30 "#2554C7")

  (square 10 8 20 "#2554C7")
 
  (square 10 8 27 "#2554C7")
  (square 10 8 28 "#2554C7")
  (square 10 8 29 "#2554C7")
  (square 10 8 30 "#2554C7")

  (square 10 9 20 "#17202A")
  (square 10 9 21 "#17202A")
  (square 10 9 22 "#17202A")
  (square 10 9 23 "#17202A")
  (square 10 9 24 "#17202A")
  
  (square 10 9 27 "#17202A")
  (square 10 9 28 "#17202A")
  (square 10 9 29 "#17202A")
  (square 10 9 30 "#17202A")









  (square 10 10 20 "#FFF8DC")
  (square 10 10 21 "#FFF8DC")
  (square 10 10 22 "#FFF8DC")
  (square 10 10 23 "#FFF8DC")
  (square 10 10 24 "#FFF8DC")
  
  (square 10 10 27 "#FFF8DC")
  (square 10 10 28 "#FFF8DC")
  (square 10 10 29 "#FFF8DC")
  (square 10 10 30 "#FFF8DC")

  (square 10 11 20 "#FFF8DC")
  (square 10 11 21 "#196F3D")
  
  (square 10 11 26 "#196F3D")
  (square 10 11 27 "#196F3D")
  (square 10 11 28 "#FFF8DC")
  (square 10 11 29 "#FFF8DC")
  (square 10 11 30 "#FFF8DC")

  (square 10 12 20 "#FFF8DC")
  (square 10 12 21 "#196F3D")
  (square 10 12 22 "#196F3D")
  (square 10 12 23 "#196F3D")
  (square 10 12 24 "#196F3D")
  (square 10 12 25 "#196F3D")

  (square 10 12 28 "#FFF8DC")
  (square 10 12 29 "#FFF8DC")
  (square 10 12 30 "#FFF8DC")

  
  (square 10 15 20 "#A52A2A")
  (square 10 15 21 "#A52A2A")
  
  (square 10 15 23 "#A52A2A")
 
  (square 10 15 26 "#A52A2A")
 
  (square 10 15 28 "#A52A2A")
  (square 10 15 29 "#A52A2A")
  (square 10 15 30 "#A52A2A")

  (square 10 16 20 "#A52A2A")
  (square 10 16 21 "#A52A2A")
  (square 10 16 22 "#A52A2A")

  (square 10 16 25 "#A52A2A")
  (square 10 16 26 "#A52A2A")

  (square 10 16 28 "#A52A2A")
  (square 10 16 29 "#A52A2A")
  (square 10 16 30 "#A52A2A")

  (square 10 17 20 "#2554C7")

  (square 10 17 24 "#FFDEAD")
  (square 10 17 25 "#FFDEAD")
  (square 10 17 26 "#FFDEAD")
 
  (square 10 17 30 "#2554C7")

  (square 10 18 20 "#FFDEAD")
  (square 10 18 21 "#FFDEAD")

  (square 10 18 27 "#2554C7")
  (square 10 18 28 "#2554C7")
  (square 10 18 29 "#2554C7")
  (square 10 18 30 "#2554C7")


  (square 10 19 22 "#17202A")
  (square 10 19 23 "#17202A")
  (square 10 19 24 "#17202A")
  (square 10 19 25 "#17202A")
 
  (square 10 19 27 "#17202A")
  (square 10 19 28 "#17202A")
  (square 10 19 29 "#17202A")
  (square 10 19 30 "#17202A")


  (square 10 20 0 "#FFF8DC")
  (square 10 20 1 "#FFF8DC")
  (square 10 20 2 "#FFF8DC")
  (square 10 20 3 "#FFF8DC")
  
  (square 10 20 8 "#FFF8DC")
  (square 10 20 9 "#FFF8DC")
  (square 10 20 10 "#FFF8DC")

  (square 10 21 0 "#FFF8DC")
  (square 10 21 1 "#196F3D")
  (square 10 21 2 "#196F3D")

  (square 10 21 6 "#196F3D")
  (square 10 21 7 "#196F3D")
  (square 10 21 8 "#FFF8DC")
  (square 10 21 9 "#FFF8DC")
  (square 10 21 10 "#FFF8DC")

  (square 10 22 0 "#FFF8DC")
  (square 10 22 1 "#196F3D")
  (square 10 22 2 "#196F3D")
  (square 10 22 3 "#196F3D")
  
  (square 10 22 9 "#FFF8DC")
  (square 10 22 10 "#FFF8DC")

  (square 10 23 0 "#2069C7")
  (square 10 23 1 "#2069C7")
  (square 10 23 2 "#2069C7")
 
  (square 10 23 5 "#2069C7") 
  (square 10 23 6 "#2069C7")
  (square 10 23 7 "#2069C7")
  (square 10 23 8 "#2069C7")
  (square 10 23 9 "#2069C7")
  (square 10 23 10 "#2069C7")

  (square 10 24 0 "#FFF8DC")
 
  (square 10 24 3 "#196F3D")
  (square 10 24 4 "#196F3D")
  (square 10 24 5 "#196F3D")
  (square 10 24 6 "#196F3D")
  (square 10 24 7 "#FFF8DC")
  (square 10 24 9 "#FFF8DC")
  (square 10 24 10 "#FFF8DC")

  (square 10 25 0 "#A52A2A")
  (square 10 25 1 "#A52A2A")
  
  (square 10 25 4 "#A52A2A")
  
  (square 10 25 6 "#A52A2A")
  (square 10 25 7 "#A52A2A")
  (square 10 25 8 "#A52A2A")
  (square 10 25 9 "#A52A2A")
  (square 10 25 10 "#A52A2A")

  (square 10 26 0 "#A52A2A")
  (square 10 26 1 "#A52A2A")
  
  (square 10 26 4 "#A52A2A")
  
  (square 10 26 6 "#A52A2A")
 
  (square 10 26 8 "#A52A2A")
  (square 10 26 9 "#A52A2A")
  (square 10 26 10 "#A52A2A")

  (square 10 27 0 "#2554C7")
  
  (square 10 27 3 "#2554C7")
  (square 10 27 4 "#2554C7")

  (square 10 27 6 "#2554C7")
  (square 10 27 7 "#2554C7")
  (square 10 27 8 "#2554C7")
  (square 10 27 9 "#2554C7")
  (square 10 27 10 "#2554C7")

  (square 10 28 0 "#2554C7")

  (square 10 28 4 "#2554C7")
  (square 10 28 5 "#2554C7")
 
  (square 10 28 8 "#2554C7")
  (square 10 28 9 "#2554C7")
  (square 10 28 10 "#2554C7")

  (square 10 29 0 "#17202A")
  (square 10 29 1 "#17202A")
  (square 10 29 2 "#17202A")
  (square 10 29 3 "#17202A")
  
  (square 10 29 7 "#17202A")
  (square 10 29 8 "#17202A")
  (square 10 29 9 "#17202A")
  (square 10 29 10 "#17202A")




  (square 10 20 10 "#FFF8DC")
  (square 10 20 11 "#FFF8DC")
  (square 10 20 12 "#FFF8DC")
  (square 10 20 13 "#FFF8DC")
  (square 10 20 14 "#FFF8DC")
 
  (square 10 20 16 "#FFF8DC")
  (square 10 20 17 "#FFF8DC")
  (square 10 20 18 "#FFF8DC")
  (square 10 20 19 "#FFF8DC")
  (square 10 20 20 "#FFF8DC")

  (square 10 21 10 "#FFF8DC")
  (square 10 21 11 "#196F3D")
 
  (square 10 21 14 "#196F3D")
 
  (square 10 21 16 "#196F3D")
  (square 10 21 17 "#196F3D")
  (square 10 21 18 "#FFF8DC")
  (square 10 21 19 "#FFF8DC")
  (square 10 21 20 "#FFF8DC")

  (square 10 22 10 "#FFF8DC")
  (square 10 22 11 "#196F3D")
 
  (square 10 22 13 "#196F3D")
  (square 10 22 14 "#196F3D")
  (square 10 22 15 "#196F3D")

  (square 10 22 17 "#FFF8DC")
  (square 10 22 18 "#FFF8DC")
  (square 10 22 19 "#FFF8DC")
  (square 10 22 20 "#FFF8DC")

  (square 10 23 10 "#2069C7")
  (square 10 23 11 "#2069C7")
  (square 10 23 12 "#2069C7")

  (square 10 23 15 "#2069C7") 
  (square 10 23 16 "#2069C7")
  (square 10 23 18 "#2069C7")
  (square 10 23 19 "#2069C7")
  (square 10 23 20 "#2069C7")

  (square 10 24 10 "#FFF8DC")
  (square 10 24 11 "#196F3D")
  
  (square 10 24 14 "#196F3D")
  (square 10 24 15 "#196F3D")
 
  (square 10 24 17 "#FFF8DC")
  (square 10 24 18 "#FFF8DC")
  (square 10 24 19 "#FFF8DC")
  (square 10 24 20 "#FFF8DC")


  (square 10 27 10 "#2554C7")
  (square 10 27 11 "#2554C7")
  
  (square 10 27 15 "#2554C7")
  (square 10 27 16 "#2554C7")  
  (square 10 27 19 "#2554C7")
  (square 10 27 20 "#2554C7")

  (square 10 28 10 "#2554C7")
  (square 10 28 11 "#2554C7")
  (square 10 28 12 "#2554C7")
  (square 10 28 13 "#2554C7")
  (square 10 28 14 "#2554C7")
  (square 10 28 15 "#2554C7")

  (square 10 28 18 "#2554C7")
  (square 10 28 19 "#2554C7")
  (square 10 28 20 "#2554C7")




  (square 10 20 20 "#FFF8DC")
  
  (square 10 20 23 "#FFF8DC")
  (square 10 20 24 "#FFF8DC")
 
  (square 10 20 26 "#FFF8DC")
  (square 10 20 27 "#FFF8DC")
  (square 10 20 28 "#FFF8DC")
  (square 10 20 29 "#FFF8DC")
  (square 10 20 30 "#FFF8DC")

  (square 10 21 20 "#FFF8DC")
  (square 10 21 21 "#196F3D")
  (square 10 21 22 "#196F3D")
  (square 10 21 23 "#196F3D")
  (square 10 21 24 "#196F3D")
  (square 10 21 25 "#196F3D")
  
  (square 10 21 28 "#FFF8DC")
  (square 10 21 29 "#FFF8DC")
  (square 10 21 30 "#FFF8DC")

  (square 10 22 20 "#FFF8DC")
  (square 10 22 21 "#196F3D")
  (square 10 22 22 "#196F3D")
  (square 10 22 23 "#196F3D")
  (square 10 22 24 "#196F3D")
 
  (square 10 22 28 "#FFF8DC")
  (square 10 22 29 "#FFF8DC")
  (square 10 22 30 "#FFF8DC")

  (square 10 23 20 "#2069C7")
 
  (square 10 23 24 "#2069C7")
  (square 10 23 25 "#2069C7") 
  (square 10 23 26 "#2069C7")
  (square 10 23 27 "#2069C7")
  (square 10 23 28 "#2069C7")
  (square 10 23 29 "#2069C7")
  (square 10 23 30 "#2069C7")

  (square 10 24 20 "#FFF8DC")
  (square 10 24 21 "#196F3D")
  (square 10 24 22 "#196F3D")
  (square 10 24 23 "#196F3D")
  (square 10 24 24 "#196F3D")
  (square 10 24 25 "#196F3D")
 
  (square 10 24 27 "#FFF8DC")
  (square 10 24 28 "#FFF8DC")
  (square 10 24 29 "#FFF8DC")
  (square 10 24 30 "#FFF8DC")

  (square 10 25 20 "#A52A2A")
  (square 10 25 21 "#A52A2A")
  (square 10 25 22 "#A52A2A")
  (square 10 25 23 "#A52A2A")
 
  (square 10 25 27 "#D2B48C")
  (square 10 25 28 "#D2B48C")
  (square 10 25 29 "#D2B48C")
  (square 10 25 30 "#A52A2A")



  (square 10 27 20 "#2554C7")
  (square 10 27 21 "#D2B48C")
  (square 10 27 22 "#D2B48C")
  (square 10 27 23 "#D2B48C")
  

  
  



  (exitonclick))




; Please leave this last line alone.  You may add additional procedures above
; this line.
(draw)