Here is a high-riding American SUV, does this help?
(require 2htdp/image) (define cab (beside (rectangle 33 18 'solid 'red) (right-triangle 10 18 'solid 'red))) (define body (rectangle 100 30 'solid 'red)) (define top (above/align 'right cab body)) (define tire (circle 15 'solid 'black)) (define bot (beside tire (rectangle 25 10 'solid 'white) tire)) (above top bot) On Feb 23, 2012, at 1:12 PM, ROELOF WOBBEN wrote: > Hello, > > I try to make a car with Racket. > > So far I have got this : > > (define (rechthoek a) > (rectangle 200 50 "solid" "black")) > > (define (cirkel a) > (circle 20 "solid" "red")) > > (define (auto a) > (overlay/xy (rechthoek a) -50 30 (cirkel a))) > > (auto 1) > > > As far as I can see I cannot use overlay/xy to make the second wheel. > > Must I make a images of the 2 wheels first and use overlay/xy or is there > another way to achieve this ? > > Regards, > > Roelof Wobben > > > ____________________ > Racket Users list: > http://lists.racket-lang.org/users ____________________ Racket Users list: http://lists.racket-lang.org/users
