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
 (  17,  19,  19,  19,  15,  14,  19,  19,  10,  12,  19,  13,  25,  19,  19,  18,
    19,  19,  18,  16,  19,  17,  29,  17,  17,  14,  18,  18,  17,  18,  18,  10,
    18,  18,   9,   9,  17,   9,  27,  18,  18,  18,  18,  13,  16,  11,  18,  14,
    22,  14,  16,  12,  19,  13,  18,  19,  17,  19,  19,  14,  19,  19,  18,  12,
     9,  27,  22,  19,  24,  17,  20,  10,  11,  11,  10,  19,  19,  19,  10,  13,
    10,  13,   7,   7,   6,  13,   6,  19,   6,  19,  14,  18,   9,  17,  13,  17,
    18,  17,  19,  18,  17,  17,  17,  17,  17,  17,  29,  19,  15,  15,  15,  15,
    10,  10,  10,  10,  29,  29,  19,  19,  19,  19,  19,  19,  19,  19,  19,  19,
    19,  19,  18,  18,  18,  18,  18,  18,  29,  17,  18,  18,  18,  18,   9,   9,
     9,   9,  18,  18,  18,  18,  18,  18,  18,  18,  18,  18,  18,  18,  16,  16);

Define RectList
 ( (   0,  0, 31, 54), (  32,  0, 27, 54), (  60,  0, 27, 54), (  88,  0, 27, 54),
   ( 116,  0, 24, 54), ( 141,  0, 24, 54), ( 166,  0, 27, 54), ( 194,  0, 27, 54),
   ( 222,  0, 18, 54), ( 241,  0, 22, 54), ( 264,  0, 30, 54), ( 295,  0, 23, 54),
   ( 319,  0, 33, 54), ( 353,  0, 27, 54), ( 381,  0, 27, 54), ( 409,  0, 27, 54),
   ( 437,  0, 27, 54), ( 465,  0, 27, 54), ( 493,  0, 28, 54), ( 522,  0, 28, 54),
   ( 551,  0, 27, 54), ( 579,  0, 29, 54), ( 609,  0, 39, 54), ( 649,  0, 31, 54),
   ( 681,  0, 28, 54), ( 710,  0, 26, 54), ( 737,  0, 27, 54), ( 765,  0, 27, 54),
   ( 793,  0, 26, 54), ( 820,  0, 27, 54), ( 848,  0, 27, 54), ( 876,  0, 21, 54),
   ( 898,  0, 27, 54), ( 926,  0, 27, 54), ( 954,  0, 18, 54), ( 973,  0, 20, 54),
   ( 994,  0, 27, 54), (1022,  0, 18, 54), (1041,  0, 36, 54), (1078,  0, 27, 54),
   (1106,  0, 27, 54), (1134,  0, 27, 54), (1162,  0, 27, 54), (1190,  0, 22, 54),
   (1213,  0, 25, 54), (1239,  0, 22, 54), (1262,  0, 27, 54), (1290,  0, 27, 54),
   (1318,  0, 35, 54), (1354,  0, 27, 54), (1382,  0, 29, 54), (1412,  0, 23, 54),
   (1436,  0, 27, 54), (1464,  0, 23, 54), (1488,  0, 26, 54), (1515,  0, 27, 54),
   (1543,  0, 29, 54), (1573,  0, 27, 54), (1601,  0, 27, 54), (1629,  0, 26, 54),
   (1656,  0, 27, 54), (1684,  0, 27, 54), (1712,  0, 28, 54), (1741,  0, 21, 54),
   (1763,  0, 20, 54), (1784,  0, 37, 54), (1822,  0, 33, 54), (1856,  0, 27, 54),
   (1884,  0, 34, 54), (1919,  0, 29, 54), (1949,  0, 32, 54), (1982,  0, 20, 54),
   (2003,  0, 21, 54), (2025,  0, 21, 54), (2047,  0, 21, 54), (2069,  0, 31, 54),
   (2101,  0, 29, 54), (2131,  0, 28, 54), (2160,  0, 20, 54), (2181,  0, 23, 54),
   (2205,  0, 20, 54), (2226,  0, 23, 54), (2250,  0, 17, 54), (2268,  0, 17, 54),
   (2286,  0, 17, 54), (2304,  0, 23, 54), (2328,  0, 17, 54), (2346,  0, 29, 54),
   (2376,  0, 17, 54), (2394,  0, 29, 54), (2424,  0, 26, 54), (2451,  0, 28, 54),
   (2480,  0, 24, 54), (2505,  0, 32, 54), (2538,  0, 27, 54), (2566,  0, 34, 54),
   (2601,  0, 34, 54), (2636,  0, 32, 54), (2669,  0, 33, 54), (2703,  0, 34, 54),
   (2738,  0, 39, 54), (2778,  0, 39, 54), (2818,  0, 39, 54), (2858,  0, 39, 54),
   (2898,  0, 39, 54), (2938,  0, 39, 54), (2978,  0, 49, 54), (3028,  0, 33, 54),
   (3062,  0, 28, 54), (3091,  0, 28, 54), (3120,  0, 28, 54), (3149,  0, 28, 54),
   (3178,  0, 20, 54), (3199,  0, 20, 54), (3220,  0, 20, 54), (3241,  0, 20, 54),
   (3262,  0, 49, 54), (3312,  0, 49, 54), (3362,  0, 33, 54), (3396,  0, 33, 54),
   (3430,  0, 33, 54), (3464,  0, 33, 54), (3498,  0, 33, 54), (3532,  0, 33, 54),
   (3566,  0, 33, 54), (3600,  0, 33, 54), (3634,  0, 33, 54), (3668,  0, 33, 54),
   (3702,  0, 33, 54), (3736,  0, 33, 54), (3770,  0, 33, 54), (3804,  0, 33, 54),
   (3838,  0, 33, 54), (3872,  0, 33, 54), (3906,  0, 33, 54), (3940,  0, 33, 54),
   (3974,  0, 49, 54), (4024,  0, 32, 54), (4057,  0, 33, 54), (4091,  0, 33, 54),
   (4125,  0, 33, 54), (4159,  0, 33, 54), (4193,  0, 20, 54), (4214,  0, 20, 54),
   (4235,  0, 20, 54), (4256,  0, 20, 54), (4277,  0, 33, 54), (4311,  0, 33, 54),
   (4345,  0, 33, 54), (4379,  0, 33, 54), (4413,  0, 33, 54), (4447,  0, 33, 54),
   (4481,  0, 33, 54), (4515,  0, 33, 54), (4549,  0, 33, 54), (4583,  0, 33, 54),
   (4617,  0, 33, 54), (4651,  0, 33, 54), (4685,  0, 35, 54), (4721,  0, 35, 54));

Define OffsetList
 ( (-7, 0), (-4, 0), (-4, 0), (-4, 0), (-4, 0), (-4, 0), (-4, 0), (-4, 0),
   (-4, 0), (-6, 0), (-4, 0), (-4, 0), (-4, 0), (-4, 0), (-4, 0), (-4, 0),
   (-4, 0), (-4, 0), (-5, 0), (-6, 0), (-4, 0), (-6, 0), (-5, 0), (-7, 0),
   (-6, 0), (-6, 0), (-5, 0), (-5, 0), (-5, 0), (-5, 0), (-5, 0), (-6, 0),
   (-5, 0), (-5, 0), (-5, 0), (-7, 0), (-5, 0), (-5, 0), (-5, 0), (-5, 0),
   (-5, 0), (-5, 0), (-5, 0), (-5, 0), (-5, 0), (-6, 0), (-5, 0), (-7, 0),
   (-7, 0), (-7, 0), (-7, 0), (-6, 0), (-4, 0), (-6, 0), (-4, 0), (-4, 0),
   (-6, 0), (-4, 0), (-4, 0), (-6, 0), (-4, 0), (-4, 0), (-5, 0), (-6, 0),
   (-5, 0), (-5, 0), (-6, 0), (-4, 0), (-5, 0), (-6, 0), (-5, 0), (-5, 0),
   (-5, 0), (-5, 0), (-5, 0), (-6, 0), (-5, 0), (-5, 0), (-5, 0), (-5, 0),
   (-5, 0), (-5, 0), (-5, 0), (-5, 0), (-5, 0), (-5, 0), (-5, 0), (-5, 0),
   (-5, 0), (-5, 0), (-6, 0), (-5, 0), (-7, 0), (-8, 0), (-6, 0), (-9, 0),
   (-8, 0), (-8, 0), (-7, 0), (-8, 0), (-11, 0), (-11, 0), (-11, 0), (-11, 0),
   (-11, 0), (-11, 0), (-10, 0), (-7, 0), (-6, 0), (-6, 0), (-6, 0), (-6, 0),
   (-5, 0), (-5, 0), (-5, 0), (-5, 0), (-10, 0), (-10, 0), (-7, 0), (-7, 0),
   (-7, 0), (-7, 0), (-7, 0), (-7, 0), (-7, 0), (-7, 0), (-7, 0), (-7, 0),
   (-7, 0), (-7, 0), (-8, 0), (-8, 0), (-8, 0), (-8, 0), (-8, 0), (-8, 0),
   (-10, 0), (-8, 0), (-8, 0), (-8, 0), (-8, 0), (-8, 0), (-6, 0), (-6, 0),
   (-6, 0), (-6, 0), (-8, 0), (-8, 0), (-8, 0), (-8, 0), (-8, 0), (-8, 0),
   (-8, 0), (-8, 0), (-8, 0), (-8, 0), (-8, 0), (-8, 0), (-10, 0), (-10, 0));

Define KerningPairs
 ("(A","(","(","(","(","(","(","(","24","41","47","51","52","57","71","74",
  "77","A)","A,","A.","A/","AA","AJ","AT","AV","AW","AX","AY","AZ","A]","Ax","Az",
  "A}","A","A","A","A","A","A","A","F,","F.","FA","FV","FW","FY","F","F",
  "F","F","F","F","F","K)","K,","K.","KA","KC","KO","KQ","KS","KZ","K]","K}",
  "K","K","K","K","K","K","K","K","K","K","K","L,","L.","LA","LC","LO",
  "LQ","LT","LV","LW","LX","LY","Ly","L","L","L","L","L","L","L","L","L",
  "L","L","P,","P.","P/","PA","PJ","P","P","P","P","P","P","P","T,","T-",
  "T.","T/","TA","TJ","TV","TW","TY","Ta","Tc","Te","Tv","Tw","Ty","T","T","T",
  "T","T","T","T","T","T","V,","V.","V/","VJ","VY","Vy","W,","W.","W/","WJ",
  "WY","Wy","X,","X.","XA","XJ","X","X","X","X","X","X","X","Y,","Y.","Y/",
  "YA","YJ","Ya","Yc","Yd","Ye","Yg","Yo","Yq","Ys","Y","Y","Y","Y","Y","Y",
  "Y","Y","Y","Z,","Z.","ZA","Zy","Z","Z","Z","Z","Z","Z","Z","[A","[",
  "[","[","[","[","[","[","fv","fw","fy","r,","r.","rf","rt","rv","rw","ry",
  "t,","t.","tv","ty","tz","v,","v.","vf","vt","vy","wf","wy","x,","x.","xy","y,",
  "y.","yf","yt","yv","yx","z,","z.","zf","zt","zv","zw","zy","zz","{A","{","{",
  "{","{","{","{","{",")",",",".","/","A","J","T","V","W","X","Y",
  "Z","]","x","z","}","","","","","","","",")",",",".","/",
  "A","J","T","V","W","X","Y","Z","]","x","z","}","","","","",
  "","","",")",",",".","/","A","J","T","V","W","X","Y","Z","]",
  "x","z","}","","","","","","","",")",",",".","/","A","J",
  "T","V","W","X","Y","Z","]","x","z","}","","","","","","",
  "",")",",",".","/","A","J","T","V","W","X","Y","Z","]","x","z",
  "}","","","","","","","",")",",",".","/","A","J","T","V",
  "W","X","Y","Z","]","x","z","}","","","","","","","");

Define KerningValues

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

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

     1,   1,   1,   1,   1,   1,   1,   1,  -2,  -2,  -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,   1,  -1,  -1,

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

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

    -3,  -3,  -1,  -2,   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,   1,   1,   1,   1,   1,   1,  -3,  -3,  -3,

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

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

     1,   1,   1,   1,   1,   1,   1,   1,   1,  -2,  -2,   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,   1,   1,

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

     1,   1,   1,   1,   1,   1,   1,   1,   1,   1,   1,   1,   1,   1,   1,   1,

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

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

     1,   1,   1,   1,   1,   1,   1,   1,   1,   1,   1,   1,   1,   1,   1,   1,

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

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

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

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

CreateLayer               Main;
LayerSetImage             Main 'Impact26';
LayerSetAscent            Main 41;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (6);
LayerSetKerningPairs      Main KerningPairs KerningValues;
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 6;
LayerSetLineSpacingOffset Main -6;
LayerSetPointSize         Main 26;

SetDefaultPointSize  26;
