Define CharList
 ( ' ', '!', '"', '#', '$', '%', '&',"'", '(', ')', '*', '+', ',', '-', '.', '/',
   '0', '1', '2', '3', '4', '5', '6', '7', '8', '9', ':', ';', '<', '=', '>', '?',
   '@', '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', '{', '|', '}', '~');

Define WidthList
 (   5,   9,  11,  14,  12,  20,  12,   5,   8,   8,  11,  16,   8,   5,   8,   7,
    12,  12,  12,  12,  12,  12,  12,  12,  12,  12,   8,   8,  11,  16,  11,  11,
    16,  12,  12,  16,  15,  10,  10,  13,  13,   7,   6,  14,   7,  17,  12,  16,
    12,  16,  13,   9,  11,  12,  11,  17,  10,  11,  11,   8,   7,   8,  11,  11,
    11,  12,  12,  12,  12,  12,   7,  12,  11,   6,   7,  11,   6,  16,  11,  12,
    12,  12,   7,   8,   7,  11,   8,  16,  11,  11,  10,   8,  11,   8,  14);

Define RectList
 ( (   0,  0,  0, 24), (   1,  0,  5, 24), (   7,  0,  9, 24), (  17,  0, 13, 24),
   (  31,  0,  8, 24), (  40,  0, 18, 24), (  59,  0, 12, 24), (  72,  0,  5, 24),
   (  78,  0,  6, 24), (  85,  0,  6, 24), (  92,  0,  7, 24), ( 100,  0, 12, 24),
   ( 113,  0,  6, 24), ( 120,  0,  5, 24), ( 126,  0,  6, 24), ( 133,  0,  7, 24),
   ( 141,  0, 10, 24), ( 152,  0,  4, 24), ( 157,  0, 10, 24), ( 168,  0,  8, 24),
   ( 177,  0, 11, 24), ( 189,  0,  9, 24), ( 199,  0, 12, 24), ( 212,  0, 11, 24),
   ( 224,  0, 10, 24), ( 235,  0, 12, 24), ( 248,  0,  6, 24), ( 255,  0,  6, 24),
   ( 262,  0, 10, 24), ( 273,  0, 11, 24), ( 285,  0, 10, 24), ( 296,  0, 10, 24),
   ( 307,  0, 15, 24), ( 323,  0, 11, 24), ( 335,  0, 11, 24), ( 347,  0, 16, 24),
   ( 364,  0, 15, 24), ( 380,  0,  9, 24), ( 390,  0, 10, 24), ( 401,  0, 13, 24),
   ( 415,  0, 11, 24), ( 427,  0,  5, 24), ( 433,  0,  6, 24), ( 440,  0, 13, 24),
   ( 454,  0,  6, 24), ( 461,  0, 16, 24), ( 478,  0, 11, 24), ( 490,  0, 16, 24),
   ( 507,  0, 11, 24), ( 519,  0, 16, 24), ( 536,  0, 12, 24), ( 549,  0,  8, 24),
   ( 558,  0, 11, 24), ( 570,  0, 11, 24), ( 582,  0, 13, 24), ( 596,  0, 16, 24),
   ( 613,  0, 13, 24), ( 627,  0, 12, 24), ( 640,  0, 11, 24), ( 652,  0,  6, 24),
   ( 659,  0,  6, 24), ( 666,  0,  6, 24), ( 673,  0, 11, 24), ( 685,  0, 11, 24),
   ( 697,  0,  5, 24), ( 703,  0, 12, 24), ( 716,  0, 11, 24), ( 728,  0, 12, 24),
   ( 741,  0, 12, 24), ( 754,  0, 12, 24), ( 767,  0,  6, 24), ( 774,  0, 11, 24),
   ( 786,  0, 10, 24), ( 797,  0,  4, 24), ( 802,  0,  9, 24), ( 812,  0, 11, 24),
   ( 824,  0,  4, 24), ( 829,  0, 15, 24), ( 845,  0, 10, 24), ( 856,  0, 12, 24),
   ( 869,  0, 11, 24), ( 881,  0, 12, 24), ( 894,  0,  6, 24), ( 901,  0,  8, 24),
   ( 910,  0,  7, 24), ( 918,  0, 10, 24), ( 929,  0, 10, 24), ( 940,  0, 15, 24),
   ( 956,  0, 10, 24), ( 967,  0, 10, 24), ( 978,  0, 11, 24), ( 990,  0,  8, 24),
   ( 999,  0,  5, 24), (1005,  0,  7, 24), (1013,  0, 11, 24));

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

CreateLayer          Main;
LayerSetImage        Main 'Bauhaus9316';
LayerSetAscent       Main 19;
LayerSetCharWidths   Main CharList WidthList;
LayerSetCharWidths   Main (' ') (11);
LayerSetImageMap     Main CharList RectList;
LayerSetCharOffsets  Main CharList OffsetList;
LayerSetPointSize    Main 16;

SetDefaultPointSize  16;
