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
 (  30,  33,  33,  33,  25,  23,  33,  33,  17,  20,  32,  22,  42,  32,  32,  30,
    32,  32,  31,  27,  32,  30,  48,  28,  28,  23,  30,  31,  29,  31,  30,  17,
    31,  31,  16,  16,  28,  16,  45,  31,  30,  31,  31,  21,  28,  18,  31,  25,
    39,  26,  26,  21,  32,  22,  30,  31,  29,  32,  32,  23,  32,  32,  31,  20,
    16,  46,  37,  32,  41,  29,  34,  17,  19,  19,  17,  33,  31,  31,  17,  22,
    17,  22,  12,  12,  11,  22,  10,  31,  11,  31,  23,  31,  16,  29,  22,  28,
    31,  29,  32,  31,  30,  30,  30,  30,  30,  30,  48,  33,  25,  25,  25,  25,
    17,  17,  17,  17,  48,  48,  32,  32,  32,  32,  32,  32,  32,  32,  32,  32,
    32,  33,  30,  30,  30,  30,  30,  30,  48,  29,  30,  30,  30,  30,  16,  16,
    16,  16,  30,  31,  30,  30,  30,  30,  30,  30,  31,  31,  31,  31,  26,  26);

Define RectList
 ( (   0,  0, 47, 88), (  48,  0, 44, 88), (  93,  0, 44, 88), ( 138,  0, 44, 88),
   ( 183,  0, 38, 88), ( 222,  0, 36, 88), ( 259,  0, 44, 88), ( 304,  0, 44, 88),
   ( 349,  0, 28, 88), ( 378,  0, 32, 88), ( 411,  0, 47, 88), ( 459,  0, 35, 88),
   ( 495,  0, 53, 88), ( 549,  0, 43, 88), ( 593,  0, 43, 88), ( 637,  0, 42, 88),
   ( 680,  0, 43, 88), ( 724,  0, 43, 88), ( 768,  0, 44, 88), ( 813,  0, 42, 88),
   ( 856,  0, 43, 88), ( 900,  0, 47, 88), ( 948,  0, 63, 88), (1012,  0, 47, 88),
   (1060,  0, 45, 88), (1106,  0, 38, 88), (1145,  0, 42, 88), (1188,  0, 43, 88),
   (1232,  0, 41, 88), (1274,  0, 43, 88), (1318,  0, 42, 88), (1361,  0, 33, 88),
   (1395,  0, 43, 88), (1439,  0, 43, 88), (1483,  0, 28, 88), (1512,  0, 31, 88),
   (1544,  0, 42, 88), (1587,  0, 28, 88), (1616,  0, 57, 88), (1674,  0, 43, 88),
   (1718,  0, 42, 88), (1761,  0, 43, 88), (1805,  0, 43, 88), (1849,  0, 35, 88),
   (1885,  0, 41, 88), (1927,  0, 35, 88), (1963,  0, 43, 88), (2007,  0, 43, 88),
   (2051,  0, 55, 88), (2107,  0, 41, 88), (2149,  0, 42, 88), (2192,  0, 37, 88),
   (2230,  0, 43, 88), (2274,  0, 35, 88), (2310,  0, 41, 88), (2352,  0, 42, 88),
   (2395,  0, 44, 88), (2440,  0, 43, 88), (2484,  0, 43, 88), (2528,  0, 38, 88),
   (2567,  0, 43, 88), (2611,  0, 43, 88), (2655,  0, 43, 88), (2699,  0, 31, 88),
   (2731,  0, 29, 88), (2761,  0, 60, 88), (2822,  0, 53, 88), (2876,  0, 43, 88),
   (2920,  0, 55, 88), (2976,  0, 43, 88), (3020,  0, 50, 88), (3071,  0, 32, 88),
   (3104,  0, 31, 88), (3136,  0, 31, 88), (3168,  0, 31, 88), (3200,  0, 49, 88),
   (3250,  0, 43, 88), (3294,  0, 43, 88), (3338,  0, 30, 88), (3369,  0, 35, 88),
   (3405,  0, 30, 88), (3436,  0, 35, 88), (3472,  0, 25, 88), (3498,  0, 25, 88),
   (3524,  0, 25, 88), (3550,  0, 36, 88), (3587,  0, 24, 88), (3612,  0, 43, 88),
   (3656,  0, 25, 88), (3682,  0, 43, 88), (3726,  0, 38, 88), (3765,  0, 44, 88),
   (3810,  0, 35, 88), (3846,  0, 51, 88), (3898,  0, 43, 88), (3942,  0, 55, 88),
   (3998,  0, 54, 88), (4053,  0, 51, 88), (4105,  0, 53, 88), (4159,  0, 54, 88),
   (4214,  0, 59, 88), (4274,  0, 59, 88), (4334,  0, 59, 88), (4394,  0, 59, 88),
   (4454,  0, 59, 88), (4514,  0, 59, 88), (4574,  0, 79, 88), (4654,  0, 54, 88),
   (4709,  0, 46, 88), (4756,  0, 46, 88), (4803,  0, 46, 88), (4850,  0, 46, 88),
   (4897,  0, 32, 88), (4930,  0, 32, 88), (4963,  0, 32, 88), (4996,  0, 32, 88),
   (5029,  0, 79, 88), (5109,  0, 79, 88), (5189,  0, 53, 88), (5243,  0, 53, 88),
   (5297,  0, 53, 88), (5351,  0, 53, 88), (5405,  0, 53, 88), (5459,  0, 53, 88),
   (5513,  0, 53, 88), (5567,  0, 53, 88), (5621,  0, 53, 88), (5675,  0, 53, 88),
   (5729,  0, 53, 88), (5783,  0, 54, 88), (5838,  0, 52, 88), (5891,  0, 52, 88),
   (5944,  0, 52, 88), (5997,  0, 52, 88), (6050,  0, 52, 88), (6103,  0, 52, 88),
   (6156,  0, 79, 88), (6236,  0, 51, 88), (6288,  0, 52, 88), (6341,  0, 52, 88),
   (6394,  0, 52, 88), (6447,  0, 52, 88), (6500,  0, 32, 88), (6533,  0, 32, 88),
   (6566,  0, 32, 88), (6599,  0, 32, 88), (6632,  0, 52, 88), (6685,  0, 53, 88),
   (6739,  0, 52, 88), (6792,  0, 52, 88), (6845,  0, 52, 88), (6898,  0, 52, 88),
   (6951,  0, 52, 88), (7004,  0, 52, 88), (7057,  0, 53, 88), (7111,  0, 53, 88),
   (7165,  0, 53, 88), (7219,  0, 53, 88), (7273,  0, 52, 88), (7326,  0, 52, 88));

Define OffsetList
 ( (-9, 0), (-6, 0), (-6, 0), (-6, 0), (-6, 0), (-6, 0), (-6, 0), (-6, 0),
   (-6, 0), (-7, 0), (-6, 0), (-6, 0), (-6, 0), (-6, 0), (-6, 0), (-6, 0),
   (-6, 0), (-6, 0), (-7, 0), (-8, 0), (-6, 0), (-9, 0), (-8, 0), (-10, 0),
   (-9, 0), (-8, 0), (-6, 0), (-6, 0), (-6, 0), (-6, 0), (-6, 0), (-8, 0),
   (-6, 0), (-6, 0), (-6, 0), (-9, 0), (-6, 0), (-6, 0), (-6, 0), (-6, 0),
   (-6, 0), (-6, 0), (-6, 0), (-6, 0), (-6, 0), (-8, 0), (-6, 0), (-9, 0),
   (-8, 0), (-8, 0), (-8, 0), (-8, 0), (-6, 0), (-8, 0), (-6, 0), (-6, 0),
   (-8, 0), (-6, 0), (-6, 0), (-8, 0), (-6, 0), (-6, 0), (-6, 0), (-7, 0),
   (-6, 0), (-7, 0), (-7, 0), (-6, 0), (-7, 0), (-7, 0), (-7, 0), (-7, 0),
   (-6, 0), (-6, 0), (-7, 0), (-8, 0), (-6, 0), (-6, 0), (-6, 0), (-7, 0),
   (-7, 0), (-6, 0), (-6, 0), (-6, 0), (-7, 0), (-7, 0), (-7, 0), (-6, 0),
   (-7, 0), (-6, 0), (-8, 0), (-7, 0), (-9, 0), (-11, 0), (-10, 0), (-14, 0),
   (-12, 0), (-11, 0), (-11, 0), (-12, 0), (-15, 0), (-15, 0), (-15, 0), (-15, 0),
   (-15, 0), (-15, 0), (-16, 0), (-11, 0), (-10, 0), (-10, 0), (-10, 0), (-10, 0),
   (-8, 0), (-8, 0), (-8, 0), (-8, 0), (-16, 0), (-16, 0), (-11, 0), (-11, 0),
   (-11, 0), (-11, 0), (-11, 0), (-11, 0), (-11, 0), (-11, 0), (-11, 0), (-11, 0),
   (-11, 0), (-11, 0), (-11, 0), (-11, 0), (-11, 0), (-11, 0), (-11, 0), (-11, 0),
   (-16, 0), (-11, 0), (-11, 0), (-11, 0), (-11, 0), (-11, 0), (-8, 0), (-8, 0),
   (-8, 0), (-8, 0), (-11, 0), (-11, 0), (-11, 0), (-11, 0), (-11, 0), (-11, 0),
   (-11, 0), (-11, 0), (-11, 0), (-11, 0), (-11, 0), (-11, 0), (-13, 0), (-13, 0));

Define KerningPairs
 ("(A","(","(","(","(","(","(","(","24","37","41","47","51","52","57","62",
  "67","71","73","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","ET","F,","F.","FA",
  "FV","FW","FY","F","F","F","F","F","F","F","K)","K,","K.","KA","KC","KJ",
  "KO","KQ","KS","KZ","K]","K}","K","K","K","K","K","K","K","K","K","K",
  "K","L,","L.","LA","LC","LG","LO","LQ","LT","LV","LW","LX","LY","LZ","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/","VA","VJ","VY","Vy","V","V","V","V","V","V","V","W,","W.","W/","WA",
  "WJ","WY","Wy","W","W","W","W","W","W","W","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","vz","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","}","","","","","","","","T","T",")",",",
  ".","/","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","}","","","","",
  "","","","T",")",",",".","/","A","J","T","V","W","X","Y","Z",
  "]","x","z","}","","","","","","","","T","T");

Define KerningValues

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

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

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

     1,  -1,  -1,   1,   1,   1,  -1,   1,   1,  -1,  -7,  -7,  -4,  -1,  -2,  -1,

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

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

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

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

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

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

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

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

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

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

     1,   1,   1,   1,   1,   1,   1,   1,   1,   1,   1,   1,  -1,  -1,   1,   1,

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

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

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

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

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

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

CreateLayer               Main;
LayerSetImage             Main 'Impact44';
LayerSetAscent            Main 68;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (10);
LayerSetKerningPairs      Main KerningPairs KerningValues;
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 8;
LayerSetLineSpacingOffset Main -8;
LayerSetPointSize         Main 44;

SetDefaultPointSize  44;
