Paste: coyotl.ps
Author: | atax1a |
Mode: | postscript |
Date: | Sun, 8 Oct 2023 19:08:41 |
Plain Text |
/bark{gsave currentpoint translate newpath 0 0 moveto 0 0 2 0 360 arc 1 0 1 setrgbcolor fill grestore}bind def
/joke{currentpoint stroke newpath moveto}bind def
/face{newpath
0 -6 moveto
64 70 lineto
-58 -48 rlineto
40 53 rlineto
-4 1 rlineto
-72 -36 rlineto
-42 -5 rlineto
42 -34 rlineto
joke}bind def
/eye{10 28 rmoveto
2 14
6 10
10 7 rcurveto
-2 -2 rlineto
closepath
joke}bind def
/triangles{}def
/yote{face eye triangles}bind def
0.75 setlinewidth 1 setlinecap 2 setmiterlimit
7 rotate 108 32 translate
yote
showpage
New Annotation