;;; Scheme Recursive Art Contest Entry
;;;
;;; Please do not include your name or personal info in this file.
;;;
;;; Title: <Please, No Spoiler...>
;;;
;;; Description:
;;;   <People who saw the premiere: 'OMG I'll tell you what...'
;;;    waaaaait!
;;;    no spoiler please>

(define (draw)
  ; YOUR CODE HERE

  (define (avengers i)
    (if (> 4 i)
      (begin   
        (avengers (+ i 1))
    
        (bgcolor "black")
        (color "white")

        (pu)
        (goto (* i 32) (* i -72))
        (seth 45)
        (pd)
        (begin_fill)
        (circle (* i 100))
        (end_fill)

        (pu)
        (goto (* i 20) (* i -60))
        (seth 45)
        (pd)
        (color "black")
        (begin_fill)
        (circle (* i 80))
        (end_fill)

        (color "white")
        (pu)
        (goto 0 (* i -50))
        ;(goto 0 0)
        ;(seth 0)
        (pd)
        (begin_fill)
        (forward (* i 108))
        (left 90)
        (forward (* i 28))
        (left 60)
        (forward (* i 230))
        (left 120)
        (forward (* i 33))
        (left 60)
        (forward (* i 70))
        (right 60)
        (forward (* i 52))
        (right 90)
        (forward (* i 10))
        (left 135)
        (forward (* i 35))
        (left 90)
        (forward (* i 35))
        (left 135)
        (forward (* i 10))
        (right 90)
        (forward (* i 38))
        (right 120)
        (forward (* i 75))
        (right 150)
        (forward (* i 45))
        (left 45)
        (forward (* i 33))
        (left 135)
        (forward (* i 5))
        (end_fill)

        (pu)
        (left 180)
        (forward (* i 28))
        (pd)
        (begin_fill)
        (forward (* i 25))
        (right 90)
        (forward (* i 23))
        (right 134)
        (forward (* i 35))
        (end_fill)
        )))


  (avengers 1)
  
  (ht)
  (exitonclick))

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