DIRECTORY ImagerPixelMaps, Rope; RasterFontWriter: CEDAR DEFINITIONS ~ BEGIN InternalFont: TYPE ~ REF InternalFontRep; InternalFontRep: TYPE ~ RECORD [ defaultChar: InternalCharRep, charRep: ARRAY CHAR OF InternalCharRep ]; InternalCharRep: TYPE ~ RECORD [ fWidth, sWidth: INTEGER, pixels: ImagerPixelMaps.PixelMap ]; Load: PROC [fileName: Rope.ROPE] RETURNS [InternalFont]; FormatError: ERROR [byteIndex: INT]; Create: PROC [defaultBoxBounds: ImagerPixelMaps.DeviceRectangle, defaultWidth: INTEGER] RETURNS [InternalFont]; ComputeFontMetrics: PROC [internalFont: InternalFont] RETURNS [bc, ec: CHAR, sMin, fMin, sMax, fMax: INTEGER, maxWidth, totalWidth, fSizeStrike: CARDINAL]; Trim: PROC [internalFont: InternalFont]; WriteStrike: PROC [internalFont: InternalFont, fileName: Rope.ROPE]; WriteKernedStrike: PROC [internalFont: InternalFont, fileName: Rope.ROPE]; END. ~RasterFontWriter.mesa Michael Plass, September 7, 1983 2:37 pm may raise: Removes extra zero bits from all the rasters. Ê7˜J™J™(JšÏk œ˜ Jšœœ œ˜+Jšœœœ˜)šœœœ˜ Jšœ˜Jšœ œœœ˜&Jšœ˜—šœœœ˜ Jšœœ˜J˜ Jšœ˜—šÏnœœœœ˜8J™ Jšœ œ œ˜$—JšžœœCœœ˜oJš žœœœ œœ%œ˜›šžœœ˜(J™-—Jšž œœ-œ˜DJšžœœ-œ˜JJšœ˜—…—h