blob: 5a3ea87dd939a9bbc2589983d71508e7230d0985 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
%!PS
%%BoundingBox: -40 -40 40 40
%%Creator: cgl (inspired by Guy Shaw)
%%CreationDate: 1996.05.23:1858
%%Pages: 1
%%EndProlog
%%Page: 1 1
%Essential part
%300 500 translate
25 34 moveto currentpoint
0 -68 rlineto currentpoint%down
-120 rotate
25 34 lineto%preserve symmetry
120 rotate currentpoint
17 20 lineto currentpoint
-17.6 0 lineto currentpoint
%labels
/Courier findfont 8 scalefont setfont
moveto -5 -3 rmoveto (5) show
moveto 1 1 rmoveto (4) show
moveto 2 -5 rmoveto (3) show
moveto 2 0 rmoveto (2) show
moveto 2 0 rmoveto (1) show
stroke
showpage
|