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

Define WidthList
 (  12,  12,  12,  12,  12,  12,  12,  12,  12,  12,   8,   6,  12,   6);

Define RectList
 ( (   0,  0, 10, 26), (  11,  0,  8, 26), (  20,  0, 10, 26), (  31,  0, 10, 26),
   (  42,  0, 10, 26), (  53,  0, 10, 26), (  64,  0, 10, 26), (  75,  0, 12, 26),
   (  88,  0, 10, 26), (  99,  0, 10, 26), ( 110,  0,  7, 26), ( 118,  0,  3, 26),
   ( 122,  0, 11, 26), ( 134,  0,  3, 26));

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

Define KerningPairs
 ("11");

Define KerningValues

 (  -1);

CreateLayer               Main;
LayerSetImage             Main 'TimesNewRoman18Bold';
LayerSetAscent            Main 21;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (6);
LayerSetKerningPairs      Main KerningPairs KerningValues;
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 0;
LayerSetLineSpacingOffset Main 0;
LayerSetPointSize         Main 18;

SetDefaultPointSize  18;
