;Autor: Kahyberth Stiven Gonzalez Sayas
;Fecha: 3 de agosto de 2020
;Dibujo: Head of Steve (Minecraft)

(start 720 720)

;Linea de dibujo 1


(draw-solid-rect (make-posn 0 0) 90 90 'brown)
(draw-solid-rect (make-posn 90 0) 90 90 'brown)
(draw-solid-rect (make-posn 180 0) 90 90 'brown)
(draw-solid-rect (make-posn 270 0) 90 90 'brown)
(draw-solid-rect (make-posn 360 0) 90 90 'brown)
(draw-solid-rect (make-posn 450 0) 90 90 'brown)
(draw-solid-rect (make-posn 540 0) 90 90 'brown)
(draw-solid-rect (make-posn 630 0) 90 90 'brown)


;Linea de dibujo 2

(draw-solid-rect (make-posn 0 90) 90 90 'brown)
(draw-solid-rect (make-posn 90 90) 90 90 'brown)
(draw-solid-rect (make-posn 180 90) 90 90 'brown)
(draw-solid-rect (make-posn 270 90) 90 90 'brown)
(draw-solid-rect (make-posn 360 90) 90 90 'brown)
(draw-solid-rect (make-posn 450 90) 90 90 'brown)
(draw-solid-rect (make-posn 540 90) 90 90 'brown)
(draw-solid-rect (make-posn 630 90) 90 90 'brown)


;Linea de dibujo 3


(draw-solid-rect (make-posn 0 180) 90 90 'brown)
(draw-solid-rect (make-posn 90 180) 90 90 'tan)
(draw-solid-rect (make-posn 180 180) 90 90 'tan)
(draw-solid-rect (make-posn 270 180) 90 90 'tan)
(draw-solid-rect (make-posn 360 180) 90 90 'tan)
(draw-solid-rect (make-posn 450 180) 90 90 'tan)
(draw-solid-rect (make-posn 540 180) 90 90 'tan)
(draw-solid-rect (make-posn 630 180) 90 90 'brown)



;Linea de dibujo 4

(draw-solid-rect (make-posn 0 270) 90 90 'tan)
(draw-solid-rect (make-posn 90 270) 90 90 'tan)
(draw-solid-rect (make-posn 180 270) 90 90 'tan)
(draw-solid-rect (make-posn 270 270) 90 90 'tan)
(draw-solid-rect (make-posn 360 270) 90 90 'tan)
(draw-solid-rect (make-posn 450 270) 90 90 'tan)
(draw-solid-rect (make-posn 540 270) 90 90 'tan)
(draw-solid-rect (make-posn 630 270) 90 90 'tan)

;Linea de dibujo 5

(draw-solid-rect (make-posn 0 360) 90 90 'tan)
(draw-solid-rect (make-posn 90 360) 90 90 'white)
(draw-solid-rect (make-posn 180 360) 90 90 'blue)
(draw-solid-rect (make-posn 270 360) 90 90 'tan)
(draw-solid-rect (make-posn 360 360) 90 90 'tan)
(draw-solid-rect (make-posn 450 360) 90 90 'blue)
(draw-solid-rect (make-posn 540 360) 90 90 'white)
(draw-solid-rect (make-posn 630 360) 90 90 'tan)


;Linea de dibujo 6


(draw-solid-rect (make-posn 0 450) 90 90 'tan)
(draw-solid-rect (make-posn 90 450) 90 90 'tan)
(draw-solid-rect (make-posn 180 450) 90 90 'tan)
(draw-solid-rect (make-posn 270 450) 90 90 'PeachPuff)
(draw-solid-rect (make-posn 360 450) 90 90 'PeachPuff)
(draw-solid-rect (make-posn 450 450) 90 90 'tan)
(draw-solid-rect (make-posn 540 450) 90 90 'tan)
(draw-solid-rect (make-posn 630 450) 90 90 'tan)


;Linea de dibujo 7

(draw-solid-rect (make-posn 0 540) 90 90 'tan)
(draw-solid-rect (make-posn 90 540) 90 90 'tan)
(draw-solid-rect (make-posn 180 540) 90 90 'brown)
(draw-solid-rect (make-posn 270 540) 90 90 'tan)
(draw-solid-rect (make-posn 360 540) 90 90 'tan)
(draw-solid-rect (make-posn 450 540) 90 90 'brown)
(draw-solid-rect (make-posn 540 540) 90 90 'tan)
(draw-solid-rect (make-posn 630 540) 90 90 'tan)


;Linea de dibujo 8

(draw-solid-rect (make-posn 0 630) 90 90 'tan)
(draw-solid-rect (make-posn 90 630) 90 90 'tan)
(draw-solid-rect (make-posn 180 630) 90 90 'brown)
(draw-solid-rect (make-posn 270 630) 90 90 'brown)
(draw-solid-rect (make-posn 360 630) 90 90 'brown)
(draw-solid-rect (make-posn 450 630) 90 90 'brown)
(draw-solid-rect (make-posn 540 630) 90 90 'tan)
(draw-solid-rect (make-posn 630 630) 90 90 'tan)