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

Define RectList
 ( (   0,  0,  9, 32), (  10,  0, 11, 32), (  22,  0,  8, 32), (  31,  0,  9, 32),
   (  41,  0, 10, 32), (  52,  0, 10, 32), (  63,  0,  8, 32), (  72,  0, 11, 32),
   (  84,  0,  3, 32), (  88,  0,  6, 32), (  95,  0,  9, 32), ( 105,  0,  7, 32),
   ( 113,  0, 14, 32), ( 128,  0,  8, 32), ( 137,  0,  8, 32), ( 146,  0,  8, 32),
   ( 155,  0,  9, 32), ( 165,  0,  9, 32), ( 175,  0,  6, 32), ( 182,  0,  8, 32),
   ( 191,  0,  8, 32), ( 200,  0,  8, 32), ( 209,  0, 13, 32), ( 223,  0,  9, 32),
   ( 233,  0,  9, 32), ( 243,  0,  9, 32), ( 253,  0,  9, 32), ( 263,  0,  8, 32),
   ( 272,  0,  7, 32), ( 280,  0,  8, 32), ( 289,  0,  8, 32), ( 298,  0,  8, 32),
   ( 307,  0,  8, 32), ( 316,  0,  8, 32), ( 325,  0,  3, 32), ( 329,  0,  4, 32),
   ( 334,  0,  8, 32), ( 343,  0,  4, 32), ( 348,  0, 13, 32), ( 362,  0,  8, 32),
   ( 371,  0,  8, 32), ( 380,  0,  8, 32), ( 389,  0, 10, 32), ( 400,  0,  8, 32),
   ( 409,  0,  6, 32), ( 416,  0,  8, 32), ( 425,  0,  8, 32), ( 434,  0,  9, 32),
   ( 444,  0, 13, 32), ( 458,  0,  8, 32), ( 467,  0,  8, 32), ( 476,  0,  9, 32),
   ( 486,  0,  8, 32), ( 495,  0,  5, 32), ( 501,  0,  8, 32), ( 510,  0, 10, 32),
   ( 521,  0, 11, 32), ( 533,  0,  8, 32), ( 542,  0, 12, 32), ( 555,  0,  9, 32),
   ( 565,  0,  8, 32), ( 574,  0,  8, 32), ( 583,  0, 15, 32), ( 599,  0,  6, 32),
   ( 606,  0,  3, 32), ( 610,  0, 21, 32), ( 632,  0, 11, 32), ( 644,  0,  6, 32),
   ( 651,  0, 16, 32), ( 668,  0, 16, 32), ( 685,  0, 12, 32), ( 698,  0,  7, 32),
   ( 706,  0,  7, 32), ( 714,  0,  8, 32), ( 723,  0,  6, 32), ( 730,  0, 15, 32),
   ( 746,  0,  8, 32), ( 755,  0,  9, 32), ( 765,  0,  5, 32), ( 771,  0,  6, 32),
   ( 778,  0,  4, 32), ( 783,  0,  6, 32), ( 790,  0,  3, 32), ( 794,  0,  3, 32),
   ( 798,  0,  2, 32), ( 801,  0,  5, 32), ( 807,  0,  3, 32), ( 811,  0, 16, 32),
   ( 828,  0,  3, 32), ( 832,  0, 16, 32), ( 849,  0,  9, 32), ( 859,  0,  8, 32),
   ( 868,  0,  5, 32), ( 874,  0, 11, 32), ( 886,  0, 11, 32), ( 898,  0, 13, 32),
   ( 912,  0,  8, 32), ( 921,  0, 11, 32), ( 933,  0, 13, 32), ( 947,  0, 12, 32),
   ( 960,  0, 13, 32), ( 974,  0, 13, 32), ( 988,  0, 13, 32), (1002,  0, 13, 32),
   (1016,  0, 13, 32), (1030,  0, 13, 32), (1044,  0, 19, 32), (1064,  0, 12, 32),
   (1077,  0, 14, 32), (1092,  0, 14, 32), (1107,  0, 14, 32), (1122,  0, 14, 32),
   (1137,  0,  5, 32), (1143,  0,  5, 32), (1149,  0,  5, 32), (1155,  0,  5, 32),
   (1161,  0, 19, 32), (1181,  0, 19, 32), (1201,  0, 12, 32), (1214,  0, 12, 32),
   (1227,  0, 12, 32), (1240,  0, 12, 32), (1253,  0, 12, 32), (1266,  0, 12, 32),
   (1279,  0, 12, 32), (1292,  0, 12, 32), (1305,  0, 12, 32), (1318,  0, 12, 32),
   (1331,  0, 12, 32), (1344,  0, 15, 32), (1360,  0, 13, 32), (1374,  0, 13, 32),
   (1388,  0, 13, 32), (1402,  0, 13, 32), (1416,  0, 13, 32), (1430,  0, 13, 32),
   (1444,  0, 19, 32), (1464,  0, 11, 32), (1476,  0, 12, 32), (1489,  0, 12, 32),
   (1502,  0, 12, 32), (1515,  0, 12, 32), (1528,  0,  5, 32), (1534,  0,  5, 32),
   (1540,  0,  5, 32), (1546,  0,  5, 32), (1552,  0, 12, 32), (1565,  0, 12, 32),
   (1578,  0, 12, 32), (1591,  0, 12, 32), (1604,  0, 12, 32), (1617,  0, 12, 32),
   (1630,  0, 12, 32), (1643,  0, 12, 32), (1656,  0, 12, 32), (1669,  0, 12, 32),
   (1682,  0, 12, 32), (1695,  0, 12, 32), (1708,  0, 12, 32), (1721,  0, 12, 32));

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

Define KerningPairs
 (",1","-B","-e","-g","-k",".1","AC","AV","AY","BB","CE","FA","Gt","LE","LY","ME",
  "PA","RY","SE","SS","St","Sv","TA","gJ","kt","ot","ss","tS","to","tv","t","v,",
  "v.","vt");

Define KerningValues

 (  -1,   1,   1,   1,   1,  -1,  -1,  -1,  -1,  -1,  -1,  -2,   1,  -1,  -1,  -1,

    -1,  -1,  -1,  -1,   1,   1,  -2,   1,   1,   1,  -1,   1,   1,   1,   1,  -1,

    -1,   1);

CreateLayer               Main;
LayerSetImage             Main 'DecoTech22';
LayerSetAscent            Main 25;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (5);
LayerSetKerningPairs      Main KerningPairs KerningValues;
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 0;
LayerSetLineSpacingOffset Main 0;
LayerSetPointSize         Main 22;

SetDefaultPointSize  22;
