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
 (  23,  21,  23,  26,  21,  21,  26,  26,  15,  15,  26,  21,  31,  26,  24,  20,
    24,  23,  20,  23,  26,  23,  31,  24,  23,  21,  15,  18,  15,  18,  15,  12,
    17,  18,  10,  10,  17,  10,  26,  18,  17,  18,  18,  13,  13,  12,  18,  17,
    23,  17,  17,  15,  17,  17,  17,  17,  17,  17,  17,  17,  17,  17,  21,  12,
    10,  29,  21,  17,  26,  16,   1,  17,  12,  12,  13,  17,  21,  21,  12,  12,
    12,  12,  10,  10,  10,  17,  10,  21,  10,  21,  12,  15,  10,  14,  21,  23,
    13,  24,  24,  15,  23,  23,  23,  23,  23,  23,  31,  23,  21,  21,  21,  21,
    15,  15,  15,  15,  26,  26,  24,  24,  24,  24,  24,  24,  26,  26,  26,  26,
    23,  18,  15,  15,  15,  15,  15,  15,  21,  15,  15,  15,  15,  15,  10,  10,
    10,  10,  17,  18,  17,  17,  17,  17,  17,  17,  18,  18,  18,  18,  17,  17);

Define RectList
 ( (   0,  0, 29, 35), (  30,  0, 27, 35), (  58,  0, 28, 35), (  87,  0, 31, 35),
   ( 119,  0, 27, 35), ( 147,  0, 27, 35), ( 175,  0, 31, 35), ( 207,  0, 31, 35),
   ( 239,  0, 19, 35), ( 259,  0, 20, 35), ( 280,  0, 32, 35), ( 313,  0, 28, 35),
   ( 342,  0, 36, 35), ( 379,  0, 32, 35), ( 412,  0, 29, 35), ( 442,  0, 26, 35),
   ( 469,  0, 30, 35), ( 500,  0, 29, 35), ( 530,  0, 24, 35), ( 555,  0, 30, 35),
   ( 586,  0, 31, 35), ( 618,  0, 29, 35), ( 648,  0, 37, 35), ( 686,  0, 30, 35),
   ( 717,  0, 30, 35), ( 748,  0, 26, 35), ( 775,  0, 21, 35), ( 797,  0, 24, 35),
   ( 822,  0, 21, 35), ( 844,  0, 23, 35), ( 868,  0, 20, 35), ( 889,  0, 19, 35),
   ( 909,  0, 22, 35), ( 932,  0, 23, 35), ( 956,  0, 15, 35), ( 972,  0, 14, 35),
   ( 987,  0, 22, 35), (1010,  0, 15, 35), (1026,  0, 31, 35), (1058,  0, 23, 35),
   (1082,  0, 22, 35), (1105,  0, 23, 35), (1129,  0, 23, 35), (1153,  0, 19, 35),
   (1173,  0, 18, 35), (1192,  0, 17, 35), (1210,  0, 26, 35), (1237,  0, 23, 35),
   (1261,  0, 29, 35), (1291,  0, 23, 35), (1315,  0, 23, 35), (1339,  0, 21, 35),
   (1361,  0, 22, 35), (1384,  0, 17, 35), (1402,  0, 23, 35), (1426,  0, 22, 35),
   (1449,  0, 22, 35), (1472,  0, 21, 35), (1494,  0, 22, 35), (1517,  0, 21, 35),
   (1539,  0, 21, 35), (1561,  0, 22, 35), (1584,  0, 24, 35), (1609,  0, 14, 35),
   (1624,  0, 14, 35), (1639,  0, 34, 35), (1674,  0, 26, 35), (1701,  0, 21, 35),
   (1723,  0, 29, 35), (1753,  0, 22, 35), (1776,  0, 26, 35), (1803,  0, 20, 35),
   (1824,  0, 16, 35), (1841,  0, 16, 35), (1858,  0, 16, 35), (1875,  0, 24, 35),
   (1900,  0, 24, 35), (1925,  0, 25, 35), (1951,  0, 16, 35), (1968,  0, 18, 35),
   (1987,  0, 16, 35), (2004,  0, 18, 35), (2023,  0, 15, 35), (2039,  0, 14, 35),
   (2054,  0, 12, 35), (2067,  0, 17, 35), (2085,  0, 15, 35), (2101,  0, 24, 35),
   (2126,  0, 14, 35), (2141,  0, 24, 35), (2166,  0, 16, 35), (2183,  0, 19, 35),
   (2203,  0, 14, 35), (2218,  0, 21, 35), (2240,  0, 26, 35), (2267,  0, 30, 35),
   (2298,  0, 19, 35), (2318,  0, 29, 35), (2348,  0, 29, 35), (2378,  0, 19, 35),
   (2398,  0, 29, 35), (2428,  0, 29, 35), (2458,  0, 29, 35), (2488,  0, 29, 35),
   (2518,  0, 29, 35), (2548,  0, 29, 35), (2578,  0, 37, 35), (2616,  0, 28, 35),
   (2645,  0, 27, 35), (2673,  0, 27, 35), (2701,  0, 27, 35), (2729,  0, 27, 35),
   (2757,  0, 19, 35), (2777,  0, 19, 35), (2797,  0, 19, 35), (2817,  0, 19, 35),
   (2837,  0, 31, 35), (2869,  0, 32, 35), (2902,  0, 29, 35), (2932,  0, 29, 35),
   (2962,  0, 29, 35), (2992,  0, 29, 35), (3022,  0, 29, 35), (3052,  0, 29, 35),
   (3082,  0, 31, 35), (3114,  0, 31, 35), (3146,  0, 31, 35), (3178,  0, 31, 35),
   (3210,  0, 30, 35), (3241,  0, 23, 35), (3265,  0, 21, 35), (3287,  0, 21, 35),
   (3309,  0, 21, 35), (3331,  0, 21, 35), (3353,  0, 21, 35), (3375,  0, 21, 35),
   (3397,  0, 26, 35), (3424,  0, 20, 35), (3445,  0, 20, 35), (3466,  0, 20, 35),
   (3487,  0, 20, 35), (3508,  0, 20, 35), (3529,  0, 16, 35), (3546,  0, 15, 35),
   (3562,  0, 17, 35), (3580,  0, 17, 35), (3598,  0, 21, 35), (3620,  0, 23, 35),
   (3644,  0, 22, 35), (3667,  0, 22, 35), (3690,  0, 22, 35), (3713,  0, 22, 35),
   (3736,  0, 22, 35), (3759,  0, 22, 35), (3782,  0, 26, 35), (3809,  0, 26, 35),
   (3836,  0, 26, 35), (3863,  0, 26, 35), (3890,  0, 23, 35), (3914,  0, 23, 35));

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

Define KerningPairs
 ("AC","AG","AJ","AO","AQ","AT","AU","AV","AW","AY","Au","Av","Aw","Ay","B,","B.",
  "BA","BU","D,","D.","DA","DF","DJ","DV","DW","DY","F,","F.","FA","Fa","Fe","Fi",
  "Fo","Fr","G,","G.","GY","J,","J.","JA","Ja","Je","Jo","Ju","KO","Ke","Ko","Ku",
  "Ky","LT","LV","LW","LY","Ly","N,","N.","NA","O,","O.","OA","OT","OV","OW","OX",
  "OY","P,","P.","PA","Pa","Pe","Po","Q,","Q.","QU","RO","RT","RU","RV","RW","RY",
  "S,","S.","T,","T-","T.","T:","T;","TA","TO","Ta","Te","Th","Ti","To","Tr","Tu",
  "Tw","Ty","U,","U.","UA","US","V,","V-","V.","V:","V;","VA","VG","VO","Va","Ve",
  "Vi","Vo","Vu","W,","W-","W.","W:","W;","WA","WO","Wa","We","Wh","Wi","Wo","Wu",
  "Wy","XC","XO","Y,","Y-","Y.","Y:","Y;","YA","YO","YS","Ya","Ye","Yi","Yo","Yu",
  "av","aw","ay","b,","b.","bv","by","ch","ck","dv","dw","dy","f,","f.","fe","fo",
  "hy","iv","ke","ko","ky","lw","ly","my","nv","ny","o,","o.","ov","ow","ox","oy",
  "p,","p.","py","r,","r-","r.","ra","rd","re","rg","rk","rl","rq","v,","v.","va",
  "ve","vo","w,","w.","wa","wd","we","wh","wo","xe","xo","y,","y.","ya","yc","ye",
  "yo","ze");

Define KerningValues (  -2,  -2,  -2,  -1,  -1,  -3,  -2,  -4,  -3,  -3,  -1,  -2,  -2,  -2,  -1,  -1,    -1,  -1,  -2,  -2,  -2,  -1,  -2,  -2,  -1,  -3,  -7,  -7,  -3,  -3,  -2,  -2,    -2,  -3,  -2,  -2,  -2,  -2,  -2,  -1,  -2,  -2,  -2,  -2,  -2,  -1,  -2,  -2,    -3,  -4,  -4,  -3,  -4,  -1,  -1,  -1,  -1,  -2,  -2,  -2,  -1,  -1,  -1,  -1,    -1,  -6,  -6,  -3,  -1,  -1,  -1,  -1,  -2,  -1,  -1,  -1,  -1,  -1,  -1,  -2,    -1,  -1,  -5,  -6,  -5,  -5,  -5,  -4,  -2,  -4,  -5,  -1,  -2,  -5,  -5,  -5,    -5,  -5,  -3,  -3,  -3,  -1,  -6,  -4,  -6,  -3,  -3,  -4,  -2,  -1,  -4,  -4,    -2,  -4,  -3,  -6,  -3,  -6,  -3,  -3,  -4,  -1,  -3,  -4,  -1,  -2,  -3,  -3,    -3,  -1,  -1,  -5,  -5,  -5,  -4,  -4,  -3,  -1,  -1,  -5,  -5,  -2,  -5,  -4,    -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,    -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,    -1,  -1,  -1,  -2,  -2,  -2,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -4,  -4,  -1,    -1,  -1,  -4,  -4,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -4,  -4,  -1,  -1,  -1,    -1,  -1);

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

SetDefaultPointSize  22;
