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
 (  19,  20,  18,  19,  17,  16,  23,  20,   7,  17,  18,  14,  25,  21,  20,  18,
    21,  18,  20,  16,  20,  17,  24,  15,  20,  18,  17,  16,  15,  18,  15,  12,
    17,  16,   7,   7,  13,   7,  24,  16,  17,  17,  17,  12,  17,  14,  16,  13,
    19,  13,  15,  15,  16,   8,  16,  17,  19,  17,  18,  15,  17,  17,  16,  17,
     7,  26,  22,  16,  21,  13,  20,  17,  12,  12,  12,  15,  19,  17,  13,  16,
    13,  16,   6,   6,   5,  11,   7,  17,   6,  17,  13,  17,   7,  15,  19,  20,
    13,  23,  16,  17,  19,  19,  19,  19,  19,  19,  31,  18,  17,  17,  17,  17,
     7,   7,   7,   7,  19,  21,  20,  20,  20,  20,  20,  20,  20,  20,  20,  20,
    20,  19,  17,  17,  17,  17,  17,  17,  26,  15,  15,  15,  15,  15,   7,   7,
     7,   7,  17,  16,  17,  17,  17,  17,  17,  17,  16,  16,  16,  16,  15,  15);

Define RectList
 ( (   0,  0, 20, 40), (  21,  0, 18, 40), (  40,  0, 18, 40), (  59,  0, 18, 40),
   (  78,  0, 16, 40), (  95,  0, 17, 40), ( 113,  0, 22, 40), ( 136,  0, 19, 40),
   ( 156,  0,  5, 40), ( 162,  0, 17, 40), ( 180,  0, 16, 40), ( 197,  0, 13, 40),
   ( 211,  0, 23, 40), ( 235,  0, 19, 40), ( 255,  0, 20, 40), ( 276,  0, 17, 40),
   ( 294,  0, 21, 40), ( 316,  0, 17, 40), ( 334,  0, 19, 40), ( 354,  0, 18, 40),
   ( 373,  0, 18, 40), ( 392,  0, 18, 40), ( 411,  0, 25, 40), ( 437,  0, 17, 40),
   ( 455,  0, 20, 40), ( 476,  0, 20, 40), ( 497,  0, 16, 40), ( 514,  0, 15, 40),
   ( 530,  0, 15, 40), ( 546,  0, 17, 40), ( 564,  0, 14, 40), ( 579,  0, 14, 40),
   ( 594,  0, 15, 40), ( 610,  0, 14, 40), ( 625,  0,  6, 40), ( 632,  0, 13, 40),
   ( 646,  0, 13, 40), ( 660,  0,  5, 40), ( 666,  0, 21, 40), ( 688,  0, 13, 40),
   ( 702,  0, 16, 40), ( 719,  0, 16, 40), ( 736,  0, 18, 40), ( 755,  0, 12, 40),
   ( 768,  0, 17, 40), ( 786,  0, 13, 40), ( 800,  0, 14, 40), ( 815,  0, 14, 40),
   ( 830,  0, 20, 40), ( 851,  0, 14, 40), ( 866,  0, 16, 40), ( 883,  0, 15, 40),
   ( 899,  0, 14, 40), ( 914,  0,  7, 40), ( 922,  0, 17, 40), ( 940,  0, 18, 40),
   ( 959,  0, 19, 40), ( 979,  0, 16, 40), ( 996,  0, 16, 40), (1013,  0, 15, 40),
   (1029,  0, 15, 40), (1045,  0, 17, 40), (1063,  0, 13, 40), (1077,  0,  8, 40),
   (1086,  0,  6, 40), (1093,  0, 25, 40), (1119,  0, 20, 40), (1140,  0, 15, 40),
   (1156,  0, 19, 40), (1176,  0, 11, 40), (1188,  0, 18, 40), (1207,  0, 17, 40),
   (1225,  0, 11, 40), (1237,  0, 10, 40), (1248,  0, 12, 40), (1261,  0, 17, 40),
   (1279,  0, 16, 40), (1296,  0, 17, 40), (1314,  0, 12, 40), (1327,  0, 14, 40),
   (1342,  0, 12, 40), (1355,  0, 13, 40), (1369,  0,  8, 40), (1378,  0,  6, 40),
   (1385,  0,  4, 40), (1390,  0, 10, 40), (1401,  0,  6, 40), (1408,  0, 14, 40),
   (1423,  0,  6, 40), (1430,  0, 14, 40), (1445,  0, 12, 40), (1458,  0, 14, 40),
   (1473,  0,  6, 40), (1480,  0, 16, 40), (1497,  0, 19, 40), (1517,  0, 20, 40),
   (1538,  0, 14, 40), (1553,  0, 23, 40), (1577,  0, 16, 40), (1594,  0, 14, 40),
   (1609,  0, 20, 40), (1630,  0, 20, 40), (1651,  0, 20, 40), (1672,  0, 20, 40),
   (1693,  0, 20, 40), (1714,  0, 20, 40), (1735,  0, 34, 40), (1770,  0, 18, 40),
   (1789,  0, 16, 40), (1806,  0, 16, 40), (1823,  0, 16, 40), (1840,  0, 16, 40),
   (1857,  0,  7, 40), (1865,  0,  8, 40), (1874,  0, 11, 40), (1886,  0, 11, 40),
   (1898,  0, 21, 40), (1920,  0, 19, 40), (1940,  0, 20, 40), (1961,  0, 20, 40),
   (1982,  0, 20, 40), (2003,  0, 20, 40), (2024,  0, 20, 40), (2045,  0, 20, 40),
   (2066,  0, 18, 40), (2085,  0, 18, 40), (2104,  0, 18, 40), (2123,  0, 18, 40),
   (2142,  0, 20, 40), (2163,  0, 19, 40), (2183,  0, 16, 40), (2200,  0, 16, 40),
   (2217,  0, 16, 40), (2234,  0, 16, 40), (2251,  0, 16, 40), (2268,  0, 16, 40),
   (2285,  0, 26, 40), (2312,  0, 15, 40), (2328,  0, 14, 40), (2343,  0, 14, 40),
   (2358,  0, 14, 40), (2373,  0, 14, 40), (2388,  0,  7, 40), (2396,  0,  7, 40),
   (2404,  0, 11, 40), (2416,  0, 11, 40), (2428,  0, 16, 40), (2445,  0, 13, 40),
   (2459,  0, 16, 40), (2476,  0, 16, 40), (2493,  0, 16, 40), (2510,  0, 16, 40),
   (2527,  0, 16, 40), (2544,  0, 16, 40), (2561,  0, 14, 40), (2576,  0, 14, 40),
   (2591,  0, 14, 40), (2606,  0, 14, 40), (2621,  0, 16, 40), (2638,  0, 16, 40));

Define OffsetList
 ( ( 0, 0), ( 2, 0), ( 1, 0), ( 2, 0), ( 2, 0), ( 1, 0), ( 1, 0), ( 1, 0),
   ( 2, 0), ( 0, 0), ( 2, 0), ( 2, 0), ( 2, 0), ( 2, 0), ( 1, 0), ( 2, 0),
   ( 1, 0), ( 2, 0), ( 1, 0), ( 1, 0), ( 2, 0), ( 1, 0), ( 1, 0), ( 0, 0),
   ( 2, 0), ( 0, 0), ( 0, 0), ( 2, 0), ( 1, 0), ( 1, 0), ( 1, 0), ( 1, 0),
   ( 1, 0), ( 2, 0), ( 2, 0), (-5, 0), ( 2, 0), ( 2, 0), ( 2, 0), ( 2, 0),
   ( 1, 0), ( 1, 0), ( 1, 0), ( 2, 0), ( 0, 0), ( 1, 0), ( 2, 0), ( 0, 0),
   ( 1, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 1, 0), ( 0, 0), (-1, 0), (-1, 0),
   ( 0, 0), ( 0, 0), ( 1, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 3, 0), ( 5, 0),
   ( 1, 0), ( 1, 0), ( 2, 0), ( 1, 0), ( 2, 0), ( 7, 0), ( 1, 0), ( 0, 0),
   ( 2, 0), ( 2, 0), ( 1, 0), (-1, 0), ( 2, 0), ( 1, 0), ( 1, 0), ( 2, 0),
   ( 2, 0), ( 2, 0), (-1, 0), ( 1, 0), ( 1, 0), ( 1, 0), ( 0, 0), ( 2, 0),
   ( 0, 0), ( 2, 0), ( 1, 0), ( 2, 0), ( 1, 0), ( 1, 0), ( 0, 0), ( 2, 0),
   ( 0, 0), ( 1, 0), ( 1, 0), ( 2, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0),
   ( 0, 0), ( 0, 0), (-1, 0), ( 1, 0), ( 2, 0), ( 2, 0), ( 2, 0), ( 2, 0),
   ( 2, 0), ( 2, 0), ( 0, 0), ( 0, 0), (-1, 0), ( 2, 0), ( 1, 0), ( 1, 0),
   ( 1, 0), ( 1, 0), ( 1, 0), ( 1, 0), ( 2, 0), ( 2, 0), ( 2, 0), ( 2, 0),
   ( 2, 0), ( 1, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0), ( 0, 0),
   ( 0, 0), ( 1, 0), ( 1, 0), ( 1, 0), ( 1, 0), ( 1, 0), ( 1, 0), ( 2, 0),
   (-1, 0), (-1, 0), ( 1, 0), ( 2, 0), ( 1, 0), ( 1, 0), ( 1, 0), ( 1, 0),
   ( 1, 0), ( 1, 0), ( 2, 0), ( 2, 0), ( 2, 0), ( 2, 0), ( 0, 0), ( 0, 0));

Define KerningPairs
 ("AT","AV","AY","Ay","BU","De","FA","Kv","Ky","LT","LY","ME","OA","PA","Pa","Pe",
  "Po","RG","TA","Ta","Tc","Te","To","Tr","Ts","Tu","Ty","VA","VO","Va","Ve","Vo",
  "Vr","Vu","We","fg");

Define KerningValues
 (  -4,  -2,  -6,  -2,  -1,  -2,  -2,  -2,  -3,  -3,  -5,  -1,  -1,  -3,  -4,  -4,
    -3,  -1,  -2,  -2,  -2,  -3,  -2,  -3,  -2,  -2,  -3,  -3,  -1,  -1,  -3,  -2,
    -1,  -2,  -1,  -2);

CreateLayer               Main;
LayerSetImage             Main 'KomikaText24';
LayerSetAscent            Main 31;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (8);
LayerSetKerningPairs      Main KerningPairs KerningValues;
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 0;
LayerSetLineSpacingOffset Main 0;
LayerSetPointSize         Main 24;

SetDefaultPointSize  24;
