Revision: 1.2 - (view) (download) (as text)
1 : | ktanaka | 1.1 | %! |
2 : | newpath | ||
3 : | /X {moveto currentlinewidth 1 setlinewidth 5 5 rmoveto -10 -10 rlineto 10 0 rmoveto -10 10 rlineto stroke setlinewidth} def | ||
4 : | /Times-Roman findfont 20 scalefont setfont | ||
5 : | 50 50 moveto (lines.ps 91-03-19 21:49) show | ||
6 : | 100 100 translate | ||
7 : | 2 setlinewidth | ||
8 : | 207 -7 moveto 283 68 87 -113 403 -9 curveto stroke | ||
9 : | 192 7 moveto 316 131 114 -84 396 9 curveto stroke | ||
10 : | 207 -7 X 283 68 X 87 -113 X 403 -9 X | ||
11 : | 192 7 X 316 131 X 114 -84 X 396 9 X | ||
12 : | showpage |
ktanaka Powered by ViewCVS 1.0-dev |
ViewCVS and CVS Help |