Define CharList ('B', 'C', 'D', 'E', 'G', 'I', 'L', 'M', 'N', 'O', 'P', 'R', 'S', 'T', 'U', 'V', 'X', '0', '1', '2', '3', '4', '5', '6', '7', '8', '9', '!'); Define WidthList (20, 32, 26, 25, 31, 9, 18, 34, 28, 38, 21, 30, 21, 25, 25, 26, 33, 38, 19, 29, 26, 31, 29, 29, 28, 26, 29, 9); Define RectList ((0, 0, 24, 44), (24, 0, 36, 44), (60, 0, 30, 44), (90, 0, 29, 44), (119, 0, 35, 44), (154, 0, 12, 44), (166, 0, 22, 44), (188, 0, 38, 44), (226, 0, 38, 44), (264, 0, 48, 44), (312, 0, 25, 44), (337, 0, 34, 44), (371, 0, 25, 44), (396, 0, 29, 44), (425, 0, 29, 44), (454, 0, 30, 44), (484, 0, 37, 44), (521, 0, 48, 44), (569, 0, 23, 44), (592, 0, 33, 44), (625, 0, 30, 44), (655, 0, 35, 44), (690, 0, 33, 44), (723, 0, 33, 44), (756, 0, 32, 44), (788, 0, 30, 44), (818, 0, 33, 44), (851, 0, 13, 44)); Define KerningPairs ("O!", "EL", "NT", "ED", "IB", "BL", "OL", "LV", "VE"); Define KerningValues (8, 2, 4, 2, 2, 2, 8, -2, 2); CreateLayer Main; LayerSetImage Main "BigFont"; LayerSetCharWidths Main (' ') (16); LayerSetKerningPairs Main KerningPairs KerningValues; LayerSetAscent Main 40; LayerSetCharWidths Main CharList WidthList; LayerSetImageMap Main CharList RectList;