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
 (   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,
     8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,
     8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,
     8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,
     8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,
     8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8,   8);

Define RectList
 ( (   0,  0,  7,  8), (   8,  0,  7,  8), (  16,  0,  7,  8), (  24,  0,  7,  8),
   (  32,  0,  6,  8), (  39,  0,  7,  8), (  47,  0,  7,  8), (  55,  0,  7,  8),
   (  63,  0,  6,  8), (  70,  0,  7,  8), (  78,  0,  7,  8), (  86,  0,  6,  8),
   (  93,  0,  7,  8), ( 101,  0,  7,  8), ( 109,  0,  7,  8), ( 117,  0,  7,  8),
   ( 125,  0,  7,  8), ( 133,  0,  7,  8), ( 141,  0,  7,  8), ( 149,  0,  6,  8),
   ( 156,  0,  7,  8), ( 164,  0,  7,  8), ( 172,  0,  7,  8), ( 180,  0,  7,  8),
   ( 188,  0,  6,  8), ( 195,  0,  7,  8), ( 203,  0,  6,  8), ( 210,  0,  5,  8),
   ( 216,  0,  5,  8), ( 222,  0,  6,  8), ( 229,  0,  5,  8), ( 235,  0,  5,  8),
   ( 241,  0,  5,  8), ( 247,  0,  5,  8), ( 253,  0,  3,  8), ( 257,  0,  5,  8),
   ( 263,  0,  5,  8), ( 269,  0,  3,  8), ( 273,  0,  7,  8), ( 281,  0,  6,  8),
   ( 288,  0,  5,  8), ( 294,  0,  6,  8), ( 301,  0,  6,  8), ( 308,  0,  6,  8),
   ( 315,  0,  5,  8), ( 321,  0,  5,  8), ( 327,  0,  6,  8), ( 334,  0,  6,  8),
   ( 341,  0,  7,  8), ( 349,  0,  6,  8), ( 356,  0,  6,  8), ( 363,  0,  6,  8),
   ( 370,  0,  7,  8), ( 378,  0,  6,  8), ( 385,  0,  7,  8), ( 393,  0,  7,  8),
   ( 401,  0,  7,  8), ( 409,  0,  7,  8), ( 417,  0,  7,  8), ( 425,  0,  7,  8),
   ( 433,  0,  7,  8), ( 441,  0,  7,  8), ( 449,  0,  7,  8), ( 457,  0,  2,  8),
   ( 460,  0,  6,  8), ( 467,  0,  7,  8), ( 475,  0,  5,  8), ( 481,  0,  5,  8),
   ( 487,  0,  5,  8), ( 493,  0,  7,  8), ( 501,  0,  7,  8), ( 509,  0,  5,  8),
   ( 515,  0,  3,  8), ( 519,  0,  3,  8), ( 523,  0,  5,  8), ( 529,  0,  7,  8),
   ( 537,  0,  5,  8), ( 543,  0,  5,  8), ( 549,  0,  4,  8), ( 554,  0,  5,  8),
   ( 560,  0,  4,  8), ( 565,  0,  5,  8), ( 571,  0,  3,  8), ( 575,  0,  2,  8),
   ( 578,  0,  2,  8), ( 581,  0,  6,  8), ( 588,  0,  3,  8), ( 592,  0,  4,  8),
   ( 597,  0,  2,  8), ( 600,  0,  4,  8), ( 605,  0,  7,  8), ( 613,  0,  7,  8));

Define OffsetList
 ( ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 1, 0), ( 0, 0), ( 0, 0), ( 0, 0),
   ( 1, 0), ( 0, 0), ( 0, 0), ( 1, 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),
   ( 1, 0), ( 0, 0), ( 1, 0), ( 1, 0), ( 1, 0), ( 1, 0), ( 1, 0), ( 1, 0),
   ( 1, 0), ( 1, 0), ( 2, 0), ( 1, 0), ( 1, 0), ( 2, 0), ( 0, 0), ( 0, 0),
   ( 1, 0), ( 1, 0), ( 1, 0), ( 1, 0), ( 1, 0), ( 1, 0), ( 1, 0), ( 1, 0),
   ( 0, 0), ( 1, 0), ( 1, 0), ( 1, 0), ( 0, 0), ( 1, 0), ( 0, 0), ( 0, 0),
   ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 4, 0),
   ( 0, 0), ( 0, 0), ( 1, 0), ( 1, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 1, 0),
   ( 2, 0), ( 2, 0), ( 1, 0), ( 0, 0), ( 1, 0), ( 1, 0), ( 2, 0), ( 0, 0),
   ( 1, 0), ( 2, 0), ( 1, 0), ( 2, 0), ( 1, 0), ( 0, 0), ( 1, 0), ( 1, 0),
   ( 2, 0), ( 2, 0), ( 0, 0), ( 0, 0));

CreateLayer               Main;
LayerSetImage             Main 'ArcadeBoned6';
LayerSetAscent            Main 7;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (8);
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 0;
LayerSetLineSpacingOffset Main 0;
LayerSetPointSize         Main 6;

SetDefaultPointSize  6;
