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
 (  16,  16,  16,  16,  15,  14,  18,  18,   8,  14,  18,  14,  20,  18,  18,  15,
    18,  16,  15,  15,  18,  16,  21,  16,  16,  15,  14,  14,  14,  14,  14,   8,
    14,  14,   7,   7,  14,   7,  21,  14,  14,  14,  14,   9,  13,   9,  14,  13,
    20,  14,  13,  12,  14,  14,  14,  14,  14,  14,  14,  14,  14,  14,  14,   7,
     7,  16,  14,  14,  21,  14,  19,  12,   8,   8,   7,  11,  14,  14,   8,   8,
     8,   8,   7,   7,   6,  11,   7,  14,   7,  14,   6,  13);

Define RectList
 ( (   0,  0, 17, 29), (  18,  0, 14, 29), (  33,  0, 14, 29), (  48,  0, 14, 29),
   (  63,  0, 13, 29), (  77,  0, 12, 29), (  90,  0, 16, 29), ( 107,  0, 16, 29),
   ( 124,  0,  5, 29), ( 130,  0, 13, 29), ( 144,  0, 17, 29), ( 162,  0, 12, 29),
   ( 175,  0, 18, 29), ( 194,  0, 16, 29), ( 211,  0, 16, 29), ( 228,  0, 13, 29),
   ( 242,  0, 17, 29), ( 260,  0, 15, 29), ( 276,  0, 13, 29), ( 290,  0, 15, 29),
   ( 306,  0, 16, 29), ( 323,  0, 17, 29), ( 341,  0, 21, 29), ( 363,  0, 17, 29),
   ( 381,  0, 17, 29), ( 399,  0, 13, 29), ( 413,  0, 13, 29), ( 427,  0, 12, 29),
   ( 440,  0, 12, 29), ( 453,  0, 12, 29), ( 466,  0, 12, 29), ( 479,  0, 10, 29),
   ( 490,  0, 12, 29), ( 503,  0, 12, 29), ( 516,  0,  5, 29), ( 522,  0,  7, 29),
   ( 530,  0, 13, 29), ( 544,  0,  5, 29), ( 550,  0, 19, 29), ( 570,  0, 12, 29),
   ( 583,  0, 12, 29), ( 596,  0, 12, 29), ( 609,  0, 12, 29), ( 622,  0,  8, 29),
   ( 631,  0, 11, 29), ( 643,  0,  9, 29), ( 653,  0, 12, 29), ( 666,  0, 13, 29),
   ( 680,  0, 19, 29), ( 700,  0, 13, 29), ( 714,  0, 13, 29), ( 728,  0, 10, 29),
   ( 739,  0, 12, 29), ( 752,  0,  9, 29), ( 762,  0, 12, 29), ( 775,  0, 12, 29),
   ( 788,  0, 14, 29), ( 803,  0, 12, 29), ( 816,  0, 12, 29), ( 829,  0, 12, 29),
   ( 842,  0, 12, 29), ( 855,  0, 12, 29), ( 868,  0, 12, 29), ( 881,  0,  6, 29),
   ( 888,  0,  5, 29), ( 894,  0, 16, 29), ( 911,  0, 14, 29), ( 926,  0, 14, 29),
   ( 941,  0, 19, 29), ( 961,  0, 12, 29), ( 974,  0, 18, 29), ( 993,  0,  8, 29),
   (1002,  0,  6, 29), (1009,  0,  6, 29), (1016,  0,  7, 29), (1024,  0, 11, 29),
   (1036,  0, 11, 29), (1048,  0, 11, 29), (1060,  0,  7, 29), (1068,  0,  8, 29),
   (1077,  0,  7, 29), (1085,  0,  8, 29), (1094,  0,  5, 29), (1100,  0,  5, 29),
   (1106,  0,  5, 29), (1112,  0, 11, 29), (1124,  0,  5, 29), (1130,  0, 12, 29),
   (1143,  0,  5, 29), (1149,  0, 12, 29), (1162,  0,  6, 29), (1169,  0, 12, 29));

Define OffsetList
 ( (-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), ( 1, 0), ( 1, 0),
   ( 1, 0), ( 1, 0), ( 1, 0), ( 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),
   ( 1, 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), (-1, 0), ( 1, 0), ( 0, 0),
   ( 0, 0), ( 0, 0), ( 0, 0), ( 1, 0), ( 1, 0), ( 2, 0), ( 1, 0), ( 1, 0),
   ( 0, 0), ( 1, 0), ( 1, 0), ( 1, 0), ( 1, 0), ( 1, 0), ( 1, 0), (-1, 0),
   ( 1, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 1, 0), ( 1, 0), ( 1, 0), ( 2, 0),
   ( 1, 0), ( 1, 0), ( 0, 0), ( 0, 0), ( 1, 0), ( 1, 0), ( 0, 0), ( 0, 0),
   ( 0, 0), ( 0, 0), ( 1, 0), ( 1, 0), ( 1, 0), ( 0, 0), ( 1, 0), ( 1, 0),
   ( 1, 0), ( 1, 0), ( 0, 0), ( 1, 0));

Define KerningPairs
 ("AT","AU","AV","AY","B,","BU","C,","DA","DV","DY","F,","F.","FA","Fa","Fe","Fo",
  "Fr","J.","JA","Je","Jo","Ju","KC","KG","KO","Ke","Ko","Ku","LT","LU","LV","LY",
  "O.","OA","OT","OV","OX","OY","P,","P.","PA","Pe","Po","Q,","QV","QY","RY","Re",
  "Ro","T,","T-","T.","T:","T;","TA","TC","TG","TO","TQ","Ta","Tc","Te","Th","Tm",
  "To","Tr","Ts","Tu","Tz","U,","U.","UA","V,","V-","V.","V:","V;","VA","VC","VG",
  "VO","VQ","Va","Ve","Vo","Vr","Vu","W,","W.","Wd","We","Wh","Wi","Wo","XC","XG",
  "XO","Y,","Y-","Y.","Y:","Y;","YA","YC","YG","YO","YS","Ya","Yd","Ye","Yo","Yp",
  "Yq","Yu","Yv","bv","cl","eg","ev","ex","f!","f,","f.","f?","ff","ke","ko","nv",
  "ov","ox","pw","r,","r.","r:","r;","rd","rg","rj","rk","rl","rm","rn","rp","rq",
  "rr","rs","rt","ru","rv","ry","sw","v,","v.","vc","ve","vo","vq","w,","w.","y,",
  "y.");

Define KerningValues

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

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

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

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

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

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

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

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

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

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

    -2);

CreateLayer               Main;
LayerSetImage             Main 'ArialBlack16Bold';
LayerSetAscent            Main 23;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (7);
LayerSetKerningPairs      Main KerningPairs KerningValues;
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 0;
LayerSetLineSpacingOffset Main 0;
LayerSetPointSize         Main 16;

SetDefaultPointSize  16;
