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 ( 16, 13, 17, 16, 12, 11, 15, 17, 6, 15, 19, 9, 21, 16, 20, 14, 20, 16, 15, 10, 15, 15, 18, 14, 14, 11, 15, 13, 17, 16, 12, 12, 15, 15, 9, 15, 16, 11, 18, 16, 20, 14, 14, 16, 15, 10, 16, 15, 24, 14, 15, 11, 20, 6, 15, 13, 14, 15, 13, 10, 17, 13, 16, 5, 5, 20, 15, 14, 16, 15, 0, 11, 15, 15, 16, 16, 16, 15, 11, 15, 11, 15, 5, 5, 5, 10, 5, 15, 5, 15, 14, 15); Define RectList ( ( 0, 0, 35, 48), ( 36, 0, 32, 48), ( 69, 0, 43, 48), ( 113, 0, 34, 48), ( 148, 0, 31, 48), ( 180, 0, 31, 48), ( 212, 0, 34, 48), ( 247, 0, 43, 48), ( 291, 0, 24, 48), ( 316, 0, 32, 48), ( 349, 0, 48, 48), ( 398, 0, 33, 48), ( 432, 0, 47, 48), ( 480, 0, 34, 48), ( 515, 0, 40, 48), ( 556, 0, 33, 48), ( 590, 0, 40, 48), ( 631, 0, 35, 48), ( 667, 0, 34, 48), ( 702, 0, 29, 48), ( 732, 0, 33, 48), ( 766, 0, 35, 48), ( 802, 0, 36, 48), ( 839, 0, 33, 48), ( 873, 0, 33, 48), ( 907, 0, 29, 48), ( 937, 0, 35, 48), ( 973, 0, 31, 48), (1005, 0, 36, 48), (1042, 0, 34, 48), (1077, 0, 32, 48), (1110, 0, 31, 48), (1142, 0, 34, 48), (1177, 0, 33, 48), (1211, 0, 29, 48), (1241, 0, 35, 48), (1277, 0, 34, 48), (1312, 0, 30, 48), (1343, 0, 36, 48), (1380, 0, 34, 48), (1415, 0, 40, 48), (1456, 0, 33, 48), (1490, 0, 33, 48), (1524, 0, 35, 48), (1560, 0, 34, 48), (1595, 0, 29, 48), (1625, 0, 35, 48), (1661, 0, 35, 48), (1697, 0, 44, 48), (1742, 0, 33, 48), (1776, 0, 35, 48), (1812, 0, 29, 48), (1842, 0, 39, 48), (1882, 0, 24, 48), (1907, 0, 34, 48), (1942, 0, 32, 48), (1975, 0, 33, 48), (2009, 0, 34, 48), (2044, 0, 31, 48), (2076, 0, 30, 48), (2107, 0, 37, 48), (2145, 0, 31, 48), (2177, 0, 40, 48), (2218, 0, 23, 48), (2242, 0, 24, 48), (2267, 0, 40, 48), (2308, 0, 34, 48), (2343, 0, 34, 48), (2378, 0, 34, 48), (2413, 0, 33, 48), (2447, 0, 33, 48), (2481, 0, 28, 48), (2510, 0, 34, 48), (2545, 0, 33, 48), (2579, 0, 34, 48), (2614, 0, 37, 48), (2652, 0, 34, 48), (2687, 0, 35, 48), (2723, 0, 29, 48), (2753, 0, 40, 48), (2794, 0, 29, 48), (2824, 0, 39, 48), (2864, 0, 23, 48), (2888, 0, 23, 48), (2912, 0, 23, 48), (2936, 0, 28, 48), (2965, 0, 23, 48), (2989, 0, 34, 48), (3024, 0, 23, 48), (3048, 0, 34, 48), (3083, 0, 33, 48), (3117, 0, 34, 48)); Define OffsetList ( (-10, 0), (-9, 0), (-10, 0), (-9, 0), (-9, 0), (-9, 0), (-9, 0), (-9, 0), (-9, 0), (-9, 0), (-9, 0), (-9, 0), (-17, 0), (-9, 0), (-10, 0), (-9, 0), (-10, 0), (-9, 0), (-10, 0), (-9, 0), (-9, 0), (-10, 0), (-9, 0), (-9, 0), (-9, 0), (-9, 0), (-10, 0), (-9, 0), (-10, 0), (-9, 0), (-10, 0), (-9, 0), (-9, 0), (-9, 0), (-10, 0), (-10, 0), (-9, 0), (-9, 0), (-9, 0), (-9, 0), (-10, 0), (-9, 0), (-10, 0), (-10, 0), (-10, 0), (-9, 0), (-9, 0), (-10, 0), (-10, 0), (-9, 0), (-10, 0), (-9, 0), (-9, 0), (-9, 0), (-9, 0), (-10, 0), (-10, 0), (-9, 0), (-9, 0), (-10, 0), (-10, 0), (-9, 0), (-12, 0), (-9, 0), (-9, 0), (-10, 0), (-9, 0), (-10, 0), (-10, 0), (-9, 0), (-10, 0), (-9, 0), (-10, 0), (-9, 0), (-9, 0), (-10, 0), (-9, 0), (-10, 0), (-9, 0), (-13, 0), (-9, 0), (-12, 0), (-9, 0), (-9, 0), (-9, 0), (-9, 0), (-9, 0), (-10, 0), (-9, 0), (-10, 0), (-10, 0), (-10, 0)); CreateLayer Main; LayerSetImage Main 'NativeAlienExtended16'; LayerSetAscent Main 36; LayerSetCharWidths Main CharList WidthList; LayerSetCharWidths Main (' ') (12); LayerSetImageMap Main CharList RectList; LayerSetCharOffsets Main CharList OffsetList; LayerSetAscentPadding Main 10; LayerSetLineSpacingOffset Main 0; LayerSetPointSize Main 16; Define MapFrom ('C', 'H', 'K', 'M', 'V', 'r'); Define MapTo ('c', 'h', 'k', 'm', 'v', 'R'); SetCharMap MapFrom MapTo; SetDefaultPointSize 16;
jarekwil