Présentation de dash.jps

200 setheight
-5.5 18 setxrange
-5 3 setyrange
/agr 2.5 def

-5 3 setxrange
quadrillage
-5.5 9 setxrange

/A {-5 2} def
/B {3 2} def
/C {4 2} def

20 setlinewidth

setCourierBold

[] 0 setdash
[A B] ligne
([] 0 setdash) C [agr dup] crtext

0 -2 stranslate

[30] 0 setdash
[A B] ligne
([30] 0 setdash) C [agr dup] crtext

0 -2 stranslate

[30] 30 setdash
[A B] ligne
([30] 30 setdash) C [agr dup] crtext

0 -2 stranslate

[60 30] 0 setdash
[A B] ligne
([60 30] 0 setdash) C [agr dup] crtext