% 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