Define CharList
 ( '0', '1', '2', '3', '4', '5', '6', '7', '8', '9');

Define WidthList
 (   9,   6,   9,   9,   9,   9,   9,   9,   9,   9);

Define RectList
 ( (   0,  0,  9, 11), (  10,  0,  5, 11), (  16,  0,  9, 11), (  26,  0,  9, 11),
   (  36,  0,  9, 11), (  46,  0,  9, 11), (  56,  0,  9, 11), (  66,  0,  8, 11),
   (  75,  0,  9, 11), (  85,  0,  9, 11));

Define OffsetList
 ( ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0),
   ( 0, 0), ( 0, 0));

CreateLayer               Main;
LayerSetImage             Main 'Bauhaus12';
LayerSetAscent            Main 11;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (4);
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 0;
LayerSetLineSpacingOffset Main 0;
LayerSetPointSize         Main 12;

SetDefaultPointSize  12;
