Source
10 setxunit
7.5 setborder
90 setangle_repere
-8 40 setxrange
-3 50 setyrange
/quadrillagegray 0.4 def
1 setquadrillagexstep
1 setquadrillageystep
quadrillage
1 1 settkstep
.5 .5 setsubtkstep
2 2 setmkstep
ticks
subticks
marks
traceaxes
axesarrow
unites
/X {32 -1} def
/Y {-4 44} def


setTimesItalic
(O) O drtext
(Nombre de jeux) X dctext
(Prix en euros) Y uctext

/A {12 18} def
/B {20 30} def
/C {30 45} def

[O A B C] points
/e {O C} def

vert
e droite
/Z {32 47} def
((D')) Z crtext

/E {0 8} def
/F {15 23} def
/G {20 28} def
/H {30 38} def

/d {E H} def
noir
d droite
/W {32 37} def
((D)) W crtext

/I {16 24} def
/J {16 0} def
/K {0 24} def

pointilles
[J I K] ligne