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
 (   3,   6,   7,   9,   7,  12,   0,   3,   5,   5,   7,  10,   5,   3,   5,   4,
     7,   7,   7,   7,   7,   7,   7,   7,   7,   7,   5,   5,   7,  10,   7,   7,
    10,   8,   7,  10,  10,   6,   6,   8,   8,   4,   4,   8,   4,  11,   8,  10,
     7,  10,   8,   5,   7,   8,   7,  11,   6,   7,   7,   5,   4,   5,   7,   7,
     7,   8,   8,   7,   8,   7,   4,   8,   7,   4,   5,   7,   4,  10,   7,   7,
     8,   8,   4,   5,   4,   7,   5,  10,   7,   7,   6,   5,   7,   5,   9);

Define RectList
 ( (   0,  0,  0, 15), (   1,  0,  4, 15), (   6,  0,  6, 15), (  13,  0,  9, 15),
   (  23,  0,  5, 15), (  29,  0, 11, 15), (  41,  0,  8, 15), (  50,  0,  3, 15),
   (  54,  0,  4, 15), (  59,  0,  4, 15), (  64,  0,  5, 15), (  70,  0,  8, 15),
   (  79,  0,  3, 15), (  83,  0,  3, 15), (  87,  0,  4, 15), (  92,  0,  4, 15),
   (  97,  0,  7, 15), ( 105,  0,  3, 15), ( 109,  0,  7, 15), ( 117,  0,  6, 15),
   ( 124,  0,  7, 15), ( 132,  0,  6, 15), ( 139,  0,  8, 15), ( 148,  0,  6, 15),
   ( 155,  0,  7, 15), ( 163,  0,  8, 15), ( 172,  0,  4, 15), ( 177,  0,  4, 15),
   ( 182,  0,  7, 15), ( 190,  0,  7, 15), ( 198,  0,  7, 15), ( 206,  0,  7, 15),
   ( 214,  0, 10, 15), ( 225,  0,  8, 15), ( 234,  0,  7, 15), ( 242,  0, 10, 15),
   ( 253,  0,  9, 15), ( 263,  0,  6, 15), ( 270,  0,  7, 15), ( 278,  0,  8, 15),
   ( 287,  0,  7, 15), ( 295,  0,  3, 15), ( 299,  0,  4, 15), ( 304,  0,  8, 15),
   ( 313,  0,  5, 15), ( 319,  0, 10, 15), ( 330,  0,  7, 15), ( 338,  0, 10, 15),
   ( 349,  0,  8, 15), ( 358,  0, 10, 15), ( 369,  0,  7, 15), ( 377,  0,  5, 15),
   ( 383,  0,  7, 15), ( 391,  0,  7, 15), ( 399,  0,  9, 15), ( 409,  0, 10, 15),
   ( 420,  0,  9, 15), ( 430,  0,  8, 15), ( 439,  0,  7, 15), ( 447,  0,  5, 15),
   ( 453,  0,  5, 15), ( 459,  0,  5, 15), ( 465,  0,  7, 15), ( 473,  0,  7, 15),
   ( 481,  0,  4, 15), ( 486,  0,  7, 15), ( 494,  0,  8, 15), ( 503,  0,  8, 15),
   ( 512,  0,  7, 15), ( 520,  0,  8, 15), ( 529,  0,  4, 15), ( 534,  0,  7, 15),
   ( 542,  0,  7, 15), ( 550,  0,  3, 15), ( 554,  0,  5, 15), ( 560,  0,  8, 15),
   ( 569,  0,  3, 15), ( 573,  0, 10, 15), ( 584,  0,  7, 15), ( 592,  0,  7, 15),
   ( 600,  0,  8, 15), ( 609,  0,  7, 15), ( 617,  0,  5, 15), ( 623,  0,  5, 15),
   ( 629,  0,  4, 15), ( 634,  0,  7, 15), ( 642,  0,  7, 15), ( 650,  0, 10, 15),
   ( 661,  0,  7, 15), ( 669,  0,  7, 15), ( 677,  0,  7, 15), ( 685,  0,  5, 15),
   ( 691,  0,  3, 15), ( 695,  0,  5, 15), ( 701,  0,  7, 15));

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

CreateLayer          Main;
LayerSetImage        Main 'Bauhaus9310';
LayerSetAscent       Main 12;
LayerSetCharWidths   Main CharList WidthList;
LayerSetCharWidths   Main (' ') (7);
LayerSetImageMap     Main CharList RectList;
LayerSetCharOffsets  Main CharList OffsetList;
LayerSetPointSize    Main 10;

SetDefaultPointSize  10;
