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

Define RectList
 ( (   0,  0, 27, 36), (  28,  0, 23, 36), (  52,  0, 24, 36), (  77,  0, 22, 36),
   ( 100,  0, 21, 36), ( 122,  0, 20, 36), ( 143,  0, 25, 36), ( 169,  0, 27, 36),
   ( 197,  0, 16, 36), ( 214,  0, 16, 36), ( 231,  0, 25, 36), ( 257,  0, 21, 36),
   ( 279,  0, 33, 36), ( 313,  0, 27, 36), ( 341,  0, 26, 36), ( 368,  0, 22, 36),
   ( 391,  0, 26, 36), ( 418,  0, 25, 36), ( 444,  0, 20, 36), ( 465,  0, 25, 36),
   ( 491,  0, 27, 36), ( 519,  0, 27, 36), ( 547,  0, 36, 36), ( 584,  0, 29, 36),
   ( 614,  0, 29, 36), ( 644,  0, 24, 36), ( 669,  0, 22, 36), ( 692,  0, 19, 36),
   ( 712,  0, 20, 36), ( 733,  0, 19, 36), ( 753,  0, 18, 36), ( 772,  0, 17, 36),
   ( 790,  0, 21, 36), ( 812,  0, 22, 36), ( 835,  0, 14, 36), ( 850,  0, 14, 36),
   ( 865,  0, 20, 36), ( 886,  0, 18, 36), ( 905,  0, 25, 36), ( 931,  0, 22, 36),
   ( 954,  0, 21, 36), ( 976,  0, 18, 36), ( 995,  0, 23, 36), (1019,  0, 21, 36),
   (1041,  0, 17, 36), (1059,  0, 20, 36), (1080,  0, 22, 36), (1103,  0, 22, 36),
   (1126,  0, 29, 36), (1156,  0, 24, 36), (1181,  0, 23, 36), (1205,  0, 19, 36),
   (1225,  0, 21, 36), (1247,  0, 16, 36), (1264,  0, 22, 36), (1287,  0, 20, 36),
   (1308,  0, 23, 36), (1332,  0, 21, 36), (1354,  0, 21, 36), (1376,  0, 21, 36),
   (1398,  0, 21, 36), (1420,  0, 21, 36), (1442,  0, 20, 36), (1463,  0, 13, 36),
   (1477,  0, 11, 36), (1489,  0, 26, 36), (1516,  0, 20, 36), (1537,  0, 18, 36),
   (1556,  0, 22, 36), (1579,  0, 14, 36), (1594,  0, 19, 36), (1614,  0, 16, 36),
   (1631,  0, 12, 36), (1644,  0, 13, 36), (1658,  0, 17, 36), (1676,  0, 17, 36),
   (1694,  0, 20, 36), (1715,  0, 18, 36), (1734,  0, 13, 36), (1748,  0, 15, 36),
   (1764,  0, 13, 36), (1778,  0, 15, 36), (1794,  0, 13, 36), (1808,  0, 12, 36),
   (1821,  0, 13, 36), (1835,  0, 20, 36), (1856,  0, 13, 36), (1870,  0, 17, 36),
   (1888,  0, 12, 36), (1901,  0, 17, 36), (1919,  0, 17, 36), (1937,  0, 17, 36),
   (1955,  0, 12, 36), (1968,  0, 20, 36), (1989,  0, 18, 36), (2008,  0, 20, 36),
   (2029,  0, 16, 36), (2046,  0, 22, 36), (2069,  0, 22, 36), (2092,  0, 17, 36),
   (2110,  0, 27, 36), (2138,  0, 27, 36), (2166,  0, 27, 36), (2194,  0, 27, 36),
   (2222,  0, 27, 36), (2250,  0, 27, 36), (2278,  0, 31, 36), (2310,  0, 17, 36),
   (2328,  0, 21, 36), (2350,  0, 21, 36), (2372,  0, 21, 36), (2394,  0, 21, 36),
   (2416,  0, 16, 36), (2433,  0, 16, 36), (2450,  0, 16, 36), (2467,  0, 16, 36),
   (2484,  0, 23, 36), (2508,  0, 27, 36), (2536,  0, 26, 36), (2563,  0, 26, 36),
   (2590,  0, 26, 36), (2617,  0, 26, 36), (2644,  0, 26, 36), (2671,  0, 26, 36),
   (2698,  0, 27, 36), (2726,  0, 27, 36), (2754,  0, 27, 36), (2782,  0, 27, 36),
   (2810,  0, 29, 36), (2840,  0, 19, 36), (2860,  0, 22, 36), (2883,  0, 22, 36),
   (2906,  0, 22, 36), (2929,  0, 22, 36), (2952,  0, 27, 36), (2980,  0, 27, 36),
   (3008,  0, 31, 36), (3040,  0, 16, 36), (3057,  0, 18, 36), (3076,  0, 18, 36),
   (3095,  0, 18, 36), (3114,  0, 18, 36), (3133,  0, 14, 36), (3148,  0, 14, 36),
   (3163,  0, 14, 36), (3178,  0, 15, 36), (3194,  0, 21, 36), (3216,  0, 22, 36),
   (3239,  0, 21, 36), (3261,  0, 21, 36), (3283,  0, 21, 36), (3305,  0, 21, 36),
   (3327,  0, 26, 36), (3354,  0, 21, 36), (3376,  0, 22, 36), (3399,  0, 22, 36),
   (3422,  0, 22, 36), (3445,  0, 22, 36), (3468,  0, 23, 36), (3492,  0, 23, 36));

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

Define KerningPairs
 ("AV","AW","Av","Aw","F,","F.","FA","LT","LV","LW","P,","P.","PA","T,","T.","TA",
  "Ta","To","V,","V.","VA","Va","W,","W.","WA","Wa","Wo","Y,","Y.","Ya","Yo","Yq",
  "av","w,","w.","y,","y.");

Define KerningValues (  -2,  -2,  -1,  -2,  -2,  -2,  -1,  -2,  -2,  -2,  -3,  -3,  -2,  -2,  -1,  -2,    -1,  -1,  -3,  -3,  -2,  -2,  -3,  -3,  -4,  -3,  -1,  -3,  -2,  -1,  -1,  -1,    -1,  -2,  -2,  -3,  -2);

CreateLayer               Main;
LayerSetImage             Main 'DwarvenTodcraft24';
LayerSetAscent            Main 27;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (14);
LayerSetKerningPairs      Main KerningPairs KerningValues;
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 0;
LayerSetLineSpacingOffset Main 0;
LayerSetPointSize         Main 24;

SetDefaultPointSize  24;
