Source
%% auteur : Peric

-2 24 setxrange
-6 10 setyrange
25 setxunit
%50 setyunit

/quadrillagewidth[.7 .4 .1] def
pointilles
[1 1]{0.7 setlinewidth} Quadrillage

continu
2 setlinewidth
%1 1 setsubtkstep
traceaxes
ticks
%marks
%tracerepere
axesarrow

(O) 0 0 [1.5 dup] dltext
(I) 1 0 [1.5 dup] dtext
(5) 5 0 [1.5 dup] dtext
(J) 0 1 [1.5 dup] cltext
(5) 0 5 [1.5 dup] cltext
(10) 10 0 [1.5 dup] dtext
(15) 15 0 [1.5 dup] dtext
(20) 20 0 [1.5 dup] dtext
(M) 21 5 [1.5 dup] crtext
(heures) 24 0 [1.5 dup] dltext
(température) 0 8 [1.5 dup] drtext
/A{0 2} def
/B{2 0} def

/D{6 -5} def
/E{9 0} def
/F{10 2} def
/G{13 5} def
/H{15 4} def
/N{16 5} def
/I{17 7} def
/J{18 8} def
/P{20 7} def
/M{21 5} def
/K{22 0} def
/L{24 -3} def

1.3 setlinewidth
[A .. B .. D{right} .. E .. F .. G{right} .. H .. N .. I .. J .. P .. M .. K .. L] (*-*) draw
[A B D E F G H N I J P M K L] points