autocrop
-10 10 setxrange
-10 10 setyrange
uselabo
20 setxunit
8 setfontsize

/arrowscale {.8 dup} def
1 dict begin
   1 setlinewidth
   60 0 0 (Manometre) bbpict
end
Pictdic currentdict copy 

setCourier
   (Connect) Connect dctext

bleu
[Connect] {times} plot