DIRECTORY ImagerPixelMaps, Rope;RasterFontWriter: CEDAR DEFINITIONS ~ BEGINInternalFont: TYPE ~ REF InternalFontRep;InternalFontRep: TYPE ~ RECORD [family: Rope.ROPE _ NIL,face: [0..255] _ 0,bitsPerEmQuad: REAL _ 0,defaultChar: InternalCharRep,charRep: ARRAY CHAR OF InternalCharRep];InternalCharRep: TYPE ~ RECORD [fWidth, sWidth: REAL,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];WriteAC: PROC [internalFont: InternalFont, fileName: Rope.ROPE, bitsPerInch: REAL _ 384.0];END.   ~  RasterFontWriter.mesaMichael Plass, January 13, 1984 11:24 ammay raise:Removes extra zero bits from all the rasters.Э╩i  Ш JЩJЩ(JЪ╧k	ЬШ JЪЬЭЬЭЬЭШ+JЪЬЭЬЭЬШ)ЪЬЭЬЭЬШ JЪЬЭЬЭЬШJШJЪЬЭЬШJЪЬШJЪЬ	ЭЬЭЬЭЬШ&JЪЬШЧЪЬЭЬЭЬШ JЪЬЭЬШJШ JЪЬШЧЪ╧nЬЭЬЭЬЭЬШ8JЩ
JЪЬЭЬЭЬШ$ЧJЪЮЬЭЬCЭЬЭЬШoJЪЮЬЭЬЭЬ
ЭЬЭЬ%ЭЬШЫЪЮЬЭЬШ(JЩ-ЧJЪЮЬЭЬ-ЭЬШDJЪЮЬЭЬ-ЭЬШJJЪЮЬЭЬ-ЭЬЭЬ
Ш[JЪЭЬШЧ ЕЧ      э  