Define CharList
 ( 'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O', 'P',
   'Q', 'R', 'S', 'T', 'U', 'V', 'W', 'X', 'Y', 'Z', '0', '1', '2', '3', '4', '5',
   '6', '7', '8', '9', '!', '&', '*', '/', '(', ')', '-', '_', '=', '+', ';', ':',
  "'", '"', ',', '.', '?');

Define WidthList
 (  17,  12,  15,  14,  10,  12,  14,  15,   5,   8,  10,  11,  23,  23,  21,  12,
    21,  13,  11,  14,  17,  16,  25,  17,  16,  12,  18,   5,  15,  11,  15,  12,
    16,  15,  14,  14,   5,  13,  10,   7,   6,   6,   9,  21,   8,   8,   5,   5,
     5,   7,   5,   4,  10);

Define RectList
 ( (   0,  0, 23, 39), (  25,  0, 16, 39), (  43,  0, 20, 39), (  65,  0, 19, 39),
   (  86,  0, 15, 39), ( 103,  0, 17, 39), ( 122,  0, 20, 39), ( 144,  0, 21, 39),
   ( 167,  0,  9, 39), ( 178,  0, 16, 39), ( 196,  0, 17, 39), ( 215,  0, 16, 39),
   ( 233,  0, 29, 39), ( 264,  0, 29, 39), ( 295,  0, 27, 39), ( 324,  0, 17, 39),
   ( 343,  0, 28, 39), ( 373,  0, 20, 39), ( 395,  0, 17, 39), ( 414,  0, 20, 39),
   ( 436,  0, 23, 39), ( 461,  0, 20, 39), ( 483,  0, 30, 39), ( 515,  0, 22, 39),
   ( 539,  0, 22, 39), ( 563,  0, 21, 39), ( 586,  0, 24, 39), ( 612,  0,  9, 39),
   ( 623,  0, 21, 39), ( 646,  0, 16, 39), ( 664,  0, 19, 39), ( 685,  0, 17, 39),
   ( 704,  0, 21, 39), ( 727,  0, 21, 39), ( 750,  0, 19, 39), ( 771,  0, 19, 39),
   ( 792,  0, 10, 39), ( 804,  0, 19, 39), ( 825,  0, 14, 39), ( 841,  0, 14, 39),
   ( 857,  0, 13, 39), ( 872,  0, 14, 39), ( 888,  0, 15, 39), ( 905,  0, 29, 39),
   ( 936,  0, 15, 39), ( 953,  0, 15, 39), ( 970,  0, 10, 39), ( 982,  0, 10, 39),
   ( 994,  0, 10, 39), (1006,  0, 13, 39), (1021,  0, 10, 39), (1033,  0, 10, 39),
   (1045,  0, 16, 39));

Define OffsetList
 ( ( 0, 8), ( 1, 8), ( 0, 8), ( 1, 8), ( 1, 8), ( 0, 8), ( 0, 8), ( 0, 8),
   ( 1, 8), (-3, 8), ( 0, 8), ( 0, 8), ( 0, 8), ( 0, 8), ( 0, 8), ( 0, 8),
   ( 0, 8), ( 0, 8), ( 0, 8), ( 0, 8), ( 0, 8), ( 1, 8), ( 0, 8), ( 0, 8),
   ( 0, 8), (-1, 8), ( 0, 8), ( 1, 8), ( 0, 8), ( 0, 8), ( 1, 8), ( 1, 8),
   ( 0, 8), ( 0, 8), ( 1, 8), ( 1, 8), ( 0, 8), ( 0, 8), ( 1, 8), ( 0, 8),
   ( 0, 8), (-6, 8), ( 0, 8), (-1, 8), (-2, 8), ( 0, 8), ( 0, 8), ( 0, 8),
   ( 0, 8), ( 0, 8), ( 0, 8), ( 0, 8), ( 0, 8));

Define KerningPairs
 ("AG","FG","NO","RS","TO","WX");

Define KerningValues (  -2,  -2,  -2,  -3,  -3,  -1);

CreateLayer               Main;
LayerSetImage             Main '../images/Praitor36';
LayerSetAscent            Main 38;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (9);
LayerSetKerningPairs      Main KerningPairs KerningValues;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 0;
LayerSetLineSpacingOffset Main 0;
LayerSetPointSize         Main 36;
LayerSetImageMap          Main CharList RectList;

SetDefaultPointSize  36;
