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

Define WidthList
 (   7,   7,   7,   7,   7,   7,   7,   7,   7,   7,   7);

Define RectList
 ( (   0,  0,  7, 12), (   8,  0,  5, 12), (  14,  0,  5, 12), (  20,  0,  5, 12),
   (  26,  0,  6, 12), (  33,  0,  5, 12), (  39,  0,  6, 12), (  46,  0,  6, 12),
   (  53,  0,  6, 12), (  60,  0,  6, 12), (  67,  0,  6, 12));

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

CreateLayer               Main;
LayerSetImage             Main 'LucidaBright8';
LayerSetAscent            Main 10;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (3);
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 0;
LayerSetLineSpacingOffset Main 0;
LayerSetPointSize         Main 8;

SetDefaultPointSize  8;