home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Frozen Fish 1: Amiga
/
FrozenFish-Apr94.iso
/
bbs
/
alib
/
d1xx
/
d101
/
psintrp.lha
/
PsIntrp
/
a-box
< prev
next >
Wrap
Text File
|
1987-09-05
|
346b
|
24 lines
save
/A { /simplex findfont 100 scalefont setfont
300 100 moveto
(A) true charpath
stroke
} def
/B { 100 100 moveto
100 200 lineto
200 200 lineto
200 100 lineto
closepath
stroke
} def
2 pencolor 18 setlinewidth B A
1 pencolor 8 setlinewidth B A
3 pencolor 4 setlinewidth B A
restore