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');

Define WidthList
 (  14,  11,  17,  14,  13,  12,  17,  14,   4,   9,  17,  10,  18,  15,  21,  11,
    21,  16,  11,  13,  13,  15,  23,  18,  17,  15);

Define RectList
 ( (   0,  0, 17, 30), (  18,  0, 14, 30), (  33,  0, 21, 30), (  55,  0, 17, 30),
   (  73,  0, 16, 30), (  90,  0, 15, 30), ( 106,  0, 21, 30), ( 128,  0, 17, 30),
   ( 146,  0,  7, 30), ( 154,  0, 12, 30), ( 167,  0, 19, 30), ( 187,  0, 13, 30),
   ( 201,  0, 21, 30), ( 223,  0, 18, 30), ( 242,  0, 25, 30), ( 268,  0, 13, 30),
   ( 282,  0, 25, 30), ( 308,  0, 18, 30), ( 327,  0, 15, 30), ( 343,  0, 16, 30),
   ( 360,  0, 16, 30), ( 377,  0, 16, 30), ( 394,  0, 26, 30), ( 421,  0, 21, 30),
   ( 443,  0, 20, 30), ( 464,  0, 17, 30));

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

Define KerningPairs
 ("AA","BC","BG","BO","BV","BW","CA","CS","DA","DV","DY","FA","GA","JA","KA","KC",
  "KO","KW","KY","LT","LU","LV","LW","LY","OA","OV","OX","OY","PA","RT","RV","RW",
  "RY","TA","UA","VA","VO","WA","XA","XC","XO","YA","YC");

Define KerningValues

 (  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -2,  -1,  -2,  -1,  -1,  -1,  -1,  -2,

    -2,  -3,  -3,  -1,  -1,  -3,  -3,  -3,  -1,  -1,  -1,  -1,  -3,  -4,  -3,  -3,

    -4,  -4,  -1,  -1,  -1,  -3,  -1,  -2,  -2,  -4,  -2);

CreateLayer               Main;
LayerSetImage             Main 'QuincyCaps19';
LayerSetAscent            Main 24;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (14);
LayerSetKerningPairs      Main KerningPairs KerningValues;
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 4;
LayerSetLineSpacingOffset Main 0;
LayerSetPointSize         Main 19;

SetDefaultPointSize  19;