[comp.sys.amiga] ps interpreter, repost of part 1, 1st half

lee@uhccux.UUCP (Greg Lee) (10/10/87)

>From: pf@diab.UUCP (Per Fogelstrom)

>I am still looking for Part1 of the Amiga Postscript Interpreter.
>I should wery much appreciate if someone can E-mail me that.

Here is the first half of part 1.  I did repost to comp.amiga.sources
on Sept 3, and I tried to email, without success.

U.S.mail: 562 Moore Hall, Dept. of Linguistics, Univ. of Hawaii, HONO, HI 96822
INTERNET: lee@uhccux.uhcc.hawaii.edu
UUCP:     {ihnp4,dcdwest,ucbvax}!sdcsvax!nosc!uhccux!lee
BITNET:   lee%uhccux.uhcc.hawaii.edu@rutgers.edu

#! /bin/sh
# This is a shell archive.  Remove anything before this line, then unpack
# it by saving it into a file and typing "sh file".  To overwrite existing
# files, type "sh file -c".  You can also feed this as standard input via
# unshar, or by typing "sh <file", e.g..  If this archive is complete, you
# will see the following message at the end:
#		"End of archive 1 (of 2)."
# Contents:  Manifest ps.doc ps.h ps.link psedit rotate-box show-fonts
#   simplex.chr thick-letters
# Wrapped by lee@uhccux on Sat Oct 10 05:09:50 1987
PATH=/bin:/usr/bin:/usr/ucb ; export PATH
if test -f Manifest -a "${1}" != "-c" ; then 
  echo shar: Will not over-write existing file \"Manifest\"
else
echo shar: Extracting \"Manifest\" \(513 characters\)
sed "s/^X//" >Manifest <<'END_OF_Manifest'
X   File Name		Archive #	Description
X-----------------------------------------------------------
X Manifest                  1		this file
X ps.doc                    1		doc	
X ps.h                      1		header included in .a files
X ps.link                   1		for Alink
X psedit                    1		demo
X rmath.a                   2		math assembler routines
X rotate-box                1		demo
X show-fonts                1		demo
X simplex.chr               1		stick analytic font
X thick-letters             1		demo
END_OF_Manifest
if test 513 -ne `wc -c <Manifest`; then
    echo shar: \"Manifest\" unpacked with wrong size!
fi
# end of overwriting check
fi
if test -f ps.doc -a "${1}" != "-c" ; then 
  echo shar: Will not over-write existing file \"ps.doc\"
else
echo shar: Extracting \"ps.doc\" \(7028 characters\)
sed "s/^X//" >ps.doc <<'END_OF_ps.doc'
X
XPS document
XApril, 1986
X
X*
X*	This program is in the public domain.  PostScript is a trademark
X*   of Adobe Systems.
X*		Greg Lee, July, 1987.
X*   U.S. mail: 562 Moore Hall, Dept. of Linguistics
X*	       University of Hawaii, Honolulu, HI 96822
X* INTERNET: lee@uhccux.uhcc.hawaii.edu
X* UUCP:     {ihnp4,dcdwest,ucbvax}!sdcsvax!nosc!uhccux!lee
X* BITNET:   lee%uhccux.uhcc.hawaii.edu@rutgers.edu
X*
X
XPs emulates Adobe Systems' PostScript, in a small way.
X
XInteractive input and output takes place in a small window. The page being
Xcomposed is shown behind the window in an interlaced screen with 16 colors. 
XWhen input is redirected to come from a file with "ps < programfile", the ps
Xprogram in this file is executed before interaction begins.
X
XThere is no prompt shown when ps is ready to receive console input.
X
XDefault screen coordinates are x = 0 to 639 from the left to the right of the
Xscreen, and y = 0 to 511 from the bottom to the top of the screen.  Considering
Xthe units to be points, that makes the display a nominal 8 8/9" across and 7
X1/9" up and down.
X
XOperators do more or less what they do in PostScript, except as noted below. 
XSee PostScript Language: Reference Manual, Adobe Systems Incorporated,
XAddison-Wesley, 1985.
X
XPs has one built-in font named 'simplex', which is an analytic stroked font. The
Xdata for constructing the font came from Alan Hershey's data base of
Xoccidental characters.  The Amiga raster fonts 'topaz', 'diamond', 'ruby',
X'opal', 'sapphire', 'garnet' and 'emerald' can be used with restrictions as
Xnoted below.
X
XTypes implemented:
X
X   integer, real, boolean, string, name, operator
X   array, mark, dictionary, save, fontID
X
XOperators:
X
X      *** stack manipulation ***
X   pop, exch, dup, copy
X   index, roll, clear, count
X   mark
X
X            *** math ***
X   add, div, idiv, mod
X   mul, sub, abs, neg
X   ceiling, floor, round       [round gives floor of -ddddd.5]
X   truncate, sqrt
X   pow, tan, tanh, cosh, sinh  (non-standard)
X   atan, cos, sin
X   exp, ln, log
X
X            *** array ***
X   array, [, ]
X   length, get, put
X
X         *** dictionary ***
X   dict
X   length, maxlength
X   begin, end
X   def                  defined operators are simple objects, not arrays;
X                        "key" must be a name
X
X           *** string ***
X   string               the '<..>' syntax is not implemented
X   length, get, put
X
X      *** relational, Boolean ***
X   eq, ne, ge
X   gt, le, lt           comparisons for numbers only, not strings
X   true, false
X
X         *** control ***
X   exec                 leaves anything but an operator on the stack
X   if, ifelse
X   for                  integers only
X   repeat, loop
X   exit
X   stop, stopped        untested
X   countexectack        always gives 0, since there is no exec stack
X   execstack            does nothing
X   quit                 exit to AmigaDos
X   start                does nothing
X
X  *** type, attribute, conversion ***
X   cvi, cvr             no conversion from strings
X   cvs                  no range-check is done
X
X           *** file ***
X   file, read, write    implemented only for %stdout and %stdin (which
X                        are always the console)
X   run                  can't nest run files or have 2 'run' commands
X                        on same line; use in defined procedures will not
X                        work properly, since 'run' merely redirects input
X   print, =
X
X        *** virtual memory ***
X   save, restore        restore merely destroys objects created since
X                        the last save and reuses the memory space they
X                        occupied (in addition to doing a grestore)
X
X        *** graphics state ***
X   gsave, grestore      colors are not saved or restored
X   setlinewidth         you get butt linecaps and bevel joins; the joins
X                        are not done properly for concave figures; when
X                        there is non-uniform scaling of the axes, rotation
X                        of the axes is not taken account of
X   currentlinewidth
X   setflat, currentflat
X   setgray              there are only 5 levels of grey available, set by
X                        argument: n = 0, 0 < n < .25, .25 <= n < .5, .5 <= n
X                        < .75, .75 <= n <= 1
X   currentgray
X   setrgbcolor          affects only current foreground pen color;
X                        takes 3 arguments in range 0-15
X   currentrgbcolor      components of current foreground pen color
X
X       *** coordinate system ***
X   translate
X   scale                for Amiga fonts, does not affect sizes of letters;
X                        moves currentpoint (bug)
X   rotate               for Amiga fonts, does not affect orientation
X   concat, concatmatrix
X   transform, dtransform
X
X       *** path construction ***
X   newpath, currentpoint
X   moveto, rmoveto
X   lineto, rlineto
X   curveto, rcurveto
X   closepath
X   charpath             only for simplex font
X   strokepath           affects entire path; lines will always be
X                        one pixel wide
X
X          *** painting ***
X   erasepage
X   fill, stroke
X
X      *** character and font ***
X   findfont             fonts are simple objects, not dictionaries;
X                        'key' can be a string or a name
X   scalefont            for Amiga fonts, must be an available size --
X                        largest is chosen if not scaled -- and also the
X                        font returned is not a new font, just a different
X                        size of the same font (for simplex the font is
X                        new)
X   makefont             only for simplex font
X   setfont
X   currentfont
X   show
X   stringwidth          for Amiga fonts, does not take account of scaling
X                        or rotation; the y coordinate returned is always 0
X
X
X
XNon-standard operators:
X
X   i {0-7}         pencolor            set foreground color
X   i {0-7}         penbcolor           set background color
X   i {0-4}         penmode             jam1, jam2, complement,, inverse
X   i               penpattern
X                   pixel               set pixel at currentpoint
X   i1 i2 i3 i4     box                 display box with top left corner
X                                       at (i1,i2) and lower right at (i3,i4)
X   any             hex       name      name has value in hex
X   i1 i2           flood               fill area surrounding (i1,i2) with
X                                       color, to boundaries of same color;
X                                       bombs system if area not enclosed
X   num             greyline            argument is in range 0 to 1; 0 causes
X                                       Amiga line drawing routine to be used
X                                       -- other values set the intensity of
X                                       lines drawn by an anti-aliasing
X                                       routine, which works best when
X                                       rgb colors 0 to 3 are progressively
X                                       darker or lighter
X
X
END_OF_ps.doc
if test 7028 -ne `wc -c <ps.doc`; then
    echo shar: \"ps.doc\" unpacked with wrong size!
fi
# end of overwriting check
fi
if test -f ps.h -a "${1}" != "-c" ; then 
  echo shar: Will not over-write existing file \"ps.h\"
else
echo shar: Extracting \"ps.h\" \(1304 characters\)
sed "s/^X//" >ps.h <<'END_OF_ps.h'
X
X* header for ps modules
X
Xlref  macro
X_LVO\1      equ  -6*(\2+4)
X      endm
X
Xcall  macro
X      jsr   _LVO\1(A6)
X      endm
X
Xprint macro
X      lea   \1,A0
X      bsr   msg
X      endm
X
XERR   macro
X      lea   \1,A0
X      bsr   msg
X      bra   reinterp
X      endm
X
XDEF   macro
X      xdef  _\1
X_\1
X      endm
X
XARG   macro
X      cmp.w    #\1,(A5)+
X      bne      type_mismatch
X      move.l   (A5)+,D0
X      endm
X
XRETURN   macro
X      move.w   #\1,D2
X      bra      r.ipush
X      endm
X
Xbstr  macro
X\1    dc.b  1$-*-1
X      dc.b  '\2',10
X1$
X      endm
X
X
Xcnttype     set   -1
Xnewtype  macro
X\1          equ   cnttype
Xcnttype     set   cnttype+1
X         endm
X
X   newtype     Illegal
X   newtype     ICode
X   newtype     Integer
X   newtype     Name
X   newtype     String
X   newtype     Boolean
X   newtype     Real
X   newtype     FontID
X   newtype     Array
X   newtype     Mark
X   newtype     Dictionary
X   newtype     Save
X   newtype     Dummy
X   newtype     File
X
XPointFive   equ   $80000040
XOnePoint    equ   $80000041
XThreePoint  equ   $C0000042
XFourPoint   equ   $80000043
X
XHiRes       equ   1
XNumColors   equ   16
XInterAct    equ   1
XNumPlanes   equ   4
X
XPstackSize  equ    20
XIstackSize  equ   100
XDstackSize  equ   20
XSstackSize  equ   10
XSAreaSize   equ   3000
XSizeDict    equ   100
XCodeSize    equ   5000
X
END_OF_ps.h
if test 1304 -ne `wc -c <ps.h`; then
    echo shar: \"ps.h\" unpacked with wrong size!
fi
# end of overwriting check
fi
if test -f ps.link -a "${1}" != "-c" ; then 
  echo shar: Will not over-write existing file \"ps.link\"
else
echo shar: Extracting \"ps.link\" \(259 characters\)
sed "s/^X//" >ps.link <<'END_OF_ps.link'
X
XFROM  sys:p/ps.o       *
X      sys:p/dict.o     *
X      sys:p/files.o    *
X      sys:p/console.o  *
X      sys:p/control.o  *
X      sys:p/ffpa.o     *
X      sys:p/lmath.o    *
X      sys:p/rmath.o    *
X      sys:p/simplex.o  *
X      sys:p/graphics.o
XTO    ps
X
END_OF_ps.link
if test 259 -ne `wc -c <ps.link`; then
    echo shar: \"ps.link\" unpacked with wrong size!
fi
# end of overwriting check
fi
if test -f psedit -a "${1}" != "-c" ; then 
  echo shar: Will not over-write existing file \"psedit\"
else
echo shar: Extracting \"psedit\" \(718 characters\)
sed "s/^X//" >psedit <<'END_OF_psedit'
X
Xsave
X
X/infile  (%stdin)  (r) file def
X/conin   { infile read pop } def
X
X/char 1 string def
X/buf  80 string def
X
X/leftmargin 50 def
X/lineheight 20 def
X/cursorheight lineheight 5 sub def
X
X/hpos 50 def
X/vpos 300 def
X
X/cursoron {
X   currentpoint
X   3 pencolor 2 penmode
X   currentpoint cursorheight add
X   2 copy
X   exch 10 add exch lineheight sub
X   box
X   moveto
X   1 pencolor 1 penmode
X} def
X
X/newline { currentpoint exch pop leftmargin exch
X           lineheight sub moveto } def
X
X/edit {
X{
Xnewpath
Xcursoron
Xchar 0 conin put
Xcursoron
Xchar 0 get  27 eq {exit} if
Xchar 0 get  13 eq {newline} if
Xchar 0 get  32 ge {char show} if
X}
Xloop
X} def
X
X  /simplex findfont 15 scalefont setfont
X  hpos vpos moveto
X  edit
X
Xrestore
X
END_OF_psedit
if test 718 -ne `wc -c <psedit`; then
    echo shar: \"psedit\" unpacked with wrong size!
fi
# end of overwriting check
fi
if test -f rotate-box -a "${1}" != "-c" ; then 
  echo shar: Will not over-write existing file \"rotate-box\"
else
echo shar: Extracting \"rotate-box\" \(236 characters\)
sed "s/^X//" >rotate-box <<'END_OF_rotate-box'
X
X3 pencolor
X2 penmode
Xsave
X
X/b {-10 -10  moveto
X    -10  10  lineto
X     10  10  lineto
X     10 -10  lineto
X    -10 -10  lineto
X} def
X
X400 200 translate
X
X20 { b
X     fill
X     5 rotate
X     1.1 1.1 scale
X   } repeat
X
Xrestore
X0 penmode
X
END_OF_rotate-box
if test 236 -ne `wc -c <rotate-box`; then
    echo shar: \"rotate-box\" unpacked with wrong size!
fi
# end of overwriting check
fi
if test -f show-fonts -a "${1}" != "-c" ; then 
  echo shar: Will not over-write existing file \"show-fonts\"
else
echo shar: Extracting \"show-fonts\" \(622 characters\)
sed "s/^X//" >show-fonts <<'END_OF_show-fonts'
X
Xsave
X
X/psize 20 string def
X
X/Fsample   {
X   2 copy
X   /simplex findfont 12 scalefont setfont
X   exch show
X   (  ) show
X   psize cvs show
X   exch findfont exch scalefont setfont
X   currentpoint exch pop 145 exch moveto
X   (abcdef ABCDEF ) show
X   } def
X
X/newline  {
X   currentpoint exch pop 30 exch 30 sub
X   moveto
X   } def
X
X30 350 moveto
X
X(topaz)    8  Fsample newline
X(topaz)    9  Fsample newline
X(diamond) 12  Fsample newline
X(garnet)   9  Fsample newline
X(garnet)  16  Fsample newline
X(ruby)     8  Fsample newline
X(ruby)    12  Fsample newline
X(sapphire)19  Fsample newline
X(emerald) 20  Fsample newline
X
X restore
X
END_OF_show-fonts
if test 622 -ne `wc -c <show-fonts`; then
    echo shar: \"show-fonts\" unpacked with wrong size!
fi
# end of overwriting check
fi
if test -f simplex.chr -a "${1}" != "-c" ; then 
  echo shar: Will not over-write existing file \"simplex.chr\"
else
echo shar: Extracting \"simplex.chr\" \(20594 characters\)
sed "s/^X//" >simplex.chr <<'END_OF_simplex.chr'
X
X
X   xdef  simplex
X
X   section  font,data
X
Xrefchar  macro
X         dc.w  .\1-fbase
X         endm
X
Xendchar  macro
X         dc.b  64,0
X         endm
X
Xpenup    macro
X         dc.b  64,1
X         endm
X
Xclosepath  macro
X         dc.b  64,2
X         endm
X
Xsimplex
X
Xfbase
X
X refchar h20
X refchar h21
X refchar h22
X refchar h23
X refchar h24
X refchar h25
X refchar h26
X refchar h27
X refchar h28
X refchar h29
X refchar h2A
X refchar h2B
X refchar h2C
X refchar h2D
X refchar h2E
X refchar h2F
X refchar d0
X refchar d1
X refchar d2
X refchar d3
X refchar d4
X refchar d5
X refchar d6
X refchar d7
X refchar d8
X refchar d9
X refchar h3A
X refchar h3B
X refchar h3C
X refchar h3D
X refchar h3E
X refchar h3F
X refchar h40
X
X
X
X refchar A
X refchar B
X refchar C
X refchar D
X refchar E
X refchar F
X refchar G
X refchar H
X refchar I
X refchar J
X refchar K
X refchar L
X refchar M
X refchar N
X refchar O
X refchar P
X refchar Q
X refchar R
X refchar S
X refchar T
X refchar U
X refchar V
X refchar W
X refchar X
X refchar Y
X refchar Z
X
X refchar h5B
X refchar h5C
X refchar h5D
X refchar h5E
X refchar h5F
X refchar h60
X
X refchar a
X refchar b
X refchar c
X refchar d
X refchar e
X refchar f
X refchar g
X refchar h
X refchar i
X refchar j
X refchar k
X refchar l
X refchar m
X refchar n
X refchar o
X refchar p
X refchar q
X refchar r
X refchar s
X refchar t
X refchar u
X refchar v
X refchar w
X refchar x
X refchar y
X refchar z
X
X refchar h7B
X refchar h7C
X refchar h7D
X refchar h7E
X refchar h7F
X
X***********************
X
X.h20
X   dc.b  -6,6
X endchar
X
X.h21
X   dc.b  -5,5
X   dc.b  0,-12
X   dc.b  0,2
X penup
X   dc.b  0,7
X   dc.b  -1,8
X   dc.b  0,9
X   dc.b  1,8
X   dc.b  0,7
X endchar
X
X.h22
X   dc.b  -8,8
X   dc.b  -4,-12
X   dc.b  -4,-5
X penup
X   dc.b  4,-12
X   dc.b  4,-5
X endchar
X
X.h23
X   dc.b  -10,11
X   dc.b  1,-12
X   dc.b  -6,16
X penup
X   dc.b  7,-12
X   dc.b  0,16
X penup
X   dc.b  -6,-1
X   dc.b  8,-1
X   dc.b  -7,5
X   dc.b  7,5
X endchar
X
X.h24
X   dc.b  -10,10
X   dc.b  -2,-12
X   dc.b  -2,11
X penup
X   dc.b  2,-12
X   dc.b  2,11
X penup
X   dc.b  7,-7
X   dc.b  5,-9
X   dc.b  2,-10
X   dc.b  -5,-9
X   dc.b  -7,-7
X   dc.b  -7,-6
X   dc.b  -6,-4
X   dc.b  -5,-3
X   dc.b  -3,-2
X   dc.b  3,0
X   dc.b  5,1
X   dc.b  6,2
X   dc.b  7,4
X   dc.b  7,6
X   dc.b  5,8
X   dc.b  2,9
X   dc.b  -2,9
X   dc.b  -5,8
X   dc.b  -7,6
X endchar
X
X.h25
X   dc.b  -12,12
X   dc.b  9,-12
X   dc.b  -9,9
X penup
X   dc.b  -4,-12
X   dc.b  -2,-10
X   dc.b  -2,-8
X   dc.b  -3,-6
X   dc.b  -5,-5
X   dc.b  -7,-5
X   dc.b  -9,-7
X   dc.b  -9,-9
X   dc.b  -8,-11
X   dc.b  -6,-12
X   dc.b  -4,-12
X   dc.b  -2,-11
X   dc.b  1,-10
X   dc.b  4,-10
X   dc.b  7,-11
X   dc.b  9,-12
X penup
X   dc.b  5,2
X   dc.b  3,3
X   dc.b  2,5
X   dc.b  2,7
X   dc.b  4,9
X   dc.b  6,9
X   dc.b  8,8
X   dc.b  9,6
X   dc.b  9,4
X   dc.b  7,2
X   dc.b  5,2
X endchar
X
X.h26
X   dc.b  -13,13
X   dc.b  10,-3
X   dc.b  10,-4
X   dc.b  9,-5
X   dc.b  8,-5
X   dc.b  7,-4
X   dc.b  6,-2
X   dc.b  4,3
X   dc.b  2,6
X   dc.b  0,8
X   dc.b  -2,9
X   dc.b  -6,9
X   dc.b  -8,8
X   dc.b  -9,7
X   dc.b  -10,5
X   dc.b  -10,3
X   dc.b  -9,1
X   dc.b  -8,0
X   dc.b  -1,-4
X   dc.b  0,-5
X   dc.b  1,-7
X   dc.b  1,-9
X   dc.b  0,-11
X   dc.b  -2,-12
X   dc.b  -4,-11
X   dc.b  -5,-9
X   dc.b  -5,-7
X   dc.b  -4,-4
X   dc.b  -2,-1
X   dc.b  3,6
X   dc.b  5,8
X   dc.b  7,9
X   dc.b  9,9
X   dc.b  10,8
X   dc.b  10,7
X endchar
X
X.h27
X   dc.b  -4,4
X   dc.b  3,-12
X   dc.b  0,-5
X endchar
X
X.h28
X   dc.b  -7,7
X   dc.b  4,-12
X   dc.b  2,-10
X   dc.b  0,-8
X   dc.b  -2,-5
X   dc.b  -3,0
X   dc.b  -3,4
X   dc.b  -2,9
X   dc.b  0,12
X   dc.b  2,14
X   dc.b  4,16
X endchar
X
X.h29
X   dc.b  -7,7
X   dc.b  -4,-12
X   dc.b  -2,-10
X   dc.b  0,-8
X   dc.b  2,-5
X   dc.b  3,0
X   dc.b  3,4
X   dc.b  2,9
X   dc.b  0,12
X   dc.b  -2,14
X   dc.b  -4,16
X endchar
X
X.h2A
X   dc.b  -8,8
X   dc.b  0,-6
X   dc.b  0,6
X penup
X   dc.b  -5,-3
X   dc.b  5,3
X penup
X   dc.b  5,-3
X   dc.b  -5,3
X endchar
X
X.h2B
X   dc.b  -13,13
X   dc.b  0,-9
X   dc.b  0,9
X penup
X   dc.b  -9,0
X   dc.b  9,0
X endchar
X
X.h2C
X   dc.b  -5,5
X   dc.b  1,8
X   dc.b  0,9
X   dc.b  -1,8
X   dc.b  0,7
X   dc.b  1,8
X   dc.b  1,10
X   dc.b  0,12
X   dc.b  -1,13
X endchar
X
X.h2D
X   dc.b  -13,13
X   dc.b  -4,0
X   dc.b  4,0
X endchar
X
X.h2E
X   dc.b  -5,5
X   dc.b  0,7
X   dc.b  -1,8
X   dc.b  0,9
X   dc.b  1,8
X   dc.b  0,7
X endchar
X
X.h2F
X   dc.b  -11,11
X   dc.b  9,-12
X   dc.b  -9,16
X endchar
X
X.d0
X   dc.b  -10,10
X   dc.b  -1,-12
X   dc.b  -4,-11
X   dc.b  -6,-8
X   dc.b  -7,-3
X   dc.b  -7,0
X   dc.b  -6,5
X   dc.b  -4,8
X   dc.b  -1,9
X   dc.b  1,9
X   dc.b  4,8
X   dc.b  6,5
X   dc.b  7,0
X   dc.b  7,-3
X   dc.b  6,-8
X   dc.b  4,-11
X   dc.b  1,-12
X   dc.b  -1,-12
X endchar
X
X.d1
X   dc.b  -10,10
X   dc.b  -4,-8
X   dc.b  -2,-9
X   dc.b  1,-12
X   dc.b  1,9
X endchar
X
X.d2
X   dc.b  -10,10
X   dc.b  -6,-7
X   dc.b  -6,-8
X   dc.b  -5,-10
X   dc.b  -4,-11
X   dc.b  -2,-12
X   dc.b  2,-12
X   dc.b  4,-11
X   dc.b  5,-10
X   dc.b  6,-8
X   dc.b  6,-6
X   dc.b  5,-4
X   dc.b  3,-1
X   dc.b  -7,9
X   dc.b  7,9
X endchar
X
X.d3
X   dc.b  -10,10
X   dc.b  -5,-12
X   dc.b  6,-12
X   dc.b  0,-4
X   dc.b  3,-4
X   dc.b  5,-3
X   dc.b  6,-2
X   dc.b  7,1
X   dc.b  7,3
X   dc.b  6,6
X   dc.b  4,8
X   dc.b  1,9
X   dc.b  -2,9
X   dc.b  -5,8
X   dc.b  -6,7
X   dc.b  -7,5
X endchar
X
X.d4
X   dc.b  -10,10
X   dc.b  3,-12
X   dc.b  -7,2
X   dc.b  8,2
X penup
X   dc.b  3,-12
X   dc.b  3,9
X endchar
X
X.d5
X   dc.b  -10,10
X   dc.b  5,-12
X   dc.b  -5,-12
X   dc.b  -6,-3
X   dc.b  -5,-4
X   dc.b  -2,-5
X   dc.b  1,-5
X   dc.b  4,-4
X   dc.b  6,-2
X   dc.b  7,1
X   dc.b  7,3
X   dc.b  6,6
X   dc.b  4,8
X   dc.b  1,9
X   dc.b  -2,9
X   dc.b  -5,8
X   dc.b  -6,7
X   dc.b  -7,5
X endchar
X
X.d6
X   dc.b  -10,10
X   dc.b  6,-9
X   dc.b  5,-11
X   dc.b  2,-12
X   dc.b  0,-12
X   dc.b  -3,-11
X   dc.b  -5,-8
X   dc.b  -6,-3
X   dc.b  -6,2
X   dc.b  -5,6
X   dc.b  -3,8
X   dc.b  0,9
X   dc.b  1,9
X   dc.b  4,8
X   dc.b  6,6
X   dc.b  7,3
X   dc.b  7,2
X   dc.b  6,-1
X   dc.b  4,-3
X   dc.b  1,-4
X   dc.b  0,-4
X   dc.b  -3,-3
X   dc.b  -5,-1
X   dc.b  -6,2
X endchar
X
X.d7
X   dc.b  -10,10
X   dc.b  7,-12
X   dc.b  -3,9
X penup
X   dc.b  -7,-12
X   dc.b  7,-12
X endchar
X
X.d8
X   dc.b  -10,10
X   dc.b  -2,-12
X   dc.b  -5,-11
X   dc.b  -6,-9
X   dc.b  -6,-7
X   dc.b  -5,-5
X   dc.b  -3,-4
X   dc.b  1,-3
X   dc.b  4,-2
X   dc.b  6,0
X   dc.b  7,2
X   dc.b  7,5
X   dc.b  6,7
X   dc.b  5,8
X   dc.b  2,9
X   dc.b  -2,9
X   dc.b  -5,8
X   dc.b  -6,7
X   dc.b  -7,5
X   dc.b  -7,2
X   dc.b  -6,0
X   dc.b  -4,-2
X   dc.b  -1,-3
X   dc.b  3,-4
X   dc.b  5,-5
X   dc.b  6,-7
X   dc.b  6,-9
X   dc.b  5,-11
X   dc.b  2,-12
X   dc.b  -2,-12
X endchar
X
X.d9
X   dc.b  -10,10
X   dc.b  6,-5
X   dc.b  5,-2
X   dc.b  3,0
X   dc.b  0,1
X   dc.b  -1,1
X   dc.b  -4,0
X   dc.b  -6,-2
X   dc.b  -7,-5
X   dc.b  -7,-6
X   dc.b  -6,-9
X   dc.b  -4,-11
X   dc.b  -1,-12
X   dc.b  0,-12
X   dc.b  3,-11
X   dc.b  5,-9
X   dc.b  6,-5
X   dc.b  6,0
X   dc.b  5,5
X   dc.b  3,8
X   dc.b  0,9
X   dc.b  -2,9
X   dc.b  -5,8
X   dc.b  -6,6
X endchar
X
X.h3A
X   dc.b  -5,5
X   dc.b  0,-5
X   dc.b  -1,-4
X   dc.b  0,-3
X   dc.b  1,-4
X   dc.b  0,-5
X penup
X   dc.b  0,7
X   dc.b  -1,8
X   dc.b  0,9
X   dc.b  1,8
X   dc.b  0,7
X endchar
X
X.h3B
X   dc.b  -5,5
X   dc.b  0,-5
X   dc.b  -1,-4
X   dc.b  0,-3
X   dc.b  1,-4
X   dc.b  0,-5
X penup
X   dc.b  1,8
X   dc.b  0,9
X   dc.b  -1,8
X   dc.b  0,7
X   dc.b  1,8
X   dc.b  1,10
X   dc.b  0,12
X   dc.b  -1,13
X endchar
X
X.h3C
X   dc.b  -12,12
X   dc.b  8,-9
X   dc.b  -8,0
X   dc.b  8,9
X endchar
X
X.h3D
X   dc.b  -13,13
X   dc.b  -9,-3
X   dc.b  9,-3
X penup
X   dc.b  -9,3
X   dc.b  9,3
X endchar
X
X.h3E
X   dc.b  -12,12
X   dc.b  -8,-9
X   dc.b  8,0
X   dc.b  -8,9
X endchar
X
X.h3F
X   dc.b  -9,9
X   dc.b  -6,-7
X   dc.b  -6,-8
X   dc.b  -5,-10
X   dc.b  -4,-11
X   dc.b  -2,-12
X   dc.b  2,-12
X   dc.b  4,-11
X   dc.b  5,-10
X   dc.b  6,-8
X   dc.b  6,-6
X   dc.b  5,-4
X   dc.b  4,-3
X   dc.b  0,-1
X   dc.b  0,2
X penup
X   dc.b  0,7
X   dc.b  -1,8
X   dc.b  0,9
X   dc.b  1,8
X   dc.b  0,7
X endchar
X
X.h40
X   dc.b  -13,14
X   dc.b  5,-4
X   dc.b  4,-6
X   dc.b  2,-7
X   dc.b  -1,-7
X   dc.b  -3,-6
X   dc.b  -4,-5
X   dc.b  -5,-2
X   dc.b  -5,1
X   dc.b  -4,3
X   dc.b  -2,4
X   dc.b  1,4
X   dc.b  3,3
X   dc.b  4,1
X penup
X   dc.b  -1,-7
X   dc.b  -3,-5
X   dc.b  -4,-2
X   dc.b  -4,1
X   dc.b  -3,3
X   dc.b  -2,4
X penup
X   dc.b  5,-7
X   dc.b  4,1
X   dc.b  4,3
X   dc.b  6,4
X   dc.b  8,4
X   dc.b  10,2
X   dc.b  11,-1
X   dc.b  11,-3
X   dc.b  10,-6
X   dc.b  9,-8
X   dc.b  7,-10
X   dc.b  5,-11
X   dc.b  2,-12
X   dc.b  -1,-12
X   dc.b  -4,-11
X   dc.b  -6,-10
X   dc.b  -8,-8
X   dc.b  -9,-6
X   dc.b  -10,-3
X   dc.b  -10,0
X   dc.b  -9,3
X   dc.b  -8,5
X   dc.b  -6,7
X   dc.b  -4,8
X   dc.b  -1,9
X   dc.b  2,9
X   dc.b  5,8
X   dc.b  7,7
X   dc.b  8,6
X penup
X   dc.b  6,-7
X   dc.b  5,1
X   dc.b  5,3
X   dc.b  6,4
X endchar
X
X
X
X.A
X   dc.b  -9,9
X*   dc.b  0,-12
X   dc.b  -8,9
X* penup
X   dc.b  0,-12
X   dc.b  8,9
X penup
X   dc.b  -5,2
X   dc.b  5,2
X endchar
X
X.B
X   dc.b  -11,10
X*   dc.b  -7,-12
X   dc.b  -7,9
X* penup
X   dc.b  -7,-12
X   dc.b  2,-12
X   dc.b  5,-11
X   dc.b  6,-10
X   dc.b  7,-8
X   dc.b  7,-6
X   dc.b  6,-4
X   dc.b  5,-3
X   dc.b  2,-2
X* penup
X   dc.b  -7,-2
X   dc.b  2,-2
X   dc.b  5,-1
X   dc.b  6,0
X   dc.b  7,2
X   dc.b  7,5
X   dc.b  6,7
X   dc.b  5,8
X   dc.b  2,9
X*   dc.b  -7,9
X closepath
X endchar
X
X.C
X   dc.b  -10,11
X   dc.b  8,-7
X   dc.b  7,-9
X   dc.b  5,-11
X   dc.b  3,-12
X   dc.b  -1,-12
X   dc.b  -3,-11
X   dc.b  -5,-9
X   dc.b  -6,-7
X   dc.b  -7,-4
X   dc.b  -7,1
X   dc.b  -6,4
X   dc.b  -5,6
X   dc.b  -3,8
X   dc.b  -1,9
X   dc.b  3,9
X   dc.b  5,8
X   dc.b  7,6
X   dc.b  8,4
X endchar
X
X.D
X   dc.b  -11,10
X   dc.b  -7,-12
X   dc.b  -7,9
X penup
X   dc.b  -7,-12
X   dc.b  0,-12
X   dc.b  3,-11
X   dc.b  5,-9
X   dc.b  6,-7
X   dc.b  7,-4
X   dc.b  7,1
X   dc.b  6,4
X   dc.b  5,6
X   dc.b  3,8
X   dc.b  0,9
X   dc.b  -7,9
X endchar
X
X.E
X   dc.b  -10,9
X   dc.b  -6,-12
X   dc.b  -6,9
X penup
X   dc.b  -6,-12
X   dc.b  7,-12
X penup
X   dc.b  -6,-2
X   dc.b  2,-2
X penup
X   dc.b  -6,9
X   dc.b  7,9
X endchar
X
X.F
X   dc.b  -10,8
X   dc.b  -6,-12
X   dc.b  -6,9
X penup
X   dc.b  -6,-12
X   dc.b  7,-12
X penup
X   dc.b  -6,-2
X   dc.b  2,-2
X endchar
X
X.G
X   dc.b  -10,11
X   dc.b  8,-7
X   dc.b  7,-9
X   dc.b  5,-11
X   dc.b  3,-12
X   dc.b  -1,-12
X   dc.b  -3,-11
X   dc.b  -5,-9
X   dc.b  -6,-7
X   dc.b  -7,-4
X   dc.b  -7,1
X   dc.b  -6,4
X   dc.b  -5,6
X   dc.b  -3,8
X   dc.b  -1,9
X   dc.b  3,9
X   dc.b  5,8
X   dc.b  7,6
X   dc.b  8,4
X   dc.b  8,1
X penup
X   dc.b  3,1
X   dc.b  8,1
X endchar
X
X.H
X   dc.b  -11,11
X   dc.b  -7,-12
X   dc.b  -7,9
X penup
X   dc.b  7,-12
X   dc.b  7,9
X penup
X   dc.b  -7,-2
X   dc.b  7,-2
X endchar
X
X.I
X   dc.b  -4,4
X   dc.b  0,-12
X   dc.b  0,9
X endchar
X
X.J
X   dc.b  -8,8
X   dc.b  4,-12
X   dc.b  4,4
X   dc.b  3,7
X   dc.b  2,8
X   dc.b  0,9
X   dc.b  -2,9
X   dc.b  -4,8
X   dc.b  -5,7
X   dc.b  -6,4
X   dc.b  -6,2
X endchar
X
X.K
X   dc.b  -11,10
X   dc.b  -7,-12
X   dc.b  -7,9
X penup
X   dc.b  7,-12
X   dc.b  -7,2
X penup
X   dc.b  -2,-3
X   dc.b  7,9
X endchar
X
X.L
X   dc.b  -10,7
X   dc.b  -6,-12
X   dc.b  -6,9
X penup
X   dc.b  -6,9
X   dc.b  6,9
X endchar
X
X.M
X   dc.b  -12,12
X   dc.b  -8,-12
X   dc.b  -8,9
X penup
X   dc.b  -8,-12
X   dc.b  0,9
X penup
X   dc.b  8,-12
X   dc.b  0,9
X penup
X   dc.b  8,-12
X   dc.b  8,9
X endchar
X
X.N
X   dc.b  -11,11
X   dc.b  -7,-12
X   dc.b  -7,9
X penup
X   dc.b  -7,-12
X   dc.b  7,9
X penup
X   dc.b  7,-12
X   dc.b  7,9
X endchar
X
X.O
X   dc.b  -11,11
X   dc.b  -2,-12
X   dc.b  -4,-11
X   dc.b  -6,-9
X   dc.b  -7,-7
X   dc.b  -8,-4
X   dc.b  -8,1
X   dc.b  -7,4
X   dc.b  -6,6
X   dc.b  -4,8
X   dc.b  -2,9
X   dc.b  2,9
X   dc.b  4,8
X   dc.b  6,6
X   dc.b  7,4
X   dc.b  8,1
X   dc.b  8,-4
X   dc.b  7,-7
X   dc.b  6,-9
X   dc.b  4,-11
X   dc.b  2,-12
X*   dc.b  -2,-12
X closepath
X endchar
X
X.P
X   dc.b  -11,10
X*   dc.b  -7,-12
X   dc.b  -7,9
X* penup
X   dc.b  -7,-12
X   dc.b  2,-12
X   dc.b  5,-11
X   dc.b  6,-10
X   dc.b  7,-8
X   dc.b  7,-5
X   dc.b  6,-3
X   dc.b  5,-2
X   dc.b  2,-1
X   dc.b  -7,-1
X endchar
X
X.Q
X   dc.b  -11,11
X   dc.b  -2,-12
X   dc.b  -4,-11
X   dc.b  -6,-9
X   dc.b  -7,-7
X   dc.b  -8,-4
X   dc.b  -8,1
X   dc.b  -7,4
X   dc.b  -6,6
X   dc.b  -4,8
X   dc.b  -2,9
X   dc.b  2,9
X   dc.b  4,8
X   dc.b  6,6
X   dc.b  7,4
X   dc.b  8,1
X   dc.b  8,-4
X   dc.b  7,-7
X   dc.b  6,-9
X   dc.b  4,-11
X   dc.b  2,-12
X*  dc.b  -2,-12
X closepath
X penup
X   dc.b  1,5
X   dc.b  7,11
X endchar
X
X.R
X   dc.b  -11,10
X   dc.b  -7,-12
X   dc.b  -7,9
X penup
X   dc.b  -7,-12
X   dc.b  2,-12
X   dc.b  5,-11
X   dc.b  6,-10
X   dc.b  7,-8
X   dc.b  7,-6
X   dc.b  6,-4
X   dc.b  5,-3
X   dc.b  2,-2
X   dc.b  -7,-2
X penup
X   dc.b  0,-2
X   dc.b  7,9
X endchar
X
X.S
X   dc.b  -10,10
X   dc.b  7,-9
X   dc.b  5,-11
X   dc.b  2,-12
X   dc.b  -2,-12
X   dc.b  -5,-11
X   dc.b  -7,-9
X   dc.b  -7,-7
X   dc.b  -6,-5
X   dc.b  -5,-4
X   dc.b  -3,-3
X   dc.b  3,-1
X   dc.b  5,0
X   dc.b  6,1
X   dc.b  7,3
X   dc.b  7,6
X   dc.b  5,8
X   dc.b  2,9
X   dc.b  -2,9
X   dc.b  -5,8
X   dc.b  -7,6
X endchar
X
X.T
X   dc.b  -8,8
X   dc.b  0,-12
X   dc.b  0,9
X penup
X   dc.b  -7,-12
X   dc.b  7,-12
X endchar
X
X.U
X   dc.b  -11,11
X   dc.b  -7,-12
X   dc.b  -7,3
X   dc.b  -6,6
X   dc.b  -4,8
X   dc.b  -1,9
X   dc.b  1,9
X   dc.b  4,8
X   dc.b  6,6
X   dc.b  7,3
X   dc.b  7,-12
X endchar
X
X.V
X   dc.b  -9,9
X   dc.b  -8,-12
X   dc.b  0,9
X penup
X   dc.b  8,-12
X   dc.b  0,9
X endchar
X
X.W
X   dc.b  -12,12
X   dc.b  -10,-12
X   dc.b  -5,9
X penup
X   dc.b  0,-12
X   dc.b  -5,9
X penup
X   dc.b  0,-12
X   dc.b  5,9
X penup
X   dc.b  10,-12
X   dc.b  5,9
X endchar
X
X.X
X   dc.b  -10,10
X   dc.b  -7,-12
X   dc.b  7,9
X penup
X   dc.b  7,-12
X   dc.b  -7,9
X endchar
X
X.Y
X   dc.b  -9,9
X   dc.b  -8,-12
X   dc.b  0,-2
X   dc.b  0,9
X penup
X   dc.b  8,-12
X   dc.b  0,-2
X endchar
X
X.Z
X   dc.b  -10,10
X   dc.b  7,-12
X   dc.b  -7,9
X penup
X   dc.b  -7,-12
X   dc.b  7,-12
X penup
X   dc.b  -7,9
X   dc.b  7,9
X endchar
X
X
X.h5B
X   dc.b  -7,7
X   dc.b  -3,-12
X   dc.b  -3,16
X penup
X   dc.b  -3,-12
X   dc.b  4,-12
X penup
X   dc.b  -3,16
X   dc.b  4,16
X endchar
X
X.h5C
X   dc.b  -11,11
X   dc.b  -9,-12
X   dc.b  9,16
X endchar
X
X.h5D
X   dc.b  -7,7
X   dc.b  3,-12
X   dc.b  3,16
X penup
X   dc.b  -4,-12
X   dc.b  3,-12
X penup
X   dc.b  -4,16
X   dc.b  3,16
X endchar
X
X.h5E
X   dc.b  -8,8
X   dc.b  -2,-6
X   dc.b  0,-9
X   dc.b  2,-6
X penup
X   dc.b  -5,-3
X   dc.b  0,-8
X   dc.b  5,-3
X penup
X   dc.b  0,-8
X   dc.b  0,9
X endchar
X
X.h5F
X   dc.b  -13,13
X   dc.b  -9,16
X   dc.b  9,16
X endchar
X
X.h60
X   dc.b  -4,4
X   dc.b  -3,-12
X   dc.b  0,-5
X endchar
X
X.a
X   dc.b  -9,10
X   dc.b  6,-5
X   dc.b  6,9
X penup
X   dc.b  6,-2
X   dc.b  4,-4
X   dc.b  2,-5
X   dc.b  -1,-5
X   dc.b  -3,-4
X   dc.b  -5,-2
X   dc.b  -6,1
X   dc.b  -6,3
X   dc.b  -5,6
X   dc.b  -3,8
X   dc.b  -1,9
X   dc.b  2,9
X   dc.b  4,8
X   dc.b  6,6
X endchar
X
X.b
X   dc.b  -10,9
X   dc.b  -6,-12
X   dc.b  -6,9
X penup
X   dc.b  -6,-2
X   dc.b  -4,-4
X   dc.b  -2,-5
X   dc.b  1,-5
X   dc.b  3,-4
X   dc.b  5,-2
X   dc.b  6,1
X   dc.b  6,3
X   dc.b  5,6
X   dc.b  3,8
X   dc.b  1,9
X   dc.b  -2,9
X   dc.b  -4,8
X   dc.b  -6,6
X endchar
X
X.c
X   dc.b  -9,9
X   dc.b  6,-2
X   dc.b  4,-4
X   dc.b  2,-5
X   dc.b  -1,-5
X   dc.b  -3,-4
X   dc.b  -5,-2
X   dc.b  -6,1
X   dc.b  -6,3
X   dc.b  -5,6
X   dc.b  -3,8
X   dc.b  -1,9
X   dc.b  2,9
X   dc.b  4,8
X   dc.b  6,6
X endchar
X
X.d
X   dc.b  -9,10
X   dc.b  6,-12
X   dc.b  6,9
X penup
X   dc.b  6,-2
X   dc.b  4,-4
X   dc.b  2,-5
X   dc.b  -1,-5
X   dc.b  -3,-4
X   dc.b  -5,-2
X   dc.b  -6,1
X   dc.b  -6,3
X   dc.b  -5,6
X   dc.b  -3,8
X   dc.b  -1,9
X   dc.b  2,9
X   dc.b  4,8
X   dc.b  6,6
X endchar
X
X.e
X   dc.b  -9,9
X   dc.b  -6,1
X   dc.b  6,1
X   dc.b  6,-1
X   dc.b  5,-3
X   dc.b  4,-4
X   dc.b  2,-5
X   dc.b  -1,-5
X   dc.b  -3,-4
X   dc.b  -5,-2
X   dc.b  -6,1
X   dc.b  -6,3
X   dc.b  -5,6
X   dc.b  -3,8
X   dc.b  -1,9
X   dc.b  2,9
X   dc.b  4,8
X   dc.b  6,6
X endchar
X
X.f
X   dc.b  -5,7
X   dc.b  5,-12
X   dc.b  3,-12
X   dc.b  1,-11
X   dc.b  0,-8
X   dc.b  0,9
X penup
X   dc.b  -3,-5
X   dc.b  4,-5
X endchar
X
X.g
X   dc.b  -9,10
X   dc.b  6,-5
X   dc.b  6,11
X   dc.b  5,14
X   dc.b  4,15
X   dc.b  2,16
X   dc.b  -1,16
X   dc.b  -3,15
X penup
X   dc.b  6,-2
X   dc.b  4,-4
X   dc.b  2,-5
X   dc.b  -1,-5
X   dc.b  -3,-4
X   dc.b  -5,-2
X   dc.b  -6,1
X   dc.b  -6,3
X   dc.b  -5,6
X   dc.b  -3,8
X   dc.b  -1,9
X   dc.b  2,9
X   dc.b  4,8
X   dc.b  6,6
X endchar
X
X.h
X   dc.b  -9,10
X   dc.b  -5,-12
X   dc.b  -5,9
X penup
X   dc.b  -5,-1
X   dc.b  -2,-4
X   dc.b  0,-5
X   dc.b  3,-5
X   dc.b  5,-4
X   dc.b  6,-1
X   dc.b  6,9
X endchar
X
X.i
X   dc.b  -4,4
X   dc.b  -1,-12
X   dc.b  0,-11
X   dc.b  1,-12
X   dc.b  0,-13
X   dc.b  -1,-12
X penup
X   dc.b  0,-5
X   dc.b  0,9
X endchar
X
X.j
X   dc.b  -5,5
X   dc.b  0,-12
X   dc.b  1,-11
X   dc.b  2,-12
X   dc.b  1,-13
X   dc.b  0,-12
X penup
X   dc.b  1,-5
X   dc.b  1,12
X   dc.b  0,15
X   dc.b  -2,16
X   dc.b  -4,16
X endchar
X
X.k
X   dc.b  -9,8
X   dc.b  -5,-12
X   dc.b  -5,9
X penup
X   dc.b  5,-5
X   dc.b  -5,5
X penup
X   dc.b  -1,1
X   dc.b  6,9
X endchar
X
X.l
X   dc.b  -4,4
X   dc.b  0,-12
X   dc.b  0,9
X endchar
X
X.m
X   dc.b  -15,15
X   dc.b  -11,-5
X   dc.b  -11,9
X penup
X   dc.b  -11,-1
X   dc.b  -8,-4
X   dc.b  -6,-5
X   dc.b  -3,-5
X   dc.b  -1,-4
X   dc.b  0,-1
X   dc.b  0,9
X penup
X   dc.b  0,-1
X   dc.b  3,-4
X   dc.b  5,-5
X   dc.b  8,-5
X   dc.b  10,-4
X   dc.b  11,-1
X   dc.b  11,9
X endchar
X
X.n
X   dc.b  -9,10
X   dc.b  -5,-5
X   dc.b  -5,9
X penup
X   dc.b  -5,-1
X   dc.b  -2,-4
X   dc.b  0,-5
X   dc.b  3,-5
X   dc.b  5,-4
X   dc.b  6,-1
X   dc.b  6,9
X endchar
X
X.o
X   dc.b  -9,10
X   dc.b  -1,-5
X   dc.b  -3,-4
X   dc.b  -5,-2
X   dc.b  -6,1
X   dc.b  -6,3
X   dc.b  -5,6
X   dc.b  -3,8
X   dc.b  -1,9
X   dc.b  2,9
X   dc.b  4,8
X   dc.b  6,6
X   dc.b  7,3
X   dc.b  7,1
X   dc.b  6,-2
X   dc.b  4,-4
X   dc.b  2,-5
X   dc.b  -1,-5
X endchar
X
X.p
X   dc.b  -10,9
X   dc.b  -6,-5
X   dc.b  -6,16
X penup
X   dc.b  -6,-2
X   dc.b  -4,-4
X   dc.b  -2,-5
X   dc.b  1,-5
X   dc.b  3,-4
X   dc.b  5,-2
X   dc.b  6,1
X   dc.b  6,3
X   dc.b  5,6
X   dc.b  3,8
X   dc.b  1,9
X   dc.b  -2,9
X   dc.b  -4,8
X   dc.b  -6,6
X endchar
X
X.q
X   dc.b  -9,10
X   dc.b  6,-5
X   dc.b  6,16
X penup
X   dc.b  6,-2
X   dc.b  4,-4
X   dc.b  2,-5
X   dc.b  -1,-5
X   dc.b  -3,-4
X   dc.b  -5,-2
X   dc.b  -6,1
X   dc.b  -6,3
X   dc.b  -5,6
X   dc.b  -3,8
X   dc.b  -1,9
X   dc.b  2,9
X   dc.b  4,8
X   dc.b  6,6
X endchar
X
X.r
X   dc.b  -7,6
X   dc.b  -3,-5
X   dc.b  -3,9
X penup
X   dc.b  -3,1
X   dc.b  -2,-2
X   dc.b  0,-4
X   dc.b  2,-5
X   dc.b  5,-5
X endchar
X
X.s
X   dc.b  -8,9
X   dc.b  6,-2
X   dc.b  5,-4
X   dc.b  2,-5
X   dc.b  -1,-5
X   dc.b  -4,-4
X   dc.b  -5,-2
X   dc.b  -4,0
X   dc.b  -2,1
X   dc.b  3,2
X   dc.b  5,3
X   dc.b  6,5
X   dc.b  6,6
X   dc.b  5,8
X   dc.b  2,9
X   dc.b  -1,9
X   dc.b  -4,8
X   dc.b  -5,6
X endchar
X
X.t
X   dc.b  -5,7
X   dc.b  0,-12
X   dc.b  0,5
X   dc.b  1,8
X   dc.b  3,9
X   dc.b  5,9
X penup
X   dc.b  -3,-5
X   dc.b  4,-5
X endchar
X
X.u
X   dc.b  -9,10
X   dc.b  -5,-5
X   dc.b  -5,5
X   dc.b  -4,8
X   dc.b  -2,9
X   dc.b  1,9
X   dc.b  3,8
X   dc.b  6,5
X penup
X   dc.b  6,-5
X   dc.b  6,9
X endchar
X
X.v
X   dc.b  -8,8
X   dc.b  -6,-5
X   dc.b  0,9
X penup
X   dc.b  6,-5
X   dc.b  0,9
X endchar
X
X.w
X   dc.b  -11,11
X   dc.b  -8,-5
X   dc.b  -4,9
X penup
X   dc.b  0,-5
X   dc.b  -4,9
X penup
X   dc.b  0,-5
X   dc.b  4,9
X penup
X   dc.b  8,-5
X   dc.b  4,9
X endchar
X
X.x
X   dc.b  -8,9
X   dc.b  -5,-5
X   dc.b  6,9
X penup
X   dc.b  6,-5
X   dc.b  -5,9
X endchar
X
X.y
X   dc.b  -8,8
X   dc.b  -6,-5
X   dc.b  0,9
X penup
X   dc.b  6,-5
X   dc.b  0,9
X   dc.b  -2,13
X   dc.b  -4,15
X   dc.b  -6,16
X   dc.b  -7,16
X endchar
X
X.z
X   dc.b  -8,9
X   dc.b  6,-5
X   dc.b  -5,9
X penup
X   dc.b  -5,-5
X   dc.b  6,-5
X penup
X   dc.b  -5,9
X   dc.b  6,9
X endchar
X
X
X.h7B
X   dc.b  -7,7
X   dc.b  2,-12
X   dc.b  0,-11
X   dc.b  -1,-10
X   dc.b  -2,-9
X   dc.b  -2,-7
X   dc.b  -1,-6
X   dc.b  0,-5
X   dc.b  1,-3
X   dc.b  1,-1
X   dc.b  -1,1
X  penup
X   dc.b  0,-11
X   dc.b  -1,-9
X   dc.b  -1,-8
X   dc.b  0,-7
X   dc.b  1,-6
X   dc.b  2,-4
X   dc.b  2,-2
X   dc.b  1,0
X   dc.b  -3,2
X   dc.b  1,4
X   dc.b  2,6
X   dc.b  2,8
X   dc.b  1,10
X   dc.b  0,11
X   dc.b  -1,12
X   dc.b  -1,13
X   dc.b  0,15
X penup
X   dc.b  -1,3
X   dc.b  1,5
X   dc.b  1,7
X   dc.b  0,9
X   dc.b  -1,10
X   dc.b  -2,11
X   dc.b  -2,13
X   dc.b  -1,14
X   dc.b  0,15
X   dc.b  2,16
X endchar
X
X.h7C
X   dc.b  -4,4
X   dc.b  0,-12
X   dc.b  0,16
X endchar
X
X.h7D
X   dc.b  -7,7
X   dc.b  -2,-12
X   dc.b  0,-11
X   dc.b  1,-10
X   dc.b  2,-9
X   dc.b  2,-7
X   dc.b  1,-6
X   dc.b  0,-5
X   dc.b  -1,-3
X   dc.b  -1,-1
X   dc.b  1,1
X penup
X   dc.b  0,-11
X   dc.b  1,-9
X   dc.b  1,-8
X   dc.b  0,-7
X   dc.b  -1,-6
X   dc.b  -2,-4
X   dc.b  -2,-2
X   dc.b  -1,0
X   dc.b  3,2
X   dc.b  -1,4
X   dc.b  -2,6
X   dc.b  -2,8
X   dc.b  -1,10
X   dc.b  0,11
X   dc.b  1,12
X   dc.b  1,13
X   dc.b  0,15
X penup
X   dc.b  1,3
X   dc.b  -1,5
X   dc.b  -1,7
X   dc.b  0,9
X   dc.b  1,10
X   dc.b  2,11
X   dc.b  2,13
X   dc.b  1,14
X   dc.b  0,15
X   dc.b  -2,16
X endchar
X
X.h7E
X   dc.b  -12,12
X   dc.b  -9,3
X   dc.b  -9,1
X   dc.b  -8,-2
X   dc.b  -6,-3
X   dc.b  -4,-3
X   dc.b  -2,-2
X   dc.b  2,1
X   dc.b  4,2
X   dc.b  6,2
X   dc.b  8,1
X   dc.b  9,-1
X penup
X   dc.b  -9,1
X   dc.b  -8,-1
X   dc.b  -6,-2
X   dc.b  -4,-2
X   dc.b  -2,-1
X   dc.b  2,2
X   dc.b  4,3
X   dc.b  6,3
X   dc.b  8,2
X   dc.b  9,-1
X   dc.b  9,-3
X endchar
X
X.h7F
X   dc.b  -8,8
X   dc.b  0,-12
X   dc.b  -1,-10
X   dc.b  0,-8
X   dc.b  1,-10
X   dc.b  0,-12
X penup
X   dc.b  0,-12
X   dc.b  0,16
X penup
X   dc.b  0,-1
X   dc.b  -1,2
X   dc.b  0,16
X   dc.b  1,2
X   dc.b  0,-1
X penup
X   dc.b  -6,-5
X   dc.b  6,-5
X penup
X   dc.b  2,-5
X   dc.b  4,-4
X   dc.b  6,-5
X   dc.b  4,-6
X   dc.b  2,-5
X endchar
X
X
X   end
X
X
END_OF_simplex.chr
if test 20594 -ne `wc -c <simplex.chr`; then
    echo shar: \"simplex.chr\" unpacked with wrong size!
fi
# end of overwriting check
fi
if test -f thick-letters -a "${1}" != "-c" ; then 
  echo shar: Will not over-write existing file \"thick-letters\"
else
echo shar: Extracting \"thick-letters\" \(460 characters\)
sed "s/^X//" >thick-letters <<'END_OF_thick-letters'
X
Xsave
X
X2 pencolor    1 penmode
X
X/simplex findfont 12 scalefont setfont
X
X/char (x) def
X
X/tshow { false charpath stroke } def
X
X/caps {
X   65 1 65 25 add  % for A to Z
X   { char exch 0 exch put
X     char tshow } for
X   } def
X
X/small {
X   97 1 97 25 add
X   { char exch 0 exch put
X     char tshow } for
X   } def
X
X 3 setlinewidth
X
X50 300 moveto  small
X50 250 moveto  caps
X
X/simplex findfont  20 scalefont setfont
X
X50 200 moveto  small
X50 150 moveto  caps
X
X
Xrestore
X
END_OF_thick-letters
if test 460 -ne `wc -c <thick-letters`; then
    echo shar: \"thick-letters\" unpacked with wrong size!
fi
# end of overwriting check
fi
echo shar: End of archive 1 \(of 2\).
cp /dev/null ark1isdone
MISSING=""
for I in 1 2 ; do
    if test ! -f ark${I}isdone ; then
	MISSING="${MISSING} ${I}"
    fi
done
if test "${MISSING}" = "" ; then
    echo You have unpacked both archives.
    rm -f ark[1-9]isdone
else
    echo You still need to unpack the following archives:
    echo "        " ${MISSING}
fi
##  End of shell archive.
exit 0