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 (12, 12, 12, 13, 11, 10, 13, 13, 10, 10, 13, 11, 14, 12, 14, 12, 14, 13, 12, 12, 12, 13, 18, 14, 14, 12, 11, 12, 10, 11, 12, 9, 12, 12, 5, 8, 11, 5, 16, 12, 12, 12, 12, 8, 10, 9, 12, 13, 18, 12, 12, 11, 12, 10, 12, 12, 12, 12, 12, 12, 12, 12, 14, 7, 6, 15, 14, 12, 20, 12, 15, 11, 8, 8, 8, 15, 12, 12, 7, 11, 8, 11, 10, 5, 7, 5, 5, 9, 7, 13, 5, 13, 10, 10 ); Define RectList ((2,0,13,22) , (19,0,12,22) , (34,0,12,22) , (50,0,13,22) , (67,0,11,22) , (82,0,10,22) , (95,0,13,22) , (112,0,13,22) , (128,0,10,22) , (140,0,10,22) , (154,0,13,22) , (170,0,11,22) , (184,0,14,22) , (203,0,12,22) , (219,0,14,22) , (237,0,12,22) , (252,0,14,22) , (270,0,13,22) , (285,0,12,22) , (300,0,12,22) , (315,0,12,22) , (331,0,13,22) , (347,0,18,22) , (368,0,14,22) , (384,0,14,22) , (400,0,12,22) , (414,0,11,22) , (429,0,12,22) , (444,0,10,22) , (457,0,11,22) , (471,0,12,22) , (485,0,9,22) , (496,0,12,22) , (511,0,12,22) , (526,0,5,22) , (534,0,8,22) , (546,0,11,22) , (560,0,5,22) , (569,0,16,22) , (589,0,12,22) , (604,0,12,22) , (619,0,12,22) , (633,0,12,22) , (649,0,8,22) , (660,0,10,22) , (672,0,9,22) , (684,0,12,22) , (698,0,13,22) , (712,0,18,22) , (732,0,12,22) , (746,0,12,22) , (760,0,11,22) , (774,0,12,22) , (790,0,10,22) , (804,0,12,22) , (819,0,12,22) , (834,0,12,22) , (849,0,12,22) , (864,0,12,22) , (879,0,12,22) , (894,0,12,22) , (909,0,12,22) , (924,0,14,22) , (943,0,7,22) , (957,0,6,22) , (967,0,15,22) , (985,0,14,22) , (1003,0,12,22) , (1018,0,20,22) , (1043,0,12,22) , (1059,0,15,22) , (1077,0,11,22) , (1092,0,8,22) , (1104,0,8,22) , (1116,0,8,22) , (1126,0,15,22) , (1144,0,12,22) , (1161,0,12,22) , (1179,0,7,22) , (1190,0,11,22) , (1205,0,8,22) , (1218,0,11,22) , (1233,0,10,22) , (1249,0,5,22) , (1259,0,7,22) , (1270,0,5,22) , (1279,0,5,22) , (1288,0,9,22) , (1300,0,7,22) , (1311,0,13,22) , (1329,0,5,22) , (1338,0,13,22) , (1355,0,10,22) , (1370,0,10,22) ); CreateLayer Main; LayerSetImage Main '../images/MonitorFont'; LayerSetImageMap Main CharList RectList; LayerSetAscent Main 14; LayerSetCharWidths Main CharList WidthList; LayerSetCharWidths Main (' ') (5);
pauloczips