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

Define RectList
 ( (   0,  0, 13, 35), (  14,  0, 15, 35), (  30,  0, 12, 35), (  43,  0, 12, 35),
   (  56,  0, 14, 35), (  71,  0, 14, 35), (  86,  0, 12, 35), (  99,  0, 15, 35),
   ( 115,  0,  7, 35), ( 123,  0, 10, 35), ( 134,  0, 12, 35), ( 147,  0, 10, 35),
   ( 158,  0, 17, 35), ( 176,  0, 11, 35), ( 188,  0, 12, 35), ( 201,  0, 11, 35),
   ( 213,  0, 13, 35), ( 227,  0, 12, 35), ( 240,  0, 10, 35), ( 251,  0, 12, 35),
   ( 264,  0, 11, 35), ( 276,  0, 12, 35), ( 289,  0, 16, 35), ( 306,  0, 12, 35),
   ( 319,  0, 13, 35), ( 333,  0, 12, 35), ( 346,  0, 12, 35), ( 359,  0, 12, 35),
   ( 372,  0, 11, 35), ( 384,  0, 12, 35), ( 397,  0, 12, 35), ( 410,  0, 11, 35),
   ( 422,  0, 12, 35), ( 435,  0, 11, 35), ( 447,  0,  7, 35), ( 455,  0,  8, 35),
   ( 464,  0, 12, 35), ( 477,  0,  9, 35), ( 487,  0, 16, 35), ( 504,  0, 11, 35),
   ( 516,  0, 12, 35), ( 529,  0, 11, 35), ( 541,  0, 13, 35), ( 555,  0, 11, 35),
   ( 567,  0, 10, 35), ( 578,  0, 11, 35), ( 590,  0, 12, 35), ( 603,  0, 12, 35),
   ( 616,  0, 16, 35), ( 633,  0, 11, 35), ( 645,  0, 11, 35), ( 657,  0, 12, 35),
   ( 670,  0, 12, 35), ( 683,  0,  8, 35), ( 692,  0, 11, 35), ( 704,  0, 13, 35),
   ( 718,  0, 15, 35), ( 734,  0, 12, 35), ( 747,  0, 15, 35), ( 763,  0, 12, 35),
   ( 776,  0, 12, 35), ( 789,  0, 11, 35), ( 801,  0, 18, 35), ( 820,  0, 10, 35),
   ( 831,  0,  7, 35), ( 839,  0, 24, 35), ( 864,  0, 14, 35), ( 879,  0, 10, 35),
   ( 890,  0, 19, 35), ( 910,  0, 19, 35), ( 930,  0, 15, 35), ( 946,  0, 11, 35),
   ( 958,  0, 11, 35), ( 970,  0, 11, 35), ( 982,  0,  9, 35), ( 992,  0, 18, 35),
   (1011,  0, 11, 35), (1023,  0, 12, 35), (1036,  0,  9, 35), (1046,  0,  9, 35),
   (1056,  0,  9, 35), (1066,  0,  9, 35), (1076,  0,  8, 35), (1085,  0,  8, 35),
   (1094,  0,  6, 35), (1101,  0,  9, 35), (1111,  0,  8, 35), (1120,  0, 18, 35),
   (1139,  0,  8, 35), (1148,  0, 18, 35), (1167,  0, 12, 35), (1180,  0, 11, 35),
   (1192,  0,  9, 35), (1202,  0, 15, 35), (1218,  0, 12, 35), (1231,  0, 17, 35),
   (1249,  0, 12, 35), (1262,  0, 15, 35), (1278,  0, 16, 35), (1295,  0, 15, 35),
   (1311,  0, 17, 35), (1329,  0, 17, 35), (1347,  0, 17, 35), (1365,  0, 17, 35),
   (1383,  0, 17, 35), (1401,  0, 17, 35), (1419,  0, 20, 35), (1440,  0, 16, 35),
   (1457,  0, 18, 35), (1476,  0, 18, 35), (1495,  0, 18, 35), (1514,  0, 18, 35),
   (1533,  0,  9, 35), (1543,  0,  9, 35), (1553,  0,  9, 35), (1563,  0,  9, 35),
   (1573,  0, 20, 35), (1594,  0, 20, 35), (1615,  0, 16, 35), (1632,  0, 16, 35),
   (1649,  0, 16, 35), (1666,  0, 16, 35), (1683,  0, 16, 35), (1700,  0, 16, 35),
   (1717,  0, 15, 35), (1733,  0, 15, 35), (1749,  0, 15, 35), (1765,  0, 15, 35),
   (1781,  0, 15, 35), (1797,  0, 19, 35), (1817,  0, 16, 35), (1834,  0, 16, 35),
   (1851,  0, 16, 35), (1868,  0, 16, 35), (1885,  0, 16, 35), (1902,  0, 16, 35),
   (1919,  0, 20, 35), (1940,  0, 15, 35), (1956,  0, 16, 35), (1973,  0, 16, 35),
   (1990,  0, 16, 35), (2007,  0, 16, 35), (2024,  0,  9, 35), (2034,  0,  9, 35),
   (2044,  0,  9, 35), (2054,  0,  9, 35), (2064,  0, 16, 35), (2081,  0, 15, 35),
   (2097,  0, 16, 35), (2114,  0, 16, 35), (2131,  0, 16, 35), (2148,  0, 16, 35),
   (2165,  0, 16, 35), (2182,  0, 16, 35), (2199,  0, 16, 35), (2216,  0, 16, 35),
   (2233,  0, 16, 35), (2250,  0, 16, 35), (2267,  0, 15, 35), (2283,  0, 15, 35));

Define OffsetList
 ( (-2, 0), (-3, 0), (-2, 0), (-1, 0), (-3, 0), (-3, 0), (-2, 0), (-3, 0),
   (-1, 0), (-4, 0), ( 0, 0), (-1, 0), (-2, 0), (-1, 0), (-2, 0), (-1, 0),
   (-1, 0), (-1, 0), (-2, 0), (-2, 0), (-1, 0), (-2, 0), (-2, 0), (-2, 0),
   (-2, 0), (-3, 0), (-2, 0), (-1, 0), (-2, 0), (-1, 0), (-2, 0), (-2, 0),
   (-2, 0), (-1, 0), (-1, 0), (-2, 0), (-1, 0), (-2, 0), (-1, 0), (-1, 0),
   (-2, 0), (-1, 0), (-2, 0), (-1, 0), (-2, 0), (-2, 0), (-1, 0), (-2, 0),
   (-1, 0), (-1, 0), (-1, 0), (-3, 0), (-1, 0), ( 0, 0), (-1, 0), (-2, 0),
   (-2, 0), (-1, 0), (-4, 0), (-1, 0), (-1, 0), (-1, 0), (-1, 0), ( 1, 0),
   (-1, 0), (-1, 0), (-2, 0), ( 0, 0), (-2, 0), (-1, 0), (-2, 0), (-2, 0),
   (-1, 0), (-2, 0), (-1, 0), (-2, 0), (-2, 0), (-2, 0), (-1, 0), (-1, 0),
   (-2, 0), (-1, 0), (-2, 0), (-2, 0), (-2, 0), (-2, 0), (-2, 0), (-1, 0),
   (-2, 0), (-1, 0), (-2, 0), (-1, 0), (-2, 0), (-4, 0), (-2, 0), (-4, 0),
   (-3, 0), (-4, 0), (-3, 0), (-3, 0), (-4, 0), (-4, 0), (-4, 0), (-4, 0),
   (-4, 0), (-4, 0), (-4, 0), (-4, 0), (-5, 0), (-5, 0), (-5, 0), (-5, 0),
   (-2, 0), (-2, 0), (-2, 0), (-2, 0), (-4, 0), (-4, 0), (-4, 0), (-4, 0),
   (-4, 0), (-4, 0), (-4, 0), (-4, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-5, 0), (-4, 0), (-4, 0), (-4, 0), (-4, 0), (-4, 0), (-4, 0),
   (-4, 0), (-4, 0), (-4, 0), (-4, 0), (-4, 0), (-4, 0), (-2, 0), (-2, 0),
   (-2, 0), (-2, 0), (-4, 0), (-3, 0), (-4, 0), (-4, 0), (-4, 0), (-4, 0),
   (-4, 0), (-4, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0));

Define KerningPairs
 (",1","-B","-e","-g","-k",".1","AC","AV","AY","BB","CE","FA","LE","LY","ME","PA",
  "RY","SE","SS","St","Sv","TA","gJ","kt","ss","tS","tv","v,","v.","vt");

Define KerningValues (  -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);

CreateLayer               Main;
LayerSetImage             Main 'DecoTech20Outline';
LayerSetAscent            Main 26;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (5);
LayerSetKerningPairs      Main KerningPairs KerningValues;
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 2;
LayerSetLineSpacingOffset Main -2;
LayerSetPointSize         Main 20;

SetDefaultPointSize  20;
