unit data; interface type Tfouri = array[0..4] of integer; Tline = array[1..10] of integer; Tletdat = array [0..255] of Tfouri; const letfiles: array[0..0] of String = ( ('abc.png') // default // ,('new file.png') ); letls: array[0..0] of Tline = ( // line start y ( 0, 73,146,218,291, 0, 0, 0, 0, 0) // for default // , // ( 0, 0, 0, 0, 0, 0, 0, 0, 0, 0) ); letlb: array[0..0] of Tline = ( // line base y ( 57,130,203,276,349, 0, 0, 0, 0, 0) // , // ,( 0, 0, 0, 0, 0, 0, 0, 0, 0, 0) ); letle: array[0..0] of Tline = ( // line end y ( 72,145,216,288,364, 0, 0, 0, 0, 0) // , // ,( 0, 0, 0, 0, 0, 0, 0, 0, 0, 0) ); letdat: array[0..0] of Tletdat //char code, line, x pos, width, dec before, dec after =(// normal letters in 'abc.png' ((0, 0, 0, 0, 0), //00 (0, 0, 0, 0, 0), //01 (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), //10 (0, 0, 0, 0, 0), //11 (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), //20 (0, 0, 0, 0, 0), //21 (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), //30 (0, 0, 0, 0, 0), //31 (1, 1456, 12, 0, 0), //32 space (5, 10, 11, 0, 0), //33 ! (5, 22, 21, 0, 0), //34 " (5, 44, 38, 0, 0), //35 # (5, 83, 33, 0, 0), //36 $ (5, 117, 52, 0, 0), //37 % (5, 170, 41, 0, 0), //38 & (5, 212, 11, 0, 0), //39 ' (5, 1500, 19, 0, 3), //40 ( (5, 1520, 19, 2, 0), //41 ) (5, 264, 25, 0, 0), // 2 * (5, 290, 34, 0, 0), // 3 + (5, 325, 12, 0, 0), // 4 , (5, 338, 22, 0, 0), // 5 - (5, 361, 12, 0, 0), // 6 . (5, 373, 22, 0, 0), // 7 / (1, 1115, 33, 0, 0), // 8 0 (1, 1149, 21, 0, 0), // 9 1 (1, 1172, 32, 0, 0), //50 2 (1, 1205, 33, 0, 0), //51 3 (1, 1240, 35, 0, 0), // 2 4 (1, 1277, 33, 0, 0), // 3 5 (1, 1311, 34, 0, 0), // 4 6 (1, 1346, 33, 0, 0), // 5 7 (1, 1380, 33, 0, 0), // 6 8 (1, 1414, 34, 0, 0), // 7 9 (5, 396, 10, 0, 0), // 8 : (5, 408, 11, 0, 0), // 9 ; (5, 420, 34, 0, 0), //60 < (0, 0, 0, 0, 0), //61 (5, 455, 34, 0, 0), // 2 > (5, 490, 33, 0, 0), //63 ? (5, 524, 61, 0, 0), // 4 @ (3, 10, 46, 1, 0), //65 A (3, 104, 38, 1, 0), // 6 B (3, 143, 43, 1, 0), // 7 C (3, 187, 41, 1, 0), // 8 D (3, 229, 38, 1, 0), // 9 E (3, 306, 35, 1, 1), //70 F (3, 343, 45, 1, 0), //71 G (3, 389, 39, 1, 0), // 2 H (3, 429, 11, 1, 0), // 3 I (3, 454, 29, 1, 0), // 4 J (3, 484, 41, 1, 0), // 5 K (3, 526, 31, 1, 0), // 6 L (3, 559, 47, 1, 0), // 7 M (3, 607, 39, 1, 0), // 8 N (3, 647, 47, 1, 0), // 9 O (3, 838, 38, 1, 0), //80 P (3, 877, 47, 1, 0), //81 Q (3, 925, 44, 1, 1), // 2 R (3, 970, 39, 1, 0), // 3 S (3, 1010, 39, 1, 0), // 4 T (3, 1050, 40, 1, 1), // 5 U (3, 1214, 44, 1, 1), // 6 V . (3, 1259, 61, 2, 1), // 7 W . (3, 1321, 45, 2, 1), // 8 X (3, 1367, 45, 3, 2), // 9 Y (3, 1413, 40, 2, 1), //90 Z (5, 586, 17, 0, 0), //91 [ (0, 0, 0, 0, 0), // 2 (5, 604, 17, 0, 0), // 3 ] (0, 0, 0, 0, 0), // 4 (0, 0, 0, 0, 0), // 5 (0, 0, 0, 0, 0), // 6 (1, 10, 33, 1, 0), // 7 a (1, 79, 33, 1, 0), // 8 b (1, 113, 31, 1, 0), // 9 c (1, 146, 32, 1, 0), //100 d (1, 179, 34, 1, 0), //101 e (1, 249, 24, 2, 2), // 2 f (1, 274, 32, 1, 1), // 3 g (1, 308, 30, 1, 0), // 4 h (1, 340, 10, 1, 0), // 5 i (1, 368, 16, 4, 1), // 6 j (1, 386, 31, 1, 0), // 7 k (1, 418, 11, 1, 0), // 8 l (1, 430, 47, 1, 0), // 9 m (1, 479, 30, 1, 0), //110 n (1, 511, 35, 1, 0), //111 o (1, 656, 32, 1, 1), // 2 p (1, 689, 32, 1, 0), // 3 q (1, 722, 22, 0, 2), // 4 r (1, 745, 31, 0, 0), // 5 s (1, 777, 20, 2, 1), // 6 t (1, 798, 31, 0, 0), // 7 u (1, 927, 33, 1, 0), // 8 v (1, 961, 48, 1, 1), // 9 w (1, 1011, 33, 0, 0), //120 x (1, 1046, 33, 1, 1), //121 y (1, 1081, 32, 1, 0), // 2 z (0, 0, 0, 0, 0), // 3 (0, 0, 0, 0, 0), // 4 (0, 0, 0, 0, 0), // 5 (0, 0, 0, 0, 0), // 6 (0, 0, 0, 0, 0), // 7 (0, 0, 0, 0, 0), // 8 (0, 0, 0, 0, 0), // 9 (0, 0, 0, 0, 0), //130 (0, 0, 0, 0, 0), //131 (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), //140 (0, 0, 0, 0, 0), //141 (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), //150 (0, 0, 0, 0, 0), //151 (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), //160 (5, 1543, 11, 0, 0), //161 ¡ (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), //170 (0, 0, 0, 0, 0), //171 (0, 0, 0, 0, 0), // 2 (0, 0, 0, 0, 0), // 3 (0, 0, 0, 0, 0), // 4 (0, 0, 0, 0, 0), // 5 (5, 622, 21, 0, 0), // 6 ° (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), //180 (0, 0, 0, 0, 0), //181 (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), //190 (5, 229, 33, 0, 0), //191 (0, 0, 0, 0, 0), // 2 (3, 57, 46, 1, 0), //193 Á (0, 0, 0, 0, 0), // 4 (0, 0, 0, 0, 0), // 5 (0, 0, 0, 0, 0), // 6 (0, 0, 0, 0, 0), // 7 (0, 0, 0, 0, 0), // 8 (0, 0, 0, 0, 0), // 9 (0, 0, 0, 0, 0), //200 (3, 268, 37, 1, 0), //201 É (0, 0, 0, 0, 0), // 2 (0, 0, 0, 0, 0), // 3 (0, 0, 0, 0, 0), // 4 (3, 1459, 16, 0, 6), //205 Í (0, 0, 0, 0, 0), // 6 (0, 0, 0, 0, 0), // 7 (0, 0, 0, 0, 0), // 8 (3, 1479, 40, 1, 0), // 9 (3, 0, 0, 0, 0), //210 (3, 695, 47, 1, 0), //211 Ó (0, 0, 0, 0, 0), // 2 (3, 790, 47, 1, 0), //213 O" (3, 743, 46, 1, 0), //214 Ö (0, 0, 0, 0, 0), // 5 (0, 0, 0, 0, 0), // 6 (0, 0, 0, 0, 0), // 7 (3, 1091, 39, 0, 0), //218 Ú . (3, 1173, 39, 0, 0), //219 U" (3, 1132, 39, 0, 0), //220 Ü . (0, 0, 0, 0, 0), //221 (0, 0, 0, 0, 0), // 2 (0, 0, 0, 0, 0), // 3 (0, 0, 0, 0, 0), // 4 (1, 45, 33, 1, 0), //225 á (0, 0, 0, 0, 0), // 6 (0, 0, 0, 0, 0), // 7 (0, 0, 0, 0, 0), // 8 (0, 0, 0, 0, 0), // 9 (0, 0, 0, 0, 0), //230 (0, 0, 0, 0, 0), //231 (0, 0, 0, 0, 0), // 2 (1, 214, 34, 1, 0), //233 é (0, 0, 0, 0, 0), // 4 (0, 0, 0, 0, 0), // 5 (0, 0, 0, 0, 0), // 6 (1, 351, 15, 0, 4), //237 í (0, 0, 0, 0, 0), // 8 (0, 0, 0, 0, 0), // 9 (0, 0, 0, 0, 0), //240 (1, 1450, 29, 1, 0), //241 ń . (0, 0, 0, 0, 0), // 2 (1, 547, 35, 1, 0), //243 ó (0, 0, 0, 0, 0), // 4 (1, 619, 35, 1, 1), //245 o" (1, 583, 35, 1, 1), //246 ö (0, 0, 0, 0, 0), // 7 (0, 0, 0, 0, 0), // 8 (0, 0, 0, 0, 0), // 9 (1, 830, 31, 1, 0), //250 ú (1, 894, 31, 1, 0), //251 u" (1, 862, 31, 1, 0), //252 ü (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0)) // ,( // put the new data here (normal) // (0, 0, 0, 0, 0), // ... // (0, 0, 0, 0, 0)) ); letdati: array [0..0] of Tletdat // italic letters in 'abc.png' // code, line, x pos, width, dec before, dec after = (((0, 0, 0, 0, 0), //00 (0, 0, 0, 0, 0), //01 (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), //10 (0, 0, 0, 0, 0), //11 (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), //20 (0, 0, 0, 0, 0), //21 (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), //30 (0, 0, 0, 0, 0), //31 (1, 1456, 13, 0, 0), //32 space (5, 685, 19, 0, 0), //33 ! (5, 709, 20, 0, 0), //34 " (5, 735, 37, 0, 0), //35 # (5, 776, 36, 0, 0), //36 $ (5, 818, 47, 0, 0), //37 % (5, 874, 38, 0, 0), //38 & (5, 922, 12, 0, 0), //39 ' (5, 941, 24, 0, 3), //40 ( (5, 969, 25, 2, 0), //41 ) (5, 1003, 23, 0, 0), // 2 * (5, 1031, 33, 0, 0), // 3 + (5, 1069, 13, 0, 0), // 4 , (5, 1091, 20, 0, 0), // 5 - (5, 1116, 12, 0, 0), // 6 . (5, 1135, 31, 0, 0), // 7 / (2, 1288, 35, 0, 0), // 8 0 (2, 1333, 21, 0, 0), // 9 1 (2, 1356, 34, 0, 0), //50 2 (2, 1396, 33, 0, 0), //51 3 (2, 1434, 34, 0, 0), // 2 4 (2, 1475, 33, 0, 0), // 3 5 (2, 1515, 34, 0, 0), // 4 6 (2, 1554, 33, 0, 0), // 5 7 (2, 1589, 33, 0, 0), // 6 8 (2, 1629, 34, 0, 0), // 7 9 (5, 1172, 17, 0, 0), // 8 : (5, 1195, 17, 0, 0), // 9 ; (5, 1223, 32, 0, 0), //60 < (0, 0, 0, 0, 0), //61 (5, 1268, 31, 0, 0), // 2 > (5, 1311, 29, 0, 0), //63 ? (5, 1345, 60, 0, 0), // 4 @ (4, 11, 43, 0, -1), //65 A (4, 111, 41, 1, 0), // 6 B (4, 158, 44, 1, 2), // 7 C (4, 203, 45, 1, 2), // 8 D (4, 249, 45, 1, 3), // 9 E (4, 342, 42, 1, 4), //70 F (4, 385, 46, 1, 3), //71 G (4, 432, 48, 1, 3), // 2 H (4, 481, 19, 0, 2), // 3 I (4, 528, 35, 4, 4), // 4 J (4, 564, 46, 2, 3), // 5 K (4, 612, 33, 1,-1), // 6 L (4, 650, 55, 0, 4), // 7 M (4, 706, 48, 2, 3), // 8 N (4, 755, 47, 0, 2), // 9 O (4, 955, 44, 1, 1), //80 P (4, 1004, 46, 1, 2), //81 Q (4, 1055, 45, 1, 2), // 2 R (4, 1104, 41, 0, 2), // 3 S (4, 1151, 38, 0, 2), // 4 T . (4, 1190, 45, 0, 2), // 5 U (4, 1379, 43, 0, 2), // 6 V . (4, 1425, 61, 1, 5), // 7 W . (4, 1490, 50, 2, 2), // 8 X (4, 1546, 43, 1, 4), // 9 Y (4, 1592, 42, 3, 2), //90 Z (5, 1410, 27, 0, 0), //91 [ (0, 0, 0, 0, 0), // 2 (5, 1441, 28, 0, 0), // 3 ] (0, 0, 0, 0, 0), // 4 (0, 0, 0, 0, 0), // 5 (0, 0, 0, 0, 0), // 6 (2, 10, 35, 2, 2), // 7 a (2, 84, 35, 2, 2), // 8 b (2, 123, 32, 0, 1), // 9 c (2, 159, 37, 1, 3), //100 d (2, 198, 34, 1, 1), //101 e (2, 280, 27, 2, 9), // 2 f (2, 308, 37, 1, 3), // 3 g (2, 347, 34, 3, 2), // 4 h (2, 382, 19, 2, 4), // 5 i (2, 426, 27,14, 3), // 6 j (2, 456, 35, 2, 2), // 7 k (2, 493, 19, 2, 4), // 8 l (2, 514, 52, 2, 2), // 9 m (2, 568, 34, 2, 2), //110 n (2, 606, 35, 1, 1), //111 o (2, 762, 37, 6, 0), // 2 p (2, 804, 35, 1, 2), // 3 q (2, 842, 27, 1, 3), // 4 r (2, 872, 32, 1, 1), // 5 s (2, 908, 20, 2, 2), // 6 t (2, 932, 34, 1, 2), // 7 u (2, 1081, 33, 1, 2), // 8 v (2, 1121, 47, 1, 3), // 9 w (2, 1169, 37, 3, 3), //120 x (2, 1209, 37, 2, 2), //121 y (2, 1249, 34, 2, 2), // 2 z (0, 0, 0, 0, 0), // 3 (0, 0, 0, 0, 0), // 4 (0, 0, 0, 0, 0), // 5 (0, 0, 0, 0, 0), // 6 (0, 0, 0, 0, 0), // 7 (0, 0, 0, 0, 0), // 8 (0, 0, 0, 0, 0), // 9 (0, 0, 0, 0, 0), //130 (0, 0, 0, 0, 0), //131 (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), //140 (0, 0, 0, 0, 0), //141 (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), //150 (0, 0, 0, 0, 0), //151 (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), //160 (5, 1558, 19, 0, 0), //161 ¡ (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), //170 (0, 0, 0, 0, 0), //171 (0, 0, 0, 0, 0), // 2 (0, 0, 0, 0, 0), // 3 (0, 0, 0, 0, 0), // 4 (0, 0, 0, 0, 0), // 5 (5, 622, 21, 0, 0), // 6 ° (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), //180 (0, 0, 0, 0, 0), //181 (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), //190 (5, 1578, 32, 0, 0), //191 (0, 0, 0, 0, 0), // 2 (4, 62, 43, 0,-1), //193 Á (0, 0, 0, 0, 0), // 4 (0, 0, 0, 0, 0), // 5 (0, 0, 0, 0, 0), // 6 (0, 0, 0, 0, 0), // 7 (0, 0, 0, 0, 0), // 8 (0, 0, 0, 0, 0), // 9 (0, 0, 0, 0, 0), //200 (4, 296, 45, 1, 3), //201 É (0, 0, 0, 0, 0), // 2 (0, 0, 0, 0, 0), // 3 (0, 0, 0, 0, 0), // 4 (4, 502, 24, 0, 4), //205 Í (0, 0, 0, 0, 0), // 6 (0, 0, 0, 0, 0), // 7 (0, 0, 0, 0, 0), // 8 (3, 1521, 48, 0, 2), // 9 N~ (4, 0, 0, 0, 0), //210 (4, 806, 46, 0, 2), //211 Ó (0, 0, 0, 0, 0), // 2 (4, 907, 47, 0, 2), //213 O" (4, 856, 46, 0, 2), //214 Ö (0, 0, 0, 0, 0), // 5 (0, 0, 0, 0, 0), // 6 (0, 0, 0, 0, 0), // 7 (4, 1237, 45, 1, 2), //218 Ú . (4, 1329, 45, 1, 2), //219 U". (4, 1283, 45, 1, 2), //220 Ü . (0, 0, 0, 0, 0), //221 (0, 0, 0, 0, 0), // 2 (0, 0, 0, 0, 0), // 3 (0, 0, 0, 0, 0), // 4 (2, 49, 34, 2, 2), //225 á (0, 0, 0, 0, 0), // 6 (0, 0, 0, 0, 0), // 7 (0, 0, 0, 0, 0), // 8 (0, 0, 0, 0, 0), // 9 (0, 0, 0, 0, 0), //230 (0, 0, 0, 0, 0), //231 (0, 0, 0, 0, 0), // 2 (2, 237, 34, 1, 1), //233 é (0, 0, 0, 0, 0), // 4 (0, 0, 0, 0, 0), // 5 (0, 0, 0, 0, 0), // 6 (2, 402, 22, 2, 4), //237 í (0, 0, 0, 0, 0), // 8 (0, 0, 0, 0, 0), // 9 (0, 0, 0, 0, 0), //240 (1, 1481, 34, 1, 0), //241 n~ (0, 0, 0, 0, 0), // 2 (2, 646, 34, 1, 1), //243 ó (0, 0, 0, 0, 0), // 4 (2, 725, 35, 1, 1), //245 o" . (2, 685, 35, 1, 1), //246 ö (0, 0, 0, 0, 0), // 7 (0, 0, 0, 0, 0), // 8 (0, 0, 0, 0, 0), // 9 (2, 968, 34, 1, 2), //2500 ú (2, 1041, 34, 1, 2), //251 u . (2, 1004, 34, 1, 2), //252 ü (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0), // (0, 0, 0, 0, 0)) // ,( // put the new data here (italic) // (0, 0, 0, 0, 0), // ... // (0, 0, 0, 0, 0)) ); implementation end.