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
 (  27,  25,  25,  25,  26,  24,  28,  28,  17,  26,  27,  23,  35,  30,  27,  26,
    27,  26,  26,  24,  27,  25,  34,  28,  29,  25,  21,  20,  19,  21,  20,  19,
    21,  20,  14,  13,  22,  12,  26,  20,  20,  20,  20,  19,  20,  20,  21,  23,
    31,  25,  22,  20,  27,  16,  24,  26,  28,  27,  27,  25,  27,  27,  16,  16,
    19,  30,  29,  26,  26,  16,  26,  18,  14,  14,  12,  16,  27,  27,  14,  14,
    14,  14,  13,  13,   9,  16,  13,  16,  13,  16,  17,  27,  27,  27,  27,  27,
    22,   9,   9,  27,  27,  27,  27,  27,  27,  27,  27,  25,  26,  26,  26,  26,
    17,  17,  17,  17,  27,  30,  27,  27,  27,  27,  27,  27,  27,  27,  27,  27,
    29,  27,  21,  21,  21,  21,  21,  21,  27,  19,  20,  20,  20,  20,  14,  14,
    14,  14,  27,  20,  20,  20,  20,  20,  20,  20,  21,  21,  21,  21,  22,  22);

Define RectList
 ( (   0,  0, 34, 43), (  35,  0, 30, 43), (  66,  0, 28, 43), (  95,  0, 30, 43),
   ( 126,  0, 31, 43), ( 158,  0, 30, 43), ( 189,  0, 32, 43), ( 222,  0, 32, 43),
   ( 255,  0, 24, 43), ( 280,  0, 30, 43), ( 311,  0, 33, 43), ( 345,  0, 28, 43),
   ( 374,  0, 40, 43), ( 415,  0, 34, 43), ( 450,  0, 29, 43), ( 480,  0, 30, 43),
   ( 511,  0, 32, 43), ( 544,  0, 31, 43), ( 576,  0, 29, 43), ( 606,  0, 30, 43),
   ( 637,  0, 30, 43), ( 668,  0, 33, 43), ( 702,  0, 40, 43), ( 743,  0, 35, 43),
   ( 779,  0, 37, 43), ( 817,  0, 30, 43), ( 848,  0, 24, 43), ( 873,  0, 23, 43),
   ( 897,  0, 22, 43), ( 920,  0, 24, 43), ( 945,  0, 23, 43), ( 969,  0, 24, 43),
   ( 994,  0, 24, 43), (1019,  0, 23, 43), (1043,  0, 19, 43), (1063,  0, 22, 43),
   (1086,  0, 27, 43), (1114,  0, 18, 43), (1133,  0, 30, 43), (1164,  0, 24, 43),
   (1189,  0, 22, 43), (1212,  0, 23, 43), (1236,  0, 23, 43), (1260,  0, 23, 43),
   (1284,  0, 23, 43), (1308,  0, 23, 43), (1332,  0, 23, 43), (1356,  0, 29, 43),
   (1386,  0, 35, 43), (1422,  0, 29, 43), (1452,  0, 24, 43), (1477,  0, 24, 43),
   (1502,  0, 29, 43), (1532,  0, 20, 43), (1553,  0, 29, 43), (1583,  0, 30, 43),
   (1614,  0, 32, 43), (1647,  0, 29, 43), (1677,  0, 29, 43), (1707,  0, 28, 43),
   (1736,  0, 29, 43), (1766,  0, 29, 43), (1796,  0, 20, 43), (1817,  0, 13, 43),
   (1831,  0, 25, 43), (1857,  0, 33, 43), (1891,  0, 32, 43), (1924,  0, 30, 43),
   (1955,  0, 30, 43), (1986,  0, 19, 43), (2006,  0, 28, 43), (2035,  0, 17, 43),
   (2053,  0, 17, 43), (2071,  0, 16, 43), (2088,  0, 14, 43), (2103,  0, 20, 43),
   (2124,  0, 23, 43), (2148,  0, 24, 43), (2173,  0, 17, 43), (2191,  0, 18, 43),
   (2210,  0, 17, 43), (2228,  0, 18, 43), (2247,  0, 13, 43), (2261,  0, 13, 43),
   (2275,  0, 11, 43), (2287,  0, 18, 43), (2306,  0, 13, 43), (2320,  0, 18, 43),
   (2339,  0, 13, 43), (2353,  0, 18, 43), (2372,  0, 20, 43), (2393,  0, 29, 43),
   (2450,  0, 240, 43), (2690,  0, 270, 43), (2960,  0, 270, 43), (3230,  0, 600, 43),
   (3830,  0, 240, 43), (4070,  0, 67, 43), (4138,  0, 120, 43), (4260,  0, 120, 43),
   (4380,  0, 120, 43), (4500,  0, 120, 43), (4620,  0, 120, 43), (4740,  0, 120, 43),
   (4860,  0, 120, 43), (4980,  0, 120, 43), (5102,  0, 120, 43), (5223,  0, 120, 43),
   (5344,  0, 210, 43), (5556,  0, 120, 43), (5676,  0, 120, 43), (5793,  0, 150, 43),
   (5943,  0, 90, 43), (6033,  0, 95, 43), (6128,  0, 270, 43), (6400,  0, 180, 43),
   (6580,  0, 121, 43), (6701,  0, 60, 43), (6761,  0, 61, 43), (6822,  0, 120, 43),
   (6942,  0, 210, 43), (7152,  0, 210, 43), (3306,  0, 29, 43), (3336,  0, 29, 43),
   (3366,  0, 30, 43), (3397,  0, 30, 43), (3428,  0, 30, 43), (3459,  0, 30, 43),
   (3490,  0, 37, 43), (3528,  0, 29, 43), (3558,  0, 24, 43), (3583,  0, 24, 43),
   (3608,  0, 24, 43), (3633,  0, 24, 43), (3658,  0, 24, 43), (3683,  0, 24, 43),
   (3708,  0, 29, 43), (3738,  0, 22, 43), (3761,  0, 23, 43), (3785,  0, 23, 43),
   (3809,  0, 23, 43), (3833,  0, 23, 43), (3857,  0, 19, 43), (3877,  0, 19, 43),
   (3897,  0, 19, 43), (3917,  0, 19, 43), (3937,  0, 29, 43), (3967,  0, 24, 43),
   (3992,  0, 22, 43), (4015,  0, 22, 43), (4038,  0, 22, 43), (4061,  0, 22, 43),
   (4084,  0, 22, 43), (4107,  0, 22, 43), (4130,  0, 23, 43), (4154,  0, 23, 43),
   (4178,  0, 23, 43), (7424,  0, 120, 43), (7362,  0, 62, 43), (4251,  0, 24, 43));

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

Define KerningPairs
 ("-T","-V","-Y","07","1.","12","14","16","18","34","37","41","44","57","64","67",
  "7,","7.","74","76","77","7:","81","87","97","A,","A.","AG","AT","AV","AW","AY",
  "Aa","Ac","Ae","Ag","Ao","Aq","Au","Av","Aw","Ay","BA","BW","DA","DV","DW","DX",
  "DY","F,","F-","FJ","FO","Fi","Fj","Fr","GA","JA","KG","KO","KT","L-","LA","LC",
  "LG","LO","LT","LU","LV","LY","NA","Ne","No","Nu","OA","OV","OW","OX","OY","P,",
  "P-","P.","PA","SA","SV","SW","SY","T,","T-","T.","T:","T;","TC","TG","TJ","TO",
  "TV","TW","TY","Ta","Tc","Te","Tg","Tj","To","Ts","Tu","Ty","U,","U.","UA","V,",
  "V-","V.","V:","V;","VC","VG","VO","VS","VT","Va","Ve","Vg","Vo","Vr","Vu","Vy",
  "W,","W-","W.","W;","WC","WG","WO","WS","WT","Wa","We","Wg","Wi","Wo","Wr","Wu",
  "Wy","X-","XC","XO","XQ","Xa","Xe","Xo","Xu","Xy","Y,","Y-","Y.","Y:","Y;","YA",
  "YG","YO","YS","YT","Ya","Ye","Yg","Yi","Yo","Yp","Yu","aj","av","aw","bw","ch",
  "ev","ew","ex","fi","fj","ft","iT","ij","k,","k-","k.","ks","lv","ow","ox","r,",
  "r.","r:","r;","rf","ri","rj","rm","rn","rp","rr","rt","rv","rw","rx","rz","t:",
  "t;","th","v,","v-","v.","v:","v;","vc","ve","vo","w,","w-","w.","wa","wc","we",
  "wg","wo","ws","xc","xe","xo","y:","y;");

Define KerningValues

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

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

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

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

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

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

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

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

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

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

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

CreateLayer               Main;
LayerSetImage             Main 'Font24_eng';
LayerSetAscent            Main 33;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (14);
LayerSetKerningPairs      Main KerningPairs KerningValues;
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 1;
LayerSetLineSpacingOffset Main -2;
LayerSetPointSize         Main 24;

SetDefaultPointSize  24;
