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
 (  17,  18,  17,  18,  15,  14,  21,  18,   6,  15,  16,  13,  23,  19,  18,  16,
    19,  16,  18,  14,  18,  15,  22,  14,  18,  16,  15,  15,  13,  16,  14,  11,
    15,  15,   6,   6,  12,   6,  22,  15,  15,  15,  15,  11,  15,  13,  15,  12,
    17,  12,  13,  13,  15,   7,  15,  15,  17,  15,  16,  14,  15,  15,  14,  15,
     6,  23,  20,  15,  19,  12,  18,  15,  11,  11,  11,  14,  17,  16,  12,  14,
    12,  14,   6,   6,   5,  10,   6,  15,   6,  15,  12,  15,   6,  14,  17,  18,
    12,  21,  15,  15,  17,  17,  17,  17,  17,  17,  29,  17,  15,  15,  15,  15,
     6,   6,   6,   6,  18,  19,  18,  18,  18,  18,  18,  18,  18,  18,  18,  18,
    18,  18,  15,  15,  15,  15,  15,  15,  23,  13,  14,  14,  14,  14,   6,   6,
     6,   6,  15,  15,  15,  15,  15,  15,  15,  15,  15,  15,  15,  15,  13,  13);

Define RectList
 ( (   0,  0, 18, 37), (  19,  0, 17, 37), (  37,  0, 17, 37), (  55,  0, 16, 37),
   (  72,  0, 16, 37), (  89,  0, 15, 37), ( 105,  0, 20, 37), ( 126,  0, 17, 37),
   ( 144,  0,  6, 37), ( 151,  0, 15, 37), ( 167,  0, 15, 37), ( 183,  0, 12, 37),
   ( 196,  0, 21, 37), ( 218,  0, 18, 37), ( 237,  0, 18, 37), ( 256,  0, 16, 37),
   ( 273,  0, 19, 37), ( 293,  0, 16, 37), ( 310,  0, 18, 37), ( 329,  0, 16, 37),
   ( 346,  0, 16, 37), ( 363,  0, 16, 37), ( 380,  0, 23, 37), ( 404,  0, 16, 37),
   ( 421,  0, 19, 37), ( 441,  0, 18, 37), ( 460,  0, 15, 37), ( 476,  0, 14, 37),
   ( 491,  0, 13, 37), ( 505,  0, 15, 37), ( 521,  0, 13, 37), ( 535,  0, 13, 37),
   ( 549,  0, 14, 37), ( 564,  0, 13, 37), ( 578,  0,  6, 37), ( 585,  0, 11, 37),
   ( 597,  0, 12, 37), ( 610,  0,  5, 37), ( 616,  0, 20, 37), ( 637,  0, 13, 37),
   ( 651,  0, 14, 37), ( 666,  0, 14, 37), ( 681,  0, 16, 37), ( 698,  0, 12, 37),
   ( 711,  0, 15, 37), ( 727,  0, 12, 37), ( 740,  0, 12, 37), ( 753,  0, 13, 37),
   ( 767,  0, 18, 37), ( 786,  0, 13, 37), ( 800,  0, 14, 37), ( 815,  0, 14, 37),
   ( 830,  0, 13, 37), ( 844,  0,  6, 37), ( 851,  0, 15, 37), ( 867,  0, 16, 37),
   ( 884,  0, 17, 37), ( 902,  0, 15, 37), ( 918,  0, 14, 37), ( 933,  0, 14, 37),
   ( 948,  0, 14, 37), ( 963,  0, 15, 37), ( 979,  0, 11, 37), ( 991,  0,  6, 37),
   ( 998,  0,  6, 37), (1005,  0, 23, 37), (1029,  0, 18, 37), (1048,  0, 14, 37),
   (1063,  0, 17, 37), (1081,  0, 11, 37), (1093,  0, 17, 37), (1111,  0, 15, 37),
   (1127,  0, 10, 37), (1138,  0,  9, 37), (1148,  0, 11, 37), (1160,  0, 16, 37),
   (1177,  0, 14, 37), (1192,  0, 16, 37), (1209,  0, 11, 37), (1221,  0, 13, 37),
   (1235,  0, 11, 37), (1247,  0, 13, 37), (1261,  0,  7, 37), (1269,  0,  5, 37),
   (1275,  0,  4, 37), (1280,  0,  9, 37), (1290,  0,  6, 37), (1297,  0, 13, 37),
   (1311,  0,  6, 37), (1318,  0, 13, 37), (1332,  0, 11, 37), (1344,  0, 14, 37),
   (1359,  0,  6, 37), (1366,  0, 14, 37), (1381,  0, 17, 37), (1399,  0, 19, 37),
   (1419,  0, 12, 37), (1432,  0, 21, 37), (1454,  0, 14, 37), (1469,  0, 14, 37),
   (1484,  0, 18, 37), (1503,  0, 18, 37), (1522,  0, 18, 37), (1541,  0, 18, 37),
   (1560,  0, 18, 37), (1579,  0, 18, 37), (1598,  0, 31, 37), (1630,  0, 17, 37),
   (1648,  0, 16, 37), (1665,  0, 16, 37), (1682,  0, 16, 37), (1699,  0, 16, 37),
   (1716,  0,  7, 37), (1724,  0,  8, 37), (1733,  0, 10, 37), (1744,  0, 10, 37),
   (1755,  0, 19, 37), (1775,  0, 18, 37), (1794,  0, 18, 37), (1813,  0, 18, 37),
   (1832,  0, 18, 37), (1851,  0, 18, 37), (1870,  0, 18, 37), (1889,  0, 18, 37),
   (1908,  0, 16, 37), (1925,  0, 16, 37), (1942,  0, 16, 37), (1959,  0, 16, 37),
   (1976,  0, 19, 37), (1996,  0, 17, 37), (2014,  0, 15, 37), (2030,  0, 15, 37),
   (2046,  0, 15, 37), (2062,  0, 15, 37), (2078,  0, 15, 37), (2094,  0, 15, 37),
   (2110,  0, 24, 37), (2135,  0, 13, 37), (2149,  0, 13, 37), (2163,  0, 13, 37),
   (2177,  0, 13, 37), (2191,  0, 13, 37), (2205,  0,  7, 37), (2213,  0,  7, 37),
   (2221,  0, 10, 37), (2232,  0, 10, 37), (2243,  0, 14, 37), (2258,  0, 13, 37),
   (2272,  0, 14, 37), (2287,  0, 14, 37), (2302,  0, 14, 37), (2317,  0, 14, 37),
   (2332,  0, 14, 37), (2347,  0, 14, 37), (2362,  0, 12, 37), (2375,  0, 12, 37),
   (2388,  0, 12, 37), (2401,  0, 12, 37), (2414,  0, 14, 37), (2429,  0, 14, 37));

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

CreateLayer               Main;
LayerSetImage             Main 'KomikaText22';
LayerSetAscent            Main 28;
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 22;

SetDefaultPointSize  22;
