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

Define WidthList
 (  18,  27,  26,  31,  27,  30,  26,  31,  30,  32);

Define RectList
 ( (   0,  0, 17, 65), (  18,  0, 24, 65), (  43,  0, 24, 65), (  68,  0, 31, 65),
   ( 100,  0, 24, 65), ( 125,  0, 25, 65), ( 151,  0, 26, 65), ( 178,  0, 27, 65),
   ( 206,  0, 25, 65), (   0, 65, 26, 65));

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

CreateLayer               Main;
LayerSetImage             Main 'NuevaStd48';
LayerSetAscent            Main 49;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (12);
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 0;
LayerSetLineSpacingOffset Main 0;
LayerSetPointSize         Main 48;

SetDefaultPointSize  48;