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

Define RectList
 ( (   0,  0,  9, 15), (  10,  0,  7, 15), (  18,  0,  8, 15), (  27,  0,  7, 15),
   (  35,  0,  6, 15), (  42,  0,  6, 15), (  49,  0,  8, 15), (  58,  0,  7, 15),
   (  66,  0,  2, 15), (  69,  0,  6, 15), (  76,  0,  8, 15), (  85,  0,  6, 15),
   (  92,  0,  9, 15), ( 102,  0,  7, 15), ( 110,  0,  8, 15), ( 119,  0,  7, 15),
   ( 127,  0,  8, 15), ( 136,  0,  8, 15), ( 145,  0,  7, 15), ( 153,  0,  8, 15),
   ( 162,  0,  7, 15), ( 170,  0,  9, 15), ( 180,  0, 13, 15), ( 194,  0,  9, 15),
   ( 204,  0, 10, 15), ( 215,  0,  7, 15), ( 223,  0,  6, 15), ( 230,  0,  6, 15),
   ( 237,  0,  6, 15), ( 244,  0,  6, 15), ( 251,  0,  6, 15), ( 258,  0,  5, 15),
   ( 264,  0,  6, 15), ( 271,  0,  6, 15), ( 278,  0,  2, 15), ( 281,  0,  4, 15),
   ( 286,  0,  7, 15), ( 294,  0,  2, 15), ( 297,  0, 10, 15), ( 308,  0,  6, 15),
   ( 315,  0,  6, 15), ( 322,  0,  6, 15), ( 329,  0,  6, 15), ( 336,  0,  4, 15),
   ( 341,  0,  6, 15), ( 348,  0,  4, 15), ( 353,  0,  6, 15), ( 360,  0,  9, 15),
   ( 370,  0, 11, 15), ( 382,  0,  8, 15), ( 391,  0,  7, 15), ( 399,  0,  5, 15),
   ( 405,  0,  6, 15), ( 412,  0,  4, 15), ( 417,  0,  6, 15), ( 424,  0,  6, 15),
   ( 431,  0,  6, 15), ( 438,  0,  6, 15), ( 445,  0,  6, 15), ( 452,  0,  6, 15),
   ( 459,  0,  6, 15), ( 466,  0,  6, 15), ( 473,  0,  7, 15), ( 481,  0,  3, 15),
   ( 485,  0,  2, 15), ( 488,  0, 13, 15), ( 502,  0,  6, 15), ( 509,  0,  5, 15),
   ( 515,  0,  8, 15), ( 524,  0,  6, 15), ( 531,  0,  8, 15), ( 540,  0,  5, 15),
   ( 546,  0,  3, 15), ( 550,  0,  3, 15), ( 554,  0,  3, 15), ( 558,  0,  7, 15),
   ( 566,  0,  7, 15), ( 574,  0,  6, 15), ( 581,  0,  3, 15), ( 585,  0,  5, 15),
   ( 591,  0,  3, 15), ( 595,  0,  5, 15), ( 601,  0,  2, 15), ( 604,  0,  2, 15),
   ( 607,  0,  2, 15), ( 610,  0,  5, 15), ( 616,  0,  2, 15), ( 619,  0,  6, 15),
   ( 626,  0,  2, 15), ( 629,  0,  6, 15), ( 636,  0,  4, 15), ( 641,  0,  7, 15));

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

Define KerningPairs
 ("11","AT","AV","AW","AY","Av","Ay","F,","F.","FA","LT","LV","LW","LY","Ly","P,",
  "P.","PA","RY","T,","T-","T.","T:","T;","TA","Ta","Tc","Te","To","Tr","Ts","Tu",
  "Tw","Ty","V,","V-","V.","V:","V;","VA","Va","Ve","Vo","Vr","Vu","Vy","W,","W.",
  "WA","Wa","Y,","Y-","Y.","Y:","Y;","YA","Ya","Ye","Yi","Yo","Yp","Yq","Yu","Yv",
  "r,","r.","v,","v.","w,","w.","y,","y.","G,","G.");

Define KerningValues (  -1,  -1,  -1,  -1,  -2,  -1,  -1,  -2,  -2,  -1,  -1,  -1,  -1,  -2,  -1,  -2,    -2,  -1,  -1,  -2,  -1,  -2,  -2,  -2,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,    -1,  -1,  -2,  -1,  -2,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,    -1,  -1,  -2,  -1,  -2,  -1,  -1,  -2,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,    -1,  -1,  -1,  -1,  -1,  -1,  -1,  -1,  -2,  -2);

CreateLayer               Main;
LayerSetImage             Main '../images/Arial10Bold';
LayerSetAscent            Main 12;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (4);
LayerSetKerningPairs      Main KerningPairs KerningValues;
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 0;
LayerSetLineSpacingOffset Main 0;
LayerSetPointSize         Main 10;

SetDefaultPointSize  10;
