6.0.1.11
3. Construire des images
1 Exercice 3.4.1
Utilisez overlay/xy. Notez au passage que l’ajout d’une ligne avec add-line modifie la bounding box de l’image. Pour conserver la bounding box, il existe une primitive scene+line, ou encore place-image que nous verrons au chapitre 4 avec les animations.
2 Exercice 3.4.4
Je commence juste la construction du triangle :
(define SIZE 300)  | 
(define xA 80)  | 
(define yA 230)  | 
(define xB 250)  | 
(define yB 230)  | 
(define xC 100)  | 
(define yC 70)  | 
  | 
(define TRIANGLE  | 
(local [(define FOND (rectangle SIZE SIZE 'solid "black"))  | 
(define RES1 (add-line FOND xA yA xB yB "yellow"))  | 
(define RES2 (add-line RES1 xB yB xC yC "yellow"))  | 
(define RES (add-line RES2 xC yC xA yA "yellow"))]  | 
RES))  | 
  | 
(show TRIANGLE)  |