;;; Scheme Recursive Art Contest Entry
;;;
;;; Please do not include your name or personal info in this file.
;;;
;;; Title: <Colorful Gnomon>
;;;
;;; Description:
;;;   <Vote here
;;;	   save time
;;;    Good luck on finals>
(bgcolor "AZURE")
	(color "BLACK")
	(right 45)
	(circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
    (forward 1)
    (circle 5)
	(left 180)
    (forward 27)
   	(right 135)




(define (draw)
	(color "INDIANRED")
	(forward 1)
	(circle 5)
	(color "LIGHTCORAL")
	(circle 5)
	(forward 1)
	(color "SALMON")
	(circle 5)
	(forward 1)
	(color "DARKSALMON")
	(circle 5)
	(forward 1)
	(color "LIGHTSALMON")
	(circle 5)
	(forward 1)
	(color "RED")
	(circle 5)
	(forward 1)
	(color "FIREBRICK")
	(circle 5)
	(forward 1)
	(color "DARKRED")
	(circle 5)
	(forward 1)
	(color "PINK")
	(circle 5)
	(forward 1)
	(color "LIGHTPINK")
	(circle 5)
	(forward 1)
	(color "HOTPINK")
	(circle 5)
	(forward 1)
	(color "DEEPPINK")
	(circle 5)
	(forward 1)
	(color "MEDIUMVIOLETRED")
	(circle 5)
	(forward 1)
	(color "PALEVIOLETRED")
	(circle 5)
	(forward 1)
	(color "LIGHTSALMON")
	(circle 5)
	(forward 1)
	(color "CORAL")
	(circle 5)
	(forward 1)
	(color "TOMATO")
	(circle 5)
	(forward 1)
	(color "ORANGERED")
	(circle 5)
	(forward 1)
	(color "DARKORANGE")
	(circle 5)
	(forward 1)
	(color "ORANGE")
	(circle 5)
	(forward 1)
	(color "GOLD")
	(circle 5)
	(forward 1)
	(color "YELLOW")
	(circle 5)
	(forward 1)
	(color "LIGHTYELLOW")
	(circle 5)
	(forward 1)
	(color "LEMONCHIFFON")
	(circle 5)
	(forward 1)
	(color "LIGHTGOLDENRODYELLOW")
	(circle 5)
	(forward 1)
	(color "PAPAYAWHIP")
	(circle 5)
	(forward 1)
	(color "MOCCASIN")
	(circle 5)
	(forward 1)
	(color "PEACHPUFF")
	(circle 5)
	(forward 1)
	(color "PALEGOLDENROD")
	(circle 5)
	(forward 1)
	(color "KHAKI")
	(circle 5)
	(forward 1)
	(color "DARKKHAKI")
	(circle 5)
	(forward 1)
	(color "LAVENDER")
	(circle 5)
	(forward 1)
	(color "THISTLE")
	(circle 5)
	(forward 1)
	(color "PLUM")
	(circle 5)
	(forward 1)
	(color "VIOLET")
	(circle 5)
	(forward 1)
	(color "ORCHID")
	(circle 5)
	(forward 1))
	(color "MAGENTA")
	(circle 5)
	(forward 1)
	(color "MEDIUMORCHID")
	(circle 5)
	(forward 1)
	(color "MEDIUMPURPLE")
	(circle 5)
	(forward 1)
	(color "BLUEVIOLET")
	(circle 5)
	(forward 1)
	(color "DARKVIOLET")
	(circle 5)
	(forward 1)
	(color "DARKORCHID")
	(circle 5)
	(forward 1)
	(color "DARKMAGENTA")
	(circle 5)
	(forward 1)
	(color "PURPLE")
	(circle 5)
	(forward 1)
	(color "SLATEBLUE")
	(circle 5)
	(forward 1)
	(color "DARKSLATEBLUE")
	(circle 5)
	(forward 1)
	(color "MEDIUMSLATEBLUE")
	(circle 5)
	(forward 1)
	(color "GREENYELLOW")
	(circle 5)
	(forward 1)
	(color "CHARTREUSE")
	(circle 5)
	(forward 1)
	(color "LAWNGREEN")
	(circle 5)
	(forward 1)
	(color "LIMEGREEN")
	(forward 1)
	(circle 5)
	(color "PALEGREEN")
	(circle 5)
	(forward 1)
	(color "LIGHTGREEN")
	(circle 5)
	(forward 1)
	(color "MEDIUMSPRINGGREEN")
	(circle 5)
	(forward 1)
	(color "SPRINGGREEN")
	(circle 5)
	(forward 1)
	(color "MEDIUMSEAGREEN")
	(circle 5)
	(forward 1)
	(color "SEAGREEN")
	(circle 5)
	(forward 1)
	(color "FORESTGREEN")
	(circle 5)
	(forward 1)
	(color "GREEN")
	(circle 5)
	(forward 1)
	(color "DARKGREEN")
	(circle 5)
	(forward 1)
	(color "YELLOWGREEN")
	(circle 5)
	(forward 1)
	(color "OLIVEDRAB")
	(circle 5)
	(forward 1)
	(color "DARKOLIVEGREEN")
	(circle 5)
	(forward 1)
	(color "MEDIUMAQUAMARINE")
	(circle 5)
	(forward 1)
	(color "DARKSEAGREEN")
	(circle 5)
	(forward 1)
	(color "LIGHTSEAGREEN")
	(circle 5)
	(forward 1)
	(color "DARKCYAN")
	(circle 5)
	(forward 1)
	(color "CYAN")
	(circle 5)
	(forward 1)
	(color "LIGHTCYAN")
	(circle 5)
	(forward 1)
	(color "PALETURQUOISE")
	(circle 5)
	(forward 1)
	(color "AQUAMARINE")
	(circle 5)
	(forward 1)
	(color "TURQUOISE")
	(circle 5)
	(forward 1)
	(color "MEDIUMTURQUOISE")
	(circle 5)
	(forward 1)
	(color "DARKTURQUOISE")
	(circle 5)
	(forward 1)
	(color "CADETBLUE")
	(circle 5)
	(forward 1)
	(color "STEELBLUE")
	(circle 5)
	(forward 1)
	(color "LIGHTSTEELBLUE")
	(circle 5)
	(forward 1)
	(color "POWDERBLUE")
	(circle 5)
	(forward 1)
	(color "LIGHTBLUE")
	(circle 5)
	(forward 1)
	(color "SKYBLUE")
	(circle 5)
	(forward 1)
	(color "LIGHTSKYBLUE")
	(circle 5)
	(forward 1)
	(color "DEEPSKYBLUE")
	(circle 5)
	(forward 1)
	(color "DODGERBLUE")
	(circle 5)
	(forward 1)
	(color "CORNFLOWERBLUE")
	(circle 5)
	(forward 1)
	(color "MEDIUMSLATEBLUE")
	(circle 5)
	(forward 1)
	(color "ROYALBLUE")
	(circle 5)
	(forward 1)
	(color "BLUE")
	(circle 5)
	(forward 1)
	(color "MEDIUMBLUE")
	(circle 5)
	(forward 1)
	(color "DARKBLUE")
	(circle 5)
	(forward 1)
	(color "NAVY")
	(circle 5)
	(forward 1)
	(color "MIDNIGHTBLUE")
	(circle 5)
	(forward 1)
	(color "CORNSILK")
	(circle 5)
	(forward 1)
	(color "BLANCHEDALMOND")
	(circle 5)
	(forward 1)
	(color "BISQUE")
	(circle 5)
	(forward 1)
	(color "NAVAJOWHITE")
	(circle 5)
	(forward 1)
	(color "WHEAT")
	(circle 5)
	(forward 1)
	(color "BURLYWOOD")
	(circle 5)
	(forward 1)
	(color "TAN")
	(circle 5)
	(forward 1)
	(color "ROSYBROWN")
	(circle 5)
	(forward 1)
	(color "SANDYBROWN")
	(circle 5)
	(forward 1)
	(color "GOLDENROD")
	(circle 5)
	(forward 1)
	(color "DARKGOLDENROD")
	(circle 5)
	(forward 1)
	(color "PERU")
	(circle 5)
	(forward 1)
	(color "CHOCOLATE")
	(circle 5)
	(forward 1)
	(color "SADDLEBROWN")
	(circle 5)
	(forward 1)
	(color "SIENNA")
	(circle 5)
	(forward 1)
	(color "BROWN")
	(circle 5)
	(forward 1)
	(color "MAROON")
	(circle 5)
	(forward 1)
	(color "WHITE")
	(circle 5)
	(forward 1)
	(color "SNOW")
	(circle 5)
	(forward 1)
	(color "HONEYDEW")
	(circle 5)
	(forward 1)
	(color "MINTCREAM")
	(circle 5)
	(forward 1)
	(color "AZURE")
	(circle 5)
	(forward 1)
	(color "ALICEBLUE")
	(circle 5)
	(forward 1)
	(color "GHOSTWHITE")
	(circle 5)
	(forward 1)
	(color "WHITESMOKE")
	(circle 5)
	(forward 1)
	(color "SEASHELL")
	(circle 5)
	(forward 1)
	(color "BEIGE")
	(circle 5)
	(forward 1)
	(color "OLDLACE")
	(circle 5)
	(forward 1)
	(color "FLORALWHITE")
	(circle 5)
	(forward 1)
	(color "IVORY")
	(circle 5)
	(forward 1)
	(color "ANTIQUEWHITE")
	(circle 5)
	(forward 1)
	(color "LINEN")
	(circle 5)
	(forward 1)
	(color "LAVENDERBLUSH")
	(circle 5)
	(forward 1)
	(color "MISTYROSE")
	(circle 5)
	(forward 1)
	(color "GAINSBORO")
	(circle 5)
	(forward 1)
	(color "LIGHTGRAY")
	(circle 5)
	(forward 1)
	(color "DARKGRAY")
	(circle 5)
	(forward 1)
	(color "GRAY")
	(circle 5)
	(forward 1)
	(color "DIMGRAY")
	(circle 5)
	(forward 1)
	(color "LIGHTSLATEGRAY")
	(circle 5)
	(forward 1)
	(color "SLATEGRAY")
	(circle 5)
	(forward 1)
	(color "DARKSLATEGRAY")
	(circle 5)
	(forward 1)
	(color "BLACK")
	(circle 5)
	(forward 1)
	(hideturtle)
 	(exitonclick))


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