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', '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
 (  11,  11,  11,  13,  11,  10,  12,  14,   6,   6,  11,  10,  15,  14,  13,  10,
    13,  11,   8,  11,  12,  11,  14,  11,  11,  11,   8,   9,   8,   9,   8,   4,
     9,   9,   4,   4,   9,   4,  14,   9,   8,   9,   9,   6,   7,   5,   9,   7,
    11,   8,   8,   8,   8,   6,   8,   8,   8,   8,   8,   8,   8,   8,  11,   5,
     4,  15,  11,   8,  13,   9,  13,   8,   6,   6,   5,   8,  11,  11,   6,   6,
     6,   6,   4,   4,   5,   9,   4,  11,   4,  11,   9,   7,   4,   8,  11,  11,
     8,  12,  12,   7);

Define RectList
 ( (   0,  0, 11, 18), (  12,  0,  9, 18), (  22,  0,  9, 18), (  32,  0, 12, 18),
   (  45,  0, 10, 18), (  56,  0,  9, 18), (  66,  0, 11, 18), (  78,  0, 12, 18),
   (  91,  0,  4, 18), (  96,  0,  6, 18), ( 103,  0, 10, 18), ( 114,  0,  9, 18),
   ( 124,  0, 14, 18), ( 139,  0, 13, 18), ( 153,  0, 11, 18), ( 165,  0,  8, 18),
   ( 174,  0, 11, 18), ( 186,  0, 11, 18), ( 198,  0,  7, 18), ( 206,  0, 12, 18),
   ( 219,  0, 11, 18), ( 231,  0, 11, 18), ( 243,  0, 14, 18), ( 258,  0, 11, 18),
   ( 270,  0, 11, 18), ( 282,  0, 11, 18), ( 294,  0,  7, 18), ( 302,  0,  8, 18),
   ( 311,  0,  7, 18), ( 319,  0,  8, 18), ( 328,  0,  6, 18), ( 335,  0,  6, 18),
   ( 342,  0,  8, 18), ( 351,  0,  9, 18), ( 361,  0,  4, 18), ( 366,  0,  3, 18),
   ( 370,  0,  8, 18), ( 379,  0,  4, 18), ( 384,  0, 14, 18), ( 399,  0,  9, 18),
   ( 409,  0,  6, 18), ( 416,  0,  8, 18), ( 425,  0,  8, 18), ( 434,  0,  6, 18),
   ( 441,  0,  5, 18), ( 447,  0,  5, 18), ( 453,  0,  9, 18), ( 463,  0,  8, 18),
   ( 472,  0, 13, 18), ( 486,  0,  8, 18), ( 495,  0,  8, 18), ( 504,  0,  6, 18),
   ( 511,  0,  7, 18), ( 519,  0,  6, 18), ( 526,  0,  7, 18), ( 534,  0,  7, 18),
   ( 542,  0,  7, 18), ( 550,  0,  6, 18), ( 557,  0,  7, 18), ( 565,  0,  6, 18),
   ( 572,  0,  6, 18), ( 579,  0,  7, 18), ( 587,  0,  9, 18), ( 597,  0,  3, 18),
   ( 601,  0,  2, 18), ( 604,  0, 14, 18), ( 619,  0,  9, 18), ( 629,  0,  7, 18),
   ( 637,  0, 12, 18), ( 650,  0,  7, 18), ( 658,  0, 11, 18), ( 670,  0,  8, 18),
   ( 679,  0,  4, 18), ( 684,  0,  4, 18), ( 689,  0,  4, 18), ( 694,  0,  9, 18),
   ( 704,  0,  8, 18), ( 713,  0,  9, 18), ( 723,  0,  4, 18), ( 728,  0,  4, 18),
   ( 733,  0,  4, 18), ( 738,  0,  4, 18), ( 743,  0,  2, 18), ( 746,  0,  2, 18),
   ( 749,  0,  2, 18), ( 752,  0,  6, 18), ( 759,  0,  2, 18), ( 762,  0,  9, 18),
   ( 772,  0,  2, 18), ( 775,  0,  9, 18), ( 785,  0,  7, 18), ( 793,  0,  5, 18),
   ( 799,  0,  2, 18), ( 802,  0,  7, 18), ( 810,  0, 10, 18), ( 821,  0, 11, 18),
   ( 833,  0,  6, 18), ( 840,  0, 11, 18), ( 852,  0, 11, 18), ( 864,  0,  5, 18));

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

Define KerningPairs
 ("AV","C,","C.","D.","DA","DV","DY","F,","F.","FA","Fa","Fe","Fo","Ja","Je","Jo",
  "Ju","Ka","LV","LY","O,","O.","OA","OV","OX","OY","P,","P.","PA","Pa","Q.","QA",
  "QV","QY","RV","RY","T,","T-","T.","T:","T;","TA","Ta","Tc","Te","Tm","To","Tr",
  "Ts","Tu","Tw","Ty","Tz","U,","U.","UA","V,","V-","V.","V:","V;","VA","VC","VG",
  "VO","VQ","Va","Ve","Vo","Vr","Vu","Vy","W,","W-","W.","W:","W;","WC","WG","WO",
  "Wa","Wd","We","Wo","Wr","Wu","XC","XG","XO","Y,","Y-","Y.","Y:","Y;","YC","YG",
  "YO","Ya","Yd","Ye","Yo","Yp","Yq","Yu","b.","f!","f?","fk","fl","g.","gy","r,",
  "r.","rj","rm","rn","rp","rr","rt","ru","rv","ry","v,","v.","va","vc","vd","vo",
  "vq","w,","w.","wa","y,","y.","yo");

Define KerningValues

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

    -1,   1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -3,  -3,  -1,  -1,  -1,  -1,

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

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

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

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

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

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

    -1,  -1,  -2,  -1,  -2,  -2,  -1);

CreateLayer               Main;
LayerSetImage             Main '../images/Garamond12Bold';
LayerSetAscent            Main 14;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (4);
LayerSetKerningPairs      Main KerningPairs KerningValues;
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 0;
LayerSetLineSpacingOffset Main 0;
LayerSetPointSize         Main 12;

SetDefaultPointSize  12;
