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
 (  33,  27,  29,  27,  26,  25,  29,  34,  18,  18,  30,  25,  44,  35,  33,  27,
    33,  29,  22,  29,  33,  33,  48,  38,  34,  29,  25,  20,  22,  20,  19,  19,
    23,  25,  13,  13,  23,  19,  32,  25,  24,  20,  30,  23,  18,  23,  25,  25,
    36,  29,  28,  22,  23,  15,  24,  23,  26,  23,  24,  26,  23,  23,  23,   8,
    11,  35,  22,  18,  25,  14,  20,  16,  11,  11,  18,  16,  22,  19,  11,  14,
    12,  15,  12,  12,   8,  26,  12,  17,  12,  17,  18,  19,  11,  22,  19,  20,
    16,  26,  25,  21,  33,  33,  33,  33,  33,  33,  38,  16,  26,  26,  26,  26,
    18,  18,  18,  18,  27,  35,  33,  33,  33,  33,  33,  33,  33,  33,  33,  33,
    34,  20,  25,  25,  25,  25,  33,  33,  38,  17,  19,  19,  19,  19,  13,  13,
    13,  14,  24,  25,  24,  24,  24,  24,  33,  24,  25,  25,  25,  25,  25,  25);

Define RectList
 ( (   0,  0, 37, 59), (  38,  0, 31, 59), (  70,  0, 33, 59), ( 104,  0, 30, 59),
   ( 135,  0, 29, 59), ( 165,  0, 27, 59), ( 193,  0, 35, 59), ( 229,  0, 37, 59),
   ( 267,  0, 21, 59), ( 289,  0, 21, 59), ( 311,  0, 34, 59), ( 346,  0, 29, 59),
   ( 376,  0, 47, 59), ( 424,  0, 37, 59), ( 462,  0, 36, 59), ( 499,  0, 29, 59),
   ( 529,  0, 36, 59), ( 566,  0, 34, 59), ( 601,  0, 26, 59), ( 628,  0, 34, 59),
   ( 663,  0, 37, 59), ( 701,  0, 37, 59), ( 739,  0, 51, 59), ( 791,  0, 41, 59),
   ( 833,  0, 41, 59), ( 875,  0, 32, 59), ( 908,  0, 29, 59), ( 938,  0, 25, 59),
   ( 964,  0, 26, 59), ( 991,  0, 25, 59), (1017,  0, 23, 59), (1041,  0, 23, 59),
   (1065,  0, 28, 59), (1094,  0, 29, 59), (1124,  0, 17, 59), (1142,  0, 17, 59),
   (1160,  0, 27, 59), (1188,  0, 23, 59), (1212,  0, 36, 59), (1249,  0, 30, 59),
   (1280,  0, 29, 59), (1310,  0, 24, 59), (1335,  0, 31, 59), (1367,  0, 28, 59),
   (1396,  0, 22, 59), (1419,  0, 27, 59), (1447,  0, 29, 59), (1477,  0, 29, 59),
   (1507,  0, 40, 59), (1548,  0, 32, 59), (1581,  0, 32, 59), (1614,  0, 26, 59),
   (1641,  0, 28, 59), (1670,  0, 21, 59), (1692,  0, 28, 59), (1721,  0, 27, 59),
   (1749,  0, 31, 59), (1781,  0, 28, 59), (1810,  0, 29, 59), (1840,  0, 28, 59),
   (1869,  0, 28, 59), (1898,  0, 28, 59), (1927,  0, 28, 59), (1956,  0, 16, 59),
   (1973,  0, 14, 59), (1988,  0, 35, 59), (2024,  0, 27, 59), (2052,  0, 24, 59),
   (2077,  0, 30, 59), (2108,  0, 18, 59), (2127,  0, 26, 59), (2154,  0, 20, 59),
   (2175,  0, 15, 59), (2191,  0, 16, 59), (2208,  0, 22, 59), (2231,  0, 22, 59),
   (2254,  0, 27, 59), (2282,  0, 24, 59), (2307,  0, 16, 59), (2324,  0, 19, 59),
   (2344,  0, 16, 59), (2361,  0, 19, 59), (2381,  0, 16, 59), (2398,  0, 15, 59),
   (2414,  0, 16, 59), (2431,  0, 27, 59), (2459,  0, 16, 59), (2476,  0, 22, 59),
   (2499,  0, 15, 59), (2515,  0, 22, 59), (2538,  0, 23, 59), (2562,  0, 22, 59),
   (2585,  0, 14, 59), (2600,  0, 27, 59), (2628,  0, 25, 59), (2654,  0, 26, 59),
   (2681,  0, 21, 59), (2703,  0, 30, 59), (2734,  0, 29, 59), (2764,  0, 22, 59),
   (2787,  0, 37, 59), (2825,  0, 37, 59), (2863,  0, 37, 59), (2901,  0, 37, 59),
   (2939,  0, 37, 59), (2977,  0, 37, 59), (3015,  0, 43, 59), (3059,  0, 23, 59),
   (3083,  0, 29, 59), (3113,  0, 29, 59), (3143,  0, 29, 59), (3173,  0, 29, 59),
   (3203,  0, 21, 59), (3225,  0, 21, 59), (3247,  0, 21, 59), (3269,  0, 21, 59),
   (3291,  0, 31, 59), (3323,  0, 37, 59), (3361,  0, 36, 59), (3398,  0, 36, 59),
   (3435,  0, 36, 59), (3472,  0, 36, 59), (3509,  0, 36, 59), (3546,  0, 36, 59),
   (3583,  0, 37, 59), (3621,  0, 37, 59), (3659,  0, 37, 59), (3697,  0, 37, 59),
   (3735,  0, 41, 59), (3777,  0, 25, 59), (3803,  0, 29, 59), (3833,  0, 29, 59),
   (3863,  0, 29, 59), (3893,  0, 29, 59), (3923,  0, 37, 59), (3961,  0, 37, 59),
   (3999,  0, 43, 59), (4043,  0, 21, 59), (4065,  0, 23, 59), (4089,  0, 23, 59),
   (4113,  0, 23, 59), (4137,  0, 23, 59), (4161,  0, 17, 59), (4179,  0, 17, 59),
   (4197,  0, 18, 59), (4216,  0, 19, 59), (4236,  0, 29, 59), (4266,  0, 30, 59),
   (4297,  0, 29, 59), (4327,  0, 29, 59), (4357,  0, 29, 59), (4387,  0, 29, 59),
   (4417,  0, 36, 59), (4454,  0, 29, 59), (4484,  0, 29, 59), (4514,  0, 29, 59),
   (4544,  0, 29, 59), (4574,  0, 29, 59), (4604,  0, 32, 59), (4637,  0, 32, 59));

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

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

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

CreateLayer               Main;
LayerSetImage             Main 'DwarvenTodcraft36BrightGreenInset';
LayerSetAscent            Main 48;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (21);
LayerSetKerningPairs      Main KerningPairs KerningValues;
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 12;
LayerSetLineSpacingOffset Main 0;
LayerSetPointSize         Main 36;

SetDefaultPointSize  36;
