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
 (  17,  14,  15,  14,  13,  13,  15,  17,   9,   9,  15,  13,  22,  17,  16,  14,
    17,  15,  11,  15,  17,  17,  24,  19,  17,  15,  12,  10,  11,  10,  10,   9,
    12,  13,   7,   7,  11,   9,  16,  13,  12,  10,  15,  11,   9,  11,  12,  12,
    18,  14,  14,  11,  12,   8,  12,  11,  13,  12,  12,  13,  12,  12,  11,   4,
     5,  17,  11,   9,  13,   7,  10,   8,   5,   6,   9,   8,  11,  10,   6,   7,
     6,   7,   6,   6,   4,  13,   6,   8,   6,   8,   9,  10,   5,  11,  10,  10,
     8,  13,  13,  10,  17,  17,  17,  17,  17,  17,  19,   8,  13,  13,  13,  13,
     9,   9,   9,   9,  14,  17,  16,  16,  16,  16,  16,  16,  17,  17,  17,  17,
    17,  10,  12,  12,  12,  12,  17,  17,  19,   8,  10,  10,  10,  10,   7,   6,
     7,   7,  12,  12,  12,  12,  12,  12,  16,  12,  12,  12,  12,  12,  9,  10);

Define RectList
 ( (   0,  0, 22, 28), (  23,  0, 19, 28), (  43,  0, 20, 28), (  64,  0, 18, 28),
   (  83,  0, 18, 28), ( 102,  0, 17, 28), ( 120,  0, 20, 28), ( 141,  0, 21, 28),
   ( 163,  0, 14, 28), ( 178,  0, 14, 28), ( 193,  0, 20, 28), ( 214,  0, 18, 28),
   ( 233,  0, 26, 28), ( 260,  0, 22, 28), ( 283,  0, 21, 28), ( 305,  0, 18, 28),
   ( 324,  0, 21, 28), ( 346,  0, 20, 28), ( 367,  0, 17, 28), ( 385,  0, 20, 28),
   ( 406,  0, 22, 28), ( 429,  0, 22, 28), ( 452,  0, 29, 28), ( 482,  0, 24, 28),
   ( 507,  0, 23, 28), ( 531,  0, 19, 28), ( 551,  0, 18, 28), ( 570,  0, 16, 28),
   ( 587,  0, 16, 28), ( 604,  0, 15, 28), ( 620,  0, 15, 28), ( 636,  0, 15, 28),
   ( 652,  0, 17, 28), ( 670,  0, 18, 28), ( 689,  0, 12, 28), ( 702,  0, 12, 28),
   ( 715,  0, 17, 28), ( 733,  0, 15, 28), ( 749,  0, 21, 28), ( 771,  0, 18, 28),
   ( 790,  0, 18, 28), ( 809,  0, 15, 28), ( 825,  0, 19, 28), ( 845,  0, 17, 28),
   ( 863,  0, 14, 28), ( 878,  0, 17, 28), ( 896,  0, 18, 28), ( 915,  0, 18, 28),
   ( 934,  0, 23, 28), ( 958,  0, 20, 28), ( 979,  0, 19, 28), ( 999,  0, 16, 28),
   (1016,  0, 17, 28), (1034,  0, 14, 28), (1049,  0, 18, 28), (1068,  0, 17, 28),
   (1086,  0, 19, 28), (1106,  0, 17, 28), (1124,  0, 18, 28), (1143,  0, 17, 28),
   (1161,  0, 17, 28), (1179,  0, 17, 28), (1197,  0, 17, 28), (1215,  0, 12, 28),
   (1228,  0, 10, 28), (1239,  0, 21, 28), (1261,  0, 17, 28), (1279,  0, 15, 28),
   (1295,  0, 18, 28), (1314,  0, 12, 28), (1327,  0, 16, 28), (1344,  0, 14, 28),
   (1359,  0, 11, 28), (1371,  0, 11, 28), (1383,  0, 14, 28), (1398,  0, 14, 28),
   (1413,  0, 17, 28), (1431,  0, 15, 28), (1447,  0, 11, 28), (1459,  0, 13, 28),
   (1473,  0, 11, 28), (1485,  0, 13, 28), (1499,  0, 11, 28), (1511,  0, 11, 28),
   (1523,  0, 11, 28), (1535,  0, 17, 28), (1553,  0, 11, 28), (1565,  0, 14, 28),
   (1580,  0, 11, 28), (1592,  0, 14, 28), (1607,  0, 14, 28), (1622,  0, 15, 28),
   (1638,  0, 10, 28), (1649,  0, 16, 28), (1666,  0, 15, 28), (1682,  0, 17, 28),
   (1700,  0, 14, 28), (1715,  0, 18, 28), (1734,  0, 18, 28), (1753,  0, 15, 28),
   (1769,  0, 22, 28), (1792,  0, 22, 28), (1815,  0, 22, 28), (1838,  0, 22, 28),
   (1861,  0, 22, 28), (1884,  0, 22, 28), (1907,  0, 25, 28), (1933,  0, 14, 28),
   (1948,  0, 18, 28), (1967,  0, 18, 28), (1986,  0, 18, 28), (2005,  0, 18, 28),
   (2024,  0, 14, 28), (2039,  0, 14, 28), (2054,  0, 14, 28), (2069,  0, 14, 28),
   (2084,  0, 19, 28), (2104,  0, 22, 28), (2127,  0, 21, 28), (2149,  0, 21, 28),
   (2171,  0, 21, 28), (2193,  0, 21, 28), (2215,  0, 21, 28), (2237,  0, 21, 28),
   (2259,  0, 22, 28), (2282,  0, 22, 28), (2305,  0, 22, 28), (2328,  0, 22, 28),
   (2351,  0, 23, 28), (2375,  0, 16, 28), (2392,  0, 18, 28), (2411,  0, 18, 28),
   (2430,  0, 18, 28), (2449,  0, 18, 28), (2468,  0, 22, 28), (2491,  0, 22, 28),
   (2514,  0, 25, 28), (2540,  0, 14, 28), (2555,  0, 15, 28), (2571,  0, 15, 28),
   (2587,  0, 15, 28), (2603,  0, 15, 28), (2619,  0, 12, 28), (2632,  0, 12, 28),
   (2645,  0, 12, 28), (2658,  0, 13, 28), (2672,  0, 18, 28), (2691,  0, 18, 28),
   (2710,  0, 18, 28), (2729,  0, 18, 28), (2748,  0, 18, 28), (2767,  0, 18, 28),
   (2786,  0, 21, 28), (2808,  0, 18, 28), (2827,  0, 18, 28), (2846,  0, 18, 28),
   (2865,  0, 18, 28), (2884,  0, 18, 28), (2903,  0, 19, 28), (2923,  0, 19, 28));

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), (-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),
   (-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), (-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), (-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), (-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",
  "w,","w.","y,","y.");

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

CreateLayer               Main;
LayerSetImage             Main 'DwarvenTodcraft18BrightGreenInset';
LayerSetAscent            Main 21;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (11);
LayerSetKerningPairs      Main KerningPairs KerningValues;
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 0;
LayerSetLineSpacingOffset Main 0;
LayerSetPointSize         Main 18;

SetDefaultPointSize  18;
