PC - 9base - revived minimalist port of Plan 9 userland to Unix
HTML git clone git://git.suckless.org/9base
DIR Log
DIR Files
DIR Refs
DIR README
DIR LICENSE
---
PC (477B)
---
1 %
2 % UMDS pencil - needs to be cleaned up.
3 %
4
5 /build_PC {
6 pop
7 gsave
8 currentpoint translate
9 1 scaling div ptsize 10 div mul dup scale
10 newpath
11 0 setlinecap
12 1 setlinejoin
13 2 setlinewidth
14 0 1 moveto 12 0 rlineto stroke
15 0 5 moveto 12 0 rlineto stroke
16 0 9 moveto 12 0 rlineto stroke
17 1 setlinewidth
18 12 .5 moveto 21.27362 5 lineto 12 9.5 lineto stroke
19 21.27362 5 moveto
20 .4 9.27362 mul neg .4 4 mul rlineto
21 0 .8 4 mul neg rlineto
22 closepath fill
23 grestore
24 } def
25