Blame view

quiche-lorraine.ps 1.07 KB
9ea96d21   mclaudel   Commit principal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
  % Pâte de la quiche
  newpath
  gsave
  20 setlinewidth
  0.36 0.23 0.07 setrgbcolor
  300 300 160 0 360 arc
  stroke
  grestore
  
  
  % Croûte de la quiche
  newpath
  gsave
  300 300 150 0 360 arc
  closepath
  0.89 0.88 0.39 setrgbcolor
  fill
  grestore
  
  
  % Couper la quiche en 8 parts égales
  0 45 360 {
      newpath
      gsave
      0.3 setlinewidth
      300 300 moveto
      rotate
      150 0 rlineto
      stroke
      grestore
  } for
  
  
  
  % Placer des lardons roses sur la quiche
  0 36 360 {
      gsave
      12 setlinewidth
      0.9 0.46 0.67 setrgbcolor
      
      300 300 translate
      rotate
      
      20 20 moveto
      5 5 rlineto
  
      55 55 moveto
      5 5 rlineto
  
      90 90 moveto
      5 5 rlineto
      
      stroke
      grestore
  } for
  
  
  % Placer des lardons (rouges)  mais en interchangeant les commandes translate et rotate
  % On voit ici que ce n'est pas ce que l'on veut puisque les lardons sont ici disposés à 300 pixels du coin en bas à droite de la page.
  0 36 360 {
      gsave
      12 setlinewidth
      0.84 0.15 0.17 setrgbcolor
  
      rotate
      300 300 translate
      
      5 5 moveto
      5 5 rlineto
      
      stroke
      grestore
  } for