Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (start 500 500)
- (draw-solid-rect (make-posn 0 0 ) 500 500 'blue)
- (draw-solid-rect (make-posn 195 241) 30 30 'green)
- (draw-solid-rect (make-posn 205 235) 30 30 'green)
- (draw-solid-rect (make-posn 215 225) 30 30 'green)
- (draw-solid-rect (make-posn 225 215) 30 30 'green)
- (draw-solid-rect (make-posn 235 205) 30 30 'green)
- (draw-solid-rect (make-posn 245 195) 30 30 'green)
- (draw-solid-rect (make-posn 255 185) 30 30 'green)
- (draw-solid-rect (make-posn 265 175) 30 30 'green)
- (draw-solid-rect (make-posn 275 165) 30 30 'green)
- (draw-solid-rect (make-posn 285 155) 30 30 'green)
- (draw-solid-rect (make-posn 295 145) 30 30 'green)
- (draw-solid-rect (make-posn 305 135) 30 30 'green)
- (draw-solid-rect (make-posn 200 230) 30 30 'green)
- (draw-solid-rect (make-posn 210 220) 30 30 'green)
- (draw-solid-rect (make-posn 220 210) 30 30 'green)
- (draw-solid-rect (make-posn 230 200) 30 30 'green)
- (draw-solid-rect (make-posn 240 190) 30 30 'green)
- (draw-solid-rect (make-posn 250 180) 30 30 'green)
- (draw-solid-rect (make-posn 260 170) 30 30 'green)
- (draw-solid-rect (make-posn 270 160) 30 30 'green)
- (draw-solid-rect (make-posn 280 150) 30 30 'green)
- (draw-solid-rect (make-posn 290 140) 30 30 'green)
- (draw-solid-rect (make-posn 300 130) 30 30 'green)
- (draw-solid-rect (make-posn 310 124) 30 30 'green)
- (draw-solid-rect (make-posn 200 240) 25 25 'black)
- (draw-solid-rect (make-posn 210 230) 25 25 'black)
- (draw-solid-rect (make-posn 220 220) 25 25 'black)
- (draw-solid-rect (make-posn 230 210) 25 25 'black)
- (draw-solid-rect (make-posn 240 200) 25 25 'black)
- (draw-solid-rect (make-posn 250 190) 25 25 'black)
- (draw-solid-rect (make-posn 260 180) 25 25 'black)
- (draw-solid-rect (make-posn 270 170) 25 25 'black)
- (draw-solid-rect (make-posn 280 160) 25 25 'black)
- (draw-solid-rect (make-posn 290 150) 25 25 'black)
- (draw-solid-rect (make-posn 300 140) 25 25 'black)
- (draw-solid-rect (make-posn 310 130) 25 25 'black)
- (draw-solid-rect (make-posn 160 230) 20 20 'gray)
- (draw-solid-rect (make-posn 170 240) 20 20 'gray)
- (draw-solid-rect (make-posn 180 250) 20 20 'gray)
- (draw-solid-rect (make-posn 190 260) 20 20 'gray)
- (draw-solid-rect (make-posn 200 270) 20 20 'gray)
- (draw-solid-rect (make-posn 210 280) 20 20 'gray)
- (draw-solid-rect (make-posn 180 260) 22 22 'brown)
- (draw-solid-rect (make-posn 170 270) 22 22 'brown)
- (draw-solid-rect (make-posn 160 280) 22 22 'brown)
- (draw-solid-rect (make-posn 150 290) 22 22 'brown)
- (draw-solid-rect (make-posn 140 300) 22 22 'brown)
- (draw-solid-rect (make-posn 130 310) 22 22 'brown)
- (stop)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement