Source
%% auteur : 

%%25 points par unité (sur chaque axe)
%%7.5 points de bordure (espace entre dessin et feuille)
%%repere orthogonal

25 setxunit
7.5 setborder
90 setangle_repere

%%xmin xmax ymin et ymax

-1 10 setxrange
-2 8 setyrange

%%les commandes qui positionnent
%%un trait de graduation à chaque unité ; un trait de graduation à chaque demi-unité
%%une marque toutes les 2 unités
%%tout ça pour les 2 axes

1 1 settkstep
.5 .5 setsubtkstep
2 2 setmkstep

%%les commandes qui effectuent
ticks
subticks
marks
traceaxes
axesarrow
unites

%%tracé du polygone

[0 0 2 6 6 6 9 0] ligne

%%et projetés sur les axes

pointilles
[2 6 0 6] ligne
[2 6 2 0] ligne
[6 6 6 0] ligne

%%placement des points

/A {2 6} def
/B {6 6} def
/C {9 0} def

(A) A uctext
(B) B uctext
(C) C urtext

%%sans oublier l'origine

(O) O drtext

%%étiquettes des axes
/X {9 -1} def
/Y {1.5 7} def

setTimesItalic

(temps (s)) X cctext
(vitesse (m/s)) Y cctext