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

Define WidthList
 (  10,  10,  10,  10,  10,  10,  10,  10,  10,  10,   5);

Define RectList
 ( (   0,  0, 11, 18), (  12,  0,  8, 18), (  21,  0, 11, 18), (  33,  0, 11, 18),
   (  45,  0, 11, 18), (  57,  0, 11, 18), (  69,  0, 11, 18), (  81,  0, 11, 18),
   (  93,  0, 11, 18), ( 105,  0, 11, 18), ( 117,  0,  5, 18));

Define OffsetList
 ( (-1, 0), ( 1, 0), (-1, 0), (-1, 0), (-1, 0), (-1, 0), (-1, 0), ( 0, 0),
   (-1, 0), (-1, 0), ( 0, 0));

CreateLayer               Main;
LayerSetImage             Main 'PosterBodoniBT_numbers';
LayerSetAscent            Main 14;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (5);
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 0;
LayerSetLineSpacingOffset Main 0;
LayerSetPointSize         Main 11;

SetDefaultPointSize  11;
