<> <> <> <> StrikeFontFormat: CEDAR DEFINITIONS = BEGIN <> <> <> <<];>> <<>> <> <> <> <> <> <<];>> <<>> Flag: TYPE = MACHINE DEPENDENT {F(0), T(1)}; Header: TYPE = MACHINE DEPENDENT RECORD[ oneBit(0:0..0): Flag, -- always T index(0:1..1): Flag, -- F for simple strike, T for strike index fixed(0:2..2): Flag, -- T if all characters have same width kerned(0:3..3): Flag, -- T if Kerned, F if Plain unused(0:4..15): [0..7777B], -- should be 0 min(1), max(2): CARDINAL, -- minimum, maximum character codes maxwidth(3): CARDINAL -- maximum spacing width of any character ]; BoundingBox: TYPE = MACHINE DEPENDENT RECORD[ fbbox(0), fbboy(1): INTEGER, -- bounding box offsets fbbdx(2), fbbdy(3): INTEGER -- bounding box size ]; Body: TYPE = MACHINE DEPENDENT RECORD[ length(0): CARDINAL, -- number of words in strike body ascent(1), descent(2): INTEGER, -- scanlines above and below the baseline xoffset(3): INTEGER, -- always 0 (obsolete) raster(4): CARDINAL -- number of words per scanline in the strike <> <> ]; XTable: TYPE = RECORD[SEQUENCE COMPUTED CARDINAL OF CARDINAL]; WidthEntry: TYPE = MACHINE DEPENDENT RECORD[offset,width: [0..377B]]; nullWidthEntry: WidthEntry = [377B,377B]; WTable: TYPE = RECORD[SEQUENCE COMPUTED CARDINAL OF WidthEntry]; END.