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
 (  10,  12,   9,  11,  11,  11,  10,  12,   5,   6,  12,   8,  15,  11,  10,  10,
    11,  11,   7,   9,  11,   9,  14,   9,  10,   8,  10,  11,   8,  11,  10,   8,
    10,  10,   5,   5,  10,   6,  16,  11,  10,  10,  10,  10,   7,   8,  11,   9,
    16,  11,  11,   8,  11,  11,  11,  11,  11,  11,  11,  11,  11,  11,  19,  14,
     6,  26,  12,  11,  18,  19,  13,   8,   9,   9,   8,  16,   9,   9,   7,   8,
     7,   8,   5,   5,   3,   6,   5,  19,   5,  19,   9,   9,   6,   8,   8,  10,
     7,   8,  11,   9,  10,  10,  10,  10,  10,  10,  14,   9,  11,  11,  11,  11,
     5,   5,   5,   5,  14,  14,  10,  10,  10,  10,  10,  10,  11,  11,  11,  11,
    11,  12,  10,  10,  10,  10,  10,  10,  14,   8,  10,  10,  10,  10,   5,   5,
     5,   5,  10,  11,  10,  10,  10,  10,  10,  10,  11,  11,  11,  11,  11,  11);

Define RectList
 ( (   0,  0, 10, 36), (  11,  0, 12, 36), (  24,  0,  9, 36), (  34,  0, 10, 36),
   (  45,  0, 11, 36), (  57,  0, 11, 36), (  69,  0,  9, 36), (  79,  0, 12, 36),
   (  92,  0,  3, 36), (  96,  0,  8, 36), ( 105,  0, 10, 36), ( 116,  0,  7, 36),
   ( 124,  0, 15, 36), ( 140,  0,  9, 36), ( 150,  0,  9, 36), ( 160,  0,  9, 36),
   ( 170,  0, 10, 36), ( 181,  0,  9, 36), ( 191,  0,  7, 36), ( 199,  0,  9, 36),
   ( 209,  0,  9, 36), ( 219,  0,  9, 36), ( 229,  0, 15, 36), ( 245,  0,  9, 36),
   ( 255,  0, 10, 36), ( 266,  0,  9, 36), ( 276,  0, 10, 36), ( 287,  0,  9, 36),
   ( 297,  0,  8, 36), ( 306,  0,  9, 36), ( 316,  0,  9, 36), ( 326,  0,  8, 36),
   ( 335,  0,  9, 36), ( 345,  0,  9, 36), ( 355,  0,  3, 36), ( 359,  0,  5, 36),
   ( 365,  0,  9, 36), ( 375,  0,  5, 36), ( 381,  0, 14, 36), ( 396,  0,  9, 36),
   ( 406,  0,  9, 36), ( 416,  0,  9, 36), ( 426,  0, 11, 36), ( 438,  0,  9, 36),
   ( 448,  0,  7, 36), ( 456,  0,  8, 36), ( 465,  0,  9, 36), ( 475,  0,  9, 36),
   ( 485,  0, 14, 36), ( 500,  0,  9, 36), ( 510,  0,  9, 36), ( 520,  0,  9, 36),
   ( 530,  0,  9, 36), ( 540,  0,  6, 36), ( 547,  0,  9, 36), ( 557,  0, 11, 36),
   ( 569,  0, 12, 36), ( 582,  0,  9, 36), ( 592,  0, 12, 36), ( 605,  0, 10, 36),
   ( 616,  0,  9, 36), ( 626,  0,  9, 36), ( 636,  0, 17, 36), ( 654,  0,  7, 36),
   ( 662,  0,  4, 36), ( 667,  0, 23, 36), ( 691,  0, 12, 36), ( 704,  0,  7, 36),
   ( 712,  0, 17, 36), ( 730,  0, 17, 36), ( 748,  0, 13, 36), ( 762,  0,  8, 36),
   ( 771,  0,  8, 36), ( 780,  0,  8, 36), ( 789,  0,  6, 36), ( 796,  0, 16, 36),
   ( 813,  0,  9, 36), ( 823,  0, 10, 36), ( 834,  0,  6, 36), ( 841,  0,  7, 36),
   ( 849,  0,  5, 36), ( 855,  0,  6, 36), ( 862,  0,  3, 36), ( 866,  0,  3, 36),
   ( 870,  0,  3, 36), ( 874,  0,  6, 36), ( 881,  0,  3, 36), ( 885,  0, 17, 36),
   ( 903,  0,  3, 36), ( 907,  0, 17, 36), ( 925,  0, 10, 36), ( 936,  0,  9, 36),
   ( 946,  0,  6, 36), ( 953,  0, 12, 36), ( 966,  0, 11, 36), ( 978,  0, 14, 36),
   ( 993,  0, 11, 36), (1005,  0, 12, 36), (1018,  0, 13, 36), (1032,  0, 13, 36),
   (1046,  0, 14, 36), (1061,  0, 14, 36), (1076,  0, 14, 36), (1091,  0, 14, 36),
   (1106,  0, 14, 36), (1121,  0, 14, 36), (1136,  0, 21, 36), (1158,  0, 13, 36),
   (1172,  0, 15, 36), (1188,  0, 15, 36), (1204,  0, 15, 36), (1220,  0, 15, 36),
   (1236,  0,  5, 36), (1242,  0,  5, 36), (1248,  0,  5, 36), (1254,  0,  5, 36),
   (1260,  0, 21, 36), (1282,  0, 21, 36), (1304,  0, 13, 36), (1318,  0, 13, 36),
   (1332,  0, 13, 36), (1346,  0, 13, 36), (1360,  0, 13, 36), (1374,  0, 13, 36),
   (1388,  0, 13, 36), (1402,  0, 13, 36), (1416,  0, 13, 36), (1430,  0, 13, 36),
   (1444,  0, 13, 36), (1458,  0, 16, 36), (1475,  0, 14, 36), (1490,  0, 14, 36),
   (1505,  0, 14, 36), (1520,  0, 14, 36), (1535,  0, 14, 36), (1550,  0, 14, 36),
   (1565,  0, 21, 36), (1587,  0, 12, 36), (1600,  0, 13, 36), (1614,  0, 13, 36),
   (1628,  0, 13, 36), (1642,  0, 13, 36), (1656,  0,  5, 36), (1662,  0,  5, 36),
   (1668,  0,  5, 36), (1674,  0,  5, 36), (1680,  0, 13, 36), (1694,  0, 13, 36),
   (1708,  0, 13, 36), (1722,  0, 13, 36), (1736,  0, 13, 36), (1750,  0, 13, 36),
   (1764,  0, 13, 36), (1778,  0, 13, 36), (1792,  0, 13, 36), (1806,  0, 13, 36),
   (1820,  0, 13, 36), (1834,  0, 13, 36), (1848,  0, 13, 36), (1862,  0, 13, 36));

Define OffsetList
 ( ( 0, 0), (-1, 0), ( 0, 0), ( 1, 0), (-1, 0), (-1, 0), ( 0, 0), (-1, 0),
   ( 1, 0), (-3, 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), ( 1, 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),
   (-2, 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","DJ","Dt","FA","Gt","LE",
  "LY","ME","PA","RY","SE","SS","St","Sv","TA","gJ","kt","ot","ss","tG","tS","to",
  "tv","t","v,","v.","vt");

Define KerningValues

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

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

     1,   1,  -1,  -1,   1);

CreateLayer               Main;
LayerSetImage             Main 'DecoTech24';
LayerSetAscent            Main 28;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (6);
LayerSetKerningPairs      Main KerningPairs KerningValues;
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 0;
LayerSetLineSpacingOffset Main 0;
LayerSetPointSize         Main 24;

SetDefaultPointSize  24;
