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
 (  28,  27,  36,  35,  23,  23,  29,  30,  16,  15,  31,  16,  39,  28,  36,  27,
    36,  29,  20,  25,  28,  25,  39,  24,  24,  25,  28,  28,  27,  28,  27,  17,
    28,  26,  14,  17,  26,  14,  37,  26,  27,  28,  28,  15,  18,  16,  26,  19,
    37,  25,  26,  24,  27,  27,  27,  27,  27,  27,  27,  27,  27,  27,  32,  24,
    21,  36,  32,  27,  44,  24,  37,  24,  18,  18,  11,  24,  36,  36,  18,  18,
    18,  18,  18,  18,  12,  24,  18,  24,  18,  24,  17,  25);

Define RectList
 ( (   0,  0, 23, 54), (  24,  0, 24, 54), (  49,  0, 34, 54), (  84,  0, 31, 54),
   ( 116,  0, 18, 54), ( 135,  0, 23, 54), ( 159,  0, 28, 54), ( 188,  0, 24, 54),
   ( 213,  0, 10, 54), ( 224,  0, 13, 54), ( 238,  0, 28, 54), ( 267,  0, 13, 54),
   ( 281,  0, 33, 54), ( 315,  0, 23, 54), ( 339,  0, 34, 54), ( 374,  0, 24, 54),
   ( 399,  0, 33, 54), ( 433,  0, 26, 54), ( 460,  0, 16, 54), ( 477,  0, 24, 54),
   ( 502,  0, 23, 54), ( 526,  0, 29, 54), ( 556,  0, 33, 54), ( 590,  0, 28, 54),
   ( 619,  0, 29, 54), ( 649,  0, 26, 54), ( 676,  0, 24, 54), ( 701,  0, 24, 54),
   ( 726,  0, 25, 54), ( 752,  0, 24, 54), ( 777,  0, 25, 54), ( 803,  0, 13, 54),
   ( 817,  0, 24, 54), ( 842,  0, 20, 54), ( 863,  0,  9, 54), ( 873,  0, 17, 54),
   ( 891,  0, 24, 54), ( 916,  0,  9, 54), ( 926,  0, 32, 54), ( 959,  0, 20, 54),
   ( 980,  0, 25, 54), (1006,  0, 24, 54), (1031,  0, 24, 54), (1056,  0, 12, 54),
   (1069,  0, 17, 54), (1087,  0, 13, 54), (1101,  0, 20, 54), (1122,  0, 23, 54),
   (1146,  0, 32, 54), (1179,  0, 21, 54), (1201,  0, 21, 54), (1223,  0, 23, 54),
   (1247,  0, 23, 54), (1271,  0,  9, 54), (1281,  0, 23, 54), (1305,  0, 17, 54),
   (1323,  0, 24, 54), (1348,  0, 20, 54), (1369,  0, 25, 54), (1395,  0, 22, 54),
   (1418,  0, 23, 54), (1442,  0, 25, 54), (1468,  0, 24, 54), (1493,  0, 11, 54),
   (1505,  0, 11, 54), (1517,  0, 32, 54), (1550,  0, 28, 54), (1579,  0, 17, 54),
   (1597,  0, 38, 54), (1636,  0, 24, 54), (1661,  0, 25, 54), (1687,  0, 16, 54),
   (1704,  0, 13, 54), (1718,  0, 12, 54), (1731,  0, 11, 54), (1743,  0, 24, 54),
   (1768,  0, 24, 54), (1793,  0, 24, 54), (1818,  0, 13, 54), (1832,  0, 14, 54),
   (1847,  0, 13, 54), (1861,  0, 15, 54), (1877,  0, 11, 54), (1889,  0, 11, 54),
   (1901,  0, 10, 54), (1912,  0, 18, 54), (1931,  0, 11, 54), (1943,  0, 20, 54),
   (1964,  0, 11, 54), (1976,  0, 20, 54), (1997,  0, 14, 54), (2012,  0, 21, 54));

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

CreateLayer               Main;
LayerSetImage             Main 'Bauhaus9336';
LayerSetAscent            Main 43;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (12);
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 0;
LayerSetLineSpacingOffset Main 0;
LayerSetPointSize         Main 36;

SetDefaultPointSize  36;
