Generateur d'Applications - Gestion de Fichier sur DBase II (F) (128K) (1986) [Original].dsk
Size : 512 (Real : 512)
000000: 11 00 03 21 00 00 06 04 CD 01 02 30 34 10 F9 CD ...!.......04...
000010: C5 01 20 64 11 00 0C 06 10 7E B7 28 1A E5 C5 6F .. d.....~.(...o
000020: 26 00 CD FC 01 30 1A C1 E1 23 10 ED 21 2A 02 34 &....0...#..!*.4
000030: D5 CD C5 01 D1 28 E0 21 00 0C 0E FF CD 9B BE 16 .....(.!........
000040: BD 21 46 01 18 6B 0D 0A 44 69 73 63 65 74 74 65 .!F..k..Discette
000050: 20 72 65 61 64 20 66 61 69 6C 75 72 65 0D 0A 50 read failure..P
000060: 72 65 73 73 20 61 6E 79 20 6B 65 79 20 74 6F 20 ress any key to
000070: 72 65 73 74 61 72 74 FF 21 7D 01 18 34 0D 0A 43 restart.!}..4..C
000080: 61 6E 6E 6F 74 20 66 69 6E 64 20 22 2E 45 4D 53 annot find ".EMS
000090: 22 20 66 69 6C 65 0D 0A 50 72 65 73 73 20 61 6E " file..Press an
0000A0: 79 20 6B 65 79 20 74 6F 20 72 65 73 74 61 72 74 y key to restart
0000B0: FF 7E 23 FE FF C4 5A BB 20 F7 CD 1B BB 38 FB CD .~#...Z. ....8..
0000C0: 18 BB CF 00 00 21 00 03 06 40 7E E6 F0 20 22 C5 .....!...@~.. ".
0000D0: E5 11 0D 00 19 11 2B 02 01 FF 0C 1B 1A 2B AE A1 ......+......+..
0000E0: 28 09 1A FE 3F 20 08 7E A1 12 AF 0E 7F 10 EC E1 (...? .~........
0000F0: C1 11 10 00 19 C8 19 10 D1 F6 FF C9 29 CD 01 02 ............)...
000100: D0 C5 E5 01 F7 FF 3E 01 3C 09 38 FC 67 7D C6 4A ......>.<.8.g}.J
000110: 4F 2E 00 EB CD 89 BE EB E1 C1 D0 14 14 23 C9 3F O............#.?
000120: 3F 3F 3F 3F 3F 3F 3F 45 4D 53 00 CF CF CF CF CF ???????EMS......
000130: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
000140: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
000150: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
000160: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
000170: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
000180: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
000190: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
0001A0: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
0001B0: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
0001C0: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
0001D0: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
0001E0: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
0001F0: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: 00 4D 45 4E 55 20 20 20 20 43 4D 44 00 00 00 10 .MENU CMD....
000010: 02 03 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000020: 00 4D 45 4E 55 53 45 43 20 43 4D 44 00 00 00 0C .MENUSEC CMD....
000030: 04 05 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000040: 00 44 45 46 5A 4F 4E 45 53 43 4D 44 00 00 00 1C .DEFZONESCMD....
000050: 06 07 08 09 00 00 00 00 00 00 00 00 00 00 00 00 ................
000060: 00 47 45 4E 45 20 20 20 20 43 4D 44 00 00 00 10 .GENE CMD....
000070: 0A 0B 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000080: 00 44 45 4D 4C 49 53 54 20 43 4D 44 00 00 00 0C .DEMLIST CMD....
000090: 0C 0D 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000A0: 00 53 55 50 45 4C 45 4D 20 43 4D 44 00 00 00 10 .SUPELEM CMD....
0000B0: 0E 0F 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000C0: 00 56 45 52 49 46 20 20 20 43 4D 44 00 00 00 30 .VERIF CMD...0
0000D0: 10 11 12 13 14 15 00 00 00 00 00 00 00 00 00 00 ................
0000E0: 00 50 49 43 54 55 52 45 20 43 4D 44 00 00 00 08 .PICTURE CMD....
0000F0: 16 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000100: 00 43 4F 4E 46 53 55 50 20 43 4D 44 00 00 00 04 .CONFSUP CMD....
000110: 17 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000120: 00 44 45 46 49 4E 44 45 58 43 4D 44 00 00 00 08 .DEFINDEXCMD....
000130: 18 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000140: 00 41 46 46 4D 45 53 53 20 43 4D 44 00 00 00 24 .AFFMESS CMD...$
000150: 19 1A 1B 1C 1D 00 00 00 00 00 00 00 00 00 00 00 ................
000160: 00 44 45 4D 5A 4F 4E 45 20 43 4D 44 00 00 00 18 .DEMZONE CMD....
000170: 1E 1F 20 00 00 00 00 00 00 00 00 00 00 00 00 00 .. .............
000180: 00 44 45 46 45 4C 45 4D 20 43 4D 44 00 00 00 4C .DEFELEM CMD...L
000190: 21 22 23 24 25 26 27 28 29 2A 00 00 00 00 00 00 !"#$%&'()*......
0001A0: 00 4C 49 53 54 45 4C 45 4D 43 4D 44 00 00 00 18 .LISTELEMCMD....
0001B0: 2B 2C 2D 00 00 00 00 00 00 00 00 00 00 00 00 00 +,-.............
0001C0: 00 4F 50 54 49 4F 4E 20 20 43 4D 44 00 00 00 04 .OPTION CMD....
0001D0: 2E 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001E0: 00 4D 4F 44 49 46 43 4C 45 43 4D 44 00 00 00 08 .MODIFCLECMD....
0001F0: 2F 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 /...............
Size : 512 (Real : 512)
000000: 6C 69 73 74 65 20 20 20 20 20 20 20 20 20 20 20 liste
000010: 20 3D 3D 3D 3D 3E 20 37 22 0D 0A 40 20 31 32 2C ====> 7"..@ 12,
000020: 31 30 20 73 61 79 20 22 6C 69 73 74 65 20 64 65 10 say "liste de
000030: 73 20 63 6C 65 73 20 65 78 69 73 74 61 6E 74 65 s cles existante
000040: 73 20 20 20 20 20 20 20 20 20 3D 3D 3D 3D 3E 20 s ====>
000050: 38 22 0D 0A 40 20 31 33 2C 31 30 20 73 61 79 20 8"..@ 13,10 say
000060: 22 6C 69 73 74 65 20 64 65 73 20 6C 69 73 74 65 "liste des liste
000070: 73 20 65 78 69 73 74 61 6E 74 65 73 20 20 20 20 s existantes
000080: 20 20 20 3D 3D 3D 3D 3E 20 39 22 0D 0A 40 20 31 ====> 9"..@ 1
000090: 35 2C 31 30 20 73 61 79 20 22 61 75 74 72 65 20 5,10 say "autre
0000A0: 6F 70 74 69 6F 6E 20 20 20 20 20 20 20 20 20 20 option
0000B0: 20 20 20 20 20 20 20 20 20 20 20 20 3D 3D 3D 3D ====
0000C0: 3E 20 41 22 0D 0A 40 20 31 36 2C 31 30 20 73 61 > A"..@ 16,10 sa
0000D0: 79 20 27 66 69 6E 20 6D 65 6E 75 20 75 74 69 6C y 'fin menu util
0000E0: 69 73 61 74 69 6F 6E 20 63 6F 75 72 61 6E 74 65 isation courante
0000F0: 20 20 20 20 20 3D 3D 3D 3D 3E 20 46 27 0D 0A 40 ====> F'..@
000100: 20 31 37 2C 35 35 20 53 41 59 20 22 2B 2D 2D 2D 17,55 SAY "+---
000110: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
000120: 2D 2D 2D 2B 22 0D 0A 40 20 31 38 2C 35 20 73 61 ---+"..@ 18,5 sa
000130: 79 20 27 71 75 65 6C 20 74 72 61 69 74 65 6D 65 y 'quel traiteme
000140: 6E 74 20 76 6F 75 6C 65 7A 2D 76 6F 75 73 20 65 nt voulez-vous e
000150: 66 66 65 63 74 75 65 72 20 3F 20 27 0D 0A 40 20 ffectuer ? '..@
000160: 31 38 2C 35 35 20 53 41 59 20 22 49 20 52 65 70 18,55 SAY "I Rep
000170: 6F 6E 73 65 20 2D 2D 3E 20 20 20 20 20 20 20 20 onse -->
000180: 20 20 49 22 0D 0A 40 20 31 39 2C 35 35 20 53 41 I"..@ 19,55 SA
000190: 59 20 22 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D Y "+------------
0001A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 63 6C ----------+"..cl
0001B0: 65 61 72 20 67 65 74 0D 0A 73 65 74 20 69 6E 74 ear get..set int
0001C0: 65 6E 73 69 74 79 20 6F 66 66 0D 0A 40 20 31 38 ensity off..@ 18
0001D0: 2C 36 39 20 67 65 74 20 63 68 6F 69 78 0D 0A 73 ,69 get choix..s
0001E0: 65 74 20 69 6E 74 65 6E 73 69 74 79 20 6F 6E 0D et intensity on.
0001F0: 0A 72 65 61 64 0D 0A 73 74 6F 72 65 20 21 28 63 .read..store !(c
Size : 512 (Real : 512)
000000: 00 49 4E 49 54 5A 4F 4E 45 43 4D 44 00 00 00 08 .INITZONECMD....
000010: 30 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0...............
000020: 00 52 45 43 55 50 20 20 20 43 4D 44 00 00 00 18 .RECUP CMD....
000030: 31 32 33 00 00 00 00 00 00 00 00 00 00 00 00 00 123.............
000040: 00 4D 45 4E 55 47 45 4E 20 43 4D 44 00 00 00 2C .MENUGEN CMD...,
000050: 34 35 36 37 38 3B 00 00 00 00 00 00 00 00 00 00 45678;..........
000060: 00 44 45 4D 46 49 43 48 20 43 4D 44 00 00 00 10 .DEMFICH CMD....
000070: 39 3A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 9:..............
000080: 00 4D 45 4E 55 50 20 20 20 43 4D 44 00 00 00 30 .MENUP CMD...0
000090: 3C 3D 3E 3F 40 52 00 00 00 00 00 00 00 00 00 00 <=>?@R..........
0000A0: 00 53 55 50 46 49 43 48 20 43 4D 44 00 00 00 10 .SUPFICH CMD....
0000B0: 41 42 00 00 00 00 00 00 00 00 00 00 00 00 00 00 AB..............
0000C0: 00 45 58 49 53 54 43 4C 45 43 4D 44 00 00 00 28 .EXISTCLECMD...(
0000D0: 43 44 45 46 47 00 00 00 00 00 00 00 00 00 00 00 CDEFG...........
0000E0: 00 4C 49 53 54 46 49 43 48 43 4D 44 00 00 00 1C .LISTFICHCMD....
0000F0: 48 49 4A 4B 00 00 00 00 00 00 00 00 00 00 00 00 HIJK............
000100: 00 44 45 4D 43 4C 45 20 20 43 4D 44 00 00 00 1C .DEMCLE CMD....
000110: 4C 4D 4E 4F 00 00 00 00 00 00 00 00 00 00 00 00 LMNO............
000120: 00 45 4C 46 20 20 20 20 20 44 42 46 00 00 00 08 .ELF DBF....
000130: 50 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 P...............
000140: 00 47 45 53 54 46 49 43 48 44 42 46 00 00 00 08 .GESTFICHDBF....
000150: 51 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 Q...............
000160: 00 52 45 46 20 20 20 20 20 44 42 46 00 00 00 08 .REF DBF....
000170: 53 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 S...............
000180: 00 56 45 52 5A 4F 4E 45 20 43 4D 44 00 00 00 44 .VERZONE CMD...D
000190: 54 55 56 57 58 59 5A 5B 5C 00 00 00 00 00 00 00 TUVWXYZ[\.......
0001A0: 00 4D 4F 44 49 46 49 43 48 43 4D 44 00 00 00 08 .MODIFICHCMD....
0001B0: 5D 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ]...............
0001C0: 00 4D 41 4A 20 20 20 20 20 43 4D 44 00 00 00 1C .MAJ CMD....
0001D0: 5E 5F 60 61 00 00 00 00 00 00 00 00 00 00 00 00 ^_`a............
0001E0: 00 50 52 4F 53 50 45 43 54 44 42 46 00 00 00 10 .PROSPECTDBF....
0001F0: 62 63 00 00 00 00 00 00 00 00 00 00 00 00 00 00 bc..............
Size : 512 (Real : 512)
000000: 68 6F 69 78 29 20 74 6F 20 63 68 6F 69 78 0D 0A hoix) to choix..
000010: 72 65 6C 65 61 73 65 20 74 65 73 74 0D 0A 64 6F release test..do
000020: 20 63 61 73 65 0D 0A 63 61 73 65 20 63 68 6F 69 case..case choi
000030: 78 20 3E 3D 20 27 31 27 2E 61 6E 64 2E 63 68 6F x >= '1'.and.cho
000040: 69 78 20 3C 3D 20 27 34 27 0D 0A 64 6F 20 65 78 ix <= '4'..do ex
000050: 69 73 74 63 6C 65 0D 0A 63 61 73 65 20 63 68 6F istcle..case cho
000060: 69 78 20 3D 20 27 35 27 0D 0A 65 72 61 73 65 0D ix = '5'..erase.
000070: 0A 40 20 31 2C 32 36 20 73 61 79 20 27 52 45 43 .@ 1,26 say 'REC
000080: 48 45 52 43 48 45 20 53 55 52 20 43 4C 45 27 0D HERCHE SUR CLE'.
000090: 0A 64 6F 20 64 65 6D 63 6C 65 0D 0A 69 66 20 6D .do demcle..if m
0000A0: 6E 6F 6D 63 23 27 20 27 0D 0A 20 20 20 69 66 20 nomc#' '.. if
0000B0: 2E 6E 6F 74 2E 65 6F 66 0D 0A 20 20 20 20 20 20 .not.eof..
0000C0: 73 74 6F 72 65 20 23 20 74 6F 20 6E 6F 63 6F 75 store # to nocou
0000D0: 72 0D 0A 20 20 20 20 20 20 64 6F 20 65 78 69 73 r.. do exis
0000E0: 74 63 6C 65 0D 0A 20 20 20 65 6C 73 65 0D 0A 20 tcle.. else..
0000F0: 20 20 20 20 20 73 74 6F 72 65 20 31 37 20 74 6F store 17 to
000100: 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 20 20 20 64 nomess.. d
000110: 6F 20 61 66 66 6D 65 73 73 0D 0A 20 20 20 65 6E o affmess.. en
000120: 64 69 66 0D 0A 65 6E 64 69 66 0D 0A 72 65 6C 65 dif..endif..rele
000130: 61 73 65 20 6D 6E 6F 6D 63 0D 0A 63 61 73 65 20 ase mnomc..case
000140: 63 68 6F 69 78 3D 27 36 27 20 2E 6F 72 2E 20 63 choix='6' .or. c
000150: 68 6F 69 78 20 3D 20 27 37 27 0D 0A 64 6F 20 64 hoix = '7'..do d
000160: 65 6D 6C 69 73 74 0D 0A 63 61 73 65 20 63 68 6F emlist..case cho
000170: 69 78 20 3D 20 27 38 27 0D 0A 73 74 6F 72 65 20 ix = '8'..store
000180: 27 43 27 20 74 6F 20 65 6C 65 6D 0D 0A 64 6F 20 'C' to elem..do
000190: 6C 69 73 74 65 6C 65 6D 0D 0A 72 65 6C 65 61 73 listelem..releas
0001A0: 65 20 6E 6F 6D 61 66 66 0D 0A 63 61 73 65 20 63 e nomaff..case c
0001B0: 68 6F 69 78 20 3D 20 27 39 27 0D 0A 73 74 6F 72 hoix = '9'..stor
0001C0: 65 20 27 4C 27 20 74 6F 20 65 6C 65 6D 0D 0A 64 e 'L' to elem..d
0001D0: 6F 20 6C 69 73 74 65 6C 65 6D 0D 0A 72 65 6C 65 o listelem..rele
0001E0: 61 73 65 20 6E 6F 6D 61 66 66 0D 0A 63 61 73 65 ase nomaff..case
0001F0: 20 21 28 63 68 6F 69 78 29 3D 27 41 27 0D 0A 73 !(choix)='A'..s
Size : 512 (Real : 512)
000000: 00 50 52 4F 53 50 45 43 54 45 4C 46 00 00 00 08 .PROSPECTELF....
000010: 64 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 d...............
000020: 00 50 52 4F 53 50 45 43 54 45 4C 49 00 00 00 08 .PROSPECTELI....
000030: 65 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 e...............
000040: 00 4E 4F 4D 20 20 20 20 20 4E 44 58 00 00 00 08 .NOM NDX....
000050: 66 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 f...............
000060: 00 50 52 4F 46 20 20 20 20 4E 44 58 00 00 00 08 .PROF NDX....
000070: 67 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 g...............
000080: 00 56 49 4C 4C 45 20 20 20 4E 44 58 00 00 00 08 .VILLE NDX....
000090: 68 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 h...............
0000A0: 00 44 42 41 53 45 20 20 20 43 4F 4D 00 00 00 80 .DBASE COM....
0000B0: 69 6E 6F 70 71 72 73 74 75 76 77 78 79 7A 7B 7C inopqrstuvwxyz{|
0000C0: 00 50 52 4F 53 50 45 43 54 4E 4F 4D 00 00 00 08 .PROSPECTNOM....
0000D0: 6A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 j...............
0000E0: 00 50 52 4F 53 50 45 43 54 43 4C 45 00 00 00 08 .PROSPECTCLE....
0000F0: 6B 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 k...............
000100: 00 50 52 4F 53 50 45 43 54 52 45 46 00 00 00 10 .PROSPECTREF....
000110: 6C 6D 00 00 00 00 00 00 00 00 00 00 00 00 00 00 lm..............
000120: 00 44 42 41 53 45 20 20 20 43 4F 4D 01 00 00 18 .DBASE COM....
000130: 7D 7E 7F 00 00 00 00 00 00 00 00 00 00 00 00 00 }~..............
000140: 00 44 42 41 53 45 4F 56 52 43 4F 4D 00 00 00 80 .DBASEOVRCOM....
000150: 80 81 82 83 84 85 86 87 88 89 8A 8B 8C 8D 8E 8F ................
000160: 00 44 42 41 53 45 4F 56 52 43 4F 4D 01 00 00 80 .DBASEOVRCOM....
000170: 90 91 92 93 94 95 96 97 98 99 9A 9B 9C 9D 9E 9F ................
000180: 00 44 42 41 53 45 4F 56 52 43 4F 4D 02 00 00 3A .DBASEOVRCOM...:
000190: A0 A1 A2 A3 A4 A5 A6 A7 00 00 00 00 00 00 00 00 ................
0001A0: E5 24 24 24 20 20 20 20 20 53 55 42 00 00 00 01 .$$$ SUB....
0001B0: A8 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001C0: 00 50 52 4F 46 20 20 20 20 46 52 4D 00 00 00 04 .PROF FRM....
0001D0: A9 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001E0: E5 54 45 4D 50 20 20 20 20 44 42 46 00 00 00 00 .TEMP DBF....
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
Size : 512 (Real : 512)
000000: 65 6C 65 63 74 20 73 65 63 6F 6E 64 61 72 79 0D elect secondary.
000010: 0A 75 73 65 0D 0A 73 65 6C 65 63 74 20 70 72 69 .use..select pri
000020: 6D 61 72 79 0D 0A 75 73 65 0D 0A 64 6F 20 6F 70 mary..use..do op
000030: 74 69 6F 6E 0D 0A 73 65 6C 65 63 74 20 73 65 63 tion..select sec
000040: 6F 6E 64 61 72 79 0D 0A 75 73 65 0D 0A 73 65 6C ondary..use..sel
000050: 65 63 74 20 70 72 69 6D 61 72 79 0D 0A 75 73 65 ect primary..use
000060: 0D 0A 63 61 73 65 20 21 28 63 68 6F 69 78 29 20 ..case !(choix)
000070: 3D 20 27 46 27 0D 0A 72 65 74 75 72 6E 0D 0A 6F = 'F'..return..o
000080: 74 68 65 72 77 69 73 65 0D 0A 2A 20 61 66 66 69 therwise..* affi
000090: 63 68 65 72 20 75 6E 20 6D 65 73 73 61 67 65 20 cher un message
0000A0: 64 27 65 72 72 65 75 72 0D 0A 73 74 6F 72 65 20 d'erreur..store
0000B0: 31 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 64 6F 20 1 to nomess..do
0000C0: 61 66 66 6D 65 73 73 0D 0A 65 6E 64 63 61 73 65 affmess..endcase
0000D0: 0D 0A 73 65 6C 65 63 74 20 70 72 69 6D 61 72 79 ..select primary
0000E0: 0D 0A 75 73 65 0D 0A 73 65 6C 65 63 74 20 73 65 ..use..select se
0000F0: 63 6F 6E 64 61 72 79 0D 0A 75 73 65 0D 0A 73 65 condary..use..se
000100: 6C 65 63 74 20 70 72 69 6D 61 72 79 0D 0A 73 74 lect primary..st
000110: 6F 72 65 20 27 74 27 20 74 6F 20 74 65 73 74 0D ore 't' to test.
000120: 0A 65 6E 64 64 6F 0D 0A 72 65 74 75 72 6E 0D 0A .enddo..return..
000130: 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 1A 1A 65 20 ..............e
000140: 63 68 6F 69 78 3D 27 36 27 20 2E 6F 72 2E 20 63 choix='6' .or. c
000150: 68 6F 69 78 20 3D 20 27 37 27 0D 0A 64 6F 20 64 hoix = '7'..do d
000160: 65 6D 6C 69 73 74 0D 0A 63 61 73 65 20 63 68 6F emlist..case cho
000170: 69 78 20 3D 20 27 38 27 0D 0A 73 74 6F 72 65 20 ix = '8'..store
000180: 27 43 27 20 74 6F 20 65 6C 65 6D 0D 0A 64 6F 20 'C' to elem..do
000190: 6C 69 73 74 65 6C 65 6D 0D 0A 72 65 6C 65 61 73 listelem..releas
0001A0: 65 20 6E 6F 6D 61 66 66 0D 0A 63 61 73 65 20 63 e nomaff..case c
0001B0: 68 6F 69 78 20 3D 20 27 39 27 0D 0A 73 74 6F 72 hoix = '9'..stor
0001C0: 65 20 27 4C 27 20 74 6F 20 65 6C 65 6D 0D 0A 64 e 'L' to elem..d
0001D0: 6F 20 6C 69 73 74 65 6C 65 6D 0D 0A 72 65 6C 65 o listelem..rele
0001E0: 61 73 65 20 6E 6F 6D 61 66 66 0D 0A 63 61 73 65 ase nomaff..case
0001F0: 20 21 28 63 68 6F 69 78 29 3D 27 41 27 0D 0A 73 !(choix)='A'..s
Size : 512 (Real : 512)
000000: E5 24 24 24 20 20 20 20 20 53 55 42 00 00 00 01 .$$$ SUB....
000010: AA 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: 2A 20 6D 65 6E 75 73 65 63 3A 20 6D 65 6E 75 20 * menusec: menu
000010: 67 65 73 74 69 6F 6E 20 64 65 73 20 63 6C 65 73 gestion des cles
000020: 0D 0A 0D 0A 73 74 6F 72 65 20 27 74 27 20 74 6F ....store 't' to
000030: 20 74 65 73 74 0D 0A 73 74 6F 72 65 20 27 46 27 test..store 'F'
000040: 20 74 6F 20 63 68 6F 69 78 0D 0A 64 6F 20 77 68 to choix..do wh
000050: 69 6C 65 20 74 65 73 74 3D 27 74 27 0D 0A 20 20 ile test='t'..
000060: 20 65 72 61 73 65 0D 0A 20 20 20 40 20 31 2C 32 erase.. @ 1,2
000070: 36 20 53 41 59 20 27 47 45 53 54 49 4F 4E 20 44 6 SAY 'GESTION D
000080: 45 53 20 43 4C 45 53 20 44 55 20 46 49 43 48 49 ES CLES DU FICHI
000090: 45 52 20 27 0D 0A 20 20 20 40 20 31 2C 35 34 20 ER '.. @ 1,54
0000A0: 67 65 74 20 6E 6F 6D 61 66 66 0D 0A 20 20 20 40 get nomaff.. @
0000B0: 20 34 2C 31 30 20 73 61 79 20 27 71 75 65 6C 20 4,10 say 'quel
0000C0: 74 72 61 69 74 65 6D 65 6E 74 20 64 65 73 69 72 traitement desir
0000D0: 65 7A 2D 76 6F 75 73 20 65 66 66 65 63 74 75 65 ez-vous effectue
0000E0: 72 3F 27 0D 0A 20 20 20 40 20 36 2C 31 30 20 73 r?'.. @ 6,10 s
0000F0: 61 79 20 27 63 72 65 65 72 20 75 6E 65 20 63 6C ay 'creer une cl
000100: 65 20 73 65 63 6F 6E 64 61 69 72 65 20 6F 75 20 e secondaire ou
000110: 74 65 6D 70 6F 72 61 69 72 65 20 20 20 20 20 3D temporaire =
000120: 3D 3D 3D 3E 20 31 27 0D 0A 20 20 20 40 20 38 2C ===> 1'.. @ 8,
000130: 31 30 20 73 61 79 20 22 6D 6F 64 69 66 69 65 72 10 say "modifier
000140: 20 75 6E 65 20 63 6C 65 20 70 72 69 6E 63 69 70 une cle princip
000150: 61 6C 65 2C 20 73 65 63 6F 6E 64 61 69 72 65 20 ale, secondaire
000160: 20 22 0D 0A 20 20 20 40 20 39 2C 31 30 20 73 61 ".. @ 9,10 sa
000170: 79 20 22 6F 75 20 74 65 6D 70 6F 72 61 69 72 65 y "ou temporaire
000180: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000190: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3D 3D ==
0001A0: 3D 3D 3E 20 32 22 0D 0A 20 20 20 40 20 31 31 2C ==> 2".. @ 11,
0001B0: 31 30 20 73 61 79 20 27 73 75 70 70 72 69 6D 65 10 say 'supprime
0001C0: 72 20 75 6E 65 20 63 6C 65 20 73 65 63 6F 6E 64 r une cle second
0001D0: 61 69 72 65 20 6F 75 20 74 65 6D 70 6F 72 61 69 aire ou temporai
0001E0: 72 65 20 3D 3D 3D 3D 3E 20 33 27 0D 0A 20 20 20 re ====> 3'..
0001F0: 40 20 31 33 2C 31 30 20 73 61 79 20 22 6C 69 73 @ 13,10 say "lis
Size : 512 (Real : 512)
000000: 2A 20 6D 65 6E 75 3A 20 20 20 6D 65 6E 75 20 75 * menu: menu u
000010: 74 69 6C 69 73 61 74 69 6F 6E 20 63 6F 75 72 61 tilisation coura
000020: 6E 74 65 0D 0A 0D 0A 73 74 6F 72 65 20 30 20 74 nte....store 0 t
000030: 6F 20 6E 6F 63 6F 75 72 0D 0A 73 74 6F 72 65 20 o nocour..store
000040: 27 74 27 20 74 6F 20 74 65 73 74 0D 0A 64 6F 20 't' to test..do
000050: 77 68 69 6C 65 20 74 65 73 74 3D 27 74 27 0D 0A while test='t'..
000060: 73 74 6F 72 65 20 27 46 27 20 74 6F 20 63 68 6F store 'F' to cho
000070: 69 78 0D 0A 65 72 61 73 65 0D 0A 40 20 31 2C 32 ix..erase..@ 1,2
000080: 36 20 53 41 59 20 74 69 74 72 65 6D 65 6E 75 70 6 SAY titremenup
000090: 0D 0A 40 20 33 2C 31 30 20 73 61 79 20 27 63 72 ..@ 3,10 say 'cr
0000A0: 65 61 74 69 6F 6E 20 20 20 20 20 20 20 20 20 20 eation
0000B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000C0: 3D 3D 3D 3D 3E 20 31 27 0D 0A 40 20 34 2C 31 30 ====> 1'..@ 4,10
0000D0: 20 73 61 79 20 22 6D 6F 64 69 66 69 63 61 74 69 say "modificati
0000E0: 6F 6E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 on
0000F0: 20 20 20 20 20 20 20 20 3D 3D 3D 3D 3E 20 32 22 ====> 2"
000100: 0D 0A 40 20 35 2C 31 30 20 73 61 79 20 22 73 75 ..@ 5,10 say "su
000110: 70 70 72 65 73 73 69 6F 6E 20 20 20 20 20 20 20 ppression
000120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000130: 3D 3D 3D 3D 3E 20 33 22 0D 0A 40 20 36 2C 31 30 ====> 3"..@ 6,10
000140: 20 73 61 79 20 27 76 69 73 75 61 6C 69 73 61 74 say 'visualisat
000150: 69 6F 6E 20 20 20 20 20 20 20 20 20 20 20 20 20 ion
000160: 20 20 20 20 20 20 20 20 3D 3D 3D 3D 3E 20 34 27 ====> 4'
000170: 0D 0A 40 20 37 2C 31 30 20 73 61 79 20 22 72 65 ..@ 7,10 say "re
000180: 63 68 65 72 63 68 65 20 73 75 72 20 63 6C 65 20 cherche sur cle
000190: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0001A0: 3D 3D 3D 3D 3E 20 35 22 0D 0A 40 20 39 2C 31 30 ====> 5"..@ 9,10
0001B0: 20 73 61 79 20 22 61 66 66 69 63 68 61 67 65 20 say "affichage
0001C0: 64 27 75 6E 65 20 6C 69 73 74 65 20 61 20 6C 27 d'une liste a l'
0001D0: 65 63 72 61 6E 20 20 20 3D 3D 3D 3D 3E 20 36 22 ecran ====> 6"
0001E0: 0D 0A 40 20 31 30 2C 31 30 20 73 61 79 20 22 69 ..@ 10,10 say "i
0001F0: 6D 70 72 65 73 73 69 6F 6E 20 64 27 75 6E 65 20 mpression d'une
Size : 512 (Real : 512)
000000: 74 65 72 20 6C 65 73 20 63 6C 65 73 20 20 20 20 ter les cles
000010: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000020: 20 20 20 20 20 20 20 20 3D 3D 3D 3D 3E 20 34 22 ====> 4"
000030: 0D 0A 20 20 20 40 20 31 35 2C 31 30 20 73 61 79 .. @ 15,10 say
000040: 20 27 66 69 6E 20 67 65 73 74 69 6F 6E 20 64 65 'fin gestion de
000050: 73 20 63 6C 65 73 20 20 20 20 20 20 20 20 20 20 s cles
000060: 20 20 20 20 20 20 20 20 20 20 20 20 20 3D 3D 3D ===
000070: 3D 3E 20 46 27 0D 0A 20 20 20 40 20 31 37 2C 34 => F'.. @ 17,4
000080: 35 20 53 41 59 20 22 2B 2D 2D 2D 2D 2D 2D 2D 2D 5 SAY "+--------
000090: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2B 22 --------------+"
0000A0: 0D 0A 20 20 20 40 20 31 38 2C 34 35 20 53 41 59 .. @ 18,45 SAY
0000B0: 20 22 49 20 52 65 70 6F 6E 73 65 20 2D 2D 3E 20 "I Reponse -->
0000C0: 20 20 20 20 20 20 20 20 20 49 22 0D 0A 20 20 20 I"..
0000D0: 40 20 31 39 2C 34 35 20 53 41 59 20 22 2B 2D 2D @ 19,45 SAY "+--
0000E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
0000F0: 2D 2D 2D 2D 2B 22 0D 0A 20 20 20 63 6C 65 61 72 ----+".. clear
000100: 20 67 65 74 0D 0A 20 20 20 73 65 74 20 69 6E 74 get.. set int
000110: 65 6E 73 69 74 79 20 6F 66 66 0D 0A 20 20 20 40 ensity off.. @
000120: 20 31 38 2C 35 39 20 67 65 74 20 63 68 6F 69 78 18,59 get choix
000130: 0D 0A 20 20 20 73 65 74 20 69 6E 74 65 6E 73 69 .. set intensi
000140: 74 79 20 6F 6E 0D 0A 20 20 20 72 65 61 64 0D 0A ty on.. read..
000150: 20 20 20 64 6F 20 63 61 73 65 0D 0A 20 20 20 20 do case..
000160: 20 20 63 61 73 65 20 63 68 6F 69 78 3E 3D 27 31 case choix>='1
000170: 27 2E 61 6E 64 2E 63 68 6F 69 78 3C 3D 27 34 27 '.and.choix<='4'
000180: 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 27 43 .. store 'C
000190: 27 20 74 6F 20 65 6C 65 6D 0D 0A 20 20 20 20 20 ' to elem..
0001A0: 20 64 6F 20 63 61 73 65 0D 0A 20 20 20 20 20 20 do case..
0001B0: 20 20 20 63 61 73 65 20 63 68 6F 69 78 3D 27 31 case choix='1
0001C0: 27 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 '.. stor
0001D0: 65 20 27 43 27 20 74 6F 20 6D 6F 64 69 66 0D 0A e 'C' to modif..
0001E0: 20 20 20 20 20 20 20 20 20 64 6F 20 64 65 66 65 do defe
0001F0: 6C 65 6D 0D 0A 20 20 20 20 20 20 20 20 20 72 65 lem.. re
Size : 512 (Real : 512)
000000: 65 0D 0A 20 20 20 40 20 6C 69 67 6D 31 2C 30 0D e.. @ ligm1,0.
000010: 0A 20 20 20 73 74 6F 72 65 20 21 28 6D 6E 6F 6D . store !(mnom
000020: 7A 6F 6E 65 29 20 74 6F 20 6D 6E 6F 6D 7A 6F 6E zone) to mnomzon
000030: 65 0D 0A 20 20 20 73 74 6F 72 65 20 27 66 27 20 e.. store 'f'
000040: 74 6F 20 63 6F 72 72 65 63 74 0D 0A 20 20 20 40 to correct.. @
000050: 20 37 2C 30 20 73 61 79 20 27 6C 69 62 65 6C 6C 7,0 say 'libell
000060: 65 20 64 65 20 6C 61 20 7A 6F 6E 65 27 0D 0A 20 e de la zone'..
000070: 20 20 40 20 38 2C 30 20 73 61 79 20 27 6C 69 67 @ 8,0 say 'lig
000080: 6E 65 20 6F 75 20 64 6F 69 74 20 61 70 70 61 72 ne ou doit appar
000090: 61 69 74 72 65 20 6C 65 20 74 65 78 74 65 27 0D aitre le texte'.
0000A0: 0A 20 20 20 40 20 39 2C 30 20 73 61 79 20 27 63 . @ 9,0 say 'c
0000B0: 6F 6C 6F 6E 6E 65 20 6F 75 20 64 6F 69 74 20 61 olonne ou doit a
0000C0: 70 70 61 72 61 69 74 72 65 20 6C 65 20 74 65 78 pparaitre le tex
0000D0: 74 65 27 0D 0A 20 20 20 40 20 31 31 2C 30 20 73 te'.. @ 11,0 s
0000E0: 61 79 20 27 6C 69 67 6E 65 20 6F 75 20 64 6F 69 ay 'ligne ou doi
0000F0: 74 20 61 70 70 61 72 61 69 74 72 65 20 6C 61 20 t apparaitre la
000100: 76 61 72 69 61 62 6C 65 27 0D 0A 20 20 20 40 20 variable'.. @
000110: 31 32 2C 30 20 73 61 79 20 27 63 6F 6C 6F 6E 6E 12,0 say 'colonn
000120: 65 20 6F 75 20 64 6F 69 74 20 61 70 70 61 72 61 e ou doit appara
000130: 69 74 72 65 20 6C 61 20 76 61 72 69 61 62 6C 65 itre la variable
000140: 27 0D 0A 20 20 20 40 20 31 34 2C 30 20 73 61 79 '.. @ 14,0 say
000150: 20 27 74 79 70 65 20 64 65 20 6C 61 20 7A 6F 6E 'type de la zon
000160: 65 27 0D 0A 20 20 20 40 20 31 35 2C 30 20 73 61 e'.. @ 15,0 sa
000170: 79 20 27 43 3D 63 61 72 61 63 74 65 72 65 2C 4E y 'C=caractere,N
000180: 3D 6E 75 6D 65 72 69 71 75 65 2C 4C 3D 6C 6F 67 =numerique,L=log
000190: 69 71 75 65 27 0D 0A 20 20 20 40 20 31 36 2C 30 ique'.. @ 16,0
0001A0: 20 73 61 79 20 27 6C 6F 6E 67 75 65 75 72 20 64 say 'longueur d
0001B0: 65 20 6C 61 20 7A 6F 6E 65 27 0D 0A 20 20 20 40 e la zone'.. @
0001C0: 20 31 37 2C 30 20 73 61 79 20 27 6E 6F 6D 62 72 17,0 say 'nombr
0001D0: 65 20 64 65 20 64 65 63 69 6D 61 6C 65 73 27 0D e de decimales'.
0001E0: 0A 20 20 20 64 6F 20 77 68 69 6C 65 20 63 6F 72 . do while cor
0001F0: 72 65 63 74 3D 27 66 27 0D 0A 20 20 20 20 20 20 rect='f'..
Size : 512 (Real : 512)
000000: 6C 65 61 73 65 20 6D 6E 6F 6D 65 6C 65 6D 0D 0A lease mnomelem..
000010: 20 20 20 20 20 20 20 20 20 63 61 73 65 20 63 68 case ch
000020: 6F 69 78 3D 27 32 27 0D 0A 20 20 20 20 20 20 20 oix='2'..
000030: 20 20 64 6F 20 6D 6F 64 69 66 63 6C 65 0D 0A 20 do modifcle..
000040: 20 20 20 20 20 20 20 20 63 61 73 65 20 63 68 6F case cho
000050: 69 78 3D 27 33 27 0D 0A 20 20 20 20 20 20 20 20 ix='3'..
000060: 20 64 6F 20 73 75 70 65 6C 65 6D 0D 0A 20 20 20 do supelem..
000070: 20 20 20 20 20 20 63 61 73 65 20 63 68 6F 69 78 case choix
000080: 3D 27 34 27 0D 0A 20 20 20 20 20 20 20 20 20 64 ='4'.. d
000090: 6F 20 6C 69 73 74 65 6C 65 6D 0D 0A 20 20 20 20 o listelem..
0000A0: 20 20 65 6E 64 63 61 73 65 0D 0A 20 20 20 20 20 endcase..
0000B0: 20 72 65 6C 65 61 73 65 20 65 6C 65 6D 0D 0A 20 release elem..
0000C0: 20 20 20 20 20 63 61 73 65 20 21 28 63 68 6F 69 case !(choi
0000D0: 78 29 20 3D 20 27 46 27 0D 0A 20 20 20 20 20 20 x) = 'F'..
0000E0: 72 65 74 75 72 6E 0D 0A 20 20 20 20 20 20 6F 74 return.. ot
0000F0: 68 65 72 77 69 73 65 0D 0A 20 20 20 20 20 20 2A herwise.. *
000100: 20 61 66 66 69 63 68 65 72 20 75 6E 20 6D 65 73 afficher un mes
000110: 73 61 67 65 20 64 27 65 72 72 65 75 72 0D 0A 20 sage d'erreur..
000120: 20 20 20 20 20 73 74 6F 72 65 20 31 20 74 6F 20 store 1 to
000130: 6E 6F 6D 65 73 73 0D 0A 20 20 20 20 20 20 64 6F nomess.. do
000140: 20 61 66 66 6D 65 73 73 0D 0A 20 20 20 65 6E 64 affmess.. end
000150: 63 61 73 65 0D 0A 20 20 20 73 65 6C 65 63 74 20 case.. select
000160: 70 72 69 6D 61 72 79 0D 0A 20 20 20 75 73 65 0D primary.. use.
000170: 0A 20 20 20 73 65 6C 65 63 74 20 73 65 63 6F 6E . select secon
000180: 64 61 72 79 0D 0A 20 20 20 75 73 65 0D 0A 20 20 dary.. use..
000190: 20 73 65 6C 65 63 74 20 70 72 69 6D 61 72 79 0D select primary.
0001A0: 0A 20 20 20 73 74 6F 72 65 20 27 46 27 20 74 6F . store 'F' to
0001B0: 20 63 68 6F 69 78 0D 0A 65 6E 64 64 6F 0D 0A 72 choix..enddo..r
0001C0: 65 74 75 72 6E 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D eturn...........
0001D0: 0A 0D 0A 0D 0A 0D 0A 1A 1A 0A 20 20 20 40 20 35 .......... @ 5
0001E0: 2C 34 30 20 67 65 74 20 6D 6E 6F 6D 0D 0A 20 20 ,40 get mnom..
0001F0: 20 40 20 6C 69 67 6D 31 2C 30 20 73 61 79 20 22 @ ligm1,0 say "
Size : 512 (Real : 512)
000000: 40 20 37 2C 34 35 20 67 65 74 20 6D 74 65 78 74 @ 7,45 get mtext
000010: 65 0D 0A 20 20 20 20 20 20 40 20 38 2C 34 35 20 e.. @ 8,45
000020: 67 65 74 20 6D 6C 74 20 70 69 63 74 75 72 65 20 get mlt picture
000030: 27 39 39 27 0D 0A 20 20 20 20 20 20 40 20 39 2C '99'.. @ 9,
000040: 34 35 20 67 65 74 20 6D 63 74 20 70 69 63 74 75 45 get mct pictu
000050: 72 65 20 27 39 39 27 0D 0A 20 20 20 20 20 20 40 re '99'.. @
000060: 20 31 31 2C 34 35 20 67 65 74 20 6D 6C 73 20 70 11,45 get mls p
000070: 69 63 74 75 72 65 20 27 39 39 27 0D 0A 20 20 20 icture '99'..
000080: 20 20 20 40 20 31 32 2C 34 35 20 67 65 74 20 6D @ 12,45 get m
000090: 63 73 20 70 69 63 74 75 72 65 20 27 39 39 27 0D cs picture '99'.
0000A0: 0A 20 20 20 20 20 20 40 20 31 35 2C 34 35 20 67 . @ 15,45 g
0000B0: 65 74 20 6D 74 79 70 65 0D 0A 20 20 20 20 20 20 et mtype..
0000C0: 40 20 31 36 2C 34 35 20 67 65 74 20 6D 6C 6F 6E @ 16,45 get mlon
0000D0: 20 70 69 63 74 75 72 65 20 27 39 39 39 27 0D 0A picture '999'..
0000E0: 20 20 20 20 20 20 40 20 31 37 2C 34 35 20 67 65 @ 17,45 ge
0000F0: 74 20 6D 64 65 63 20 70 69 63 74 75 72 65 20 27 t mdec picture '
000100: 39 39 39 27 0D 0A 20 20 20 20 20 20 72 65 61 64 999'.. read
000110: 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 21 28 .. store !(
000120: 6D 74 79 70 65 29 20 74 6F 20 6D 74 79 70 65 0D mtype) to mtype.
000130: 0A 20 20 20 20 20 20 64 6F 20 63 61 73 65 0D 0A . do case..
000140: 20 20 20 20 20 20 63 61 73 65 20 6D 6C 74 3C 32 case mlt<2
000150: 2E 6F 72 2E 6D 6C 74 3E 6C 69 67 6D 31 2D 31 0D .or.mlt>ligm1-1.
000160: 0A 20 20 20 20 20 20 73 74 6F 72 65 20 32 31 20 . store 21
000170: 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 20 20 to nomess..
000180: 20 64 6F 20 61 66 66 6D 65 73 73 0D 0A 20 20 20 do affmess..
000190: 20 20 20 63 61 73 65 20 6D 63 74 3C 30 2E 6F 72 case mct<0.or
0001A0: 2E 6D 63 74 3E 37 39 0D 0A 20 20 20 20 20 20 73 .mct>79.. s
0001B0: 74 6F 72 65 20 32 32 20 74 6F 20 6E 6F 6D 65 73 tore 22 to nomes
0001C0: 73 0D 0A 20 20 20 20 20 20 64 6F 20 61 66 66 6D s.. do affm
0001D0: 65 73 73 0D 0A 20 20 20 20 20 20 63 61 73 65 20 ess.. case
0001E0: 6D 6C 73 3C 32 2E 6F 72 2E 6D 6C 73 3E 6C 69 67 mls<2.or.mls>lig
0001F0: 6D 31 2D 31 0D 0A 20 20 20 20 20 20 73 74 6F 72 m1-1.. stor
Size : 512 (Real : 512)
000000: 6D 66 3D 24 28 6E 6F 6D 66 69 63 68 2C 33 2C 38 mf=$(nomfich,3,8
000010: 29 0D 0A 64 65 6C 65 0D 0A 70 61 63 6B 0D 0A 75 )..dele..pack..u
000020: 73 65 0D 0A 73 74 6F 72 65 20 27 66 27 20 74 6F se..store 'f' to
000030: 20 65 78 69 73 74 0D 0A 72 65 74 75 72 6E 0D 0A exist..return..
000040: 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A ................
000050: 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A ................
000060: 0D 0A 1A 1A 65 74 0D 0A 20 20 20 20 20 20 65 6C ....et.. el
000070: 73 65 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F se.. sto
000080: 72 65 20 27 4F 27 20 74 6F 20 72 65 70 0D 0A 20 re 'O' to rep..
000090: 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 endif..
0000A0: 20 20 69 66 20 21 28 72 65 70 29 3D 27 4F 27 0D if !(rep)='O'.
0000B0: 0A 20 20 20 20 20 20 20 20 20 72 65 6C 65 61 73 . releas
0000C0: 65 20 72 65 70 2C 74 65 73 74 2C 65 78 69 73 74 e rep,test,exist
0000D0: 2C 6E 6F 65 72 72 2C 72 65 70 72 69 73 65 0D 0A ,noerr,reprise..
0000E0: 20 20 20 20 20 20 20 20 20 64 6F 20 67 65 6E 65 do gene
0000F0: 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 .. store
000100: 20 27 74 27 20 74 6F 20 65 78 69 73 74 0D 0A 20 't' to exist..
000110: 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 30 20 store 0
000120: 74 6F 20 6E 6F 65 72 72 0D 0A 20 20 20 20 20 20 to noerr..
000130: 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20 72 else.. r
000140: 65 6C 65 61 73 65 20 72 65 70 0D 0A 20 20 20 20 elease rep..
000150: 20 20 65 6E 64 69 66 0D 0A 20 20 20 65 6E 64 69 endif.. endi
000160: 66 0D 0A 20 20 20 63 61 73 65 20 63 68 6F 69 78 f.. case choix
000170: 3E 3D 27 32 27 2E 61 6E 64 2E 63 68 6F 69 78 3C >='2'.and.choix<
000180: 3D 27 38 27 2E 6F 72 2E 63 68 6F 69 78 3D 27 43 ='8'.or.choix='C
000190: 27 0D 0A 20 20 20 69 66 20 72 65 70 72 69 73 65 '.. if reprise
0001A0: 3D 27 66 27 2E 61 6E 64 2E 65 78 69 73 74 3D 27 ='f'.and.exist='
0001B0: 66 27 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 f'.. store
0001C0: 34 39 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 49 to nomess..
0001D0: 20 20 20 20 64 6F 20 61 66 66 6D 65 73 73 0D 0A do affmess..
0001E0: 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 69 else.. i
0001F0: 66 20 72 65 70 72 69 73 65 3D 27 66 27 2E 61 6E f reprise='f'.an
Size : 512 (Real : 512)
000000: 65 20 32 31 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A e 21 to nomess..
000010: 20 20 20 20 20 20 64 6F 20 61 66 66 6D 65 73 73 do affmess
000020: 0D 0A 20 20 20 20 20 20 63 61 73 65 20 6D 63 73 .. case mcs
000030: 3C 30 2E 6F 72 2E 6D 63 73 3E 37 39 0D 0A 20 20 <0.or.mcs>79..
000040: 20 20 20 20 73 74 6F 72 65 20 32 32 20 74 6F 20 store 22 to
000050: 6E 6F 6D 65 73 73 0D 0A 20 20 20 20 20 20 64 6F nomess.. do
000060: 20 61 66 66 6D 65 73 73 0D 0A 20 20 20 20 20 20 affmess..
000070: 63 61 73 65 20 6D 74 79 70 65 23 27 43 27 2E 61 case mtype#'C'.a
000080: 6E 64 2E 6D 74 79 70 65 23 27 4E 27 2E 61 6E 64 nd.mtype#'N'.and
000090: 2E 6D 74 79 70 65 23 27 4C 27 0D 0A 20 20 20 20 .mtype#'L'..
0000A0: 20 20 73 74 6F 72 65 20 32 36 20 74 6F 20 6E 6F store 26 to no
0000B0: 6D 65 73 73 0D 0A 20 20 20 20 20 20 64 6F 20 61 mess.. do a
0000C0: 66 66 6D 65 73 73 0D 0A 20 20 20 20 20 20 63 61 ffmess.. ca
0000D0: 73 65 20 6D 6C 6F 6E 3C 31 2E 6F 72 2E 28 6D 74 se mlon<1.or.(mt
0000E0: 79 70 65 3D 27 43 27 2E 61 6E 64 2E 6D 6C 6F 6E ype='C'.and.mlon
0000F0: 3E 32 35 34 29 2E 6F 72 2E 28 6D 74 79 70 65 3D >254).or.(mtype=
000100: 27 4E 27 2E 61 6E 64 2E 6D 6C 6F 6E 3E 32 30 29 'N'.and.mlon>20)
000110: 3B 0D 0A 20 20 20 20 20 20 2E 6F 72 2E 6D 74 79 ;.. .or.mty
000120: 70 65 3D 27 4E 27 2E 61 6E 64 2E 6D 64 65 63 3E pe='N'.and.mdec>
000130: 6D 6C 6F 6E 2D 32 2E 61 6E 64 2E 6D 64 65 63 23 mlon-2.and.mdec#
000140: 30 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 32 0.. store 2
000150: 33 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 3 to nomess..
000160: 20 20 20 64 6F 20 61 66 66 6D 65 73 73 0D 0A 20 do affmess..
000170: 20 20 20 20 20 6F 74 68 65 72 77 69 73 65 0D 0A otherwise..
000180: 20 20 20 20 20 20 73 74 6F 72 65 20 27 74 27 20 store 't'
000190: 74 6F 20 63 6F 72 72 65 63 74 0D 0A 20 20 20 20 to correct..
0001A0: 20 20 69 66 20 6D 74 79 70 65 3D 27 4C 27 0D 0A if mtype='L'..
0001B0: 20 20 20 20 20 20 73 74 6F 72 65 20 31 20 74 6F store 1 to
0001C0: 20 6D 6C 6F 6E 0D 0A 20 20 20 20 20 20 65 6E 64 mlon.. end
0001D0: 69 66 0D 0A 20 20 20 20 20 20 65 6E 64 63 61 73 if.. endcas
0001E0: 65 0D 0A 20 20 20 65 6E 64 64 6F 0D 0A 20 20 20 e.. enddo..
0001F0: 72 65 6C 65 61 73 65 20 63 6F 72 72 65 63 74 0D release correct.
Size : 512 (Real : 512)
000000: 2A 20 64 65 66 7A 6F 6E 65 73 3A 20 20 64 65 66 * defzones: def
000010: 69 6E 69 74 69 6F 6E 20 64 65 73 20 7A 6F 6E 65 inition des zone
000020: 73 20 64 75 20 66 69 63 68 69 65 72 0D 0A 0D 0A s du fichier....
000030: 73 74 6F 72 65 20 31 20 74 6F 20 6C 6F 6E 67 65 store 1 to longe
000040: 6E 67 0D 0A 75 73 65 20 26 66 72 65 66 20 69 6E ng..use &fref in
000050: 64 65 78 20 26 78 6E 6F 6D 2C 26 78 63 6C 65 0D dex &xnom,&xcle.
000060: 0A 73 74 6F 72 65 20 31 20 74 6F 20 63 70 74 0D .store 1 to cpt.
000070: 0A 64 6F 20 77 68 69 6C 65 20 63 70 74 3C 3D 33 .do while cpt<=3
000080: 32 2E 61 6E 64 2E 6C 6F 6E 67 65 6E 67 20 3C 20 2.and.longeng <
000090: 31 30 30 30 0D 0A 20 20 20 65 72 61 73 65 0D 0A 1000.. erase..
0000A0: 20 20 20 40 20 31 2C 32 36 20 73 61 79 20 27 44 @ 1,26 say 'D
0000B0: 45 46 49 4E 49 54 49 4F 4E 20 44 45 53 20 5A 4F EFINITION DES ZO
0000C0: 4E 45 53 20 44 55 20 46 49 43 48 49 45 52 27 0D NES DU FICHIER'.
0000D0: 0A 20 20 20 73 74 6F 72 65 20 27 20 20 20 20 20 . store '
0000E0: 20 20 20 20 20 27 20 74 6F 20 6D 6E 6F 6D 7A 6F ' to mnomzo
0000F0: 6E 65 0D 0A 20 20 20 73 74 6F 72 65 20 24 28 62 ne.. store $(b
000100: 6C 61 6E 63 2C 31 2C 32 30 29 20 74 6F 20 6D 74 lanc,1,20) to mt
000110: 65 78 74 65 0D 0A 20 20 20 73 74 6F 72 65 20 30 exte.. store 0
000120: 20 74 6F 20 6D 6C 74 0D 0A 20 20 20 73 74 6F 72 to mlt.. stor
000130: 65 20 30 20 74 6F 20 6D 63 74 0D 0A 20 20 20 73 e 0 to mct.. s
000140: 74 6F 72 65 20 30 20 74 6F 20 6D 6C 73 0D 0A 20 tore 0 to mls..
000150: 20 20 73 74 6F 72 65 20 30 20 74 6F 20 6D 63 73 store 0 to mcs
000160: 0D 0A 20 20 20 73 74 6F 72 65 20 27 43 27 20 74 .. store 'C' t
000170: 6F 20 6D 74 79 70 65 0D 0A 20 20 20 73 74 6F 72 o mtype.. stor
000180: 65 20 31 20 74 6F 20 6D 6C 6F 6E 0D 0A 20 20 20 e 1 to mlon..
000190: 73 74 6F 72 65 20 30 20 74 6F 20 6D 64 65 63 0D store 0 to mdec.
0001A0: 0A 20 20 20 40 20 33 2C 30 20 73 61 79 20 27 74 . @ 3,0 say 't
0001B0: 61 69 6C 6C 65 20 65 6E 72 65 67 69 73 74 72 65 aille enregistre
0001C0: 6D 65 6E 74 20 3A 20 27 2B 73 74 72 28 6C 6F 6E ment : '+str(lon
0001D0: 67 65 6E 67 2C 34 29 0D 0A 20 20 20 40 20 33 2C geng,4).. @ 3,
0001E0: 34 35 20 73 61 79 20 27 6E 6F 6D 62 72 65 20 64 45 say 'nombre d
0001F0: 65 20 7A 6F 6E 65 73 20 3A 20 27 2B 73 74 72 28 e zones : '+str(
Size : 512 (Real : 512)
000000: 0A 20 20 20 69 66 20 6D 6C 6F 6E 2B 6C 6F 6E 67 . if mlon+long
000010: 65 6E 67 20 3E 20 31 30 30 30 0D 0A 20 20 20 20 eng > 1000..
000020: 20 20 73 74 6F 72 65 20 34 36 20 74 6F 20 6E 6F store 46 to no
000030: 6D 65 73 73 0D 0A 20 20 20 20 20 20 64 6F 20 61 mess.. do a
000040: 66 66 6D 65 73 73 0D 0A 20 20 20 65 6C 73 65 0D ffmess.. else.
000050: 0A 20 20 20 20 20 20 61 70 70 65 6E 64 20 62 6C . append bl
000060: 61 6E 6B 0D 0A 20 20 20 20 20 20 72 65 70 6C 61 ank.. repla
000070: 63 65 20 66 69 65 6C 64 3A 6E 61 6D 65 20 77 69 ce field:name wi
000080: 74 68 20 6D 6E 6F 6D 7A 6F 6E 65 2C 74 65 78 74 th mnomzone,text
000090: 65 20 77 69 74 68 20 6D 74 65 78 74 65 2C 6C 74 e with mtexte,lt
0000A0: 20 77 69 74 68 20 6D 6C 74 2C 63 74 20 3B 0D 0A with mlt,ct ;..
0000B0: 77 69 74 68 20 6D 63 74 2C 6C 73 20 77 69 74 68 with mct,ls with
0000C0: 20 6D 6C 73 2C 63 73 20 77 69 74 68 20 6D 63 73 mls,cs with mcs
0000D0: 2C 66 69 65 6C 64 3A 74 79 70 65 20 77 69 74 68 ,field:type with
0000E0: 20 6D 74 79 70 65 2C 66 69 65 6C 64 3A 6C 65 6E mtype,field:len
0000F0: 20 77 69 74 68 20 6D 6C 6F 6E 2C 3B 0D 0A 66 69 with mlon,;..fi
000100: 65 6C 64 3A 64 65 63 20 77 69 74 68 20 6D 64 65 eld:dec with mde
000110: 63 0D 0A 20 20 20 20 20 20 72 65 6C 65 61 73 65 c.. release
000120: 20 6D 74 65 78 74 65 2C 6D 6C 74 2C 6D 63 74 2C mtexte,mlt,mct,
000130: 6D 6C 73 2C 6D 63 73 0D 0A 20 20 20 20 20 20 73 mls,mcs.. s
000140: 74 6F 72 65 20 23 20 74 6F 20 6E 6F 63 6F 75 72 tore # to nocour
000150: 0D 0A 20 20 20 20 20 20 64 6F 20 76 65 72 7A 6F .. do verzo
000160: 6E 65 0D 0A 20 20 20 65 6E 64 69 66 0D 0A 20 20 ne.. endif..
000170: 20 65 6E 64 63 61 73 65 0D 0A 65 6E 64 64 6F 0D endcase..enddo.
000180: 0A 65 72 61 73 65 0D 0A 73 74 6F 72 65 20 34 38 .erase..store 48
000190: 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 64 6F 20 61 to nomess..do a
0001A0: 66 66 6D 65 73 73 0D 0A 75 73 65 0D 0A 72 65 6C ffmess..use..rel
0001B0: 65 61 73 65 20 6D 6E 6F 6D 7A 6F 6E 65 2C 6D 74 ease mnomzone,mt
0001C0: 79 70 65 2C 6D 6C 6F 6E 2C 6D 64 65 63 2C 6D 6C ype,mlon,mdec,ml
0001D0: 74 2C 6D 63 74 2C 6D 6C 73 2C 6D 63 73 2C 6E 6F t,mct,mls,mcs,no
0001E0: 6D 7A 2C 6C 69 73 74 63 2C 76 61 6C 64 65 62 2C mz,listc,valdeb,
0001F0: 76 61 6C 66 69 6E 0D 0A 72 65 6C 65 61 73 65 20 valfin..release
Size : 512 (Real : 512)
000000: 63 70 74 2D 31 2C 32 29 0D 0A 20 20 20 40 20 36 cpt-1,2).. @ 6
000010: 2C 30 20 73 61 79 20 27 6E 6F 6D 20 64 65 20 6C ,0 say 'nom de l
000020: 61 20 7A 6F 6E 65 27 0D 0A 20 20 20 40 20 36 2C a zone'.. @ 6,
000030: 34 35 20 67 65 74 20 6D 6E 6F 6D 7A 6F 6E 65 20 45 get mnomzone
000040: 70 69 63 74 75 72 65 20 27 41 41 41 41 41 41 41 picture 'AAAAAAA
000050: 41 41 41 27 0D 0A 20 20 20 40 20 6C 69 67 6D 31 AAA'.. @ ligm1
000060: 2C 30 20 73 61 79 20 27 74 61 70 65 7A 20 72 65 ,0 say 'tapez re
000070: 74 75 72 6E 20 70 6F 75 72 20 73 6F 72 74 69 72 turn pour sortir
000080: 27 0D 0A 20 20 20 72 65 61 64 0D 0A 20 20 20 63 '.. read.. c
000090: 6C 65 61 72 20 67 65 74 0D 0A 20 20 20 73 74 6F lear get.. sto
0000A0: 72 65 20 21 28 6D 6E 6F 6D 7A 6F 6E 65 29 20 74 re !(mnomzone) t
0000B0: 6F 20 6D 6E 6F 6D 7A 6F 6E 65 0D 0A 20 20 20 66 o mnomzone.. f
0000C0: 69 6E 64 20 26 6D 6E 6F 6D 7A 6F 6E 65 0D 0A 20 ind &mnomzone..
0000D0: 20 20 64 6F 20 63 61 73 65 0D 0A 20 20 20 63 61 do case.. ca
0000E0: 73 65 20 23 20 23 20 30 0D 0A 20 20 20 73 74 6F se # # 0.. sto
0000F0: 72 65 20 32 35 20 74 6F 20 6E 6F 6D 65 73 73 0D re 25 to nomess.
000100: 0A 20 20 20 64 6F 20 61 66 66 6D 65 73 73 0D 0A . do affmess..
000110: 20 20 20 63 61 73 65 20 6D 6E 6F 6D 7A 6F 6E 65 case mnomzone
000120: 3D 27 20 27 2E 61 6E 64 2E 63 70 74 20 3D 20 31 =' '.and.cpt = 1
000130: 0D 0A 20 20 20 73 74 6F 72 65 20 31 31 20 74 6F .. store 11 to
000140: 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 64 6F 20 61 nomess.. do a
000150: 66 66 6D 65 73 73 0D 0A 20 20 20 63 61 73 65 20 ffmess.. case
000160: 6D 6E 6F 6D 7A 6F 6E 65 3D 27 20 27 0D 0A 20 20 mnomzone=' '..
000170: 20 75 73 65 0D 0A 20 20 20 72 65 6C 65 61 73 65 use.. release
000180: 20 6D 6E 6F 6D 7A 6F 6E 65 2C 6D 74 79 70 65 2C mnomzone,mtype,
000190: 6D 6C 6F 6E 2C 6D 64 65 63 2C 6D 6C 74 2C 6D 63 mlon,mdec,mlt,mc
0001A0: 74 2C 6D 6C 73 2C 6D 63 73 2C 6E 6F 6D 7A 2C 6C t,mls,mcs,nomz,l
0001B0: 69 73 74 63 2C 76 61 6C 64 65 62 2C 76 61 6C 66 istc,valdeb,valf
0001C0: 69 6E 0D 0A 20 20 20 72 65 6C 65 61 73 65 20 63 in.. release c
0001D0: 70 74 2C 6D 74 65 78 74 65 2C 6E 6F 63 6F 75 72 pt,mtexte,nocour
0001E0: 2C 6C 6F 6E 67 65 6E 67 0D 0A 20 20 20 72 65 74 ,longeng.. ret
0001F0: 75 72 6E 0D 0A 20 20 20 6F 74 68 65 72 77 69 73 urn.. otherwis
Size : 512 (Real : 512)
000000: 70 72 65 6D 7A 6F 6E 65 2C 63 70 74 2C 6D 74 65 premzone,cpt,mte
000010: 78 74 65 2C 6E 6F 63 6F 75 72 2C 6C 6F 6E 67 65 xte,nocour,longe
000020: 6E 67 0D 0A 72 65 74 75 72 6E 0D 0A 0D 0A 0D 0A ng..return......
000030: 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A ................
000040: 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 1A 1A ................
000050: 62 6C 61 6E 6B 0D 0A 20 20 20 20 20 20 72 65 70 blank.. rep
000060: 6C 61 63 65 20 66 69 65 6C 64 3A 6E 61 6D 65 20 lace field:name
000070: 77 69 74 68 20 6D 6E 6F 6D 7A 6F 6E 65 2C 74 65 with mnomzone,te
000080: 78 74 65 20 77 69 74 68 20 6D 74 65 78 74 65 2C xte with mtexte,
000090: 6C 74 20 77 69 74 68 20 6D 6C 74 2C 63 74 20 3B lt with mlt,ct ;
0000A0: 0D 0A 77 69 74 68 20 6D 63 74 2C 6C 73 20 77 69 ..with mct,ls wi
0000B0: 74 68 20 6D 6C 73 2C 63 73 20 77 69 74 68 20 6D th mls,cs with m
0000C0: 63 73 2C 66 69 65 6C 64 3A 74 79 70 65 20 77 69 cs,field:type wi
0000D0: 74 68 20 6D 74 79 70 65 2C 66 69 65 6C 64 3A 6C th mtype,field:l
0000E0: 65 6E 20 77 69 74 68 20 6D 6C 6F 6E 2C 3B 0D 0A en with mlon,;..
0000F0: 66 69 65 6C 64 3A 64 65 63 20 77 69 74 68 20 6D field:dec with m
000100: 64 65 63 0D 0A 20 20 20 20 20 20 72 65 6C 65 61 dec.. relea
000110: 73 65 20 6D 74 65 78 74 65 2C 6D 6C 74 2C 6D 63 se mtexte,mlt,mc
000120: 74 2C 6D 6C 73 2C 6D 63 73 0D 0A 20 20 20 20 20 t,mls,mcs..
000130: 20 73 74 6F 72 65 20 23 20 74 6F 20 6E 6F 63 6F store # to noco
000140: 75 72 0D 0A 20 20 20 20 20 20 64 6F 20 76 65 72 ur.. do ver
000150: 7A 6F 6E 65 0D 0A 20 20 20 65 6E 64 69 66 0D 0A zone.. endif..
000160: 20 20 20 65 6E 64 63 61 73 65 0D 0A 65 6E 64 64 endcase..endd
000170: 6F 0D 0A 65 72 61 73 65 0D 0A 73 74 6F 72 65 20 o..erase..store
000180: 34 38 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 64 6F 48 to nomess..do
000190: 20 61 66 66 6D 65 73 73 0D 0A 75 73 65 0D 0A 72 affmess..use..r
0001A0: 65 6C 65 61 73 65 20 6D 6E 6F 6D 7A 6F 6E 65 2C elease mnomzone,
0001B0: 6D 74 79 70 65 2C 6D 6C 6F 6E 2C 6D 64 65 63 2C mtype,mlon,mdec,
0001C0: 6D 6C 74 2C 6D 63 74 2C 6D 6C 73 2C 6D 63 73 2C mlt,mct,mls,mcs,
0001D0: 6E 6F 6D 7A 2C 6C 69 73 74 63 2C 76 61 6C 64 65 nomz,listc,valde
0001E0: 62 2C 76 61 6C 66 69 6E 0D 0A 72 65 6C 65 61 73 b,valfin..releas
0001F0: 65 20 70 72 65 6D 7A 6F 6E 65 2C 63 70 74 2C 6D e premzone,cpt,m
Size : 512 (Real : 512)
000000: 6C 65 20 73 74 72 75 63 74 75 72 65 0D 0A 73 74 le structure..st
000010: 6F 72 65 20 6E 6F 6D 66 69 63 68 2D 27 2E 65 6C ore nomfich-'.el
000020: 69 27 20 74 6F 20 78 65 6C 65 0D 0A 3F 20 27 6C i' to xele..? 'l
000030: 65 20 66 69 63 68 69 65 72 20 27 2B 24 28 78 65 e fichier '+$(xe
000040: 6C 65 2C 33 2C 31 32 29 2B 27 20 76 61 20 65 74 le,3,12)+' va et
000050: 72 65 20 63 72 65 65 20 73 75 72 20 27 2B 75 6E re cree sur '+un
000060: 69 74 0D 0A 69 6E 64 65 78 20 6F 6E 20 74 79 70 it..index on typ
000070: 65 6C 65 6D 2B 6E 6F 6D 65 6C 65 6D 20 74 6F 20 elem+nomelem to
000080: 26 78 65 6C 65 0D 0A 64 6F 20 64 65 66 69 6E 64 &xele..do defind
000090: 65 78 0D 0A 72 65 74 75 72 6E 0D 0A 0D 0A 0D 0A ex..return......
0000A0: 0D 0A 0D 0A 0D 0A 0D 0A 1A 1A 29 3D 27 4F 27 0D ..........)='O'.
0000B0: 0A 20 20 20 20 20 20 20 20 20 72 65 6C 65 61 73 . releas
0000C0: 65 20 72 65 70 2C 74 65 73 74 2C 65 78 69 73 74 e rep,test,exist
0000D0: 2C 6E 6F 65 72 72 2C 72 65 70 72 69 73 65 0D 0A ,noerr,reprise..
0000E0: 20 20 20 20 20 20 20 20 20 64 6F 20 67 65 6E 65 do gene
0000F0: 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 .. store
000100: 20 27 74 27 20 74 6F 20 65 78 69 73 74 0D 0A 20 't' to exist..
000110: 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 30 20 store 0
000120: 74 6F 20 6E 6F 65 72 72 0D 0A 20 20 20 20 20 20 to noerr..
000130: 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20 72 else.. r
000140: 65 6C 65 61 73 65 20 72 65 70 0D 0A 20 20 20 20 elease rep..
000150: 20 20 65 6E 64 69 66 0D 0A 20 20 20 65 6E 64 69 endif.. endi
000160: 66 0D 0A 20 20 20 63 61 73 65 20 63 68 6F 69 78 f.. case choix
000170: 3E 3D 27 32 27 2E 61 6E 64 2E 63 68 6F 69 78 3C >='2'.and.choix<
000180: 3D 27 38 27 2E 6F 72 2E 63 68 6F 69 78 3D 27 43 ='8'.or.choix='C
000190: 27 0D 0A 20 20 20 69 66 20 72 65 70 72 69 73 65 '.. if reprise
0001A0: 3D 27 66 27 2E 61 6E 64 2E 65 78 69 73 74 3D 27 ='f'.and.exist='
0001B0: 66 27 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 f'.. store
0001C0: 34 39 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 49 to nomess..
0001D0: 20 20 20 20 64 6F 20 61 66 66 6D 65 73 73 0D 0A do affmess..
0001E0: 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 69 else.. i
0001F0: 66 20 72 65 70 72 69 73 65 3D 27 66 27 2E 61 6E f reprise='f'.an
Size : 512 (Real : 512)
000000: 20 74 6F 20 6D 7A 6F 6E 34 0D 0A 20 20 20 20 20 to mzon4..
000010: 20 73 74 6F 72 65 20 27 46 49 4E 20 27 2B 76 61 store 'FIN '+va
000020: 6C 33 20 74 6F 20 6D 7A 6F 6E 35 0D 0A 20 20 20 l3 to mzon5..
000030: 20 20 20 63 61 73 65 20 24 28 76 65 72 69 66 2C case $(verif,
000040: 32 2C 31 29 3D 27 4C 27 0D 0A 20 20 20 20 20 20 2,1)='L'..
000050: 73 74 6F 72 65 20 27 4C 49 53 54 45 20 44 45 20 store 'LISTE DE
000060: 43 4F 44 45 53 27 20 74 6F 20 6D 7A 6F 6E 33 0D CODES' to mzon3.
000070: 0A 20 20 20 20 20 20 73 74 6F 72 65 20 76 61 6C . store val
000080: 32 20 74 6F 20 6D 7A 6F 6E 34 0D 0A 20 20 20 20 2 to mzon4..
000090: 20 20 73 74 6F 72 65 20 27 20 27 20 74 6F 20 6D store ' ' to m
0000A0: 7A 6F 6E 35 0D 0A 20 20 20 20 20 20 6F 74 68 65 zon5.. othe
0000B0: 72 77 69 73 65 0D 0A 20 20 20 20 20 20 73 74 6F rwise.. sto
0000C0: 72 65 20 27 20 27 20 74 6F 20 6D 7A 6F 6E 33 0D re ' ' to mzon3.
0000D0: 0A 20 20 20 20 20 20 73 74 6F 72 65 20 27 20 27 . store ' '
0000E0: 20 74 6F 20 6D 7A 6F 6E 34 0D 0A 20 20 20 20 20 to mzon4..
0000F0: 20 73 74 6F 72 65 20 27 20 27 20 74 6F 20 6D 7A store ' ' to mz
000100: 6F 6E 35 0D 0A 20 20 20 65 6E 64 63 61 73 65 0D on5.. endcase.
000110: 0A 20 20 20 40 20 6C 69 67 2B 32 2C 30 20 73 61 . @ lig+2,0 sa
000120: 79 20 6D 7A 6F 6E 31 2B 27 20 27 2B 6D 7A 6F 6E y mzon1+' '+mzon
000130: 32 0D 0A 20 20 20 40 20 6C 69 67 2B 32 2C 32 38 2.. @ lig+2,28
000140: 20 73 61 79 20 6D 7A 6F 6E 33 2B 27 20 20 20 27 say mzon3+' '
000150: 2B 6D 7A 6F 6E 34 2B 27 20 20 27 2B 6D 7A 6F 6E +mzon4+' '+mzon
000160: 35 0D 0A 20 20 20 73 74 6F 72 65 20 6C 69 67 2B 5.. store lig+
000170: 34 20 74 6F 20 6C 69 67 0D 0A 20 20 20 73 6B 69 4 to lig.. ski
000180: 70 0D 0A 20 20 20 69 66 20 65 6F 66 0D 0A 20 20 p.. if eof..
000190: 20 20 20 20 3F 0D 0A 20 20 20 20 20 20 3F 20 27 ?.. ? '
0001A0: 6E 6F 6D 62 72 65 20 64 65 20 7A 6F 6E 65 73 20 nombre de zones
0001B0: 3A 27 2C 63 70 74 2C 27 20 20 20 20 20 20 20 20 :',cpt,'
0001C0: 20 20 20 20 20 20 74 61 69 6C 6C 65 20 65 6E 72 taille enr
0001D0: 65 67 69 73 74 72 65 6D 65 6E 74 3A 27 2C 6C 6F egistrement:',lo
0001E0: 6E 67 65 6E 67 0D 0A 20 20 20 20 20 20 69 66 20 ngeng.. if
0001F0: 72 65 70 3D 27 4E 27 0D 0A 20 20 20 20 20 20 20 rep='N'..
Size : 512 (Real : 512)
000000: 2A 20 64 65 6D 6C 69 73 74 3A 20 64 65 6D 61 6E * demlist: deman
000010: 64 65 20 6C 65 20 6E 6F 6D 20 64 65 20 6C 61 20 de le nom de la
000020: 6C 69 73 74 65 20 61 20 61 66 66 69 63 68 65 72 liste a afficher
000030: 0D 0A 0D 0A 73 65 6C 65 63 74 20 70 72 69 6D 61 ....select prima
000040: 72 79 0D 0A 75 73 65 20 26 66 65 6C 65 20 69 6E ry..use &fele in
000050: 64 65 78 20 26 78 65 6C 65 0D 0A 65 72 61 73 65 dex &xele..erase
000060: 0D 0A 73 74 6F 72 65 20 27 66 27 20 74 6F 20 63 ..store 'f' to c
000070: 6F 72 72 65 63 74 0D 0A 64 6F 20 77 68 69 6C 65 orrect..do while
000080: 20 63 6F 72 72 65 63 74 3D 27 66 27 0D 0A 20 20 correct='f'..
000090: 20 73 74 6F 72 65 20 27 20 20 20 20 20 20 20 20 store '
0000A0: 27 20 74 6F 20 6D 6E 6F 6D 6C 0D 0A 20 20 20 40 ' to mnoml.. @
0000B0: 20 36 2C 35 20 73 61 79 20 27 6E 6F 6D 20 64 65 6,5 say 'nom de
0000C0: 20 6C 61 20 6C 69 73 74 65 3A 27 0D 0A 20 20 20 la liste:'..
0000D0: 40 20 36 2C 33 30 20 67 65 74 20 6D 6E 6F 6D 6C @ 6,30 get mnoml
0000E0: 0D 0A 20 20 20 40 20 6C 69 67 6D 31 2C 30 20 73 .. @ ligm1,0 s
0000F0: 61 79 20 27 74 61 70 65 7A 20 72 65 74 75 72 6E ay 'tapez return
000100: 20 70 6F 75 72 20 71 75 69 74 74 65 72 27 0D 0A pour quitter'..
000110: 20 20 20 72 65 61 64 0D 0A 20 20 20 63 6C 65 61 read.. clea
000120: 72 20 67 65 74 0D 0A 20 20 20 69 66 20 6D 6E 6F r get.. if mno
000130: 6D 6C 20 3D 20 27 20 27 0D 0A 20 20 20 72 65 6C ml = ' '.. rel
000140: 65 61 73 65 20 6D 6E 6F 6D 6C 2C 63 6F 72 72 65 ease mnoml,corre
000150: 63 74 2C 63 6C 65 2C 65 78 70 66 0D 0A 20 20 20 ct,cle,expf..
000160: 72 65 74 75 72 6E 0D 0A 20 20 20 65 6E 64 69 66 return.. endif
000170: 0D 0A 20 20 20 40 20 6C 69 67 6D 31 2C 30 0D 0A .. @ ligm1,0..
000180: 20 20 20 73 74 6F 72 65 20 21 28 6D 6E 6F 6D 6C store !(mnoml
000190: 29 20 74 6F 20 6D 6E 6F 6D 6C 0D 0A 20 20 20 73 ) to mnoml.. s
0001A0: 74 6F 72 65 20 27 4C 27 2D 6D 6E 6F 6D 6C 20 74 tore 'L'-mnoml t
0001B0: 6F 20 63 6C 65 0D 0A 20 20 20 66 69 6E 64 20 26 o cle.. find &
0001C0: 63 6C 65 0D 0A 20 20 20 69 66 20 23 20 3D 20 30 cle.. if # = 0
0001D0: 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 37 20 .. store 7
0001E0: 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 20 20 to nomess..
0001F0: 20 64 6F 20 61 66 66 6D 65 73 73 0D 0A 20 20 20 do affmess..
Size : 512 (Real : 512)
000000: 2A 20 67 65 6E 65 3A 20 67 65 6E 65 72 61 74 69 * gene: generati
000010: 6F 6E 20 64 65 20 66 69 63 68 69 65 72 0D 0A 0D on de fichier...
000020: 0A 65 72 61 73 65 0D 0A 40 20 31 2C 32 36 20 73 .erase..@ 1,26 s
000030: 61 79 20 27 47 45 4E 45 52 41 54 49 4F 4E 20 44 ay 'GENERATION D
000040: 55 20 46 49 43 48 49 45 52 20 27 0D 0A 40 20 31 U FICHIER '..@ 1
000050: 2C 35 34 20 67 65 74 20 6E 6F 6D 61 66 66 0D 0A ,54 get nomaff..
000060: 63 6C 65 61 72 20 67 65 74 0D 0A 73 74 6F 72 65 clear get..store
000070: 20 24 28 62 6C 61 6E 63 2C 31 2C 33 30 29 20 74 $(blanc,1,30) t
000080: 6F 20 6D 69 6E 74 69 74 66 0D 0A 73 74 6F 72 65 o mintitf..store
000090: 20 24 28 62 6C 61 6E 63 2C 31 2C 33 30 29 20 74 $(blanc,1,30) t
0000A0: 6F 20 6D 74 69 74 72 65 66 0D 0A 40 20 36 2C 35 o mtitref..@ 6,5
0000B0: 20 73 61 79 20 27 69 6E 74 69 74 75 6C 65 20 64 say 'intitule d
0000C0: 75 20 66 69 63 68 69 65 72 27 0D 0A 40 20 36 2C u fichier'..@ 6,
0000D0: 33 30 20 67 65 74 20 6D 69 6E 74 69 74 66 0D 0A 30 get mintitf..
0000E0: 72 65 61 64 0D 0A 63 6C 65 61 72 20 67 65 74 0D read..clear get.
0000F0: 0A 73 74 6F 72 65 20 27 66 27 20 74 6F 20 63 6F .store 'f' to co
000100: 72 72 65 63 74 0D 0A 64 6F 20 77 68 69 6C 65 20 rrect..do while
000110: 63 6F 72 72 65 63 74 3D 27 66 27 0D 0A 20 20 20 correct='f'..
000120: 40 20 37 2C 35 20 73 61 79 20 27 74 69 74 72 65 @ 7,5 say 'titre
000130: 20 6D 65 6E 75 20 70 72 69 6E 63 69 70 61 6C 27 menu principal'
000140: 0D 0A 20 20 20 40 20 37 2C 33 30 20 67 65 74 20 .. @ 7,30 get
000150: 6D 74 69 74 72 65 66 0D 0A 20 20 20 72 65 61 64 mtitref.. read
000160: 0D 0A 20 20 20 63 6C 65 61 72 20 67 65 74 0D 0A .. clear get..
000170: 20 20 20 69 66 20 6D 74 69 74 72 65 66 3D 27 20 if mtitref='
000180: 27 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 33 '.. store 3
000190: 35 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 5 to nomess..
0001A0: 20 20 20 64 6F 20 61 66 66 6D 65 73 73 0D 0A 20 do affmess..
0001B0: 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 73 74 else.. st
0001C0: 6F 72 65 20 27 74 27 20 74 6F 20 63 6F 72 72 65 ore 't' to corre
0001D0: 63 74 0D 0A 20 20 20 65 6E 64 69 66 0D 0A 65 6E ct.. endif..en
0001E0: 64 64 6F 0D 0A 72 65 6C 65 61 73 65 20 63 6F 72 ddo..release cor
0001F0: 72 65 63 74 0D 0A 2A 20 6D 65 74 74 72 65 20 61 rect..* mettre a
Size : 512 (Real : 512)
000000: 65 6C 73 65 0D 0A 20 20 20 20 20 20 73 74 6F 72 else.. stor
000010: 65 20 27 74 27 20 74 6F 20 63 6F 72 72 65 63 74 e 't' to correct
000020: 0D 0A 20 20 20 65 6E 64 69 66 0D 0A 65 6E 64 64 .. endif..endd
000030: 6F 0D 0A 64 6F 20 64 65 6D 63 6C 65 0D 0A 65 72 o..do demcle..er
000040: 61 73 65 0D 0A 73 74 6F 72 65 20 75 6E 69 74 2B ase..store unit+
000050: 6D 6E 6F 6D 6C 20 74 6F 20 6D 6E 6F 6D 6C 0D 0A mnoml to mnoml..
000060: 69 66 20 65 6F 66 0D 0A 73 74 6F 72 65 20 31 39 if eof..store 19
000070: 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 64 6F 20 61 to nomess..do a
000080: 66 66 6D 65 73 73 0D 0A 72 65 6C 65 61 73 65 20 ffmess..release
000090: 6D 6E 6F 6D 6C 2C 63 6F 72 72 65 63 74 2C 63 6C mnoml,correct,cl
0000A0: 65 2C 65 78 70 66 0D 0A 72 65 74 75 72 6E 0D 0A e,expf..return..
0000B0: 65 6E 64 69 66 0D 0A 69 66 20 63 68 6F 69 78 3D endif..if choix=
0000C0: 27 37 27 0D 0A 20 20 20 73 65 74 20 70 72 69 6E '7'.. set prin
0000D0: 74 20 6F 6E 0D 0A 20 20 20 3F 3F 20 63 68 72 28 t on.. ?? chr(
0000E0: 31 33 29 0D 0A 20 20 20 73 65 74 20 70 72 69 6E 13).. set prin
0000F0: 74 20 6F 66 66 0D 0A 20 20 20 72 65 70 6F 72 74 t off.. report
000100: 20 66 6F 72 6D 20 26 6D 6E 6F 6D 6C 20 6E 65 78 form &mnoml nex
000110: 74 20 36 35 35 33 35 20 26 65 78 70 66 20 74 6F t 65535 &expf to
000120: 20 70 72 69 6E 74 0D 0A 65 6C 73 65 0D 0A 20 20 print..else..
000130: 20 64 6F 20 77 68 69 6C 65 20 2E 6E 6F 74 2E 65 do while .not.e
000140: 6F 66 0D 0A 20 20 20 20 20 20 65 72 61 73 65 0D of.. erase.
000150: 0A 20 20 20 20 20 20 72 65 70 6F 72 74 20 66 6F . report fo
000160: 72 6D 20 26 6D 6E 6F 6D 6C 20 6E 65 78 74 20 31 rm &mnoml next 1
000170: 30 20 26 65 78 70 66 0D 0A 20 20 20 20 20 20 73 0 &expf.. s
000180: 6B 69 70 0D 0A 20 20 20 20 20 20 69 66 20 2E 6E kip.. if .n
000190: 6F 74 2E 65 6F 66 0D 0A 20 20 20 20 20 20 20 20 ot.eof..
0001A0: 3F 20 22 74 61 70 65 7A 20 46 20 70 6F 75 72 20 ? "tapez F pour
0001B0: 66 69 6E 20 6C 69 73 74 65 2C 20 6E 27 69 6D 70 fin liste, n'imp
0001C0: 6F 72 74 65 20 71 75 65 6C 6C 65 20 61 75 74 72 orte quelle autr
0001D0: 65 20 74 6F 75 63 68 65 20 70 6F 75 72 20 6C 61 e touche pour la
0001E0: 20 73 75 69 74 65 22 0D 0A 20 20 20 20 20 20 65 suite".. e
0001F0: 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 3F 20 22 lse.. ? "
Size : 512 (Real : 512)
000000: 20 6A 6F 75 72 20 67 65 73 74 66 69 63 68 0D 0A jour gestfich..
000010: 75 73 65 20 67 65 73 74 66 69 63 68 0D 0A 67 6F use gestfich..go
000020: 74 6F 20 74 6F 70 0D 0A 69 66 20 65 6F 66 0D 0A to top..if eof..
000030: 20 20 20 61 70 70 65 6E 64 20 62 6C 61 6E 6B 0D append blank.
000040: 0A 65 6C 73 65 0D 0A 20 20 20 6C 6F 63 61 74 65 .else.. locate
000050: 20 66 6F 72 20 6E 6F 6D 66 3E 24 28 6E 6F 6D 66 for nomf>$(nomf
000060: 69 63 68 2C 33 2C 38 29 0D 0A 20 20 20 69 66 20 ich,3,8).. if
000070: 6E 6F 6D 66 20 3E 20 24 28 6E 6F 6D 66 69 63 68 nomf > $(nomfich
000080: 2C 33 2C 38 29 0D 0A 20 20 20 20 20 20 69 6E 73 ,3,8).. ins
000090: 65 72 74 20 62 65 66 6F 72 65 20 62 6C 61 6E 6B ert before blank
0000A0: 0D 0A 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 .. else..
0000B0: 20 61 70 70 65 6E 64 20 62 6C 61 6E 6B 0D 0A 20 append blank..
0000C0: 20 20 65 6E 64 69 66 0D 0A 65 6E 64 69 66 0D 0A endif..endif..
0000D0: 72 65 70 6C 61 63 65 20 6E 6F 6D 66 20 77 69 74 replace nomf wit
0000E0: 68 20 24 28 6E 6F 6D 66 69 63 68 2C 33 2C 38 29 h $(nomfich,3,8)
0000F0: 2C 74 69 74 72 65 66 20 77 69 74 68 20 6D 74 69 ,titref with mti
000100: 74 72 65 66 2C 69 6E 74 69 74 66 20 77 69 74 68 tref,intitf with
000110: 20 6D 69 6E 74 69 74 66 0D 0A 72 65 6C 65 61 73 mintitf..releas
000120: 65 20 6D 74 69 74 72 65 66 2C 6D 69 6E 74 69 74 e mtitref,mintit
000130: 66 0D 0A 2A 20 64 65 66 69 6E 69 72 20 6C 61 20 f..* definir la
000140: 73 74 72 75 63 74 75 72 65 20 64 75 20 66 69 63 structure du fic
000150: 68 69 65 72 0D 0A 73 74 6F 72 65 20 6E 6F 6D 66 hier..store nomf
000160: 69 63 68 2D 27 2E 72 65 66 27 20 74 6F 20 66 72 ich-'.ref' to fr
000170: 65 66 0D 0A 3F 0D 0A 3F 20 27 6C 65 20 66 69 63 ef..?..? 'le fic
000180: 68 69 65 72 20 27 2B 24 28 66 72 65 66 2C 33 2C hier '+$(fref,3,
000190: 31 32 29 2B 27 20 76 61 20 65 74 72 65 20 63 72 12)+' va etre cr
0001A0: 65 65 20 73 75 72 20 27 2B 75 6E 69 74 0D 0A 75 ee sur '+unit..u
0001B0: 73 65 20 72 65 66 0D 0A 63 6F 70 79 20 74 6F 20 se ref..copy to
0001C0: 26 66 72 65 66 20 73 74 72 75 63 74 75 72 65 0D &fref structure.
0001D0: 0A 75 73 65 20 26 66 72 65 66 0D 0A 73 74 6F 72 .use &fref..stor
0001E0: 65 20 6E 6F 6D 66 69 63 68 2D 27 2E 6E 6F 6D 27 e nomfich-'.nom'
0001F0: 20 74 6F 20 78 6E 6F 6D 0D 0A 3F 20 27 6C 65 20 to xnom..? 'le
Size : 512 (Real : 512)
000000: 74 61 70 65 7A 20 73 75 72 20 75 6E 65 20 74 6F tapez sur une to
000010: 75 63 68 65 20 70 6F 75 72 20 72 65 76 65 6E 69 uche pour reveni
000020: 72 20 61 75 20 6D 65 6E 75 22 0D 0A 20 20 20 20 r au menu"..
000030: 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 73 endif.. s
000040: 65 74 20 63 6F 6E 73 6F 6C 65 20 6F 66 66 0D 0A et console off..
000050: 20 20 20 20 20 20 77 61 69 74 20 74 6F 20 63 68 wait to ch
000060: 6F 69 78 0D 0A 20 20 20 20 20 20 73 65 74 20 63 oix.. set c
000070: 6F 6E 73 6F 6C 65 20 6F 6E 0D 0A 20 20 20 20 20 onsole on..
000080: 20 69 66 20 21 28 63 68 6F 69 78 29 3D 27 46 27 if !(choix)='F'
000090: 0D 0A 20 20 20 20 20 20 20 20 20 72 65 6C 65 61 .. relea
0000A0: 73 65 20 6D 6E 6F 6D 6C 2C 63 6F 72 72 65 63 74 se mnoml,correct
0000B0: 2C 63 6C 65 2C 65 78 70 66 0D 0A 20 20 20 20 20 ,cle,expf..
0000C0: 20 20 20 20 72 65 74 75 72 6E 0D 0A 20 20 20 20 return..
0000D0: 20 20 65 6E 64 69 66 0D 0A 20 20 20 65 6E 64 64 endif.. endd
0000E0: 6F 0D 0A 65 6E 64 69 66 0D 0A 72 65 6C 65 61 73 o..endif..releas
0000F0: 65 20 6D 6E 6F 6D 6C 2C 63 6F 72 72 65 63 74 2C e mnoml,correct,
000100: 63 6C 65 2C 65 78 70 66 0D 0A 72 65 74 75 72 6E cle,expf..return
000110: 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A ................
000120: 0D 0A 0D 0A 1A 1A FF 00 FF 00 FF 00 FF 00 FF 00 ................
000130: FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 ................
000140: FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 ................
000150: FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 ................
000160: FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 ................
000170: FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 ................
000180: FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 ................
000190: FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 ................
0001A0: FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 ................
0001B0: FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 ................
0001C0: FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 ................
0001D0: FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 ................
0001E0: FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 ................
0001F0: FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 ................
Size : 512 (Real : 512)
000000: 66 69 63 68 69 65 72 20 27 2B 24 28 78 6E 6F 6D fichier '+$(xnom
000010: 2C 33 2C 31 32 29 2B 27 20 76 61 20 65 74 72 65 ,3,12)+' va etre
000020: 20 63 72 65 65 20 73 75 72 20 27 2B 75 6E 69 74 cree sur '+unit
000030: 0D 0A 69 6E 64 65 78 20 6F 6E 20 66 69 65 6C 64 ..index on field
000040: 3A 6E 61 6D 65 20 74 6F 20 26 78 6E 6F 6D 0D 0A :name to &xnom..
000050: 73 74 6F 72 65 20 6E 6F 6D 66 69 63 68 2D 27 2E store nomfich-'.
000060: 63 6C 65 27 20 74 6F 20 78 63 6C 65 0D 0A 3F 20 cle' to xcle..?
000070: 27 6C 65 20 66 69 63 68 69 65 72 20 27 2B 24 28 'le fichier '+$(
000080: 78 63 6C 65 2C 33 2C 31 32 29 2B 27 20 76 61 20 xcle,3,12)+' va
000090: 65 74 72 65 20 63 72 65 65 20 73 75 72 20 27 2B etre cree sur '+
0000A0: 75 6E 69 74 0D 0A 69 6E 64 65 78 20 6F 6E 20 6E unit..index on n
0000B0: 6F 7A 20 74 6F 20 26 78 63 6C 65 0D 0A 2A 20 64 oz to &xcle..* d
0000C0: 65 66 69 6E 69 72 20 6C 65 73 20 7A 6F 6E 65 73 efinir les zones
0000D0: 20 64 75 20 66 69 63 68 69 65 72 0D 0A 64 6F 20 du fichier..do
0000E0: 64 65 66 7A 6F 6E 65 73 0D 0A 2A 20 63 72 65 65 defzones..* cree
0000F0: 72 20 6C 65 20 66 69 63 68 69 65 72 20 6C 75 69 r le fichier lui
000100: 2D 6D 65 6D 65 0D 0A 65 72 61 73 65 0D 0A 3F 0D -meme..erase..?.
000110: 0A 3F 0D 0A 3F 20 27 6C 65 20 66 69 63 68 69 65 .?..? 'le fichie
000120: 72 20 27 2B 24 28 6E 6F 6D 66 69 63 68 2C 33 2C r '+$(nomfich,3,
000130: 38 29 2B 27 20 76 61 20 65 74 72 65 20 63 72 65 8)+' va etre cre
000140: 65 20 73 75 72 20 27 2B 75 6E 69 74 0D 0A 63 72 e sur '+unit..cr
000150: 65 61 74 65 20 26 6E 6F 6D 66 69 63 68 20 66 72 eate &nomfich fr
000160: 6F 6D 20 26 66 72 65 66 0D 0A 2A 20 63 72 65 65 om &fref..* cree
000170: 72 20 6C 65 20 66 69 63 68 69 65 72 20 64 65 73 r le fichier des
000180: 20 69 6E 64 65 78 20 65 74 20 64 65 73 20 6C 69 index et des li
000190: 73 74 65 73 0D 0A 73 74 6F 72 65 20 6E 6F 6D 66 stes..store nomf
0001A0: 69 63 68 2D 27 2E 65 6C 66 27 20 74 6F 20 66 65 ich-'.elf' to fe
0001B0: 6C 65 0D 0A 3F 20 27 6C 65 20 66 69 63 68 69 65 le..? 'le fichie
0001C0: 72 20 27 2B 24 28 66 65 6C 65 2C 33 2C 31 32 29 r '+$(fele,3,12)
0001D0: 2B 27 20 76 61 20 65 74 72 65 20 63 72 65 65 20 +' va etre cree
0001E0: 73 75 72 20 27 2B 75 6E 69 74 0D 0A 75 73 65 20 sur '+unit..use
0001F0: 65 6C 66 0D 0A 63 6F 70 79 20 74 6F 20 26 66 65 elf..copy to &fe
Size : 512 (Real : 512)
000000: 65 6C 65 63 74 20 73 65 63 6F 6E 64 61 72 79 0D elect secondary.
000010: 0A 75 73 65 0D 0A 73 65 6C 65 63 74 20 70 72 69 .use..select pri
000020: 6D 61 72 79 0D 0A 75 73 65 0D 0A 64 6F 20 6F 70 mary..use..do op
000030: 74 69 6F 6E 0D 0A 73 65 6C 65 63 74 20 73 65 63 tion..select sec
000040: 6F 6E 64 61 72 79 0D 0A 75 73 65 0D 0A 73 65 6C ondary..use..sel
000050: 65 63 74 20 70 72 69 6D 61 72 79 0D 0A 75 73 65 ect primary..use
000060: 0D 0A 63 61 73 65 20 21 28 63 68 6F 69 78 29 20 ..case !(choix)
000070: 3D 20 27 46 27 0D 0A 72 65 74 75 72 6E 0D 0A 6F = 'F'..return..o
000080: 74 68 65 72 77 69 73 65 0D 0A 2A 20 61 66 66 69 therwise..* affi
000090: 63 68 65 72 20 75 6E 20 6D 65 73 73 61 67 65 20 cher un message
0000A0: 64 27 65 72 72 65 75 72 0D 0A 73 74 6F 72 65 20 d'erreur..store
0000B0: 31 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 64 6F 20 1 to nomess..do
0000C0: 61 66 66 6D 65 73 73 0D 0A 65 6E 64 63 61 73 65 affmess..endcase
0000D0: 0D 0A 73 65 6C 65 63 74 20 70 72 69 6D 61 72 79 ..select primary
0000E0: 0D 0A 75 73 65 0D 0A 73 65 6C 65 63 74 20 73 65 ..use..select se
0000F0: 63 6F 6E 64 61 72 79 0D 0A 75 73 65 0D 0A 73 65 condary..use..se
000100: 6C 65 63 74 20 70 72 69 6D 61 72 79 0D 0A 73 74 lect primary..st
000110: 6F 72 65 20 27 74 27 20 74 6F 20 74 65 73 74 0D ore 't' to test.
000120: 0A 65 6E 64 64 6F 0D 0A 72 65 74 75 72 6E 0D 0A .enddo..return..
000130: 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 1A 1A 20 20 ..............
000140: 20 20 3D 3D 3D 3D 3E 20 33 22 0D 0A 20 20 20 40 ====> 3".. @
000150: 20 36 2C 31 30 20 73 61 79 20 27 76 69 73 75 61 6,10 say 'visua
000160: 6C 69 73 61 74 69 6F 6E 20 20 20 20 20 20 20 20 lisation
000170: 20 20 20 20 20 20 20 20 20 20 20 20 20 3D 3D 3D ===
000180: 3D 3E 20 34 27 0D 0A 20 20 20 40 20 37 2C 31 30 => 4'.. @ 7,10
000190: 20 73 61 79 20 22 72 65 63 68 65 72 63 68 65 20 say "recherche
0001A0: 73 75 72 20 63 6C 65 20 20 20 20 20 20 20 20 20 sur cle
0001B0: 20 20 20 20 20 20 20 20 3D 3D 3D 3D 3E 20 35 22 ====> 5"
0001C0: 0D 0A 20 20 20 40 20 39 2C 31 30 20 73 61 79 20 .. @ 9,10 say
0001D0: 22 61 66 66 69 63 68 61 67 65 20 64 27 75 6E 65 "affichage d'une
0001E0: 20 6C 69 73 74 65 20 61 20 6C 27 65 63 72 61 6E liste a l'ecran
0001F0: 20 20 20 3D 3D 3D 3D 3E 20 36 22 0D 0A 20 20 20 ====> 6"..
Size : 512 (Real : 512)
000000: 2A 20 76 65 72 69 66 3A 20 76 65 72 69 66 69 63 * verif: verific
000010: 61 74 69 6F 6E 20 64 27 75 6E 65 20 7A 6F 6E 65 ation d'une zone
000020: 0D 0A 0D 0A 69 66 20 63 68 6F 69 78 20 3D 20 27 ....if choix = '
000030: 34 27 0D 0A 40 20 6C 69 67 6D 31 2C 30 20 73 61 4'..@ ligm1,0 sa
000040: 79 20 27 72 65 63 68 65 72 63 68 65 20 65 6E 20 y 'recherche en
000050: 63 6F 75 72 73 2E 20 76 65 75 69 6C 6C 65 7A 20 cours. veuillez
000060: 70 61 74 69 65 6E 74 65 72 2E 2E 2E 20 20 20 20 patienter...
000070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 0D '.
000080: 0A 65 6C 73 65 0D 0A 40 20 6C 69 67 6D 31 2C 30 .else..@ ligm1,0
000090: 20 73 61 79 20 27 76 65 72 69 66 69 63 61 74 69 say 'verificati
0000A0: 6F 6E 20 65 6E 20 63 6F 75 72 73 2E 20 76 65 75 on en cours. veu
0000B0: 69 6C 6C 65 7A 20 70 61 74 69 65 6E 74 65 72 2E illez patienter.
0000C0: 2E 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
0000D0: 20 20 27 0D 0A 65 6E 64 69 66 0D 0A 73 65 6C 65 '..endif..sele
0000E0: 63 74 20 70 72 69 6D 61 72 79 0D 0A 75 73 65 20 ct primary..use
0000F0: 26 66 72 65 66 20 69 6E 64 65 78 20 26 78 63 6C &fref index &xcl
000100: 65 0D 0A 63 6F 75 6E 74 20 74 6F 20 6E 62 6C 69 e..count to nbli
000110: 73 74 0D 0A 69 66 20 76 32 3D 39 39 0D 0A 73 74 st..if v2=99..st
000120: 6F 72 65 20 6E 62 6C 69 73 74 20 74 6F 20 76 32 ore nblist to v2
000130: 0D 0A 65 6E 64 69 66 0D 0A 72 65 6C 65 61 73 65 ..endif..release
000140: 20 6E 62 6C 69 73 74 0D 0A 73 74 6F 72 65 20 76 nblist..store v
000150: 31 20 74 6F 20 63 70 74 0D 0A 73 74 6F 72 65 20 1 to cpt..store
000160: 30 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 64 6F 20 0 to nomess..do
000170: 77 68 69 6C 65 20 63 70 74 3C 3D 76 32 2E 61 6E while cpt<=v2.an
000180: 64 2E 6E 6F 6D 65 73 73 3D 30 0D 0A 73 74 6F 72 d.nomess=0..stor
000190: 65 20 27 6D 7A 6F 6E 27 2D 73 74 72 28 63 70 74 e 'mzon'-str(cpt
0001A0: 2C 31 2B 69 6E 74 28 63 70 74 2F 31 30 29 2D 69 ,1+int(cpt/10)-i
0001B0: 6E 74 28 63 70 74 2F 32 30 29 2D 69 6E 74 28 63 nt(cpt/20)-int(c
0001C0: 70 74 2F 33 30 29 29 20 74 6F 20 6D 7A 6F 6E 0D pt/30)) to mzon.
0001D0: 0A 69 66 20 74 79 70 65 28 26 6D 7A 6F 6E 29 3D .if type(&mzon)=
0001E0: 27 43 27 0D 0A 73 74 6F 72 65 20 21 28 26 6D 7A 'C'..store !(&mz
0001F0: 6F 6E 29 20 74 6F 20 26 6D 7A 6F 6E 0D 0A 65 6E on) to &mzon..en
Size : 512 (Real : 512)
000000: 2A 20 73 75 70 65 6C 65 6D 3A 20 73 75 70 72 65 * supelem: supre
000010: 73 73 69 6F 6E 20 64 27 75 6E 65 20 6C 69 73 74 ssion d'une list
000020: 65 20 6F 75 20 64 27 75 6E 65 20 63 6C 65 0D 0A e ou d'une cle..
000030: 0D 0A 65 72 61 73 65 0D 0A 73 65 6C 65 63 74 20 ..erase..select
000040: 70 72 69 6D 61 72 79 0D 0A 75 73 65 20 26 66 65 primary..use &fe
000050: 6C 65 20 69 6E 64 65 78 20 26 78 65 6C 65 0D 0A le index &xele..
000060: 69 66 20 65 6C 65 6D 3D 27 4C 27 0D 0A 20 20 20 if elem='L'..
000070: 40 20 31 2C 31 36 20 73 61 79 20 22 53 55 50 50 @ 1,16 say "SUPP
000080: 52 45 53 53 49 4F 4E 20 44 27 55 4E 45 20 4C 49 RESSION D'UNE LI
000090: 53 54 45 20 44 55 20 46 49 43 48 49 45 52 20 22 STE DU FICHIER "
0000A0: 0D 0A 20 20 20 73 74 6F 72 65 20 37 20 74 6F 20 .. store 7 to
0000B0: 6E 6F 6D 65 73 73 0D 0A 20 20 20 73 74 6F 72 65 nomess.. store
0000C0: 20 27 6E 6F 6D 20 64 65 20 6C 61 20 6C 69 73 74 'nom de la list
0000D0: 65 27 20 74 6F 20 71 75 65 73 74 0D 0A 65 6C 73 e' to quest..els
0000E0: 65 0D 0A 20 20 20 40 20 31 2C 31 36 20 73 61 79 e.. @ 1,16 say
0000F0: 20 22 53 55 50 50 52 45 53 53 49 4F 4E 20 44 27 "SUPPRESSION D'
000100: 55 4E 45 20 43 4C 45 20 44 55 20 46 49 43 48 49 UNE CLE DU FICHI
000110: 45 52 20 22 0D 0A 20 20 20 73 74 6F 72 65 20 31 ER ".. store 1
000120: 36 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 6 to nomess..
000130: 73 74 6F 72 65 20 27 6E 6F 6D 20 64 65 20 6C 61 store 'nom de la
000140: 20 63 6C 65 27 20 74 6F 20 71 75 65 73 74 0D 0A cle' to quest..
000150: 65 6E 64 69 66 0D 0A 40 20 31 2C 35 35 20 67 65 endif..@ 1,55 ge
000160: 74 20 6E 6F 6D 61 66 66 0D 0A 63 6C 65 61 72 20 t nomaff..clear
000170: 67 65 74 0D 0A 67 6F 74 6F 20 74 6F 70 0D 0A 40 get..goto top..@
000180: 20 35 2C 31 30 20 73 61 79 20 71 75 65 73 74 0D 5,10 say quest.
000190: 0A 73 74 6F 72 65 20 27 66 27 20 74 6F 20 63 6F .store 'f' to co
0001A0: 72 72 65 63 74 0D 0A 64 6F 20 77 68 69 6C 65 20 rrect..do while
0001B0: 63 6F 72 72 65 63 74 3D 27 66 27 0D 0A 20 20 20 correct='f'..
0001C0: 73 74 6F 72 65 20 27 20 20 20 20 20 20 20 20 27 store ' '
0001D0: 20 74 6F 20 6D 6E 6F 6D 0D 0A 20 20 20 40 20 35 to mnom.. @ 5
0001E0: 2C 34 30 20 67 65 74 20 6D 6E 6F 6D 0D 0A 20 20 ,40 get mnom..
0001F0: 20 40 20 6C 69 67 6D 31 2C 30 20 73 61 79 20 22 @ ligm1,0 say "
Size : 512 (Real : 512)
000000: 64 69 66 0D 0A 69 66 20 24 28 74 61 62 76 2C 63 dif..if $(tabv,c
000010: 70 74 2C 31 29 3D 22 4E 22 0D 0A 73 74 6F 72 65 pt,1)="N"..store
000020: 20 63 70 74 2B 31 20 74 6F 20 63 70 74 0D 0A 65 cpt+1 to cpt..e
000030: 6C 73 65 0D 0A 73 74 6F 72 65 20 73 74 72 28 63 lse..store str(c
000040: 70 74 2C 32 29 20 74 6F 20 63 63 70 74 0D 0A 73 pt,2) to ccpt..s
000050: 65 6C 65 63 74 20 70 72 69 6D 61 72 79 0D 0A 75 elect primary..u
000060: 73 65 20 26 66 72 65 66 20 69 6E 64 65 78 20 26 se &fref index &
000070: 78 63 6C 65 0D 0A 66 69 6E 64 20 26 63 63 70 74 xcle..find &ccpt
000080: 0D 0A 72 65 6C 65 61 73 65 20 63 63 70 74 0D 0A ..release ccpt..
000090: 40 20 6C 69 67 6D 31 2C 30 20 73 61 79 20 27 76 @ ligm1,0 say 'v
0000A0: 65 72 69 66 69 63 61 74 69 6F 6E 20 64 65 20 6C erification de l
0000B0: 61 20 7A 6F 6E 65 20 27 2B 74 65 78 74 65 2B 27 a zone '+texte+'
0000C0: 20 65 6E 20 63 6F 75 72 73 27 0D 0A 73 74 6F 72 en cours'..stor
0000D0: 65 20 30 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 73 e 0 to nomess..s
0000E0: 74 6F 72 65 20 23 20 74 6F 20 6E 6F 7A 6F 6E 65 tore # to nozone
0000F0: 0D 0A 73 74 6F 72 65 20 24 28 76 65 72 69 66 2C ..store $(verif,
000100: 31 2C 31 29 20 74 6F 20 76 65 72 31 0D 0A 73 74 1,1) to ver1..st
000110: 6F 72 65 20 24 28 76 65 72 69 66 2C 32 2C 31 29 ore $(verif,2,1)
000120: 20 74 6F 20 76 65 72 32 0D 0A 64 6F 20 63 61 73 to ver2..do cas
000130: 65 0D 0A 63 61 73 65 20 76 65 72 32 3D 27 44 27 e..case ver2='D'
000140: 0D 0A 73 74 6F 72 65 20 24 28 26 6D 7A 6F 6E 2C ..store $(&mzon,
000150: 37 2C 32 29 2D 24 28 26 6D 7A 6F 6E 2C 34 2C 32 7,2)-$(&mzon,4,2
000160: 29 2D 24 28 26 6D 7A 6F 6E 2C 31 2C 32 29 20 74 )-$(&mzon,1,2) t
000170: 6F 20 76 61 6C 65 75 72 31 0D 0A 63 61 73 65 20 o valeur1..case
000180: 76 65 72 32 3D 27 4D 27 0D 0A 73 74 6F 72 65 20 ver2='M'..store
000190: 24 28 26 6D 7A 6F 6E 2C 34 2C 32 29 2D 24 28 26 $(&mzon,4,2)-$(&
0001A0: 6D 7A 6F 6E 2C 31 2C 32 29 20 74 6F 20 76 61 6C mzon,1,2) to val
0001B0: 65 75 72 31 0D 0A 6F 74 68 65 72 77 69 73 65 0D eur1..otherwise.
0001C0: 0A 73 74 6F 72 65 20 26 6D 7A 6F 6E 20 74 6F 20 .store &mzon to
0001D0: 76 61 6C 65 75 72 31 0D 0A 65 6E 64 63 61 73 65 valeur1..endcase
0001E0: 0D 0A 2A 20 76 65 72 69 66 69 65 72 20 70 61 73 ..* verifier pas
0001F0: 20 64 65 70 61 73 73 65 6D 65 6E 74 20 63 61 70 depassement cap
Size : 512 (Real : 512)
000000: 74 61 70 65 7A 20 72 65 74 75 72 6E 20 70 6F 75 tapez return pou
000010: 72 20 61 62 61 6E 64 6F 6E 6E 65 72 22 0D 0A 20 r abandonner"..
000020: 20 20 72 65 61 64 0D 0A 20 20 20 40 20 6C 69 67 read.. @ lig
000030: 6D 31 2C 30 0D 0A 20 20 20 2A 20 76 65 75 74 2D m1,0.. * veut-
000040: 6F 6E 20 73 6F 72 74 69 72 0D 0A 20 20 20 69 66 on sortir.. if
000050: 20 6D 6E 6F 6D 3D 27 20 27 0D 0A 20 20 20 20 20 mnom=' '..
000060: 20 72 65 6C 65 61 73 65 20 71 75 65 73 74 2C 6D release quest,m
000070: 6E 6F 6D 2C 63 6F 72 72 65 63 74 0D 0A 20 20 20 nom,correct..
000080: 20 20 20 75 73 65 0D 0A 20 20 20 20 20 20 72 65 use.. re
000090: 74 75 72 6E 0D 0A 20 20 20 65 6E 64 69 66 0D 0A turn.. endif..
0000A0: 20 20 20 73 74 6F 72 65 20 21 28 6D 6E 6F 6D 29 store !(mnom)
0000B0: 20 74 6F 20 6D 6E 6F 6D 0D 0A 20 20 20 2A 20 6C to mnom.. * l
0000C0: 65 20 6E 6F 6D 20 65 78 69 73 74 65 2D 74 2D 69 e nom existe-t-i
0000D0: 6C 20 3F 0D 0A 20 20 20 73 74 6F 72 65 20 65 6C l ?.. store el
0000E0: 65 6D 2D 6D 6E 6F 6D 20 74 6F 20 6D 6E 6F 6D 0D em-mnom to mnom.
0000F0: 0A 20 20 20 66 69 6E 64 20 26 6D 6E 6F 6D 0D 0A . find &mnom..
000100: 20 20 20 69 66 20 23 20 3D 20 30 0D 0A 20 20 20 if # = 0..
000110: 20 20 20 64 6F 20 61 66 66 6D 65 73 73 0D 0A 20 do affmess..
000120: 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 69 66 else.. if
000130: 20 65 6C 65 6D 3D 27 43 27 2E 61 6E 64 2E 74 79 elem='C'.and.ty
000140: 70 63 3D 27 50 27 0D 0A 20 20 20 20 20 20 20 20 pc='P'..
000150: 20 73 74 6F 72 65 20 31 38 20 74 6F 20 6E 6F 6D store 18 to nom
000160: 65 73 73 0D 0A 20 20 20 20 20 20 20 20 20 64 6F ess.. do
000170: 20 61 66 66 6D 65 73 73 0D 0A 20 20 20 20 20 20 affmess..
000180: 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20 73 else.. s
000190: 74 6F 72 65 20 27 74 27 20 74 6F 20 63 6F 72 72 tore 't' to corr
0001A0: 65 63 74 0D 0A 20 20 20 20 20 20 65 6E 64 69 66 ect.. endif
0001B0: 0D 0A 20 20 20 65 6E 64 69 66 0D 0A 65 6E 64 64 .. endif..endd
0001C0: 6F 0D 0A 72 65 6C 65 61 73 65 20 63 6F 72 72 65 o..release corre
0001D0: 63 74 0D 0A 40 20 37 2C 31 30 20 73 61 79 20 27 ct..@ 7,10 say '
0001E0: 6C 69 62 65 6C 6C 65 27 0D 0A 40 20 37 2C 34 30 libelle'..@ 7,40
0001F0: 20 73 61 79 20 6C 69 62 65 6C 65 6D 0D 0A 73 74 say libelem..st
Size : 512 (Real : 512)
000000: 61 63 69 74 65 20 6E 75 6D 65 72 69 71 75 65 0D acite numerique.
000010: 0A 69 66 20 66 69 65 6C 64 3A 74 79 70 65 3D 20 .if field:type=
000020: 27 4E 27 0D 0A 20 20 73 74 6F 72 65 20 27 39 39 'N'.. store '99
000030: 39 39 39 39 39 39 39 39 39 39 39 39 39 39 39 39 9999999999999999
000040: 39 39 27 20 74 6F 20 6E 65 75 66 0D 0A 20 20 69 99' to neuf.. i
000050: 66 20 66 69 65 6C 64 3A 64 65 63 20 3D 20 30 0D f field:dec = 0.
000060: 0A 20 20 73 74 6F 72 65 20 66 69 65 6C 64 3A 6C . store field:l
000070: 65 6E 20 74 6F 20 6E 62 65 6E 74 0D 0A 20 20 65 en to nbent.. e
000080: 6C 73 65 0D 0A 20 20 73 74 6F 72 65 20 66 69 65 lse.. store fie
000090: 6C 64 3A 6C 65 6E 2D 66 69 65 6C 64 3A 64 65 63 ld:len-field:dec
0000A0: 2D 31 20 74 6F 20 6E 62 65 6E 74 0D 0A 20 20 65 -1 to nbent.. e
0000B0: 6E 64 69 66 0D 0A 20 20 69 66 20 66 69 65 6C 64 ndif.. if field
0000C0: 3A 64 65 63 20 3D 20 30 0D 0A 20 20 73 74 6F 72 :dec = 0.. stor
0000D0: 65 20 24 28 6E 65 75 66 2C 31 2C 6E 62 65 6E 74 e $(neuf,1,nbent
0000E0: 29 20 74 6F 20 6D 61 78 70 6F 73 0D 0A 20 20 69 ) to maxpos.. i
0000F0: 66 20 6E 62 65 6E 74 20 3D 20 31 0D 0A 20 20 73 f nbent = 1.. s
000100: 74 6F 72 65 20 27 30 27 20 74 6F 20 6D 69 6E 70 tore '0' to minp
000110: 6F 73 0D 0A 20 20 65 6C 73 65 0D 0A 20 20 73 74 os.. else.. st
000120: 6F 72 65 20 27 2D 27 2D 24 28 6E 65 75 66 2C 31 ore '-'-$(neuf,1
000130: 2C 6E 62 65 6E 74 2D 31 29 20 74 6F 20 6D 69 6E ,nbent-1) to min
000140: 70 6F 73 0D 0A 20 20 65 6E 64 69 66 0D 0A 20 20 pos.. endif..
000150: 65 6C 73 65 0D 0A 20 20 73 74 6F 72 65 20 24 28 else.. store $(
000160: 6E 65 75 66 2C 31 2C 6E 62 65 6E 74 29 2D 27 2E neuf,1,nbent)-'.
000170: 27 2D 24 28 6E 65 75 66 2C 31 2C 66 69 65 6C 64 '-$(neuf,1,field
000180: 3A 64 65 63 29 20 74 6F 20 6D 61 78 70 6F 73 0D :dec) to maxpos.
000190: 0A 20 20 69 66 20 6E 62 65 6E 74 20 3D 20 31 0D . if nbent = 1.
0001A0: 0A 20 20 73 74 6F 72 65 20 27 2D 2E 27 2D 24 28 . store '-.'-$(
0001B0: 6E 65 75 66 2C 31 2C 66 69 65 6C 64 3A 64 65 63 neuf,1,field:dec
0001C0: 29 20 74 6F 20 6D 69 6E 70 6F 73 0D 0A 20 20 65 ) to minpos.. e
0001D0: 6C 73 65 0D 0A 20 20 73 74 6F 72 65 20 27 2D 27 lse.. store '-'
0001E0: 2D 24 28 6E 65 75 66 2C 31 2C 6E 62 65 6E 74 2D -$(neuf,1,nbent-
0001F0: 31 29 2D 27 2E 27 2D 24 28 6E 65 75 66 2C 31 2C 1)-'.'-$(neuf,1,
Size : 512 (Real : 512)
000000: 6F 72 65 20 24 28 6D 6E 6F 6D 2C 32 2C 38 29 20 ore $(mnom,2,8)
000010: 74 6F 20 6D 6E 6F 6D 0D 0A 69 66 20 65 6C 65 6D to mnom..if elem
000020: 3D 27 4C 27 0D 0A 20 20 20 73 74 6F 72 65 20 75 ='L'.. store u
000030: 6E 69 74 2D 6D 6E 6F 6D 2D 27 2E 66 72 6D 27 20 nit-mnom-'.frm'
000040: 74 6F 20 6D 6E 6F 6D 0D 0A 65 6C 73 65 0D 0A 20 to mnom..else..
000050: 20 20 40 20 39 2C 31 30 20 73 61 79 20 27 5A 4F @ 9,10 say 'ZO
000060: 4E 45 20 31 3A 20 20 27 2B 7A 6F 6E 31 2B 27 20 NE 1: '+zon1+'
000070: 20 20 64 65 20 20 20 27 2B 64 65 62 31 2B 27 20 de '+deb1+'
000080: 20 20 61 20 20 20 27 2B 66 69 6E 31 0D 0A 20 20 a '+fin1..
000090: 20 40 20 31 30 2C 31 30 20 73 61 79 20 27 5A 4F @ 10,10 say 'ZO
0000A0: 4E 45 20 32 3A 20 20 27 2B 7A 6F 6E 32 2B 27 20 NE 2: '+zon2+'
0000B0: 20 20 64 65 20 20 20 27 2B 64 65 62 32 2B 27 20 de '+deb2+'
0000C0: 20 20 61 20 20 20 27 2B 66 69 6E 32 0D 0A 20 20 a '+fin2..
0000D0: 20 40 20 31 31 2C 31 30 20 73 61 79 20 27 5A 4F @ 11,10 say 'ZO
0000E0: 4E 45 20 33 3A 20 20 27 2B 7A 6F 6E 33 2B 27 20 NE 3: '+zon3+'
0000F0: 20 20 64 65 20 20 20 27 2B 64 65 62 33 2B 27 20 de '+deb3+'
000100: 20 20 61 20 20 20 27 2B 66 69 6E 33 0D 0A 20 20 a '+fin3..
000110: 20 40 20 31 31 2C 31 30 20 73 61 79 20 27 5A 4F @ 11,10 say 'ZO
000120: 4E 45 20 34 3A 20 20 27 2B 7A 6F 6E 34 2B 27 20 NE 4: '+zon4+'
000130: 20 20 64 65 20 20 20 27 2B 64 65 62 34 2B 27 20 de '+deb4+'
000140: 20 20 61 20 20 20 27 2B 66 69 6E 34 0D 0A 20 20 a '+fin4..
000150: 20 40 20 31 32 2C 31 30 20 73 61 79 20 27 5A 4F @ 12,10 say 'ZO
000160: 4E 45 20 35 3A 20 20 27 2B 7A 6F 6E 35 2B 27 20 NE 5: '+zon5+'
000170: 20 20 64 65 20 20 20 27 2B 64 65 62 35 2B 27 20 de '+deb5+'
000180: 20 20 61 20 20 20 27 2B 66 69 6E 35 0D 0A 20 20 a '+fin5..
000190: 20 73 74 6F 72 65 20 75 6E 69 74 2D 6D 6E 6F 6D store unit-mnom
0001A0: 2D 27 2E 6E 64 78 27 20 74 6F 20 6D 6E 6F 6D 0D -'.ndx' to mnom.
0001B0: 0A 65 6E 64 69 66 0D 0A 2A 20 64 65 6D 61 6E 64 .endif..* demand
0001C0: 65 20 64 65 20 63 6F 6E 66 69 72 6D 61 74 69 6F e de confirmatio
0001D0: 6E 0D 0A 64 6F 20 63 6F 6E 66 73 75 70 0D 0A 69 n..do confsup..i
0001E0: 66 20 21 28 63 6F 6E 66 69 72 6D 29 3D 27 4E 27 f !(confirm)='N'
0001F0: 0D 0A 20 20 20 72 65 6C 65 61 73 65 20 63 6F 6E .. release con
Size : 512 (Real : 512)
000000: 66 69 65 6C 64 3A 64 65 63 29 20 74 6F 20 6D 69 field:dec) to mi
000010: 6E 70 6F 73 0D 0A 20 20 65 6E 64 69 66 0D 0A 20 npos.. endif..
000020: 20 65 6E 64 69 66 0D 0A 20 20 69 66 20 26 6D 7A endif.. if &mz
000030: 6F 6E 3C 26 6D 69 6E 70 6F 73 2E 6F 72 2E 26 6D on<&minpos.or.&m
000040: 7A 6F 6E 3E 26 6D 61 78 70 6F 73 0D 0A 20 20 73 zon>&maxpos.. s
000050: 74 6F 72 65 20 31 33 33 20 74 6F 20 6E 6F 6D 65 tore 133 to nome
000060: 73 73 0D 0A 20 20 73 74 6F 72 65 20 30 20 74 6F ss.. store 0 to
000070: 20 26 6D 7A 6F 6E 0D 0A 20 20 65 6E 64 69 66 0D &mzon.. endif.
000080: 0A 20 20 72 65 6C 65 61 73 65 20 6E 65 75 66 2C . release neuf,
000090: 6D 69 6E 70 6F 73 2C 6D 61 78 70 6F 73 2C 6E 62 minpos,maxpos,nb
0000A0: 65 6E 74 0D 0A 65 6E 64 69 66 0D 0A 69 66 20 6E ent..endif..if n
0000B0: 6F 6D 65 73 73 3D 30 0D 0A 20 20 69 66 20 76 65 omess=0.. if ve
0000C0: 72 69 66 23 22 4E 41 22 0D 0A 20 20 20 20 73 74 rif#"NA".. st
0000D0: 6F 72 65 20 27 66 27 20 74 6F 20 7A 6F 6E 65 76 ore 'f' to zonev
0000E0: 69 64 65 0D 0A 20 20 20 20 64 6F 20 63 61 73 65 ide.. do case
0000F0: 0D 0A 20 20 20 20 63 61 73 65 20 66 69 65 6C 64 .. case field
000100: 3A 74 79 70 65 3D 27 43 27 0D 0A 20 20 20 20 69 :type='C'.. i
000110: 66 20 26 6D 7A 6F 6E 3D 27 30 30 2F 30 30 2F 30 f &mzon='00/00/0
000120: 30 27 2E 61 6E 64 2E 76 65 72 32 3D 27 44 27 2E 0'.and.ver2='D'.
000130: 6F 72 2E 26 6D 7A 6F 6E 3D 27 30 30 2F 30 30 27 or.&mzon='00/00'
000140: 2E 61 6E 64 2E 76 65 72 32 3D 27 4D 27 2E 6F 72 .and.ver2='M'.or
000150: 2E 26 6D 7A 6F 6E 3D 3B 0D 0A 20 20 20 20 27 20 .&mzon=;.. '
000160: 27 2E 61 6E 64 2E 76 65 72 32 23 27 44 27 2E 61 '.and.ver2#'D'.a
000170: 6E 64 2E 76 65 72 32 23 27 4D 27 0D 0A 20 20 20 nd.ver2#'M'..
000180: 20 73 74 6F 72 65 20 27 74 27 20 74 6F 20 7A 6F store 't' to zo
000190: 6E 65 76 69 64 65 0D 0A 20 20 20 20 65 6E 64 69 nevide.. endi
0001A0: 66 0D 0A 20 20 20 20 63 61 73 65 20 66 69 65 6C f.. case fiel
0001B0: 64 3A 74 79 70 65 3D 27 4E 27 0D 0A 20 20 20 20 d:type='N'..
0001C0: 69 66 20 26 6D 7A 6F 6E 3D 30 0D 0A 20 20 20 20 if &mzon=0..
0001D0: 73 74 6F 72 65 20 27 74 27 20 74 6F 20 7A 6F 6E store 't' to zon
0001E0: 65 76 69 64 65 0D 0A 20 20 20 20 65 6E 64 69 66 evide.. endif
0001F0: 0D 0A 20 20 20 20 65 6E 64 63 61 73 65 0D 0A 20 .. endcase..
Size : 512 (Real : 512)
000000: 66 69 72 6D 2C 71 75 65 73 74 2C 6D 6E 6F 6D 2C firm,quest,mnom,
000010: 65 6C 65 6D 0D 0A 20 20 20 75 73 65 0D 0A 20 20 elem.. use..
000020: 20 72 65 74 75 72 6E 0D 0A 65 6E 64 69 66 0D 0A return..endif..
000030: 73 74 6F 72 65 20 27 22 27 2D 6D 6E 6F 6D 2D 27 store '"'-mnom-'
000040: 22 27 20 74 6F 20 6E 6F 6D 7A 0D 0A 69 66 20 66 "' to nomz..if f
000050: 69 6C 65 28 26 6E 6F 6D 7A 29 0D 0A 20 20 20 64 ile(&nomz).. d
000060: 65 6C 65 20 66 69 6C 65 20 26 6D 6E 6F 6D 0D 0A ele file &mnom..
000070: 65 6C 73 65 0D 0A 20 20 20 3F 20 22 6C 65 20 66 else.. ? "le f
000080: 69 63 68 69 65 72 20 22 2B 24 28 6D 6E 6F 6D 2C ichier "+$(mnom,
000090: 33 2C 31 32 29 2B 22 20 6E 27 65 78 69 73 74 65 3,12)+" n'existe
0000A0: 20 70 61 73 20 73 75 72 20 6C 27 75 6E 69 74 65 pas sur l'unite
0000B0: 20 22 2B 75 6E 69 74 0D 0A 20 20 20 3F 0D 0A 65 "+unit.. ?..e
0000C0: 6E 64 69 66 0D 0A 2A 20 64 65 73 74 72 75 63 74 ndif..* destruct
0000D0: 69 6F 6E 20 64 65 20 6C 61 20 6C 69 73 74 65 20 ion de la liste
0000E0: 6F 75 20 64 65 20 6C 61 20 63 6C 65 20 64 61 6E ou de la cle dan
0000F0: 73 20 6C 65 20 66 69 63 68 69 65 72 20 64 65 73 s le fichier des
000100: 20 6C 69 73 74 65 73 20 6F 75 20 64 65 73 20 63 listes ou des c
000110: 6C 65 73 0D 0A 64 65 6C 65 74 65 0D 0A 70 61 63 les..delete..pac
000120: 6B 0D 0A 72 65 6C 65 61 73 65 20 6E 6F 6D 7A 2C k..release nomz,
000130: 6D 6E 6F 6D 2C 63 6F 6E 66 69 72 6D 2C 71 75 65 mnom,confirm,que
000140: 73 74 2C 65 6C 65 6D 0D 0A 75 73 65 0D 0A 72 65 st,elem..use..re
000150: 74 75 72 6E 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 1A 1A turn............
000160: 6C 20 74 72 61 69 74 65 6D 65 6E 74 20 76 6F 75 l traitement vou
000170: 6C 65 7A 2D 76 6F 75 73 20 65 66 66 65 63 74 75 lez-vous effectu
000180: 65 72 20 3F 20 27 0D 0A 20 20 20 40 20 31 38 2C er ? '.. @ 18,
000190: 35 35 20 53 41 59 20 22 49 20 52 65 70 6F 6E 73 55 SAY "I Repons
0001A0: 65 20 2D 2D 3E 20 20 20 20 20 20 20 20 20 20 49 e --> I
0001B0: 22 0D 0A 20 20 20 40 20 31 39 2C 35 35 20 53 41 ".. @ 19,55 SA
0001C0: 59 20 22 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D Y "+------------
0001D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 20 20 ----------+"..
0001E0: 20 63 6C 65 61 72 20 67 65 74 0D 0A 20 20 20 73 clear get.. s
0001F0: 65 74 20 69 6E 74 65 6E 73 69 74 79 20 6F 66 66 et intensity off
Size : 512 (Real : 512)
000000: 20 20 20 69 66 20 76 65 72 31 23 27 4E 27 0D 0A if ver1#'N'..
000010: 20 20 20 20 20 20 2A 20 74 65 73 74 65 72 20 6C * tester l
000020: 65 20 70 72 65 6D 69 65 72 20 63 6F 64 65 0D 0A e premier code..
000030: 20 20 20 20 20 20 64 6F 20 63 61 73 65 0D 0A 20 do case..
000040: 20 20 20 20 20 63 61 73 65 20 76 65 72 31 3D 27 case ver1='
000050: 4F 27 2E 61 6E 64 2E 7A 6F 6E 65 76 69 64 65 3D O'.and.zonevide=
000060: 27 74 27 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 't'.. store
000070: 20 31 33 35 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 135 to nomess..
000080: 20 20 20 20 20 20 63 61 73 65 20 76 65 72 31 3D case ver1=
000090: 27 43 27 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 'C'.. store
0000A0: 20 76 61 6C 31 20 74 6F 20 6E 6F 6D 7A 0D 0A 20 val1 to nomz..
0000B0: 20 20 20 20 20 73 65 74 20 69 6E 64 65 78 20 74 set index t
0000C0: 6F 20 26 78 6E 6F 6D 0D 0A 20 20 20 20 20 20 66 o &xnom.. f
0000D0: 69 6E 64 20 26 6E 6F 6D 7A 0D 0A 20 20 20 20 20 ind &nomz..
0000E0: 20 73 74 6F 72 65 20 27 6D 7A 6F 6E 27 2D 73 74 store 'mzon'-st
0000F0: 72 28 6E 6F 7A 2C 31 2B 69 6E 74 28 6E 6F 7A 2F r(noz,1+int(noz/
000100: 31 30 29 2D 69 6E 74 28 6E 6F 7A 2F 32 30 29 2D 10)-int(noz/20)-
000110: 69 6E 74 28 6E 6F 7A 2F 33 30 29 29 20 74 6F 20 int(noz/30)) to
000120: 6E 6F 6D 7A 0D 0A 20 20 20 20 20 20 73 74 6F 72 nomz.. stor
000130: 65 20 27 66 27 20 74 6F 20 76 69 64 65 0D 0A 20 e 'f' to vide..
000140: 20 20 20 20 20 64 6F 20 63 61 73 65 0D 0A 20 20 do case..
000150: 20 20 20 20 63 61 73 65 20 66 69 65 6C 64 3A 74 case field:t
000160: 79 70 65 3D 27 43 27 0D 0A 20 20 20 20 20 20 69 ype='C'.. i
000170: 66 20 26 6E 6F 6D 7A 3D 27 30 30 2F 30 30 2F 30 f &nomz='00/00/0
000180: 30 27 2E 61 6E 64 2E 24 28 76 65 72 69 66 2C 32 0'.and.$(verif,2
000190: 2C 31 29 3D 27 44 27 2E 6F 72 2E 26 6E 6F 6D 7A ,1)='D'.or.&nomz
0001A0: 3D 27 30 30 2F 30 30 27 3B 0D 0A 2E 61 6E 64 2E ='00/00';...and.
0001B0: 24 28 76 65 72 69 66 2C 32 2C 31 29 3D 27 4D 27 $(verif,2,1)='M'
0001C0: 2E 6F 72 2E 26 6E 6F 6D 7A 3D 27 20 27 2E 61 6E .or.&nomz=' '.an
0001D0: 64 2E 24 28 76 65 72 69 66 2C 32 2C 31 29 23 27 d.$(verif,2,1)#'
0001E0: 44 27 2E 61 6E 64 2E 24 28 76 65 72 69 66 2C 32 D'.and.$(verif,2
0001F0: 2C 31 29 23 27 4D 27 0D 0A 20 20 20 20 20 20 73 ,1)#'M'.. s
Size : 512 (Real : 512)
000000: 20 20 20 20 20 72 65 6C 65 61 73 65 20 66 69 6E release fin
000010: 6C 69 73 74 65 2C 74 72 6F 75 76 65 2C 6C 69 73 liste,trouve,lis
000020: 74 65 2C 70 6F 73 66 69 6E 0D 0A 20 20 20 20 20 te,posfin..
000030: 20 65 6E 64 63 61 73 65 0D 0A 20 20 20 20 20 20 endcase..
000040: 69 66 20 6E 6F 6D 65 73 73 3D 30 2E 61 6E 64 2E if nomess=0.and.
000050: 28 76 65 72 32 3D 27 42 27 2E 6F 72 2E 76 65 72 (ver2='B'.or.ver
000060: 32 3D 27 44 27 2E 6F 72 2E 76 65 72 32 3D 27 4D 2='D'.or.ver2='M
000070: 27 29 0D 0A 20 20 20 20 20 20 20 20 73 74 6F 72 ').. stor
000080: 65 20 27 66 27 20 74 6F 20 70 61 73 66 69 6E 0D e 'f' to pasfin.
000090: 0A 20 20 20 20 20 20 20 20 64 6F 20 63 61 73 65 . do case
0000A0: 0D 0A 20 20 20 20 20 20 20 20 63 61 73 65 20 76 .. case v
0000B0: 65 72 32 3D 27 44 27 0D 0A 20 20 20 20 20 20 20 er2='D'..
0000C0: 20 73 74 6F 72 65 20 24 28 76 61 6C 32 2C 37 2C store $(val2,7,
0000D0: 32 29 2D 24 28 76 61 6C 32 2C 34 2C 32 29 2D 24 2)-$(val2,4,2)-$
0000E0: 28 76 61 6C 32 2C 31 2C 32 29 20 74 6F 20 76 61 (val2,1,2) to va
0000F0: 6C 65 75 72 32 0D 0A 20 20 20 20 20 20 20 20 73 leur2.. s
000100: 74 6F 72 65 20 24 28 76 61 6C 33 2C 37 2C 32 29 tore $(val3,7,2)
000110: 2D 24 28 76 61 6C 33 2C 34 2C 32 29 2D 24 28 76 -$(val3,4,2)-$(v
000120: 61 6C 33 2C 31 2C 32 29 20 74 6F 20 76 61 6C 65 al3,1,2) to vale
000130: 75 72 33 0D 0A 20 20 20 20 20 20 20 20 69 66 20 ur3.. if
000140: 76 61 6C 65 75 72 33 3D 27 30 30 30 30 30 30 27 valeur3='000000'
000150: 0D 0A 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 .. store
000160: 27 74 27 20 74 6F 20 70 61 73 66 69 6E 0D 0A 20 't' to pasfin..
000170: 20 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 endif..
000180: 20 20 20 20 20 20 63 61 73 65 20 76 65 72 32 3D case ver2=
000190: 27 4D 27 0D 0A 20 20 20 20 20 20 20 20 73 74 6F 'M'.. sto
0001A0: 72 65 20 24 28 76 61 6C 32 2C 34 2C 32 29 2D 24 re $(val2,4,2)-$
0001B0: 28 76 61 6C 32 2C 31 2C 32 29 20 74 6F 20 76 61 (val2,1,2) to va
0001C0: 6C 65 75 72 32 0D 0A 20 20 20 20 20 20 20 20 73 leur2.. s
0001D0: 74 6F 72 65 20 24 28 76 61 6C 33 2C 34 2C 32 29 tore $(val3,4,2)
0001E0: 2D 24 28 76 61 6C 33 2C 31 2C 32 29 20 74 6F 20 -$(val3,1,2) to
0001F0: 76 61 6C 65 75 72 33 0D 0A 20 20 20 20 20 20 20 valeur3..
Size : 512 (Real : 512)
000000: 74 6F 72 65 20 27 74 27 20 74 6F 20 76 69 64 65 tore 't' to vide
000010: 0D 0A 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 .. endif..
000020: 20 20 20 20 20 63 61 73 65 20 66 69 65 6C 64 3A case field:
000030: 74 79 70 65 3D 27 4E 27 0D 0A 20 20 20 20 20 20 type='N'..
000040: 69 66 20 26 6E 6F 6D 7A 3D 30 0D 0A 20 20 20 20 if &nomz=0..
000050: 20 20 73 74 6F 72 65 20 27 74 27 20 74 6F 20 76 store 't' to v
000060: 69 64 65 0D 0A 20 20 20 20 20 20 65 6E 64 69 66 ide.. endif
000070: 0D 0A 20 20 20 20 20 20 65 6E 64 63 61 73 65 0D .. endcase.
000080: 0A 20 20 20 20 20 20 67 6F 74 6F 20 6E 6F 7A 6F . goto nozo
000090: 6E 65 0D 0A 20 20 20 20 20 20 69 66 20 76 69 64 ne.. if vid
0000A0: 65 3D 27 66 27 2E 61 6E 64 2E 7A 6F 6E 65 76 69 e='f'.and.zonevi
0000B0: 64 65 3D 27 74 27 0D 0A 20 20 20 20 20 20 73 74 de='t'.. st
0000C0: 6F 72 65 20 31 33 36 20 74 6F 20 6E 6F 6D 65 73 ore 136 to nomes
0000D0: 73 0D 0A 20 20 20 20 20 20 65 6E 64 69 66 0D 0A s.. endif..
0000E0: 20 20 20 20 20 20 72 65 6C 65 61 73 65 20 6E 6F release no
0000F0: 6D 7A 2C 76 69 64 65 0D 0A 20 20 20 20 20 20 63 mz,vide.. c
000100: 61 73 65 20 76 65 72 31 3D 27 47 27 2E 6F 72 2E ase ver1='G'.or.
000110: 76 65 72 31 3D 27 50 27 0D 0A 20 20 20 20 20 20 ver1='P'..
000120: 73 74 6F 72 65 20 76 61 6C 31 20 74 6F 20 6E 6F store val1 to no
000130: 6D 7A 0D 0A 20 20 20 20 20 20 73 65 74 20 69 6E mz.. set in
000140: 64 65 78 20 74 6F 20 26 78 6E 6F 6D 0D 0A 20 20 dex to &xnom..
000150: 20 20 20 20 66 69 6E 64 20 26 6E 6F 6D 7A 0D 0A find &nomz..
000160: 20 20 20 20 20 20 73 74 6F 72 65 20 27 6D 7A 6F store 'mzo
000170: 6E 27 2D 73 74 72 28 6E 6F 7A 2C 69 6E 74 28 6E n'-str(noz,int(n
000180: 6F 7A 2F 31 30 29 2B 31 2D 69 6E 74 28 6E 6F 7A oz/10)+1-int(noz
000190: 2F 32 30 29 2D 69 6E 74 28 6E 6F 7A 2F 33 30 29 /20)-int(noz/30)
0001A0: 29 20 74 6F 20 6E 6F 6D 7A 0D 0A 20 20 20 20 20 ) to nomz..
0001B0: 20 64 6F 20 63 61 73 65 0D 0A 20 20 20 20 20 20 do case..
0001C0: 63 61 73 65 20 76 65 72 32 3D 27 44 27 0D 0A 20 case ver2='D'..
0001D0: 20 20 20 20 20 73 74 6F 72 65 20 24 28 26 6E 6F store $(&no
0001E0: 6D 7A 2C 37 2C 32 29 2D 24 28 26 6E 6F 6D 7A 2C mz,7,2)-$(&nomz,
0001F0: 34 2C 32 29 2D 24 28 26 6E 6F 6D 7A 2C 31 2C 32 4,2)-$(&nomz,1,2
Size : 512 (Real : 512)
000000: 20 69 66 20 76 61 6C 65 75 72 33 3D 27 30 30 30 if valeur3='000
000010: 30 27 0D 0A 20 20 20 20 20 20 20 20 73 74 6F 72 0'.. stor
000020: 65 20 27 74 27 20 74 6F 20 70 61 73 66 69 6E 0D e 't' to pasfin.
000030: 0A 20 20 20 20 20 20 20 20 65 6E 64 69 66 0D 0A . endif..
000040: 20 20 20 20 20 20 20 20 63 61 73 65 20 66 69 65 case fie
000050: 6C 64 3A 74 79 70 65 3D 27 43 27 0D 0A 20 20 20 ld:type='C'..
000060: 20 20 20 20 20 69 66 20 66 69 65 6C 64 3A 6C 65 if field:le
000070: 6E 20 3C 20 31 30 0D 0A 20 20 20 20 20 20 20 20 n < 10..
000080: 73 74 6F 72 65 20 24 28 76 61 6C 32 2C 31 2C 66 store $(val2,1,f
000090: 69 65 6C 64 3A 6C 65 6E 29 20 74 6F 20 76 61 6C ield:len) to val
0000A0: 65 75 72 32 0D 0A 20 20 20 20 20 20 20 20 73 74 eur2.. st
0000B0: 6F 72 65 20 24 28 76 61 6C 33 2C 31 2C 66 69 65 ore $(val3,1,fie
0000C0: 6C 64 3A 6C 65 6E 29 20 74 6F 20 76 61 6C 65 75 ld:len) to valeu
0000D0: 72 33 0D 0A 20 20 20 20 20 20 20 20 65 6C 73 65 r3.. else
0000E0: 0D 0A 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 .. store
0000F0: 24 28 76 61 6C 32 2C 31 2C 31 30 29 20 74 6F 20 $(val2,1,10) to
000100: 76 61 6C 65 75 72 32 0D 0A 20 20 20 20 20 20 20 valeur2..
000110: 20 73 74 6F 72 65 20 24 28 76 61 6C 33 2C 31 2C store $(val3,1,
000120: 31 30 29 20 74 6F 20 76 61 6C 65 75 72 33 0D 0A 10) to valeur3..
000130: 20 20 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 endif..
000140: 20 20 20 20 20 20 20 69 66 20 76 61 6C 65 75 72 if valeur
000150: 33 3D 27 20 27 0D 0A 20 20 20 20 20 20 20 20 73 3=' '.. s
000160: 74 6F 72 65 20 27 74 27 20 74 6F 20 70 61 73 66 tore 't' to pasf
000170: 69 6E 0D 0A 20 20 20 20 20 20 20 20 65 6E 64 69 in.. endi
000180: 66 0D 0A 20 20 20 20 20 20 20 20 6F 74 68 65 72 f.. other
000190: 77 69 73 65 0D 0A 20 20 20 20 20 20 20 20 73 74 wise.. st
0001A0: 6F 72 65 20 76 61 6C 28 76 61 6C 32 29 20 74 6F ore val(val2) to
0001B0: 20 76 61 6C 65 75 72 32 0D 0A 20 20 20 20 20 20 valeur2..
0001C0: 20 20 73 74 6F 72 65 20 76 61 6C 28 76 61 6C 33 store val(val3
0001D0: 29 20 74 6F 20 76 61 6C 65 75 72 33 0D 0A 20 20 ) to valeur3..
0001E0: 20 20 20 20 20 20 69 66 20 76 61 6C 65 75 72 33 if valeur3
0001F0: 3D 30 0D 0A 20 20 20 20 20 20 20 20 73 74 6F 72 =0.. stor
Size : 512 (Real : 512)
000000: 29 20 74 6F 20 76 61 6C 65 75 72 32 0D 0A 20 20 ) to valeur2..
000010: 20 20 20 20 63 61 73 65 20 76 65 72 32 3D 27 4D case ver2='M
000020: 27 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 24 '.. store $
000030: 28 26 6E 6F 6D 7A 2C 34 2C 32 29 2D 24 28 26 6E (&nomz,4,2)-$(&n
000040: 6F 6D 7A 2C 31 2C 32 29 20 74 6F 20 76 61 6C 65 omz,1,2) to vale
000050: 75 72 32 0D 0A 20 20 20 20 20 20 6F 74 68 65 72 ur2.. other
000060: 77 69 73 65 0D 0A 20 20 20 20 20 20 73 74 6F 72 wise.. stor
000070: 65 20 26 6E 6F 6D 7A 20 74 6F 20 76 61 6C 65 75 e &nomz to valeu
000080: 72 32 0D 0A 20 20 20 20 20 20 65 6E 64 63 61 73 r2.. endcas
000090: 65 0D 0A 20 20 20 20 20 20 67 6F 74 6F 20 6E 6F e.. goto no
0000A0: 7A 6F 6E 65 0D 0A 20 20 20 20 20 20 69 66 20 76 zone.. if v
0000B0: 61 6C 65 75 72 31 20 3C 20 76 61 6C 65 75 72 32 aleur1 < valeur2
0000C0: 2E 61 6E 64 2E 76 65 72 31 3D 27 47 27 0D 0A 20 .and.ver1='G'..
0000D0: 20 20 20 20 20 73 74 6F 72 65 20 31 33 37 20 74 store 137 t
0000E0: 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 20 20 20 o nomess..
0000F0: 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 69 66 20 endif.. if
000100: 76 61 6C 65 75 72 31 20 3E 20 76 61 6C 65 75 72 valeur1 > valeur
000110: 32 2E 61 6E 64 2E 76 65 72 31 3D 27 50 27 0D 0A 2.and.ver1='P'..
000120: 20 20 20 20 20 20 73 74 6F 72 65 20 31 33 38 20 store 138
000130: 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 20 20 to nomess..
000140: 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 72 65 endif.. re
000150: 6C 65 61 73 65 20 6E 6F 6D 7A 2C 76 61 6C 65 75 lease nomz,valeu
000160: 72 32 0D 0A 20 20 20 20 20 20 65 6E 64 63 61 73 r2.. endcas
000170: 65 0D 0A 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 e.. endif..
000180: 20 20 69 66 20 6E 6F 6D 65 73 73 20 3D 20 30 2E if nomess = 0.
000190: 61 6E 64 2E 7A 6F 6E 65 76 69 64 65 3D 27 66 27 and.zonevide='f'
0001A0: 2E 61 6E 64 2E 76 65 72 32 23 27 41 27 0D 0A 20 .and.ver2#'A'..
0001B0: 20 20 20 20 20 64 6F 20 63 61 73 65 0D 0A 20 20 do case..
0001C0: 20 20 20 20 63 61 73 65 20 76 65 72 32 3D 27 44 case ver2='D
0001D0: 27 2E 6F 72 2E 76 65 72 32 3D 27 4D 27 0D 0A 20 '.or.ver2='M'..
0001E0: 20 20 20 20 20 69 66 20 28 26 6D 7A 6F 6E 20 23 if (&mzon #
0001F0: 20 27 30 30 2F 30 30 2F 30 30 27 2E 61 6E 64 2E '00/00/00'.and.
Size : 512 (Real : 512)
000000: 65 20 27 74 27 20 74 6F 20 70 61 73 66 69 6E 0D e 't' to pasfin.
000010: 0A 20 20 20 20 20 20 20 20 65 6E 64 69 66 0D 0A . endif..
000020: 20 20 20 20 20 20 20 20 65 6E 64 63 61 73 65 0D endcase.
000030: 0A 20 20 20 20 20 20 20 20 69 66 20 76 61 6C 65 . if vale
000040: 75 72 31 20 3C 20 76 61 6C 65 75 72 32 20 2E 6F ur1 < valeur2 .o
000050: 72 2E 20 28 76 61 6C 65 75 72 31 20 3E 20 76 61 r. (valeur1 > va
000060: 6C 65 75 72 33 3B 0D 0A 20 20 20 20 20 20 20 20 leur3;..
000070: 2E 61 6E 64 2E 70 61 73 66 69 6E 3D 27 66 27 29 .and.pasfin='f')
000080: 0D 0A 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 .. store
000090: 31 33 39 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 139 to nomess..
0000A0: 20 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 endif..
0000B0: 20 20 20 20 20 20 72 65 6C 65 61 73 65 20 76 61 release va
0000C0: 6C 65 75 72 32 2C 76 61 6C 65 75 72 33 2C 70 61 leur2,valeur3,pa
0000D0: 73 66 69 6E 0D 0A 20 20 20 20 20 20 65 6E 64 69 sfin.. endi
0000E0: 66 0D 0A 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 f.. endif..
0000F0: 65 6E 64 69 66 0D 0A 65 6E 64 69 66 0D 0A 73 74 endif..endif..st
000100: 6F 72 65 20 63 70 74 2B 31 20 74 6F 20 63 70 74 ore cpt+1 to cpt
000110: 0D 0A 65 6E 64 69 66 0D 0A 65 6E 64 64 6F 0D 0A ..endif..enddo..
000120: 40 20 6C 69 67 6D 31 2C 30 0D 0A 72 65 6C 65 61 @ ligm1,0..relea
000130: 73 65 20 7A 6F 6E 65 76 69 64 65 2C 76 31 2C 76 se zonevide,v1,v
000140: 32 2C 63 70 74 2C 6E 6F 7A 6F 6E 65 2C 76 65 72 2,cpt,nozone,ver
000150: 31 2C 76 65 72 32 2C 76 61 6C 65 75 72 31 0D 0A 1,ver2,valeur1..
000160: 72 65 74 75 72 6E 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A return..........
000170: 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A ................
000180: 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 1A 1A 0D 0A 0D 0A ................
000190: 0D 0A 1A 1A 69 66 0D 0A 20 20 20 20 20 20 65 6E ....if.. en
0001A0: 64 69 66 0D 0A 20 20 20 20 20 20 65 6E 64 64 6F dif.. enddo
0001B0: 0D 0A 20 20 20 20 20 20 69 66 20 74 72 6F 75 76 .. if trouv
0001C0: 65 3D 27 66 27 0D 0A 20 20 20 20 20 20 73 74 6F e='f'.. sto
0001D0: 72 65 20 31 34 30 20 74 6F 20 6E 6F 6D 65 73 73 re 140 to nomess
0001E0: 0D 0A 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 .. endif..
0001F0: 20 20 20 20 20 72 65 6C 65 61 73 65 20 66 69 6E release fin
Size : 512 (Real : 512)
000000: 6C 65 6E 28 26 6D 7A 6F 6E 29 3D 38 29 2E 6F 72 len(&mzon)=8).or
000010: 2E 28 26 6D 7A 6F 6E 23 27 30 30 2F 30 30 27 3B .(&mzon#'00/00';
000020: 0D 0A 20 20 20 20 20 20 2E 61 6E 64 2E 6C 65 6E .. .and.len
000030: 28 26 6D 7A 6F 6E 29 3D 35 29 0D 0A 20 20 20 20 (&mzon)=5)..
000040: 20 20 73 74 6F 72 65 20 76 61 6C 28 24 28 26 6D store val($(&m
000050: 7A 6F 6E 2C 31 2C 32 29 29 20 74 6F 20 6A 0D 0A zon,1,2)) to j..
000060: 20 20 20 20 20 20 73 74 6F 72 65 20 76 61 6C 28 store val(
000070: 24 28 26 6D 7A 6F 6E 2C 34 2C 32 29 29 20 74 6F $(&mzon,4,2)) to
000080: 20 6D 0D 0A 20 20 20 20 20 20 69 66 20 6C 65 6E m.. if len
000090: 28 26 6D 7A 6F 6E 29 3D 38 0D 0A 20 20 20 20 20 (&mzon)=8..
0000A0: 20 73 74 6F 72 65 20 76 61 6C 28 24 28 26 6D 7A store val($(&mz
0000B0: 6F 6E 2C 37 2C 32 29 29 20 74 6F 20 61 6E 0D 0A on,7,2)) to an..
0000C0: 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 else..
0000D0: 20 20 73 74 6F 72 65 20 30 20 74 6F 20 61 6E 0D store 0 to an.
0000E0: 0A 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 . endif..
0000F0: 20 20 20 20 69 66 20 6D 3C 31 2E 6F 72 2E 6D 3E if m<1.or.m>
000100: 31 32 2E 6F 72 2E 6A 3C 31 2E 6F 72 2E 6A 3E 33 12.or.j<1.or.j>3
000110: 31 2E 6F 72 2E 28 6D 3D 34 2E 6F 72 2E 6D 3D 36 1.or.(m=4.or.m=6
000120: 2E 6F 72 2E 6D 3D 39 2E 6F 72 2E 3B 0D 0A 6D 3D .or.m=9.or.;..m=
000130: 31 31 29 2E 61 6E 64 2E 6A 3E 33 30 2E 6F 72 2E 11).and.j>30.or.
000140: 6D 3D 32 2E 61 6E 64 2E 6A 3E 32 39 2E 6F 72 2E m=2.and.j>29.or.
000150: 28 61 6E 2F 34 29 23 69 6E 74 28 61 6E 2F 34 29 (an/4)#int(an/4)
000160: 2E 61 6E 64 2E 6D 3D 32 2E 61 6E 64 2E 6A 3E 32 .and.m=2.and.j>2
000170: 38 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 31 8.. store 1
000180: 30 32 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 02 to nomess..
000190: 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 endif..
0001A0: 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 72 65 endif.. re
0001B0: 6C 65 61 73 65 20 6A 2C 6D 2C 61 6E 0D 0A 20 20 lease j,m,an..
0001C0: 20 20 20 20 63 61 73 65 20 76 65 72 32 3D 27 4C case ver2='L
0001D0: 27 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 27 '.. store '
0001E0: 66 27 20 74 6F 20 66 69 6E 6C 69 73 74 65 0D 0A f' to finliste..
0001F0: 20 20 20 20 20 20 73 74 6F 72 65 20 27 66 27 20 store 'f'
Size : 512 (Real : 512)
000000: 2A 20 70 69 63 74 75 72 65 20 3A 20 70 72 65 70 * picture : prep
000010: 61 72 65 72 20 6C 65 20 70 69 63 74 75 72 65 20 arer le picture
000020: 64 65 20 6C 61 20 7A 6F 6E 65 20 61 20 73 61 69 de la zone a sai
000030: 73 69 72 0D 0A 2A 20 72 65 6E 64 20 65 6E 20 73 sir..* rend en s
000040: 6F 72 74 69 65 20 6C 65 20 70 69 63 74 75 72 65 ortie le picture
000050: 20 64 61 6E 73 20 6C 61 20 76 61 72 69 61 62 6C dans la variabl
000060: 65 20 70 69 63 0D 0A 2A 20 6C 27 65 6E 72 65 67 e pic..* l'enreg
000070: 69 73 74 72 65 6D 65 6E 74 20 64 65 20 66 72 65 istrement de fre
000080: 66 20 63 6F 72 72 65 73 70 6F 6E 64 61 6E 74 20 f correspondant
000090: 61 20 6C 61 20 7A 6F 6E 65 20 61 20 65 74 65 20 a la zone a ete
0000A0: 6C 75 20 61 76 61 6E 74 20 6C 27 61 70 70 65 6C lu avant l'appel
0000B0: 20 61 20 63 65 0D 0A 2A 20 70 72 6F 67 72 61 6D a ce..* program
0000C0: 6D 65 0D 0A 0D 0A 73 74 6F 72 65 20 27 39 39 39 me....store '999
0000D0: 39 39 39 39 39 39 39 39 39 39 39 39 39 39 39 39 9999999999999999
0000E0: 39 27 20 74 6F 20 6E 65 75 66 0D 0A 64 6F 20 63 9' to neuf..do c
0000F0: 61 73 65 0D 0A 20 20 20 63 61 73 65 20 66 69 65 ase.. case fie
000100: 6C 64 3A 74 79 70 65 3D 20 27 4E 27 0D 0A 20 20 ld:type= 'N'..
000110: 20 69 66 20 66 69 65 6C 64 3A 64 65 63 3D 30 0D if field:dec=0.
000120: 0A 20 20 20 20 20 20 73 74 6F 72 65 20 66 69 65 . store fie
000130: 6C 64 3A 6C 65 6E 20 74 6F 20 6E 62 65 6E 74 0D ld:len to nbent.
000140: 0A 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 . else..
000150: 73 74 6F 72 65 20 66 69 65 6C 64 3A 6C 65 6E 2D store field:len-
000160: 66 69 65 6C 64 3A 64 65 63 2D 31 20 74 6F 20 6E field:dec-1 to n
000170: 62 65 6E 74 0D 0A 20 20 20 65 6E 64 69 66 0D 0A bent.. endif..
000180: 20 20 20 69 66 20 66 69 65 6C 64 3A 64 65 63 20 if field:dec
000190: 3D 20 30 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 = 0.. store
0001A0: 20 22 70 69 63 74 75 72 65 20 27 22 2D 24 28 6E "picture '"-$(n
0001B0: 65 75 66 2C 31 2C 6E 62 65 6E 74 29 2D 22 27 22 euf,1,nbent)-"'"
0001C0: 20 74 6F 20 70 69 63 0D 0A 20 20 20 65 6C 73 65 to pic.. else
0001D0: 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 22 70 .. store "p
0001E0: 69 63 74 75 72 65 20 27 22 2D 24 28 6E 65 75 66 icture '"-$(neuf
0001F0: 2C 31 2C 6E 62 65 6E 74 29 2D 22 2E 22 2D 24 28 ,1,nbent)-"."-$(
Size : 512 (Real : 512)
000000: 74 6F 20 74 72 6F 75 76 65 0D 0A 20 20 20 20 20 to trouve..
000010: 20 73 74 6F 72 65 20 74 72 69 6D 28 76 61 6C 32 store trim(val2
000020: 29 20 74 6F 20 6C 69 73 74 65 0D 0A 20 20 20 20 ) to liste..
000030: 20 20 64 6F 20 77 68 69 6C 65 20 66 69 6E 6C 69 do while finli
000040: 73 74 65 3D 27 66 27 2E 61 6E 64 2E 74 72 6F 75 ste='f'.and.trou
000050: 76 65 3D 27 66 27 0D 0A 20 20 20 20 20 20 73 74 ve='f'.. st
000060: 6F 72 65 20 40 28 27 2C 27 2C 6C 69 73 74 65 29 ore @(',',liste)
000070: 2D 31 20 74 6F 20 70 6F 73 66 69 6E 0D 0A 20 20 -1 to posfin..
000080: 20 20 20 20 69 66 20 70 6F 73 66 69 6E 20 3C 20 if posfin <
000090: 30 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 33 0.. store 3
0000A0: 30 20 74 6F 20 70 6F 73 66 69 6E 0D 0A 20 20 20 0 to posfin..
0000B0: 20 20 20 73 74 6F 72 65 20 27 74 27 20 74 6F 20 store 't' to
0000C0: 66 69 6E 6C 69 73 74 65 0D 0A 20 20 20 20 20 20 finliste..
0000D0: 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 69 66 20 endif.. if
0000E0: 76 61 6C 65 75 72 31 3D 24 28 6C 69 73 74 65 2C valeur1=$(liste,
0000F0: 31 2C 70 6F 73 66 69 6E 29 2E 61 6E 64 2E 6C 65 1,posfin).and.le
000100: 6E 28 74 72 69 6D 28 76 61 6C 65 75 72 31 29 29 n(trim(valeur1))
000110: 3D 6C 65 6E 28 24 28 6C 69 73 74 65 2C 31 3B 0D =len($(liste,1;.
000120: 0A 20 20 20 20 20 20 2C 70 6F 73 66 69 6E 29 29 . ,posfin))
000130: 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 27 74 .. store 't
000140: 27 20 74 6F 20 74 72 6F 75 76 65 0D 0A 20 20 20 ' to trouve..
000150: 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 69 else.. i
000160: 66 20 66 69 6E 6C 69 73 74 65 3D 27 66 27 0D 0A f finliste='f'..
000170: 20 20 20 20 20 20 73 74 6F 72 65 20 24 28 6C 69 store $(li
000180: 73 74 65 2C 70 6F 73 66 69 6E 2B 32 2C 33 30 29 ste,posfin+2,30)
000190: 20 74 6F 20 6C 69 73 74 65 0D 0A 20 20 20 20 20 to liste..
0001A0: 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 65 6E endif.. en
0001B0: 64 69 66 0D 0A 20 20 20 20 20 20 65 6E 64 64 6F dif.. enddo
0001C0: 0D 0A 20 20 20 20 20 20 69 66 20 74 72 6F 75 76 .. if trouv
0001D0: 65 3D 27 66 27 0D 0A 20 20 20 20 20 20 73 74 6F e='f'.. sto
0001E0: 72 65 20 31 34 30 20 74 6F 20 6E 6F 6D 65 73 73 re 140 to nomess
0001F0: 0D 0A 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 .. endif..
Size : 512 (Real : 512)
000000: 6E 65 75 66 2C 31 2C 66 69 65 6C 64 3A 64 65 63 neuf,1,field:dec
000010: 29 2D 22 27 22 20 74 6F 20 70 69 63 0D 0A 20 20 )-"'" to pic..
000020: 20 65 6E 64 69 66 0D 0A 20 20 20 72 65 6C 65 61 endif.. relea
000030: 73 65 20 6E 62 65 6E 74 0D 0A 20 20 20 63 61 73 se nbent.. cas
000040: 65 20 24 28 76 65 72 69 66 2C 32 2C 31 29 3D 27 e $(verif,2,1)='
000050: 44 27 0D 0A 20 20 20 73 74 6F 72 65 20 22 20 70 D'.. store " p
000060: 69 63 74 75 72 65 20 27 39 39 2F 39 39 2F 39 39 icture '99/99/99
000070: 27 22 20 74 6F 20 70 69 63 0D 0A 20 20 20 63 61 '" to pic.. ca
000080: 73 65 20 24 28 76 65 72 69 66 2C 32 2C 31 29 3D se $(verif,2,1)=
000090: 27 4D 27 0D 0A 20 20 20 73 74 6F 72 65 20 22 20 'M'.. store "
0000A0: 70 69 63 74 75 72 65 20 27 39 39 2F 39 39 27 22 picture '99/99'"
0000B0: 20 74 6F 20 70 69 63 0D 0A 20 20 20 6F 74 68 65 to pic.. othe
0000C0: 72 77 69 73 65 0D 0A 20 20 20 73 74 6F 72 65 20 rwise.. store
0000D0: 27 20 27 20 74 6F 20 70 69 63 0D 0A 65 6E 64 63 ' ' to pic..endc
0000E0: 61 73 65 0D 0A 72 65 6C 65 61 73 65 20 6E 65 75 ase..release neu
0000F0: 66 0D 0A 72 65 74 75 72 6E 0D 0A 0D 0A 0D 0A 0D f..return.......
000100: 0A 0D 0A 0D 0A 1A 1A 20 53 41 59 20 22 49 20 52 ....... SAY "I R
000110: 65 70 6F 6E 73 65 20 2D 2D 3E 20 20 20 20 20 20 eponse -->
000120: 20 20 20 20 49 22 0D 0A 20 20 20 20 20 20 40 20 I".. @
000130: 31 39 2C 34 35 20 53 41 59 20 22 2B 2D 2D 2D 2D 19,45 SAY "+----
000140: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
000150: 2D 2D 2B 22 0D 0A 20 20 20 20 20 20 63 6C 65 61 --+".. clea
000160: 72 20 67 65 74 0D 0A 20 20 20 20 20 20 73 65 74 r get.. set
000170: 20 69 6E 74 65 6E 73 69 74 79 20 6F 66 66 0D 0A intensity off..
000180: 20 20 20 20 20 20 40 20 31 38 2C 35 39 20 67 65 @ 18,59 ge
000190: 74 20 72 65 70 0D 0A 20 20 20 20 20 20 73 65 74 t rep.. set
0001A0: 20 69 6E 74 65 6E 73 69 74 79 20 6F 6E 0D 0A 20 intensity on..
0001B0: 20 20 20 20 20 72 65 61 64 0D 0A 20 20 20 20 20 read..
0001C0: 20 73 74 6F 72 65 20 21 28 72 65 70 29 20 74 6F store !(rep) to
0001D0: 20 72 65 70 0D 0A 20 20 20 65 6C 73 65 0D 0A 20 rep.. else..
0001E0: 20 20 20 20 20 73 74 6F 72 65 20 27 31 27 20 74 store '1' t
0001F0: 6F 20 72 65 70 0D 0A 20 20 20 65 6E 64 69 66 0D o rep.. endif.
Size : 512 (Real : 512)
000000: 2A 20 61 66 66 6D 65 73 73 3A 20 61 66 66 69 63 * affmess: affic
000010: 68 61 67 65 20 64 27 75 6E 20 6D 65 73 73 61 67 hage d'un messag
000020: 65 0D 0A 2A 20 70 61 72 61 6D 65 74 72 65 20 64 e..* parametre d
000030: 27 65 6E 74 72 65 65 3A 20 6E 6F 6D 65 73 73 20 'entree: nomess
000040: 3B 20 20 20 6E 6F 6D 65 73 73 3D 20 6E 6F 20 64 ; nomess= no d
000050: 75 20 6D 65 73 73 61 67 65 0D 0A 40 20 6C 69 67 u message..@ lig
000060: 6D 31 2C 30 0D 0A 69 66 20 6E 6F 6D 65 73 73 20 m1,0..if nomess
000070: 3E 20 31 30 30 0D 0A 20 20 73 74 6F 72 65 20 74 > 100.. store t
000080: 65 78 74 65 2B 27 3A 27 20 74 6F 20 6D 65 73 73 exte+':' to mess
000090: 0D 0A 20 20 73 74 6F 72 65 20 6E 6F 6D 65 73 73 .. store nomess
0000A0: 2D 31 30 30 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A -100 to nomess..
0000B0: 65 6C 73 65 0D 0A 20 20 73 74 6F 72 65 20 27 20 else.. store '
0000C0: 27 20 74 6F 20 6D 65 73 73 0D 0A 65 6E 64 69 66 ' to mess..endif
0000D0: 0D 0A 64 6F 20 63 61 73 65 0D 0A 63 61 73 65 20 ..do case..case
0000E0: 6E 6F 6D 65 73 73 20 3D 20 31 0D 0A 73 74 6F 72 nomess = 1..stor
0000F0: 65 20 6D 65 73 73 2B 27 20 6C 61 20 72 65 70 6F e mess+' la repo
000100: 6E 73 65 20 65 73 74 20 69 6E 63 6F 72 72 65 63 nse est incorrec
000110: 74 65 27 20 74 6F 20 6D 65 73 73 0D 0A 63 61 73 te' to mess..cas
000120: 65 20 6E 6F 6D 65 73 73 20 3D 20 32 0D 0A 73 74 e nomess = 2..st
000130: 6F 72 65 20 6D 65 73 73 2B 27 20 6C 61 20 64 61 ore mess+' la da
000140: 74 65 20 65 73 74 20 69 6E 63 6F 72 72 65 63 74 te est incorrect
000150: 65 27 20 74 6F 20 6D 65 73 73 0D 0A 63 61 73 65 e' to mess..case
000160: 20 6E 6F 6D 65 73 73 20 3D 20 33 0D 0A 73 74 6F nomess = 3..sto
000170: 72 65 20 22 6C 27 65 6E 72 65 67 69 73 74 72 65 re "l'enregistre
000180: 6D 65 6E 74 20 65 78 69 73 74 65 20 64 65 6A 61 ment existe deja
000190: 22 20 74 6F 20 6D 65 73 73 0D 0A 63 61 73 65 20 " to mess..case
0001A0: 6E 6F 6D 65 73 73 20 3D 20 34 0D 0A 73 74 6F 72 nomess = 4..stor
0001B0: 65 20 22 6C 27 65 6E 72 65 67 69 73 74 72 65 6D e "l'enregistrem
0001C0: 65 6E 74 20 6E 27 65 78 69 73 74 65 20 70 61 73 ent n'existe pas
0001D0: 22 20 74 6F 20 6D 65 73 73 0D 0A 63 61 73 65 20 " to mess..case
0001E0: 6E 6F 6D 65 73 73 20 3D 20 35 0D 0A 73 74 6F 72 nomess = 5..stor
0001F0: 65 20 22 69 6C 20 79 20 61 20 70 6C 75 73 20 64 e "il y a plus d
Size : 512 (Real : 512)
000000: 2A 20 63 6F 6E 66 73 75 70 3A 20 64 65 6D 61 6E * confsup: deman
000010: 64 65 20 6C 61 20 63 6F 6E 66 69 72 6D 61 74 69 de la confirmati
000020: 6F 6E 20 64 27 75 6E 65 20 64 65 6D 61 6E 64 65 on d'une demande
000030: 20 64 65 20 73 75 70 70 72 65 73 73 69 6F 6E 0D de suppression.
000040: 0A 0D 0A 73 74 6F 72 65 20 27 74 27 20 74 6F 20 ...store 't' to
000050: 74 65 73 74 0D 0A 64 6F 20 77 68 69 6C 65 20 74 test..do while t
000060: 65 73 74 3D 27 74 27 0D 0A 73 74 6F 72 65 20 27 est='t'..store '
000070: 4E 27 20 74 6F 20 63 6F 6E 66 69 72 6D 0D 0A 40 N' to confirm..@
000080: 20 6C 69 67 6D 31 2C 30 20 73 61 79 20 27 20 20 ligm1,0 say '
000090: 20 76 6F 75 6C 65 7A 2D 76 6F 75 73 20 74 6F 75 voulez-vous tou
0000A0: 6A 6F 75 72 73 20 6C 61 20 73 75 70 70 72 65 73 jours la suppres
0000B0: 73 69 6F 6E 20 20 20 20 20 3F 20 20 20 20 20 20 sion ?
0000C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 27 0D 0A '..
0000D0: 40 20 6C 69 67 6D 31 2B 31 2C 30 20 73 61 79 20 @ ligm1+1,0 say
0000E0: 27 20 20 20 74 61 70 65 7A 20 4F 20 70 6F 75 72 ' tapez O pour
0000F0: 20 6F 75 69 2C 20 4E 20 70 6F 75 72 20 6E 6F 6E oui, N pour non
000100: 20 20 20 20 20 20 20 20 20 20 3D 3D 3D 3D 20 3E ==== >
000110: 20 20 20 20 27 0D 0A 73 65 74 20 69 6E 74 65 6E '..set inten
000120: 73 69 74 79 20 6F 66 66 0D 0A 40 20 6C 69 67 6D sity off..@ ligm
000130: 31 2B 31 2C 34 39 20 67 65 74 20 63 6F 6E 66 69 1+1,49 get confi
000140: 72 6D 0D 0A 73 65 74 20 69 6E 74 65 6E 73 69 74 rm..set intensit
000150: 79 20 6F 6E 0D 0A 72 65 61 64 0D 0A 69 66 20 21 y on..read..if !
000160: 28 63 6F 6E 66 69 72 6D 29 20 23 20 27 4E 27 2E (confirm) # 'N'.
000170: 61 6E 64 2E 21 28 63 6F 6E 66 69 72 6D 29 20 23 and.!(confirm) #
000180: 20 27 4F 27 0D 0A 73 74 6F 72 65 20 38 20 74 6F 'O'..store 8 to
000190: 20 6E 6F 6D 65 73 73 0D 0A 64 6F 20 61 66 66 6D nomess..do affm
0001A0: 65 73 73 0D 0A 65 6C 73 65 0D 0A 40 20 6C 69 67 ess..else..@ lig
0001B0: 6D 31 2C 30 0D 0A 40 20 6C 69 67 6D 31 2B 31 2C m1,0..@ ligm1+1,
0001C0: 30 0D 0A 72 65 74 75 72 6E 0D 0A 65 6E 64 69 66 0..return..endif
0001D0: 0D 0A 65 6E 64 64 6F 0D 0A 0D 0A 0D 0A 0D 0A 0D ..enddo.........
0001E0: 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D ................
0001F0: 0A 1A 1A 64 2E 72 65 70 32 23 27 4D 27 2E 61 6E ...d.rep2#'M'.an
Size : 512 (Real : 512)
000000: 65 20 31 35 20 6C 69 73 74 65 73 20 63 72 65 65 e 15 listes cree
000010: 65 73 2E 20 66 61 69 74 65 73 20 6C 65 20 6D 65 es. faites le me
000020: 6E 61 67 65 22 20 74 6F 20 6D 65 73 73 0D 0A 63 nage" to mess..c
000030: 61 73 65 20 6E 6F 6D 65 73 73 20 3D 20 36 0D 0A ase nomess = 6..
000040: 73 74 6F 72 65 20 22 63 65 74 74 65 20 6C 69 73 store "cette lis
000050: 74 65 20 65 78 69 73 74 65 20 64 65 6A 61 22 20 te existe deja"
000060: 74 6F 20 6D 65 73 73 0D 0A 63 61 73 65 20 6E 6F to mess..case no
000070: 6D 65 73 73 20 3D 20 37 0D 0A 73 74 6F 72 65 20 mess = 7..store
000080: 22 63 65 74 74 65 20 6C 69 73 74 65 20 6E 27 65 "cette liste n'e
000090: 78 69 73 74 65 20 70 61 73 22 20 74 6F 20 6D 65 xiste pas" to me
0000A0: 73 73 0D 0A 63 61 73 65 20 6E 6F 6D 65 73 73 20 ss..case nomess
0000B0: 3D 20 38 0D 0A 73 74 6F 72 65 20 22 72 65 70 6F = 8..store "repo
0000C0: 6E 73 65 20 69 6E 63 6F 72 72 65 63 74 65 20 2D nse incorrecte -
0000D0: 20 73 65 75 6C 65 73 20 72 65 70 6F 6E 73 65 73 seules reponses
0000E0: 20 61 64 6D 69 73 65 73 3A 20 4F 20 6F 75 20 4E admises: O ou N
0000F0: 22 20 74 6F 20 6D 65 73 73 0D 0A 63 61 73 65 20 " to mess..case
000100: 6E 6F 6D 65 73 73 20 3D 20 39 0D 0A 73 74 6F 72 nomess = 9..stor
000110: 65 20 22 69 6C 20 79 20 61 20 70 6C 75 73 20 64 e "il y a plus d
000120: 65 20 31 35 20 63 6C 65 73 20 63 72 65 65 65 73 e 15 cles creees
000130: 20 2E 20 66 61 69 74 65 73 20 6C 65 20 6D 65 6E . faites le men
000140: 61 67 65 22 20 74 6F 20 6D 65 73 73 0D 0A 63 61 age" to mess..ca
000150: 73 65 20 6E 6F 6D 65 73 73 20 3D 20 31 30 0D 0A se nomess = 10..
000160: 73 74 6F 72 65 20 22 63 65 74 74 65 20 63 6C 65 store "cette cle
000170: 20 65 78 69 73 74 65 20 64 65 6A 61 22 20 74 6F existe deja" to
000180: 20 6D 65 73 73 0D 0A 63 61 73 65 20 6E 6F 6D 65 mess..case nome
000190: 73 73 20 3D 20 31 31 0D 0A 73 74 6F 72 65 20 22 ss = 11..store "
0001A0: 6C 61 20 70 72 65 6D 69 65 72 65 20 7A 6F 6E 65 la premiere zone
0001B0: 20 64 6F 69 74 20 6F 62 6C 69 67 61 74 6F 69 72 doit obligatoir
0001C0: 65 6D 65 6E 74 20 65 74 72 65 20 72 65 6E 73 65 ement etre rense
0001D0: 69 67 6E 65 65 22 20 74 6F 20 6D 65 73 73 0D 0A ignee" to mess..
0001E0: 63 61 73 65 20 6E 6F 6D 65 73 73 20 3D 20 31 32 case nomess = 12
0001F0: 0D 0A 73 74 6F 72 65 20 22 6C 61 20 7A 6F 6E 65 ..store "la zone
Size : 512 (Real : 512)
000000: 2E 61 6E 64 2E 74 79 70 69 6E 64 65 78 23 27 54 .and.typindex#'T
000010: 27 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 73 '.. s
000020: 74 6F 72 65 20 31 20 74 6F 20 6E 6F 6D 65 73 73 tore 1 to nomess
000030: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 64 6F .. do
000040: 20 61 66 66 6D 65 73 73 0D 0A 20 20 20 20 20 20 affmess..
000050: 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 else..
000060: 20 20 20 20 20 73 74 6F 72 65 20 27 74 27 20 74 store 't' t
000070: 6F 20 63 6F 72 72 65 63 74 0D 0A 20 20 20 20 20 o correct..
000080: 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 endif..
000090: 20 65 6E 64 64 6F 0D 0A 20 20 20 65 6E 64 69 66 enddo.. endif
0000A0: 0D 0A 20 20 20 40 20 31 30 2C 31 35 20 73 61 79 .. @ 10,15 say
0000B0: 20 27 6E 6F 6D 20 7A 6F 6E 65 27 0D 0A 20 20 20 'nom zone'..
0000C0: 69 66 20 74 79 70 69 6E 64 65 78 20 23 20 27 50 if typindex # 'P
0000D0: 27 0D 0A 20 20 20 20 20 20 40 20 31 30 2C 33 30 '.. @ 10,30
0000E0: 20 73 61 79 20 27 64 65 62 75 74 27 0D 0A 20 20 say 'debut'..
0000F0: 20 20 20 20 40 20 31 30 2C 34 30 20 73 61 79 20 @ 10,40 say
000100: 27 66 69 6E 27 0D 0A 20 20 20 20 20 20 69 66 20 'fin'.. if
000110: 6D 6F 64 69 66 20 23 20 27 4D 27 0D 0A 20 20 20 modif # 'M'..
000120: 20 20 20 20 20 20 40 20 6C 69 67 6D 31 2C 30 20 @ ligm1,0
000130: 73 61 79 20 27 74 61 70 65 7A 20 72 65 74 75 72 say 'tapez retur
000140: 6E 20 64 61 6E 73 20 6C 61 20 70 72 65 6D 69 65 n dans la premie
000150: 72 65 20 7A 6F 6E 65 20 70 6F 75 72 20 61 62 61 re zone pour aba
000160: 6E 64 6F 6E 6E 65 72 27 0D 0A 20 20 20 20 20 20 ndonner'..
000170: 65 6E 64 69 66 0D 0A 20 20 20 65 6E 64 69 66 0D endif.. endif.
000180: 0A 20 20 20 73 65 6C 65 63 74 20 73 65 63 6F 6E . select secon
000190: 64 61 72 79 0D 0A 20 20 20 75 73 65 20 26 66 72 dary.. use &fr
0001A0: 65 66 20 69 6E 64 65 78 20 26 78 6E 6F 6D 0D 0A ef index &xnom..
0001B0: 20 20 20 67 6F 74 6F 20 74 6F 70 0D 0A 20 20 20 goto top..
0001C0: 73 74 6F 72 65 20 30 20 74 6F 20 6C 6F 6E 67 63 store 0 to longc
0001D0: 6C 65 0D 0A 20 20 20 73 74 6F 72 65 20 27 66 27 le.. store 'f'
0001E0: 20 74 6F 20 66 69 6E 7A 6F 6E 65 0D 0A 20 20 20 to finzone..
0001F0: 73 74 6F 72 65 20 27 20 27 20 74 6F 20 63 6C 65 store ' ' to cle
Size : 512 (Real : 512)
000000: 20 22 2B 26 6D 7A 6F 6E 2B 22 20 20 6E 27 65 78 "+&mzon+" n'ex
000010: 69 73 74 65 20 70 61 73 22 20 74 6F 20 6D 65 73 iste pas" to mes
000020: 73 0D 0A 63 61 73 65 20 6E 6F 6D 65 73 73 20 3D s..case nomess =
000030: 20 31 33 0D 0A 73 74 6F 72 65 20 22 6C 61 20 7A 13..store "la z
000040: 6F 6E 65 20 22 2B 26 6D 7A 6F 6E 2B 22 20 20 6E one "+&mzon+" n
000050: 27 65 73 74 20 70 61 73 20 61 6C 70 68 61 62 65 'est pas alphabe
000060: 74 69 71 75 65 22 20 74 6F 20 6D 65 73 73 0D 0A tique" to mess..
000070: 63 61 73 65 20 6E 6F 6D 65 73 73 20 3D 20 31 34 case nomess = 14
000080: 0D 0A 73 74 6F 72 65 20 22 70 6F 73 69 74 69 6F ..store "positio
000090: 6E 20 64 65 62 75 74 20 69 6E 63 6F 72 72 65 63 n debut incorrec
0000A0: 74 65 20 2D 20 6C 6F 6E 67 75 65 75 72 20 64 65 te - longueur de
0000B0: 20 6C 61 20 7A 6F 6E 65 20 20 3D 20 22 2B 73 74 la zone = "+st
0000C0: 72 28 66 69 65 6C 64 3A 6C 65 6E 2C 33 29 3B 0D r(field:len,3);.
0000D0: 0A 20 74 6F 20 6D 65 73 73 0D 0A 63 61 73 65 20 . to mess..case
0000E0: 6E 6F 6D 65 73 73 20 3D 20 31 35 0D 0A 73 74 6F nomess = 15..sto
0000F0: 72 65 20 22 70 6F 73 69 74 69 6F 6E 20 66 69 6E re "position fin
000100: 20 20 20 69 6E 63 6F 72 72 65 63 74 65 20 2D 20 incorrecte -
000110: 6C 6F 6E 67 75 65 75 72 20 64 65 20 6C 61 20 7A longueur de la z
000120: 6F 6E 65 20 20 3D 20 22 2B 73 74 72 28 66 69 65 one = "+str(fie
000130: 6C 64 3A 6C 65 6E 2C 33 29 3B 0D 0A 20 74 6F 20 ld:len,3);.. to
000140: 6D 65 73 73 0D 0A 63 61 73 65 20 6E 6F 6D 65 73 mess..case nomes
000150: 73 20 3D 20 31 36 0D 0A 73 74 6F 72 65 20 22 63 s = 16..store "c
000160: 65 74 74 65 20 63 6C 65 20 6E 27 65 78 69 73 74 ette cle n'exist
000170: 65 20 70 61 73 22 20 74 6F 20 6D 65 73 73 0D 0A e pas" to mess..
000180: 63 61 73 65 20 6E 6F 6D 65 73 73 20 3D 20 31 37 case nomess = 17
000190: 0D 0A 73 74 6F 72 65 20 22 61 75 63 75 6E 20 65 ..store "aucun e
0001A0: 6E 72 65 67 69 73 74 72 65 6D 65 6E 74 20 74 72 nregistrement tr
0001B0: 6F 75 76 65 22 20 74 6F 20 6D 65 73 73 0D 0A 63 ouve" to mess..c
0001C0: 61 73 65 20 6E 6F 6D 65 73 73 20 3D 20 31 38 0D ase nomess = 18.
0001D0: 0A 73 74 6F 72 65 20 22 63 6C 65 20 70 72 69 6E .store "cle prin
0001E0: 63 69 70 61 6C 65 20 2D 20 65 6C 6C 65 20 6E 65 cipale - elle ne
0001F0: 20 70 65 75 74 20 65 74 72 65 20 73 75 70 70 72 peut etre suppr
Size : 512 (Real : 512)
000000: 2A 20 64 65 66 69 6E 64 65 78 3A 20 64 65 66 69 * defindex: defi
000010: 6E 69 74 69 6F 6E 20 64 65 73 20 69 6E 64 65 78 nition des index
000020: 20 70 72 69 6E 63 69 70 61 6C 20 65 74 20 73 65 principal et se
000030: 63 6F 6E 64 61 69 72 65 73 0D 0A 0D 0A 65 72 61 condaires....era
000040: 73 65 0D 0A 73 74 6F 72 65 20 27 43 27 20 74 6F se..store 'C' to
000050: 20 65 6C 65 6D 0D 0A 73 74 6F 72 65 20 27 50 27 elem..store 'P'
000060: 20 74 6F 20 74 79 70 69 6E 64 65 78 0D 0A 73 74 to typindex..st
000070: 6F 72 65 20 27 47 27 20 74 6F 20 6D 6F 64 69 66 ore 'G' to modif
000080: 0D 0A 64 6F 20 64 65 66 65 6C 65 6D 0D 0A 73 74 ..do defelem..st
000090: 6F 72 65 20 6D 6E 6F 6D 65 6C 65 6D 20 74 6F 20 ore mnomelem to
0000A0: 6C 69 73 74 69 6E 64 65 78 0D 0A 72 65 6C 65 61 listindex..relea
0000B0: 73 65 20 6D 6E 6F 6D 65 6C 65 6D 0D 0A 73 74 6F se mnomelem..sto
0000C0: 72 65 20 31 20 74 6F 20 63 70 74 0D 0A 64 6F 20 re 1 to cpt..do
0000D0: 77 68 69 6C 65 20 63 70 74 3C 3D 31 35 0D 0A 65 while cpt<=15..e
0000E0: 72 61 73 65 0D 0A 73 74 6F 72 65 20 27 4E 27 20 rase..store 'N'
0000F0: 74 6F 20 72 65 70 0D 0A 40 20 33 2C 35 20 73 61 to rep..@ 3,5 sa
000100: 79 20 27 76 6F 75 6C 65 7A 2D 76 6F 75 73 20 64 y 'voulez-vous d
000110: 65 66 69 6E 69 72 20 75 6E 20 6E 6F 75 76 65 6C efinir un nouvel
000120: 20 69 6E 64 65 78 20 73 65 63 6F 6E 64 61 69 72 index secondair
000130: 65 3F 27 0D 0A 40 20 34 2C 35 20 73 61 79 20 27 e?'..@ 4,5 say '
000140: 4F 3D 6F 75 69 2C 20 4E 3D 6E 6F 6E 20 20 20 20 O=oui, N=non
000150: 20 3D 3D 3D 3D 3D 3E 27 0D 0A 73 65 74 20 69 6E =====>'..set in
000160: 74 65 6E 73 69 74 79 20 6F 66 66 0D 0A 40 20 34 tensity off..@ 4
000170: 2C 32 38 20 67 65 74 20 72 65 70 0D 0A 73 65 74 ,28 get rep..set
000180: 20 69 6E 74 65 6E 73 69 74 79 20 6F 6E 0D 0A 72 intensity on..r
000190: 65 61 64 0D 0A 64 6F 20 63 61 73 65 0D 0A 63 61 ead..do case..ca
0001A0: 73 65 20 21 28 72 65 70 29 3D 27 4F 27 0D 0A 65 se !(rep)='O'..e
0001B0: 72 61 73 65 0D 0A 73 74 6F 72 65 20 27 47 27 20 rase..store 'G'
0001C0: 74 6F 20 6D 6F 64 69 66 0D 0A 73 74 6F 72 65 20 to modif..store
0001D0: 27 53 27 20 74 6F 20 74 79 70 69 6E 64 65 78 0D 'S' to typindex.
0001E0: 0A 64 6F 20 64 65 66 65 6C 65 6D 0D 0A 69 66 20 .do defelem..if
0001F0: 6D 6E 6F 6D 65 6C 65 6D 20 23 20 27 20 27 0D 0A mnomelem # ' '..
Size : 512 (Real : 512)
000000: 69 6D 65 65 22 20 74 6F 20 6D 65 73 73 0D 0A 63 imee" to mess..c
000010: 61 73 65 20 6E 6F 6D 65 73 73 20 3D 20 31 39 0D ase nomess = 19.
000020: 0A 73 74 6F 72 65 20 22 72 69 65 6E 20 61 20 6C .store "rien a l
000030: 69 73 74 65 72 22 20 74 6F 20 6D 65 73 73 0D 0A ister" to mess..
000040: 63 61 73 65 20 6E 6F 6D 65 73 73 20 3D 20 32 30 case nomess = 20
000050: 0D 0A 73 74 6F 72 65 20 22 6C 65 20 66 69 63 68 ..store "le fich
000060: 69 65 72 20 22 2B 24 28 6E 6F 6D 66 69 63 68 2C ier "+$(nomfich,
000070: 33 2C 38 29 2B 22 20 61 20 64 65 6A 61 20 65 74 3,8)+" a deja et
000080: 65 20 67 65 6E 65 72 65 22 20 74 6F 20 6D 65 73 e genere" to mes
000090: 73 0D 0A 63 61 73 65 20 6E 6F 6D 65 73 73 20 3D s..case nomess =
0000A0: 20 32 31 0D 0A 73 74 6F 72 65 20 22 6C 65 20 6E 21..store "le n
0000B0: 75 6D 65 72 6F 20 64 65 20 6C 69 67 6E 65 20 64 umero de ligne d
0000C0: 6F 69 74 20 65 74 72 65 20 63 6F 6D 70 72 69 73 oit etre compris
0000D0: 20 65 6E 74 72 65 20 32 20 65 74 20 22 2B 73 74 entre 2 et "+st
0000E0: 72 28 6C 69 67 6D 31 2D 31 2C 32 29 20 74 6F 20 r(ligm1-1,2) to
0000F0: 6D 65 73 73 0D 0A 63 61 73 65 20 6E 6F 6D 65 73 mess..case nomes
000100: 73 20 3D 20 32 32 0D 0A 73 74 6F 72 65 20 22 6C s = 22..store "l
000110: 65 20 6E 75 6D 65 72 6F 20 64 65 20 63 6F 6C 6F e numero de colo
000120: 6E 6E 65 20 64 6F 69 74 20 65 74 72 65 20 63 6F nne doit etre co
000130: 6D 70 72 69 73 20 65 6E 74 72 65 20 30 20 65 74 mpris entre 0 et
000140: 20 37 39 22 20 74 6F 20 6D 65 73 73 0D 0A 63 61 79" to mess..ca
000150: 73 65 20 6E 6F 6D 65 73 73 20 3D 20 32 33 0D 0A se nomess = 23..
000160: 73 74 6F 72 65 20 22 6C 6F 6E 67 75 65 75 72 20 store "longueur
000170: 64 65 20 7A 6F 6E 65 20 6F 75 20 6E 6F 6D 62 72 de zone ou nombr
000180: 65 20 64 65 20 64 65 63 69 6D 61 6C 65 73 20 69 e de decimales i
000190: 6E 63 6F 72 72 65 63 74 22 20 74 6F 20 6D 65 73 ncorrect" to mes
0001A0: 73 0D 0A 63 61 73 65 20 6E 6F 6D 65 73 73 20 3D s..case nomess =
0001B0: 20 32 34 0D 0A 73 74 6F 72 65 20 22 6C 61 20 64 24..store "la d
0001C0: 65 66 69 6E 69 74 69 6F 6E 20 64 27 75 6E 20 69 efinition d'un i
0001D0: 6E 64 65 78 20 70 72 69 6E 63 69 70 61 6C 20 65 ndex principal e
0001E0: 73 74 20 6F 62 6C 69 67 61 74 6F 69 72 65 22 20 st obligatoire"
0001F0: 74 6F 20 6D 65 73 73 0D 0A 63 61 73 65 20 6E 6F to mess..case no
Size : 512 (Real : 512)
000000: 73 74 6F 72 65 20 6C 69 73 74 69 6E 64 65 78 2B store listindex+
000010: 27 2C 27 2B 6D 6E 6F 6D 65 6C 65 6D 20 74 6F 20 ','+mnomelem to
000020: 6C 69 73 74 69 6E 64 65 78 0D 0A 73 74 6F 72 65 listindex..store
000030: 20 63 70 74 2B 31 20 74 6F 20 63 70 74 0D 0A 65 cpt+1 to cpt..e
000040: 6E 64 69 66 0D 0A 72 65 6C 65 61 73 65 20 6D 6E ndif..release mn
000050: 6F 6D 65 6C 65 6D 0D 0A 63 61 73 65 20 21 28 72 omelem..case !(r
000060: 65 70 29 3D 27 4E 27 0D 0A 72 65 6C 65 61 73 65 ep)='N'..release
000070: 20 72 65 70 2C 65 6C 65 6D 2C 74 79 70 69 6E 64 rep,elem,typind
000080: 65 78 2C 6D 6F 64 69 66 2C 63 70 74 0D 0A 72 65 ex,modif,cpt..re
000090: 74 75 72 6E 0D 0A 6F 74 68 65 72 77 69 73 65 0D turn..otherwise.
0000A0: 0A 73 74 6F 72 65 20 31 20 74 6F 20 6E 6F 6D 65 .store 1 to nome
0000B0: 73 73 0D 0A 64 6F 20 61 66 66 6D 65 73 73 0D 0A ss..do affmess..
0000C0: 65 6E 64 63 61 73 65 0D 0A 65 6E 64 64 6F 0D 0A endcase..enddo..
0000D0: 72 65 6C 65 61 73 65 20 72 65 70 2C 65 6C 65 6D release rep,elem
0000E0: 2C 74 79 70 69 6E 64 65 78 2C 6D 6F 64 69 66 2C ,typindex,modif,
0000F0: 63 70 74 0D 0A 72 65 74 75 72 6E 0D 0A 0D 0A 0D cpt..return.....
000100: 0A 0D 0A 0D 0A 1A 1A 65 72 61 73 65 0D 0A 3F 0D .......erase..?.
000110: 0A 3F 0D 0A 3F 20 27 6C 65 20 66 69 63 68 69 65 .?..? 'le fichie
000120: 72 20 27 2B 24 28 6E 6F 6D 66 69 63 68 2C 33 2C r '+$(nomfich,3,
000130: 38 29 2B 27 20 76 61 20 65 74 72 65 20 63 72 65 8)+' va etre cre
000140: 65 20 73 75 72 20 27 2B 75 6E 69 74 0D 0A 63 72 e sur '+unit..cr
000150: 65 61 74 65 20 26 6E 6F 6D 66 69 63 68 20 66 72 eate &nomfich fr
000160: 6F 6D 20 26 66 72 65 66 0D 0A 2A 20 63 72 65 65 om &fref..* cree
000170: 72 20 6C 65 20 66 69 63 68 69 65 72 20 64 65 73 r le fichier des
000180: 20 69 6E 64 65 78 20 65 74 20 64 65 73 20 6C 69 index et des li
000190: 73 74 65 73 0D 0A 73 74 6F 72 65 20 6E 6F 6D 66 stes..store nomf
0001A0: 69 63 68 2D 27 2E 65 6C 66 27 20 74 6F 20 66 65 ich-'.elf' to fe
0001B0: 6C 65 0D 0A 3F 20 27 6C 65 20 66 69 63 68 69 65 le..? 'le fichie
0001C0: 72 20 27 2B 24 28 66 65 6C 65 2C 33 2C 31 32 29 r '+$(fele,3,12)
0001D0: 2B 27 20 76 61 20 65 74 72 65 20 63 72 65 65 20 +' va etre cree
0001E0: 73 75 72 20 27 2B 75 6E 69 74 0D 0A 75 73 65 20 sur '+unit..use
0001F0: 65 6C 66 0D 0A 63 6F 70 79 20 74 6F 20 26 66 65 elf..copy to &fe
Size : 512 (Real : 512)
000000: 6D 65 73 73 20 3D 20 32 35 0D 0A 73 74 6F 72 65 mess = 25..store
000010: 20 22 63 65 20 6E 6F 6D 20 65 78 69 73 74 65 20 "ce nom existe
000020: 64 65 6A 61 22 20 74 6F 20 6D 65 73 73 0D 0A 63 deja" to mess..c
000030: 61 73 65 20 6E 6F 6D 65 73 73 20 3D 20 32 36 0D ase nomess = 26.
000040: 0A 73 74 6F 72 65 20 22 6C 65 20 74 79 70 65 20 .store "le type
000050: 65 73 74 20 69 6E 63 6F 72 72 65 63 74 20 2D 20 est incorrect -
000060: 73 65 75 6C 65 73 20 72 65 70 6F 6E 73 65 73 20 seules reponses
000070: 61 64 6D 69 73 65 73 3A 20 43 2C 20 4E 20 6F 75 admises: C, N ou
000080: 20 4C 22 20 74 6F 20 6D 65 73 73 0D 0A 63 61 73 L" to mess..cas
000090: 65 20 6E 6F 6D 65 73 73 20 3D 20 32 37 0D 0A 73 e nomess = 27..s
0000A0: 74 6F 72 65 20 22 6C 61 20 7A 6F 6E 65 20 22 2B tore "la zone "+
0000B0: 6E 6F 6D 7A 2B 22 20 6E 27 65 78 69 73 74 65 20 nomz+" n'existe
0000C0: 70 61 73 22 20 74 6F 20 6D 65 73 73 0D 0A 63 61 pas" to mess..ca
0000D0: 73 65 20 6E 6F 6D 65 73 73 20 3D 20 32 38 0D 0A se nomess = 28..
0000E0: 73 74 6F 72 65 20 22 6C 61 20 6C 6F 6E 67 75 65 store "la longue
0000F0: 75 72 20 6E 27 65 73 74 20 70 61 73 20 63 65 6C ur n'est pas cel
000100: 6C 65 20 64 27 75 6E 65 20 64 61 74 65 20 2D 20 le d'une date -
000110: 7A 6F 6E 65 20 61 20 72 65 73 61 69 73 69 72 20 zone a resaisir
000120: 20 22 20 74 6F 20 6D 65 73 73 0D 0A 63 61 73 65 " to mess..case
000130: 20 6E 6F 6D 65 73 73 20 3D 20 32 39 0D 0A 73 74 nomess = 29..st
000140: 6F 72 65 20 22 6C 61 20 76 61 6C 65 75 72 20 64 ore "la valeur d
000150: 65 62 75 74 20 6E 65 20 70 65 75 74 20 65 74 72 ebut ne peut etr
000160: 65 20 73 75 70 65 72 69 65 75 72 65 20 61 20 6C e superieure a l
000170: 61 20 76 61 6C 65 75 72 20 66 69 6E 22 20 74 6F a valeur fin" to
000180: 20 6D 65 73 73 0D 0A 63 61 73 65 20 6E 6F 6D 65 mess..case nome
000190: 73 73 20 3D 20 33 30 0D 0A 73 74 6F 72 65 20 22 ss = 30..store "
0001A0: 6C 65 73 20 64 65 75 78 20 7A 6F 6E 65 73 20 61 les deux zones a
0001B0: 20 63 6F 6D 70 61 72 65 72 20 6E 27 6F 6E 74 20 comparer n'ont
0001C0: 70 61 73 20 6C 65 20 6D 65 6D 65 20 74 79 70 65 pas le meme type
0001D0: 22 20 74 6F 20 6D 65 73 73 0D 0A 63 61 73 65 20 " to mess..case
0001E0: 6E 6F 6D 65 73 73 20 3D 20 33 31 0D 0A 73 74 6F nomess = 31..sto
0001F0: 72 65 20 22 75 6E 65 20 7A 6F 6E 65 20 64 65 20 re "une zone de
Size : 512 (Real : 512)
000000: 6D 7A 6F 6E 35 0D 0A 72 65 6C 65 61 73 65 20 63 mzon5..release c
000010: 6C 65 2C 6D 64 65 62 2C 6D 64 65 62 31 2C 6D 64 le,mdeb,mdeb1,md
000020: 65 62 32 2C 6D 64 65 62 33 2C 6D 64 65 62 34 2C eb2,mdeb3,mdeb4,
000030: 6D 64 65 62 35 0D 0A 72 65 6C 65 61 73 65 20 6D mdeb5..release m
000040: 66 69 6E 2C 6D 66 69 6E 31 2C 6D 66 69 6E 32 2C fin,mfin1,mfin2,
000050: 6D 66 69 6E 33 2C 6D 66 69 6E 34 2C 6D 66 69 6E mfin3,mfin4,mfin
000060: 35 0D 0A 72 65 6C 65 61 73 65 20 6C 6C 6F 6E 67 5..release llong
000070: 2C 6C 6F 6E 67 31 2C 6C 6F 6E 67 32 2C 6C 6F 6E ,long1,long2,lon
000080: 67 33 2C 6C 6F 6E 67 34 2C 6C 6F 6E 67 35 0D 0A g3,long4,long5..
000090: 72 65 6C 65 61 73 65 20 63 70 74 69 6D 61 78 2C release cptimax,
0000A0: 7A 6F 6E 2C 6D 6F 64 69 66 2C 74 79 70 69 6E 64 zon,modif,typind
0000B0: 65 78 2C 6D 6C 69 62 65 6C 65 6D 2C 66 69 6E 7A ex,mlibelem,finz
0000C0: 6F 6E 65 2C 63 70 74 69 2C 6C 69 67 69 2C 63 6C one,cpti,ligi,cl
0000D0: 65 6E 6F 6D 0D 0A 72 65 6C 65 61 73 65 20 6E 6F enom..release no
0000E0: 6D 7A 2C 6E 6F 63 6F 75 72 2C 64 65 62 2C 66 69 mz,nocour,deb,fi
0000F0: 6E 0D 0A 72 65 74 75 72 6E 0D 0A 0D 0A 0D 0A 0D n..return.......
000100: 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D ................
000110: 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D ................
000120: 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 1A 1A 70 70 61 .............ppa
000130: 72 75 65 20 64 61 6E 73 20 63 65 74 20 69 6E 64 rue dans cet ind
000140: 65 78 0D 0A 20 20 20 20 20 20 69 66 20 74 79 70 ex.. if typ
000150: 69 6E 64 65 78 20 3D 20 27 50 27 0D 0A 20 20 20 index = 'P'..
000160: 20 20 20 20 20 20 73 74 6F 72 65 20 31 20 74 6F store 1 to
000170: 20 63 70 74 32 0D 0A 20 20 20 20 20 20 20 20 20 cpt2..
000180: 64 6F 20 77 68 69 6C 65 20 63 70 74 32 20 3C 3D do while cpt2 <=
000190: 20 63 70 74 69 2D 31 2E 61 6E 64 2E 6E 6F 6D 65 cpti-1.and.nome
0001A0: 73 73 20 3D 20 30 0D 0A 20 20 20 20 20 20 20 20 ss = 0..
0001B0: 20 20 20 20 73 74 6F 72 65 20 27 6D 7A 6F 6E 27 store 'mzon'
0001C0: 2D 73 74 72 28 63 70 74 32 2C 31 29 20 74 6F 20 -str(cpt2,1) to
0001D0: 6D 7A 6F 6E 70 0D 0A 20 20 20 20 20 20 20 20 20 mzonp..
0001E0: 20 20 20 69 66 20 26 6D 7A 6F 6E 3D 26 6D 7A 6F if &mzon=&mzo
0001F0: 6E 70 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 np..
Size : 512 (Real : 512)
000000: 74 79 70 65 20 6C 6F 67 69 71 75 65 20 6E 65 20 type logique ne
000010: 70 65 75 74 20 65 74 72 65 20 63 6F 6D 70 61 72 peut etre compar
000020: 65 65 22 20 74 6F 20 6D 65 73 73 0D 0A 63 61 73 ee" to mess..cas
000030: 65 20 6E 6F 6D 65 73 73 20 3D 20 33 32 0D 0A 73 e nomess = 32..s
000040: 74 6F 72 65 20 22 6F 70 74 69 6F 6E 20 6E 6F 6E tore "option non
000050: 20 61 64 6D 69 73 65 20 70 6F 75 72 20 75 6E 65 admise pour une
000060: 20 7A 6F 6E 65 20 6E 75 6D 65 72 69 71 75 65 22 zone numerique"
000070: 20 74 6F 20 6D 65 73 73 0D 0A 63 61 73 65 20 6E to mess..case n
000080: 6F 6D 65 73 73 20 3D 20 33 33 0D 0A 73 74 6F 72 omess = 33..stor
000090: 65 20 6D 65 73 73 2B 22 20 7A 6F 6E 65 20 74 72 e mess+" zone tr
0000A0: 6F 70 20 67 72 61 6E 64 65 20 6F 75 20 74 72 6F op grande ou tro
0000B0: 70 20 70 65 74 69 74 65 20 22 20 74 6F 20 6D 65 p petite " to me
0000C0: 73 73 0D 0A 63 61 73 65 20 6E 6F 6D 65 73 73 20 ss..case nomess
0000D0: 3D 20 33 34 0D 0A 73 74 6F 72 65 20 22 75 6E 65 = 34..store "une
0000E0: 20 64 61 74 65 20 6F 75 20 75 6E 65 20 7A 6F 6E date ou une zon
0000F0: 65 20 6E 75 6D 65 72 69 71 75 65 20 6E 65 20 70 e numerique ne p
000100: 65 75 74 20 66 69 67 75 72 65 72 20 64 61 6E 73 eut figurer dans
000110: 20 75 6E 20 69 6E 64 65 78 20 71 75 27 65 6E 20 un index qu'en
000120: 65 6E 3B 0D 0A 74 69 65 72 20 22 20 74 6F 20 6D en;..tier " to m
000130: 65 73 73 0D 0A 63 61 73 65 20 6E 6F 6D 65 73 73 ess..case nomess
000140: 20 3D 20 33 35 0D 0A 73 74 6F 72 65 20 6D 65 73 = 35..store mes
000150: 73 2B 22 20 6C 61 20 7A 6F 6E 65 20 64 6F 69 74 s+" la zone doit
000160: 20 65 74 72 65 20 6F 62 6C 69 67 61 74 6F 69 72 etre obligatoir
000170: 65 6D 65 6E 74 20 72 65 6E 73 65 69 67 6E 65 65 ement renseignee
000180: 22 20 74 6F 20 6D 65 73 73 0D 0A 63 61 73 65 20 " to mess..case
000190: 6E 6F 6D 65 73 73 20 3D 20 33 36 0D 0A 73 74 6F nomess = 36..sto
0001A0: 72 65 20 6D 65 73 73 2B 22 20 61 20 72 65 6E 73 re mess+" a rens
0001B0: 65 69 67 6E 65 72 2C 20 7A 6F 6E 65 20 22 2B 76 eigner, zone "+v
0001C0: 61 6C 31 2B 22 20 6E 6F 6E 20 76 69 64 65 22 20 al1+" non vide"
0001D0: 74 6F 20 6D 65 73 73 0D 0A 63 61 73 65 20 6E 6F to mess..case no
0001E0: 6D 65 73 73 20 3D 20 33 37 0D 0A 73 74 6F 72 65 mess = 37..store
0001F0: 20 6D 65 73 73 2B 22 20 64 6F 69 74 20 65 74 72 mess+" doit etr
Size : 512 (Real : 512)
000000: 2A 20 64 65 6D 7A 6F 6E 65 3A 20 64 65 6D 61 6E * demzone: deman
000010: 64 65 20 6C 65 73 20 7A 6F 6E 65 73 20 63 6F 6E de les zones con
000020: 73 74 69 74 75 61 6E 74 20 75 6E 65 20 63 6C 65 stituant une cle
000030: 0D 0A 0D 0A 73 74 6F 72 65 20 31 20 74 6F 20 63 ....store 1 to c
000040: 70 74 0D 0A 73 74 6F 72 65 20 31 34 20 74 6F 20 pt..store 14 to
000050: 6C 69 67 0D 0A 73 74 6F 72 65 20 27 20 27 20 74 lig..store ' ' t
000060: 6F 20 65 78 70 0D 0A 73 74 6F 72 65 20 27 20 27 o exp..store ' '
000070: 20 74 6F 20 63 6C 65 0D 0A 69 66 20 63 68 6F 69 to cle..if choi
000080: 78 3D 27 35 27 0D 0A 20 20 20 73 74 6F 72 65 20 x='5'.. store
000090: 27 53 27 20 74 6F 20 63 68 6F 69 78 0D 0A 65 6E 'S' to choix..en
0000A0: 64 69 66 0D 0A 64 6F 20 77 68 69 6C 65 20 63 70 dif..do while cp
0000B0: 74 3C 3D 70 2E 6E 62 7A 6F 6E 65 73 0D 0A 20 20 t<=p.nbzones..
0000C0: 20 73 74 6F 72 65 20 27 70 2E 7A 6F 6E 27 2D 73 store 'p.zon'-s
0000D0: 74 72 28 63 70 74 2C 31 29 20 74 6F 20 7A 6F 6E tr(cpt,1) to zon
0000E0: 65 0D 0A 20 20 20 73 74 6F 72 65 20 27 70 2E 64 e.. store 'p.d
0000F0: 65 62 27 2D 73 74 72 28 63 70 74 2C 31 29 20 74 eb'-str(cpt,1) t
000100: 6F 20 64 65 62 0D 0A 20 20 20 73 74 6F 72 65 20 o deb.. store
000110: 27 70 2E 66 69 6E 27 2D 73 74 72 28 63 70 74 2C 'p.fin'-str(cpt,
000120: 31 29 20 74 6F 20 66 69 6E 0D 0A 20 20 20 73 74 1) to fin.. st
000130: 6F 72 65 20 26 7A 6F 6E 65 20 74 6F 20 6E 6F 6D ore &zone to nom
000140: 7A 0D 0A 20 20 20 66 69 6E 64 20 26 6E 6F 6D 7A z.. find &nomz
000150: 0D 0A 20 20 20 69 66 20 26 66 69 6E 3D 27 46 27 .. if &fin='F'
000160: 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 66 69 .. store fi
000170: 65 6C 64 3A 6C 65 6E 20 74 6F 20 6C 6F 6E 67 0D eld:len to long.
000180: 0A 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 . else..
000190: 73 74 6F 72 65 20 76 61 6C 28 26 66 69 6E 29 20 store val(&fin)
0001A0: 74 6F 20 6C 6F 6E 67 0D 0A 20 20 20 65 6E 64 69 to long.. endi
0001B0: 66 0D 0A 20 20 20 73 74 6F 72 65 20 6C 6F 6E 67 f.. store long
0001C0: 2D 76 61 6C 28 26 64 65 62 29 2B 31 20 74 6F 20 -val(&deb)+1 to
0001D0: 6C 6F 6E 67 0D 0A 20 20 20 73 74 6F 72 65 20 27 long.. store '
0001E0: 66 27 20 74 6F 20 63 6F 72 72 65 63 74 0D 0A 20 f' to correct..
0001F0: 20 20 64 6F 20 77 68 69 6C 65 20 63 6F 72 72 65 do while corre
Size : 512 (Real : 512)
000000: 65 20 73 75 70 65 72 69 65 75 72 65 20 6F 75 20 e superieure ou
000010: 65 67 61 6C 65 20 61 20 22 2B 76 61 6C 31 20 74 egale a "+val1 t
000020: 6F 20 6D 65 73 73 0D 0A 63 61 73 65 20 6E 6F 6D o mess..case nom
000030: 65 73 73 20 3D 20 33 38 0D 0A 73 74 6F 72 65 20 ess = 38..store
000040: 6D 65 73 73 2B 22 20 64 6F 69 74 20 65 74 72 65 mess+" doit etre
000050: 20 69 6E 66 65 72 69 65 75 72 65 20 6F 75 20 65 inferieure ou e
000060: 67 61 6C 65 20 61 20 22 2B 76 61 6C 31 20 74 6F gale a "+val1 to
000070: 20 6D 65 73 73 0D 0A 63 61 73 65 20 6E 6F 6D 65 mess..case nome
000080: 73 73 20 3D 20 33 39 0D 0A 73 74 6F 72 65 20 6D ss = 39..store m
000090: 65 73 73 2B 22 20 7A 6F 6E 65 20 65 6E 20 64 65 ess+" zone en de
0000A0: 68 6F 72 73 20 64 65 73 20 62 6F 72 6E 65 73 22 hors des bornes"
0000B0: 20 74 6F 20 6D 65 73 73 0D 0A 63 61 73 65 20 6E to mess..case n
0000C0: 6F 6D 65 73 73 20 3D 20 34 30 0D 0A 73 74 6F 72 omess = 40..stor
0000D0: 65 20 6D 65 73 73 2B 22 20 6E 27 61 70 70 61 72 e mess+" n'appar
0000E0: 74 69 65 6E 74 20 70 61 73 20 40 20 6C 61 20 6C tient pas @ la l
0000F0: 69 73 74 65 20 64 65 20 63 6F 64 65 73 22 20 74 iste de codes" t
000100: 6F 20 6D 65 73 73 0D 0A 63 61 73 65 20 6E 6F 6D o mess..case nom
000110: 65 73 73 20 3D 20 34 34 0D 0A 73 74 6F 72 65 20 ess = 44..store
000120: 22 6C 61 20 6C 69 73 74 65 20 64 65 73 20 63 6F "la liste des co
000130: 64 65 73 20 64 6F 69 74 20 65 74 72 65 20 6E 6F des doit etre no
000140: 6E 20 76 69 64 65 22 20 74 6F 20 6D 65 73 73 0D n vide" to mess.
000150: 0A 63 61 73 65 20 6E 6F 6D 65 73 73 20 3D 20 34 .case nomess = 4
000160: 35 0D 0A 73 74 6F 72 65 20 22 75 6E 65 20 6D 65 5..store "une me
000170: 6D 65 20 7A 6F 6E 65 20 6E 65 20 64 6F 69 74 20 me zone ne doit
000180: 70 61 73 20 61 70 70 61 72 61 69 74 72 65 20 64 pas apparaitre d
000190: 65 75 78 20 66 6F 69 73 20 64 61 6E 73 20 6C 61 eux fois dans la
0001A0: 20 63 6C 65 20 70 72 69 6E 63 69 70 61 6C 65 22 cle principale"
0001B0: 3B 0D 0A 20 74 6F 20 6D 65 73 73 0D 0A 63 61 73 ;.. to mess..cas
0001C0: 65 20 6E 6F 6D 65 73 73 20 3D 20 34 36 0D 0A 73 e nomess = 46..s
0001D0: 74 6F 72 65 20 22 6C 61 20 74 61 69 6C 6C 65 20 tore "la taille
0001E0: 64 65 20 6C 27 65 6E 72 65 67 69 73 74 72 65 6D de l'enregistrem
0001F0: 65 6E 74 20 64 6F 69 74 20 65 74 72 65 20 69 6E ent doit etre in
Size : 512 (Real : 512)
000000: 63 74 3D 27 66 27 0D 0A 20 20 20 20 20 20 73 74 ct='f'.. st
000010: 6F 72 65 20 27 6D 7A 6F 6E 65 27 20 74 6F 20 6D ore 'mzone' to m
000020: 7A 6F 6E 0D 0A 20 20 20 20 20 20 64 6F 20 69 6E zon.. do in
000030: 69 74 7A 6F 6E 65 0D 0A 20 20 20 20 20 20 69 66 itzone.. if
000040: 20 66 69 65 6C 64 3A 74 79 70 65 20 23 20 27 4E field:type # 'N
000050: 27 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 '.. stor
000060: 65 20 24 28 26 6D 7A 6F 6E 2C 31 2C 6C 6F 6E 67 e $(&mzon,1,long
000070: 29 20 74 6F 20 26 6D 7A 6F 6E 0D 0A 20 20 20 20 ) to &mzon..
000080: 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 40 endif.. @
000090: 20 6C 69 67 2C 35 20 73 61 79 20 74 65 78 74 65 lig,5 say texte
0000A0: 0D 0A 20 20 20 20 20 20 40 20 6C 69 67 2C 32 35 .. @ lig,25
0000B0: 20 67 65 74 20 6D 7A 6F 6E 65 20 26 70 69 63 0D get mzone &pic.
0000C0: 0A 20 20 20 20 20 20 72 65 61 64 0D 0A 20 20 20 . read..
0000D0: 20 20 20 63 6C 65 61 72 20 67 65 74 0D 0A 20 20 clear get..
0000E0: 20 20 20 20 69 66 20 66 69 65 6C 64 3A 74 79 70 if field:typ
0000F0: 65 20 23 20 27 4E 27 0D 0A 20 20 20 20 20 20 20 e # 'N'..
000100: 20 20 73 74 6F 72 65 20 21 28 6D 7A 6F 6E 65 29 store !(mzone)
000110: 20 74 6F 20 6D 7A 6F 6E 65 0D 0A 20 20 20 20 20 to mzone..
000120: 20 20 20 20 73 74 6F 72 65 20 24 28 6D 7A 6F 6E store $(mzon
000130: 65 2B 24 28 62 6C 61 6E 63 2C 31 2C 6C 6F 6E 67 e+$(blanc,1,long
000140: 29 2C 31 2C 6C 6F 6E 67 29 20 74 6F 20 6D 7A 6F ),1,long) to mzo
000150: 6E 65 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F ne.. sto
000160: 72 65 20 27 74 27 20 74 6F 20 63 6F 72 72 65 63 re 't' to correc
000170: 74 0D 0A 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 t.. else..
000180: 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 27 39 store '9
000190: 39 39 39 39 39 39 39 39 39 39 39 39 39 39 39 39 9999999999999999
0001A0: 39 39 39 27 20 74 6F 20 6E 65 75 66 0D 0A 20 20 999' to neuf..
0001B0: 20 20 20 20 20 20 20 69 66 20 66 69 65 6C 64 3A if field:
0001C0: 64 65 63 20 3D 20 30 0D 0A 20 20 20 20 20 20 20 dec = 0..
0001D0: 20 20 20 20 20 73 74 6F 72 65 20 66 69 65 6C 64 store field
0001E0: 3A 6C 65 6E 20 74 6F 20 6E 62 65 6E 74 0D 0A 20 :len to nbent..
0001F0: 20 20 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 store
Size : 512 (Real : 512)
000000: 66 65 72 69 65 75 72 65 20 61 20 31 30 30 30 20 ferieure a 1000
000010: 63 61 72 61 63 74 65 72 65 73 22 20 3B 0D 0A 74 caracteres" ;..t
000020: 6F 20 6D 65 73 73 0D 0A 63 61 73 65 20 6E 6F 6D o mess..case nom
000030: 65 73 73 20 3D 20 34 37 0D 0A 73 74 6F 72 65 20 ess = 47..store
000040: 22 6C 65 20 6E 6F 6D 62 72 65 20 64 65 20 63 61 "le nombre de ca
000050: 72 61 63 74 65 72 65 73 20 64 65 20 6C 61 20 63 racteres de la c
000060: 6C 65 20 64 6F 69 74 20 65 74 72 65 20 69 6E 66 le doit etre inf
000070: 65 72 69 65 75 72 20 61 20 39 39 22 20 74 6F 20 erieur a 99" to
000080: 6D 65 73 73 0D 0A 63 61 73 65 20 6E 6F 6D 65 73 mess..case nomes
000090: 73 20 3D 20 34 38 0D 0A 73 74 6F 72 65 20 22 33 s = 48..store "3
0000A0: 32 20 7A 6F 6E 65 73 20 6F 6E 74 20 65 74 65 20 2 zones ont ete
0000B0: 63 72 65 65 65 73 20 6F 75 20 6C 27 65 6E 72 65 creees ou l'enre
0000C0: 67 69 73 74 72 65 6D 65 6E 74 20 66 61 69 74 20 gistrement fait
0000D0: 31 30 30 30 20 63 61 72 61 63 74 65 72 65 73 22 1000 caracteres"
0000E0: 20 74 6F 20 3B 0D 0A 6D 65 73 73 0D 0A 63 61 73 to ;..mess..cas
0000F0: 65 20 6E 6F 6D 65 73 73 20 3D 20 34 39 0D 0A 73 e nomess = 49..s
000100: 74 6F 72 65 20 22 66 69 63 68 69 65 72 20 22 2B tore "fichier "+
000110: 6E 6F 6D 66 69 63 68 2B 22 20 6E 6F 6E 20 67 65 nomfich+" non ge
000120: 72 65 20 70 61 72 20 6C 27 61 70 70 6C 69 63 61 re par l'applica
000130: 74 69 6F 6E 20 67 65 73 74 69 6F 6E 20 64 65 20 tion gestion de
000140: 66 69 63 68 69 65 72 73 22 3B 0D 0A 20 74 6F 20 fichiers";.. to
000150: 6D 65 73 73 0D 0A 63 61 73 65 20 6E 6F 6D 65 73 mess..case nomes
000160: 73 20 3D 20 35 31 0D 0A 73 74 6F 72 65 20 24 28 s = 51..store $(
000170: 6E 6F 6D 66 69 63 68 2C 33 2C 38 29 2B 22 2E 72 nomfich,3,8)+".r
000180: 65 66 20 6F 75 20 22 2B 24 28 6E 6F 6D 66 69 63 ef ou "+$(nomfic
000190: 68 2C 33 2C 38 29 2B 22 2E 6E 6F 6D 20 6F 75 20 h,3,8)+".nom ou
0001A0: 22 2B 24 28 6E 6F 6D 66 69 63 68 2C 33 2C 38 29 "+$(nomfich,3,8)
0001B0: 2B 22 2E 63 6C 65 3B 0D 0A 20 6E 27 65 73 74 20 +".cle;.. n'est
0001C0: 70 61 73 20 73 75 72 20 6C 61 20 64 69 73 71 75 pas sur la disqu
0001D0: 65 74 74 65 20 22 2B 75 6E 69 74 20 74 6F 20 6D ette "+unit to m
0001E0: 65 73 73 0D 0A 63 61 73 65 20 6E 6F 6D 65 73 73 ess..case nomess
0001F0: 20 3D 20 35 32 0D 0A 73 74 6F 72 65 20 24 28 6E = 52..store $(n
Size : 512 (Real : 512)
000000: 20 24 28 6E 65 75 66 2C 31 2C 6E 62 65 6E 74 29 $(neuf,1,nbent)
000010: 20 74 6F 20 6D 61 78 70 6F 73 0D 0A 20 20 20 20 to maxpos..
000020: 20 20 20 20 20 20 20 20 69 66 20 6E 62 65 6E 74 if nbent
000030: 20 3D 20 31 0D 0A 20 20 20 20 20 20 20 20 20 20 = 1..
000040: 20 20 20 20 20 73 74 6F 72 65 20 27 30 27 20 74 store '0' t
000050: 6F 20 6D 69 6E 70 6F 73 0D 0A 20 20 20 20 20 20 o minpos..
000060: 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 else..
000070: 20 20 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 store
000080: 20 27 2D 27 2D 24 28 6E 65 75 66 2C 31 2C 6E 62 '-'-$(neuf,1,nb
000090: 65 6E 74 2D 31 29 20 74 6F 20 6D 69 6E 70 6F 73 ent-1) to minpos
0000A0: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 65 6E .. en
0000B0: 64 69 66 0D 0A 20 20 20 20 20 20 20 20 20 65 6C dif.. el
0000C0: 73 65 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 se..
0000D0: 73 74 6F 72 65 20 66 69 65 6C 64 3A 6C 65 6E 2D store field:len-
0000E0: 66 69 65 6C 64 3A 64 65 63 2D 31 20 74 6F 20 6E field:dec-1 to n
0000F0: 62 65 6E 74 0D 0A 20 20 20 20 20 20 20 20 20 20 bent..
000100: 20 20 73 74 6F 72 65 20 24 28 6E 65 75 66 2C 31 store $(neuf,1
000110: 2C 6E 62 65 6E 74 29 2D 27 2E 27 2D 24 28 6E 65 ,nbent)-'.'-$(ne
000120: 75 66 2C 31 2C 66 69 65 6C 64 3A 64 65 63 29 20 uf,1,field:dec)
000130: 74 6F 20 6D 61 78 70 6F 73 0D 0A 20 20 20 20 20 to maxpos..
000140: 20 20 20 20 20 20 20 69 66 20 6E 62 65 6E 74 20 if nbent
000150: 3D 20 31 0D 0A 20 20 20 20 20 20 20 20 20 20 20 = 1..
000160: 20 20 20 20 73 74 6F 72 65 20 27 2D 2E 27 2D 24 store '-.'-$
000170: 28 6E 65 75 66 2C 31 2C 66 69 65 6C 64 3A 64 65 (neuf,1,field:de
000180: 63 29 20 74 6F 20 6D 69 6E 70 6F 73 0D 0A 20 20 c) to minpos..
000190: 20 20 20 20 20 20 20 20 20 20 65 6C 73 65 0D 0A else..
0001A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 s
0001B0: 74 6F 72 65 20 27 2D 27 2D 24 28 6E 65 75 66 2C tore '-'-$(neuf,
0001C0: 31 2C 6E 62 65 6E 74 2D 31 29 2D 27 2E 27 2D 24 1,nbent-1)-'.'-$
0001D0: 28 6E 65 75 66 2C 31 2C 66 69 65 6C 64 3A 64 65 (neuf,1,field:de
0001E0: 63 29 20 74 6F 20 6D 69 6E 70 6F 73 0D 0A 20 20 c) to minpos..
0001F0: 20 20 20 20 20 20 20 20 20 20 65 6E 64 69 66 0D endif.
Size : 512 (Real : 512)
000000: 6F 6D 66 69 63 68 2C 33 2C 38 29 2B 22 2E 65 6C omfich,3,8)+".el
000010: 66 20 6F 75 20 22 2B 24 28 6E 6F 6D 66 69 63 68 f ou "+$(nomfich
000020: 2C 33 2C 38 29 2B 22 2E 65 6C 69 20 6E 27 65 73 ,3,8)+".eli n'es
000030: 74 20 3B 0D 0A 70 61 73 20 73 75 72 20 6C 61 20 t ;..pas sur la
000040: 64 69 73 71 75 65 74 74 65 20 22 2B 75 6E 69 74 disquette "+unit
000050: 20 74 6F 20 6D 65 73 73 0D 0A 63 61 73 65 20 6E to mess..case n
000060: 6F 6D 65 73 73 20 3D 20 35 33 0D 0A 73 74 6F 72 omess = 53..stor
000070: 65 20 22 6C 65 20 66 69 63 68 69 65 72 20 22 2B e "le fichier "+
000080: 24 28 6E 6F 6D 66 69 63 68 2C 33 2C 38 29 2B 22 $(nomfich,3,8)+"
000090: 20 6F 75 20 6C 27 75 6E 20 64 65 20 73 65 73 20 ou l'un de ses
0000A0: 69 6E 64 65 78 20 6E 27 65 73 74 20 70 61 73 20 index n'est pas
0000B0: 73 75 72 20 3B 0D 0A 6C 61 20 64 69 73 71 75 65 sur ;..la disque
0000C0: 74 74 65 20 22 2B 75 6E 69 74 20 74 6F 20 6D 65 tte "+unit to me
0000D0: 73 73 0D 0A 65 6E 64 63 61 73 65 0D 0A 40 20 6C ss..endcase..@ l
0000E0: 69 67 6D 31 2C 30 20 73 61 79 20 6D 65 73 73 0D igm1,0 say mess.
0000F0: 0A 40 20 6C 69 67 6D 31 2B 31 2C 30 20 73 61 79 .@ ligm1+1,0 say
000100: 20 27 74 61 70 65 7A 20 73 75 72 20 75 6E 65 20 'tapez sur une
000110: 74 6F 75 63 68 65 20 70 6F 75 72 20 63 6F 6E 74 touche pour cont
000120: 69 6E 75 65 72 20 20 20 20 20 20 20 20 20 20 20 inuer
000130: 20 20 20 20 20 20 20 20 20 20 20 20 20 3B 0D 0A ;..
000140: 20 20 20 20 20 20 20 20 20 27 0D 0A 73 65 74 20 '..set
000150: 63 6F 6E 73 6F 6C 65 20 6F 66 66 0D 0A 77 61 69 console off..wai
000160: 74 0D 0A 73 65 74 20 63 6F 6E 73 6F 6C 65 20 6F t..set console o
000170: 6E 0D 0A 40 20 6C 69 67 6D 31 2C 30 0D 0A 40 20 n..@ ligm1,0..@
000180: 6C 69 67 6D 31 2B 31 2C 30 0D 0A 72 65 6C 65 61 ligm1+1,0..relea
000190: 73 65 20 6D 65 73 73 0D 0A 72 65 74 75 72 6E 0D se mess..return.
0001A0: 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D ................
0001B0: 0A 1A 1A 69 74 20 6F 62 6C 69 67 61 74 6F 69 72 ...it obligatoir
0001C0: 65 6D 65 6E 74 20 65 74 72 65 20 72 65 6E 73 65 ement etre rense
0001D0: 69 67 6E 7B 65 22 20 74 6F 20 6D 65 73 73 0D 0A ign{e" to mess..
0001E0: 63 61 73 65 20 6E 6F 6D 65 73 73 20 3D 20 31 32 case nomess = 12
0001F0: 0D 0A 73 74 6F 72 65 20 22 6C 61 20 7A 6F 6E 65 ..store "la zone
Size : 512 (Real : 512)
000000: 0A 20 20 20 20 20 20 20 20 20 65 6E 64 69 66 0D . endif.
000010: 0A 20 20 20 20 20 20 20 20 20 69 66 20 6D 7A 6F . if mzo
000020: 6E 65 3C 26 6D 69 6E 70 6F 73 2E 6F 72 2E 6D 7A ne<&minpos.or.mz
000030: 6F 6E 65 3E 26 6D 61 78 70 6F 73 0D 0A 20 20 20 one>&maxpos..
000040: 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 33 store 3
000050: 33 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 3 to nomess..
000060: 20 20 20 20 20 20 20 20 20 64 6F 20 61 66 66 6D do affm
000070: 65 73 73 0D 0A 20 20 20 20 20 20 20 20 20 65 6C ess.. el
000080: 73 65 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 se..
000090: 73 74 6F 72 65 20 27 74 27 20 74 6F 20 63 6F 72 store 't' to cor
0000A0: 72 65 63 74 0D 0A 20 20 20 20 20 20 20 20 20 65 rect.. e
0000B0: 6E 64 69 66 0D 0A 20 20 20 20 20 20 20 20 20 72 ndif.. r
0000C0: 65 6C 65 61 73 65 20 6E 65 75 66 2C 6E 62 65 6E elease neuf,nben
0000D0: 74 2C 6D 69 6E 70 6F 73 2C 6D 61 78 70 6F 73 0D t,minpos,maxpos.
0000E0: 0A 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 . endif..
0000F0: 20 65 6E 64 64 6F 0D 0A 20 20 20 64 6F 20 63 61 enddo.. do ca
000100: 73 65 0D 0A 20 20 20 20 20 20 63 61 73 65 20 66 se.. case f
000110: 69 65 6C 64 3A 74 79 70 65 3D 27 4E 27 0D 0A 20 ield:type='N'..
000120: 20 20 20 20 20 73 74 6F 72 65 20 63 6C 65 2B 73 store cle+s
000130: 74 72 28 6D 7A 6F 6E 65 2C 66 69 65 6C 64 3A 6C tr(mzone,field:l
000140: 65 6E 2C 66 69 65 6C 64 3A 64 65 63 29 20 74 6F en,field:dec) to
000150: 20 63 6C 65 0D 0A 20 20 20 20 20 20 73 74 6F 72 cle.. stor
000160: 65 20 26 7A 6F 6E 65 20 74 6F 20 65 78 70 0D 0A e &zone to exp..
000170: 20 20 20 20 20 20 63 61 73 65 20 24 28 76 65 72 case $(ver
000180: 69 66 2C 32 2C 31 29 3D 27 44 27 0D 0A 20 20 20 if,2,1)='D'..
000190: 20 20 20 73 74 6F 72 65 20 63 6C 65 2B 24 28 6D store cle+$(m
0001A0: 7A 6F 6E 65 2C 37 2C 32 29 2B 24 28 6D 7A 6F 6E zone,7,2)+$(mzon
0001B0: 65 2C 34 2C 32 29 2B 24 28 6D 7A 6F 6E 65 2C 31 e,4,2)+$(mzone,1
0001C0: 2C 32 29 20 74 6F 20 63 6C 65 0D 0A 20 20 20 20 ,2) to cle..
0001D0: 20 20 73 74 6F 72 65 20 65 78 70 2D 27 2B 24 28 store exp-'+$(
0001E0: 27 2D 26 7A 6F 6E 65 2D 27 2C 37 2C 32 29 2B 24 '-&zone-',7,2)+$
0001F0: 28 27 2D 26 7A 6F 6E 65 2D 27 2C 34 2C 32 29 2B ('-&zone-',4,2)+
Size : 512 (Real : 512)
000000: 7A 20 72 65 74 75 72 6E 20 70 6F 75 72 20 61 62 z return pour ab
000010: 61 6E 64 6F 6E 6E 65 72 27 0D 0A 20 20 20 65 6E andonner'.. en
000020: 64 69 66 0D 0A 20 20 20 72 65 61 64 0D 0A 20 20 dif.. read..
000030: 20 63 6C 65 61 72 20 67 65 74 0D 0A 20 20 20 40 clear get.. @
000040: 20 6C 69 67 6D 31 2C 30 0D 0A 20 20 20 2A 20 76 ligm1,0.. * v
000050: 65 75 74 2D 6F 6E 20 73 6F 72 74 69 72 0D 0A 20 eut-on sortir..
000060: 20 20 69 66 20 6D 6E 6F 6D 65 6C 65 6D 3D 27 20 if mnomelem='
000070: 27 0D 0A 20 20 20 20 20 20 69 66 20 65 6C 65 6D '.. if elem
000080: 3D 27 4C 27 2E 6F 72 2E 74 79 70 69 6E 64 65 78 ='L'.or.typindex
000090: 23 27 50 27 0D 0A 20 20 20 20 20 20 20 20 20 72 #'P'.. r
0000A0: 65 6C 65 61 73 65 20 63 6F 72 72 65 63 74 2C 6E elease correct,n
0000B0: 62 6C 69 73 74 2C 6D 6F 64 69 66 2C 74 79 70 69 blist,modif,typi
0000C0: 6E 64 65 78 2C 6D 6C 69 62 65 6C 65 6D 2C 63 6C ndex,mlibelem,cl
0000D0: 65 0D 0A 20 20 20 20 20 20 20 20 20 72 65 74 75 e.. retu
0000E0: 72 6E 0D 0A 20 20 20 20 20 20 65 6C 73 65 0D 0A rn.. else..
0000F0: 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 32 store 2
000100: 34 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 4 to nomess..
000110: 20 20 20 20 20 20 64 6F 20 61 66 66 6D 65 73 73 do affmess
000120: 0D 0A 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 .. endif..
000130: 20 20 65 6E 64 69 66 0D 0A 20 20 20 69 66 20 6E endif.. if n
000140: 6F 6D 65 73 73 20 3D 20 30 0D 0A 20 20 20 20 20 omess = 0..
000150: 20 73 74 6F 72 65 20 21 28 6D 6E 6F 6D 65 6C 65 store !(mnomele
000160: 6D 29 20 74 6F 20 6D 6E 6F 6D 65 6C 65 6D 0D 0A m) to mnomelem..
000170: 20 20 20 20 20 20 2A 20 6C 65 20 6E 6F 6D 20 65 * le nom e
000180: 78 69 73 74 65 2D 74 2D 69 6C 20 64 65 6A 61 0D xiste-t-il deja.
000190: 0A 20 20 20 20 20 20 73 74 6F 72 65 20 65 6C 65 . store ele
0001A0: 6D 2D 6D 6E 6F 6D 65 6C 65 6D 20 74 6F 20 63 6C m-mnomelem to cl
0001B0: 65 0D 0A 20 20 20 20 20 20 66 69 6E 64 20 26 63 e.. find &c
0001C0: 6C 65 0D 0A 20 20 20 20 20 20 69 66 20 23 20 23 le.. if # #
0001D0: 20 30 0D 0A 20 20 20 20 20 20 20 20 20 69 66 20 0.. if
0001E0: 65 6C 65 6D 3D 27 4C 27 0D 0A 20 20 20 20 20 20 elem='L'..
0001F0: 20 20 20 73 74 6F 72 65 20 36 20 74 6F 20 6E 6F store 6 to no
Size : 512 (Real : 512)
000000: 24 28 27 2D 26 7A 6F 6E 65 2D 27 2C 31 2C 32 29 $('-&zone-',1,2)
000010: 27 20 74 6F 20 65 78 70 0D 0A 20 20 20 20 20 20 ' to exp..
000020: 63 61 73 65 20 24 28 76 65 72 69 66 2C 32 2C 31 case $(verif,2,1
000030: 29 3D 27 4D 27 0D 0A 20 20 20 20 20 20 73 74 6F )='M'.. sto
000040: 72 65 20 63 6C 65 2B 24 28 6D 7A 6F 6E 65 2C 34 re cle+$(mzone,4
000050: 2C 32 29 2B 24 28 6D 7A 6F 6E 65 2C 31 2C 32 29 ,2)+$(mzone,1,2)
000060: 20 74 6F 20 63 6C 65 0D 0A 20 20 20 20 20 20 73 to cle.. s
000070: 74 6F 72 65 20 65 78 70 2D 27 2B 24 28 27 2D 26 tore exp-'+$('-&
000080: 7A 6F 6E 65 2D 27 2C 34 2C 32 29 2B 24 28 27 2D zone-',4,2)+$('-
000090: 26 7A 6F 6E 65 2D 27 2C 31 2C 32 29 27 20 74 6F &zone-',1,2)' to
0000A0: 20 65 78 70 0D 0A 20 20 20 20 20 20 6F 74 68 65 exp.. othe
0000B0: 72 77 69 73 65 0D 0A 20 20 20 20 20 20 73 74 6F rwise.. sto
0000C0: 72 65 20 63 6C 65 2B 21 28 6D 7A 6F 6E 65 29 20 re cle+!(mzone)
0000D0: 74 6F 20 63 6C 65 0D 0A 20 20 20 20 20 20 69 66 to cle.. if
0000E0: 20 26 64 65 62 3D 27 31 27 2E 61 6E 64 2E 26 66 &deb='1'.and.&f
0000F0: 69 6E 3D 27 46 27 0D 0A 20 20 20 20 20 20 20 20 in='F'..
000100: 20 73 74 6F 72 65 20 65 78 70 2D 27 2B 21 28 27 store exp-'+!('
000110: 2D 26 7A 6F 6E 65 2D 27 29 27 20 74 6F 20 65 78 -&zone-')' to ex
000120: 70 0D 0A 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 p.. else..
000130: 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 65 78 store ex
000140: 70 2D 27 2B 21 28 24 28 27 2D 26 7A 6F 6E 65 2D p-'+!($('-&zone-
000150: 27 2C 27 2D 26 64 65 62 2D 27 2C 27 2D 73 74 72 ','-&deb-','-str
000160: 28 6C 6F 6E 67 2C 33 29 2D 27 29 29 27 20 74 6F (long,3)-'))' to
000170: 20 65 78 70 0D 0A 20 20 20 20 20 20 65 6E 64 69 exp.. endi
000180: 66 0D 0A 20 20 20 65 6E 64 63 61 73 65 0D 0A 20 f.. endcase..
000190: 20 20 73 74 6F 72 65 20 63 70 74 2B 31 20 74 6F store cpt+1 to
0001A0: 20 63 70 74 0D 0A 20 20 20 73 74 6F 72 65 20 6C cpt.. store l
0001B0: 69 67 2B 31 20 74 6F 20 6C 69 67 0D 0A 65 6E 64 ig+1 to lig..end
0001C0: 64 6F 0D 0A 73 74 6F 72 65 20 24 28 63 6C 65 2C do..store $(cle,
0001D0: 32 2C 6C 65 6E 28 63 6C 65 29 2D 31 29 20 74 6F 2,len(cle)-1) to
0001E0: 20 63 6C 65 0D 0A 69 66 20 66 69 65 6C 64 3A 74 cle..if field:t
0001F0: 79 70 65 3D 27 4E 27 0D 0A 20 20 20 69 66 20 63 ype='N'.. if c
Size : 512 (Real : 512)
000000: 6D 65 73 73 0D 0A 20 20 20 20 20 20 20 20 20 65 mess.. e
000010: 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20 73 74 lse.. st
000020: 6F 72 65 20 31 30 20 74 6F 20 6E 6F 6D 65 73 73 ore 10 to nomess
000030: 0D 0A 20 20 20 20 20 20 20 20 20 65 6E 64 69 66 .. endif
000040: 0D 0A 20 20 20 20 20 20 20 20 20 64 6F 20 61 66 .. do af
000050: 66 6D 65 73 73 0D 0A 20 20 20 20 20 20 65 6C 73 fmess.. els
000060: 65 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 e.. stor
000070: 65 20 27 74 27 20 74 6F 20 63 6F 72 72 65 63 74 e 't' to correct
000080: 0D 0A 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 .. endif..
000090: 20 20 65 6E 64 69 66 0D 0A 65 6E 64 64 6F 0D 0A endif..enddo..
0000A0: 72 65 6C 65 61 73 65 20 63 6F 72 72 65 63 74 0D release correct.
0000B0: 0A 65 6E 64 69 66 0D 0A 73 74 6F 72 65 20 24 28 .endif..store $(
0000C0: 62 6C 61 6E 63 2C 31 2C 33 30 29 20 74 6F 20 6D blanc,1,30) to m
0000D0: 6C 69 62 65 6C 65 6D 0D 0A 40 20 36 2C 31 30 20 libelem..@ 6,10
0000E0: 73 61 79 20 27 6C 69 62 65 6C 6C 65 20 65 78 70 say 'libelle exp
0000F0: 6C 69 63 69 74 65 20 27 0D 0A 40 20 36 2C 34 30 licite '..@ 6,40
000100: 20 67 65 74 20 6D 6C 69 62 65 6C 65 6D 0D 0A 72 get mlibelem..r
000110: 65 61 64 0D 0A 69 66 20 65 6C 65 6D 3D 27 4C 27 ead..if elem='L'
000120: 0D 0A 20 20 20 61 70 70 65 6E 64 20 62 6C 61 6E .. append blan
000130: 6B 0D 0A 20 20 20 72 65 70 6C 61 63 65 20 74 79 k.. replace ty
000140: 70 65 6C 65 6D 20 77 69 74 68 20 27 4C 27 2C 6E pelem with 'L',n
000150: 6F 6D 65 6C 65 6D 20 77 69 74 68 20 6D 6E 6F 6D omelem with mnom
000160: 65 6C 65 6D 2C 6C 69 62 65 6C 65 6D 20 77 69 74 elem,libelem wit
000170: 68 20 6D 6C 69 62 65 6C 65 6D 0D 0A 20 20 20 75 h mlibelem.. u
000180: 73 65 0D 0A 20 20 20 73 65 6C 65 63 74 20 73 65 se.. select se
000190: 63 6F 6E 64 61 72 79 0D 0A 20 20 20 75 73 65 20 condary.. use
0001A0: 26 6E 6F 6D 66 69 63 68 0D 0A 20 20 20 3F 0D 0A &nomfich.. ?..
0001B0: 20 20 20 3F 20 22 45 6E 20 63 61 73 20 65 78 74 ? "En cas ext
0001C0: 72 65 6D 65 2C 20 76 6F 75 73 20 70 6F 75 76 65 reme, vous pouve
0001D0: 7A 20 73 74 6F 70 70 65 72 20 6C 27 65 74 61 70 z stopper l'etap
0001E0: 65 20 73 75 69 76 61 6E 74 65 20 64 75 20 70 72 e suivante du pr
0001F0: 6F 63 65 73 73 75 73 20 64 65 20 22 3B 0D 0A 20 ocessus de ";..
Size : 512 (Real : 512)
000000: 70 74 7A 3D 31 0D 0A 20 20 20 20 20 20 73 74 6F ptz=1.. sto
000010: 72 65 20 65 78 70 2B 27 3E 3D 26 63 6C 65 27 20 re exp+'>=&cle'
000020: 74 6F 20 65 78 70 64 0D 0A 20 20 20 65 6C 73 65 to expd.. else
000030: 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 65 78 .. store ex
000040: 70 2B 27 3C 3D 26 63 6C 65 27 20 74 6F 20 65 78 p+'<=&cle' to ex
000050: 70 66 0D 0A 20 20 20 65 6E 64 69 66 0D 0A 65 6C pf.. endif..el
000060: 73 65 0D 0A 20 20 69 66 20 63 70 74 7A 3D 31 0D se.. if cptz=1.
000070: 0A 20 20 20 20 20 73 74 6F 72 65 20 65 78 70 2B . store exp+
000080: 27 3E 3D 22 27 2B 63 6C 65 2B 27 22 27 20 74 6F '>="'+cle+'"' to
000090: 20 65 78 70 64 0D 0A 20 20 65 6C 73 65 0D 0A 20 expd.. else..
0000A0: 20 20 20 20 73 74 6F 72 65 20 65 78 70 2B 27 3C store exp+'<
0000B0: 3D 22 27 2B 63 6C 65 2B 27 22 27 20 74 6F 20 65 ="'+cle+'"' to e
0000C0: 78 70 66 0D 0A 20 20 65 6E 64 69 66 0D 0A 65 6E xpf.. endif..en
0000D0: 64 69 66 0D 0A 69 66 20 63 68 6F 69 78 20 3D 20 dif..if choix =
0000E0: 27 53 27 0D 0A 20 20 20 73 74 6F 72 65 20 27 35 'S'.. store '5
0000F0: 27 20 74 6F 20 63 68 6F 69 78 0D 0A 65 6E 64 69 ' to choix..endi
000100: 66 0D 0A 73 74 6F 72 65 20 74 72 69 6D 28 63 6C f..store trim(cl
000110: 65 29 20 74 6F 20 63 6C 65 0D 0A 72 65 6C 65 61 e) to cle..relea
000120: 73 65 20 63 70 74 2C 6C 69 67 2C 7A 6F 6E 65 2C se cpt,lig,zone,
000130: 64 65 62 2C 66 69 6E 2C 6C 6F 6E 67 2C 6D 7A 6F deb,fin,long,mzo
000140: 6E 2C 6D 7A 6F 6E 65 2C 65 78 70 2C 70 69 63 0D n,mzone,exp,pic.
000150: 0A 72 65 74 75 72 6E 0D 0A 0D 0A 0D 0A 0D 0A 0D .return.........
000160: 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D ................
000170: 0A 1A 1A 20 26 7A 6F 6E 65 20 74 6F 20 65 78 70 ... &zone to exp
000180: 0D 0A 20 20 20 20 20 20 63 61 73 65 20 24 28 76 .. case $(v
000190: 65 72 69 66 2C 32 2C 31 29 3D 27 44 27 0D 0A 20 erif,2,1)='D'..
0001A0: 20 20 20 20 20 73 74 6F 72 65 20 76 61 6C 2B 24 store val+$
0001B0: 28 6D 7A 6F 6E 65 2C 37 2C 32 29 2B 24 28 6D 7A (mzone,7,2)+$(mz
0001C0: 6F 6E 65 2C 34 2C 32 29 2B 24 28 6D 7A 6F 6E 65 one,4,2)+$(mzone
0001D0: 2C 31 2C 32 29 20 74 6F 20 76 61 6C 0D 0A 20 20 ,1,2) to val..
0001E0: 20 20 20 20 73 74 6F 72 65 20 65 78 70 2D 27 2B store exp-'+
0001F0: 24 28 27 2D 26 7A 6F 6E 65 2D 27 2C 37 2C 32 29 $('-&zone-',7,2)
Size : 512 (Real : 512)
000000: 20 20 2B 22 64 65 66 69 6E 69 74 69 6F 6E 22 0D +"definition".
000010: 0A 20 20 20 3F 20 22 61 75 20 6D 6F 79 65 6E 20 . ? "au moyen
000020: 64 65 20 6C 61 20 74 6F 75 63 68 65 20 65 78 69 de la touche exi
000030: 74 2D 20 74 61 70 65 7A 20 73 75 72 20 75 6E 65 t- tapez sur une
000040: 20 74 6F 75 63 68 65 20 70 6F 75 72 20 63 6F 6E touche pour con
000050: 74 69 6E 75 65 72 22 0D 0A 20 20 20 73 65 74 20 tinuer".. set
000060: 63 6F 6E 73 6F 6C 65 20 6F 66 66 0D 0A 20 20 20 console off..
000070: 77 61 69 74 0D 0A 20 20 20 73 65 74 20 63 6F 6E wait.. set con
000080: 73 6F 6C 65 20 6F 6E 0D 0A 20 20 20 65 72 61 73 sole on.. eras
000090: 65 0D 0A 20 20 20 73 74 6F 72 65 20 75 6E 69 74 e.. store unit
0000A0: 2B 6D 6E 6F 6D 65 6C 65 6D 20 74 6F 20 6D 6E 6F +mnomelem to mno
0000B0: 6D 65 6C 65 6D 0D 0A 20 20 20 72 65 70 6F 72 74 melem.. report
0000C0: 20 66 6F 72 6D 20 26 6D 6E 6F 6D 65 6C 65 6D 0D form &mnomelem.
0000D0: 0A 65 6C 73 65 0D 0A 20 20 20 69 66 20 6D 6F 64 .else.. if mod
0000E0: 69 66 3D 27 43 27 0D 0A 20 20 20 20 20 20 40 20 if='C'.. @
0000F0: 37 2C 31 30 20 73 61 79 20 27 74 79 70 65 20 64 7,10 say 'type d
000100: 65 20 6C 61 20 63 6C 65 20 20 20 20 20 20 20 20 e la cle
000110: 20 20 20 20 20 20 20 27 0D 0A 20 20 20 20 20 20 '..
000120: 40 20 38 2C 31 30 20 73 61 79 20 27 28 53 3D 73 @ 8,10 say '(S=s
000130: 65 63 6F 6E 64 61 69 72 65 2C 54 3D 74 65 6D 70 econdaire,T=temp
000140: 6F 72 61 69 72 65 29 27 0D 0A 20 20 20 20 20 20 oraire)'..
000150: 73 74 6F 72 65 20 27 66 27 20 74 6F 20 63 6F 72 store 'f' to cor
000160: 72 65 63 74 0D 0A 20 20 20 20 20 20 64 6F 20 77 rect.. do w
000170: 68 69 6C 65 20 63 6F 72 72 65 63 74 3D 27 66 27 hile correct='f'
000180: 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 .. store
000190: 20 27 54 27 20 74 6F 20 74 79 70 69 6E 64 65 78 'T' to typindex
0001A0: 0D 0A 20 20 20 20 20 20 20 20 20 40 20 38 2C 34 .. @ 8,4
0001B0: 30 20 67 65 74 20 74 79 70 69 6E 64 65 78 0D 0A 0 get typindex..
0001C0: 20 20 20 20 20 20 20 20 20 72 65 61 64 0D 0A 20 read..
0001D0: 20 20 20 20 20 20 20 20 63 6C 65 61 72 20 67 65 clear ge
0001E0: 74 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 t.. stor
0001F0: 65 20 21 28 74 79 70 69 6E 64 65 78 29 20 74 6F e !(typindex) to
Size : 512 (Real : 512)
000000: 2A 20 64 65 66 65 6C 65 6D 3A 20 64 65 66 69 6E * defelem: defin
000010: 69 74 69 6F 6E 20 64 27 75 6E 20 69 6E 64 65 78 ition d'un index
000020: 20 6F 75 20 64 27 75 6E 65 20 6C 69 73 74 65 0D ou d'une liste.
000030: 0A 0D 0A 73 65 6C 65 63 74 20 70 72 69 6D 61 72 ...select primar
000040: 79 0D 0A 75 73 65 20 26 66 65 6C 65 20 69 6E 64 y..use &fele ind
000050: 65 78 20 26 78 65 6C 65 0D 0A 69 66 20 6D 6F 64 ex &xele..if mod
000060: 69 66 23 27 4D 27 0D 0A 67 6F 74 6F 20 74 6F 70 if#'M'..goto top
000070: 0D 0A 63 6F 75 6E 74 20 66 6F 72 20 74 79 70 65 ..count for type
000080: 6C 65 6D 3D 65 6C 65 6D 20 74 6F 20 6E 62 6C 69 lem=elem to nbli
000090: 73 74 0D 0A 69 66 20 6E 62 6C 69 73 74 20 3E 3D st..if nblist >=
0000A0: 20 31 35 0D 0A 20 20 20 69 66 20 65 6C 65 6D 3D 15.. if elem=
0000B0: 27 4C 27 0D 0A 20 20 20 65 72 61 73 65 0D 0A 20 'L'.. erase..
0000C0: 20 20 73 74 6F 72 65 20 35 20 74 6F 20 6E 6F 6D store 5 to nom
0000D0: 65 73 73 0D 0A 20 20 20 65 6C 73 65 0D 0A 20 20 ess.. else..
0000E0: 20 73 74 6F 72 65 20 39 20 74 6F 20 6E 6F 6D 65 store 9 to nome
0000F0: 73 73 0D 0A 20 20 20 65 6E 64 69 66 0D 0A 20 20 ss.. endif..
000100: 20 64 6F 20 61 66 66 6D 65 73 73 0D 0A 20 20 20 do affmess..
000110: 72 65 6C 65 61 73 65 20 6D 6F 64 69 66 2C 6E 62 release modif,nb
000120: 6C 69 73 74 0D 0A 20 20 20 72 65 74 75 72 6E 0D list.. return.
000130: 0A 65 6E 64 69 66 0D 0A 65 72 61 73 65 0D 0A 69 .endif..erase..i
000140: 66 20 65 6C 65 6D 3D 27 4C 27 0D 0A 20 20 20 40 f elem='L'.. @
000150: 20 31 2C 38 20 73 61 79 20 22 44 45 46 49 4E 49 1,8 say "DEFINI
000160: 54 49 4F 4E 20 44 27 55 4E 45 20 4E 4F 55 56 45 TION D'UNE NOUVE
000170: 4C 4C 45 20 4C 49 53 54 45 20 50 4F 55 52 20 4C LLE LISTE POUR L
000180: 45 20 46 49 43 48 49 45 52 20 22 0D 0A 20 20 20 E FICHIER "..
000190: 40 20 35 2C 31 30 20 73 61 79 20 27 6E 6F 6D 20 @ 5,10 say 'nom
0001A0: 64 65 20 6C 61 20 6C 69 73 74 65 27 0D 0A 20 20 de la liste'..
0001B0: 20 73 74 6F 72 65 20 27 20 27 20 74 6F 20 74 79 store ' ' to ty
0001C0: 70 69 6E 64 65 78 0D 0A 65 6C 73 65 0D 0A 20 20 pindex..else..
0001D0: 20 64 6F 20 63 61 73 65 0D 0A 20 20 20 63 61 73 do case.. cas
0001E0: 65 20 6D 6F 64 69 66 3D 27 43 27 0D 0A 20 20 20 e modif='C'..
0001F0: 40 20 31 2C 38 20 73 61 79 20 22 44 45 46 49 4E @ 1,8 say "DEFIN
Size : 512 (Real : 512)
000000: 20 74 79 70 69 6E 64 65 78 0D 0A 20 20 20 20 20 typindex..
000010: 20 20 20 20 69 66 20 74 79 70 69 6E 64 65 78 23 if typindex#
000020: 27 53 27 2E 61 6E 64 2E 74 79 70 69 6E 64 65 78 'S'.and.typindex
000030: 23 27 54 27 0D 0A 20 20 20 20 20 20 20 20 20 20 #'T'..
000040: 20 20 73 74 6F 72 65 20 31 20 74 6F 20 6E 6F 6D store 1 to nom
000050: 65 73 73 0D 0A 20 20 20 20 20 20 20 20 20 20 20 ess..
000060: 20 64 6F 20 61 66 66 6D 65 73 73 0D 0A 20 20 20 do affmess..
000070: 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 else..
000080: 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 27 74 store 't
000090: 27 20 74 6F 20 63 6F 72 72 65 63 74 0D 0A 20 20 ' to correct..
0000A0: 20 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 endif..
0000B0: 20 20 20 20 65 6E 64 64 6F 0D 0A 20 20 20 20 20 enddo..
0000C0: 20 72 65 6C 65 61 73 65 20 63 6F 72 72 65 63 74 release correct
0000D0: 0D 0A 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 40 .. endif.. @
0000E0: 20 31 30 2C 31 35 20 73 61 79 20 27 6E 6F 6D 20 10,15 say 'nom
0000F0: 7A 6F 6E 65 27 0D 0A 20 20 20 69 66 20 74 79 70 zone'.. if typ
000100: 69 6E 64 65 78 20 23 20 27 50 27 0D 0A 20 20 20 index # 'P'..
000110: 20 20 20 40 20 31 30 2C 33 30 20 73 61 79 20 27 @ 10,30 say '
000120: 64 65 62 75 74 27 0D 0A 20 20 20 20 20 20 40 20 debut'.. @
000130: 31 30 2C 34 30 20 73 61 79 20 27 66 69 6E 27 0D 10,40 say 'fin'.
000140: 0A 20 20 20 20 20 20 69 66 20 6D 6F 64 69 66 20 . if modif
000150: 23 20 27 4D 27 0D 0A 20 20 20 20 20 20 20 20 20 # 'M'..
000160: 40 20 6C 69 67 6D 31 2C 30 20 73 61 79 20 27 74 @ ligm1,0 say 't
000170: 61 70 65 7A 20 72 65 74 75 72 6E 20 64 61 6E 73 apez return dans
000180: 20 6C 61 20 70 72 65 6D 69 65 72 65 20 7A 6F 6E la premiere zon
000190: 65 20 70 6F 75 72 20 61 62 61 6E 64 6F 6E 6E 65 e pour abandonne
0001A0: 72 27 0D 0A 20 20 20 20 20 20 65 6E 64 69 66 0D r'.. endif.
0001B0: 0A 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 73 65 . endif.. se
0001C0: 6C 65 63 74 20 73 65 63 6F 6E 64 61 72 79 0D 0A lect secondary..
0001D0: 20 20 20 75 73 65 20 26 66 72 65 66 20 69 6E 64 use &fref ind
0001E0: 65 78 20 26 78 6E 6F 6D 0D 0A 20 20 20 67 6F 74 ex &xnom.. got
0001F0: 6F 20 74 6F 70 0D 0A 20 20 20 73 74 6F 72 65 20 o top.. store
Size : 512 (Real : 512)
000000: 49 54 49 4F 4E 20 44 27 55 4E 45 20 4E 4F 55 56 ITION D'UNE NOUV
000010: 45 4C 4C 45 20 43 4C 45 20 53 55 52 20 4C 45 20 ELLE CLE SUR LE
000020: 46 49 43 48 49 45 52 22 0D 0A 20 20 20 73 74 6F FICHIER".. sto
000030: 72 65 20 27 54 27 20 74 6F 20 74 79 70 69 6E 64 re 'T' to typind
000040: 65 78 0D 0A 20 20 20 63 61 73 65 20 74 79 70 69 ex.. case typi
000050: 6E 64 65 78 3D 27 50 27 0D 0A 20 20 20 40 20 31 ndex='P'.. @ 1
000060: 2C 38 20 73 61 79 20 22 44 45 46 49 4E 49 54 49 ,8 say "DEFINITI
000070: 4F 4E 20 44 45 20 4C 27 49 4E 44 45 58 20 50 52 ON DE L'INDEX PR
000080: 49 4E 43 49 50 41 4C 20 44 55 20 46 49 43 48 49 INCIPAL DU FICHI
000090: 45 52 22 0D 0A 20 20 20 63 61 73 65 20 74 79 70 ER".. case typ
0000A0: 69 6E 64 65 78 3D 27 53 27 0D 0A 20 20 20 40 20 index='S'.. @
0000B0: 31 2C 38 20 73 61 79 20 22 44 45 46 49 4E 49 54 1,8 say "DEFINIT
0000C0: 49 4F 4E 20 44 27 55 4E 20 49 4E 44 45 58 20 53 ION D'UN INDEX S
0000D0: 45 43 4F 4E 44 41 49 52 45 20 53 55 52 20 4C 45 ECONDAIRE SUR LE
0000E0: 20 46 49 43 48 49 45 52 22 0D 0A 20 20 65 6E 64 FICHIER".. end
0000F0: 63 61 73 65 0D 0A 20 20 20 40 20 35 2C 31 30 20 case.. @ 5,10
000100: 73 61 79 20 27 6E 6F 6D 20 64 65 20 6C 61 20 63 say 'nom de la c
000110: 6C 65 27 0D 0A 65 6E 64 69 66 0D 0A 40 20 31 2C le'..endif..@ 1,
000120: 36 30 20 67 65 74 20 6E 6F 6D 61 66 66 0D 0A 63 60 get nomaff..c
000130: 6C 65 61 72 20 67 65 74 0D 0A 73 74 6F 72 65 20 lear get..store
000140: 27 66 27 20 74 6F 20 63 6F 72 72 65 63 74 0D 0A 'f' to correct..
000150: 64 6F 20 77 68 69 6C 65 20 63 6F 72 72 65 63 74 do while correct
000160: 3D 27 66 27 0D 0A 20 20 20 73 74 6F 72 65 20 30 ='f'.. store 0
000170: 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 73 to nomess.. s
000180: 74 6F 72 65 20 27 20 20 20 20 20 20 20 20 27 20 tore ' '
000190: 74 6F 20 6D 6E 6F 6D 65 6C 65 6D 0D 0A 20 20 20 to mnomelem..
0001A0: 40 20 35 2C 34 30 20 67 65 74 20 6D 6E 6F 6D 65 @ 5,40 get mnome
0001B0: 6C 65 6D 20 70 69 63 74 75 72 65 20 27 41 41 41 lem picture 'AAA
0001C0: 41 41 41 41 41 41 41 27 0D 0A 20 20 20 69 66 20 AAAAAAA'.. if
0001D0: 65 6C 65 6D 3D 27 4C 27 2E 6F 72 2E 74 79 70 69 elem='L'.or.typi
0001E0: 6E 64 65 78 23 27 50 27 0D 0A 20 20 20 40 20 6C ndex#'P'.. @ l
0001F0: 69 67 6D 31 2C 30 20 73 61 79 20 27 74 61 70 65 igm1,0 say 'tape
Size : 512 (Real : 512)
000000: 30 20 74 6F 20 6C 6F 6E 67 63 6C 65 0D 0A 20 20 0 to longcle..
000010: 20 73 74 6F 72 65 20 27 66 27 20 74 6F 20 66 69 store 'f' to fi
000020: 6E 7A 6F 6E 65 0D 0A 20 20 20 73 74 6F 72 65 20 nzone.. store
000030: 27 20 27 20 74 6F 20 63 6C 65 0D 0A 20 20 20 73 ' ' to cle.. s
000040: 74 6F 72 65 20 31 20 74 6F 20 63 70 74 69 0D 0A tore 1 to cpti..
000050: 20 20 20 73 74 6F 72 65 20 31 31 20 74 6F 20 6C store 11 to l
000060: 69 67 69 0D 0A 20 20 20 64 6F 20 77 68 69 6C 65 igi.. do while
000070: 20 63 70 74 69 20 3C 3D 20 35 2E 61 6E 64 2E 66 cpti <= 5.and.f
000080: 69 6E 7A 6F 6E 65 3D 27 66 27 0D 0A 20 20 20 20 inzone='f'..
000090: 20 20 73 74 6F 72 65 20 27 6D 7A 6F 6E 27 2D 73 store 'mzon'-s
0000A0: 74 72 28 63 70 74 69 2C 31 29 20 74 6F 20 6D 7A tr(cpti,1) to mz
0000B0: 6F 6E 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 on.. store
0000C0: 27 26 27 2D 6D 7A 6F 6E 20 74 6F 20 63 6C 65 6E '&'-mzon to clen
0000D0: 6F 6D 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 om.. store
0000E0: 27 20 20 20 20 20 20 20 20 20 20 27 20 74 6F 20 ' ' to
0000F0: 26 6D 7A 6F 6E 0D 0A 20 20 20 20 20 20 73 74 6F &mzon.. sto
000100: 72 65 20 27 6D 64 65 62 27 2D 73 74 72 28 63 70 re 'mdeb'-str(cp
000110: 74 69 2C 31 29 20 74 6F 20 6D 64 65 62 0D 0A 20 ti,1) to mdeb..
000120: 20 20 20 20 20 73 74 6F 72 65 20 27 31 20 20 27 store '1 '
000130: 20 74 6F 20 26 6D 64 65 62 0D 0A 20 20 20 20 20 to &mdeb..
000140: 20 73 74 6F 72 65 20 27 6D 66 69 6E 27 2D 73 74 store 'mfin'-st
000150: 72 28 63 70 74 69 2C 31 29 20 74 6F 20 6D 66 69 r(cpti,1) to mfi
000160: 6E 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 27 n.. store '
000170: 46 20 20 27 20 74 6F 20 26 6D 66 69 6E 0D 0A 20 F ' to &mfin..
000180: 20 20 20 20 20 73 74 6F 72 65 20 30 20 74 6F 20 store 0 to
000190: 6E 6F 6D 65 73 73 0D 0A 20 20 20 20 20 20 40 20 nomess.. @
0001A0: 6C 69 67 69 2C 31 30 20 67 65 74 20 26 6D 7A 6F ligi,10 get &mzo
0001B0: 6E 0D 0A 20 20 20 20 20 20 69 66 20 74 79 70 69 n.. if typi
0001C0: 6E 64 65 78 20 23 20 27 50 27 0D 0A 20 20 20 20 ndex # 'P'..
0001D0: 20 20 20 20 20 40 20 6C 69 67 69 2C 33 30 20 67 @ ligi,30 g
0001E0: 65 74 20 26 6D 64 65 62 0D 0A 20 20 20 20 20 20 et &mdeb..
0001F0: 20 20 20 40 20 6C 69 67 69 2C 34 30 20 67 65 74 @ ligi,40 get
Size : 512 (Real : 512)
000000: 20 20 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 store
000010: 20 35 20 74 6F 20 6C 6F 6E 67 0D 0A 20 20 20 20 5 to long..
000020: 20 20 20 20 20 20 20 20 63 61 73 65 20 66 69 65 case fie
000030: 6C 64 3A 74 79 70 65 3D 27 4E 27 0D 0A 20 20 20 ld:type='N'..
000040: 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 66 store f
000050: 69 65 6C 64 3A 6C 65 6E 20 74 6F 20 6C 6F 6E 67 ield:len to long
000060: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 6F 74 .. ot
000070: 68 65 72 77 69 73 65 0D 0A 20 20 20 20 20 20 20 herwise..
000080: 20 20 20 20 20 69 66 20 26 6D 66 69 6E 20 3D 20 if &mfin =
000090: 27 46 27 0D 0A 20 20 20 20 20 20 20 20 20 20 20 'F'..
0000A0: 20 20 20 20 73 74 6F 72 65 20 66 69 65 6C 64 3A store field:
0000B0: 6C 65 6E 20 74 6F 20 6C 6F 6E 67 0D 0A 20 20 20 len to long..
0000C0: 20 20 20 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 else..
0000D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 74 st
0000E0: 6F 72 65 20 76 61 6C 28 26 6D 66 69 6E 29 20 74 ore val(&mfin) t
0000F0: 6F 20 6C 6F 6E 67 0D 0A 20 20 20 20 20 20 20 20 o long..
000100: 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 endif..
000110: 20 20 20 20 20 20 20 73 74 6F 72 65 20 6C 6F 6E store lon
000120: 67 2D 76 61 6C 28 26 6D 64 65 62 29 2B 31 20 74 g-val(&mdeb)+1 t
000130: 6F 20 6C 6F 6E 67 0D 0A 20 20 20 20 20 20 20 20 o long..
000140: 20 65 6E 64 63 61 73 65 0D 0A 20 20 20 20 20 20 endcase..
000150: 20 20 20 69 66 20 6C 6F 6E 67 2B 6C 6F 6E 67 63 if long+longc
000160: 6C 65 20 3E 20 39 39 0D 0A 20 20 20 20 20 20 20 le > 99..
000170: 20 20 20 20 20 73 74 6F 72 65 20 34 37 20 74 6F store 47 to
000180: 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 20 20 20 20 nomess..
000190: 20 20 20 20 20 64 6F 20 61 66 66 6D 65 73 73 0D do affmess.
0001A0: 0A 20 20 20 20 20 20 20 20 20 65 6E 64 69 66 0D . endif.
0001B0: 0A 20 20 20 20 20 20 20 20 20 65 6E 64 63 61 73 . endcas
0001C0: 65 0D 0A 20 20 20 20 20 20 65 6E 64 69 66 0D 0A e.. endif..
0001D0: 20 20 20 20 20 20 69 66 20 6E 6F 6D 65 73 73 20 if nomess
0001E0: 3D 20 30 0D 0A 20 20 20 20 20 20 20 20 20 69 66 = 0.. if
0001F0: 20 66 69 6E 7A 6F 6E 65 3D 27 66 27 0D 0A 20 20 finzone='f'..
Size : 512 (Real : 512)
000000: 20 26 6D 66 69 6E 0D 0A 20 20 20 20 20 20 65 6E &mfin.. en
000010: 64 69 66 0D 0A 20 20 20 20 20 20 72 65 61 64 0D dif.. read.
000020: 0A 20 20 20 20 20 20 63 6C 65 61 72 20 67 65 74 . clear get
000030: 0D 0A 20 20 20 20 20 20 2A 20 63 6F 6E 74 72 6F .. * contro
000040: 6C 65 72 20 6C 61 20 76 61 6C 69 64 69 74 65 20 ler la validite
000050: 64 65 73 20 7A 6F 6E 65 73 0D 0A 20 20 20 20 20 des zones..
000060: 20 73 74 6F 72 65 20 21 28 26 6D 7A 6F 6E 29 20 store !(&mzon)
000070: 74 6F 20 26 6D 7A 6F 6E 0D 0A 20 20 20 20 20 20 to &mzon..
000080: 73 74 6F 72 65 20 21 28 26 6D 66 69 6E 29 20 74 store !(&mfin) t
000090: 6F 20 26 6D 66 69 6E 0D 0A 20 20 20 20 20 20 2A o &mfin.. *
0000A0: 20 6C 61 20 7A 6F 6E 65 20 65 73 74 2D 65 6C 6C la zone est-ell
0000B0: 65 20 64 65 6A 61 20 61 70 70 61 72 75 65 20 64 e deja apparue d
0000C0: 61 6E 73 20 63 65 74 20 69 6E 64 65 78 0D 0A 20 ans cet index..
0000D0: 20 20 20 20 20 69 66 20 74 79 70 69 6E 64 65 78 if typindex
0000E0: 20 3D 20 27 50 27 0D 0A 20 20 20 20 20 20 20 20 = 'P'..
0000F0: 20 73 74 6F 72 65 20 31 20 74 6F 20 63 70 74 32 store 1 to cpt2
000100: 0D 0A 20 20 20 20 20 20 20 20 20 64 6F 20 77 68 .. do wh
000110: 69 6C 65 20 63 70 74 32 20 3C 3D 20 63 70 74 69 ile cpt2 <= cpti
000120: 2D 31 2E 61 6E 64 2E 6E 6F 6D 65 73 73 20 3D 20 -1.and.nomess =
000130: 30 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 73 0.. s
000140: 74 6F 72 65 20 27 6D 7A 6F 6E 27 2D 73 74 72 28 tore 'mzon'-str(
000150: 63 70 74 32 2C 31 29 20 74 6F 20 6D 7A 6F 6E 70 cpt2,1) to mzonp
000160: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 69 66 .. if
000170: 20 26 6D 7A 6F 6E 3D 26 6D 7A 6F 6E 70 0D 0A 20 &mzon=&mzonp..
000180: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 74 st
000190: 6F 72 65 20 34 35 20 74 6F 20 6E 6F 6D 65 73 73 ore 45 to nomess
0001A0: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
0001B0: 20 64 6F 20 61 66 66 6D 65 73 73 0D 0A 20 20 20 do affmess..
0001C0: 20 20 20 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 else..
0001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 74 st
0001E0: 6F 72 65 20 63 70 74 32 2B 31 20 74 6F 20 63 70 ore cpt2+1 to cp
0001F0: 74 32 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 t2..
Size : 512 (Real : 512)
000000: 20 20 20 20 20 20 20 20 20 20 64 6F 20 63 61 73 do cas
000010: 65 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 63 e.. c
000020: 61 73 65 20 66 69 65 6C 64 3A 74 79 70 65 3D 27 ase field:type='
000030: 4E 27 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 N'..
000040: 73 74 6F 72 65 20 63 6C 65 2D 27 2B 27 2D 26 6D store cle-'+'-&m
000050: 7A 6F 6E 20 74 6F 20 63 6C 65 0D 0A 20 20 20 20 zon to cle..
000060: 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 27 74 store 't
000070: 27 20 74 6F 20 66 69 6E 7A 6F 6E 65 0D 0A 20 20 ' to finzone..
000080: 20 20 20 20 20 20 20 20 20 20 63 61 73 65 20 24 case $
000090: 28 76 65 72 69 66 2C 32 2C 31 29 3D 27 44 27 0D (verif,2,1)='D'.
0000A0: 0A 20 20 20 20 20 20 20 20 20 20 20 20 73 74 6F . sto
0000B0: 72 65 20 63 6C 65 2D 27 2B 24 28 27 2D 26 6D 7A re cle-'+$('-&mz
0000C0: 6F 6E 2D 27 2C 37 2C 32 29 2B 24 28 27 2D 26 6D on-',7,2)+$('-&m
0000D0: 7A 6F 6E 2D 27 2C 34 2C 32 29 2B 24 28 27 2D 26 zon-',4,2)+$('-&
0000E0: 6D 7A 6F 6E 3B 0D 0A 20 20 20 20 20 20 20 20 20 mzon;..
0000F0: 20 20 20 2D 27 2C 31 2C 32 29 27 20 74 6F 20 63 -',1,2)' to c
000100: 6C 65 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 le..
000110: 63 61 73 65 20 24 28 76 65 72 69 66 2C 32 2C 31 case $(verif,2,1
000120: 29 3D 27 4D 27 0D 0A 20 20 20 20 20 20 20 20 20 )='M'..
000130: 20 20 20 73 74 6F 72 65 20 63 6C 65 2D 27 2B 24 store cle-'+$
000140: 28 27 2D 26 6D 7A 6F 6E 2D 27 2C 34 2C 32 29 2B ('-&mzon-',4,2)+
000150: 24 28 27 2D 26 6D 7A 6F 6E 2D 27 2C 31 2C 32 29 $('-&mzon-',1,2)
000160: 27 20 74 6F 20 63 6C 65 0D 0A 20 20 20 20 20 20 ' to cle..
000170: 20 20 20 20 20 20 63 61 73 65 20 76 61 6C 28 26 case val(&
000180: 6D 64 65 62 29 3D 31 2E 61 6E 64 2E 26 6D 66 69 mdeb)=1.and.&mfi
000190: 6E 3D 27 46 27 0D 0A 20 20 20 20 20 20 20 20 20 n='F'..
0001A0: 20 20 20 73 74 6F 72 65 20 63 6C 65 2D 27 2B 21 store cle-'+!
0001B0: 28 27 2D 26 6D 7A 6F 6E 2D 27 29 27 20 74 6F 20 ('-&mzon-')' to
0001C0: 63 6C 65 0D 0A 20 20 20 20 20 20 20 20 20 20 20 cle..
0001D0: 20 6F 74 68 65 72 77 69 73 65 0D 0A 20 20 20 20 otherwise..
0001E0: 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 63 6C store cl
0001F0: 65 2D 27 2B 21 28 24 28 27 2D 26 6D 7A 6F 6E 2D e-'+!($('-&mzon-
Size : 512 (Real : 512)
000000: 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 20 20 20 endif..
000010: 65 6E 64 64 6F 0D 0A 20 20 20 20 20 20 20 20 20 enddo..
000020: 72 65 6C 65 61 73 65 20 63 70 74 32 2C 6D 7A 6F release cpt2,mzo
000030: 6E 70 0D 0A 20 20 20 20 20 20 65 6E 64 69 66 0D np.. endif.
000040: 0A 20 20 20 20 20 20 69 66 20 6E 6F 6D 65 73 73 . if nomess
000050: 20 3D 20 30 0D 0A 20 20 20 20 20 20 20 20 20 2A = 0.. *
000060: 20 6C 61 20 7A 6F 6E 65 20 65 78 69 73 74 65 2D la zone existe-
000070: 74 2D 65 6C 6C 65 0D 0A 20 20 20 20 20 20 20 20 t-elle..
000080: 20 66 69 6E 64 20 26 63 6C 65 6E 6F 6D 0D 0A 20 find &clenom..
000090: 20 20 20 20 20 20 20 20 64 6F 20 63 61 73 65 0D do case.
0000A0: 0A 20 20 20 20 20 20 20 20 20 63 61 73 65 20 26 . case &
0000B0: 6D 7A 6F 6E 20 3D 20 27 20 27 2E 61 6E 64 2E 63 mzon = ' '.and.c
0000C0: 70 74 69 3D 31 0D 0A 20 20 20 20 20 20 20 20 20 pti=1..
0000D0: 69 66 20 74 79 70 69 6E 64 65 78 20 3D 20 27 50 if typindex = 'P
0000E0: 27 2E 6F 72 2E 6D 6F 64 69 66 3D 27 4D 27 0D 0A '.or.modif='M'..
0000F0: 20 20 20 20 20 20 20 20 20 20 20 20 73 74 6F 72 stor
000100: 65 20 31 31 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A e 11 to nomess..
000110: 20 20 20 20 20 20 20 20 20 20 20 20 64 6F 20 61 do a
000120: 66 66 6D 65 73 73 0D 0A 20 20 20 20 20 20 20 20 ffmess..
000130: 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20 else..
000140: 20 20 20 72 65 6C 65 61 73 65 20 6D 6F 64 69 66 release modif
000150: 2C 6E 62 6C 69 73 74 2C 74 79 70 69 6E 64 65 78 ,nblist,typindex
000160: 2C 6D 6C 69 62 65 6C 65 6D 2C 63 6C 65 2C 6C 6F ,mlibelem,cle,lo
000170: 6E 67 63 6C 65 2C 66 69 6E 7A 6F 6E 65 2C 63 70 ngcle,finzone,cp
000180: 74 69 2C 7A 6F 6E 0D 0A 20 20 20 20 20 20 20 20 ti,zon..
000190: 20 20 20 20 72 65 6C 65 61 73 65 20 6C 69 67 69 release ligi
0001A0: 2C 6D 7A 6F 6E 2C 63 6C 65 6E 6F 6D 2C 6D 7A 6F ,mzon,clenom,mzo
0001B0: 6E 31 2C 6D 64 65 62 2C 6D 64 65 62 31 2C 6D 66 n1,mdeb,mdeb1,mf
0001C0: 69 6E 2C 6D 66 69 6E 31 2C 6C 6C 6F 6E 67 2C 6C in,mfin1,llong,l
0001D0: 6F 6E 67 31 0D 0A 20 20 20 20 20 20 20 20 20 20 ong1..
0001E0: 20 20 72 65 74 75 72 6E 0D 0A 20 20 20 20 20 20 return..
0001F0: 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 endif..
Size : 512 (Real : 512)
000000: 27 2C 27 2D 26 6D 64 65 62 2D 27 2C 27 2D 73 74 ','-&mdeb-','-st
000010: 72 28 6C 6F 6E 67 2C 33 29 2D 27 29 29 27 20 74 r(long,3)-'))' t
000020: 6F 20 63 6C 65 0D 0A 20 20 20 20 20 20 20 20 20 o cle..
000030: 20 20 20 65 6E 64 63 61 73 65 0D 0A 20 20 20 20 endcase..
000040: 20 20 20 20 20 20 20 20 69 66 20 63 70 74 69 3D if cpti=
000050: 31 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 40 1.. @
000060: 20 6C 69 67 6D 31 2C 30 0D 0A 20 20 20 20 20 20 ligm1,0..
000070: 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 endif..
000080: 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 6C store l
000090: 6F 6E 67 63 6C 65 2B 6C 6F 6E 67 20 74 6F 20 6C ongcle+long to l
0000A0: 6F 6E 67 63 6C 65 0D 0A 20 20 20 20 20 20 20 20 ongcle..
0000B0: 20 20 20 20 69 66 20 6C 6F 6E 67 63 6C 65 20 3D if longcle =
0000C0: 20 39 39 0D 0A 20 20 20 20 20 20 20 20 20 20 20 99..
0000D0: 20 73 74 6F 72 65 20 27 74 27 20 74 6F 20 66 69 store 't' to fi
0000E0: 6E 7A 6F 6E 65 0D 0A 20 20 20 20 20 20 20 20 20 nzone..
0000F0: 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 endif..
000100: 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 else..
000110: 20 20 20 20 20 73 74 6F 72 65 20 63 70 74 69 2D store cpti-
000120: 31 20 74 6F 20 63 70 74 69 0D 0A 20 20 20 20 20 1 to cpti..
000130: 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 endif..
000140: 20 20 20 20 69 66 20 66 69 6E 7A 6F 6E 65 3D 27 if finzone='
000150: 66 27 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 f'..
000160: 73 74 6F 72 65 20 63 70 74 69 2B 31 20 74 6F 20 store cpti+1 to
000170: 63 70 74 69 0D 0A 20 20 20 20 20 20 20 20 20 20 cpti..
000180: 20 20 73 74 6F 72 65 20 6C 69 67 69 2B 31 20 74 store ligi+1 t
000190: 6F 20 6C 69 67 69 0D 0A 20 20 20 20 20 20 20 20 o ligi..
0001A0: 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 65 6E endif.. en
0001B0: 64 69 66 0D 0A 20 20 20 65 6E 64 64 6F 0D 0A 20 dif.. enddo..
0001C0: 20 20 72 65 6C 65 61 73 65 20 6C 6F 6E 67 63 6C release longcl
0001D0: 65 2C 6C 6F 6E 67 0D 0A 20 20 20 73 74 6F 72 65 e,long.. store
0001E0: 20 63 70 74 69 20 74 6F 20 63 70 74 69 6D 61 78 cpti to cptimax
0001F0: 0D 0A 20 20 20 69 66 20 63 70 74 69 6D 61 78 3D .. if cptimax=
Size : 512 (Real : 512)
000000: 20 20 20 63 61 73 65 20 26 6D 7A 6F 6E 20 3D 20 case &mzon =
000010: 27 20 27 0D 0A 20 20 20 20 20 20 20 20 20 73 74 ' '.. st
000020: 6F 72 65 20 27 74 27 20 74 6F 20 66 69 6E 7A 6F ore 't' to finzo
000030: 6E 65 0D 0A 20 20 20 20 20 20 20 20 20 63 61 73 ne.. cas
000040: 65 20 23 20 3D 20 30 0D 0A 20 20 20 20 20 20 20 e # = 0..
000050: 20 20 73 74 6F 72 65 20 31 32 20 74 6F 20 6E 6F store 12 to no
000060: 6D 65 73 73 0D 0A 20 20 20 20 20 20 20 20 20 64 mess.. d
000070: 6F 20 61 66 66 6D 65 73 73 0D 0A 20 20 20 20 20 o affmess..
000080: 20 20 20 20 2A 20 6C 61 20 7A 6F 6E 65 20 65 73 * la zone es
000090: 74 2D 65 6C 6C 65 20 61 6C 70 68 61 62 65 74 69 t-elle alphabeti
0000A0: 71 75 65 0D 0A 20 20 20 20 20 20 20 20 20 63 61 que.. ca
0000B0: 73 65 20 66 69 65 6C 64 3A 74 79 70 65 20 3D 20 se field:type =
0000C0: 27 4C 27 2E 6F 72 2E 66 69 65 6C 64 3A 74 79 70 'L'.or.field:typ
0000D0: 65 3D 27 4E 27 2E 61 6E 64 2E 63 70 74 69 23 31 e='N'.and.cpti#1
0000E0: 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 .. store
0000F0: 20 31 33 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 13 to nomess..
000100: 20 20 20 20 20 20 20 20 64 6F 20 61 66 66 6D 65 do affme
000110: 73 73 0D 0A 20 20 20 20 20 20 20 20 20 2A 20 70 ss.. * p
000120: 6F 73 69 74 69 6F 6E 20 64 65 20 64 65 62 75 74 osition de debut
000130: 20 63 6F 72 72 65 63 74 65 20 3F 0D 0A 20 20 20 correcte ?..
000140: 20 20 20 20 20 20 63 61 73 65 20 76 61 6C 28 26 case val(&
000150: 6D 64 65 62 29 20 3D 20 30 2E 6F 72 2E 76 61 6C mdeb) = 0.or.val
000160: 28 26 6D 64 65 62 29 3E 66 69 65 6C 64 3A 6C 65 (&mdeb)>field:le
000170: 6E 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 n.. stor
000180: 65 20 31 34 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A e 14 to nomess..
000190: 20 20 20 20 20 20 20 20 20 64 6F 20 61 66 66 6D do affm
0001A0: 65 73 73 0D 0A 20 20 20 20 20 20 20 20 20 2A 20 ess.. *
0001B0: 70 6F 73 69 74 69 6F 6E 20 66 69 6E 20 63 6F 72 position fin cor
0001C0: 72 65 63 74 65 20 3F 0D 0A 20 20 20 20 20 20 20 recte ?..
0001D0: 20 20 63 61 73 65 20 21 28 26 6D 66 69 6E 29 23 case !(&mfin)#
0001E0: 27 46 27 2E 61 6E 64 2E 28 76 61 6C 28 26 6D 66 'F'.and.(val(&mf
0001F0: 69 6E 29 3C 76 61 6C 28 26 6D 64 65 62 29 2E 6F in)<val(&mdeb).o
Size : 512 (Real : 512)
000000: 36 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 35 6.. store 5
000010: 20 74 6F 20 63 70 74 69 6D 61 78 0D 0A 20 20 20 to cptimax..
000020: 65 6E 64 69 66 0D 0A 20 20 20 73 65 6C 65 63 74 endif.. select
000030: 20 70 72 69 6D 61 72 79 0D 0A 20 20 20 75 73 65 primary.. use
000040: 20 26 66 65 6C 65 20 69 6E 64 65 78 20 26 78 65 &fele index &xe
000050: 6C 65 0D 0A 20 20 20 61 70 70 65 6E 64 20 62 6C le.. append bl
000060: 61 6E 6B 0D 0A 20 20 20 72 65 70 6C 61 63 65 20 ank.. replace
000070: 74 79 70 65 6C 65 6D 20 77 69 74 68 20 27 43 27 typelem with 'C'
000080: 2C 6E 6F 6D 65 6C 65 6D 20 77 69 74 68 20 6D 6E ,nomelem with mn
000090: 6F 6D 65 6C 65 6D 2C 20 6C 69 62 65 6C 65 6D 20 omelem, libelem
0000A0: 77 69 74 68 20 6D 6C 69 62 65 6C 65 6D 2C 3B 0D with mlibelem,;.
0000B0: 0A 20 20 20 74 79 70 63 20 77 69 74 68 20 74 79 . typc with ty
0000C0: 70 69 6E 64 65 78 0D 0A 20 20 20 73 74 6F 72 65 pindex.. store
0000D0: 20 31 20 74 6F 20 63 70 74 69 0D 0A 20 20 20 64 1 to cpti.. d
0000E0: 6F 20 77 68 69 6C 65 20 63 70 74 69 3C 3D 63 70 o while cpti<=cp
0000F0: 74 69 6D 61 78 0D 0A 20 20 20 20 20 20 73 74 6F timax.. sto
000100: 72 65 20 27 6D 7A 6F 6E 27 2D 73 74 72 28 63 70 re 'mzon'-str(cp
000110: 74 69 2C 31 29 20 74 6F 20 6D 7A 6F 6E 0D 0A 20 ti,1) to mzon..
000120: 20 20 20 20 20 73 74 6F 72 65 20 27 7A 6F 6E 27 store 'zon'
000130: 2D 73 74 72 28 63 70 74 69 2C 31 29 20 74 6F 20 -str(cpti,1) to
000140: 7A 6F 6E 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 zon.. store
000150: 20 27 6D 64 65 62 27 2D 73 74 72 28 63 70 74 69 'mdeb'-str(cpti
000160: 2C 31 29 20 74 6F 20 6D 64 65 62 0D 0A 20 20 20 ,1) to mdeb..
000170: 20 20 20 73 74 6F 72 65 20 27 64 65 62 27 2D 73 store 'deb'-s
000180: 74 72 28 63 70 74 69 2C 31 29 20 74 6F 20 64 65 tr(cpti,1) to de
000190: 62 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 27 b.. store '
0001A0: 6D 66 69 6E 27 2D 73 74 72 28 63 70 74 69 2C 31 mfin'-str(cpti,1
0001B0: 29 20 74 6F 20 6D 66 69 6E 0D 0A 20 20 20 20 20 ) to mfin..
0001C0: 20 73 74 6F 72 65 20 27 66 69 6E 27 2D 73 74 72 store 'fin'-str
0001D0: 28 63 70 74 69 2C 31 29 20 74 6F 20 66 69 6E 0D (cpti,1) to fin.
0001E0: 0A 20 20 20 20 20 20 72 65 70 6C 61 63 65 20 26 . replace &
0001F0: 7A 6F 6E 20 77 69 74 68 20 26 6D 7A 6F 6E 2C 26 zon with &mzon,&
Size : 512 (Real : 512)
000000: 72 2E 76 61 6C 28 26 6D 66 69 6E 29 3E 3B 0D 0A r.val(&mfin)>;..
000010: 20 20 20 20 20 20 20 20 20 66 69 65 6C 64 3A 6C field:l
000020: 65 6E 29 0D 0A 20 20 20 20 20 20 20 20 20 73 74 en).. st
000030: 6F 72 65 20 31 35 20 74 6F 20 6E 6F 6D 65 73 73 ore 15 to nomess
000040: 0D 0A 20 20 20 20 20 20 20 20 20 64 6F 20 61 66 .. do af
000050: 66 6D 65 73 73 0D 0A 20 20 20 20 20 20 20 20 20 fmess..
000060: 63 61 73 65 20 24 28 76 65 72 69 66 2C 32 2C 31 case $(verif,2,1
000070: 29 3D 27 44 27 2E 61 6E 64 2E 28 76 61 6C 28 26 )='D'.and.(val(&
000080: 6D 64 65 62 29 23 31 2E 6F 72 2E 28 76 61 6C 28 mdeb)#1.or.(val(
000090: 26 6D 66 69 6E 29 23 38 2E 61 6E 64 2E 26 6D 66 &mfin)#8.and.&mf
0000A0: 69 6E 3B 0D 0A 23 27 46 27 29 29 2E 6F 72 2E 24 in;..#'F')).or.$
0000B0: 28 76 65 72 69 66 2C 32 2C 31 29 3D 27 4D 27 2E (verif,2,1)='M'.
0000C0: 61 6E 64 2E 28 76 61 6C 28 26 6D 64 65 62 29 23 and.(val(&mdeb)#
0000D0: 31 2E 6F 72 2E 28 76 61 6C 28 26 6D 66 69 6E 29 1.or.(val(&mfin)
0000E0: 23 35 2E 61 6E 64 2E 26 6D 66 69 6E 23 27 46 27 #5.and.&mfin#'F'
0000F0: 29 29 2E 3B 0D 0A 6F 72 2E 66 69 65 6C 64 3A 74 )).;..or.field:t
000100: 79 70 65 3D 27 4E 27 2E 61 6E 64 2E 28 76 61 6C ype='N'.and.(val
000110: 28 26 6D 64 65 62 29 23 31 2E 6F 72 2E 28 76 61 (&mdeb)#1.or.(va
000120: 6C 28 26 6D 66 69 6E 29 23 66 69 65 6C 64 3A 6C l(&mfin)#field:l
000130: 65 6E 2E 61 6E 64 2E 26 6D 66 69 6E 23 27 46 27 en.and.&mfin#'F'
000140: 29 29 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F )).. sto
000150: 72 65 20 33 34 20 74 6F 20 6E 6F 6D 65 73 73 0D re 34 to nomess.
000160: 0A 20 20 20 20 20 20 20 20 20 64 6F 20 61 66 66 . do aff
000170: 6D 65 73 73 0D 0A 20 20 20 20 20 20 20 20 20 6F mess.. o
000180: 74 68 65 72 77 69 73 65 0D 0A 20 20 20 20 20 20 therwise..
000190: 20 20 20 64 6F 20 63 61 73 65 0D 0A 20 20 20 20 do case..
0001A0: 20 20 20 20 20 20 20 20 63 61 73 65 20 24 28 76 case $(v
0001B0: 65 72 69 66 2C 32 2C 31 29 3D 27 44 27 0D 0A 20 erif,2,1)='D'..
0001C0: 20 20 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 store
0001D0: 20 38 20 74 6F 20 6C 6F 6E 67 0D 0A 20 20 20 20 8 to long..
0001E0: 20 20 20 20 20 20 20 20 63 61 73 65 20 24 28 76 case $(v
0001F0: 65 72 69 66 2C 32 2C 31 29 3D 27 4D 27 0D 0A 20 erif,2,1)='M'..
Size : 512 (Real : 512)
000000: 64 65 62 20 77 69 74 68 20 26 6D 64 65 62 2C 26 deb with &mdeb,&
000010: 66 69 6E 20 77 69 74 68 20 26 6D 66 69 6E 0D 0A fin with &mfin..
000020: 20 20 20 20 20 20 2A 20 6D 65 74 74 72 65 20 61 * mettre a
000030: 20 6A 6F 75 72 20 6E 6F 7A 20 64 61 6E 64 20 2E jour noz dand .
000040: 72 65 66 0D 0A 20 20 20 20 20 20 69 66 20 74 79 ref.. if ty
000050: 70 69 6E 64 65 78 20 3D 20 27 50 27 0D 0A 20 20 pindex = 'P'..
000060: 20 20 20 20 20 20 20 73 65 6C 65 63 74 20 73 65 select se
000070: 63 6F 6E 64 61 72 79 0D 0A 20 20 20 20 20 20 20 condary..
000080: 20 20 75 73 65 20 26 66 72 65 66 20 69 6E 64 65 use &fref inde
000090: 78 20 26 78 6E 6F 6D 0D 0A 20 20 20 20 20 20 20 x &xnom..
0000A0: 20 20 73 74 6F 72 65 20 27 26 27 2D 6D 7A 6F 6E store '&'-mzon
0000B0: 20 74 6F 20 6E 6F 6D 7A 0D 0A 20 20 20 20 20 20 to nomz..
0000C0: 20 20 20 66 69 6E 64 20 26 6E 6F 6D 7A 0D 0A 20 find &nomz..
0000D0: 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 23 20 store #
0000E0: 74 6F 20 6E 6F 63 6F 75 72 0D 0A 20 20 20 20 20 to nocour..
0000F0: 20 20 20 20 73 65 74 20 69 6E 64 65 78 20 74 6F set index to
000100: 20 26 78 63 6C 65 0D 0A 20 20 20 20 20 20 20 20 &xcle..
000110: 20 67 6F 74 6F 20 6E 6F 63 6F 75 72 0D 0A 20 20 goto nocour..
000120: 20 20 20 20 20 20 20 72 65 70 6C 61 63 65 20 6E replace n
000130: 6F 7A 20 77 69 74 68 20 63 70 74 69 0D 0A 20 20 oz with cpti..
000140: 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 endif..
000150: 20 73 74 6F 72 65 20 63 70 74 69 2B 31 20 74 6F store cpti+1 to
000160: 20 63 70 74 69 0D 0A 20 20 20 65 6E 64 64 6F 0D cpti.. enddo.
000170: 0A 20 20 20 73 65 6C 65 63 74 20 70 72 69 6D 61 . select prima
000180: 72 79 0D 0A 20 20 20 72 65 70 6C 61 63 65 20 6E ry.. replace n
000190: 62 7A 6F 6E 65 73 20 77 69 74 68 20 63 70 74 69 bzones with cpti
0001A0: 6D 61 78 0D 0A 20 20 20 69 66 20 74 79 70 69 6E max.. if typin
0001B0: 64 65 78 3D 27 50 27 0D 0A 20 20 20 20 20 20 73 dex='P'.. s
0001C0: 65 6C 65 63 74 20 73 65 63 6F 6E 64 61 72 79 0D elect secondary.
0001D0: 0A 20 20 20 20 20 20 75 73 65 20 26 66 72 65 66 . use &fref
0001E0: 0D 0A 20 20 20 20 20 20 67 6F 74 6F 20 74 6F 70 .. goto top
0001F0: 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 63 70 .. store cp
Size : 512 (Real : 512)
000000: 2A 20 6C 69 73 74 65 6C 65 6D 3A 20 6C 69 73 74 * listelem: list
000010: 65 20 64 65 73 20 63 6C 65 73 20 6F 75 20 64 65 e des cles ou de
000020: 73 20 6C 69 73 74 65 73 20 64 65 66 69 6E 69 65 s listes definie
000030: 73 20 70 61 72 20 6C 27 75 74 69 6C 69 73 61 74 s par l'utilisat
000040: 65 75 72 0D 0A 0D 0A 73 65 6C 65 63 74 20 70 72 eur....select pr
000050: 69 6D 61 72 79 0D 0A 75 73 65 20 26 66 65 6C 65 imary..use &fele
000060: 20 69 6E 64 65 78 20 26 78 65 6C 65 0D 0A 67 6F index &xele..go
000070: 74 6F 20 74 6F 70 0D 0A 66 69 6E 64 20 26 65 6C to top..find &el
000080: 65 6D 0D 0A 69 66 20 23 20 3D 20 30 0D 0A 73 74 em..if # = 0..st
000090: 6F 72 65 20 31 39 20 74 6F 20 6E 6F 6D 65 73 73 ore 19 to nomess
0000A0: 0D 0A 64 6F 20 61 66 66 6D 65 73 73 0D 0A 72 65 ..do affmess..re
0000B0: 74 75 72 6E 0D 0A 65 6E 64 69 66 0D 0A 65 72 61 turn..endif..era
0000C0: 73 65 0D 0A 69 66 20 65 6C 65 6D 3D 27 4C 27 0D se..if elem='L'.
0000D0: 0A 40 20 31 2C 38 20 73 61 79 20 27 4C 49 53 54 .@ 1,8 say 'LIST
0000E0: 45 53 20 51 55 45 20 56 4F 55 53 20 41 56 45 5A ES QUE VOUS AVEZ
0000F0: 20 44 45 46 49 4E 49 45 53 20 50 4F 55 52 20 4C DEFINIES POUR L
000100: 45 20 46 49 43 48 49 45 52 27 0D 0A 65 6C 73 65 E FICHIER'..else
000110: 0D 0A 40 20 31 2C 38 20 73 61 79 20 27 43 4C 45 ..@ 1,8 say 'CLE
000120: 53 20 51 55 45 20 56 4F 55 53 20 41 56 45 5A 20 S QUE VOUS AVEZ
000130: 44 45 46 49 4E 49 45 53 20 53 55 52 20 4C 45 20 DEFINIES SUR LE
000140: 46 49 43 48 49 45 52 27 0D 0A 65 6E 64 69 66 0D FICHIER'..endif.
000150: 0A 73 74 6F 72 65 20 24 28 6E 6F 6D 66 69 63 68 .store $(nomfich
000160: 2C 33 2C 38 29 20 74 6F 20 6E 6F 6D 61 66 66 0D ,3,8) to nomaff.
000170: 0A 40 20 31 2C 36 30 20 67 65 74 20 6E 6F 6D 61 .@ 1,60 get noma
000180: 66 66 0D 0A 63 6C 65 61 72 20 67 65 74 0D 0A 40 ff..clear get..@
000190: 20 35 2C 35 20 73 61 79 20 22 76 6F 75 6C 65 7A 5,5 say "voulez
0001A0: 2D 76 6F 75 73 20 76 6F 74 72 65 20 6C 69 73 74 -vous votre list
0001B0: 65 20 73 75 72 20 6C 27 69 6D 70 72 69 6D 61 6E e sur l'impriman
0001C0: 74 65 28 4F 3D 6F 75 69 2C 4E 3D 6E 6F 6E 29 3A te(O=oui,N=non):
0001D0: 22 0D 0A 73 74 6F 72 65 20 27 66 27 20 74 6F 20 "..store 'f' to
0001E0: 63 6F 72 72 65 63 74 0D 0A 64 6F 20 77 68 69 6C correct..do whil
0001F0: 65 20 63 6F 72 72 65 63 74 3D 27 66 27 0D 0A 20 e correct='f'..
Size : 512 (Real : 512)
000000: 74 69 6D 61 78 2B 31 20 74 6F 20 63 70 74 69 0D timax+1 to cpti.
000010: 0A 20 20 20 20 20 20 64 6F 20 77 68 69 6C 65 20 . do while
000020: 2E 6E 6F 74 2E 65 6F 66 0D 0A 20 20 20 20 20 20 .not.eof..
000030: 20 20 20 69 66 20 6E 6F 7A 3D 30 0D 0A 20 20 20 if noz=0..
000040: 20 20 20 20 20 20 73 74 6F 72 65 20 23 20 74 6F store # to
000050: 20 6E 6F 63 6F 75 72 0D 0A 20 20 20 20 20 20 20 nocour..
000060: 20 20 73 65 74 20 69 6E 64 65 78 20 74 6F 20 26 set index to &
000070: 78 63 6C 65 0D 0A 20 20 20 20 20 20 20 20 20 67 xcle.. g
000080: 6F 74 6F 20 6E 6F 63 6F 75 72 0D 0A 20 20 20 20 oto nocour..
000090: 20 20 20 20 20 72 65 70 6C 61 63 65 20 6E 6F 7A replace noz
0000A0: 20 77 69 74 68 20 63 70 74 69 0D 0A 20 20 20 20 with cpti..
0000B0: 20 20 20 20 20 73 65 74 20 69 6E 64 65 78 20 74 set index t
0000C0: 6F 0D 0A 20 20 20 20 20 20 20 20 20 67 6F 74 6F o.. goto
0000D0: 20 6E 6F 63 6F 75 72 0D 0A 20 20 20 20 20 20 20 nocour..
0000E0: 20 20 73 74 6F 72 65 20 63 70 74 69 2B 31 20 74 store cpti+1 t
0000F0: 6F 20 63 70 74 69 0D 0A 20 20 20 20 20 20 20 20 o cpti..
000100: 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 20 20 endif..
000110: 20 73 6B 69 70 0D 0A 20 20 20 20 20 20 65 6E 64 skip.. end
000120: 64 6F 0D 0A 20 20 20 65 6E 64 69 66 0D 0A 20 20 do.. endif..
000130: 20 73 65 6C 65 63 74 20 73 65 63 6F 6E 64 61 72 select secondar
000140: 79 0D 0A 20 20 20 75 73 65 20 26 6E 6F 6D 66 69 y.. use &nomfi
000150: 63 68 0D 0A 20 20 20 73 74 6F 72 65 20 24 28 63 ch.. store $(c
000160: 6C 65 2C 32 2C 6C 65 6E 28 63 6C 65 29 2D 31 29 le,2,len(cle)-1)
000170: 20 74 6F 20 63 6C 65 0D 0A 20 20 20 73 74 6F 72 to cle.. stor
000180: 65 20 75 6E 69 74 2B 6D 6E 6F 6D 65 6C 65 6D 20 e unit+mnomelem
000190: 74 6F 20 6D 6E 6F 6D 65 6C 65 6D 0D 0A 20 20 20 to mnomelem..
0001A0: 69 6E 64 65 78 20 6F 6E 20 26 63 6C 65 20 74 6F index on &cle to
0001B0: 20 26 6D 6E 6F 6D 65 6C 65 6D 0D 0A 20 20 20 73 &mnomelem.. s
0001C0: 65 74 20 69 6E 64 65 78 20 74 6F 20 26 6D 6E 6F et index to &mno
0001D0: 6D 65 6C 65 6D 0D 0A 20 20 20 75 73 65 0D 0A 20 melem.. use..
0001E0: 20 20 73 65 6C 65 63 74 20 70 72 69 6D 61 72 79 select primary
0001F0: 0D 0A 20 20 20 75 73 65 0D 0A 65 6E 64 69 66 0D .. use..endif.
Size : 512 (Real : 512)
000000: 20 20 73 74 6F 72 65 20 27 4E 27 20 74 6F 20 72 store 'N' to r
000010: 65 70 0D 0A 20 20 20 40 20 35 2C 36 32 20 67 65 ep.. @ 5,62 ge
000020: 74 20 72 65 70 0D 0A 20 20 20 72 65 61 64 0D 0A t rep.. read..
000030: 20 20 20 63 6C 65 61 72 20 67 65 74 0D 0A 20 20 clear get..
000040: 20 73 74 6F 72 65 20 21 28 72 65 70 29 20 74 6F store !(rep) to
000050: 20 72 65 70 0D 0A 20 20 20 64 6F 20 63 61 73 65 rep.. do case
000060: 0D 0A 20 20 20 63 61 73 65 20 72 65 70 3D 27 4F .. case rep='O
000070: 27 0D 0A 20 20 20 73 65 74 20 66 6F 72 6D 61 74 '.. set format
000080: 20 74 6F 20 70 72 69 6E 74 0D 0A 20 20 20 73 65 to print.. se
000090: 74 20 70 72 69 6E 74 20 6F 6E 0D 0A 20 20 20 73 t print on.. s
0000A0: 74 6F 72 65 20 27 74 27 20 74 6F 20 63 6F 72 72 tore 't' to corr
0000B0: 65 63 74 0D 0A 20 20 20 63 61 73 65 20 72 65 70 ect.. case rep
0000C0: 3D 27 4E 27 0D 0A 20 20 20 73 74 6F 72 65 20 27 ='N'.. store '
0000D0: 74 27 20 74 6F 20 63 6F 72 72 65 63 74 0D 0A 20 t' to correct..
0000E0: 20 20 6F 74 68 65 72 77 69 73 65 0D 0A 20 20 20 otherwise..
0000F0: 73 74 6F 72 65 20 31 20 74 6F 20 6E 6F 6D 65 73 store 1 to nomes
000100: 73 0D 0A 20 20 20 64 6F 20 61 66 66 6D 65 73 73 s.. do affmess
000110: 0D 0A 20 20 20 65 6E 64 63 61 73 65 0D 0A 65 6E .. endcase..en
000120: 64 64 6F 0D 0A 65 72 61 73 65 0D 0A 69 66 20 65 ddo..erase..if e
000130: 6C 65 6D 3D 27 4C 27 0D 0A 40 20 31 2C 38 20 73 lem='L'..@ 1,8 s
000140: 61 79 20 27 4C 49 53 54 45 53 20 51 55 45 20 56 ay 'LISTES QUE V
000150: 4F 55 53 20 41 56 45 5A 20 44 45 46 49 4E 49 45 OUS AVEZ DEFINIE
000160: 53 20 50 4F 55 52 20 4C 45 20 46 49 43 48 49 45 S POUR LE FICHIE
000170: 52 20 27 2B 6E 6F 6D 61 66 66 0D 0A 40 20 33 2C R '+nomaff..@ 3,
000180: 35 20 73 61 79 20 27 6E 6F 6D 20 6C 69 73 74 65 5 say 'nom liste
000190: 27 0D 0A 40 20 33 2C 35 30 20 73 61 79 20 27 6C '..@ 3,50 say 'l
0001A0: 69 62 65 6C 6C 65 20 65 78 70 6C 69 63 69 74 65 ibelle explicite
0001B0: 27 0D 0A 73 74 6F 72 65 20 35 20 74 6F 20 6C 69 '..store 5 to li
0001C0: 67 0D 0A 65 6C 73 65 0D 0A 40 20 31 2C 38 20 73 g..else..@ 1,8 s
0001D0: 61 79 20 27 43 4C 45 53 20 51 55 45 20 56 4F 55 ay 'CLES QUE VOU
0001E0: 53 20 41 56 45 5A 20 44 45 46 49 4E 49 45 53 20 S AVEZ DEFINIES
0001F0: 53 55 52 20 4C 45 20 46 49 43 48 49 45 52 20 27 SUR LE FICHIER '
Size : 512 (Real : 512)
000000: 0A 69 66 20 65 6C 65 6D 3D 27 4C 27 0D 0A 3F 0D .if elem='L'..?.
000010: 0A 3F 20 27 73 69 20 76 6F 74 72 65 20 64 65 66 .? 'si votre def
000020: 69 6E 69 74 69 6F 6E 20 65 73 74 20 69 6E 63 6F inition est inco
000030: 72 72 65 63 74 65 2C 20 69 6C 20 66 61 75 74 20 rrecte, il faut
000040: 6C 61 20 73 75 70 70 72 69 6D 65 72 20 65 74 20 la supprimer et
000050: 6C 61 20 27 0D 0A 3F 20 27 72 65 63 6F 6D 6D 65 la '..? 'recomme
000060: 6E 63 65 72 20 65 6E 20 65 6E 74 69 65 72 2E 20 ncer en entier.
000070: 74 61 70 65 7A 20 73 75 72 20 75 6E 65 20 74 6F tapez sur une to
000080: 75 63 68 65 20 70 6F 75 72 20 63 6F 6E 74 69 6E uche pour contin
000090: 75 65 72 27 0D 0A 73 65 74 20 63 6F 6E 73 6F 6C uer'..set consol
0000A0: 65 20 6F 66 66 0D 0A 77 61 69 74 0D 0A 73 65 74 e off..wait..set
0000B0: 20 63 6F 6E 73 6F 6C 65 20 6F 6E 0D 0A 65 6E 64 console on..end
0000C0: 69 66 0D 0A 72 65 6C 65 61 73 65 20 6E 62 6C 69 if..release nbli
0000D0: 73 74 2C 6D 6E 6F 6D 63 2C 6D 6C 69 62 63 2C 66 st,mnomc,mlibc,f
0000E0: 69 6E 7A 6F 6E 65 2C 63 70 74 69 2C 6C 69 67 69 inzone,cpti,ligi
0000F0: 2C 6D 7A 6F 6E 2C 6D 7A 6F 6E 31 2C 6D 7A 6F 6E ,mzon,mzon1,mzon
000100: 32 2C 6D 7A 6F 6E 33 2C 6D 7A 6F 6E 34 2C 6D 7A 2,mzon3,mzon4,mz
000110: 6F 6E 35 0D 0A 72 65 6C 65 61 73 65 20 63 6C 65 on5..release cle
000120: 2C 6D 64 65 62 2C 6D 64 65 62 31 2C 6D 64 65 62 ,mdeb,mdeb1,mdeb
000130: 32 2C 6D 64 65 62 33 2C 6D 64 65 62 34 2C 6D 64 2,mdeb3,mdeb4,md
000140: 65 62 35 0D 0A 72 65 6C 65 61 73 65 20 6D 66 69 eb5..release mfi
000150: 6E 2C 6D 66 69 6E 31 2C 6D 66 69 6E 32 2C 6D 66 n,mfin1,mfin2,mf
000160: 69 6E 33 2C 6D 66 69 6E 34 2C 6D 66 69 6E 35 0D in3,mfin4,mfin5.
000170: 0A 72 65 6C 65 61 73 65 20 6C 6C 6F 6E 67 2C 6C .release llong,l
000180: 6F 6E 67 31 2C 6C 6F 6E 67 32 2C 6C 6F 6E 67 33 ong1,long2,long3
000190: 2C 6C 6F 6E 67 34 2C 6C 6F 6E 67 35 0D 0A 72 65 ,long4,long5..re
0001A0: 6C 65 61 73 65 20 63 70 74 69 6D 61 78 2C 7A 6F lease cptimax,zo
0001B0: 6E 2C 6D 6F 64 69 66 2C 74 79 70 69 6E 64 65 78 n,modif,typindex
0001C0: 2C 6D 6C 69 62 65 6C 65 6D 2C 66 69 6E 7A 6F 6E ,mlibelem,finzon
0001D0: 65 2C 63 70 74 69 2C 6C 69 67 69 2C 63 6C 65 6E e,cpti,ligi,clen
0001E0: 6F 6D 0D 0A 72 65 6C 65 61 73 65 20 6E 6F 6D 7A om..release nomz
0001F0: 2C 6E 6F 63 6F 75 72 2C 64 65 62 2C 66 69 6E 0D ,nocour,deb,fin.
Size : 512 (Real : 512)
000000: 2B 6E 6F 6D 61 66 66 0D 0A 73 74 6F 72 65 20 33 +nomaff..store 3
000010: 20 74 6F 20 6C 69 67 0D 0A 73 74 6F 72 65 20 31 to lig..store 1
000020: 20 74 6F 20 63 70 74 0D 0A 65 6E 64 69 66 0D 0A to cpt..endif..
000030: 64 6F 20 77 68 69 6C 65 20 2E 6E 6F 74 2E 20 65 do while .not. e
000040: 6F 66 2E 61 6E 64 2E 74 79 70 65 6C 65 6D 3D 65 of.and.typelem=e
000050: 6C 65 6D 0D 0A 20 20 20 69 66 20 65 6C 65 6D 3D lem.. if elem=
000060: 27 4C 27 0D 0A 20 20 20 20 20 20 40 20 6C 69 67 'L'.. @ lig
000070: 2C 35 20 73 61 79 20 6E 6F 6D 65 6C 65 6D 0D 0A ,5 say nomelem..
000080: 20 20 20 20 20 20 40 20 6C 69 67 2C 33 35 20 73 @ lig,35 s
000090: 61 79 20 6C 69 62 65 6C 65 6D 0D 0A 20 20 20 20 ay libelem..
0000A0: 20 20 73 74 6F 72 65 20 6C 69 67 2B 31 20 74 6F store lig+1 to
0000B0: 20 6C 69 67 0D 0A 20 20 20 65 6C 73 65 0D 0A 20 lig.. else..
0000C0: 20 20 20 20 20 69 66 20 63 70 74 20 3E 20 34 2E if cpt > 4.
0000D0: 61 6E 64 2E 72 65 70 3D 27 4E 27 0D 0A 20 20 20 and.rep='N'..
0000E0: 20 20 20 20 20 20 40 20 6C 69 67 6D 31 2B 31 2C @ ligm1+1,
0000F0: 30 20 73 61 79 20 27 74 61 70 65 7A 20 73 75 72 0 say 'tapez sur
000100: 20 75 6E 65 20 74 6F 75 63 68 65 20 70 6F 75 72 une touche pour
000110: 20 61 76 6F 69 72 20 6C 61 20 73 75 69 74 65 20 avoir la suite
000120: 64 65 20 6C 61 20 6C 69 73 74 65 27 0D 0A 20 20 de la liste'..
000130: 20 20 20 20 20 20 20 73 65 74 20 63 6F 6E 73 6F set conso
000140: 6C 65 20 6F 66 66 0D 0A 20 20 20 20 20 20 20 20 le off..
000150: 20 77 61 69 74 0D 0A 20 20 20 20 20 20 20 20 20 wait..
000160: 73 65 74 20 63 6F 6E 73 6F 6C 65 20 6F 6E 0D 0A set console on..
000170: 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 31 store 1
000180: 20 74 6F 20 63 70 74 0D 0A 20 20 20 20 20 20 20 to cpt..
000190: 20 20 40 20 6C 69 67 6D 31 2B 31 2C 30 0D 0A 20 @ ligm1+1,0..
0001A0: 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 33 20 store 3
0001B0: 74 6F 20 6C 69 67 0D 0A 20 20 20 20 20 20 20 20 to lig..
0001C0: 20 65 72 61 73 65 0D 0A 20 20 20 20 20 20 20 20 erase..
0001D0: 20 40 20 31 2C 38 20 73 61 79 20 27 43 4C 45 53 @ 1,8 say 'CLES
0001E0: 20 51 55 45 20 56 4F 55 53 20 41 56 45 5A 20 44 QUE VOUS AVEZ D
0001F0: 45 46 49 4E 49 45 53 20 53 55 52 20 4C 45 20 46 EFINIES SUR LE F
Size : 512 (Real : 512)
000000: 0A 72 65 74 75 72 6E 0D 0A 0D 0A 0D 0A 0D 0A 0D .return.........
000010: 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D ................
000020: 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D ................
000030: 0A 0D 0A 0D 0A 0D 0A 0D 0A 1A 1A 6F 6D 65 73 73 ...........omess
000040: 0D 0A 20 20 20 20 20 20 20 20 20 64 6F 20 61 66 .. do af
000050: 66 6D 65 73 73 0D 0A 20 20 20 20 20 20 20 20 20 fmess..
000060: 63 61 73 65 20 24 28 76 65 72 69 66 2C 32 2C 31 case $(verif,2,1
000070: 29 3D 27 44 27 2E 61 6E 64 2E 28 76 61 6C 28 26 )='D'.and.(val(&
000080: 6D 64 65 62 29 23 31 2E 6F 72 2E 28 76 61 6C 28 mdeb)#1.or.(val(
000090: 26 6D 66 69 6E 29 23 38 2E 61 6E 64 2E 26 6D 66 &mfin)#8.and.&mf
0000A0: 69 6E 3B 0D 0A 23 27 46 27 29 29 2E 6F 72 2E 24 in;..#'F')).or.$
0000B0: 28 76 65 72 69 66 2C 32 2C 31 29 3D 27 4D 27 2E (verif,2,1)='M'.
0000C0: 61 6E 64 2E 28 76 61 6C 28 26 6D 64 65 62 29 23 and.(val(&mdeb)#
0000D0: 31 2E 6F 72 2E 28 76 61 6C 28 26 6D 66 69 6E 29 1.or.(val(&mfin)
0000E0: 23 35 2E 61 6E 64 2E 26 6D 66 69 6E 23 27 46 27 #5.and.&mfin#'F'
0000F0: 29 29 2E 3B 0D 0A 6F 72 2E 66 69 65 6C 64 3A 74 )).;..or.field:t
000100: 79 70 65 3D 27 4E 27 2E 61 6E 64 2E 28 76 61 6C ype='N'.and.(val
000110: 28 26 6D 64 65 62 29 23 31 2E 6F 72 2E 28 76 61 (&mdeb)#1.or.(va
000120: 6C 28 26 6D 66 69 6E 29 23 66 69 65 6C 64 3A 6C l(&mfin)#field:l
000130: 65 6E 2E 61 6E 64 2E 26 6D 66 69 6E 23 27 46 27 en.and.&mfin#'F'
000140: 29 29 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F )).. sto
000150: 72 65 20 33 34 20 74 6F 20 6E 6F 6D 65 73 73 0D re 34 to nomess.
000160: 0A 20 20 20 20 20 20 20 20 20 64 6F 20 61 66 66 . do aff
000170: 6D 65 73 73 0D 0A 20 20 20 20 20 20 20 20 20 6F mess.. o
000180: 74 68 65 72 77 69 73 65 0D 0A 20 20 20 20 20 20 therwise..
000190: 20 20 20 64 6F 20 63 61 73 65 0D 0A 20 20 20 20 do case..
0001A0: 20 20 20 20 20 20 20 20 63 61 73 65 20 24 28 76 case $(v
0001B0: 65 72 69 66 2C 32 2C 31 29 3D 27 44 27 0D 0A 20 erif,2,1)='D'..
0001C0: 20 20 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 store
0001D0: 20 38 20 74 6F 20 6C 6F 6E 67 0D 0A 20 20 20 20 8 to long..
0001E0: 20 20 20 20 20 20 20 20 63 61 73 65 20 24 28 76 case $(v
0001F0: 65 72 69 66 2C 32 2C 31 29 3D 27 4D 27 0D 0A 20 erif,2,1)='M'..
Size : 512 (Real : 512)
000000: 49 43 48 49 45 52 20 27 2B 6E 6F 6D 61 66 66 0D ICHIER '+nomaff.
000010: 0A 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 . endif..
000020: 20 20 20 20 64 6F 20 63 61 73 65 0D 0A 20 20 20 do case..
000030: 20 20 20 63 61 73 65 20 74 79 70 63 3D 27 50 27 case typc='P'
000040: 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 27 69 .. store 'i
000050: 6E 64 65 78 20 70 72 69 6E 63 69 70 61 6C 20 2D ndex principal -
000060: 20 6D 69 73 65 20 61 20 6A 6F 75 72 20 61 75 74 mise a jour aut
000070: 6F 6D 61 74 69 71 75 65 27 20 74 6F 20 63 6F 6D omatique' to com
000080: 6D 65 6E 74 0D 0A 20 20 20 20 20 20 63 61 73 65 ment.. case
000090: 20 74 79 70 63 3D 27 53 27 0D 0A 20 20 20 20 20 typc='S'..
0000A0: 20 73 74 6F 72 65 20 27 69 6E 64 65 78 20 73 65 store 'index se
0000B0: 63 6F 6E 64 61 69 72 65 20 2D 20 6D 69 73 65 20 condaire - mise
0000C0: 61 20 6A 6F 75 72 20 61 75 74 6F 6D 61 74 69 71 a jour automatiq
0000D0: 75 65 27 20 74 6F 20 63 6F 6D 6D 65 6E 74 0D 0A ue' to comment..
0000E0: 20 20 20 20 20 20 6F 74 68 65 72 77 69 73 65 0D otherwise.
0000F0: 0A 20 20 20 20 20 20 73 74 6F 72 65 20 27 69 6E . store 'in
000100: 64 65 78 20 74 65 6D 70 6F 72 61 69 72 65 20 2D dex temporaire -
000110: 20 6D 69 73 65 20 61 20 6A 6F 75 72 20 6E 6F 6E mise a jour non
000120: 20 61 75 74 6F 6D 61 74 69 71 75 65 27 20 74 6F automatique' to
000130: 20 63 6F 6D 6D 65 6E 74 0D 0A 20 20 20 20 20 20 comment..
000140: 65 6E 64 63 61 73 65 0D 0A 20 20 20 20 20 20 40 endcase.. @
000150: 20 6C 69 67 2C 30 20 73 61 79 20 27 2A 2A 2A 2A lig,0 say '****
000160: 2A 20 27 2B 6E 6F 6D 65 6C 65 6D 2B 27 20 27 2B * '+nomelem+' '+
000170: 6C 69 62 65 6C 65 6D 0D 0A 20 20 20 20 20 20 40 libelem.. @
000180: 20 6C 69 67 2C 34 38 20 73 61 79 20 27 7A 6F 6E lig,48 say 'zon
000190: 65 20 31 3A 20 27 2B 7A 6F 6E 31 2B 27 20 64 65 e 1: '+zon1+' de
0001A0: 20 27 2B 64 65 62 31 2B 27 20 61 20 27 2B 66 69 '+deb1+' a '+fi
0001B0: 6E 31 0D 0A 20 20 20 20 20 20 69 66 20 7A 6F 6E n1.. if zon
0001C0: 32 23 27 20 27 0D 0A 20 20 20 20 20 20 40 20 6C 2#' '.. @ l
0001D0: 69 67 2B 31 2C 30 20 73 61 79 20 27 7A 6F 6E 65 ig+1,0 say 'zone
0001E0: 20 32 3A 20 27 2B 7A 6F 6E 32 2B 27 20 64 65 20 2: '+zon2+' de
0001F0: 27 2B 64 65 62 32 2B 27 20 61 20 27 2B 66 69 6E '+deb2+' a '+fin
Size : 512 (Real : 512)
000000: 27 4C 27 0D 0A 40 20 39 2C 35 20 73 61 79 20 22 'L'..@ 9,5 say "
000010: 6C 61 20 7A 6F 6E 65 20 64 6F 69 74 20 65 74 72 la zone doit etr
000020: 65 20 70 6C 75 73 20 67 72 61 6E 64 65 20 6F 75 e plus grande ou
000030: 20 65 67 61 6C 65 20 61 20 20 20 20 20 20 20 20 egale a
000040: 20 20 20 20 20 22 0D 0A 40 20 31 30 2C 35 20 73 "..@ 10,5 s
000050: 61 79 20 22 75 6E 65 20 61 75 74 72 65 20 7A 6F ay "une autre zo
000060: 6E 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ne
000070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000080: 20 20 3D 3D 3D 3D 3E 20 47 22 0D 0A 40 20 31 31 ====> G"..@ 11
000090: 2C 35 20 73 61 79 20 22 6C 61 20 7A 6F 6E 65 20 ,5 say "la zone
0000A0: 64 6F 69 74 20 65 74 72 65 20 70 6C 75 73 20 70 doit etre plus p
0000B0: 65 74 69 74 65 20 6F 75 20 65 67 61 6C 65 20 61 etite ou egale a
0000C0: 20 20 20 20 20 20 20 20 20 20 20 20 22 0D 0A 40 "..@
0000D0: 20 31 32 2C 35 20 73 61 79 20 22 75 6E 65 20 61 12,5 say "une a
0000E0: 75 74 72 65 20 7A 6F 6E 65 20 20 20 20 20 20 20 utre zone
0000F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000100: 20 20 20 20 20 20 20 20 20 3D 3D 3D 3D 3E 20 50 ====> P
000110: 22 0D 0A 65 6E 64 69 66 0D 0A 64 6F 20 77 68 69 "..endif..do whi
000120: 6C 65 20 63 6F 72 72 65 63 74 3D 27 66 27 0D 0A le correct='f'..
000130: 20 20 20 73 74 6F 72 65 20 27 4E 27 20 74 6F 20 store 'N' to
000140: 72 65 70 0D 0A 20 20 20 40 20 31 35 2C 35 20 73 rep.. @ 15,5 s
000150: 61 79 20 22 72 65 70 6F 6E 73 65 20 3D 3D 3D 3D ay "reponse ====
000160: 3E 22 0D 0A 20 20 20 73 65 74 20 69 6E 74 65 6E >".. set inten
000170: 73 69 74 79 20 6F 66 66 0D 0A 20 20 20 40 20 31 sity off.. @ 1
000180: 35 2C 32 35 20 67 65 74 20 72 65 70 0D 0A 20 20 5,25 get rep..
000190: 20 73 65 74 20 69 6E 74 65 6E 73 69 74 79 20 6F set intensity o
0001A0: 6E 0D 0A 20 20 20 72 65 61 64 0D 0A 20 20 20 73 n.. read.. s
0001B0: 74 6F 72 65 20 21 28 72 65 70 29 20 74 6F 20 72 tore !(rep) to r
0001C0: 65 70 0D 0A 20 20 20 64 6F 20 63 61 73 65 0D 0A ep.. do case..
0001D0: 20 20 20 63 61 73 65 20 72 65 70 3D 27 4E 27 2E case rep='N'.
0001E0: 6F 72 2E 72 65 70 3D 27 4F 27 0D 0A 20 20 20 73 or.rep='O'.. s
0001F0: 74 6F 72 65 20 27 74 27 20 74 6F 20 63 6F 72 72 tore 't' to corr
Size : 512 (Real : 512)
000000: 32 0D 0A 20 20 20 20 20 20 69 66 20 7A 6F 6E 33 2.. if zon3
000010: 23 27 20 27 0D 0A 20 20 20 20 20 20 40 20 6C 69 #' '.. @ li
000020: 67 2B 31 2C 34 30 20 73 61 79 20 27 7A 6F 6E 65 g+1,40 say 'zone
000030: 20 33 3A 20 27 2B 7A 6F 6E 33 2B 27 20 64 65 20 3: '+zon3+' de
000040: 27 2B 64 65 62 33 2B 27 20 61 20 27 2B 66 69 6E '+deb3+' a '+fin
000050: 33 0D 0A 20 20 20 20 20 20 69 66 20 7A 6F 6E 34 3.. if zon4
000060: 23 27 20 27 0D 0A 20 20 20 20 20 20 40 20 6C 69 #' '.. @ li
000070: 67 2B 32 2C 30 20 73 61 79 20 27 7A 6F 6E 65 20 g+2,0 say 'zone
000080: 34 3A 20 27 2B 7A 6F 6E 34 2B 27 20 64 65 20 27 4: '+zon4+' de '
000090: 2B 64 65 62 34 2B 27 20 61 20 27 2B 66 69 6E 34 +deb4+' a '+fin4
0000A0: 0D 0A 20 20 20 20 20 20 69 66 20 7A 6F 6E 35 23 .. if zon5#
0000B0: 27 20 27 0D 0A 20 20 20 20 20 20 40 20 6C 69 67 ' '.. @ lig
0000C0: 2B 32 2C 34 30 20 73 61 79 20 27 7A 6F 6E 65 20 +2,40 say 'zone
0000D0: 35 3A 20 27 2B 7A 6F 6E 35 2B 27 20 64 65 20 27 5: '+zon5+' de '
0000E0: 2B 64 65 62 35 2B 27 20 61 20 27 2B 66 69 6E 35 +deb5+' a '+fin5
0000F0: 0D 0A 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 .. endif..
000100: 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 endif..
000110: 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 65 endif.. e
000120: 6E 64 69 66 0D 0A 20 20 20 20 20 20 3F 20 63 6F ndif.. ? co
000130: 6D 6D 65 6E 74 0D 0A 20 20 20 20 20 20 73 74 6F mment.. sto
000140: 72 65 20 63 70 74 2B 31 20 74 6F 20 63 70 74 0D re cpt+1 to cpt.
000150: 0A 20 20 20 20 20 20 73 74 6F 72 65 20 6C 69 67 . store lig
000160: 2B 34 20 74 6F 20 6C 69 67 0D 0A 20 20 20 65 6E +4 to lig.. en
000170: 64 69 66 0D 0A 20 20 20 73 6B 69 70 0D 0A 65 6E dif.. skip..en
000180: 64 64 6F 0D 0A 69 66 20 72 65 70 3D 27 4E 27 0D ddo..if rep='N'.
000190: 0A 20 20 20 40 20 6C 69 67 6D 31 2C 30 20 73 61 . @ ligm1,0 sa
0001A0: 79 20 27 74 61 70 65 7A 20 73 75 72 20 75 6E 65 y 'tapez sur une
0001B0: 20 74 6F 75 63 68 65 20 70 6F 75 72 20 63 6F 6E touche pour con
0001C0: 74 69 6E 75 65 72 27 0D 0A 20 20 20 73 65 74 20 tinuer'.. set
0001D0: 63 6F 6E 73 6F 6C 65 20 6F 66 66 0D 0A 20 20 20 console off..
0001E0: 77 61 69 74 0D 0A 20 20 20 73 65 74 20 63 6F 6E wait.. set con
0001F0: 73 6F 6C 65 20 6F 6E 0D 0A 65 6C 73 65 0D 0A 20 sole on..else..
Size : 512 (Real : 512)
000000: 0D 0A 66 69 6E 64 20 26 6D 6E 6F 6D 0D 0A 69 66 ..find &mnom..if
000010: 20 23 20 3D 20 30 0D 0A 73 74 6F 72 65 20 31 36 # = 0..store 16
000020: 20 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 64 6F 20 to nomess..do
000030: 61 66 66 6D 65 73 73 0D 0A 65 6C 73 65 0D 0A 73 affmess..else..s
000040: 74 6F 72 65 20 74 79 70 63 20 74 6F 20 74 79 70 tore typc to typ
000050: 69 6E 64 65 78 0D 0A 73 74 6F 72 65 20 27 74 27 index..store 't'
000060: 20 74 6F 20 63 6F 72 72 65 63 74 0D 0A 69 66 20 to correct..if
000070: 74 79 70 69 6E 64 65 78 20 3D 20 27 50 27 0D 0A typindex = 'P'..
000080: 73 65 6C 65 63 74 20 73 65 63 6F 6E 64 61 72 79 select secondary
000090: 0D 0A 75 73 65 20 26 66 72 65 66 20 69 6E 64 65 ..use &fref inde
0000A0: 78 20 26 78 63 6C 65 0D 0A 67 6F 74 6F 20 74 6F x &xcle..goto to
0000B0: 70 0D 0A 64 6F 20 77 68 69 6C 65 20 2E 6E 6F 74 p..do while .not
0000C0: 2E 65 6F 66 0D 0A 72 65 70 6C 61 63 65 20 6E 6F .eof..replace no
0000D0: 7A 20 77 69 74 68 20 30 0D 0A 73 6B 69 70 0D 0A z with 0..skip..
0000E0: 65 6E 64 64 6F 0D 0A 75 73 65 0D 0A 65 6E 64 69 enddo..use..endi
0000F0: 66 0D 0A 73 65 6C 65 63 74 20 70 72 69 6D 61 72 f..select primar
000100: 79 0D 0A 64 65 6C 65 0D 0A 70 61 63 6B 0D 0A 73 y..dele..pack..s
000110: 74 6F 72 65 20 27 43 27 20 74 6F 20 65 6C 65 6D tore 'C' to elem
000120: 0D 0A 73 74 6F 72 65 20 24 28 6D 6E 6F 6D 2C 32 ..store $(mnom,2
000130: 2C 31 30 29 20 74 6F 20 6D 6E 6F 6D 65 6C 65 6D ,10) to mnomelem
000140: 0D 0A 73 74 6F 72 65 20 27 4D 27 20 74 6F 20 6D ..store 'M' to m
000150: 6F 64 69 66 0D 0A 64 6F 20 64 65 66 65 6C 65 6D odif..do defelem
000160: 0D 0A 72 65 6C 65 61 73 65 20 6D 6E 6F 6D 2C 74 ..release mnom,t
000170: 79 70 69 6E 64 65 78 2C 63 6F 72 72 65 63 74 2C ypindex,correct,
000180: 65 6C 65 6D 2C 6D 6E 6F 6D 65 6C 65 6D 2C 6D 6F elem,mnomelem,mo
000190: 64 69 66 0D 0A 72 65 74 75 72 6E 0D 0A 65 6E 64 dif..return..end
0001A0: 69 66 0D 0A 65 6E 64 64 6F 0D 0A 0D 0A 0D 0A 0D if..enddo.......
0001B0: 0A 0D 0A 0D 0A 0D 0A 0D 0A 1A 1A 69 78 3D 27 31 ...........ix='1
0001C0: 27 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 '.. stor
0001D0: 65 20 27 43 27 20 74 6F 20 6D 6F 64 69 66 0D 0A e 'C' to modif..
0001E0: 20 20 20 20 20 20 20 20 20 64 6F 20 64 65 66 65 do defe
0001F0: 6C 65 6D 0D 0A 20 20 20 20 20 20 20 20 20 72 65 lem.. re
Size : 512 (Real : 512)
000000: 20 20 2A 20 70 6F 75 72 20 76 69 64 65 72 20 6C * pour vider l
000010: 65 20 62 75 66 66 65 72 0D 0A 20 20 20 3F 3F 20 e buffer.. ??
000020: 63 68 72 28 31 33 29 0D 0A 20 20 20 73 65 74 20 chr(13).. set
000030: 70 72 69 6E 74 20 6F 66 66 0D 0A 20 20 20 73 65 print off.. se
000040: 74 20 66 6F 72 6D 61 74 20 74 6F 20 73 63 72 65 t format to scre
000050: 65 6E 0D 0A 65 6E 64 69 66 0D 0A 72 65 6C 65 61 en..endif..relea
000060: 73 65 20 72 65 70 2C 6C 69 67 2C 63 70 74 2C 63 se rep,lig,cpt,c
000070: 6F 6D 6D 65 6E 74 2C 65 6C 65 6D 2C 63 6F 72 72 omment,elem,corr
000080: 65 63 74 0D 0A 75 73 65 0D 0A 72 65 74 75 72 6E ect..use..return
000090: 0D 0A 0D 0A 0D 0A 0D 0A 1A 1A 0A 20 20 20 20 20 ...........
0000A0: 20 73 74 6F 72 65 20 27 69 6E 64 65 78 20 73 65 store 'index se
0000B0: 63 6F 6E 64 61 69 72 65 20 2D 20 6D 69 73 65 20 condaire - mise
0000C0: 61 20 6A 6F 75 72 20 61 75 74 6F 6D 61 74 69 71 a jour automatiq
0000D0: 75 65 27 20 74 6F 20 63 6F 6D 6D 65 6E 74 0D 0A ue' to comment..
0000E0: 20 20 20 20 20 20 6F 74 68 65 72 77 69 73 65 0D otherwise.
0000F0: 0A 20 20 20 20 20 20 73 74 6F 72 65 20 27 69 6E . store 'in
000100: 64 65 78 20 74 65 6D 70 6F 72 61 69 72 65 20 2D dex temporaire -
000110: 20 6D 69 73 65 20 61 20 6A 6F 75 72 20 6E 6F 6E mise a jour non
000120: 20 61 75 74 6F 6D 61 74 69 71 75 65 27 20 74 6F automatique' to
000130: 20 63 6F 6D 6D 65 6E 74 0D 0A 20 20 20 20 20 20 comment..
000140: 65 6E 64 63 61 73 65 0D 0A 20 20 20 20 20 20 40 endcase.. @
000150: 20 6C 69 67 2C 30 20 73 61 79 20 27 2A 2A 2A 2A lig,0 say '****
000160: 2A 20 27 2B 6E 6F 6D 65 6C 65 6D 2B 27 20 27 2B * '+nomelem+' '+
000170: 6C 69 62 65 6C 65 6D 0D 0A 20 20 20 20 20 20 40 libelem.. @
000180: 20 6C 69 67 2C 34 38 20 73 61 79 20 27 7A 6F 6E lig,48 say 'zon
000190: 65 20 31 3A 20 27 2B 7A 6F 6E 31 2B 27 20 64 65 e 1: '+zon1+' de
0001A0: 20 27 2B 64 65 62 31 2B 27 20 61 20 27 2B 66 69 '+deb1+' a '+fi
0001B0: 6E 31 0D 0A 20 20 20 20 20 20 69 66 20 7A 6F 6E n1.. if zon
0001C0: 32 23 27 20 27 0D 0A 20 20 20 20 20 20 40 20 6C 2#' '.. @ l
0001D0: 69 67 2B 31 2C 30 20 73 61 79 20 27 7A 6F 6E 65 ig+1,0 say 'zone
0001E0: 20 32 3A 20 27 2B 7A 6F 6E 32 2B 27 20 64 65 20 2: '+zon2+' de
0001F0: 27 2B 64 65 62 32 2B 27 20 61 20 27 2B 66 69 6E '+deb2+' a '+fin
Size : 512 (Real : 512)
000000: 2A 20 69 6E 69 74 7A 6F 6E 65 3A 20 69 6E 69 74 * initzone: init
000010: 69 61 6C 69 73 65 20 75 6E 65 20 7A 6F 6E 65 20 ialise une zone
000020: 64 65 20 73 61 69 73 69 65 20 65 6E 20 72 65 70 de saisie en rep
000030: 72 65 6E 61 6E 74 20 6C 61 20 76 61 6C 65 75 72 renant la valeur
000040: 20 64 27 75 6E 20 65 6E 72 65 67 69 73 2D 0D 0A d'un enregis-..
000050: 2A 20 74 72 65 6D 65 6E 74 20 6F 75 20 65 6E 20 * trement ou en
000060: 6D 65 74 74 61 6E 74 20 6C 61 20 76 61 6C 65 75 mettant la valeu
000070: 72 20 6E 75 6C 6C 65 20 73 75 69 76 61 6E 74 20 r nulle suivant
000080: 6C 61 20 76 61 72 69 61 62 6C 65 20 63 68 6F 69 la variable choi
000090: 78 2C 6C 27 65 78 69 73 74 65 6E 63 65 0D 0A 2A x,l'existence..*
0000A0: 20 64 27 75 6E 20 65 6E 72 65 67 69 73 74 72 65 d'un enregistre
0000B0: 6D 65 6E 74 20 63 6F 75 72 61 6E 74 20 65 74 20 ment courant et
0000C0: 6C 27 61 70 70 61 72 74 65 6E 61 6E 63 65 20 6F l'appartenance o
0000D0: 75 20 6E 6F 6E 20 61 20 6C 61 20 63 6C 65 20 70 u non a la cle p
0000E0: 72 69 6E 63 69 70 61 6C 65 0D 0A 2A 20 65 6E 20 rincipale..* en
0000F0: 65 6E 74 72 65 65 3A 20 63 68 6F 69 78 20 31 3D entree: choix 1=
000100: 63 72 65 61 74 69 6F 6E 2C 20 32 3D 6D 6F 64 69 creation, 2=modi
000110: 66 69 63 61 74 69 6F 6E 2C 20 33 3D 73 75 70 70 fication, 3=supp
000120: 72 65 73 73 69 6F 6E 2C 20 34 3D 76 69 73 75 61 ression, 4=visua
000130: 6C 69 73 61 74 69 6F 6E 0D 0A 2A 20 35 3D 72 65 lisation..* 5=re
000140: 63 68 65 72 63 68 65 20 73 75 72 20 63 6C 65 20 cherche sur cle
000150: 70 61 72 74 69 65 20 61 66 66 69 63 68 61 67 65 partie affichage
000160: 2C 20 53 3D 72 65 63 68 65 72 63 68 65 20 73 75 , S=recherche su
000170: 72 20 63 6C 65 20 70 61 72 74 69 65 20 64 65 6D r cle partie dem
000180: 61 6E 64 65 20 63 6C 65 0D 0A 0D 0A 69 66 20 28 ande cle....if (
000190: 63 68 6F 69 78 3E 3D 20 27 32 27 2E 61 6E 64 2E choix>= '2'.and.
0001A0: 63 68 6F 69 78 3C 3D 27 35 27 29 2E 61 6E 64 2E choix<='5').and.
0001B0: 28 6E 6F 7A 3E 6E 62 7A 6F 6E 70 2E 6F 72 2E 6E (noz>nbzonp.or.n
0001C0: 6F 63 6F 75 72 20 23 20 30 29 0D 0A 20 20 20 73 ocour # 0).. s
0001D0: 74 6F 72 65 20 66 69 65 6C 64 3A 6E 61 6D 65 20 tore field:name
0001E0: 74 6F 20 6E 6F 6D 7A 0D 0A 20 20 20 73 74 6F 72 to nomz.. stor
0001F0: 65 20 27 73 2E 27 2D 6E 6F 6D 7A 20 74 6F 20 6E e 's.'-nomz to n
Size : 512 (Real : 512)
000000: 2A 20 6F 70 74 69 6F 6E 3A 20 70 72 6F 67 72 61 * option: progra
000010: 6D 6D 65 20 71 75 69 20 70 65 75 74 20 65 74 72 mme qui peut etr
000020: 65 20 63 68 61 6E 67 65 20 70 61 72 20 6C 27 75 e change par l'u
000030: 74 69 6C 69 73 61 74 65 75 72 0D 0A 0D 0A 65 72 tilisateur....er
000040: 61 73 65 0D 0A 40 20 31 30 2C 31 30 20 73 61 79 ase..@ 10,10 say
000050: 20 22 41 55 43 55 4E 45 20 4F 50 54 49 4F 4E 20 "AUCUNE OPTION
000060: 4E 27 45 53 54 20 45 4E 43 4F 52 45 20 49 4D 50 N'EST ENCORE IMP
000070: 4C 45 4D 45 4E 54 45 45 22 0D 0A 40 20 6C 69 67 LEMENTEE"..@ lig
000080: 6D 31 2C 30 20 73 61 79 20 27 74 61 70 65 7A 20 m1,0 say 'tapez
000090: 73 75 72 20 75 6E 65 20 74 6F 75 63 68 65 20 70 sur une touche p
0000A0: 6F 75 72 20 72 65 76 65 6E 69 72 20 61 75 20 6D our revenir au m
0000B0: 65 6E 75 27 0D 0A 73 65 74 20 63 6F 6E 73 6F 6C enu'..set consol
0000C0: 65 20 6F 66 66 0D 0A 77 61 69 74 0D 0A 73 65 74 e off..wait..set
0000D0: 20 63 6F 6E 73 6F 6C 65 20 6F 6E 0D 0A 72 65 74 console on..ret
0000E0: 75 72 6E 0D 0A 1A 1A 2C 18 0C 29 DE 03 13 00 E9 urn....,..).....
0000F0: 28 22 66 35 22 29 22 20 20 45 64 69 74 65 72 20 ("f5")" Editer
000100: 6C 65 20 64 65 72 6E 69 65 72 20 7B 63 72 61 6E le dernier {cran
000110: 22 DE 03 25 00 E1 28 18 19 2C 18 0E 29 DE 03 13 "..%..(..,..)...
000120: 00 E9 28 22 66 33 22 29 22 20 20 45 64 69 74 65 ..("f3")" Edite
000130: 72 20 75 6E 20 6E 6F 75 76 65 6C 20 7B 63 72 61 r un nouvel {cra
000140: 6E 22 DE 03 25 00 E1 28 18 19 2C 18 10 29 DE 03 n"..%..(..,..)..
000150: 13 00 E9 28 22 66 31 22 29 22 20 20 45 64 69 74 ...("f1")" Edit
000160: 65 72 20 75 6E 20 66 69 63 68 69 65 72 20 65 78 er un fichier ex
000170: 69 73 74 61 6E 74 22 DE 03 25 00 E1 28 18 17 2C istant"..%..(..,
000180: 18 12 29 DE 03 13 00 E9 28 22 45 58 49 54 22 29 ..).....("EXIT")
000190: 22 20 20 51 75 69 74 74 65 72 22 00 1C 00 11 00 " Quitter".....
0001A0: 03 A9 00 F4 EC FF 75 01 9D 20 03 A9 00 F4 EC 22 ......u.. ....."
0001B0: 22 20 E2 20 1C D3 7E 00 2C 00 12 00 AD 20 FF 77 " . ..~.,.... .w
0001C0: 28 03 75 00 ED 2C 03 A9 00 F4 29 20 9C 20 1C 1B (.u..,....) . ..
0001D0: 7F 2C 1C 59 7F 2C 1D 14 00 2C 1D 21 00 01 9C 20 .,.Y.,...,.!...
0001E0: 1D 11 00 00 28 00 13 00 B3 20 03 05 00 E5 22 65 ....(.... ...."e
0001F0: 22 03 05 00 E5 22 76 22 03 05 00 E5 22 45 22 03 "...."v"...."E".
Size : 512 (Real : 512)
000000: 6F 6D 7A 0D 0A 20 20 20 73 74 6F 72 65 20 26 6E omz.. store &n
000010: 6F 6D 7A 20 74 6F 20 26 6D 7A 6F 6E 0D 0A 65 6C omz to &mzon..el
000020: 73 65 0D 0A 20 20 20 64 6F 20 63 61 73 65 0D 0A se.. do case..
000030: 20 20 20 20 20 20 63 61 73 65 20 66 69 65 6C 64 case field
000040: 3A 74 79 70 65 3D 27 4E 27 0D 0A 20 20 20 20 20 :type='N'..
000050: 20 73 74 6F 72 65 20 30 20 74 6F 20 26 6D 7A 6F store 0 to &mzo
000060: 6E 0D 0A 20 20 20 20 20 20 63 61 73 65 20 66 69 n.. case fi
000070: 65 6C 64 3A 74 79 70 65 3D 27 4C 27 0D 0A 20 20 eld:type='L'..
000080: 20 20 20 20 73 74 6F 72 65 20 66 20 74 6F 20 26 store f to &
000090: 6D 7A 6F 6E 0D 0A 20 20 20 20 20 20 63 61 73 65 mzon.. case
0000A0: 20 24 28 76 65 72 69 66 2C 32 2C 31 29 3D 27 44 $(verif,2,1)='D
0000B0: 27 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 27 '.. store '
0000C0: 30 30 2F 30 30 2F 30 30 27 20 74 6F 20 26 6D 7A 00/00/00' to &mz
0000D0: 6F 6E 0D 0A 20 20 20 20 20 20 63 61 73 65 20 24 on.. case $
0000E0: 28 76 65 72 69 66 2C 32 2C 31 29 3D 27 4D 27 0D (verif,2,1)='M'.
0000F0: 0A 20 20 20 20 20 20 73 74 6F 72 65 20 27 30 30 . store '00
000100: 2F 30 30 27 20 74 6F 20 26 6D 7A 6F 6E 0D 0A 20 /00' to &mzon..
000110: 20 20 20 20 20 63 61 73 65 20 66 69 65 6C 64 3A case field:
000120: 74 79 70 65 3D 27 43 27 0D 0A 20 20 20 20 20 20 type='C'..
000130: 73 74 6F 72 65 20 24 28 62 6C 61 6E 63 2C 31 2C store $(blanc,1,
000140: 66 69 65 6C 64 3A 6C 65 6E 29 20 74 6F 20 26 6D field:len) to &m
000150: 7A 6F 6E 0D 0A 20 20 20 65 6E 64 63 61 73 65 0D zon.. endcase.
000160: 0A 65 6E 64 69 66 0D 0A 72 65 6C 65 61 73 65 20 .endif..release
000170: 6E 6F 6D 7A 0D 0A 64 6F 20 70 69 63 74 75 72 65 nomz..do picture
000180: 0D 0A 72 65 74 75 72 6E 0D 0A 0D 0A 0D 0A 0D 0A ..return........
000190: 1A 1A 72 65 70 0D 0A 20 20 20 20 20 20 73 65 74 ..rep.. set
0001A0: 20 69 6E 74 65 6E 73 69 74 79 20 6F 6E 0D 0A 20 intensity on..
0001B0: 20 20 20 20 20 72 65 61 64 0D 0A 20 20 20 20 20 read..
0001C0: 20 73 74 6F 72 65 20 21 28 72 65 70 29 20 74 6F store !(rep) to
0001D0: 20 72 65 70 0D 0A 20 20 20 65 6C 73 65 0D 0A 20 rep.. else..
0001E0: 20 20 20 20 20 73 74 6F 72 65 20 27 31 27 20 74 store '1' t
0001F0: 6F 20 72 65 70 0D 0A 20 20 20 65 6E 64 69 66 0D o rep.. endif.
Size : 512 (Real : 512)
000000: 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 . store
000010: 21 28 76 61 6C 64 65 62 29 20 74 6F 20 76 61 6C !(valdeb) to val
000020: 64 65 62 0D 0A 20 20 20 20 20 20 20 20 20 73 74 deb.. st
000030: 6F 72 65 20 21 28 76 61 6C 66 69 6E 29 20 74 6F ore !(valfin) to
000040: 20 76 61 6C 66 69 6E 0D 0A 20 20 20 20 20 20 65 valfin.. e
000050: 6E 64 69 66 0D 0A 20 20 20 20 20 20 73 74 6F 72 ndif.. stor
000060: 65 20 30 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 e 0 to nomess..
000070: 20 20 20 20 20 69 66 20 72 65 70 32 3D 27 42 27 if rep2='B'
000080: 2E 61 6E 64 2E 6D 74 79 70 65 3D 27 4E 27 0D 0A .and.mtype='N'..
000090: 20 20 20 20 20 20 20 20 20 69 66 20 76 61 6C 64 if vald
0000A0: 65 62 3C 26 6D 69 6E 70 6F 73 2E 6F 72 2E 76 61 eb<&minpos.or.va
0000B0: 6C 64 65 62 3E 26 6D 61 78 70 6F 73 0D 0A 20 20 ldeb>&maxpos..
0000C0: 20 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 store
0000D0: 33 33 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 33 to nomess..
0000E0: 20 20 20 20 20 20 20 20 20 20 64 6F 20 61 66 66 do aff
0000F0: 6D 65 73 73 0D 0A 20 20 20 20 20 20 20 20 20 65 mess.. e
000100: 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20 20 20 lse..
000110: 20 69 66 20 76 61 6C 66 69 6E 3C 26 6D 69 6E 70 if valfin<&minp
000120: 6F 73 2E 6F 72 2E 76 61 6C 66 69 6E 3E 26 6D 61 os.or.valfin>&ma
000130: 78 70 6F 73 0D 0A 20 20 20 20 20 20 20 20 20 20 xpos..
000140: 20 20 20 20 20 73 74 6F 72 65 20 33 33 20 74 6F store 33 to
000150: 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 20 20 20 20 nomess..
000160: 20 20 20 20 20 20 20 20 64 6F 20 61 66 66 6D 65 do affme
000170: 73 73 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 ss..
000180: 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 20 20 20 endif..
000190: 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 65 6E 64 endif.. end
0001A0: 69 66 0D 0A 20 20 20 20 20 20 69 66 20 72 65 70 if.. if rep
0001B0: 32 3D 27 44 27 2E 6F 72 2E 72 65 70 32 3D 27 4D 2='D'.or.rep2='M
0001C0: 27 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 '.. stor
0001D0: 65 20 31 20 74 6F 20 63 70 74 0D 0A 20 20 20 20 e 1 to cpt..
0001E0: 20 20 20 20 20 64 6F 20 77 68 69 6C 65 20 63 70 do while cp
0001F0: 74 20 3C 3D 20 32 0D 0A 20 20 20 20 20 20 20 20 t <= 2..
Size : 512 (Real : 512)
000000: 73 65 74 20 74 61 6C 6B 20 6F 66 66 0D 0A 73 65 set talk off..se
000010: 74 20 63 6F 6C 6F 6E 20 6F 66 66 0D 0A 63 6C 65 t colon off..cle
000020: 61 72 0D 0A 73 74 6F 72 65 20 22 42 3A 22 20 74 ar..store "B:" t
000030: 6F 20 75 6E 69 74 0D 0A 73 74 6F 72 65 20 22 20 o unit..store "
000040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000060: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000080: 20 20 20 20 20 20 3B 0D 0A 20 20 20 20 20 20 20 ;..
000090: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000D0: 20 20 20 20 20 20 20 3B 0D 0A 20 20 20 20 20 20 ;..
0000E0: 20 20 20 20 20 20 20 20 20 22 20 74 6F 20 6C 69 " to li
0000F0: 73 74 69 6E 64 0D 0A 73 74 6F 72 65 20 31 20 74 stind..store 1 t
000100: 6F 20 6C 6F 6E 67 65 6E 67 0D 0A 65 72 61 73 65 o longeng..erase
000110: 0D 0A 40 20 31 2C 32 35 20 73 61 79 20 22 52 45 ..@ 1,25 say "RE
000120: 43 55 50 45 52 41 54 49 4F 4E 20 44 45 53 20 44 CUPERATION DES D
000130: 4F 4E 4E 45 45 53 22 0D 0A 40 20 37 2C 30 20 73 ONNEES"..@ 7,0 s
000140: 61 79 20 22 55 6E 69 74 65 20 70 61 72 20 64 65 ay "Unite par de
000150: 66 61 75 74 20 64 65 20 76 6F 73 20 64 6F 6E 6E faut de vos donn
000160: 65 65 73 20 20 20 28 41 3A 2C 20 42 3A 20 6F 75 ees (A:, B: ou
000170: 20 4D 3A 29 20 20 20 20 3A 22 0D 0A 40 20 38 2C M:) :"..@ 8,
000180: 30 20 73 61 79 20 22 4E 6F 6D 20 64 75 20 66 69 0 say "Nom du fi
000190: 63 68 69 65 72 20 61 20 72 65 63 75 70 65 72 65 chier a recupere
0001A0: 72 20 28 52 65 74 75 72 6E 20 70 6F 75 72 20 61 r (Return pour a
0001B0: 62 61 6E 64 6F 6E 6E 65 72 29 20 3A 22 0D 0A 40 bandonner) :"..@
0001C0: 20 31 31 2C 30 20 73 61 79 20 22 4C 69 73 74 65 11,0 say "Liste
0001D0: 20 64 65 73 20 6E 6F 75 76 65 61 75 78 20 69 6E des nouveaux in
0001E0: 64 65 78 20 70 72 69 6E 63 69 70 61 6C 20 65 74 dex principal et
0001F0: 20 73 65 63 6F 6E 64 61 69 72 65 73 20 73 65 70 secondaires sep
Size : 512 (Real : 512)
000000: 2A 20 6D 6F 64 69 66 63 6C 65 3A 20 6D 6F 64 69 * modifcle: modi
000010: 66 69 63 61 74 69 6F 6E 20 64 27 75 6E 65 20 63 fication d'une c
000020: 6C 65 20 70 61 72 20 73 75 70 72 65 73 73 69 6F le par supressio
000030: 6E 20 2D 20 63 72 65 61 74 69 6F 6E 0D 0A 65 72 n - creation..er
000040: 61 73 65 0D 0A 73 65 6C 65 63 74 20 70 72 69 6D ase..select prim
000050: 61 72 79 0D 0A 75 73 65 20 26 66 65 6C 65 20 69 ary..use &fele i
000060: 6E 64 65 78 20 26 78 65 6C 65 0D 0A 40 20 31 2C ndex &xele..@ 1,
000070: 31 36 20 73 61 79 20 22 4D 4F 44 49 46 49 43 41 16 say "MODIFICA
000080: 54 49 4F 4E 20 44 27 55 4E 45 20 43 4C 45 20 44 TION D'UNE CLE D
000090: 55 20 46 49 43 48 49 45 52 20 22 0D 0A 40 20 31 U FICHIER "..@ 1
0000A0: 2C 35 35 20 67 65 74 20 6E 6F 6D 61 66 66 0D 0A ,55 get nomaff..
0000B0: 63 6C 65 61 72 20 67 65 74 0D 0A 67 6F 74 6F 20 clear get..goto
0000C0: 74 6F 70 0D 0A 40 20 35 2C 31 30 20 73 61 79 20 top..@ 5,10 say
0000D0: 27 6E 6F 6D 20 64 65 20 6C 61 20 63 6C 65 27 0D 'nom de la cle'.
0000E0: 0A 73 74 6F 72 65 20 27 66 27 20 74 6F 20 63 6F .store 'f' to co
0000F0: 72 72 65 63 74 0D 0A 64 6F 20 77 68 69 6C 65 20 rrect..do while
000100: 63 6F 72 72 65 63 74 3D 27 66 27 0D 0A 73 74 6F correct='f'..sto
000110: 72 65 20 27 20 20 20 20 20 20 20 20 27 20 74 6F re ' ' to
000120: 20 6D 6E 6F 6D 0D 0A 40 20 35 2C 34 30 20 67 65 mnom..@ 5,40 ge
000130: 74 20 6D 6E 6F 6D 0D 0A 40 20 6C 69 67 6D 31 2C t mnom..@ ligm1,
000140: 30 20 73 61 79 20 27 74 61 70 65 7A 20 72 65 74 0 say 'tapez ret
000150: 75 72 6E 20 70 6F 75 72 20 61 62 61 6E 64 6F 6E urn pour abandon
000160: 6E 65 72 27 0D 0A 72 65 61 64 0D 0A 40 20 6C 69 ner'..read..@ li
000170: 67 6D 31 2C 30 0D 0A 2A 20 76 65 75 74 2D 6F 6E gm1,0..* veut-on
000180: 20 73 6F 72 74 69 72 0D 0A 69 66 20 6D 6E 6F 6D sortir..if mnom
000190: 3D 27 20 27 0D 0A 72 65 6C 65 61 73 65 20 6D 6E =' '..release mn
0001A0: 6F 6D 2C 63 6F 72 72 65 63 74 0D 0A 72 65 74 75 om,correct..retu
0001B0: 72 6E 0D 0A 65 6E 64 69 66 0D 0A 73 74 6F 72 65 rn..endif..store
0001C0: 20 21 28 6D 6E 6F 6D 29 20 74 6F 20 6D 6E 6F 6D !(mnom) to mnom
0001D0: 0D 0A 2A 20 6C 65 20 6E 6F 6D 20 65 78 69 73 74 ..* le nom exist
0001E0: 65 2D 74 2D 69 6C 20 3F 0D 0A 73 74 6F 72 65 20 e-t-il ?..store
0001F0: 27 43 27 2D 6D 6E 6F 6D 20 74 6F 20 6D 6E 6F 6D 'C'-mnom to mnom
Size : 512 (Real : 512)
000000: 61 72 65 73 20 70 61 72 20 75 6E 65 22 0D 0A 40 ares par une"..@
000010: 20 31 32 2C 30 20 73 61 79 20 22 76 69 72 67 75 12,0 say "virgu
000020: 6C 65 20 65 74 20 70 72 65 63 65 64 65 73 20 64 le et precedes d
000030: 65 20 6C 27 75 6E 69 74 65 20 3A 22 0D 0A 40 20 e l'unite :"..@
000040: 31 37 2C 30 20 73 61 79 20 22 54 61 69 6C 6C 65 17,0 say "Taille
000050: 20 64 65 20 6C 27 65 6E 72 65 67 69 73 74 72 65 de l'enregistre
000060: 6D 65 6E 74 20 61 76 61 6E 74 20 6D 6F 64 69 66 ment avant modif
000070: 69 63 61 74 69 6F 6E 3A 22 0D 0A 73 74 6F 72 65 ication:"..store
000080: 20 66 20 74 6F 20 63 6F 72 72 65 63 74 0D 0A 64 f to correct..d
000090: 6F 20 77 68 69 6C 65 20 2E 6E 6F 74 2E 63 6F 72 o while .not.cor
0000A0: 72 65 63 74 0D 0A 20 20 20 73 74 6F 72 65 20 22 rect.. store "
0000B0: 20 20 20 20 20 20 20 20 22 20 74 6F 20 6E 6F 6D " to nom
0000C0: 66 69 63 68 0D 0A 20 20 20 40 20 37 2C 35 34 20 fich.. @ 7,54
0000D0: 67 65 74 20 75 6E 69 74 0D 0A 20 20 20 40 20 38 get unit.. @ 8
0000E0: 2C 35 34 20 67 65 74 20 6E 6F 6D 66 69 63 68 20 ,54 get nomfich
0000F0: 70 69 63 74 75 72 65 20 27 41 41 41 41 41 41 41 picture 'AAAAAAA
000100: 41 27 0D 0A 20 20 20 40 20 31 32 2C 33 33 20 67 A'.. @ 12,33 g
000110: 65 74 20 6C 69 73 74 69 6E 64 0D 0A 20 20 20 40 et listind.. @
000120: 20 31 37 2C 34 38 20 67 65 74 20 6C 6F 6E 67 65 17,48 get longe
000130: 6E 67 0D 0A 20 20 20 72 65 61 64 0D 0A 20 20 20 ng.. read..
000140: 63 6C 65 61 72 20 67 65 74 0D 0A 20 20 20 73 74 clear get.. st
000150: 6F 72 65 20 21 28 75 6E 69 74 29 20 74 6F 20 75 ore !(unit) to u
000160: 6E 69 74 0D 0A 20 20 20 73 74 6F 72 65 20 21 28 nit.. store !(
000170: 6E 6F 6D 66 69 63 68 29 20 74 6F 20 6E 6F 6D 66 nomfich) to nomf
000180: 69 63 68 0D 0A 20 20 20 73 74 6F 72 65 20 21 28 ich.. store !(
000190: 6C 69 73 74 69 6E 64 29 20 74 6F 20 6C 69 73 74 listind) to list
0001A0: 69 6E 64 0D 0A 20 20 20 69 66 20 6E 6F 6D 66 69 ind.. if nomfi
0001B0: 63 68 3D 22 20 22 0D 0A 20 20 20 20 20 20 63 6C ch=" ".. cl
0001C0: 65 61 72 0D 0A 20 20 20 20 20 20 71 75 69 74 0D ear.. quit.
0001D0: 0A 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 69 66 . endif.. if
0001E0: 20 75 6E 69 74 23 27 41 3A 27 2E 61 6E 64 2E 75 unit#'A:'.and.u
0001F0: 6E 69 74 23 27 42 3A 27 2E 61 6E 64 2E 75 6E 69 nit#'B:'.and.uni
Size : 512 (Real : 512)
000000: 2A 20 6D 65 6E 75 67 65 6E 3A 20 20 20 6D 65 6E * menugen: men
000010: 75 20 70 61 72 61 6D 65 74 72 61 67 65 0D 0A 0D u parametrage...
000020: 0A 73 74 6F 72 65 20 27 74 27 20 74 6F 20 74 65 .store 't' to te
000030: 73 74 0D 0A 64 6F 20 77 68 69 6C 65 20 74 65 73 st..do while tes
000040: 74 3D 27 74 27 0D 0A 20 20 20 69 66 20 63 68 6F t='t'.. if cho
000050: 69 78 3D 27 46 27 0D 0A 20 20 20 73 74 6F 72 65 ix='F'.. store
000060: 20 27 66 27 20 74 6F 20 72 65 70 72 69 73 65 0D 'f' to reprise.
000070: 0A 20 20 20 65 72 61 73 65 0D 0A 20 20 20 40 20 . erase.. @
000080: 31 2C 32 36 20 53 41 59 20 27 50 41 52 41 4D 45 1,26 SAY 'PARAME
000090: 54 52 41 47 45 20 44 55 20 46 49 43 48 49 45 52 TRAGE DU FICHIER
0000A0: 20 27 0D 0A 20 20 20 40 20 31 2C 35 34 20 67 65 '.. @ 1,54 ge
0000B0: 74 20 6E 6F 6D 61 66 66 0D 0A 20 20 20 40 20 33 t nomaff.. @ 3
0000C0: 2C 31 30 20 73 61 79 20 27 71 75 65 6C 20 74 72 ,10 say 'quel tr
0000D0: 61 69 74 65 6D 65 6E 74 20 64 65 73 69 72 65 7A aitement desirez
0000E0: 2D 76 6F 75 73 20 65 66 66 65 63 74 75 65 72 3F -vous effectuer?
0000F0: 27 0D 0A 20 20 20 40 20 35 2C 31 30 20 73 61 79 '.. @ 5,10 say
000100: 20 27 67 65 6E 65 72 65 72 20 6C 65 20 66 69 63 'generer le fic
000110: 68 69 65 72 20 20 20 20 20 20 20 20 20 20 20 20 hier
000120: 20 20 20 20 20 20 3D 3D 3D 3D 3E 20 31 27 0D 0A ====> 1'..
000130: 20 20 20 40 20 36 2C 31 30 20 73 61 79 20 22 6D @ 6,10 say "m
000140: 6F 64 69 66 69 65 72 20 6C 61 20 73 74 72 75 63 odifier la struc
000150: 74 75 72 65 20 64 75 20 66 69 63 68 69 65 72 20 ture du fichier
000160: 20 20 20 3D 3D 3D 3D 3E 20 32 22 0D 0A 20 20 20 ====> 2"..
000170: 40 20 37 2C 31 30 20 73 61 79 20 22 73 75 70 70 @ 7,10 say "supp
000180: 72 69 6D 65 72 20 6C 65 20 66 69 63 68 69 65 72 rimer le fichier
000190: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0001A0: 3D 3D 3D 3D 3E 20 33 22 0D 0A 20 20 20 40 20 38 ====> 3".. @ 8
0001B0: 2C 31 30 20 73 61 79 20 27 6C 69 73 74 65 72 20 ,10 say 'lister
0001C0: 6C 61 20 73 74 72 75 63 74 75 72 65 20 64 75 20 la structure du
0001D0: 66 69 63 68 69 65 72 20 20 20 20 20 20 3D 3D 3D fichier ===
0001E0: 3D 3E 20 34 27 0D 0A 20 20 20 40 20 39 2C 31 30 => 4'.. @ 9,10
0001F0: 20 73 61 79 20 27 63 68 61 6E 67 65 72 20 75 6E say 'changer un
Size : 512 (Real : 512)
000000: 74 23 27 4D 3A 27 0D 0A 20 20 20 20 20 20 40 20 t#'M:'.. @
000010: 32 30 2C 30 20 73 61 79 20 22 75 6E 69 74 65 20 20,0 say "unite
000020: 69 6E 63 6F 72 72 65 63 74 65 20 2D 20 54 61 70 incorrecte - Tap
000030: 65 7A 20 73 75 72 20 75 6E 65 20 74 6F 75 63 68 ez sur une touch
000040: 65 20 70 6F 75 72 20 63 6F 6E 74 69 6E 75 65 72 e pour continuer
000050: 22 0D 0A 20 20 20 20 20 20 77 61 69 74 0D 0A 20 ".. wait..
000060: 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 73 74 else.. st
000070: 6F 72 65 20 27 22 27 2D 75 6E 69 74 2D 6E 6F 6D ore '"'-unit-nom
000080: 66 69 63 68 2D 27 22 27 20 74 6F 20 6E 6F 6D 63 fich-'"' to nomc
000090: 6F 6D 70 0D 0A 20 20 20 20 20 20 69 66 20 2E 6E omp.. if .n
0000A0: 6F 74 2E 66 69 6C 65 28 26 6E 6F 6D 63 6F 6D 70 ot.file(&nomcomp
0000B0: 29 0D 0A 20 20 20 20 20 20 20 20 20 40 20 32 30 ).. @ 20
0000C0: 2C 30 20 73 61 79 20 22 66 69 63 68 69 65 72 20 ,0 say "fichier
0000D0: 69 6E 65 78 69 73 74 61 6E 74 20 73 75 72 20 6C inexistant sur l
0000E0: 27 75 6E 69 74 65 20 69 6E 64 69 71 75 65 65 20 'unite indiquee
0000F0: 2D 20 74 61 70 65 7A 20 73 75 72 20 75 6E 65 20 - tapez sur une
000100: 3B 0D 0A 74 6F 75 63 68 65 20 70 6F 75 72 20 63 ;..touche pour c
000110: 6F 6E 74 69 6E 75 65 72 22 0D 0A 20 20 20 20 20 ontinuer"..
000120: 20 20 20 20 77 61 69 74 0D 0A 20 20 20 20 20 20 wait..
000130: 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20 69 else.. i
000140: 66 20 6C 6F 6E 67 65 6E 67 3C 32 2E 6F 72 2E 6C f longeng<2.or.l
000150: 6F 6E 67 65 6E 67 3E 31 30 30 30 0D 0A 20 20 20 ongeng>1000..
000160: 20 20 20 20 20 20 20 20 20 40 20 32 30 2C 30 20 @ 20,0
000170: 73 61 79 20 22 6C 6F 6E 67 75 65 75 72 20 65 6E say "longueur en
000180: 72 65 67 69 73 74 72 65 6D 65 6E 74 20 69 6E 63 registrement inc
000190: 6F 72 72 65 63 74 65 20 2D 20 74 61 70 65 7A 20 orrecte - tapez
0001A0: 73 75 72 20 75 6E 65 20 3B 0D 0A 74 6F 75 63 68 sur une ;..touch
0001B0: 65 20 70 6F 75 72 20 63 6F 6E 74 69 6E 75 65 72 e pour continuer
0001C0: 22 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 77 ".. w
0001D0: 61 69 74 0D 0A 20 20 20 20 20 20 20 20 20 65 6C ait.. el
0001E0: 73 65 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 se..
0001F0: 73 74 6F 72 65 20 74 20 74 6F 20 63 6F 72 72 65 store t to corre
Size : 512 (Real : 512)
000000: 65 20 6F 70 74 69 6F 6E 20 64 65 20 76 65 72 69 e option de veri
000010: 66 69 63 61 74 69 6F 6E 20 20 3D 3D 3D 3D 3E 20 fication ====>
000020: 43 27 0D 0A 20 20 20 40 20 31 31 2C 31 30 20 73 C'.. @ 11,10 s
000030: 61 79 20 22 6D 65 6E 75 20 67 65 73 74 69 6F 6E ay "menu gestion
000040: 20 64 65 73 20 63 6C 65 73 20 20 20 20 20 20 20 des cles
000050: 20 20 20 20 20 20 20 20 3D 3D 3D 3D 3E 20 35 22 ====> 5"
000060: 0D 0A 20 20 20 40 20 31 33 2C 31 30 20 73 61 79 .. @ 13,10 say
000070: 20 22 64 65 66 69 6E 69 72 20 75 6E 65 20 6C 69 "definir une li
000080: 73 74 65 20 20 20 20 20 20 20 20 20 20 20 20 20 ste
000090: 20 20 20 20 20 20 3D 3D 3D 3D 3E 20 36 22 0D 0A ====> 6"..
0000A0: 20 20 20 40 20 31 34 2C 31 30 20 73 61 79 20 27 @ 14,10 say '
0000B0: 73 75 70 70 72 69 6D 65 72 20 75 6E 65 20 6C 69 supprimer une li
0000C0: 73 74 65 20 20 20 20 20 20 20 20 20 20 20 20 20 ste
0000D0: 20 20 20 20 3D 3D 3D 3D 3E 20 37 27 0D 0A 20 20 ====> 7'..
0000E0: 20 40 20 31 35 2C 31 30 20 73 61 79 20 22 6C 69 @ 15,10 say "li
0000F0: 73 74 65 72 20 6C 65 73 20 6C 69 73 74 65 73 20 ster les listes
000100: 64 65 66 69 6E 69 65 73 20 20 20 20 20 20 20 20 definies
000110: 20 20 3D 3D 3D 3D 3E 20 38 22 0D 0A 20 20 20 40 ====> 8".. @
000120: 20 31 36 2C 31 30 20 73 61 79 20 27 66 69 6E 20 16,10 say 'fin
000130: 70 61 72 61 6D 65 74 72 61 67 65 20 20 20 20 20 parametrage
000140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000150: 3D 3D 3D 3D 3E 20 46 27 0D 0A 20 20 20 40 20 31 ====> F'.. @ 1
000160: 37 2C 33 38 20 53 41 59 20 22 2B 2D 2D 2D 2D 2D 7,38 SAY "+-----
000170: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
000180: 2D 2B 22 0D 0A 20 20 20 40 20 31 38 2C 33 38 20 -+".. @ 18,38
000190: 53 41 59 20 22 49 20 52 65 70 6F 6E 73 65 20 2D SAY "I Reponse -
0001A0: 2D 3E 20 20 20 20 20 20 20 20 20 20 49 22 0D 0A -> I"..
0001B0: 20 20 20 40 20 31 39 2C 33 38 20 53 41 59 20 22 @ 19,38 SAY "
0001C0: 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D +---------------
0001D0: 2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 20 20 20 63 6C -------+".. cl
0001E0: 65 61 72 20 67 65 74 0D 0A 20 20 20 73 65 74 20 ear get.. set
0001F0: 69 6E 74 65 6E 73 69 74 79 20 6F 66 66 0D 0A 20 intensity off..
Size : 512 (Real : 512)
000000: 63 74 0D 0A 20 20 20 20 20 20 20 20 20 65 6E 64 ct.. end
000010: 69 66 0D 0A 20 20 20 20 20 20 65 6E 64 69 66 0D if.. endif.
000020: 0A 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 40 20 . endif.. @
000030: 32 30 2C 30 0D 0A 20 20 20 40 20 32 31 2C 30 0D 20,0.. @ 21,0.
000040: 0A 65 6E 64 64 6F 0D 0A 69 66 20 75 6E 69 74 3D .enddo..if unit=
000050: 22 41 3A 22 2E 6F 72 2E 75 6E 69 74 3D 22 4D 3A "A:".or.unit="M:
000060: 22 0D 0A 20 20 20 73 74 6F 72 65 20 75 6E 69 74 ".. store unit
000070: 2D 6E 6F 6D 66 69 63 68 20 74 6F 20 6E 6F 6D 31 -nomfich to nom1
000080: 0D 0A 20 20 20 73 74 6F 72 65 20 22 42 3A 22 2D .. store "B:"-
000090: 6E 6F 6D 66 69 63 68 20 74 6F 20 6E 6F 6D 32 0D nomfich to nom2.
0000A0: 0A 20 20 20 75 73 65 20 26 6E 6F 6D 31 20 69 6E . use &nom1 in
0000B0: 64 65 78 20 26 6C 69 73 74 69 6E 64 0D 0A 20 20 dex &listind..
0000C0: 20 61 70 70 65 6E 64 20 66 72 6F 6D 20 26 6E 6F append from &no
0000D0: 6D 32 0D 0A 20 20 20 75 73 65 0D 0A 65 6C 73 65 m2.. use..else
0000E0: 0D 0A 73 74 6F 72 65 20 73 74 72 28 69 6E 74 28 ..store str(int(
0000F0: 31 30 37 30 30 30 2F 6C 6F 6E 67 65 6E 67 29 2C 107000/longeng),
000100: 36 29 20 74 6F 20 6E 62 0D 0A 73 74 6F 72 65 20 6) to nb..store
000110: 22 27 42 3A 22 2D 6E 6F 6D 66 69 63 68 2D 22 2E "'B:"-nomfich-".
000120: 65 78 31 27 22 20 74 6F 20 6E 6F 6D 63 6F 6D 70 ex1'" to nomcomp
000130: 31 0D 0A 73 74 6F 72 65 20 22 27 42 3A 22 2D 6E 1..store "'B:"-n
000140: 6F 6D 66 69 63 68 2D 22 2E 65 78 32 27 22 20 74 omfich-".ex2'" t
000150: 6F 20 6E 6F 6D 63 6F 6D 70 32 0D 0A 73 74 6F 72 o nomcomp2..stor
000160: 65 20 22 42 3A 22 2D 6E 6F 6D 66 69 63 68 20 74 e "B:"-nomfich t
000170: 6F 20 6E 6F 6D 66 69 63 68 0D 0A 73 74 6F 72 65 o nomfich..store
000180: 20 6E 6F 6D 66 69 63 68 2D 27 2E 65 78 31 27 20 nomfich-'.ex1'
000190: 74 6F 20 6E 6F 6D 31 0D 0A 73 74 6F 72 65 20 6E to nom1..store n
0001A0: 6F 6D 66 69 63 68 2D 27 2E 65 78 32 27 20 74 6F omfich-'.ex2' to
0001B0: 20 6E 6F 6D 32 0D 0A 69 66 20 66 69 6C 65 28 26 nom2..if file(&
0001C0: 6E 6F 6D 63 6F 6D 70 31 29 0D 0A 20 20 20 64 65 nomcomp1).. de
0001D0: 6C 65 20 66 69 6C 65 20 26 6E 6F 6D 31 0D 0A 65 le file &nom1..e
0001E0: 6E 64 69 66 0D 0A 3F 20 27 69 6E 73 65 72 65 7A ndif..? 'inserez
0001F0: 20 64 69 73 71 75 65 74 74 65 20 73 61 75 76 65 disquette sauve
Size : 512 (Real : 512)
000000: 20 20 40 20 31 38 2C 35 32 20 67 65 74 20 63 68 @ 18,52 get ch
000010: 6F 69 78 0D 0A 20 20 20 73 65 74 20 69 6E 74 65 oix.. set inte
000020: 6E 73 69 74 79 20 6F 6E 0D 0A 20 20 20 72 65 61 nsity on.. rea
000030: 64 0D 0A 20 20 20 73 74 6F 72 65 20 21 28 63 68 d.. store !(ch
000040: 6F 69 78 29 20 74 6F 20 63 68 6F 69 78 0D 0A 20 oix) to choix..
000050: 20 20 65 6E 64 69 66 0D 0A 20 20 20 64 6F 20 63 endif.. do c
000060: 61 73 65 0D 0A 20 20 20 63 61 73 65 20 63 68 6F ase.. case cho
000070: 69 78 20 3D 20 27 31 27 0D 0A 20 20 20 69 66 20 ix = '1'.. if
000080: 65 78 69 73 74 3D 27 74 27 0D 0A 20 20 20 20 20 exist='t'..
000090: 20 73 74 6F 72 65 20 32 30 20 74 6F 20 6E 6F 6D store 20 to nom
0000A0: 65 73 73 0D 0A 20 20 20 20 20 20 64 6F 20 61 66 ess.. do af
0000B0: 66 6D 65 73 73 0D 0A 20 20 20 65 6C 73 65 0D 0A fmess.. else..
0000C0: 20 20 20 20 20 20 69 66 20 66 69 6C 65 28 6E 6F if file(no
0000D0: 6D 66 69 63 68 29 0D 0A 20 20 20 20 20 20 20 20 mfich)..
0000E0: 20 40 20 6C 69 67 6D 31 2C 30 20 73 61 79 20 27 @ ligm1,0 say '
0000F0: 61 74 74 65 6E 74 69 6F 6E 2C 20 64 65 6A 61 20 attention, deja
000100: 75 6E 20 66 69 63 68 69 65 72 20 73 6F 75 73 20 un fichier sous
000110: 63 65 20 6E 6F 6D 20 73 75 72 20 6C 61 20 27 3B ce nom sur la ';
000120: 0D 0A 20 20 20 20 20 20 20 20 20 2B 27 64 69 73 .. +'dis
000130: 71 75 65 74 74 65 2C 20 69 6C 20 76 61 20 65 74 quette, il va et
000140: 72 65 20 65 63 72 61 73 65 27 0D 0A 20 20 20 20 re ecrase'..
000150: 20 20 20 20 20 40 20 6C 69 67 6D 31 2B 31 2C 30 @ ligm1+1,0
000160: 20 73 61 79 20 27 76 6F 75 6C 65 7A 2D 76 6F 75 say 'voulez-vou
000170: 73 20 63 6F 6E 74 69 6E 75 65 72 20 6C 61 20 67 s continuer la g
000180: 65 6E 65 72 61 74 69 6F 6E 27 0D 0A 20 20 20 20 eneration'..
000190: 20 20 20 20 20 73 74 6F 72 65 20 27 4E 27 20 74 store 'N' t
0001A0: 6F 20 72 65 70 0D 0A 20 20 20 20 20 20 20 20 20 o rep..
0001B0: 73 65 74 20 69 6E 74 65 6E 73 69 74 79 20 6F 66 set intensity of
0001C0: 66 0D 0A 20 20 20 20 20 20 20 20 20 40 20 6C 69 f.. @ li
0001D0: 67 6D 31 2B 31 2C 33 38 20 67 65 74 20 72 65 70 gm1+1,38 get rep
0001E0: 0D 0A 20 20 20 20 20 20 20 20 20 73 65 74 20 69 .. set i
0001F0: 6E 74 65 6E 73 69 74 79 20 6F 6E 0D 0A 20 20 20 ntensity on..
Size : 512 (Real : 512)
000000: 67 61 72 64 65 20 64 61 6E 73 20 42 3A 20 70 75 garde dans B: pu
000010: 69 73 20 61 70 70 75 79 65 7A 20 73 75 72 20 75 is appuyez sur u
000020: 6E 65 20 74 6F 75 63 68 65 27 0D 0A 77 61 69 74 ne touche'..wait
000030: 0D 0A 72 65 73 65 74 0D 0A 69 66 20 2E 6E 6F 74 ..reset..if .not
000040: 2E 66 69 6C 65 28 26 6E 6F 6D 63 6F 6D 70 32 29 .file(&nomcomp2)
000050: 0D 0A 20 20 20 72 65 6E 61 6D 65 20 26 6E 6F 6D .. rename &nom
000060: 66 69 63 68 20 74 6F 20 26 6E 6F 6D 32 0D 0A 65 fich to &nom2..e
000070: 6E 64 69 66 0D 0A 75 73 65 20 26 6E 6F 6D 32 0D ndif..use &nom2.
000080: 0A 69 66 20 65 6F 66 0D 0A 72 65 74 75 72 6E 0D .if eof..return.
000090: 0A 65 6E 64 69 66 0D 0A 73 74 6F 72 65 20 31 20 .endif..store 1
0000A0: 74 6F 20 63 70 74 0D 0A 64 6F 20 77 68 69 6C 65 to cpt..do while
0000B0: 20 63 70 74 20 23 20 30 0D 0A 67 6F 74 6F 20 63 cpt # 0..goto c
0000C0: 70 74 0D 0A 63 6F 70 79 20 74 6F 20 74 65 6D 70 pt..copy to temp
0000D0: 20 6E 65 78 74 20 26 6E 62 0D 0A 73 6B 69 70 0D next &nb..skip.
0000E0: 0A 69 66 20 65 6F 66 0D 0A 20 20 20 73 74 6F 72 .if eof.. stor
0000F0: 65 20 30 20 74 6F 20 63 70 74 0D 0A 65 6C 73 65 e 0 to cpt..else
000100: 0D 0A 20 20 20 73 74 6F 72 65 20 63 70 74 2B 76 .. store cpt+v
000110: 61 6C 28 6E 62 29 20 74 6F 20 63 70 74 0D 0A 65 al(nb) to cpt..e
000120: 6E 64 69 66 0D 0A 75 73 65 0D 0A 72 65 6E 61 6D ndif..use..renam
000130: 65 20 26 6E 6F 6D 32 20 74 6F 20 26 6E 6F 6D 66 e &nom2 to &nomf
000140: 69 63 68 0D 0A 3F 20 27 69 6E 73 65 72 65 7A 20 ich..? 'inserez
000150: 64 69 73 71 75 65 74 74 65 20 64 6F 6E 6E 65 65 disquette donnee
000160: 73 20 64 61 6E 73 20 42 3A 20 70 75 69 73 20 61 s dans B: puis a
000170: 70 70 75 79 65 7A 20 73 75 72 20 75 6E 65 20 74 ppuyez sur une t
000180: 6F 75 63 68 65 27 0D 0A 77 61 69 74 0D 0A 72 65 ouche'..wait..re
000190: 73 65 74 0D 0A 69 66 20 2E 6E 6F 74 2E 66 69 6C set..if .not.fil
0001A0: 65 28 26 6E 6F 6D 63 6F 6D 70 31 29 0D 0A 20 20 e(&nomcomp1)..
0001B0: 20 72 65 6E 61 6D 65 20 26 6E 6F 6D 66 69 63 68 rename &nomfich
0001C0: 20 74 6F 20 26 6E 6F 6D 31 0D 0A 65 6E 64 69 66 to &nom1..endif
0001D0: 0D 0A 75 73 65 20 26 6E 6F 6D 31 0D 0A 61 70 70 ..use &nom1..app
0001E0: 65 6E 64 20 66 72 6F 6D 20 74 65 6D 70 0D 0A 75 end from temp..u
0001F0: 73 65 0D 0A 72 65 6E 61 6D 65 20 26 6E 6F 6D 31 se..rename &nom1
Size : 512 (Real : 512)
000000: 20 20 20 20 20 20 72 65 61 64 0D 0A 20 20 20 20 read..
000010: 20 20 20 20 20 63 6C 65 61 72 20 67 65 74 0D 0A clear get..
000020: 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 else..
000030: 20 20 20 20 20 73 74 6F 72 65 20 27 4F 27 20 74 store 'O' t
000040: 6F 20 72 65 70 0D 0A 20 20 20 20 20 20 65 6E 64 o rep.. end
000050: 69 66 0D 0A 20 20 20 20 20 20 69 66 20 21 28 72 if.. if !(r
000060: 65 70 29 3D 27 4F 27 0D 0A 20 20 20 20 20 20 20 ep)='O'..
000070: 20 20 72 65 6C 65 61 73 65 20 72 65 70 2C 74 65 release rep,te
000080: 73 74 2C 65 78 69 73 74 2C 6E 6F 65 72 72 2C 72 st,exist,noerr,r
000090: 65 70 72 69 73 65 0D 0A 20 20 20 20 20 20 20 20 eprise..
0000A0: 20 64 6F 20 67 65 6E 65 0D 0A 20 20 20 20 20 20 do gene..
0000B0: 20 20 20 73 74 6F 72 65 20 27 74 27 20 74 6F 20 store 't' to
0000C0: 65 78 69 73 74 0D 0A 20 20 20 20 20 20 20 20 20 exist..
0000D0: 73 74 6F 72 65 20 30 20 74 6F 20 6E 6F 65 72 72 store 0 to noerr
0000E0: 0D 0A 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 .. else..
0000F0: 20 20 20 20 20 20 20 72 65 6C 65 61 73 65 20 72 release r
000100: 65 70 0D 0A 20 20 20 20 20 20 65 6E 64 69 66 0D ep.. endif.
000110: 0A 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 63 61 . endif.. ca
000120: 73 65 20 63 68 6F 69 78 3E 3D 27 32 27 2E 61 6E se choix>='2'.an
000130: 64 2E 63 68 6F 69 78 3C 3D 27 38 27 2E 6F 72 2E d.choix<='8'.or.
000140: 63 68 6F 69 78 3D 27 43 27 0D 0A 20 20 20 69 66 choix='C'.. if
000150: 20 72 65 70 72 69 73 65 3D 27 66 27 2E 61 6E 64 reprise='f'.and
000160: 2E 65 78 69 73 74 3D 27 66 27 0D 0A 20 20 20 20 .exist='f'..
000170: 20 20 73 74 6F 72 65 20 34 39 20 74 6F 20 6E 6F store 49 to no
000180: 6D 65 73 73 0D 0A 20 20 20 20 20 20 64 6F 20 61 mess.. do a
000190: 66 66 6D 65 73 73 0D 0A 20 20 20 65 6C 73 65 0D ffmess.. else.
0001A0: 0A 20 20 20 20 20 20 69 66 20 72 65 70 72 69 73 . if repris
0001B0: 65 3D 27 66 27 2E 61 6E 64 2E 6E 6F 65 72 72 20 e='f'.and.noerr
0001C0: 23 20 30 2E 61 6E 64 2E 63 68 6F 69 78 23 27 32 # 0.and.choix#'2
0001D0: 27 2E 61 6E 64 2E 63 68 6F 69 78 23 27 33 27 0D '.and.choix#'3'.
0001E0: 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 . store
0001F0: 6E 6F 65 72 72 20 74 6F 20 6E 6F 6D 65 73 73 0D noerr to nomess.
Size : 512 (Real : 512)
000000: 20 74 6F 20 26 6E 6F 6D 66 69 63 68 0D 0A 69 66 to &nomfich..if
000010: 20 63 70 74 23 30 0D 0A 3F 20 27 69 6E 73 65 72 cpt#0..? 'inser
000020: 65 7A 20 64 69 73 71 75 65 74 74 65 20 73 61 75 ez disquette sau
000030: 76 65 67 61 72 64 65 20 64 61 6E 73 20 42 3A 20 vegarde dans B:
000040: 70 75 69 73 20 61 70 70 75 79 65 7A 20 73 75 72 puis appuyez sur
000050: 20 75 6E 65 20 74 6F 75 63 68 65 27 0D 0A 77 61 une touche'..wa
000060: 69 74 0D 0A 72 65 73 65 74 0D 0A 69 66 20 2E 6E it..reset..if .n
000070: 6F 74 2E 66 69 6C 65 28 26 6E 6F 6D 63 6F 6D 70 ot.file(&nomcomp
000080: 32 29 0D 0A 20 20 20 72 65 6E 61 6D 65 20 26 6E 2).. rename &n
000090: 6F 6D 66 69 63 68 20 74 6F 20 26 6E 6F 6D 32 0D omfich to &nom2.
0000A0: 0A 65 6E 64 69 66 0D 0A 75 73 65 20 26 6E 6F 6D .endif..use &nom
0000B0: 32 0D 0A 65 6E 64 69 66 0D 0A 65 6E 64 64 6F 0D 2..endif..enddo.
0000C0: 0A 75 73 65 20 26 6E 6F 6D 66 69 63 68 20 69 6E .use &nomfich in
0000D0: 64 65 78 20 26 6C 69 73 74 69 6E 64 0D 0A 72 65 dex &listind..re
0000E0: 69 6E 64 65 78 0D 0A 64 65 6C 65 20 66 69 6C 65 index..dele file
0000F0: 20 61 3A 74 65 6D 70 0D 0A 65 6E 64 69 66 0D 0A a:temp..endif..
000100: 63 6C 65 61 72 0D 0A 71 75 69 74 0D 0A 0D 0A 0D clear..quit.....
000110: 0A 0D 0A 1A 1A 2D 6E 6F 6D 66 69 63 68 2D 22 2E .....-nomfich-".
000120: 65 78 31 27 22 20 74 6F 20 6E 6F 6D 63 6F 6D 70 ex1'" to nomcomp
000130: 31 0D 0A 73 74 6F 72 65 20 22 27 42 3A 22 2D 6E 1..store "'B:"-n
000140: 6F 6D 66 69 63 68 2D 22 2E 65 78 32 27 22 20 74 omfich-".ex2'" t
000150: 6F 20 6E 6F 6D 63 6F 6D 70 32 0D 0A 73 74 6F 72 o nomcomp2..stor
000160: 65 20 22 42 3A 22 2D 6E 6F 6D 66 69 63 68 20 74 e "B:"-nomfich t
000170: 6F 20 6E 6F 6D 66 69 63 68 0D 0A 73 74 6F 72 65 o nomfich..store
000180: 20 6E 6F 6D 66 69 63 68 2D 27 2E 65 78 31 27 20 nomfich-'.ex1'
000190: 74 6F 20 6E 6F 6D 31 0D 0A 73 74 6F 72 65 20 6E to nom1..store n
0001A0: 6F 6D 66 69 63 68 2D 27 2E 65 78 32 27 20 74 6F omfich-'.ex2' to
0001B0: 20 6E 6F 6D 32 0D 0A 69 66 20 66 69 6C 65 28 26 nom2..if file(&
0001C0: 6E 6F 6D 63 6F 6D 70 31 29 0D 0A 20 20 20 64 65 nomcomp1).. de
0001D0: 6C 65 20 66 69 6C 65 20 26 6E 6F 6D 31 0D 0A 65 le file &nom1..e
0001E0: 6E 64 69 66 0D 0A 3F 20 27 69 6E 73 65 72 65 7A ndif..? 'inserez
0001F0: 20 64 69 73 71 75 65 74 74 65 20 73 61 75 76 65 disquette sauve
Size : 512 (Real : 512)
000000: 0A 20 20 20 20 20 20 20 20 20 64 6F 20 61 66 66 . do aff
000010: 6D 65 73 73 0D 0A 20 20 20 20 20 20 20 20 20 69 mess.. i
000020: 66 20 66 69 6C 65 28 66 65 6C 65 29 2E 61 6E 64 f file(fele).and
000030: 2E 66 69 6C 65 28 78 65 6C 65 29 0D 0A 20 20 20 .file(xele)..
000040: 20 20 20 20 20 20 73 74 6F 72 65 20 27 43 27 20 store 'C'
000050: 74 6F 20 65 6C 65 6D 0D 0A 20 20 20 20 20 20 20 to elem..
000060: 20 20 64 6F 20 6C 69 73 74 65 6C 65 6D 0D 0A 20 do listelem..
000070: 20 20 20 20 20 20 20 20 72 65 6C 65 61 73 65 20 release
000080: 65 6C 65 6D 0D 0A 20 20 20 20 20 20 20 20 20 65 elem.. e
000090: 6E 64 69 66 0D 0A 20 20 20 20 20 20 65 6C 73 65 ndif.. else
0000A0: 0D 0A 20 20 20 20 20 20 20 20 20 64 6F 20 63 61 .. do ca
0000B0: 73 65 0D 0A 20 20 20 20 20 20 20 20 20 63 61 73 se.. cas
0000C0: 65 20 63 68 6F 69 78 3D 27 32 27 0D 0A 20 20 20 e choix='2'..
0000D0: 20 20 20 20 20 20 64 6F 20 6D 6F 64 69 66 69 63 do modific
0000E0: 68 0D 0A 20 20 20 20 20 20 20 20 20 63 61 73 65 h.. case
0000F0: 20 63 68 6F 69 78 20 3D 20 27 33 27 0D 0A 20 20 choix = '3'..
000100: 20 20 20 20 20 20 20 73 74 6F 72 65 20 27 66 27 store 'f'
000110: 20 74 6F 20 6D 6F 64 69 66 0D 0A 20 20 20 20 20 to modif..
000120: 20 20 20 20 64 6F 20 73 75 70 66 69 63 68 0D 0A do supfich..
000130: 20 20 20 20 20 20 20 20 20 72 65 74 75 72 6E 0D return.
000140: 0A 20 20 20 20 20 20 20 20 20 63 61 73 65 20 63 . case c
000150: 68 6F 69 78 3D 27 43 27 0D 0A 20 20 20 20 20 20 hoix='C'..
000160: 20 20 20 73 74 6F 72 65 20 27 66 27 20 74 6F 20 store 'f' to
000170: 63 6F 72 72 65 63 74 0D 0A 20 20 20 20 20 20 20 correct..
000180: 20 20 73 65 6C 65 63 74 20 70 72 69 6D 61 72 79 select primary
000190: 0D 0A 20 20 20 20 20 20 20 20 20 75 73 65 20 26 .. use &
0001A0: 66 72 65 66 20 69 6E 64 65 78 20 26 78 6E 6F 6D fref index &xnom
0001B0: 0D 0A 20 20 20 20 20 20 20 20 20 65 72 61 73 65 .. erase
0001C0: 0D 0A 20 20 20 20 20 20 20 20 20 40 20 31 2C 32 .. @ 1,2
0001D0: 36 20 73 61 79 20 22 43 48 41 4E 47 45 4D 45 4E 6 say "CHANGEMEN
0001E0: 54 20 44 27 55 4E 45 20 4F 50 54 49 4F 4E 20 44 T D'UNE OPTION D
0001F0: 45 20 56 45 52 49 46 49 43 41 54 49 4F 4E 22 0D E VERIFICATION".
Size : 512 (Real : 512)
000000: 66 3D 24 28 6E 6F 6D 66 69 63 68 2C 33 2C 38 29 f=$(nomfich,3,8)
000010: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 72 65 .. re
000020: 70 6C 61 63 65 20 75 74 69 6C 69 73 65 20 77 69 place utilise wi
000030: 74 68 20 27 20 27 0D 0A 20 20 20 20 20 20 20 20 th ' '..
000040: 20 20 20 20 63 61 73 65 20 63 68 6F 69 78 3D 27 case choix='
000050: 37 27 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 7'..
000060: 64 6F 20 73 75 70 65 6C 65 6D 0D 0A 20 20 20 20 do supelem..
000070: 20 20 20 20 20 20 20 20 63 61 73 65 20 63 68 6F case cho
000080: 69 78 3D 27 38 27 0D 0A 20 20 20 20 20 20 20 20 ix='8'..
000090: 20 20 20 20 64 6F 20 6C 69 73 74 65 6C 65 6D 0D do listelem.
0000A0: 0A 20 20 20 20 20 20 20 20 20 65 6E 64 63 61 73 . endcas
0000B0: 65 0D 0A 20 20 20 20 20 20 20 20 20 72 65 6C 65 e.. rele
0000C0: 61 73 65 20 65 6C 65 6D 0D 0A 20 20 20 20 20 20 ase elem..
0000D0: 20 20 20 65 6E 64 63 61 73 65 0D 0A 20 20 20 20 endcase..
0000E0: 20 20 65 6E 64 69 66 0D 0A 20 20 20 65 6E 64 69 endif.. endi
0000F0: 66 0D 0A 20 20 20 63 61 73 65 20 21 28 63 68 6F f.. case !(cho
000100: 69 78 29 20 3D 20 27 46 27 0D 0A 20 20 20 72 65 ix) = 'F'.. re
000110: 74 75 72 6E 0D 0A 20 20 20 6F 74 68 65 72 77 69 turn.. otherwi
000120: 73 65 0D 0A 20 20 20 2A 20 61 66 66 69 63 68 65 se.. * affiche
000130: 72 20 75 6E 20 6D 65 73 73 61 67 65 20 64 27 65 r un message d'e
000140: 72 72 65 75 72 0D 0A 20 20 20 73 74 6F 72 65 20 rreur.. store
000150: 31 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 1 to nomess..
000160: 64 6F 20 61 66 66 6D 65 73 73 0D 0A 20 20 20 65 do affmess.. e
000170: 6E 64 63 61 73 65 0D 0A 20 20 20 73 65 6C 65 63 ndcase.. selec
000180: 74 20 70 72 69 6D 61 72 79 0D 0A 20 20 20 75 73 t primary.. us
000190: 65 0D 0A 20 20 20 73 65 6C 65 63 74 20 73 65 63 e.. select sec
0001A0: 6F 6E 64 61 72 79 0D 0A 20 20 20 75 73 65 0D 0A ondary.. use..
0001B0: 20 20 20 73 65 6C 65 63 74 20 70 72 69 6D 61 72 select primar
0001C0: 79 0D 0A 20 20 20 73 74 6F 72 65 20 27 46 27 20 y.. store 'F'
0001D0: 74 6F 20 63 68 6F 69 78 0D 0A 20 20 20 73 74 6F to choix.. sto
0001E0: 72 65 20 27 66 27 20 74 6F 20 72 65 70 72 69 73 re 'f' to repris
0001F0: 65 0D 0A 20 20 20 73 74 6F 72 65 20 27 74 27 20 e.. store 't'
Size : 512 (Real : 512)
000000: 0A 20 20 20 20 20 20 20 20 20 40 20 35 2C 35 20 . @ 5,5
000010: 73 61 79 20 27 6E 6F 6D 20 64 65 20 6C 61 20 7A say 'nom de la z
000020: 6F 6E 65 27 0D 0A 20 20 20 20 20 20 20 20 20 64 one'.. d
000030: 6F 20 77 68 69 6C 65 20 63 6F 72 72 65 63 74 3D o while correct=
000040: 27 66 27 0D 0A 20 20 20 20 20 20 20 20 20 20 20 'f'..
000050: 20 40 20 6C 69 67 6D 31 2C 30 20 73 61 79 20 27 @ ligm1,0 say '
000060: 74 61 70 65 7A 20 72 65 74 75 72 6E 20 70 6F 75 tapez return pou
000070: 72 20 61 62 61 6E 64 6F 6E 6E 65 72 27 0D 0A 20 r abandonner'..
000080: 20 20 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 store
000090: 20 22 20 20 20 20 20 20 20 20 20 20 22 20 74 6F " " to
0000A0: 20 6D 7A 6F 6E 0D 0A 20 20 20 20 20 20 20 20 20 mzon..
0000B0: 20 20 20 40 20 35 2C 33 35 20 67 65 74 20 6D 7A @ 5,35 get mz
0000C0: 6F 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 on..
0000D0: 72 65 61 64 0D 0A 20 20 20 20 20 20 20 20 20 20 read..
0000E0: 20 20 73 74 6F 72 65 20 21 28 6D 7A 6F 6E 29 20 store !(mzon)
0000F0: 74 6F 20 6D 7A 6F 6E 0D 0A 20 20 20 20 20 20 20 to mzon..
000100: 20 20 20 20 20 69 66 20 6D 7A 6F 6E 20 3D 20 27 if mzon = '
000110: 20 27 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 '..
000120: 20 20 20 73 74 6F 72 65 20 27 74 27 20 74 6F 20 store 't' to
000130: 63 6F 72 72 65 63 74 0D 0A 20 20 20 20 20 20 20 correct..
000140: 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 else..
000150: 20 20 20 20 20 20 20 20 20 20 66 69 6E 64 20 26 find &
000160: 6D 7A 6F 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 mzon..
000170: 20 20 20 20 20 69 66 20 23 20 3D 20 30 0D 0A 20 if # = 0..
000180: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000190: 20 73 74 6F 72 65 20 6D 7A 6F 6E 20 74 6F 20 6E store mzon to n
0001A0: 6F 6D 7A 0D 0A 20 20 20 20 20 20 20 20 20 20 20 omz..
0001B0: 20 20 20 20 20 20 20 73 74 6F 72 65 20 32 37 20 store 27
0001C0: 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 20 20 to nomess..
0001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 64 6F 20 do
0001E0: 61 66 66 6D 65 73 73 0D 0A 20 20 20 20 20 20 20 affmess..
0001F0: 20 20 20 20 20 20 20 20 20 20 20 72 65 6C 65 61 relea
Size : 512 (Real : 512)
000000: 2A 20 64 65 6D 66 69 63 68 20 3A 20 64 65 6D 61 * demfich : dema
000010: 6E 64 65 20 73 75 72 20 71 75 65 6C 20 66 69 63 nde sur quel fic
000020: 68 69 65 72 20 6F 6E 20 76 65 75 74 20 74 72 61 hier on veut tra
000030: 76 61 69 6C 6C 65 72 0D 0A 0D 0A 73 74 6F 72 65 vailler....store
000040: 20 27 66 27 20 74 6F 20 65 78 69 73 74 0D 0A 73 'f' to exist..s
000050: 74 6F 72 65 20 30 20 74 6F 20 6E 6F 65 72 72 0D tore 0 to noerr.
000060: 0A 73 65 6C 65 63 74 20 70 72 69 6D 61 72 79 0D .select primary.
000070: 0A 75 73 65 20 67 65 73 74 66 69 63 68 0D 0A 67 .use gestfich..g
000080: 6F 74 6F 20 74 6F 70 0D 0A 73 74 6F 72 65 20 27 oto top..store '
000090: 20 20 20 20 20 20 20 20 27 20 74 6F 20 6E 6F 6D ' to nom
0000A0: 66 69 63 68 0D 0A 65 72 61 73 65 0D 0A 40 20 35 fich..erase..@ 5
0000B0: 2C 35 20 73 61 79 20 27 6E 6F 6D 20 64 75 20 66 ,5 say 'nom du f
0000C0: 69 63 68 69 65 72 20 73 75 72 20 6C 65 71 75 65 ichier sur leque
0000D0: 6C 20 76 6F 75 73 20 76 6F 75 6C 65 7A 20 74 72 l vous voulez tr
0000E0: 61 76 61 69 6C 6C 65 72 27 0D 0A 40 20 35 2C 36 availler'..@ 5,6
0000F0: 35 20 67 65 74 20 6E 6F 6D 66 69 63 68 20 70 69 5 get nomfich pi
000100: 63 74 75 72 65 20 27 41 41 41 41 41 41 41 41 27 cture 'AAAAAAAA'
000110: 0D 0A 40 20 6C 69 67 6D 31 2C 30 20 73 61 79 20 ..@ ligm1,0 say
000120: 27 74 61 70 65 7A 20 72 65 74 75 72 6E 20 70 6F 'tapez return po
000130: 75 72 20 61 62 61 6E 64 6F 6E 6E 65 72 27 0D 0A ur abandonner'..
000140: 72 65 61 64 0D 0A 2A 20 76 65 75 74 2D 6F 6E 20 read..* veut-on
000150: 72 65 76 65 6E 69 72 20 61 75 20 6D 65 6E 75 20 revenir au menu
000160: 70 72 69 6E 63 69 70 61 6C 0D 0A 69 66 20 6E 6F principal..if no
000170: 6D 66 69 63 68 3D 27 20 27 0D 0A 20 20 20 72 65 mfich=' '.. re
000180: 74 75 72 6E 0D 0A 65 6E 64 69 66 0D 0A 73 74 6F turn..endif..sto
000190: 72 65 20 21 28 6E 6F 6D 66 69 63 68 29 20 74 6F re !(nomfich) to
0001A0: 20 6E 6F 6D 66 69 63 68 0D 0A 73 74 6F 72 65 20 nomfich..store
0001B0: 6E 6F 6D 66 69 63 68 20 74 6F 20 6E 6F 6D 61 66 nomfich to nomaf
0001C0: 66 0D 0A 6C 6F 63 61 74 65 20 66 6F 72 20 6E 6F f..locate for no
0001D0: 6D 66 3D 6E 6F 6D 66 69 63 68 0D 0A 69 66 20 6E mf=nomfich..if n
0001E0: 6F 6D 66 20 23 20 6E 6F 6D 66 69 63 68 20 2E 6F omf # nomfich .o
0001F0: 72 2E 65 6F 66 0D 0A 20 20 20 73 74 6F 72 65 20 r.eof.. store
Size : 512 (Real : 512)
000000: 73 65 20 6E 6F 6D 7A 0D 0A 20 20 20 20 20 20 20 se nomz..
000010: 20 20 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 else..
000020: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000030: 73 74 6F 72 65 20 27 74 27 20 74 6F 20 63 6F 72 store 't' to cor
000040: 72 65 63 74 0D 0A 20 20 20 20 20 20 20 20 20 20 rect..
000050: 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 endif..
000060: 20 20 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 endif..
000070: 20 20 20 20 20 20 20 20 65 6E 64 64 6F 0D 0A 20 enddo..
000080: 20 20 20 20 20 20 20 20 72 65 6C 65 61 73 65 20 release
000090: 63 6F 72 72 65 63 74 0D 0A 20 20 20 20 20 20 20 correct..
0000A0: 20 20 69 66 20 6D 7A 6F 6E 20 23 20 27 20 27 0D if mzon # ' '.
0000B0: 0A 20 20 20 20 20 20 20 20 20 20 20 20 73 74 6F . sto
0000C0: 72 65 20 23 20 74 6F 20 6E 6F 63 6F 75 72 0D 0A re # to nocour..
0000D0: 20 20 20 20 20 20 20 20 20 20 20 20 73 74 6F 72 stor
0000E0: 65 20 66 69 65 6C 64 3A 74 79 70 65 20 74 6F 20 e field:type to
0000F0: 6D 74 79 70 65 0D 0A 20 20 20 20 20 20 20 20 20 mtype..
000100: 20 20 20 73 74 6F 72 65 20 66 69 65 6C 64 3A 6C store field:l
000110: 65 6E 20 74 6F 20 6D 6C 6F 6E 0D 0A 20 20 20 20 en to mlon..
000120: 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 66 69 store fi
000130: 65 6C 64 3A 64 65 63 20 74 6F 20 6D 64 65 63 0D eld:dec to mdec.
000140: 0A 20 20 20 20 20 20 20 20 20 20 20 20 64 6F 20 . do
000150: 76 65 72 7A 6F 6E 65 0D 0A 20 20 20 20 20 20 20 verzone..
000160: 20 20 20 20 20 3F 0D 0A 20 20 20 20 20 20 20 20 ?..
000170: 20 20 20 20 3F 20 22 41 54 54 45 4E 54 49 4F 4E ? "ATTENTION
000180: 20 3A 20 73 69 20 76 6F 75 73 20 61 76 65 7A 20 : si vous avez
000190: 64 65 63 6C 61 72 65 20 63 65 74 74 65 20 7A 6F declare cette zo
0001A0: 6E 65 20 63 6F 6D 6D 65 20 64 61 74 65 20 22 3B ne comme date ";
0001B0: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 2B 22 .. +"
0001C0: 61 6C 6F 72 73 20 71 75 27 65 6C 6C 65 20 6E 65 alors qu'elle ne
0001D0: 20 6C 27 65 74 61 69 74 20 70 61 73 20 61 76 61 l'etait pas ava
0001E0: 6E 74 20 20 6F 75 20 76 69 63 65 20 65 74 20 76 nt ou vice et v
0001F0: 65 72 73 61 22 0D 0A 20 20 20 20 20 20 20 20 20 ersa"..
Size : 512 (Real : 512)
000000: 27 66 27 20 74 6F 20 65 78 69 73 74 0D 0A 20 20 'f' to exist..
000010: 20 73 74 6F 72 65 20 75 6E 69 74 2B 6E 6F 6D 66 store unit+nomf
000020: 69 63 68 20 74 6F 20 6E 6F 6D 66 69 63 68 0D 0A ich to nomfich..
000030: 65 6C 73 65 0D 0A 20 20 20 73 74 6F 72 65 20 27 else.. store '
000040: 74 27 20 74 6F 20 65 78 69 73 74 0D 0A 20 20 20 t' to exist..
000050: 73 74 6F 72 65 20 75 6E 69 74 2B 6E 6F 6D 66 69 store unit+nomfi
000060: 63 68 20 74 6F 20 6E 6F 6D 66 69 63 68 0D 0A 20 ch to nomfich..
000070: 20 20 73 74 6F 72 65 20 74 69 74 72 65 66 20 74 store titref t
000080: 6F 20 74 69 74 72 65 6D 65 6E 75 70 0D 0A 20 20 o titremenup..
000090: 20 73 74 6F 72 65 20 6E 6F 6D 66 69 63 68 2D 27 store nomfich-'
0000A0: 2E 72 65 66 27 20 74 6F 20 66 72 65 66 0D 0A 20 .ref' to fref..
0000B0: 20 20 73 74 6F 72 65 20 6E 6F 6D 66 69 63 68 2D store nomfich-
0000C0: 27 2E 6E 6F 6D 27 20 74 6F 20 78 6E 6F 6D 0D 0A '.nom' to xnom..
0000D0: 20 20 20 73 74 6F 72 65 20 6E 6F 6D 66 69 63 68 store nomfich
0000E0: 2D 27 2E 63 6C 65 27 20 74 6F 20 78 63 6C 65 0D -'.cle' to xcle.
0000F0: 0A 20 20 20 73 74 6F 72 65 20 6E 6F 6D 66 69 63 . store nomfic
000100: 68 2D 27 2E 65 6C 66 27 20 74 6F 20 66 65 6C 65 h-'.elf' to fele
000110: 0D 0A 20 20 20 73 74 6F 72 65 20 6E 6F 6D 66 69 .. store nomfi
000120: 63 68 2D 27 2E 65 6C 69 27 20 74 6F 20 78 65 6C ch-'.eli' to xel
000130: 65 0D 0A 20 20 20 2A 20 76 65 72 69 66 69 65 72 e.. * verifier
000140: 20 71 75 65 20 74 6F 75 73 20 6C 65 73 20 66 69 que tous les fi
000150: 63 68 69 65 72 73 20 73 6F 6E 74 20 6C 61 0D 0A chiers sont la..
000160: 20 20 20 73 74 6F 72 65 20 30 20 74 6F 20 6E 6F store 0 to no
000170: 65 72 72 0D 0A 20 20 20 69 66 20 2E 6E 6F 74 2E err.. if .not.
000180: 66 69 6C 65 28 6E 6F 6D 66 69 63 68 29 0D 0A 20 file(nomfich)..
000190: 20 20 20 20 20 73 74 6F 72 65 20 35 33 20 74 6F store 53 to
0001A0: 20 6E 6F 65 72 72 0D 0A 20 20 20 65 6C 73 65 0D noerr.. else.
0001B0: 0A 20 20 20 20 20 20 69 66 20 2E 6E 6F 74 2E 28 . if .not.(
0001C0: 66 69 6C 65 28 66 72 65 66 29 2E 61 6E 64 2E 66 file(fref).and.f
0001D0: 69 6C 65 28 78 63 6C 65 29 2E 61 6E 64 2E 66 69 ile(xcle).and.fi
0001E0: 6C 65 28 78 6E 6F 6D 29 29 0D 0A 20 20 20 20 20 le(xnom))..
0001F0: 20 20 20 20 73 74 6F 72 65 20 35 31 20 74 6F 20 store 51 to
Size : 512 (Real : 512)
000000: 20 20 20 3F 20 22 73 69 20 63 65 74 74 65 20 7A ? "si cette z
000010: 6F 6E 65 20 66 61 69 74 20 70 61 72 74 69 65 20 one fait partie
000020: 64 27 75 6E 20 69 6E 64 65 78 2C 20 6E 27 6F 75 d'un index, n'ou
000030: 62 6C 69 65 7A 20 70 61 73 20 64 65 20 22 3B 0D bliez pas de ";.
000040: 0A 20 20 20 20 20 20 20 20 20 20 20 20 2B 22 72 . +"r
000050: 65 64 65 66 69 6E 69 72 20 76 6F 74 72 65 20 69 edefinir votre i
000060: 6E 64 65 78 22 0D 0A 20 20 20 20 20 20 20 20 20 ndex"..
000070: 20 20 20 3F 0D 0A 20 20 20 20 20 20 20 20 20 20 ?..
000080: 20 20 3F 20 27 74 61 70 65 7A 20 73 75 72 20 75 ? 'tapez sur u
000090: 6E 65 20 74 6F 75 63 68 65 20 70 6F 75 72 20 63 ne touche pour c
0000A0: 6F 6E 74 69 6E 75 65 72 27 0D 0A 20 20 20 20 20 ontinuer'..
0000B0: 20 20 20 20 20 20 20 73 65 74 20 63 6F 6E 73 6F set conso
0000C0: 6C 65 20 6F 66 66 0D 0A 20 20 20 20 20 20 20 20 le off..
0000D0: 20 20 20 20 77 61 69 74 0D 0A 20 20 20 20 20 20 wait..
0000E0: 20 20 20 20 20 20 73 65 74 20 63 6F 6E 73 6F 6C set consol
0000F0: 65 20 6F 6E 0D 0A 20 20 20 20 20 20 20 20 20 65 e on.. e
000100: 6E 64 69 66 0D 0A 20 20 20 20 20 20 20 20 20 72 ndif.. r
000110: 65 6C 65 61 73 65 20 6D 7A 6F 6E 2C 63 6F 72 72 elease mzon,corr
000120: 65 63 74 2C 6E 6F 63 6F 75 72 2C 6D 74 79 70 65 ect,nocour,mtype
000130: 2C 6D 6C 6F 6E 2C 6D 64 65 63 0D 0A 20 20 20 20 ,mlon,mdec..
000140: 20 20 20 20 20 63 61 73 65 20 63 68 6F 69 78 20 case choix
000150: 3D 20 27 34 27 0D 0A 20 20 20 20 20 20 20 20 20 = '4'..
000160: 64 6F 20 6C 69 73 74 66 69 63 68 0D 0A 20 20 20 do listfich..
000170: 20 20 20 20 20 20 63 61 73 65 20 63 68 6F 69 78 case choix
000180: 3D 27 35 27 0D 0A 20 20 20 20 20 20 20 20 20 64 ='5'.. d
000190: 6F 20 6D 65 6E 75 73 65 63 0D 0A 20 20 20 20 20 o menusec..
0001A0: 20 20 20 20 63 61 73 65 20 63 68 6F 69 78 3E 3D case choix>=
0001B0: 27 36 27 2E 61 6E 64 2E 63 68 6F 69 78 3C 3D 27 '6'.and.choix<='
0001C0: 38 27 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F 8'.. sto
0001D0: 72 65 20 27 4C 27 20 74 6F 20 65 6C 65 6D 0D 0A re 'L' to elem..
0001E0: 20 20 20 20 20 20 20 20 20 64 6F 20 63 61 73 65 do case
0001F0: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 63 61 .. ca
Size : 512 (Real : 512)
000000: 6E 6F 65 72 72 0D 0A 20 20 20 20 20 20 65 6C 73 noerr.. els
000010: 65 0D 0A 20 20 20 20 20 20 20 20 20 69 66 20 2E e.. if .
000020: 6E 6F 74 2E 28 66 69 6C 65 28 66 65 6C 65 29 2E not.(file(fele).
000030: 61 6E 64 2E 66 69 6C 65 28 78 65 6C 65 29 29 0D and.file(xele)).
000040: 0A 20 20 20 20 20 20 20 20 20 20 20 20 73 74 6F . sto
000050: 72 65 20 35 32 20 74 6F 20 6E 6F 65 72 72 0D 0A re 52 to noerr..
000060: 20 20 20 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 else..
000070: 20 20 20 20 20 20 20 20 20 20 20 75 73 65 20 26 use &
000080: 66 65 6C 65 20 69 6E 64 65 78 20 26 78 65 6C 65 fele index &xele
000090: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 67 6F .. go
0000A0: 74 6F 20 74 6F 70 0D 0A 20 20 20 20 20 20 20 20 to top..
0000B0: 20 20 20 20 66 69 6E 64 20 43 0D 0A 20 20 20 20 find C..
0000C0: 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 20 27 store '
0000D0: 20 27 20 74 6F 20 6C 69 73 74 69 6E 64 65 78 0D ' to listindex.
0000E0: 0A 20 20 20 20 20 20 20 20 20 20 20 20 64 6F 20 . do
0000F0: 77 68 69 6C 65 20 2E 6E 6F 74 2E 65 6F 66 2E 61 while .not.eof.a
000100: 6E 64 2E 6E 6F 65 72 72 3D 30 2E 61 6E 64 2E 74 nd.noerr=0.and.t
000110: 79 70 65 6C 65 6D 3D 27 43 27 0D 0A 20 20 20 20 ypelem='C'..
000120: 20 20 20 20 20 20 20 20 20 20 20 64 6F 20 63 61 do ca
000130: 73 65 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 se..
000140: 20 20 20 20 20 20 63 61 73 65 20 74 79 70 63 20 case typc
000150: 23 20 27 20 27 2E 61 6E 64 2E 2E 6E 6F 74 2E 66 # ' '.and..not.f
000160: 69 6C 65 28 75 6E 69 74 2D 6E 6F 6D 65 6C 65 6D ile(unit-nomelem
000170: 2D 27 2E 6E 64 78 27 29 0D 0A 20 20 20 20 20 20 -'.ndx')..
000180: 20 20 20 20 20 20 20 20 20 20 20 20 73 74 6F 72 stor
000190: 65 20 35 33 20 74 6F 20 6E 6F 65 72 72 0D 0A 20 e 53 to noerr..
0001A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0001B0: 20 63 61 73 65 20 74 79 70 63 3D 27 50 27 0D 0A case typc='P'..
0001C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0001D0: 20 20 73 74 6F 72 65 20 75 6E 69 74 2B 6E 6F 6D store unit+nom
0001E0: 65 6C 65 6D 2B 6C 69 73 74 69 6E 64 65 78 20 74 elem+listindex t
0001F0: 6F 20 6C 69 73 74 69 6E 64 65 78 0D 0A 20 20 20 o listindex..
Size : 512 (Real : 512)
000000: 73 65 20 63 68 6F 69 78 3D 27 36 27 0D 0A 20 20 se choix='6'..
000010: 20 20 20 20 20 20 20 20 20 20 2A 20 73 6F 72 74 * sort
000020: 69 72 20 64 65 20 64 62 61 73 65 20 70 6F 75 72 ir de dbase pour
000030: 20 72 65 6D 65 74 74 72 65 20 6C 65 20 6E 62 20 remettre le nb
000040: 64 65 20 66 69 63 68 69 65 72 73 20 6F 75 76 65 de fichiers ouve
000050: 72 74 73 20 61 20 30 0D 0A 20 20 20 20 20 20 20 rts a 0..
000060: 20 20 20 20 20 69 66 20 72 65 70 72 69 73 65 3D if reprise=
000070: 27 66 27 0D 0A 20 20 20 20 20 20 20 20 20 20 20 'f'..
000080: 20 20 20 20 73 65 6C 65 63 74 20 70 72 69 6D 61 select prima
000090: 72 79 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 ry..
0000A0: 20 20 20 75 73 65 20 67 65 73 74 66 69 63 68 0D use gestfich.
0000B0: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
0000C0: 6C 6F 63 61 74 65 20 66 6F 72 20 6E 6F 6D 66 3D locate for nomf=
0000D0: 24 28 6E 6F 6D 66 69 63 68 2C 33 2C 38 29 0D 0A $(nomfich,3,8)..
0000E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 r
0000F0: 65 70 6C 61 63 65 20 75 74 69 6C 69 73 65 20 77 eplace utilise w
000100: 69 74 68 20 63 68 6F 69 78 0D 0A 20 20 20 20 20 ith choix..
000110: 20 20 20 20 20 20 20 20 20 20 63 6C 65 61 72 0D clear.
000120: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
000130: 71 75 69 74 20 74 6F 20 27 64 62 61 73 65 20 6D quit to 'dbase m
000140: 65 6E 75 70 27 0D 0A 20 20 20 20 20 20 20 20 20 enup'..
000150: 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 endif..
000160: 20 20 20 20 20 20 73 74 6F 72 65 20 27 20 27 20 store ' '
000170: 74 6F 20 6D 6F 64 69 66 0D 0A 20 20 20 20 20 20 to modif..
000180: 20 20 20 20 20 20 64 6F 20 64 65 66 65 6C 65 6D do defelem
000190: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 72 65 .. re
0001A0: 6C 65 61 73 65 20 6D 6E 6F 6D 65 6C 65 6D 0D 0A lease mnomelem..
0001B0: 20 20 20 20 20 20 20 20 20 20 20 20 73 65 6C 65 sele
0001C0: 63 74 20 70 72 69 6D 61 72 79 0D 0A 20 20 20 20 ct primary..
0001D0: 20 20 20 20 20 20 20 20 75 73 65 20 67 65 73 74 use gest
0001E0: 66 69 63 68 0D 0A 20 20 20 20 20 20 20 20 20 20 fich..
0001F0: 20 20 6C 6F 63 61 74 65 20 66 6F 72 20 6E 6F 6D locate for nom
Size : 512 (Real : 512)
000000: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 s
000010: 74 6F 72 65 20 6E 6F 6D 65 6C 65 6D 20 74 6F 20 tore nomelem to
000020: 6E 6F 6D 69 6E 64 70 0D 0A 20 20 20 20 20 20 20 nomindp..
000030: 20 20 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 store
000040: 20 6E 62 7A 6F 6E 65 73 20 74 6F 20 6E 62 7A 6F nbzones to nbzo
000050: 6E 70 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 np..
000060: 20 20 20 20 20 20 63 61 73 65 20 74 79 70 63 3D case typc=
000070: 27 53 27 0D 0A 20 20 20 20 20 20 20 20 20 20 20 'S'..
000080: 20 20 20 20 20 20 20 73 74 6F 72 65 20 6C 69 73 store lis
000090: 74 69 6E 64 65 78 2B 27 2C 27 2B 75 6E 69 74 2B tindex+','+unit+
0000A0: 6E 6F 6D 65 6C 65 6D 20 74 6F 20 6C 69 73 74 69 nomelem to listi
0000B0: 6E 64 65 78 0D 0A 20 20 20 20 20 20 20 20 20 20 ndex..
0000C0: 20 20 20 20 20 65 6E 64 63 61 73 65 0D 0A 20 20 endcase..
0000D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 73 6B 69 ski
0000E0: 70 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 65 p.. e
0000F0: 6E 64 64 6F 0D 0A 20 20 20 20 20 20 20 20 20 65 nddo.. e
000100: 6E 64 69 66 0D 0A 20 20 20 20 20 20 65 6E 64 69 ndif.. endi
000110: 66 0D 0A 20 20 20 65 6E 64 69 66 0D 0A 65 6E 64 f.. endif..end
000120: 69 66 0D 0A 72 65 74 75 72 6E 0D 0A 0D 0A 0D 0A if..return......
000130: 0D 0A 0D 0A 0D 0A 1A 1A 20 27 2B 64 65 62 35 2B ........ '+deb5+
000140: 27 20 61 20 27 2B 66 69 6E 35 0D 0A 20 20 20 20 ' a '+fin5..
000150: 20 20 20 20 20 20 20 20 20 20 20 65 6E 64 69 66 endif
000160: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 65 6E .. en
000170: 64 69 66 0D 0A 20 20 20 20 20 20 20 20 20 65 6E dif.. en
000180: 64 69 66 0D 0A 20 20 20 20 20 20 65 6E 64 69 66 dif.. endif
000190: 0D 0A 20 20 20 20 20 20 3F 20 63 6F 6D 6D 65 6E .. ? commen
0001A0: 74 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 63 t.. store c
0001B0: 70 74 2B 31 20 74 6F 20 63 70 74 0D 0A 20 20 20 pt+1 to cpt..
0001C0: 20 20 20 73 74 6F 72 65 20 6C 69 67 2B 34 20 74 store lig+4 t
0001D0: 6F 20 6C 69 67 0D 0A 20 20 20 65 6E 64 69 66 0D o lig.. endif.
0001E0: 0A 20 20 20 73 6B 69 70 0D 0A 65 6E 64 64 6F 0D . skip..enddo.
0001F0: 0A 69 66 20 72 65 70 3D 27 4E 27 0D 0A 20 20 20 .if rep='N'..
Size : 512 (Real : 512)
000000: 55 45 20 31 39 38 36 27 0D 0A 20 20 20 40 20 32 UE 1986'.. @ 2
000010: 2C 35 20 73 61 79 20 27 56 65 72 73 69 6F 6E 20 ,5 say 'Version
000020: 20 31 2E 31 27 0D 0A 20 20 20 40 20 39 2C 31 39 1.1'.. @ 9,19
000030: 20 73 61 79 20 27 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D say '+---------
000040: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
000050: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
000060: 2D 2D 2D 2B 27 0D 0A 20 20 20 40 20 31 30 2C 31 ---+'.. @ 10,1
000070: 39 20 73 61 79 20 22 20 20 41 50 50 4C 49 43 41 9 say " APPLICA
000080: 54 49 4F 4E 20 47 45 4E 45 52 41 54 45 55 52 20 TION GENERATEUR
000090: 44 45 20 46 49 43 48 49 45 52 20 44 42 41 53 45 DE FICHIER DBASE
0000A0: 20 49 49 20 20 22 0D 0A 20 20 20 40 20 31 31 2C II ".. @ 11,
0000B0: 31 39 20 73 61 79 20 22 2B 2D 2D 2D 2D 2D 2D 2D 19 say "+-------
0000C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
0000D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
0000E0: 2D 2D 2D 2D 2D 2B 22 0D 0A 20 20 20 40 20 31 35 -----+".. @ 15
0000F0: 2C 32 35 20 73 61 79 20 27 44 6F 6E 6E 65 7A 20 ,25 say 'Donnez
000100: 6C 61 20 64 61 74 65 27 0D 0A 20 20 20 73 74 6F la date'.. sto
000110: 72 65 20 27 66 27 20 74 6F 20 63 6F 72 72 65 63 re 'f' to correc
000120: 74 0D 0A 20 20 20 64 6F 20 77 68 69 6C 65 20 63 t.. do while c
000130: 6F 72 72 65 63 74 3D 27 66 27 0D 0A 20 20 20 20 orrect='f'..
000140: 20 20 73 74 6F 72 65 20 64 61 74 65 28 29 20 74 store date() t
000150: 6F 20 64 61 74 65 0D 0A 20 20 20 20 20 20 40 20 o date.. @
000160: 31 35 2C 34 30 20 67 65 74 20 64 61 74 65 20 70 15,40 get date p
000170: 69 63 74 75 72 65 20 22 39 39 2F 39 39 2F 39 39 icture "99/99/99
000180: 22 0D 0A 20 20 20 20 20 20 72 65 61 64 0D 0A 20 ".. read..
000190: 20 20 20 20 20 63 6C 65 61 72 20 67 65 74 0D 0A clear get..
0001A0: 20 20 20 20 20 20 73 74 6F 72 65 20 30 20 74 6F store 0 to
0001B0: 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 20 20 20 69 nomess.. i
0001C0: 66 20 64 61 74 65 23 22 30 30 2F 30 30 2F 30 30 f date#"00/00/00
0001D0: 22 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 76 ".. store v
0001E0: 61 6C 28 24 28 64 61 74 65 2C 31 2C 32 29 29 20 al($(date,1,2))
0001F0: 74 6F 20 6A 0D 0A 20 20 20 20 20 20 73 74 6F 72 to j.. stor
Size : 512 (Real : 512)
000000: 74 6F 20 74 65 73 74 0D 0A 65 6E 64 64 6F 0D 0A to test..enddo..
000010: 72 65 74 75 72 6E 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A return..........
000020: 0D 0A 0D 0A 1A 1A 6F 6E 0D 0A 20 20 20 72 65 61 ......on.. rea
000030: 64 0D 0A 20 20 20 73 74 6F 72 65 20 21 28 63 68 d.. store !(ch
000040: 6F 69 78 29 20 74 6F 20 63 68 6F 69 78 0D 0A 20 oix) to choix..
000050: 20 20 65 6E 64 69 66 0D 0A 20 20 20 64 6F 20 63 endif.. do c
000060: 61 73 65 0D 0A 20 20 20 63 61 73 65 20 63 68 6F ase.. case cho
000070: 69 78 20 3D 20 27 31 27 0D 0A 20 20 20 69 66 20 ix = '1'.. if
000080: 65 78 69 73 74 3D 27 74 27 0D 0A 20 20 20 20 20 exist='t'..
000090: 20 73 74 6F 72 65 20 32 30 20 74 6F 20 6E 6F 6D store 20 to nom
0000A0: 65 73 73 0D 0A 20 20 20 20 20 20 64 6F 20 61 66 ess.. do af
0000B0: 66 6D 65 73 73 0D 0A 20 20 20 65 6C 73 65 0D 0A fmess.. else..
0000C0: 20 20 20 20 20 20 69 66 20 66 69 6C 65 28 6E 6F if file(no
0000D0: 6D 66 69 63 68 29 0D 0A 20 20 20 20 20 20 20 20 mfich)..
0000E0: 20 40 20 6C 69 67 6D 31 2C 30 20 73 61 79 20 27 @ ligm1,0 say '
0000F0: 61 74 74 65 6E 74 69 6F 6E 2C 20 64 65 6A 61 20 attention, deja
000100: 75 6E 20 66 69 63 68 69 65 72 20 73 6F 75 73 20 un fichier sous
000110: 63 65 20 6E 6F 6D 20 73 75 72 20 6C 61 20 27 3B ce nom sur la ';
000120: 0D 0A 20 20 20 20 20 20 20 20 20 2B 27 64 69 73 .. +'dis
000130: 71 75 65 74 74 65 2C 20 69 6C 20 76 61 20 65 74 quette, il va et
000140: 72 65 20 65 63 72 61 73 65 27 0D 0A 20 20 20 20 re ecrase'..
000150: 20 20 20 20 20 40 20 6C 69 67 6D 31 2B 31 2C 30 @ ligm1+1,0
000160: 20 73 61 79 20 27 76 6F 75 6C 65 7A 2D 76 6F 75 say 'voulez-vou
000170: 73 20 63 6F 6E 74 69 6E 75 65 72 20 6C 61 20 67 s continuer la g
000180: 65 6E 65 72 61 74 69 6F 6E 27 0D 0A 20 20 20 20 eneration'..
000190: 20 20 20 20 20 73 74 6F 72 65 20 27 4E 27 20 74 store 'N' t
0001A0: 6F 20 72 65 70 0D 0A 20 20 20 20 20 20 20 20 20 o rep..
0001B0: 73 65 74 20 69 6E 74 65 6E 73 69 74 79 20 6F 66 set intensity of
0001C0: 66 0D 0A 20 20 20 20 20 20 20 20 20 40 20 6C 69 f.. @ li
0001D0: 67 6D 31 2B 31 2C 33 38 20 67 65 74 20 72 65 70 gm1+1,38 get rep
0001E0: 0D 0A 20 20 20 20 20 20 20 20 20 73 65 74 20 69 .. set i
0001F0: 6E 74 65 6E 73 69 74 79 20 6F 6E 0D 0A 20 20 20 ntensity on..
Size : 512 (Real : 512)
000000: 65 20 76 61 6C 28 24 28 64 61 74 65 2C 34 2C 32 e val($(date,4,2
000010: 29 29 20 74 6F 20 6D 0D 0A 20 20 20 20 20 20 73 )) to m.. s
000020: 74 6F 72 65 20 76 61 6C 28 24 28 64 61 74 65 2C tore val($(date,
000030: 37 2C 32 29 29 20 74 6F 20 61 6E 0D 0A 20 20 20 7,2)) to an..
000040: 20 20 20 69 66 20 6D 3C 31 2E 6F 72 2E 6D 3E 31 if m<1.or.m>1
000050: 32 2E 6F 72 2E 6A 3C 31 2E 6F 72 2E 6A 3E 33 31 2.or.j<1.or.j>31
000060: 2E 6F 72 2E 28 6D 3D 34 2E 6F 72 2E 6D 3D 36 2E .or.(m=4.or.m=6.
000070: 6F 72 2E 6D 3D 39 2E 6F 72 2E 6D 3D 31 31 29 2E or.m=9.or.m=11).
000080: 61 6E 64 2E 6A 3E 33 30 3B 0D 0A 20 20 20 20 20 and.j>30;..
000090: 20 2E 6F 72 2E 6D 3D 32 2E 61 6E 64 2E 6A 3E 32 .or.m=2.and.j>2
0000A0: 39 2E 6F 72 2E 28 61 6E 2F 34 29 23 69 6E 74 28 9.or.(an/4)#int(
0000B0: 61 6E 2F 34 29 2E 61 6E 64 2E 6D 3D 32 2E 61 6E an/4).and.m=2.an
0000C0: 64 2E 6A 3E 32 38 0D 0A 20 20 20 20 20 20 20 20 d.j>28..
0000D0: 20 73 74 6F 72 65 20 32 20 74 6F 20 6E 6F 6D 65 store 2 to nome
0000E0: 73 73 0D 0A 20 20 20 20 20 20 65 6E 64 69 66 0D ss.. endif.
0000F0: 0A 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 . endif..
000100: 20 20 20 20 72 65 6C 65 61 73 65 20 6A 2C 6D 2C release j,m,
000110: 61 6E 0D 0A 20 20 20 20 20 20 69 66 20 6E 6F 6D an.. if nom
000120: 65 73 73 20 3D 20 30 0D 0A 20 20 20 20 20 20 20 ess = 0..
000130: 20 20 73 74 6F 72 65 20 27 74 27 20 74 6F 20 63 store 't' to c
000140: 6F 72 72 65 63 74 0D 0A 20 20 20 20 20 20 20 20 orrect..
000150: 20 73 65 74 20 64 61 74 65 20 74 6F 20 26 64 61 set date to &da
000160: 74 65 0D 0A 20 20 20 20 20 20 65 6C 73 65 0D 0A te.. else..
000170: 20 20 20 20 20 20 20 20 20 64 6F 20 61 66 66 6D do affm
000180: 65 73 73 0D 0A 20 20 20 20 20 20 65 6E 64 69 66 ess.. endif
000190: 0D 0A 20 20 20 65 6E 64 64 6F 0D 0A 20 20 20 40 .. enddo.. @
0001A0: 20 31 38 2C 31 31 20 73 61 79 20 22 4D 61 74 65 18,11 say "Mate
0001B0: 72 69 65 6C 20 71 75 65 20 76 6F 75 73 20 75 74 riel que vous ut
0001C0: 69 6C 69 73 65 7A 20 20 28 36 31 32 38 20 6F 75 ilisez (6128 ou
0001D0: 20 38 32 35 36 29 20 20 3D 3D 3D 3D 3E 22 0D 0A 8256) ====>"..
0001E0: 20 20 20 73 74 6F 72 65 20 27 66 27 20 74 6F 20 store 'f' to
0001F0: 63 6F 72 72 65 63 74 0D 0A 20 20 20 64 6F 20 77 correct.. do w
Size : 512 (Real : 512)
000000: 69 66 0D 0A 73 74 6F 72 65 20 24 28 69 6E 74 69 if..store $(inti
000010: 74 66 2C 31 31 2C 34 29 20 74 6F 20 6D 61 74 0D tf,11,4) to mat.
000020: 0A 6C 6F 63 61 74 65 20 66 6F 72 20 75 74 69 6C .locate for util
000030: 69 73 65 20 23 20 27 20 27 0D 0A 69 66 20 75 74 ise # ' '..if ut
000040: 69 6C 69 73 65 20 23 20 27 20 27 2E 61 6E 64 2E ilise # ' '.and.
000050: 2E 6E 6F 74 2E 65 6F 66 0D 0A 20 20 20 73 74 6F .not.eof.. sto
000060: 72 65 20 75 74 69 6C 69 73 65 20 74 6F 20 63 68 re utilise to ch
000070: 6F 69 78 0D 0A 20 20 20 73 74 6F 72 65 20 27 74 oix.. store 't
000080: 27 20 74 6F 20 72 65 70 72 69 73 65 0D 0A 20 20 ' to reprise..
000090: 20 73 74 6F 72 65 20 27 74 27 20 74 6F 20 65 78 store 't' to ex
0000A0: 69 73 74 0D 0A 20 20 20 73 74 6F 72 65 20 30 20 ist.. store 0
0000B0: 74 6F 20 6E 6F 65 72 72 0D 0A 20 20 20 73 74 6F to noerr.. sto
0000C0: 72 65 20 6E 6F 6D 66 20 74 6F 20 6E 6F 6D 61 66 re nomf to nomaf
0000D0: 66 0D 0A 20 20 20 73 74 6F 72 65 20 75 6E 69 74 f.. store unit
0000E0: 2B 6E 6F 6D 66 20 74 6F 20 6E 6F 6D 66 69 63 68 +nomf to nomfich
0000F0: 0D 0A 20 20 20 73 74 6F 72 65 20 6E 6F 6D 66 69 .. store nomfi
000100: 63 68 2D 27 2E 72 65 66 27 20 74 6F 20 66 72 65 ch-'.ref' to fre
000110: 66 0D 0A 20 20 20 73 74 6F 72 65 20 6E 6F 6D 66 f.. store nomf
000120: 69 63 68 2D 27 2E 6E 6F 6D 27 20 74 6F 20 78 6E ich-'.nom' to xn
000130: 6F 6D 0D 0A 20 20 20 73 74 6F 72 65 20 6E 6F 6D om.. store nom
000140: 66 69 63 68 2D 27 2E 63 6C 65 27 20 74 6F 20 78 fich-'.cle' to x
000150: 63 6C 65 0D 0A 20 20 20 73 74 6F 72 65 20 6E 6F cle.. store no
000160: 6D 66 69 63 68 2D 27 2E 65 6C 66 27 20 74 6F 20 mfich-'.elf' to
000170: 66 65 6C 65 0D 0A 20 20 20 73 74 6F 72 65 20 6E fele.. store n
000180: 6F 6D 66 69 63 68 2D 27 2E 65 6C 69 27 20 74 6F omfich-'.eli' to
000190: 20 78 65 6C 65 0D 0A 65 6C 73 65 0D 0A 20 20 20 xele..else..
0001A0: 73 74 6F 72 65 20 27 66 27 20 74 6F 20 72 65 70 store 'f' to rep
0001B0: 72 69 73 65 0D 0A 20 20 20 73 74 6F 72 65 20 27 rise.. store '
0001C0: 46 27 20 74 6F 20 63 68 6F 69 78 0D 0A 20 20 20 F' to choix..
0001D0: 65 72 61 73 65 0D 0A 20 20 20 40 20 31 2C 35 20 erase.. @ 1,5
0001E0: 73 61 79 20 27 A4 2D 43 6F 70 79 72 69 67 68 74 say '.-Copyright
0001F0: 20 20 4E 56 49 20 49 4E 46 4F 52 4D 41 54 49 51 NVI INFORMATIQ
Size : 512 (Real : 512)
000000: 68 69 6C 65 20 63 6F 72 72 65 63 74 20 3D 20 27 hile correct = '
000010: 66 27 0D 0A 20 20 20 20 20 20 40 20 31 38 2C 36 f'.. @ 18,6
000020: 32 20 67 65 74 20 6D 61 74 0D 0A 20 20 20 20 20 2 get mat..
000030: 20 72 65 61 64 0D 0A 20 20 20 20 20 20 63 6C 65 read.. cle
000040: 61 72 20 67 65 74 0D 0A 20 20 20 20 20 20 69 66 ar get.. if
000050: 20 6D 61 74 20 23 20 22 36 31 32 38 22 2E 61 6E mat # "6128".an
000060: 64 2E 20 6D 61 74 20 23 20 22 38 32 35 36 22 0D d. mat # "8256".
000070: 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 . store
000080: 31 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 1 to nomess..
000090: 20 20 20 20 20 20 64 6F 20 61 66 66 6D 65 73 73 do affmess
0000A0: 0D 0A 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 .. else..
0000B0: 20 20 20 20 20 20 20 73 74 6F 72 65 20 27 74 27 store 't'
0000C0: 20 74 6F 20 63 6F 72 72 65 63 74 0D 0A 20 20 20 to correct..
0000D0: 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 65 6E 64 endif.. end
0000E0: 64 6F 0D 0A 20 20 20 67 6F 74 6F 20 74 6F 70 0D do.. goto top.
0000F0: 0A 20 20 20 72 65 70 6C 61 63 65 20 69 6E 74 69 . replace inti
000100: 74 66 20 77 69 74 68 20 64 61 74 65 2D 75 6E 69 tf with date-uni
000110: 74 2D 6D 61 74 0D 0A 20 20 20 69 66 20 6D 61 74 t-mat.. if mat
000120: 20 3D 20 22 36 31 32 38 22 0D 0A 20 20 20 73 74 = "6128".. st
000130: 6F 72 65 20 32 30 20 74 6F 20 6C 69 67 6D 31 0D ore 20 to ligm1.
000140: 0A 20 20 20 65 6C 73 65 0D 0A 20 20 20 73 74 6F . else.. sto
000150: 72 65 20 32 39 20 74 6F 20 6C 69 67 6D 31 0D 0A re 29 to ligm1..
000160: 20 20 20 65 6E 64 69 66 0D 0A 65 6E 64 69 66 0D endif..endif.
000170: 0A 72 65 6C 65 61 73 65 20 64 61 74 65 2C 63 6F .release date,co
000180: 72 72 65 63 74 2C 6D 61 74 0D 0A 75 73 65 0D 0A rrect,mat..use..
000190: 73 74 6F 72 65 20 27 74 27 20 74 6F 20 74 65 73 store 't' to tes
0001A0: 74 31 0D 0A 64 6F 20 77 68 69 6C 65 20 74 65 73 t1..do while tes
0001B0: 74 31 3D 27 74 27 0D 0A 20 20 20 69 66 20 72 65 t1='t'.. if re
0001C0: 70 72 69 73 65 3D 27 66 27 0D 0A 20 20 20 73 74 prise='f'.. st
0001D0: 6F 72 65 20 27 46 27 20 74 6F 20 72 65 70 0D 0A ore 'F' to rep..
0001E0: 20 20 20 65 72 61 73 65 0D 0A 20 20 20 40 20 31 erase.. @ 1
0001F0: 2C 32 36 20 53 41 59 20 27 47 45 53 54 49 4F 4E ,26 SAY 'GESTION
Size : 512 (Real : 512)
000000: 2A 20 6D 65 6E 75 70 3A 20 6D 65 6E 75 20 69 6E * menup: menu in
000010: 69 74 69 61 6C 0D 0A 0D 0A 73 65 74 20 74 61 6C itial....set tal
000020: 6B 20 6F 66 66 0D 0A 73 65 74 20 63 6F 6C 6F 6E k off..set colon
000030: 20 6F 66 66 0D 0A 73 65 74 20 65 6A 65 63 74 20 off..set eject
000040: 6F 66 66 0D 0A 63 6C 65 61 72 0D 0A 73 74 6F 72 off..clear..stor
000050: 65 20 27 20 20 20 20 20 20 20 20 20 20 20 20 20 e '
000060: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000090: 20 20 20 20 20 20 20 20 20 20 3B 0D 0A 20 20 20 ;..
0000A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000E0: 20 20 20 20 20 20 20 20 20 20 20 3B 0D 0A 20 20 ;..
0000F0: 20 20 27 20 74 6F 20 62 6C 61 6E 63 0D 0A 73 74 ' to blanc..st
000100: 6F 72 65 20 24 28 62 6C 61 6E 63 2C 31 2C 31 30 ore $(blanc,1,10
000110: 31 29 2B 62 6C 61 6E 63 20 74 6F 20 62 6C 61 6E 1)+blanc to blan
000120: 63 0D 0A 73 74 6F 72 65 20 30 20 74 6F 20 6E 6F c..store 0 to no
000130: 6D 65 73 73 0D 0A 75 73 65 20 67 65 73 74 66 69 mess..use gestfi
000140: 63 68 0D 0A 2A 20 72 65 70 72 65 6E 64 72 65 20 ch..* reprendre
000150: 6C 27 65 74 61 74 20 63 6F 75 72 61 6E 74 0D 0A l'etat courant..
000160: 67 6F 74 6F 20 74 6F 70 0D 0A 73 74 6F 72 65 20 goto top..store
000170: 24 28 69 6E 74 69 74 66 2C 31 2C 38 29 20 74 6F $(intitf,1,8) to
000180: 20 64 61 74 65 0D 0A 73 65 74 20 64 61 74 65 20 date..set date
000190: 74 6F 20 26 64 61 74 65 0D 0A 73 74 6F 72 65 20 to &date..store
0001A0: 24 28 69 6E 74 69 74 66 2C 39 2C 32 29 20 74 6F $(intitf,9,2) to
0001B0: 20 75 6E 69 74 0D 0A 69 66 20 24 28 69 6E 74 69 unit..if $(inti
0001C0: 74 66 2C 31 31 2C 34 29 3D 22 36 31 32 38 22 0D tf,11,4)="6128".
0001D0: 0A 73 74 6F 72 65 20 32 30 20 74 6F 20 6C 69 67 .store 20 to lig
0001E0: 6D 31 0D 0A 65 6C 73 65 0D 0A 73 74 6F 72 65 20 m1..else..store
0001F0: 32 39 20 74 6F 20 6C 69 67 6D 31 0D 0A 65 6E 64 29 to ligm1..end
Size : 512 (Real : 512)
000000: 20 44 45 20 46 49 43 48 49 45 52 27 0D 0A 20 20 DE FICHIER'..
000010: 20 40 20 33 2C 31 30 20 73 61 79 20 22 4C 27 75 @ 3,10 say "L'u
000020: 6E 69 74 65 20 70 61 72 20 64 65 66 61 75 74 20 nite par defaut
000030: 70 6F 75 72 20 76 6F 73 20 64 6F 6E 6E 65 65 73 pour vos donnees
000040: 20 65 73 74 3A 20 22 0D 0A 20 20 20 40 20 33 2C est: ".. @ 3,
000050: 35 35 20 67 65 74 20 75 6E 69 74 0D 0A 20 20 20 55 get unit..
000060: 40 20 35 2C 31 30 20 73 61 79 20 27 71 75 65 6C @ 5,10 say 'quel
000070: 20 74 72 61 69 74 65 6D 65 6E 74 20 64 65 73 69 traitement desi
000080: 72 65 7A 2D 76 6F 75 73 20 65 66 66 65 63 74 75 rez-vous effectu
000090: 65 72 3F 27 0D 0A 20 20 20 40 20 37 2C 31 30 20 er?'.. @ 7,10
0000A0: 73 61 79 20 27 6D 65 6E 75 20 70 61 72 61 6D 65 say 'menu parame
0000B0: 74 72 61 67 65 20 20 20 20 20 20 20 20 20 20 20 trage
0000C0: 20 20 20 20 20 20 20 3D 3D 3D 3D 3E 20 31 27 0D ====> 1'.
0000D0: 0A 20 20 20 40 20 39 2C 31 30 20 73 61 79 20 22 . @ 9,10 say "
0000E0: 6D 65 6E 75 20 75 74 69 6C 69 73 61 74 69 6F 6E menu utilisation
0000F0: 20 63 6F 75 72 61 6E 74 65 20 20 20 20 20 20 20 courante
000100: 20 20 3D 3D 3D 3D 3E 20 32 22 0D 0A 20 20 20 40 ====> 2".. @
000110: 20 31 31 2C 31 30 20 73 61 79 20 22 6C 69 73 74 11,10 say "list
000120: 65 20 64 65 73 20 66 69 63 68 69 65 72 73 20 20 e des fichiers
000130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3D 3D ==
000140: 3D 3D 3E 20 33 22 0D 0A 20 20 20 40 20 31 33 2C ==> 3".. @ 13,
000150: 31 30 20 73 61 79 20 22 63 68 61 6E 67 65 6D 65 10 say "changeme
000160: 6E 74 20 64 65 20 6C 27 75 6E 69 74 65 20 70 61 nt de l'unite pa
000170: 72 20 64 65 66 61 75 74 20 20 3D 3D 3D 3D 3E 20 r defaut ====>
000180: 34 22 0D 0A 20 20 20 40 20 31 35 2C 31 30 20 73 4".. @ 15,10 s
000190: 61 79 20 22 66 69 6E 20 61 70 70 6C 69 63 61 74 ay "fin applicat
0001A0: 69 6F 6E 20 20 20 20 20 20 20 20 20 20 20 20 20 ion
0001B0: 20 20 20 20 20 20 3D 3D 3D 3D 3E 20 46 22 0D 0A ====> F"..
0001C0: 20 20 20 40 20 31 37 2C 34 35 20 53 41 59 20 22 @ 17,45 SAY "
0001D0: 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D +---------------
0001E0: 2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 20 20 20 40 20 -------+".. @
0001F0: 31 38 2C 34 35 20 53 41 59 20 22 49 20 52 65 70 18,45 SAY "I Rep
Size : 512 (Real : 512)
000000: 69 66 0D 0A 73 74 6F 72 65 20 24 28 69 6E 74 69 if..store $(inti
000010: 74 66 2C 31 31 2C 34 29 20 74 6F 20 6D 61 74 0D tf,11,4) to mat.
000020: 0A 6C 6F 63 61 74 65 20 66 6F 72 20 75 74 69 6C .locate for util
000030: 69 73 65 20 23 20 27 20 27 0D 0A 69 66 20 75 74 ise # ' '..if ut
000040: 69 6C 69 73 65 20 23 20 27 20 27 2E 61 6E 64 2E ilise # ' '.and.
000050: 2E 6E 6F 74 2E 65 6F 66 0D 0A 20 20 20 73 74 6F .not.eof.. sto
000060: 72 65 20 75 74 69 6C 69 73 65 20 74 6F 20 63 68 re utilise to ch
000070: 6F 69 78 0D 0A 20 20 20 73 74 6F 72 65 20 27 74 oix.. store 't
000080: 27 20 74 6F 20 72 65 70 72 69 73 65 0D 0A 20 20 ' to reprise..
000090: 20 73 74 6F 72 65 20 27 74 27 20 74 6F 20 65 78 store 't' to ex
0000A0: 69 73 74 0D 0A 20 20 20 73 74 6F 72 65 20 30 20 ist.. store 0
0000B0: 74 6F 20 6E 6F 65 72 72 0D 0A 20 20 20 73 74 6F to noerr.. sto
0000C0: 72 65 20 6E 6F 6D 66 20 74 6F 20 6E 6F 6D 61 66 re nomf to nomaf
0000D0: 66 0D 0A 20 20 20 73 74 6F 72 65 20 75 6E 69 74 f.. store unit
0000E0: 2B 6E 6F 6D 66 20 74 6F 20 6E 6F 6D 66 69 63 68 +nomf to nomfich
0000F0: 0D 0A 20 20 20 73 74 6F 72 65 20 6E 6F 6D 66 69 .. store nomfi
000100: 63 68 2D 27 2E 72 65 66 27 20 74 6F 20 66 72 65 ch-'.ref' to fre
000110: 66 0D 0A 20 20 20 73 74 6F 72 65 20 6E 6F 6D 66 f.. store nomf
000120: 69 63 68 2D 27 2E 6E 6F 6D 27 20 74 6F 20 78 6E ich-'.nom' to xn
000130: 6F 6D 0D 0A 20 20 20 73 74 6F 72 65 20 6E 6F 6D om.. store nom
000140: 66 69 63 68 2D 27 2E 63 6C 65 27 20 74 6F 20 78 fich-'.cle' to x
000150: 63 6C 65 0D 0A 20 20 20 73 74 6F 72 65 20 6E 6F cle.. store no
000160: 6D 66 69 63 68 2D 27 2E 65 6C 66 27 20 74 6F 20 mfich-'.elf' to
000170: 66 65 6C 65 0D 0A 20 20 20 73 74 6F 72 65 20 6E fele.. store n
000180: 6F 6D 66 69 63 68 2D 27 2E 65 6C 69 27 20 74 6F omfich-'.eli' to
000190: 20 78 65 6C 65 0D 0A 65 6C 73 65 0D 0A 20 20 20 xele..else..
0001A0: 73 74 6F 72 65 20 27 66 27 20 74 6F 20 72 65 70 store 'f' to rep
0001B0: 72 69 73 65 0D 0A 20 20 20 73 74 6F 72 65 20 27 rise.. store '
0001C0: 46 27 20 74 6F 20 63 68 6F 69 78 0D 0A 20 20 20 F' to choix..
0001D0: 65 72 61 73 65 0D 0A 20 20 20 40 20 31 2C 35 20 erase.. @ 1,5
0001E0: 73 61 79 20 27 A4 2D 43 6F 70 79 72 69 67 68 74 say '.-Copyright
0001F0: 20 20 4E 56 49 20 49 4E 46 4F 52 4D 41 54 49 51 NVI INFORMATIQ
Size : 512 (Real : 512)
000000: 6F 6E 73 65 20 2D 2D 3E 20 20 20 20 20 20 20 20 onse -->
000010: 20 20 49 22 0D 0A 20 20 20 40 20 31 39 2C 34 35 I".. @ 19,45
000020: 20 53 41 59 20 22 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D SAY "+---------
000030: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2B 22 0D -------------+".
000040: 0A 20 20 20 63 6C 65 61 72 20 67 65 74 0D 0A 20 . clear get..
000050: 20 20 73 65 74 20 69 6E 74 65 6E 73 69 74 79 20 set intensity
000060: 6F 66 66 0D 0A 20 20 20 40 20 31 38 2C 35 39 20 off.. @ 18,59
000070: 67 65 74 20 72 65 70 0D 0A 20 20 20 73 65 74 20 get rep.. set
000080: 69 6E 74 65 6E 73 69 74 79 20 6F 6E 0D 0A 20 20 intensity on..
000090: 20 72 65 61 64 0D 0A 20 20 20 73 74 6F 72 65 20 read.. store
0000A0: 21 28 72 65 70 29 20 74 6F 20 72 65 70 0D 0A 20 !(rep) to rep..
0000B0: 20 20 65 6C 73 65 0D 0A 20 20 20 73 74 6F 72 65 else.. store
0000C0: 20 27 31 27 20 74 6F 20 72 65 70 0D 0A 20 20 20 '1' to rep..
0000D0: 65 6E 64 69 66 0D 0A 20 20 20 64 6F 20 63 61 73 endif.. do cas
0000E0: 65 0D 0A 20 20 20 63 61 73 65 20 72 65 70 20 3D e.. case rep =
0000F0: 20 27 31 27 0D 0A 20 20 20 69 66 20 72 65 70 72 '1'.. if repr
000100: 69 73 65 3D 27 66 27 0D 0A 20 20 20 20 20 20 64 ise='f'.. d
000110: 6F 20 64 65 6D 66 69 63 68 0D 0A 20 20 20 20 20 o demfich..
000120: 20 73 74 6F 72 65 20 27 46 27 20 74 6F 20 63 68 store 'F' to ch
000130: 6F 69 78 0D 0A 20 20 20 65 6E 64 69 66 0D 0A 20 oix.. endif..
000140: 20 20 69 66 20 6E 6F 6D 66 69 63 68 20 23 20 27 if nomfich # '
000150: 20 27 0D 0A 20 20 20 20 20 20 72 65 6C 65 61 73 '.. releas
000160: 65 20 74 65 73 74 31 2C 72 65 70 0D 0A 20 20 20 e test1,rep..
000170: 20 20 20 64 6F 20 6D 65 6E 75 67 65 6E 0D 0A 20 do menugen..
000180: 20 20 65 6E 64 69 66 0D 0A 20 20 20 63 61 73 65 endif.. case
000190: 20 72 65 70 20 3D 20 27 32 27 0D 0A 20 20 20 73 rep = '2'.. s
0001A0: 74 6F 72 65 20 27 66 27 20 74 6F 20 63 6F 72 72 tore 'f' to corr
0001B0: 65 63 74 0D 0A 20 20 20 64 6F 20 77 68 69 6C 65 ect.. do while
0001C0: 20 63 6F 72 72 65 63 74 3D 27 66 27 0D 0A 20 20 correct='f'..
0001D0: 20 20 20 20 64 6F 20 64 65 6D 66 69 63 68 0D 0A do demfich..
0001E0: 20 20 20 20 20 20 69 66 20 6E 6F 6D 66 69 63 68 if nomfich
0001F0: 23 27 20 27 0D 0A 20 20 20 20 20 20 20 20 20 64 #' '.. d
Size : 512 (Real : 512)
000000: 65 20 75 6E 69 74 2B 6E 6F 6D 65 6C 65 6D 2D 27 e unit+nomelem-'
000010: 2E 6E 64 78 27 20 74 6F 20 6E 6F 6D 7A 0D 0A 20 .ndx' to nomz..
000020: 20 20 20 20 20 20 20 20 3F 20 27 6C 65 20 66 69 ? 'le fi
000030: 63 68 69 65 72 20 27 2B 6E 6F 6D 65 6C 65 6D 2D chier '+nomelem-
000040: 27 2E 6E 64 78 20 76 61 20 65 74 72 65 20 73 75 '.ndx va etre su
000050: 70 70 72 69 6D 65 20 73 75 72 20 27 2B 75 6E 69 pprime sur '+uni
000060: 74 0D 0A 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 t.. else..
000070: 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 75 6E store un
000080: 69 74 2B 6E 6F 6D 65 6C 65 6D 2D 27 2E 66 72 6D it+nomelem-'.frm
000090: 27 20 74 6F 20 6E 6F 6D 7A 0D 0A 20 20 20 20 20 ' to nomz..
0000A0: 20 20 20 20 3F 20 27 6C 65 20 66 69 63 68 69 65 ? 'le fichie
0000B0: 72 20 27 2B 6E 6F 6D 65 6C 65 6D 2D 27 2E 66 72 r '+nomelem-'.fr
0000C0: 6D 20 76 61 20 65 74 72 65 20 73 75 70 70 72 69 m va etre suppri
0000D0: 6D 65 20 73 75 72 20 27 2B 75 6E 69 74 0D 0A 20 me sur '+unit..
0000E0: 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 endif..
0000F0: 20 20 64 65 6C 65 20 66 69 6C 65 20 26 6E 6F 6D dele file &nom
000100: 7A 0D 0A 20 20 20 20 20 20 64 65 6C 65 0D 0A 20 z.. dele..
000110: 20 20 20 20 20 70 61 63 6B 0D 0A 20 20 20 65 6E pack.. en
000120: 64 64 6F 0D 0A 20 20 20 72 65 6C 65 61 73 65 20 ddo.. release
000130: 6E 6F 6D 7A 0D 0A 20 20 20 75 73 65 0D 0A 65 6E nomz.. use..en
000140: 64 69 66 0D 0A 0D 0A 2A 20 73 75 70 70 72 65 73 dif....* suppres
000150: 73 69 6F 6E 20 64 65 73 20 66 69 63 68 69 65 72 sion des fichier
000160: 73 20 6E 6F 6D 66 69 63 68 2E 2A 0D 0A 73 74 6F s nomfich.*..sto
000170: 72 65 20 31 20 74 6F 20 63 70 74 0D 0A 64 6F 20 re 1 to cpt..do
000180: 77 68 69 6C 65 20 63 70 74 20 3C 3D 20 36 0D 0A while cpt <= 6..
000190: 20 20 20 64 6F 20 63 61 73 65 0D 0A 20 20 20 20 do case..
0001A0: 20 20 63 61 73 65 20 63 70 74 3D 31 0D 0A 20 20 case cpt=1..
0001B0: 20 20 20 20 73 74 6F 72 65 20 6E 6F 6D 66 69 63 store nomfic
0001C0: 68 2D 27 2E 64 62 66 27 20 74 6F 20 6E 6F 6D 65 h-'.dbf' to nome
0001D0: 72 61 0D 0A 20 20 20 20 20 20 63 61 73 65 20 63 ra.. case c
0001E0: 70 74 3D 32 0D 0A 20 20 20 20 20 20 73 74 6F 72 pt=2.. stor
0001F0: 65 20 66 72 65 66 20 74 6F 20 6E 6F 6D 65 72 61 e fref to nomera
Size : 512 (Real : 512)
000000: 6F 20 63 61 73 65 0D 0A 20 20 20 20 20 20 20 20 o case..
000010: 20 20 20 20 63 61 73 65 20 65 78 69 73 74 3D 27 case exist='
000020: 66 27 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 f'..
000030: 73 74 6F 72 65 20 34 39 20 74 6F 20 6E 6F 6D 65 store 49 to nome
000040: 73 73 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 ss..
000050: 64 6F 20 61 66 66 6D 65 73 73 0D 0A 20 20 20 20 do affmess..
000060: 20 20 20 20 20 20 20 20 63 61 73 65 20 6E 6F 65 case noe
000070: 72 72 23 30 0D 0A 20 20 20 20 20 20 20 20 20 20 rr#0..
000080: 20 20 73 74 6F 72 65 20 6E 6F 65 72 72 20 74 6F store noerr to
000090: 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 20 20 20 20 nomess..
0000A0: 20 20 20 20 20 64 6F 20 61 66 66 6D 65 73 73 0D do affmess.
0000B0: 0A 20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 . if
0000C0: 66 69 6C 65 28 66 65 6C 65 29 2E 61 6E 64 2E 66 file(fele).and.f
0000D0: 69 6C 65 28 78 65 6C 65 29 0D 0A 20 20 20 20 20 ile(xele)..
0000E0: 20 20 20 20 20 20 20 73 74 6F 72 65 20 27 43 27 store 'C'
0000F0: 20 74 6F 20 65 6C 65 6D 0D 0A 20 20 20 20 20 20 to elem..
000100: 20 20 20 20 20 20 64 6F 20 6C 69 73 74 65 6C 65 do listele
000110: 6D 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 72 m.. r
000120: 65 6C 65 61 73 65 20 65 6C 65 6D 0D 0A 20 20 20 elease elem..
000130: 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 27 store '
000140: 66 27 20 74 6F 20 63 6F 72 72 65 63 74 0D 0A 20 f' to correct..
000150: 20 20 20 20 20 20 20 20 20 20 20 65 6E 64 69 66 endif
000160: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 6F 74 .. ot
000170: 68 65 72 77 69 73 65 0D 0A 20 20 20 20 20 20 20 herwise..
000180: 20 20 20 20 20 73 74 6F 72 65 20 27 74 27 20 74 store 't' t
000190: 6F 20 63 6F 72 72 65 63 74 0D 0A 20 20 20 20 20 o correct..
0001A0: 20 20 20 20 65 6E 64 63 61 73 65 0D 0A 20 20 20 endcase..
0001B0: 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 else..
0001C0: 20 20 73 74 6F 72 65 20 27 74 27 20 74 6F 20 63 store 't' to c
0001D0: 6F 72 72 65 63 74 0D 0A 20 20 20 20 20 20 65 6E orrect.. en
0001E0: 64 69 66 0D 0A 20 20 20 65 6E 64 64 6F 0D 0A 20 dif.. enddo..
0001F0: 20 20 72 65 6C 65 61 73 65 20 63 6F 72 72 65 63 release correc
Size : 512 (Real : 512)
000000: 0D 0A 20 20 20 20 20 20 63 61 73 65 20 63 70 74 .. case cpt
000010: 3D 33 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 =3.. store
000020: 78 6E 6F 6D 20 74 6F 20 6E 6F 6D 65 72 61 0D 0A xnom to nomera..
000030: 20 20 20 20 20 20 63 61 73 65 20 63 70 74 3D 34 case cpt=4
000040: 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 78 63 .. store xc
000050: 6C 65 20 74 6F 20 6E 6F 6D 65 72 61 0D 0A 20 20 le to nomera..
000060: 20 20 20 20 63 61 73 65 20 63 70 74 3D 35 0D 0A case cpt=5..
000070: 20 20 20 20 20 20 73 74 6F 72 65 20 66 65 6C 65 store fele
000080: 20 74 6F 20 6E 6F 6D 65 72 61 0D 0A 20 20 20 20 to nomera..
000090: 20 20 63 61 73 65 20 63 70 74 3D 36 0D 0A 20 20 case cpt=6..
0000A0: 20 20 20 20 73 74 6F 72 65 20 78 65 6C 65 20 74 store xele t
0000B0: 6F 20 6E 6F 6D 65 72 61 0D 0A 20 20 20 65 6E 64 o nomera.. end
0000C0: 63 61 73 65 0D 0A 20 20 20 69 66 20 2E 6E 6F 74 case.. if .not
0000D0: 2E 66 69 6C 65 28 6E 6F 6D 65 72 61 29 0D 0A 20 .file(nomera)..
0000E0: 20 20 20 20 20 3F 20 27 6C 65 20 66 69 63 68 69 ? 'le fichi
0000F0: 65 72 20 27 2B 24 28 6E 6F 6D 65 72 61 2C 33 2C er '+$(nomera,3,
000100: 31 32 29 2B 22 20 6E 27 65 78 69 73 74 65 20 70 12)+" n'existe p
000110: 61 73 20 73 75 72 20 22 2B 75 6E 69 74 0D 0A 20 as sur "+unit..
000120: 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 3F 20 else.. ?
000130: 27 6C 65 20 66 69 63 68 69 65 72 20 27 2B 24 28 'le fichier '+$(
000140: 6E 6F 6D 65 72 61 2C 33 2C 31 32 29 2B 22 20 76 nomera,3,12)+" v
000150: 61 20 65 74 72 65 20 73 75 70 70 72 69 6D 65 20 a etre supprime
000160: 73 75 72 20 22 2B 75 6E 69 74 0D 0A 20 20 20 20 sur "+unit..
000170: 20 20 64 65 6C 65 20 66 69 6C 65 20 26 6E 6F 6D dele file &nom
000180: 65 72 61 0D 0A 20 20 20 65 6E 64 69 66 0D 0A 20 era.. endif..
000190: 20 20 73 74 6F 72 65 20 63 70 74 2B 31 20 74 6F store cpt+1 to
0001A0: 20 63 70 74 0D 0A 65 6E 64 64 6F 0D 0A 72 65 6C cpt..enddo..rel
0001B0: 65 61 73 65 20 6E 6F 6D 65 72 61 2C 63 70 74 0D ease nomera,cpt.
0001C0: 0A 0D 0A 2A 20 73 75 70 70 72 65 73 73 69 6F 6E ...* suppression
0001D0: 20 64 75 20 66 69 63 68 69 65 72 20 64 61 6E 73 du fichier dans
0001E0: 20 67 65 73 74 66 69 63 68 0D 0A 75 73 65 20 67 gestfich..use g
0001F0: 65 73 74 66 69 63 68 0D 0A 6C 6F 63 61 74 65 20 estfich..locate
Size : 512 (Real : 512)
000000: 74 0D 0A 20 20 20 69 66 20 6E 6F 6D 66 69 63 68 t.. if nomfich
000010: 20 23 20 27 20 27 0D 0A 20 20 20 72 65 6C 65 61 # ' '.. relea
000020: 73 65 20 6E 6F 6D 61 66 66 2C 72 65 70 72 69 73 se nomaff,repris
000030: 65 2C 65 78 69 73 74 2C 6E 6F 65 72 72 2C 74 65 e,exist,noerr,te
000040: 73 74 31 2C 72 65 70 0D 0A 20 20 20 64 6F 20 6D st1,rep.. do m
000050: 65 6E 75 0D 0A 20 20 20 65 6E 64 69 66 0D 0A 20 enu.. endif..
000060: 20 20 63 61 73 65 20 72 65 70 20 3D 20 27 33 27 case rep = '3'
000070: 0D 0A 20 20 20 65 72 61 73 65 0D 0A 20 20 20 40 .. erase.. @
000080: 20 33 2C 31 30 20 73 61 79 20 27 4C 65 73 20 66 3,10 say 'Les f
000090: 69 63 68 69 65 72 73 20 67 65 72 65 73 20 70 61 ichiers geres pa
0000A0: 72 20 63 65 74 74 65 20 61 70 70 6C 69 63 61 74 r cette applicat
0000B0: 69 6F 6E 20 73 6F 6E 74 3A 27 0D 0A 20 20 20 73 ion sont:'.. s
0000C0: 74 6F 72 65 20 35 20 74 6F 20 6C 69 67 0D 0A 20 tore 5 to lig..
0000D0: 20 20 73 65 6C 65 63 74 20 70 72 69 6D 61 72 79 select primary
0000E0: 0D 0A 20 20 20 75 73 65 20 67 65 73 74 66 69 63 .. use gestfic
0000F0: 68 0D 0A 20 20 20 2A 20 73 61 75 74 65 72 20 6C h.. * sauter l
000100: 27 7B 74 61 74 20 63 6F 75 72 61 6E 74 0D 0A 20 '{tat courant..
000110: 20 20 73 6B 69 70 0D 0A 20 20 20 64 6F 20 77 68 skip.. do wh
000120: 69 6C 65 20 2E 6E 6F 74 2E 65 6F 66 0D 0A 20 20 ile .not.eof..
000130: 20 20 20 69 66 20 6C 69 67 3E 31 38 0D 0A 20 20 if lig>18..
000140: 20 20 20 20 20 20 73 74 6F 72 65 20 35 20 74 6F store 5 to
000150: 20 6C 69 67 0D 0A 20 20 20 20 20 20 20 20 40 20 lig.. @
000160: 6C 69 67 6D 31 2C 30 20 73 61 79 20 22 74 61 70 ligm1,0 say "tap
000170: 65 7A 20 73 75 72 20 75 6E 65 20 74 6F 75 63 68 ez sur une touch
000180: 65 20 70 6F 75 72 20 6C 61 20 73 75 69 74 65 20 e pour la suite
000190: 64 65 20 6C 61 20 6C 69 73 74 65 22 0D 0A 20 20 de la liste"..
0001A0: 20 20 20 20 20 20 73 65 74 20 63 6F 6E 73 6F 6C set consol
0001B0: 65 20 6F 66 66 0D 0A 20 20 20 20 20 20 20 20 77 e off.. w
0001C0: 61 69 74 0D 0A 20 20 20 20 20 20 20 20 73 65 74 ait.. set
0001D0: 20 63 6F 6E 73 6F 6C 65 20 6F 6E 0D 0A 20 20 20 console on..
0001E0: 20 20 20 20 20 65 72 61 73 65 0D 0A 20 20 20 20 erase..
0001F0: 20 20 20 20 40 20 33 2C 31 30 20 73 61 79 20 22 @ 3,10 say "
Size : 512 (Real : 512)
000000: 66 6F 72 20 6E 6F 6D 66 3D 24 28 6E 6F 6D 66 69 for nomf=$(nomfi
000010: 63 68 2C 33 2C 38 29 0D 0A 64 65 6C 65 0D 0A 70 ch,3,8)..dele..p
000020: 61 63 6B 0D 0A 75 73 65 0D 0A 72 65 6C 65 61 73 ack..use..releas
000030: 65 20 6D 6F 64 69 66 0D 0A 73 74 6F 72 65 20 27 e modif..store '
000040: 66 27 20 74 6F 20 65 78 69 73 74 0D 0A 72 65 74 f' to exist..ret
000050: 75 72 6E 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D urn.............
000060: 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D ................
000070: 0A 0D 0A 0D 0A 0D 0A 1A 1A 4F 4E 32 00 00 00 00 .........ON2....
000080: 00 00 00 43 0A F1 70 00 44 45 42 32 00 00 00 00 ...C..p.DEB2....
000090: 00 00 00 43 03 FB 70 00 46 49 4E 32 00 00 00 00 ...C..p.FIN2....
0000A0: 00 00 00 43 03 FE 70 00 5A 4F 4E 33 00 00 00 00 ...C..p.ZON3....
0000B0: 00 00 00 43 0A 01 71 00 44 45 42 33 00 00 00 00 ...C..q.DEB3....
0000C0: 00 00 00 43 03 0B 71 00 46 49 4E 33 00 00 00 00 ...C..q.FIN3....
0000D0: 00 00 00 43 03 0E 71 00 5A 4F 4E 34 00 00 00 00 ...C..q.ZON4....
0000E0: 00 00 00 43 0A 11 71 00 44 45 42 34 00 00 00 00 ...C..q.DEB4....
0000F0: 00 00 00 43 03 1B 71 00 46 49 4E 34 00 00 00 00 ...C..q.FIN4....
000100: 00 00 00 43 03 1E 71 00 5A 4F 4E 35 00 00 00 00 ...C..q.ZON5....
000110: 00 00 00 43 0A 21 71 00 44 45 42 35 00 00 00 00 ...C.!q.DEB5....
000120: 00 00 00 43 03 2B 71 00 46 49 4E 35 00 00 00 00 ...C.+q.FIN5....
000130: 00 00 00 43 03 2E 71 00 54 59 50 43 00 00 00 00 ...C..q.TYPC....
000140: 00 00 00 43 01 31 71 00 0D 00 00 00 00 00 00 00 ...C.1q.........
000150: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
Size : 512 (Real : 512)
000000: 4C 65 73 20 66 69 63 68 69 65 72 73 20 67 65 72 Les fichiers ger
000010: 65 73 20 70 61 72 20 63 65 74 74 65 20 61 70 70 es par cette app
000020: 6C 69 63 61 74 69 6F 6E 20 73 6F 6E 74 3A 22 0D lication sont:".
000030: 0A 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 . endif..
000040: 20 20 40 20 6C 69 67 2C 35 20 73 61 79 20 6E 6F @ lig,5 say no
000050: 6D 66 0D 0A 20 20 20 20 20 40 20 6C 69 67 2C 34 mf.. @ lig,4
000060: 30 20 73 61 79 20 69 6E 74 69 74 66 0D 0A 20 20 0 say intitf..
000070: 20 20 20 73 6B 69 70 0D 0A 20 20 20 20 20 73 74 skip.. st
000080: 6F 72 65 20 6C 69 67 2B 31 20 74 6F 20 6C 69 67 ore lig+1 to lig
000090: 0D 0A 20 20 20 65 6E 64 64 6F 0D 0A 20 20 20 40 .. enddo.. @
0000A0: 20 6C 69 67 6D 31 2C 30 20 73 61 79 20 22 20 20 ligm1,0 say "
0000B0: 74 61 70 65 7A 20 73 75 72 20 75 6E 65 20 74 6F tapez sur une to
0000C0: 75 63 68 65 20 70 6F 75 72 20 63 6F 6E 74 69 6E uche pour contin
0000D0: 75 65 72 22 0D 0A 20 20 20 73 65 74 20 63 6F 6E uer".. set con
0000E0: 73 6F 6C 65 20 6F 66 66 0D 0A 20 20 20 77 61 69 sole off.. wai
0000F0: 74 0D 0A 20 20 20 73 65 74 20 63 6F 6E 73 6F 6C t.. set consol
000100: 65 20 6F 6E 0D 0A 20 20 20 72 65 6C 65 61 73 65 e on.. release
000110: 20 6C 69 67 0D 0A 20 20 20 63 61 73 65 20 72 65 lig.. case re
000120: 70 20 3D 20 27 34 27 0D 0A 20 20 20 65 72 61 73 p = '4'.. eras
000130: 65 0D 0A 20 20 20 73 74 6F 72 65 20 27 66 27 20 e.. store 'f'
000140: 74 6F 20 63 6F 72 72 65 63 74 0D 0A 20 20 20 69 to correct.. i
000150: 66 20 6C 69 67 6D 31 3D 32 30 0D 0A 20 20 20 40 f ligm1=20.. @
000160: 20 35 2C 35 20 73 61 79 20 27 45 6E 74 72 65 7A 5,5 say 'Entrez
000170: 20 6C 61 20 6E 6F 75 76 65 6C 6C 65 20 75 6E 69 la nouvelle uni
000180: 74 65 20 70 61 72 20 64 65 66 61 75 74 20 20 20 te par defaut
000190: 28 61 3A 20 6F 75 20 62 3A 29 20 20 3A 27 0D 0A (a: ou b:) :'..
0001A0: 20 20 20 65 6C 73 65 0D 0A 20 20 20 40 20 35 2C else.. @ 5,
0001B0: 35 20 73 61 79 20 27 45 6E 74 72 65 7A 20 6C 61 5 say 'Entrez la
0001C0: 20 6E 6F 75 76 65 6C 6C 65 20 75 6E 69 74 65 20 nouvelle unite
0001D0: 70 61 72 20 64 65 66 61 75 74 20 28 61 3A 2C 62 par defaut (a:,b
0001E0: 3A 20 6F 75 20 6D 3A 29 20 3A 27 0D 0A 20 20 20 : ou m:) :'..
0001F0: 65 6E 64 69 66 0D 0A 20 20 20 64 6F 20 77 68 69 endif.. do whi
Size : 512 (Real : 512)
000000: 2A 20 65 78 69 73 74 63 6C 65 0D 0A 0D 0A 65 72 * existcle....er
000010: 61 73 65 0D 0A 40 20 31 2C 31 30 20 73 61 79 20 ase..@ 1,10 say
000020: 64 61 74 65 28 29 0D 0A 64 6F 20 63 61 73 65 0D date()..do case.
000030: 0A 63 61 73 65 20 63 68 6F 69 78 3D 27 31 27 0D .case choix='1'.
000040: 0A 73 74 6F 72 65 20 27 20 20 20 63 72 65 61 74 .store ' creat
000050: 69 6F 6E 20 20 20 20 20 20 20 20 20 20 27 20 74 ion ' t
000060: 6F 20 61 63 74 69 6F 6E 0D 0A 63 61 73 65 20 63 o action..case c
000070: 68 6F 69 78 3D 27 32 27 0D 0A 73 74 6F 72 65 20 hoix='2'..store
000080: 27 20 20 20 6D 6F 64 69 66 69 63 61 74 69 6F 6E ' modification
000090: 20 20 20 20 20 20 27 20 74 6F 20 61 63 74 69 6F ' to actio
0000A0: 6E 0D 0A 63 61 73 65 20 63 68 6F 69 78 3D 27 33 n..case choix='3
0000B0: 27 0D 0A 73 74 6F 72 65 20 27 20 20 20 73 75 70 '..store ' sup
0000C0: 70 72 65 73 73 69 6F 6E 20 20 20 20 20 20 20 27 pression '
0000D0: 20 74 6F 20 61 63 74 69 6F 6E 0D 0A 63 61 73 65 to action..case
0000E0: 20 63 68 6F 69 78 3D 27 34 27 2E 6F 72 2E 63 68 choix='4'.or.ch
0000F0: 6F 69 78 3D 27 35 27 0D 0A 73 74 6F 72 65 20 27 oix='5'..store '
000100: 20 20 20 76 69 73 75 61 6C 69 73 61 74 69 6F 6E visualisation
000110: 20 20 20 20 20 27 20 74 6F 20 61 63 74 69 6F 6E ' to action
000120: 0D 0A 65 6E 64 63 61 73 65 0D 0A 40 20 31 2C 35 ..endcase..@ 1,5
000130: 37 20 67 65 74 20 61 63 74 69 6F 6E 0D 0A 63 6C 7 get action..cl
000140: 65 61 72 20 67 65 74 0D 0A 72 65 6C 65 61 73 65 ear get..release
000150: 20 61 63 74 69 6F 6E 0D 0A 73 74 6F 72 65 20 30 action..store 0
000160: 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 73 74 6F 72 to nomess..stor
000170: 65 20 27 64 27 20 74 6F 20 74 65 73 74 0D 0A 73 e 'd' to test..s
000180: 74 6F 72 65 20 27 20 27 20 74 6F 20 74 61 62 76 tore ' ' to tabv
000190: 0D 0A 64 6F 20 77 68 69 6C 65 20 74 65 73 74 23 ..do while test#
0001A0: 27 66 27 0D 0A 20 20 20 69 66 20 6E 6F 63 6F 75 'f'.. if nocou
0001B0: 72 20 23 20 30 2E 61 6E 64 2E 63 68 6F 69 78 20 r # 0.and.choix
0001C0: 23 20 27 31 27 0D 0A 20 20 20 73 65 6C 65 63 74 # '1'.. select
0001D0: 20 73 65 63 6F 6E 64 61 72 79 0D 0A 20 20 20 75 secondary.. u
0001E0: 73 65 20 26 6E 6F 6D 66 69 63 68 0D 0A 20 20 20 se &nomfich..
0001F0: 67 6F 74 6F 20 6E 6F 63 6F 75 72 0D 0A 20 20 20 goto nocour..
Size : 512 (Real : 512)
000000: 2A 20 73 75 70 66 69 63 68 20 3A 20 73 75 70 70 * supfich : supp
000010: 72 65 73 73 69 6F 6E 20 64 75 20 66 69 63 68 69 ression du fichi
000020: 65 72 20 65 74 20 64 65 20 74 6F 75 73 20 6C 65 er et de tous le
000030: 73 20 66 69 63 68 69 65 72 73 20 61 6E 6E 65 78 s fichiers annex
000040: 65 73 0D 0A 0D 0A 69 66 20 6D 6F 64 69 66 3D 27 es....if modif='
000050: 66 27 0D 0A 20 20 20 65 72 61 73 65 0D 0A 20 20 f'.. erase..
000060: 20 40 20 31 2C 32 36 20 73 61 79 20 27 53 55 50 @ 1,26 say 'SUP
000070: 50 52 45 53 53 49 4F 4E 20 44 55 20 46 49 43 48 PRESSION DU FICH
000080: 49 45 52 20 27 0D 0A 20 20 20 40 20 31 2C 35 34 IER '.. @ 1,54
000090: 20 67 65 74 20 6E 6F 6D 61 66 66 0D 0A 20 20 20 get nomaff..
0000A0: 63 6C 65 61 72 20 67 65 74 0D 0A 20 20 20 64 6F clear get.. do
0000B0: 20 63 6F 6E 66 73 75 70 0D 0A 20 20 20 69 66 20 confsup.. if
0000C0: 21 28 63 6F 6E 66 69 72 6D 29 3D 27 4E 27 0D 0A !(confirm)='N'..
0000D0: 20 20 20 20 20 20 72 65 6C 65 61 73 65 20 63 6F release co
0000E0: 6E 66 69 72 6D 2C 6D 6F 64 69 66 0D 0A 20 20 20 nfirm,modif..
0000F0: 20 20 20 72 65 74 75 72 6E 0D 0A 20 20 20 65 6E return.. en
000100: 64 69 66 0D 0A 20 20 20 72 65 6C 65 61 73 65 20 dif.. release
000110: 63 6F 6E 66 69 72 6D 0D 0A 65 6E 64 69 66 0D 0A confirm..endif..
000120: 2A 20 73 75 70 70 72 65 73 73 69 6F 6E 20 64 65 * suppression de
000130: 73 20 69 6E 64 65 78 20 65 74 20 64 65 73 20 6C s index et des l
000140: 69 73 74 65 73 0D 0A 69 66 20 2E 6E 6F 74 2E 66 istes..if .not.f
000150: 69 6C 65 28 66 65 6C 65 29 0D 0A 20 20 20 3F 20 ile(fele).. ?
000160: 22 61 75 63 75 6E 65 20 63 6C 65 20 6F 75 20 6C "aucune cle ou l
000170: 69 73 74 65 20 6E 27 61 20 70 75 20 65 74 72 65 iste n'a pu etre
000180: 20 72 65 74 72 6F 75 76 65 65 22 0D 0A 20 20 20 retrouvee"..
000190: 3F 0D 0A 65 6C 73 65 0D 0A 20 20 20 73 65 6C 65 ?..else.. sele
0001A0: 63 74 20 70 72 69 6D 61 72 79 0D 0A 20 20 20 75 ct primary.. u
0001B0: 73 65 20 26 66 65 6C 65 0D 0A 20 20 20 67 6F 74 se &fele.. got
0001C0: 6F 20 74 6F 70 0D 0A 20 20 20 64 6F 20 77 68 69 o top.. do whi
0001D0: 6C 65 20 2E 6E 6F 74 2E 65 6F 66 0D 0A 20 20 20 le .not.eof..
0001E0: 20 20 20 69 66 20 74 79 70 65 6C 65 6D 3D 27 43 if typelem='C
0001F0: 27 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 '.. stor
Size : 512 (Real : 512)
000000: 65 6E 64 69 66 0D 0A 20 20 20 73 65 6C 65 63 74 endif.. select
000010: 20 70 72 69 6D 61 72 79 0D 0A 20 20 20 75 73 65 primary.. use
000020: 20 26 66 72 65 66 20 69 6E 64 65 78 20 26 78 63 &fref index &xc
000030: 6C 65 0D 0A 20 20 20 67 6F 74 6F 20 74 6F 70 0D le.. goto top.
000040: 0A 20 20 20 69 66 20 63 68 6F 69 78 20 23 20 27 . if choix # '
000050: 35 27 0D 0A 20 20 20 40 20 6C 69 67 6D 31 2C 30 5'.. @ ligm1,0
000060: 20 73 61 79 20 27 6D 65 74 74 72 65 20 6C 61 20 say 'mettre la
000070: 70 72 65 6D 69 65 72 65 20 7A 6F 6E 65 20 61 20 premiere zone a
000080: 62 6C 61 6E 63 20 6F 75 20 30 20 70 6F 75 72 20 blanc ou 0 pour
000090: 61 62 61 6E 64 6F 6E 6E 65 72 20 20 20 20 20 27 abandonner '
0000A0: 0D 0A 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 73 .. endif.. s
0000B0: 74 6F 72 65 20 31 20 74 6F 20 63 70 74 0D 0A 20 tore 1 to cpt..
0000C0: 20 20 73 65 74 20 69 6E 74 65 6E 73 69 74 79 20 set intensity
0000D0: 6F 66 66 0D 0A 20 20 20 64 6F 20 77 68 69 6C 65 off.. do while
0000E0: 20 63 70 74 3C 3D 6E 62 7A 6F 6E 70 0D 0A 20 20 cpt<=nbzonp..
0000F0: 20 20 20 20 73 74 6F 72 65 20 27 6D 7A 6F 6E 27 store 'mzon'
000100: 2D 73 74 72 28 6E 6F 7A 2C 31 2B 69 6E 74 28 6E -str(noz,1+int(n
000110: 6F 7A 2F 31 30 29 29 20 74 6F 20 6D 7A 6F 6E 0D oz/10)) to mzon.
000120: 0A 20 20 20 20 20 20 64 6F 20 69 6E 69 74 7A 6F . do initzo
000130: 6E 65 0D 0A 20 20 20 20 20 20 69 66 20 74 65 73 ne.. if tes
000140: 74 3D 27 64 27 2E 61 6E 64 2E 6E 6F 6D 65 73 73 t='d'.and.nomess
000150: 3D 30 0D 0A 20 20 20 20 20 20 20 20 20 69 66 20 =0.. if
000160: 76 65 72 69 66 20 3D 20 27 4E 41 27 2E 61 6E 64 verif = 'NA'.and
000170: 2E 66 69 65 6C 64 3A 74 79 70 65 23 27 4E 27 0D .field:type#'N'.
000180: 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 . store
000190: 74 61 62 76 2D 27 4E 27 20 74 6F 20 74 61 62 76 tabv-'N' to tabv
0001A0: 0D 0A 20 20 20 20 20 20 20 20 20 65 6C 73 65 0D .. else.
0001B0: 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 . store
0001C0: 74 61 62 76 2D 27 4F 27 20 74 6F 20 74 61 62 76 tabv-'O' to tabv
0001D0: 0D 0A 20 20 20 20 20 20 20 20 20 65 6E 64 69 66 .. endif
0001E0: 0D 0A 20 20 20 20 20 20 20 20 20 40 20 6C 74 2C .. @ lt,
0001F0: 63 74 20 73 61 79 20 74 65 78 74 65 0D 0A 20 20 ct say texte..
Size : 512 (Real : 512)
000000: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 65 6E .. en
000010: 64 69 66 0D 0A 20 20 20 20 20 20 20 20 20 65 6E dif.. en
000020: 64 69 66 0D 0A 20 20 20 20 20 20 20 20 20 73 65 dif.. se
000030: 74 20 65 78 61 63 74 20 6F 66 66 0D 0A 20 20 20 t exact off..
000040: 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 65 6E 64 endif.. end
000050: 69 66 0D 0A 20 20 20 69 66 20 6E 6F 6D 65 73 73 if.. if nomess
000060: 3D 30 0D 0A 20 20 20 20 20 20 40 20 6C 69 67 6D =0.. @ ligm
000070: 31 2C 30 0D 0A 20 20 20 20 20 20 72 65 6C 65 61 1,0.. relea
000080: 73 65 20 63 6C 65 2C 63 70 74 2C 6E 6F 6D 7A 2C se cle,cpt,nomz,
000090: 76 69 64 65 2C 76 65 72 32 0D 0A 20 20 20 20 20 vide,ver2..
0000A0: 20 64 6F 20 63 61 73 65 0D 0A 20 20 20 20 20 20 do case..
0000B0: 63 61 73 65 20 63 68 6F 69 78 3D 27 31 27 2E 6F case choix='1'.o
0000C0: 72 2E 63 68 6F 69 78 3D 27 32 27 2E 6F 72 2E 63 r.choix='2'.or.c
0000D0: 68 6F 69 78 3D 27 33 27 0D 0A 20 20 20 20 20 20 hoix='3'..
0000E0: 64 6F 20 6D 61 6A 0D 0A 20 20 20 20 20 20 73 74 do maj.. st
0000F0: 6F 72 65 20 27 73 27 20 74 6F 20 74 65 73 74 0D ore 's' to test.
000100: 0A 20 20 20 20 20 20 63 61 73 65 20 63 68 6F 69 . case choi
000110: 78 3D 27 34 27 2E 6F 72 2E 63 68 6F 69 78 3D 27 x='4'.or.choix='
000120: 35 27 0D 0A 20 20 20 20 20 20 69 66 20 63 68 6F 5'.. if cho
000130: 69 78 3D 27 34 27 0D 0A 20 20 20 20 20 20 20 20 ix='4'..
000140: 20 73 74 6F 72 65 20 75 6E 69 74 2D 6E 6F 6D 69 store unit-nomi
000150: 6E 64 70 20 74 6F 20 6D 6E 6F 6D 63 0D 0A 20 20 ndp to mnomc..
000160: 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 endif..
000170: 20 73 65 6C 65 63 74 20 70 72 69 6D 61 72 79 0D select primary.
000180: 0A 20 20 20 20 20 20 75 73 65 20 26 66 72 65 66 . use &fref
000190: 20 69 6E 64 65 78 20 26 78 63 6C 65 0D 0A 20 20 index &xcle..
0001A0: 20 20 20 20 67 6F 74 6F 20 74 6F 70 0D 0A 20 20 goto top..
0001B0: 20 20 20 20 64 6F 20 77 68 69 6C 65 20 2E 6E 6F do while .no
0001C0: 74 2E 65 6F 66 0D 0A 20 20 20 20 20 20 20 20 20 t.eof..
0001D0: 73 74 6F 72 65 20 22 6D 7A 6F 6E 22 2D 73 74 72 store "mzon"-str
0001E0: 28 6E 6F 7A 2C 31 2B 69 6E 74 28 6E 6F 7A 2F 31 (noz,1+int(noz/1
0001F0: 30 29 2D 69 6E 74 28 6E 6F 7A 2F 32 30 29 2D 69 0)-int(noz/20)-i
Size : 512 (Real : 512)
000000: 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 endif..
000010: 20 40 20 6C 73 2C 63 73 20 67 65 74 20 26 6D 7A @ ls,cs get &mz
000020: 6F 6E 20 26 70 69 63 0D 0A 20 20 20 20 20 20 73 on &pic.. s
000030: 74 6F 72 65 20 63 70 74 2B 31 20 74 6F 20 63 70 tore cpt+1 to cp
000040: 74 0D 0A 20 20 20 20 20 20 73 6B 69 70 0D 0A 20 t.. skip..
000050: 20 20 65 6E 64 64 6F 0D 0A 20 20 20 72 65 6C 65 enddo.. rele
000060: 61 73 65 20 70 69 63 0D 0A 20 20 20 73 65 74 20 ase pic.. set
000070: 69 6E 74 65 6E 73 69 74 79 20 6F 6E 0D 0A 20 20 intensity on..
000080: 20 69 66 20 63 68 6F 69 78 20 3D 20 27 35 27 0D if choix = '5'.
000090: 0A 20 20 20 20 20 20 63 6C 65 61 72 20 67 65 74 . clear get
0000A0: 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 30 20 .. store 0
0000B0: 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 65 6C to nomess.. el
0000C0: 73 65 0D 0A 20 20 20 20 20 20 72 65 61 64 0D 0A se.. read..
0000D0: 20 20 20 20 20 20 67 6F 74 6F 20 74 6F 70 0D 0A goto top..
0000E0: 20 20 20 20 20 20 73 74 6F 72 65 20 27 66 27 20 store 'f'
0000F0: 74 6F 20 76 69 64 65 0D 0A 20 20 20 20 20 20 64 to vide.. d
000100: 6F 20 63 61 73 65 0D 0A 20 20 20 20 20 20 63 61 o case.. ca
000110: 73 65 20 66 69 65 6C 64 3A 74 79 70 65 3D 27 43 se field:type='C
000120: 27 0D 0A 20 20 20 20 20 20 69 66 20 24 28 76 65 '.. if $(ve
000130: 72 69 66 2C 32 2C 31 29 3D 27 44 27 2E 61 6E 64 rif,2,1)='D'.and
000140: 2E 6D 7A 6F 6E 31 3D 27 30 30 2F 30 30 2F 30 30 .mzon1='00/00/00
000150: 27 2E 6F 72 2E 24 28 76 65 72 69 66 2C 32 2C 31 '.or.$(verif,2,1
000160: 29 3D 27 4D 27 2E 61 6E 64 2E 3B 0D 0A 6D 7A 6F )='M'.and.;..mzo
000170: 6E 31 3D 27 30 30 2F 30 30 27 2E 6F 72 2E 24 28 n1='00/00'.or.$(
000180: 76 65 72 69 66 2C 32 2C 31 29 23 27 44 27 2E 61 verif,2,1)#'D'.a
000190: 6E 64 2E 24 28 76 65 72 69 66 2C 32 2C 31 29 23 nd.$(verif,2,1)#
0001A0: 27 4D 27 2E 61 6E 64 2E 6D 7A 6F 6E 31 3D 27 20 'M'.and.mzon1='
0001B0: 27 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 27 '.. store '
0001C0: 74 27 20 74 6F 20 76 69 64 65 0D 0A 20 20 20 20 t' to vide..
0001D0: 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 63 endif.. c
0001E0: 61 73 65 20 66 69 65 6C 64 3A 74 79 70 65 3D 27 ase field:type='
0001F0: 4E 27 0D 0A 20 20 20 20 20 20 69 66 20 6D 7A 6F N'.. if mzo
Size : 512 (Real : 512)
000000: 6E 74 28 6E 6F 7A 2F 33 30 29 29 20 74 6F 20 6D nt(noz/30)) to m
000010: 7A 6F 6E 0D 0A 20 20 20 20 20 20 20 20 20 64 6F zon.. do
000020: 20 69 6E 69 74 7A 6F 6E 65 0D 0A 20 20 20 20 20 initzone..
000030: 20 20 20 20 69 66 20 74 65 73 74 3D 27 64 27 0D if test='d'.
000040: 0A 20 20 20 20 20 20 20 20 20 40 20 6C 74 2C 63 . @ lt,c
000050: 74 20 73 61 79 20 74 65 78 74 65 0D 0A 20 20 20 t say texte..
000060: 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 endif..
000070: 20 20 20 20 20 20 40 20 6C 73 2C 63 73 20 67 65 @ ls,cs ge
000080: 74 20 26 6D 7A 6F 6E 20 26 70 69 63 0D 0A 20 20 t &mzon &pic..
000090: 20 20 20 20 20 20 20 73 6B 69 70 0D 0A 20 20 20 skip..
0000A0: 20 20 20 65 6E 64 64 6F 0D 0A 20 20 20 20 20 20 enddo..
0000B0: 63 6C 65 61 72 20 67 65 74 0D 0A 20 20 20 20 20 clear get..
0000C0: 20 72 65 6C 65 61 73 65 20 70 69 63 2C 6D 7A 6F release pic,mzo
0000D0: 6E 2C 6D 7A 6F 6E 31 2C 6D 7A 6F 6E 32 2C 6D 7A n,mzon1,mzon2,mz
0000E0: 6F 6E 33 2C 6D 7A 6F 6E 34 2C 6D 7A 6F 6E 35 2C on3,mzon4,mzon5,
0000F0: 6D 7A 6F 6E 36 2C 6D 7A 6F 6E 37 2C 6D 7A 6F 6E mzon6,mzon7,mzon
000100: 38 2C 6D 7A 6F 6E 39 0D 0A 20 20 20 20 20 20 72 8,mzon9.. r
000110: 65 6C 65 61 73 65 20 6D 7A 6F 6E 31 30 2C 6D 7A elease mzon10,mz
000120: 6F 6E 31 31 2C 6D 7A 6F 6E 31 32 2C 6D 7A 6F 6E on11,mzon12,mzon
000130: 31 33 2C 6D 7A 6F 6E 31 34 2C 6D 7A 6F 6E 31 35 13,mzon14,mzon15
000140: 2C 6D 7A 6F 6E 31 36 2C 6D 7A 6F 6E 31 37 2C 6D ,mzon16,mzon17,m
000150: 7A 6F 6E 31 38 0D 0A 20 20 20 20 20 20 72 65 6C zon18.. rel
000160: 65 61 73 65 20 6D 7A 6F 6E 31 39 2C 6D 7A 6F 6E ease mzon19,mzon
000170: 32 30 2C 6D 7A 6F 6E 32 31 2C 6D 7A 6F 6E 32 32 20,mzon21,mzon22
000180: 2C 6D 7A 6F 6E 32 33 2C 6D 7A 6F 6E 32 34 2C 6D ,mzon23,mzon24,m
000190: 7A 6F 6E 32 35 2C 6D 7A 6F 6E 32 36 2C 6D 7A 6F zon25,mzon26,mzo
0001A0: 6E 32 37 0D 0A 20 20 20 20 20 20 72 65 6C 65 61 n27.. relea
0001B0: 73 65 20 6D 7A 6F 6E 32 38 2C 6D 7A 6F 6E 32 39 se mzon28,mzon29
0001C0: 2C 6D 7A 6F 6E 33 30 2C 6D 7A 6F 6E 33 31 2C 6D ,mzon30,mzon31,m
0001D0: 7A 6F 6E 33 32 0D 0A 20 20 20 20 20 20 73 65 6C zon32.. sel
0001E0: 65 63 74 20 70 72 69 6D 61 72 79 0D 0A 20 20 20 ect primary..
0001F0: 20 20 20 75 73 65 0D 0A 20 20 20 20 20 20 73 65 use.. se
Size : 512 (Real : 512)
000000: 6E 31 3D 30 0D 0A 20 20 20 20 20 20 20 20 20 73 n1=0.. s
000010: 74 6F 72 65 20 27 74 27 20 74 6F 20 76 69 64 65 tore 't' to vide
000020: 0D 0A 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 .. endif..
000030: 20 20 20 20 20 65 6E 64 63 61 73 65 0D 0A 20 20 endcase..
000040: 20 20 20 20 69 66 20 76 69 64 65 3D 27 74 27 0D if vide='t'.
000050: 0A 20 20 20 20 20 20 72 65 6C 65 61 73 65 20 74 . release t
000060: 61 62 76 2C 74 65 73 74 2C 76 69 64 65 2C 63 70 abv,test,vide,cp
000070: 74 2C 63 6C 65 2C 6D 7A 6F 6E 2C 6D 7A 6F 6E 31 t,cle,mzon,mzon1
000080: 2C 6D 7A 6F 6E 32 2C 6D 7A 6F 6E 33 2C 6D 7A 6F ,mzon2,mzon3,mzo
000090: 6E 34 2C 6D 7A 6F 6E 35 0D 0A 20 20 20 20 20 20 n4,mzon5..
0000A0: 72 65 74 75 72 6E 0D 0A 20 20 20 20 20 20 65 6E return.. en
0000B0: 64 69 66 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 dif.. store
0000C0: 20 30 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 0 to nomess..
0000D0: 20 20 20 20 69 66 20 63 68 6F 69 78 3D 27 31 27 if choix='1'
0000E0: 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 31 20 .. store 1
0000F0: 74 6F 20 76 31 0D 0A 20 20 20 20 20 20 73 74 6F to v1.. sto
000100: 72 65 20 6E 62 7A 6F 6E 70 20 74 6F 20 76 32 0D re nbzonp to v2.
000110: 0A 20 20 20 20 20 20 64 6F 20 76 65 72 69 66 0D . do verif.
000120: 0A 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 . endif..
000130: 20 20 20 20 69 66 20 6E 6F 6D 65 73 73 23 30 0D if nomess#0.
000140: 0A 20 20 20 20 20 20 20 20 20 40 20 6C 69 67 6D . @ ligm
000150: 31 2C 30 0D 0A 20 20 20 20 20 20 20 20 20 64 6F 1,0.. do
000160: 20 61 66 66 6D 65 73 73 0D 0A 20 20 20 20 20 20 affmess..
000170: 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20 73 else.. s
000180: 74 6F 72 65 20 27 20 27 20 74 6F 20 63 6C 65 0D tore ' ' to cle.
000190: 0A 20 20 20 20 20 20 20 20 20 73 65 6C 65 63 74 . select
0001A0: 20 70 72 69 6D 61 72 79 0D 0A 20 20 20 20 20 20 primary..
0001B0: 20 20 20 75 73 65 20 26 66 72 65 66 20 69 6E 64 use &fref ind
0001C0: 65 78 20 26 78 63 6C 65 0D 0A 20 20 20 20 20 20 ex &xcle..
0001D0: 20 20 20 73 74 6F 72 65 20 31 20 74 6F 20 63 70 store 1 to cp
0001E0: 74 0D 0A 20 20 20 20 20 20 20 20 20 67 6F 74 6F t.. goto
0001F0: 20 74 6F 70 0D 0A 20 20 20 20 20 20 20 20 20 64 top.. d
Size : 512 (Real : 512)
000000: 6C 65 63 74 20 73 65 63 6F 6E 64 61 72 79 0D 0A lect secondary..
000010: 20 20 20 20 20 20 75 73 65 0D 0A 20 20 20 20 20 use..
000020: 20 73 74 6F 72 65 20 27 35 27 20 74 6F 20 63 68 store '5' to ch
000030: 6F 69 78 0D 0A 20 20 20 20 20 20 73 65 6C 65 63 oix.. selec
000040: 74 20 73 65 63 6F 6E 64 61 72 79 0D 0A 20 20 20 t secondary..
000050: 20 20 20 75 73 65 20 26 6E 6F 6D 66 69 63 68 0D use &nomfich.
000060: 0A 20 20 20 20 20 20 73 65 74 20 69 6E 64 65 78 . set index
000070: 20 74 6F 20 26 6D 6E 6F 6D 63 0D 0A 20 20 20 20 to &mnomc..
000080: 20 20 67 6F 74 6F 20 6E 6F 63 6F 75 72 0D 0A 20 goto nocour..
000090: 20 20 20 20 20 73 74 6F 72 65 20 27 46 27 20 74 store 'F' t
0000A0: 6F 20 72 65 70 0D 0A 20 20 20 20 20 20 40 20 6C o rep.. @ l
0000B0: 69 67 6D 31 2B 31 2C 30 0D 0A 20 20 20 20 20 20 igm1+1,0..
0000C0: 40 20 6C 69 67 6D 31 2C 30 20 73 61 79 20 27 74 @ ligm1,0 say 't
0000D0: 61 70 65 7A 20 46 20 70 6F 75 72 20 66 69 6E 2C apez F pour fin,
0000E0: 20 53 20 70 6F 75 72 20 66 69 63 68 65 20 73 75 S pour fiche su
0000F0: 69 76 61 6E 74 65 2C 20 50 20 70 6F 75 72 20 27 ivante, P pour '
000100: 3B 0D 0A 20 20 20 20 20 20 2B 27 66 69 63 68 65 ;.. +'fiche
000110: 20 70 72 65 63 65 64 65 6E 74 65 27 0D 0A 20 20 precedente'..
000120: 20 20 20 20 77 61 69 74 20 74 6F 20 72 65 70 0D wait to rep.
000130: 0A 20 20 20 20 20 20 69 66 20 21 28 72 65 70 29 . if !(rep)
000140: 3D 27 50 27 0D 0A 20 20 20 20 20 20 20 20 20 73 ='P'.. s
000150: 6B 69 70 20 2D 31 0D 0A 20 20 20 20 20 20 65 6C kip -1.. el
000160: 73 65 0D 0A 20 20 20 20 20 20 20 20 20 69 66 20 se.. if
000170: 21 28 72 65 70 29 3D 27 53 27 0D 0A 20 20 20 20 !(rep)='S'..
000180: 20 20 20 20 20 20 20 20 73 6B 69 70 0D 0A 20 20 skip..
000190: 20 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 endif..
0001A0: 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 endif..
0001B0: 20 69 66 20 21 28 72 65 70 29 23 27 50 27 2E 61 if !(rep)#'P'.a
0001C0: 6E 64 2E 21 28 72 65 70 29 23 27 53 27 0D 0A 20 nd.!(rep)#'S'..
0001D0: 20 20 20 20 20 20 20 20 72 65 6C 65 61 73 65 20 release
0001E0: 6D 6E 6F 6D 63 2C 72 65 70 2C 74 65 73 74 2C 61 mnomc,rep,test,a
0001F0: 69 67 2C 63 6C 65 2C 63 70 74 2C 63 6F 72 72 65 ig,cle,cpt,corre
Size : 512 (Real : 512)
000000: 6F 20 77 68 69 6C 65 20 63 70 74 3C 3D 6E 62 7A o while cpt<=nbz
000010: 6F 6E 70 0D 0A 20 20 20 20 20 20 20 20 20 73 74 onp.. st
000020: 6F 72 65 20 27 6D 7A 6F 6E 27 2D 73 74 72 28 6E ore 'mzon'-str(n
000030: 6F 7A 2C 31 2B 69 6E 74 28 6E 6F 7A 2F 31 30 29 oz,1+int(noz/10)
000040: 29 20 74 6F 20 6D 7A 6F 6E 0D 0A 20 20 20 20 20 ) to mzon..
000050: 20 20 20 20 64 6F 20 63 61 73 65 0D 0A 20 20 20 do case..
000060: 20 20 20 20 20 20 63 61 73 65 20 66 69 65 6C 64 case field
000070: 3A 74 79 70 65 3D 27 4E 27 0D 0A 20 20 20 20 20 :type='N'..
000080: 20 20 20 20 73 74 6F 72 65 20 63 6C 65 2B 73 74 store cle+st
000090: 72 28 26 6D 7A 6F 6E 2C 66 69 65 6C 64 3A 6C 65 r(&mzon,field:le
0000A0: 6E 2C 66 69 65 6C 64 3A 64 65 63 29 20 74 6F 20 n,field:dec) to
0000B0: 63 6C 65 0D 0A 20 20 20 20 20 20 20 20 20 63 61 cle.. ca
0000C0: 73 65 20 24 28 76 65 72 69 66 2C 32 2C 31 29 3D se $(verif,2,1)=
0000D0: 27 44 27 0D 0A 20 20 20 20 20 20 20 20 20 73 74 'D'.. st
0000E0: 6F 72 65 20 63 6C 65 2B 24 28 26 6D 7A 6F 6E 2C ore cle+$(&mzon,
0000F0: 37 2C 32 29 2B 24 28 26 6D 7A 6F 6E 2C 34 2C 32 7,2)+$(&mzon,4,2
000100: 29 2B 24 28 26 6D 7A 6F 6E 2C 31 2C 32 29 20 74 )+$(&mzon,1,2) t
000110: 6F 20 63 6C 65 0D 0A 20 20 20 20 20 20 20 20 20 o cle..
000120: 63 61 73 65 20 24 28 76 65 72 69 66 2C 32 2C 31 case $(verif,2,1
000130: 29 3D 27 4D 27 0D 0A 20 20 20 20 20 20 20 20 20 )='M'..
000140: 73 74 6F 72 65 20 63 6C 65 2B 24 28 26 6D 7A 6F store cle+$(&mzo
000150: 6E 2C 34 2C 32 29 2B 24 28 26 6D 7A 6F 6E 2C 31 n,4,2)+$(&mzon,1
000160: 2C 32 29 20 74 6F 20 63 6C 65 0D 0A 20 20 20 20 ,2) to cle..
000170: 20 20 20 20 20 6F 74 68 65 72 77 69 73 65 0D 0A otherwise..
000180: 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 63 store c
000190: 6C 65 2B 21 28 26 6D 7A 6F 6E 29 20 74 6F 20 63 le+!(&mzon) to c
0001A0: 6C 65 0D 0A 20 20 20 20 20 20 20 20 20 65 6E 64 le.. end
0001B0: 63 61 73 65 0D 0A 20 20 20 20 20 20 20 20 20 73 case.. s
0001C0: 74 6F 72 65 20 63 70 74 2B 31 20 74 6F 20 63 70 tore cpt+1 to cp
0001D0: 74 0D 0A 20 20 20 20 20 20 20 20 20 73 6B 69 70 t.. skip
0001E0: 0D 0A 20 20 20 20 20 20 20 20 20 65 6E 64 64 6F .. enddo
0001F0: 0D 0A 20 20 20 20 20 20 20 20 20 72 65 6C 65 61 .. relea
Size : 512 (Real : 512)
000000: 63 74 2C 6E 6F 6D 7A 2C 76 69 64 65 2C 76 65 72 ct,nomz,vide,ver
000010: 32 2C 6D 7A 6F 6E 2C 6D 7A 6F 6E 31 0D 0A 20 20 2,mzon,mzon1..
000020: 20 20 20 20 20 20 20 72 65 6C 65 61 73 65 20 6D release m
000030: 7A 6F 6E 32 2C 6D 7A 6F 6E 33 2C 6D 7A 6F 6E 34 zon2,mzon3,mzon4
000040: 2C 6D 7A 6F 6E 35 2C 74 61 62 76 0D 0A 20 20 20 ,mzon5,tabv..
000050: 20 20 20 20 20 20 72 65 74 75 72 6E 0D 0A 20 20 return..
000060: 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 else..
000070: 20 20 20 73 74 6F 72 65 20 27 73 27 20 74 6F 20 store 's' to
000080: 74 65 73 74 0D 0A 20 20 20 20 20 20 20 20 20 73 test.. s
000090: 74 6F 72 65 20 23 20 74 6F 20 6E 6F 63 6F 75 72 tore # to nocour
0000A0: 0D 0A 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 .. endif..
0000B0: 20 20 20 20 20 65 6E 64 63 61 73 65 0D 0A 20 20 endcase..
0000C0: 20 65 6E 64 69 66 0D 0A 65 6E 64 64 6F 0D 0A 72 endif..enddo..r
0000D0: 65 74 75 72 6E 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D eturn...........
0000E0: 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D ................
0000F0: 0A 1A 1A 20 20 65 6E 64 63 61 73 65 0D 0A 20 20 ... endcase..
000100: 20 65 6E 64 69 66 0D 0A 65 6E 64 64 6F 0D 0A 72 endif..enddo..r
000110: 65 74 75 72 6E 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D eturn...........
000120: 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D ................
000130: 0A 1A 1A 0D 0A 65 6E 64 64 6F 0D 0A 72 65 74 75 .....enddo..retu
000140: 72 6E 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A rn..............
000150: 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 1A 1A ................
000160: 20 20 20 20 20 73 6B 69 70 0D 0A 20 20 20 65 6E skip.. en
000170: 64 64 6F 0D 0A 20 20 20 72 65 6C 65 61 73 65 20 ddo.. release
000180: 70 69 63 0D 0A 20 20 20 73 65 74 20 69 6E 74 65 pic.. set inte
000190: 6E 73 69 74 79 20 6F 6E 0D 0A 20 20 20 69 66 20 nsity on.. if
0001A0: 63 68 6F 69 78 20 3D 20 27 35 27 0D 0A 20 20 20 choix = '5'..
0001B0: 20 20 20 63 6C 65 61 72 20 67 65 74 0D 0A 20 20 clear get..
0001C0: 20 20 20 20 73 74 6F 72 65 20 30 20 74 6F 20 6E store 0 to n
0001D0: 6F 6D 65 73 73 0D 0A 20 20 20 65 6C 73 65 0D 0A omess.. else..
0001E0: 20 20 20 20 20 20 72 65 61 64 0D 0A 20 20 20 20 read..
0001F0: 20 20 67 6F 74 6F 20 74 6F 70 0D 0A 20 20 20 20 goto top..
Size : 512 (Real : 512)
000000: 73 65 20 63 70 74 0D 0A 20 20 20 20 20 20 20 20 se cpt..
000010: 20 73 74 6F 72 65 20 24 28 63 6C 65 2C 32 2C 6C store $(cle,2,l
000020: 65 6E 28 63 6C 65 29 2D 31 29 20 74 6F 20 63 6C en(cle)-1) to cl
000030: 65 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 e.. stor
000040: 65 20 74 72 69 6D 28 63 6C 65 29 20 74 6F 20 63 e trim(cle) to c
000050: 6C 65 0D 0A 20 20 20 20 20 20 20 20 20 73 65 6C le.. sel
000060: 65 63 74 20 73 65 63 6F 6E 64 61 72 79 0D 0A 20 ect secondary..
000070: 20 20 20 20 20 20 20 20 75 73 65 20 26 6E 6F 6D use &nom
000080: 66 69 63 68 20 69 6E 64 65 78 20 26 6C 69 73 74 fich index &list
000090: 69 6E 64 65 78 0D 0A 20 20 20 20 20 20 20 20 20 index..
0000A0: 69 66 20 63 68 6F 69 78 20 3E 3D 20 22 31 22 20 if choix >= "1"
0000B0: 2E 61 6E 64 2E 20 63 68 6F 69 78 20 3C 3D 20 22 .and. choix <= "
0000C0: 33 22 0D 0A 20 20 20 20 20 20 20 20 20 73 65 74 3".. set
0000D0: 20 65 78 61 63 74 20 6F 6E 0D 0A 20 20 20 20 20 exact on..
0000E0: 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 endif..
0000F0: 20 20 20 20 66 69 6E 64 20 26 63 6C 65 0D 0A 20 find &cle..
000100: 20 20 20 20 20 20 20 20 69 66 20 63 68 6F 69 78 if choix
000110: 3D 27 31 27 2E 61 6E 64 2E 28 23 20 23 20 30 29 ='1'.and.(# # 0)
000120: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 73 74 .. st
000130: 6F 72 65 20 33 20 74 6F 20 6E 6F 6D 65 73 73 0D ore 3 to nomess.
000140: 0A 20 20 20 20 20 20 20 20 20 20 20 20 64 6F 20 . do
000150: 61 66 66 6D 65 73 73 0D 0A 20 20 20 20 20 20 20 affmess..
000160: 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 else..
000170: 20 20 20 20 69 66 20 63 68 6F 69 78 20 23 27 31 if choix #'1
000180: 27 2E 61 6E 64 2E 28 20 23 20 3D 20 30 20 29 0D '.and.( # = 0 ).
000190: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
0001A0: 73 74 6F 72 65 20 34 20 74 6F 20 6E 6F 6D 65 73 store 4 to nomes
0001B0: 73 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 s..
0001C0: 20 20 64 6F 20 61 66 66 6D 65 73 73 0D 0A 20 20 do affmess..
0001D0: 20 20 20 20 20 20 20 20 20 20 65 6C 73 65 0D 0A else..
0001E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 s
0001F0: 74 6F 72 65 20 23 20 74 6F 20 6E 6F 63 6F 75 72 tore # to nocour
Size : 512 (Real : 512)
000000: 2A 20 6C 69 73 74 66 69 63 68 3A 20 6C 69 73 74 * listfich: list
000010: 65 20 6C 61 20 73 74 72 75 63 74 75 72 65 20 64 e la structure d
000020: 75 20 66 69 63 68 69 65 72 0D 0A 0D 0A 65 72 61 u fichier....era
000030: 73 65 0D 0A 40 20 31 2C 32 30 20 73 61 79 20 27 se..@ 1,20 say '
000040: 4C 49 53 54 45 20 44 45 20 4C 41 20 53 54 52 55 LISTE DE LA STRU
000050: 43 54 55 52 45 20 44 55 20 46 49 43 48 49 45 52 CTURE DU FICHIER
000060: 27 0D 0A 40 20 31 2C 35 34 20 67 65 74 20 6E 6F '..@ 1,54 get no
000070: 6D 61 66 66 0D 0A 63 6C 65 61 72 20 67 65 74 0D maff..clear get.
000080: 0A 40 20 35 2C 35 20 73 61 79 20 22 76 6F 75 6C .@ 5,5 say "voul
000090: 65 7A 2D 76 6F 75 73 20 76 6F 74 72 65 20 6C 69 ez-vous votre li
0000A0: 73 74 65 20 73 75 72 20 6C 27 69 6D 70 72 69 6D ste sur l'imprim
0000B0: 61 6E 74 65 20 28 4F 3D 6F 75 69 2C 4E 3D 6E 6F ante (O=oui,N=no
0000C0: 6E 29 3A 22 0D 0A 73 74 6F 72 65 20 27 66 27 20 n):"..store 'f'
0000D0: 74 6F 20 63 6F 72 72 65 63 74 0D 0A 64 6F 20 77 to correct..do w
0000E0: 68 69 6C 65 20 63 6F 72 72 65 63 74 3D 27 66 27 hile correct='f'
0000F0: 0D 0A 73 74 6F 72 65 20 27 4E 27 20 74 6F 20 72 ..store 'N' to r
000100: 65 70 0D 0A 40 20 35 2C 36 32 20 67 65 74 20 72 ep..@ 5,62 get r
000110: 65 70 0D 0A 72 65 61 64 0D 0A 73 74 6F 72 65 20 ep..read..store
000120: 21 28 72 65 70 29 20 74 6F 20 72 65 70 0D 0A 64 !(rep) to rep..d
000130: 6F 20 63 61 73 65 0D 0A 63 61 73 65 20 72 65 70 o case..case rep
000140: 3D 27 4F 27 0D 0A 73 65 74 20 70 72 69 6E 74 20 ='O'..set print
000150: 6F 6E 0D 0A 73 65 74 20 66 6F 72 6D 61 74 20 74 on..set format t
000160: 6F 20 70 72 69 6E 74 0D 0A 73 74 6F 72 65 20 27 o print..store '
000170: 74 27 20 74 6F 20 63 6F 72 72 65 63 74 0D 0A 63 t' to correct..c
000180: 61 73 65 20 72 65 70 3D 27 4E 27 0D 0A 73 74 6F ase rep='N'..sto
000190: 72 65 20 27 74 27 20 74 6F 20 63 6F 72 72 65 63 re 't' to correc
0001A0: 74 0D 0A 6F 74 68 65 72 77 69 73 65 0D 0A 73 74 t..otherwise..st
0001B0: 6F 72 65 20 31 20 74 6F 20 6E 6F 6D 65 73 73 0D ore 1 to nomess.
0001C0: 0A 64 6F 20 61 66 66 6D 65 73 73 0D 0A 65 6E 64 .do affmess..end
0001D0: 63 61 73 65 0D 0A 65 6E 64 64 6F 0D 0A 73 74 6F case..enddo..sto
0001E0: 72 65 20 30 20 74 6F 20 63 70 74 0D 0A 73 74 6F re 0 to cpt..sto
0001F0: 72 65 20 31 20 74 6F 20 6C 6F 6E 67 65 6E 67 0D re 1 to longeng.
Size : 512 (Real : 512)
000000: 6E 35 0D 0A 20 20 20 6F 74 68 65 72 77 69 73 65 n5.. otherwise
000010: 0D 0A 20 20 20 73 74 6F 72 65 20 27 20 27 20 74 .. store ' ' t
000020: 6F 20 6D 7A 6F 6E 33 0D 0A 20 20 20 73 74 6F 72 o mzon3.. stor
000030: 65 20 27 20 27 20 74 6F 20 6D 7A 6F 6E 34 0D 0A e ' ' to mzon4..
000040: 20 20 20 73 74 6F 72 65 20 27 20 27 20 74 6F 20 store ' ' to
000050: 6D 7A 6F 6E 35 0D 0A 20 20 20 65 6E 64 63 61 73 mzon5.. endcas
000060: 65 0D 0A 20 20 20 40 20 6C 69 67 2B 32 2C 30 20 e.. @ lig+2,0
000070: 73 61 79 20 6D 7A 6F 6E 31 2B 27 20 27 2B 6D 7A say mzon1+' '+mz
000080: 6F 6E 32 0D 0A 20 20 20 40 20 6C 69 67 2B 32 2C on2.. @ lig+2,
000090: 32 38 20 73 61 79 20 6D 7A 6F 6E 33 2B 27 20 20 28 say mzon3+'
0000A0: 20 27 2B 6D 7A 6F 6E 34 2B 27 20 20 27 2B 6D 7A '+mzon4+' '+mz
0000B0: 6F 6E 35 0D 0A 20 20 20 73 74 6F 72 65 20 6C 69 on5.. store li
0000C0: 67 2B 34 20 74 6F 20 6C 69 67 0D 0A 20 20 20 73 g+4 to lig.. s
0000D0: 6B 69 70 0D 0A 20 20 20 69 66 20 65 6F 66 0D 0A kip.. if eof..
0000E0: 20 20 20 20 20 20 3F 0D 0A 20 20 20 20 20 20 3F ?.. ?
0000F0: 20 27 6E 6F 6D 62 72 65 20 64 65 20 7A 6F 6E 65 'nombre de zone
000100: 73 20 3A 27 2C 63 70 74 2C 27 20 20 20 20 20 20 s :',cpt,'
000110: 20 20 20 20 20 20 20 20 74 61 69 6C 6C 65 20 65 taille e
000120: 6E 72 65 67 69 73 74 72 65 6D 65 6E 74 3A 27 2C nregistrement:',
000130: 6C 6F 6E 67 65 6E 67 0D 0A 20 20 20 20 20 20 69 longeng.. i
000140: 66 20 72 65 70 3D 27 4E 27 0D 0A 20 20 20 20 20 f rep='N'..
000150: 20 20 20 20 40 20 6C 69 67 6D 31 2C 30 20 73 61 @ ligm1,0 sa
000160: 79 20 27 74 61 70 65 7A 20 73 75 72 20 75 6E 65 y 'tapez sur une
000170: 20 74 6F 75 63 68 65 20 70 6F 75 72 20 63 6F 6E touche pour con
000180: 74 69 6E 75 65 72 27 0D 0A 20 20 20 20 20 20 20 tinuer'..
000190: 20 20 73 65 74 20 63 6F 6E 73 6F 6C 65 20 6F 66 set console of
0001A0: 66 0D 0A 20 20 20 20 20 20 20 20 20 77 61 69 74 f.. wait
0001B0: 0D 0A 20 20 20 20 20 20 20 20 20 73 65 74 20 63 .. set c
0001C0: 6F 6E 73 6F 6C 65 20 6F 6E 0D 0A 20 20 20 20 20 onsole on..
0001D0: 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20 else..
0001E0: 2A 20 70 6F 75 72 20 76 69 64 65 72 20 6C 65 20 * pour vider le
0001F0: 62 75 66 66 65 72 0D 0A 20 20 20 20 20 20 20 20 buffer..
Size : 512 (Real : 512)
000000: 0A 75 73 65 20 26 66 72 65 66 20 69 6E 64 65 78 .use &fref index
000010: 20 26 78 63 6C 65 0D 0A 67 6F 74 6F 20 74 6F 70 &xcle..goto top
000020: 0D 0A 73 74 6F 72 65 20 27 66 27 20 74 6F 20 63 ..store 'f' to c
000030: 6F 72 72 65 63 74 0D 0A 65 72 61 73 65 0D 0A 40 orrect..erase..@
000040: 20 31 2C 32 36 20 73 61 79 20 27 4C 49 53 54 45 1,26 say 'LISTE
000050: 20 44 45 20 4C 41 20 53 54 52 55 43 54 55 52 45 DE LA STRUCTURE
000060: 20 44 55 20 46 49 43 48 49 45 52 20 27 2B 6E 6F DU FICHIER '+no
000070: 6D 61 66 66 0D 0A 73 74 6F 72 65 20 33 20 74 6F maff..store 3 to
000080: 20 6C 69 67 0D 0A 64 6F 20 77 68 69 6C 65 20 63 lig..do while c
000090: 6F 72 72 65 63 74 3D 27 66 27 0D 0A 20 20 20 69 orrect='f'.. i
0000A0: 66 20 6C 69 67 20 3E 20 31 38 2E 61 6E 64 2E 72 f lig > 18.and.r
0000B0: 65 70 3D 27 4E 27 0D 0A 20 20 20 20 20 20 40 20 ep='N'.. @
0000C0: 6C 69 67 6D 31 2C 30 20 73 61 79 20 22 54 41 50 ligm1,0 say "TAP
0000D0: 45 5A 20 46 20 50 4F 55 52 20 46 49 4E 20 4C 49 EZ F POUR FIN LI
0000E0: 53 54 45 2C 20 4E 27 49 4D 50 4F 52 54 45 20 51 STE, N'IMPORTE Q
0000F0: 55 45 4C 4C 45 20 41 55 54 52 45 20 54 4F 55 43 UELLE AUTRE TOUC
000100: 48 45 20 22 3B 0D 0A 20 20 20 20 20 20 2B 22 50 HE ";.. +"P
000110: 4F 55 52 20 4C 41 20 53 55 49 54 45 22 0D 0A 20 OUR LA SUITE"..
000120: 20 20 20 20 20 77 61 69 74 20 74 6F 20 63 68 6F wait to cho
000130: 69 78 0D 0A 20 20 20 20 20 20 69 66 20 21 28 63 ix.. if !(c
000140: 68 6F 69 78 29 3D 27 46 27 0D 0A 20 20 20 20 20 hoix)='F'..
000150: 20 72 65 6C 65 61 73 65 20 63 70 74 2C 6C 6F 6E release cpt,lon
000160: 67 65 6E 67 2C 72 65 70 2C 6C 69 67 2C 63 6F 72 geng,rep,lig,cor
000170: 72 65 63 74 2C 6D 7A 6F 6E 31 2C 6D 7A 6F 6E 32 rect,mzon1,mzon2
000180: 2C 6D 7A 6F 6E 33 2C 6D 7A 6F 6E 34 2C 6D 7A 6F ,mzon3,mzon4,mzo
000190: 6E 35 0D 0A 20 20 20 20 20 20 72 65 74 75 72 6E n5.. return
0001A0: 0D 0A 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 .. else..
0001B0: 20 20 20 20 65 72 61 73 65 0D 0A 20 20 20 20 20 erase..
0001C0: 20 40 20 31 2C 32 36 20 73 61 79 20 27 4C 49 53 @ 1,26 say 'LIS
0001D0: 54 45 20 44 45 20 4C 41 20 53 54 52 55 43 54 55 TE DE LA STRUCTU
0001E0: 52 45 20 44 55 20 46 49 43 48 49 45 52 20 27 2B RE DU FICHIER '+
0001F0: 6E 6F 6D 61 66 66 0D 0A 20 20 20 20 20 20 73 74 nomaff.. st
Size : 512 (Real : 512)
000000: 20 73 65 74 20 70 72 69 6E 74 20 6F 6E 0D 0A 20 set print on..
000010: 20 20 20 20 20 20 20 20 3F 3F 20 63 68 72 28 31 ?? chr(1
000020: 33 29 0D 0A 20 20 20 20 20 20 20 20 20 73 65 74 3).. set
000030: 20 70 72 69 6E 74 20 6F 66 66 0D 0A 20 20 20 20 print off..
000040: 20 20 20 20 20 73 65 74 20 66 6F 72 6D 61 74 20 set format
000050: 74 6F 20 73 63 72 65 65 6E 0D 0A 20 20 20 20 20 to screen..
000060: 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 72 65 endif.. re
000070: 6C 65 61 73 65 20 72 65 70 2C 63 6F 72 72 65 63 lease rep,correc
000080: 74 2C 6C 6F 6E 67 65 6E 67 2C 63 70 74 2C 6C 69 t,longeng,cpt,li
000090: 67 2C 6D 7A 6F 6E 31 2C 6D 7A 6F 6E 32 2C 6D 7A g,mzon1,mzon2,mz
0000A0: 6F 6E 33 2C 6D 7A 6F 6E 34 2C 6D 7A 6F 6E 35 0D on3,mzon4,mzon5.
0000B0: 0A 20 20 20 20 20 20 72 65 74 75 72 6E 0D 0A 20 . return..
0000C0: 20 20 65 6E 64 69 66 0D 0A 65 6E 64 64 6F 0D 0A endif..enddo..
0000D0: 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 1A 1A 20 20 20 20 ............
0000E0: 3F 20 27 6E 6F 6D 62 72 65 20 64 65 20 7A 6F 6E ? 'nombre de zon
0000F0: 65 73 20 3A 27 2C 63 70 74 2C 27 20 20 20 20 20 es :',cpt,'
000100: 20 20 20 20 20 20 20 20 20 74 61 69 6C 6C 65 20 taille
000110: 65 6E 72 65 67 69 73 74 72 65 6D 65 6E 74 3A 27 enregistrement:'
000120: 2C 6C 6F 6E 67 65 6E 67 0D 0A 20 20 20 20 20 20 ,longeng..
000130: 69 66 20 72 65 70 3D 27 4E 27 0D 0A 20 20 20 20 if rep='N'..
000140: 20 20 20 20 20 40 20 6C 69 67 6D 31 2C 30 20 73 @ ligm1,0 s
000150: 61 79 20 27 74 61 70 65 7A 20 73 75 72 20 75 6E ay 'tapez sur un
000160: 65 20 74 6F 75 63 68 65 20 70 6F 75 72 20 63 6F e touche pour co
000170: 6E 74 69 6E 75 65 72 27 0D 0A 20 20 20 20 20 20 ntinuer'..
000180: 20 20 20 73 65 74 20 63 6F 6E 73 6F 6C 65 20 6F set console o
000190: 66 66 0D 0A 20 20 20 20 20 20 20 20 20 77 61 69 ff.. wai
0001A0: 74 0D 0A 20 20 20 20 20 20 20 20 20 73 65 74 20 t.. set
0001B0: 63 6F 6E 73 6F 6C 65 20 6F 6E 0D 0A 20 20 20 20 console on..
0001C0: 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 else..
0001D0: 20 2A 20 70 6F 75 72 20 76 69 64 65 72 20 6C 65 * pour vider le
0001E0: 20 62 75 66 66 65 72 0D 0A 20 20 20 20 20 20 20 buffer..
0001F0: 20 20 73 65 74 20 70 72 69 6E 74 20 6F 6E 0D 0A set print on..
Size : 512 (Real : 512)
000000: 6F 72 65 20 33 20 74 6F 20 6C 69 67 0D 0A 20 20 ore 3 to lig..
000010: 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 65 6E endif.. en
000020: 64 69 66 0D 0A 20 20 20 73 74 6F 72 65 20 63 70 dif.. store cp
000030: 74 2B 31 20 74 6F 20 63 70 74 0D 0A 20 20 20 73 t+1 to cpt.. s
000040: 74 6F 72 65 20 6C 6F 6E 67 65 6E 67 2B 66 69 65 tore longeng+fie
000050: 6C 64 3A 6C 65 6E 20 74 6F 20 6C 6F 6E 67 65 6E ld:len to longen
000060: 67 0D 0A 20 20 20 40 20 6C 69 67 2C 30 20 73 61 g.. @ lig,0 sa
000070: 79 20 27 2A 2A 2A 2A 2A 2A 2A 20 20 20 27 2B 66 y '******* '+f
000080: 69 65 6C 64 3A 6E 61 6D 65 2B 27 20 20 20 20 54 ield:name+' T
000090: 59 50 45 3A 20 27 2B 66 69 65 6C 64 3A 74 79 70 YPE: '+field:typ
0000A0: 65 2B 3B 0D 0A 20 20 20 27 20 20 20 20 20 20 20 e+;.. '
0000B0: 4C 4F 4E 47 55 45 55 52 3A 27 0D 0A 20 20 20 40 LONGUEUR:'.. @
0000C0: 20 6C 69 67 2C 34 38 20 73 61 79 20 66 69 65 6C lig,48 say fiel
0000D0: 64 3A 6C 65 6E 20 70 69 63 74 75 72 65 20 27 39 d:len picture '9
0000E0: 39 39 27 0D 0A 20 20 20 40 20 6C 69 67 2C 36 34 99'.. @ lig,64
0000F0: 20 73 61 79 20 27 4E 42 20 44 45 43 49 4D 3A 27 say 'NB DECIM:'
000100: 0D 0A 20 20 20 40 20 6C 69 67 2C 37 34 20 73 61 .. @ lig,74 sa
000110: 79 20 66 69 65 6C 64 3A 64 65 63 20 70 69 63 74 y field:dec pict
000120: 75 72 65 20 27 39 39 39 27 0D 0A 20 20 20 40 20 ure '999'.. @
000130: 6C 69 67 2B 31 2C 30 20 73 61 79 20 27 4C 49 42 lig+1,0 say 'LIB
000140: 45 4C 4C 45 3A 20 27 2B 74 65 78 74 65 2B 27 20 ELLE: '+texte+'
000150: 4C 49 47 3A 27 0D 0A 20 20 20 40 20 6C 69 67 2B LIG:'.. @ lig+
000160: 31 2C 33 35 20 73 61 79 20 6C 74 20 70 69 63 74 1,35 say lt pict
000170: 75 72 65 20 27 39 39 27 0D 0A 20 20 20 40 20 6C ure '99'.. @ l
000180: 69 67 2B 31 2C 33 39 20 73 61 79 20 27 43 4F 4C ig+1,39 say 'COL
000190: 3A 27 0D 0A 20 20 20 40 20 6C 69 67 2B 31 2C 34 :'.. @ lig+1,4
0001A0: 34 20 73 61 79 20 63 74 20 70 69 63 74 75 72 65 4 say ct picture
0001B0: 20 27 39 39 27 0D 0A 20 20 20 40 20 6C 69 67 2B '99'.. @ lig+
0001C0: 31 2C 35 30 20 73 61 79 20 27 53 41 49 53 49 45 1,50 say 'SAISIE
0001D0: 20 41 20 4C 49 47 3A 27 0D 0A 20 20 20 40 20 6C A LIG:'.. @ l
0001E0: 69 67 2B 31 2C 36 34 20 73 61 79 20 6C 73 20 70 ig+1,64 say ls p
0001F0: 69 63 74 75 72 65 20 27 39 39 27 0D 0A 20 20 20 icture '99'..
Size : 512 (Real : 512)
000000: 2C 30 0D 0A 73 74 6F 72 65 20 75 6E 69 74 2B 6D ,0..store unit+m
000010: 6E 6F 6D 63 20 74 6F 20 6D 6E 6F 6D 63 0D 0A 69 nomc to mnomc..i
000020: 66 20 70 2E 74 79 70 63 3D 27 54 27 0D 0A 20 20 f p.typc='T'..
000030: 20 2A 20 69 6E 64 65 78 20 6E 6F 6E 20 6D 69 73 * index non mis
000040: 20 61 20 6A 6F 75 72 20 61 75 74 6F 6D 61 74 69 a jour automati
000050: 71 75 65 6D 65 6E 74 0D 0A 20 20 20 73 74 6F 72 quement.. stor
000060: 65 20 27 4F 27 20 74 6F 20 6D 6F 64 69 66 0D 0A e 'O' to modif..
000070: 20 20 20 40 20 31 30 2C 30 20 73 61 79 20 27 61 @ 10,0 say 'a
000080: 76 65 7A 2D 76 6F 75 73 20 6D 6F 64 69 66 69 65 vez-vous modifie
000090: 20 76 6F 74 72 65 20 66 69 63 68 69 65 72 20 64 votre fichier d
0000A0: 65 70 75 69 73 20 6C 61 20 64 65 72 6E 69 65 72 epuis la dernier
0000B0: 65 20 6C 69 73 74 65 20 73 75 72 20 3B 0D 0A 20 e liste sur ;..
0000C0: 20 20 63 65 74 74 65 20 63 6C 65 27 0D 0A 20 20 cette cle'..
0000D0: 20 40 20 31 31 2C 30 20 73 61 79 20 27 4F 3D 6F @ 11,0 say 'O=o
0000E0: 75 69 2C 20 4E 3D 6E 6F 6E 20 3D 3D 3D 3E 27 0D ui, N=non ===>'.
0000F0: 0A 20 20 20 73 74 6F 72 65 20 27 66 27 20 74 6F . store 'f' to
000100: 20 63 6F 72 72 65 63 74 0D 0A 20 20 20 64 6F 20 correct.. do
000110: 77 68 69 6C 65 20 63 6F 72 72 65 63 74 3D 27 66 while correct='f
000120: 27 0D 0A 20 20 20 20 20 20 73 65 74 20 69 6E 74 '.. set int
000130: 65 6E 73 69 74 79 20 6F 66 66 0D 0A 20 20 20 20 ensity off..
000140: 20 20 40 20 31 31 2C 32 30 20 67 65 74 20 6D 6F @ 11,20 get mo
000150: 64 69 66 0D 0A 20 20 20 20 20 20 73 65 74 20 69 dif.. set i
000160: 6E 74 65 6E 73 69 74 79 20 6F 6E 0D 0A 20 20 20 ntensity on..
000170: 20 20 20 72 65 61 64 0D 0A 20 20 20 20 20 20 73 read.. s
000180: 74 6F 72 65 20 21 28 6D 6F 64 69 66 29 20 74 6F tore !(modif) to
000190: 20 6D 6F 64 69 66 0D 0A 20 20 20 20 20 20 64 6F modif.. do
0001A0: 20 63 61 73 65 0D 0A 20 20 20 20 20 20 63 61 73 case.. cas
0001B0: 65 20 21 28 6D 6F 64 69 66 29 3D 27 4F 27 0D 0A e !(modif)='O'..
0001C0: 20 20 20 20 20 20 73 65 6C 65 63 74 20 73 65 63 select sec
0001D0: 6F 6E 64 61 72 79 0D 0A 20 20 20 20 20 20 75 73 ondary.. us
0001E0: 65 20 26 6E 6F 6D 66 69 63 68 20 69 6E 64 65 78 e &nomfich index
0001F0: 20 26 6D 6E 6F 6D 63 0D 0A 20 20 20 20 20 20 72 &mnomc.. r
Size : 512 (Real : 512)
000000: 40 20 6C 69 67 2B 31 2C 37 30 20 73 61 79 20 27 @ lig+1,70 say '
000010: 43 4F 4C 3A 27 0D 0A 20 20 20 40 20 6C 69 67 2B COL:'.. @ lig+
000020: 31 2C 37 35 20 73 61 79 20 63 73 20 70 69 63 74 1,75 say cs pict
000030: 75 72 65 20 27 39 39 27 0D 0A 20 20 20 64 6F 20 ure '99'.. do
000040: 63 61 73 65 0D 0A 20 20 20 63 61 73 65 20 24 28 case.. case $(
000050: 76 65 72 69 66 2C 31 2C 31 29 3D 27 4E 27 0D 0A verif,1,1)='N'..
000060: 20 20 20 73 74 6F 72 65 20 27 5A 4F 4E 45 20 4E store 'ZONE N
000070: 4F 4E 20 4F 42 4C 49 47 41 54 4F 49 52 45 27 20 ON OBLIGATOIRE'
000080: 74 6F 20 6D 7A 6F 6E 31 0D 0A 20 20 20 73 74 6F to mzon1.. sto
000090: 72 65 20 27 20 27 20 74 6F 20 6D 7A 6F 6E 32 0D re ' ' to mzon2.
0000A0: 0A 20 20 20 63 61 73 65 20 24 28 76 65 72 69 66 . case $(verif
0000B0: 2C 31 2C 31 29 3D 27 4F 27 0D 0A 20 20 20 73 74 ,1,1)='O'.. st
0000C0: 6F 72 65 20 27 5A 4F 4E 45 20 4F 42 4C 49 47 41 ore 'ZONE OBLIGA
0000D0: 54 4F 49 52 45 27 20 74 6F 20 6D 7A 6F 6E 31 0D TOIRE' to mzon1.
0000E0: 0A 20 20 20 73 74 6F 72 65 20 27 20 27 20 74 6F . store ' ' to
0000F0: 20 6D 7A 6F 6E 32 0D 0A 20 20 20 63 61 73 65 20 mzon2.. case
000100: 24 28 76 65 72 69 66 2C 31 2C 31 29 3D 27 43 27 $(verif,1,1)='C'
000110: 0D 0A 20 20 20 73 74 6F 72 65 20 27 4F 42 4C 49 .. store 'OBLI
000120: 47 41 54 4F 49 52 45 20 53 49 27 20 74 6F 20 6D GATOIRE SI' to m
000130: 7A 6F 6E 31 0D 0A 20 20 20 73 74 6F 72 65 20 76 zon1.. store v
000140: 61 6C 31 20 74 6F 20 6D 7A 6F 6E 32 0D 0A 20 20 al1 to mzon2..
000150: 20 63 61 73 65 20 24 28 76 65 72 69 66 2C 31 2C case $(verif,1,
000160: 31 29 3D 27 47 27 0D 0A 20 20 20 73 74 6F 72 65 1)='G'.. store
000170: 20 27 53 55 50 45 52 49 45 55 52 20 41 27 20 74 'SUPERIEUR A' t
000180: 6F 20 6D 7A 6F 6E 31 0D 0A 20 20 20 73 74 6F 72 o mzon1.. stor
000190: 65 20 76 61 6C 31 20 74 6F 20 6D 7A 6F 6E 32 0D e val1 to mzon2.
0001A0: 0A 20 20 20 63 61 73 65 20 24 28 76 65 72 69 66 . case $(verif
0001B0: 2C 31 2C 31 29 3D 27 50 27 0D 0A 20 20 20 73 74 ,1,1)='P'.. st
0001C0: 6F 72 65 20 27 49 4E 46 45 52 49 45 55 52 20 41 ore 'INFERIEUR A
0001D0: 27 20 74 6F 20 6D 7A 6F 6E 31 0D 0A 20 20 20 73 ' to mzon1.. s
0001E0: 74 6F 72 65 20 76 61 6C 31 20 74 6F 20 6D 7A 6F tore val1 to mzo
0001F0: 6E 32 0D 0A 20 20 20 65 6E 64 63 61 73 65 0D 0A n2.. endcase..
Size : 512 (Real : 512)
000000: 2A 20 64 65 6D 63 6C 65 0D 0A 0D 0A 73 65 6C 65 * demcle....sele
000010: 63 74 20 70 72 69 6D 61 72 79 0D 0A 75 73 65 20 ct primary..use
000020: 26 66 65 6C 65 20 69 6E 64 65 78 20 26 78 65 6C &fele index &xel
000030: 65 0D 0A 40 20 37 2C 35 20 73 61 79 20 22 6E 6F e..@ 7,5 say "no
000040: 6D 20 64 65 20 6C 27 69 6E 64 65 78 22 0D 0A 73 m de l'index"..s
000050: 74 6F 72 65 20 27 66 27 20 74 6F 20 63 6F 72 72 tore 'f' to corr
000060: 65 63 74 0D 0A 64 6F 20 77 68 69 6C 65 20 63 6F ect..do while co
000070: 72 72 65 63 74 3D 27 66 27 0D 0A 20 20 20 73 74 rrect='f'.. st
000080: 6F 72 65 20 6E 6F 6D 69 6E 64 70 20 74 6F 20 6D ore nomindp to m
000090: 6E 6F 6D 63 0D 0A 20 20 20 69 66 20 63 68 6F 69 nomc.. if choi
0000A0: 78 20 3D 20 27 35 27 0D 0A 20 20 20 20 20 20 40 x = '5'.. @
0000B0: 20 6C 69 67 6D 31 2C 30 20 73 61 79 20 22 6D 65 ligm1,0 say "me
0000C0: 74 74 72 65 20 6E 6F 6D 20 69 6E 64 65 78 20 61 ttre nom index a
0000D0: 20 62 6C 61 6E 63 20 70 6F 75 72 20 61 62 61 6E blanc pour aban
0000E0: 64 6F 6E 6E 65 72 22 0D 0A 20 20 20 65 6E 64 69 donner".. endi
0000F0: 66 0D 0A 20 20 20 40 20 37 2C 33 30 20 67 65 74 f.. @ 7,30 get
000100: 20 6D 6E 6F 6D 63 0D 0A 20 20 20 72 65 61 64 0D mnomc.. read.
000110: 0A 20 20 20 73 74 6F 72 65 20 21 28 6D 6E 6F 6D . store !(mnom
000120: 63 29 20 74 6F 20 6D 6E 6F 6D 63 0D 0A 20 20 20 c) to mnomc..
000130: 69 66 20 63 68 6F 69 78 3D 27 35 27 2E 61 6E 64 if choix='5'.and
000140: 2E 6D 6E 6F 6D 63 3D 27 20 27 0D 0A 20 20 20 72 .mnomc=' '.. r
000150: 65 74 75 72 6E 0D 0A 20 20 20 65 6E 64 69 66 0D eturn.. endif.
000160: 0A 20 20 20 73 74 6F 72 65 20 27 43 27 2D 6D 6E . store 'C'-mn
000170: 6F 6D 63 20 74 6F 20 63 6C 65 0D 0A 20 20 20 66 omc to cle.. f
000180: 69 6E 64 20 26 63 6C 65 0D 0A 20 20 20 69 66 20 ind &cle.. if
000190: 23 20 3D 20 30 0D 0A 20 20 20 20 20 20 73 74 6F # = 0.. sto
0001A0: 72 65 20 31 36 20 74 6F 20 6E 6F 6D 65 73 73 0D re 16 to nomess.
0001B0: 0A 20 20 20 20 20 20 64 6F 20 61 66 66 6D 65 73 . do affmes
0001C0: 73 0D 0A 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 s.. else..
0001D0: 20 20 73 74 6F 72 65 20 27 74 27 20 74 6F 20 63 store 't' to c
0001E0: 6F 72 72 65 63 74 0D 0A 20 20 20 65 6E 64 69 66 orrect.. endif
0001F0: 0D 0A 65 6E 64 64 6F 0D 0A 40 20 6C 69 67 6D 31 ..enddo..@ ligm1
Size : 512 (Real : 512)
000000: 20 20 20 64 6F 20 63 61 73 65 0D 0A 20 20 20 63 do case.. c
000010: 61 73 65 20 24 28 76 65 72 69 66 2C 32 2C 31 29 ase $(verif,2,1)
000020: 3D 27 42 27 0D 0A 20 20 20 73 74 6F 72 65 20 27 ='B'.. store '
000030: 45 4E 54 52 45 20 42 4F 52 4E 45 53 27 20 74 6F ENTRE BORNES' to
000040: 20 6D 7A 6F 6E 33 0D 0A 20 20 20 73 74 6F 72 65 mzon3.. store
000050: 20 27 44 45 42 55 54 20 27 2B 24 28 76 61 6C 32 'DEBUT '+$(val2
000060: 2C 31 2C 31 30 29 20 74 6F 20 6D 7A 6F 6E 34 0D ,1,10) to mzon4.
000070: 0A 20 20 20 73 74 6F 72 65 20 27 46 49 4E 20 27 . store 'FIN '
000080: 2B 76 61 6C 33 20 74 6F 20 6D 7A 6F 6E 35 0D 0A +val3 to mzon5..
000090: 20 20 20 63 61 73 65 20 24 28 76 65 72 69 66 2C case $(verif,
0000A0: 32 2C 31 29 3D 27 44 27 0D 0A 20 20 20 73 74 6F 2,1)='D'.. sto
0000B0: 72 65 20 27 44 41 54 45 20 4A 4A 2F 4D 4D 2F 41 re 'DATE JJ/MM/A
0000C0: 41 27 20 74 6F 20 6D 7A 6F 6E 33 0D 0A 20 20 20 A' to mzon3..
0000D0: 73 74 6F 72 65 20 27 44 45 42 55 54 20 27 2B 24 store 'DEBUT '+$
0000E0: 28 76 61 6C 32 2C 31 2C 31 30 29 20 74 6F 20 6D (val2,1,10) to m
0000F0: 7A 6F 6E 34 0D 0A 20 20 20 73 74 6F 72 65 20 27 zon4.. store '
000100: 46 49 4E 20 27 2B 76 61 6C 33 20 74 6F 20 6D 7A FIN '+val3 to mz
000110: 6F 6E 35 0D 0A 20 20 20 63 61 73 65 20 24 28 76 on5.. case $(v
000120: 65 72 69 66 2C 32 2C 31 29 3D 27 4D 27 0D 0A 20 erif,2,1)='M'..
000130: 20 20 73 74 6F 72 65 20 27 44 41 54 45 20 4A 4A store 'DATE JJ
000140: 2F 4D 4D 27 20 74 6F 20 6D 7A 6F 6E 33 0D 0A 20 /MM' to mzon3..
000150: 20 20 73 74 6F 72 65 20 27 44 45 42 55 54 20 27 store 'DEBUT '
000160: 2B 24 28 76 61 6C 32 2C 31 2C 31 30 29 20 74 6F +$(val2,1,10) to
000170: 20 6D 7A 6F 6E 34 0D 0A 20 20 20 73 74 6F 72 65 mzon4.. store
000180: 20 27 46 49 4E 20 27 2B 76 61 6C 33 20 74 6F 20 'FIN '+val3 to
000190: 6D 7A 6F 6E 35 0D 0A 20 20 20 63 61 73 65 20 24 mzon5.. case $
0001A0: 28 76 65 72 69 66 2C 32 2C 31 29 3D 27 4C 27 0D (verif,2,1)='L'.
0001B0: 0A 20 20 20 73 74 6F 72 65 20 27 4C 49 53 54 45 . store 'LISTE
0001C0: 20 44 45 20 43 4F 44 45 53 27 20 74 6F 20 6D 7A DE CODES' to mz
0001D0: 6F 6E 33 0D 0A 20 20 20 73 74 6F 72 65 20 76 61 on3.. store va
0001E0: 6C 32 20 74 6F 20 6D 7A 6F 6E 34 0D 0A 20 20 20 l2 to mzon4..
0001F0: 73 74 6F 72 65 20 27 20 27 20 74 6F 20 6D 7A 6F store ' ' to mzo
Size : 512 (Real : 512)
000000: 2C 30 0D 0A 73 74 6F 72 65 20 75 6E 69 74 2B 6D ,0..store unit+m
000010: 6E 6F 6D 63 20 74 6F 20 6D 6E 6F 6D 63 0D 0A 69 nomc to mnomc..i
000020: 66 20 70 2E 74 79 70 63 3D 27 54 27 0D 0A 20 20 f p.typc='T'..
000030: 20 2A 20 69 6E 64 65 78 20 6E 6F 6E 20 6D 69 73 * index non mis
000040: 20 61 20 6A 6F 75 72 20 61 75 74 6F 6D 61 74 69 a jour automati
000050: 71 75 65 6D 65 6E 74 0D 0A 20 20 20 73 74 6F 72 quement.. stor
000060: 65 20 27 4F 27 20 74 6F 20 6D 6F 64 69 66 0D 0A e 'O' to modif..
000070: 20 20 20 40 20 31 30 2C 35 20 73 61 79 20 27 46 @ 10,5 say 'F
000080: 61 75 74 2D 69 6C 20 72 65 69 6E 64 65 78 65 72 aut-il reindexer
000090: 20 6C 65 20 66 69 63 68 69 65 72 20 3F 20 20 28 le fichier ? (
0000A0: 4F 3D 6F 75 69 2C 4E 3D 6E 6F 6E 29 20 20 3D 3D O=oui,N=non) ==
0000B0: 3D 3D 3E 27 0D 0A 20 20 20 73 74 6F 72 65 20 27 ==>'.. store '
0000C0: 66 27 20 74 6F 20 63 6F 72 72 65 63 74 0D 0A 20 f' to correct..
0000D0: 20 20 64 6F 20 77 68 69 6C 65 20 63 6F 72 72 65 do while corre
0000E0: 63 74 3D 27 66 27 0D 0A 20 20 20 20 20 20 73 65 ct='f'.. se
0000F0: 74 20 69 6E 74 65 6E 73 69 74 79 20 6F 66 66 0D t intensity off.
000100: 0A 20 20 20 20 20 20 40 20 31 30 2C 36 30 20 67 . @ 10,60 g
000110: 65 74 20 6D 6F 64 69 66 0D 0A 20 20 20 20 20 20 et modif..
000120: 73 65 74 20 69 6E 74 65 6E 73 69 74 79 20 6F 6E set intensity on
000130: 0D 0A 20 20 20 20 20 20 72 65 61 64 0D 0A 20 20 .. read..
000140: 20 20 20 20 73 74 6F 72 65 20 21 28 6D 6F 64 69 store !(modi
000150: 66 29 20 74 6F 20 6D 6F 64 69 66 0D 0A 20 20 20 f) to modif..
000160: 20 20 20 64 6F 20 63 61 73 65 0D 0A 20 20 20 20 do case..
000170: 20 20 63 61 73 65 20 21 28 6D 6F 64 69 66 29 3D case !(modif)=
000180: 27 4F 27 0D 0A 20 20 20 20 20 20 73 65 6C 65 63 'O'.. selec
000190: 74 20 73 65 63 6F 6E 64 61 72 79 0D 0A 20 20 20 t secondary..
0001A0: 20 20 20 75 73 65 20 26 6E 6F 6D 66 69 63 68 20 use &nomfich
0001B0: 69 6E 64 65 78 20 26 6D 6E 6F 6D 63 0D 0A 20 20 index &mnomc..
0001C0: 20 20 20 20 72 65 69 6E 64 65 78 0D 0A 20 20 20 reindex..
0001D0: 20 20 20 73 74 6F 72 65 20 27 74 27 20 74 6F 20 store 't' to
0001E0: 63 6F 72 72 65 63 74 0D 0A 20 20 20 20 20 20 63 correct.. c
0001F0: 61 73 65 20 21 28 6D 6F 64 69 66 29 23 27 4E 27 ase !(modif)#'N'
Size : 512 (Real : 512)
000000: 6C 66 69 6E 3D 27 4E 27 0D 0A 67 6F 74 6F 20 74 lfin='N'..goto t
000010: 6F 70 0D 0A 73 74 6F 72 65 20 27 20 27 20 74 6F op..store ' ' to
000020: 20 65 78 70 66 0D 0A 72 65 6C 65 61 73 65 20 63 expf..release c
000030: 6C 65 2C 6D 6E 6F 6D 63 2C 63 70 74 7A 2C 76 61 le,mnomc,cptz,va
000040: 6C 64 65 62 2C 65 78 70 64 2C 63 6C 65 31 2C 76 ldeb,expd,cle1,v
000050: 61 6C 66 69 6E 0D 0A 72 65 74 75 72 6E 0D 0A 65 alfin..return..e
000060: 6E 64 69 66 0D 0A 69 66 20 76 61 6C 64 65 62 3D ndif..if valdeb=
000070: 27 4F 27 0D 0A 20 20 20 66 69 6E 64 20 26 63 6C 'O'.. find &cl
000080: 65 31 0D 0A 20 20 20 69 66 20 23 20 3D 20 30 0D e1.. if # = 0.
000090: 0A 20 20 20 20 20 20 6C 6F 63 61 74 65 20 66 6F . locate fo
0000A0: 72 20 26 65 78 70 64 0D 0A 20 20 20 20 20 20 69 r &expd.. i
0000B0: 66 20 2E 6E 6F 74 2E 28 26 65 78 70 64 29 2E 6F f .not.(&expd).o
0000C0: 72 2E 65 6F 66 0D 0A 20 20 20 20 20 20 73 6B 69 r.eof.. ski
0000D0: 70 0D 0A 20 20 20 20 20 20 65 6E 64 69 66 0D 0A p.. endif..
0000E0: 20 20 20 65 6E 64 69 66 0D 0A 65 6C 73 65 0D 0A endif..else..
0000F0: 20 20 20 67 6F 74 6F 20 74 6F 70 0D 0A 65 6E 64 goto top..end
000100: 69 66 0D 0A 69 66 20 76 61 6C 66 69 6E 20 3D 20 if..if valfin =
000110: 27 4F 27 0D 0A 73 74 6F 72 65 20 27 20 66 6F 72 'O'..store ' for
000120: 20 27 2B 65 78 70 66 20 74 6F 20 65 78 70 66 0D '+expf to expf.
000130: 0A 65 6C 73 65 0D 0A 73 74 6F 72 65 20 27 20 27 .else..store ' '
000140: 20 74 6F 20 65 78 70 66 0D 0A 65 6E 64 69 66 0D to expf..endif.
000150: 0A 72 65 6C 65 61 73 65 20 63 6C 65 2C 6D 6E 6F .release cle,mno
000160: 6D 63 2C 63 70 74 7A 2C 76 61 6C 64 65 62 2C 65 mc,cptz,valdeb,e
000170: 78 70 64 2C 63 6C 65 31 2C 76 61 6C 66 69 6E 0D xpd,cle1,valfin.
000180: 0A 72 65 74 75 72 6E 0D 0A 0D 0A 0D 0A 0D 0A 0D .return.........
000190: 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 1A ................
0001A0: 1A 65 6E 64 69 66 0D 0A 20 20 20 72 65 6C 65 61 .endif.. relea
0001B0: 73 65 20 63 6C 65 2C 63 70 74 7A 2C 76 61 6C 64 se cle,cptz,vald
0001C0: 65 62 2C 76 61 6C 66 69 6E 2C 65 78 70 64 2C 63 eb,valfin,expd,c
0001D0: 6C 65 31 0D 0A 20 20 20 72 65 74 75 72 6E 0D 0A le1.. return..
0001E0: 65 6E 64 69 66 0D 0A 69 66 20 76 61 6C 64 65 62 endif..if valdeb
0001F0: 3D 27 4E 27 2E 61 6E 64 2E 76 61 6C 66 69 6E 3D ='N'.and.valfin=
Size : 512 (Real : 512)
000000: 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 31 20 .. store 1
000010: 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 20 20 to nomess..
000020: 20 64 6F 20 61 66 66 6D 65 73 73 0D 0A 20 20 20 do affmess..
000030: 20 20 20 6F 74 68 65 72 77 69 73 65 0D 0A 20 20 otherwise..
000040: 20 20 20 20 73 74 6F 72 65 20 27 74 27 20 74 6F store 't' to
000050: 20 63 6F 72 72 65 63 74 0D 0A 20 20 20 20 20 20 correct..
000060: 65 6E 64 63 61 73 65 0D 0A 20 20 20 65 6E 64 64 endcase.. endd
000070: 6F 0D 0A 20 20 20 72 65 6C 65 61 73 65 20 6D 6F o.. release mo
000080: 64 69 66 0D 0A 65 6E 64 69 66 0D 0A 73 65 6C 65 dif..endif..sele
000090: 63 74 20 73 65 63 6F 6E 64 61 72 79 0D 0A 75 73 ct secondary..us
0000A0: 65 20 26 66 72 65 66 20 69 6E 64 65 78 20 26 78 e &fref index &x
0000B0: 6E 6F 6D 0D 0A 69 66 20 63 68 6F 69 78 20 23 20 nom..if choix #
0000C0: 27 35 27 0D 0A 20 20 20 73 74 6F 72 65 20 31 20 '5'.. store 1
0000D0: 74 6F 20 63 70 74 7A 0D 0A 20 20 20 64 6F 20 77 to cptz.. do w
0000E0: 68 69 6C 65 20 63 70 74 7A 20 3C 3D 20 32 0D 0A hile cptz <= 2..
0000F0: 20 20 20 20 20 20 73 74 6F 72 65 20 27 66 27 20 store 'f'
000100: 74 6F 20 63 6F 72 72 65 63 74 0D 0A 20 20 20 20 to correct..
000110: 20 20 64 6F 20 77 68 69 6C 65 20 63 6F 72 72 65 do while corre
000120: 63 74 3D 27 66 27 0D 0A 20 20 20 20 20 20 20 20 ct='f'..
000130: 20 73 74 6F 72 65 20 27 4E 27 20 74 6F 20 72 65 store 'N' to re
000140: 70 0D 0A 20 20 20 20 20 20 20 20 20 65 72 61 73 p.. eras
000150: 65 0D 0A 20 20 20 20 20 20 20 20 20 69 66 20 63 e.. if c
000160: 70 74 7A 3D 31 0D 0A 20 20 20 20 20 20 20 20 20 ptz=1..
000170: 20 20 20 40 20 31 30 2C 30 20 73 61 79 20 27 76 @ 10,0 say 'v
000180: 6F 75 6C 65 7A 2D 76 6F 75 73 20 64 6F 6E 6E 65 oulez-vous donne
000190: 72 20 75 6E 65 20 76 61 6C 65 75 72 20 64 65 62 r une valeur deb
0001A0: 75 74 20 64 65 20 6C 69 73 74 65 20 27 3B 0D 0A ut de liste ';..
0001B0: 20 20 20 20 20 20 20 20 20 20 20 20 2B 27 28 4F +'(O
0001C0: 3D 6F 75 69 2C 4E 3D 6E 6F 6E 29 20 3D 3D 3D 3D =oui,N=non) ====
0001D0: 3E 27 0D 0A 20 20 20 20 20 20 20 20 20 65 6C 73 >'.. els
0001E0: 65 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 40 e.. @
0001F0: 20 31 30 2C 30 20 73 61 79 20 27 76 6F 75 6C 65 10,0 say 'voule
Size : 512 (Real : 512)
000000: 65 20 31 35 20 6C 69 73 74 65 73 20 63 72 65 65 e 15 listes cree
000010: 65 73 2E 20 66 61 69 74 65 73 20 6C 65 20 6D 65 es. faites le me
000020: 6E 61 67 65 22 20 74 6F 20 6D 65 73 73 0D 0A 63 nage" to mess..c
000030: 61 73 65 20 6E 6F 6D 65 73 73 20 3D 20 36 0D 0A ase nomess = 6..
000040: 73 74 6F 72 65 20 22 63 65 74 74 65 20 6C 69 73 store "cette lis
000050: 74 65 20 65 78 69 73 74 65 20 64 65 6A 61 22 20 te existe deja"
000060: 74 6F 20 6D 65 73 73 0D 0A 63 61 73 65 20 6E 6F to mess..case no
000070: 6D 65 73 73 20 3D 20 37 0D 0A 73 74 6F 72 65 20 mess = 7..store
000080: 22 63 65 74 74 65 20 6C 69 73 74 65 20 6E 27 65 "cette liste n'e
000090: 78 69 73 74 65 20 70 61 73 22 20 74 6F 20 6D 65 xiste pas" to me
0000A0: 73 73 0D 0A 63 61 73 65 20 6E 6F 6D 65 73 73 20 ss..case nomess
0000B0: 3D 20 38 0D 0A 73 74 6F 72 65 20 22 72 65 70 6F = 8..store "repo
0000C0: 6E 73 65 20 69 6E 63 6F 72 72 65 63 74 65 20 2D nse incorrecte -
0000D0: 20 73 65 75 6C 65 73 20 72 65 70 6F 6E 73 65 73 seules reponses
0000E0: 20 61 64 6D 69 73 65 73 3A 20 4F 20 6F 75 20 4E admises: O ou N
0000F0: 22 20 74 6F 20 6D 65 73 73 0D 0A 63 61 73 65 20 " to mess..case
000100: 6E 6F 6D 65 73 73 20 3D 20 39 0D 0A 73 74 6F 72 nomess = 9..stor
000110: 65 20 22 69 6C 20 79 20 61 20 70 6C 75 73 20 64 e "il y a plus d
000120: 65 20 31 35 20 63 6C 65 73 20 63 72 65 65 65 73 e 15 cles creees
000130: 20 2E 20 66 61 69 74 65 73 20 6C 65 20 6D 65 6E . faites le men
000140: 61 67 65 22 20 74 6F 20 6D 65 73 73 0D 0A 63 61 age" to mess..ca
000150: 73 65 20 6E 6F 6D 65 73 73 20 3D 20 31 30 0D 0A se nomess = 10..
000160: 73 74 6F 72 65 20 22 63 65 74 74 65 20 63 6C 65 store "cette cle
000170: 20 65 78 69 73 74 65 20 64 65 6A 61 22 20 74 6F existe deja" to
000180: 20 6D 65 73 73 0D 0A 63 61 73 65 20 6E 6F 6D 65 mess..case nome
000190: 73 73 20 3D 20 31 31 0D 0A 73 74 6F 72 65 20 22 ss = 11..store "
0001A0: 6C 61 20 70 72 65 6D 69 65 72 65 20 7A 6F 6E 65 la premiere zone
0001B0: 20 64 6F 69 74 20 6F 62 6C 69 67 61 74 6F 69 72 doit obligatoir
0001C0: 65 6D 65 6E 74 20 65 74 72 65 20 72 65 6E 73 65 ement etre rense
0001D0: 69 67 6E 65 65 22 20 74 6F 20 6D 65 73 73 0D 0A ignee" to mess..
0001E0: 63 61 73 65 20 6E 6F 6D 65 73 73 20 3D 20 31 32 case nomess = 12
0001F0: 0D 0A 73 74 6F 72 65 20 22 6C 61 20 7A 6F 6E 65 ..store "la zone
Size : 512 (Real : 512)
000000: 7A 2D 76 6F 75 73 20 64 6F 6E 6E 65 72 20 75 6E z-vous donner un
000010: 65 20 76 61 6C 65 75 72 20 66 69 6E 20 64 65 20 e valeur fin de
000020: 6C 69 73 74 65 20 27 3B 0D 0A 20 20 20 20 20 20 liste ';..
000030: 20 20 20 20 20 20 2B 27 28 4F 3D 6F 75 69 2C 4E +'(O=oui,N
000040: 3D 6E 6F 6E 29 20 3D 3D 3D 3D 3E 27 0D 0A 20 20 =non) ====>'..
000050: 20 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 endif..
000060: 20 20 20 20 20 20 20 40 20 31 30 2C 37 35 20 67 @ 10,75 g
000070: 65 74 20 72 65 70 0D 0A 20 20 20 20 20 20 20 20 et rep..
000080: 20 72 65 61 64 0D 0A 20 20 20 20 20 20 20 20 20 read..
000090: 73 74 6F 72 65 20 21 28 72 65 70 29 20 74 6F 20 store !(rep) to
0000A0: 72 65 70 0D 0A 20 20 20 20 20 20 20 20 20 69 66 rep.. if
0000B0: 20 72 65 70 23 27 4F 27 2E 61 6E 64 2E 72 65 70 rep#'O'.and.rep
0000C0: 23 27 4E 27 0D 0A 20 20 20 20 20 20 20 20 20 20 #'N'..
0000D0: 20 20 73 74 6F 72 65 20 31 20 74 6F 20 6E 6F 6D store 1 to nom
0000E0: 65 73 73 0D 0A 20 20 20 20 20 20 20 20 20 20 20 ess..
0000F0: 20 64 6F 20 61 66 66 6D 65 73 73 0D 0A 20 20 20 do affmess..
000100: 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 else..
000110: 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 27 74 store 't
000120: 27 20 74 6F 20 63 6F 72 72 65 63 74 0D 0A 20 20 ' to correct..
000130: 20 20 20 20 20 20 20 20 20 20 69 66 20 63 70 74 if cpt
000140: 7A 3D 31 0D 0A 20 20 20 20 20 20 20 20 20 20 20 z=1..
000150: 20 73 74 6F 72 65 20 72 65 70 20 74 6F 20 76 61 store rep to va
000160: 6C 64 65 62 0D 0A 20 20 20 20 20 20 20 20 20 20 ldeb..
000170: 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 else..
000180: 20 20 20 20 73 74 6F 72 65 20 72 65 70 20 74 6F store rep to
000190: 20 76 61 6C 66 69 6E 0D 0A 20 20 20 20 20 20 20 valfin..
0001A0: 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 endif..
0001B0: 20 20 20 20 20 20 20 20 69 66 20 72 65 70 3D 27 if rep='
0001C0: 4F 27 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 O'..
0001D0: 20 20 20 64 6F 20 64 65 6D 7A 6F 6E 65 0D 0A 20 do demzone..
0001E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 66 if
0001F0: 20 63 70 74 7A 3D 31 0D 0A 20 20 20 20 20 20 20 cptz=1..
Size : 512 (Real : 512)
000000: 02 00 00 00 00 00 7A 00 54 59 50 45 4C 45 4D 00 ......z.TYPELEM.
000010: 00 00 00 43 01 B9 70 00 4E 4F 4D 45 4C 45 4D 00 ...C..p.NOMELEM.
000020: 00 00 00 43 08 BA 70 00 4C 49 42 45 4C 45 4D 00 ...C..p.LIBELEM.
000030: 00 00 00 43 1E C2 70 00 4E 42 5A 4F 4E 45 53 00 ...C..p.NBZONES.
000040: 00 00 00 4E 01 E0 70 00 5A 4F 4E 31 00 00 00 00 ...N..p.ZON1....
000050: 00 00 00 43 0A E1 70 00 44 45 42 31 00 00 00 00 ...C..p.DEB1....
000060: 00 00 00 43 03 EB 70 00 46 49 4E 31 00 00 00 00 ...C..p.FIN1....
000070: 00 00 00 43 03 EE 70 00 5A 4F 4E 32 00 00 00 00 ...C..p.ZON2....
000080: 00 00 00 43 0A F1 70 00 44 45 42 32 00 00 00 00 ...C..p.DEB2....
000090: 00 00 00 43 03 FB 70 00 46 49 4E 32 00 00 00 00 ...C..p.FIN2....
0000A0: 00 00 00 43 03 FE 70 00 5A 4F 4E 33 00 00 00 00 ...C..p.ZON3....
0000B0: 00 00 00 43 0A 01 71 00 44 45 42 33 00 00 00 00 ...C..q.DEB3....
0000C0: 00 00 00 43 03 0B 71 00 46 49 4E 33 00 00 00 00 ...C..q.FIN3....
0000D0: 00 00 00 43 03 0E 71 00 5A 4F 4E 34 00 00 00 00 ...C..q.ZON4....
0000E0: 00 00 00 43 0A 11 71 00 44 45 42 34 00 00 00 00 ...C..q.DEB4....
0000F0: 00 00 00 43 03 1B 71 00 46 49 4E 34 00 00 00 00 ...C..q.FIN4....
000100: 00 00 00 43 03 1E 71 00 5A 4F 4E 35 00 00 00 00 ...C..q.ZON5....
000110: 00 00 00 43 0A 21 71 00 44 45 42 35 00 00 00 00 ...C.!q.DEB5....
000120: 00 00 00 43 03 2B 71 00 46 49 4E 35 00 00 00 00 ...C.+q.FIN5....
000130: 00 00 00 43 03 2E 71 00 54 59 50 43 00 00 00 00 ...C..q.TYPC....
000140: 00 00 00 43 01 31 71 00 0D 00 00 00 00 00 00 00 ...C.1q.........
000150: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
Size : 512 (Real : 512)
000000: 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 63 6C store cl
000010: 65 20 74 6F 20 63 6C 65 31 0D 0A 20 20 20 20 20 e to cle1..
000020: 20 20 20 20 20 20 20 20 20 20 65 6E 64 69 66 0D endif.
000030: 0A 20 20 20 20 20 20 20 20 20 20 20 20 65 6E 64 . end
000040: 69 66 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 if..
000050: 69 66 20 63 70 74 7A 3D 32 0D 0A 20 20 20 20 20 if cptz=2..
000060: 20 20 20 20 20 20 20 20 20 20 69 66 20 76 61 6C if val
000070: 64 65 62 3D 27 4F 27 2E 61 6E 64 2E 76 61 6C 66 deb='O'.and.valf
000080: 69 6E 3D 27 4F 27 0D 0A 20 20 20 20 20 20 20 20 in='O'..
000090: 20 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 store
0000A0: 30 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 0 to nomess..
0000B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 i
0000C0: 66 20 66 69 65 6C 64 3A 74 79 70 65 3D 27 4E 27 f field:type='N'
0000D0: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
0000E0: 20 20 20 20 20 20 20 69 66 20 26 63 6C 65 20 3C if &cle <
0000F0: 20 26 63 6C 65 31 0D 0A 20 20 20 20 20 20 20 20 &cle1..
000100: 20 20 20 20 20 20 20 20 20 20 20 20 20 73 74 6F sto
000110: 72 65 20 32 39 20 74 6F 20 6E 6F 6D 65 73 73 0D re 29 to nomess.
000120: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
000130: 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 endif..
000140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 e
000150: 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20 20 20 lse..
000160: 20 20 20 20 20 20 20 20 20 20 69 66 20 63 6C 65 if cle
000170: 20 3C 20 63 6C 65 31 0D 0A 20 20 20 20 20 20 20 < cle1..
000180: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 74 st
000190: 6F 72 65 20 32 39 20 74 6F 20 6E 6F 6D 65 73 73 ore 29 to nomess
0001A0: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
0001B0: 20 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 endif..
0001C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0001D0: 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 20 20 20 endif..
0001E0: 20 20 20 20 20 20 20 20 20 69 66 20 6E 6F 6D 65 if nome
0001F0: 73 73 20 23 20 30 0D 0A 20 20 20 20 20 20 20 20 ss # 0..
Size : 512 (Real : 512)
000000: 00 00 00 00 00 00 00 00 00 1A 0D 0A 2A 20 6C 61 ............* la
000010: 20 7A 6F 6E 65 20 65 73 74 2D 65 6C 6C 65 20 61 zone est-elle a
000020: 6C 70 68 61 62 65 74 69 71 75 65 0D 0A 63 61 73 lphabetique..cas
000030: 65 20 74 79 70 65 20 23 20 27 43 27 0D 0A 73 74 e type # 'C'..st
000040: 6F 72 65 20 31 33 20 74 6F 20 6E 6F 6D 65 73 73 ore 13 to nomess
000050: 0D 0A 64 6F 20 61 66 66 6D 65 73 73 0D 0A 2A 20 ..do affmess..*
000060: 70 6F 73 69 74 69 6F 6E 20 64 65 20 64 65 62 75 position de debu
000070: 74 20 63 6F 72 72 65 63 74 65 20 3F 0D 0A 63 61 t correcte ?..ca
000080: 73 65 20 76 61 6C 28 26 6D 64 65 62 29 20 3D 20 se val(&mdeb) =
000090: 30 2E 6F 72 2E 76 61 6C 28 26 6D 64 65 62 29 3E 0.or.val(&mdeb)>
0000A0: 6C 6F 6E 0D 0A 73 74 6F 72 65 20 31 34 20 74 6F lon..store 14 to
0000B0: 20 6E 6F 6D 65 73 73 0D 0A 64 6F 20 61 66 66 6D nomess..do affm
0000C0: 65 73 73 0D 0A 2A 20 70 6F 73 69 74 69 6F 6E 20 ess..* position
0000D0: 66 69 6E 20 63 6F 72 72 65 63 74 65 20 3F 0D 0A fin correcte ?..
0000E0: 63 61 73 65 20 21 28 26 6D 66 69 6E 29 23 27 46 case !(&mfin)#'F
0000F0: 27 2E 61 6E 64 2E 28 76 61 6C 28 26 6D 66 69 6E '.and.(val(&mfin
000100: 29 3C 76 61 6C 28 26 6D 64 65 62 29 2E 6F 72 2E )<val(&mdeb).or.
000110: 76 61 6C 28 26 6D 66 69 6E 29 3E 6C 6F 6E 29 0D val(&mfin)>lon).
000120: 0A 73 74 6F 72 65 20 31 35 20 74 6F 20 6E 6F 6D .store 15 to nom
000130: 65 73 73 0D 0A 64 6F 20 61 66 66 6D 65 73 73 0D ess..do affmess.
000140: 0A 6F 74 68 65 72 77 69 73 65 0D 0A 73 74 6F 72 .otherwise..stor
000150: 65 20 27 6C 6F 6E 67 27 2D 73 74 72 28 63 70 74 e 'long'-str(cpt
000160: 69 2C 31 29 20 74 6F 20 6C 6C 6F 6E 67 0D 0A 73 i,1) to llong..s
000170: 74 6F 72 65 20 6C 6F 6E 20 74 6F 20 26 6C 6C 6F tore lon to &llo
000180: 6E 67 0D 0A 73 74 6F 72 65 20 63 70 74 69 2B 31 ng..store cpti+1
000190: 20 74 6F 20 63 70 74 69 0D 0A 73 74 6F 72 65 20 to cpti..store
0001A0: 6C 69 67 69 2B 31 20 74 6F 20 6C 69 67 69 0D 0A ligi+1 to ligi..
0001B0: 65 6E 64 63 61 73 65 0D 0A 65 6E 64 64 6F 0D 0A endcase..enddo..
0001C0: 73 74 6F 72 65 20 63 70 74 69 2D 31 20 74 6F 20 store cpti-1 to
0001D0: 63 70 74 69 6D 61 78 0D 0A 73 65 6C 65 63 74 20 cptimax..select
0001E0: 70 72 69 6D 61 72 79 0D 0A 75 73 65 20 26 66 65 primary..use &fe
0001F0: 6C 65 20 69 6E 64 65 78 20 26 78 65 6C 65 0D 0A le index &xele..
Size : 512 (Real : 512)
000000: 20 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 store
000010: 30 20 74 6F 20 63 70 74 7A 0D 0A 20 20 20 20 20 0 to cptz..
000020: 20 20 20 20 20 20 20 20 20 20 20 20 20 64 6F 20 do
000030: 61 66 66 6D 65 73 73 0D 0A 20 20 20 20 20 20 20 affmess..
000040: 20 20 20 20 20 20 20 20 20 20 20 65 6E 64 69 66 endif
000050: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
000060: 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 20 20 endif..
000070: 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 endif..
000080: 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 endif..
000090: 20 65 6E 64 64 6F 0D 0A 20 20 20 20 20 20 73 74 enddo.. st
0000A0: 6F 72 65 20 63 70 74 7A 2B 31 20 74 6F 20 63 70 ore cptz+1 to cp
0000B0: 74 7A 0D 0A 20 20 20 65 6E 64 64 6F 0D 0A 20 20 tz.. enddo..
0000C0: 20 72 65 6C 65 61 73 65 20 72 65 70 0D 0A 65 6C release rep..el
0000D0: 73 65 0D 0A 20 20 20 73 74 6F 72 65 20 31 20 74 se.. store 1 t
0000E0: 6F 20 63 70 74 7A 0D 0A 20 20 20 64 6F 20 64 65 o cptz.. do de
0000F0: 6D 7A 6F 6E 65 0D 0A 65 6E 64 69 66 0D 0A 73 65 mzone..endif..se
000100: 6C 65 63 74 20 73 65 63 6F 6E 64 61 72 79 0D 0A lect secondary..
000110: 75 73 65 20 26 6E 6F 6D 66 69 63 68 20 69 6E 64 use &nomfich ind
000120: 65 78 20 26 6D 6E 6F 6D 63 0D 0A 69 66 20 63 68 ex &mnomc..if ch
000130: 6F 69 78 3D 27 35 27 0D 0A 20 20 20 66 69 6E 64 oix='5'.. find
000140: 20 26 63 6C 65 0D 0A 20 20 20 69 66 20 23 20 3D &cle.. if # =
000150: 20 30 0D 0A 20 20 20 20 20 20 6C 6F 63 61 74 65 0.. locate
000160: 20 66 6F 72 20 26 65 78 70 64 0D 0A 20 20 20 20 for &expd..
000170: 20 20 69 66 20 2E 6E 6F 74 2E 28 26 65 78 70 64 if .not.(&expd
000180: 29 2E 6F 72 2E 65 6F 66 0D 0A 20 20 20 20 20 20 ).or.eof..
000190: 73 6B 69 70 0D 0A 20 20 20 20 20 20 65 6E 64 69 skip.. endi
0001A0: 66 0D 0A 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 f.. endif..
0001B0: 72 65 6C 65 61 73 65 20 63 6C 65 2C 63 70 74 7A release cle,cptz
0001C0: 2C 76 61 6C 64 65 62 2C 76 61 6C 66 69 6E 2C 65 ,valdeb,valfin,e
0001D0: 78 70 64 2C 63 6C 65 31 0D 0A 20 20 20 72 65 74 xpd,cle1.. ret
0001E0: 75 72 6E 0D 0A 65 6E 64 69 66 0D 0A 69 66 20 76 urn..endif..if v
0001F0: 61 6C 64 65 62 3D 27 4E 27 2E 61 6E 64 2E 76 61 aldeb='N'.and.va
Size : 512 (Real : 512)
000000: 02 02 00 02 0C 56 46 00 4E 4F 4D 46 00 00 00 00 .....VF.NOMF....
000010: 00 00 00 43 08 B9 70 00 49 4E 54 49 54 46 00 00 ...C..p.INTITF..
000020: 00 00 00 43 1E C1 70 00 54 49 54 52 45 46 00 00 ...C..p.TITREF..
000030: 00 00 00 43 1E DF 70 00 55 54 49 4C 49 53 45 00 ...C..p.UTILISE.
000040: 00 00 00 43 01 FD 70 00 0D 00 00 00 00 00 00 00 ...C..p.........
000050: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000080: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000090: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000100: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000110: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000120: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000140: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000150: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
Size : 512 (Real : 512)
000000: 00 00 00 00 00 00 00 00 00 1A 6E 6F 63 6C 61 73 ..........noclas
000010: 73 65 20 20 20 33 20 35 4E 4F 20 43 4C 41 53 53 se 3 5NO CLASS
000020: 45 20 20 20 20 20 20 20 20 20 20 20 20 33 32 35 E 325
000030: 20 43 20 20 33 20 20 30 78 20 6E 6F 6D 20 20 20 C 3 0x nom
000040: 20 20 20 20 20 34 20 35 4E 4F 4D 20 45 4C 45 56 4 5NOM ELEV
000050: 45 20 20 20 20 20 20 20 20 20 20 20 20 34 32 35 E 425
000060: 20 43 20 32 30 20 20 30 78 20 50 52 45 4E 4F 4D C 20 0x PRENOM
000070: 20 20 20 20 20 36 20 35 50 52 45 4E 4F 4D 20 45 6 5PRENOM E
000080: 4C 45 56 45 20 20 20 20 20 20 20 20 20 36 32 35 LEVE 625
000090: 20 43 20 32 30 20 20 30 20 20 41 42 53 20 20 20 C 20 0 ABS
0000A0: 20 20 20 20 31 30 20 35 41 42 53 45 4E 54 20 20 10 5ABSENT
0000B0: 20 20 20 20 20 20 20 20 20 20 20 20 31 32 20 35 12 5
0000C0: 20 43 20 20 31 20 20 30 20 20 65 78 63 20 20 20 C 1 0 exc
0000D0: 20 20 20 20 31 35 20 35 65 78 63 75 73 65 20 20 15 5excuse
0000E0: 20 20 20 20 20 20 20 20 20 20 20 20 31 35 32 30 1520
0000F0: 20 43 20 20 31 20 20 30 20 1A 20 20 30 20 1A 20 C 1 0 . 0 .
000100: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1A .
000130: 20 20 20 20 20 20 20 3D 3D 3D 3D 3E 20 35 27 0D ====> 5'.
000140: 0A 40 20 31 32 2C 31 30 20 73 61 79 20 27 69 6D .@ 12,10 say 'im
000150: 70 72 65 73 73 69 6F 6E 20 20 20 20 20 20 20 20 pression
000160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000170: 3D 3D 3D 3D 3E 20 36 27 0D 0A 40 20 31 33 2C 31 ====> 6'..@ 13,1
000180: 30 20 73 61 79 20 27 67 65 73 74 69 6F 6E 20 64 0 say 'gestion d
000190: 65 73 20 63 6C 65 73 20 64 65 20 72 65 63 68 65 es cles de reche
0001A0: 72 63 68 65 20 20 20 20 20 3D 3D 3D 3D 3E 20 37 rche ====> 7
0001B0: 27 0D 0A 40 20 31 34 2C 31 30 20 73 61 79 20 27 '..@ 14,10 say '
0001C0: 66 69 6E 20 61 70 70 6C 69 63 61 74 69 6F 6E 20 fin application
0001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0001E0: 20 20 3D 3D 3D 3D 3E 20 38 27 0D 0A 40 20 31 37 ====> 8'..@ 17
0001F0: 2C 34 35 20 53 41 59 20 22 2B 2D 2D 2D 2D 2D 2D ,45 SAY "+------
Size : 512 (Real : 512)
000000: 00 00 00 00 00 00 00 00 00 20 31 20 20 20 20 20 ......... 1
000010: 20 20 30 32 2F 31 32 2F 38 36 61 3A 36 31 32 38 02/12/86a:6128
000020: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000050: 50 52 4F 53 50 45 43 54 45 58 45 4D 50 4C 45 20 PROSPECTEXEMPLE
000060: 44 27 41 50 50 4C 49 43 41 54 49 4F 4E 20 4E 4F D'APPLICATION NO
000070: 20 31 20 20 20 20 47 45 53 54 49 4F 4E 20 43 4F 1 GESTION CO
000080: 4D 4D 45 52 43 49 41 4C 45 20 4E 4F 20 31 20 20 MMERCIALE NO 1
000090: 20 20 20 20 20 1A 54 4F 54 4F 20 20 20 20 54 4F .TOTO TO
0000A0: 54 4F 20 4C 49 42 45 52 45 20 20 20 20 20 20 20 TO LIBERE
0000B0: 20 20 20 20 20 20 20 20 20 20 20 20 54 4F 54 4F TOTO
0000C0: 20 4C 49 42 52 45 20 20 20 20 20 20 20 20 20 20 LIBRE
0000D0: 20 20 20 20 20 20 20 20 20 20 20 20 50 52 4F 53 PROS
0000E0: 50 45 43 54 45 58 45 4D 50 4C 45 20 44 27 41 50 PECTEXEMPLE D'AP
0000F0: 50 4C 49 43 41 54 49 4F 4E 20 4E 4F 20 31 20 20 PLICATION NO 1
000100: 20 20 47 45 53 54 49 4F 4E 20 43 4F 4D 4D 45 52 GESTION COMMER
000110: 43 49 41 4C 45 20 4E 4F 20 31 20 20 20 20 20 20 CIALE NO 1
000120: 20 2A 55 4C 54 20 20 20 20 20 20 20 20 20 20 20 *ULT
000130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000140: 20 20 20 20 20 20 20 20 75 6C 74 20 20 20 20 20 ult
000150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000160: 20 20 20 20 20 20 20 1A 47 49 47 49 20 20 20 20 .GIGI
000170: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000180: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 49 GI
000190: 47 49 20 20 20 20 20 20 20 20 20 20 20 20 20 20 GI
0001A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 47 4F *GO
0001B0: 47 4F 20 20 20 20 20 20 20 20 20 20 20 20 20 20 GO
0001C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0001D0: 20 20 20 20 47 4F 47 4F 20 20 20 20 20 20 20 20 GOGO
0001E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0001F0: 20 20 20 2A 4C 4F 4E 47 20 20 20 20 20 20 20 20 *LONG
Size : 512 (Real : 512)
000000: 2A 20 76 65 72 7A 6F 6E 65 3A 20 20 64 65 66 69 * verzone: defi
000010: 6E 69 74 69 6F 6E 20 64 65 73 20 6F 70 74 69 6F nition des optio
000020: 6E 73 20 64 65 20 63 6F 6E 74 72 6F 6C 65 20 64 ns de controle d
000030: 27 75 6E 65 20 7A 6F 6E 65 0D 0A 0D 0A 2A 20 64 'une zone....* d
000040: 65 6D 61 6E 64 65 72 20 6C 65 73 20 76 65 72 69 emander les veri
000050: 66 69 63 61 74 69 6F 6E 73 20 61 20 66 61 69 72 fications a fair
000060: 65 0D 0A 65 72 61 73 65 0D 0A 73 74 6F 72 65 20 e..erase..store
000070: 27 66 27 20 74 6F 20 63 6F 72 72 65 63 74 0D 0A 'f' to correct..
000080: 40 20 31 2C 32 36 20 73 61 79 20 27 56 45 52 49 @ 1,26 say 'VERI
000090: 46 49 43 41 54 49 4F 4E 53 20 41 20 46 41 49 52 FICATIONS A FAIR
0000A0: 45 20 53 55 52 20 43 45 54 54 45 20 5A 4F 4E 45 E SUR CETTE ZONE
0000B0: 27 0D 0A 40 20 33 2C 35 20 73 61 79 20 27 63 6F '..@ 3,5 say 'co
0000C0: 6D 6D 65 6E 74 20 6C 61 20 7A 6F 6E 65 20 64 6F mment la zone do
0000D0: 69 74 2D 65 6C 6C 65 20 65 74 72 65 20 72 65 6D it-elle etre rem
0000E0: 70 6C 69 65 20 3F 27 0D 0A 40 20 35 2C 35 20 73 plie ?'..@ 5,5 s
0000F0: 61 79 20 22 6C 61 20 7A 6F 6E 65 20 70 65 75 74 ay "la zone peut
000100: 20 6E 65 20 70 61 73 20 65 74 72 65 20 72 65 6D ne pas etre rem
000110: 70 6C 69 65 20 20 20 20 20 20 20 20 20 20 20 20 plie
000120: 20 20 3D 3D 3D 3D 3E 20 4E 22 0D 0A 40 20 36 2C ====> N"..@ 6,
000130: 35 20 73 61 79 20 22 6C 61 20 7A 6F 6E 65 20 64 5 say "la zone d
000140: 6F 69 74 20 65 74 72 65 20 6F 62 6C 69 67 61 74 oit etre obligat
000150: 6F 69 72 65 6D 65 6E 74 20 72 65 6E 73 65 69 67 oirement renseig
000160: 6E 65 65 20 20 3D 3D 3D 3D 3E 20 4F 22 0D 0A 40 nee ====> O"..@
000170: 20 37 2C 35 20 73 61 79 20 22 6C 61 20 7A 6F 6E 7,5 say "la zon
000180: 65 20 64 6F 69 74 20 65 74 72 65 20 72 65 6E 73 e doit etre rens
000190: 65 69 67 6E 65 65 20 73 69 20 75 6E 65 20 61 75 eignee si une au
0001A0: 74 72 65 20 20 20 20 20 20 20 20 20 20 20 20 22 tre "
0001B0: 0D 0A 40 20 38 2C 35 20 73 61 79 20 22 7A 6F 6E ..@ 8,5 say "zon
0001C0: 65 20 65 73 74 20 72 65 6E 73 65 69 67 6E 65 65 e est renseignee
0001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0001E0: 20 20 20 20 20 20 20 20 20 20 20 3D 3D 3D 3D 3E ====>
0001F0: 20 43 22 0D 0A 69 66 20 6D 74 79 70 65 20 23 20 C"..if mtype #
Size : 512 (Real : 512)
000000: 6C 65 20 63 6F 72 72 65 63 74 3D 27 66 27 0D 0A le correct='f'..
000010: 20 20 20 20 20 20 40 20 35 2C 36 30 20 67 65 74 @ 5,60 get
000020: 20 75 6E 69 74 0D 0A 20 20 20 20 20 20 72 65 61 unit.. rea
000030: 64 0D 0A 20 20 20 20 20 20 63 6C 65 61 72 20 67 d.. clear g
000040: 65 74 0D 0A 20 20 20 20 20 20 69 66 20 21 28 75 et.. if !(u
000050: 6E 69 74 29 23 27 41 3A 27 2E 61 6E 64 2E 21 28 nit)#'A:'.and.!(
000060: 75 6E 69 74 29 23 27 42 3A 27 2E 61 6E 64 2E 21 unit)#'B:'.and.!
000070: 28 75 6E 69 74 29 23 27 4D 3A 27 2E 6F 72 2E 21 (unit)#'M:'.or.!
000080: 28 75 6E 69 74 29 3D 27 4D 27 2E 61 6E 64 2E 3B (unit)='M'.and.;
000090: 0D 0A 20 20 20 20 20 20 6C 69 67 6D 31 3D 32 30 .. ligm1=20
0000A0: 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 .. store
0000B0: 20 31 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 1 to nomess..
0000C0: 20 20 20 20 20 20 20 64 6F 20 61 66 66 6D 65 73 do affmes
0000D0: 73 0D 0A 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 s.. else..
0000E0: 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 27 74 store 't
0000F0: 27 20 74 6F 20 63 6F 72 72 65 63 74 0D 0A 20 20 ' to correct..
000100: 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 65 6E endif.. en
000110: 64 64 6F 0D 0A 20 20 20 75 73 65 20 67 65 73 74 ddo.. use gest
000120: 66 69 63 68 0D 0A 20 20 20 67 6F 74 6F 20 74 6F fich.. goto to
000130: 70 0D 0A 20 20 20 73 74 6F 72 65 20 69 6E 74 69 p.. store inti
000140: 74 66 20 74 6F 20 6D 69 6E 74 69 74 66 0D 0A 20 tf to mintitf..
000150: 20 20 73 74 6F 72 65 20 24 28 6D 69 6E 74 69 74 store $(mintit
000160: 66 2C 31 2C 38 29 2D 75 6E 69 74 2D 24 28 6D 69 f,1,8)-unit-$(mi
000170: 6E 74 69 74 66 2C 31 31 2C 34 29 20 74 6F 20 6D ntitf,11,4) to m
000180: 69 6E 74 69 74 66 0D 0A 20 20 20 72 65 70 6C 61 intitf.. repla
000190: 63 65 20 69 6E 74 69 74 66 20 77 69 74 68 20 6D ce intitf with m
0001A0: 69 6E 74 69 74 66 0D 0A 20 20 20 72 65 6C 65 61 intitf.. relea
0001B0: 73 65 20 6D 69 6E 74 69 74 66 2C 63 6F 72 72 65 se mintitf,corre
0001C0: 63 74 0D 0A 20 20 20 63 61 73 65 20 21 28 72 65 ct.. case !(re
0001D0: 70 29 20 3D 20 27 46 27 0D 0A 20 20 20 69 66 20 p) = 'F'.. if
0001E0: 21 28 75 6E 69 74 29 3D 27 4D 3A 27 0D 0A 20 20 !(unit)='M:'..
0001F0: 20 20 20 20 3F 0D 0A 20 20 20 20 20 20 3F 0D 0A ?.. ?..
Size : 512 (Real : 512)
000000: 27 4C 27 0D 0A 40 20 39 2C 35 20 73 61 79 20 22 'L'..@ 9,5 say "
000010: 6C 61 20 7A 6F 6E 65 20 64 6F 69 74 20 65 74 72 la zone doit etr
000020: 65 20 70 6C 75 73 20 67 72 61 6E 64 65 20 6F 75 e plus grande ou
000030: 20 65 67 61 6C 65 20 61 20 20 20 20 20 20 20 20 egale a
000040: 20 20 20 20 20 22 0D 0A 40 20 31 30 2C 35 20 73 "..@ 10,5 s
000050: 61 79 20 22 75 6E 65 20 61 75 74 72 65 20 7A 6F ay "une autre zo
000060: 6E 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ne
000070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000080: 20 20 3D 3D 3D 3D 3E 20 47 22 0D 0A 40 20 31 31 ====> G"..@ 11
000090: 2C 35 20 73 61 79 20 22 6C 61 20 7A 6F 6E 65 20 ,5 say "la zone
0000A0: 64 6F 69 74 20 65 74 72 65 20 70 6C 75 73 20 70 doit etre plus p
0000B0: 65 74 69 74 65 20 6F 75 20 65 67 61 6C 65 20 61 etite ou egale a
0000C0: 20 20 20 20 20 20 20 20 20 20 20 20 22 0D 0A 40 "..@
0000D0: 20 31 32 2C 35 20 73 61 79 20 22 75 6E 65 20 61 12,5 say "une a
0000E0: 75 74 72 65 20 7A 6F 6E 65 20 20 20 20 20 20 20 utre zone
0000F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000100: 20 20 20 20 20 20 20 20 20 3D 3D 3D 3D 3E 20 50 ====> P
000110: 22 0D 0A 65 6E 64 69 66 0D 0A 64 6F 20 77 68 69 "..endif..do whi
000120: 6C 65 20 63 6F 72 72 65 63 74 3D 27 66 27 0D 0A le correct='f'..
000130: 20 20 20 73 74 6F 72 65 20 27 4E 27 20 74 6F 20 store 'N' to
000140: 72 65 70 0D 0A 20 20 20 40 20 31 35 2C 35 20 73 rep.. @ 15,5 s
000150: 61 79 20 22 72 65 70 6F 6E 73 65 20 3D 3D 3D 3D ay "reponse ====
000160: 3E 22 0D 0A 20 20 20 73 65 74 20 69 6E 74 65 6E >".. set inten
000170: 73 69 74 79 20 6F 66 66 0D 0A 20 20 20 40 20 31 sity off.. @ 1
000180: 35 2C 32 35 20 67 65 74 20 72 65 70 0D 0A 20 20 5,25 get rep..
000190: 20 73 65 74 20 69 6E 74 65 6E 73 69 74 79 20 6F set intensity o
0001A0: 6E 0D 0A 20 20 20 72 65 61 64 0D 0A 20 20 20 73 n.. read.. s
0001B0: 74 6F 72 65 20 21 28 72 65 70 29 20 74 6F 20 72 tore !(rep) to r
0001C0: 65 70 0D 0A 20 20 20 64 6F 20 63 61 73 65 0D 0A ep.. do case..
0001D0: 20 20 20 63 61 73 65 20 72 65 70 3D 27 4E 27 2E case rep='N'.
0001E0: 6F 72 2E 72 65 70 3D 27 4F 27 0D 0A 20 20 20 73 or.rep='O'.. s
0001F0: 74 6F 72 65 20 27 74 27 20 74 6F 20 63 6F 72 72 tore 't' to corr
Size : 512 (Real : 512)
000000: 20 20 20 20 20 20 3F 20 22 41 54 54 45 4E 54 49 ? "ATTENTI
000010: 4F 4E 3A 20 4E 27 6F 75 62 6C 69 65 7A 20 70 61 ON: N'oubliez pa
000020: 73 20 64 65 20 73 61 75 76 65 67 61 72 64 65 72 s de sauvegarder
000030: 20 6C 65 73 20 64 6F 6E 6E 65 65 73 20 71 75 69 les donnees qui
000040: 20 73 6F 6E 74 20 73 75 72 22 3B 0D 0A 20 20 20 sont sur";..
000050: 20 20 20 2B 22 20 6D 3A 20 61 75 20 6D 6F 79 65 +" m: au moye
000060: 6E 20 64 65 20 22 0D 0A 20 20 20 20 20 20 3F 20 n de ".. ?
000070: 22 6C 27 75 74 69 6C 69 74 61 69 72 65 20 50 49 "l'utilitaire PI
000080: 50 20 2D 20 54 61 70 65 7A 20 73 75 72 20 75 6E P - Tapez sur un
000090: 65 20 74 6F 75 63 68 65 20 70 6F 75 72 20 71 75 e touche pour qu
0000A0: 69 74 74 65 72 20 6C 27 61 70 70 6C 69 63 61 74 itter l'applicat
0000B0: 69 6F 6E 22 0D 0A 20 20 20 20 20 20 73 65 74 20 ion".. set
0000C0: 63 6F 6E 73 6F 6C 65 20 6F 66 66 0D 0A 20 20 20 console off..
0000D0: 20 20 20 77 61 69 74 0D 0A 20 20 20 20 20 20 73 wait.. s
0000E0: 65 74 20 63 6F 6E 73 6F 6C 65 20 6F 6E 0D 0A 20 et console on..
0000F0: 20 20 65 6E 64 69 66 0D 0A 20 20 20 71 75 69 74 endif.. quit
000100: 0D 0A 20 20 20 6F 74 68 65 72 77 69 73 65 0D 0A .. otherwise..
000110: 20 20 20 2A 20 61 66 66 69 63 68 65 72 20 75 6E * afficher un
000120: 20 6D 65 73 73 61 67 65 20 64 27 65 72 72 65 75 message d'erreu
000130: 72 0D 0A 20 20 20 73 74 6F 72 65 20 31 20 74 6F r.. store 1 to
000140: 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 64 6F 20 61 nomess.. do a
000150: 66 66 6D 65 73 73 0D 0A 20 20 20 65 6E 64 63 61 ffmess.. endca
000160: 73 65 0D 0A 20 20 20 73 65 6C 65 63 74 20 70 72 se.. select pr
000170: 69 6D 61 72 79 0D 0A 20 20 20 75 73 65 0D 0A 20 imary.. use..
000180: 20 20 73 65 6C 65 63 74 20 73 65 63 6F 6E 64 61 select seconda
000190: 72 79 0D 0A 20 20 20 75 73 65 0D 0A 20 20 20 73 ry.. use.. s
0001A0: 65 6C 65 63 74 20 70 72 69 6D 61 72 79 0D 0A 20 elect primary..
0001B0: 20 20 73 74 6F 72 65 20 27 74 27 20 74 6F 20 74 store 't' to t
0001C0: 65 73 74 31 0D 0A 20 20 20 73 74 6F 72 65 20 27 est1.. store '
0001D0: 66 27 20 74 6F 20 72 65 70 72 69 73 65 0D 0A 65 f' to reprise..e
0001E0: 6E 64 64 6F 0D 0A 72 65 74 75 72 6E 0D 0A 0D 0A nddo..return....
0001F0: 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 1A 1A 70 70 6C 69 ............ppli
Size : 512 (Real : 512)
000000: 65 63 74 0D 0A 20 20 20 63 61 73 65 20 28 72 65 ect.. case (re
000010: 70 3D 27 47 27 2E 6F 72 2E 72 65 70 3D 27 50 27 p='G'.or.rep='P'
000020: 29 2E 61 6E 64 2E 6D 74 79 70 65 3D 27 4C 27 0D ).and.mtype='L'.
000030: 0A 20 20 20 73 74 6F 72 65 20 33 31 20 74 6F 20 . store 31 to
000040: 6E 6F 6D 65 73 73 0D 0A 20 20 20 64 6F 20 61 66 nomess.. do af
000050: 66 6D 65 73 73 0D 0A 20 20 20 63 61 73 65 20 72 fmess.. case r
000060: 65 70 3D 27 43 27 2E 6F 72 2E 72 65 70 3D 27 47 ep='C'.or.rep='G
000070: 27 2E 6F 72 2E 72 65 70 3D 27 50 27 0D 0A 20 20 '.or.rep='P'..
000080: 20 73 74 6F 72 65 20 27 20 20 20 20 20 20 20 20 store '
000090: 20 20 27 20 74 6F 20 6E 6F 6D 7A 0D 0A 20 20 20 ' to nomz..
0000A0: 40 20 31 37 2C 35 20 73 61 79 20 22 6E 6F 6D 20 @ 17,5 say "nom
0000B0: 64 65 20 6C 27 61 75 74 72 65 20 7A 6F 6E 65 22 de l'autre zone"
0000C0: 0D 0A 20 20 20 40 20 31 37 2C 33 35 20 67 65 74 .. @ 17,35 get
0000D0: 20 6E 6F 6D 7A 0D 0A 20 20 20 72 65 61 64 0D 0A nomz.. read..
0000E0: 20 20 20 73 74 6F 72 65 20 21 28 6E 6F 6D 7A 29 store !(nomz)
0000F0: 20 74 6F 20 6E 6F 6D 7A 0D 0A 20 20 20 66 69 6E to nomz.. fin
000100: 64 20 26 6E 6F 6D 7A 0D 0A 20 20 20 69 66 20 23 d &nomz.. if #
000110: 20 3D 20 30 0D 0A 20 20 20 20 20 20 73 74 6F 72 = 0.. stor
000120: 65 20 32 37 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A e 27 to nomess..
000130: 20 20 20 20 20 20 64 6F 20 61 66 66 6D 65 73 73 do affmess
000140: 0D 0A 20 20 20 20 20 20 40 20 31 37 2C 30 0D 0A .. @ 17,0..
000150: 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 69 66 else.. if
000160: 20 66 69 65 6C 64 3A 74 79 70 65 20 23 20 6D 74 field:type # mt
000170: 79 70 65 2E 61 6E 64 2E 72 65 70 20 23 20 27 43 ype.and.rep # 'C
000180: 27 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 '.. stor
000190: 65 20 33 30 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A e 30 to nomess..
0001A0: 20 20 20 20 20 20 20 20 20 64 6F 20 61 66 66 6D do affm
0001B0: 65 73 73 0D 0A 20 20 20 20 20 20 20 20 20 40 20 ess.. @
0001C0: 31 37 2C 30 0D 0A 20 20 20 20 20 20 65 6C 73 65 17,0.. else
0001D0: 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 .. store
0001E0: 20 27 74 27 20 74 6F 20 63 6F 72 72 65 63 74 0D 't' to correct.
0001F0: 0A 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 . endif..
Size : 512 (Real : 512)
000000: 02 00 00 00 00 00 65 00 46 49 45 4C 44 3A 4E 41 ......e.FIELD:NA
000010: 4D 45 00 43 0A 00 00 00 46 49 45 4C 44 3A 54 59 ME.C....FIELD:TY
000020: 50 45 00 43 01 00 00 00 46 49 45 4C 44 3A 4C 45 PE.C....FIELD:LE
000030: 4E 00 00 4E 03 00 00 00 46 49 45 4C 44 3A 44 45 N..N....FIELD:DE
000040: 43 00 00 4E 03 00 00 00 4C 54 00 00 00 00 00 00 C..N....LT......
000050: 00 00 00 4E 02 00 00 00 43 54 00 00 00 00 00 00 ...N....CT......
000060: 00 00 00 4E 02 00 00 00 54 45 58 54 45 00 00 00 ...N....TEXTE...
000070: 00 00 00 43 14 00 00 00 4C 53 00 00 00 00 00 00 ...C....LS......
000080: 00 00 00 4E 02 00 00 00 43 53 00 00 00 00 00 00 ...N....CS......
000090: 00 00 00 4E 02 00 00 00 56 45 52 49 46 00 00 00 ...N....VERIF...
0000A0: 00 00 00 43 02 00 00 00 56 41 4C 31 00 00 00 00 ...C....VAL1....
0000B0: 00 00 00 43 0A 00 00 00 56 41 4C 32 00 00 00 00 ...C....VAL2....
0000C0: 00 00 00 43 1E 00 00 00 56 41 4C 33 00 00 00 00 ...C....VAL3....
0000D0: 00 00 00 43 0A 00 00 00 4E 4F 5A 00 00 00 00 00 ...C....NOZ.....
0000E0: 00 00 00 4E 02 00 00 00 0D 00 00 00 00 00 00 00 ...N............
0000F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000100: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000110: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000120: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000140: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000150: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
Size : 512 (Real : 512)
000000: 65 6E 64 69 66 0D 0A 20 20 6F 74 68 65 72 77 69 endif.. otherwi
000010: 73 65 0D 0A 20 20 73 74 6F 72 65 20 31 20 74 6F se.. store 1 to
000020: 20 6E 6F 6D 65 73 73 0D 0A 20 20 64 6F 20 61 66 nomess.. do af
000030: 66 6D 65 73 73 0D 0A 20 20 65 6E 64 63 61 73 65 fmess.. endcase
000040: 0D 0A 65 6E 64 64 6F 0D 0A 73 74 6F 72 65 20 27 ..enddo..store '
000050: 66 27 20 74 6F 20 63 6F 72 72 65 63 74 0D 0A 65 f' to correct..e
000060: 72 61 73 65 0D 0A 73 74 6F 72 65 20 27 41 27 20 rase..store 'A'
000070: 74 6F 20 72 65 70 32 0D 0A 69 66 20 6D 74 79 70 to rep2..if mtyp
000080: 65 20 23 20 27 4C 27 0D 0A 40 20 33 2C 31 30 20 e # 'L'..@ 3,10
000090: 73 61 79 20 27 6F 70 74 69 6F 6E 73 27 0D 0A 40 say 'options'..@
0000A0: 20 35 2C 35 20 73 61 79 20 22 6C 61 20 7A 6F 6E 5,5 say "la zon
0000B0: 65 20 64 6F 69 74 20 65 74 72 65 20 63 6F 6D 70 e doit etre comp
0000C0: 72 69 73 65 20 65 6E 74 72 65 20 64 65 75 78 20 rise entre deux
0000D0: 62 6F 72 6E 65 73 20 20 20 20 20 20 3D 3D 3D 3D bornes ====
0000E0: 3E 20 42 22 0D 0A 69 66 20 6D 74 79 70 65 20 23 > B"..if mtype #
0000F0: 20 27 4E 27 0D 0A 20 20 20 40 20 36 2C 35 20 73 'N'.. @ 6,5 s
000100: 61 79 20 22 6C 61 20 7A 6F 6E 65 20 65 73 74 20 ay "la zone est
000110: 75 6E 20 63 6F 64 65 20 64 65 76 61 6E 74 20 61 un code devant a
000120: 70 70 61 72 74 65 6E 69 72 20 61 20 75 6E 65 20 ppartenir a une
000130: 6C 69 73 74 65 20 3D 3D 3D 3D 3E 20 4C 22 0D 0A liste ====> L"..
000140: 20 20 20 40 20 37 2C 35 20 73 61 79 20 22 6C 61 @ 7,5 say "la
000150: 20 7A 6F 6E 65 20 65 73 74 20 75 6E 65 20 64 61 zone est une da
000160: 74 65 20 73 6F 75 73 20 6C 61 20 66 6F 72 6D 65 te sous la forme
000170: 20 4A 4A 2F 4D 4D 2F 41 41 20 20 20 20 20 20 20 JJ/MM/AA
000180: 3D 3D 3D 3D 3E 20 44 22 0D 0A 20 20 20 40 20 38 ====> D".. @ 8
000190: 2C 35 20 73 61 79 20 22 6C 61 20 7A 6F 6E 65 20 ,5 say "la zone
0001A0: 65 73 74 20 75 6E 65 20 64 61 74 65 20 73 6F 75 est une date sou
0001B0: 73 20 6C 61 20 66 6F 72 6D 65 20 4A 4A 2F 4D 4D s la forme JJ/MM
0001C0: 20 20 20 20 20 20 20 20 20 20 3D 3D 3D 3D 3E 20 ====>
0001D0: 4D 22 0D 0A 65 6E 64 69 66 0D 0A 40 20 39 2C 35 M"..endif..@ 9,5
0001E0: 20 73 61 79 20 22 61 75 63 75 6E 20 64 65 73 20 say "aucun des
0001F0: 63 6F 6E 74 72 6F 6C 65 73 20 63 69 2D 64 65 73 controles ci-des
Size : 512 (Real : 512)
000000: 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20 20 else..
000010: 20 20 73 74 6F 72 65 20 24 28 6E 65 75 66 2C 31 store $(neuf,1
000020: 2C 6E 62 65 6E 74 29 2D 27 2E 27 2D 24 28 6E 65 ,nbent)-'.'-$(ne
000030: 75 66 2C 31 2C 6E 64 65 63 29 20 74 6F 20 6D 61 uf,1,ndec) to ma
000040: 78 70 6F 73 0D 0A 20 20 20 20 20 20 20 20 20 20 xpos..
000050: 20 20 69 66 20 6E 62 65 6E 74 20 3D 20 31 0D 0A if nbent = 1..
000060: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 s
000070: 74 6F 72 65 20 27 2D 2E 27 2D 24 28 6E 65 75 66 tore '-.'-$(neuf
000080: 2C 31 2C 6E 64 65 63 29 20 74 6F 20 6D 69 6E 70 ,1,ndec) to minp
000090: 6F 73 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 os..
0000A0: 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20 20 else..
0000B0: 20 20 20 20 20 73 74 6F 72 65 20 27 2D 27 2D 24 store '-'-$
0000C0: 28 6E 65 75 66 2C 31 2C 6E 62 65 6E 74 2D 31 29 (neuf,1,nbent-1)
0000D0: 2D 27 2E 27 2D 24 28 6E 65 75 66 2C 31 2C 6E 64 -'.'-$(neuf,1,nd
0000E0: 65 63 29 20 74 6F 20 6D 69 6E 70 6F 73 0D 0A 20 ec) to minpos..
0000F0: 20 20 20 20 20 20 20 20 20 20 20 65 6E 64 69 66 endif
000100: 0D 0A 20 20 20 20 20 20 20 20 20 65 6E 64 69 66 .. endif
000110: 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 .. store
000120: 20 22 70 69 63 74 75 72 65 20 27 22 2D 6D 61 78 "picture '"-max
000130: 70 6F 73 2D 22 27 22 20 74 6F 20 70 69 63 0D 0A pos-"'" to pic..
000140: 20 20 20 20 20 20 20 20 20 72 65 6C 65 61 73 65 release
000150: 20 6E 65 75 66 0D 0A 20 20 20 20 20 20 65 6E 64 neuf.. end
000160: 63 61 73 65 0D 0A 20 20 20 20 20 20 40 20 31 33 case.. @ 13
000170: 2C 35 39 20 67 65 74 20 76 61 6C 64 65 62 20 26 ,59 get valdeb &
000180: 70 69 63 0D 0A 20 20 20 20 20 20 40 20 31 34 2C pic.. @ 14,
000190: 35 39 20 67 65 74 20 76 61 6C 66 69 6E 20 26 70 59 get valfin &p
0001A0: 69 63 0D 0A 20 20 20 20 20 20 72 65 61 64 0D 0A ic.. read..
0001B0: 20 20 20 20 20 20 73 74 6F 72 65 20 27 20 27 20 store ' '
0001C0: 74 6F 20 64 61 74 64 65 62 0D 0A 20 20 20 20 20 to datdeb..
0001D0: 20 73 74 6F 72 65 20 27 20 27 20 74 6F 20 64 61 store ' ' to da
0001E0: 74 66 69 6E 0D 0A 20 20 20 20 20 20 69 66 20 74 tfin.. if t
0001F0: 79 70 65 28 76 61 6C 64 65 62 29 3D 27 43 27 0D ype(valdeb)='C'.
Size : 512 (Real : 512)
000000: 73 75 73 20 73 75 72 20 63 65 74 74 65 20 7A 6F sus sur cette zo
000010: 6E 65 20 20 20 20 20 20 3D 3D 3D 3D 3E 20 41 22 ne ====> A"
000020: 0D 0A 40 20 31 31 2C 35 20 73 61 79 20 22 72 65 ..@ 11,5 say "re
000030: 70 6F 6E 73 65 20 20 20 3D 3D 3D 3D 3E 22 0D 0A ponse ====>"..
000040: 64 6F 20 77 68 69 6C 65 20 63 6F 72 72 65 63 74 do while correct
000050: 3D 27 66 27 0D 0A 20 20 20 73 74 6F 72 65 20 27 ='f'.. store '
000060: 41 27 20 74 6F 20 72 65 70 32 0D 0A 20 20 20 73 A' to rep2.. s
000070: 74 6F 72 65 20 30 20 74 6F 20 6E 6F 6D 65 73 73 tore 0 to nomess
000080: 0D 0A 20 20 20 73 65 74 20 69 6E 74 65 6E 73 69 .. set intensi
000090: 74 79 20 6F 66 66 0D 0A 20 20 20 40 20 31 31 2C ty off.. @ 11,
0000A0: 32 35 20 67 65 74 20 72 65 70 32 0D 0A 20 20 20 25 get rep2..
0000B0: 73 65 74 20 69 6E 74 65 6E 73 69 74 79 20 6F 6E set intensity on
0000C0: 0D 0A 20 20 20 72 65 61 64 0D 0A 20 20 20 73 74 .. read.. st
0000D0: 6F 72 65 20 21 28 72 65 70 32 29 20 74 6F 20 72 ore !(rep2) to r
0000E0: 65 70 32 0D 0A 20 20 20 64 6F 20 63 61 73 65 0D ep2.. do case.
0000F0: 0A 20 20 20 63 61 73 65 20 28 72 65 70 32 3D 27 . case (rep2='
000100: 4C 27 2E 6F 72 2E 72 65 70 32 3D 27 44 27 2E 6F L'.or.rep2='D'.o
000110: 72 2E 72 65 70 32 3D 27 4D 27 29 2E 61 6E 64 2E r.rep2='M').and.
000120: 6D 74 79 70 65 3D 27 4E 27 0D 0A 20 20 20 73 74 mtype='N'.. st
000130: 6F 72 65 20 33 32 20 74 6F 20 6E 6F 6D 65 73 73 ore 32 to nomess
000140: 0D 0A 20 20 20 64 6F 20 61 66 66 6D 65 73 73 0D .. do affmess.
000150: 0A 20 20 20 63 61 73 65 20 72 65 70 32 3D 27 41 . case rep2='A
000160: 27 0D 0A 20 20 20 73 74 6F 72 65 20 27 74 27 20 '.. store 't'
000170: 74 6F 20 63 6F 72 72 65 63 74 0D 0A 20 20 20 63 to correct.. c
000180: 61 73 65 20 72 65 70 32 3D 27 42 27 2E 6F 72 2E ase rep2='B'.or.
000190: 72 65 70 32 3D 27 44 27 2E 6F 72 2E 72 65 70 32 rep2='D'.or.rep2
0001A0: 3D 27 4D 27 0D 0A 20 20 20 69 66 20 28 72 65 70 ='M'.. if (rep
0001B0: 32 3D 27 44 27 2E 61 6E 64 2E 28 6D 74 79 70 65 2='D'.and.(mtype
0001C0: 23 27 43 27 2E 6F 72 2E 6D 6C 6F 6E 23 38 29 29 #'C'.or.mlon#8))
0001D0: 2E 6F 72 2E 28 72 65 70 32 3D 27 4D 27 2E 61 6E .or.(rep2='M'.an
0001E0: 64 2E 3B 0D 0A 20 20 20 28 6D 74 79 70 65 23 27 d.;.. (mtype#'
0001F0: 43 27 2E 6F 72 2E 6D 6C 6F 6E 23 35 29 29 0D 0A C'.or.mlon#5))..
Size : 512 (Real : 512)
000000: 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 . store
000010: 21 28 76 61 6C 64 65 62 29 20 74 6F 20 76 61 6C !(valdeb) to val
000020: 64 65 62 0D 0A 20 20 20 20 20 20 20 20 20 73 74 deb.. st
000030: 6F 72 65 20 21 28 76 61 6C 66 69 6E 29 20 74 6F ore !(valfin) to
000040: 20 76 61 6C 66 69 6E 0D 0A 20 20 20 20 20 20 65 valfin.. e
000050: 6E 64 69 66 0D 0A 20 20 20 20 20 20 73 74 6F 72 ndif.. stor
000060: 65 20 30 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 e 0 to nomess..
000070: 20 20 20 20 20 69 66 20 72 65 70 32 3D 27 42 27 if rep2='B'
000080: 2E 61 6E 64 2E 6D 74 79 70 65 3D 27 4E 27 0D 0A .and.mtype='N'..
000090: 20 20 20 20 20 20 20 20 20 69 66 20 76 61 6C 64 if vald
0000A0: 65 62 3C 26 6D 69 6E 70 6F 73 2E 6F 72 2E 76 61 eb<&minpos.or.va
0000B0: 6C 64 65 62 3E 26 6D 61 78 70 6F 73 0D 0A 20 20 ldeb>&maxpos..
0000C0: 20 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 store
0000D0: 33 33 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 33 to nomess..
0000E0: 20 20 20 20 20 20 20 20 20 20 64 6F 20 61 66 66 do aff
0000F0: 6D 65 73 73 0D 0A 20 20 20 20 20 20 20 20 20 65 mess.. e
000100: 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20 20 20 lse..
000110: 20 69 66 20 76 61 6C 66 69 6E 3C 26 6D 69 6E 70 if valfin<&minp
000120: 6F 73 2E 6F 72 2E 76 61 6C 66 69 6E 3E 26 6D 61 os.or.valfin>&ma
000130: 78 70 6F 73 0D 0A 20 20 20 20 20 20 20 20 20 20 xpos..
000140: 20 20 20 20 20 73 74 6F 72 65 20 33 33 20 74 6F store 33 to
000150: 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 20 20 20 20 nomess..
000160: 20 20 20 20 20 20 20 20 64 6F 20 61 66 66 6D 65 do affme
000170: 73 73 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 ss..
000180: 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 20 20 20 endif..
000190: 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 65 6E 64 endif.. end
0001A0: 69 66 0D 0A 20 20 20 20 20 20 69 66 20 72 65 70 if.. if rep
0001B0: 32 3D 27 44 27 2E 6F 72 2E 72 65 70 32 3D 27 4D 2='D'.or.rep2='M
0001C0: 27 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 '.. stor
0001D0: 65 20 31 20 74 6F 20 63 70 74 7A 0D 0A 20 20 20 e 1 to cptz..
0001E0: 20 20 20 20 20 20 64 6F 20 77 68 69 6C 65 20 63 do while c
0001F0: 70 74 7A 3C 3D 20 32 0D 0A 20 20 20 20 20 20 20 ptz<= 2..
Size : 512 (Real : 512)
000000: 20 20 20 20 20 20 73 74 6F 72 65 20 32 38 20 74 store 28 t
000010: 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 20 20 20 o nomess..
000020: 64 6F 20 61 66 66 6D 65 73 73 0D 0A 20 20 20 20 do affmess..
000030: 20 20 69 66 20 63 68 6F 69 78 23 27 43 27 0D 0A if choix#'C'..
000040: 20 20 20 20 20 20 20 20 20 67 6F 74 6F 20 6E 6F goto no
000050: 63 6F 75 72 0D 0A 20 20 20 20 20 20 20 20 20 64 cour.. d
000060: 65 6C 65 0D 0A 20 20 20 20 20 20 20 20 20 70 61 ele.. pa
000070: 63 6B 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F ck.. sto
000080: 72 65 20 27 74 27 20 74 6F 20 63 6F 72 72 65 63 re 't' to correc
000090: 74 0D 0A 20 20 20 20 20 20 65 6E 64 69 66 0D 0A t.. endif..
0000A0: 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 40 else.. @
0000B0: 20 31 33 2C 35 20 73 61 79 20 27 76 61 6C 65 75 13,5 say 'valeu
0000C0: 72 20 64 65 20 64 65 62 75 74 27 0D 0A 20 20 20 r de debut'..
0000D0: 20 20 20 40 20 31 34 2C 35 20 73 61 79 20 27 76 @ 14,5 say 'v
0000E0: 61 6C 65 75 72 20 64 65 20 66 69 6E 27 0D 0A 20 aleur de fin'..
0000F0: 20 20 20 20 20 64 6F 20 63 61 73 65 0D 0A 20 20 do case..
000100: 20 20 20 20 20 20 20 63 61 73 65 20 72 65 70 32 case rep2
000110: 3D 27 44 27 0D 0A 20 20 20 20 20 20 20 20 20 73 ='D'.. s
000120: 74 6F 72 65 20 27 30 30 2F 30 30 2F 30 30 27 20 tore '00/00/00'
000130: 74 6F 20 76 61 6C 64 65 62 0D 0A 20 20 20 20 20 to valdeb..
000140: 20 20 20 20 73 74 6F 72 65 20 27 30 30 2F 30 30 store '00/00
000150: 2F 30 30 27 20 74 6F 20 76 61 6C 66 69 6E 0D 0A /00' to valfin..
000160: 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 22 store "
000170: 20 70 69 63 74 75 72 65 20 27 39 39 2F 39 39 2F picture '99/99/
000180: 39 39 27 22 20 74 6F 20 70 69 63 0D 0A 20 20 20 99'" to pic..
000190: 20 20 20 20 20 20 63 61 73 65 20 72 65 70 32 3D case rep2=
0001A0: 27 4D 27 0D 0A 20 20 20 20 20 20 20 20 20 73 74 'M'.. st
0001B0: 6F 72 65 20 27 30 30 2F 30 30 27 20 74 6F 20 76 ore '00/00' to v
0001C0: 61 6C 64 65 62 0D 0A 20 20 20 20 20 20 20 20 20 aldeb..
0001D0: 73 74 6F 72 65 20 27 30 30 2F 30 30 27 20 74 6F store '00/00' to
0001E0: 20 76 61 6C 66 69 6E 0D 0A 20 20 20 20 20 20 20 valfin..
0001F0: 20 20 73 74 6F 72 65 20 22 20 70 69 63 74 75 72 store " pictur
Size : 512 (Real : 512)
000000: 20 20 20 20 20 69 66 20 63 70 74 7A 3D 31 0D 0A if cptz=1..
000010: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 s
000020: 74 6F 72 65 20 76 61 6C 64 65 62 20 74 6F 20 76 tore valdeb to v
000030: 64 61 74 65 0D 0A 20 20 20 20 20 20 20 20 20 20 date..
000040: 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 else..
000050: 20 20 20 20 20 20 20 73 74 6F 72 65 20 76 61 6C store val
000060: 66 69 6E 20 74 6F 20 76 64 61 74 65 0D 0A 20 20 fin to vdate..
000070: 20 20 20 20 20 20 20 20 20 20 65 6E 64 69 66 0D endif.
000080: 0A 20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 . if
000090: 76 64 61 74 65 23 27 30 30 2F 30 30 2F 30 30 27 vdate#'00/00/00'
0000A0: 2E 61 6E 64 2E 6C 65 6E 28 76 64 61 74 65 29 3D .and.len(vdate)=
0000B0: 38 2E 6F 72 2E 76 64 61 74 65 23 27 30 30 2F 30 8.or.vdate#'00/0
0000C0: 30 27 2E 61 6E 64 2E 3B 0D 0A 20 20 20 20 20 20 0'.and.;..
0000D0: 20 20 20 20 20 20 6C 65 6E 28 76 64 61 74 65 29 len(vdate)
0000E0: 3D 35 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 =5..
0000F0: 20 20 20 73 74 6F 72 65 20 76 61 6C 28 24 28 76 store val($(v
000100: 64 61 74 65 2C 31 2C 32 29 29 20 74 6F 20 6A 0D date,1,2)) to j.
000110: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
000120: 73 74 6F 72 65 20 76 61 6C 28 24 28 76 64 61 74 store val($(vdat
000130: 65 2C 34 2C 32 29 29 20 74 6F 20 6D 0D 0A 20 20 e,4,2)) to m..
000140: 20 20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 if
000150: 6C 65 6E 28 76 64 61 74 65 29 3D 38 0D 0A 20 20 len(vdate)=8..
000160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000170: 73 74 6F 72 65 20 76 61 6C 28 24 28 76 64 61 74 store val($(vdat
000180: 65 2C 37 2C 32 29 29 20 74 6F 20 61 6E 0D 0A 20 e,7,2)) to an..
000190: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6C el
0001A0: 73 65 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 se..
0001B0: 20 20 20 20 20 20 73 74 6F 72 65 20 30 20 74 6F store 0 to
0001C0: 20 61 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20 an..
0001D0: 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 endif..
0001E0: 20 20 20 20 20 20 20 20 20 20 69 66 20 6D 3C 31 if m<1
0001F0: 2E 6F 72 2E 6D 3E 31 32 2E 6F 72 2E 6A 3C 31 2E .or.m>12.or.j<1.
Size : 512 (Real : 512)
000000: 65 20 27 39 39 2F 39 39 27 22 20 74 6F 20 70 69 e '99/99'" to pi
000010: 63 0D 0A 20 20 20 20 20 20 20 20 20 63 61 73 65 c.. case
000020: 20 6D 74 79 70 65 20 3D 27 43 27 0D 0A 20 20 20 mtype ='C'..
000030: 20 20 20 20 20 20 69 66 20 6D 6C 6F 6E 3E 20 31 if mlon> 1
000040: 30 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 73 0.. s
000050: 74 6F 72 65 20 24 28 62 6C 61 6E 63 2C 31 2C 31 tore $(blanc,1,1
000060: 30 29 20 74 6F 20 76 61 6C 64 65 62 0D 0A 20 20 0) to valdeb..
000070: 20 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 else..
000080: 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 24 store $
000090: 28 62 6C 61 6E 63 2C 31 2C 6D 6C 6F 6E 29 20 74 (blanc,1,mlon) t
0000A0: 6F 20 76 61 6C 64 65 62 0D 0A 20 20 20 20 20 20 o valdeb..
0000B0: 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 endif..
0000C0: 20 20 20 73 74 6F 72 65 20 76 61 6C 64 65 62 20 store valdeb
0000D0: 74 6F 20 76 61 6C 66 69 6E 0D 0A 20 20 20 20 20 to valfin..
0000E0: 20 20 20 20 73 74 6F 72 65 20 22 20 22 20 74 6F store " " to
0000F0: 20 70 69 63 0D 0A 20 20 20 20 20 20 20 20 20 63 pic.. c
000100: 61 73 65 20 6D 74 79 70 65 20 3D 20 27 4E 27 0D ase mtype = 'N'.
000110: 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 . store
000120: 27 39 39 39 39 39 39 39 39 39 39 27 20 74 6F 20 '9999999999' to
000130: 6E 65 75 66 0D 0A 20 20 20 20 20 20 20 20 20 73 neuf.. s
000140: 74 6F 72 65 20 30 20 74 6F 20 76 61 6C 64 65 62 tore 0 to valdeb
000150: 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 .. store
000160: 20 30 20 74 6F 20 76 61 6C 66 69 6E 0D 0A 20 20 0 to valfin..
000170: 20 20 20 20 20 20 20 69 66 20 6D 64 65 63 3D 30 if mdec=0
000180: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 73 74 .. st
000190: 6F 72 65 20 6D 6C 6F 6E 20 74 6F 20 6E 62 65 6E ore mlon to nben
0001A0: 74 0D 0A 20 20 20 20 20 20 20 20 20 65 6C 73 65 t.. else
0001B0: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 73 74 .. st
0001C0: 6F 72 65 20 6D 6C 6F 6E 2D 6D 64 65 63 2D 31 20 ore mlon-mdec-1
0001D0: 74 6F 20 6E 62 65 6E 74 0D 0A 20 20 20 20 20 20 to nbent..
0001E0: 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 endif..
0001F0: 20 20 20 69 66 20 6D 6C 6F 6E 20 3E 31 30 0D 0A if mlon >10..
Size : 512 (Real : 512)
000000: 6F 72 2E 4A 3E 33 31 2E 6F 72 2E 28 6D 3D 34 2E or.J>31.or.(m=4.
000010: 6F 72 2E 6D 3D 36 2E 6F 72 2E 6D 3D 39 2E 6F 72 or.m=6.or.m=9.or
000020: 2E 3B 0D 0A 6D 3D 31 31 29 2E 61 6E 64 2E 6A 3E .;..m=11).and.j>
000030: 33 30 2E 6F 72 2E 6D 3D 32 2E 61 6E 64 2E 6A 3E 30.or.m=2.and.j>
000040: 32 39 2E 6F 72 2E 28 61 6E 2F 34 29 23 69 6E 74 29.or.(an/4)#int
000050: 28 61 6E 2F 34 29 2E 61 6E 64 2E 6D 3D 32 2E 61 (an/4).and.m=2.a
000060: 6E 64 2E 6A 3E 32 38 0D 0A 20 20 20 20 20 20 20 nd.j>28..
000070: 20 20 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 store
000080: 20 32 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 2 to nomess..
000090: 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6E 64 end
0000A0: 69 66 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 if..
0000B0: 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 20 20 20 endif..
0000C0: 20 20 20 73 74 6F 72 65 20 63 70 74 7A 2B 31 20 store cptz+1
0000D0: 74 6F 20 63 70 74 7A 0D 0A 20 20 20 20 20 20 20 to cptz..
0000E0: 20 20 65 6E 64 64 6F 0D 0A 20 20 20 20 20 20 20 enddo..
0000F0: 20 20 72 65 6C 65 61 73 65 20 6A 2C 6D 2C 61 6E release j,m,an
000100: 2C 63 70 74 7A 2C 76 64 61 74 65 0D 0A 20 20 20 ,cptz,vdate..
000110: 20 20 20 20 20 20 69 66 20 6E 6F 6D 65 73 73 23 if nomess#
000120: 30 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 64 0.. d
000130: 6F 20 61 66 66 6D 65 73 73 0D 0A 20 20 20 20 20 o affmess..
000140: 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 else..
000150: 20 20 20 20 20 20 69 66 20 72 65 70 32 3D 27 44 if rep2='D
000160: 27 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 '..
000170: 20 20 73 74 6F 72 65 20 24 28 76 61 6C 64 65 62 store $(valdeb
000180: 2C 37 2C 32 29 2D 24 28 76 61 6C 64 65 62 2C 34 ,7,2)-$(valdeb,4
000190: 2C 32 29 2D 24 28 76 61 6C 64 65 62 2C 31 2C 32 ,2)-$(valdeb,1,2
0001A0: 29 20 74 6F 20 64 61 74 64 65 62 0D 0A 20 20 20 ) to datdeb..
0001B0: 20 20 20 20 20 20 20 20 20 20 20 20 73 74 6F 72 stor
0001C0: 65 20 24 28 76 61 6C 66 69 6E 2C 37 2C 32 29 2D e $(valfin,7,2)-
0001D0: 24 28 76 61 6C 66 69 6E 2C 34 2C 32 29 2D 24 28 $(valfin,4,2)-$(
0001E0: 76 61 6C 66 69 6E 2C 31 2C 32 29 20 74 6F 20 64 valfin,1,2) to d
0001F0: 61 74 66 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 atfin..
Size : 512 (Real : 512)
000000: 20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 6E if n
000010: 62 65 6E 74 3E 3D 39 0D 0A 20 20 20 20 20 20 20 bent>=9..
000020: 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 30 20 store 0
000030: 74 6F 20 6E 64 65 63 0D 0A 20 20 20 20 20 20 20 to ndec..
000040: 20 20 20 20 20 20 20 20 69 66 20 6E 62 65 6E 74 if nbent
000050: 3E 31 30 0D 0A 20 20 20 20 20 20 20 20 20 20 20 >10..
000060: 20 20 20 20 20 20 20 73 74 6F 72 65 20 31 30 20 store 10
000070: 74 6F 20 6E 62 65 6E 74 0D 0A 20 20 20 20 20 20 to nbent..
000080: 20 20 20 20 20 20 20 20 20 65 6E 64 69 66 0D 0A endif..
000090: 20 20 20 20 20 20 20 20 20 20 20 20 65 6C 73 65 else
0000A0: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
0000B0: 20 73 74 6F 72 65 20 31 30 2D 6E 62 65 6E 74 2D store 10-nbent-
0000C0: 31 20 74 6F 20 6E 64 65 63 0D 0A 20 20 20 20 20 1 to ndec..
0000D0: 20 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 endif..
0000E0: 20 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 else..
0000F0: 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 6D store m
000100: 64 65 63 20 74 6F 20 6E 64 65 63 0D 0A 20 20 20 dec to ndec..
000110: 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 endif..
000120: 20 20 20 20 20 20 69 66 20 6E 64 65 63 20 3D 20 if ndec =
000130: 30 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 73 0.. s
000140: 74 6F 72 65 20 24 28 6E 65 75 66 2C 31 2C 6E 62 tore $(neuf,1,nb
000150: 65 6E 74 29 20 74 6F 20 6D 61 78 70 6F 73 0D 0A ent) to maxpos..
000160: 20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 6E if n
000170: 62 65 6E 74 3D 31 0D 0A 20 20 20 20 20 20 20 20 bent=1..
000180: 20 20 20 20 20 20 20 73 74 6F 72 65 20 27 30 27 store '0'
000190: 20 74 6F 20 6D 69 6E 70 6F 73 0D 0A 20 20 20 20 to minpos..
0001A0: 20 20 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 else..
0001B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 73 74 6F sto
0001C0: 72 65 20 27 2D 27 2D 24 28 6E 65 75 66 2C 31 2C re '-'-$(neuf,1,
0001D0: 6E 62 65 6E 74 2D 31 29 20 74 6F 20 6D 69 6E 70 nbent-1) to minp
0001E0: 6F 73 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 os..
0001F0: 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 20 20 20 endif..
Size : 512 (Real : 512)
000000: 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 else..
000010: 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 24 28 store $(
000020: 76 61 6C 64 65 62 2C 34 2C 32 29 2D 24 28 76 61 valdeb,4,2)-$(va
000030: 6C 64 65 62 2C 31 2C 32 29 20 74 6F 20 64 61 74 ldeb,1,2) to dat
000040: 64 65 62 0D 0A 20 20 20 20 20 20 20 20 20 20 20 deb..
000050: 20 20 20 20 73 74 6F 72 65 20 24 28 76 61 6C 66 store $(valf
000060: 69 6E 2C 34 2C 32 29 2D 24 28 76 61 6C 66 69 6E in,4,2)-$(valfin
000070: 2C 31 2C 32 29 20 74 6F 20 64 61 74 66 69 6E 0D ,1,2) to datfin.
000080: 0A 20 20 20 20 20 20 20 20 20 20 20 20 65 6E 64 . end
000090: 69 66 0D 0A 20 20 20 20 20 20 20 20 20 65 6E 64 if.. end
0000A0: 69 66 0D 0A 20 20 20 20 20 20 65 6E 64 69 66 0D if.. endif.
0000B0: 0A 20 20 20 20 20 20 69 66 20 6E 6F 6D 65 73 73 . if nomess
0000C0: 20 3D 20 30 0D 0A 20 20 20 20 20 20 20 20 20 69 = 0.. i
0000D0: 66 20 6D 74 79 70 65 20 3D 20 27 43 27 0D 0A 20 f mtype = 'C'..
0000E0: 20 20 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 store
0000F0: 20 72 65 70 32 3D 27 44 27 2E 61 6E 64 2E 76 61 rep2='D'.and.va
000100: 6C 66 69 6E 23 27 30 30 2F 30 30 2F 30 30 27 2E lfin#'00/00/00'.
000110: 6F 72 2E 72 65 70 32 3D 27 4D 27 2E 61 6E 64 2E or.rep2='M'.and.
000120: 76 61 6C 66 69 6E 20 3B 0D 0A 20 20 20 20 20 20 valfin ;..
000130: 20 20 20 20 20 20 23 27 30 30 2F 30 30 27 2E 6F #'00/00'.o
000140: 72 2E 28 72 65 70 32 23 27 4D 27 2E 61 6E 64 2E r.(rep2#'M'.and.
000150: 72 65 70 32 23 27 44 27 29 2E 61 6E 64 2E 76 61 rep2#'D').and.va
000160: 6C 66 69 6E 20 23 20 27 20 27 20 74 6F 20 63 6F lfin # ' ' to co
000170: 6D 70 0D 0A 20 20 20 20 20 20 20 20 20 65 6C 73 mp.. els
000180: 65 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 73 e.. s
000190: 74 6F 72 65 20 76 61 6C 66 69 6E 20 23 20 30 20 tore valfin # 0
0001A0: 74 6F 20 63 6F 6D 70 0D 0A 20 20 20 20 20 20 20 to comp..
0001B0: 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 20 endif..
0001C0: 20 20 69 66 20 63 6F 6D 70 0D 0A 20 20 20 20 20 if comp..
0001D0: 20 20 20 20 20 20 20 69 66 20 28 72 65 70 32 23 if (rep2#
0001E0: 27 44 27 2E 61 6E 64 2E 72 65 70 32 23 27 4D 27 'D'.and.rep2#'M'
0001F0: 2E 61 6E 64 2E 76 61 6C 64 65 62 3E 76 61 6C 66 .and.valdeb>valf
Size : 512 (Real : 512)
000000: 00 00 00 00 00 00 00 00 00 1A 0D 0A 2A 20 6C 61 ............* la
000010: 20 7A 6F 6E 65 20 65 73 74 2D 65 6C 6C 65 20 61 zone est-elle a
000020: 6C 70 68 61 62 65 74 69 71 75 65 0D 0A 63 61 73 lphabetique..cas
000030: 65 20 74 79 70 65 20 23 20 27 43 27 0D 0A 73 74 e type # 'C'..st
000040: 6F 72 65 20 31 33 20 74 6F 20 6E 6F 6D 65 73 73 ore 13 to nomess
000050: 0D 0A 64 6F 20 61 66 66 6D 65 73 73 0D 0A 2A 20 ..do affmess..*
000060: 70 6F 73 69 74 69 6F 6E 20 64 65 20 64 65 62 75 position de debu
000070: 74 20 63 6F 72 72 65 63 74 65 20 3F 0D 0A 63 61 t correcte ?..ca
000080: 73 65 20 76 61 6C 28 26 6D 64 65 62 29 20 3D 20 se val(&mdeb) =
000090: 30 2E 6F 72 2E 76 61 6C 28 26 6D 64 65 62 29 3E 0.or.val(&mdeb)>
0000A0: 6C 6F 6E 0D 0A 73 74 6F 72 65 20 31 34 20 74 6F lon..store 14 to
0000B0: 20 6E 6F 6D 65 73 73 0D 0A 64 6F 20 61 66 66 6D nomess..do affm
0000C0: 65 73 73 0D 0A 2A 20 70 6F 73 69 74 69 6F 6E 20 ess..* position
0000D0: 66 69 6E 20 63 6F 72 72 65 63 74 65 20 3F 0D 0A fin correcte ?..
0000E0: 63 61 73 65 20 21 28 26 6D 66 69 6E 29 23 27 46 case !(&mfin)#'F
0000F0: 27 2E 61 6E 64 2E 28 76 61 6C 28 26 6D 66 69 6E '.and.(val(&mfin
000100: 29 3C 76 61 6C 28 26 6D 64 65 62 29 2E 6F 72 2E )<val(&mdeb).or.
000110: 76 61 6C 28 26 6D 66 69 6E 29 3E 6C 6F 6E 29 0D val(&mfin)>lon).
000120: 0A 73 74 6F 72 65 20 31 35 20 74 6F 20 6E 6F 6D .store 15 to nom
000130: 65 73 73 0D 0A 64 6F 20 61 66 66 6D 65 73 73 0D ess..do affmess.
000140: 0A 6F 74 68 65 72 77 69 73 65 0D 0A 73 74 6F 72 .otherwise..stor
000150: 65 20 27 6C 6F 6E 67 27 2D 73 74 72 28 63 70 74 e 'long'-str(cpt
000160: 69 2C 31 29 20 74 6F 20 6C 6C 6F 6E 67 0D 0A 73 i,1) to llong..s
000170: 74 6F 72 65 20 6C 6F 6E 20 74 6F 20 26 6C 6C 6F tore lon to &llo
000180: 6E 67 0D 0A 73 74 6F 72 65 20 63 70 74 69 2B 31 ng..store cpti+1
000190: 20 74 6F 20 63 70 74 69 0D 0A 73 74 6F 72 65 20 to cpti..store
0001A0: 6C 69 67 69 2B 31 20 74 6F 20 6C 69 67 69 0D 0A ligi+1 to ligi..
0001B0: 65 6E 64 63 61 73 65 0D 0A 65 6E 64 64 6F 0D 0A endcase..enddo..
0001C0: 73 74 6F 72 65 20 63 70 74 69 2D 31 20 74 6F 20 store cpti-1 to
0001D0: 63 70 74 69 6D 61 78 0D 0A 73 65 6C 65 63 74 20 cptimax..select
0001E0: 70 72 69 6D 61 72 79 0D 0A 75 73 65 20 26 66 65 primary..use &fe
0001F0: 6C 65 20 69 6E 64 65 78 20 26 78 65 6C 65 0D 0A le index &xele..
Size : 512 (Real : 512)
000000: 69 6E 29 2E 6F 72 2E 3B 0D 0A 20 20 20 20 20 20 in).or.;..
000010: 20 20 20 20 20 20 28 28 72 65 70 32 3D 27 44 27 ((rep2='D'
000020: 2E 6F 72 2E 72 65 70 32 3D 27 4D 27 29 2E 61 6E .or.rep2='M').an
000030: 64 2E 64 61 74 64 65 62 3E 64 61 74 66 69 6E 29 d.datdeb>datfin)
000040: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
000050: 20 73 74 6F 72 65 20 32 39 20 74 6F 20 6E 6F 6D store 29 to nom
000060: 65 73 73 0D 0A 20 20 20 20 20 20 20 20 20 20 20 ess..
000070: 20 20 20 20 64 6F 20 61 66 66 6D 65 73 73 0D 0A do affmess..
000080: 20 20 20 20 20 20 20 20 20 20 20 20 65 6C 73 65 else
000090: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
0000A0: 20 73 74 6F 72 65 20 27 74 27 20 74 6F 20 63 6F store 't' to co
0000B0: 72 72 65 63 74 0D 0A 20 20 20 20 20 20 20 20 20 rrect..
0000C0: 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 endif..
0000D0: 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 else..
0000E0: 20 20 20 20 20 73 74 6F 72 65 20 27 74 27 20 74 store 't' t
0000F0: 6F 20 63 6F 72 72 65 63 74 0D 0A 20 20 20 20 20 o correct..
000100: 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 endif..
000110: 20 65 6E 64 69 66 0D 0A 20 20 20 65 6E 64 69 66 endif.. endif
000120: 0D 0A 20 20 20 72 65 6C 65 61 73 65 20 63 6F 6D .. release com
000130: 70 2C 64 61 74 64 65 62 2C 64 61 74 66 69 6E 2C p,datdeb,datfin,
000140: 6D 69 6E 70 6F 73 2C 6D 61 78 70 6F 73 2C 70 69 minpos,maxpos,pi
000150: 63 0D 0A 20 20 20 63 61 73 65 20 72 65 70 32 3D c.. case rep2=
000160: 27 4C 27 0D 0A 20 20 20 73 74 6F 72 65 20 24 28 'L'.. store $(
000170: 62 6C 61 6E 63 2C 31 2C 33 30 29 20 74 6F 20 6C blanc,1,30) to l
000180: 69 73 74 63 0D 0A 20 20 20 40 20 31 33 2C 30 20 istc.. @ 13,0
000190: 73 61 79 20 27 45 6E 74 72 65 7A 20 6C 65 73 20 say 'Entrez les
0001A0: 63 6F 64 65 73 20 70 6F 73 73 69 62 6C 65 73 20 codes possibles
0001B0: 65 6E 20 6C 65 73 20 73 65 70 61 72 61 6E 74 27 en les separant'
0001C0: 0D 0A 20 20 20 40 20 31 34 2C 30 20 73 61 79 20 .. @ 14,0 say
0001D0: 27 70 61 72 20 64 65 73 20 76 69 72 67 75 6C 65 'par des virgule
0001E0: 73 27 0D 0A 20 20 20 40 20 31 34 2C 34 35 20 67 s'.. @ 14,45 g
0001F0: 65 74 20 6C 69 73 74 63 0D 0A 20 20 20 72 65 61 et listc.. rea
Size : 512 (Real : 512)
000000: 2A 20 6D 6F 64 69 66 69 63 68 3A 20 6D 6F 64 69 * modifich: modi
000010: 66 69 63 61 74 69 6F 6E 20 64 65 20 6C 61 20 73 fication de la s
000020: 74 72 75 63 74 75 72 65 20 64 27 75 6E 20 66 69 tructure d'un fi
000030: 63 68 69 65 72 0D 0A 0D 0A 65 72 61 73 65 0D 0A chier....erase..
000040: 40 20 31 2C 31 36 20 73 61 79 20 27 4D 4F 44 49 @ 1,16 say 'MODI
000050: 46 49 43 41 54 49 4F 4E 20 44 45 20 53 54 52 55 FICATION DE STRU
000060: 43 54 55 52 45 20 44 55 20 46 49 43 48 49 45 52 CTURE DU FICHIER
000070: 27 0D 0A 40 20 31 2C 35 36 20 67 65 74 20 6E 6F '..@ 1,56 get no
000080: 6D 61 66 66 0D 0A 63 6C 65 61 72 20 67 65 74 0D maff..clear get.
000090: 0A 40 20 38 2C 31 36 20 73 61 79 20 22 61 76 65 .@ 8,16 say "ave
0000A0: 7A 2D 76 6F 75 73 20 73 61 75 76 65 67 61 72 64 z-vous sauvegard
0000B0: 65 20 76 6F 74 72 65 20 66 69 63 68 69 65 72 20 e votre fichier
0000C0: 64 65 20 64 6F 6E 6E 65 65 73 20 3F 22 0D 0A 40 de donnees ?"..@
0000D0: 20 31 36 2C 31 36 20 73 61 79 20 22 72 65 70 6F 16,16 say "repo
0000E0: 6E 64 72 65 20 6E 6F 6E 20 73 69 20 76 6F 75 73 ndre non si vous
0000F0: 20 76 6F 75 6C 65 7A 20 61 62 61 6E 64 6F 6E 6E voulez abandonn
000100: 65 72 20 6C 61 20 66 6F 6E 63 74 69 6F 6E 22 0D er la fonction".
000110: 0A 40 20 31 32 2C 31 38 20 73 61 79 20 22 72 65 .@ 12,18 say "re
000120: 70 6F 6E 73 65 20 20 20 4F 3D 6F 75 69 2C 20 4E ponse O=oui, N
000130: 3D 6E 6F 6E 20 20 20 3D 3D 3D 3D 3E 22 0D 0A 73 =non ====>"..s
000140: 74 6F 72 65 20 27 66 27 20 74 6F 20 63 6F 72 72 tore 'f' to corr
000150: 65 63 74 0D 0A 64 6F 20 77 68 69 6C 65 20 63 6F ect..do while co
000160: 72 72 65 63 74 3D 27 66 27 0D 0A 73 74 6F 72 65 rrect='f'..store
000170: 20 27 4E 27 20 74 6F 20 72 65 70 0D 0A 40 20 31 'N' to rep..@ 1
000180: 32 2C 34 39 20 67 65 74 20 72 65 70 0D 0A 72 65 2,49 get rep..re
000190: 61 64 0D 0A 64 6F 20 63 61 73 65 0D 0A 63 61 73 ad..do case..cas
0001A0: 65 20 21 28 72 65 70 29 23 27 4E 27 2E 61 6E 64 e !(rep)#'N'.and
0001B0: 2E 21 28 72 65 70 29 23 27 4F 27 0D 0A 73 74 6F .!(rep)#'O'..sto
0001C0: 72 65 20 31 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A re 1 to nomess..
0001D0: 64 6F 20 61 66 66 6D 65 73 73 0D 0A 63 61 73 65 do affmess..case
0001E0: 20 21 28 72 65 70 29 3D 27 4F 27 0D 0A 73 74 6F !(rep)='O'..sto
0001F0: 72 65 20 27 74 27 20 74 6F 20 63 6F 72 72 65 63 re 't' to correc
Size : 512 (Real : 512)
000000: 64 0D 0A 20 20 20 73 74 6F 72 65 20 21 28 6C 69 d.. store !(li
000010: 73 74 63 29 20 74 6F 20 6C 69 73 74 63 0D 0A 20 stc) to listc..
000020: 20 20 69 66 20 6C 69 73 74 63 20 3D 20 27 20 27 if listc = ' '
000030: 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 34 34 .. store 44
000040: 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 20 to nomess..
000050: 20 20 64 6F 20 61 66 66 6D 65 73 73 0D 0A 20 20 do affmess..
000060: 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 73 74 6F else.. sto
000070: 72 65 20 27 74 27 20 74 6F 20 63 6F 72 72 65 63 re 't' to correc
000080: 74 0D 0A 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 t.. endif..
000090: 6F 74 68 65 72 77 69 73 65 0D 0A 20 20 20 73 74 otherwise.. st
0000A0: 6F 72 65 20 31 20 74 6F 20 6E 6F 6D 65 73 73 0D ore 1 to nomess.
0000B0: 0A 20 20 20 64 6F 20 61 66 66 6D 65 73 73 0D 0A . do affmess..
0000C0: 20 20 20 65 6E 64 63 61 73 65 0D 0A 20 20 20 69 endcase.. i
0000D0: 66 20 63 6F 72 72 65 63 74 3D 27 66 27 0D 0A 20 f correct='f'..
0000E0: 20 20 40 20 31 33 2C 30 0D 0A 20 20 20 40 20 31 @ 13,0.. @ 1
0000F0: 34 2C 30 0D 0A 20 20 20 72 65 6C 65 61 73 65 20 4,0.. release
000100: 76 61 6C 64 65 62 2C 76 61 6C 66 69 6E 2C 6C 69 valdeb,valfin,li
000110: 73 74 63 0D 0A 20 20 20 65 6E 64 69 66 0D 0A 65 stc.. endif..e
000120: 6E 64 64 6F 0D 0A 72 65 6C 65 61 73 65 20 63 6F nddo..release co
000130: 72 72 65 63 74 0D 0A 65 6E 64 69 66 0D 0A 69 66 rrect..endif..if
000140: 20 6E 6F 6D 65 73 73 3D 32 38 0D 0A 20 20 20 73 nomess=28.. s
000150: 74 6F 72 65 20 30 20 74 6F 20 6E 6F 6D 65 73 73 tore 0 to nomess
000160: 0D 0A 65 6C 73 65 0D 0A 20 20 20 69 66 20 63 68 ..else.. if ch
000170: 6F 69 78 20 23 20 27 43 27 0D 0A 20 20 20 73 74 oix # 'C'.. st
000180: 6F 72 65 20 6C 6F 6E 67 65 6E 67 2B 6D 6C 6F 6E ore longeng+mlon
000190: 20 74 6F 20 6C 6F 6E 67 65 6E 67 0D 0A 20 20 20 to longeng..
0001A0: 73 74 6F 72 65 20 63 70 74 2B 31 20 74 6F 20 63 store cpt+1 to c
0001B0: 70 74 0D 0A 20 20 20 65 6E 64 69 66 0D 0A 20 20 pt.. endif..
0001C0: 20 67 6F 74 6F 20 6E 6F 63 6F 75 72 0D 0A 20 20 goto nocour..
0001D0: 20 72 65 70 6C 61 63 65 20 76 65 72 69 66 20 77 replace verif w
0001E0: 69 74 68 20 72 65 70 2D 72 65 70 32 0D 0A 20 20 ith rep-rep2..
0001F0: 20 69 66 20 72 65 70 3D 27 43 27 2E 6F 72 2E 72 if rep='C'.or.r
Size : 512 (Real : 512)
000000: 74 0D 0A 63 61 73 65 20 21 28 72 65 70 29 3D 27 t..case !(rep)='
000010: 4E 27 0D 0A 72 65 6C 65 61 73 65 20 72 65 70 2C N'..release rep,
000020: 63 6F 72 72 65 63 74 0D 0A 72 65 74 75 72 6E 0D correct..return.
000030: 0A 65 6E 64 63 61 73 65 0D 0A 65 6E 64 64 6F 0D .endcase..enddo.
000040: 0A 72 65 6C 65 61 73 65 20 72 65 70 2C 63 6F 72 .release rep,cor
000050: 72 65 63 74 0D 0A 73 74 6F 72 65 20 27 74 27 20 rect..store 't'
000060: 74 6F 20 6D 6F 64 69 66 0D 0A 64 6F 20 73 75 70 to modif..do sup
000070: 66 69 63 68 0D 0A 64 6F 20 67 65 6E 65 0D 0A 65 fich..do gene..e
000080: 72 61 73 65 0D 0A 3F 0D 0A 3F 0D 0A 3F 20 22 53 rase..?..?..? "S
000090: 69 20 76 6F 75 73 20 76 6F 75 6C 65 7A 20 72 65 i vous voulez re
0000A0: 63 75 70 65 72 65 72 20 76 6F 73 20 64 6F 6E 6E cuperer vos donn
0000B0: 65 65 73 2C 20 73 6F 72 74 65 7A 20 64 65 20 6C ees, sortez de l
0000C0: 27 61 70 70 6C 69 63 61 74 69 6F 6E 20 71 75 61 'application qua
0000D0: 6E 64 20 76 6F 75 73 22 0D 0A 3F 20 22 73 65 72 nd vous"..? "ser
0000E0: 65 7A 20 72 65 76 65 6E 75 20 61 75 20 6D 65 6E ez revenu au men
0000F0: 75 20 65 74 20 73 75 69 76 65 7A 20 6C 65 73 20 u et suivez les
000100: 69 6E 64 69 63 61 74 69 6F 6E 73 20 64 65 20 6C indications de l
000110: 61 20 62 72 6F 63 68 75 72 65 2C 20 70 61 72 61 a brochure, para
000120: 67 72 61 70 68 65 20 33 3B 0D 0A 2E 33 32 22 0D graphe 3;...32".
000130: 0A 3F 0D 0A 3F 20 22 54 61 70 65 7A 20 73 75 72 .?..? "Tapez sur
000140: 20 75 6E 65 20 74 6F 75 63 68 65 20 70 6F 75 72 une touche pour
000150: 20 63 6F 6E 74 69 6E 75 65 72 22 0D 0A 77 61 69 continuer"..wai
000160: 74 0D 0A 72 65 74 75 72 6E 0D 0A 0D 0A 0D 0A 1A t..return.......
000170: 1A 70 61 72 20 64 65 66 61 75 74 20 28 61 3A 2C .par defaut (a:,
000180: 62 3A 20 6F 75 20 6D 3A 29 20 3A 27 0D 0A 20 20 b: ou m:) :'..
000190: 20 65 6E 64 69 66 0D 0A 20 20 20 64 6F 20 77 68 endif.. do wh
0001A0: 69 6C 65 20 63 6F 72 72 65 63 74 3D 27 66 27 0D ile correct='f'.
0001B0: 0A 20 20 20 20 20 20 40 20 35 2C 36 30 20 67 65 . @ 5,60 ge
0001C0: 74 20 75 6E 69 74 0D 0A 20 20 20 20 20 20 72 65 t unit.. re
0001D0: 61 64 0D 0A 20 20 20 20 20 20 63 6C 65 61 72 20 ad.. clear
0001E0: 67 65 74 0D 0A 20 20 20 20 20 20 69 66 20 21 28 get.. if !(
0001F0: 75 6E 69 74 29 23 27 41 3A 27 2E 61 6E 64 2E 21 unit)#'A:'.and.!
Size : 512 (Real : 512)
000000: 65 70 3D 27 47 27 2E 6F 72 2E 72 65 70 3D 27 50 ep='G'.or.rep='P
000010: 27 0D 0A 20 20 20 72 65 70 6C 61 63 65 20 76 61 '.. replace va
000020: 6C 31 20 77 69 74 68 20 6E 6F 6D 7A 0D 0A 20 20 l1 with nomz..
000030: 20 65 6E 64 69 66 0D 0A 20 20 20 69 66 20 72 65 endif.. if re
000040: 70 32 3D 27 42 27 2E 6F 72 2E 72 65 70 32 3D 27 p2='B'.or.rep2='
000050: 44 27 2E 6F 72 2E 72 65 70 32 3D 27 4D 27 0D 0A D'.or.rep2='M'..
000060: 20 20 20 20 20 20 69 66 20 6D 74 79 70 65 20 3D if mtype =
000070: 20 27 43 27 0D 0A 20 20 20 20 20 20 20 20 20 72 'C'.. r
000080: 65 70 6C 61 63 65 20 76 61 6C 32 20 77 69 74 68 eplace val2 with
000090: 20 76 61 6C 64 65 62 2C 76 61 6C 33 20 77 69 74 valdeb,val3 wit
0000A0: 68 20 76 61 6C 66 69 6E 0D 0A 20 20 20 20 20 20 h valfin..
0000B0: 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20 69 else.. i
0000C0: 66 20 6E 64 65 63 20 3D 20 30 0D 0A 20 20 20 20 f ndec = 0..
0000D0: 20 20 20 20 20 20 20 20 72 65 70 6C 61 63 65 20 replace
0000E0: 76 61 6C 32 20 77 69 74 68 20 73 74 72 28 76 61 val2 with str(va
0000F0: 6C 64 65 62 2C 6E 62 65 6E 74 29 2C 76 61 6C 33 ldeb,nbent),val3
000100: 20 77 69 74 68 20 73 74 72 28 76 61 6C 66 69 6E with str(valfin
000110: 2C 6E 62 65 6E 74 29 0D 0A 20 20 20 20 20 20 20 ,nbent)..
000120: 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 else..
000130: 20 20 20 20 72 65 70 6C 61 63 65 20 76 61 6C 32 replace val2
000140: 20 77 69 74 68 20 73 74 72 28 76 61 6C 64 65 62 with str(valdeb
000150: 2C 6E 62 65 6E 74 2B 6E 64 65 63 2B 31 2C 6E 64 ,nbent+ndec+1,nd
000160: 65 63 29 2C 76 61 6C 33 20 77 69 74 68 20 3B 0D ec),val3 with ;.
000170: 0A 20 20 20 20 20 20 20 20 20 20 20 20 73 74 72 . str
000180: 28 76 61 6C 66 69 6E 2C 6E 62 65 6E 74 2B 6E 64 (valfin,nbent+nd
000190: 65 63 2B 31 2C 6E 64 65 63 29 0D 0A 20 20 20 20 ec+1,ndec)..
0001A0: 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 endif..
0001B0: 20 20 65 6E 64 69 66 0D 0A 20 20 20 65 6E 64 69 endif.. endi
0001C0: 66 0D 0A 20 20 20 69 66 20 72 65 70 32 3D 27 4C f.. if rep2='L
0001D0: 27 0D 0A 20 20 20 20 20 20 72 65 70 6C 61 63 65 '.. replace
0001E0: 20 76 61 6C 32 20 77 69 74 68 20 6C 69 73 74 63 val2 with listc
0001F0: 0D 0A 20 20 20 65 6E 64 69 66 0D 0A 65 6E 64 69 .. endif..endi
Size : 512 (Real : 512)
000000: 2A 20 6D 61 6A 20 20 20 20 20 20 20 70 72 6F 67 * maj prog
000010: 72 61 6D 6D 65 20 64 65 20 6D 69 73 65 20 61 20 ramme de mise a
000020: 6A 6F 75 72 20 64 75 20 66 69 63 68 69 65 72 3A jour du fichier:
000030: 20 63 72 65 61 74 69 6F 6E 2C 6D 6F 64 69 66 69 creation,modifi
000040: 63 61 74 69 6F 6E 20 6F 75 0D 0A 2A 20 73 75 70 cation ou..* sup
000050: 70 72 65 73 73 69 6F 6E 0D 0A 0D 0A 73 74 6F 72 pression....stor
000060: 65 20 30 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 73 e 0 to nomess..s
000070: 74 6F 72 65 20 27 66 27 20 74 6F 20 63 6F 72 72 tore 'f' to corr
000080: 65 63 74 0D 0A 2A 20 61 66 66 69 63 68 65 72 20 ect..* afficher
000090: 6C 65 73 20 7A 6F 6E 65 73 20 6E 6F 6E 20 63 6C les zones non cl
0000A0: 65 0D 0A 64 6F 20 77 68 69 6C 65 20 63 6F 72 72 e..do while corr
0000B0: 65 63 74 3D 27 66 27 0D 0A 20 20 20 73 65 6C 65 ect='f'.. sele
0000C0: 63 74 20 70 72 69 6D 61 72 79 0D 0A 20 20 20 75 ct primary.. u
0000D0: 73 65 20 26 66 72 65 66 20 69 6E 64 65 78 20 26 se &fref index &
0000E0: 78 63 6C 65 0D 0A 20 20 20 73 74 6F 72 65 20 6E xcle.. store n
0000F0: 62 7A 6F 6E 70 2B 31 20 74 6F 20 76 31 0D 0A 20 bzonp+1 to v1..
000100: 20 20 2A 20 73 65 20 70 6F 73 69 74 69 6F 6E 6E * se positionn
000110: 65 72 20 73 75 72 20 6C 61 20 70 72 65 6D 69 65 er sur la premie
000120: 72 65 20 7A 6F 6E 65 20 6E 6F 6E 20 63 6C 65 20 re zone non cle
000130: 73 69 20 65 6C 6C 65 20 65 78 69 73 74 65 0D 0A si elle existe..
000140: 20 20 20 73 74 6F 72 65 20 73 74 72 28 76 31 2C store str(v1,
000150: 32 2C 30 29 20 74 6F 20 63 6C 65 0D 0A 20 20 20 2,0) to cle..
000160: 66 69 6E 64 20 26 63 6C 65 0D 0A 20 20 20 72 65 find &cle.. re
000170: 6C 65 61 73 65 20 63 6C 65 0D 0A 20 20 20 69 66 lease cle.. if
000180: 20 23 20 23 20 30 0D 0A 20 20 20 20 20 20 73 65 # # 0.. se
000190: 74 20 69 6E 74 65 6E 73 69 74 79 20 6F 66 66 0D t intensity off.
0001A0: 0A 20 20 20 20 20 20 64 6F 20 77 68 69 6C 65 20 . do while
0001B0: 2E 6E 6F 74 2E 65 6F 66 0D 0A 20 20 20 20 20 20 .not.eof..
0001C0: 20 20 20 73 74 6F 72 65 20 27 6D 7A 6F 6E 27 2D store 'mzon'-
0001D0: 73 74 72 28 6E 6F 7A 2C 31 2B 69 6E 74 28 6E 6F str(noz,1+int(no
0001E0: 7A 2F 31 30 29 2D 69 6E 74 28 6E 6F 7A 2F 32 30 z/10)-int(noz/20
0001F0: 29 2D 69 6E 74 28 6E 6F 7A 2F 33 30 29 29 20 74 )-int(noz/30)) t
Size : 512 (Real : 512)
000000: 66 0D 0A 72 65 6C 65 61 73 65 20 72 65 70 2C 72 f..release rep,r
000010: 65 70 32 2C 6E 6F 6D 7A 2C 76 61 6C 64 65 62 2C ep2,nomz,valdeb,
000020: 76 61 6C 66 69 6E 2C 6C 69 73 74 63 2C 6E 62 65 valfin,listc,nbe
000030: 6E 74 2C 6E 64 65 63 0D 0A 72 65 74 75 72 6E 0D nt,ndec..return.
000040: 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D ................
000050: 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D ................
000060: 0A 0D 0A 1A 1A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D ................
000070: 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D ................
000080: 0A 0D 0A 0D 0A 1A 1A 0D 0A 0D 0A 0D 0A 0D 0A 0D ................
000090: 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 1A 1A 0D ................
0000A0: 0A 72 65 6C 65 61 73 65 20 72 65 70 2C 72 65 70 .release rep,rep
0000B0: 32 2C 6E 6F 6D 7A 2C 76 61 6C 64 65 62 2C 76 61 2,nomz,valdeb,va
0000C0: 6C 66 69 6E 2C 6C 69 73 74 63 0D 0A 72 65 74 75 lfin,listc..retu
0000D0: 72 6E 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A rn..............
0000E0: 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A ................
0000F0: 0D 0A 0D 0A 0D 0A 1A 1A 0D 0A 0D 0A 0D 0A 0D 0A ................
000100: 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A ................
000110: 1A 1A 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 .. endif..
000120: 20 20 20 20 20 20 72 65 6C 65 61 73 65 20 6E 62 release nb
000130: 65 6E 74 2C 6E 64 65 63 0D 0A 20 20 20 20 20 20 ent,ndec..
000140: 65 6E 64 69 66 0D 0A 20 20 20 65 6E 64 69 66 0D endif.. endif.
000150: 0A 20 20 20 69 66 20 72 65 70 32 3D 27 4C 27 0D . if rep2='L'.
000160: 0A 20 20 20 20 20 20 72 65 70 6C 61 63 65 20 76 . replace v
000170: 61 6C 32 20 77 69 74 68 20 6C 69 73 74 63 0D 0A al2 with listc..
000180: 20 20 20 65 6E 64 69 66 0D 0A 65 6E 64 69 66 0D endif..endif.
000190: 0A 72 65 6C 65 61 73 65 20 72 65 70 2C 72 65 70 .release rep,rep
0001A0: 32 2C 6E 6F 6D 7A 2C 76 61 6C 64 65 62 2C 76 61 2,nomz,valdeb,va
0001B0: 6C 66 69 6E 2C 6C 69 73 74 63 0D 0A 72 65 74 75 lfin,listc..retu
0001C0: 72 6E 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A rn..............
0001D0: 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A ................
0001E0: 0D 0A 0D 0A 0D 0A 1A 1A 0D 0A 0D 0A 0D 0A 0D 0A ................
0001F0: 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 1A 1A 66 69 ..............fi
Size : 512 (Real : 512)
000000: 6F 20 6D 7A 6F 6E 0D 0A 20 20 20 20 20 20 20 20 o mzon..
000010: 20 69 66 20 6E 6F 6D 65 73 73 3D 30 0D 0A 20 20 if nomess=0..
000020: 20 20 20 20 20 20 20 20 20 20 69 66 20 74 65 73 if tes
000030: 74 3D 27 64 27 0D 0A 20 20 20 20 20 20 20 20 20 t='d'..
000040: 20 20 20 20 20 20 69 66 20 76 65 72 69 66 3D 22 if verif="
000050: 4E 41 22 2E 61 6E 64 2E 66 69 65 6C 64 3A 74 79 NA".and.field:ty
000060: 70 65 23 22 4E 22 0D 0A 20 20 20 20 20 20 20 20 pe#"N"..
000070: 20 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 store
000080: 74 61 62 76 2D 27 4E 27 20 74 6F 20 74 61 62 76 tabv-'N' to tabv
000090: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
0000A0: 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20 else..
0000B0: 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 74 store t
0000C0: 61 62 76 2D 22 4F 22 20 74 6F 20 74 61 62 76 0D abv-"O" to tabv.
0000D0: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
0000E0: 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 20 20 20 endif..
0000F0: 20 20 20 20 20 20 40 20 6C 74 2C 63 74 20 73 61 @ lt,ct sa
000100: 79 20 74 65 78 74 65 0D 0A 20 20 20 20 20 20 20 y texte..
000110: 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 endif..
000120: 20 20 20 20 20 20 20 20 64 6F 20 69 6E 69 74 7A do initz
000130: 6F 6E 65 0D 0A 20 20 20 20 20 20 20 20 20 65 6C one.. el
000140: 73 65 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 se..
000150: 64 6F 20 63 61 73 65 0D 0A 20 20 20 20 20 20 20 do case..
000160: 20 20 20 20 20 20 20 20 63 61 73 65 20 24 28 76 case $(v
000170: 65 72 69 66 2C 32 2C 31 29 3D 27 44 27 0D 0A 20 erif,2,1)='D'..
000180: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 74 st
000190: 6F 72 65 20 22 70 69 63 74 75 72 65 20 27 39 39 ore "picture '99
0001A0: 2F 39 39 2F 39 39 27 22 20 74 6F 20 70 69 63 0D /99/99'" to pic.
0001B0: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
0001C0: 63 61 73 65 20 24 28 76 65 72 69 66 2C 32 2C 31 case $(verif,2,1
0001D0: 29 3D 27 4D 27 0D 0A 20 20 20 20 20 20 20 20 20 )='M'..
0001E0: 20 20 20 20 20 20 73 74 6F 72 65 20 22 70 69 63 store "pic
0001F0: 74 75 72 65 20 27 39 39 2F 39 39 27 22 20 74 6F ture '99/99'" to
Size : 512 (Real : 512)
000000: 6D 7A 6F 6E 33 30 2C 6D 7A 6F 6E 33 31 2C 6D 7A mzon30,mzon31,mz
000010: 6F 6E 33 32 0D 0A 73 65 6C 65 63 74 20 70 72 69 on32..select pri
000020: 6D 61 72 79 0D 0A 75 73 65 0D 0A 73 65 6C 65 63 mary..use..selec
000030: 74 20 73 65 63 6F 6E 64 61 72 79 0D 0A 75 73 65 t secondary..use
000040: 0D 0A 72 65 74 75 72 6E 0D 0A 0D 0A 0D 0A 0D 0A ..return........
000050: 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A ................
000060: 0D 0A 0D 0A 1A 1A 20 20 20 20 20 20 20 20 73 74 ...... st
000070: 6F 72 65 20 21 28 26 6D 7A 6F 6E 29 20 74 6F 20 ore !(&mzon) to
000080: 26 6D 7A 6F 6E 0D 0A 20 20 20 20 20 20 65 6E 64 &mzon.. end
000090: 69 66 0D 0A 20 20 20 20 20 20 73 65 6C 65 63 74 if.. select
0000A0: 20 73 65 63 6F 6E 64 61 72 79 0D 0A 20 20 20 20 secondary..
0000B0: 20 20 72 65 70 6C 61 63 65 20 26 6E 6F 6D 72 65 replace &nomre
0000C0: 66 20 77 69 74 68 20 26 6D 7A 6F 6E 0D 0A 20 20 f with &mzon..
0000D0: 20 20 20 20 73 65 6C 65 63 74 20 70 72 69 6D 61 select prima
0000E0: 72 79 0D 0A 20 20 20 20 20 20 73 6B 69 70 0D 0A ry.. skip..
0000F0: 20 20 20 65 6E 64 64 6F 0D 0A 65 6E 64 69 66 0D enddo..endif.
000100: 0A 72 65 6C 65 61 73 65 20 6E 6F 7A 6F 6E 65 0D .release nozone.
000110: 0A 72 65 6C 65 61 73 65 20 6E 6F 6D 72 65 66 2C .release nomref,
000120: 70 69 63 2C 63 6F 72 72 65 63 74 2C 6D 7A 6F 6E pic,correct,mzon
000130: 2C 6D 7A 6F 6E 31 2C 6D 7A 6F 6E 32 2C 6D 7A 6F ,mzon1,mzon2,mzo
000140: 6E 33 2C 6D 7A 6F 6E 34 2C 6D 7A 6F 6E 35 2C 6D n3,mzon4,mzon5,m
000150: 7A 6F 6E 36 2C 6D 7A 6F 6E 37 0D 0A 72 65 6C 65 zon6,mzon7..rele
000160: 61 73 65 20 6D 7A 6F 6E 38 2C 6D 7A 6F 6E 39 2C ase mzon8,mzon9,
000170: 6D 7A 6F 6E 31 30 2C 6D 7A 6F 6E 31 31 2C 6D 7A mzon10,mzon11,mz
000180: 6F 6E 31 32 2C 6D 7A 6F 6E 31 33 2C 6D 7A 6F 6E on12,mzon13,mzon
000190: 31 34 2C 6D 7A 6F 6E 31 35 2C 6D 7A 6F 6E 31 36 14,mzon15,mzon16
0001A0: 2C 6D 7A 6F 6E 31 37 0D 0A 72 65 6C 65 61 73 65 ,mzon17..release
0001B0: 20 6D 7A 6F 6E 31 38 2C 6D 7A 6F 6E 31 39 2C 6D mzon18,mzon19,m
0001C0: 7A 6F 6E 32 30 2C 6D 7A 6F 6E 32 31 2C 6D 7A 6F zon20,mzon21,mzo
0001D0: 6E 32 32 2C 6D 7A 6F 6E 32 33 2C 6D 7A 6F 6E 32 n22,mzon23,mzon2
0001E0: 34 2C 6D 7A 6F 6E 32 35 2C 6D 7A 6F 6E 32 36 0D 4,mzon25,mzon26.
0001F0: 0A 72 65 6C 65 61 73 65 20 6D 7A 6F 6E 32 37 2C .release mzon27,
Size : 512 (Real : 512)
000000: 20 70 69 63 0D 0A 20 20 20 20 20 20 20 20 20 20 pic..
000010: 20 20 20 20 20 6F 74 68 65 72 77 69 73 65 0D 0A otherwise..
000020: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 s
000030: 74 6F 72 65 20 22 20 22 20 74 6F 20 70 69 63 0D tore " " to pic.
000040: 0A 20 20 20 20 20 20 20 20 20 20 20 20 65 6E 64 . end
000050: 63 61 73 65 0D 0A 20 20 20 20 20 20 20 20 20 65 case.. e
000060: 6E 64 69 66 0D 0A 20 20 20 20 20 20 20 20 20 40 ndif.. @
000070: 20 6C 73 2C 63 73 20 67 65 74 20 26 6D 7A 6F 6E ls,cs get &mzon
000080: 20 26 70 69 63 0D 0A 20 20 20 20 20 20 20 20 20 &pic..
000090: 73 6B 69 70 0D 0A 20 20 20 20 20 20 65 6E 64 64 skip.. endd
0000A0: 6F 0D 0A 20 20 20 20 20 20 72 65 6C 65 61 73 65 o.. release
0000B0: 20 70 69 63 0D 0A 20 20 20 20 20 20 73 65 74 20 pic.. set
0000C0: 69 6E 74 65 6E 73 69 74 79 20 6F 6E 0D 0A 20 20 intensity on..
0000D0: 20 20 20 20 69 66 20 63 68 6F 69 78 20 3D 20 27 if choix = '
0000E0: 33 27 0D 0A 20 20 20 20 20 20 20 20 20 2A 20 6E 3'.. * n
0000F0: 65 20 70 61 73 20 64 65 6D 61 6E 64 65 72 20 6C e pas demander l
000100: 61 20 73 61 69 73 69 65 0D 0A 20 20 20 20 20 20 a saisie..
000110: 20 20 20 63 6C 65 61 72 20 67 65 74 0D 0A 20 20 clear get..
000120: 20 20 20 20 20 20 20 72 65 6C 65 61 73 65 20 76 release v
000130: 31 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 1.. stor
000140: 65 20 27 74 27 20 74 6F 20 63 6F 72 72 65 63 74 e 't' to correct
000150: 0D 0A 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 .. else..
000160: 20 20 20 20 20 20 20 72 65 61 64 0D 0A 20 20 20 read..
000170: 20 20 20 20 20 20 63 6C 65 61 72 20 67 65 74 0D clear get.
000180: 0A 20 20 20 20 20 20 20 20 20 40 20 6C 69 67 6D . @ ligm
000190: 31 2C 30 20 73 61 79 20 22 76 6F 75 6C 65 7A 2D 1,0 say "voulez-
0001A0: 76 6F 75 73 20 6C 65 20 63 6F 6E 74 72 6F 6C 65 vous le controle
0001B0: 20 64 65 20 76 6F 73 20 7A 6F 6E 65 73 20 28 4F de vos zones (O
0001C0: 3D 6F 75 69 2C 4E 3D 6E 6F 6E 29 20 3A 22 0D 0A =oui,N=non) :"..
0001D0: 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20 27 store '
0001E0: 4F 27 20 74 6F 20 72 65 70 0D 0A 20 20 20 20 20 O' to rep..
0001F0: 20 20 20 20 40 20 6C 69 67 6D 31 2C 35 38 20 67 @ ligm1,58 g
Size : 512 (Real : 512)
000000: 72 24 2B 2B EB 2A EE 2F 2B 2B EB CD 7E 38 2A E6 r$++.*./++..~8*.
000010: 2F 22 5A 7C CD 09 24 3A FB 2F 4F 3A F6 2F 91 FA /"Z|..$:./O:./..
000020: 31 1F 32 F6 2F 2A E6 2F 22 F0 2F CD 35 24 CD 4A 1.2./*./"./.5$.J
000030: 24 2A E6 2F 23 22 E6 2F 3E FF 32 FD 2F 2A 6F 30 $*./#"./>.2./*o0
000040: EB 2A 69 30 CD C0 36 C2 AE 1F 2A 6B 30 23 EB 21 .*i0..6...*k0#.!
000050: F4 7B 3A E9 2F 4F CD 78 38 2A EE 2F 3A E8 2F CD .{:./O.x8*./:./.
000060: BB 36 EB 2A 5A 7C EB CD E4 36 3E 01 32 FC 2F 2A .6.*Z|...6>.2./*
000070: E6 2F CD 09 24 2A E6 2F 22 E4 2F 23 22 E6 2F CD ./..$*./"./#"./.
000080: A8 24 2A 6F 30 EB 2A F3 2F CD D8 36 44 4D 2A F3 .$*o0.*./..6DM*.
000090: 2F 2B 54 5D 13 13 13 CD 90 38 EB 23 22 69 30 2A /+T].....8.#"i0*
0000A0: E4 2F EB 2A 6F 30 CD E4 36 36 01 D1 C1 C9 CD 4A ./.*o0..66.....J
0000B0: 24 CD D4 23 CD 6F 24 C3 43 1E CD 98 24 C5 D5 E5 $..#.o$.C...$...
0000C0: CD 01 23 D1 7C B5 CA D8 1F CD C0 36 CA D8 1F CD ..#.|......6....
0000D0: E9 21 D2 C4 1F 21 00 00 D1 C1 C9 C3 F9 1F CD 98 .!...!..........
0000E0: 24 22 F7 2F C5 D5 CD 43 21 CD E3 24 21 F8 7B 3A $"./...C!..$!.{:
0000F0: DE 2F 37 CD B2 20 22 F9 2F 2A F9 2F EB 2A F7 2F ./7.. "./*./.*./
000100: CD C0 36 CA 23 20 CD E9 21 DA 20 20 22 F9 2F CD ..6.# ..!. "./.
000110: 6F 24 11 F8 7B EB 3A DE 2F 4F CD FA 24 CA F9 1F o$..{.:./O..$...
000120: 21 00 00 D1 C1 C9 CD 98 24 C5 D5 CD BB 23 CD 4A !.......$....#.J
000130: 24 DA AE 20 CD D4 23 3A F6 2F 4F 3A FC 2F 91 CA $.. ..#:./O:./..
000140: 6A 20 4F CD EA 24 44 4D 03 03 CD 6F 24 2B 2B E5 j O..$DM...o$++.
000150: 3A F6 2F 3C CD 72 24 2B 2B D1 CD 7E 38 21 FC 2F :./<.r$++..~8!./
000160: 35 CD 35 24 CD 06 24 D1 C1 C9 21 F6 2F 35 21 FC 5.5$..$...!./5!.
000170: 2F 35 CD 06 24 3A FC 2F B7 CA 2E 20 CD 6F 24 11 /5..$:./... .o$.
000180: F6 7B 3A E8 2F 4F CD 78 38 CD 4A 24 DA AE 20 CD .{:./O.x8.J$.. .
000190: D4 23 CD 6F 24 EB 21 F6 7B 3A E8 2F 4F CD 78 38 .#.o$.!.{:./O.x8
0001A0: CD 06 24 3A F6 2F 4F 3A FC 2F B9 CA 7C 20 D1 C1 ..$:./O:./..| ..
0001B0: C9 B7 C5 D5 4F 17 32 F5 2F 22 EC 2F CD BB 23 2A ....O.2./"./..#*
0001C0: 6F 30 22 69 30 2A E4 2F 22 F0 2F CD D7 23 3A FC o0"i0*./"./..#:.
0001D0: 2F B7 CA 37 21 3E 01 32 F6 2F 2A 6B 30 11 03 00 /..7!>.2./*k0...
0001E0: 19 EB 2A EC 2F CD FA 24 CA 0E 21 DA F4 20 CD D2 ..*./..$..!.. ..
0001F0: 24 D2 E2 20 EB 2B 2B CD E9 36 7A B3 CA 37 21 EB $.. .++..6z..7!.
Size : 512 (Real : 512)
000000: 65 74 20 72 65 70 0D 0A 20 20 20 20 20 20 20 20 et rep..
000010: 20 72 65 61 64 0D 0A 20 20 20 20 20 20 20 20 20 read..
000020: 63 6C 65 61 72 20 67 65 74 0D 0A 20 20 20 20 20 clear get..
000030: 20 20 20 20 40 20 6C 69 67 6D 31 2C 30 0D 0A 20 @ ligm1,0..
000040: 20 20 20 20 20 20 20 20 69 66 20 21 28 72 65 70 if !(rep
000050: 29 3D 27 4E 27 0D 0A 20 20 20 20 20 20 20 20 20 )='N'..
000060: 20 20 20 72 65 6C 65 61 73 65 20 76 31 0D 0A 20 release v1..
000070: 20 20 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 store
000080: 20 27 74 27 20 74 6F 20 63 6F 72 72 65 63 74 0D 't' to correct.
000090: 0A 20 20 20 20 20 20 20 20 20 65 6C 73 65 0D 0A . else..
0000A0: 20 20 20 20 20 20 20 20 20 20 20 20 2A 20 76 65 * ve
0000B0: 72 69 66 69 65 72 20 6C 65 73 20 7A 6F 6E 65 73 rifier les zones
0000C0: 20 6E 6F 6E 20 63 6C 65 73 0D 0A 20 20 20 20 20 non cles..
0000D0: 20 20 20 20 20 20 20 72 65 6C 65 61 73 65 20 72 release r
0000E0: 65 70 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 ep..
0000F0: 73 74 6F 72 65 20 39 39 20 74 6F 20 76 32 0D 0A store 99 to v2..
000100: 20 20 20 20 20 20 20 20 20 20 20 20 64 6F 20 76 do v
000110: 65 72 69 66 0D 0A 20 20 20 20 20 20 20 20 20 20 erif..
000120: 20 20 69 66 20 6E 6F 6D 65 73 73 20 3D 20 30 0D if nomess = 0.
000130: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
000140: 73 74 6F 72 65 20 27 74 27 20 74 6F 20 63 6F 72 store 't' to cor
000150: 72 65 63 74 0D 0A 20 20 20 20 20 20 20 20 20 20 rect..
000160: 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 else..
000170: 20 20 20 20 20 20 20 64 6F 20 61 66 66 6D 65 73 do affmes
000180: 73 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 65 s.. e
000190: 6E 64 69 66 0D 0A 20 20 20 20 20 20 20 20 20 65 ndif.. e
0001A0: 6E 64 69 66 0D 0A 20 20 20 20 20 20 20 20 20 72 ndif.. r
0001B0: 65 6C 65 61 73 65 20 72 65 70 0D 0A 20 20 20 20 elease rep..
0001C0: 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 65 6C 73 endif.. els
0001D0: 65 0D 0A 20 20 20 20 20 20 72 65 6C 65 61 73 65 e.. release
0001E0: 20 76 31 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 v1.. store
0001F0: 20 27 74 27 20 74 6F 20 63 6F 72 72 65 63 74 0D 't' to correct.
Size : 512 (Real : 512)
000000: 02 07 00 02 0C 56 BA 00 4E 4F 4D 00 00 00 00 00 .....V..NOM.....
000010: 00 00 00 43 0C AA 76 00 50 52 45 4E 4F 4D 00 00 ...C..v.PRENOM..
000020: 00 00 00 43 0C B6 76 00 44 45 52 56 49 53 49 54 ...C..v.DERVISIT
000030: 45 00 00 43 08 C2 76 00 50 52 4F 56 49 53 49 54 E..C..v.PROVISIT
000040: 45 00 00 43 08 CA 76 00 4C 49 45 55 00 00 00 00 E..C..v.LIEU....
000050: 00 00 00 43 01 D2 76 00 42 45 53 4F 49 4E 00 00 ...C..v.BESOIN..
000060: 00 00 00 43 37 D3 76 00 56 45 4E 54 45 00 00 00 ...C7.v.VENTE...
000070: 00 00 00 4E 06 0A 77 00 41 44 52 45 53 53 45 00 ...N..w.ADRESSE.
000080: 00 00 00 43 16 10 77 00 43 4F 44 45 50 4F 53 54 ...C..w.CODEPOST
000090: 00 00 00 4E 05 26 77 00 56 49 4C 4C 45 00 00 00 ...N.&w.VILLE...
0000A0: 00 00 00 43 0C 2B 77 00 54 45 4C 00 00 00 00 00 ...C.+w.TEL.....
0000B0: 00 00 00 43 10 37 77 00 50 52 4F 46 00 00 00 00 ...C.7w.PROF....
0000C0: 00 00 00 43 0B 47 77 00 4D 41 52 51 55 45 00 00 ...C.Gw.MARQUE..
0000D0: 00 00 00 43 0B 52 77 00 54 59 50 45 00 00 00 00 ...C.Rw.TYPE....
0000E0: 00 00 00 43 06 5D 77 00 0D 00 00 00 00 00 00 00 ...C.]w.........
0000F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000100: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000110: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000120: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000140: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000150: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
Size : 512 (Real : 512)
000000: 0A 20 20 20 65 6E 64 69 66 0D 0A 65 6E 64 64 6F . endif..enddo
000010: 0D 0A 0D 0A 2A 20 74 6F 75 74 20 65 73 74 20 63 ....* tout est c
000020: 6F 72 72 65 63 74 2E 20 65 63 72 69 72 65 20 64 orrect. ecrire d
000030: 61 6E 73 20 6C 65 20 66 69 63 68 69 65 72 0D 0A ans le fichier..
000040: 69 66 20 63 68 6F 69 78 3D 27 33 27 0D 0A 20 20 if choix='3'..
000050: 20 2A 20 64 65 6D 61 6E 64 65 72 20 63 6F 6E 66 * demander conf
000060: 69 72 6D 61 74 69 6F 6E 20 73 75 70 70 72 65 73 irmation suppres
000070: 73 69 6F 6E 0D 0A 20 20 20 64 6F 20 63 6F 6E 66 sion.. do conf
000080: 73 75 70 0D 0A 20 20 20 69 66 20 21 28 63 6F 6E sup.. if !(con
000090: 66 69 72 6D 29 3D 27 4E 27 0D 0A 20 20 20 20 20 firm)='N'..
0000A0: 20 72 65 6C 65 61 73 65 20 63 6F 6E 66 69 72 6D release confirm
0000B0: 0D 0A 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 .. else..
0000C0: 20 72 65 6C 65 61 73 65 20 63 6F 6E 66 69 72 6D release confirm
0000D0: 0D 0A 20 20 20 20 20 20 73 65 6C 65 63 74 20 73 .. select s
0000E0: 65 63 6F 6E 64 61 72 79 0D 0A 20 20 20 20 20 20 econdary..
0000F0: 64 65 6C 65 0D 0A 20 20 20 20 20 20 70 61 63 6B dele.. pack
000100: 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 30 20 .. store 0
000110: 74 6F 20 6E 6F 63 6F 75 72 0D 0A 20 20 20 65 6E to nocour.. en
000120: 64 69 66 0D 0A 65 6C 73 65 0D 0A 20 20 20 73 65 dif..else.. se
000130: 6C 65 63 74 20 73 65 63 6F 6E 64 61 72 79 0D 0A lect secondary..
000140: 20 20 20 69 66 20 63 68 6F 69 78 20 3D 20 27 31 if choix = '1
000150: 27 0D 0A 20 20 20 20 20 20 61 70 70 65 6E 64 20 '.. append
000160: 62 6C 61 6E 6B 0D 0A 20 20 20 20 20 20 73 74 6F blank.. sto
000170: 72 65 20 23 20 74 6F 20 6E 6F 63 6F 75 72 0D 0A re # to nocour..
000180: 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 73 65 6C endif.. sel
000190: 65 63 74 20 70 72 69 6D 61 72 79 0D 0A 20 20 20 ect primary..
0001A0: 73 65 74 20 69 6E 64 65 78 20 74 6F 0D 0A 20 20 set index to..
0001B0: 20 67 6F 74 6F 20 74 6F 70 0D 0A 20 20 20 64 6F goto top.. do
0001C0: 20 77 68 69 6C 65 20 2E 6E 6F 74 2E 65 6F 66 0D while .not.eof.
0001D0: 0A 20 20 20 20 20 20 73 74 6F 72 65 20 27 6D 7A . store 'mz
0001E0: 6F 6E 27 2D 73 74 72 28 6E 6F 7A 2C 31 2B 69 6E on'-str(noz,1+in
0001F0: 74 28 6E 6F 7A 2F 31 30 29 2D 69 6E 74 28 6E 6F t(noz/10)-int(no
Size : 512 (Real : 512)
000000: 00 00 00 00 00 00 00 00 00 20 44 55 52 41 4E 54 ......... DURANT
000010: 20 20 20 20 20 20 4C 55 43 20 20 20 20 20 20 20 LUC
000020: 20 20 30 38 2F 30 32 2F 38 36 30 31 2F 30 31 2F 08/02/8601/01/
000030: 38 37 4E 67 65 73 74 69 6F 6E 20 64 65 20 66 69 87Ngestion de fi
000040: 63 68 69 65 72 2C 74 72 61 69 74 65 6D 65 6E 74 chier,traitement
000050: 20 64 65 20 74 65 78 74 65 20 20 20 20 20 20 20 de texte
000060: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 0
000070: 31 32 2C 52 55 45 20 44 45 20 4C 41 20 47 41 52 12,RUE DE LA GAR
000080: 45 20 20 20 20 20 38 38 30 30 30 45 50 49 4E 41 E 88000EPINA
000090: 4C 20 20 20 20 20 20 32 39 2E 38 32 2E 31 39 2E L 29.82.19.
0000A0: 38 38 20 20 20 20 20 4D 45 4E 55 49 53 49 45 52 88 MENUISIER
0000B0: 20 20 41 4D 53 54 52 41 44 20 20 20 20 50 43 57 AMSTRAD PCW
0000C0: 20 38 32 20 42 41 52 54 48 45 52 20 20 20 20 20 82 BARTHER
0000D0: 42 45 52 4E 41 52 44 20 20 20 20 20 31 32 2F 30 BERNARD 12/0
0000E0: 32 2F 38 36 31 38 2F 30 33 2F 38 36 42 4C 4F 47 2/8618/03/86BLOG
0000F0: 49 43 49 45 4C 20 47 45 53 54 49 4F 4E 20 44 45 ICIEL GESTION DE
000100: 20 46 49 43 48 49 45 52 2C 20 43 4F 4D 50 54 41 FICHIER, COMPTA
000110: 42 49 4C 49 54 45 20 20 20 20 20 20 20 20 20 20 BILITE
000120: 20 20 20 20 20 20 20 20 20 30 31 32 2C 20 52 55 012, RU
000130: 45 20 44 45 20 4C 41 20 47 41 52 45 20 20 20 20 E DE LA GARE
000140: 38 38 30 30 30 45 50 49 4E 41 4C 20 20 20 20 20 88000EPINAL
000150: 20 32 39 2E 38 32 2E 31 39 2E 38 38 20 20 20 20 29.82.19.88
000160: 20 4D 45 4E 55 49 53 49 45 52 20 20 41 4D 53 54 MENUISIER AMST
000170: 52 41 44 20 20 20 20 38 32 35 36 20 20 20 47 55 RAD 8256 GU
000180: 49 54 59 20 20 20 20 20 20 20 4A 2E 4C 55 43 20 ITY J.LUC
000190: 20 20 20 20 20 20 31 30 2F 30 32 2F 38 36 31 31 10/02/8611
0001A0: 2F 30 33 2F 38 36 4E 47 45 53 54 49 4F 4E 20 44 /03/86NGESTION D
0001B0: 45 20 43 41 42 49 4E 45 54 20 4D 45 44 49 43 41 E CABINET MEDICA
0001C0: 4C 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 L
0001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 1
0001E0: 32 30 30 30 32 33 2C 51 55 41 49 20 44 45 53 20 200023,QUAI DES
0001F0: 34 20 56 45 4E 54 53 20 20 20 35 34 30 30 30 4E 4 VENTS 54000N
Size : 512 (Real : 512)
000000: 7A 2F 32 30 29 2D 69 6E 74 28 6E 6F 7A 2F 33 30 z/20)-int(noz/30
000010: 29 29 20 74 6F 20 6D 7A 6F 6E 0D 0A 20 20 20 20 )) to mzon..
000020: 20 20 73 74 6F 72 65 20 66 69 65 6C 64 3A 6E 61 store field:na
000030: 6D 65 20 74 6F 20 6E 6F 6D 72 65 66 0D 0A 20 20 me to nomref..
000040: 20 20 20 20 69 66 20 66 69 65 6C 64 3A 74 79 70 if field:typ
000050: 65 3D 22 43 22 0D 0A 20 20 20 20 20 20 20 20 20 e="C"..
000060: 73 74 6F 72 65 20 21 28 26 6D 7A 6F 6E 29 20 74 store !(&mzon) t
000070: 6F 20 26 6D 7A 6F 6E 0D 0A 20 20 20 20 20 20 65 o &mzon.. e
000080: 6E 64 69 66 0D 0A 20 20 20 20 20 20 73 65 6C 65 ndif.. sele
000090: 63 74 20 73 65 63 6F 6E 64 61 72 79 0D 0A 20 20 ct secondary..
0000A0: 20 20 20 20 72 65 70 6C 61 63 65 20 26 6E 6F 6D replace &nom
0000B0: 72 65 66 20 77 69 74 68 20 26 6D 7A 6F 6E 0D 0A ref with &mzon..
0000C0: 20 20 20 20 20 20 73 65 6C 65 63 74 20 70 72 69 select pri
0000D0: 6D 61 72 79 0D 0A 20 20 20 20 20 20 73 6B 69 70 mary.. skip
0000E0: 0D 0A 20 20 20 65 6E 64 64 6F 0D 0A 65 6E 64 69 .. enddo..endi
0000F0: 66 0D 0A 72 65 6C 65 61 73 65 20 6E 6F 7A 6F 6E f..release nozon
000100: 65 0D 0A 72 65 6C 65 61 73 65 20 6E 6F 6D 72 65 e..release nomre
000110: 66 2C 70 69 63 2C 63 6F 72 72 65 63 74 2C 6D 7A f,pic,correct,mz
000120: 6F 6E 2C 6D 7A 6F 6E 31 2C 6D 7A 6F 6E 32 2C 6D on,mzon1,mzon2,m
000130: 7A 6F 6E 33 2C 6D 7A 6F 6E 34 2C 6D 7A 6F 6E 35 zon3,mzon4,mzon5
000140: 2C 6D 7A 6F 6E 36 2C 6D 7A 6F 6E 37 0D 0A 72 65 ,mzon6,mzon7..re
000150: 6C 65 61 73 65 20 6D 7A 6F 6E 38 2C 6D 7A 6F 6E lease mzon8,mzon
000160: 39 2C 6D 7A 6F 6E 31 30 2C 6D 7A 6F 6E 31 31 2C 9,mzon10,mzon11,
000170: 6D 7A 6F 6E 31 32 2C 6D 7A 6F 6E 31 33 2C 6D 7A mzon12,mzon13,mz
000180: 6F 6E 31 34 2C 6D 7A 6F 6E 31 35 2C 6D 7A 6F 6E on14,mzon15,mzon
000190: 31 36 2C 6D 7A 6F 6E 31 37 0D 0A 72 65 6C 65 61 16,mzon17..relea
0001A0: 73 65 20 6D 7A 6F 6E 31 38 2C 6D 7A 6F 6E 31 39 se mzon18,mzon19
0001B0: 2C 6D 7A 6F 6E 32 30 2C 6D 7A 6F 6E 32 31 2C 6D ,mzon20,mzon21,m
0001C0: 7A 6F 6E 32 32 2C 6D 7A 6F 6E 32 33 2C 6D 7A 6F zon22,mzon23,mzo
0001D0: 6E 32 34 2C 6D 7A 6F 6E 32 35 2C 6D 7A 6F 6E 32 n24,mzon25,mzon2
0001E0: 36 0D 0A 72 65 6C 65 61 73 65 20 6D 7A 6F 6E 32 6..release mzon2
0001F0: 37 2C 6D 7A 6F 6E 32 38 2C 6D 7A 6F 6E 32 39 2C 7,mzon28,mzon29,
Size : 512 (Real : 512)
000000: 41 4E 43 59 20 20 20 20 20 20 20 38 33 2E 38 39 ANCY 83.89
000010: 2E 34 35 2E 39 30 20 20 20 20 20 4D 45 44 45 43 .45.90 MEDEC
000020: 49 4E 20 20 20 20 49 42 4D 20 20 20 20 20 20 20 IN IBM
000030: 20 50 43 20 20 20 20 20 44 55 50 55 49 53 20 20 PC DUPUIS
000040: 20 20 20 20 4A 45 41 4E 20 20 20 20 20 20 20 20 JEAN
000050: 30 31 2F 30 31 2F 38 36 32 33 2F 30 32 2F 38 36 01/01/8623/02/86
000060: 42 43 4F 4D 50 41 54 42 49 4C 49 54 45 2C 47 45 BCOMPATBILITE,GE
000070: 53 54 49 4F 4E 20 44 45 20 53 54 4F 43 4B 20 20 STION DE STOCK
000080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000090: 20 20 20 20 20 20 20 20 20 31 33 32 33 34 31 32 1323412
0000A0: 2C 20 51 55 41 49 20 42 4F 4E 53 20 45 4E 46 41 , QUAI BONS ENFA
0000B0: 4E 54 53 20 35 37 30 30 31 4D 45 54 5A 20 20 20 NTS 57001METZ
0000C0: 20 20 20 20 20 38 37 2E 33 30 2E 31 31 2E 32 39 87.30.11.29
0000D0: 20 20 20 20 20 43 41 52 52 45 4C 45 55 52 20 20 CARRELEUR
0000E0: 41 4D 53 54 52 41 44 20 20 20 20 38 32 35 36 20 AMSTRAD 8256
0000F0: 20 20 4D 41 52 54 45 41 55 20 20 20 20 20 4D 49 MARTEAU MI
000100: 43 48 45 4C 20 20 20 20 20 20 31 30 2F 30 33 2F CHEL 10/03/
000110: 38 36 31 31 2F 30 33 2F 38 36 44 44 45 43 49 53 8611/03/86DDECIS
000120: 49 4F 4E 4E 45 4C 20 20 20 20 20 20 20 20 20 20 IONNEL
000130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000150: 20 20 20 34 33 30 30 35 36 37 2C 20 50 4C 41 43 4300567, PLAC
000160: 45 20 44 45 20 4C 41 20 47 41 52 45 20 20 37 35 E DE LA GARE 75
000170: 30 30 32 50 41 52 49 53 20 20 20 20 20 20 20 31 002PARIS 1
000180: 36 2E 31 2E 34 32 2E 34 35 2E 36 35 2E 32 34 4D 6.1.42.45.65.24M
000190: 45 44 45 43 49 4E 20 20 20 20 48 50 20 20 20 20 EDECIN HP
0001A0: 20 20 20 20 20 31 35 30 49 49 20 20 50 49 4E 41 150II PINA
0001B0: 52 44 20 20 20 20 20 20 56 41 4C 45 52 49 45 20 RD VALERIE
0001C0: 20 20 20 20 31 30 2F 30 32 2F 38 36 32 30 2F 30 10/02/8620/0
0001D0: 33 2F 38 36 44 43 4F 4D 50 54 41 42 49 4C 49 54 3/86DCOMPTABILIT
0001E0: 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 E
0001F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
Size : 512 (Real : 512)
000000: 04 00 00 01 00 43 4E 4F 4D 20 20 20 20 20 00 00 .....CNOM ..
000010: 02 00 43 50 52 4F 46 20 20 20 20 00 00 03 00 43 ..CPROF ....C
000020: 56 49 4C 4C 45 20 20 20 00 00 04 00 4C 50 52 4F VILLE ....LPRO
000030: 46 20 20 20 20 00 00 45 20 00 00 05 00 4C 49 45 F ..E ....LIE
000040: 55 20 20 20 20 20 20 00 00 0D 00 4D 41 52 51 55 U ....MARQU
000050: 45 20 20 20 20 00 00 01 00 4E 4F 4D 20 20 20 20 E ....NOM
000060: 20 20 20 00 00 02 00 50 52 45 4E 4F 4D 20 20 20 ....PRENOM
000070: 20 00 00 0C 00 50 52 4F 46 20 20 20 20 20 20 00 ....PROF .
000080: 00 04 00 50 52 4F 56 49 53 49 54 45 20 00 00 0B ...PROVISITE ...
000090: 00 54 45 4C 20 20 20 20 20 20 20 00 00 0E 00 54 .TEL ....T
0000A0: 59 50 45 20 20 20 20 20 20 00 00 07 00 56 45 4E YPE ....VEN
0000B0: 54 45 20 20 20 20 20 00 00 0A 00 56 49 4C 4C 45 TE ....VILLE
0000C0: 20 20 20 20 20 00 00 CD 45 25 AF 32 4D 44 CD 61 ...E%.2MD.a
0000D0: 27 C3 5B 54 3E 48 C3 53 54 3E 28 C3 53 54 AF 32 '.[T>H.ST>(.ST.2
0000E0: 5B 56 CD 63 39 11 6E 55 CD B1 37 CA AF 51 3E FF [V.c9.nU..7..Q>.
0000F0: 32 5B 56 CD 63 39 11 52 55 CD B1 37 C2 48 54 CD 2[V.c9.RU..7.HT.
000100: 8E 39 CD 73 39 CA 48 54 22 71 56 CD D8 1C 22 67 .9.s9.HT"qV..."g
000110: 56 2A 67 56 7E B7 CA E7 51 EB 2A 71 56 3A 5B 56 V*gV~...Q.*qV:[V
000120: B7 CA DD 51 CD 8E 54 CA E7 51 C3 E3 51 CD 8E 54 ...Q..T..Q..Q..T
000130: C2 E7 51 EB CD 79 2A 2A 67 56 11 10 00 19 22 67 ..Q..y**gV...."g
000140: 56 7E FE 0D C2 C1 51 C3 5B 54 CD DD 25 AF 32 5F V~....Q.[T..%.2_
000150: 56 CD E9 25 DA 48 54 CD 73 39 CA 3B 52 11 AC 55 V..%.HT.s9.;R..U
000160: CD B1 37 C2 48 54 CD 8E 39 CD 73 39 CA 48 54 01 ..7.HT..9.s9.HT.
000170: 00 05 CD 72 2A 22 73 56 3E FF 32 5F 56 CD 69 39 ...r*"sV>.2_V.i9
000180: CA 3B 52 FE 20 C2 2D 52 C3 01 52 01 00 00 CD 2A .;R. .-R..R....*
000190: 2C 7C B5 CA 62 52 21 FF FF CD 5B 26 DA 62 52 CD ,|..bR!...[&.bR.
0001A0: 78 27 CA 59 52 DA 62 52 03 CD 47 2B CA 62 52 D2 x'.YR.bR..G+.bR.
0001B0: 4F 52 3A 7D 44 B7 CA 73 52 3E 22 CD 70 3B 60 69 OR:}D..sR>".p;`i
0001C0: CD 35 36 3A 5F 56 B7 CA 5B 54 60 69 CD 18 34 2A .56:_V..[T`i..4*
0001D0: 73 56 11 0D 00 19 CD E9 36 CD E5 34 C3 5B 54 3E sV......6..4.[T>
0001E0: 67 CD 70 3B CD 61 27 CD 3C 27 CD C4 25 3E 72 CD g.p;.a'.<'..%>r.
0001F0: 70 3B CD 2A 2C CD 35 36 3E 77 CD 70 3B CD E3 1C p;.*,.56>w.p;...
Size : 512 (Real : 512)
000000: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000010: 20 30 34 35 2C 20 52 55 45 20 44 45 20 4E 41 4E 045, RUE DE NAN
000020: 43 59 20 20 20 20 20 20 38 38 32 30 30 52 45 4D CY 88200REM
000030: 49 52 45 4D 4F 4D 54 20 20 32 39 2E 36 32 2E 30 IREMOMT 29.62.0
000040: 38 2E 35 37 20 20 20 20 20 43 41 52 52 45 4C 45 8.57 CARRELE
000050: 55 52 20 20 41 4D 53 54 52 41 44 20 20 20 20 36 UR AMSTRAD 6
000060: 31 32 38 20 20 20 30 20 20 20 20 20 20 20 20 20 128 0
000070: 20 20 30 20 20 20 20 20 20 20 20 20 20 20 30 30 0 00
000080: 2F 30 30 2F 30 30 30 30 2F 30 30 2F 30 30 20 20 /00/0000/00/00
000090: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000C0: 20 20 20 20 20 20 20 20 20 20 20 30 20 20 20 20 0
0000D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000E0: 20 20 20 20 20 20 30 20 20 20 20 20 20 20 20 20 0
0000F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000100: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1A .
000120: B7 CA DD 51 CD 8E 54 CA E7 51 C3 E3 51 CD 8E 54 ...Q..T..Q..Q..T
000130: C2 E7 51 EB CD 79 2A 2A 67 56 11 10 00 19 22 67 ..Q..y**gV...."g
000140: 56 7E FE 0D C2 C1 51 C3 5B 54 CD DD 25 AF 32 5F V~....Q.[T..%.2_
000150: 56 CD E9 25 DA 48 54 CD 73 39 CA 3B 52 11 AC 55 V..%.HT.s9.;R..U
000160: CD B1 37 C2 48 54 CD 8E 39 CD 73 39 CA 48 54 01 ..7.HT..9.s9.HT.
000170: 00 05 CD 72 2A 22 73 56 3E FF 32 5F 56 CD 69 39 ...r*"sV>.2_V.i9
000180: CA 3B 52 FE 20 C2 2D 52 C3 01 52 01 00 00 CD 2A .;R. .-R..R....*
000190: 2C 7C B5 CA 62 52 21 FF FF CD 5B 26 DA 62 52 CD ,|..bR!...[&.bR.
0001A0: 78 27 CA 59 52 DA 62 52 03 CD 47 2B CA 62 52 D2 x'.YR.bR..G+.bR.
0001B0: 4F 52 3A 7D 44 B7 CA 73 52 3E 22 CD 70 3B 60 69 OR:}D..sR>".p;`i
0001C0: CD 35 36 3A 5F 56 B7 CA 5B 54 60 69 CD 18 34 2A .56:_V..[T`i..4*
0001D0: 73 56 11 0D 00 19 CD E9 36 CD E5 34 C3 5B 54 3E sV......6..4.[T>
0001E0: 67 CD 70 3B CD 61 27 CD 3C 27 CD C4 25 3E 72 CD g.p;.a'.<'..%>r.
0001F0: 70 3B CD 2A 2C CD 35 36 3E 77 CD 70 3B CD E3 1C p;.*,.56>w.p;...
Size : 512 (Real : 512)
000000: 00 00 01 00 02 00 1A 1C 12 00 6E 6F 6D 2B 70 72 ..........nom+pr
000010: 65 6E 6F 6D 00 65 6C 65 6D 00 50 CD 8E 39 3E 03 enom.elem.P..9>.
000020: CD AD 27 3E FF 32 5D 56 3E 01 CD F0 2B D2 E0 4F ..'>.2]V>...+..O
000030: 3E 58 C3 53 54 11 1D 55 CD B1 37 C2 48 54 CD 8E >X.ST..U..7.HT..
000040: 39 3E FF 32 5B 56 C3 E0 4F 3A 5D 56 B7 CA 48 54 9>.2[V..O:]V..HT
000050: 3A 5B 56 B7 C2 2E 50 CD 20 29 11 79 56 01 10 00 :[V...P. ).yV...
000060: CD 7A 2C DA 97 50 21 0B 00 19 7E FE CE CA 0E 00 .z,..P!...~.....
000070: 00 01 00 40 10 00 00 00 00 00 00 02 00 40 20 00 ...@.........@ .
000080: 00 00 00 00 00 03 00 40 30 00 00 00 00 00 00 04 .......@0.......
000090: 00 40 40 00 00 00 00 00 00 05 00 40 50 00 00 00 .@@........@P...
0000A0: 00 00 00 06 00 40 60 00 00 00 00 00 00 07 00 40 .....@`........@
0000B0: 70 00 00 00 00 00 00 08 00 40 80 00 00 00 00 00 p........@......
0000C0: 00 09 00 40 90 00 00 00 00 00 00 0A 00 41 10 00 ...@.........A..
0000D0: 00 00 00 00 00 0B 00 41 11 00 00 00 00 00 00 0C .......A........
0000E0: 00 41 12 00 00 00 00 00 00 0D 00 41 13 00 00 00 .A.........A....
0000F0: 00 00 00 0E 00 41 14 00 00 00 00 00 00 0B 00 54 .....A.........T
000100: 45 4C 20 20 20 20 20 20 20 00 00 0E 00 54 59 50 EL ....TYP
000110: 45 20 20 20 20 20 20 00 00 07 00 56 45 4E 54 45 E ....VENTE
000120: 20 20 20 20 20 00 00 0A 00 56 49 4C 4C 45 20 20 ....VILLE
000130: 20 20 20 00 00 CD 45 25 AF 32 4D 44 CD 61 27 C3 ...E%.2MD.a'.
000140: 5B 54 3E 48 C3 53 54 3E 28 C3 53 54 AF 32 5B 56 [T>H.ST>(.ST.2[V
000150: CD 63 39 11 6E 55 CD B1 37 CA AF 51 3E FF 32 5B .c9.nU..7..Q>.2[
000160: 56 CD 63 39 11 52 55 CD B1 37 C2 48 54 CD 8E 39 V.c9.RU..7.HT..9
000170: CD 73 39 CA 48 54 22 71 56 CD D8 1C 22 67 56 2A .s9.HT"qV..."gV*
000180: 67 56 7E B7 CA E7 51 EB 2A 71 56 3A 5B 56 B7 CA gV~...Q.*qV:[V..
000190: DD 51 CD 8E 54 CA E7 51 C3 E3 51 CD 8E 54 C2 E7 .Q..T..Q..Q..T..
0001A0: 51 EB CD 79 2A 2A 67 56 11 10 00 19 22 67 56 7E Q..y**gV...."gV~
0001B0: FE 0D C2 C1 51 C3 5B 54 CD DD 25 AF 32 5F 56 CD ....Q.[T..%.2_V.
0001C0: E9 25 DA 48 54 CD 73 39 CA 3B 52 11 AC 55 CD B1 .%.HT.s9.;R..U..
0001D0: 37 C2 48 54 CD 8E 39 CD 73 39 CA 48 54 01 00 05 7.HT..9.s9.HT...
0001E0: CD 72 2A 22 73 56 3E FF 32 5F 56 CD 69 39 CA 3B .r*"sV>.2_V.i9.;
0001F0: 52 FE 20 C2 2D 52 C3 01 52 01 00 00 CD 2A 2C 7C R. .-R..R....*,|
Size : 512 (Real : 512)
000000: 02 04 00 02 0C 56 7A 00 54 59 50 45 4C 45 4D 00 .....Vz.TYPELEM.
000010: 00 00 00 43 01 B9 70 00 4E 4F 4D 45 4C 45 4D 00 ...C..p.NOMELEM.
000020: 00 00 00 43 08 BA 70 00 4C 49 42 45 4C 45 4D 00 ...C..p.LIBELEM.
000030: 00 00 00 43 1E C2 70 00 4E 42 5A 4F 4E 45 53 00 ...C..p.NBZONES.
000040: 00 00 00 4E 01 E0 70 00 5A 4F 4E 31 00 00 00 00 ...N..p.ZON1....
000050: 00 00 00 43 0A E1 70 00 44 45 42 31 00 00 00 00 ...C..p.DEB1....
000060: 00 00 00 43 03 EB 70 00 46 49 4E 31 00 00 00 00 ...C..p.FIN1....
000070: 00 00 00 43 03 EE 70 00 5A 4F 4E 32 00 00 00 00 ...C..p.ZON2....
000080: 00 00 00 43 0A F1 70 00 44 45 42 32 00 00 00 00 ...C..p.DEB2....
000090: 00 00 00 43 03 FB 70 00 46 49 4E 32 00 00 00 00 ...C..p.FIN2....
0000A0: 00 00 00 43 03 FE 70 00 5A 4F 4E 33 00 00 00 00 ...C..p.ZON3....
0000B0: 00 00 00 43 0A 01 71 00 44 45 42 33 00 00 00 00 ...C..q.DEB3....
0000C0: 00 00 00 43 03 0B 71 00 46 49 4E 33 00 00 00 00 ...C..q.FIN3....
0000D0: 00 00 00 43 03 0E 71 00 5A 4F 4E 34 00 00 00 00 ...C..q.ZON4....
0000E0: 00 00 00 43 0A 11 71 00 44 45 42 34 00 00 00 00 ...C..q.DEB4....
0000F0: 00 00 00 43 03 1B 71 00 46 49 4E 34 00 00 00 00 ...C..q.FIN4....
000100: 00 00 00 43 03 1E 71 00 5A 4F 4E 35 00 00 00 00 ...C..q.ZON5....
000110: 00 00 00 43 0A 21 71 00 44 45 42 35 00 00 00 00 ...C.!q.DEB5....
000120: 00 00 00 43 03 2B 71 00 46 49 4E 35 00 00 00 00 ...C.+q.FIN5....
000130: 00 00 00 43 03 2E 71 00 54 59 50 43 00 00 00 00 ...C..q.TYPC....
000140: 00 00 00 43 01 31 71 00 0D 00 00 00 00 00 00 00 ...C.1q.........
000150: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
Size : 512 (Real : 512)
000000: 07 00 00 07 00 30 20 20 20 20 20 20 20 20 20 20 .....0
000010: 20 30 20 20 20 20 20 20 20 20 20 20 20 00 00 02 0 ...
000020: 00 42 41 52 54 48 45 52 20 20 20 20 20 42 45 52 .BARTHER BER
000030: 4E 41 52 44 20 20 20 20 20 00 00 04 00 44 55 50 NARD ....DUP
000040: 55 49 53 20 20 20 20 20 20 4A 45 41 4E 20 20 20 UIS JEAN
000050: 20 20 20 20 20 00 00 01 00 44 55 52 41 4E 54 20 ....DURANT
000060: 20 20 20 20 20 4C 55 43 20 20 20 20 20 20 20 20 LUC
000070: 20 00 00 03 00 47 55 49 54 59 20 20 20 20 20 20 ....GUITY
000080: 20 4A 2E 4C 55 43 20 20 20 20 20 20 20 00 00 05 J.LUC ...
000090: 00 4D 41 52 54 45 41 55 20 20 20 20 20 4D 49 43 .MARTEAU MIC
0000A0: 48 45 4C 20 20 20 20 20 20 00 00 06 00 50 49 4E HEL ....PIN
0000B0: 41 52 44 20 20 20 20 20 20 56 41 4C 45 52 49 45 ARD VALERIE
0000C0: 20 20 20 20 20 00 00 CD 45 25 AF 32 4D 44 CD 61 ...E%.2MD.a
0000D0: 27 C3 5B 54 3E 48 C3 53 54 3E 28 C3 53 54 AF 32 '.[T>H.ST>(.ST.2
0000E0: 5B 56 CD 63 39 11 6E 55 CD B1 37 CA AF 51 3E FF [V.c9.nU..7..Q>.
0000F0: 32 5B 56 CD 63 39 11 52 55 CD B1 37 C2 48 54 CD 2[V.c9.RU..7.HT.
000100: 8E 39 CD 73 39 CA 48 54 22 71 56 CD D8 1C 22 67 .9.s9.HT"qV..."g
000110: 56 2A 67 56 7E B7 CA E7 51 EB 2A 71 56 3A 5B 56 V*gV~...Q.*qV:[V
000120: B7 CA DD 51 CD 8E 54 CA E7 51 C3 E3 51 CD 8E 54 ...Q..T..Q..Q..T
000130: C2 E7 51 EB CD 79 2A 2A 67 56 11 10 00 19 22 67 ..Q..y**gV...."g
000140: 56 7E FE 0D C2 C1 51 C3 5B 54 CD DD 25 AF 32 5F V~....Q.[T..%.2_
000150: 56 CD E9 25 DA 48 54 CD 73 39 CA 3B 52 11 AC 55 V..%.HT.s9.;R..U
000160: CD B1 37 C2 48 54 CD 8E 39 CD 73 39 CA 48 54 01 ..7.HT..9.s9.HT.
000170: 00 05 CD 72 2A 22 73 56 3E FF 32 5F 56 CD 69 39 ...r*"sV>.2_V.i9
000180: CA 3B 52 FE 20 C2 2D 52 C3 01 52 01 00 00 CD 2A .;R. .-R..R....*
000190: 2C 7C B5 CA 62 52 21 FF FF CD 5B 26 DA 62 52 CD ,|..bR!...[&.bR.
0001A0: 78 27 CA 59 52 DA 62 52 03 CD 47 2B CA 62 52 D2 x'.YR.bR..G+.bR.
0001B0: 4F 52 3A 7D 44 B7 CA 73 52 3E 22 CD 70 3B 60 69 OR:}D..sR>".p;`i
0001C0: CD 35 36 3A 5F 56 B7 CA 5B 54 60 69 CD 18 34 2A .56:_V..[T`i..4*
0001D0: 73 56 11 0D 00 19 CD E9 36 CD E5 34 C3 5B 54 3E sV......6..4.[T>
0001E0: 67 CD 70 3B CD 61 27 CD 3C 27 CD C4 25 3E 72 CD g.p;.a'.<'..%>r.
0001F0: 70 3B CD 2A 2C CD 35 36 3E 77 CD 70 3B CD E3 1C p;.*,.56>w.p;...
Size : 512 (Real : 512)
000000: 00 00 00 00 00 00 00 00 00 20 43 4E 4F 4D 20 20 ......... CNOM
000010: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000020: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000030: 20 32 4E 4F 4D 20 20 20 20 20 20 20 31 20 20 46 2NOM 1 F
000040: 20 20 50 52 45 4E 4F 4D 20 20 20 20 31 20 20 46 PRENOM 1 F
000050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000060: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000080: 20 20 50 20 43 50 52 4F 46 20 20 20 20 4C 69 73 P CPROF Lis
000090: 74 65 20 74 72 69 65 65 20 70 61 72 20 70 72 6F te triee par pro
0000A0: 66 65 73 73 69 6F 6E 20 20 20 20 31 50 52 4F 46 fession 1PROF
0000B0: 20 20 20 20 20 20 31 20 20 46 20 20 20 20 20 20 1 F
0000C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000F0: 20 20 20 20 20 20 20 20 20 20 20 20 54 20 43 56 T CV
000100: 49 4C 4C 45 20 20 20 54 72 69 20 50 61 72 20 56 ILLE Tri Par V
000110: 69 6C 6C 65 20 20 20 20 20 20 20 20 20 20 20 20 ille
000120: 20 20 20 20 20 31 56 49 4C 4C 45 20 20 20 20 20 1VILLE
000130: 31 20 20 46 20 20 20 20 20 20 20 20 20 20 20 20 1 F
000140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000170: 20 20 20 20 20 20 53 20 4C 50 52 4F 46 20 20 20 S LPROF
000180: 20 4C 69 73 74 65 20 64 65 73 20 43 41 20 70 61 Liste des CA pa
000190: 72 20 70 72 6F 66 65 73 73 69 6F 6E 20 20 20 20 r profession
0001A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0001B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0001C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0001E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0001F0: 20 1A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ...............
Size : 512 (Real : 512)
000000: 00 00 01 00 02 00 0D 0F 21 00 50 52 4F 46 20 20 ........!.PROF
000010: 20 20 20 20 20 00 6C 65 6D 00 50 CD 8E 39 3E 03 .lem.P..9>.
000020: CD AD 27 3E FF 32 5D 56 3E 01 CD F0 2B D2 E0 4F ..'>.2]V>...+..O
000030: 3E 58 C3 53 54 11 1D 55 CD B1 37 C2 48 54 CD 8E >X.ST..U..7.HT..
000040: 39 3E FF 32 5B 56 C3 E0 4F 3A 5D 56 B7 CA 48 54 9>.2[V..O:]V..HT
000050: 3A 5B 56 B7 C2 2E 50 CD 20 29 11 79 56 01 10 00 :[V...P. ).yV...
000060: CD 7A 2C DA 97 50 21 0B 00 19 7E FE CE CA 04 00 .z,..P!...~.....
000070: 00 01 00 43 4E 4F 4D 20 20 20 20 20 00 00 02 00 ...CNOM ....
000080: 43 50 52 4F 46 20 20 20 20 00 00 03 00 43 56 49 CPROF ....CVI
000090: 4C 4C 45 20 20 20 00 00 04 00 4C 50 52 4F 46 20 LLE ....LPROF
0000A0: 20 20 20 00 00 45 20 00 00 05 00 4C 49 45 55 20 ..E ....LIEU
0000B0: 20 20 20 20 20 00 00 0D 00 4D 41 52 51 55 45 20 ....MARQUE
0000C0: 20 20 20 00 00 01 00 4E 4F 4D 20 20 20 20 20 20 ....NOM
0000D0: 20 00 00 02 00 50 52 45 4E 4F 4D 20 20 20 20 00 ....PRENOM .
0000E0: 00 0C 00 50 52 4F 46 20 20 20 20 20 20 00 00 04 ...PROF ...
0000F0: 00 50 52 4F 56 49 53 49 54 45 20 00 00 0B 00 54 .PROVISITE ....T
000100: 45 4C 20 20 20 20 20 20 20 00 00 0E 00 54 59 50 EL ....TYP
000110: 45 20 20 20 20 20 20 00 00 07 00 56 45 4E 54 45 E ....VENTE
000120: 20 20 20 20 20 00 00 0A 00 56 49 4C 4C 45 20 20 ....VILLE
000130: 20 20 20 00 00 CD 45 25 AF 32 4D 44 CD 61 27 C3 ...E%.2MD.a'.
000140: 5B 54 3E 48 C3 53 54 3E 28 C3 53 54 AF 32 5B 56 [T>H.ST>(.ST.2[V
000150: CD 63 39 11 6E 55 CD B1 37 CA AF 51 3E FF 32 5B .c9.nU..7..Q>.2[
000160: 56 CD 63 39 11 52 55 CD B1 37 C2 48 54 CD 8E 39 V.c9.RU..7.HT..9
000170: CD 73 39 CA 48 54 22 71 56 CD D8 1C 22 67 56 2A .s9.HT"qV..."gV*
000180: 67 56 7E B7 CA E7 51 EB 2A 71 56 3A 5B 56 B7 CA gV~...Q.*qV:[V..
000190: DD 51 CD 8E 54 CA E7 51 C3 E3 51 CD 8E 54 C2 E7 .Q..T..Q..Q..T..
0001A0: 51 EB CD 79 2A 2A 67 56 11 10 00 19 22 67 56 7E Q..y**gV...."gV~
0001B0: FE 0D C2 C1 51 C3 5B 54 CD DD 25 AF 32 5F 56 CD ....Q.[T..%.2_V.
0001C0: E9 25 DA 48 54 CD 73 39 CA 3B 52 11 AC 55 CD B1 .%.HT.s9.;R..U..
0001D0: 37 C2 48 54 CD 8E 39 CD 73 39 CA 48 54 01 00 05 7.HT..9.s9.HT...
0001E0: CD 72 2A 22 73 56 3E FF 32 5F 56 CD 69 39 CA 3B .r*"sV>.2_V.i9.;
0001F0: 52 FE 20 C2 2D 52 C3 01 52 01 00 00 CD 2A 2C 7C R. .-R..R....*,|
Size : 512 (Real : 512)
000000: 00 00 01 00 02 00 0B 0D 27 00 74 79 70 65 6C 65 ........'.typele
000010: 6D 2B 6E 6F 6D 65 6C 65 6D 00 50 CD 8E 39 3E 03 m+nomelem.P..9>.
000020: CD AD 27 3E FF 32 5D 56 3E 01 CD F0 2B D2 E0 4F ..'>.2]V>...+..O
000030: 3E 58 C3 53 54 11 1D 55 CD B1 37 C2 48 54 CD 8E >X.ST..U..7.HT..
000040: 39 3E FF 32 5B 56 C3 E0 4F 3A 5D 56 B7 CA 48 54 9>.2[V..O:]V..HT
000050: 3A 5B 56 B7 C2 2E 50 CD 20 29 11 79 56 01 10 00 :[V...P. ).yV...
000060: CD 7A 2C DA 97 50 21 0B 00 19 7E FE CE CA 00 00 .z,..P!...~.....
000070: 01 00 02 00 1A 1C 12 00 6E 6F 6D 2B 70 72 65 6E ........nom+pren
000080: 6F 6D 00 65 6C 65 6D 00 50 CD 8E 39 3E 03 CD AD om.elem.P..9>...
000090: 27 3E FF 32 5D 56 3E 01 CD F0 2B D2 E0 4F 3E 58 '>.2]V>...+..O>X
0000A0: C3 53 54 11 1D 55 CD B1 37 C2 48 54 CD 8E 39 3E .ST..U..7.HT..9>
0000B0: FF 32 5B 56 C3 E0 4F 3A 5D 56 B7 CA 48 54 3A 5B .2[V..O:]V..HT:[
0000C0: 56 B7 C2 2E 50 CD 20 29 11 79 56 01 10 00 CD 7A V...P. ).yV....z
0000D0: 2C DA 97 50 21 0B 00 19 7E FE CE CA 04 00 00 01 ,..P!...~.......
0000E0: 00 43 4E 4F 4D 20 20 20 20 20 00 00 02 00 43 50 .CNOM ....CP
0000F0: 52 4F 46 20 20 20 20 00 00 03 00 43 56 49 4C 4C ROF ....CVILL
000100: 45 20 20 20 00 00 04 00 4C 50 52 4F 46 20 20 20 E ....LPROF
000110: 20 00 00 45 20 00 00 05 00 4C 49 45 55 20 20 20 ..E ....LIEU
000120: 20 20 20 00 00 0D 00 4D 41 52 51 55 45 20 20 20 ....MARQUE
000130: 20 00 00 01 00 4E 4F 4D 20 20 20 20 20 20 20 00 ....NOM .
000140: 00 02 00 50 52 45 4E 4F 4D 20 20 20 20 00 00 0C ...PRENOM ...
000150: 00 50 52 4F 46 20 20 20 20 20 20 00 00 04 00 50 .PROF ....P
000160: 52 4F 56 49 53 49 54 45 20 00 00 0B 00 54 45 4C ROVISITE ....TEL
000170: 20 20 20 20 20 20 20 00 00 0E 00 54 59 50 45 20 ....TYPE
000180: 20 20 20 20 20 00 00 07 00 56 45 4E 54 45 20 20 ....VENTE
000190: 20 20 20 00 00 0A 00 56 49 4C 4C 45 20 20 20 20 ....VILLE
0001A0: 20 00 00 CD 45 25 AF 32 4D 44 CD 61 27 C3 5B 54 ...E%.2MD.a'.[T
0001B0: 3E 48 C3 53 54 3E 28 C3 53 54 AF 32 5B 56 CD 63 >H.ST>(.ST.2[V.c
0001C0: 39 11 6E 55 CD B1 37 CA AF 51 3E FF 32 5B 56 CD 9.nU..7..Q>.2[V.
0001D0: 63 39 11 52 55 CD B1 37 C2 48 54 CD 8E 39 CD 73 c9.RU..7.HT..9.s
0001E0: 39 CA 48 54 22 71 56 CD D8 1C 22 67 56 2A 67 56 9.HT"qV..."gV*gV
0001F0: 7E B7 CA E7 51 EB 2A 71 56 3A 5B 56 B7 CA DD 51 ~...Q.*qV:[V...Q
Size : 512 (Real : 512)
000000: 05 00 00 04 00 43 41 52 52 45 4C 45 55 52 20 20 .....CARRELEUR
000010: 00 00 03 00 4D 45 44 45 43 49 4E 20 20 20 20 00 ....MEDECIN .
000020: 00 05 00 4D 45 44 45 43 49 4E 20 20 20 20 00 00 ...MEDECIN ..
000030: 01 00 4D 45 4E 55 49 53 49 45 52 20 20 00 00 02 ..MENUISIER ...
000040: 00 4D 45 4E 55 49 53 49 45 52 20 20 00 00 02 00 .MENUISIER ....
000050: 4D 45 4E 55 49 53 49 45 52 20 20 00 00 20 20 20 MENUISIER ..
000060: 20 20 20 00 00 02 00 50 52 45 4E 4F 4D 20 20 20 ....PRENOM
000070: 20 00 00 0C 00 50 52 4F 46 20 20 20 20 20 20 00 ....PROF .
000080: 00 04 00 50 52 4F 56 49 53 49 54 45 20 00 00 0B ...PROVISITE ...
000090: 00 54 45 4C 20 20 20 20 20 20 20 00 00 0E 00 54 .TEL ....T
0000A0: 59 50 45 20 20 20 20 20 20 00 00 07 00 56 45 4E YPE ....VEN
0000B0: 54 45 20 20 20 20 20 00 00 0A 00 56 49 4C 4C 45 TE ....VILLE
0000C0: 20 20 20 20 20 00 00 CD 45 25 AF 32 4D 44 CD 61 ...E%.2MD.a
0000D0: 27 C3 5B 54 3E 48 C3 53 54 3E 28 C3 53 54 AF 32 '.[T>H.ST>(.ST.2
0000E0: 5B 56 CD 63 39 11 6E 55 CD B1 37 CA AF 51 3E FF [V.c9.nU..7..Q>.
0000F0: 32 5B 56 CD 63 39 11 52 55 CD B1 37 C2 48 54 CD 2[V.c9.RU..7.HT.
000100: 8E 39 CD 73 39 CA 48 54 22 71 56 CD D8 1C 22 67 .9.s9.HT"qV..."g
000110: 56 2A 67 56 7E B7 CA E7 51 EB 2A 71 56 3A 5B 56 V*gV~...Q.*qV:[V
000120: B7 CA DD 51 CD 8E 54 CA E7 51 C3 E3 51 CD 8E 54 ...Q..T..Q..Q..T
000130: C2 E7 51 EB CD 79 2A 2A 67 56 11 10 00 19 22 67 ..Q..y**gV...."g
000140: 56 7E FE 0D C2 C1 51 C3 5B 54 CD DD 25 AF 32 5F V~....Q.[T..%.2_
000150: 56 CD E9 25 DA 48 54 CD 73 39 CA 3B 52 11 AC 55 V..%.HT.s9.;R..U
000160: CD B1 37 C2 48 54 CD 8E 39 CD 73 39 CA 48 54 01 ..7.HT..9.s9.HT.
000170: 00 05 CD 72 2A 22 73 56 3E FF 32 5F 56 CD 69 39 ...r*"sV>.2_V.i9
000180: CA 3B 52 FE 20 C2 2D 52 C3 01 52 01 00 00 CD 2A .;R. .-R..R....*
000190: 2C 7C B5 CA 62 52 21 FF FF CD 5B 26 DA 62 52 CD ,|..bR!...[&.bR.
0001A0: 78 27 CA 59 52 DA 62 52 03 CD 47 2B CA 62 52 D2 x'.YR.bR..G+.bR.
0001B0: 4F 52 3A 7D 44 B7 CA 73 52 3E 22 CD 70 3B 60 69 OR:}D..sR>".p;`i
0001C0: CD 35 36 3A 5F 56 B7 CA 5B 54 60 69 CD 18 34 2A .56:_V..[T`i..4*
0001D0: 73 56 11 0D 00 19 CD E9 36 CD E5 34 C3 5B 54 3E sV......6..4.[T>
0001E0: 67 CD 70 3B CD 61 27 CD 3C 27 CD C4 25 3E 72 CD g.p;.a'.<'..%>r.
0001F0: 70 3B CD 2A 2C CD 35 36 3E 77 CD 70 3B CD E3 1C p;.*,.56>w.p;...
Size : 512 (Real : 512)
000000: 00 00 01 00 02 00 0C 0E 24 00 66 69 65 6C 64 3A ........$.field:
000010: 6E 61 6D 65 00 65 6C 65 6D 00 50 CD 8E 39 3E 03 name.elem.P..9>.
000020: CD AD 27 3E FF 32 5D 56 3E 01 CD F0 2B D2 E0 4F ..'>.2]V>...+..O
000030: 3E 58 C3 53 54 11 1D 55 CD B1 37 C2 48 54 CD 8E >X.ST..U..7.HT..
000040: 39 3E FF 32 5B 56 C3 E0 4F 3A 5D 56 B7 CA 48 54 9>.2[V..O:]V..HT
000050: 3A 5B 56 B7 C2 2E 50 CD 20 29 11 79 56 01 10 00 :[V...P. ).yV...
000060: CD 7A 2C DA 97 50 21 0B 00 19 7E FE CE CA 00 00 .z,..P!...~.....
000070: 01 00 02 00 0E 10 1F 00 4E 4F 4D 20 20 20 20 20 ........NOM
000080: 20 20 20 00 6C 65 6D 00 50 CD 8E 39 3E 03 CD AD .lem.P..9>...
000090: 27 3E FF 32 5D 56 3E 01 CD F0 2B D2 E0 4F 3E 58 '>.2]V>...+..O>X
0000A0: C3 53 54 11 1D 55 CD B1 37 C2 48 54 CD 8E 39 3E .ST..U..7.HT..9>
0000B0: FF 32 5B 56 C3 E0 4F 3A 5D 56 B7 CA 48 54 3A 5B .2[V..O:]V..HT:[
0000C0: 56 B7 C2 2E 50 CD 20 29 11 79 56 01 10 00 CD 7A V...P. ).yV....z
0000D0: 2C DA 97 50 21 0B 00 19 7E FE CE CA 01 00 00 01 ,..P!...~.......
0000E0: 00 43 43 4C 45 20 20 20 20 20 00 00 00 06 00 42 .CCLE .....B
0000F0: 45 53 4F 49 4E 20 20 20 20 00 00 09 00 43 4F 44 ESOIN ....COD
000100: 45 50 4F 53 54 20 20 00 00 03 00 44 45 52 56 49 EPOST ....DERVI
000110: 53 49 54 45 20 00 00 05 00 4C 49 45 55 20 20 20 SITE ....LIEU
000120: 20 20 20 00 00 0D 00 4D 41 52 51 55 45 20 20 20 ....MARQUE
000130: 20 00 00 01 00 4E 4F 4D 20 20 20 20 20 20 20 00 ....NOM .
000140: 00 02 00 50 52 45 4E 4F 4D 20 20 20 20 00 00 0C ...PRENOM ...
000150: 00 50 52 4F 46 45 53 53 49 4F 4E 00 00 04 00 50 .PROFESSION....P
000160: 52 4F 56 49 53 49 54 45 20 00 00 0B 00 54 45 4C ROVISITE ....TEL
000170: 20 20 20 20 20 20 20 00 00 0E 00 54 59 50 45 20 ....TYPE
000180: 20 20 20 20 20 00 00 07 00 56 45 4E 54 45 20 20 ....VENTE
000190: 20 20 20 00 00 0A 00 56 49 4C 4C 45 20 20 20 20 ....VILLE
0001A0: 20 00 00 CD 45 25 AF 32 4D 44 CD 61 27 C3 5B 54 ...E%.2MD.a'.[T
0001B0: 3E 48 C3 53 54 3E 28 C3 53 54 AF 32 5B 56 CD 63 >H.ST>(.ST.2[V.c
0001C0: 39 11 6E 55 CD B1 37 CA AF 51 3E FF 32 5B 56 CD 9.nU..7..Q>.2[V.
0001D0: 63 39 11 52 55 CD B1 37 C2 48 54 CD 8E 39 CD 73 c9.RU..7.HT..9.s
0001E0: 39 CA 48 54 22 71 56 CD D8 1C 22 67 56 2A 67 56 9.HT"qV..."gV*gV
0001F0: 7E B7 CA E7 51 EB 2A 71 56 3A 5B 56 B7 CA DD 51 ~...Q.*qV:[V...Q
Size : 512 (Real : 512)
000000: 00 00 01 00 02 00 0E 10 1F 00 56 49 4C 4C 45 20 ..........VILLE
000010: 20 20 20 20 20 00 6C 65 6D 00 50 CD 8E 39 3E 03 .lem.P..9>.
000020: CD AD 27 3E FF 32 5D 56 3E 01 CD F0 2B D2 E0 4F ..'>.2]V>...+..O
000030: 3E 58 C3 53 54 11 1D 55 CD B1 37 C2 48 54 CD 8E >X.ST..U..7.HT..
000040: 39 3E FF 32 5B 56 C3 E0 4F 3A 5D 56 B7 CA 48 54 9>.2[V..O:]V..HT
000050: 3A 5B 56 B7 C2 2E 50 CD 20 29 11 79 56 01 10 00 :[V...P. ).yV...
000060: CD 7A 2C DA 97 50 21 0B 00 19 7E FE CE CA 0E 00 .z,..P!...~.....
000070: 00 01 00 40 10 00 00 00 00 00 00 02 00 40 20 00 ...@.........@ .
000080: 00 00 00 00 00 03 00 40 30 00 00 00 00 00 00 04 .......@0.......
000090: 00 40 40 00 00 00 00 00 00 05 00 40 50 00 00 00 .@@........@P...
0000A0: 00 00 00 06 00 40 60 00 00 00 00 00 00 07 00 40 .....@`........@
0000B0: 70 00 00 00 00 00 00 08 00 40 80 00 00 00 00 00 p........@......
0000C0: 00 09 00 40 90 00 00 00 00 00 00 0A 00 41 10 00 ...@.........A..
0000D0: 00 00 00 00 00 0B 00 41 11 00 00 00 00 00 00 0C .......A........
0000E0: 00 41 12 00 00 00 00 00 00 0D 00 41 13 00 00 00 .A.........A....
0000F0: 00 00 00 0E 00 41 14 00 00 00 00 00 00 0B 00 54 .....A.........T
000100: 45 4C 20 20 20 20 20 20 20 00 00 0E 00 54 59 50 EL ....TYP
000110: 45 20 20 20 20 20 20 00 00 07 00 56 45 4E 54 45 E ....VENTE
000120: 20 20 20 20 20 00 00 0A 00 56 49 4C 4C 45 20 20 ....VILLE
000130: 20 20 20 00 00 CD 45 25 AF 32 4D 44 CD 61 27 C3 ...E%.2MD.a'.
000140: 5B 54 3E 48 C3 53 54 3E 28 C3 53 54 AF 32 5B 56 [T>H.ST>(.ST.2[V
000150: CD 63 39 11 6E 55 CD B1 37 CA AF 51 3E FF 32 5B .c9.nU..7..Q>.2[
000160: 56 CD 63 39 11 52 55 CD B1 37 C2 48 54 CD 8E 39 V.c9.RU..7.HT..9
000170: CD 73 39 CA 48 54 22 71 56 CD D8 1C 22 67 56 2A .s9.HT"qV..."gV*
000180: 67 56 7E B7 CA E7 51 EB 2A 71 56 3A 5B 56 B7 CA gV~...Q.*qV:[V..
000190: DD 51 CD 8E 54 CA E7 51 C3 E3 51 CD 8E 54 C2 E7 .Q..T..Q..Q..T..
0001A0: 51 EB CD 79 2A 2A 67 56 11 10 00 19 22 67 56 7E Q..y**gV...."gV~
0001B0: FE 0D C2 C1 51 C3 5B 54 CD DD 25 AF 32 5F 56 CD ....Q.[T..%.2_V.
0001C0: E9 25 DA 48 54 CD 73 39 CA 3B 52 11 AC 55 CD B1 .%.HT.s9.;R..U..
0001D0: 37 C2 48 54 CD 8E 39 CD 73 39 CA 48 54 01 00 05 7.HT..9.s9.HT...
0001E0: CD 72 2A 22 73 56 3E FF 32 5F 56 CD 69 39 CA 3B .r*"sV>.2_V.i9.;
0001F0: 52 FE 20 C2 2D 52 C3 01 52 01 00 00 CD 2A 2C 7C R. .-R..R....*,|
Size : 512 (Real : 512)
000000: 0E 00 00 08 00 41 44 52 45 53 53 45 20 20 20 00 .....ADRESSE .
000010: 00 06 00 42 45 53 4F 49 4E 20 20 20 20 00 00 09 ...BESOIN ...
000020: 00 43 4F 44 45 50 4F 53 54 20 20 00 00 03 00 44 .CODEPOST ....D
000030: 45 52 56 49 53 49 54 45 20 00 00 05 00 4C 49 45 ERVISITE ....LIE
000040: 55 20 20 20 20 20 20 00 00 0D 00 4D 41 52 51 55 U ....MARQU
000050: 45 20 20 20 20 00 00 01 00 4E 4F 4D 20 20 20 20 E ....NOM
000060: 20 20 20 00 00 02 00 50 52 45 4E 4F 4D 20 20 20 ....PRENOM
000070: 20 00 00 0C 00 50 52 4F 46 20 20 20 20 20 20 00 ....PROF .
000080: 00 04 00 50 52 4F 56 49 53 49 54 45 20 00 00 0B ...PROVISITE ...
000090: 00 54 45 4C 20 20 20 20 20 20 20 00 00 0E 00 54 .TEL ....T
0000A0: 59 50 45 20 20 20 20 20 20 00 00 07 00 56 45 4E YPE ....VEN
0000B0: 54 45 20 20 20 20 20 00 00 0A 00 56 49 4C 4C 45 TE ....VILLE
0000C0: 20 20 20 20 20 00 00 CD 45 25 AF 32 4D 44 CD 61 ...E%.2MD.a
0000D0: 27 C3 5B 54 3E 48 C3 53 54 3E 28 C3 53 54 AF 32 '.[T>H.ST>(.ST.2
0000E0: 5B 56 CD 63 39 11 6E 55 CD B1 37 CA AF 51 3E FF [V.c9.nU..7..Q>.
0000F0: 32 5B 56 CD 63 39 11 52 55 CD B1 37 C2 48 54 CD 2[V.c9.RU..7.HT.
000100: 8E 39 CD 73 39 CA 48 54 22 71 56 CD D8 1C 22 67 .9.s9.HT"qV..."g
000110: 56 2A 67 56 7E B7 CA E7 51 EB 2A 71 56 3A 5B 56 V*gV~...Q.*qV:[V
000120: B7 CA DD 51 CD 8E 54 CA E7 51 C3 E3 51 CD 8E 54 ...Q..T..Q..Q..T
000130: C2 E7 51 EB CD 79 2A 2A 67 56 11 10 00 19 22 67 ..Q..y**gV...."g
000140: 56 7E FE 0D C2 C1 51 C3 5B 54 CD DD 25 AF 32 5F V~....Q.[T..%.2_
000150: 56 CD E9 25 DA 48 54 CD 73 39 CA 3B 52 11 AC 55 V..%.HT.s9.;R..U
000160: CD B1 37 C2 48 54 CD 8E 39 CD 73 39 CA 48 54 01 ..7.HT..9.s9.HT.
000170: 00 05 CD 72 2A 22 73 56 3E FF 32 5F 56 CD 69 39 ...r*"sV>.2_V.i9
000180: CA 3B 52 FE 20 C2 2D 52 C3 01 52 01 00 00 CD 2A .;R. .-R..R....*
000190: 2C 7C B5 CA 62 52 21 FF FF CD 5B 26 DA 62 52 CD ,|..bR!...[&.bR.
0001A0: 78 27 CA 59 52 DA 62 52 03 CD 47 2B CA 62 52 D2 x'.YR.bR..G+.bR.
0001B0: 4F 52 3A 7D 44 B7 CA 73 52 3E 22 CD 70 3B 60 69 OR:}D..sR>".p;`i
0001C0: CD 35 36 3A 5F 56 B7 CA 5B 54 60 69 CD 18 34 2A .56:_V..[T`i..4*
0001D0: 73 56 11 0D 00 19 CD E9 36 CD E5 34 C3 5B 54 3E sV......6..4.[T>
0001E0: 67 CD 70 3B CD 61 27 CD 3C 27 CD C4 25 3E 72 CD g.p;.a'.<'..%>r.
0001F0: 70 3B CD 2A 2C CD 35 36 3E 77 CD 70 3B CD E3 1C p;.*,.56>w.p;...
Size : 512 (Real : 512)
000000: 07 00 00 07 00 20 20 20 20 20 20 20 20 20 20 20 .....
000010: 20 00 00 01 00 45 50 49 4E 41 4C 20 20 20 20 20 ....EPINAL
000020: 20 00 00 02 00 45 50 49 4E 41 4C 20 20 20 20 20 ....EPINAL
000030: 20 00 00 04 00 4D 45 54 5A 20 20 20 20 20 20 20 ....METZ
000040: 20 00 00 03 00 4E 41 4E 43 59 20 20 20 20 20 20 ....NANCY
000050: 20 00 00 05 00 50 41 52 49 53 20 20 20 20 20 20 ....PARIS
000060: 20 00 00 06 00 52 45 4D 49 52 45 4D 4F 4D 54 20 ....REMIREMOMT
000070: 20 00 00 05 00 4D 41 52 54 45 41 55 20 20 20 20 ....MARTEAU
000080: 20 4D 49 43 48 45 4C 20 20 20 20 20 20 00 00 06 MICHEL ...
000090: 00 50 49 4E 41 52 44 20 4F 44 49 4C 45 20 20 20 .PINARD ODILE
0000A0: 20 20 20 20 20 20 20 20 20 00 00 07 00 56 45 4E ....VEN
0000B0: 54 45 20 20 20 20 20 00 00 0A 00 56 49 4C 4C 45 TE ....VILLE
0000C0: 20 20 20 20 20 00 00 CD 45 25 AF 32 4D 44 CD 61 ...E%.2MD.a
0000D0: 27 C3 5B 54 3E 48 C3 53 54 3E 28 C3 53 54 AF 32 '.[T>H.ST>(.ST.2
0000E0: 5B 56 CD 63 39 11 6E 55 CD B1 37 CA AF 51 3E FF [V.c9.nU..7..Q>.
0000F0: 32 5B 56 CD 63 39 11 52 55 CD B1 37 C2 48 54 CD 2[V.c9.RU..7.HT.
000100: 8E 39 CD 73 39 CA 48 54 22 71 56 CD D8 1C 22 67 .9.s9.HT"qV..."g
000110: 56 2A 67 56 7E B7 CA E7 51 EB 2A 71 56 3A 5B 56 V*gV~...Q.*qV:[V
000120: B7 CA DD 51 CD 8E 54 CA E7 51 C3 E3 51 CD 8E 54 ...Q..T..Q..Q..T
000130: C2 E7 51 EB CD 79 2A 2A 67 56 11 10 00 19 22 67 ..Q..y**gV...."g
000140: 56 7E FE 0D C2 C1 51 C3 5B 54 CD DD 25 AF 32 5F V~....Q.[T..%.2_
000150: 56 CD E9 25 DA 48 54 CD 73 39 CA 3B 52 11 AC 55 V..%.HT.s9.;R..U
000160: CD B1 37 C2 48 54 CD 8E 39 CD 73 39 CA 48 54 01 ..7.HT..9.s9.HT.
000170: 00 05 CD 72 2A 22 73 56 3E FF 32 5F 56 CD 69 39 ...r*"sV>.2_V.i9
000180: CA 3B 52 FE 20 C2 2D 52 C3 01 52 01 00 00 CD 2A .;R. .-R..R....*
000190: 2C 7C B5 CA 62 52 21 FF FF CD 5B 26 DA 62 52 CD ,|..bR!...[&.bR.
0001A0: 78 27 CA 59 52 DA 62 52 03 CD 47 2B CA 62 52 D2 x'.YR.bR..G+.bR.
0001B0: 4F 52 3A 7D 44 B7 CA 73 52 3E 22 CD 70 3B 60 69 OR:}D..sR>".p;`i
0001C0: CD 35 36 3A 5F 56 B7 CA 5B 54 60 69 CD 18 34 2A .56:_V..[T`i..4*
0001D0: 73 56 11 0D 00 19 CD E9 36 CD E5 34 C3 5B 54 3E sV......6..4.[T>
0001E0: 67 CD 70 3B CD 61 27 CD 3C 27 CD C4 25 3E 72 CD g.p;.a'.<'..%>r.
0001F0: 70 3B CD 2A 2C CD 35 36 3E 77 CD 70 3B CD E3 1C p;.*,.56>w.p;...
Size : 512 (Real : 512)
000000: 00 00 01 00 02 00 08 0A 32 02 6E 6F 7A 00 64 3A ........2.noz.d:
000010: 6E 61 6D 65 00 65 6C 65 6D 00 50 CD 8E 39 3E 03 name.elem.P..9>.
000020: CD AD 27 3E FF 32 5D 56 3E 01 CD F0 2B D2 E0 4F ..'>.2]V>...+..O
000030: 3E 58 C3 53 54 11 1D 55 CD B1 37 C2 48 54 CD 8E >X.ST..U..7.HT..
000040: 39 3E FF 32 5B 56 C3 E0 4F 3A 5D 56 B7 CA 48 54 9>.2[V..O:]V..HT
000050: 3A 5B 56 B7 C2 2E 50 CD 20 29 11 79 56 01 10 00 :[V...P. ).yV...
000060: CD 7A 2C DA 97 50 21 0B 00 19 7E FE CE CA 00 00 .z,..P!...~.....
000070: 01 00 02 00 0E 10 1F 00 4E 4F 4D 20 20 20 20 20 ........NOM
000080: 20 20 20 00 6C 65 6D 00 50 CD 8E 39 3E 03 CD AD .lem.P..9>...
000090: 27 3E FF 32 5D 56 3E 01 CD F0 2B D2 E0 4F 3E 58 '>.2]V>...+..O>X
0000A0: C3 53 54 11 1D 55 CD B1 37 C2 48 54 CD 8E 39 3E .ST..U..7.HT..9>
0000B0: FF 32 5B 56 C3 E0 4F 3A 5D 56 B7 CA 48 54 3A 5B .2[V..O:]V..HT:[
0000C0: 56 B7 C2 2E 50 CD 20 29 11 79 56 01 10 00 CD 7A V...P. ).yV....z
0000D0: 2C DA 97 50 21 0B 00 19 7E FE CE CA 00 00 00 01 ,..P!...~.......
0000E0: 00 43 43 4C 45 20 20 20 20 20 00 00 00 06 00 42 .CCLE .....B
0000F0: 45 53 4F 49 4E 20 20 20 20 00 00 09 00 43 4F 44 ESOIN ....COD
000100: 45 50 4F 53 54 20 20 00 00 03 00 44 45 52 56 49 EPOST ....DERVI
000110: 53 49 54 45 20 00 00 05 00 4C 49 45 55 20 20 20 SITE ....LIEU
000120: 20 20 20 00 00 0D 00 4D 41 52 51 55 45 20 20 20 ....MARQUE
000130: 20 00 00 01 00 4E 4F 4D 20 20 20 20 20 20 20 00 ....NOM .
000140: 00 02 00 50 52 45 4E 4F 4D 20 20 20 20 00 00 0C ...PRENOM ...
000150: 00 50 52 4F 46 45 53 53 49 4F 4E 00 00 04 00 50 .PROFESSION....P
000160: 52 4F 56 49 53 49 54 45 20 00 00 0B 00 54 45 4C ROVISITE ....TEL
000170: 20 20 20 20 20 20 20 00 00 0E 00 54 59 50 45 20 ....TYPE
000180: 20 20 20 20 20 00 00 07 00 56 45 4E 54 45 20 20 ....VENTE
000190: 20 20 20 00 00 0A 00 56 49 4C 4C 45 20 20 20 20 ....VILLE
0001A0: 20 00 00 CD 45 25 AF 32 4D 44 CD 61 27 C3 5B 54 ...E%.2MD.a'.[T
0001B0: 3E 48 C3 53 54 3E 28 C3 53 54 AF 32 5B 56 CD 63 >H.ST>(.ST.2[V.c
0001C0: 39 11 6E 55 CD B1 37 CA AF 51 3E FF 32 5B 56 CD 9.nU..7..Q>.2[V.
0001D0: 63 39 11 52 55 CD B1 37 C2 48 54 CD 8E 39 CD 73 c9.RU..7.HT..9.s
0001E0: 39 CA 48 54 22 71 56 CD D8 1C 22 67 56 2A 67 56 9.HT"qV..."gV*gV
0001F0: 7E B7 CA E7 51 EB 2A 71 56 3A 5B 56 B7 CA DD 51 ~...Q.*qV:[V...Q
Size : 512 (Real : 512)
000000: C3 C9 46 00 00 00 00 00 00 FF 00 03 08 20 08 03 ..F.......... ..
000010: 02 20 04 1B 59 00 00 1B 43 1B 59 0D 1B 6B 02 1B . ..Y...C.Y..k..
000020: 70 00 00 00 02 1B 71 00 00 00 02 1B 71 1B 59 47 p.....q.....q.YG
000030: 04 1B 45 1B 48 00 00 00 00 00 00 00 06 1B 71 1B ..E.H.........q.
000040: 59 37 20 00 00 00 00 00 01 00 00 00 00 00 00 00 Y7 .............
000050: 00 00 00 00 50 18 50 00 08 0C 0B 0A 26 FF 00 00 ....P.P.....&...
000060: FF 00 46 78 B7 C8 23 4E CD A0 0A 05 C2 66 01 C9 ..Fx..#N.....f..
000070: 21 0B 01 C3 62 01 3A 75 44 B7 C8 21 1E 01 CD 62 !...b.:uD..!...b
000080: 01 C9 3A 75 44 B7 C8 21 24 01 CD 62 01 C9 3A 75 ..:uD..!$..b..:u
000090: 44 B7 C8 21 2A 01 CD 62 01 C9 21 30 01 CD 62 01 D..!*..b..!0..b.
0000A0: 3A 56 01 B7 C8 C5 06 69 00 05 C2 A8 01 3D C2 A6 :V.....i.....=..
0000B0: 01 C1 C9 D5 2A 19 0B E5 3A 11 01 85 4F 3A 0F 01 ....*...:...O:..
0000C0: 3C 21 12 01 CD BB 36 3A 0A 01 0F D2 D5 01 EB CD <!....6:........
0000D0: FD 01 C3 D6 01 71 E1 3A 11 01 84 4F 3A 10 01 3C .....q.:...O:..<
0000E0: 21 12 01 CD BB 36 3A 0A 01 0F D2 F4 01 EB CD FD !....6:.........
0000F0: 01 C3 F5 01 71 21 12 01 CD 62 01 D1 C9 26 00 69 ....q!...b...&.i
000100: 00 01 64 00 CD 10 02 01 0A 00 CD 10 02 01 01 00 ..d.............
000110: CD C7 36 12 13 C9 21 3C 01 CD 62 01 C9 32 05 0B ..6...!<..b..2..
000120: E6 04 C2 29 02 78 32 0B 0B 3A 05 0B 0F D2 49 02 ...).x2..:....I.
000130: CD DC 1C 22 E1 0A 21 D0 0A C2 3F 02 21 C8 0A EB ..."..!...?.!...
000140: 21 20 00 22 19 0B CD 80 08 21 48 01 CD 62 01 3A ! .".....!H..b.:
000150: 0E 0B B7 C2 5B 02 3E 80 C3 57 06 AF 32 12 0B 32 ....[.>..W..2..2
000160: 0C 0B 32 18 0B 21 12 00 11 D0 0A CD 80 08 CD E3 ..2..!..........
000170: 09 CD 30 07 CA 7A 02 C3 A4 03 CD 7C 3A B7 CA 03 ..0..z.....|:...
000180: 03 CD 62 3A FE 7F CA 7B 04 FE 20 D2 E7 03 FE 1B ..b:...{.. .....
000190: C2 BB 02 CD 62 3A 21 57 01 BE C2 A2 02 CD 62 3A ....b:!W......b:
0001A0: 00 00 21 58 01 BE CA 77 03 23 BE CA A4 03 23 BE ..!X...w.#....#.
0001B0: CA 4E 03 23 BE CA B0 05 C3 7A 02 CD B2 36 7A 02 .N.#.....z...6z.
0001C0: 4E 03 44 06 54 05 A4 03 4E 03 B0 05 78 04 77 03 N.D.T...N...x.w.
0001D0: 7A 02 B0 05 4E 03 A4 03 6A 05 0E 06 7A 02 7A 02 z...N...j...z.z.
0001E0: FE 02 5F 05 77 03 1B 06 E2 05 5A 04 28 06 B0 05 .._.w.....Z.(...
0001F0: 22 05 31 06 7A 02 7A 02 7A 02 7A 02 7A 02 3E 80 ".1.z.z.z.z.z.>.
Size : 512 (Real : 512)
000000: 0E 00 00 01 00 40 10 00 00 00 00 00 00 02 00 40 .....@.........@
000010: 20 00 00 00 00 00 00 03 00 40 30 00 00 00 00 00 ........@0.....
000020: 00 04 00 40 40 00 00 00 00 00 00 05 00 40 50 00 ...@@........@P.
000030: 00 00 00 00 00 06 00 40 60 00 00 00 00 00 00 07 .......@`.......
000040: 00 40 70 00 00 00 00 00 00 08 00 40 80 00 00 00 .@p........@....
000050: 00 00 00 09 00 40 90 00 00 00 00 00 00 0A 00 41 .....@.........A
000060: 10 00 00 00 00 00 00 0B 00 41 11 00 00 00 00 00 .........A......
000070: 00 0C 00 41 12 00 00 00 00 00 00 0D 00 41 13 00 ...A.........A..
000080: 00 00 00 00 00 0E 00 41 14 00 00 00 00 00 00 0B .......A........
000090: 00 54 45 4C 20 20 20 20 20 20 20 00 00 0E 00 54 .TEL ....T
0000A0: 59 50 45 20 20 20 20 20 20 00 00 07 00 56 45 4E YPE ....VEN
0000B0: 54 45 20 20 20 20 20 00 00 0A 00 56 49 4C 4C 45 TE ....VILLE
0000C0: 20 20 20 20 20 00 00 CD 45 25 AF 32 4D 44 CD 61 ...E%.2MD.a
0000D0: 27 C3 5B 54 3E 48 C3 53 54 3E 28 C3 53 54 AF 32 '.[T>H.ST>(.ST.2
0000E0: 5B 56 CD 63 39 11 6E 55 CD B1 37 CA AF 51 3E FF [V.c9.nU..7..Q>.
0000F0: 32 5B 56 CD 63 39 11 52 55 CD B1 37 C2 48 54 CD 2[V.c9.RU..7.HT.
000100: 8E 39 CD 73 39 CA 48 54 22 71 56 CD D8 1C 22 67 .9.s9.HT"qV..."g
000110: 56 2A 67 56 7E B7 CA E7 51 EB 2A 71 56 3A 5B 56 V*gV~...Q.*qV:[V
000120: B7 CA DD 51 CD 8E 54 CA E7 51 C3 E3 51 CD 8E 54 ...Q..T..Q..Q..T
000130: C2 E7 51 EB CD 79 2A 2A 67 56 11 10 00 19 22 67 ..Q..y**gV...."g
000140: 56 7E FE 0D C2 C1 51 C3 5B 54 CD DD 25 AF 32 5F V~....Q.[T..%.2_
000150: 56 CD E9 25 DA 48 54 CD 73 39 CA 3B 52 11 AC 55 V..%.HT.s9.;R..U
000160: CD B1 37 C2 48 54 CD 8E 39 CD 73 39 CA 48 54 01 ..7.HT..9.s9.HT.
000170: 00 05 CD 72 2A 22 73 56 3E FF 32 5F 56 CD 69 39 ...r*"sV>.2_V.i9
000180: CA 3B 52 FE 20 C2 2D 52 C3 01 52 01 00 00 CD 2A .;R. .-R..R....*
000190: 2C 7C B5 CA 62 52 21 FF FF CD 5B 26 DA 62 52 CD ,|..bR!...[&.bR.
0001A0: 78 27 CA 59 52 DA 62 52 03 CD 47 2B CA 62 52 D2 x'.YR.bR..G+.bR.
0001B0: 4F 52 3A 7D 44 B7 CA 73 52 3E 22 CD 70 3B 60 69 OR:}D..sR>".p;`i
0001C0: CD 35 36 3A 5F 56 B7 CA 5B 54 60 69 CD 18 34 2A .56:_V..[T`i..4*
0001D0: 73 56 11 0D 00 19 CD E9 36 CD E5 34 C3 5B 54 3E sV......6..4.[T>
0001E0: 67 CD 70 3B CD 61 27 CD 3C 27 CD C4 25 3E 72 CD g.p;.a'.<'..%>r.
0001F0: 70 3B CD 2A 2C CD 35 36 3E 77 CD 70 3B CD E3 1C p;.*,.56>w.p;...
Size : 512 (Real : 512)
000000: C3 57 06 3A 18 0B B7 CA 81 02 2A 19 0B E5 2A 16 .W.:......*...*.
000010: 0B 22 19 0B CD B3 01 2A 14 0B 7E 23 22 14 0B 4F .".....*..~#"..O
000020: CD 76 3A CD CC 06 3A 04 0B 3D 32 04 0B C2 37 03 .v:...:..=2...7.
000030: AF 32 18 0B C3 3E 03 CD 7C 3A B7 CA 17 03 2A 19 .2...>..|:....*.
000040: 0B 22 16 0B E1 22 19 0B CD B3 01 C3 7A 02 CD D4 ."..."......z...
000050: 08 3A 0B 0B 3D F2 68 03 3A 05 0B E6 04 C2 6B 03 .:..=.h.:.....k.
000060: 3A 12 0B F6 06 C3 57 06 32 0B 0B CD E3 09 CD 30 :.....W.2......0
000070: 07 CA 7A 02 C3 A4 03 AF 32 E0 0A 2A 02 0B EB 2A ..z.....2..*...*
000080: 19 0B CD C0 36 D2 4E 03 2D F2 92 03 3A 54 01 3D ....6.N.-...:T.=
000090: 6F 25 22 19 0B CD 0C 07 CD B3 01 CD 30 07 CA 7A o%".........0..z
0000A0: 02 C3 77 03 2A 09 0B EB 2A 19 0B CD C0 36 DA C6 ..w.*...*....6..
0000B0: 03 CA C6 03 CD CC 06 CD E8 06 CD B3 01 CD 30 07 ..............0.
0000C0: CA 7A 02 C3 A4 03 3A 58 44 B7 C2 D3 03 CD BD 0A .z....:XD.......
0000D0: C3 B0 05 2A 09 0B 22 19 0B CD B3 01 CD BD 0A 3E ...*.."........>
0000E0: FF 32 E0 0A C3 7A 02 CD 3C 07 79 F5 D2 F6 03 CD .2...z..<.y.....
0000F0: BD 0A F1 C3 7A 02 3E 01 32 12 0B 3A 0C 0B B7 C2 ....z.>.2..:....
000100: 0E 04 F1 2A E3 0A 77 4F CD 76 3A C3 A4 03 2A 00 ...*..wO.v:...*.
000110: 0B 3A 0D 0B CD BB 36 EB 1B 2A E3 0A 22 E5 0A 4E .:....6..*.."..N
000120: 3A 1B 0B 32 1C 0B CD E8 06 2A E3 0A CD C0 36 DA :..2.....*....6.
000130: 42 04 79 CD 3C 07 DA 42 04 2A E3 0A 7E 71 4F C3 B.y.<..B.*..~qO.
000140: 26 04 3A 1C 0B 32 1B 0B 2A E5 0A 22 E3 0A F1 77 &.:..2..*.."...w
000150: 4F CD 76 3A CD 88 0A C3 A4 03 3A 0C 0B EE FF 32 O.v:......:....2
000160: 0C 0B CA 6B 04 21 D8 0A C3 6E 04 21 D0 0A EB 21 ...k.!...n.!...!
000170: 12 00 CD 80 08 C3 7A 02 C3 AE 04 2A E3 0A 2B EB ......z....*..+.
000180: 2A 00 0B CD C0 36 DA 7A 02 CD 0C 07 CD 30 07 CA *....6.z.....0..
000190: 98 04 CD E8 06 C3 7A 02 2A 19 0B 2D 22 19 0B F2 ......z.*..-"...
0001A0: AE 04 3A 54 01 3D 6F 25 22 19 0B CD B3 01 3E 01 ..:T.=o%".....>.
0001B0: 32 12 0B 3A 0D 0B 4F 2A 00 0B EB 2A E3 0A EB 79 2..:..O*...*...y
0001C0: CD BB 36 2B 22 06 0B 3A 1B 0B 32 1C 0B 2A E3 0A ..6+"..:..2..*..
0001D0: 22 E5 0A 2A 06 0B EB 2A E3 0A CD C0 36 CA 0B 05 "..*...*....6...
0001E0: CD E8 06 CD 30 07 C2 08 05 3A 1D 0B B7 CA 08 05 ....0....:......
0001F0: 2A E3 0A 4E CD 0C 07 79 CD 3C 07 DA 0B 05 2A E3 *..N...y.<....*.
Size : 512 (Real : 512)
000000: 02 0E 00 02 0C 56 64 00 46 49 45 4C 44 3A 4E 41 .....Vd.FIELD:NA
000010: 4D 45 00 43 0A B9 70 00 46 49 45 4C 44 3A 54 59 ME.C..p.FIELD:TY
000020: 50 45 00 43 01 C3 70 00 46 49 45 4C 44 3A 4C 45 PE.C..p.FIELD:LE
000030: 4E 00 00 4E 03 C4 70 00 46 49 45 4C 44 3A 44 45 N..N..p.FIELD:DE
000040: 43 00 00 4E 03 C7 70 00 4C 54 00 00 00 00 00 00 C..N..p.LT......
000050: 00 00 00 4E 02 CA 70 00 43 54 00 00 00 00 00 00 ...N..p.CT......
000060: 00 00 00 4E 02 CC 70 00 54 45 58 54 45 00 00 00 ...N..p.TEXTE...
000070: 00 00 00 43 14 CE 70 00 4C 53 00 00 00 00 00 00 ...C..p.LS......
000080: 00 00 00 4E 02 E2 70 00 43 53 00 00 00 00 00 00 ...N..p.CS......
000090: 00 00 00 4E 02 E4 70 00 56 45 52 49 46 00 00 00 ...N..p.VERIF...
0000A0: 00 00 00 43 02 E6 70 00 56 41 4C 31 00 00 00 00 ...C..p.VAL1....
0000B0: 00 00 00 43 0A E8 70 00 56 41 4C 32 00 00 00 00 ...C..p.VAL2....
0000C0: 00 00 00 43 1E F2 70 00 56 41 4C 33 00 00 00 00 ...C..p.VAL3....
0000D0: 00 00 00 43 0A 10 71 00 4E 4F 5A 00 00 00 00 00 ...C..q.NOZ.....
0000E0: 00 00 00 4E 02 1A 71 00 0D 00 00 00 00 00 00 00 ...N..q.........
0000F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000100: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000110: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000120: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000140: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000150: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
Size : 512 (Real : 512)
000000: 36 7E C3 08 07 CD AA 0A 32 1D 0B C9 2A E3 0A 2B 6~......2...*..+
000010: 22 E3 0A 2A 0F 0B 7C B5 CA 29 07 3A 1B 0B 3D 32 "..*..|..).:..=2
000020: 1B 0B CD BB 36 7E C3 2C 07 CD AA 0A 32 1D 0B C9 ....6~.,....2...
000030: 3A 1D 0B B7 C8 21 F5 0A CD 4B 39 C9 4F 3A 1D 0B :....!...K9.O:..
000040: B7 C8 FE 39 CA 79 07 FE 23 CA 79 07 FE 41 CA 60 ...9.y..#.y..A.`
000050: 07 FE 4C CA 6F 07 FE 21 CA 65 07 FE 58 C8 37 C9 ..L.o..!.e..X.7.
000060: 79 CD 84 36 C9 79 CD 84 36 3F D0 E6 5F 4F C9 79 y..6.y..6?.._O.y
000070: 21 E7 0A CD 4B 39 C8 37 C9 79 21 F0 0A CD 4B 39 !...K9.7.y!...K9
000080: C8 79 CD AB 36 C9 47 2A 1E 0B 11 0B 00 19 4E 23 .y..6.G*......N#
000090: 23 CD DF 36 79 B7 F2 EE 07 FE C3 CA ED 07 FE CE #..6y...........
0000A0: CA B6 07 7E B7 C2 AD 07 0E 46 C3 AF 07 0E 54 CD ...~.....F....T.
0000B0: 76 3A CD CC 06 C9 CD F2 34 2A 0F 0B 7C B5 CA D9 v:......4*..|...
0000C0: 07 CD AD 08 2A 1E 0B 11 0C 00 19 70 23 23 23 71 ....*......p###q
0000D0: 21 00 00 22 0F 0B C3 E1 07 2A 1E 0B 11 0F 00 19 !..".....*......
0000E0: 4E 21 C7 9B CD 4D 33 21 C7 9B C3 EE 07 23 EB 2A N!...M3!.....#.*
0000F0: 0F 0B 7C B5 EB C2 09 08 4E CD A0 0A 23 C5 E5 CD ..|.....N...#...
000100: CC 06 E1 C1 05 C2 F8 07 C9 E5 2A FE 0A 22 0F 0B ..........*.."..
000110: E1 1A B7 CA 76 08 F5 E5 2A FE 0A 77 23 22 FE 0A ....v...*..w#"..
000120: E1 F1 FE 39 CA 3F 08 FE 23 CA 3F 08 FE 41 CA 49 ...9.?..#.?..A.I
000130: 08 FE 21 CA 49 08 FE 58 CA 5E 08 77 C3 65 08 7E ..!.I..X.^.w.e.~
000140: CD AB 36 D2 65 08 C3 62 08 4F 7E CD 84 36 DA 5E ..6.e..b.O~..6.^
000150: 08 79 FE 21 7E C2 65 08 E6 5F 77 C3 65 08 7E C3 .y.!~.e.._w.e.~.
000160: 65 08 3E 20 77 4F CD A0 0A 23 13 C5 E5 CD CC 06 e.> wO...#......
000170: E1 C1 05 C2 11 08 2A FE 0A 36 00 23 22 FE 0A C9 ......*..6.#"...
000180: E5 CD 8E 01 2A 19 0B E3 22 19 0B CD B3 01 EB CD ....*...".......
000190: 9D 08 E1 22 19 0B CD B3 01 CD 76 01 C9 7E B7 C8 ..."......v..~..
0001A0: 4F CD A0 0A 23 E5 CD CC 06 E1 C3 9D 08 01 00 00 O...#...........
0001B0: 7E B7 C8 04 23 FE 2E C2 B0 08 7E B7 C8 0C 04 23 ~...#.....~....#
0001C0: C3 BA 08 3A 0B 0B 6F 26 00 29 29 29 11 AF 9F 19 ...:..o&.)))....
0001D0: CD E9 36 C9 3A 13 0B E6 7F FE 4E C2 31 09 2A 00 ..6.:.....N.1.*.
0001E0: 0B 3A 0D 0B 4F CD 9F 32 3A 13 0B B7 F2 FD 08 2A .:..O..2:......*
0001F0: 1E 0B 11 0D 00 19 CD DF 36 EB CD E5 34 2A 0F 0B ........6...4*..
Size : 512 (Real : 512)
000000: 00 00 00 00 00 00 00 00 00 20 4E 4F 4D 20 20 20 ......... NOM
000010: 20 20 20 20 43 20 31 32 20 20 30 20 33 20 37 4E C 12 0 3 7N
000020: 6F 6D 3A 20 20 20 20 20 20 20 20 20 20 20 20 20 om:
000030: 20 20 20 20 33 31 32 4E 41 20 20 20 20 20 20 20 312NA
000040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000060: 20 20 20 20 20 20 20 20 20 20 20 20 31 20 50 52 1 PR
000070: 45 4E 4F 4D 20 20 20 20 43 20 31 32 20 20 30 20 ENOM C 12 0
000080: 33 32 36 50 72 65 6E 6F 6D 3A 20 20 20 20 20 20 326Prenom:
000090: 20 20 20 20 20 20 20 20 33 33 34 4E 41 20 20 20 334NA
0000A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000D0: 32 20 44 45 52 56 49 53 49 54 45 20 43 20 20 38 2 DERVISITE C 8
0000E0: 20 20 30 31 35 35 33 44 65 72 6E 69 65 72 65 20 01553Derniere
0000F0: 56 69 73 69 74 65 3A 20 20 20 20 31 35 37 30 4E Visite: 1570N
000100: 44 20 20 20 20 20 20 20 20 20 20 30 30 2F 30 30 D 00/00
000110: 2F 30 30 20 20 20 20 20 20 20 20 20 20 20 20 20 /00
000120: 20 20 20 20 20 20 20 20 20 30 30 2F 30 30 2F 30 00/00/0
000130: 30 20 20 20 33 20 50 52 4F 56 49 53 49 54 45 20 0 3 PROVISITE
000140: 43 20 20 38 20 20 30 31 37 35 32 50 72 6F 63 68 C 8 01752Proch
000150: 61 69 6E 65 20 56 69 73 69 74 65 3A 20 20 20 31 aine Visite: 1
000160: 37 37 30 4E 44 20 20 20 20 20 20 20 20 20 20 30 770ND 0
000170: 30 2F 30 30 2F 30 30 20 20 20 20 20 20 20 20 20 0/00/00
000180: 20 20 20 20 20 20 20 20 20 20 20 20 20 30 30 2F 00/
000190: 30 30 2F 30 30 20 20 20 34 20 4C 49 45 55 20 20 00/00 4 LIEU
0001A0: 20 20 20 20 43 20 20 31 20 20 30 31 39 35 36 4C C 1 01956L
0001B0: 69 65 75 20 28 42 2C 44 2C 4E 29 3A 20 20 20 20 ieu (B,D,N):
0001C0: 20 20 20 31 39 37 30 4E 4C 20 20 20 20 20 20 20 1970NL
0001D0: 20 20 20 42 2C 44 2C 4E 20 20 20 20 20 20 20 20 B,D,N
0001E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0001F0: 20 20 20 20 20 20 20 20 20 20 20 20 35 20 42 45 5 BE
Size : 512 (Real : 512)
000000: 7C B5 CA 0B 09 CD AD 08 C3 13 09 3A 0D 0B 47 3A |..........:..G:
000010: 08 0B 4F C5 2A 00 0B CD 4D 33 2A 02 0B 22 19 0B ..O.*...M3*.."..
000020: CD B3 01 C1 2A 00 0B 4E CD A0 0A 23 05 C2 27 09 ....*..N...#..'.
000030: C9 3A 13 0B FE CC C0 2A 00 0B 7E B7 C8 F8 E6 5F .:.....*..~...._
000040: FE 59 CA 4D 09 FE 54 CA 4D 09 36 00 C9 36 FF C9 .Y.M..T.M.6..6..
000050: E5 CD 82 01 E1 7E B7 C2 72 09 2A 1E 0B 7C B5 C2 .....~..r.*..|..
000060: 75 09 0E 20 CD A0 0A CD CC 06 3A 19 0B B7 C2 62 u.. ......:....b
000070: 09 C9 CD 9D 08 2A 1E 0B 7C B5 C8 3A 57 44 B7 CA .....*..|..:WD..
000080: 8A 09 0E 3A CD 76 3A CD CC 06 CD 76 01 2A 19 0B ...:.v:....v.*..
000090: EB 2A FC 0A CD E4 36 22 FC 0A 2A 1E 0B 11 0C 00 .*....6"..*.....
0000A0: 19 7E CD 86 07 2A 19 0B 2D F2 B2 09 3A 54 01 3D .~...*..-...:T.=
0000B0: 6F 25 EB 2A FC 0A CD E4 36 EB 2A 1E 0B EB CD E4 o%.*....6.*.....
0000C0: 36 EB 2A 0F 0B EB CD E4 36 22 FC 0A CD 82 01 3A 6.*.....6".....:
0000D0: 57 44 B7 CA DE 09 0E 3A CD 76 3A CD CC 06 21 0E WD.....:.v:...!.
0000E0: 0B 34 C9 AF 32 E0 0A CD C3 08 EB 22 02 0B 22 19 .4..2......"..".
0000F0: 0B AF 32 1B 0B EB CD E9 36 EB 22 09 0B EB CD E9 ..2.....6.".....
000100: 36 EB 22 1E 0B EB CD DF 36 22 0F 0B 2A 1E 0B 11 6.".....6"..*...
000110: 0B 00 19 7E 4F 32 13 0B 23 7E B7 C2 1F 0A 3C 32 ...~O2..#~....<2
000120: 0D 0B 23 CD E9 36 EB 79 B7 F2 68 0A FE C3 CA 67 ..#..6.y..h....g
000130: 0A FE CC CA 68 0A CD F2 34 2A 0F 0B 7C B5 CA 4F ....h...4*..|..O
000140: 0A CD AD 08 78 32 0D 0B 79 32 08 0B C3 58 0A 3A ....x2..y2...X.:
000150: 0D 0B 47 1A 32 08 0B 4F 21 C7 9B 22 00 0B 22 E3 ..G.2..O!.."..".
000160: 0A CD 4D 33 C3 72 0A 23 22 00 0B 1A 32 08 0B 22 ..M3.r.#"...2.."
000170: E3 0A CD B3 01 2A 0F 0B 7C B5 CA 81 0A 7E C3 84 .....*..|....~..
000180: 0A CD AA 0A 32 1D 0B C9 3A 0D 0B 32 04 0B 2A 00 ....2...:..2..*.
000190: 0B 22 14 0B 2A 02 0B 22 16 0B 3E FF 32 18 0B C9 ."..*.."..>.2...
0001A0: C5 D5 E5 CD 76 3A E1 D1 C1 C9 3A 13 0B E6 7F FE ....v:....:.....
0001B0: 4E C2 B7 0A 3E 39 C9 FE 4C C8 3E 58 C9 3A 51 44 N...>9..L.>X.:QD
0001C0: B7 C8 0E 07 CD 76 3A C9 44 45 4C 45 54 45 44 00 .....v:.DELETED.
0001D0: 20 20 20 20 20 20 20 00 49 4E 53 45 52 54 20 00 .INSERT .
0001E0: 00 00 00 00 00 00 00 54 46 59 4E 74 66 79 6E 00 .......TFYNtfyn.
0001F0: 2E 2B 2D 20 00 23 39 41 58 4C 21 00 AF 9F B0 A1 .+- .#9AXL!.....
Size : 512 (Real : 512)
000000: 53 4F 49 4E 20 20 20 20 43 20 35 35 20 20 30 31 SOIN C 55 01
000010: 32 31 35 42 45 53 4F 49 4E 3A 20 20 20 20 20 20 215BESOIN:
000020: 20 20 20 20 20 20 20 31 32 32 33 4E 41 20 20 20 1223NA
000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000060: 36 20 56 45 4E 54 45 20 20 20 20 20 4E 20 20 36 6 VENTE N 6
000070: 20 20 30 31 35 31 36 56 65 6E 74 65 3A 20 20 20 01516Vente:
000080: 20 20 20 20 20 20 20 20 20 20 20 31 35 32 33 4E 1523N
000090: 41 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A
0000A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000C0: 20 20 20 20 37 20 41 44 52 45 53 53 45 20 20 20 7 ADRESSE
0000D0: 43 20 32 32 20 20 30 20 35 20 33 41 64 72 65 73 C 22 0 5 3Adres
0000E0: 73 65 3A 20 20 20 20 20 20 20 20 20 20 20 20 20 se:
0000F0: 35 31 32 4E 41 20 20 20 20 20 20 20 20 20 20 20 512NA
000100: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000120: 20 20 20 20 20 20 20 20 38 20 43 4F 44 45 50 4F 8 CODEPO
000130: 53 54 20 20 4E 20 20 35 20 20 30 20 35 33 39 43 ST N 5 0 539C
000140: 6F 64 65 20 50 6F 73 74 61 6C 3A 20 20 20 20 20 ode Postal:
000150: 20 20 20 20 35 35 32 4E 41 20 20 20 20 20 20 20 552NA
000160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000170: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000180: 20 20 20 20 20 20 20 20 20 20 20 20 39 20 56 49 9 VI
000190: 4C 4C 45 20 20 20 20 20 43 20 31 32 20 20 30 20 LLE C 12 0
0001A0: 35 35 39 56 69 6C 6C 65 3A 20 20 20 20 20 20 20 559Ville:
0001B0: 20 20 20 20 20 20 20 20 35 36 36 4E 41 20 20 20 566NA
0001C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0001E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 1
0001F0: 30 20 54 45 4C 20 20 20 20 20 20 20 43 20 31 36 0 TEL C 16
Size : 512 (Real : 512)
000000: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000010: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000020: C5 D5 22 C1 1C 21 01 6A 22 C5 1C 21 92 6A 22 2E .."..!.j"..!.j".
000030: 1C 3A C3 1C B7 C2 3E 0B 21 B0 6A 22 BF 1C 2A C1 .:....>.!.j"..*.
000040: 1C 7E 23 22 C1 1C EB FE 36 D2 CE 0B CD B2 36 A8 .~#"....6.....6.
000050: 10 BC 10 CA 10 E1 10 ED 10 F9 10 05 11 0E 11 17 ................
000060: 11 23 11 2C 11 35 11 41 11 66 11 96 11 9F 11 A8 .#.,.5.A.f......
000070: 11 B4 11 BD 11 C6 11 D2 11 E3 11 F4 11 09 12 15 ................
000080: 12 21 12 2F 12 3E 12 51 12 64 12 9A 12 E4 12 04 .!./.>.Q.d......
000090: 13 1A 13 54 13 7B 13 BD 13 F7 13 09 14 19 14 1C ...T.{..........
0000A0: 14 07 0C D1 0B DE 0B F2 0B A2 0E 8C 0C CE 0E 62 ...............b
0000B0: 0F D8 0F E2 0C 3F 10 60 10 BB 0B 2A C1 1C 2B 22 .....?.`...*..+"
0000C0: C1 1C 3A C3 1C B7 C2 36 0E CD DC 14 7E B7 D1 C1 ..:....6....~...
0000D0: C9 CD FD 0B 21 06 00 19 22 C1 1C C3 3E 0B 2A BF ....!..."...>.*.
0000E0: 1C EB 06 00 4E 03 CD 7E 38 22 C1 1C CD C3 14 C3 ....N..~8"......
0000F0: 3E 0B CD FD 0B EB 23 22 C1 1C C3 3E 0B 2A 2E 1C >.....#"...>.*..
000100: CD E4 36 22 2E 1C C9 EB CD E9 36 22 C1 1C EB 01 ..6"......6"....
000110: 0B 00 09 46 23 4E 23 CD DF 36 78 CD BE 14 DA 48 ...F#N#..6x....H
000120: 0C CA 60 0C 78 B7 FA 36 0C CD 9F 32 2A BF 1C EB ..`.x..6...2*...
000130: CD E5 34 C3 40 0C EB 2A BF 1C EB 0E 06 CD 78 38 ..4.@..*......x8
000140: 0E 06 CD C3 14 C3 3E 0B EB 2A BF 1C EB 78 B7 F2 ......>..*...x..
000150: 53 0C 23 79 12 13 CD 78 38 0C CD C3 14 C3 3E 0B S.#y...x8.....>.
000160: 78 B7 F2 6D 0C 7E 2A BF 1C 77 C3 84 0C 7E 2A BF x..m.~*..w...~*.
000170: 1C E6 5F FE 54 CA 82 0C FE 59 CA 82 0C 36 00 C3 .._.T....Y...6..
000180: 84 0C 36 FF 0E 01 CD C3 14 C3 3E 0B 1A 4F 13 1A ..6.......>..O..
000190: 47 13 EB 22 C1 1C CD DC 14 78 B7 CA C4 0C 06 01 G..".....x......
0001A0: 7E E6 7F D6 40 DA AB 0C 80 3C 47 78 81 3C 47 CD ~...@....<Gx.<G.
0001B0: F2 34 2A BF 1C CD 4D 33 2A BF 1C 48 06 00 CD 13 .4*...M3*..H....
0001C0: 2C C3 3E 0B 79 B7 CA D1 0C 4E 23 CD 13 2C C3 3E ,.>.y....N#..,.>
0001D0: 0B 7E 21 27 1C B7 C2 DC 0C 21 23 1C CD 2B 36 C3 .~!'.....!#..+6.
0001E0: 3E 0B 1A 4F 13 1A 47 13 1A F5 13 1A 32 C4 1C 13 >..O..G.....2...
0001F0: EB 22 C1 1C CD DC 14 78 E6 3F CA 17 0D F1 47 CD .".....x.?....G.
Size : 512 (Real : 512)
000000: 20 20 30 20 33 34 37 54 65 6C 3A 20 20 20 20 20 0 347Tel:
000010: 20 20 20 20 20 20 20 20 20 20 20 20 33 35 32 4E 352N
000020: 41 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 A
000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000050: 20 20 20 31 31 20 50 52 4F 46 20 20 20 20 20 20 11 PROF
000060: 43 20 31 31 20 20 30 20 37 20 35 50 72 6F 66 2E C 11 0 7 5Prof.
000070: 3A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 :
000080: 37 31 32 4F 41 20 20 20 20 20 20 20 20 20 20 20 712OA
000090: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000B0: 20 20 20 20 20 20 20 31 32 20 4D 41 52 51 55 45 12 MARQUE
0000C0: 20 20 20 20 43 20 31 31 20 20 30 31 30 20 33 4D C 11 010 3M
0000D0: 61 72 71 75 65 20 64 75 20 4D 61 74 65 72 69 65 arque du Materie
0000E0: 6C 3A 20 31 30 32 33 4E 41 20 20 20 20 20 20 20 l: 1023NA
0000F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000100: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000110: 20 20 20 20 20 20 20 20 20 20 20 31 33 20 54 59 13 TY
000120: 50 45 20 20 20 20 20 20 43 20 20 36 20 20 30 31 PE C 6 01
000130: 30 34 36 54 79 70 65 3A 20 20 20 20 20 20 20 20 046Type:
000140: 20 20 20 20 20 20 20 31 30 35 32 43 41 4D 41 52 1052CAMAR
000150: 51 55 45 20 20 20 20 20 20 20 20 20 20 20 20 20 QUE
000160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000170: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 1
000180: 34 1A 20 20 20 00 00 07 00 56 45 4E 54 45 20 20 4. ....VENTE
000190: 20 20 20 00 00 0A 00 56 49 4C 4C 45 20 20 20 20 ....VILLE
0001A0: 20 00 00 CD 45 25 AF 32 4D 44 CD 61 27 C3 5B 54 ...E%.2MD.a'.[T
0001B0: 3E 48 C3 53 54 3E 28 C3 53 54 AF 32 5B 56 CD 63 >H.ST>(.ST.2[V.c
0001C0: 39 11 6E 55 CD B1 37 CA AF 51 3E FF 32 5B 56 CD 9.nU..7..Q>.2[V.
0001D0: 63 39 11 52 55 CD B1 37 C2 48 54 CD 8E 39 CD 73 c9.RU..7.HT..9.s
0001E0: 39 CA 48 54 22 71 56 CD D8 1C 22 67 56 2A 67 56 9.HT"qV..."gV*gV
0001F0: 7E B7 CA E7 51 EB 2A 71 56 3A 5B 56 B7 CA DD 51 ~...Q.*qV:[V...Q
Size : 512 (Real : 512)
000000: F2 34 2A BF 1C CD 4D 33 2A BF 1C 48 06 00 CD 13 .4*...M3*..H....
000010: 2C CD 7E 36 C3 3E 0B 78 32 CA 1C 79 B7 CA 35 0D ,.~6.>.x2..y..5.
000020: F1 4E B7 C2 27 0D 79 23 CD 4A 0D B7 CA 3E 0B CD .N..'.y#.J...>..
000030: 01 0E C3 3E 0B F1 7E 21 27 1C B7 C2 41 0D 21 23 ...>..~!'...A.!#
000040: 1C CD 2B 36 CD 7E 36 C3 3E 0B C5 41 32 C9 1C 91 ..+6.~6.>..A2...
000050: D2 55 0D 81 4F C5 E5 AF 32 CB 1C 7E FE 3B CA A1 .U..O...2..~.;..
000060: 0D 23 0D C2 5B 0D E1 C1 C5 E5 3A C9 1C 90 DA 77 .#..[.....:....w
000070: 0D 79 E1 C1 C3 AE 0D 79 CD BB 36 7E FE 20 C2 89 .y.....y..6~. ..
000080: 0D 3E FF 32 CB 1C C3 9B 0D 2B 7E FE 20 CA 9B 0D .>.2.....+~. ...
000090: 2B 0D C2 8A 0D E1 C1 79 C3 AE 0D 79 E1 C1 C3 AE +......y...y....
0000A0: 0D 3E FF 32 CB 1C 0C 79 E1 C1 91 2F 3C 3C F5 4F .>.2...y.../<<.O
0000B0: 06 00 3A CA 1C 07 DA D5 0D 07 DA E3 0D 3A C9 1C ..:..........:..
0000C0: 91 3C 1F F5 CD 95 0E CD 13 2C F1 D2 CF 0D 3C CD .<.......,....<.
0000D0: 95 0E C3 F0 0D CD 13 2C 3A C9 1C 91 3C CD 95 0E .......,:...<...
0000E0: C3 F0 0D 3A C9 1C 91 CD 95 0E CD 13 2C CD 7E 36 ...:........,.~6
0000F0: F1 4F 3A CB 1C B7 CA FB 0D 23 0C 79 C1 91 2F 3C .O:......#.y../<
000100: C9 E5 F5 47 7E FE 20 C2 12 0E 23 05 C2 04 0E F1 ...G~. ...#.....
000110: E1 C9 F1 E1 EB 2A C5 1C 77 23 3A CA 1C 77 23 73 .....*..w#:..w#s
000120: 23 72 23 3A C9 1C 77 23 3A C4 1C 77 23 22 C5 1C #r#:..w#:..w#"..
000130: 3E FF 32 C3 1C C9 AF 32 2D 1C 32 C3 1C 2A C5 1C >.2....2-.2..*..
000140: 36 00 21 01 6A 22 C5 1C CD 1B 36 4E 23 7E 32 CA 6.!.j"....6N#~2.
000150: 1C 23 5E 23 56 23 7E 23 46 23 22 C7 1C F5 78 32 .#^#V#~#F#"...x2
000160: C4 1C 3A 2D 1C 90 2F 3C CA 72 0E CD 95 0E 78 32 ..:-../<.r....x2
000170: 2D 1C F1 EB CD 4A 0D B7 CA 7E 0E CD 01 0E 3A C9 -....J...~....:.
000180: 1C 5F 3A C4 1C 83 3C 32 2D 1C 2A C7 1C 7E B7 C2 ._:...<2-.*..~..
000190: 4B 0E C3 3E 0B B7 C8 00 F5 CD 7E 36 F1 3D C8 C3 K..>......~6.=..
0001A0: 98 0E EB CD E9 36 D5 CD E9 36 22 C1 1C 21 0C 00 .....6...6"..!..
0001B0: 19 4E 23 CD E9 36 E1 3E 0C CD BB 36 7E F5 23 CD .N#..6.>...6~.#.
0001C0: DF 36 F1 B9 D2 C8 0E 4F CD 78 38 C3 3E 0B EB CD .6.....O.x8.>...
0001D0: E9 36 22 C1 1C EB CD B7 14 DA 0A 0F CA 54 0F 23 .6"..........T.#
0001E0: E5 23 CD E9 36 4E CD DC 14 46 C5 0E 06 CD 78 38 .#..6N...F....x8
0001F0: C1 78 E6 7F D6 40 F2 FA 0E AF 3C 81 3C 3C FE 0A .x...@....<.<<..
Size : 512 (Real : 512)
000000: 0A 71 CD E8 06 C3 D3 04 CD 0C 07 2A E3 0A 36 20 .q.........*..6
000010: 3A 1C 0B 32 1B 0B 2A E5 0A 22 E3 0A CD 88 0A C3 :..2..*.."......
000020: 7A 02 3E 01 32 12 0B 2A E3 0A 36 20 CD E8 06 CD z.>.2..*..6 ....
000030: D4 06 2A 09 0B EB 2A 19 0B CD C0 36 DA 48 05 CD ..*...*....6.H..
000040: 30 07 CA 27 05 C3 2C 05 CD D4 08 CD 88 0A CD E3 0..'..,.........
000050: 09 C3 7A 02 CD D4 08 3A 12 0B F6 0C C3 57 06 CD ..z....:.....W..
000060: D4 08 3A 12 0B F6 0E C3 57 06 3A 0B 0B B7 C2 8D ..:.....W.:.....
000070: 05 3A 05 0B B7 F2 8D 05 2A 19 0B EB 2A 02 0B CD .:......*...*...
000080: C0 36 C2 8D 05 3A 12 0B F6 04 C3 57 06 3A 13 0B .6...:.....W.:..
000090: E6 7F FE 4E C2 B0 05 2A 19 0B EB 2A 02 0B CD C0 ...N...*...*....
0000A0: 36 CA B0 05 3A E0 0A B7 C2 B0 05 2A E3 0A 36 00 6...:......*..6.
0000B0: CD D4 08 3A 0B 0B 3C 21 0E 0B BE DA D3 05 47 3A ...:..<!......G:
0000C0: 05 0B E6 02 C2 CB 05 78 32 0B 0B 3A 12 0B F6 04 .......x2..:....
0000D0: C3 57 06 32 0B 0B CD E3 09 CD 30 07 CA 7A 02 C3 .W.2......0..z..
0000E0: A4 03 3A 05 0B 0F D2 7A 02 CD DC 1C 7E FE 2A CA ..:....z....~.*.
0000F0: FA 05 36 2A 21 C8 0A C3 FF 05 36 20 21 D0 0A EB ..6*!.....6 !...
000100: 21 20 00 CD 80 08 3E 01 32 12 0B C3 7A 02 3A 05 ! ....>.2...z.:.
000110: 0B E6 08 CA 7A 02 3E 40 C3 57 06 3A 05 0B E6 08 ....z.>@.W.:....
000120: CA 7A 02 3E C0 C3 57 06 CD D4 08 3A 12 0B C3 57 .z.>..W....:...W
000130: 06 CD D4 08 3A 05 0B E6 02 CA 7A 02 3A 12 0B F6 ....:.....z.:...
000140: 30 C3 57 06 CD D4 08 3A 05 0B E6 02 CA 7A 02 3A 0.W....:.....z.:
000150: 12 0B F6 20 C3 57 06 F5 CD 8E 01 CD 16 02 3A 0B ... .W........:.
000160: 0B 47 3A 05 0B E6 04 CA 70 06 3A 0E 0B 32 0B 0B .G:.....p.:..2..
000170: F1 C9 D5 CD E9 36 EB 22 1E 0B EB CD DF 36 22 0F .....6.".....6".
000180: 0B D1 78 B7 F2 8E 06 E6 7F 47 3A 1A 0B 80 32 1A ..x......G:...2.
000190: 0B 79 B7 F2 9E 06 E6 7F 4F 3A 19 0B 81 3D 32 19 .y......O:...=2.
0001A0: 0B CD B3 01 EB CD 50 09 CD 8E 01 C9 CD 9A 01 21 ......P........!
0001B0: 00 00 22 19 0B 21 AF 9F 22 FC 0A 21 B0 A1 22 FE .."..!.."..!..".
0001C0: 0A AF 32 0E 0B 32 0C 0B 32 0B 0B C9 CD D4 06 D0 ..2..2..2.......
0001D0: CD B3 01 C9 2A 19 0B 2C 22 19 0B 3A 54 01 3D BD ....*..,"..:T.=.
0001E0: D0 24 2E 00 22 19 0B C9 2A E3 0A 23 22 E3 0A 2A .$.."...*..#"..*
0001F0: 0F 0B 7C B5 CA 05 07 3A 1B 0B 3C 32 1B 0B CD BB ..|....:..<2....
Size : 512 (Real : 512)
000000: D2 05 0F 3E 0A E1 77 C3 31 0B 23 23 CD E9 36 EB ...>..w.1.##..6.
000010: 4E CD DC 14 46 78 B9 CA 44 0F E5 C5 48 04 CD 39 N...Fx..D...H..9
000020: 2A DA 7E 44 70 23 EB 2B 2B 2B 71 23 E5 CD DF 36 *.~Dp#.+++q#...6
000030: E3 CD E4 36 E1 2B 4E 06 00 03 CD F8 36 C1 E1 78 ...6.+N.....6..x
000040: 12 C3 4C 0F EB 2B 2B CD DF 36 71 EB 23 13 CD 71 ..L..++..6q.#..q
000050: 38 C3 31 0B 23 23 CD DF 36 EB CD DC 14 7E 12 C3 8.1.##..6....~..
000060: 3E 0B EB CD E9 36 22 C1 1C EB CD B7 14 DA A1 0F >....6".........
000070: CA BC 0F 23 46 23 CD E9 36 4E EB 06 01 7E E6 7F ...#F#..6N...~..
000080: D6 40 DA 88 0F 80 3C 47 78 81 3C 47 CD F2 34 2A .@....<Gx.<G..4*
000090: BF 1C CD 4D 33 2A BF 1C 48 06 00 CD 13 2C C3 3E ...M3*..H....,.>
0000A0: 0B 46 23 4E 23 CD DF 36 78 06 00 B7 FA B5 0F CD .F#N#..6x.......
0000B0: 13 2C C3 3E 0B 23 CD 13 2C C3 3E 0B 23 23 CD DF .,.>.#..,.>.##..
0000C0: 36 7E B7 CA CF 0F 21 27 1C CD 2B 36 C3 3E 0B 21 6~....!'..+6.>.!
0000D0: 23 1C CD 2B 36 C3 3E 0B EB CD E9 36 22 C1 1C EB #..+6.>....6"...
0000E0: CD B7 14 DA 02 10 CA 26 10 23 46 23 CD E9 36 4E .......&.#F#..6N
0000F0: CD 29 14 EB CD 4D 33 D2 31 0B 3E 55 CD 70 3B C3 .)...M3.1.>U.p;.
000100: CE 0B 23 46 23 CD E9 36 CD DC 14 7E B8 D2 1F 10 ..#F#..6...~....
000110: 48 47 C5 D5 06 00 EB 3E 20 CD FA 36 EB D1 C1 23 HG.....> ..6...#
000120: CD 71 38 C3 31 0B 23 23 CD E9 36 CD DC 14 7E B7 .q8.1.##..6...~.
000130: CA 39 10 EB 36 54 C3 31 0B EB 36 46 C3 31 0B CD .9..6T.1..6F.1..
000140: 29 14 CD 39 35 4D CD 29 14 CD 39 35 45 CD 29 14 )..95M.)..95E.).
000150: 2A BF 1C 70 23 CD 4D 33 48 0C CD C3 14 C3 3E 0B *..p#.M3H.....>.
000160: CD 29 14 CD 39 35 4D CD 29 14 CD 39 35 45 05 7C .)..95M.)..95E.|
000170: B7 C2 A0 10 CD DC 14 78 BE D2 A0 10 79 B7 CA 87 .......x....y...
000180: 10 80 3D BE DA 8A 10 7E 90 4F 23 78 CD BB 36 EB ..=....~.O#x..6.
000190: 2A BF 1C 71 23 EB CD 78 38 0C CD C3 14 C3 3E 0B *..q#..x8.....>.
0001A0: 3E 7B CD 70 3B C3 CE 0B 2A BF 1C 0E 06 AF 77 23 >{.p;...*.....w#
0001B0: 0D C2 AE 10 0E 06 CD C3 14 C3 3E 0B CD DC 14 7E ..........>....~
0001C0: EE 80 77 EB CD D2 14 C3 3E 0B CD 1F 14 CD EE 31 ..w.....>......1
0001D0: DA D9 10 CD 38 14 C3 3E 0B 3E 7A CD 70 3B C3 CE ....8..>.>z.p;..
0001E0: 0B CD 1F 14 CD 9B 31 CD 38 14 C3 3E 0B CD 1F 14 ......1.8..>....
0001F0: CD 91 31 CD 38 14 C3 3E 0B CD 1F 14 CD B5 30 CD ..1.8..>......0.
Size : 512 (Real : 512)
000000: 3E 33 C3 63 1A EB D1 CD 42 1A CD 0D 15 DA 6A 1A >3.c....B.....j.
000010: CD 06 1C C2 6A 1A CD 58 1A CD 4A 16 DA 6A 1A 78 ....j..X..J..j.x
000020: B7 CA 6A 1A 7E FE 29 CA 62 19 CD 58 1A D5 E5 CD ..j.~.).b..X....
000030: FF 37 DA 42 19 CD 11 1C 7E FE 29 C2 42 19 7B C3 .7.B....~.).B.{.
000040: 44 19 3E 01 E1 D1 32 BC 1C CD 4A 16 DA 6A 1A 78 D.>...2...J..j.x
000050: B7 CA 6A 1A CD 4D 1A 3A BC 1C 4F 06 00 3E 34 C3 ..j..M.:..O..>4.
000060: 63 1A 23 CD 11 1C 3E 00 12 13 0E 01 06 00 3E 34 c.#...>.......>4
000070: C3 63 1A EB D1 CD 29 1A 3E 1F C3 63 1A EB D1 CD .c....).>..c....
000080: 36 1A 3E 20 01 01 00 C3 63 1A EB D1 CD 42 1A CD 6.> ....c....B..
000090: 4D 1A 3E 21 01 08 00 C3 63 1A EB D1 D5 CD 71 1A M.>!....c.....q.
0000A0: D1 DA BD 19 78 B7 CA AE 19 06 4E C3 CE 19 79 B7 ....x.....N...y.
0000B0: CA B8 19 06 43 C3 CE 19 06 4C C3 CE 19 CD 42 1A ....C....L....B.
0000C0: CD F1 2A CA 6A 1A CD 11 1C CD 4D 1A 06 55 EB 36 ..*.j.....M..U.6
0000D0: 2B 23 36 01 23 70 23 EB 01 01 00 C3 65 1A EB D1 +#6.#p#.....e...
0000E0: CD 29 1A 3E 22 C3 63 1A EB D1 3E 1B 01 00 00 C3 .).>".c...>.....
0000F0: 63 1A EB D1 3E 1C 01 00 00 C3 63 1A EB D1 CD 29 c...>.....c....)
000100: 1A 3E 23 01 00 00 C3 63 1A EB D1 CD 42 1A CD 4D .>#....c....B..M
000110: 1A 3E 27 01 00 00 C3 63 1A EB D1 CD 42 1A CD 4D .>'....c....B..M
000120: 1A 3E 28 01 00 00 C3 63 1A CD 71 1A DA 6D 1A CD .>(....c..q..m..
000130: 06 1C C8 C3 6D 1A CD 71 1A DA 6D 1A 78 B7 C0 C3 ....m..q..m.x...
000140: 6D 1A 7E FE 28 C2 6D 1A 23 CD 11 1C C9 7E FE 29 m.~.(.m.#....~.)
000150: C2 6D 1A 23 CD 11 1C C9 7E FE 2C C2 6D 1A 23 CD .m.#....~.,.m.#.
000160: 11 1C C9 12 13 E3 E1 B7 C9 D1 E1 37 C9 F1 E1 37 ...........7...7
000170: C9 E5 7E FE 28 C2 8F 1A 23 CD 11 1C CD 0D 15 DA ..~.(...#.......
000180: 8F 1A 7E FE 29 C2 8F 1A E3 E1 23 CD 11 1C C9 E1 ..~.).....#.....
000190: 37 C9 E5 CD AA 1B E1 78 B7 CA B7 1A C5 0E FF CD 7......x........
0001A0: 9F 32 E5 EB 36 2A 23 EB CD E5 34 21 06 00 19 EB .2..6*#...4!....
0001B0: E1 CD 11 1C C1 B7 C9 37 C9 E5 7E CD 9E 36 C2 E2 .......7..~..6..
0001C0: 1A 78 23 D5 13 13 CD 20 37 CA E1 1A 1B 12 4F 06 .x#.... 7.....O.
0001D0: 00 E3 36 2B 23 23 09 EB E1 23 CD 11 1C E3 E1 B7 ..6+##...#......
0001E0: C9 D1 E1 37 C9 E5 7E E6 5F FE 54 CA 00 1B FE 59 ...7..~._.T....Y
0001F0: CA 00 1B FE 46 CA 05 1B FE 4E CA 05 1B 37 E1 C9 ....F....N...7..
Size : 512 (Real : 512)
000000: 38 14 C3 3E 0B CD 45 14 CA AD 14 C3 B2 14 CD 45 8..>..E........E
000010: 14 CA B2 14 C3 AD 14 CD 45 14 CA B2 14 FA B2 14 ........E.......
000020: C3 AD 14 CD 45 14 FA AD 14 C3 B2 14 CD 45 14 F2 ....E........E..
000030: AD 14 C3 B2 14 CD 45 14 CA AD 14 FA AD 14 C3 B2 ......E.........
000040: 14 CD 30 14 E5 D5 4E 23 79 CD BB 36 EB E1 46 23 ..0...N#y..6..F#
000050: CD 71 38 78 81 E1 77 EB CD D2 14 EB CD BB 36 23 .q8x..w.......6#
000060: 22 BF 1C C3 3E 0B CD 30 14 4E 23 EB 46 23 78 91 "...>..0.N#.F#x.
000070: 3C DA 84 11 47 D5 E5 CD 3D 37 E1 D1 CA 88 11 23 <...G...=7.....#
000080: 05 C2 75 11 AF C3 8A 11 3E 01 2A BF 1C 77 0E 01 ..u.....>.*..w..
000090: CD C3 14 C3 3E 0B CD 5E 14 CA AD 14 C3 B2 14 CD ....>..^........
0000A0: 5E 14 CA B2 14 C3 AD 14 CD 5E 14 CA B2 14 DA B2 ^........^......
0000B0: 14 C3 AD 14 CD 5E 14 DA AD 14 C3 B2 14 CD 5E 14 .....^........^.
0000C0: D2 AD 14 C3 B2 14 CD 5E 14 DA AD 14 CA AD 14 C3 .......^........
0000D0: B2 14 CD 30 14 1A A6 2A BF 1C 77 0E 01 CD C3 14 ...0...*..w.....
0000E0: C3 3E 0B CD 30 14 1A B6 2A BF 1C 77 0E 01 CD C3 .>..0...*..w....
0000F0: 14 C3 3E 0B CD DC 14 7E B7 CA 00 12 AF C3 01 12 ..>....~........
000100: 2F 77 EB CD D2 14 C3 3E 0B CD 29 14 CD 0C 35 CD /w.....>..)...5.
000110: 38 14 C3 3E 0B CD 99 2C CD 18 34 CD 38 14 C3 3E 8..>...,..4.8..>
000120: 0B CD DC 14 4E 23 CD 9F 32 CD 38 14 C3 3E 0B CD ....N#..2.8..>..
000130: DC 14 6E 26 00 CD 18 34 CD 38 14 C3 3E 0B 2A BF ..n&...4.8..>.*.
000140: 1C E5 0E 01 CD C3 14 CD DC 1C E1 CA AD 14 C3 B2 ................
000150: 14 2A BF 1C E5 0E 01 CD C3 14 CD 99 2C E1 C2 AD .*..........,...
000160: 14 C3 B2 14 CD 30 14 4E 23 EB 46 23 78 91 3C DA .....0.N#.F#x.<.
000170: 73 12 47 C5 D5 E5 CD 3D 37 E1 D1 78 CA 89 12 23 s.G....=7..x...#
000180: 05 C2 74 12 C1 AF C3 8E 12 C1 90 2F 3C 3C 6F 26 ..t......../<<o&
000190: 00 CD 18 34 CD 38 14 C3 3E 0B CD 30 14 E5 D5 4E ...4.8..>..0...N
0001A0: 23 79 CD BB 36 06 00 2B 7E FE 20 C2 B7 12 79 B8 #y..6..+~. ...y.
0001B0: CA B7 12 04 C3 A7 12 23 EB E1 C5 46 23 CD 71 38 .......#...F#.q8
0001C0: EB 78 CD BB 36 EB 79 80 C1 E1 77 EB DA EA 14 78 .x..6.y...w....x
0001D0: B7 CA DB 12 36 20 23 3D C2 D4 12 22 BF 1C CD D2 ....6 #=..."....
0001E0: 14 C3 3E 0B CD DC 14 EB CD D2 14 EB 46 23 7E FE ..>.........F#~.
0001F0: 61 DA FC 12 FE 7B D2 FC 12 E6 5F 77 23 05 C2 EE a....{...._w#...
Size : 512 (Real : 512)
000000: 3E FF C3 06 1B AF EB 36 2C 23 77 23 EB E1 23 CD >......6,#w#..#.
000010: 11 1C B7 01 00 00 C9 E5 CD 8C 1B DA 40 1B E5 CD ............@...
000020: B7 14 DA 3F 1B CA 3F 1B 23 46 23 23 23 4E E1 3E ...?..?.#F###N.>
000030: 29 12 13 EB CD E4 36 EB 2A 2B 1C E3 E1 B7 C9 E1 ).....6.*+......
000040: E1 37 C9 E5 CD 8C 1B DA 65 1B E5 CD B7 14 D2 64 .7......e......d
000050: 1B 23 4E 06 00 E1 EB 36 29 23 CD E4 36 EB E1 2A .#N....6)#..6..*
000060: 2B 1C B7 C9 E1 E1 37 C9 E5 CD 8C 1B DA 89 1B E5 +.....7.........
000070: CD B7 14 C2 88 1B 01 00 00 E1 EB 36 29 23 CD E4 ...........6)#..
000080: 36 EB E1 2A 2B 1C B7 C9 E1 E1 37 C9 E5 CD F1 2A 6..*+.....7....*
000090: CA A7 1B CD 11 1C 22 2B 1C E1 E5 CD CC 1C C2 A7 ......"+........
0000A0: 1B E3 E1 CD 11 1C C9 E1 37 C9 06 00 0E 00 AF 32 ........7......2
0000B0: BD 1C 32 BE 1C 7E FE 2B CA C1 1B FE 2D C2 C3 1B ..2..~.+....-...
0000C0: 04 23 7E FE 30 DA CD 1B FE 3A DA E3 1B FE 2E C2 .#~.0....:......
0000D0: ED 1B 04 0E 00 32 BE 1C 3A BD 1C B7 C2 C1 1B 04 .....2..:.......
0000E0: C3 C1 1B 04 0C 3E 01 32 BD 1C C3 C1 1B 3A BE 1C .....>.2.....:..
0000F0: B7 C2 F5 1B 4F 3A BD 1C B7 C2 00 1C 06 00 48 C9 ....O:........H.
000100: 79 B8 C0 0E 00 C9 78 B7 C0 B1 C2 0F 1C 3C C9 AF y.....x......<..
000110: C9 F5 7E FE 20 CA 1F 1C FE 09 CA 1F 1C F1 C9 23 ..~. ..........#
000120: C3 12 1C 2E 46 2E 00 2E 54 2E 00 00 00 00 00 00 ....F...T.......
000130: 43 44 45 46 49 4C 50 52 53 54 56 23 40 24 21 2A CDEFILPRSTV#@$!*
000140: 00 49 4E 54 00 F3 17 23 00 01 18 56 41 4C 00 1B .INT...#...VAL..
000150: 18 4C 45 4E 00 0C 18 40 00 28 18 54 45 53 54 00 .LEN...@.(.TEST.
000160: 53 18 50 45 45 4B 00 75 18 52 41 4E 4B 00 84 18 S.PEEK.u.RANK...
000170: 53 54 52 00 93 18 24 00 05 19 21 00 73 19 43 48 STR...$...!.s.CH
000180: 52 00 7D 19 44 41 54 45 00 8A 19 54 59 50 45 00 R.}.DATE...TYPE.
000190: 9A 19 54 52 49 4D 00 DE 19 2A 00 E8 19 45 4F 46 ..TRIM...*...EOF
0001A0: 00 F2 19 46 49 4C 45 00 FC 19 4C 4F 43 4B 00 09 ...FILE...LOCK..
0001B0: 1A 4C 4F 43 4B 4E 44 58 00 19 1A FF 00 00 00 00 .LOCKNDX........
0001C0: 00 00 00 00 00 00 00 00 00 00 00 00 CD 92 28 C8 ..............(.
0001D0: CD 15 2A C9 21 01 64 C9 21 00 60 C9 2A 73 30 7E ..*.!.d.!.`.*s0~
0001E0: FE 2A C9 2A 71 30 C9 2A 56 30 22 06 30 CD 1B 2D .*.*q0.*V0".0..-
0001F0: 2A 56 30 23 22 56 30 AF 32 55 30 C9 C5 D5 C5 32 *V0#"V0.2U0....2
Size : 512 (Real : 512)
000000: 12 C3 3E 0B CD 29 14 CD 39 35 7D 2A BF 1C 36 01 ..>..)..95}*..6.
000010: 23 77 0E 02 CD C3 14 C3 3E 0B 2A BF 1C 36 08 23 #w......>.*..6.#
000020: 3A 4E 44 CD 40 13 36 2F 23 3A 4F 44 CD 40 13 36 :ND.@.6/#:OD.@.6
000030: 2F 23 3A 50 44 CD 40 13 0E 09 CD C3 14 C3 3E 0B /#:PD.@.......>.
000040: 06 30 FE 0A DA 4D 13 04 D6 0A C3 42 13 70 23 F6 .0...M.....B.p#.
000050: 30 77 23 C9 CD DC 14 54 5D 4E 79 CD BB 36 7E FE 0w#....T]Ny..6~.
000060: 20 C2 6A 13 2B 0D C2 5E 13 0C 2A BF 1C 71 23 13 .j.+..^..*..q#.
000070: EB CD 78 38 0C CD C3 14 C3 3E 0B CD DC 14 4E 23 ..x8.....>....N#
000080: EB 2A BF 1C E5 EB CD 78 38 69 26 00 19 36 20 CD .*.....x8i&..6 .
000090: 63 39 E5 EB CD 8E 39 0E 01 CD C3 14 CD 44 27 AF c9....9......D'.
0000A0: CD AD 27 AF CD F0 2B F5 DA AE 13 CD 45 25 CD 61 ..'...+.....E%.a
0000B0: 27 F1 E1 CD 8E 39 E1 D2 AD 14 C3 B2 14 EB CD F3 '....9..........
0000C0: 36 22 C1 1C 78 FE FF CA EB 13 B7 C2 D9 13 79 B7 6"..x.........y.
0000D0: CA E5 13 69 26 00 C3 EE 13 21 06 00 CD 18 34 CD ...i&....!....4.
0000E0: 96 32 C3 F1 13 21 01 00 C3 EE 13 21 00 00 CD 18 .2...!.....!....
0000F0: 34 CD 38 14 C3 3E 0B CD 29 14 CD 39 35 6E 26 00 4.8..>..)..95n&.
000100: CD 18 34 CD 38 14 C3 3E 0B CD DC 14 23 6E 26 00 ..4.8..>....#n&.
000110: CD 18 34 CD 38 14 C3 3E 0B C3 AD 14 C3 AD 14 CD ..4.8..>........
000120: DC 14 CD FF 34 CD 29 14 C9 CD DC 14 CD F2 34 C9 ....4.).......4.
000130: CD DC 14 EB CD DC 14 C9 2A BF 1C EB CD E5 34 0E ........*.....4.
000140: 06 CD C3 14 C9 CD 1F 14 CD 91 31 2A BF 1C EB CD ..........1*....
000150: D2 14 CD E5 34 EB 23 22 BF 1C 2B 7E B7 C9 CD 30 ....4.#"..+~...0
000160: 14 3A 71 44 B7 C2 97 14 4E 23 EB 7E B9 CA 78 14 .:qD....N#.~..x.
000170: DA 7D 14 06 01 C3 80 14 06 00 C3 80 14 06 00 4E .}.............N
000180: 23 CD 3D 37 2A BF 1C EB CD D2 14 EB 23 22 BF 1C #.=7*.......#"..
000190: 2B C0 78 B7 C8 37 C9 46 23 EB 4E 23 CD 6B 37 2A +.x..7.F#.N#.k7*
0001A0: BF 1C EB CD D2 14 EB 23 22 BF 1C 2B C9 36 FF C3 .......#"..+.6..
0001B0: 3E 0B 36 00 C3 3E 0B C5 01 0B 00 09 C1 7E E6 7F >.6..>.......~..
0001C0: FE 4C C9 2A BF 1C EB CD D2 14 69 26 00 19 22 BF .L.*......i&..".
0001D0: 1C C9 2A 2E 1C CD E4 36 22 2E 1C C9 D5 2A 2E 1C ..*....6"....*..
0001E0: 2B 56 2B 5E 22 2E 1C EB D1 C9 3E 15 CD 70 3B C3 +V+^".....>..p;.
0001F0: CE 0B CD 73 39 CD 0D 15 DA 0B 15 CD 8E 39 EB 36 ...s9........9.6
Size : 512 (Real : 512)
000000: 60 30 CD D8 36 44 4D 2A 6D 30 3E 0A CD BB 36 EB `0..6DM*m0>...6.
000010: CD 7E 38 EB 09 36 00 C1 78 B7 CA 1F 1D 0E 08 32 .~8..6..x......2
000020: EB 2F 79 32 E8 2F C6 02 32 E9 2F 06 00 16 00 5F ./y2./..2./...._
000030: 21 03 FE 19 04 7C B7 FA 33 1D 05 78 32 EA 2F CD !....|..3..x2./.
000040: 45 1D D1 C1 C9 C5 D5 21 01 00 22 E4 2F 23 22 E6 E......!.."./#".
000050: 2F CD A8 24 AF 32 FC 2F 21 01 00 CD 09 24 D1 C1 /..$.2./!....$..
000060: C9 CD 98 24 C5 D5 11 62 30 1A B7 CA 8F 1D 1A B7 ...$...b0.......
000070: CA 7A 1D CD 83 1D 13 C3 6E 1D 3A 61 30 CD 83 1D .z......n.:a0...
000080: D1 C1 C9 CD DF 22 CD 43 21 CD 8D 1D C9 C5 D5 AF .....".C!.......
000090: 32 F2 2F CD 99 2C 22 F6 7B CD E3 24 CD BB 23 AF 2./..,".{..$..#.
0000A0: 32 FD 2F 21 00 00 22 F4 7B 22 5A 7C 2A 6F 30 22 2./!..".{"Z|*o0"
0000B0: 69 30 2A E4 2F 22 F0 2F CD D7 23 3A FC 2F B7 C2 i0*./"./..#:./..
0000C0: F8 1D 2A EE 2F EB 21 F6 7B 3A E8 2F 4F CD 78 38 ..*./.!.{:./O.x8
0000D0: 2A EE 2F 3A E8 2F CD BB 36 36 00 23 36 00 2A 6B *./:./..66.#6.*k
0000E0: 30 23 36 00 23 36 00 3E 01 32 FC 2F 32 F6 2F CD 0#6.#6.>.2./2./.
0000F0: 35 24 CD 06 24 D1 C1 C9 3E 01 32 F6 2F 2A EE 2F 5$..$...>.2./*./
000100: EB 3E FF 32 F5 2F 21 F8 7B 3A E8 2F D6 02 4F CD .>.2./!.{:./..O.
000110: FA 24 DA 1B 1E CD D2 24 D2 01 1E EB 2B 2B CD E9 .$.....$....++..
000120: 36 7A B3 CA 35 1E EB E5 CD 35 24 E1 22 F0 2F CD 6z..5....5$."./.
000130: D7 23 C3 F8 1D E5 CD 35 24 2A 69 30 22 F3 2F CD .#.....5$*i0"./.
000140: 4A 24 E1 22 EC 2F 3A F6 2F 4F 3A FC 2F 91 DA 6D J$."./:./O:./..m
000150: 1E 3C CD EA 24 44 4D 3A FC 2F 3C CD 72 24 2B EB .<..$DM:./<.r$+.
000160: 3A FC 2F C6 02 CD 72 24 2B EB CD 90 38 2A EC 2F :./...r$+...8*./
000170: EB 21 F6 7B 3A E8 2F 4F CD 78 38 2A EC 2F 3A E8 .!.{:./O.x8*./:.
000180: 2F CD BB 36 EB 2A 5A 7C EB CD E4 36 21 FC 2F 34 /..6.*Z|...6!./4
000190: 3A EA 2F BE DA AA 1E CD 06 24 3A FD 2F B7 C4 A8 :./......$:./...
0001A0: 24 2A F3 2F 22 69 30 D1 C1 C9 7E 32 FE 2F B7 3C $*./"i0...~2./.<
0001B0: 1F 67 3A F2 2F B7 CA BA 1E 25 7C 32 FC 2F 2A F0 .g:./....%|2./*.
0001C0: 2F 22 F4 7B CD 09 24 3A FC 2F 67 3A F2 2F B7 CA /".{..$:./g:./..
0001D0: D3 1E 24 7C 32 F2 2F 32 FC 2F CD 72 24 11 F6 7B ..$|2./2./.r$..{
0001E0: 3A E8 2F CD 78 38 3A FC 2F 32 FB 2F 4F 3A FE 2F :./.x8:./2./O:./
0001F0: 91 32 FC 2F CD EA 24 44 4D 03 03 3A FB 2F 3C CD .2./..$DM..:./<.
Size : 512 (Real : 512)
000000: 35 E5 23 71 23 70 23 36 35 D1 C9 37 C9 CD 3F 15 5.#q#p#65..7..?.
000010: D8 78 B1 C0 D5 11 3A 15 CD 75 15 C2 34 15 CD 11 .x....:..u..4...
000020: 1C D1 CD 3F 15 D8 78 B1 CA 2D 15 37 C9 3E 15 12 ...?..x..-.7.>..
000030: 13 C3 14 15 01 00 00 D1 B7 C9 2E 4F 52 2E 80 CD ...........OR...
000040: 7E 15 D8 78 B1 C0 D5 11 6F 15 CD 75 15 C2 69 15 ~..x....o..u..i.
000050: CD 11 1C D1 CD 7E 15 D8 78 B1 CA 5F 15 37 C9 3E .....~..x.._.7.>
000060: 14 12 13 01 00 00 C3 46 15 01 00 00 D1 B7 C9 2E .......F........
000070: 41 4E 44 2E 80 CD B1 37 C8 13 CD B1 37 C9 D5 11 AND....7....7...
000080: A0 15 CD B1 37 D1 C2 9A 15 CD 11 1C CD A6 15 D8 ....7...........
000090: 78 B1 C2 9E 15 3E 16 12 13 C9 CD A6 15 C9 37 C9 x....>........7.
0000A0: 2E 4E 4F 54 2E 80 CD 4A 16 DA F8 15 78 B7 CA C8 .NOT...J....x...
0000B0: 15 CD FA 15 C8 F5 CD 4A 16 DA F7 15 78 B7 CA F7 .......J....x...
0000C0: 15 F1 12 13 01 00 00 C9 B1 C8 CD FA 15 C2 DE 15 ................
0000D0: 7E FE 24 3E 05 CA DA 15 B7 C9 23 CD 11 1C F5 CD ~.$>......#.....
0000E0: 4A 16 DA F7 15 78 B7 C2 F7 15 B1 CA F7 15 F1 C6 J....x..........
0000F0: 08 12 13 01 00 00 C9 F1 37 C9 7E FE 3D C2 05 16 ........7.~.=...
000100: 3E 06 C3 42 16 FE 23 C2 0F 16 3E 07 C3 42 16 FE >..B..#...>..B..
000110: 3C C2 2F 16 23 7E FE 3D CA 2A 16 FE 3E C2 25 16 <./.#~.=.*..>.%.
000120: 3E 07 C3 42 16 3E 09 C3 43 16 3E 0B C3 42 16 FE >..B.>..C.>..B..
000130: 3E C2 48 16 23 7E FE 3D CA 40 16 3E 08 C3 43 16 >.H.#~.=.@.>..C.
000140: 3E 0A 23 CD 11 1C B7 C9 AF C9 E5 CD 10 17 DA 9E >.#.............
000150: 16 78 B7 CA B6 16 7E FE 2B C2 78 16 23 CD 11 1C .x....~.+.x.#...
000160: C5 CD 10 17 DA 9D 16 78 B7 CA 9D 16 E3 CD A1 16 .......x........
000170: E1 3E 05 12 13 C3 56 16 FE 2D CA 81 16 B7 E3 E1 .>....V..-......
000180: C9 23 CD 11 1C C5 CD 10 17 DA 9D 16 78 B7 CA 9D .#..........x...
000190: 16 E3 CD A1 16 E1 3E 04 12 13 C3 56 16 C1 E1 37 ......>....V...7
0001A0: C9 78 91 47 7C 95 B8 DA AB 16 47 04 79 BD D2 B2 .x.G|.....G.y...
0001B0: 16 4D 78 81 47 C9 B1 C2 BD 16 E3 E1 C9 7E FE 2B .Mx.G........~.+
0001C0: C2 E3 16 23 CD 11 1C C5 CD 10 17 DA 0C 17 78 B7 ...#..........x.
0001D0: C2 0C 17 B1 CA 0C 17 E3 79 85 4F E1 3E 0C 12 13 ........y.O.>...
0001E0: C3 BD 16 FE 2D C2 08 17 23 CD 11 1C C5 CD 10 17 ....-...#.......
0001F0: DA 0C 17 78 B7 C2 0C 17 B1 CA 0C 17 E3 79 85 4F ...x.........y.O
Size : 512 (Real : 512)
000000: 72 24 2B 2B EB 2A EE 2F 2B 2B EB CD 7E 38 2A E6 r$++.*./++..~8*.
000010: 2F 22 5A 7C CD 09 24 3A FB 2F 4F 3A F6 2F 91 FA /"Z|..$:./O:./..
000020: 31 1F 32 F6 2F 2A E6 2F 22 F0 2F CD 35 24 CD 4A 1.2./*./"./.5$.J
000030: 24 2A E6 2F 23 22 E6 2F 3E FF 32 FD 2F 2A 6F 30 $*./#"./>.2./*o0
000040: EB 2A 69 30 CD C0 36 C2 AE 1F 2A 6B 30 23 EB 21 .*i0..6...*k0#.!
000050: F4 7B 3A E9 2F 4F CD 78 38 2A EE 2F 3A E8 2F CD .{:./O.x8*./:./.
000060: BB 36 EB 2A 5A 7C EB CD E4 36 3E 01 32 FC 2F 2A .6.*Z|...6>.2./*
000070: E6 2F CD 09 24 2A E6 2F 22 E4 2F 23 22 E6 2F CD ./..$*./"./#"./.
000080: A8 24 2A 6F 30 EB 2A F3 2F CD D8 36 44 4D 2A F3 .$*o0.*./..6DM*.
000090: 2F 2B 54 5D 13 13 13 CD 90 38 EB 23 22 69 30 2A /+T].....8.#"i0*
0000A0: E4 2F EB 2A 6F 30 CD E4 36 36 01 D1 C1 C9 CD 4A ./.*o0..66.....J
0000B0: 24 CD D4 23 CD 6F 24 C3 43 1E CD 98 24 C5 D5 E5 $..#.o$.C...$...
0000C0: CD 01 23 D1 7C B5 CA D8 1F CD C0 36 CA D8 1F CD ..#.|......6....
0000D0: E9 21 D2 C4 1F 21 00 00 D1 C1 C9 C3 F9 1F CD 98 .!...!..........
0000E0: 24 22 F7 2F C5 D5 CD 43 21 CD E3 24 21 F8 7B 3A $"./...C!..$!.{:
0000F0: DE 2F 37 CD B2 20 22 F9 2F 2A F9 2F EB 2A F7 2F ./7.. "./*./.*./
000100: CD C0 36 CA 23 20 CD E9 21 DA 20 20 22 F9 2F CD ..6.# ..!. "./.
000110: 6F 24 11 F8 7B EB 3A DE 2F 4F CD FA 24 CA F9 1F o$..{.:./O..$...
000120: 21 00 00 D1 C1 C9 CD 98 24 C5 D5 CD BB 23 CD 4A !.......$....#.J
000130: 24 DA AE 20 CD D4 23 3A F6 2F 4F 3A FC 2F 91 CA $.. ..#:./O:./..
000140: 6A 20 4F CD EA 24 44 4D 03 03 CD 6F 24 2B 2B E5 j O..$DM...o$++.
000150: 3A F6 2F 3C CD 72 24 2B 2B D1 CD 7E 38 21 FC 2F :./<.r$++..~8!./
000160: 35 CD 35 24 CD 06 24 D1 C1 C9 21 F6 2F 35 21 FC 5.5$..$...!./5!.
000170: 2F 35 CD 06 24 3A FC 2F B7 CA 2E 20 CD 6F 24 11 /5..$:./... .o$.
000180: F6 7B 3A E8 2F 4F CD 78 38 CD 4A 24 DA AE 20 CD .{:./O.x8.J$.. .
000190: D4 23 CD 6F 24 EB 21 F6 7B 3A E8 2F 4F CD 78 38 .#.o$.!.{:./O.x8
0001A0: CD 06 24 3A F6 2F 4F 3A FC 2F B9 CA 7C 20 D1 C1 ..$:./O:./..| ..
0001B0: C9 B7 C5 D5 4F 17 32 F5 2F 22 EC 2F CD BB 23 2A ....O.2./"./..#*
0001C0: 6F 30 22 69 30 2A E4 2F 22 F0 2F CD D7 23 3A FC o0"i0*./"./..#:.
0001D0: 2F B7 CA 37 21 3E 01 32 F6 2F 2A 6B 30 11 03 00 /..7!>.2./*k0...
0001E0: 19 EB 2A EC 2F CD FA 24 CA 0E 21 DA F4 20 CD D2 ..*./..$..!.. ..
0001F0: 24 D2 E2 20 EB 2B 2B CD E9 36 7A B3 CA 37 21 EB $.. .++..6z..7!.
Size : 512 (Real : 512)
000000: E1 3E 1E 12 13 C3 BD 16 E3 E1 B7 C9 C1 E1 37 C9 .>............7.
000010: E5 CD 8A 17 DA 87 17 78 B7 C2 1F 17 E3 E1 C9 7E .......x.......~
000020: FE 2A C2 4B 17 23 CD 11 1C C5 CD 8A 17 DA 86 17 .*.K.#..........
000030: 78 B7 CA 86 17 E3 79 85 F5 78 91 84 95 47 F1 4F x.....y..x...G.O
000040: 78 81 47 E1 3E 03 12 13 C3 1F 17 FE 2F CA 54 17 x.G.>......./.T.
000050: B7 E3 E1 C9 23 CD 11 1C C5 CD 8A 17 DA 86 17 78 ....#..........x
000060: B7 CA 86 17 E3 78 91 3D 85 F5 7C 95 81 47 F1 B8 .....x.=..|..G..
000070: DA 74 17 47 79 BD D2 7A 17 4D 78 81 3C 47 E1 3E .t.Gy..z.Mx.<G.>
000080: 02 12 13 C3 1F 17 C1 E1 37 C9 CD 92 1A D0 E5 7E ........7......~
000090: FE 2B CA AC 17 FE 2D C2 B0 17 23 CD 11 1C CD B9 .+....-...#.....
0000A0: 17 DA B7 17 04 3E 01 12 13 E3 E1 C9 23 CD 11 1C .....>......#...
0000B0: CD B9 17 DA B7 17 E3 E1 C9 CD D5 17 D0 CD B9 1A ................
0000C0: D0 CD 43 1B D0 CD 17 1B D0 CD 68 1B D0 CD E5 1A ..C.......h.....
0000D0: D0 CD 71 1A C9 E5 7E 21 30 1C CD 4B 39 E1 CA E3 ..q...~!0..K9...
0000E0: 17 37 C9 E5 D5 11 41 1C CD 32 2E C2 69 1A CD 11 .7....A..2..i...
0000F0: 1C EB E9 EB D1 CD 36 1A 91 47 0E 00 3E 17 C3 63 ......6..G..>..c
000100: 1A EB 06 05 0E 00 D1 3E 18 C3 63 1A EB D1 CD 29 .......>..c....)
000110: 1A 91 06 03 0E 00 3E 1A C3 63 1A EB D1 CD 29 1A ......>..c....).
000120: 41 0E 00 3E 19 C3 63 1A EB D1 CD 42 1A CD 0D 15 A..>..c....B....
000130: DA 6A 1A CD 06 1C C2 6A 1A CD 58 1A CD 0D 15 DA .j.....j..X.....
000140: 6A 1A CD 06 1C C2 6A 1A CD 4D 1A 3E 1D 01 00 03 j.....j..M.>....
000150: C3 63 1A EB 7E FE 28 C2 69 1A D1 D5 CD 71 1A D2 .c..~.(.i....q..
000160: 66 18 36 00 06 FF D1 EB 36 24 23 CD EE 36 EB 01 f.6.....6$#..6..
000170: 00 03 C3 65 1A EB D1 CD 36 1A 91 06 03 0E 00 3E ...e....6......>
000180: 25 C3 63 1A EB D1 CD 29 1A 91 06 03 0E 00 3E 26 %.c....)......>&
000190: C3 63 1A EB D1 CD 42 1A CD 4A 16 DA 6A 1A 78 B7 .c....B..J..j.x.
0001A0: CA 6A 1A CD 58 1A D5 E5 CD FF 37 DA C0 18 CD 11 .j..X.....7.....
0001B0: 1C 7E FE 29 CA BC 18 FE 2C C2 C0 18 7B C3 C2 18 .~.)....,...{...
0001C0: 3E 01 E1 D1 32 BC 1C CD 4A 16 DA 6A 1A 78 B7 CA >...2...J..j.x..
0001D0: 6A 1A CD 11 1C 7E FE 29 CA F2 18 CD 58 1A CD 4A j....~.)....X..J
0001E0: 16 DA 6A 1A 78 B7 CA 6A 1A 7E FE 29 C2 6A 1A C3 ..j.x..j.~.).j..
0001F0: F6 18 3E 00 12 13 23 CD 11 1C 3A BC 1C 4F 06 00 ..>...#...:..O..
Size : 512 (Real : 512)
000000: E5 CD 35 24 E1 22 F0 2F CD D7 23 C3 D5 20 D5 EB ..5$."./..#.. ..
000010: 2B 2B CD E9 36 7A B3 CA 28 21 E1 CD 35 24 EB 22 ++..6z..(!..5$."
000020: F0 2F CD D7 23 C3 D5 20 D1 CD 35 24 EB CD DF 36 ./..#.. ..5$...6
000030: AF 32 55 30 D1 C1 C9 2A 6F 30 22 69 30 21 00 00 .2U0...*o0"i0!..
000040: D1 C1 C9 CD 98 24 C5 D5 2A 6D 30 11 0A 00 19 CD .....$..*m0.....
000050: 8E 39 11 7E 97 CD F2 14 DA 80 21 EB 23 CD E9 36 .9.~......!.#..6
000060: 7A B7 3E 43 2B 2B 2B 36 31 CA 72 21 3E 4E 36 2F z.>C+++61.r!>N6/
000070: 1E 08 32 DD 2F 7B 32 DE 2F 23 11 D2 2F CD E4 36 ..2./{2./#../..6
000080: D1 C1 C9 CD 98 24 C5 D5 0E 00 11 62 30 1A B7 C2 .....$.....b0...
000090: 98 21 CD B0 21 D1 C1 C9 1A B7 CA A4 21 CD AD 21 .!..!.......!..!
0000A0: 13 C3 98 21 3A 61 30 CD AD 21 D1 C1 C9 CD DF 22 ...!:a0..!....."
0000B0: CD 99 2C CD DE 1F 7C B5 C0 CD 99 2C CD BA 1F CD ..,...|....,....
0000C0: 26 20 CD 8D 1D 3E FF 4F C9 C5 D5 EB CD E9 21 DA & ...>.O......!.
0000D0: E3 21 CD 6F 24 EB CD FA 24 C2 E3 21 EB CD DF 36 .!.o$...$..!...6
0000E0: D1 C1 C9 21 00 00 D1 C1 C9 C5 D5 CD BB 23 CD 4A ...!.........#.J
0000F0: 24 DA 4D 22 CD D4 23 CD D2 24 D2 41 22 CD 4A 24 $.M"..#..$.A".J$
000100: DA 4D 22 CD D4 23 3A F6 2F 4F 3A FC 2F B9 DA FD .M"..#:./O:./...
000110: 21 3A F6 2F 3C 32 F6 2F CD 72 24 2B 2B CD E9 36 !:./<2./.r$++..6
000120: CD 35 24 EB 22 F0 2F 3E 01 32 F6 2F CD 35 24 CD .5$."./>.2./.5$.
000130: D4 23 2A 6B 30 23 CD E9 36 7A B3 C2 23 22 C3 44 .#*k0#..6z..#".D
000140: 22 CD 35 24 CD 6F 24 CD DF 36 C3 56 22 3E FF 32 ".5$.o$..6.V">.2
000150: 55 30 37 D1 C1 C9 B7 D1 C1 C9 C5 D5 CD BB 23 CD U07...........#.
000160: 4A 24 DA D2 22 CD D4 23 3A F6 2F 3D 32 F6 2F C2 J$.."..#:./=2./.
000170: C6 22 CD 4A 24 DA D2 22 CD D4 23 3A F6 2F FE 01 .".J$.."..#:./..
000180: CA 72 22 3D 32 F6 2F 2A 6B 30 23 CA 91 22 CD 75 .r"=2./*k0#..".u
000190: 24 CD E9 36 CD 35 24 EB 22 F0 2F CD D7 23 3A FC $..6.5$."./..#:.
0001A0: 2F 3C 32 F6 2F CD 35 24 3A FC 2F 3C CD 72 24 2B /<2./.5$:./<.r$+
0001B0: 2B CD E9 36 7A B3 C2 97 22 CD 4A 24 21 F6 2F 35 +..6z...".J$!./5
0001C0: CD 35 24 C3 C9 22 CD 35 24 CD 6F 24 CD DF 36 C3 .5$..".5$.o$..6.
0001D0: DB 22 3E FF 32 55 30 37 D1 C1 C9 B7 D1 C1 C9 C5 .">.2U07........
0001E0: D5 32 60 30 16 00 CD 0D 3C 05 C3 17 2E 3A 60 30 .2`0....<....:`0
0001F0: 2A 6D 30 EB 01 6E 00 CD 0D 3C 03 C3 17 2E D1 C1 *m0..n...<......
Size : 512 (Real : 512)
000000: 2E C2 2C 2B 0C 23 F1 E6 5F FE 50 C2 13 2B 06 01 ..,+.#.._.P..+..
000010: C3 2D 2B FE 53 C2 1D 2B 06 02 C3 2D 2B FE 4D C2 .-+.S..+...-+.M.
000020: 27 2B 06 FF C3 2D 2B 0D 2B C3 2D 2B F1 7E CD 84 '+...-+.+.-+.~..
000030: 36 D2 3F 2B CD AB 36 D2 3F 2B FE 3A C2 44 2B 23 6.?+..6.?+.:.D+#
000040: 0C C3 2D 2B 79 B7 C9 CD 0F 36 2A 14 30 2B 22 14 ..-+y....6*.0+".
000050: 30 7D B4 C8 CD 9F 24 C2 6E 2B CD 37 2C D8 3A 5B 0}....$.n+.7,.:[
000060: 44 B7 CA 8C 2B CD DC 1C CA 5A 2B C3 8C 2B CD E9 D...+....Z+..+..
000070: 21 DA 87 2B CD 9D 27 3A 5B 44 B7 CA 8C 2B CD DC !..+..':[D...+..
000080: 1C CA 6E 2B C3 8C 2B CD 41 23 37 C9 3A 78 44 B7 ..n+..+.A#7.:xD.
000090: CA BF 2B CD 83 2E CD 9F 24 C2 A8 2B CD 37 2C DA ..+.....$..+.7,.
0000A0: BA 2B CD 83 2E AF 3C C9 CD E9 21 DA B7 2B CD 9D .+....<...!..+..
0000B0: 27 CD 83 2E AF 3C C9 CD 41 23 CD 83 2E 37 C9 AF '....<..A#...7..
0000C0: 3C C9 C5 D5 11 91 7A CD F2 14 DA EC 2B EB 23 23 <.....z.....+.##
0000D0: 7E B7 CA EC 2B 2B 2B 36 00 23 36 05 23 36 35 21 ~...+++6.#6.#65!
0000E0: 91 7A CD 20 0B CD 39 35 D1 C1 B7 C9 D1 C1 37 C9 .z. ..95......7.
0000F0: C5 D5 11 17 30 CD 0D 3C 01 C3 03 2C 32 16 30 B7 ....0..<...,2.0.
000100: D1 C1 C9 FE 08 C4 17 2E 37 D1 C1 C9 22 06 30 CD ........7...".0.
000110: 1B 2D C9 78 B1 C8 C5 7E B7 C2 1E 2C 3E 20 CD E8 .-.x...~...,> ..
000120: 35 23 0B 79 B0 C2 17 2C C1 C9 2A 5A 30 C9 22 5A 5#.y...,..*Z0."Z
000130: 30 3E FF 32 5C 30 C9 C5 D5 2A 73 30 EB 2A 58 30 0>.2\0...*s0.*X0
000140: 44 4D 3A 16 30 CD 0D 3C 08 C3 5B 2C 2A 56 30 23 DM:.0..<..[,*V0#
000150: 22 56 30 AF 32 55 30 3C D1 C1 C9 FE 0C CA 6F 2C "V0.2U0<......o,
000160: FE 0B C4 17 2E 3E FF 32 55 30 B7 37 D1 C1 C9 CD .....>.2U0.7....
000170: 70 3B CD D8 2C B7 37 D1 C1 C9 C5 D5 3A 16 30 CD p;..,.7.....:.0.
000180: 0D 3C 03 C3 90 2C D1 C1 1A FE 1A CA 97 2C B7 C9 .<...,.......,..
000190: FE 0B C4 17 2E D1 C1 37 C9 2A 56 30 3A 55 30 B7 .......7.*V0:U0.
0001A0: C9 C5 D5 21 17 30 11 C7 9B 01 0F 00 CD 7E 38 D1 ...!.0.......~8.
0001B0: C1 C9 C5 D5 01 C7 9B 11 17 30 CD 0D 3C 0D C3 C4 .........0..<...
0001C0: 2C D1 C1 C9 CD 17 2E D1 C1 C9 C5 D5 21 01 00 22 ,...........!.."
0001D0: 06 30 CD 1B 2D D1 C1 C9 CD 9F 24 CA FD 2C AF 32 .0..-.....$..,.2
0001E0: 55 30 CD 01 23 CD 9D 27 3A 5B 44 B7 C8 CD DC 1C U0..#..':[D.....
0001F0: C2 19 2D CD E9 21 D8 CD 9D 27 C3 ED 2C AF 32 55 ..-..!...'..,.2U
Size : 512 (Real : 512)
000000: C9 3E 01 32 F6 2F 2A 6F 30 22 69 30 CD BB 23 2A .>.2./*o0"i0..#*
000010: E4 2F 22 F0 2F CD D7 23 CD 35 24 3A FC 2F B7 CA ./"./..#.5$:./..
000020: 38 23 2A 6B 30 23 CD DF 36 7C B5 C2 12 23 2A 6B 8#*k0#..6|...#*k
000030: 30 23 23 23 CD DF 36 C9 3E FF 32 55 30 21 00 00 0###..6.>.2U0!..
000040: C9 2A 6F 30 22 69 30 CD BB 23 2A E4 2F 22 F0 2F .*o0"i0..#*./"./
000050: CD D7 23 3A FC 2F 3C 32 F6 2F CD 35 24 3A FC 2F ..#:./<2./.5$:./
000060: B7 CA 88 23 3C CD 72 24 2B 2B CD DF 36 7C B5 C2 ...#<.r$++..6|..
000070: 4D 23 3A FC 2F CD 72 24 CD DF 36 EB CD 4A 24 21 M#:./.r$..6..J$!
000080: F6 2F 35 CD 35 24 EB C9 21 00 00 C9 11 61 30 1A ./5.5$..!....a0.
000090: B7 CA A1 23 CD 0D 3C 07 C3 17 2E AF 12 13 C3 8F ...#..<.........
0000A0: 23 AF 32 60 30 C9 C5 4F 21 61 30 7E B7 CA B4 23 #.2`0..O!a0~...#
0000B0: 23 C3 AB 23 71 C1 C9 3A 61 30 C9 C5 D5 2A 6D 30 #..#q..:a0...*m0
0000C0: 11 E2 2F 0E 0A CD 78 38 2A 6B 30 23 23 23 22 EE ../...x8*k0###".
0000D0: 2F D1 C1 C9 2A F0 2F C5 D5 22 01 30 3A 60 30 06 /...*./..".0:`0.
0000E0: 01 11 FF 2F CD 0D 3C 0B C3 17 2E 3A 60 30 01 00 .../..<....:`0..
0000F0: 02 2A 6B 30 EB CD 0D 3C 03 C3 17 2E 2A 6B 30 7E .*k0...<....*k0~
000100: 32 FC 2F D1 C1 C9 2A F0 2F C5 D5 22 01 30 3A 60 2./...*./..".0:`
000110: 30 06 01 11 FF 2F CD 0D 3C 0B C3 17 2E 01 00 02 0..../..<.......
000120: 2A 6B 30 3A FC 2F 77 EB 3A 60 30 CD 0D 3C 04 C3 *k0:./w.:`0..<..
000130: 17 2E D1 C1 C9 D5 2A F0 2F EB 2A 69 30 CD E4 36 ......*./.*i0..6
000140: 3A F6 2F 77 23 22 69 30 D1 C9 D5 2A 6F 30 EB 2A :./w#"i0...*o0.*
000150: 69 30 CD C0 36 C2 5B 24 D1 37 C9 2B 7E 32 F6 2F i0..6.[$.7.+~2./
000160: 2B 56 2B 5E EB 22 F0 2F EB 22 69 30 D1 B7 C9 3A +V+^."./."i0...:
000170: F6 2F 2A EE 2F B7 C8 C5 D5 3D 4F 3A E9 2F 57 06 ./*./....=O:./W.
000180: 00 1E 09 79 1F 4F 1D CA 94 24 78 D2 8F 24 82 1F ...y.O...$x..$..
000190: 47 C3 83 24 09 D1 C1 C9 CD 9F 24 C0 33 33 C9 3A G..$......$.33.:
0001A0: 60 30 B7 C9 21 61 30 C9 3A 60 30 16 00 CD 0D 3C `0..!a0.:`0....<
0001B0: 05 C3 17 2E 2A 6D 30 EB 21 E2 2F 0E 0A CD 78 38 ....*m0.!./...x8
0001C0: 01 00 02 2A 6D 30 EB 3A 60 30 CD 0D 3C 04 C3 17 ...*m0.:`0..<...
0001D0: 2E C9 3A E9 2F EB CD BB 36 EB 21 F6 2F 34 3A FC ..:./...6.!./4:.
0001E0: 2F BE C9 21 7E 97 CD 20 0B C9 4F 3A E9 2F 5F 16 /..!~.. ..O:./_.
0001F0: 00 21 00 00 19 0D C2 F4 24 C9 D5 EB 23 23 3A EB .!......$...##:.
Size : 512 (Real : 512)
000000: 30 21 01 00 CD 9D 27 3A 5B 44 B7 C8 CD DC 1C C2 0!....':[D......
000010: 19 2D CD 37 2C D8 C3 0C 2D B7 C9 C5 D5 01 08 00 .-.7,...-.......
000020: 21 0A 30 CD F8 36 2A 06 30 7C B5 CA 7B 2D 2B EB !.0..6*.0|..{-+.
000030: 2A 5A 30 EB CD C0 36 DA 7E 2D 22 0E 30 22 56 30 *Z0...6.~-".0"V0
000040: 2A 58 30 22 12 30 21 09 02 22 0A 30 21 13 30 CD *X0".0!..".0!.0.
000050: 9C 2D D2 5E 2D 11 0E 30 21 0A 30 CD 83 2D 21 0E .-.^-..0!.0..-!.
000060: 30 CD 90 2D 2A 12 30 7C B5 C2 4C 2D 06 00 11 0A 0..-*.0|..L-....
000070: 30 3A 16 30 CD 0D 3C 0B C3 17 2E D1 C1 C9 3E 0C 0:.0..<.......>.
000080: C3 17 2E 0E 04 B7 1A 8E 77 13 23 0D C2 86 2D C9 ........w.#...-.
000090: 0E 04 B7 7E 17 77 23 0D C2 93 2D C9 0E 02 B7 7E ...~.w#...-....~
0000A0: 1F 77 2B 0D C2 9F 2D C9 3A 16 30 16 00 CD 0D 3C .w+...-.:.0....<
0000B0: 05 C3 17 2E C9 C5 D5 CD A8 2D 3A 16 30 01 09 02 .........-:.0...
0000C0: 2A 71 30 11 F8 FF 19 EB CD 0D 3C 03 C3 17 2E 2A *q0.......<....*
0000D0: 73 30 44 4D 2A 71 30 11 F8 FF 19 7E FE 02 C2 FC s0DM*q0....~....
0000E0: 2D 23 CD DF 36 22 5A 30 2A 71 30 CD 75 25 2A 71 -#..6"Z0*q0.u%*q
0000F0: 30 2B 2B CD DF 36 22 58 30 D1 C1 C9 CD 45 25 CD 0++..6"X0....E%.
000100: 44 27 3E 17 CD 17 2E C5 2A 58 30 44 4D 2A 73 30 D'>.....*X0DM*s0
000110: 3E 20 CD FA 36 C1 C9 CD 70 3B C3 7E 44 C5 D5 11 > ..6...p;.~D...
000120: 91 7A CD F2 14 DA 2F 2E 21 91 7A CD 20 0B B7 D1 .z..../.!.z. ...
000130: C1 C9 C5 E5 CD B1 37 CA 4D 2E AF EB BE 23 C2 3C ......7.M....#.<
000140: 2E 23 23 7E EB 3C C2 34 2E 3D C1 C1 C9 7E FE 30 .##~.<.4.=...~.0
000150: DA 62 2E FE 3A DA 5D 2E FE 41 DA 62 2E E1 E5 C3 .b..:.]..A.b....
000160: 3A 2E F1 13 1A B7 C2 63 2E 13 EB CD DF 36 EB C1 :......c.....6..
000170: C9 B7 CA 77 2E D6 40 CD 0D 3C 0C C3 17 2E C9 3A ...w..@..<.....:
000180: 50 30 C9 3A 50 30 2F 3C 3C 21 50 30 BE C8 77 C5 P0.:P0/<<!P0..w.
000190: D5 F5 2F 3C 3C 21 51 30 87 CD BB 36 CD DF 36 11 ../<<!Q0...6..6.
0001A0: 55 30 EB 0E 20 CD 78 38 F1 87 21 51 30 CD BB 36 U0.. .x8..!Q0..6
0001B0: CD DF 36 11 55 30 0E 20 CD 78 38 3A 5D 30 32 16 ..6.U0. .x8:]02.
0001C0: 30 D1 C1 C9 C5 D5 3A 16 30 CD 0D 3C 04 C3 17 2E 0.....:.0..<....
0001D0: D1 C1 C9 C5 D5 2A 58 30 44 4D 2A 73 30 EB 3A 16 .....*X0DM*s0.:.
0001E0: 30 CD 0D 3C 04 C3 17 2E D1 C1 3E FF 32 5C 30 3A 0..<......>.2\0:
0001F0: 55 30 B7 C8 2A 56 30 23 22 56 30 22 5A 30 C9 C5 U0..*V0#"V0"Z0..
Size : 512 (Real : 512)
000000: 2F B7 CA 2B 25 CD FF 34 EB 3A F5 2F 1F DA 18 25 /..+%..4.:./...%
000010: 0E FF CD 9F 32 C3 1B 25 CD F2 34 CD 91 31 11 56 ....2..%..4..1.V
000020: 83 CD E5 34 1A B7 D1 C8 F0 37 C9 3A 71 44 B7 C2 ...4.....7.:qD..
000030: 37 25 CD 3D 37 D1 C9 C5 41 3A E8 2F D6 02 4F CD 7%.=7...A:./..O.
000040: 6B 37 C1 D1 C9 3A 16 30 B7 C8 C5 4F 3A 5D 30 B9 k7...:.0...O:]0.
000050: C2 65 25 3A 5C 30 B7 CA 61 25 CD FF 2E AF 32 5C .e%:\0..a%....2\
000060: 30 AF 32 5D 30 3A 16 30 CD 0D 3C 07 C3 17 2E AF 0.2]0:.0..<.....
000070: 32 16 30 C1 C9 D5 E5 EB 21 01 00 09 22 08 30 EB 2.0.....!...".0.
000080: 7E FE 0D CA A0 25 11 0C 00 19 7E 23 EB 2A 08 30 ~....%....~#.*.0
000090: EB CD E4 36 EB CD BB 36 22 08 30 EB 23 C3 80 25 ...6...6".0.#..%
0000A0: D1 1B 1B 2A 08 30 7D 91 6F 7C 98 67 EB CD E4 36 ...*.0}.o|.g...6
0000B0: D1 C9 C5 CD 0D 3C 08 C3 BC 25 C1 C9 FE 0B C4 17 .....<...%......
0000C0: 2E 37 C1 C9 CD 6C 27 CD 65 28 21 17 30 CD 2B 36 .7...l'.e(!.0.+6
0000D0: C9 C5 D5 CD 0D 3C 09 C3 17 2E D1 C1 C9 C5 01 06 .....<..........
0000E0: 00 21 CC 2F CD F8 36 C1 C9 D5 CD 73 39 CA 09 26 .!./..6....s9..&
0000F0: 11 A7 2F CD 32 2E C2 08 26 CD 8E 39 D5 21 02 26 ../.2...&..9.!.&
000100: E3 E9 D2 EA 25 C3 09 26 B7 D1 C9 CD 4F 26 3E 01 ....%..&....O&>.
000110: 32 CC 2F B7 C9 CD 4F 26 3E 01 32 CE 2F C3 28 26 2./...O&>.2./.(&
000120: CD 4F 26 3E 01 32 CF 2F CD 73 39 CD FF 37 7A B3 .O&>.2./.s9..7z.
000130: 37 C8 CD 8E 39 EB 22 06 30 B7 C9 3E 01 32 D1 2F 7...9.".0..>.2./
000140: C3 48 26 3E 01 32 CD 2F 11 91 7A CD F2 14 C9 3A .H&>.2./..z....:
000150: D0 2F B7 C2 D1 26 3D 32 D0 2F C9 22 14 30 3A CC ./...&=2./.".0:.
000160: 2F B7 CA 68 26 C3 B8 26 3A CE 2F B7 CA 75 26 2A /..h&..&:./..u&*
000170: 06 30 C3 BE 26 3A CF 2F B7 CA A3 26 2A 06 30 7C .0..&:./...&*.0|
000180: B5 CA C2 26 EB 2A 5A 30 EB CD C0 36 DA CC 26 54 ...&.*Z0...6..&T
000190: 5D CD 9D 27 EB CD DE 1F 7C B5 CA C7 26 21 01 00 ]..'....|...&!..
0001A0: C3 BE 26 3A CD 2F B7 C2 B8 26 3A D1 2F B7 C2 BB ..&:./...&:./...
0001B0: 26 2A 14 30 7C A5 3C C0 CD D8 2C 21 FF FF 22 14 &*.0|.<...,!..".
0001C0: 30 C9 3E 33 C3 17 2E 3E 7E C3 17 2E 3E 0C C3 17 0.>3...>~...>...
0001D0: 2E C3 7E 44 3A 16 30 B7 C8 CD 0D 3C 06 C3 17 2E ..~D:.0....<....
0001E0: C9 3A 55 30 32 05 30 C9 3A 05 30 32 55 30 C9 3A .:U02.0.:.02U0.:
0001F0: 16 30 C5 D5 16 FF CD 0D 3C 05 C3 17 2E D1 C1 C9 .0......<.......
Size : 512 (Real : 512)
000000: D5 CD A8 2D 01 09 02 2A 71 30 11 F8 FF 19 E5 36 ...-...*q0.....6
000010: 02 23 EB 2A 5A 30 EB CD E4 36 3A 4E 44 77 23 3A .#.*Z0...6:NDw#:
000020: 4F 44 77 23 3A 50 44 77 D1 3A 16 30 CD 0D 3C 04 ODw#:PDw.:.0..<.
000030: C3 17 2E D1 C1 C9 2A 4A 30 36 FF 23 22 4A 30 C9 ......*J06.#"J0.
000040: D5 11 4C 30 CD 0D 3C 0A C3 17 2E D1 C9 21 90 7B ..L0..<......!.{
000050: 22 4A 30 C9 2A 4A 30 3A 4C 30 77 23 3A 4D 30 77 "J0.*J0:L0w#:M0w
000060: 23 3A 4E 30 77 23 3A 4F 30 77 23 22 4A 30 C9 2A #:N0w#:O0w#"J0.*
000070: 4A 30 2B 7E FE FF C2 72 2F 22 4A 30 C9 47 D5 2A J0+~...r/"J0.G.*
000080: 4A 30 11 90 7B CD C0 36 CA A5 2F 2B FE FF 7E 3C J0..{..6../+..~<
000090: CA A5 2F 11 FD FF 19 22 4A 30 EB 78 06 01 CD 0D ../...."J0.x....
0000A0: 3C 0B C3 17 2E D1 C9 41 4C 4C 00 0B 26 4E 45 58 <......ALL..&NEX
0000B0: 54 00 15 26 52 45 43 4F 52 44 00 20 26 46 4F 52 T..&RECORD. &FOR
0000C0: 00 43 26 57 48 49 4C 45 00 3B 26 FF 00 00 00 00 .C&WHILE.;&.....
0000D0: 00 00 4B 45 59 20 20 20 20 20 20 20 00 43 00 F8 ..KEY .C..
0000E0: 7B 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 {...............
0000F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000100: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000110: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000120: 00 00 00 00 00 00 2E 44 42 46 2E 43 4D 44 2E 46 .......DBF.CMD.F
000130: 52 4D 2E 4D 45 4D 2E 54 58 54 2E 4E 44 58 2E 46 RM.MEM.TXT.NDX.F
000140: 4D 54 2E 24 24 24 2E 48 45 58 90 7B 00 00 00 00 MT.$$$.HEX.{....
000150: 00 75 30 95 30 00 00 00 00 00 00 00 00 00 00 00 .u0.0...........
000160: 00 00 00 00 00 00 00 00 00 00 00 38 7D 5C 7C 08 ...........8}\|.
000170: 82 B7 6E B8 70 00 00 00 00 00 00 00 00 00 00 00 ..n.p...........
000180: 00 00 00 00 00 00 00 00 00 00 00 38 7D 5C 7C 08 ...........8}\|.
000190: 82 B7 6E B8 70 00 00 00 00 00 00 00 00 00 00 00 ..n.p...........
0001A0: 00 00 00 00 00 00 00 00 00 00 00 A0 7F CA 7C 2F ..............|/
0001B0: 82 A8 74 A9 76 C5 D5 21 9D 6E 7E E6 7F C2 D2 30 ..t.v..!.n~....0
0001C0: EB 21 A3 6E 7E E6 7F CA 8A 31 06 06 CD 9D 34 C3 .!.n~....1....4.
0001D0: 87 31 47 2E A3 7E E6 7F CA 87 31 B8 CA 1A 31 90 .1G..~....1...1.
0001E0: F2 E5 30 2F 3C FE 0A DA F7 30 7E E6 7F B8 DA 87 ..0/<....0~.....
0001F0: 31 11 9D 6E C3 C1 30 7E E6 7F B8 DA 05 31 57 58 1..n..0~.....1WX
Size : 512 (Real : 512)
000000: C3 00 00 11 17 30 CD 0D 3C 02 C3 0F 27 B7 C9 37 .....0..<...'..7
000010: C9 C5 D5 E5 D5 CD 4B 37 C2 26 27 1A B7 C2 26 27 ......K7.&'...&'
000020: E1 E3 E1 C3 39 27 D1 EB 11 10 00 19 7E B7 CA 2B ....9'......~..+
000030: 27 EB E1 FE 0D C2 13 27 3D D1 C1 C9 3A 16 30 C9 '......'=...:.0.
000040: 32 16 30 C9 C5 D5 3A 50 30 87 21 51 30 CD BB 36 2.0...:P0.!Q0..6
000050: CD DF 36 11 08 00 19 3A 16 30 32 5D 30 77 D1 C1 ..6....:.02]0w..
000060: C9 3A 5D 30 32 16 30 C9 21 17 30 C9 11 4C 30 CD .:]02.0.!.0..L0.
000070: 0D 3C 0A C3 17 2E EB C9 3A CD 2F B7 C2 88 27 3A .<......:./...':
000080: D1 2F B7 C2 91 27 3D C9 D5 21 91 7A CD 20 0B D1 ./...'=..!.z. ..
000090: C9 D5 21 91 7A CD 20 0B D1 C0 3D 37 C9 22 06 30 ..!.z. ...=7.".0
0000A0: 22 56 30 7C B5 C8 CD 1B 2D CD 37 2C C9 C5 D5 F5 "V0|....-.7,....
0000B0: 01 0F 00 21 17 30 CD F8 36 11 17 30 CD 73 39 CA ...!.0..6..0.s9.
0000C0: 55 28 23 7E FE 3A C2 DD 27 2B 7E CD 84 36 DA 55 U(#~.:..'+~..6.U
0000D0: 28 CD 5A 28 CD 69 39 CD 5A 28 CD 69 39 CD 63 39 (.Z(.i9.Z(.i9.c9
0000E0: CA 55 28 FE 20 CA 55 28 FE 2E CA 55 28 CD 5A 28 .U(. .U(...U(.Z(
0000F0: 06 07 CD 69 39 CA 40 28 FE 20 CA 40 28 FE 2C CA ...i9.@(. .@(.,.
000100: 40 28 FE 2E CA 22 28 CD 5A 28 C2 F2 27 CD 69 39 @(..."(.Z(..'.i9
000110: CA 40 28 FE 20 CA 40 28 FE 2C CA 40 28 FE 2E C2 .@(. .@(.,.@(...
000120: 0D 28 CD 5A 28 06 04 CD 69 39 CA 51 28 FE 20 CA .(.Z(...i9.Q(. .
000130: 51 28 FE 2C CA 51 28 CD 5A 28 C2 27 28 C3 55 28 Q(.,.Q(.Z(.'(.U(
000140: F1 87 87 21 26 30 CD BB 36 0E 04 CD 78 38 D1 C1 ...!&0..6...x8..
000150: C9 F1 D1 C1 C9 F1 D1 C1 37 C9 FE 61 DA 61 28 E6 ........7..a.a(.
000160: 5F 12 13 05 C9 C5 D5 11 17 30 7E C6 40 12 13 3E _........0~.@..>
000170: 3A 12 13 06 08 23 7E FE 20 12 13 05 C2 75 28 3E :....#~. ....u(>
000180: 2E 12 13 06 03 23 7E 12 13 05 C2 85 28 AF 12 D1 .....#~.....(...
000190: C1 C9 C5 D5 E5 CD F1 2A E1 CA 01 29 78 B7 CA C5 .......*...)x...
0001A0: 28 FE 01 CA B8 28 FE 02 C2 01 29 3A 9D 30 B7 CA (....(....):.0..
0001B0: FE 28 CD 13 29 C3 FE 28 3A 7D 30 B7 CA FE 28 CD .(..)..(:}0...(.
0001C0: 06 29 C3 FE 28 3A 50 30 FE 01 CA E7 28 3A 7D 30 .)..(:P0....(:}0
0001D0: B7 CA DA 28 CD 0A 29 CA FE 28 3A 9D 30 B7 CA 01 ...(..)..(:.0...
0001E0: 29 CD 17 29 C3 FE 28 3A 9D 30 B7 CA F4 28 CD 17 )..)..(:.0...(..
0001F0: 29 CA FE 28 3A 7D 30 B7 CA 01 29 CD 0A 29 D1 C1 )..(:}0...)..)..
Size : 512 (Real : 512)
000000: 0E 9D C3 09 31 50 5F 0E A3 69 2C CD C8 34 1C 7A ....1P_..i,..4.z
000010: BB C2 09 31 69 7E E6 80 B2 77 2E 9D 46 11 A3 6E ...1i~...w..F..n
000020: 1A A8 FA 46 31 B7 0E 05 2E A2 1E A8 1A 8E 27 77 ...F1.........'w
000030: 2D 1D 0D C2 2C 31 D2 87 31 2E 9E 3E 01 CD C9 34 -...,1..1..>...4
000040: 2E 9D 34 C3 87 31 B7 0E 05 1E A2 2E A8 37 3E 99 ..4..1.......7>.
000050: CE 00 96 EB 86 27 77 EB 2D 1D 0D C2 4E 31 DA 84 .....'w.-...N1..
000060: 31 2E A2 0E 05 AF 96 C6 99 77 2D 0D C2 65 31 2E 1........w-..e1.
000070: A2 0E 05 37 7E CE 00 27 77 2D 0D C2 74 31 2E 9D ...7~..'w-..t1..
000080: 7E EE 80 77 CD 64 34 D1 C1 C9 2E 9D 36 00 C3 87 ~..w.d4.....6...
000090: 31 21 A3 6E 7E EE 80 77 C3 B5 30 C5 D5 21 9D 6E 1!.n~..w..0..!.n
0000A0: 11 A9 6E 06 06 CD 9D 34 2E 9D 06 06 CD A6 34 0E ..n....4......4.
0000B0: 0A 2E AA CD C8 34 0F 0F 0F 0F E6 0F CA C7 31 47 .....4........1G
0000C0: CD B5 30 05 C2 C0 31 2E A3 34 0D C2 B1 31 2E A9 ..0...1..4...1..
0000D0: 7E 47 E6 7F 4F 2E 9D 7E 57 E6 7F D6 49 81 77 78 ~G..O..~W...I.wx
0000E0: AA F2 E8 31 7E F6 80 77 CD 64 34 D1 C1 C9 C5 D5 ...1~..w.d4.....
0000F0: 21 9D 6E 7E 32 9A 6E 2E A3 7E B7 CA 92 32 32 99 !.n~2.n..~...22.
000100: 6E 2E 9D 36 40 2E A3 36 C0 3E 0A 32 9C 6E 0E 00 n..6@..6.>.2.n..
000110: CD B5 30 2E 9D 7E B7 FA 22 32 0C B7 CA 3C 32 C3 ..0..~.."2...<2.
000120: 10 32 CD 91 31 2E A3 7E 3D F6 80 77 79 2E AE CD .2..1..~=..wy...
000130: AE 34 3A 9C 6E 3D C2 0B 32 C3 6E 32 79 FE 0A D2 .4:.n=..2.n2y...
000140: 5A 32 2E AE CD AE 34 3A 9C 6E 3D CA 6E 32 32 9C Z2....4:.n=.n22.
000150: 6E AF 2E AE CD AE 34 C3 47 32 3E 09 2E AE CD AE n.....4.G2>.....
000160: 34 3A 9C 6E 3D CA 6E 32 32 9C 6E C3 5A 32 3A 9A 4:.n=.n22.n.Z2:.
000170: 6E 47 2E 99 4E 96 C6 40 2E A9 E6 7F 5F 79 A8 E6 nG..N..@...._y..
000180: 80 B3 77 11 9D 6E 06 06 CD 9D 34 CD 64 34 D1 C1 ..w..n....4.d4..
000190: B7 C9 37 D1 C1 C9 3A 9D 6E F6 80 32 9D 6E C9 C5 ..7...:.n..2.n..
0001A0: D5 EB 21 98 6E 06 0B CD A6 34 1A FE 20 C2 B8 32 ..!.n....4.. ..2
0001B0: 13 0D CA 3F 33 C3 AA 32 2E 9D 36 3F 1A FE 2B CA ...?3..2..6?..+.
0001C0: C9 32 FE 2D C2 CF 32 36 BF 0D CA 3F 33 13 1A FE .2.-..26...?3...
0001D0: 30 CA 0A 33 DA 2E 33 FE 3A D2 3F 33 2E 99 36 01 0..3..3.:.?3..6.
0001E0: E6 0F 47 2E 9C 7E 34 1F DA F7 32 C6 9E 6F 78 07 ..G..~4...2..ox.
0001F0: 07 07 07 77 C3 FD 32 C6 9E 6F 7E B0 77 2E 9B 7E ...w..2..o~.w..~
Size : 512 (Real : 512)
000000: C9 AF 3C D1 C1 C9 23 23 0D 0D EB 2A 91 30 EB CD ..<...##...*.0..
000010: 11 27 C9 23 23 0D 0D EB 2A B1 30 EB CD 11 27 C9 .'.##...*.0...'.
000020: C5 D5 21 00 60 01 00 04 CD F8 36 01 00 06 21 01 ..!.`.....6...!.
000030: 64 CD F8 36 21 00 64 36 0D D1 C1 C9 3A 16 30 B7 d..6!.d6....:.0.
000040: C0 3E 16 CD 70 3B CD 63 39 22 03 30 21 7E 99 CD .>..p;.c9".0!~..
000050: 8E 39 CD 78 35 CA 7E 44 AF CD AD 27 3E 40 CD F0 .9.x5.~D...'>@..
000060: 2B DA 74 29 CD 44 27 CD B5 2D CD D8 2C 2A 03 30 +.t).D'..-..,*.0
000070: CD 8E 39 C9 3E 08 CD 70 3B C3 7E 44 2A 14 30 C9 ..9.>..p;.~D*.0.
000080: 22 14 30 C9 2A 58 30 C9 C5 D5 E5 3E 0B CD BB 36 ".0.*X0....>...6
000090: 78 B7 C2 BC 29 79 B7 CA B2 29 36 C3 41 0E 00 23 x...)y...)6.A..#
0000A0: 23 E5 CD E9 36 7A B3 C2 EE 29 E1 E5 2B 70 04 C3 #...6z...)..+p..
0000B0: F4 29 36 CC 23 36 00 06 01 C3 C3 29 36 CE 23 36 .)6.#6.....)6.#6
0000C0: 0A 06 06 23 E5 CD E9 36 7A B3 CA F4 29 1A B8 D2 ...#...6z...)...
0000D0: EE 29 CD 39 2A DA 05 2A 70 23 E5 C5 EB 2B 4E 06 .).9*..*p#...+N.
0000E0: 00 03 CD F8 36 C1 D1 E1 CD E4 36 C3 01 2A E1 23 ....6.....6..*.#
0000F0: 23 C3 01 2A D1 CD 39 2A DA 06 2A 70 23 EB CD E4 #..*..9*..*p#...
000100: 36 71 C3 11 2A E1 E1 36 00 3E 13 CD 70 3B C3 7E 6q..*..6.>..p;.~
000110: 44 E1 D1 C1 C9 C5 D5 E5 CD F1 2A E1 CA 34 2A 78 D.........*..4*x
000120: B7 CA 2B 2A F2 34 2A 23 23 0D 0D 11 00 60 CD 11 ..+*.4*##....`..
000130: 27 D1 C1 C9 AF 3C D1 C1 C9 C5 D5 21 01 64 7E B7 '....<.....!.d~.
000140: CA 53 2A CD BB 36 23 11 01 6A CD C0 36 D2 3E 2A .S*..6#..j..6.>*
000150: C3 6A 2A 54 5D 48 23 7E B7 C2 3E 2A 0D C2 56 2A .j*T]H#~..>*..V*
000160: EB 11 01 6A CD C0 36 D2 6B 2A 37 D1 C1 C9 21 00 ...j..6.k*7...!.
000170: 06 C9 CD 9A 2A CD 88 29 C9 C5 D5 E5 01 0D 00 09 ....*..)........
000180: CD E9 36 EB 2B 4E 06 00 03 CD F8 36 E1 01 10 00 ..6.+N.....6....
000190: CD F8 36 D1 C1 C9 21 00 04 C9 C5 D5 22 03 30 CD ..6...!.....".0.
0001A0: F1 2A C2 AD 2A 3E 14 CD 70 3B C3 7E 44 2A 03 30 .*..*>..p;.~D*.0
0001B0: CD 15 2A CA EE 2A C5 01 10 00 21 00 60 7E B7 CA ..*..*....!.`~..
0001C0: D0 2A 09 FE 0D C2 BD 2A 3E 12 CD 70 3B C3 7E 44 .*.....*>..p;.~D
0001D0: C1 EB D5 2A 03 30 3E 0A B9 D2 DD 2A 4F 7E CD 84 ...*.0>....*O~..
0001E0: 36 DA E6 2A E6 5F 12 13 23 0D C2 DD 2A E1 D1 C1 6..*._..#...*...
0001F0: C9 01 00 00 7E CD 84 36 DA 44 2B 0C 23 F5 7E FE ....~..6.D+.#.~.
Size : 512 (Real : 512)
000000: B7 C2 C9 32 2E 9D 34 C3 C9 32 2E 99 7E B7 CA 21 ...2..4..2..~..!
000010: 33 2E 9C 34 2E 9B 7E B7 C2 C9 32 2E 9D 34 C3 C9 3..4..~...2..4..
000020: 32 2E 9B 7E B7 CA C9 32 2E 9D 35 C3 C9 32 FE 2E 2..~...2..5..2..
000030: C2 3F 33 2E 9B 7E B7 C2 3F 33 36 01 C3 C9 32 2E .?3..~..?36...2.
000040: 99 7E B7 C2 49 33 2E 9D 77 EB D1 C1 C9 C5 D5 79 .~..I3..w......y
000050: B7 CA 58 33 78 91 3D 47 EB 21 9D 6E 7E 2E 98 36 ..X3x.=G.!.n~..6
000060: 30 B7 F2 67 33 36 2D E6 7F D6 40 F2 AF 33 2F 3C 0..g36-...@..3/<
000070: 2E 9C 77 3E 20 05 CA 7E 33 12 13 C3 75 33 2E 98 ..w> ..~3...u3..
000080: 7E 12 13 79 B7 CA 15 34 3E 2E 12 13 2E 9C 46 3E ~..y...4>.....F>
000090: 30 05 CA 9E 33 12 13 0D C2 91 33 C3 15 34 2E A2 0...3.....3..4..
0000A0: AF CD AE 34 C6 30 12 13 0D C2 9E 33 C3 15 34 3C ...4.0.....3..4<
0000B0: 2E 9C 71 90 2F 3C CA C9 33 FA 0C 34 4F 3E 20 05 ..q./<..3..4O> .
0000C0: 0D CA D3 33 12 13 C3 BF 33 2E 9D 7E B7 FA 0C 34 ...3....3..~...4
0000D0: C3 DF 33 2E 98 7E FE 2D CA DD 33 3E 20 12 13 2E ..3..~.-..3> ...
0000E0: A2 AF C5 CD AE 34 C1 C6 30 12 13 05 C2 DF 33 2E .....4..0.....3.
0000F0: 9C 7E B7 CA 15 34 4F 3E 2E 12 13 2E A2 AF CD AE .~...4O>........
000100: 34 C6 30 12 13 0D C2 FB 33 C3 15 34 3E 2A 12 13 4.0.....3..4>*..
000110: 05 C2 0C 34 37 D1 C1 C9 C5 D5 EB 21 98 6E 06 0B ...47......!.n..
000120: CD A6 34 EB 01 10 27 CD 4D 34 01 E8 03 CD 4D 34 ..4...'.M4....M4
000130: 01 64 00 CD 4D 34 01 0A 00 CD 4D 34 01 01 00 CD .d..M4....M4....
000140: 4D 34 3E 49 32 9D 6E CD 64 34 D1 C1 C9 16 FF 14 M4>I2.n.d4......
000150: 7D 91 6F 7C 98 67 D2 4F 34 09 7A E5 21 A2 6E CD }.o|.g.O4.z.!.n.
000160: AE 34 E1 C9 21 9E 6E 7E 2C B6 2C B6 2C B6 2C B6 .4..!.n~,.,.,.,.
000170: 2C CA 98 34 21 9D 6E 7E E6 7F 4F 2C 7E E6 F0 C2 ,..4!.n~..O,~...
000180: 90 34 0D CA 98 34 2E A2 CD AE 34 2E 9E C3 7C 34 .4...4....4...|4
000190: 2E 9D 7E E6 80 B1 77 C9 2E 9D AF 77 C9 7E 12 23 ..~...w....w.~.#
0001A0: 13 05 C2 9D 34 C9 AF 77 2C 05 C2 A7 34 C9 06 05 ....4..w,...4...
0001B0: D5 E6 0F 5F 7E 07 07 07 07 57 E6 F0 B3 77 7A 2B ..._~....W...wz+
0001C0: 05 C2 B1 34 D1 E6 0F C9 AF 06 05 D5 0F 0F 0F 0F ...4............
0001D0: E6 F0 5F 7E 0F 0F 0F 0F 57 E6 0F B3 77 7A 2C 05 .._~....W...wz,.
0001E0: C2 D0 34 D1 C9 C5 D5 21 9D 6E 06 06 CD 9D 34 D1 ..4....!.n....4.
0001F0: C1 C9 C5 D5 11 9D 6E 06 06 CD 9D 34 D1 C1 C9 C5 ......n....4....
Size : 512 (Real : 512)
000000: B3 40 D2 0A 3D 3E 0A C3 B3 42 CD 81 3F 0E 11 CD .@..=>...B..?...
000010: 7A 3F FE FF C2 1C 3D 3E 08 C3 B3 42 0E 13 CD 7A z?....=>...B...z
000020: 3F C3 9A 42 CD 24 41 3E 01 32 88 43 2A 24 43 22 ?..B.$A>.2.C*$C"
000030: 84 43 CD 09 3F C3 97 42 CD 24 41 AF 32 88 43 2A .C..?..B.$A.2.C*
000040: 24 43 22 84 43 CD 09 3F C3 97 42 CD 24 41 3E FF $C".C..?..B.$A>.
000050: 32 88 43 2A 24 43 22 84 43 CD 09 3F C3 97 42 CD 2.C*$C".C..?..B.
000060: 24 41 3E 80 32 88 43 2A 24 43 23 22 84 43 CD 09 $A>.2.C*$C#".C..
000070: 3F C3 97 42 CD 24 41 7A B7 CA 87 3D CD F8 40 06 ?..B.$Az...=..@.
000080: 80 CD DF 3F C3 97 42 21 00 00 22 8E 43 22 8C 43 ...?..B!..".C".C
000090: CD 0A 40 C3 97 42 CD 24 41 AF 32 88 43 21 01 00 ..@..B.$A.2.C!..
0000A0: 22 84 43 2A 26 43 E5 21 79 43 22 26 43 CD 09 3F ".C*&C.!yC"&C..?
0000B0: 2A 8C 43 2B 22 8C 43 E1 22 26 43 C3 97 42 CD 24 *.C+".C."&C..B.$
0000C0: 41 AF 32 88 43 CD F8 40 06 00 CD DF 3F 2A 8A 43 A.2.C..@....?*.C
0000D0: 2B 3A 5F 01 B7 CA DD 3D 36 00 C3 97 42 36 01 C3 +:_....=6...B6..
0000E0: 97 42 CD 24 41 2A 8C 43 7D 12 13 7C 12 13 2A 8E .B.$A*.C}..|..*.
0000F0: 43 7D 12 13 7C 12 2A 91 43 22 26 43 C3 9A 42 CD C}..|.*.C"&C..B.
000100: 24 41 2A 26 43 78 B7 4E 23 46 23 5E 23 56 CA 1D $A*&Cx.N#F#^#V..
000110: 3E EB 22 8E 43 60 69 22 8C 43 C3 97 42 D5 69 78 >.".C`i".C..B.ix
000120: E6 01 67 22 8C 43 D1 7A 1F 7B 1F 67 78 1F 6F 22 ..g".C.z.{.gx.o"
000130: 8E 43 C3 97 42 3A 7D 43 B7 CA 9E 3E 21 93 43 22 .C..B:}C...>!.C"
000140: 91 43 AF 32 2D 43 2A 91 43 7E B7 CA 6A 3E FE 01 .C.2-C*.C~..j>..
000150: CA 68 3E 11 06 00 19 5E 23 56 1A 4F 3A 7D 43 B9 .h>....^#V.O:}C.
000160: 3E 0A CA B3 42 C3 6A 3E 36 00 3A 2D 43 3C FE 0F >...B.j>6.:-C<..
000170: D2 83 3E 32 2D 43 2A 91 43 11 08 00 19 22 91 43 ..>2-C*.C....".C
000180: C3 46 3E 21 01 00 3A 7D 43 3D CA 95 3E FA 95 3E .F>!..:}C=..>..>
000190: 29 3D C3 8A 3E EB 0E 25 CD 05 00 C3 9A 42 CD 81 )=..>..%.....B..
0001A0: 3F 0E 19 CD 05 00 F5 0E 0D CD 05 00 F1 5F 16 00 ?............_..
0001B0: 0E 0E CD 05 00 C3 9A 42 2A 24 43 EB CD 8A 3F CD .......B*$C...?.
0001C0: B3 40 D2 CA 3E 3E 0A C3 B3 42 11 2B 9C 21 5C 00 .@..>>...B.+.!\.
0001D0: 0E 10 CD 78 38 2A 26 43 EB CD 8A 3F CD 81 3F 0E ...x8*&C...?..?.
0001E0: 11 CD 7A 3F 3C CA ED 3E 3E 10 C3 B3 42 11 3B 9C ..z?<..>>...B.;.
0001F0: 21 5C 00 0E 10 CD 78 38 11 2B 9C 0E 17 CD 05 00 !\....x8.+......
Size : 512 (Real : 512)
000000: D5 11 A3 6E 06 06 CD 9D 34 D1 C1 C9 C5 21 9D 6E ...n....4....!.n
000010: 7E E6 7F D6 40 DA 6E 35 FE 09 D2 37 35 D6 09 2F ~...@.n5...75../
000020: 3C 4F C5 2E 9E CD C8 34 0D C2 23 35 C1 AF 2E A2 <O.....4..#5....
000030: CD AE 34 0D C2 2D 35 C1 C9 C5 D5 11 00 00 21 9D ..4..-5.......!.
000040: 6E 7E E6 7F D6 40 FA 6A 35 4F 3A 9E 6E 0F 0F 0F n~...@.j5O:.n...
000050: 0F E6 0F 62 6B 29 29 19 29 EB 83 5F D2 60 35 14 ...bk)).).._.`5.
000060: 21 A2 6E CD AE 34 0D F2 4A 35 EB D1 C1 C9 06 06 !.n..4..J5......
000070: 21 9D 6E CD A6 34 C1 C9 C5 E5 0E 00 CD 8E 3A FE !.n..4........:.
000080: 0D CA CF 35 FE 18 CA B8 35 FE 15 CA B8 35 FE 7F ...5....5....5..
000090: CA C1 35 FE 08 CA C1 35 FE 1B CA C7 35 FE 12 CA ..5....5....5...
0000A0: D9 35 FE 19 CA AF 35 FE 20 DA 7C 35 CD E8 35 0C .5....5. .|5..5.
0000B0: 77 23 CA CC 35 C3 7C 35 CD DD 35 C2 B8 35 C3 7C w#..5.|5..5..5.|
0000C0: 35 CD DD 35 C3 7C 35 E1 77 B7 C1 C9 0D 3E 0D CD 5..5.|5.w....>..
0000D0: E8 35 36 00 E1 79 B7 C1 C9 E1 C1 B7 C9 79 B7 C8 .56..y.......y..
0000E0: 3E 7F CD E8 35 2B 0D C9 F5 C5 32 53 3A CD 0F 36 >...5+....2S:..6
0000F0: 3A 53 3A CD AA 3A 3A 56 44 B7 CA 0C 36 D5 11 53 :S:..::VD...6..S
000100: 3A 01 01 00 CD 0D 3C 04 76 00 00 D1 C1 F1 C9 CD :.....<.v.......
000110: 3B 3A C8 3A 70 44 B7 C8 C3 7E 44 C5 3E 0D CD E8 ;:.:pD...~D.>...
000120: 35 3E 0A CD E8 35 C1 C9 CD 1B 36 7E B7 C8 CD E8 5>...5....6~....
000130: 35 23 C3 2B 36 C5 D5 C3 4A 36 C5 D5 26 00 6F C3 5#.+6...J6..&.o.
000140: 5C 36 C5 D5 26 00 6F C3 56 36 01 10 27 CD 6B 36 \6..&.o.V6..'.k6
000150: 01 E8 03 CD 6B 36 01 64 00 CD 6B 36 01 0A 00 CD ....k6.d..k6....
000160: 6B 36 01 01 00 CD 6B 36 D1 C1 C9 CD C7 36 CD E8 k6....k6.....6..
000170: 35 C9 CD 7E 36 CD 7E 36 CD 7E 36 CD 7E 36 3E 20 5..~6.~6.~6.~6>
000180: CD E8 35 C9 FE 41 D8 FE 5B 3F D0 FE 61 D8 FE 7B ..5..A..[?..a..{
000190: 3F C9 CD 73 39 C8 FE 2C 37 C0 CD 69 39 C9 47 FE ?..s9..,7..i9.G.
0001A0: 27 C8 FE 22 C8 FE 5B C0 06 5D C9 FE 30 D8 FE 3A '.."..[..]..0..:
0001B0: 3F C9 E1 87 CD BB 36 CD DF 36 E9 85 6F D0 24 C9 ?.....6..6..o.$.
0001C0: 7A BC D8 C0 7B BD C9 D5 16 2F 14 7D 91 6F 7C 98 z...{..../.}.o|.
0001D0: 67 D2 CA 36 09 7A D1 C9 7D 93 6F 7C 9A 67 C9 7E g..6.z..}.o|.g.~
0001E0: 23 66 6F C9 73 23 72 23 C9 5E 23 56 23 C9 71 23 #fo.s#r#.^#V#.q#
0001F0: 70 23 C9 4E 23 46 23 C9 3E 00 C5 D5 57 78 B1 CA p#.N#F#.>...Wx..
Size : 512 (Real : 512)
000000: 3C C2 9A 42 3E 08 C3 B3 42 AF 32 7C 43 3A 7C 43 <..B>...B.2|C:|C
000010: B7 C0 2A 84 43 7C B5 C8 CD A6 41 EB 2A 84 43 CD ..*.C|....A.*.C.
000020: C0 36 D2 26 3F EB 44 4D C5 2A 8E 43 CD 18 40 C1 .6.&?.DM.*.C..@.
000030: C5 2A 8C 43 EB 2A 76 43 19 EB 2A 26 43 EB 3A 88 .*.C.*vC..*&C.:.
000040: 43 0F D2 59 3F CD BD 42 EB 22 26 43 2A 76 43 EB C..Y?..B."&C*vC.
000050: CD D8 36 22 8C 43 C3 6D 3F EB CD BD 42 22 26 43 ..6".C.m?...B"&C
000060: 2A 76 43 EB CD D8 36 22 8C 43 CD E5 41 D1 2A 84 *vC...6".C..A.*.
000070: 43 CD D8 36 22 84 43 C3 0D 3F 11 5C 00 CD 05 00 C..6".C..?.\....
000080: C9 11 80 00 0E 1A CD 05 00 C9 C5 D5 D5 21 5C 00 .............!\.
000090: 36 00 23 01 0B 00 3E 20 CD FA 36 01 18 00 CD F8 6.#...> ..6.....
0000A0: 36 3A 5A 44 32 5C 00 21 5D 00 D1 1A 77 13 23 1A 6:ZD2\.!]...w.#.
0000B0: FE 3A C2 BE 3F 2B 7E D6 40 32 5C 00 13 1A FE 2E .:..?+~.@2\.....
0000C0: CA CE 3F B7 CA DC 3F 77 23 13 1A C3 BE 3F 21 65 ..?...?w#....?!e
0000D0: 00 13 1A B7 CA DC 3F 77 23 C3 D1 3F D1 C1 C9 3A ......?w#..?...:
0000E0: 90 43 E6 40 C2 EC 3F 3A 5F 01 B7 C8 C5 CD 81 3F .C.@..?:_......?
0000F0: C1 2A 91 43 EB 3A 5F 01 B7 CA FC 3F 0E 10 CD 05 .*.C.:_....?....
000100: 00 3A 90 43 EE 40 32 90 43 C9 29 29 EB 2A 91 43 .:.C.@2.C.)).*.C
000110: 01 21 00 09 CD E4 36 C9 01 07 00 EB 21 13 44 22 .!....6.....!.D"
000120: 7A 43 7E B7 CA 33 40 FE FF CA 51 40 3A 7D 43 BE zC~..3@...Q@:}C.
000130: CA 37 40 09 C3 1F 40 E5 23 CD DF 36 CD C0 36 E1 .7@...@.#..6..6.
000140: C2 33 40 23 23 23 CD E9 36 EB 22 76 43 EB 36 01 .3@###..6."vC.6.
000150: C9 2A 86 43 09 22 86 43 7E FE FF C2 64 40 21 13 .*.C.".C~...d@!.
000160: 44 22 86 43 23 23 23 23 23 7E B7 CA 72 40 35 C3 D".C#####~..r@5.
000170: 51 40 23 7E B7 CA 87 40 CD 8A 42 2A 86 43 CD C4 Q@#~...@..B*.C..
000180: 41 3A 7D 43 CD 27 41 2A 86 43 23 23 23 CD DF 36 A:}C.'A*.C###..6
000190: 22 76 43 2A 8E 43 CD F1 41 2A 8E 43 EB 2A 86 43 "vC*.C..A*.C.*.C
0001A0: 22 7A 43 3A 7D 43 77 23 CD E4 36 23 23 36 01 23 "zC:}Cw#..6##6.#
0001B0: 36 00 C9 0E 00 21 93 43 22 91 43 7E B7 CA D3 40 6....!.C".C~...@
0001C0: CD E2 40 C2 D3 40 2A 91 43 7E FE 01 CA D1 40 37 ..@..@*.C~....@7
0001D0: C9 36 00 0C 79 FE 10 D0 2A 91 43 11 08 00 19 C3 .6..y...*.C.....
0001E0: B8 40 11 06 00 19 5E 23 56 21 5C 00 06 0C 1A BE .@....^#V!\.....
0001F0: C0 13 23 05 C2 EE 40 C9 3A 7D 43 47 21 13 44 7E ..#...@.:}CG!.D~
Size : 512 (Real : 512)
000000: 08 37 72 23 0B C3 FD 36 D1 C1 C9 3E 20 BE C0 23 .7r#...6...> ..#
000010: C3 0D 37 C5 BE CA 1E 37 23 0D C2 14 37 0D C1 C9 ..7....7#...7...
000020: C5 D5 47 0E 00 7E B8 CA 35 37 B7 CA 3A 37 12 23 ..G..~..57..:7.#
000030: 13 0C C2 25 37 79 B7 D1 C1 C9 D1 C1 C9 C5 1A BE ...%7y..........
000040: C2 49 37 13 23 0D C2 3E 37 C1 C9 C5 7E CD 84 36 .I7.#..>7...~..6
000050: DA 55 37 E6 5F 47 1A CD 84 36 DA 5F 37 E6 5F B8 .U7._G...6._7._.
000060: C2 69 37 13 23 0D C2 4C 37 C1 C9 C5 D5 78 B9 CA .i7.#..L7....x..
000070: 88 37 DA 7E 37 78 32 57 3A 06 01 C3 8A 37 79 32 .7.~7x2W:....7y2
000080: 57 3A 48 06 FF C3 8A 37 06 00 CD 3D 37 C2 AE 37 W:H....7...=7..7
000090: 78 B7 CA AE 37 FA 99 37 EB 3A 57 3A 91 4F 7E FE x...7..7.:W:.O~.
0000A0: 20 C2 AC 37 23 0D C2 9E 37 C3 AE 37 78 07 D1 C1 ..7#...7..7x...
0000B0: C9 C5 1A 4F 7E FE 61 DA BC 37 E6 5F B9 C2 FD 37 ...O~.a..7._...7
0000C0: D5 E5 06 00 1A B7 FA F9 37 CA E5 37 4F 7E FE 41 ........7..7O~.A
0000D0: DA D5 37 E6 5F B9 C2 DF 37 13 04 23 C3 C4 37 78 ..7._...7..#..7x
0000E0: FE 04 DA FB 37 7E FE 30 DA F9 37 FE 3B DA FB 37 ....7~.0..7.;..7
0000F0: FE 41 DA F9 37 B7 C3 FB 37 AF E3 E1 D1 C1 C9 C5 .A..7...7.......
000100: 44 4D 21 00 00 0A FE 20 C2 0F 38 03 C3 05 38 0A DM!.... ..8...8.
000110: 03 FE 30 DA 3B 38 FE 3A D2 3B 38 D6 30 11 99 19 ..0.;8.:.;8.0...
000120: F5 CD C0 36 D1 DA 38 38 7A 54 5D 29 29 19 29 85 ...6..88zT])).).
000130: 6F D2 0F 38 24 C2 0F 38 37 C1 C9 EB 0B 60 69 C1 o..8$..87....`i.
000140: B7 C9 CD 8E 3A E6 5F FE 1B CA 63 38 CD E8 35 F5 ....:._...c8..5.
000150: 3E 0D CD E8 35 F1 FE 4E C8 FE 0D C8 FE 59 C2 66 >...5..N.....Y.f
000160: 38 B7 C9 B7 37 C9 CD 1B 36 3E 3F CD E8 35 C3 42 8...7...6>?..5.B
000170: 38 C5 48 06 00 C3 7F 38 C5 06 00 C3 7F 38 C5 D5 8.H....8.....8..
000180: 79 B0 CA 8D 38 7E 12 23 13 0B C3 80 38 D1 C1 C9 y...8~.#....8...
000190: C5 D5 78 B1 CA 9F 38 7E 12 2B 1B 0B C3 92 38 D1 ..x...8~.+....8.
0001A0: C1 C9 C5 D5 CD 04 39 C2 00 39 E5 EB AF CD 2E 39 ......9..9.....9
0001B0: CA 00 39 57 60 69 AF CD 2E 39 92 CA EF 38 DA DB ..9W`i...9...8..
0001C0: 38 E1 E5 C5 47 AF CD 2E 39 CA EF 38 4F 54 5D 78 8...G...9..8OT]x
0001D0: CD BB 36 EB CD 3E 39 C1 C3 EF 38 E1 E5 2F 3C 54 ..6..>9...8../<T
0001E0: 5D CD BB 36 7E 12 B7 CA EF 38 23 13 C3 E4 38 60 ]..6~....8#...8`
0001F0: 69 AF CD 2E 39 E1 50 59 EB 4F CD 78 38 D1 C1 C9 i...9.PY.O.x8...
Size : 512 (Real : 512)
000000: FE FF C8 B8 C2 1D 41 E5 23 23 23 23 23 23 7E B7 ......A.######~.
000010: CA 1A 41 E1 E5 C5 CD C4 41 C1 E1 36 00 11 07 00 ..A.....A..6....
000020: 19 C3 FF 40 3A 7D 43 C5 D5 B7 FA 56 41 FE 11 D2 ...@:}C....VA...
000030: 56 41 3D 21 93 43 B7 CA 42 41 11 08 00 19 3D C2 VA=!.C..BA....=.
000040: 3D 41 7E B7 CA 56 41 23 22 8A 43 0E 07 11 8C 43 =A~..VA#".C....C
000050: CD 78 38 D1 C1 C9 3E 09 C3 B3 42 C5 D5 06 10 21 .x8...>...B....!
000060: 93 43 7E B7 CA 87 41 11 08 00 19 05 C2 62 41 06 .C~...A......bA.
000070: 10 21 93 43 7E FE 01 CA 87 41 11 08 00 19 05 C2 .!.C~....A......
000080: 74 41 3E 0D C3 B3 42 23 22 8A 43 0E 07 11 8C 43 tA>...B#".C....C
000090: CD 78 38 21 00 00 22 8C 43 22 8E 43 AF 32 90 43 .x8!..".C".C.2.C
0000A0: 3E 10 90 D1 C1 C9 2A 8C 43 EB 21 00 02 CD D8 36 >.....*.C.!....6
0000B0: 7C B5 C0 2A 8E 43 23 22 8E 43 21 00 00 22 8C 43 |..*.C#".C!..".C
0000C0: 21 00 02 C9 E5 7E CD 27 41 E1 23 CD E9 36 E5 CD !....~.'A.#..6..
0000D0: DF 36 22 76 43 EB CD 39 42 E1 23 23 36 00 23 36 .6"vC..9B.##6.#6
0000E0: 00 CD 8A 42 C9 2A 7A 43 23 23 23 23 23 23 36 01 ...B.*zC######6.
0000F0: C9 CD 0A 40 2A 76 43 06 04 E5 C5 EB 0E 1A CD 05 ...@*vC.........
000100: 00 2A 91 43 EB 0E 21 CD 05 00 C1 E1 B7 C2 2B 42 .*.C..!.......+B
000110: 11 80 00 19 E5 2A 91 43 11 21 00 19 CD E9 36 2B .....*.C.!....6+
000120: 2B 13 CD E4 36 E1 05 C2 F9 41 C9 3A 88 43 0F D0 +...6....A.:.C..
000130: 78 FE 04 C0 3E 0B C3 B3 42 CD 0A 40 2A 76 43 06 x...>...B..@*vC.
000140: 04 C5 E5 EB 0E 1A CD 05 00 2A 91 43 EB 0E 22 CD .........*.C..".
000150: 05 00 E1 C1 FE 05 CA 85 42 B7 C2 80 42 E5 2A 91 ........B...B.*.
000160: 43 11 21 00 19 CD E9 36 2B 2B 13 CD E4 36 E1 11 C.!....6++...6..
000170: 80 00 19 05 C2 41 42 3A 90 43 F6 40 32 90 43 C9 .....AB:.C.@2.C.
000180: 3E 0E C3 B3 42 3E 0F C3 B3 42 2A 8A 43 EB 0E 05 >...B>...B*.C...
000190: 21 8C 43 CD 78 38 C9 CD 8A 42 2A 2A 43 F9 E1 23 !.C.x8...B**C..#
0001A0: 23 23 E5 2A 24 43 44 4D 2A 26 43 EB 2A 28 43 3A ##.*$CDM*&C.*(C:
0001B0: 23 43 C9 32 23 43 2A 2A 43 F9 C3 A3 42 3A 88 43 #C.2#C**C...B:.C
0001C0: FE 80 CA 0C 43 FE FF CA D5 42 78 B1 C8 7E 12 13 ....C....Bx..~..
0001D0: 23 0B C3 CA 42 7E FE 0A C2 E1 42 23 0B 78 B1 C8 #...B~....B#.x..
0001E0: 7E FE 1A C2 EB 42 3E 0B C3 B3 42 78 B1 C8 7E FE ~....B>...Bx..~.
0001F0: 0A CA 00 43 FE 0D CA 05 43 FE 1A CA 06 43 12 13 ...C....C....C..
Size : 512 (Real : 512)
000000: 37 D1 C1 C9 C5 D5 E5 7E B7 CA 29 39 1A BE C2 1C 7......~..)9....
000010: 39 23 13 1A B7 C2 07 39 E1 C3 2B 39 E1 23 7E B7 9#.....9..+9.#~.
000020: CA 2A 39 D1 D5 E5 C3 07 39 E1 3D D1 C1 C9 C5 0E .*9.....9.=.....
000030: 00 BE CA 3A 39 23 0C C2 31 39 79 B7 C1 C9 C5 D5 ...:9#..19y.....
000040: 7E 12 2B 1B 0D C2 40 39 D1 C1 C9 C5 CD 84 36 DA ~.+...@9......6.
000050: 54 39 E6 5F 4F 7E B9 CA 61 39 23 7E B7 C2 56 39 T9._O~..a9#~..V9
000060: 3D C1 C9 2A 54 3A 7E B7 C9 2A 54 3A 23 22 54 3A =..*T:~..*T:#"T:
000070: 7E B7 C9 2A 54 3A 7E FE 20 C2 80 39 23 C3 76 39 ~..*T:~. ..9#.v9
000080: FE 09 C2 89 39 23 C3 76 39 22 54 3A B7 C9 22 54 ....9#.v9"T:.."T
000090: 3A C9 21 56 82 22 54 3A C9 C5 0E 00 CD 92 39 2A :.!V."T:......9*
0000A0: 54 3A CD 78 35 F5 81 4F F1 2A 54 3A 3D CD BB 36 T:.x5..O.*T:=..6
0000B0: 7E FE 3B C2 C3 39 36 20 23 22 54 3A CD 1B 36 0D ~.;..96 #"T:..6.
0000C0: C3 9F 39 CD 92 39 79 C1 B7 C9 C5 D5 32 56 3A CD ..9..9y.....2V:.
0000D0: 92 39 EB 01 00 01 3A 56 3A CD 0D 3C 08 C3 FE 39 .9....:V:..<...9
0000E0: AF 12 21 56 83 CD D8 36 44 4D 1B 03 1A FE 3B CA ..!V...6DM....;.
0000F0: D6 39 CD 63 39 FE 1A CA 03 3A B7 C3 08 3A FE 0B .9.c9....:...:..
000100: C2 35 3A AF 32 56 82 37 D1 C1 C9 21 56 82 CD 28 .5:.2V.7...!V..(
000110: 36 C9 C5 D5 F5 AF 21 56 82 01 00 01 CD 13 37 36 6.....!V......76
000120: 0D 23 36 0A 01 00 01 11 56 82 F1 CD 0D 3C 09 C3 .#6.....V....<..
000130: 35 3A D1 C1 C9 CD 70 3B C3 7E 44 CD 5D 3B C8 CD 5:....p;.~D.];..
000140: 8E 3A FE 13 CA 4E 3A FE 1B C2 3B 3A B7 C9 CD 8E .:...N:...;:....
000150: 3A AF C9 00 56 82 00 00 0E 19 CD 05 00 3C 32 5A :...V........<2Z
000160: 44 C9 3A 78 43 B7 CA 70 3A F5 AF 32 78 43 F1 C9 D.:xC..p:..2xC..
000170: CD 7C 3A C3 62 3A 59 0E 06 C3 05 00 3A 78 43 B7 .|:.b:Y.....:xC.
000180: C0 1E FF 0E 06 CD 05 00 B7 C8 32 78 43 C9 C5 D5 ..........2xC...
000190: E5 CD 62 3A E6 7F FE 10 C2 A6 3A 3A 83 43 EE FF ..b:......::.C..
0001A0: 32 83 43 C3 91 3A E1 D1 C1 C9 C5 D5 E5 FE 09 C2 2.C..:..........
0001B0: BF 3A 3E 20 CD C6 3A 3A 2C 43 E6 07 C2 B2 3A CD .:> ..::,C....:.
0001C0: C6 3A E1 D1 C1 C9 F5 47 3A 7E 43 B7 CA E2 3A 78 .:.....G:~C...:x
0001D0: FE 7F C2 DE 3A CD 70 01 F1 3E 5F C3 F9 3A 4F CD ....:.p..>_..:O.
0001E0: 76 3A F1 FE 20 DA EF 3A 21 2C 43 34 C3 F9 3A FE v:.. ..:!,C4..:.
0001F0: 0D C2 F9 3A 21 2C 43 36 00 4F 3A 83 43 B7 C8 79 ...:!,C6.O:.C..y
Size : 512 (Real : 512)
000000: 23 0B C3 EB 42 23 3E FF 32 7C 43 C9 78 B1 C8 7E #...B#>.2|C.x..~
000010: 12 13 0B 23 FE 0A CA 1C 43 C3 0C 43 3E FF 32 7C ...#....C..C>.2|
000020: 43 C9 00 00 00 00 00 00 00 00 00 00 00 00 00 00 C...............
000030: 00 00 44 42 41 53 45 4F 56 52 43 4F 4D 00 00 00 ..DBASEOVRCOM...
000040: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000050: 00 00 00 44 42 41 53 45 4F 56 52 43 4F 4D 00 00 ...DBASEOVRCOM..
000060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000070: 00 00 00 00 00 00 00 00 00 1A 00 00 00 00 FF 00 ................
000080: 00 00 00 00 00 00 13 44 00 00 00 00 00 00 00 00 .......D........
000090: 00 00 00 00 00 00 00 00 00 60 93 00 00 00 00 00 .........`......
0000A0: 00 84 93 00 00 00 00 00 00 A8 93 00 00 00 00 00 ................
0000B0: 00 CC 93 00 00 00 00 00 00 F0 93 00 00 00 00 00 ................
0000C0: 00 14 94 00 00 00 00 00 00 38 94 00 00 00 00 00 .........8......
0000D0: 00 5C 94 00 00 00 00 00 00 80 94 00 00 00 00 00 .\..............
0000E0: 00 A4 94 00 00 00 00 00 00 C8 94 00 00 00 00 00 ................
0000F0: 00 EC 94 00 00 00 00 00 00 10 95 00 00 00 00 00 ................
000100: 00 34 95 00 00 00 00 00 00 58 95 00 00 00 00 00 .4.......X......
000110: 00 7C 95 00 00 00 60 83 00 00 00 00 00 60 85 00 .|....`......`..
000120: 00 00 00 00 60 87 00 00 00 00 00 60 89 00 00 00 ....`......`....
000130: 00 00 60 8B 00 00 00 00 00 60 8D 00 00 00 00 00 ..`......`......
000140: 60 8F 00 00 00 00 00 60 91 00 00 FF 00 00 00 00 `......`........
000150: 00 FF F8 A3 00 00 00 FF 00 00 00 00 00 00 00 00 ................
000160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000170: FF 00 00 00 00 FF 00 00 00 00 FF 00 00 FF 21 5D ..............!]
000180: 44 7E B7 CA 9B 44 3D 35 21 5E 44 CD BB 36 7E CD D~...D=5!^D..6~.
000190: 40 27 CD 45 25 CD 4D 2F C3 7E 44 21 73 44 7E CD @'.E%.M/.~D!sD~.
0001A0: 40 27 36 00 CD 45 25 21 4D 44 7E CD 40 27 36 00 @'6..E%!MD~.@'6.
0001B0: CD 45 25 AF 32 5C 44 AF 32 74 44 32 55 44 CD 61 .E%.2\D.2tD2UD.a
0001C0: 27 3E 01 21 00 45 C3 C7 3B 00 00 00 00 00 00 00 '>.!.E..;.......
0001D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
Size : 512 (Real : 512)
000000: F5 59 0E 05 CD 05 00 F1 FE 20 DA 12 3B 21 2E 43 .Y....... ..;!.C
000010: 34 C9 FE 0A C0 21 2E 43 36 00 21 2F 43 34 3A 61 4....!.C6.!/C4:a
000020: 01 B7 C8 1E 20 0E 05 F5 CD 05 00 F1 3D C3 21 3B .... .......=.!;
000030: 3A 83 43 B7 CA 45 3B 1E 0D 0E 05 CD 05 00 1E 0C :.C..E;.........
000040: 0E 05 CD 05 00 AF 32 2F 43 32 2E 43 C9 3A 2F 43 ......2/C2.C.:/C
000050: C9 3A 2E 43 C9 32 7E 43 C9 3A 7E 43 C9 C5 D5 E5 .:.C.2~C.:~C....
000060: CD 7C 3A B7 E1 D1 C1 C9 3A 83 43 C9 32 83 43 C9 .|:.....:.C.2.C.
000070: C5 D5 32 30 43 CD 81 3F 3A 30 43 B7 1F 32 51 43 ..20C..?:0C..2QC
000080: 11 31 43 0E 14 CD 05 00 21 80 00 3A 30 43 1F D2 .1C.....!..:0C..
000090: 95 3B 21 C0 00 CD 2B 36 D1 C1 C9 CD 81 3F 11 31 .;!...+6.....?.1
0000A0: 43 0E 0F CD 05 00 FE FF C8 11 31 43 0E 14 CD 05 C.........1C....
0000B0: 00 11 A0 95 21 80 00 0E 1C CD 78 38 11 52 43 0E ....!.....x8.RC.
0000C0: 0F CD 05 00 FE FF C9 22 7F 43 87 21 A0 95 CD BB .......".C.!....
0000D0: 36 5E 16 00 23 4E EB 79 87 4F 29 22 73 43 21 00 6^..#N.y.O)"sC!.
0000E0: 45 22 81 43 EB C5 0E 1A CD 05 00 11 52 43 0E 21 E".C........RC.!
0000F0: CD 05 00 C1 0D CA 09 3C 2A 73 43 23 22 73 43 2A .......<*sC#"sC*
000100: 81 43 11 80 00 19 C3 E1 3B 2A 7F 43 E9 32 7D 43 .C......;*.C.2}C
000110: 22 28 43 EB 22 26 43 EB 60 69 22 24 43 21 00 00 "(C."&C.`i"$C!..
000120: 39 22 2A 43 E1 7E 23 E5 CD B2 36 47 3C 47 3C FC 9"*C.~#...6G<G<.
000130: 3C 24 3D 38 3D 74 3D 96 3D BE 3D 4B 3D 5F 3D E2 <$=8=t=.=.=K=_=.
000140: 3D FF 3D 35 3E B8 3E CD 8A 3F 0E 00 21 93 43 22 =.=5>.>..?..!.C"
000150: 91 43 7E FE 01 C2 5E 3C CD E2 40 CA DE 3C FE FF .C~...^<..@..<..
000160: C2 76 3C 3A 7D 43 E6 40 CA 76 3C CD E2 40 C2 76 .v<:}C.@.v<..@.v
000170: 3C 3E 0A C3 B3 42 0C 79 FE 10 D2 87 3C 2A 91 43 <>...B.y....<*.C
000180: 11 08 00 19 C3 4F 3C CD 81 3F CD 5B 41 3C 32 23 .....O<..?.[A<2#
000190: 43 2A 91 43 EB 21 5C 00 0E 24 CD 78 38 0E 0F 2A C*.C.!\..$.x8..*
0001A0: 91 43 EB CD 05 00 FE FF C2 CA 3C 3A 7D 43 B7 F2 .C........<:}C..
0001B0: C5 3C 0E 16 2A 91 43 EB CD 05 00 FE FF C2 CA 3C .<..*.C........<
0001C0: 3E 0E C3 B3 42 3E 08 C3 B3 42 2A 91 43 11 0E 00 >...B>...B*.C...
0001D0: 19 7E E6 7F 77 2A 8A 43 2B 36 FF C3 97 42 79 3C .~..w*.C+6...By<
0001E0: 32 23 43 21 00 00 22 8C 43 22 8E 43 AF 32 90 43 2#C!..".C".C.2.C
0001F0: 2A 91 43 36 FF 23 22 8A 43 C3 97 42 CD 8A 3F CD *.C6.#".C..B..?.
Size : 512 (Real : 512)
000000: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000010: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000020: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000030: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000040: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000050: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000080: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000090: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000100: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000110: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000120: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000140: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000150: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001C0: 00 00 00 00 00 00 00 00 00 31 BC 96 CD 58 3A 2A .........1...X:*
0001D0: 06 00 11 F8 A3 CD C0 36 CA C4 47 DA C4 47 21 E7 .......6..G..G!.
0001E0: 46 CD 28 36 C3 00 00 49 4E 53 55 46 46 49 43 49 F.(6...INSUFFICI
0001F0: 45 4E 54 20 4D 45 4D 4F 52 59 20 49 4E 20 53 59 ENT MEMORY IN SY
Size : 512 (Real : 512)
000000: 0D 0A 2A 2A 2A 20 43 45 20 46 49 43 48 49 45 52 ..*** CE FICHIER
000010: 20 4E 27 45 58 49 53 54 45 20 50 41 53 20 2A 2A N'EXISTE PAS **
000020: 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 *...............
000030: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000040: 0D 0A 2A 2A 2A 20 45 52 52 45 55 52 20 49 4E 54 ..*** ERREUR INT
000050: 45 52 4E 45 20 20 43 4F 4E 54 41 43 54 45 5A 20 ERNE CONTACTEZ
000060: 56 4F 54 52 45 20 46 4F 55 52 4E 49 53 53 45 55 VOTRE FOURNISSEU
000070: 52 20 2A 2A 2A 00 00 00 00 00 00 00 00 00 00 00 R ***...........
000080: 0D 0A 2A 2A 2A 20 46 49 43 48 49 45 52 20 45 4E ..*** FICHIER EN
000090: 20 43 4F 55 52 53 20 44 27 55 54 49 4C 49 53 41 COURS D'UTILISA
0000A0: 54 49 4F 4E 20 2A 2A 2A 00 00 00 00 00 00 00 00 TION ***........
0000B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000C0: 0D 0A 2A 2A 2A 20 46 49 4E 20 44 45 20 46 49 43 ..*** FIN DE FIC
0000D0: 48 49 45 52 20 49 4E 41 54 54 45 4E 44 55 45 20 HIER INATTENDUE
0000E0: 2A 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 ***.............
0000F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000100: 0D 0A 2A 2A 2A 20 45 4E 52 45 47 49 53 54 52 45 ..*** ENREGISTRE
000110: 4D 45 4E 54 20 4E 4F 4E 20 53 49 54 55 45 20 2A MENT NON SITUE *
000120: 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 **..............
000130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000140: 0D 0A 2A 2A 2A 20 54 52 4F 50 20 44 45 20 46 49 ..*** TROP DE FI
000150: 43 48 49 45 52 53 20 53 4F 4E 54 20 4F 55 56 45 CHIERS SONT OUVE
000160: 52 54 53 20 2A 2A 2A 00 00 00 00 00 00 00 00 00 RTS ***.........
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 0D 0A 2A 2A 2A 20 44 45 50 41 53 53 45 4D 45 4E ..*** DEPASSEMEN
000190: 54 20 44 45 20 4C 41 20 43 41 50 41 43 49 54 45 T DE LA CAPACITE
0001A0: 20 44 55 20 44 49 53 51 55 45 20 2A 2A 2A 00 00 DU DISQUE ***..
0001B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001C0: 0D 0A 2A 2A 2A 20 44 45 50 41 53 53 45 4D 45 4E ..*** DEPASSEMEN
0001D0: 54 20 44 55 20 4E 4F 4D 42 52 45 20 4D 41 58 49 T DU NOMBRE MAXI
0001E0: 4D 55 4D 20 44 45 20 46 49 43 48 49 45 52 53 20 MUM DE FICHIERS
0001F0: 53 55 52 20 44 49 53 51 55 45 20 2A 2A 2A 00 00 SUR DISQUE ***..
Size : 512 (Real : 512)
000000: 53 54 45 4D 2C 20 64 42 41 53 45 20 52 45 51 55 STEM, dBASE REQU
000010: 49 52 45 53 0A 0D 41 54 20 4C 45 41 53 54 20 34 IRES..AT LEAST 4
000020: 31 39 38 34 20 42 59 54 45 53 20 28 30 41 34 30 1984 BYTES (0A40
000030: 30 20 48 45 58 29 20 4F 46 20 4D 45 4D 4F 52 59 0 HEX) OF MEMORY
000040: 20 49 4E 0A 0D 49 4E 20 41 44 44 49 54 49 4F 4E IN..IN ADDITION
000050: 20 54 4F 20 54 48 45 20 53 49 5A 45 20 4F 46 20 TO THE SIZE OF
000060: 54 48 45 20 4F 50 45 52 41 54 49 4E 47 20 53 59 THE OPERATING SY
000070: 53 54 45 4D 0A 0D 64 42 41 53 45 20 57 49 4C 4C STEM..dBASE WILL
000080: 20 4F 50 45 52 41 54 45 20 4F 4E 20 4D 4F 53 54 OPERATE ON MOST
000090: 20 34 38 4B 20 43 50 2F 4D 20 28 74 6D 29 20 53 48K CP/M (tm) S
0000A0: 59 53 54 45 4D 53 0A 0D 54 48 41 54 20 48 41 56 YSTEMS..THAT HAV
0000B0: 45 20 41 20 53 54 41 4E 44 41 52 44 20 42 49 4F E A STANDARD BIO
0000C0: 53 0A 0D 00 00 00 00 00 00 00 00 00 00 00 00 00 S...............
0000D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000E0: 00 00 00 00 CD 20 29 AF 32 41 97 3A 80 00 B7 CA ..... ).2A.:....
0000F0: 2E 48 21 81 00 CD 8E 39 CD BB 36 36 00 3E 01 CD .H!....9..66.>..
000100: AD 27 CD F0 2B DA 2E 48 3A 5D 44 21 5E 44 CD BB .'..+..H:]D!^D..
000110: 36 CD 3C 27 77 32 5C 44 21 5D 44 34 CD 36 2F CD 6.<'w2\D!]D4.6/.
000120: 9B 3B C2 4E 49 21 3D 48 CD 28 36 C3 00 00 CD 9B .;.NI!=H.(6.....
000130: 3B C2 6A 48 21 3D 48 CD 28 36 C3 00 00 4F 56 45 ;.jH!=H.(6...OVE
000140: 52 4C 41 59 20 46 49 4C 45 20 28 44 42 41 53 45 RLAY FILE (DBASE
000150: 4F 56 52 2E 43 4F 4D 29 20 43 41 4E 4E 4F 54 20 OVR.COM) CANNOT
000160: 42 45 20 4F 50 45 4E 45 44 00 AF 32 4E 44 32 4F BE OPENED..2ND2O
000170: 44 32 50 44 3E 76 CD 70 3B 3A 60 01 B7 CA 89 48 D2PD>v.p;:`....H
000180: 21 86 4A CD 28 36 C3 8F 48 21 94 4A CD 28 36 CD !.J.(6..H!.J.(6.
000190: 99 39 CD 73 39 CA 4E 49 CD FF 37 7B 32 4E 44 32 .9.s9.NI..7{2ND2
0001A0: 84 4A CD 8E 39 CD 69 39 CD FF 37 7B 32 4F 44 32 .J..9.i9..7{2OD2
0001B0: 83 4A CD 8E 39 CD 69 39 FE 19 C2 C2 48 3E FF C3 .J..9.i9....H>..
0001C0: C6 48 CD FF 37 7B 32 50 44 32 85 4A 3A 60 01 B7 .H..7{2PD2.J:`..
0001D0: CA E1 48 3A 83 4A 47 3A 84 4A 32 83 4A 78 32 84 ..H:.JG:.J2.Jx2.
0001E0: 4A 3A 84 4A B7 CA 6A 48 FA 6A 48 FE 0D D2 6A 48 J:.J..jH.jH...jH
0001F0: 3A 83 4A B7 CA AF 49 3A 84 4A FE 04 CA 1E 49 FE :.J...I:.J....I.
Size : 512 (Real : 512)
000000: 0D 0A 2A 2A 2A 20 43 45 20 46 49 43 48 49 45 52 ..*** CE FICHIER
000010: 20 45 58 49 53 54 45 20 44 45 4A 41 20 2A 2A 2A EXISTE DEJA ***
000020: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000030: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000040: 0D 0A 2A 2A 2A 20 45 4E 52 45 47 49 53 54 52 45 ..*** ENREGISTRE
000050: 4D 45 4E 54 20 4E 4F 4E 20 54 52 4F 55 56 45 20 MENT NON TROUVE
000060: 2A 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 ***.............
000070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000080: 0D 0A 2A 2A 2A 20 44 45 50 41 53 53 45 4D 45 4E ..*** DEPASSEMEN
000090: 54 20 44 55 20 4E 4F 4D 42 52 45 20 4D 41 58 49 T DU NOMBRE MAXI
0000A0: 4D 55 4D 20 44 45 20 56 41 52 49 41 42 4C 45 53 MUM DE VARIABLES
0000B0: 20 4D 45 4D 4F 49 52 45 20 2A 2A 2A 00 00 00 00 MEMOIRE ***....
0000C0: 0D 0A 2A 2A 2A 20 44 45 50 41 53 53 45 4D 45 4E ..*** DEPASSEMEN
0000D0: 54 20 44 45 20 4C 41 20 50 4C 41 43 45 20 41 4C T DE LA PLACE AL
0000E0: 4C 4F 55 45 45 20 41 55 58 20 56 41 52 49 41 42 LOUEE AUX VARIAB
0000F0: 4C 45 53 20 4D 45 4D 4F 49 52 45 20 2A 2A 2A 00 LES MEMOIRE ***.
000100: 0D 0A 2A 2A 2A 20 4E 4F 4D 20 44 45 20 56 41 52 ..*** NOM DE VAR
000110: 49 41 42 4C 45 20 49 4E 43 4F 52 52 45 43 54 45 IABLE INCORRECTE
000120: 20 2A 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 ***............
000130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000140: 0D 0A 2A 2A 2A 20 54 52 4F 50 20 44 45 20 43 41 ..*** TROP DE CA
000150: 52 41 43 54 45 52 45 53 20 2A 2A 2A 00 00 00 00 RACTERES ***....
000160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 0D 0A 2A 2A 2A 20 41 55 43 55 4E 45 20 42 41 53 ..*** AUCUNE BAS
000190: 45 20 4E 27 45 53 54 20 55 54 49 4C 49 53 45 45 E N'EST UTILISEE
0001A0: 2C 20 44 4F 4E 4E 45 5A 20 53 4F 4E 20 4E 4F 4D , DONNEZ SON NOM
0001B0: 20 3A 20 00 00 00 00 00 00 00 00 00 00 00 00 00 : .............
0001C0: 0D 0A 2A 2A 2A 20 43 45 20 4E 27 45 53 54 20 50 ..*** CE N'EST P
0001D0: 41 53 20 55 4E 45 20 42 41 53 45 20 44 45 20 44 AS UNE BASE DE D
0001E0: 4F 4E 4E 45 45 20 44 45 20 44 42 41 53 45 49 49 ONNEE DE DBASEII
0001F0: 20 2A 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 ***............
Size : 512 (Real : 512)
000000: 06 CA 1E 49 FE 09 CA 1E 49 FE 0B CA 1E 49 FE 02 ...I....I....I..
000010: CA 29 49 3A 83 4A FE 20 D2 AF 49 C3 31 49 3A 83 .)I:.J. ..I.1I:.
000020: 4A FE 1F D2 AF 49 C3 31 49 3A 83 4A FE 1E D2 AF J....I.1I:.J....
000030: 49 3A 85 4A FE FF CC 25 4A E6 03 CA 4E 49 3A 84 I:.J...%J...NI:.
000040: 4A FE 02 C2 4E 49 3A 83 4A FE 1D D2 AF 49 CD 1B J...NI:.J....I..
000050: 36 CD 1B 36 21 5A 49 C3 92 49 86 DE E0 F2 E4 D2 6..6!ZI..I......
000060: CE D0 E8 40 50 86 52 40 62 72 70 64 40 A4 A6 A0 ...@P.R@brpd@...
000070: 40 92 DC C6 5C 1A 14 1A 14 54 54 54 40 40 C8 84 @...\....TTT@@..
000080: 82 A6 8A 40 92 92 40 40 40 40 40 AC CA E4 40 64 ...@..@@@@@...@d
000090: 5C 00 7E B7 CA 9F 49 1F CD AA 3A 23 C3 92 49 21 \.~...I...:#..I!
0000A0: A2 4A CD 2B 36 3A 5C 44 B7 C2 B7 44 C3 B3 44 CD .J.+6:\D...D..D.
0000B0: 1B 36 21 BB 49 CD 28 36 C3 6A 48 54 68 69 72 74 .6!.I.(6.jHThirt
0000C0: 79 20 64 61 79 73 20 68 61 74 68 20 53 65 70 74 y days hath Sept
0000D0: 65 6D 62 65 72 0D 0A 41 70 72 69 6C 2C 20 4A 75 ember..April, Ju
0000E0: 6E 65 20 61 6E 64 20 4E 6F 76 65 6D 62 65 72 0D ne and November.
0000F0: 0A 41 6C 6C 20 74 68 65 20 72 65 73 74 20 68 61 .All the rest ha
000100: 76 65 20 74 68 69 72 74 79 20 6F 6E 65 0D 0A 45 ve thirty one..E
000110: 78 63 65 70 74 20 46 65 62 72 75 61 72 79 20 2E xcept February .
000120: 2E 2E 0D 0A 00 45 52 52 4F 52 00 21 01 01 11 36 .....ERROR.!...6
000130: 4A EB 21 5D 4A D5 45 52 52 4F 52 00 11 4B 4A D5 J.!]J.ERROR..KJ.
000140: 7E C6 40 FE 40 CA 4F 4A C2 AA 3A 23 C3 3C 4A D1 ~.@.@.OJ..:#.<J.
000150: E3 23 23 7E 23 66 6F CD 35 36 C3 00 00 CA 04 02 .##~#fo.56......
000160: 01 13 05 E0 E8 03 E9 E0 F1 F9 F8 F2 E0 12 13 10 ................
000170: E0 09 2E 23 EE E0 13 05 12 E0 E3 ED 00 45 52 52 ...#.........ERR
000180: 4F 52 00 00 00 00 20 28 4A 4A 2F 4D 4D 2F 41 41 OR.... (JJ/MM/AA
000190: 29 20 3A 00 20 28 4D 4D 2F 4A 4A 2F 41 41 29 20 ) :. (MM/JJ/AA)
0001A0: 3A 00 34 20 20 31 20 41 76 72 69 6C 2C 20 31 39 :.4 1 Avril, 19
0001B0: 38 33 0D 0A 0A 20 46 72 61 70 70 65 7A 20 27 48 83... Frappez 'H
0001C0: 45 4C 50 27 2C 20 27 48 45 4C 50 20 64 42 41 53 ELP', 'HELP dBAS
0001D0: 45 27 2C 20 6F 75 20 27 48 45 4C 50 20 3C 63 6F E', ou 'HELP <co
0001E0: 6D 6D 61 6E 64 65 3E 27 20 20 0D 0A 00 00 00 00 mmande>' ......
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
Size : 512 (Real : 512)
000000: 0D 0A 2A 2A 2A 20 44 45 50 41 53 53 45 4D 45 4E ..*** DEPASSEMEN
000010: 54 20 44 55 20 4E 4F 4D 42 52 45 20 4D 41 58 49 T DU NOMBRE MAXI
000020: 4D 55 4D 20 44 27 55 54 49 4C 49 53 41 54 45 55 MUM D'UTILISATEU
000030: 52 53 20 2A 2A 2A 00 00 00 00 00 00 00 00 00 00 RS ***..........
000040: 0D 0A 2A 2A 2A 20 45 52 52 45 55 52 20 53 59 53 ..*** ERREUR SYS
000050: 54 45 4D 45 20 44 27 45 4E 54 52 45 45 2F 53 4F TEME D'ENTREE/SO
000060: 52 54 49 45 20 2A 2A 2A 00 00 00 00 00 00 00 00 RTIE ***........
000070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000080: 20 45 4E 52 45 47 49 53 54 52 45 4D 45 4E 54 28 ENREGISTREMENT(
000090: 53 29 20 20 41 4A 4F 55 54 45 28 53 29 00 00 00 S) AJOUTE(S)...
0000A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20 ...............
0000C0: 0D 0A 2A 2A 2A 20 41 42 41 4E 44 4F 4E 20 44 55 ..*** ABANDON DU
0000D0: 20 54 52 41 49 54 45 4D 45 4E 54 20 45 4E 20 43 TRAITEMENT EN C
0000E0: 4F 55 52 53 20 2A 2A 2A 00 00 00 00 00 00 00 00 OURS ***........
0000F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000100: 0D 0A 2A 2A 2A 20 44 45 46 49 4E 49 54 49 4F 4E ..*** DEFINITION
000110: 20 49 4E 43 4F 52 52 45 43 54 45 20 44 55 20 4E INCORRECTE DU N
000120: 4F 4D 20 44 55 20 43 48 41 4D 50 20 2A 2A 2A 00 OM DU CHAMP ***.
000130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000140: 0D 0A 2A 2A 2A 20 44 45 46 49 4E 49 54 49 4F 4E ..*** DEFINITION
000150: 20 49 4E 43 4F 52 52 45 43 54 45 20 44 55 20 54 INCORRECTE DU T
000160: 59 50 45 20 44 45 20 43 48 41 4D 50 20 2A 2A 2A YPE DE CHAMP ***
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 0D 0A 2A 2A 2A 20 44 45 46 49 4E 49 54 49 4F 4E ..*** DEFINITION
000190: 20 49 4E 43 4F 52 52 45 43 54 45 20 44 55 20 4E INCORRECTE DU N
0001A0: 4F 4D 42 52 45 20 44 45 20 44 45 43 49 4D 41 4C OMBRE DE DECIMAL
0001B0: 45 28 53 29 20 2A 2A 2A 00 00 00 00 00 00 00 00 E(S) ***........
0001C0: 0D 0A 2A 2A 2A 20 44 45 46 49 4E 49 54 49 4F 4E ..*** DEFINITION
0001D0: 20 49 4E 43 4F 52 52 45 43 54 45 20 44 45 20 4C INCORRECTE DE L
0001E0: 41 20 44 49 4D 45 4E 53 49 4F 4E 20 44 55 20 43 A DIMENSION DU C
0001F0: 48 41 4D 50 20 2A 2A 2A 00 00 00 00 00 00 00 00 HAMP ***........
Size : 512 (Real : 512)
000000: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000010: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000020: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000030: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000040: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000050: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000080: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000090: 00 00 00 00 00 00 00 00 00 00 1A 1A 1A 1A 1A 1A ................
0000A0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0000B0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0000C0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0000D0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0000E0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0000F0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
000100: 00 00 00 00 00 00 00 00 05 1B 59 37 20 0F 00 00 ..........Y7 ...
000110: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
000120: 50 18 50 00 1C 1D 1E 1F 53 5C 44 5D 45 5E 58 5F P.P.....S\D]E^X_
000130: 00 00 03 08 20 08 03 02 20 04 1B 3D 00 00 00 00 .... ... ..=....
000140: 00 00 00 00 00 02 1B 28 00 00 00 02 1B 29 00 00 .......(.....)..
000150: 00 02 1B 29 00 00 00 02 1B AA 00 00 00 00 00 00 ...)............
000160: 00 00 00 04 1B 3D 37 20 00 00 00 00 00 00 00 01 .....=7 ........
000170: 00 00 00 00 00 00 00 00 00 00 00 28 18 50 00 08 ...........(.P..
000180: 0C 0B 0A 00 00 01 08 00 00 01 02 00 03 1B 00 00 ................
000190: 00 00 00 00 00 00 00 00 01 00 00 00 00 00 01 00 ................
0001A0: 00 00 00 00 01 00 00 00 00 00 01 04 00 00 00 00 ................
0001B0: 00 00 00 00 00 00 03 1B 01 18 00 00 00 00 00 00 ................
0001C0: 00 00 01 00 00 00 00 00 00 00 00 00 00 00 50 18 ..............P.
0001D0: 50 00 08 0C 0B 0A 00 00 03 08 20 08 03 02 20 04 P......... ... .
0001E0: 1B 59 00 00 00 00 00 00 00 00 00 01 00 00 00 00 .Y..............
0001F0: 00 01 00 00 00 00 00 01 00 00 00 00 00 01 0C 00 ................
Size : 512 (Real : 512)
000000: 0D 0A 2A 2A 2A 20 56 4F 55 4C 45 5A 2D 56 4F 55 ..*** VOULEZ-VOU
000010: 53 20 45 46 46 41 43 45 52 20 4C 45 20 46 49 43 S EFFACER LE FIC
000020: 48 49 45 52 20 45 58 49 53 54 41 4E 54 20 28 59 HIER EXISTANT (Y
000030: 2F 4E 29 20 3F 20 00 00 00 00 00 00 00 00 00 00 /N) ? ..........
000040: 0D 0A 2A 2A 2A 20 43 45 54 54 45 20 43 4F 4D 4D ..*** CETTE COMM
000050: 41 4E 44 45 20 4E 45 20 50 45 55 54 20 45 54 52 ANDE NE PEUT ETR
000060: 45 20 55 54 49 4C 49 53 45 45 20 2A 2A 2A 00 00 E UTILISEE ***..
000070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000080: 0D 0A 2A 2A 20 43 4F 4D 50 54 45 55 52 20 3D 20 ..** COMPTEUR =
000090: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000C0: 0D 0A 44 4F 4E 4E 45 5A 20 4C 41 20 53 54 52 55 ..DONNEZ LA STRU
0000D0: 43 54 55 52 45 20 44 45 20 4C 27 45 4E 52 45 47 CTURE DE L'ENREG
0000E0: 49 53 54 52 45 4D 45 4E 54 20 53 45 4C 4F 4E 20 ISTREMENT SELON
0000F0: 4C 45 20 46 4F 52 4D 41 54 20 3A 20 00 00 00 00 LE FORMAT : ....
000100: 0D 0A 43 48 41 4D 50 20 20 20 20 4E 4F 4D 2C 54 ..CHAMP NOM,T
000110: 59 50 45 2C 44 49 4D 45 4E 53 49 4F 4E 2C 44 45 YPE,DIMENSION,DE
000120: 43 49 4D 41 4C 45 28 53 29 00 00 00 00 00 00 00 CIMALE(S).......
000130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000140: 0D 0A 2A 2A 2A 20 56 4F 55 4C 45 5A 2D 43 4F 4D ..*** VOULEZ-COM
000150: 4D 45 4E 43 45 52 20 4C 41 20 53 41 49 53 49 45 MENCER LA SAISIE
000160: 20 28 59 2F 4E 29 20 3F 20 00 00 00 00 00 00 00 (Y/N) ? .......
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 0D 0A 2A 2A 2A 20 4C 41 20 4D 41 43 52 4F 2D 49 ..*** LA MACRO-I
000190: 4E 53 54 52 55 43 54 49 4F 4E 20 4E 27 45 53 54 NSTRUCTION N'EST
0001A0: 20 50 41 53 20 55 4E 45 20 43 48 41 49 4E 45 20 PAS UNE CHAINE
0001B0: 44 45 20 43 41 52 41 43 54 45 52 45 53 20 2A 00 DE CARACTERES *.
0001C0: 20 45 4E 52 45 47 49 53 54 52 45 4D 45 4E 54 28 ENREGISTREMENT(
0001D0: 53 29 20 54 52 41 4E 53 46 45 52 45 28 53 29 00 S) TRANSFERE(S).
0001E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20 ...............
Size : 512 (Real : 512)
000000: 01 1F 20 1B 3B 12 4D 12 5F 03 62 0D 6F 0D 7C 06 .. .;.M._.b.o.|.
000010: 82 05 87 02 89 04 8D 04 91 05 96 07 00 00 00 00 ................
000020: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000030: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000040: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000050: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0F 05 ................
000080: CD 1C 05 EB 79 C5 CD A0 13 C1 CD 40 04 F1 D8 E1 ....y......@....
000090: C9 21 37 19 09 7E 23 66 6F C9 21 17 19 C3 16 05 .!7..~#fo.!.....
0000A0: D5 CD 1C 05 CD 30 05 CD 49 05 EB D1 B5 C9 EB 21 .....0..I......!
0000B0: 1F 19 CD 16 05 EB C9 D5 CD 13 05 CD 30 05 CD 49 ............0..I
0000C0: 05 CD 1C 05 19 D1 C9 7D 93 5F 7C 9A 57 C9 3E 01 .......}._|.W.>.
0000D0: 32 0B 19 2A 37 19 EB 2A 39 19 CD 49 05 DA 77 05 2..*7..*9..I..w.
0000E0: 2A 17 19 19 EB 2A 23 19 3A 0C 19 B7 CA 77 05 CD *....*#.:....w..
0000F0: 07 0A D2 8B 05 2A 17 19 EB 2A 23 19 CD 49 05 1F .....*...*#..I..
000100: 1A 64 42 41 53 45 20 49 49 20 43 4F 50 59 52 49 .dBASE II COPYRI
000110: 47 48 54 20 28 43 29 20 31 39 38 32 20 42 59 20 GHT (C) 1982 BY
000120: 52 41 54 4C 49 46 46 20 53 4F 46 54 57 41 52 45 RATLIFF SOFTWARE
000130: 20 50 52 4F 44 55 43 54 49 4F 4E 2C 20 49 4E 43 PRODUCTION, INC
000140: 4F 52 50 4F 52 41 54 45 44 20 28 52 53 50 2C 20 ORPORATED (RSP,
000150: 49 4E 43 2E 29 20 32 37 30 35 20 52 49 44 47 45 INC.) 2705 RIDGE
000160: 50 49 4E 45 20 44 52 2C 20 4C 41 20 43 52 45 53 PINE DR, LA CRES
000170: 43 45 4E 54 41 2C 20 43 41 20 39 31 32 31 34 E9 CENTA, CA 91214.
000180: 0D 0A 2A 2A 2A 20 20 64 42 41 53 45 20 49 49 20 ..*** dBASE II
000190: 4C 43 45 20 56 65 72 20 32 2E 00 C5 00 00 00 00 LCE Ver 2.......
0001A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001C0: 0D 0A 2A 2A 2A 20 43 45 20 46 49 43 48 49 45 52 ..*** CE FICHIER
0001D0: 20 45 53 54 20 44 45 4A 41 20 4F 55 56 45 52 54 EST DEJA OUVERT
0001E0: 20 41 43 43 45 53 20 49 4D 50 4F 53 53 49 42 4C ACCES IMPOSSIBL
0001F0: 45 20 2A 2A 2A 00 00 00 00 00 00 00 00 00 00 00 E ***...........
Size : 512 (Real : 512)
000000: 0D 0A 2A 2A 2A 20 4E 4F 4D 20 44 45 20 46 49 43 ..*** NOM DE FIC
000010: 48 49 45 52 20 49 4E 43 4F 52 52 45 43 54 20 2A HIER INCORRECT *
000020: 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 **..............
000030: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000040: 0D 0A 2A 2A 2A 20 43 45 20 46 49 43 48 49 45 52 ..*** CE FICHIER
000050: 20 44 45 20 43 4F 4D 4D 41 4E 44 45 20 4E 27 45 DE COMMANDE N'E
000060: 53 54 20 50 41 53 20 53 55 52 20 4C 27 55 4E 49 ST PAS SUR L'UNI
000070: 54 45 20 41 43 54 49 56 45 20 2A 2A 2A 00 00 00 TE ACTIVE ***...
000080: 0D 0A 2A 2A 2A 20 44 45 50 41 53 53 45 4D 45 4E ..*** DEPASSEMEN
000090: 54 20 44 55 20 4E 4F 4D 42 52 45 20 4D 41 58 49 T DU NOMBRE MAXI
0000A0: 4D 55 4D 20 44 27 49 4D 42 52 49 43 41 54 49 4F MUM D'IMBRICATIO
0000B0: 4E 53 20 2A 2A 2A 00 00 00 00 00 00 00 00 00 00 NS ***..........
0000C0: 20 45 4E 52 45 47 49 53 54 52 45 4D 45 4E 54 28 ENREGISTREMENT(
0000D0: 53 29 20 45 46 46 41 43 45 28 53 29 00 00 00 00 S) EFFACE(S)....
0000E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20 ...............
000100: 0D 0A 2A 2A 2A 20 46 49 4E 20 44 55 20 54 52 41 ..*** FIN DU TRA
000110: 49 54 45 4D 45 4E 54 20 64 42 41 53 45 20 49 49 ITEMENT dBASE II
000120: 20 76 65 72 73 69 6F 6E 20 4C 2E 43 2E 45 20 2A version L.C.E *
000130: 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 **..............
000140: 0D 0A 2A 2A 2A 20 54 52 4F 50 20 44 45 20 43 4F ..*** TROP DE CO
000150: 4D 4D 41 4E 44 45 53 20 27 52 45 54 55 52 4E 27 MMANDES 'RETURN'
000160: 20 52 45 4E 43 4F 4E 54 52 45 45 53 20 2A 2A 2A RENCONTREES ***
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 0D 0A 2A 2A 45 4E 54 52 45 5A 20 4E 55 4D 2E 20 ..**ENTREZ NUM.
000190: 45 4E 52 45 2E 20 20 43 48 41 4D 50 28 4E 55 4D ENRE. CHAMP(NUM
0001A0: 2E 20 4F 55 20 4E 4F 4D 29 20 20 4E 4F 55 56 45 . OU NOM) NOUVE
0001B0: 4C 4C 45 20 56 41 4C 45 55 52 20 2A 2A 00 00 00 LLE VALEUR **...
0001C0: 0D 0A 2A 2A 2A 20 54 59 50 45 20 44 45 20 44 4F ..*** TYPE DE DO
0001D0: 4E 4E 45 45 53 20 49 4E 43 4F 52 52 45 43 54 45 NNEES INCORRECTE
0001E0: 20 2A 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 ***............
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
Size : 512 (Real : 512)
000000: 0D 0A 44 45 53 49 52 45 5A 2D 56 4F 55 53 20 55 ..DESIREZ-VOUS U
000010: 4E 49 51 55 45 4D 45 4E 54 20 55 4E 20 52 45 53 NIQUEMENT UN RES
000020: 55 4D 45 20 44 55 20 52 41 50 50 4F 52 54 20 28 UME DU RAPPORT (
000030: 59 2F 4E 29 20 3F 20 00 00 00 00 00 00 00 00 00 Y/N) ? .........
000040: 0D 0A 2A 2A 2A 20 46 49 43 48 49 45 52 20 49 4E ..*** FICHIER IN
000050: 44 45 58 20 4E 4F 4E 20 54 52 4F 55 56 45 20 2A DEX NON TROUVE *
000060: 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 **..............
000070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000080: 0D 0A 2A 2A 2A 20 4C 41 20 56 41 52 49 41 42 4C ..*** LA VARIABL
000090: 45 20 45 53 54 20 49 4E 43 4F 52 52 45 43 54 45 E EST INCORRECTE
0000A0: 20 2A 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 ***............
0000B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000C0: 0D 0A 2A 2A 20 4F 52 49 47 49 4E 45 20 45 54 20 ..** ORIGINE ET
0000D0: 44 45 53 54 49 4E 41 54 49 4F 4E 20 44 45 53 20 DESTINATION DES
0000E0: 54 59 50 45 53 20 44 45 20 44 4F 4E 4E 45 45 53 TYPES DE DONNEES
0000F0: 20 44 49 46 46 45 52 45 4E 54 45 53 20 2A 2A 00 DIFFERENTES **.
000100: 0D 0A 2A 2A 2A 20 50 48 52 41 53 45 20 49 4E 43 ..*** PHRASE INC
000110: 4F 4D 50 4C 45 54 45 20 3A 20 22 4F 4E 22 20 4D OMPLETE : "ON" M
000120: 41 4E 51 55 41 4E 54 20 2A 2A 2A 00 00 00 00 00 ANQUANT ***.....
000130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000140: 0D 0A 2A 2A 2A 20 44 45 50 41 53 53 45 4D 45 4E ..*** DEPASSEMEN
000150: 54 20 43 41 50 41 43 49 54 45 20 44 27 55 4E 20 T CAPACITE D'UN
000160: 43 48 41 4D 50 20 4E 55 4D 45 52 49 51 55 45 00 CHAMP NUMERIQUE.
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 0D 0A 2A 2A 20 45 52 52 45 55 52 20 44 45 20 53 ..** ERREUR DE S
000190: 59 4E 54 41 58 45 20 44 41 4E 53 20 4C 41 20 53 YNTAXE DANS LA S
0001A0: 50 45 43 49 46 49 43 41 54 49 4F 4E 20 44 55 20 PECIFICATION DU
0001B0: 46 4F 52 4D 41 54 20 2A 2A 00 00 00 00 00 00 00 FORMAT **.......
0001C0: 0D 0A 2A 2A 2A 20 50 48 52 41 53 45 20 49 4E 43 ..*** PHRASE INC
0001D0: 4F 4D 50 4C 45 54 45 20 3A 20 22 46 49 45 4C 44 OMPLETE : "FIELD
0001E0: 22 20 4D 41 4E 51 55 41 4E 54 20 2A 2A 2A 00 00 " MANQUANT ***..
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
Size : 512 (Real : 512)
000000: 0D 0A 4F 52 49 47 49 4E 45 20 44 45 20 4C 27 45 ..ORIGINE DE L'E
000010: 52 52 45 55 52 20 3A 20 00 00 00 00 00 00 00 00 RREUR : ........
000020: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000030: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000040: 0D 0A 2A 2A 2A 20 44 45 53 49 52 45 5A 2D 56 4F ..*** DESIREZ-VO
000050: 55 53 20 43 4F 52 52 49 47 45 52 20 45 54 20 52 US CORRIGER ET R
000060: 45 43 4F 4D 4D 45 4E 43 45 52 20 28 59 2F 4E 29 ECOMMENCER (Y/N)
000070: 20 3F 20 00 00 00 00 00 00 00 00 00 00 00 00 00 ? .............
000080: 0D 0A 2A 2A 2A 20 4C 45 20 46 49 43 48 49 45 52 ..*** LE FICHIER
000090: 20 41 20 45 54 45 20 45 46 46 41 43 45 20 20 2A A ETE EFFACE *
0000A0: 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 **..............
0000B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000C0: 0D 0A 2A 2A 2A 20 4E 55 4D 45 52 4F 20 44 27 45 ..*** NUMERO D'E
0000D0: 4E 52 45 47 49 53 54 52 45 4D 45 4E 54 20 49 4E NREGISTREMENT IN
0000E0: 43 4F 52 52 45 43 54 20 2A 2A 2A 00 00 00 00 00 CORRECT ***.....
0000F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000100: 0D 0A 2A 2A 2A 20 45 52 52 45 55 52 20 44 45 20 ..*** ERREUR DE
000110: 53 59 4E 54 41 58 45 20 20 56 45 55 49 4C 4C 45 SYNTAXE VEUILLE
000120: 5A 20 20 43 4F 52 52 49 47 45 52 20 2A 2A 2A 00 Z CORRIGER ***.
000130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000140: 0D 0A 2A 2A 2A 20 46 49 43 48 49 45 52 20 56 49 ..*** FICHIER VI
000150: 44 45 20 3A 20 49 4E 53 45 52 54 49 4F 4E 20 49 DE : INSERTION I
000160: 4D 50 4F 53 53 49 42 4C 45 20 2A 2A 2A 00 00 00 MPOSSIBLE ***...
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 0D 0A 2A 2A 2A 20 46 49 4E 20 44 45 20 46 49 43 ..*** FIN DE FIC
000190: 48 49 45 52 20 2A 2A 2A 00 00 00 00 00 00 00 00 HIER ***........
0001A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001C0: 0D 0A 2A 2A 2A 20 46 49 4E 20 44 45 20 4C 4F 43 ..*** FIN DE LOC
0001D0: 41 4C 49 53 41 54 49 4F 4E 20 2A 2A 2A 00 00 00 ALISATION ***...
0001E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
Size : 512 (Real : 512)
000000: 0D 0A 2A 2A 2A 20 4C 45 20 46 49 43 48 49 45 52 ..*** LE FICHIER
000010: 20 4E 45 20 50 45 55 54 20 45 54 52 45 20 4F 55 NE PEUT ETRE OU
000020: 56 45 52 54 20 2A 2A 2A 00 00 00 00 00 00 00 00 VERT ***........
000030: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000040: 0D 0A 2A 2A 2A 20 4C 45 20 46 49 43 48 49 45 52 ..*** LE FICHIER
000050: 20 44 45 20 46 4F 52 4D 41 54 20 4E 45 20 50 45 DE FORMAT NE PE
000060: 55 54 20 45 54 52 45 20 4F 55 56 45 52 54 20 2A UT ETRE OUVERT *
000070: 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 **..............
000080: 0D 0A 2A 2A 20 43 4F 4F 52 44 20 3A 20 00 00 00 ..** COORD : ...
000090: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000C0: 0D 0A 2A 2A 2A 20 44 45 53 49 52 45 5A 2D 56 4F ..*** DESIREZ-VO
0000D0: 55 53 20 43 4F 52 52 49 47 45 52 20 45 54 20 52 US CORRIGER ET R
0000E0: 45 43 4F 4D 4D 45 4E 43 45 52 20 28 59 2F 4E 29 ECOMMENCER (Y/N)
0000F0: 20 3F 20 00 00 00 00 00 00 00 00 00 00 00 00 00 ? .............
000100: 0D 0A 52 45 4D 50 4C 41 43 45 52 20 3A 20 00 00 ..REMPLACER : ..
000110: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000120: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000140: 0D 0A 50 41 52 20 20 20 20 20 20 20 3A 20 00 00 ..PAR : ..
000150: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 0D 0A 2A 2A 2A 20 44 45 53 49 52 45 5A 2D 56 4F ..*** DESIREZ-VO
000190: 55 53 20 44 27 41 55 54 52 45 53 20 43 4F 52 52 US D'AUTRES CORR
0001A0: 45 43 54 49 4F 4E 53 20 28 59 2F 4E 2F 29 20 3F ECTIONS (Y/N/) ?
0001B0: 20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ...............
0001C0: 0D 0A 2A 2A 2A 20 44 4F 4E 4E 45 5A 20 4C 45 20 ..*** DONNEZ LE
0001D0: 4E 4F 4D 20 44 55 20 46 49 43 48 49 45 52 20 3A NOM DU FICHIER :
0001E0: 20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ...............
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
Size : 512 (Real : 512)
000000: 0D 0A 2A 2A 2A 20 4C 41 20 4D 41 43 52 4F 2D 49 ..*** LA MACRO-I
000010: 4E 53 54 52 55 43 54 49 4F 4E 20 4E 27 45 58 49 NSTRUCTION N'EXI
000020: 53 54 45 20 50 41 53 20 2A 2A 2A 00 00 00 00 00 STE PAS ***.....
000030: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000040: 0D 0A 43 4F 4D 50 41 43 54 41 47 45 20 54 45 52 ..COMPACTAGE TER
000050: 4D 49 4E 45 20 3A 20 00 00 00 00 00 00 00 00 00 MINE : .........
000060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000080: 20 45 4E 52 45 47 49 53 54 52 45 4D 45 4E 54 28 ENREGISTREMENT(
000090: 53 29 20 20 54 52 41 4E 53 46 45 52 45 28 53 29 S) TRANSFERE(S)
0000A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20 ...............
0000C0: 20 45 4E 52 45 47 49 53 54 52 45 4D 45 4E 54 28 ENREGISTREMENT(
0000D0: 53 29 20 52 45 53 54 49 54 55 45 28 53 29 00 00 S) RESTITUE(S)..
0000E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20 ...............
000100: 0D 0A 43 4F 4C 4F 4E 4E 45 20 4C 4F 4E 47 55 45 ..COLONNE LONGUE
000110: 55 52 2C 43 4F 4E 54 45 4E 55 00 00 00 00 00 00 UR,CONTENU......
000120: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000140: 0D 0A 44 45 53 49 52 45 5A 2D 56 4F 55 53 20 55 ..DESIREZ-VOUS U
000150: 4E 20 44 4F 55 42 4C 45 20 49 4E 54 45 52 4C 49 N DOUBLE INTERLI
000160: 47 4E 45 20 28 59 2F 4E 29 20 3F 20 00 00 00 00 GNE (Y/N) ? ....
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 20 52 45 4D 50 4C 41 43 45 4D 45 4E 54 28 53 29 REMPLACEMENT(S)
000190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20 ...............
0001C0: 0D 0A 44 4F 4E 4E 45 5A 20 4C 45 20 4E 4F 4D 20 ..DONNEZ LE NOM
0001D0: 44 55 20 46 49 43 48 49 45 52 20 44 45 20 47 45 DU FICHIER DE GE
0001E0: 4E 45 52 41 54 49 4F 4E 20 44 27 45 54 41 54 20 NERATION D'ETAT
0001F0: 3A 20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 : ..............
Size : 512 (Real : 512)
000000: 0D 0A 2A 2A 20 54 4F 54 41 4C 20 2A 2A 00 00 00 ..** TOTAL **...
000010: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000020: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000030: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000040: 0D 0A 2A 2A 2A 20 45 4E 52 45 47 49 53 54 52 45 ..*** ENREGISTRE
000050: 4D 45 4E 54 20 3A 20 00 00 00 00 00 00 00 00 00 MENT : .........
000060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000080: 0D 0A 2A 2A 2A 20 45 4E 52 45 47 49 53 54 52 45 ..*** ENREGISTRE
000090: 4D 45 4E 54 20 4E 4F 4E 20 54 52 4F 55 56 45 20 MENT NON TROUVE
0000A0: 2A 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 ***.............
0000B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000C0: 20 50 41 47 45 20 4E 2E 20 00 00 00 00 00 00 00 PAGE N. .......
0000D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20 ...............
000100: 0D 0A 45 54 41 50 45 20 53 55 49 56 41 4E 54 45 ..ETAPE SUIVANTE
000110: 20 2D 2D 3E 20 59 3D 4F 55 49 20 3A 20 4E 3D 43 --> Y=OUI : N=C
000120: 4D 44 45 20 43 4C 41 56 49 45 52 20 3A 20 45 53 MDE CLAVIER : ES
000130: 43 3D 41 4E 4E 55 4C 41 54 49 4F 4E 20 3F 20 00 C=ANNULATION ? .
000140: 0D 0A 2D 3E 20 00 00 00 00 00 00 00 00 00 00 00 ..-> ...........
000150: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 0D 0A 43 48 41 4D 50 20 20 20 4E 4F 4D 20 20 20 ..CHAMP NOM
000190: 20 20 20 20 20 20 54 59 50 20 20 20 44 49 4D 20 TYP DIM
0001A0: 20 20 20 44 45 43 49 4D 41 4C 45 28 53 29 00 00 DECIMALE(S)..
0001B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001C0: 0D 0A 53 54 52 55 43 54 55 52 45 20 44 55 20 46 ..STRUCTURE DU F
0001D0: 49 43 48 49 45 52 20 20 20 20 20 20 20 20 20 20 ICHIER
0001E0: 20 20 3A 20 00 00 00 00 00 00 00 00 00 00 00 00 : ............
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
Size : 512 (Real : 512)
000000: 0D 0A 44 4F 4E 4E 45 5A 20 4C 45 20 54 49 54 52 ..DONNEZ LE TITR
000010: 45 20 3A 20 00 00 00 00 00 00 00 00 00 00 00 00 E : ............
000020: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000030: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000040: 0D 0A 2A 2A 2A 20 41 55 43 55 4E 20 45 4E 52 45 ..*** AUCUN ENRE
000050: 47 49 53 54 52 45 4D 45 4E 54 20 4E 45 20 43 4F GISTREMENT NE CO
000060: 52 52 45 53 50 4F 4E 44 20 41 20 56 4F 54 52 45 RRESPOND A VOTRE
000070: 20 53 45 4C 45 43 54 49 4F 4E 20 2A 2A 2A 00 00 SELECTION ***..
000080: 0D 0A 2A 2A 2A 20 50 48 52 41 53 45 20 49 4E 43 ..*** PHRASE INC
000090: 4F 4D 50 4C 45 54 45 20 3A 20 22 57 49 54 48 22 OMPLETE : "WITH"
0000A0: 20 4D 41 4E 51 55 41 4E 54 20 2A 2A 2A 00 00 00 MANQUANT ***...
0000B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000C0: 0D 0A 44 4F 4E 4E 45 5A 20 4C 45 20 43 48 41 4D ..DONNEZ LE CHAM
0000D0: 50 20 44 45 20 53 4F 55 53 2D 54 4F 54 41 4C 20 P DE SOUS-TOTAL
0000E0: 3A 20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 : ..............
0000F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000100: 0D 0A 44 45 53 49 52 45 5A 2D 56 4F 55 53 20 44 ..DESIREZ-VOUS D
000110: 45 53 20 53 4F 55 53 2D 54 4F 54 41 55 58 20 44 ES SOUS-TOTAUX D
000120: 41 4E 53 20 56 4F 54 52 45 20 52 41 50 50 4F 52 ANS VOTRE RAPPOR
000130: 54 20 28 59 2F 4E 29 20 3F 20 00 00 00 00 00 00 T (Y/N) ? ......
000140: 0D 0A 44 45 53 49 52 45 5A 2D 56 4F 55 53 20 55 ..DESIREZ-VOUS U
000150: 4E 20 45 4E 54 45 54 45 20 28 59 2F 4E 29 20 3F N ENTETE (Y/N) ?
000160: 20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ...............
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 0D 0A 44 4F 4E 4E 45 5A 20 4C 27 45 4E 54 45 54 ..DONNEZ L'ENTET
000190: 45 20 3A 20 00 00 00 00 00 00 00 00 00 00 00 00 E : ............
0001A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001C0: 0D 0A 2A 2A 2A 20 54 52 49 20 54 45 52 4D 49 4E ..*** TRI TERMIN
0001D0: 45 20 2A 2A 2A 00 00 00 00 00 00 00 00 00 00 00 E ***...........
0001E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
Size : 512 (Real : 512)
000000: 0D 0A 4F 50 54 49 4F 4E 53 20 20 4D 3D 4D 41 52 ..OPTIONS M=MAR
000010: 47 45 20 47 41 55 43 48 45 2C 20 4C 3D 4C 49 47 GE GAUCHE, L=LIG
000020: 4E 45 53 2F 50 41 47 45 2C 20 57 3D 4C 41 52 47 NES/PAGE, W=LARG
000030: 45 55 52 20 44 45 20 50 41 47 45 20 00 00 00 00 EUR DE PAGE ....
000040: 0D 0A 45 4E 54 52 45 5A 20 4C 45 20 54 49 54 52 ..ENTREZ LE TITR
000050: 45 20 50 4F 55 52 20 4C 45 53 20 53 4F 55 53 2D E POUR LES SOUS-
000060: 54 4F 54 41 55 58 20 3A 20 00 00 00 00 00 00 00 TOTAUX : .......
000070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000080: 0D 0A 45 4E 54 52 45 5A 20 4C 45 20 53 4F 55 53 ..ENTREZ LE SOUS
000090: 2D 54 49 54 52 45 20 50 4F 55 52 20 4C 45 53 20 -TITRE POUR LES
0000A0: 53 4F 55 53 2D 54 4F 54 41 55 58 20 3A 20 00 00 SOUS-TOTAUX : ..
0000B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000C0: 0D 0A 43 48 41 4E 47 45 4D 45 4E 54 20 44 45 20 ..CHANGEMENT DE
0000D0: 50 41 47 45 20 41 50 52 45 53 20 4C 45 53 20 53 PAGE APRES LES S
0000E0: 4F 55 53 2D 54 4F 54 41 55 58 20 28 59 2F 4E 29 OUS-TOTAUX (Y/N)
0000F0: 20 3F 20 00 00 00 00 00 00 00 00 00 00 00 00 00 ? .............
000100: 0D 0A 2A 2A 2A 20 50 48 52 41 53 45 20 49 4E 43 ..*** PHRASE INC
000110: 4F 4D 50 4C 45 54 45 20 3A 20 22 46 4F 52 22 20 OMPLETE : "FOR"
000120: 4D 41 4E 51 55 41 4E 54 20 2A 2A 2A 00 00 00 00 MANQUANT ***....
000130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000140: 0D 0A 2A 2A 2A 20 43 4F 4D 4D 41 4E 44 45 20 27 ..*** COMMANDE '
000150: 4A 4F 49 4E 27 20 4E 45 20 50 45 55 54 20 47 45 JOIN' NE PEUT GE
000160: 4E 45 52 45 52 20 50 4C 55 53 20 44 45 20 36 35 NERER PLUS DE 65
000170: 20 35 33 34 20 45 4E 52 45 47 2E 20 2A 2A 2A 00 534 ENREG. ***.
000180: 0D 0A 2A 2A 2A 20 50 48 52 41 53 45 20 49 4E 43 ..*** PHRASE INC
000190: 4F 4D 50 4C 45 54 45 20 3A 20 22 46 52 4F 4D 22 OMPLETE : "FROM"
0001A0: 20 4D 41 4E 51 55 41 4E 54 20 2A 2A 2A 00 00 00 MANQUANT ***...
0001B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001C0: 0D 0A 2A 2A 2A 20 4C 45 53 20 43 4C 45 53 20 4E ..*** LES CLES N
0001D0: 27 4F 4E 54 20 50 41 53 20 4C 41 20 4D 45 4D 45 'ONT PAS LA MEME
0001E0: 20 44 49 4D 45 4E 53 49 4F 4E 20 2A 2A 2A 00 00 DIMENSION ***..
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
Size : 512 (Real : 512)
000000: 0D 0A 2A 2A 2A 20 50 48 52 41 53 45 20 49 4E 43 ..*** PHRASE INC
000010: 4F 4D 50 4C 45 54 45 20 3A 20 22 54 4F 22 20 4D OMPLETE : "TO" M
000020: 41 4E 51 55 41 4E 54 20 2A 2A 2A 00 00 00 00 00 ANQUANT ***.....
000030: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000040: 0D 0A 2A 2A 20 53 4F 55 53 2D 54 4F 54 41 4C 20 ..** SOUS-TOTAL
000050: 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 **..............
000060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000080: 0D 0A 2A 2A 2A 20 49 4E 45 58 49 53 54 41 4E 43 ..*** INEXISTANC
000090: 45 20 44 45 20 4C 27 45 58 50 52 45 53 53 49 4F E DE L'EXPRESSIO
0000A0: 4E 20 41 20 54 4F 54 41 4C 49 53 45 52 20 3A 20 N A TOTALISER :
0000B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000C0: 0D 0A 2A 2A 2A 20 45 58 50 52 45 53 53 49 4F 4E ..*** EXPRESSION
0000D0: 20 4E 4F 4E 20 4E 55 4D 45 52 49 51 55 45 20 2A NON NUMERIQUE *
0000E0: 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 **..............
0000F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000100: 0D 0A 2A 2A 2A 20 45 52 52 45 55 52 20 3A 20 54 ..*** ERREUR : T
000110: 4F 54 41 4C 49 53 41 54 49 4F 4E 20 44 45 20 50 OTALISATION DE P
000120: 4C 55 53 20 44 45 20 35 20 43 48 41 4D 50 53 20 LUS DE 5 CHAMPS
000130: 20 2A 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 ***............
000140: 0D 0A 2A 2A 2A 20 45 52 52 45 55 52 20 44 45 20 ..*** ERREUR DE
000150: 53 59 4E 54 41 58 45 20 2A 2A 2A 00 00 00 00 00 SYNTAXE ***.....
000160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 0D 0A 44 45 53 49 52 45 5A 2D 56 4F 55 53 20 44 ..DESIREZ-VOUS D
000190: 45 53 20 54 4F 54 41 55 58 20 28 59 2F 4E 29 20 ES TOTAUX (Y/N)
0001A0: 3F 20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ? ..............
0001B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001C0: 0D 0A 2A 2A 2A 20 45 4E 52 45 47 49 53 54 52 45 ..*** ENREGISTRE
0001D0: 4D 45 4E 54 20 45 4E 20 43 4F 55 52 53 20 44 27 MENT EN COURS D'
0001E0: 55 54 49 4C 49 53 41 54 49 4F 4E 2E 20 56 45 55 UTILISATION. VEU
0001F0: 49 4C 4C 45 5A 20 50 41 54 49 45 4E 54 45 52 00 ILLEZ PATIENTER.
Size : 512 (Real : 512)
000000: 0D 0A 42 41 53 45 20 44 45 20 44 4F 4E 4E 45 45 ..BASE DE DONNEE
000010: 53 20 50 52 49 4D 41 49 52 45 20 45 4E 20 43 4F S PRIMAIRE EN CO
000020: 55 52 53 20 44 27 55 54 49 4C 49 53 41 54 49 4F URS D'UTILISATIO
000030: 4E 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 N...............
000040: 0D 0A 42 41 53 45 20 44 45 20 44 4F 4E 4E 45 45 ..BASE DE DONNEE
000050: 53 20 53 45 43 4F 4E 44 41 49 52 45 20 45 4E 20 S SECONDAIRE EN
000060: 43 4F 55 52 53 20 44 27 55 54 49 4C 49 53 41 54 COURS D'UTILISAT
000070: 49 4F 4E 00 00 00 00 00 00 00 00 00 00 00 00 00 ION.............
000080: 0D 0A 4E 4F 4D 42 52 45 20 44 27 45 4E 52 45 47 ..NOMBRE D'ENREG
000090: 49 53 54 52 45 4D 45 4E 54 53 20 20 20 20 20 20 ISTREMENTS
0000A0: 20 20 3A 20 00 00 00 00 00 00 00 00 00 00 00 00 : ............
0000B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000C0: 0D 0A 2A 20 4C 41 20 42 41 53 45 20 44 45 20 44 ..* LA BASE DE D
0000D0: 4F 4E 4E 45 45 53 20 4E 27 55 54 49 4C 49 53 45 ONNEES N'UTILISE
0000E0: 20 50 41 53 20 44 45 20 46 49 43 48 49 45 52 20 PAS DE FICHIER
0000F0: 49 4E 44 45 58 20 2A 00 00 00 00 00 00 00 00 00 INDEX *.........
000100: 0D 0A 2A 20 41 55 20 4D 41 58 49 4D 55 4D 20 37 ..* AU MAXIMUM 7
000110: 20 46 49 43 48 2E 20 49 4E 44 45 58 20 50 45 55 FICH. INDEX PEU
000120: 56 45 4E 54 20 45 54 52 45 20 4F 55 56 45 52 54 VENT ETRE OUVERT
000130: 53 20 53 49 4D 55 4C 54 41 4E 45 4D 45 4E 54 00 S SIMULTANEMENT.
000140: 0D 0A 4C 41 20 43 4F 4D 4D 41 4E 44 45 20 22 4D ..LA COMMANDE "M
000150: 4F 44 49 46 59 22 20 44 45 54 52 55 49 52 41 20 ODIFY" DETRUIRA
000160: 54 4F 55 54 45 53 20 56 4F 53 20 44 4F 4E 4E 45 TOUTES VOS DONNE
000170: 45 53 20 28 59 2F 4E 29 20 3F 20 00 00 00 00 00 ES (Y/N) ? .....
000180: 0D 0A 2A 20 45 4E 54 52 45 5A 20 4C 41 20 44 41 ..* ENTREZ LA DA
000190: 54 45 20 53 4F 55 53 20 4C 41 20 46 4F 52 4D 45 TE SOUS LA FORME
0001A0: 20 53 55 49 56 41 4E 54 45 20 28 53 49 4E 4F 4E SUIVANTE (SINON
0001B0: 20 52 45 54 55 52 4E 29 20 20 00 00 00 00 00 00 RETURN) ......
0001C0: 0D 0A 44 41 54 45 20 44 45 20 4C 41 20 44 45 52 ..DATE DE LA DER
0001D0: 4E 49 45 52 45 20 4D 49 53 45 20 41 20 4A 4F 55 NIERE MISE A JOU
0001E0: 52 20 3A 20 00 00 00 00 00 00 00 00 00 00 00 00 R : ............
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
Size : 512 (Real : 512)
000000: 39 CD 9E 36 C2 14 5B CD 69 39 78 11 1F 9E CD 20 9..6..[.i9x....
000010: 37 CA 14 5B CD 8E 39 21 1F 9E 22 CE 5F CD BB 36 7..[..9!.."._..6
000020: 36 00 AF 32 1E 9E 3A D4 5F B7 C8 21 7E 97 CD 20 6..2..:._..!~..
000030: 0B 3A D1 5F B7 C8 21 BB 9D 3A C5 5F FE 4E C2 09 .:._..!..:._.N..
000040: 4C 7E B7 CA 4F 4B FE 2E CA 4F 4B 23 C3 41 4B 22 L~..OK...OK#.AK"
000050: E6 5F 21 C7 9B 7E B7 CA 63 4B FE 2E CA 63 4B 23 ._!..~..cK...cK#
000060: C3 55 4B 22 E8 5F EB 2A E6 5F 1B 2B 7E B7 CA C4 .UK"._.*._.+~...
000070: 4B FE 24 CA AC 4B FE 2A CA AC 4B FE 23 CA B6 4B K.$..K.*..K.#..K
000080: FE 39 CA B6 4B FE 2C C2 6B 4B 1A B7 CA 99 4B FE .9..K.,.kK....K.
000090: 2D CA B6 4B FE 20 C2 6B 4B 2B 7E FE 24 CA A7 4B -..K. .kK+~.$..K
0000A0: FE 2A CA A7 4B 3E 20 23 77 C3 6B 4B 1A B7 CA 6B .*..K> #w.kK...k
0000B0: 4B FE 20 CA 6B 4B 1A B7 CA BF 4B 77 C3 6A 4B 36 K. .kK....Kw.jK6
0000C0: 20 C3 6B 4B 2A E8 5F EB 2A E6 5F 7E B7 CA 41 4C .kK*._.*._~..AL
0000D0: 1A B7 CA F0 4B 13 23 1A B7 CA F0 4B 7E B7 CA 41 ....K.#....K~..A
0000E0: 4C FE 23 CA EB 4B FE 39 C2 D6 4B 1A 77 C3 D5 4B L.#..K.9..K.w..K
0000F0: 7E B7 CA 41 4C FE 23 CA 03 4C FE 39 CA 03 4C 23 ~..AL.#..L.9..L#
000100: C3 F0 4B 36 30 23 C3 F0 4B 21 BB 9D 11 C7 9B 7E ..K60#..K!.....~
000110: B7 CA 41 4C FE 58 C2 24 4C 1A B7 CA 3B 4C 77 13 ..AL.X.$L...;Lw.
000120: 23 C3 0F 4C FE 39 CA 2E 4C FE 23 C2 36 4C 1A CD #..L.9..L.#.6L..
000130: AB 36 DA 3B 4C 77 13 23 C3 0F 4C 36 20 23 C3 0F .6.;Lw.#..L6 #..
000140: 4C 21 BB 9D 22 CA 5F C9 3E 56 C3 06 5B 3A 09 01 L!.."._.>V..[:..
000150: B7 CA 00 45 CD 3C 29 3E 0D 21 00 45 C3 C7 3B CD ...E.<)>.!.E..;.
000160: 73 39 CA 72 4C CD 15 2A C2 14 5B 11 0D 00 19 CD s9.rL..*..[.....
000170: DF 36 EB 21 00 45 E5 2A 52 44 E5 EB C9 3E 1B CD .6.!.E.*RD...>..
000180: 70 3B C3 7E 44 3E 02 32 55 44 C3 00 45 CD 3C 29 p;.~D>.2UD..E.<)
000190: 3E 02 21 03 45 C3 C7 3B CD 73 39 C2 D5 4C CD 45 >.!.E..;.s9..L.E
0001A0: 25 CD 44 27 CD 8C 23 CD 83 2E CD 45 25 CD 44 27 %.D'..#....E%.D'
0001B0: CD 8C 23 CD 83 2E 3A 4C 44 CD 40 27 CD D4 26 CD ..#...:LD.@'..&.
0001C0: 45 25 CD 20 29 AF 32 41 97 32 4C 44 32 56 44 CD E%. ).2A.2LD2VD.
0001D0: 89 2E C3 00 45 11 38 5E CD B1 37 CA E7 4C 11 3C ....E.8^..7..L.<
0001E0: 5E CD B1 37 C2 14 5B CD B5 06 C3 00 45 CD 3C 29 ^..7..[.....E.<)
0001F0: 3E 03 21 00 45 C3 C7 3B CD 3C 29 3E 03 21 18 45 >.!.E..;.<)>.!.E
Size : 512 (Real : 512)
000000: 20 45 4E 52 45 47 49 53 54 52 45 4D 45 4E 54 53 ENREGISTREMENTS
000010: 20 49 4E 44 45 58 45 53 00 00 00 00 00 00 00 00 INDEXES........
000020: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000030: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20 ...............
000040: 0D 0A 2A 2A 2A 20 4C 41 20 44 49 4D 45 4E 53 49 ..*** LA DIMENSI
000050: 4F 4E 20 44 45 20 4C 27 45 4E 52 45 47 49 53 54 ON DE L'ENREGIST
000060: 52 45 4D 45 4E 54 20 44 45 50 41 53 53 45 20 31 REMENT DEPASSE 1
000070: 30 30 30 20 43 41 52 41 43 54 45 52 45 53 00 00 000 CARACTERES..
000080: 0D 0A 2A 2A 2A 20 44 49 56 49 53 49 4F 4E 20 50 ..*** DIVISION P
000090: 41 52 20 5A 45 52 4F 20 49 4D 50 4F 53 53 49 42 AR ZERO IMPOSSIB
0000A0: 4C 45 20 2A 2A 2A 00 00 00 00 00 00 00 00 00 00 LE ***..........
0000B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000C0: 0D 0A 2A 2A 2A 20 44 45 50 41 53 53 45 4D 45 4E ..*** DEPASSEMEN
0000D0: 54 20 43 48 41 49 4E 45 20 44 45 20 43 41 52 41 T CHAINE DE CARA
0000E0: 43 54 45 52 45 53 20 2A 2A 2A 00 00 00 00 00 00 CTERES ***......
0000F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000100: 0D 0A 4C 45 53 20 46 49 43 2E 20 4F 56 45 52 4C ..LES FIC. OVERL
000110: 41 59 20 28 2E 4F 56 52 29 20 4E 45 20 53 45 20 AY (.OVR) NE SE
000120: 54 52 4F 55 56 45 4E 54 20 50 41 53 20 53 55 52 TROUVENT PAS SUR
000130: 20 4C 27 55 4E 49 54 45 20 41 43 54 49 56 45 00 L'UNITE ACTIVE.
000140: 0D 0A 44 4F 4E 4E 45 5A 20 4C 45 20 4E 55 4D 45 ..DONNEZ LE NUME
000150: 52 4F 20 44 45 20 4C 27 45 4E 52 45 47 49 53 54 RO DE L'ENREGIST
000160: 52 45 4D 45 4E 54 20 3A 20 00 00 00 00 00 00 00 REMENT : .......
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 0D 0A 2A 2A 2A 20 4C 27 45 4E 52 45 47 49 53 54 ..*** L'ENREGIST
000190: 52 45 4D 45 4E 54 20 4E 27 45 53 54 20 50 41 53 REMENT N'EST PAS
0001A0: 20 49 4E 44 45 58 45 20 2A 2A 2A 00 00 00 00 00 INDEXE ***.....
0001B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001C0: 0D 0A 2A 2A 2A 20 4C 27 20 49 4E 44 45 58 20 4E ..*** L' INDEX N
0001D0: 45 20 43 4F 52 52 45 53 50 4F 4E 44 20 50 41 53 E CORRESPOND PAS
0001E0: 20 41 20 4C 41 20 42 41 53 45 20 44 45 20 44 4F A LA BASE DE DO
0001F0: 4E 4E 45 45 53 20 2A 2A 2A 00 00 00 00 00 00 00 NNEES ***.......
Size : 512 (Real : 512)
000000: C3 C7 3B 3E 02 21 06 45 C3 C7 3B CD DD 25 CD 73 ..;>.!.E..;..%.s
000010: 39 11 26 5E CD B1 37 C2 42 4D CD 8E 39 AF CD AD 9.&^..7.BM..9...
000020: 27 CD 03 27 DA 39 4D CD 61 27 3A 7D 44 B7 CA 00 '..'.9M.a':}D...
000030: 45 3E 32 CD 70 3B C3 00 45 CD 70 3B CD 61 27 C3 E>2.p;..E.p;.a'.
000040: 00 45 CD 3C 29 3E 2A 32 D9 5F CD 5C 4D 3A 7D 44 .E.<)>*2._.\M:}D
000050: B7 CA 00 45 3E 2B CD 70 3B C3 00 45 CD E9 25 DA ...E>+.p;..E..%.
000060: 14 5B CD 73 39 C2 14 5B 21 01 00 CD 5B 26 01 00 .[.s9..[!...[&..
000070: 00 DA A1 4D 3A D9 5F 57 CD 2A 2C 7C B5 CA A1 4D ...M:._W.*,|...M
000080: CD 78 27 CA 98 4D DA A1 4D CD DC 1C BA CA 98 4D .x'..M..M......M
000090: 72 CD E7 1C CD D3 2E 03 CD 47 2B CA A1 4D D2 80 r........G+..M..
0000A0: 4D 60 69 3A 7D 44 B7 C8 CD 1B 36 CD 35 36 C9 21 M`i:}D....6.56.!
0000B0: 10 00 22 D5 5F 21 01 00 22 D7 5F 11 93 5E CD 73 .."._!.."._..^.s
0000C0: 39 CD B1 37 C2 D2 4D CD 3C 29 3E 03 21 1B 45 C3 9..7..M.<)>.!.E.
0000D0: C7 3B CD 8E 39 11 4A 5E CD B1 37 CA 74 4F 11 2B .;..9.J^..7.tO.+
0000E0: 5E CD B1 37 CA 7C 4F 11 8C 5E CD B1 37 CA 87 4F ^..7.|O..^..7..O
0000F0: CD 3C 29 AF 32 DB 5F 32 D2 5F CD DD 25 21 7E 97 .<).2._2._..%!~.
000100: 22 DF 5F CD 73 39 CA 81 4E CD E9 25 DA 14 5B CD "._.s9..N..%..[.
000110: 73 39 CA 81 4E 11 5A 5E CD B1 37 C2 29 4E 3E FF s9..N.Z^..7.)N>.
000120: 32 D2 5F CD 8E 39 C3 03 4E 11 1F 5E CD B1 37 C2 2._..9..N..^..7.
000130: 35 4E CD 8E 39 2A DF 5F EB CD F2 14 DA 14 5B 3E 5N..9*._......[>
000140: FF 32 DB 5F EB 3A 79 44 B7 C2 6B 4E 36 32 23 CD .2._.:yD..kN62#.
000150: F3 36 78 B7 C2 66 4E 79 B7 C2 61 4E 36 03 C3 67 .6x..fNy..aN6..g
000160: 4E 36 00 C3 6F 4E 70 34 C3 6F 4E 36 2E 23 23 23 N6..oNp4.oN6.###
000170: 36 00 23 36 35 22 DF 5F CD 92 36 CA 81 4E C3 03 6.#65"._..6..N..
000180: 4E 3A 79 44 B7 C2 F2 4E 3A DB 5F B7 C2 F2 4E CD N:yD...N:._...N.
000190: E3 1C 22 E6 5F 2A E6 5F 7E FE 0D CA F2 4E EB 2A .."._*._~....N.*
0001A0: DF 5F 36 29 23 CD E4 36 36 32 23 EB 01 0B 00 09 ._6)#..662#.....
0001B0: 7E 23 4E 23 23 23 46 EB FE 4E CA D6 4E FE 43 CA ~#N###F..N..N.C.
0001C0: CD 4E 36 00 23 36 00 23 36 03 C3 DB 4E 71 23 70 .N6.#6.#6...Nq#p
0001D0: 23 36 00 C3 DC 4E 70 23 71 23 71 34 23 36 00 23 #6...Np#q#q4#6.#
0001E0: 36 35 22 DF 5F 2A E6 5F 11 10 00 19 22 E6 5F C3 65"._*._...."._.
0001F0: 95 4E 2A D7 5F CD 5B 26 DA 00 45 CD 99 2C 7C B5 .N*._.[&..E..,|.
Size : 512 (Real : 512)
000000: 31 BC 96 3A 6F 44 B7 C2 0C 5B AF 32 DB 5F 3A 5C 1..:oD...[.2._:\
000010: 44 B7 CA 88 45 CD 3B 3A CA 22 45 3A 70 44 B7 C2 D...E.;:."E:pD..
000020: 7E 44 3A 7B 44 B7 CA 68 45 3A 59 44 B7 CA 45 45 ~D:{D..hE:YD..EE
000030: CD 68 3B 32 E5 5F 3E FF CD 6C 3B CD 59 3B 32 D3 .h;2._>..l;.Y;2.
000040: 5F AF CD 55 3B 3E 64 CD 70 3B CD 42 38 F5 3A 59 _..U;>d.p;.B8.:Y
000050: 44 B7 CA 61 45 3A E5 5F CD 6C 3B 3A D3 5F CD 55 D..aE:._.l;:._.U
000060: 3B F1 DA 7E 44 CA 88 45 3A 5C 44 CD 40 2F 3A 5C ;..~D..E:\D.@/:\
000070: 44 CD CA 39 DA 70 56 CD 63 39 F2 96 45 23 7E B7 D..9.pV.c9..E#~.
000080: CA 96 45 2F 77 C3 7D 45 CD 1B 36 3E 2E CD E8 35 ..E/w.}E..6>...5
000090: CD 7E 36 CD 99 39 CD 92 39 CD 73 39 CA 00 45 FE .~6..9..9.s9..E.
0000A0: 1B CA 00 45 FE 2A CA 00 45 3A 74 44 B7 CA 0D 46 ...E.*..E:tD...F
0000B0: CD 63 39 FE 80 CA C1 45 11 41 5E CD B1 37 C2 C8 .c9....E.A^..7..
0000C0: 45 21 DC 5F 34 C3 00 45 CD 63 39 FE 81 CA D9 45 E!._4..E.c9....E
0000D0: 11 12 5E CD B1 37 C2 E7 45 3A DC 5F B7 C2 00 45 ..^..7..E:._...E
0000E0: AF 32 74 44 C3 00 45 CD 63 39 FE 82 CA F8 45 11 .2tD..E.c9....E.
0000F0: BB 5E CD B1 37 C2 00 45 3A DC 5F B7 C2 06 46 AF .^..7..E:._...F.
000100: 32 74 44 C3 00 45 3D 32 DC 5F C3 00 45 3A 5C 01 2tD..E=2._..E:\.
000110: 47 CD 73 39 B7 CA 8A 46 B8 CA 21 46 23 7E C3 14 G.s9...F..!F#~..
000120: 46 E5 21 7E 99 01 14 00 CD F8 36 21 C6 99 01 00 F.!~......6!....
000130: 01 CD F8 36 11 7E 99 E1 E5 23 CD F1 2A 7E FE 2E ...6.~...#..*~..
000140: C2 44 46 0C 0C E1 11 7E 99 CD 78 38 21 7F 99 CD .DF....~..x8!...
000150: 15 2A C2 84 46 11 0B 00 19 7E E6 7F FE 43 C2 37 .*..F....~...C.7
000160: 48 23 23 CD DF 36 4E 23 11 C6 99 CD 78 38 11 7E H##..6N#....x8.~
000170: 99 01 C6 99 CD 92 39 CD A2 38 DA 41 48 AF 32 55 ......9..8.AH.2U
000180: 83 C3 0D 46 CD 69 39 C3 0D 46 CD 92 39 CD 73 39 ...F.i9..F..9.s9
000190: 3A 55 44 B7 CA 3D 47 CD 63 39 FE 89 CA B7 46 11 :UD..=G.c9....F.
0001A0: 0F 5E CD B1 37 C2 BE 46 CD 8E 39 CD 73 39 11 C1 .^..7..F..9.s9..
0001B0: 5E CD B1 37 C2 BE 46 21 D0 5F 34 C3 00 45 3A D0 ^..7..F!._4..E:.
0001C0: 5F B7 C2 25 47 3A 55 44 FE 02 CA 0D 47 CD 63 39 _..%G:UD....G.c9
0001D0: FE 85 CA E1 46 11 C1 5E CD B1 37 C2 FC 46 CD 8E ....F..^..7..F..
0001E0: 39 CD 69 39 CD 1D 2E DA 14 5B F5 CD 73 39 C2 14 9.i9.....[..s9..
0001F0: 5B F1 CA 00 45 AF 32 55 44 C3 00 45 CD 63 39 FE [...E.2UD..E.c9.
Size : 512 (Real : 512)
000000: CA 00 45 CD 78 27 CA 68 4F DA 00 45 2A D5 5F 2B ..E.x'.hO..E*._+
000010: 22 D5 5F 7C B5 C2 2B 4F 21 0F 00 22 D5 5F 3E 65 "._|..+O!.."._>e
000020: CD 70 3B CD 8E 3A FE 1B CA 00 45 CD 1B 36 3A D2 .p;..:....E..6:.
000030: 5F B7 C2 44 4F CD 99 2C CD 35 36 CD 7E 36 CD DC _..DO..,.56.~6..
000040: 1C CD E8 35 3A DB 5F B7 C2 62 4F 3A 79 44 B7 CA ...5:._..bO:yD..
000050: 62 4F CD 84 29 44 4D CD DC 1C 0B 23 CD 13 2C C3 bO..)DM....#..,.
000060: 68 4F 21 7E 97 CD 20 0B CD 47 2B CA 00 45 D2 03 hO!~.. ..G+..E..
000070: 4F C3 00 45 3E 03 21 0C 45 C3 C7 3B CD 8E 39 3E O..E>.!.E..;..9>
000080: 03 21 09 45 C3 C7 3B CD 8E 39 3E 08 21 00 45 C3 .!.E..;..9>.!.E.
000090: C7 3B CD 73 39 11 C1 5E CD B1 37 CA 5C 50 11 AA .;.s9..^..7.\P..
0000A0: 5E CD B1 37 CA EF 4F CD 63 39 3E 01 CD AD 27 DA ^..7..O.c9>...'.
0000B0: E2 4F CD 73 39 C2 14 5B 3E 42 CD F0 2B DA E2 4F .O.s9..[>B..+..O
0000C0: 3A 5D 44 FE 10 D2 E7 4F 21 5E 44 CD BB 36 CD 3C :]D....O!^D..6.<
0000D0: 27 77 32 5C 44 21 5D 44 34 CD 36 2F CD 61 27 C3 'w2\D!]D4.6/.a'.
0000E0: 00 45 3E 29 C3 E9 4F 3E 2A CD 70 3B C3 7D 4C 3A .E>)..O>*.p;.}L:
0000F0: 5C 44 B7 CA 54 50 CD 8E 39 CD 1D 2E DA 14 5B C2 \D..TP..9.....[.
000100: 4E 50 AF 32 DA 5F 3A 5C 44 CD CA 39 CD 73 39 FE NP.2._:\D..9.s9.
000110: 88 CA 2C 50 11 0F 5E CD B1 37 C2 33 50 CD 8E 39 ..,P..^..7.3P..9
000120: CD 73 39 11 AA 5E CD B1 37 C2 06 50 21 DA 5F 34 .s9..^..7..P!._4
000130: C3 06 50 CD 63 39 FE 84 CA 44 50 11 B5 5E CD B1 ..P.c9...DP..^..
000140: 37 C2 06 50 21 DA 5F 35 F2 06 50 C3 00 45 CD 54 7..P!._5..P..E.T
000150: 2F C3 00 45 3E 29 CD 70 3B C3 00 45 3E 01 32 55 /..E>).p;..E>.2U
000160: 44 C3 00 45 CD 3C 29 3E 02 21 09 45 C3 C7 3B 3E D..E.<)>.!.E..;>
000170: FF 32 74 44 AF 32 DC 5F C3 00 45 AF 32 55 44 C3 .2tD.2._..E.2UD.
000180: 00 45 AF 32 DA 5F 3A 5C 44 B7 CA 00 45 CD 7D 2F .E.2._:\D...E.}/
000190: C3 00 45 CD 68 3B F5 47 3A 7C 44 B0 CA A7 50 3E ..E.h;.G:|D...P>
0001A0: FF CD 6C 3B CD 30 3B F1 CD 6C 3B C3 00 45 CD AC ..l;.0;..l;..E..
0001B0: 06 C3 00 45 CD 3C 29 CD 9F 24 CA 0C 51 CD 73 39 ...E.<)..$..Q.s9
0001C0: CD 9E 36 CA CB 50 06 00 C3 CE 50 CD 69 39 78 11 ..6..P....P.i9x.
0001D0: C7 9B CD 20 37 4F CD 63 39 79 CD B1 20 E5 CD 9D ... 7O.c9y.. ...
0001E0: 27 E1 7C B5 CA FD 50 3A 5B 44 B7 CA 00 45 CD DC '.|...P:[D...E..
0001F0: 1C C2 00 45 CD 63 39 CD C9 21 C3 DD 50 3A 7D 44 ...E.c9..!..P:}D
Size : 512 (Real : 512)
000000: 86 CA 1E 47 11 CE 5E CD B1 37 CA 1E 47 CD 63 39 ...G..^..7..G.c9
000010: FE 87 CA 1E 47 11 C6 5E CD B1 37 C2 00 45 AF 32 ....G..^..7..E.2
000020: 55 44 C3 00 45 CD 63 39 FE 87 CA 36 47 11 C6 5E UD..E.c9...6G..^
000030: CD B1 37 C2 00 45 21 D0 5F 35 C3 00 45 CD 63 39 ..7..E!._5..E.c9
000040: B7 FA 7D 47 3A 6E 44 B7 CA 7D 47 3A 59 44 B7 CA ..}G:nD..}G:YD..
000050: 67 47 CD 68 3B 32 E5 5F 3E FF CD 6C 3B CD 59 3B gG.h;2._>..l;.Y;
000060: 32 D3 5F AF CD 55 3B CD 0B 3A 3A 59 44 B7 CA 7D 2._..U;..::YD..}
000070: 47 3A E5 5F CD 6C 3B 3A D3 5F CD 55 3B CD 92 39 G:._.l;:._.U;..9
000080: CD 73 39 B7 FA A2 47 11 E9 5B CD 32 2E C2 95 47 .s9...G..[.2...G
000090: CD 8E 39 EB E9 7E CD AB 36 DA 32 48 CD 3C 29 C3 ..9..~..6.2H.<).
0000A0: 14 51 F5 CD 69 39 F1 E6 7F CD B2 36 92 51 6F 50 .Q..i9.....6.QoP
0000B0: 00 45 92 4F 82 50 85 4C 85 4C 7B 50 F9 4F 5C 50 .E.O.P.L.L{P.O\P
0000C0: 90 59 2D 53 12 56 70 56 C3 56 29 49 46 48 E0 48 .Y-S.VpV.V)IFH.H
0000D0: 4D 4C 5F 4C 7D 4C 8D 4C 98 4C ED 4C F8 4C 03 4D ML_L}L.L.L.L.L.M
0000E0: 0B 4D AF 4D DB 52 64 50 93 50 AE 50 11 51 B4 50 .M.M.RdP.P.P.Q.P
0000F0: 8A 51 AF 51 C9 51 3A 52 45 52 4D 52 59 52 61 52 .Q.Q.Q:RERMRYRaR
000100: 82 50 F3 52 FB 52 03 53 A0 53 D1 53 62 54 7F 54 .P.R.R.S.S.SbT.T
000110: 8A 54 93 54 BF 54 02 56 63 56 0A 56 BB 56 E7 56 .T.T.T.VcV.V.V.V
000120: 89 58 88 59 22 5A 2A 5A 55 5A 5D 5A 60 5A 68 5A .X.Y"Z*ZUZ]Z`ZhZ
000130: FE 5A 3E 21 C3 06 5B 3E 26 C3 06 5B 3E 0C C3 06 .Z>!..[>&..[>...
000140: 5B 3E 38 C3 06 5B CD A1 48 E5 3E 3A CD E8 35 CD [>8..[..H.>:..5.
000150: 99 39 CD 63 39 FE 1B C2 67 48 3A 70 44 B7 C2 7E .9.c9...gH:pD..~
000160: 44 CD 1B 36 C3 4A 48 11 80 97 AF CD 20 37 C2 76 D..6.JH..... 7.v
000170: 48 3E 20 12 3E 01 4F 11 7F 97 12 21 7E 97 36 2B H> .>.O....!~.6+
000180: 23 23 79 CD BB 36 36 2F D1 23 CD E4 36 36 35 EB ##y..66/.#..665.
000190: 06 00 CD 88 29 DA 00 45 21 7E 97 CD 20 0B C3 00 ....)..E!~.. ...
0001A0: 45 CD 1B 36 CD 73 39 CD 9E 36 C2 CC 48 CD 69 39 E..6.s9..6..H.i9
0001B0: E5 7E B7 CA 14 5B 23 B8 C2 B1 48 CD 8E 39 D1 CD .~...[#...H..9..
0001C0: D8 36 44 4D 0B EB CD 13 2C CD 73 39 11 9D 5E CD .6DM....,.s9..^.
0001D0: B1 37 C2 27 52 23 CD 8E 39 CD 73 39 CD 9A 2A C9 .7.'R#..9.s9..*.
0001E0: CD 3C 29 CD 73 39 11 02 5E CD B1 37 CA F7 48 3E .<).s9..^..7..H>
0001F0: 02 21 00 45 C3 C7 3B CD 2A 2C 7C B5 CA 02 49 CD .!.E..;.*,|...I.
Size : 512 (Real : 512)
000000: B7 CA 00 45 3E 11 CD 70 3B C3 00 45 3E 73 C3 06 ...E>..p;..E>s..
000010: 5B CD 3C 29 11 77 5E CD 73 39 CD B1 37 C2 29 51 [.<).w^.s9..7.)Q
000020: CD 8E 39 CD 73 39 C3 59 51 11 A0 5E CD B1 37 C2 ..9.s9.YQ..^..7.
000030: 38 51 CD D8 2C C3 00 45 11 08 5E CD B1 37 C2 59 8Q..,..E..^..7.Y
000040: 51 CD 9F 24 C2 50 51 CD 2A 2C CD 9D 27 C3 00 45 Q..$.PQ.*,..'..E
000050: CD 41 23 CD 9D 27 C3 00 45 CD C2 2B DA 14 5B 7C .A#..'..E..+..[|
000060: B5 CA 80 51 EB CD 2A 2C EB CD C0 36 DA 3C 48 54 ...Q..*,...6.<HT
000070: 5D CD 9D 27 EB CD DE 1F 7C B5 CA 85 51 C3 00 45 ]..'....|...Q..E
000080: 3E 33 C3 06 5B 3E 7E C3 06 5B 3E 09 21 00 45 C3 >3..[>~..[>.!.E.
000090: C7 3B CD 1D 2E DA 14 5B F5 CD 73 39 C2 14 5B F1 .;.....[..s9..[.
0000A0: C2 00 45 3E FF 32 74 44 AF 32 DC 5F C3 00 45 CD ..E>.2tD.2._..E.
0000B0: 3C 29 CD 73 39 CA C0 51 3E 04 21 00 45 C3 C7 3B <).s9..Q>.!.E..;
0000C0: CD 43 21 CD 61 1D C3 00 45 CD A1 48 E5 3E 3A CD .C!.a...E..H.>:.
0000D0: E8 35 CD 99 39 CD 63 39 FE 1B C2 EA 51 3A 70 44 .5..9.c9....Q:pD
0000E0: B7 C2 7E 44 CD 1B 36 C3 CD 51 11 7E 97 CD F2 14 ..~D..6..Q.~....
0000F0: DA 2F 52 EB 36 2F 23 CD F3 36 2B 2B D1 D5 CD E4 ./R.6/#..6++....
000100: 36 EB E1 E5 CD 88 29 DA 2C 52 EB D1 3A 7D 44 B7 6.....).,R..:}D.
000110: CA 1E 52 36 30 23 CD E4 36 36 35 CD 1B 36 21 7E ..R60#..665..6!~
000120: 97 CD 20 0B C3 00 45 3E 48 C3 06 5B C3 00 45 3E .. ...E>H..[..E>
000130: 34 CD 70 3B CD 1B 36 C3 CD 51 CD 3C 29 3E 02 21 4.p;..6..Q.<)>.!
000140: 0C 45 C3 C7 3B 3E 0A 21 00 45 C3 C7 3B 21 FF FF .E..;>.!.E..;!..
000150: 22 D5 5F 22 D7 5F C3 BB 4D 3E 03 21 21 45 C3 C7 "._"._..M>.!!E..
000160: 3B CD 3C 29 CD 63 39 11 BC 96 7E 12 B7 CA 75 52 ;.<).c9...~...uR
000170: 13 23 C3 6A 52 21 BC 96 CD 8E 39 CD DD 25 CD E9 .#.jR!....9..%..
000180: 25 DA 14 5B CD 63 39 C2 14 5B 21 FF FF CD 5B 26 %..[.c9..[!...[&
000190: DA B7 52 CD 7C 29 22 76 44 CD 78 27 C2 C6 52 CD ..R.|)"vD.x'..R.
0001A0: 47 2B CA B7 52 D2 93 52 3A 7D 44 B7 CA 00 45 3E G+..R..R:}D...E>
0001B0: 36 CD 70 3B C3 00 45 3A 7D 44 B7 CA 00 45 3E 37 6.p;..E:}D...E>7
0001C0: CD 70 3B C3 00 45 3A 7D 44 B7 CA 00 45 3E 61 CD .p;..E:}D...E>a.
0001D0: 70 3B CD 99 2C CD 35 36 C3 00 45 21 BC 96 CD 8E p;..,.56..E!....
0001E0: 39 CD DD 25 CD E9 25 DA 14 5B 2A 76 44 CD 80 29 9..%..%..[*vD..)
0001F0: C3 9F 52 3E 06 21 00 45 C3 C7 3B 3E 04 21 06 45 ..R>.!.E..;>.!.E
Size : 512 (Real : 512)
000000: 9D 27 CD 37 2C D2 02 49 CD 07 2E CD D3 2E CD D4 .'.7,..I........
000010: 26 CD 43 21 CD 61 1D CD 99 2C CD 2E 2C CD 2A 2C &.C!.a...,..,.*,
000020: CD 9D 27 CD 37 2C C3 00 45 CD A3 49 3A 7C 44 B7 ..'.7,..E..I:|D.
000030: CA 91 49 CD 68 3B 32 E5 5F 3E FF CD 6C 3B CD 59 ..I.h;2._>..l;.Y
000040: 3B 32 D3 5F AF CD 55 3B 2A EA 5F 44 4D CD 4D 3B ;2._..U;*._DM.M;
000050: 90 2F 3C F2 5C 49 C5 CD 30 3B C1 78 B7 CA 69 49 ./<.\I..0;.x..iI
000060: F5 CD 1B 36 F1 3D C3 5C 49 CD 51 3B 91 2F 3C B7 ...6.=.\I.Q;./<.
000070: CA 7C 49 F5 CD 7E 36 F1 3D C3 6F 49 2A CA 5F CD .|I..~6.=.oI*._.
000080: 2B 36 3A E5 5F CD 6C 3B 3A D3 5F CD 55 3B C3 00 +6:._.l;:._.U;..
000090: 45 2A EA 5F 44 4D 2A CA 5F EB 21 CC 5F CD 72 06 E*._DM*._.!._.r.
0000A0: C3 00 45 AF 32 D1 5F 32 D4 5F 3A 7C 44 B7 C2 B9 ..E.2._2._:|D...
0000B0: 49 3A 09 01 B7 C2 B9 49 C9 21 00 00 22 CC 5F 21 I:.....I.!.."._!
0000C0: 00 00 22 CE 5F 0E 00 CD 73 39 FE 24 C2 DB 49 0E .."._...s9.$..I.
0000D0: 80 CD 69 39 FE 2C 2E 00 CA E1 49 CD C2 2B DA 14 ..i9.,....I..+..
0000E0: 5B 7D B1 32 EB 5F CD 92 36 DA 48 4C 0E 00 CD 73 [}.2._..6.HL...s
0000F0: 39 FE 24 C2 02 4A 0E 80 CD 69 39 FE 20 2E 00 CA 9.$..J...i9. ...
000100: 08 4A CD C2 2B DA 14 5B 7D B1 32 EA 5F AF 32 C6 .J..+..[}.2._.2.
000110: 9B 32 C7 9B 21 C7 9B 22 CA 5F CD 73 39 11 7E 5E .2..!.."._.s9.~^
000120: CD B1 37 C2 BB 4A CD 8E 39 3E FF 32 D4 5F CD 73 ..7..J..9>.2._.s
000130: 39 11 7E 97 CD F2 14 DA 14 5B EB 11 BA 5F 36 31 9.~......[..._61
000140: 23 4E 73 23 46 72 78 B7 CA 5A 4A 32 C6 5F 79 32 #Ns#Frx..ZJ2._y2
000150: C9 5F 3E 4E 32 C5 5F C3 78 4A 32 C9 5F 79 B7 CA ._>N2._.xJ2._y..
000160: 6E 4A 41 32 C6 5F 3E 43 32 C5 5F C3 78 4A 32 C6 nJA2._>C2._.xJ2.
000170: 5F 3E 4C 32 C5 5F 06 01 21 C7 9B 78 CD BB 36 36 _>L2._..!..x..66
000180: 00 CD 73 39 11 A4 5E CD B1 37 C2 BB 4A CD 8E 39 ..s9..^..7..J..9
000190: CD 73 39 CD 9E 36 C2 14 5B CD 69 39 78 11 BB 9D .s9..6..[.i9x...
0001A0: CD 20 37 CA 14 5B 23 CD 8E 39 21 BB 9D CD BB 36 . 7..[#..9!....6
0001B0: 36 00 AF 32 BA 9D 3E FF 32 D1 5F CD 73 39 11 38 6..2..>.2._.s9.8
0001C0: 5E CD B1 37 C2 26 4B CD 8E 39 CD 73 39 CA 48 4C ^..7.&K..9.s9.HL
0001D0: E5 C5 CD F1 2A C1 CA 48 4C E3 CD CC 1C 22 CC 5F ....*..HL...."._
0001E0: CA E8 4A 3E 52 C3 06 5B E1 CD 8E 39 CD 73 39 CA ..J>R..[...9.s9.
0001F0: 26 4B 11 61 5E CD B1 37 C2 48 4C CD 8E 39 CD 73 &K.a^..7.HL..9.s
Size : 512 (Real : 512)
000000: C3 C7 3B CD C2 2B DA 14 5B 22 E6 5F CD 92 36 DA ..;..+..["._..6.
000010: 14 5B CD C2 2B DA 14 5B 7D 2A E6 5F 77 23 22 E6 .[..+..[}*._w#".
000020: 5F CD 92 36 CA 00 45 D2 12 53 C3 00 45 21 7E 97 _..6..E..S..E!~.
000030: 22 DF 5F CD 73 39 CA 9A 53 FE 3F CA 44 53 CD 1B "._.s9..S.?.DS..
000040: 36 C3 47 53 CD 69 39 2A DF 5F EB CD F2 14 DA 14 6.GS.i9*._......
000050: 5B EB 3A 79 44 B7 C2 78 53 36 32 23 CD F3 36 78 [.:yD..xS62#..6x
000060: B7 C2 73 53 79 B7 C2 6E 53 36 03 C3 74 53 36 00 ..sSy..nS6..tS6.
000070: C3 7C 53 70 34 C3 7C 53 36 2E 23 23 23 36 00 23 .|Sp4.|S6.###6.#
000080: 36 35 22 DF 5F CD 92 36 CA 91 53 DA 14 5B C3 47 65"._..6..S..[.G
000090: 53 21 7E 97 CD 20 0B C3 00 45 CD 1B 36 C3 00 45 S!~.. ...E..6..E
0000A0: CD 45 25 CD 8C 23 CD 83 2E CD 45 25 CD 8C 23 3E .E%..#....E%..#>
0000B0: 2C CD 70 3B 3A 4C 44 CD 40 27 CD D4 26 CD 45 25 ,.p;:LD.@'..&.E%
0000C0: CD 73 39 00 00 00 CA 00 27 3E 03 21 06 45 C3 C7 .s9.....'>.!.E..
0000D0: 3B AF 32 D2 5F CD 73 39 CA E9 53 11 51 5E CD B1 ;.2._.s9..S.Q^..
0000E0: 37 C2 14 5B 3E FF 32 D2 5F 3A 09 01 B7 CA 00 45 7..[>.2._:.....E
0000F0: 3A 72 44 B7 CA 33 54 CD 40 27 CD A8 2D CD 61 27 :rD..3T.@'..-.a'
000100: CD AC 06 3A 72 44 CD CA 39 DA 33 54 CD 73 39 CA ...:rD..9.3T.s9.
000110: 03 54 FE 2A CA 03 54 FE 40 CC 69 39 CD A3 49 3E .T.*..T.@.i9..I>
000120: FF 2A EA 5F 44 4D 2A CA 5F EB 21 CC 5F CD 72 06 .*._DM*._.!._.r.
000130: C3 03 54 3E 04 CD 1D 02 B7 FA 00 45 0F D2 00 45 ..T>.......E...E
000140: CD 3C 27 B7 CA 00 45 CD 99 2C 7C B5 CA 00 45 CD .<'...E..,|...E.
000150: E7 1C CD D3 2E 3A D2 5F B7 C2 00 45 CD 83 21 C3 .....:._...E..!.
000160: 00 45 CD 3C 29 CD DD 25 3E 20 32 D9 5F CD 5C 4D .E.<)..%> 2._.\M
000170: 3A 7D 44 B7 CA 00 45 3E 3B CD 70 3B C3 00 45 CD :}D...E>;.p;..E.
000180: 3C 29 3E 04 21 03 45 C3 C7 3B CD 63 39 CD 28 36 <)>.!.E..;.c9.(6
000190: C3 00 45 CD 73 39 CA 14 5B AF CD AD 27 CD A1 2C ..E.s9..[...'..,
0001A0: CD 73 39 CA 14 5B 11 9D 5E CD B1 37 C2 14 5B CD .s9..[..^..7..[.
0001B0: 8E 39 CD 73 39 AF CD AD 27 CD B2 2C C3 00 45 CD .9.s9...'..,..E.
0001C0: 3C 29 AF 32 D2 5F 01 00 00 CD 99 2C 7C B5 CA E1 <).2._.....,|...
0001D0: 55 CD DD 25 21 C7 9B 22 DF 5F 21 8F 9C 22 DD 5F U..%!.."._!.."._
0001E0: CD 73 39 CA 99 55 11 51 5E CD B1 37 C2 FA 54 CD .s9..U.Q^..7..T.
0001F0: 8E 39 3E FF 32 D2 5F C3 E0 54 CD E9 25 DA 14 5B .9>.2._..T..%..[
Size : 512 (Real : 512)
000000: 41 44 00 59 52 4C 4F 43 41 54 45 00 61 52 55 4E AD.YRLOCATE.aRUN
000010: 4C 4F 43 4B 00 5D 5A 4D 4F 44 49 46 59 00 F3 52 LOCK.]ZMODIFY..R
000020: 50 41 43 4B 00 FB 52 50 4F 4B 45 00 03 53 51 55 PACK..RPOKE..SQU
000030: 49 54 00 A0 53 52 45 41 44 00 D1 53 52 45 43 41 IT..SREAD..SRECA
000040: 4C 4C 00 62 54 52 45 49 4E 44 45 58 00 7F 54 52 LL.bTREINDEX..TR
000050: 45 4D 41 52 4B 00 8A 54 52 45 4E 41 4D 45 00 93 EMARK..TRENAME..
000060: 54 52 45 50 4C 41 43 45 00 BF 54 52 45 50 4F 52 TREPLACE..TREPOR
000070: 54 00 02 56 52 45 53 45 54 00 63 56 52 45 53 54 T..VRESET.cVREST
000080: 4F 52 45 00 0A 56 53 41 56 45 00 BB 56 53 45 54 ORE..VSAVE..VSET
000090: 00 E7 56 53 4B 49 50 00 89 58 53 4F 52 54 00 88 ..VSKIP..XSORT..
0000A0: 59 53 55 4D 00 22 5A 54 45 58 54 00 2A 5A 55 53 YSUM."ZTEXT.*ZUS
0000B0: 45 00 68 5A 57 41 49 54 00 FE 5A 43 41 53 45 00 E.hZWAIT..ZCASE.
0000C0: 85 4C 45 4E 44 43 41 53 45 00 7B 50 4F 54 48 45 .LENDCASE.{POTHE
0000D0: 52 57 49 53 45 00 85 4C 42 52 4F 57 53 45 00 4D RWISE..LBROWSE.M
0000E0: 4C 4A 4F 49 4E 00 45 52 54 4F 54 41 4C 00 55 5A LJOIN.ERTOTAL.UZ
0000F0: 55 50 44 41 54 45 00 60 5A FF 41 4C 4C 00 41 4E UPDATE.`Z.ALL.AN
000100: 44 00 42 4C 41 4E 4B 00 42 4F 54 54 4F 4D 00 44 D.BLANK.BOTTOM.D
000110: 4F 00 45 4C 53 45 00 45 4E 44 54 45 58 54 00 46 O.ELSE.ENDTEXT.F
000120: 49 45 4C 44 53 00 46 49 4C 45 00 46 49 4C 45 53 IELDS.FILE.FILES
000130: 00 53 43 52 45 45 4E 00 47 45 54 00 47 45 54 53 .SCREEN.GET.GETS
000140: 00 49 46 00 49 4E 44 45 58 00 4D 45 4D 4F 52 59 .IF.INDEX.MEMORY
000150: 00 4E 4F 55 50 44 41 54 45 00 4F 46 46 00 4F 4E .NOUPDATE.OFF.ON
000160: 00 50 49 43 54 55 52 45 00 50 52 49 4D 41 52 59 .PICTURE.PRIMARY
000170: 00 50 52 49 4E 54 00 52 45 43 4F 52 44 00 53 41 .PRINT.RECORD.SA
000180: 59 00 53 45 43 4F 4E 44 41 52 59 00 53 54 41 54 Y.SECONDARY.STAT
000190: 55 53 00 53 54 52 55 43 54 55 52 45 00 54 4F 00 US.STRUCTURE.TO.
0001A0: 54 4F 50 00 55 53 49 4E 47 00 57 48 49 4C 45 00 TOP.USING.WHILE.
0001B0: 57 49 54 48 00 45 4E 44 44 4F 00 45 4E 44 49 46 WITH.ENDDO.ENDIF
0001C0: 00 43 41 53 45 00 45 4E 44 43 41 53 45 00 4F 54 .CASE.ENDCASE.OT
0001D0: 48 45 52 57 49 53 45 00 42 45 4C 4C 00 51 44 43 HERWISE.BELL.QDC
0001E0: 41 52 52 59 00 54 44 43 4F 4C 4F 4E 00 57 44 43 ARRY.TDCOLON.WDC
0001F0: 4F 4E 46 49 52 4D 00 58 44 44 45 42 55 47 00 59 ONFIRM.XDDEBUG.Y
Size : 512 (Real : 512)
000000: CD 63 39 CA 99 55 CD 73 39 CD F1 2A C2 14 55 3E .c9..U.s9..*..U>
000010: 14 C3 06 5B CD 63 39 CD 92 28 C2 F8 55 22 E3 5F ...[.c9..(..U"._
000020: 11 B0 5E CD 63 39 79 CD BB 36 CD 8E 39 CD 73 39 ..^.c9y..6..9.s9
000030: CD B1 37 C2 FD 55 CD 8E 39 2A DF 5F EB CD F2 14 ..7..U..9*._....
000040: DA 14 5B 06 4E D5 EB 23 23 7E B7 C2 58 55 06 43 ..[.N..##~..XU.C
000050: 2B 7E B7 C2 58 55 06 4C 2A E3 5F 11 0B 00 19 7E +~..XU.L*._....~
000060: B8 D1 CA 6A 55 3E 53 C3 06 5B 2A E3 5F EB 36 31 ...jU>S..[*._.61
000070: 23 CD E4 36 36 35 22 DF 5F 3E FF 32 DB 5F CD 92 #..665"._>.2._..
000080: 36 CA 99 55 DA 8A 55 C3 06 55 11 FE 5D CD B1 37 6..U..U..U..]..7
000090: C2 E0 54 CD 8E 39 C3 06 55 3A DB 5F B7 CA F8 55 ..T..9..U:._...U
0000A0: 21 01 00 CD 5B 26 01 00 00 DA E1 55 CD 78 27 CA !...[&.....U.x'.
0000B0: D8 55 DA E1 55 CD DC 1C CA D8 55 21 C7 9B CD 20 .U..U.....U!...
0000C0: 0B CD E1 26 CD E7 1C CD D3 2E 3A D2 5F B7 C2 D4 ...&......:._...
0000D0: 55 CD 83 21 CD E8 26 03 CD 47 2B CA E1 55 D2 AC U..!..&..G+..U..
0000E0: 55 3A 7D 44 B7 CA 00 45 60 69 CD 1B 36 CD 35 36 U:}D...E`i..6.56
0000F0: 3E 3E CD 70 3B C3 00 45 3E 41 C3 06 5B 3E 42 C3 >>.p;..E>A..[>B.
000100: 06 5B 3E 05 21 00 45 C3 C7 3B 3E 03 21 0F 45 C3 .[>.!.E..;>.!.E.
000110: C7 3B CD 73 39 11 FA 5D CD B1 37 C2 35 56 CD 8E .;.s9..]..7.5V..
000120: 39 CD 73 39 CA 2F 56 3E 03 21 15 45 C3 C7 3B CD 9.s9./V>.!.E..;.
000130: 20 29 C3 00 45 CD 73 39 CA 00 45 CD F1 2A C2 46 )..E.s9..E..*.F
000140: 56 3E 14 C3 37 5B E5 CD 63 39 CD 15 2A C2 53 56 V>..7[..c9..*.SV
000150: CD 79 2A E1 CD 8E 39 CD 92 36 CA 00 45 DA 14 5B .y*...9..6..E..[
000160: C3 35 56 CD 73 39 C2 6A 56 AF CD 71 2E C3 00 45 .5V.s9.jV..q...E
000170: 3A 5C 44 B7 CA 00 45 CD 40 27 CD 45 25 CD 61 27 :\D...E.@'.E%.a'
000180: CD 6F 2F 3A 5D 44 B7 CA B3 56 3D FA B3 56 CA A6 .o/:]D...V=..V..
000190: 56 32 5D 44 3D 21 5E 44 CD BB 36 7E 32 5C 44 AF V2]D=!^D..6~2\D.
0001A0: 32 74 44 C3 00 45 AF 32 5C 44 32 5D 44 32 74 44 2tD..E.2\D2]D2tD
0001B0: C3 00 45 3E 2D CD 70 3B C3 00 45 3E 03 21 12 45 ..E>-.p;..E>.!.E
0001C0: C3 C7 3B CD 73 39 11 69 5E CD B1 37 C2 D6 56 AF ..;.s9.i^..7..V.
0001D0: CD 89 2E C3 00 45 11 82 5E CD B1 37 C2 14 5B 3E .....E..^..7..[>
0001E0: 01 CD 89 2E C3 00 45 CD 73 39 11 D8 5E CD 32 2E ......E.s9..^.2.
0001F0: C2 FF 56 D5 CD 8E 39 CD 6E 58 E1 77 C3 00 45 11 ..V...9.nX.w..E.
Size : 512 (Real : 512)
000000: 44 44 45 4C 45 54 45 44 00 5B 44 45 43 48 4F 00 DDELETED.[DECHO.
000010: 6E 44 45 4A 45 43 54 00 7A 44 45 53 43 41 50 45 nDEJECT.zDESCAPE
000020: 00 70 44 45 58 41 43 54 00 71 44 49 4E 54 45 4E .pDEXACT.qDINTEN
000030: 53 49 54 59 00 75 44 4C 49 4E 4B 41 47 45 00 78 SITY.uDLINKAGE.x
000040: 44 52 41 57 00 79 44 53 54 45 50 00 7B 44 53 43 DRAW.yDSTEP.{DSC
000050: 52 45 45 4E 00 09 01 54 41 4C 4B 00 7D 44 FF 41 REEN...TALK.}D.A
000060: 4C 54 45 52 4E 41 54 45 00 16 57 43 41 4C 4C 00 LTERNATE..WCALL.
000070: 99 57 43 4F 4E 53 4F 4C 45 00 0D 57 44 41 54 45 .WCONSOLE..WDATE
000080: 00 12 58 44 45 46 41 55 4C 54 00 01 58 46 4F 52 ..XDEFAULT..XFOR
000090: 4D 41 54 00 A8 57 48 45 41 44 49 4E 47 00 70 57 MAT..WHEADING.pW
0000A0: 49 4E 44 45 58 00 49 58 4D 41 52 47 49 4E 00 39 INDEX.IXMARGIN.9
0000B0: 58 50 52 49 4E 54 00 67 57 FF 00 00 00 00 00 00 XPRINT.gW.......
0000C0: 00 01 01 00 00 00 00 C7 9B 00 00 00 F3 56 35 8E .............V5.
0000D0: 00 00 00 00 00 00 00 00 05 D4 51 41 07 51 42 00 ..........QA.QB.
0000E0: 51 43 01 51 44 02 51 45 03 51 00 00 41 4C 4C 00 QC.QD.QE.Q..ALL.
0000F0: 99 57 43 4F 4E 53 4F 4C 45 00 0D 57 44 41 54 45 .WCONSOLE..WDATE
000100: C3 0F 45 C3 A6 48 C3 A5 49 C3 DB 4C C3 EC 4E CD ..E..H..I..L..N.
000110: 3C 29 AF 32 DD 56 32 D9 56 32 DA 56 CD DD 25 CD <).2.V2.V2.V..%.
000120: 73 39 CA 7A 45 CD E9 25 DA C8 55 CD 73 39 CA 7A s9.zE..%..U.s9.z
000130: 45 11 7E 56 CD B1 37 C2 4F 45 CD 8E 39 22 EB 56 E.~V..7.OE..9".V
000140: AF CD AD 27 DA 8C 48 3E FF 32 DD 56 C3 1F 45 11 ...'..H>.2.V..E.
000150: 9B 56 CD B1 37 C2 63 45 CD 8E 39 3E FF 32 D9 56 .V..7.cE..9>.2.V
000160: C3 1F 45 11 65 56 CD B1 37 C2 C8 55 CD 8E 39 3E ..E.eV..7..U..9>
000170: FF 32 D9 56 32 DA 56 C3 1F 45 CD 2A 2C 22 F5 56 .2.V2.V..E.*,".V
000180: 7C B5 CA 88 45 CD 9D 27 CD 37 2C D2 88 45 3A DD |...E..'.7,..E:.
000190: 56 B7 CA F3 46 21 00 00 22 04 57 21 64 00 22 FE V...F!..".W!d.".
0001A0: 56 CD 43 21 3A D9 56 B7 CA 18 47 2A EB 56 CD 8E V.C!:.V...G*.V..
0001B0: 39 3E 04 CD AD 27 3E 41 CD F0 2B DA 8C 48 CD 3C 9>...'>A..+..H.<
0001C0: 27 32 D6 56 CD 61 27 CD 07 2E 3A DA 56 B7 CA 95 '2.V.a'...:.V...
0001D0: 46 21 C8 9B CD 8E 39 EB 01 E8 03 3A D6 56 CD 40 F!....9....:.V.@
0001E0: 27 CD B2 25 DA 5C 48 AF 12 CD E3 1C 22 00 57 2A '..%.\H.....".W*
0001F0: 00 57 7E FE 0D CA A9 46 11 0B 00 19 7E FE 4E CA .W~....F....~.N.
Size : 512 (Real : 512)
000000: 5F 5F CD 32 2E C2 14 5B CD 8E 39 EB E9 CD 6E 58 __.2...[..9...nX
000010: CD 55 3B C3 00 45 CD 73 39 11 9D 5E CD B1 37 C2 .U;..E.s9..^..7.
000020: 58 57 CD 8E 39 3A 4C 44 B7 CA 38 57 CD 40 27 CD XW..9:LD..8W.@'.
000030: D4 26 CD 45 25 CD 61 27 AF 32 4C 44 CD 73 39 CA .&.E%.a'.2LD.s9.
000040: 00 45 3E 04 CD AD 27 3E 81 CD F0 2B CD 3C 27 32 .E>...'>...+.<'2
000050: 4C 44 CD 61 27 C3 00 45 CD 6E 58 CA 61 57 3A 4C LD.a'..E.nX.aW:L
000060: 44 32 56 44 C3 00 45 CD 6E 58 CD 6C 3B C3 00 45 D2VD..E.nX.l;..E
000070: CD 73 39 11 9D 5E CD B1 37 C2 7F 57 CD 8E 39 01 .s9..^..7..W..9.
000080: 3C 00 21 41 97 CD F8 36 CD 63 39 11 41 97 AF CD <.!A...6.c9.A...
000090: 20 37 AF 32 7D 97 C3 00 45 CD 5B 58 CD C2 2B DA 7.2}...E.[X..+.
0000A0: 14 5B 22 52 44 C3 00 45 3A 72 44 B7 CA BC 57 CD .["RD..E:rD...W.
0000B0: 40 27 CD 45 25 AF 32 72 44 CD 61 27 CD 5B 58 CA @'.E%.2rD.a'.[X.
0000C0: F2 57 11 71 5E CD B1 37 CA F9 57 11 31 5E CD B1 .W.q^..7..W.1^..
0000D0: 37 CA F2 57 3E 06 CD AD 27 3E 02 CD F0 2B D2 E6 7..W>...'>...+..
0000E0: 57 3E 59 C3 06 5B CD 3C 27 32 72 44 CD 61 27 C3 W>Y..[.<'2rD.a'.
0000F0: 00 45 AF 32 7C 44 C3 00 45 3E FF 32 7C 44 C3 00 .E.2|D..E>.2|D..
000100: 45 CD 5B 58 CA 14 5B 7E E6 5F D6 40 32 5A 44 C3 E.[X..[~._.@2ZD.
000110: 00 45 CD 5B 58 CD FF 37 7B 32 4E 44 CD 8E 39 CD .E.[X..7{2ND..9.
000120: 69 39 CD FF 37 7B 32 4F 44 CD 8E 39 CD 69 39 CD i9..7{2OD..9.i9.
000130: FF 37 7B 32 50 44 C3 00 45 CD 5B 58 CD C2 2B DA .7{2PD..E.[X..+.
000140: 14 5B 7D 32 61 01 C3 00 45 CD 5B 58 CD 8C 23 CD .[}2a...E.[X..#.
000150: 63 39 CA 00 45 CD AD 5A C3 00 45 CD 73 39 11 9D c9..E..Z..E.s9..
000160: 5E CD B1 37 C2 14 5B CD 8E 39 CD 73 39 C9 CD 73 ^..7..[..9.s9..s
000170: 39 11 5E 5E CD B1 37 CA 85 58 11 5A 5E CD B1 37 9.^^..7..X.Z^..7
000180: C2 37 5B AF C9 3E FF B7 C9 CD 3C 29 0E 00 11 01 .7[..>....<)....
000190: 00 CD 73 39 CA 14 59 FE 2D C2 A4 58 0E 01 CD 69 ..s9..Y.-..X...i
0001A0: 39 C3 AC 58 FE 2B C2 AC 58 CD 69 39 11 FA 5D CD 9..X.+..X.i9..].
0001B0: B1 37 CA 75 59 CD C2 2B DA 14 5B 7C B5 CA 00 45 .7.uY..+..[|...E
0001C0: EB 79 B7 CA 14 59 CD 9F 24 CA F9 58 CD 99 2C 22 .y...Y..$..X..,"
0001D0: E8 5F CD 5A 22 DA F0 58 1B 22 E8 5F 7A B3 C2 D2 ._.Z"..X."._z...
0001E0: 58 2A E8 5F CD 9D 27 CD 7B 59 CA D2 58 C3 60 59 X*._..'.{Y..X.`Y
0001F0: CD 01 23 CD 9D 27 C3 60 59 CD 99 2C CD D8 36 DA ..#..'.`Y..,..6.
Size : 512 (Real : 512)
000000: 51 46 23 46 23 CD E9 36 CD 63 39 0E 00 FE 27 C2 QF#F#..6.c9...'.
000010: 15 46 C3 1A 46 FE 22 C2 25 46 4F CD 69 39 B9 CA .F..F.".%FO.i9..
000020: 71 46 C3 2C 46 FE 2C CA 82 46 0E 2C 12 13 05 CA qF.,F.,..F.,....
000030: 3F 46 CD 69 39 CA A9 46 B9 C2 2C 46 C3 71 46 CD ?F.i9..F..,F.qF.
000040: 69 39 CA A9 46 B9 CA 71 46 FE 2C C2 3F 46 C3 82 i9..F..qF.,.?F..
000050: 46 23 46 23 CD E9 36 4E C5 CD 63 39 0E 64 CD 9F F#F#..6N..c9.d..
000060: 32 CD 8E 39 EB C1 CD 4D 33 CD 63 39 FE 2C CA 82 2..9...M3.c9.,..
000070: 46 79 FE 2C CA 82 46 CD 69 39 CA A9 46 FE 2C C2 Fy.,..F.i9..F.,.
000080: 77 46 CD 69 39 CA A9 46 2A 00 57 11 10 00 19 22 wF.i9..F*.W...."
000090: 00 57 C3 EF 45 CD DC 1C 23 EB 01 E7 03 3A D6 56 .W..E...#....:.V
0000A0: CD 40 27 CD B2 25 DA 5C 48 CD 78 27 CA C7 45 DA .@'..%.\H.x'..E.
0000B0: 5C 48 CD 61 27 CD D3 2E CD 61 1D 2A 04 57 23 22 \H.a'....a.*.W#"
0000C0: 04 57 2A F5 56 23 22 F5 56 2A FE 56 2B 22 FE 56 .W*.V#".V*.V+".V
0000D0: 7C B5 C2 C7 45 3A 7D 44 B7 CA C7 45 2A 04 57 CD |...E:}D...E*.W.
0000E0: 1B 36 CD 35 36 3E 1A CD 70 3B 21 64 00 22 FE 56 .6.56>..p;!d.".V
0000F0: C3 C7 45 CD 16 51 DA 09 47 CD 43 21 CD 61 1D 2A ..E..Q..G.C!.a.*
000100: F5 56 23 22 F5 56 C3 F3 46 CD D4 26 CD 2A 2C CD .V#".V..F..&.*,.
000110: 9D 27 CD 37 2C C3 83 48 3E 41 CD F0 2B DA 8C 48 .'.7,..H>A..+..H
000120: CD 3C 27 32 D6 56 01 09 02 11 BE 99 CD 7A 2C 3A .<'2.V.......z,:
000130: BE 99 FE 02 C2 99 48 01 C7 9B 21 C6 99 CD 75 25 ......H...!...u%
000140: 21 AF 9F 22 F0 56 21 C6 99 22 00 57 7E FE 0D CA !..".V!..".W~...
000150: E5 47 22 CC 56 CD 92 28 C2 D8 47 22 D4 56 11 0B .G".V..(..G".V..
000160: 00 19 7E FE 4E CA 86 47 2A F0 56 36 2D 23 EB 2A ..~.N..G*.V6-#.*
000170: CC 56 EB CD E4 36 EB 2A D4 56 EB CD E4 36 36 35 .V...6.*.V...665
000180: 22 F0 56 C3 D8 47 2A CC 56 11 0B 00 19 7E FE 4E ".V..G*.V....~.N
000190: CA B7 47 2A F0 56 36 29 23 EB 2A CC 56 EB CD E4 ..G*.V6)#.*.V...
0001A0: 36 36 19 23 36 31 23 EB 2A D4 56 EB CD E4 36 36 66.#61#.*.V...66
0001B0: 35 22 F0 56 C3 D8 47 2A F0 56 36 29 23 EB 2A CC 5".V..G*.V6)#.*.
0001C0: 56 EB CD E4 36 36 31 23 EB 2A D4 56 EB CD E4 36 V...661#.*.V...6
0001D0: 36 35 22 F0 56 C3 D8 47 2A 00 57 11 10 00 19 22 65".V..G*.W...."
0001E0: 00 57 C3 4C 47 CD 07 2E CD 43 21 11 C7 9B 2A C4 .W.LG....C!...*.
0001F0: 99 44 4D 3A D6 56 CD 40 27 CD 7A 2C DA 5C 48 3A .DM:.V.@'.z,.\H:
Size : 512 (Real : 512)
000000: 0E 59 CD 9D 27 CD 7B 59 CA F9 58 C3 60 59 CD D8 .Y..'.{Y..X.`Y..
000010: 2C C3 60 59 CD 9F 24 CA 4D 59 CD 99 2C 22 E8 5F ,.`Y..$.MY..,"._
000020: CD E9 21 DA 3E 59 1B 22 E8 5F 7A B3 C2 20 59 2A ..!.>Y."._z.. Y*
000030: E8 5F CD 9D 27 CD 7B 59 CA 20 59 C3 60 59 CD E1 ._..'.{Y. Y.`Y..
000040: 26 CD 41 23 CD 9D 27 CD E8 26 C3 60 59 CD 99 2C &.A#..'..&.`Y..,
000050: 19 CD 9D 27 CD 7B 59 C2 60 59 CD 37 2C D2 54 59 ...'.{Y.`Y.7,.TY
000060: 3A 7D 44 B7 CA 00 45 3E 61 CD 70 3B CD 99 2C CD :}D...E>a.p;..,.
000070: 35 36 C3 00 45 CD 47 2B C3 00 45 3A 5B 44 FE FF 56..E.G+..E:[D..
000080: C0 11 01 00 CD DC 1C C9 3E 07 21 00 45 C3 C7 3B ........>.!.E..;
000090: 11 7E 97 CD F2 14 DA 14 5B EB 22 DF 5F CD 73 39 .~......[."._.s9
0000A0: 11 9D 5E CD B1 37 C2 1D 5A CD 8E 39 2A DF 5F 23 ..^..7..Z..9*._#
0000B0: 4E 23 46 CD 73 39 CD 72 2A EB 2A DF 5F 36 2F 23 N#F.s9.r*.*._6/#
0000C0: CD E4 36 22 DF 5F EB 22 E3 5F CD 63 39 C5 CD F1 ..6"._."._.c9...
0000D0: 2A C1 CD 8E 39 CD 92 36 CA F1 59 DA 14 5B 2A E3 *...9..6..Y..[*.
0000E0: 5F EB 2A DF 5F 36 29 23 CD E4 36 22 DF 5F C3 B3 _.*._6)#..6"._..
0000F0: 59 3A 7D 44 B7 CA 08 5A 2A E3 5F EB 2A DF 5F 36 Y:}D...Z*._.*._6
000100: 30 23 CD E4 36 22 DF 5F 2A DF 5F 36 35 3A 7D 44 0#..6"._*._65:}D
000110: B7 C4 1B 36 21 7E 97 CD 20 0B C3 00 45 3E 48 C3 ...6!~.. ...E>H.
000120: 06 5B 3E 03 21 03 45 C3 C7 3B C3 3F 5A CD 73 39 .[>.!.E..;.?Z.s9
000130: 11 17 5E CD B1 37 CA 00 45 CD 92 39 CD 28 36 3A ..^..7..E..9.(6:
000140: 5C 44 B7 CA 4F 5A CD CA 39 DA 70 56 C3 2D 5A CD \D..OZ..9.pV.-Z.
000150: 99 39 C3 2D 5A 3E 0B 21 00 45 C3 C7 3B C3 00 45 .9.-Z>.!.E..;..E
000160: 3E 0C 21 00 45 C3 C7 3B CD 61 27 CD 45 25 CD 44 >.!.E..;.a'.E%.D
000170: 27 CD 8C 23 CD 73 39 CA 00 45 AF CD AD 27 DA EF '..#.s9..E...'..
000180: 5A 3E 40 CD F0 2B DA EA 5A CD 44 27 CD B5 2D CD Z>@..+..Z.D'..-.
000190: D8 2C CD 73 39 CA 00 45 11 44 5E CD B1 37 C2 14 .,.s9..E.D^..7..
0001A0: 5B CD 8E 39 CD 73 39 CD AD 5A C3 00 45 0E 07 3E [..9.s9..Z..E..>
0001B0: 05 CD AD 27 DA EF 5A 3E 40 CD F0 2B DA F4 5A CD ...'..Z>@..+..Z.
0001C0: 3C 27 CD A6 23 CD 92 36 CA D7 5A DA D7 5A 0D C2 <'..#..6..Z..Z..
0001D0: AF 5A 3E 74 C3 06 5B CD B7 23 CD DF 22 CD 43 21 .Z>t..[..#..".C!
0001E0: DA F9 5A CD 61 27 CD D8 2C C9 3E 08 C3 06 5B 3E ..Z.a'..,.>...[>
0001F0: 28 C3 06 5B 3E 51 C3 06 5B 3E 7F C3 06 5B 3E 03 (..[>Q..[>...[>.
Size : 512 (Real : 512)
000000: C7 9B FE 20 C2 EB 47 CD DC 1C 36 20 21 AF 9F CD ... ..G...6 !...
000010: 20 0B CD 78 27 CA EB 47 DA 5C 48 CD 61 27 CD D3 ..x'..G.\H.a'..
000020: 2E CD 61 1D 2A 04 57 23 22 04 57 2A F5 56 23 22 ..a.*.W#".W*.V#"
000030: F5 56 2A FE 56 2B 22 FE 56 7C B5 C2 EB 47 3A 7D .V*.V+".V|...G:}
000040: 44 B7 CA EB 47 2A 04 57 CD 1B 36 CD 35 36 3E 1A D...G*.W..6.56>.
000050: CD 70 3B 21 64 00 22 FE 56 C3 EB 47 CD 45 25 3A .p;!d.".V..G.E%:
000060: 7D 44 B7 CA 74 48 2A 04 57 CD 1B 36 CD 35 36 3E }D..tH*.W..6.56>
000070: 1A CD 70 3B CD 61 27 CD D4 26 CD 2A 2C CD 9D 27 ..p;.a'..&.*,..'
000080: CD 37 2C 2A F5 56 CD 2E 2C C3 D0 55 3E 08 CD 70 .7,*.V..,..U>..p
000090: 3B 3E 01 32 6F 44 C3 D0 55 3E 17 CD 70 3B 3E 01 ;>.2oD..U>..p;>.
0000A0: 32 6F 44 C3 D0 55 CD 3C 29 CD DD 25 AF 32 DB 56 2oD..U.<)..%.2.V
0000B0: CD 73 39 CA 3B 49 CD E9 25 DA C8 55 CD 73 39 CA .s9.;I..%..U.s9.
0000C0: 3B 49 11 78 56 CD B1 37 CA D8 48 3E 57 CD 70 3B ;I.xV..7..H>W.p;
0000D0: 3E 01 32 6F 44 C3 D0 55 3E FF 32 DB 56 CD 8E 39 >.2oD..U>.2.V..9
0000E0: 21 BB 9D 22 04 57 11 00 00 CD E4 36 CD 73 39 CD !..".W.....6.s9.
0000F0: F1 2A C2 02 49 3E 14 CD 70 3B 3E 01 32 6F 44 C3 .*..I>..p;>.2oD.
000100: D0 55 E5 CD 63 39 CD 92 28 CA 19 49 3E 52 CD 70 .U..c9..(..I>R.p
000110: 3B 3E 01 32 6F 44 C3 D0 55 EB 2A 04 57 CD E4 36 ;>.2oD..U.*.W..6
000120: 22 04 57 11 00 00 CD E4 36 E1 CD 8E 39 CD 73 39 ".W.....6...9.s9
000130: FE 2C C2 B0 48 CD 69 39 C3 EC 48 3A DB 56 B7 C2 .,..H.i9..H:.V..
000140: 4F 49 3E 57 CD 70 3B 3E 01 32 6F 44 C3 D0 55 21 OI>W.p;>.2oD..U!
000150: 01 00 CD 5B 26 CD 78 27 CA 99 49 DA A2 49 CD DC ...[&.x'..I..I..
000160: 1C CA 99 49 CD 1B 36 3E 61 CD 70 3B CD 99 2C CD ...I..6>a.p;..,.
000170: 35 36 CD 1B 36 21 BB 9D 22 04 57 2A 04 57 CD E9 56..6!..".W*.W..
000180: 36 22 04 57 7A B3 CA 93 49 EB CD F5 4F DA A2 49 6".Wz...I...O..I
000190: C3 7B 49 CD E7 1C CD D3 2E CD 47 2B CA A2 49 D2 .{I.......G+..I.
0001A0: 55 49 C3 D0 55 CD 45 25 CD 44 27 CD 8C 23 CD 44 UI..U.E%.D'..#.D
0001B0: 27 CD 73 39 C2 C2 49 3E 5F CD 70 3B CD 99 39 CA '.s9..I>_.p;..9.
0001C0: D0 55 AF CD AD 27 3E C1 CD F0 2B 32 D6 56 CD 73 .U...'>...+2.V.s
0001D0: 39 CA E0 49 11 7E 56 CD B1 37 C2 C8 55 C3 62 4B 9..I.~V..7..U.bK
0001E0: 3E 23 CD 70 3B 3E 24 CD 70 3B CD E3 1C 01 01 02 >#.p;>$.p;......
0001F0: CD F8 36 21 00 00 22 04 57 21 00 00 22 00 57 2A ..6!..".W!..".W*
Size : 512 (Real : 512)
000000: 21 1E 45 C3 C7 3B CD 70 3B C3 37 5B 3A 6F 44 FE !.E..;.p;.7[:oD.
000010: 01 CA 37 5B 3E 4D CD 70 3B CD 1B 36 CD 63 39 EB ..7[>M.p;..6.c9.
000020: CD 92 39 EB CD D8 36 4D 0D FA 32 5B CD 7E 36 C3 ..9...6M..2[.~6.
000030: 28 5B 3E 3F CD E8 35 CD 61 27 AF 32 6F 44 CD 92 ([>?..5.a'.2oD..
000040: 39 CD 73 39 B7 FA 7D 4C CD 0B 3A 3A 5C 44 B7 CA 9.s9..}L..::\D..
000050: 74 5B 3A 5D 44 32 DA 5F 21 DA 5F 35 FA 74 5B 3E t[:]D2._!._5.t[>
000060: 30 CD 70 3B 3A DA 5F 21 5E 44 CD BB 36 7E CD C4 0.p;:._!^D..6~..
000070: 25 C3 58 5B 3A 5D 01 B7 CA 7E 44 3E 5B CD 70 3B %.X[:]...~D>[.p;
000080: CD 42 38 DA 7E 44 CA 00 45 3E 5C CD 70 3B 21 7E .B8.~D..E>\.p;!~
000090: 99 CD 78 35 CA 00 45 3E 5D CD 70 3B 21 C6 99 CD ..x5..E>].p;!...
0000A0: 78 35 CD 92 39 11 7E 99 01 C6 99 CD A2 38 DA 89 x5..9.~......8..
0000B0: 5B CD 0B 3A 3E 5E CD 70 3B CD 42 38 DA 7E 44 C2 [..:>^.p;.B8.~D.
0000C0: 89 5B 31 BC 96 CD 92 39 C3 96 45 04 02 01 13 05 .[1....9..E.....
0000D0: E0 E8 03 E9 E0 F1 F9 F8 F1 E0 13 03 04 10 E0 00 ................
0000E0: 00 00 00 00 00 00 00 00 00 53 54 4F 52 45 00 90 .........STORE..
0000F0: 59 3F 00 2D 53 45 4C 53 45 00 6F 50 45 4E 44 44 Y?.-SELSE.oPENDD
000100: 4F 00 82 50 45 4E 44 49 46 00 00 45 44 4F 00 92 O..PENDIF..EDO..
000110: 4F 4E 4F 54 45 00 00 45 4C 4F 4F 50 00 82 50 52 ONOTE..ELOOP..PR
000120: 45 4C 45 41 53 45 00 12 56 52 45 54 55 52 4E 00 ELEASE..VRETURN.
000130: 70 56 53 45 4C 45 43 54 00 C3 56 40 00 29 49 41 pVSELECT..V@.)IA
000140: 43 43 45 50 54 00 46 48 41 50 50 45 4E 44 00 E0 CCEPT.FHAPPEND..
000150: 48 43 41 4C 4C 00 5F 4C 43 41 4E 43 45 4C 00 7D HCALL._LCANCEL.}
000160: 4C 43 48 41 4E 47 45 00 8D 4C 43 4C 45 41 52 00 LCHANGE..LCLEAR.
000170: 98 4C 43 4F 50 59 00 ED 4C 43 4F 55 4E 54 00 F8 .LCOPY..LCOUNT..
000180: 4C 43 52 45 41 54 45 00 03 4D 44 45 4C 45 54 45 LCREATE..MDELETE
000190: 00 0B 4D 44 49 53 50 4C 41 59 00 AF 4D 43 4F 4E ..MDISPLAY..MCON
0001A0: 54 49 4E 55 45 00 DB 52 45 44 49 54 00 64 50 45 TINUE..REDIT.dPE
0001B0: 4A 45 43 54 00 93 50 45 52 41 53 45 00 AE 50 47 JECT..PERASE..PG
0001C0: 4F 54 4F 00 11 51 47 4F 00 11 51 48 45 4C 50 00 OTO..QGO..QHELP.
0001D0: 8A 51 49 46 00 92 51 46 49 4E 44 00 B4 50 49 4E .QIF..QFIND..PIN
0001E0: 44 45 58 00 AF 51 49 4E 50 55 54 00 C9 51 49 4E DEX..QINPUT..QIN
0001F0: 53 45 52 54 00 3A 52 4C 49 53 54 00 4D 52 4C 4F SERT.:RLIST.MRLO
Size : 512 (Real : 512)
000000: 00 57 23 22 00 57 CD 1B 36 CD 7E 36 2A 00 57 2B .W#".W..6.~6*.W+
000010: 29 29 29 29 EB CD E3 1C 19 22 02 57 EB 3A 00 57 )))).....".W.:.W
000020: FE 21 D2 19 4B CD 42 36 CD 72 36 CD 99 39 CD 63 .!..K.B6.r6..9.c
000030: 39 CA 19 4B 01 10 00 62 6B CD F8 36 36 0D CD 63 9..K...bk..66..c
000040: 39 CD F1 2A 7E FE 2C C2 7D 4C CD E3 1C EB CD 63 9..*~.,.}L.....c
000050: 39 CD 11 27 CA 7D 4C 2A 02 57 EB CD 63 39 0E 00 9..'.}L*.W..c9..
000060: D5 7E FE 2C CA 76 4A CD 84 36 DA 6F 4A E6 5F 12 .~.,.vJ..6.oJ._.
000070: 0C 13 23 C3 61 4A D1 79 B7 CA 7D 4C CA 7D 4C FE ..#.aJ.y..}L.}L.
000080: 0B D2 7D 4C CD 8E 39 21 0B 00 19 EB CD 69 39 E6 ..}L..9!.....i9.
000090: 5F 32 DF 56 FE 43 CA B0 4A FE 4E CA B0 4A FE 4C _2.V.C..J.N..J.L
0000A0: C2 85 4C 12 13 3E 01 12 13 13 13 AF 12 C3 00 4B ..L..>.........K
0000B0: 12 13 D5 CD 69 39 CD 69 39 CD FF 37 DA 8D 4C 7B ....i9.i9..7..L{
0000C0: B7 CA 8D 4C 7A B7 C2 8D 4C 7B 3C CA 8D 4C 3D D1 ...Lz...L{<..L=.
0000D0: 12 13 13 13 3A DF 56 FE 4E C2 00 4B CD 8E 39 CD ....:.V.N..K..9.
0000E0: 63 39 CA 00 4B FE 2C C2 95 4C CD 69 39 D5 CD FF c9..K.,..L.i9...
0000F0: 37 DA 95 4C CD 8E 39 CD 63 39 C2 95 4C 7B D1 12 7..L..9.c9..L{..
000100: 1B 1B 1B 1A 2A 04 57 CD BB 36 11 E8 03 CD C0 36 ....*.W..6.....6
000110: DA 9D 4C 22 04 57 C3 FF 49 3E 0D 12 2A 00 57 2B ..L".W..I>..*.W+
000120: 7C B5 CA A5 4C 21 00 00 CD 2E 2C CD FF 2E CD D4 |...L!....,.....
000130: 26 CD 45 25 3E 25 CD 70 3B CD 42 38 CA D0 55 3E &.E%>%.p;.B8..U>
000140: 41 CD F0 2B CD B5 2D CD D4 26 CD D8 2C CD 07 2E A..+..-..&..,...
000150: CD 16 51 D2 50 4B CD D4 26 CD FF 2E CD 45 25 C3 ..Q.PK..&....E%.
000160: D0 55 CD 8E 39 CD 73 39 AF CD AD 27 DA D3 4C AF .U..9.s9...'..L.
000170: CD F0 2B DA D3 4C CD B5 2D CD E3 1C 11 C6 99 01 ..+..L..-.......
000180: 01 02 CD 7E 38 CD E3 1C 22 EE 56 01 09 02 CD F8 ...~8...".V.....
000190: 36 21 00 00 22 04 57 2A EE 56 EB CD 37 2C DA 54 6!..".W*.V..7,.T
0001A0: 4C CD DC 1C 7E FE 20 C2 97 4B 23 CD 8E 39 CD 63 L...~. ..K#..9.c
0001B0: 39 CD F1 2A 0E 0A CD 63 39 FE 20 C2 BF 4B AF 12 9..*...c9. ..K..
0001C0: 13 CD 69 39 0D C2 B9 4B AF 12 13 CD 63 39 E6 5F ..i9...K....c9._
0001D0: FE 43 CA EC 4B FE 4E CA EC 4B FE 4C C2 B3 4C 12 .C..K.N..K.L..L.
0001E0: 13 3E 01 12 13 13 13 AF 12 C3 31 4C 12 13 D5 CD .>........1L....
0001F0: 69 39 11 C8 56 0E 03 CD 78 38 CD 8E 39 21 C8 56 i9..V...x8..9!.V
Size : 512 (Real : 512)
000000: 56 CD BB 36 36 00 AF 32 1E 9E 3A E0 56 B7 C8 21 V..66..2..:.V..!
000010: 7E 97 CD 20 0B 3A DC 56 B7 C8 21 BB 9D 3A 4A 56 ~.. .:.V..!..:JV
000020: FE 4E C2 ED 54 7E B7 CA 33 54 FE 2E CA 33 54 23 .N..T~..3T...3T#
000030: C3 25 54 22 00 57 21 C7 9B 7E B7 CA 47 54 FE 2E .%T".W!..~..GT..
000040: CA 47 54 23 C3 39 54 22 04 57 EB 2A 00 57 1B 2B .GT#.9T".W.*.W.+
000050: 7E B7 CA A8 54 FE 24 CA 90 54 FE 2A CA 90 54 FE ~...T.$..T.*..T.
000060: 23 CA 9A 54 FE 39 CA 9A 54 FE 2C C2 4F 54 1A B7 #..T.9..T.,.OT..
000070: CA 7D 54 FE 2D CA 9A 54 FE 20 C2 4F 54 2B 7E FE .}T.-..T. .OT+~.
000080: 24 CA 8B 54 FE 2A CA 8B 54 3E 20 23 77 C3 4F 54 $..T.*..T> #w.OT
000090: 1A B7 CA 4F 54 FE 20 CA 4F 54 1A B7 CA A3 54 77 ...OT. .OT....Tw
0000A0: C3 4E 54 36 20 C3 4F 54 2A 04 57 EB 2A 00 57 7E .NT6 .OT*.W.*.W~
0000B0: B7 CA 25 55 1A B7 CA D4 54 13 23 1A B7 CA D4 54 ..%U....T.#....T
0000C0: 7E B7 CA 25 55 FE 23 CA CF 54 FE 39 C2 BA 54 1A ~..%U.#..T.9..T.
0000D0: 77 C3 B9 54 7E B7 CA 25 55 FE 23 CA E7 54 FE 39 w..T~..%U.#..T.9
0000E0: CA E7 54 23 C3 D4 54 36 30 23 C3 D4 54 21 BB 9D ..T#..T60#..T!..
0000F0: 11 C7 9B 7E B7 CA 25 55 FE 58 C2 08 55 1A B7 CA ...~..%U.X..U...
000100: 1F 55 77 13 23 C3 F3 54 FE 39 CA 12 55 FE 23 C2 .Uw.#..T.9..U.#.
000110: 1A 55 1A CD AB 36 DA 1F 55 77 13 23 C3 F3 54 36 .U...6..Uw.#..T6
000120: 20 23 C3 F3 54 21 BB 9D 22 CE 56 C9 3E 56 CD 70 #..T!..".V.>V.p
000130: 3B 3E 01 32 6F 44 C3 D0 55 22 C4 56 CD AC 06 21 ;>.2oD..U".V...!
000140: 9F 56 CD 2B 36 EB CD 35 36 21 00 01 22 E1 56 2A .V.+6..56!..".V*
000150: C4 56 11 0C 00 19 4E 06 00 21 0C 00 09 3A 54 01 .V....N..!...:T.
000160: 5F 16 00 0E 00 0C CD D8 36 D2 65 55 79 32 FB 56 _.......6.eUy2.V
000170: 2A E1 56 84 4F 3A 55 01 B9 D8 21 B9 56 01 0A 00 *.V.O:U...!.V...
000180: 3E 20 CD FA 36 2A C4 56 11 B9 56 7E B7 CA 96 55 > ..6*.V..V~...U
000190: 12 13 23 C3 8B 55 11 B9 56 2A E1 56 44 4D 21 C4 ..#..U..V*.VDM!.
0001A0: 56 CD 72 06 2A E1 56 3A FB 56 84 67 22 E1 56 2A V.r.*.V:.V.g".V*
0001B0: C4 56 11 10 00 19 22 C4 56 7E FE 0D C2 4F 55 C9 .V....".V~...OU.
0001C0: 3E 01 32 6F 44 C3 D0 55 3E FF 32 6F 44 C3 D0 55 >.2oD..U>.2oD..U
0001D0: CD B5 06 3E 01 21 00 45 C3 C7 3B 54 54 54 40 40 ...>.!.E..;TTT@@
0001E0: C8 84 82 A6 8A 40 92 92 40 40 50 86 52 40 62 72 .....@..@@P.R@br
0001F0: 70 62 40 40 A6 86 88 A0 40 40 40 40 AC CA E4 40 pb@@....@@@@...@
Size : 512 (Real : 512)
000000: CD FF 37 DA C3 4C 7B B7 CA 95 4C 7A B7 C2 95 4C ..7..L{...Lz...L
000010: 7B D1 12 13 13 13 CD 63 39 D5 11 C8 56 0E 03 CD {......c9...V...
000020: 78 38 CD 8E 39 21 C8 56 CD FF 37 DA BB 4C 7B D1 x8..9!.V..7..L{.
000030: 12 1B 1B 1B 1A 2A 04 57 CD BB 36 11 E8 03 CD C0 .....*.W..6.....
000040: 36 DA CB 4C 22 04 57 11 10 00 2A EE 56 19 22 EE 6..L".W...*.V.".
000050: 56 C3 97 4B CD 45 25 2A EE 56 36 0D 21 00 00 CD V..K.E%*.V6.!...
000060: 2E 2C 3A D6 56 CD 40 27 CD A8 2D CD FF 2E CD D4 .,:.V.@'..-.....
000070: 26 CD 44 27 CD B5 2D CD D8 2C C3 D0 55 3E 1C CD &.D'..-..,..U>..
000080: 70 3B C3 06 4A 3E 1D CD 70 3B C3 06 4A 3E 1F CD p;..J>..p;..J>..
000090: 70 3B C3 06 4A 3E 1E CD 70 3B C3 06 4A 3E 79 CD p;..J>..p;..J>y.
0000A0: 70 3B C3 06 4A CD 45 25 CD 03 27 3E 32 CD 70 3B p;..J.E%..'>2.p;
0000B0: C3 D0 55 3E 1D CD 70 3B C3 C0 55 3E 1F CD 70 3B ..U>..p;..U>..p;
0000C0: C3 C0 55 3E 1E CD 70 3B C3 C0 55 3E 79 CD 70 3B ..U>..p;..U>y.p;
0000D0: C3 C0 55 3E 28 CD 70 3B C3 C0 55 CD 3C 29 21 00 ..U>(.p;..U.<)!.
0000E0: 00 22 F7 56 CD 99 2C 7C B5 CA D0 55 22 E6 56 CD .".V..,|...U".V.
0000F0: E3 1C 22 E3 56 3E FF 32 DE 56 CD 73 39 C2 37 4D ..".V>.2.V.s9.7M
000100: AF 32 DE 56 3A 09 01 B7 C2 10 4D 3E 2E CD 70 3B .2.V:.....M>..p;
000110: 3A DE 56 B7 C2 D0 55 3A 09 01 B7 C2 26 4D 3E 5A :.V...U:....&M>Z
000120: CD 70 3B C3 2B 4D 3E 7D CD 70 3B CD 99 39 C2 37 .p;.+M>}.p;..9.7
000130: 4D CD B5 06 C3 D0 55 CD 63 39 FE 20 DA D0 55 CD M.....U.c9. ..U.
000140: FF 37 CD 8E 39 CD 2A 2C EB CD C0 36 DA E4 4E EB .7..9.*,...6..N.
000150: CD 73 39 EB 7C B5 C2 5C 4D 2A E6 56 22 E6 56 CD .s9.|..\M*.V".V.
000160: 9D 27 2A E6 56 CD DE 1F 3A 09 01 B7 CA 44 4E CD .'*.V...:....DN.
000170: E3 1C 22 FC 56 3A 72 44 B7 CA 9F 4D CD 47 52 AF ..".V:rD...M.GR.
000180: 47 CD 1D 02 B7 FA 10 4D 47 0F D2 90 4D CD 3A 4E G......MG...M.:N
000190: 78 E6 04 CA 10 4D 78 E6 02 CA EC 4D C3 CE 4D 2A x....Mx....M..M*
0001A0: E6 56 EB 2A FC 56 CD 39 55 3E 01 06 00 CD 1D 02 .V.*.V.9U>......
0001B0: B7 FA 10 4D 47 0F D2 BC 4D CD 3A 4E 78 E6 04 CA ...MG...M.:Nx...
0001C0: 10 4D 78 E6 08 CA FB 4D 78 E6 02 CA EC 4D CD 9F .Mx....Mx....M..
0001D0: 24 CA DD 4D CD 5A 22 DA 10 4D C3 5C 4D 2A E6 56 $..M.Z"..M.\M*.V
0001E0: 2B 22 E6 56 7C B5 CA 10 4D C3 5C 4D CD 9F 24 CA +".V|...M.\M..$.
0001F0: 2A 4E CD E9 21 DA 10 4D C3 5C 4D 78 E6 02 CA 18 *N..!..M.\Mx....
Size : 512 (Real : 512)
000000: 64 5C 2C 00 00 00 00 00 00 00 00 00 00 00 00 00 d\,.............
000010: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000020: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000030: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 46 ...............F
000040: 56 3E 14 C3 37 5B E5 CD 63 39 CD 15 C7 9B 53 42 V>..7[..c9....SB
000050: 45 46 4F 52 45 00 42 4C 41 4E 4B 00 43 48 41 4E EFORE.BLANK.CHAN
000060: 47 45 3F 20 00 44 45 4C 49 4D 49 54 45 44 00 54 GE? .DELIMITED.T
000070: 4F 3A 20 20 20 20 20 00 46 49 45 4C 44 00 46 52 O: .FIELD.FR
000080: 4F 4D 00 47 45 54 00 50 49 43 54 55 52 45 00 52 OM.GET.PICTURE.R
000090: 45 43 4F 52 44 20 00 53 41 59 00 53 44 46 00 52 ECORD .SAY.SDF.R
0000A0: 45 43 4F 52 44 20 23 20 00 54 4F 20 20 20 20 20 ECORD # .TO
0000B0: 20 20 00 55 53 49 4E 47 00 00 45 3E 03 21 12 45 .USING..E>.!.E
0000C0: C3 C7 3B 00 73 39 00 00 00 00 00 00 C2 D6 56 AF ..;.s9........V.
0000D0: CD 89 2E C3 00 45 11 82 5E CD B1 37 00 14 5B 3E .....E..^..7..[>
0000E0: 00 CD 89 2E C3 00 45 CD 73 39 11 D8 5E 01 32 54 ......E.s9..^.2T
0000F0: 4F 3A 20 20 20 20 20 00 46 49 45 4C 44 00 46 52 O: .FIELD.FR
000100: C3 24 45 C3 38 4A C3 B4 4B C3 CC 4C C3 27 4F C3 .$E.8J..K..L.'O.
000110: D9 4F C3 A0 50 C3 8E 51 C3 FA 51 C3 8F 52 C3 59 .O..P..Q..Q..R.Y
000120: 53 C3 B9 53 CD DD 25 AF 32 5F 56 32 5D 56 32 5E S..S..%.2_V2]V2^
000130: 56 32 5A 56 32 5B 56 32 5C 56 CD E3 1C 11 C6 99 V2ZV2[V2\V......
000140: 01 01 02 CD 7E 38 21 7E 97 22 71 56 CD 73 39 CA ....~8!~."qV.s9.
000150: 5B 46 CD E9 25 DA 48 54 CD 73 39 CA 5B 46 11 AC [F..%.HT.s9.[F..
000160: 55 CD B1 37 C2 7C 45 22 61 56 CD 8E 39 AF CD AD U..7.|E"aV..9...
000170: 27 DA 23 4A 3E FF 32 5F 56 C3 4C 45 11 62 55 CD '.#J>.2_V.LE.bU.
000180: B1 37 C2 ED 45 3E FF 32 5D 56 CD 8E 39 21 C6 99 .7..E>.2]V..9!..
000190: 36 0D 22 73 56 CD 73 39 CD F1 2A C2 A3 45 3E 14 6."sV.s9..*..E>.
0001A0: C3 2A 4A E5 CD 63 39 CD 92 28 E5 CA B3 45 3E 52 .*J..c9..(...E>R
0001B0: C3 2A 4A 0E 10 EB 2A 73 56 EB CD 78 38 21 10 00 .*J...*sV..x8!..
0001C0: 19 36 0D 22 73 56 E1 D5 EB 2A 71 56 36 2D 23 CD .6."sV...*qV6-#.
0001D0: E4 36 D1 CD E4 36 36 35 22 71 56 E1 CD 8E 39 CD .6...665"qV...9.
0001E0: 73 39 FE 2C C2 4C 45 CD 69 39 C3 95 45 11 A2 55 s9.,.LE.i9..E..U
0001F0: CD B1 37 C2 15 46 3E FF 32 5E 56 CD 8E 39 CD 73 ..7..F>.2^V..9.s
Size : 512 (Real : 512)
000000: 4E CD E3 1C EB 2A FC 56 CD C0 36 D2 CE 4D 11 F0 N....*.V..6..M..
000010: FF 19 22 FC 56 C3 75 4D 2A C4 56 7E FE 0D CA EC ..".V.uM*.V~....
000020: 4D 2A C4 56 22 FC 56 C3 75 4D CD 37 2C DA 10 4D M*.V".V.uM.7,..M
000030: 2A E6 56 23 22 E6 56 C3 5C 4D CD E7 1C CD D3 2E *.V#".V.\M......
000040: CD 83 21 C9 CD 63 39 CA CF 4E FE 2C C2 10 4D CD ..!..c9..N.,..M.
000050: 69 39 FE 2C CA AA 4E FE 3A D2 90 4E FE 30 DA AA i9.,..N.:..N.0..
000060: 4E CD FF 37 CD 8E 39 DA 10 4D 7A B7 C2 10 4D 7B N..7..9..Mz...M{
000070: FE 21 D2 10 4D EB 2B 29 29 29 29 EB CD E3 1C 19 .!..M.+)))).....
000080: 7E B7 CA 10 4D FE 0D CA 10 4D 22 E3 56 C3 AA 4E ~...M....M".V..N
000090: CD 63 39 CD F1 2A CA 10 4D E5 CD 63 39 CD 92 28 .c9..*..M..c9..(
0000A0: 22 E3 56 E1 C2 10 4D CD 8E 39 CD 63 39 CA CF 4E ".V...M..9.c9..N
0000B0: CD 69 39 E5 0E FF AF CD 13 37 D1 CD D8 36 4D CD .i9......7...6M.
0000C0: 63 39 EB 2A E3 56 CD AC 4F DA 10 4D C3 DB 4E 2A c9.*.V..O..M..N*
0000D0: E3 56 CD F5 4F DA D0 55 CA 10 4D CD E7 1C CD D3 .V..O..U..M.....
0000E0: 2E C3 10 4D 3E 0C CD 70 3B C3 D0 55 CD 3C 29 AF ...M>..p;..U.<).
0000F0: 32 D8 56 32 D7 56 CD 73 39 CA 24 4F 11 4F 56 CD 2.V2.V.s9.$O.OV.
000100: B1 37 C2 10 4F 3E FF 32 D7 56 CD 8E 39 C3 F6 4E .7..O>.2.V..9..N
000110: 11 56 56 CD B1 37 C2 C8 55 3E FF 32 D8 56 CD 8E .VV..7..U>.2.V..
000120: 39 C3 F6 4E CD 9F 24 B7 C2 0F 45 CD 99 2C 3A D7 9..N..$...E..,:.
000130: 56 B7 C2 36 4F 23 22 06 57 22 04 57 CD 0C 2C CD V..6O#".W".W..,.
000140: 84 29 44 4D 11 C7 9B CD 7A 2C DA A1 4F 2A 06 57 .)DM....z,..O*.W
000150: CD 0C 2C 3A D8 56 B7 CA 63 4F CD 07 2E CD D3 2E ..,:.V..cO......
000160: C3 69 4F CD 16 51 DA D0 55 11 C7 9B CD DC 1C EB .iO..Q..U.......
000170: CD 7E 38 11 C7 9B CD 7A 2C F5 2A 06 57 23 22 06 .~8....z,.*.W#".
000180: 57 CD 0C 2C CD D3 2E F1 D2 69 4F CD 2A 2C 23 CD W..,.....iO.*,#.
000190: 2E 2C CD D4 26 CD D8 2C 2A 04 57 CD 9D 27 C3 D0 .,..&..,*.W..'..
0001A0: 55 3E 35 CD 70 3B CD D8 2C C3 D0 55 C5 D5 11 0B U>5.p;..,..U....
0001B0: 00 19 7E FE 4E CA D8 4F 23 79 3D BE D2 EC 4F C5 ..~.N..O#y=...O.
0001C0: 4E 23 CD DF 36 54 5D 06 00 3E 20 CD FA 36 C1 E1 N#..6T]..> ..6..
0001D0: D5 CD 78 38 D1 C1 B7 C9 E3 CD 9F 32 E3 23 46 23 ..x8.......2.#F#
0001E0: CD E9 36 4E EB CD 4D 33 B7 D1 C1 C9 3E 15 CD 70 ..6N..M3....>..p
0001F0: 3B 37 D1 C1 C9 C5 D5 22 E9 56 11 0B 00 19 56 23 ;7.....".V....V#
Size : 512 (Real : 512)
000000: 39 11 59 55 CD B1 37 C2 4C 45 3E FF 32 5C 56 CD 9.YU..7.LE>.2\V.
000010: 8E 39 C3 4C 45 11 12 56 CD B1 37 C2 29 46 3E FF .9.LE..V..7.)F>.
000020: 32 5A 56 CD 8E 39 C3 4C 45 11 2A 55 CD B1 37 C2 2ZV..9.LE.*U..7.
000030: 48 54 3E FF 32 5A 56 32 5B 56 CD 8E 39 CD 73 39 HT>.2ZV2[V..9.s9
000040: 11 C0 55 CD B1 37 C2 4C 45 CD 8E 39 CD 73 39 CA ..U..7.LE..9.s9.
000050: 48 54 32 4F 56 CD 69 39 C3 4C 45 3A 5F 56 B7 CA HT2OV.i9.LE:_V..
000060: 28 4A 2A 61 56 CD 8E 39 3A 5A 56 B7 C2 73 46 AF (J*aV..9:ZV..sF.
000070: C3 75 46 3E 04 CD AD 27 3E C1 CD F0 2B CD 3C 27 .uF>...'>...+.<'
000080: 32 4D 44 3A 5A 56 B7 C2 BA 46 21 BE 99 AF 36 02 2MD:ZV...F!...6.
000090: 23 77 23 77 23 EB CD E3 1C 2B 2B 2B 2B 2B 0E 03 #w#w#....+++++..
0000A0: CD 78 38 3A 5C 56 B7 C2 5C 49 01 09 02 11 BE 99 .x8:\V..\I......
0000B0: CD C4 2E 3A 5E 56 B7 C2 DF 49 CD 61 27 01 C7 9B ...:^V...I.a'...
0000C0: 21 C6 99 CD 75 25 21 FF FF CD 5B 26 21 00 00 22 !...u%!...[&!.."
0000D0: 73 56 DA CA 49 21 64 00 22 6F 56 CD 99 2C 7C B5 sV..I!d."oV..,|.
0000E0: CA CA 49 CD 78 27 CA 50 49 DA CA 49 CD DC 1C CA ..I.x'.PI..I....
0000F0: 50 49 2A 73 56 23 22 73 56 2A 6F 56 2B 22 6F 56 PI*sV#"sV*oV+"oV
000100: 7C B5 C2 20 47 3A 7D 44 B7 CA 20 47 2A 73 56 CD |.. G:}D.. G*sV.
000110: 1B 36 CD 35 36 3E 27 CD 70 3B 21 64 00 22 6F 56 .6.56>'.p;!d."oV
000120: 3A 5D 56 B7 CA 2D 48 3A 5B 56 B7 C2 47 47 2A C4 :]V..-H:[V..GG*.
000130: 99 44 4D 21 C7 9B 3E 20 CD FA 36 21 7E 97 CD 20 .DM!..> ..6!~..
000140: 0B 11 C7 9B C3 31 48 21 7E 97 22 6C 56 21 C7 9B .....1H!~."lV!..
000150: 22 77 56 0E 00 2A 6C 56 7E FE 35 CA 13 48 23 CD "wV..*lV~.5..H#.
000160: E9 36 23 23 22 6C 56 EB 11 0B 00 19 7E FE 4E CA .6##"lV.....~.N.
000170: C5 47 23 46 23 CD E9 36 2A 77 56 79 B7 CA 83 47 .G#F#..6*wVy...G
000180: 36 2C 23 3A 4F 56 FE 2C CA 8D 47 77 23 EB CD 71 6,#:OV.,..Gw#..q
000190: 38 EB 78 CD BB 36 2B 7E FE 20 C2 A1 47 05 C2 96 8.x..6+~. ..G...
0001A0: 47 23 3A 4F 56 FE 2C CA B2 47 77 23 22 77 56 C3 G#:OV.,..Gw#"wV.
0001B0: 0F 48 2B 7E FE 20 C2 BE 47 2B 05 C2 B3 47 23 22 .H+~. ..G+...G#"
0001C0: 77 56 C3 0F 48 23 46 23 CD E9 36 2A 77 56 79 B7 wV..H#F#..6*wVy.
0001D0: CA D6 47 36 2C 23 EB 3A 4F 56 FE 2C CA ED 47 CD ..G6,#.:OV.,..G.
0001E0: 71 38 EB 78 CD BB 36 22 77 56 C3 0F 48 7E 23 FE q8.x..6"wV..H~#.
0001F0: 20 C2 FB 47 05 CA 08 48 C3 ED 47 12 13 05 C2 ED ..G...H..G.....
Size : 512 (Real : 512)
000000: 7E 32 E8 56 23 CD DF 36 22 F2 56 7A FE 43 CA 31 ~2.V#..6".Vz.C.1
000010: 50 CD DB 50 21 6F 56 CD 28 36 CD 99 39 CA 0A 51 P..P!oV.(6..9..Q
000020: 4F CD 63 39 EB 2A E9 56 CD AC 4F DA 11 50 C3 04 O.c9.*.V..O..P..
000030: 51 E5 01 00 01 21 C7 9B CD F8 36 AF 32 E5 56 E1 Q....!....6.2.V.
000040: E5 3A E8 56 47 11 C7 9B CD 71 38 21 C7 9B 22 F2 .:.VG....q8!..".
000050: 56 CD DB 50 21 5C 56 CD 28 36 21 C6 99 CD 78 35 V..P!\V.(6!...x5
000060: CA B3 50 3A C6 99 FE 1B CA FF 50 FE 19 CA 93 50 ..P:......P....P
000070: 21 A9 56 CD 28 36 21 F3 9C CD 78 35 21 C7 9B 11 !.V.(6!...x5!...
000080: C6 99 01 F3 9C CD A2 38 DA 0E 51 3E FF 32 E5 56 .......8..Q>.2.V
000090: C3 51 50 01 00 01 21 C7 9B CD F8 36 21 A9 56 CD .QP...!....6!.V.
0000A0: 28 36 21 C7 9B CD 78 35 CA B3 50 3E FF 32 E5 56 (6!...x5..P>.2.V
0000B0: C3 51 50 E1 3A E5 56 B7 CA 0A 51 3A E8 56 47 11 .QP.:.V...Q:.VG.
0000C0: C7 9B 1A B7 CA D1 50 77 23 13 05 C2 C2 50 C3 04 ......Pw#....P..
0000D0: 51 36 20 23 05 C2 D1 50 C3 04 51 2A E9 56 CD 1B Q6 #...P..Q*.V..
0000E0: 36 CD 28 36 3E 3A CD E8 35 CD 7E 36 2A F2 56 3A 6.(6>:..5.~6*.V:
0000F0: E8 56 5F 7E B7 C8 CD E8 35 23 1D C2 F3 50 C9 E1 .V_~....5#...P..
000100: D1 C1 37 C9 3E 01 B7 D1 C1 C9 AF D1 C1 C9 3E 11 ..7.>.........>.
000110: CD 70 3B C3 51 50 C5 D5 CD E3 1C 22 F9 56 CD 99 .p;.QP.....".V..
000120: 2C 7C B5 CA 2D 51 3A 54 44 B7 C2 30 51 CD 07 2E ,|..-Q:TD..0Q...
000130: 3A 09 01 B7 CA DE 51 3E 83 32 F4 56 AF 32 ED 56 :.....Q>.2.V.2.V
000140: CD E3 1C 22 FC 56 3A 72 44 B7 CA 66 51 CD 47 52 ...".V:rD..fQ.GR
000150: 3E 80 06 00 CD 1D 02 B7 FA 43 52 0F D2 43 52 CD >........CR..CR.
000160: D3 2E D1 C1 B7 C9 CD 99 2C 23 EB 2A FC 56 CD 39 ........,#.*.V.9
000170: 55 3A F4 56 06 00 CD 1D 02 B7 FA 43 52 47 E6 01 U:.V.......CRG..
000180: 4F 3A ED 56 B1 32 ED 56 78 E6 08 C2 CC 51 78 E6 O:.V.2.Vx....Qx.
000190: 02 CA B0 51 CD E3 1C EB 2A FC 56 CD C0 36 D2 CC ...Q....*.V..6..
0001A0: 51 11 F0 FF 19 22 FC 56 3E 03 32 F4 56 C3 66 51 Q....".V>.2.V.fQ
0001B0: 78 0F D2 CC 51 2A C4 56 7E FE 0D CA CC 51 2A C4 x...Q*.V~....Q*.
0001C0: 56 22 FC 56 3E 03 32 F4 56 C3 66 51 3A ED 56 0F V".V>.2.V.fQ:.V.
0001D0: D2 DA 51 CD D3 2E D1 C1 B7 C9 D1 C1 37 C9 CD 1B ..Q.........7...
0001E0: 36 21 8F 56 CD 28 36 CD 99 2C 23 CD 35 36 CD 1B 6!.V.(6..,#.56..
0001F0: 36 06 00 2A F9 56 CD 1B 36 C5 01 0A 00 CD 13 2C 6..*.V..6......,
Size : 512 (Real : 512)
000000: 47 EB 22 77 56 C3 0F 48 EB 36 30 23 22 77 56 0C G."wV..H.60#"wV.
000010: C3 55 47 11 C7 9B 2A 77 56 36 0D 23 36 0A 23 CD .UG...*wV6.#6.#.
000020: D8 36 44 4D 3A 4D 44 CD D1 25 C3 50 49 CD DC 1C .6DM:MD..%.PI...
000030: EB 3A 5A 56 B7 C2 4C 48 2A C4 99 44 4D 3A 4D 44 .:ZV..LH*..DM:MD
000040: CD 40 27 CD C4 2E CD 61 27 C3 50 49 3A 5B 56 B7 .@'....a'.PI:[V.
000050: C2 6D 48 2A C4 99 19 36 0D 23 36 0A 3A 4D 44 2A .mH*...6.#6.:MD*
000060: C4 99 44 4D 03 03 13 CD D1 25 C3 50 49 21 C7 9B ..DM.....%.PI!..
000070: 22 77 56 CD E3 1C 22 71 56 0E 00 2A 71 56 7E FE "wV..."qV..*qV~.
000080: 0D CA 39 49 11 0B 00 19 7E FE 4E CA E1 48 23 46 ..9I....~.N..H#F
000090: 23 CD E9 36 2A 77 56 79 B7 CA 9F 48 36 2C 23 3A #..6*wVy...H6,#:
0000A0: 4F 56 FE 2C CA A9 48 77 23 EB CD 71 38 EB 78 CD OV.,..Hw#..q8.x.
0000B0: BB 36 2B 7E FE 20 C2 BD 48 05 C2 B2 48 23 3A 4F .6+~. ..H...H#:O
0000C0: 56 FE 2C CA CE 48 77 23 22 77 56 C3 2B 49 2B 7E V.,..Hw#"wV.+I+~
0000D0: FE 20 C2 DA 48 2B 05 C2 CF 48 23 22 77 56 C3 2B . ..H+...H#"wV.+
0000E0: 49 23 46 23 CD E9 36 2A 77 56 79 B7 CA F2 48 36 I#F#..6*wVy...H6
0000F0: 2C 23 EB 3A 4F 56 FE 2C CA 09 49 CD 71 38 EB 78 ,#.:OV.,..I.q8.x
000100: CD BB 36 22 77 56 C3 2B 49 7E 23 FE 20 C2 17 49 ..6"wV.+I~#. ..I
000110: 05 CA 24 49 C3 09 49 12 13 05 C2 09 49 EB 22 77 ..$I..I.....I."w
000120: 56 C3 2B 49 EB 36 30 23 22 77 56 2A 71 56 11 10 V.+I.60#"wV*qV..
000130: 00 19 22 71 56 0C C3 7B 48 11 C7 9B 2A 77 56 36 .."qV..{H...*wV6
000140: 0D 23 36 0A 23 CD D8 36 44 4D 3A 4D 44 CD D1 25 .#6.#..6DM:MD..%
000150: CD 47 2B CA CA 49 D2 E3 46 C3 CA 49 21 C5 55 11 .G+..I..F..I!.U.
000160: C6 99 01 41 00 CD 7E 38 01 09 02 11 BE 99 CD C4 ...A..~8........
000170: 2E CD E3 1C 22 67 56 21 00 00 22 73 56 2A 67 56 ...."gV!.."sV*gV
000180: 7E FE 0D CA CA 49 11 C7 9B 3E 20 12 13 06 0A 7E ~....I...> ....~
000190: B7 C2 96 49 3E 20 12 23 13 05 C2 8F 49 23 7E 12 ...I> .#....I#~.
0001A0: 13 23 7E CD 63 54 23 23 23 7E CD 63 54 11 10 00 .#~.cT###~.cT...
0001B0: 2A 67 56 19 22 67 56 01 12 00 11 C7 9B CD C4 2E *gV."gV.........
0001C0: 2A 73 56 23 22 73 56 C3 7D 49 3A 7D 44 B7 CA DF *sV#"sV.}I:}D...
0001D0: 49 2A 73 56 CD 1B 36 CD 35 36 3E 27 CD 70 3B 3A I*sV..6.56>'.p;:
0001E0: 4D 44 CD 40 27 CD D4 26 3A 5C 56 B7 C2 FD 49 3A MD.@'..&:\V...I:
0001F0: 5E 56 B7 C2 16 4A 3A 5A 56 B7 C2 16 4A CD A8 2D ^V...J:ZV...J..-
Size : 512 (Real : 512)
000000: C1 3E 3A CD E8 35 CD 7E 36 CD 99 39 4F CD 63 39 .>:..5.~6..9O.c9
000010: FE 1B CA 18 51 B7 C2 21 52 78 B7 CA 43 52 C3 2C ....Q..!Rx..CR.,
000020: 52 04 EB 2A F9 56 CD AC 4F DA F3 51 2A F9 56 11 R..*.V..O..Q*.V.
000030: 10 00 19 22 F9 56 7E FE 0D C2 F6 51 CD D3 2E D1 ...".V~....Q....
000040: C1 B7 C9 37 D1 C1 C9 CD 40 27 CD A8 2D CD AC 06 ...7....@'..-...
000050: 3A 72 44 CD CA 39 DA 7B 52 CD 73 39 FE 40 C2 50 :rD..9.{R.s9.@.P
000060: 52 CD 69 39 CD 7F 52 3E FF 2A 06 57 44 4D 2A CE R.i9..R>.*.WDM*.
000070: 56 EB 21 D0 56 CD 72 06 C3 50 52 CD 61 27 C9 AF V.!.V.r..PR.a'..
000080: 32 DC 56 32 E0 56 3A 7C 44 B7 C2 95 52 3A 09 01 2.V2.V:|D...R:..
000090: B7 C2 95 52 C9 21 00 00 22 D0 56 21 00 00 22 D2 ...R.!..".V!..".
0000A0: 56 0E 00 CD 73 39 FE 24 C2 B7 52 0E 80 CD 69 39 V...s9.$..R...i9
0000B0: FE 2C 2E 00 CA BD 52 CD C2 2B DA C8 55 7D B1 32 .,....R..+..U}.2
0000C0: 07 57 CD 92 36 DA 2C 55 0E 00 CD 73 39 FE 24 C2 .W..6.,U...s9.$.
0000D0: DE 52 0E 80 CD 69 39 FE 20 2E 00 CA E4 52 CD C2 .R...i9. ....R..
0000E0: 2B DA C8 55 7D B1 32 06 57 AF 32 C6 9B 32 C7 9B +..U}.2.W.2..2..
0000F0: 21 C7 9B 22 CE 56 CD 73 39 11 97 56 CD B1 37 C2 !..".V.s9..V..7.
000100: 97 53 CD 8E 39 3E FF 32 E0 56 CD 73 39 11 7E 97 .S..9>.2.V.s9.~.
000110: CD F2 14 DA C8 55 EB 11 3F 56 36 31 23 4E 73 23 .....U..?V61#Ns#
000120: 46 72 78 B7 CA 36 53 32 4B 56 79 32 4E 56 3E 4E Frx..6S2KVy2NV>N
000130: 32 4A 56 C3 54 53 32 4E 56 79 B7 CA 4A 53 41 32 2JV.TS2NVy..JSA2
000140: 4B 56 3E 43 32 4A 56 C3 54 53 32 4B 56 3E 4C 32 KV>C2JV.TS2KV>L2
000150: 4A 56 06 03 21 C7 9B 78 CD BB 36 36 00 CD 73 39 JV..!..x..66..s9
000160: 11 B3 56 CD B1 37 C2 97 53 CD 8E 39 CD 73 39 CD ..V..7..S..9.s9.
000170: 9E 36 C2 C8 55 CD 69 39 78 11 BB 9D CD 20 37 CA .6..U.i9x.... 7.
000180: C8 55 23 CD 8E 39 21 BB 9D CD BB 36 36 00 AF 32 .U#..9!....66..2
000190: BA 9D 3E FF 32 DC 56 CD 73 39 11 83 56 CD B1 37 ..>.2.V.s9..V..7
0001A0: C2 0A 54 CD 8E 39 CD 73 39 CA 2C 55 E5 C5 CD F1 ..T..9.s9.,U....
0001B0: 2A C1 CA 2C 55 E3 CD CC 1C 22 D0 56 CA CC 53 3E *..,U....".V..S>
0001C0: 52 CD 70 3B 3E 01 32 6F 44 C3 D0 55 E1 CD 8E 39 R.p;>.2oD..U...9
0001D0: CD 73 39 CA 0A 54 11 87 56 CD B1 37 C2 2C 55 CD .s9..T..V..7.,U.
0001E0: 8E 39 CD 73 39 CD 9E 36 C2 C8 55 CD 69 39 78 11 .9.s9..6..U.i9x.
0001F0: 1F 9E CD 20 37 CA C8 55 CD 8E 39 21 1F 9E 22 D2 ... 7..U..9!..".
Size : 512 (Real : 512)
000000: 01 08 00 2A 73 56 EB 21 BE 99 36 02 23 CD E4 36 ...*sV.!..6.#..6
000010: 11 BE 99 CD C4 2E CD 45 25 AF 32 4D 44 CD 61 27 .......E%.2MD.a'
000020: C3 5B 54 3E 28 C3 2A 4A 3E 48 CD 70 3B CD 61 27 .[T>(.*J>H.p;.a'
000030: 3E 01 32 6F 44 C3 5B 54 CD 3C 29 CD DD 25 21 7E >.2oD.[T.<)..%!~
000040: 97 22 6C 56 3E 41 32 07 56 AF 32 76 56 32 75 56 ."lV>A2.V.2vV2uV
000050: 32 60 56 32 79 56 21 79 56 22 71 56 CD 73 39 CD 2`V2yV!yV"qV.s9.
000060: E9 25 DA 48 54 CD 73 39 CA 46 4B 11 AC 55 CD B1 .%.HT.s9.FK..U..
000070: 37 CA E8 4A 3A 75 56 3C 32 75 56 FE 06 D2 AF 4B 7..J:uV<2uV....K
000080: EB 2A 6C 56 EB CD F2 14 DA 48 54 3E FF 32 60 56 .*lV.....HT>.2`V
000090: EB 22 6C 56 23 CD F3 36 78 B7 CA AA 4B 21 07 56 ."lV#..6x...K!.V
0000A0: 34 CD 72 2A EB 21 0D 00 19 CD DF 36 01 06 00 CD 4.r*.!.....6....
0000B0: F8 36 2A 6C 56 36 29 23 CD E4 36 36 05 23 36 2F .6*lV6)#..66.#6/
0000C0: 23 CD E4 36 36 35 22 6C 56 2A 71 56 36 30 23 CD #..665"lV*qV60#.
0000D0: E4 36 36 35 22 71 56 CD 63 39 CA 46 4B FE 2C C2 .665"qV.c9.FK.,.
0000E0: 5C 4A CD 69 39 C3 5C 4A CD 8E 39 3E FF 32 76 56 \J.i9.\J..9>.2vV
0000F0: 21 79 56 22 71 56 CD 73 39 CA 46 4B CD 15 2A C2 !yV"qV.s9.FK..*.
000100: 05 4B CD 79 2A 2A 71 56 7E B7 CA A5 4B 23 CD E9 .K.y**qV~...K#..
000110: 36 22 71 56 62 6B 01 0A 00 CD F8 36 CD 73 39 CD 6"qVbk.....6.s9.
000120: F1 2A CD 63 39 7E CD 84 36 DA 2E 4B E6 5F 12 13 .*.c9~..6..K._..
000130: 23 0D C2 25 4B CD 8E 39 CD 73 39 FE 2C C2 5C 4A #..%K..9.s9.,.\J
000140: CD 69 39 C2 FC 4A 3A 60 56 B7 CA A5 4B 21 FF FF .i9..J:`V...K!..
000150: CD 5B 26 DA 74 4B CD 78 27 CA 6B 4B DA 74 4B CD .[&.tK.x'.kK.tK.
000160: DC 1C CA 6B 4B 21 7E 97 CD 20 0B CD 47 2B CA 74 ...kK!~.. ..G+.t
000170: 4B D2 56 4B 3A 7D 44 B7 CA 84 4B 21 79 56 CD 1B K.VK:}D...K!yV..
000180: 36 CD 20 0B 3E 41 32 07 56 3A 76 56 B7 C2 5B 54 6. .>A2.V:vV..[T
000190: 21 79 56 7E FE 35 CA 5B 54 23 CD E9 36 EB CD 79 !yV~.5.[T#..6..y
0001A0: 2A EB C3 93 4B 3E 4A C3 2A 4A 3E 4B C3 2A 4A 3E *...K>J.*J>K.*J>
0001B0: 4C C3 2A 4A CD 63 39 11 AC 55 CD B1 37 C2 48 54 L.*J.c9..U..7.HT
0001C0: CD 8E 39 CD 73 39 11 C6 99 CD 9E 36 C2 48 54 EB ..9.s9.....6.HT.
0001D0: CD E4 36 EB CD 69 39 CA 48 54 B8 C2 D4 4B CD 69 ..6..i9.HT...K.i
0001E0: 39 CD 73 39 CA F5 4B FE 2C C2 48 54 CD 69 39 CD 9.s9..K.,.HT.i9.
0001F0: 73 39 C2 C9 4B EB 22 73 56 21 C7 9B 22 77 56 2A s9..K."sV!.."wV*
Size : 512 (Real : 512)
000000: 21 65 56 35 C2 F2 53 C3 CC 53 CD 45 25 AF 32 4D !eV5..S..S.E%.2M
000010: 44 CD 61 27 C3 5B 54 3E 58 C3 53 54 21 00 00 1A D.a'.[T>X.ST!...
000020: FE 47 DA 27 54 E6 5F D6 30 D8 C6 E9 D8 C6 06 F2 .G.'T._.0.......
000030: 35 54 C6 07 D8 C6 0A B7 C5 4F 06 00 29 29 29 29 5T.......O..))))
000040: 09 C1 13 0D C8 C3 1F 54 CD 61 27 3E FF 32 6F 44 .......T.a'>.2oD
000050: C3 5B 54 CD 70 3B 3E 01 32 6F 44 3E 01 21 00 45 .[T.p;>.2oD>.!.E
000060: C3 C7 3B E5 26 00 6F 01 64 00 CD 7B 54 01 0A 00 ..;.&.o.d..{T...
000070: CD 7B 54 01 01 00 CD 7B 54 E1 C9 D5 16 2F 14 7D .{T....{T..../.}
000080: 91 6F 7C 98 67 D2 7E 54 09 7A D1 12 13 C9 D5 EB .o|.g.~T.z......
000090: 1A B7 CA B5 54 FE 20 CA B5 54 FE 2A CA B7 54 FE ....T. ..T.*..T.
0000A0: 3F CA B0 54 CD 84 36 DA AC 54 E6 5F BE C2 B7 54 ?..T..6..T._...T
0000B0: 13 23 C3 90 54 7E B7 D1 C9 54 54 54 40 40 C8 84 .#..T~...TTT@@..
0000C0: 82 A6 8A 40 92 92 40 40 50 86 52 40 62 72 70 62 ...@..@@P.R@brpb
0000D0: 40 40 A6 86 88 A0 40 40 40 40 AC CA E4 40 64 5C @@....@@@@...@d\
0000E0: 2C 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ,...............
0000F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000100: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000110: 00 00 00 00 00 00 00 00 00 00 00 00 00 41 44 44 .............ADD
000120: 49 54 49 56 45 00 41 4C 4C 00 44 45 4C 49 4D 49 ITIVE.ALL.DELIMI
000130: 54 45 44 00 20 56 41 52 49 41 42 4C 45 53 20 20 TED. VARIABLES
000140: 20 20 20 20 20 00 20 4F 43 54 45 54 53 20 20 20 . OCTETS
000150: 20 00 45 58 43 45 50 54 00 45 58 54 45 4E 44 45 .EXCEPT.EXTENDE
000160: 44 00 46 49 45 4C 44 53 00 46 52 4F 4D 00 4C 49 D.FIELDS.FROM.LI
000170: 4B 45 00 4E 4F 4D 53 20 46 49 43 48 49 45 52 53 KE.NOMS FICHIERS
000180: 20 20 20 20 45 4E 52 45 47 2E 20 20 20 20 4D 49 ENREG. MI
000190: 53 20 41 20 4A 4F 55 52 20 00 52 69 65 6E 00 4F S A JOUR .Rien.O
0001A0: 4E 00 53 54 52 55 43 54 55 52 45 00 54 4F 00 46 N.STRUCTURE.TO.F
0001B0: 49 4C 45 20 55 4E 41 56 41 49 4C 41 42 4C 45 00 ILE UNAVAILABLE.
0001C0: 57 49 54 48 00 46 49 45 4C 44 3A 4E 41 4D 45 00 WITH.FIELD:NAME.
0001D0: 43 0A 01 00 00 46 49 45 4C 44 3A 54 59 50 45 00 C....FIELD:TYPE.
0001E0: 43 01 0B 00 00 46 49 45 4C 44 3A 4C 45 4E 00 00 C....FIELD:LEN..
0001F0: 4E 03 0C 00 00 46 49 45 4C 44 3A 44 45 43 00 00 N....FIELD:DEC..
Size : 512 (Real : 512)
000000: 73 56 2B 2B 22 73 56 11 C6 99 CD C0 36 CA 13 4C sV++"sV.....6..L
000010: D2 34 4C CD E9 36 1A CD 9E 36 13 2A 77 56 EB 7E .4L..6...6.*wV.~
000020: B8 CA 2A 4C 12 23 13 C3 1F 4C EB 36 00 23 22 77 ..*L.#...L.6.#"w
000030: 56 C3 FF 4B 2A 77 56 36 00 21 C7 9B CD 42 4C CD V..K*wV6.!...BL.
000040: 00 27 C5 D5 E5 0E 0C CD 05 00 7C B7 CA 59 4C 0E .'........|..YL.
000050: 99 CD 05 00 C6 30 32 30 56 11 80 00 0E 1A CD 05 .....020V.......
000060: 00 11 2E 56 0E 16 CD 05 00 11 2E 56 0E 0F CD 05 ...V.......V....
000070: 00 E1 0E 00 11 81 00 7E B7 CA 83 4C 12 0C 13 23 .......~...L...#
000080: C3 77 4C AF 12 79 32 80 00 E5 11 2E 56 0E 15 CD .wL..y2.....V...
000090: 05 00 E1 23 7E B7 C2 72 4C 11 2E 56 0E 10 CD 05 ...#~..rL..V....
0000A0: 00 0E 0C CD 05 00 7C B7 CA C9 4C 0E 9A CD 05 00 ......|...L.....
0000B0: 11 80 00 19 E5 0E 99 CD 05 00 4F 06 00 E1 09 36 ..........O....6
0000C0: 01 11 00 00 0E 8F CD 05 00 C3 00 00 3A 5A 44 32 ............:ZD2
0000D0: 5C 00 AF 32 59 56 CD 73 39 CA 94 4D 11 9F 55 CD \..2YV.s9..M..U.
0000E0: B1 37 C2 03 4D CD 8E 39 CD 73 39 CA 48 54 E6 5F .7..M..9.s9.HT._
0000F0: D6 40 32 5C 00 CD 69 39 FE 3A C2 D6 4C CD 69 39 .@2\..i9.:..L.i9
000100: C3 D6 4C 11 6E 55 CD B1 37 C2 48 54 CD 8E 39 CD ..L.nU..7.HT..9.
000110: 73 39 CA 48 54 21 16 56 3E 20 01 0B 00 CD FA 36 s9.HT!.V> .....6
000120: 11 16 56 06 08 CD 63 39 B7 CA 8C 4D FE 20 CA 8C ..V...c9...M. ..
000130: 4D FE 2E CA 5B 4D FE 2A CA 4B 4D FE 61 DA 42 4D M...[M.*.KM.a.BM
000140: E6 5F 12 13 CD 69 39 05 C3 28 4D EB 36 3F 23 05 ._...i9..(M.6?#.
000150: C2 4C 4D CD 69 39 FE 2E C2 8C 4D CD 69 39 11 1E .LM.i9....M.i9..
000160: 56 06 03 B7 CA 8C 4D FE 20 CA 8C 4D FE 2A CA 81 V.....M. ..M.*..
000170: 4D FE 61 DA 78 4D E6 5F 12 13 CD 69 39 05 C3 63 M.a.xM._...i9..c
000180: 4D EB 36 3F 23 05 C2 82 4D CD 69 39 3E FF 32 59 M.6?#...M.i9>.2Y
000190: 56 C3 D6 4C CD 1B 36 3A 59 56 B7 C2 B9 4D 21 73 V..L..6:YV...M!s
0001A0: 55 CD 28 36 21 22 56 11 5D 00 01 0C 00 CD 7E 38 U.(6!"V.].....~8
0001B0: CD CE 4D CD 1B 36 C3 5B 54 21 16 56 11 5D 00 01 ..M..6.[T!.V.]..
0001C0: 0C 00 CD 7E 38 CD CE 4D CD 1B 36 C3 5B 54 21 AD ...~8..M..6.[T!.
0001D0: 56 22 AB 56 36 0D 11 80 00 0E 1A CD 05 00 11 5C V".V6..........\
0001E0: 00 CD FD 4E D2 EE 4D 21 9A 55 CD 28 36 C9 EB 2A ...N..M!.U.(6..*
0001F0: AB 56 EB 01 08 00 3A 59 56 B7 CA 00 4E 01 0B 00 .V....:YV...N...
Size : 512 (Real : 512)
000000: 4E 03 0F 00 00 0D 0D 41 3A 3A 3A 3A 3A 3A 3A 3A N......A::::::::
000010: 41 00 53 44 46 00 20 20 20 20 20 20 20 20 20 20 A.SDF.
000020: 20 00 3F 3F 3F 3F 3F 3F 3F 3F 44 42 46 00 01 24 .????????DBF..$
000030: 24 24 20 20 20 20 20 53 55 42 00 00 00 00 00 00 $$ SUB......
000040: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 27 ...............'
000050: 29 46 4F 2E 45 00 35 00 00 4E 3A 54 59 50 45 00 )FO.E.5..N:TYPE.
000060: 43 01 0B 00 00 46 49 45 4C 44 3A 4C 45 4E 00 00 C....FIELD:LEN..
000070: 4E 03 0C 00 00 46 49 45 4C 44 3A 44 45 43 00 00 N....FIELD:DEC..
000080: 4F 4D 00 47 45 54 00 50 49 43 54 55 52 45 00 52 OM.GET.PICTURE.R
000090: 45 43 4F 52 44 20 00 53 41 59 00 53 44 46 00 52 ECORD .SAY.SDF.R
0000A0: 45 43 4F 52 44 20 23 20 00 54 4F 20 20 20 20 20 ECORD # .TO
0000B0: 20 20 00 55 53 49 4E 47 00 00 45 3E 03 21 12 45 .USING..E>.!.E
0000C0: C3 C7 3B 00 73 39 00 00 00 00 00 00 C2 D6 56 AF ..;.s9........V.
0000D0: CD 89 2E C3 00 45 11 82 5E CD B1 37 00 14 5B 3E .....E..^..7..[>
0000E0: 00 CD 89 2E C3 00 45 CD 73 39 11 D8 5E 01 32 54 ......E.s9..^.2T
0000F0: 4F 3A 20 20 20 20 20 00 46 49 45 4C 44 00 46 52 O: .FIELD.FR
000100: C3 09 45 C3 B0 45 C3 FF 45 CD 73 39 CA 13 47 AF ..E..E..E.s9..G.
000110: 32 B2 47 32 B1 47 CD 73 39 CA 7D 45 11 92 47 CD 2.G2.G.s9.}E..G.
000120: B1 37 C2 53 45 CD 8E 39 CD 73 39 22 B6 47 11 7E .7.SE..9.s9".G.~
000130: 97 CD F2 14 DA 13 47 CD 63 39 7E B7 CA 40 45 2B ......G.c9~..@E+
000140: 22 BE 47 EB 23 7E C6 02 4F 23 46 3E FF 32 B1 47 ".G.#~..O#F>.2.G
000150: C3 16 45 11 AE 47 CD B1 37 C2 13 47 CD 8C 23 CD ..E..G..7..G..#.
000160: 8E 39 CD 73 39 3E 05 CD AD 27 D2 75 45 3E 28 CD .9.s9>...'.uE>(.
000170: 70 3B C3 21 47 3E FF 32 B2 47 C3 16 45 3A B1 47 p;.!G>.2.G..E:.G
000180: B7 3E 54 CA 1E 47 3A B2 47 B7 3E 48 CA 1E 47 3E .>T..G:.G.>H..G>
000190: 81 CD F0 2B CD 3C 27 CD A6 23 2A B6 47 EB 2A BE ...+.<'..#*.G.*.
0001A0: 47 CD 3C 27 CD FC 1C CD 61 27 CD AE 46 C3 26 47 G.<'....a'..F.&G
0001B0: CD 9F 24 CA 26 47 CD A4 24 22 B4 47 2A B4 47 7E ..$.&G..$".G*.G~
0001C0: B7 CA F3 45 32 B3 47 CD DF 22 3A 7D 44 B7 CA E0 ...E2.G..":}D...
0001D0: 45 CD 1B 36 21 95 47 CD 28 36 3A B3 47 CD C4 25 E..6!.G.(6:.G..%
0001E0: CD BB 23 CD 45 1D CD AE 46 2A B4 47 23 22 B4 47 ..#.E...F*.G#".G
0001F0: C3 BC 45 CD B7 23 CD DF 22 CD 43 21 C3 26 47 CD ..E..#..".C!.&G.
Size : 512 (Real : 512)
000000: CD 7E 38 EB 09 22 AB 56 36 0D CD 04 4F D2 EE 4D .~8..".V6...O..M
000010: 21 AD 56 22 AB 56 CD 1B 36 1E 04 2A AB 56 7E FE !.V".V..6..*.V~.
000020: 0D C8 3A 59 56 B7 C2 D4 4E 01 08 00 11 5D 00 CD ..:YV...N....]..
000030: 7E 38 22 AB 56 AF 32 68 00 21 5D 00 CD 13 2C CD ~8".V.2h.!]...,.
000040: 7E 36 01 03 00 CD 13 2C CD 72 36 AF 32 7C 00 11 ~6.....,.r6.2|..
000050: 80 00 0E 1A CD 05 00 0E 0F 11 5C 00 CD 05 00 B7 ..........\.....
000060: FA C8 4E 11 5C 00 0E 14 CD 05 00 11 80 00 1A FE ..N.\...........
000070: 02 C2 AE 4E 13 1A 6F 13 1A 67 CD 35 36 CD 72 36 ...N..o..g.56.r6
000080: 13 1A CD 3A 36 3E 2F CD E8 35 13 1A CD 3A 36 3E ...:6>/..5...:6>
000090: 2F CD E8 35 13 1A CD 3A 36 CD 1B 36 3A 5F 01 B7 /..5...:6..6:_..
0000A0: CA 1B 4E 11 5C 00 0E 10 CD 05 00 C3 1B 4E 3E 17 ..N.\........N>.
0000B0: CD 70 3B CD 1B 36 3A 5F 01 B7 CA 1B 4E 11 5C 00 .p;..6:_....N.\.
0000C0: 0E 10 CD 05 00 C3 1B 4E 21 AF 55 CD 2B 36 CD 1B .......N!.U.+6..
0000D0: 36 C3 1B 4E 01 08 00 CD 13 2C 3E 2E CD E8 35 01 6..N.....,>...5.
0000E0: 03 00 CD 13 2C 22 AB 56 1D CA F5 4E CD 72 36 CD ....,".V...N.r6.
0000F0: 78 36 C3 1B 4E CD 1B 36 1E 04 C3 1B 4E C5 D5 0E x6..N..6....N...
000100: 11 C3 08 4F C5 D5 0E 12 11 5C 00 CD 05 00 FE FF ...O.....\......
000110: C2 17 4F 37 D1 C1 C9 E6 03 06 00 0F 0F 0F 3C 4F ..O7..........<O
000120: 21 80 00 09 D1 C1 C9 AF 32 69 56 21 00 00 22 6A !.......2iV!.."j
000130: 56 CD D8 1C 7E B7 CA A9 4F 22 51 56 E5 CD 1B 36 V...~...O"QV...6
000140: 01 0A 00 CD 13 2C CD 7B 36 21 69 56 34 E1 E5 3E .....,.{6!iV4..>
000150: 28 CD E8 35 11 0B 00 19 7E E6 7F E5 CD E8 35 3E (..5....~.....5>
000160: 29 CD E8 35 CD 7B 36 E1 7E E6 7F FE 4E CA 84 4F )..5.{6.~...N..O
000170: 23 7E 32 54 56 B7 C2 7A 4F 3C 32 66 56 AF 32 55 #~2TV..zO<2fV.2U
000180: 56 C3 95 4F 23 7E 32 55 56 23 23 23 7E 32 54 56 V..O#~2UV###~2TV
000190: 3E 06 32 66 56 21 50 56 CD 20 0B 3A 66 56 2A 6A >.2fV!PV. .:fV*j
0001A0: 56 CD BB 36 23 22 6A 56 E1 11 10 00 19 7E FE 0D V..6#"jV.....~..
0001B0: C2 34 4F CD 1B 36 3E 60 CD 70 3B CD 72 36 3A 69 .4O..6>`.p;.r6:i
0001C0: 56 CD 3A 36 21 34 55 CD 2B 36 2A 6A 56 CD 35 36 V.:6!4U.+6*jV.56
0001D0: 21 46 55 CD 2B 36 C3 5B 54 AF 32 5D 56 32 5B 56 !FU.+6.[T.2]V2[V
0001E0: CD 73 39 CA 1D 50 11 69 55 CD B1 37 C2 09 50 CD .s9..P.iU..7..P.
0001F0: 8E 39 3E 03 CD AD 27 3E FF 32 5D 56 3E 01 CD F0 .9>...'>.2]V>...
Size : 512 (Real : 512)
000000: 3C 29 21 01 00 22 B8 47 22 BA 47 CD 2A 2C 21 64 <)!..".G".G.*,!d
000010: 00 22 BC 47 21 FF FF CD 2E 2C 2A B8 47 CD 0C 2C .".G!....,*.G..,
000020: CD 37 2C DA 71 46 2A B8 47 23 22 B8 47 CD DC 1C .7,.qF*.G#".G...
000030: CA 1A 46 2A BA 47 CD 0C 2C CD D3 2E 2A BA 47 2A ..F*.G..,...*.G*
000040: BA 47 23 22 BA 47 3A 7D 44 B7 CA 1A 46 2A BC 47 .G#".G:}D...F*.G
000050: 2B 22 BC 47 7C B5 C2 1A 46 CD 1B 36 2A BA 47 2B +".G|...F..6*.G+
000060: CD 35 36 3E 3A CD 70 3B 21 64 00 22 BC 47 C3 1A .56>:.p;!d.".G..
000070: 46 2A BA 47 CD 0C 2C CD D4 26 CD D8 2C 3A 7D 44 F*.G..,..&..,:}D
000080: B7 CA 89 46 3E 39 CD 70 3B 2A BA 47 2B 22 BA 47 ...F>9.p;*.G+".G
000090: CD 2E 2C 3A 7D 44 B7 CA A5 46 2A BA 47 CD 35 36 ..,:}D...F*.G.56
0000A0: 3E 3A CD 70 3B CD 9F 24 CA 26 47 C3 B0 45 21 01 >:.p;..$.&G..E!.
0000B0: 00 CD 9D 27 DA 12 47 CD 43 21 21 00 00 22 BE 47 ...'..G.C!!..".G
0000C0: 21 64 00 22 BC 47 CD 8D 1D 2A BE 47 23 22 BE 47 !d.".G...*.G#".G
0000D0: 2A BC 47 2B 22 BC 47 7C B5 C2 F7 46 3A 7D 44 B7 *.G+".G|...F:}D.
0000E0: CA F7 46 2A BE 47 CD 1B 36 CD 35 36 3E 78 CD 70 ..F*.G..6.56>x.p
0000F0: 3B 21 64 00 22 BC 47 CD 37 2C D2 C6 46 3A 7D 44 ;!d.".G.7,..F:}D
000100: B7 CA 12 47 2A BE 47 CD 1B 36 CD 35 36 3E 78 CD ...G*.G..6.56>x.
000110: 70 3B C9 CD 61 27 3E FF 32 6F 44 C3 26 47 CD 70 p;..a'>.2oD.&G.p
000120: 3B 3E 01 32 6F 44 3E 01 21 00 45 C3 C7 3B 54 54 ;>.2oD>.!.E..;TT
000130: 54 40 40 C8 84 82 A6 8A 40 92 92 40 40 50 86 52 T@@.....@..@@P.R
000140: 40 62 72 70 62 40 40 A6 86 88 A0 40 40 40 40 AC @brpb@@....@@@@.
000150: CA E4 40 64 5C 2C 00 00 00 00 00 00 00 00 00 00 ..@d\,..........
000160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000190: 00 00 4F 4E 00 4D 49 53 45 20 41 20 4A 4F 55 52 ..ON.MISE A JOUR
0001A0: 20 44 45 20 4C 27 49 4E 44 45 58 3A 20 00 54 4F DE L'INDEX: .TO
0001B0: 00 00 00 C8 84 82 A6 8A 40 92 92 40 40 50 86 52 ........@..@@P.R
0001C0: 40 62 72 70 62 40 40 A6 86 88 A0 40 40 40 40 AC @brpb@@....@@@@.
0001D0: CA E4 40 64 5C 2C 00 00 00 00 00 00 00 00 00 00 ..@d\,..........
0001E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
Size : 512 (Real : 512)
000000: 2B D2 E0 4F 3E 58 C3 53 54 11 1D 55 CD B1 37 C2 +..O>X.ST..U..7.
000010: 48 54 CD 8E 39 3E FF 32 5B 56 C3 E0 4F 3A 5D 56 HT..9>.2[V..O:]V
000020: B7 CA 48 54 3A 5B 56 B7 C2 2E 50 CD 20 29 11 79 ..HT:[V...P. ).y
000030: 56 01 10 00 CD 7A 2C DA 97 50 21 0B 00 19 7E FE V....z,..P!...~.
000040: CE CA 55 50 FE CC CA 63 50 06 00 23 4E 79 3C 32 ..UP...cP..#Ny<2
000050: 6E 56 C3 6B 50 23 46 23 23 23 4E 3E 06 32 6E 56 nV.kP#F###N>.2nV
000060: C3 6B 50 01 00 00 3E 01 32 6E 56 21 79 56 CD 72 .kP...>.2nV!yV.r
000070: 2A 22 57 56 3A 6E 56 4F 06 00 11 AD 56 CD 7A 2C *"WV:nVO....V.z,
000080: 2A 57 56 11 0D 00 19 CD E9 36 3A 6E 56 4F 21 AD *WV......6:nVO!.
000090: 56 CD 78 38 C3 2E 50 CD 45 25 CD 61 27 C3 5B 54 V.x8..P.E%.a'.[T
0000A0: AF 32 5D 56 32 5B 56 CD 73 39 CA 18 51 11 AC 55 .2]V2[V.s9..Q..U
0000B0: CD B1 37 C2 DD 50 CD 8E 39 3E 03 CD AD 27 DA 89 ..7..P..9>...'..
0000C0: 51 3E 81 CD F0 2B DA 89 51 CD 3C 27 32 4D 44 CD Q>...+..Q.<'2MD.
0000D0: D8 1C 22 67 56 3E FF 32 5D 56 C3 A7 50 11 26 55 .."gV>.2]V..P.&U
0000E0: CD B1 37 C2 48 54 CD 8E 39 CD 73 39 CA 48 54 11 ..7.HT..9.s9.HT.
0000F0: 6E 55 CD B1 37 C2 48 54 CD 8E 39 CD 73 39 CA 48 nU..7.HT..9.s9.H
000100: 54 22 73 56 CD 69 39 FE 20 CA 10 51 B7 C2 04 51 T"sV.i9. ..Q...Q
000110: 3E FF 32 5B 56 C3 A7 50 3A 5D 56 B7 CA 84 51 2A >.2[V..P:]V...Q*
000120: 67 56 7E B7 CA 64 51 EB 3A 5B 56 B7 CA 38 51 2A gV~..dQ.:[V..8Q*
000130: 73 56 CD 8E 54 C2 64 51 01 10 00 CD C4 2E 21 0B sV..T.dQ......!.
000140: 00 19 46 23 4E 23 CD E9 36 78 FE CE CA 58 51 FE ..F#N#..6x...XQ.
000150: CC CA 5D 51 0C C3 5F 51 0E 06 C3 5F 51 0E 01 06 ..]Q.._Q..._Q...
000160: 00 CD C4 2E 2A 67 56 11 10 00 19 22 67 56 7E FE ....*gV...."gV~.
000170: 0D C2 1F 51 CD D4 26 CD 45 25 AF 32 4D 44 CD 61 ...Q..&.E%.2MD.a
000180: 27 C3 5B 54 3E 48 C3 53 54 3E 28 C3 53 54 AF 32 '.[T>H.ST>(.ST.2
000190: 5B 56 CD 63 39 11 6E 55 CD B1 37 CA AF 51 3E FF [V.c9.nU..7..Q>.
0001A0: 32 5B 56 CD 63 39 11 52 55 CD B1 37 C2 48 54 CD 2[V.c9.RU..7.HT.
0001B0: 8E 39 CD 73 39 CA 48 54 22 71 56 CD D8 1C 22 67 .9.s9.HT"qV..."g
0001C0: 56 2A 67 56 7E B7 CA E7 51 EB 2A 71 56 3A 5B 56 V*gV~...Q.*qV:[V
0001D0: B7 CA DD 51 CD 8E 54 CA E7 51 C3 E3 51 CD 8E 54 ...Q..T..Q..Q..T
0001E0: C2 E7 51 EB CD 79 2A 2A 67 56 11 10 00 19 22 67 ..Q..y**gV...."g
0001F0: 56 7E FE 0D C2 C1 51 C3 5B 54 CD DD 25 AF 32 5F V~....Q.[T..%.2_
Size : 512 (Real : 512)
000000: CD 3C 29 AF 32 38 51 32 51 51 32 32 51 32 4A 51 .<).28Q2QQ22Q2JQ
000010: 32 34 51 21 72 59 01 20 01 CD F8 36 3E 08 32 3D 24Q!rY. ...6>.2=
000020: 51 32 40 51 3E 39 32 3C 51 3E 50 32 47 51 CD 68 Q2@Q>92<Q>P2GQ.h
000030: 3B 32 43 51 32 44 51 CD DD 25 CD 73 39 CA 9F 45 ;2CQ2DQ..%.s9..E
000040: CD E9 25 DA A5 4D CD 73 39 CA 9F 45 11 1C 4E CD ..%..M.s9..E..N.
000050: B1 37 C2 65 45 CD 8E 39 3E 02 CD AD 27 3E FF 32 .7.eE..9>...'>.2
000060: 38 51 C3 3A 45 11 2D 4E CD B1 37 C2 8B 45 CD 8E 8Q.:E.-N..7..E..
000070: 39 CD 73 39 CA A5 4D 11 27 4E CD B1 37 C2 A5 4D 9.s9..M.'N..7..M
000080: CD 8E 39 3E FF 32 44 51 C3 3A 45 11 21 4E CD B1 ..9>.2DQ.:E.!N..
000090: 37 C2 A5 4D CD 8E 39 3E FF 32 34 51 C3 3A 45 3A 7..M..9>.24Q.:E:
0000A0: 38 51 B7 C2 BE 45 3E 3F CD 70 3B CD 99 39 CD 63 8Q...E>?.p;..9.c
0000B0: 39 CA 9D 4D FE 1B CA 9D 4D 3E 02 CD AD 27 3E FF 9..M....M>...'>.
0000C0: 32 33 51 3E 02 CD F0 2B D2 D4 45 3E 81 CD F0 2B 23Q>...+..E>...+
0000D0: AF 32 33 51 CD 3C 27 32 73 44 AF 32 4E 51 3A 33 .23Q.<'2sD.2NQ:3
0000E0: 51 B7 C2 EA 45 3E 68 CD 70 3B CD 48 4D CD 80 4D Q...E>h.p;.HM..M
0000F0: CD 73 39 CA 65 46 FE 0D CA 65 46 E6 5F FE 4D C2 .s9.eF...eF._.M.
000100: 1D 46 CD 69 39 FE 3D C2 A5 4D CD 69 39 CD FF 37 .F.i9.=..M.i9..7
000110: 7B 32 40 51 32 3D 51 CD 8E 39 C3 57 46 FE 4C C2 {2@Q2=Q..9.WF.L.
000120: 3A 46 CD 69 39 FE 3D C2 A5 4D CD 69 39 CD FF 37 :F.i9.=..M.i9..7
000130: 7B 32 3C 51 CD 8E 39 C3 57 46 FE 57 C2 65 46 CD {2<Q..9.WF.W.eF.
000140: 69 39 FE 3D C2 A5 4D CD 69 39 CD FF 37 7B 32 47 i9.=..M.i9..7{2G
000150: 51 CD 8E 39 C3 57 46 CD 63 39 FE 2C C2 65 46 CD Q..9.WF.c9.,.eF.
000160: 69 39 C3 F0 45 3A 33 51 B7 C2 71 46 3E 45 CD 70 i9..E:3Q..qF>E.p
000170: 3B CD 48 4D CD 80 4D CD 73 39 E6 5F FE 59 C2 EB ;.HM..M.s9._.Y..
000180: 46 3E FF 32 4E 51 3A 33 51 B7 C2 92 46 3E 46 CD F>.2NQ:3Q...F>F.
000190: 70 3B 21 6A 54 36 2B CD 48 4D 11 6C 54 CD 63 39 p;!jT6+.HM.lT.c9
0001A0: FE 3C CA AE 46 FE 3E CA B6 46 AF C3 BB 46 CD 69 .<..F.>..F...F.i
0001B0: 39 3E 80 C3 BB 46 CD 69 39 3E 40 32 3B 51 AF CD 9>...F.i9>@2;Q..
0001C0: 20 37 CA 86 46 32 6B 54 4F CD 80 4D 21 6C 54 79 7..F2kTO..M!lTy
0001D0: CD BB 36 36 32 23 71 23 3A 3B 51 77 23 3A 40 51 ..662#q#:;Qw#:@Q
0001E0: 47 3A 47 51 90 77 23 70 23 36 35 AF 32 37 51 3A G:GQ.w#p#65.27Q:
0001F0: 33 51 B7 C2 FB 46 3E 3D CD 70 3B CD 48 4D CD 73 3Q...F>=.p;.HM.s
Size : 512 (Real : 512)
000000: 56 CD E9 25 DA 48 54 CD 73 39 CA 3B 52 11 AC 55 V..%.HT.s9.;R..U
000010: CD B1 37 C2 48 54 CD 8E 39 CD 73 39 CA 48 54 01 ..7.HT..9.s9.HT.
000020: 00 05 CD 72 2A 22 73 56 3E FF 32 5F 56 CD 69 39 ...r*"sV>.2_V.i9
000030: CA 3B 52 FE 20 C2 2D 52 C3 01 52 01 00 00 CD 2A .;R. .-R..R....*
000040: 2C 7C B5 CA 62 52 21 FF FF CD 5B 26 DA 62 52 CD ,|..bR!...[&.bR.
000050: 78 27 CA 59 52 DA 62 52 03 CD 47 2B CA 62 52 D2 x'.YR.bR..G+.bR.
000060: 4F 52 3A 7D 44 B7 CA 73 52 3E 22 CD 70 3B 60 69 OR:}D..sR>".p;`i
000070: CD 35 36 3A 5F 56 B7 CA 5B 54 60 69 CD 18 34 2A .56:_V..[T`i..4*
000080: 73 56 11 0D 00 19 CD E9 36 CD E5 34 C3 5B 54 3E sV......6..4.[T>
000090: 67 CD 70 3B CD 61 27 CD 3C 27 CD C4 25 3E 72 CD g.p;.a'.<'..%>r.
0000A0: 70 3B CD 2A 2C CD 35 36 3E 77 CD 70 3B CD E3 1C p;.*,.56>w.p;...
0000B0: 2B 2B 2B 2B 2B EB 1A CD 3A 36 3E 2F CD E8 35 13 +++++...:6>/..5.
0000C0: 1A CD 3A 36 3E 2F CD E8 35 13 1A CD 3A 36 CD 7F ..:6>/..5...:6..
0000D0: 2E FE 01 CA DE 52 3E 70 CD 70 3B C3 E3 52 3E 71 .....R>p.p;..R>q
0000E0: CD 70 3B 3E 66 CD 70 3B CD E3 1C 0E 00 7E FE 0D .p;>f.p;.....~..
0000F0: CA 3F 53 0C CD 1B 36 79 E5 CD 42 36 CD 72 36 E1 .?S...6y..B6.r6.
000100: C5 E5 01 0A 00 CD 13 2C CD 78 36 E1 C1 11 0B 00 .......,.x6.....
000110: E5 19 7E CD E8 35 CD 75 36 23 7E E5 CD 42 36 E1 ..~..5.u6#~..B6.
000120: CD 75 36 23 23 23 46 7E B7 CC 78 36 78 B7 CA 34 .u6###F~..x6x..4
000130: 53 CD 42 36 CD 78 36 E1 11 10 00 19 C3 ED 52 CD S.B6.x6.......R.
000140: 1B 36 3E 60 CD 70 3B CD 72 36 CD 72 36 CD 78 36 .6>`.p;.r6.r6.x6
000150: CD 84 29 CD 35 36 C3 5B 54 3E 65 CD 70 3B CD 8E ..).56.[T>e.p;..
000160: 3A FE 1B C2 6D 53 3A 70 44 B7 C2 7E 44 F5 CD 73 :...mS:pD..~D..s
000170: 39 CA B5 53 11 AC 55 CD B1 37 C2 48 54 CD 8E 39 9..S..U..7.HT..9
000180: CD 73 39 CA 48 54 E5 CD 15 2A C2 90 53 CD 79 2A .s9.HT...*..S.y*
000190: E1 01 01 00 CD 72 2A 11 0D 00 19 CD DF 36 36 01 .....r*......66.
0001A0: 23 F1 FE 20 D2 A9 53 3E 20 77 CD E8 35 3E 0D CD #.. ..S> w..5>..
0001B0: E8 35 C3 5B 54 F1 C3 5B 54 CD 73 39 3E 08 CD AD .5.[T..[T.s9>...
0001C0: 27 3E 01 CD F0 2B DA 17 54 32 4D 44 3A 4D 44 11 '>...+..T2MD:MD.
0001D0: C7 9B CD B2 25 DA 0A 54 11 C8 9B 0E 02 CD 1C 54 ....%..T.......T
0001E0: 7D 32 65 56 B7 CA 0A 54 0E 04 CD 1C 54 22 63 56 }2eV...T....T"cV
0001F0: 13 13 0E 02 CD 1C 54 7D 2A 63 56 77 23 22 63 56 ......T}*cVw#"cV
Size : 512 (Real : 512)
000000: 39 E6 5F FE 59 C2 0D 47 3E FF 32 37 51 CD 80 4D 9._.Y..G>.27Q..M
000010: AF 32 59 51 3A 33 51 B7 C2 20 47 3E 4E CD 70 3B .2YQ:3Q.. G>N.p;
000020: CD 48 4D CD 73 39 E6 5F FE 59 C2 42 47 3E FF 32 .HM.s9._.Y.BG>.2
000030: 59 51 21 11 4E 01 01 01 CD 72 2A 22 41 51 AF 32 YQ!.N....r*"AQ.2
000040: 4B 51 CD 80 4D 3A 59 51 B7 CA 58 48 3A 33 51 B7 KQ..M:YQ..XH:3Q.
000050: C2 58 47 3E 44 CD 70 3B CD 48 4D CD 73 39 E6 5F .XG>D.p;.HM.s9._
000060: FE 59 C2 6A 47 3E FF 32 4A 51 CD 80 4D 3A 4A 51 .Y.jG>.2JQ..M:JQ
000070: B7 CA 58 48 3A 33 51 B7 C2 80 47 3E 43 CD 70 3B ..XH:3Q...G>C.p;
000080: CD 48 4D 11 5C 51 CD F2 14 D2 9B 47 3A 33 51 B7 .HM.\Q.....G:3Q.
000090: C2 A5 4D 3E 34 CD 70 3B C3 7B 47 CD 80 4D 3A 33 ..M>4.p;.{G..M:3
0000A0: 51 B7 C2 AA 47 3E 50 CD 70 3B CD 48 4D CD 73 39 Q...G>P.p;.HM.s9
0000B0: E6 5F FE 59 C2 BC 47 3E FF 32 51 51 CD 80 4D AF ._.Y..G>.2QQ..M.
0000C0: 32 52 51 3A 33 51 B7 C2 CF 47 3E 6B CD 70 3B CD 2RQ:3Q...G>k.p;.
0000D0: 48 4D CD 73 39 E6 5F FE 59 C2 E1 47 3E FF 32 52 HM.s9._.Y..G>.2R
0000E0: 51 CD 80 4D 3A 33 51 B7 C2 F0 47 3E 69 CD 70 3B Q..M:3Q...G>i.p;
0000F0: 21 04 59 36 2B CD 48 4D FE 0D CA 01 48 B7 C2 0C !.Y6+.HM....H...
000100: 48 11 06 59 3E 20 12 3E 01 C3 37 48 11 06 59 CD H..Y> .>..7H..Y.
000110: 63 39 FE 3C CA 20 48 FE 3E CA 28 48 AF C3 2D 48 c9.<. H.>.(H..-H
000120: CD 69 39 3E 80 C3 2D 48 CD 69 39 3E 40 32 3B 51 .i9>..-H.i9>@2;Q
000130: AF CD 20 37 CA E4 47 4F 32 05 59 CD 80 4D 21 06 .. 7..GO2.Y..M!.
000140: 59 79 CD BB 36 36 32 23 71 23 3A 3B 51 77 23 71 Yy..662#q#:;Qw#q
000150: 23 3A 40 51 77 23 36 35 3A 33 51 B7 C2 64 48 3E #:@Qw#65:3Q..dH>
000160: 3C CD 70 3B 21 92 5A 22 35 51 36 35 21 24 52 22 <.p;!.Z"5Q65!$R"
000170: 5A 51 36 35 21 73 55 22 39 51 36 35 21 49 53 22 ZQ65!sU"9Q65!IS"
000180: 53 51 36 35 3E 01 32 50 51 3A 33 51 B7 C2 9C 48 SQ65>.2PQ:3Q...H
000190: CD 1B 36 3A 50 51 CD 42 36 CD 72 36 CD 48 4D CD ..6:PQ.B6.r6.HM.
0001A0: 73 39 CA D7 4A CD FF 37 7B 32 4F 51 CD 8E 39 7E s9..J..7{2OQ..9~
0001B0: FE 2C C2 04 4D CD 69 39 D5 EB 2A 35 51 EB CD F2 .,..M.i9..*5Q...
0001C0: 14 DA 04 4D CD 73 39 C2 04 4D EB E5 3A 51 51 B7 ...M.s9..M..:QQ.
0001D0: C2 F4 48 36 32 23 4E 23 46 78 B7 C2 E1 48 F6 80 ..H62#N#Fx...H..
0001E0: 77 23 3A 4F 51 77 23 3A 40 51 77 23 36 35 22 35 w#:OQw#:@Qw#65"5
0001F0: 51 C3 FB 48 22 35 51 23 CD F3 36 C5 CD 80 4D 3A Q..H"5Q#..6...M:
Size : 512 (Real : 512)
000000: 5A 00 00 45 3E 11 CD 70 3B C3 00 45 3E CE 00 80 Z..E>..p;..E>...
000010: 5A 00 3C 29 11 77 5E CD 73 39 CD B1 37 CE 00 86 Z.<).w^.s9..7...
000020: 5A 00 39 CD 73 39 C3 59 51 11 A0 5E CD CE 00 8C Z.9.s9.YQ..^....
000030: 5A 00 CD 45 CD 3C 29 CD 9F 24 CA 0C 51 CE 00 62 Z..E.<)..$..Q..b
000040: 5A 00 36 CA CB 50 06 00 C3 CE 50 CD 69 CE 00 68 Z.6..P....P.i..h
000050: 5A 00 CD 20 37 4F CD 63 39 79 CD B1 20 CE 00 6E Z.. 7O.c9y.. ..n
000060: 5A 00 7C B5 CA FD 50 3A 5B 44 B7 CA 00 CE 00 74 Z.|...P:[D.....t
000070: 5A 00 00 45 CD 63 39 CD C9 21 C3 DD 50 CE 00 7A Z..E.c9..!..P..z
000080: 27 C3 5B 54 3E 48 C3 53 54 3E 28 C3 53 54 AF 32 '.[T>H.ST>(.ST.2
000090: 5B 56 CD 63 39 11 6E 55 CD B1 37 CA AF 51 3E FF [V.c9.nU..7..Q>.
0000A0: 32 5B 56 CD 63 39 11 52 55 CD B1 37 C2 48 54 CD 2[V.c9.RU..7.HT.
0000B0: 8E 39 CD 73 39 CA 48 54 22 71 56 CD D8 1C 22 67 .9.s9.HT"qV..."g
0000C0: 56 2A 67 56 7E B7 CA E7 51 EB 2A 71 56 3A 5B 56 V*gV~...Q.*qV:[V
0000D0: B7 CA DD 51 CD 8E 54 CA E7 51 C3 E3 51 CD 8E 54 ...Q..T..Q..Q..T
0000E0: C2 E7 51 EB CD 79 2A 2A 67 56 11 10 00 19 22 67 ..Q..y**gV...."g
0000F0: 56 7E FE 0D C2 C1 51 C3 5B 54 CD DD 25 AF 32 5F V~....Q.[T..%.2_
000100: CD 73 39 11 DC 4E CD B1 37 CA 1B 45 11 6E 4E CD .s9..N..7..E.nN.
000110: B1 37 C2 34 4E CD 8E 39 C3 54 48 3E 75 CD 70 3B .7.4N..9.TH>u.p;
000120: CD 42 38 DA 2C 4E CA 2C 4E CD 3C 29 21 1D 51 01 .B8.,N.,N.<)!.Q.
000130: 20 03 3E 20 CD FA 36 21 35 51 11 19 00 0E 20 AF .> ..6!5Q.... .
000140: 77 19 0D C2 40 45 CD E3 1C 11 C6 99 01 01 02 CD w...@E..........
000150: 7E 38 21 C6 99 22 1A 4F 21 1C 4F 22 12 4F 21 00 ~8!..".O!.O".O!.
000160: 00 22 18 4F 2A 1A 4F 7E FE 0D CA AA 45 EB 2A 12 .".O*.O~....E.*.
000170: 4F 01 0D 00 09 CD DF 36 EB 06 0C 7E B7 CA 81 45 O......6...~...E
000180: 12 23 13 05 C2 7B 45 13 13 7E CD 01 4E 13 13 23 .#...{E..~..N..#
000190: 23 23 7E CD 01 4E 11 10 00 2A 12 4F 19 22 12 4F ##~..N...*.O.".O
0001A0: 2A 1A 4F 19 22 1A 4F C3 64 45 21 1C 4F 22 12 4F *.O.".O.dE!.O".O
0001B0: CD AC 06 21 00 00 22 16 4F 01 0B 01 11 76 4E 21 ...!..".O....vN!
0001C0: 16 4F CD 72 06 2A 12 4F 22 14 4F 21 00 02 22 FB .O.r.*.O".O!..".
0001D0: 4E 2A FB 4E 44 4D 2A 14 4F 22 16 4F EB 21 16 4F N*.NDM*.O".O.!.O
0001E0: CD 72 06 2A 14 4F 11 10 00 19 22 14 4F 7E FE 0D .r.*.O....".O~..
0001F0: CA 02 46 2A FB 4E 24 22 FB 4E 3A 55 01 3D BC D2 ..F*.N$".N:U.=..
Size : 512 (Real : 512)
000000: 33 51 B7 C2 0B 49 3E 40 CD 70 3B 2A 39 51 36 2B 3Q...I>@.p;*9Q6+
000010: 23 22 39 51 CD 48 4D FE 0D CA 20 49 B7 C2 31 49 #"9Q.HM... I..1I
000020: 2A 39 51 EB 13 3E 20 12 AF 32 3B 51 3E 01 C3 5E *9Q..> ..2;Q>..^
000030: 49 2A 39 51 23 EB CD 63 39 FE 3C CA 47 49 FE 3E I*9Q#..c9.<.GI.>
000040: CA 4F 49 AF C3 54 49 CD 69 39 3E 80 C3 54 49 CD .OI..TI.i9>..TI.
000050: 69 39 3E 40 32 3B 51 AF CD 20 37 CA FF 48 4F CD i9>@2;Q.. 7..HO.
000060: 80 4D 2A 39 51 71 79 CD BB 36 23 36 32 23 71 23 .M*9Qqy..6#62#q#
000070: 3A 3B 51 77 23 3A 4F 51 77 23 3A 40 51 77 23 36 :;Qw#:OQw#:@Qw#6
000080: 35 22 39 51 C1 78 B7 CA B8 4A 3A 59 51 B7 CA B8 5"9Q.x...J:YQ...
000090: 4A 3A 33 51 B7 C2 9D 49 3E 4E CD 70 3B CD 48 4D J:3Q...I>N.p;.HM
0000A0: CD 80 4D CD 73 39 E6 5F FE 59 C2 B8 4A 2A 41 51 ..M.s9._.Y..J*AQ
0000B0: EB E1 36 2F 23 CD E4 36 3A 51 51 B7 C2 D5 49 36 ..6/#..6:QQ...I6
0000C0: 29 23 CD E4 36 36 32 23 CD EE 36 3A 4F 51 77 23 )#..662#..6:OQw#
0000D0: 3A 40 51 77 23 36 29 23 CD E4 36 E5 2A 30 4E 22 :@Qw#6)#..6.*0N"
0000E0: 57 51 EB 21 10 00 19 22 30 4E 21 0C 00 19 70 21 WQ.!..."0N!...p!
0000F0: 0F 00 19 71 E1 36 29 23 CD E4 36 36 05 23 36 2F ...q.6)#..66.#6/
000100: 23 CD E4 36 3A 4A 51 B7 CA 3F 4A EB 2A 41 51 EB #..6:JQ..?J.*AQ.
000110: 36 29 23 CD E4 36 E5 2A 30 4E 22 4C 51 EB 21 10 6)#..6.*0N"LQ.!.
000120: 00 19 22 30 4E 21 0C 00 19 70 21 0F 00 19 71 E1 .."0N!...p!...q.
000130: 36 29 23 CD E4 36 36 05 23 36 2F 23 CD E4 36 36 6)#..66.#6/#..66
000140: 35 22 35 51 2A 57 51 EB 2A 5A 51 36 29 23 CD E4 5"5Q*WQ.*ZQ6)#..
000150: 36 36 32 23 CD EE 36 3A 4B 51 5F 3A 4F 51 83 77 662#..6:KQ_:OQ.w
000160: 23 36 00 23 36 35 22 5A 51 3A 4A 51 B7 CA 9E 4A #6.#65"ZQ:JQ...J
000170: 2A 4C 51 EB 2A 53 51 36 29 23 CD E4 36 36 32 23 *LQ.*SQ6)#..662#
000180: CD EE 36 3A 4B 51 47 3A 4F 51 80 77 23 36 00 23 ..6:KQG:OQ.w#6.#
000190: 36 00 23 36 2F 23 CD E4 36 36 35 22 53 51 AF 32 6.#6/#..665"SQ.2
0001A0: 4B 51 3A 50 51 3C 32 50 51 3A 4F 51 5F 3A 40 51 KQ:PQ<2PQ:OQ_:@Q
0001B0: 83 3C 32 40 51 C3 89 48 E1 3A 4F 51 5F 3A 4B 51 .<2@Q..H.:OQ_:KQ
0001C0: 83 3C 32 4B 51 3A 40 51 83 3C 32 40 51 3A 50 51 .<2KQ:@Q.<2@Q:PQ
0001D0: 3C 32 50 51 C3 89 48 3A 33 51 B7 C2 E7 4A 3A 73 <2PQ..H:3Q...J:s
0001E0: 44 CD 40 27 CD D4 26 3A 73 44 CD 40 27 CD 45 25 D.@'..&:sD.@'.E%
0001F0: AF 32 73 44 CD 61 27 3A 44 51 CD 6C 3B 21 00 00 .2sD.a':DQ.l;!..
Size : 512 (Real : 512)
000000: D1 45 3A EC 4E 47 3E 08 CD 1D 02 F5 78 32 EC 4E .E:.NG>.....x2.N
000010: F1 47 E6 C0 CA 6A 46 FE 80 CA 2C 4E FE C0 CA C6 .G...jF...,N....
000020: 46 3A EC 4E 5F 3A ED 4E 83 21 1D 51 11 19 00 B7 F:.N_:.N.!.Q....
000030: CA 38 46 19 3D C2 33 46 22 FB 4E EB 21 24 54 CD .8F.=.3F".N.!$T.
000040: D8 36 7C B5 CA 59 46 44 4D 11 3C 54 21 23 54 7E .6|..YFDM.<T!#T~
000050: 12 2B 1B 0B 78 B1 C2 4F 46 2A FB 4E 01 19 00 3E .+..x..OF*.N...>
000060: 20 CD FA 36 2B 36 00 C3 B0 45 78 E6 04 CA 0A 47 ..6+6...Ex....G
000070: AF 32 EC 4E 78 E6 02 CA A5 46 2A 12 4F 11 80 FF .2.Nx....F*.O...
000080: 19 22 12 4F 11 1C 4F CD C0 36 DA 9A 46 21 1C 4F .".O..O..6..F!.O
000090: 22 12 4F AF 32 ED 4E C3 B0 45 3A ED 4E D6 08 32 ".O.2.N..E:.N..2
0000A0: ED 4E C3 B0 45 2A 12 4F 11 80 00 19 22 12 4F 11 .N..E*.O....".O.
0000B0: 9C 50 CD C0 36 D2 BB 46 C3 0A 47 3A ED 4E C6 08 .P..6..F..G:.N..
0000C0: 32 ED 4E C3 B0 45 3A EC 4E 5F 3A ED 4E 83 21 1D 2.N..E:.N_:.N.!.
0000D0: 51 11 19 00 B7 CA DD 46 19 3D C2 D8 46 22 FB 4E Q......F.=..F".N
0000E0: EB 21 24 54 CD D8 36 7C B5 CA F9 46 44 4D 2A FB .!$T..6|...FDM*.
0000F0: 4E EB 21 19 00 19 CD 7E 38 21 24 54 01 19 00 3E N.!....~8!$T...>
000100: 20 CD FA 36 2B 36 00 C3 B0 45 21 C6 99 01 01 02 ..6+6...E!.....
000110: CD F8 36 21 00 00 22 EF 4E 21 C6 99 22 1A 4F 21 ..6!..".N!..".O!
000120: 1C 4F 22 12 4F 2A 12 4F 7E FE 0D CA 05 48 11 0D .O".O*.O~....H..
000130: 00 19 CD DF 36 CD 8E 39 CD 73 39 CA F8 47 2A 1A ....6..9.s9..G*.
000140: 4F EB CD 63 39 CD F1 2A 7E FE 20 C2 2C 48 CD 63 O..c9..*~. .,H.c
000150: 39 0E 00 D5 7E FE 20 CA 69 47 CD 84 36 DA 62 47 9...~. .iG..6.bG
000160: E6 5F 12 0C 13 23 C3 54 47 D1 79 B7 CA 2C 48 FE ._...#.TG.y..,H.
000170: 0B D2 2C 48 CD 8E 39 21 0B 00 19 EB CD 73 39 E6 ..,H..9!.....s9.
000180: 5F FE 43 CA 9D 47 FE 4E CA 9D 47 FE 4C C2 34 48 _.C..G.N..G.L.4H
000190: 12 13 3E 01 12 13 13 13 AF 12 C3 D8 47 12 13 D5 ..>.........G...
0001A0: CD 69 39 CD 73 39 CD FF 37 DA 44 48 7B B7 CA 44 .i9.s9..7.DH{..D
0001B0: 48 7A B7 C2 44 48 7B D1 12 13 13 13 CD 8E 39 CD Hz..DH{.......9.
0001C0: 73 39 CA D8 47 D5 CD FF 37 DA 3C 48 CD 8E 39 CD s9..G...7.<H..9.
0001D0: 73 39 C2 3C 48 7B D1 12 1B 1B 1B 1A 2A EF 4E CD s9.<H{......*.N.
0001E0: BB 36 11 E8 03 CD C0 36 DA 4C 48 22 EF 4E 11 10 .6.....6.LH".N..
0001F0: 00 2A 1A 4F 19 22 1A 4F 11 10 00 2A 12 4F 19 22 .*.O.".O...*.O."
Size : 512 (Real : 512)
000000: 22 3E 51 21 FF FF CD 5B 26 3A 4A 51 B7 CA 86 4B ">Q!...[&:JQ...K
000010: 21 5C 51 11 E5 52 7E FE 35 CA 22 4B 12 13 23 C3 !\Q..R~.5."K..#.
000020: 16 4B D5 E5 23 4E 23 46 21 11 4E 34 CD 72 2A 22 .K..#N#F!.N4.r*"
000030: 45 51 EB E1 36 2F 23 CD E4 36 36 35 D1 EB 36 29 EQ..6/#..665..6)
000040: 23 EB 2A 45 51 EB CD E4 36 36 0F 78 B7 CA 52 4B #.*EQ...66.x..RK
000050: 36 07 23 36 35 21 17 53 36 30 23 EB 2A 45 51 EB 6.#65!.S60#.*EQ.
000060: CD E4 36 36 35 CD DC 1C CA 74 4B CD 78 27 C2 80 ..665....tK.x'..
000070: 4B DA BD 4C CD 47 2B CA BD 4C DA BD 4C C3 65 4B K..L.G+..L..L.eK
000080: 21 5C 51 CD 20 0B CD 45 3B 3A 7A 44 B7 CA 9F 4B !\Q. ..E;:zD...K
000090: CD 1B 36 CD 30 3B C3 9F 4B CD 1B 36 CD 30 3B AF ..6.0;..K..6.0;.
0000A0: 32 32 51 3A 34 51 B7 C2 EE 4B CD 1B 36 CD 8C 4D 22Q:4Q...K..6..M
0000B0: 3E 63 CD 70 3B 2A 3E 51 23 22 3E 51 CD 35 36 CD >c.p;*>Q#">Q.56.
0000C0: 72 36 21 41 97 CD 2B 36 CD 8C 4D 3A 4E 44 B7 CA r6!A..+6..M:ND..
0000D0: EE 4B CD 3A 36 3E 2F CD E8 35 3A 4F 44 CD 3A 36 .K.:6>/..5:OD.:6
0000E0: 3E 2F CD E8 35 3A 50 44 CD 3A 36 CD 1B 36 CD 8C >/..5:PD.:6..6..
0000F0: 4D 3A 4E 51 B7 CA FE 4B 21 6A 54 CD 20 0B CD 1B M:NQ...K!jT. ...
000100: 36 CD 8C 4D 21 73 55 CD 20 0B CD 8C 4D 3A 4A 51 6..M!sU. ...M:JQ
000110: B7 CA 2B 4C CD 8C 4D 3E 2A CD E8 35 CD 7E 36 21 ..+L..M>*..5.~6!
000120: 04 59 CD 20 0B 21 17 53 CD 20 0B CD DC 1C CA 63 .Y. .!.S. .....c
000130: 4C 3A 32 51 B7 C2 99 4B CD 4D 3B 4F 3A 3C 51 B9 L:2Q...K.M;O:<Q.
000140: DA 99 4B CD 78 27 CA 63 4C DA BD 4C 3A 51 51 B7 ..K.x'.cL..L:QQ.
000150: CC 8C 4D 21 92 5A CD 20 0B 3A 37 51 B7 CA 63 4C ..M!.Z. .:7Q..cL
000160: CD 8C 4D CD 47 2B CA BD 4C DA BD 4C CD DC 1C CA ..M.G+..L..L....
000170: 63 4C CD 78 27 CA 63 4C 3A 4A 51 B7 CA 2B 4C 21 cL.x'.cL:JQ..+L!
000180: E5 52 CD 20 0B B7 CA 2B 4C CD 13 4D 3A 32 51 B7 .R. ...+L..M:2Q.
000190: C2 2B 4C CD 4D 3B 4F 3A 3C 51 D6 04 B9 DA 99 4B .+L.M;O:<Q.....K
0001A0: CD 1B 36 CD 8C 4D 3E 2A CD E8 35 CD 7E 36 21 04 ..6..M>*..5.~6!.
0001B0: 59 CD 20 0B 21 17 53 CD 20 0B C3 2B 4C CD 13 4D Y. .!.S. ..+L..M
0001C0: 3A 59 51 B7 CA F8 4C 3A 24 52 FE 35 CA F8 4C CD :YQ...L:$R.5..L.
0001D0: 8C 4D 3E 60 CD 70 3B CD 8C 4D 21 24 52 CD 20 0B .M>`.p;..M!$R. .
0001E0: 21 11 4E CD 15 2A C2 EC 4C CD 79 2A 21 11 4E 35 !.N..*..L.y*!.N5
0001F0: 7E FE 41 D2 E3 4C 36 41 CD 1B 36 3A 43 51 CD 6C ~.A..L6A..6:CQ.l
Size : 512 (Real : 512)
000000: 12 4F C3 25 47 2A 1A 4F 36 0D CD E3 1C EB 21 C6 .O.%G*.O6.....!.
000010: 99 01 01 02 CD 7E 38 21 00 00 CD 2E 2C CD FF 2E .....~8!....,...
000020: CD D4 26 CD B5 2D CD D8 2C C3 2C 4E 3E 1C CD 70 ..&..-..,.,N>..p
000030: 3B C3 F6 4D 3E 1D CD 70 3B C3 F6 4D 3E 1F CD 70 ;..M>..p;..M>..p
000040: 3B C3 F6 4D 3E 1E CD 70 3B C3 F6 4D 3E 79 CD 70 ;..M>..p;..M>y.p
000050: 3B C3 F6 4D AF 32 0A 4F CD 73 39 C2 69 48 3E 5F ;..M.2.O.s9.iH>_
000060: CD 70 3B CD 99 39 CA 2C 4E 3E 01 CD AD 27 CD DE .p;..9.,N>...'..
000070: 4B 3E 41 CD F0 2B D2 87 48 21 A3 4E CD 28 36 3E K>A..+..H!.N.(6>
000080: FF 32 F1 4E C3 8D 48 CD 3C 27 32 F1 4E 11 E6 4E .2.N..H.<'2.N..N
000090: CD 08 4D 3E 81 CD F0 2B CD 3C 27 32 10 4F 3A 57 ..M>...+.<'2.O:W
0000A0: 44 32 FA 4E AF 32 57 44 3A 54 01 3D 32 0B 4F 3A D2.N.2WD:T.=2.O:
0000B0: 54 01 FE 40 D2 C7 48 3A 55 01 0F 3D 32 0F 4F 3A T..@..H:U..=2.O:
0000C0: 0B 4F 87 3D 32 0B 4F 21 28 4F 3A 0B 4F 77 23 11 .O.=2.O!(O:.Ow#.
0000D0: 7E 97 CD E4 36 21 2C 4F 36 0D 23 36 0A 23 22 F2 ~...6!,O6.#6.#".
0000E0: 4E 22 F4 4E 22 F6 4E 22 FD 4E 23 22 F8 4E AF 32 N".N".N".N#".N.2
0000F0: 01 4F 2A F2 4E EB 21 00 60 CD D8 36 44 4D 2A F2 .O*.N.!.`..6DM*.
000100: 4E 3E 1A CD FA 36 CD 12 4D CD AC 06 21 00 00 22 N>...6..M...!.."
000110: 16 4F 21 00 00 22 18 4F 2A F6 4E 22 FB 4E 01 00 .O!..".O*.N".N..
000120: 01 2A FB 4E CD F5 4B DA 6B 49 C5 4F 7E FE 0D C2 .*.N..K.kI.O~...
000130: 3A 49 23 7E FE 0A C2 3A 49 23 79 C1 22 FB 4E 26 :I#~...:I#y.".N&
000140: 00 6F 19 36 00 21 7E 97 3A 0B 4F CD BB 36 36 00 .o.6.!~.:.O..66.
000150: 21 16 4F C5 CD 72 06 C1 04 3A 0F 4F FE 0C D2 62 !.O..r...:.O...b
000160: 49 04 3A 55 01 3D 3D B8 D2 21 49 CD B5 06 21 1C I.:U.==..!I...!.
000170: 4F 22 16 4F 2A FD 4E CD F5 4B 22 FF 4E 3A 01 4F O".O*.N..K".N:.O
000180: 47 04 0E 00 11 EE 4E 21 16 4F CD 72 06 06 00 3E G.....N!.O.r...>
000190: 08 CD 1D 02 47 E6 C0 CA 1A 4A FE 80 C2 AE 49 21 ....G....J....I!
0001A0: 8D 4E CD 28 36 CD 42 38 C2 A0 4B C3 09 49 FE C0 .N.(6.B8..K..I..
0001B0: CA E3 49 CD 4F 4C CD 6A 4C 2A FD 4E EB 2A F8 4E ..I.OL.jL*.N.*.N
0001C0: CD D8 36 44 4D 2A F8 4E 2B 54 5D 13 13 CD 90 38 ..6DM*.N+T]....8
0001D0: EB 23 22 F8 4E 2A FD 4E 36 0D 23 36 0A CD 76 4D .#".N*.N6.#6..vM
0001E0: C3 09 49 2A FF 4E 23 23 EB 2A F8 4E CD D8 36 44 ..I*.N##.*.N..6D
0001F0: 4D 2A FD 4E EB 2A FF 4E 23 23 CD 7E 38 EB 09 22 M*.N.*.N##.~8.."
Size : 512 (Real : 512)
000000: 3B C3 9D 4D 3A 33 51 B7 C2 A5 4D 3E 34 CD 70 3B ;..M:3Q...M>4.p;
000010: C3 89 48 3A 4A 51 B7 C8 3A 49 53 FE 35 CA 31 4D ..H:JQ..:IS.5.1M
000020: CD 8C 4D 3E 49 CD 70 3B CD 8C 4D 21 49 53 CD 20 ..M>I.p;..M!IS.
000030: 0B 21 5C 51 CD 20 0B 3A 52 51 B7 CA 44 4D 3E FF .!\Q. .:RQ..DM>.
000040: 32 32 51 C9 CD 1B 36 C9 3A 33 51 B7 C2 67 4D CD 22Q...6.:3Q..gM.
000050: 99 39 CD 63 39 FE 1B C0 3A 73 44 CD 40 27 CD 45 .9.c9...:sD.@'.E
000060: 25 CD 61 27 C3 9D 4D 3A 73 44 CD CA 39 CD 63 39 %.a'..M:sD..9.c9
000070: E6 7F 77 CD 69 39 C2 70 4D CD 92 39 CD 63 39 C9 ..w.i9.pM..9.c9.
000080: 3A 33 51 B7 C0 3A 73 44 CD 12 3A C9 CD 1B 36 3A :3Q..:sD..:...6:
000090: 3D 51 4F 79 B7 C8 CD 7E 36 0D C3 93 4D 3E 01 21 =QOy...~6...M>.!
0000A0: 00 45 C3 C7 3B 3E FF 32 6F 44 C3 9D 4D 54 54 54 .E..;>.2oD..MTTT
0000B0: 40 40 C8 84 82 A6 8A 40 92 92 40 40 50 86 52 40 @@.....@..@@P.R@
0000C0: 62 72 70 62 40 40 A6 86 88 A0 40 40 40 40 AC CA brpb@@....@@@@..
0000D0: E4 40 64 5C 2C 00 00 00 00 00 00 00 00 00 00 00 .@d\,...........
0000E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000100: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000110: 00 41 3A 3A 3A 3A 3A 3A 3A 3A 41 00 46 4F 52 4D .A::::::::A.FORM
000120: 00 50 4C 41 49 4E 00 50 52 49 4E 54 00 54 4F 00 .PLAIN.PRINT.TO.
000130: 32 4E CD 8E 39 2A DF 5F EB CD F2 14 DA CE 00 72 2N..9*._.......r
000140: 59 00 DB 5F EB 3A 79 44 B7 C2 6B 4E 36 CE 00 78 Y.._.:yD..kN6..x
000150: 59 00 78 B7 C2 66 4E 79 B7 C2 61 4E 36 CE 00 7E Y.x..fNy..aN6..~
000160: 59 00 00 C3 6F 4E 70 34 C3 6F 4E 36 2E CE 00 84 Y...oNp4.oN6....
000170: 59 00 23 36 35 22 DF 5F CD 92 36 CA 81 CE 00 8A Y.#65"._..6.....
000180: 59 00 79 44 B7 C2 F2 4E 3A DB 5F B7 C2 CE 00 90 Y.yD...N:._.....
000190: 59 00 22 E6 5F 2A E6 5F 7E FE 0D CA F2 CE 00 96 Y."._*._~.......
0001A0: 59 00 36 29 23 CD E4 36 36 32 23 EB 01 CE 00 9C Y.6)#..662#.....
0001B0: 59 00 4E 23 23 23 46 EB FE 4E CA D6 4E CE 00 A2 Y.N###F..N..N...
0001C0: 59 00 36 00 23 36 00 23 36 03 C3 DB 4E CE 00 A8 Y.6.#6.#6...N...
0001D0: 59 00 00 C3 DC 4E 70 23 71 23 71 34 23 CE 00 AE Y....Np#q#q4#...
0001E0: 59 00 22 DF 5F 2A E6 5F 11 10 00 19 22 CE 00 B4 Y."._*._...."...
0001F0: 59 00 2A D7 5F CD 5B 26 DA 00 45 CD 99 CE 00 BA Y.*._.[&..E.....
Size : 512 (Real : 512)
000000: F8 4E 2A FD 4E 7E FE 1A C2 09 49 36 0D 23 36 0A .N*.N~....I6.#6.
000010: 23 36 1A 23 22 F8 4E C3 09 49 78 E6 04 CA 32 4B #6.#".N..Ix...2K
000020: 78 E6 02 CA 92 4A CD 4F 4C CD 6A 4C 2A F4 4E EB x....J.OL.jL*.N.
000030: 2A FD 4E CD C0 36 D2 6B 49 CD C8 4B 22 FD 4E 21 *.N..6.kI..K".N!
000040: 01 4F 35 3A 0F 4F FE 0C D2 4C 4A 35 7E B7 F2 6B .O5:.O...LJ5~..k
000050: 49 AF 32 01 4F 2A FD 4E 22 FB 4E 2A F4 4E EB 2A I.2.O*.N".N*.N.*
000060: FB 4E CD C0 36 D2 89 4A CD C8 4B 22 FB 4E 3A 01 .N..6..J..K".N:.
000070: 4F 3C 32 01 4F 47 3A 0F 4F FE 0C D2 83 4A 04 78 O<2.OG:.O....J.x
000080: 32 01 4F 78 FE 0A DA 5B 4A 2A FB 4E 22 F6 4E C3 2.Ox...[J*.N".N.
000090: 09 49 78 E6 08 C2 F2 4A CD 4F 4C CD 6A 4C 2A FD .Ix....J.OL.jL*.
0000A0: 4E CD F5 4B 7E FE 1A C2 B4 4A 36 0D 23 36 0A 23 N..K~....J6.#6.#
0000B0: 36 1A 2B 2B 23 23 22 FD 4E 7E FE 1A C2 CE 4A 36 6.++##".N~....J6
0000C0: 0D 23 36 0A 23 36 1A 23 22 F8 4E CD 76 4D 21 01 .#6.#6.#".N.vM!.
0000D0: 4F 34 3A 0F 4F FE 0C D2 DB 4A 34 3A 55 01 3D 3D O4:.O....J4:U.==
0000E0: 3D BE D2 6B 49 AF 32 01 4F 2A FD 4E 22 F6 4E C3 =..kI.2.O*.N".N.
0000F0: 09 49 CD 6A 4C 3A 0F 4F FE 0C 3E 0C D2 01 4B 3E .I.jL:.O..>...K>
000100: 06 32 11 4F 2A F6 4E CD F5 4B 7E FE 1A CA 25 4B .2.O*.N..K~...%K
000110: 23 23 7E FE 1A CA 25 4B 22 F6 4E 3A 11 4F 3D 32 ##~...%K".N:.O=2
000120: 11 4F C2 04 4B 2A F6 4E 22 FD 4E AF 32 01 4F C3 .O..K*.N".N.2.O.
000130: 09 49 CD 6A 4C 3A F1 4E B7 FA 48 4B 2A F8 4E 22 .I.jL:.N..HK*.N"
000140: F6 4E CD 12 4D D2 35 4B 2A F2 4E EB 2A F8 4E CD .N..M.5K*.N.*.N.
000150: D8 36 44 4D 3A 10 4F CD 40 27 CD C4 2E CD D4 26 .6DM:.O.@'.....&
000160: CD 45 25 3A F1 4E B7 FA 8B 4B CD 40 27 CD 45 25 .E%:.N...K.@'.E%
000170: 11 E9 4E CD 08 4D CD 03 27 11 07 4F CD 08 4D CD ..N..M..'..O..M.
000180: A1 2C 11 E9 4E CD 08 4D CD B2 2C 11 E6 4E CD 08 .,..N..M..,..N..
000190: 4D CD A1 2C 11 07 4F CD 08 4D CD B2 2C C3 B9 4B M..,..O..M..,..K
0001A0: 3A F1 4E B7 FA AD 4B CD 40 27 CD 45 25 3A 10 4F :.N...K.@'.E%:.O
0001B0: CD 40 27 CD 45 25 CD 03 27 CD 61 27 3A FA 4E 32 .@'.E%..'.a':.N2
0001C0: 57 44 CD AC 06 C3 2C 4E 2B 7E FE 0A C2 D0 4B 2B WD....,N+~....K+
0001D0: 2B 7E FE 0D C2 D0 4B 23 7E FE 0A C0 23 C9 CD 68 +~....K#~...#..h
0001E0: 27 0E 0C 3E 2E CD 13 37 23 22 05 4F 11 07 4F 0E '..>...7#".O..O.
0001F0: 03 CD 78 38 C9 C5 E5 3A 0B 4F 4F 06 00 3E 20 21 ..x8...:.OO..> !
Size : 512 (Real : 512)
000000: 59 00 45 CD 78 27 CA 68 4F DA 00 45 2A CE 00 C0 Y.E.x'.hO..E*...
000010: 59 00 5F 7C B5 C2 2B 4F 21 0F 00 22 D5 CE 00 C6 Y._|..+O!.."....
000020: 59 00 3B CD 8E 3A FE 1B CA 00 45 CD 1B CE 00 CC Y.;..:....E.....
000030: 59 00 C2 44 4F CD 99 2C CD 35 36 CD 7E CE 00 D2 Y..DO..,.56.~...
000040: 59 00 E8 35 3A DB 5F B7 C2 62 4F 3A 79 CE 00 D8 Y..5:._..bO:y...
000050: 59 00 CD 84 29 44 4D CD DC 1C 0B 23 CD CE 00 DE Y...)DM....#....
000060: 59 00 21 7E 97 CD 20 0B CD 47 2B CA 00 CE 00 E4 Y.!~.. ..G+.....
000070: 59 00 00 45 3E 03 21 0C 45 C3 C7 3B CD CE 00 EA Y..E>.!.E..;....
000080: 59 00 09 45 C3 C7 3B CD 8E 39 3E 08 21 CE 00 F0 Y..E..;..9>.!...
000090: 59 00 CD 73 39 11 C1 5E CD B1 37 CA 5C CE 00 F6 Y..s9..^..7.\...
0000A0: 59 00 B1 37 CA EF 4F CD 63 39 3E 01 CD CE 00 FC Y..7..O.c9>.....
0000B0: 59 00 CD 73 39 C2 14 5B 3E 42 CD F0 2B CE 00 02 Y..s9..[>B..+...
0000C0: 5A 00 44 FE 10 D2 E7 4F 21 5E 44 CD BB CE 00 08 Z.D....O!^D.....
0000D0: 5A 00 32 5C 44 21 5D 44 34 CD 36 2F CD CE 00 0E Z.2\D!]D4.6/....
0000E0: 5A 00 3E 29 C3 E9 4F 3E 2A CD 70 3B C3 CE 00 14 Z.>)..O>*.p;....
0000F0: 5A 00 B7 CA 54 50 CD 8E 39 CD 1D 2E DA CE 00 1A Z...TP..9.......
000100: 5A 00 AF 32 DA 5F 3A 5C 44 CD CA 39 CD CE 00 20 Z..2._:\D..9...
000110: 5A 00 2C 50 11 0F 5E CD B1 37 C2 33 50 CE 00 26 Z.,P..^..7.3P..&
000120: 5A 00 39 11 AA 5E CD B1 37 C2 06 50 21 CE 00 2C Z.9..^..7..P!..,
000130: 5A 00 50 CD 63 39 FE 84 CA 44 50 11 B5 CE 00 32 Z.P.c9...DP....2
000140: 5A 00 06 50 21 DA 5F 35 F2 06 50 C3 00 CE 00 38 Z..P!._5..P....8
000150: 5A 00 00 45 3E 29 CD 70 3B C3 00 45 3E CE 00 3E Z..E>).p;..E>..>
000160: 5A 00 00 45 CD 3C 29 3E 02 21 09 45 C3 CE 00 44 Z..E.<)>.!.E...D
000170: 5A 00 74 44 AF 32 DC 5F C3 00 45 AF 32 CE 00 4A Z.tD.2._..E.2..J
000180: 5A 00 AF 32 DA 5F 3A 5C 44 B7 CA 00 45 CE 00 50 Z..2._:\D...E..P
000190: 5A 00 45 CD 68 3B F5 47 3A 7C 44 B0 CA CE 00 56 Z.E.h;.G:|D....V
0001A0: 5A 00 6C 3B CD 30 3B F1 CD 6C 3B C3 00 CE 00 5C Z.l;.0;..l;....\
0001B0: 5A 00 00 45 CD 3C 29 CD 9F 24 CA 0C 51 CE 00 62 Z..E.<)..$..Q..b
0001C0: 5A 00 36 CA CB 50 06 00 C3 CE 50 CD 69 CE 00 68 Z.6..P....P.i..h
0001D0: 5A 00 CD 20 37 4F CD 63 39 79 CD B1 20 CE 00 6E Z.. 7O.c9y.. ..n
0001E0: 5A 00 7C B5 CA FD 50 3A 5B 44 B7 CA 00 CE 00 74 Z.|...P:[D.....t
0001F0: 5A 00 00 45 CD 63 39 CD C9 21 C3 DD 50 CE 00 7A Z..E.c9..!..P..z
Size : 512 (Real : 512)
000000: 7E 97 CD FA 36 36 00 E1 3A 0A 4F B7 CA 15 4C 7E ~...66..:.O...L~
000010: FE 1A CA 46 4C 11 7E 97 0E 00 22 02 4F D5 EB 2A ...FL.~...".O..*
000020: F8 4E 2B CD C0 36 D4 12 4D D1 2A 02 4F 7E FE 1A .N+..6..M.*.O~..
000030: CA 49 4C FE 0D CA 49 4C FE 09 C2 3F 4C 3E 20 12 .IL...IL...?L> .
000040: 23 13 0C C3 1A 4C C1 37 C9 11 7E 97 79 C1 C9 C5 #....L.7..~.y...
000050: D5 21 00 00 22 16 4F 11 7E 97 3A 01 4F 47 04 0E .!..".O.~.:.OG..
000060: 00 21 16 4F CD 72 06 D1 C1 C9 C5 D5 2A FD 4E 06 .!.O.r......*.N.
000070: 00 7E FE 0D CA 81 4C FE 1A CA 81 4C 04 23 C3 71 .~....L....L.#.q
000080: 4C 3A 0B 4F 4F 0C 21 7E 97 CD BB 36 0D CA 9B 4C L:.OO.!~...6...L
000090: 2B 7E B7 CA 8C 4C FE 20 CA 8C 4C 79 32 0E 4F 90 +~...L. ..Ly2.O.
0000A0: 32 04 4F CA F4 4C F5 2A FF 4E EB 2A F8 4E CD D8 2.O..L.*.N.*.N..
0000B0: 36 22 0C 4F F1 D2 DB 4C 79 2A FD 4E CD BB 36 EB 6".O...Ly*.N..6.
0000C0: 2A 0C 4F 44 4D 2A FF 4E CD 7E 38 3A 04 4F 5F 16 *.ODM*.N.~8:.O_.
0000D0: FF 2A F8 4E 19 22 F8 4E C3 F4 4C 2A F8 4E 2B CD .*.N.".N..L*.N+.
0000E0: BB 36 EB 2A 0C 4F 44 4D 2A F8 4E 2B CD 90 38 EB .6.*.ODM*.N+..8.
0000F0: 23 22 F8 4E 2A FD 4E 11 7E 97 EB 3A 0E 4F 4F CD #".N*.N.~..:.OO.
000100: 78 38 CD 76 4D D1 C1 C9 2A 05 4F EB 0E 03 CD 78 x8.vM...*.O....x
000110: 38 C9 C5 D5 3A F1 4E B7 FA 5E 4D 2A F8 4E 11 00 8...:.N..^M*.N..
000120: 5E CD C0 36 D2 2D 4D CD 80 4D C3 1B 4D 54 5D 1B ^..6.-M..M..MT].
000130: 01 00 02 09 22 F8 4E 3A F1 4E CD 40 27 CD 7A 2C ....".N:.N.@'.z,
000140: F5 78 B1 CA 5A 4D 1A E6 7F 12 0B 13 FE 1A C2 41 .x..ZM.........A
000150: 4D EB 22 F8 4E 3E FF 32 0A 4F F1 D1 C1 C9 2A F8 M.".N>.2.O....*.
000160: 4E 2B 36 0D 23 36 0A 23 36 1A 23 22 F8 4E 3E FF N+6.#6.#6.#".N>.
000170: 32 0A 4F D1 C1 C9 2A F8 4E 11 9C 5F CD C0 36 D0 2.O...*.N.._..6.
000180: 2A F2 4E EB 2A F6 4E CD D8 36 11 00 02 CD C0 36 *.N.*.N..6.....6
000190: D2 E7 4D 2A F2 4E EB 01 00 02 3A 10 4F CD 40 27 ..M*.N....:.O.@'
0001A0: CD C4 2E 2A F2 4E 54 5D 09 D5 E5 EB 2A F8 4E CD ...*.NT]....*.N.
0001B0: D8 36 44 4D E1 D1 CD 7E 38 11 00 FE 2A F6 4E 19 .6DM...~8...*.N.
0001C0: 22 F6 4E 2A F8 4E 19 22 F8 4E 2A FD 4E 19 22 FD ".N*.N.".N*.N.".
0001D0: 4E 2A 02 4F 19 22 02 4F 2A F2 4E 3E 0A 0E FF CD N*.O.".O*.N>....
0001E0: 13 37 23 22 F4 4E C9 21 B1 4E CD 28 36 CD 42 38 .7#".N.!.N.(6.B8
0001F0: CA A0 4B C3 35 4B 3E 65 CD 70 3B CD 8E 3A C3 AA ..K.5K>e.p;..:..
Size : 512 (Real : 512)
000000: 36 D5 CD DF 36 22 7F 4A E1 22 6F 4A 21 59 4A CD 6...6".J."oJ!YJ.
000010: 20 0B B7 E1 C2 2C 49 EB 2A 7F 4A EB CD E4 36 EB ....,I.*.J...6.
000020: 2A 6F 4A EB CD E4 36 06 01 C3 37 49 3A 53 4A B7 *oJ...6...7I:SJ.
000030: CA 37 49 F1 C3 40 49 F1 B7 CA 40 49 3D C3 F4 48 .7I..@I...@I=..H
000040: D1 78 C1 B7 C9 3A 61 4A B7 C0 D5 22 8F 4A 3A 53 .x...:aJ...".J:S
000050: 4A B7 CA 63 49 21 92 4A CD 20 0B C2 63 49 3E FF J..cI!.J. ..cI>.
000060: 32 61 4A 21 9A 4A CD 20 0B 3E 01 32 53 4A D1 C9 2aJ!.J. .>.2SJ..
000070: 3E 19 CD 70 3B C3 7E 44 3E 2F CD 70 3B C3 A0 49 >..p;.~D>/.p;..I
000080: 3E 14 CD 70 3B C3 A0 49 3E 52 CD 70 3B C3 A0 49 >..p;..I>R.p;..I
000090: 3E 48 CD 70 3B C3 A0 49 3E 28 CD 70 3B C3 A0 49 >H.p;..I>(.p;..I
0000A0: 3E 01 32 6F 44 C3 B0 49 3E FF 32 6F 44 C3 B0 49 >.2oD..I>.2oD..I
0000B0: 3E 01 21 00 45 C3 C7 3B 54 54 54 40 40 C8 84 82 >.!.E..;TTT@@...
0000C0: A6 8A 40 92 92 40 40 50 86 52 40 62 72 70 64 40 ..@..@@P.R@brpd@
0000D0: 40 A4 A6 A0 58 92 9C 86 40 AC CA E4 40 64 5C 2C @...X...@...@d\,
0000E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000100: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000110: 00 00 00 00 00 00 00 00 00 00 00 00 41 3A 3A 3A ............A:::
000120: 3A 3A 3A 3A 3A 41 00 4F 4E 00 41 53 43 45 4E 44 :::::A.ON.ASCEND
000130: 49 4E 47 00 44 45 53 43 45 4E 44 49 4E 47 00 54 ING.DESCENDING.T
000140: 4F 00 00 3A 0F 4F FE 0C D2 4C 4A 35 7E B7 F2 6B O..:.O...LJ5~..k
000150: 49 AF 32 01 4F 2A FD 4E 22 29 00 00 29 00 00 0B I.2.O*.N")..)...
000160: 35 4E 43 4F 50 59 52 49 47 48 54 20 20 4E 3A 01 5NCOPYRIGHT N:.
000170: 4F 3C 28 43 29 20 31 39 38 32 20 20 20 4A 04 78 O<(C) 1982 J.x
000180: 32 01 52 53 50 2C 20 49 4E 43 20 20 20 F6 4E C3 2.RSP, INC .N.
000190: 09 49 29 02 00 29 82 4A 0B 35 29 82 4A 2F 02 00 .I)..).J.5).J/..
0001A0: 35 CD 3A 3A 3A 41 00 4F 4E 00 41 53 43 45 4E 44 5.:::A.ON.ASCEND
0001B0: 49 4E 47 00 44 45 53 43 45 4E 44 49 4E 47 00 54 ING.DESCENDING.T
0001C0: 4F 00 00 3A 0F 4F FE 0C D2 4C 4A 35 7E B7 F2 6B O..:.O...LJ5~..k
0001D0: 49 AF 32 01 4F 2A FD 4E 22 29 00 00 29 00 00 0B I.2.O*.N")..)...
0001E0: 35 4E 43 4F 50 59 52 49 47 48 54 20 20 4E 3A 01 5NCOPYRIGHT N:.
0001F0: 4F 3C 28 43 29 20 31 39 38 32 20 20 20 4A 04 78 O<(C) 1982 J.x
Size : 512 (Real : 512)
000000: 45 E5 26 00 6F 01 64 00 CD 19 4E 01 0A 00 CD 19 E.&.o.d...N.....
000010: 4E 01 01 00 CD 19 4E E1 C9 D5 16 2F 14 7D 91 6F N.....N..../.}.o
000020: 7C 98 67 D2 1C 4E 09 7A D1 12 13 C9 3E 01 21 00 |.g..N.z....>.!.
000030: 45 C3 C7 3B 3E FF 32 6F 44 C3 2C 4E 04 02 01 13 E..;>.2oD.,N....
000040: 05 E0 E8 03 E9 E0 F1 F9 F8 F1 E0 13 03 04 10 E0 ................
000050: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 43 4F ..............CO
000070: 4D 4D 41 4E 44 00 4E 4F 4D 20 20 20 20 20 20 20 MMAND.NOM
000080: 54 59 50 20 44 49 4D 20 20 44 45 43 00 41 42 41 TYP DIM DEC.ABA
000090: 4E 44 4F 4E 20 4D 4F 44 49 46 2E 20 20 28 59 2F NDON MODIF. (Y/
0000A0: 4E 29 00 0D 0A 20 20 43 52 45 41 54 49 4F 4E 20 N)... CREATION
0000B0: 00 42 55 46 46 45 52 20 50 4C 45 49 4E 2E 20 59 .BUFFER PLEIN. Y
0000C0: 20 3D 20 53 41 55 56 45 47 41 52 44 45 2C 20 4E = SAUVEGARDE, N
0000D0: 20 3D 20 41 42 41 4E 44 4F 4E 20 00 53 54 52 55 = ABANDON .STRU
0000E0: 43 54 55 52 45 00 24 24 24 42 41 4B 00 00 00 CD CTURE.$$$BAK....
0000F0: 78 36 C3 1B 4E CD 1B 36 1E 04 C3 1B 4E C5 D5 0E x6..N..6....N...
000100: 11 C3 08 4F C5 D5 0E 12 11 5C 00 CD 05 00 FE 16 ...O.....\......
000110: C2 17 4F 37 D1 C1 C9 E6 03 06 00 0F 43 48 41 4D ..O7........CHAM
000120: 50 20 30 31 20 20 00 43 18 1D 51 00 43 48 41 4D P 01 .C..Q.CHAM
000130: 50 20 30 32 20 20 00 43 18 36 51 00 43 48 41 4D P 02 .C.6Q.CHAM
000140: 50 20 30 33 20 20 00 43 18 4F 51 00 43 48 41 4D P 03 .C.OQ.CHAM
000150: 50 20 30 34 20 20 00 43 18 68 51 00 43 48 41 4D P 04 .C.hQ.CHAM
000160: 50 20 30 35 20 20 00 43 18 81 51 00 43 48 41 4D P 05 .C..Q.CHAM
000170: 50 20 30 36 20 20 00 43 18 9A 51 00 43 48 41 4D P 06 .C..Q.CHAM
000180: 50 20 30 37 20 20 00 43 18 B3 51 00 43 48 41 4D P 07 .C..Q.CHAM
000190: 50 20 30 38 20 20 00 43 18 CC 51 00 43 48 41 4D P 08 .C..Q.CHAM
0001A0: 50 20 30 39 20 20 00 43 18 E5 51 00 43 48 41 4D P 09 .C..Q.CHAM
0001B0: 50 20 31 30 20 20 00 43 18 FE 51 00 43 48 41 4D P 10 .C..Q.CHAM
0001C0: 50 20 31 31 20 20 00 43 18 17 52 00 43 48 41 4D P 11 .C..R.CHAM
0001D0: 50 20 31 32 20 20 00 43 18 30 52 00 43 48 41 4D P 12 .C.0R.CHAM
0001E0: 50 20 31 33 20 20 00 43 18 49 52 00 43 48 41 4D P 13 .C.IR.CHAM
0001F0: 50 20 31 34 20 20 00 43 18 62 52 00 43 48 41 4D P 14 .C.bR.CHAM
Size : 512 (Real : 512)
000000: CD 3C 27 B7 CA 77 45 3E FF 32 DB 47 CD 1B 36 21 .<'..wE>.2.G..6!
000010: 12 49 CD 28 36 CD 3C 27 CD C4 25 CD 7F 2E FE 01 .I.(6.<'..%.....
000020: CA 2B 45 3E 70 CD 70 3B C3 30 45 3E 71 CD 70 3B .+E>p.p;.0E>q.p;
000030: CD 1B 36 CD A4 24 7E B7 CA 77 45 22 60 49 21 27 ..6..$~..wE"`I!'
000040: 49 CD 28 36 CD 1B 36 CD 7E 36 2A 60 49 7E B7 CA I.(6..6.~6*`I~..
000050: 77 45 23 22 60 49 CD 40 27 CD C4 25 CD 78 36 CD wE#"`I.@'..%.x6.
000060: A8 2D 01 6E 00 11 FF 49 CD 7A 2C 21 09 4A CD 2B .-.n...I.z,!.J.+
000070: 36 CD 1B 36 C3 47 45 CD 61 27 CD 83 2E CD 3C 27 6..6.GE.a'....<'
000080: B7 CA F4 45 3E FF 32 DB 47 CD 1B 36 21 49 49 CD ...E>.2.G..6!II.
000090: 28 36 CD 3C 27 CD C4 25 CD 7F 2E FE 01 CA A8 45 (6.<'..%.......E
0000A0: 3E 70 CD 70 3B C3 AD 45 3E 71 CD 70 3B CD 1B 36 >p.p;..E>q.p;..6
0000B0: CD A4 24 7E B7 CA F4 45 22 60 49 21 27 49 CD 28 ..$~...E"`I!'I.(
0000C0: 36 CD 1B 36 CD 7E 36 2A 60 49 7E B7 CA F4 45 23 6..6.~6*`I~...E#
0000D0: 22 60 49 CD 40 27 CD C4 25 CD 78 36 CD A8 2D 01 "`I.@'..%.x6..-.
0000E0: 6E 00 11 FF 49 CD 7A 2C 21 09 4A CD 2B 36 CD 1B n...I.z,!.J.+6..
0000F0: 36 C3 C4 45 CD 83 2E CD 1B 36 3A DB 47 B7 CA 1A 6..E.....6:.G...
000100: 46 CD 1B 36 CD 1B 36 CD 1B 36 3E 65 CD 70 3B CD F..6..6..6>e.p;.
000110: 8E 3A FE 1A CA 6C 47 CD 1B 36 21 FC 47 CD 28 36 .:...lG..6!.G.(6
000120: 3A 4E 44 CD 3A 36 3E 2F CD E8 35 3A 4F 44 CD 3A :ND.:6>/..5:OD.:
000130: 36 3E 2F CD E8 35 3A 50 44 CD 3A 36 21 12 48 CD 6>/..5:PD.:6!.H.
000140: 28 36 3A 5A 44 C6 40 CD E8 35 3E 3A CD E8 35 3A (6:ZD.@..5>:..5:
000150: 4C 44 B7 CA 65 46 21 E6 47 CD 28 36 3A 4C 44 CD LD..eF!.G.(6:LD.
000160: C4 25 CD 1B 36 21 28 48 CD 28 36 3A 56 44 CD 5B .%..6!(H.(6:VD.[
000170: 47 CD 78 36 21 35 48 CD 2B 36 3A 51 44 CD 5B 47 G.x6!5H.+6:QD.[G
000180: 21 42 48 CD 28 36 3A 54 44 CD 5B 47 CD 78 36 21 !BH.(6:TD.[G.x6!
000190: 4F 48 CD 2B 36 3A 57 44 CD 5B 47 21 69 48 CD 28 OH.+6:WD.[G!iH.(
0001A0: 36 3A 58 44 CD 5B 47 CD 78 36 21 5C 48 CD 2B 36 6:XD.[G.x6!\H.+6
0001B0: CD 59 3B CD 5B 47 21 76 48 CD 28 36 3A 59 44 CD .Y;.[G!vH.(6:YD.
0001C0: 5B 47 CD 78 36 21 83 48 CD 2B 36 3A 5B 44 CD 5B [G.x6!.H.+6:[D.[
0001D0: 47 21 90 48 CD 28 36 3A 6E 44 CD 5B 47 CD 78 36 G!.H.(6:nD.[G.x6
0001E0: 21 9D 48 CD 2B 36 3A 7A 44 CD 5B 47 21 AA 48 CD !.H.+6:zD.[G!.H.
0001F0: 28 36 3A 70 44 CD 5B 47 CD 78 36 21 B7 48 CD 2B (6:pD.[G.x6!.H.+
Size : 512 (Real : 512)
000000: 50 20 31 35 20 20 00 43 18 7B 52 00 43 48 41 4D P 15 .C.{R.CHAM
000010: 50 20 31 36 20 20 00 43 18 94 52 00 43 48 41 4D P 16 .C..R.CHAM
000020: 50 20 31 37 20 20 00 43 18 AD 52 00 43 48 41 4D P 17 .C..R.CHAM
000030: 50 20 31 38 20 20 00 43 18 C6 52 00 43 48 41 4D P 18 .C..R.CHAM
000040: 50 20 31 39 20 20 00 43 18 DF 52 00 43 48 41 4D P 19 .C..R.CHAM
000050: 50 20 32 30 20 20 00 43 18 F8 52 00 43 48 41 4D P 20 .C..R.CHAM
000060: 50 20 32 31 20 20 00 43 18 11 53 00 43 48 41 4D P 21 .C..S.CHAM
000070: 50 20 32 32 20 20 00 43 18 2A 53 00 43 48 41 4D P 22 .C.*S.CHAM
000080: 50 20 32 33 20 20 00 43 18 43 53 00 43 48 41 4D P 23 .C.CS.CHAM
000090: 50 20 32 34 20 20 00 43 18 5C 53 00 43 48 41 4D P 24 .C.\S.CHAM
0000A0: 50 20 32 35 20 20 00 43 18 75 53 00 43 48 41 4D P 25 .C.uS.CHAM
0000B0: 50 20 32 36 20 20 00 43 18 8E 53 00 43 48 41 4D P 26 .C..S.CHAM
0000C0: 50 20 32 37 20 20 00 43 18 A7 53 00 43 48 41 4D P 27 .C..S.CHAM
0000D0: 50 20 32 38 20 20 00 43 18 C0 53 00 43 48 41 4D P 28 .C..S.CHAM
0000E0: 50 20 32 39 20 20 00 43 18 D9 53 00 43 48 41 4D P 29 .C..S.CHAM
0000F0: 50 20 33 30 20 20 00 43 18 F2 53 00 43 48 41 4D P 30 .C..S.CHAM
000100: 50 20 33 31 20 20 00 43 18 0B 54 00 43 48 41 4D P 31 .C..T.CHAM
000110: 50 20 33 32 20 20 00 43 18 24 54 00 0D 84 45 4C P 32 .C.$T...EL
000120: 44 20 32 35 20 20 00 43 18 75 53 00 46 49 45 4C D 25 .C.uS.FIEL
000130: 44 20 32 36 20 20 00 43 18 8E 53 00 46 49 45 4C D 26 .C..S.FIEL
000140: 44 20 32 37 20 20 00 43 18 A7 53 00 46 49 45 4C D 27 .C..S.FIEL
000150: 44 20 32 38 20 20 00 43 18 C0 53 00 46 49 45 4C D 28 .C..S.FIEL
000160: 44 20 32 39 20 20 00 43 18 D9 53 00 46 49 45 4C D 29 .C..S.FIEL
000170: 44 20 33 30 20 20 00 43 18 F2 53 00 46 49 45 4C D 30 .C..S.FIEL
000180: 27 C3 5B 54 3E 48 C3 53 54 3E 28 C3 53 54 AF 32 '.[T>H.ST>(.ST.2
000190: 5B 56 CD 63 39 11 6E 55 CD B1 37 CA AF 51 3E FF [V.c9.nU..7..Q>.
0001A0: 32 5B 56 CD 63 39 11 52 55 CD B1 37 C2 48 54 CD 2[V.c9.RU..7.HT.
0001B0: 8E 39 CD 73 39 CA 48 54 22 71 56 CD D8 1C 22 67 .9.s9.HT"qV..."g
0001C0: 56 2A 67 56 7E B7 CA E7 51 EB 2A 71 56 3A 5B 56 V*gV~...Q.*qV:[V
0001D0: B7 CA DD 51 CD 8E 54 CA E7 51 C3 E3 51 CD 8E 54 ...Q..T..Q..Q..T
0001E0: C2 E7 51 EB CD 79 2A 2A 67 56 11 10 00 19 22 67 ..Q..y**gV...."g
0001F0: 56 7E FE 0D C2 C1 51 C3 5B 54 CD DD 25 AF 32 5F V~....Q.[T..%.2_
Size : 512 (Real : 512)
000000: 36 3A 71 44 CD 5B 47 21 C4 48 CD 28 36 3A 75 44 6:qD.[G!.H.(6:uD
000010: CD 5B 47 CD 78 36 21 D1 48 CD 2B 36 3A 78 44 CD .[G.x6!.H.+6:xD.
000020: 5B 47 21 DE 48 CD 28 36 CD 68 3B CD 5B 47 CD 78 [G!.H.(6.h;.[G.x
000030: 36 21 EB 48 CD 2B 36 3A 79 44 CD 5B 47 21 F8 48 6!.H.+6:yD.[G!.H
000040: CD 28 36 3A 7B 44 CD 5B 47 CD 78 36 21 05 49 CD .(6:{D.[G.x6!.I.
000050: 2B 36 3A 7D 44 CD 5B 47 C3 6C 47 B7 CA 65 47 21 +6:}D.[G.lG..eG!
000060: E1 47 C3 68 47 21 DC 47 CD 2B 36 C9 CD 61 27 3E .G.hG!.G.+6..a'>
000070: 01 21 00 45 C3 C7 3B 54 54 54 40 40 C8 84 82 A6 .!.E..;TTT@@....
000080: 8A 40 92 92 40 40 50 86 52 40 62 72 70 62 40 40 .@..@@P.R@brpb@@
000090: A6 86 88 A0 40 40 40 40 AC CA E4 40 64 5C 2C 00 ....@@@@...@d\,.
0000A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000D0: 00 00 00 00 00 00 00 00 00 00 00 00 4F 46 46 20 ............OFF
0000E0: 00 4F 4E 20 20 00 46 49 43 48 49 45 52 20 41 4C .ON .FICHIER AL
0000F0: 54 45 52 4E 41 4E 54 20 20 2D 20 00 44 41 54 45 TERNANT - .DATE
000100: 20 44 55 20 4A 4F 55 52 20 20 20 20 20 20 20 2D DU JOUR -
000110: 20 00 55 4E 49 54 45 20 44 45 20 44 45 46 41 55 .UNITE DE DEFAU
000120: 54 20 20 20 20 2D 20 00 41 4C 54 45 52 4E 41 54 T - .ALTERNAT
000130: 45 20 2D 20 00 42 45 4C 4C 20 20 20 20 20 20 2D E - .BELL -
000140: 20 00 43 41 52 52 59 20 20 20 20 20 2D 20 00 43 .CARRY - .C
000150: 4F 4C 4F 4E 20 20 20 20 20 2D 20 00 43 4F 4E 53 OLON - .CONS
000160: 4F 4C 45 20 20 20 2D 20 00 43 4F 4E 46 49 52 4D OLE - .CONFIRM
000170: 20 20 20 2D 20 00 44 45 42 55 47 20 20 20 20 20 - .DEBUG
000180: 2D 20 00 44 45 4C 45 54 45 20 20 20 20 2D 20 00 - .DELETE - .
000190: 45 43 48 4F 20 20 20 20 20 20 2D 20 00 45 4A 45 ECHO - .EJE
0001A0: 43 54 20 20 20 20 20 2D 20 00 45 53 43 41 50 45 CT - .ESCAPE
0001B0: 20 20 20 20 2D 20 00 45 58 41 43 54 20 20 20 20 - .EXACT
0001C0: 20 2D 20 00 49 4E 54 45 4E 53 49 54 59 20 2D 20 - .INTENSITY -
0001D0: 00 4C 49 4E 4B 41 47 45 20 20 20 2D 20 00 50 52 .LINKAGE - .PR
0001E0: 49 4E 54 20 20 20 20 20 2D 20 00 52 41 57 20 20 INT - .RAW
0001F0: 20 20 20 20 20 2D 20 00 53 54 45 50 20 20 20 20 - .STEP
Size : 512 (Real : 512)
000000: CD 3C 29 3E 0B 32 49 4A 32 98 4A 3E 09 32 4A 4A .<)>.2IJ2.J>.2JJ
000010: 21 00 00 22 46 4A AF 32 43 4A CD 73 39 CA 99 45 !.."FJ.2CJ.s9..E
000020: 11 27 4A CD B1 37 C2 47 45 CD 8E 39 CD 73 39 E5 .'J..7.GE..9.s9.
000030: CD F1 2A CA 80 49 E3 CD 92 28 C2 88 49 22 46 4A ..*..I...(..I"FJ
000040: E1 CD 8E 39 C3 1A 45 11 2A 4A E5 CD B1 37 CA 55 ...9..E.*J...7.U
000050: 45 E1 C3 5C 45 CD 8E 39 E1 C3 1A 45 11 34 4A E5 E..\E..9...E.4J.
000060: CD B1 37 CA 6A 45 E1 C3 7E 45 CD 8E 39 E1 3E 0A ..7.jE..~E..9.>.
000070: 32 49 4A 32 98 4A 3E 08 32 4A 4A C3 1A 45 11 3F 2IJ2.J>.2JJ..E.?
000080: 4A CD B1 37 C2 90 49 CD 8E 39 AF CD AD 27 DA 98 J..7..I..9...'..
000090: 49 3E FF 32 43 4A C3 1A 45 2A 46 4A 7C B5 CA A8 I>.2CJ..E*FJ|...
0000A0: 49 3A 43 4A B7 CA 90 49 2A 06 00 2B 11 C7 9B EB I:CJ...I*..+....
0000B0: CD D8 36 EB CD 84 29 01 00 00 EB 19 03 7C B7 FA ..6...)......|..
0000C0: BB 45 B5 CA C7 45 0B 78 B7 C2 D0 45 B1 F2 D2 45 .E...E.x...E...E
0000D0: 3E 80 32 51 4A 2A 46 4A 11 0B 00 19 7E FE 4C CA >.2QJ*FJ....~.L.
0000E0: 78 49 32 6D 4A 32 7D 4A 32 8D 4A FE 43 C2 03 46 xI2mJ2}J2.J.C..F
0000F0: 3A 49 4A C6 08 32 49 4A 32 98 4A 3A 4A 4A C6 08 :IJ..2IJ2.J:JJ..
000100: 32 4A 4A 23 7E 32 6E 4A 32 7E 4A 32 8E 4A 23 CD 2JJ#~2nJ2~J2.J#.
000110: E9 36 7E 32 71 4A 32 81 4A 32 91 4A CD DC 1C EB .6~2qJ2.J2.J....
000120: CD D8 36 22 56 4A 3A 6E 4A 47 3A 71 4A 4F 3A 6D ..6"VJ:nJG:qJO:m
000130: 4A FE 4E CA 39 46 78 41 4F 21 1C 4A CD 72 2A 22 J.N.9FxAO!.J.r*"
000140: 93 4A 22 9E 4A CD D8 2C CD EF 26 CD 3C 27 32 58 .J".J..,..&.<'2X
000150: 4A 3E C0 CD F0 2B CD 3C 27 32 42 4A AF CD FF 2E J>...+.<'2BJ....
000160: 21 00 00 22 4E 4A 3E FF 32 61 4A 32 52 4A CD 2A !.."NJ>.2aJ2RJ.*
000170: 2C 7C B5 C2 BF 46 CD D4 26 AF 32 58 4A C3 8A 48 ,|...F..&.2XJ..H
000180: AF 32 52 4A 3A 42 4A CD 40 27 CD D4 26 CD EF 26 .2RJ:BJ.@'..&..&
000190: 2A 4E 4A CD 2E 2C CD FF 2E CD B5 2D AF CD F0 2B *NJ..,.....-...+
0001A0: CD 3C 27 32 58 4A 3E FF 32 61 4A 3A 51 4A 16 00 .<'2XJ>.2aJ:QJ..
0001B0: 5F 2A 4E 4A CD D8 36 22 4E 4A 7C B5 CA 8A 48 3A _*NJ..6"NJ|...H:
0001C0: 61 4A B7 CA 8A 48 AF 32 61 4A 3A 52 4A B7 C2 E5 aJ...H.2aJ:RJ...
0001D0: 46 2A 4E 4A EB 26 00 3A 51 4A 6F CD D8 36 DA E5 F*NJ.&.:QJo..6..
0001E0: 46 7B 32 51 4A AF 32 50 4A 32 53 4A 11 C7 9B CD F{2QJ.2PJ2SJ....
0001F0: 84 29 44 4D 21 C6 99 22 54 4A 3A 42 4A CD 40 27 .)DM!.."TJ:BJ.@'
Size : 512 (Real : 512)
000000: 20 20 2D 20 00 54 41 4C 4B 20 20 20 20 20 20 2D - .TALK -
000010: 20 00 42 41 53 45 20 41 43 54 49 56 45 20 20 20 .BASE ACTIVE
000020: 20 20 20 20 2D 20 00 20 49 4E 44 45 58 3A 20 20 - . INDEX:
000030: 20 20 20 20 20 20 20 20 20 45 58 50 52 45 53 53 EXPRESS
000040: 49 4F 4E 20 43 4C 45 3A 00 42 41 53 45 20 49 4E ION CLE:.BASE IN
000050: 41 43 54 49 56 45 20 20 20 20 20 20 20 2D 20 00 ACTIVE - .
000060: F1 C9 3A 54 01 4F 06 00 11 0C 00 19 7E B9 D2 79 ..:T.O......~..y
000070: 49 3A 0E 4B 86 B9 DA 9E 49 3A 10 4B B7 CA 82 49 I:.K....I:.K...I
000080: 37 C9 E5 3E 2D 21 21 4B CD FA 36 21 21 4B 79 CD 7..>-!!K..6!!Ky.
000090: BB 36 36 00 E1 37 F5 7E 32 15 4B C3 B1 49 3F F5 .66..7.~2.K..I?.
0000A0: E5 7E 32 15 4B 4F 06 00 3E 2D 21 21 4B CD FA 36 .~2.KO..>-!!K..6
0000B0: E1 11 F4 FF 19 11 21 4B 7E B7 CA C3 49 12 23 13 ......!K~...I.#.
0000C0: C3 B8 49 21 21 4B 3A 15 4B CD BB 36 36 00 2A 0E ..I!!K:.K..66.*.
0000D0: 4B 44 4D 11 21 4B 21 C5 4A CD 72 06 2A 0E 4B 3A KDM.!K!.J.r.*.K:
0000E0: 15 4B 85 3C 6F 22 0E 4B F1 C9 D5 3A 11 4B 6F 26 .K.<o".K...:.Ko&
0000F0: 00 29 29 29 29 EB 3A 14 4B B7 C2 03 4A CD 00 1C .)))).:.K...J...
000100: AF 32 C4 46 CD 73 39 CA 17 45 11 94 46 AF CD 20 .2.F.s9..E..F..
000110: 37 6F 26 00 19 36 00 21 69 46 CD 8E 39 3A 5A 44 7o&..6.!iF..9:ZD
000120: 32 C3 46 AF 32 5A 44 3E 04 CD AD 27 3E 02 CD F0 2.F.2ZD>...'>...
000130: 2B 32 C1 46 3A C3 46 32 5A 44 3A 55 01 D6 04 32 +2.F:.F2ZD:U...2
000140: C2 46 CD D9 45 3A C1 46 CD CA 39 DA E1 45 CD 63 .F..E:.F..9..E.c
000150: 39 FE 2A C2 42 45 23 11 94 46 EB CD B1 37 C2 42 9.*.BE#..F...7.B
000160: 45 3E FF 32 C4 46 CD 1B 36 CD D9 45 3A C1 46 CD E>.2.F..6..E:.F.
000170: CA 39 DA E1 45 CD 63 39 7E FE 2A CA 69 45 C3 AE .9..E.c9~.*.iE..
000180: 45 CD D9 45 3A C1 46 CD CA 39 DA E1 45 CD 63 39 E..E:.F..9..E.c9
000190: 11 77 46 CD B1 37 CA EE 45 CD 63 39 11 72 46 CD .wF..7..E.c9.rF.
0001A0: B1 37 CA 42 45 7E FE 2A CA BB 45 CD 92 39 CD 28 .7.BE~.*..E..9.(
0001B0: 36 3A C2 46 3D 32 C2 46 C2 81 45 CD 1B 36 3E 65 6:.F=2.F..E..6>e
0001C0: CD 70 3B CD 8E 3A FE 1B CA FD 45 CD 1B 36 3A 55 .p;..:....E..6:U
0001D0: 01 D6 04 32 C2 46 C3 81 45 CD 3B 3A C8 3A 70 44 ...2.F..E.;:.:pD
0001E0: C8 3A C4 46 B7 C2 EE 45 21 7D 46 CD 28 36 3A C1 .:.F...E!}F.(6:.
0001F0: 46 CD 40 27 CD 45 25 CD 61 27 C3 FD 45 3E 01 21 F.@'.E%.a'..E>.!
Size : 512 (Real : 512)
000000: CD CA 2C 3A 58 4A CD 40 27 CD CA 2C 3A 52 4A B7 ..,:XJ.@'..,:RJ.
000010: CA 29 47 CD 7A 2C DA 88 47 1A FE 20 C2 13 47 2A .)G.z,..G.. ..G*
000020: 4E 4A 23 22 4E 4A C3 2F 47 CD 7A 2C DA 70 49 D5 NJ#"NJ./G.z,.pI.
000030: 2A 56 4A 19 EB 2A 54 4A CD E4 36 22 54 4A D1 60 *VJ..*TJ..6"TJ.`
000040: 69 19 EB 21 50 4A 34 3A 51 4A BE C2 0C 47 CD C6 i..!PJ4:QJ...G..
000050: 48 2A C6 99 22 7F 4A 21 72 4A 22 5D 4A 2A 46 4A H*..".J!rJ"]J*FJ
000060: 22 5A 4A 3A 52 4A B7 C2 94 47 3A 51 4A 16 00 5F "ZJ:RJ...G:QJ.._
000070: 2A 4E 4A CD D8 36 7C B7 FA 70 49 B5 CA 4F 48 22 *NJ..6|..pI..OH"
000080: 4E 4A 22 4C 4A C3 94 47 3A 50 4A 32 51 4A CD C6 NJ"LJ..G:PJ2QJ..
000090: 48 C3 4F 48 3A 58 4A CD 40 27 3A 52 4A B7 CA B7 H.OH:XJ.@':RJ...
0000A0: 47 CD 37 2C DA 4F 48 CD DC 1C CA A1 47 2A 4E 4A G.7,.OH.....G*NJ
0000B0: 23 22 4E 4A C3 BD 47 CD 37 2C DA 70 49 3A 4A 4A #"NJ..G.7,.pI:JJ
0000C0: 32 5F 4A 21 59 4A CD 20 0B B7 CA E6 47 3A 42 4A 2_J!YJ. ....G:BJ
0000D0: CD 40 27 CD D3 2E 2A 46 4A 11 0D 00 19 CD DF 36 .@'...*FJ......6
0000E0: CD 45 49 C3 3C 48 3A 42 4A CD 40 27 2A 56 4A EB .EI.<H:BJ.@'*VJ.
0000F0: 2A C6 99 CD D8 36 EB CD 84 29 44 4D CD C4 2E 2A *....6...)DM...*
000100: 7F 4A CD 45 49 CD DC 1C CD 7E 38 2A C6 99 E5 11 .J.EI....~8*....
000110: C6 99 21 C8 99 3A 51 4A 3D 87 4F CD 78 38 79 21 ..!..:QJ=.O.x8y!
000120: C6 99 CD BB 36 D1 CD E4 36 3A 51 4A 4F CD D2 48 ....6...6:QJO..H
000130: 2A C6 99 22 7F 4A 2A 46 4A 22 5A 4A 3A 52 4A B7 *..".J*FJ"ZJ:RJ.
000140: C2 94 47 2A 4C 4A 2B 22 4C 4A 7C B5 C2 94 47 3A ..G*LJ+"LJ|...G:
000150: 42 4A CD 40 27 CD 84 29 44 4D 21 C6 99 22 54 4A BJ.@'..)DM!.."TJ
000160: 3A 51 4A F5 2A 54 4A CD E9 36 22 54 4A 2A 56 4A :QJ.*TJ..6"TJ*VJ
000170: EB CD D8 36 EB CD C4 2E F1 3D C2 63 48 3A 52 4A ...6.....=.cH:RJ
000180: B7 C2 80 46 CD EF 26 C3 BF 46 3A 42 4A CD 40 27 ...F..&..F:BJ.@'
000190: CD 45 25 3A 58 4A CD 40 27 CD 45 25 CD 61 27 CD .E%:XJ.@'.E%.a'.
0001A0: B5 2D 2A 93 4A CD 79 2A 3A 7D 44 B7 CA B0 49 21 .-*.J.y*:}D...I!
0001B0: B8 48 CD 28 36 C3 B0 49 54 52 49 20 54 45 52 4D .H.(6..ITRI TERM
0001C0: 49 4E 45 20 20 00 3A 51 4A 4F CD D2 48 C8 0D C3 INE .:QJO..H...
0001D0: CA 48 C5 D5 3A 49 4A 32 5F 4A 3A 51 4A 91 47 79 .H..:IJ2_J:QJ.Gy
0001E0: 48 06 00 3D 3D FA 40 49 21 72 4A 22 5D 4A 21 62 H..==.@I!rJ"]J!b
0001F0: 4A 22 5A 4A F5 21 C6 99 81 87 CD BB 36 E5 CD E9 J"ZJ.!......6...
Size : 512 (Real : 512)
000000: 00 45 C3 C7 3B 1F 7A FE 07 CA A1 1F FE 08 CA 3C .E..;.z........<
000010: 1E FE 15 CA A1 1F FE 16 CA A1 1F FE 09 C4 98 04 ................
000020: 3E 17 47 C5 CD 04 1F 47 C3 3C 1E E1 22 96 38 D1 >.G....G.<..".8.
000030: 7A B7 D5 C2 BD 1F 11 00 00 D5 11 20 01 D5 CD 10 z.......... ....
000040: 20 22 BD 37 EB 22 92 38 EB 79 32 91 38 CD 0F 1F ".7.".8.y2.8...
000050: FA 07 20 D6 02 CA 07 20 32 95 38 FE 05 CA F1 1F .. .... 2.8.....
000060: FE 14 CA F1 1F FE 13 CA F1 44 42 41 53 45 4D 53 .........DBASEMS
000070: 47 00 2A 45 4E 44 00 2A 45 58 49 54 00 41 55 43 G.*END.*EXIT.AUC
000080: 55 4E 20 54 45 58 54 45 20 44 27 41 49 44 45 20 UN TEXTE D'AIDE
000090: 20 20 20 00 48 45 4C 50 00 A1 1F FE 09 C4 98 04 .HELP........
0000A0: 3E 17 47 C5 CD 04 1F 47 C3 3C 1E E1 22 96 38 D1 >.G....G.<..".8.
0000B0: 7A B7 D5 C2 BD 1F 11 00 00 D5 11 20 01 D5 CD 10 z.......... ....
0000C0: 20 22 BD 37 EB 22 92 38 EB 79 32 91 38 CD 0F 1F ".7.".8.y2.8...
0000D0: FA 07 20 D6 02 CA 07 20 32 95 38 FE 05 CA F1 1F .. .... 2.8.....
0000E0: FE 14 CA F1 1F FE 13 CA F1 44 42 41 53 45 4D 53 .........DBASEMS
0000F0: 47 00 2A 45 4E 44 00 2A 45 58 49 54 00 4E 4F 20 G.*END.*EXIT.NO
000100: CD 3C 29 CD 83 2E CD 3C 29 AF CD 89 2E AF 32 59 .<)....<).....2Y
000110: 48 32 58 48 32 57 48 CD 73 39 CA A4 45 3A 59 48 H2XH2WH.s9..E:YH
000120: B7 C2 42 45 11 53 48 CD B1 37 C2 42 45 CD 8E 39 ..BE.SH..7.BE..9
000130: CD 73 39 AF CD AD 27 DA 9E 47 3E FF 32 59 48 C3 .s9...'..G>.2YH.
000140: 17 45 3A 58 48 B7 C2 69 45 11 4F 48 CD B1 37 C2 .E:XH..iE.OH..7.
000150: 69 45 CD 8E 39 CD 73 39 11 7E 97 CD F2 14 DA D1 iE..9.s9.~......
000160: 47 3E FF 32 58 48 C3 17 45 3A 57 48 B7 C2 D1 47 G>.2XH..E:WH...G
000170: 11 48 48 CD B1 37 C2 D1 47 CD 8E 39 3E FF 32 57 .HH..7..G..9>.2W
000180: 48 CD 73 39 CA D1 47 22 5A 48 CD 73 39 CD F1 2A H.s9..G"ZH.s9..*
000190: CA BE 47 CD 8E 39 CD 73 39 FE 2C C2 17 45 CD 69 ..G..9.s9.,..E.i
0001A0: 39 C3 8A 45 3A 59 48 B7 CA A6 47 3A 58 48 B7 CA 9..E:YH...G:XH..
0001B0: AE 47 3E 81 CD F0 2B CD 3C 27 32 56 48 CD 61 27 .G>...+.<'2VH.a'
0001C0: AF CD 89 2E 3A 57 48 B7 C2 85 46 CD E3 1C 22 5C ....:WH...F..."\
0001D0: 48 21 C6 99 22 5E 48 21 64 48 22 60 48 2A 5C 48 H!.."^H!dH"`H*\H
0001E0: 7E FE 0D CA 20 46 EB 2A 5E 48 EB 01 10 00 CD 7E ~... F.*^H.....~
0001F0: 38 2A 60 48 36 2D 23 EB 2A 5C 48 EB CD E4 36 EB 8*`H6-#.*\H...6.
Size : 512 (Real : 512)
000000: 2C C2 13 45 CD 69 39 C3 C2 45 3A AE 49 B7 C2 0B ,..E.i9..E:.I...
000010: 49 11 94 49 CD B1 37 C2 0B 49 CD 8E 39 3E FF 32 I..I..7..I..9>.2
000020: AE 49 CD 9F 24 CA E7 48 C3 13 45 3A AC 49 B7 CA .I..$..H..E:.I..
000030: C7 48 3A AD 49 B7 CA CF 48 3E 01 CD F0 2B DA B7 .H:.I...H>...+..
000040: 48 CD 3C 27 32 AA 49 01 09 02 11 BE 99 CD 7A 2C H.<'2.I.......z,
000050: 01 C7 9B 21 C6 99 CD 75 25 3A AE 49 B7 C2 9C 46 ...!...u%:.I...F
000060: 2A C4 49 CD 92 28 C2 D7 48 11 0C 00 19 46 23 CD *.I..(..H....F#.
000070: DF 36 22 B4 49 2A C4 49 11 C6 99 3A B0 49 4F CD .6".I*.I...:.IO.
000080: 11 27 C2 D7 48 11 0C 00 19 4E 23 CD DF 36 22 B2 .'..H....N#..6".
000090: 49 78 B9 C2 DF 48 32 B0 49 C3 BB 46 2A C4 49 11 Ix...H2.I..F*.I.
0000A0: C6 99 3A B0 49 4F CD 11 27 C2 D7 48 11 0C 00 19 ..:.IO..'..H....
0000B0: 7E 32 B0 49 23 CD DF 36 22 B2 49 21 7E 97 22 B8 ~2.I#..6".I!~.".
0000C0: 49 22 BE 49 3A AB 49 B7 CA 42 47 2A B8 49 22 BC I".I:.I..BG*.I".
0000D0: 49 2A C2 49 CD 8E 39 CD 73 39 22 C2 49 CD 92 28 I*.I..9.s9".I..(
0000E0: C2 D7 48 22 A8 49 2A C2 49 CD F1 2A 22 B6 49 2A ..H".I*.I..*".I*
0000F0: C2 49 11 C6 99 CD 11 27 C2 D7 48 EB 2A BC 49 36 .I.....'..H.*.I6
000100: 29 23 CD E4 36 36 29 23 EB 2A A8 49 EB CD E4 36 )#..66)#.*.I...6
000110: 36 05 23 36 31 23 EB 2A A8 49 EB CD E4 36 22 BC 6.#61#.*.I...6".
000120: 49 2A B6 49 CD 8E 39 CD 73 39 7E FE 2C C2 39 47 I*.I..9.s9~.,.9G
000130: CD 69 39 22 C2 49 C3 D1 46 2A BC 49 36 35 23 22 .i9".I..F*.I65#"
000140: BE 49 3A AF 49 B7 CA C9 47 2A BE 49 22 BC 49 2A .I:.I...G*.I".I*
000150: C6 49 CD 8E 39 CD 73 39 22 C6 49 CD 92 28 C2 D7 .I..9.s9".I..(..
000160: 48 22 C0 49 2A C6 49 CD F1 2A 22 B6 49 CD 8E 39 H".I*.I..*".I..9
000170: CD 73 39 11 A3 49 CD B1 37 C2 8B 47 CD 8E 39 CD .s9..I..7..G..9.
000180: 73 39 22 C6 49 CD F1 2A 22 B6 49 2A C6 49 11 C6 s9".I..*".I*.I..
000190: 99 CD 11 27 C2 D7 48 EB 2A BC 49 36 2D 23 CD E4 ...'..H.*.I6-#..
0001A0: 36 EB 2A C0 49 EB CD E4 36 22 BC 49 2A B6 49 CD 6.*.I...6".I*.I.
0001B0: 8E 39 CD 73 39 7E FE 2C C2 C4 47 CD 69 39 22 C6 .9.s9~.,..G.i9".
0001C0: 49 C3 4F 47 2A BC 49 36 35 3A AE 49 B7 C2 4A 48 I.OG*.I65:.I..JH
0001D0: CD 61 27 21 FF FF CD 5B 26 DA A8 48 3A AA 49 CD .a'!...[&..H:.I.
0001E0: 40 27 2A C4 99 44 4D 11 C7 9B CD 7A 2C 2A B4 49 @'*..DM....z,*.I
0001F0: EB 2A B2 49 3A B0 49 4F CD 3D 37 DA 3E 48 CA 04 .*.I:.IO.=7.>H..
Size : 512 (Real : 512)
000000: 2A 5E 48 EB CD E4 36 36 35 22 60 48 01 10 00 2A *^H...665"`H...*
000010: 5C 48 09 22 5C 48 2A 5E 48 09 22 5E 48 C3 DD 45 \H."\H*^H."^H..E
000020: 3E 01 CD 89 2E CD E3 1C 22 5C 48 2A 5C 48 7E FE >......."\H*\H~.
000030: 0D CA F0 46 11 C6 99 CD 11 27 CA 78 46 2A 5E 48 ...F.....'.xF*^H
000040: EB 2A 5C 48 01 10 00 CD 7E 38 2A 60 48 36 2D 23 .*\H....~8*`H6-#
000050: EB 2A 5C 48 EB CD E4 36 EB 2A 5E 48 EB CD E4 36 .*\H...6.*^H...6
000060: 36 35 22 60 48 01 10 00 2A 5E 48 09 22 5E 48 11 65"`H...*^H."^H.
000070: C6 9B CD C0 36 DA F0 46 01 10 00 2A 5C 48 09 22 ....6..F...*\H."
000080: 5C 48 C3 2B 46 21 C6 99 22 5E 48 21 64 48 22 60 \H.+F!.."^H!dH"`
000090: 48 2A 5A 48 CD 8E 39 CD 73 39 CD F1 2A 22 62 48 H*ZH..9.s9..*"bH
0000A0: CD 63 39 CD 92 28 C2 BE 47 22 5C 48 EB 2A 5E 48 .c9..(..G"\H.*^H
0000B0: EB 01 10 00 CD 7E 38 2A 60 48 36 2D 23 EB 2A 5C .....~8*`H6-#.*\
0000C0: 48 EB CD E4 36 EB 2A 5E 48 EB CD E4 36 36 35 22 H...6.*^H...665"
0000D0: 60 48 2A 5E 48 11 10 00 19 22 5E 48 2A 62 48 CD `H*^H...."^H*bH.
0000E0: 8E 39 CD 73 39 FE 2C C2 F0 46 CD 69 39 C3 97 46 .9.s9.,..F.i9..F
0000F0: 2A 5E 48 36 0D 21 C6 99 01 C7 9B CD 75 25 3E 20 *^H6.!......u%>
000100: 32 C7 9B 3A 56 48 CD 40 27 11 BE 99 01 09 02 CD 2..:VH.@'.......
000110: C4 2E CD 61 27 3E 01 CD 89 2E CD D8 2C AF CD 89 ...a'>......,...
000120: 2E CD D8 2C 21 00 00 22 BF 99 AF CD 89 2E 21 7E ...,!.."......!~
000130: 97 CD 20 0B B7 CA 5F 47 21 64 48 CD 20 0B 3A 56 .. ..._G!dH. .:V
000140: 48 CD 40 27 2A C4 99 44 4D 11 C7 9B CD C4 2E CD H.@'*..DM.......
000150: 61 27 2A BF 99 23 22 BF 99 7C A5 3C CA B6 47 3E a'*..#"..|.<..G>
000160: 01 CD 89 2E CD 47 2B DA 6D 47 C3 2A 47 CD D8 2C .....G+.mG.*G..,
000170: AF CD 89 2E CD 47 2B DA 7D 47 C3 2A 47 3A 56 48 .....G+.}G.*G:VH
000180: CD 40 27 CD D4 26 CD A8 2D 3E 02 01 09 02 11 BE .@'..&..->......
000190: 99 12 CD C4 2E CD 45 25 CD 61 27 C3 DC 47 3E 28 ......E%.a'..G>(
0001A0: CD 70 3B C3 C6 47 3E 48 CD 70 3B C3 C6 47 3E 6C .p;..G>H.p;..G>l
0001B0: CD 70 3B C3 C6 47 3E 6D CD 70 3B C3 C6 47 3E 14 .p;..G>m.p;..G>.
0001C0: CD 70 3B C3 D1 47 CD 61 27 3E 01 32 6F 44 C3 DC .p;..G.a'>.2oD..
0001D0: 47 CD 61 27 3E FF 32 6F 44 C3 DC 47 3E 01 21 00 G.a'>.2oD..G>.!.
0001E0: 45 C3 C7 3B 54 54 54 40 40 C8 84 82 A6 8A 40 92 E..;TTT@@.....@.
0001F0: 92 40 40 50 86 52 40 62 72 70 62 40 40 A6 86 88 .@@P.R@brpb@@...
Size : 512 (Real : 512)
000000: 48 C3 27 48 3A AB 49 B7 CA 11 48 2A B8 49 CD 20 H.'H:.I...H*.I.
000010: 0B 3A AF 49 B7 CA 1E 48 2A BE 49 CD 20 0B CD 61 .:.I...H*.I. ..a
000020: 27 CD E7 1C CD D3 2E 3A AA 49 CD 40 27 2A C4 99 '......:.I.@'*..
000030: 44 4D 11 C7 9B CD 7A 2C DA A8 48 C3 ED 47 CD 61 DM....z,..H..G.a
000040: 27 CD 47 2B DA A8 48 C3 ED 47 3A AA 49 CD 40 27 '.G+..H..G:.I.@'
000050: 2A C4 99 44 4D 11 C7 9B CD 7A 2C CD 61 27 2A B2 *..DM....z,.a'*.
000060: 49 3A B0 49 CD B1 20 E5 CD 9D 27 E1 7C B5 CA 91 I:.I.. ...'.|...
000070: 48 3A AB 49 B7 CA 7E 48 2A B8 49 CD 20 0B 3A AF H:.I..~H*.I. .:.
000080: 49 B7 CA 8B 48 2A BE 49 CD 20 0B CD E7 1C CD D3 I...H*.I. ......
000090: 2E 3A AA 49 CD 40 27 2A C4 99 44 4D 11 C7 9B CD .:.I.@'*..DM....
0000A0: 7A 2C DA A8 48 C3 5B 48 3A AA 49 CD 40 27 CD 45 z,..H.[H:.I.@'.E
0000B0: 25 CD 61 27 C3 1C 49 3E 28 CD 70 3B C3 F7 48 3E %.a'..I>(.p;..H>
0000C0: 1C CD 70 3B C3 0B 49 3E 6E CD 70 3B C3 F7 48 3E ..p;..I>n.p;..H>
0000D0: 54 CD 70 3B C3 F7 48 3E 52 CD 70 3B C3 0B 49 3E T.p;..H>R.p;..I>
0000E0: 6F CD 70 3B C3 F7 48 3E 73 CD 70 3B C3 F7 48 3E o.p;..H>s.p;..H>
0000F0: 53 CD 70 3B C3 F7 48 3A AA 49 CD 40 27 CD 45 25 S.p;..H:.I.@'.E%
000100: CD 61 27 3E 01 32 6F 44 C3 1C 49 3A AA 49 CD 40 .a'>.2oD..I:.I.@
000110: 27 CD 45 25 3E FF 32 6F 44 C3 1C 49 3E 01 21 00 '.E%>.2oD..I>.!.
000120: 45 C3 C7 3B 54 54 54 40 40 C8 84 82 A6 8A 40 92 E..;TTT@@.....@.
000130: 92 40 40 50 86 52 40 62 72 70 62 40 40 A6 86 88 .@@P.R@brpb@@...
000140: A0 40 40 40 40 AC CA E4 40 64 5C 2C 00 00 00 00 .@@@@...@d\,....
000150: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 00 00 00 00 00 00 00 00 41 44 44 00 46 52 4F 4D ........ADD.FROM
000190: 00 4F 4E 00 52 41 4E 44 4F 4D 00 52 45 50 4C 41 .ON.RANDOM.REPLA
0001A0: 43 45 00 57 49 54 48 00 C2 A0 00 C3 A6 8A 40 92 CE.WITH.......@.
0001B0: 92 40 40 50 86 52 40 62 72 70 62 40 40 A6 86 88 .@@P.R@brpb@@...
0001C0: A0 40 40 40 40 AC CA E4 40 64 5C 2C 00 00 00 00 .@@@@...@d\,....
0001D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
Size : 512 (Real : 512)
000000: A0 40 40 40 40 AC CA E4 40 64 5C 2C 00 00 00 00 .@@@@...@d\,....
000010: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000020: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000030: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000040: 00 00 00 00 00 00 00 00 46 49 45 4C 44 53 00 46 ........FIELDS.F
000050: 4F 52 00 54 4F 00 32 6F 44 C3 DC 47 3E 01 21 00 OR.TO.2oD..G>.!.
000060: 45 C3 C7 3B 54 54 54 40 40 C8 84 82 A6 8A 40 92 E..;TTT@@.....@.
000070: 92 40 40 50 86 52 40 62 72 70 62 40 40 A6 86 88 .@@P.R@brpb@@...
000080: 2D 20 00 44 45 4C 45 54 45 20 20 20 20 2D 20 00 - .DELETE - .
000090: 45 43 48 4F 20 20 20 20 20 20 2D 20 00 45 4A 45 ECHO - .EJE
0000A0: 43 54 20 20 20 20 20 2D 20 00 45 53 43 41 50 45 CT - .ESCAPE
0000B0: 20 20 20 20 2D 20 00 45 58 41 43 54 20 20 20 20 - .EXACT
0000C0: 20 2D 20 00 49 4E 54 45 4E 53 49 54 59 20 2D 20 - .INTENSITY -
0000D0: 00 4C 49 4E 4B 41 47 45 20 20 20 2D 20 00 50 52 .LINKAGE - .PR
0000E0: 49 4E 54 20 20 20 20 20 2D 20 00 52 41 57 20 20 INT - .RAW
0000F0: 20 20 20 20 20 2D 20 00 53 54 45 50 20 20 20 20 - .STEP
000100: CD 3C 29 CD DD 25 AF 32 F8 48 32 F9 48 32 F7 48 .<)..%.2.H2.H2.H
000110: CD 73 39 CA B7 45 CD E9 25 DA 70 48 CD 73 39 CA .s9..E..%.pH.s9.
000120: B7 45 3A F9 48 B7 C2 44 45 11 F1 48 CD B1 37 C2 .E:.H..DE..H..7.
000130: 44 45 CD 8E 39 AF CD AD 27 DA 34 48 3E FF 32 F9 DE..9...'.4H>.2.
000140: 48 C3 10 45 3A F7 48 B7 C2 79 45 11 E7 48 CD B1 H..E:.H..yE..H..
000150: 37 C2 79 45 3E FF 32 F7 48 CD 8E 39 22 FA 48 CD 7.yE>.2.H..9".H.
000160: 73 39 CD F1 2A CA 3C 48 CD 8E 39 CD 73 39 FE 2C s9..*.<H..9.s9.,
000170: C2 10 45 CD 69 39 C3 5F 45 3A F8 48 B7 C2 70 48 ..E.i9._E:.H..pH
000180: 11 EE 48 CD B1 37 C2 70 48 3E FF 32 F8 48 CD 8E ..H..7.pH>.2.H..
000190: 39 CD 73 39 CA 44 48 22 01 49 CD F1 2A CA 44 48 9.s9.DH".I..*.DH
0001A0: 32 FE 48 E5 CD 63 39 CD 92 28 C2 44 48 22 FF 48 2.H..c9..(.DH".H
0001B0: E1 CD 8E 39 C3 10 45 3A F9 48 B7 CA 4C 48 3E 01 ...9..E:.H..LH>.
0001C0: CD F0 2B DA D8 45 CD 3C 27 32 F6 48 11 BE 99 01 ..+..E.<'2.H....
0001D0: 09 02 CD 7A 2C C3 F6 45 3E 81 CD F0 2B CD 3C 27 ...z,..E>...+.<'
0001E0: 32 F6 48 CD E3 1C 11 F8 FF 19 11 BE 99 01 09 02 2.H.............
0001F0: CD 7E 38 CD C4 2E CD 61 27 01 C7 9B 21 C6 99 CD .~8....a'...!...
Size : 512 (Real : 512)
000000: CD 99 2C 7C B5 CA 55 4A AF 32 14 4B 21 20 4C 22 ..,|..UJ.2.K! L"
000010: 1D 4B CD 73 39 CA 72 45 11 F2 4A CD B1 37 C2 3F .K.s9.rE..J..7.?
000020: 4A CD 8E 39 3E FF 32 14 4B CD 73 39 CD F1 2A C2 J..9>.2.K.s9..*.
000030: 3A 45 3E 14 CD 70 3B C3 47 4A E5 CD 63 39 CD 92 :E>..p;.GJ..c9..
000040: 28 CA 4C 45 3E 52 CD 70 3B C3 47 4A EB 2A 1D 4B (.LE>R.p;.GJ.*.K
000050: EB 01 10 00 CD 7E 38 21 10 00 19 22 1D 4B 36 0D .....~8!...".K6.
000060: E1 CD 8E 39 CD 73 39 FE 2C C2 72 45 CD 69 39 C3 ...9.s9.,.rE.i9.
000070: 29 45 CD DD 25 21 FE FF CD 5B 26 CD 99 2C 22 0B )E..%!...[&..,".
000080: 4B 22 1F 4B AF 32 0D 4B CD DE 1F 3A 57 44 32 0A K".K.2.K...:WD2.
000090: 4B AF 32 57 44 AF 32 11 4B 32 13 4B AF 32 18 4B K.2WD.2.K2.K.2.K
0000A0: AF 32 1A 4B 32 19 4B CD AC 06 21 00 02 22 0E 4B .2.K2.K...!..".K
0000B0: 2A 1F 4B CD 9D 27 CD EA 49 22 1D 4B AF 32 10 4B *.K..'..I".K.2.K
0000C0: 3E 01 32 17 4B 2A 1D 4B 7E FE 0D CA E5 45 CD A1 >.2.K*.K~....E..
0000D0: 48 DA E5 45 21 10 4B 34 2A 1D 4B 11 10 00 19 22 H..E!.K4*.K...."
0000E0: 1D 4B C3 C5 45 3A 55 01 D6 05 4F 3A 1A 4B 47 3A .K..E:U...O:.KG:
0000F0: 17 4B 80 32 1A 4B B9 D2 23 46 2A 0E 4B 3A 17 4B .K.2.K..#F*.K:.K
000100: 84 67 2E 00 22 0E 4B 21 19 4B 34 CD 9F 24 CA 1D .g..".K!.K4..$..
000110: 46 CD E9 21 DA 23 46 CD 9D 27 C3 B6 45 CD 37 2C F..!.#F..'..E.7,
000120: D2 B6 45 21 00 01 22 0E 4B CD EA 49 22 1D 4B AF ..E!..".K..I".K.
000130: 32 10 4B 2A 1D 4B 7E FE 0D CA 53 46 CD 62 49 DA 2.K*.K~...SF.bI.
000140: 53 46 21 10 4B 34 2A 1D 4B 11 10 00 19 22 1D 4B SF!.K4*.K....".K
000150: C3 33 46 3A 0D 4B 4F 3A 17 4B 47 21 00 02 79 3D .3F:.KO:.KG!..y=
000160: FA 6A 46 4F 78 84 67 C3 5E 46 22 0E 4B 2A 0B 4B .jFOx.g.^F".K*.K
000170: 11 03 4B CD 09 4A 11 F9 4A 21 C5 4A 01 00 00 CD ..K..J..J!.J....
000180: 72 06 2A 0B 4B CD 9D 27 CD DE 1F CD EA 49 22 1D r.*.K..'.....I".
000190: 4B AF 32 10 4B 2A 1D 4B 7E FE 0D CA B5 46 CD 15 K.2.K*.K~....F..
0001A0: 49 DA B5 46 21 10 4B 34 2A 1D 4B 11 10 00 19 22 I..F!.K4*.K...."
0001B0: 1D 4B C3 95 46 3A 13 4B 21 10 4B BE DA C4 46 7E .K..F:.K!.K...F~
0001C0: 3D 32 13 4B 3A 13 4B 47 3E 03 CD 1D 02 32 12 4B =2.K:.KG>....2.K
0001D0: 78 32 13 4B CD B5 06 AF 32 0E 4B CD EA 49 22 1D x2.K....2.K..I".
0001E0: 4B AF 32 10 4B 2A 1D 4B 7E FE 0D CA 05 47 CD A1 K.2.K*.K~....G..
0001F0: 48 DA 05 47 21 10 4B 34 2A 1D 4B 11 10 00 19 22 H..G!.K4*.K...."
Size : 512 (Real : 512)
000000: 75 25 21 7E 97 22 03 49 36 35 3A F7 48 B7 CA 78 u%!~.".I65:.H..x
000010: 46 2A FA 48 CD 8E 39 CD 73 39 CD F1 2A 22 FA 48 F*.H..9.s9..*".H
000020: CD 63 39 CD 92 28 C2 54 48 EB 21 0B 00 19 7E FE .c9..(.TH.!...~.
000030: 4E C2 64 46 2A 03 49 36 29 23 CD E4 36 22 03 49 N.dF*.I6)#..6".I
000040: CD 63 39 11 C6 99 CD 11 27 C2 54 48 EB 2A 03 49 .c9.....'.TH.*.I
000050: 36 29 23 CD E4 36 36 05 23 36 31 23 CD E4 36 36 6)#..66.#61#..66
000060: 35 22 03 49 2A FA 48 CD 8E 39 CD 73 39 FE 2C C2 5".I*.H..9.s9.,.
000070: CA 46 CD 69 39 C3 17 46 21 C6 99 22 07 49 2A 07 .F.i9..F!..".I*.
000080: 49 7E FE 0D CA CA 46 11 0B 00 19 7E FE 4E C2 BD I~....F....~.N..
000090: 46 2A 07 49 CD 92 28 C2 54 48 EB 2A 03 49 36 29 F*.I..(.TH.*.I6)
0000A0: 23 CD E4 36 EB 2A 07 49 EB 36 29 23 CD E4 36 36 #..6.*.I.6)#..66
0000B0: 05 23 36 31 23 CD E4 36 36 35 22 03 49 2A 07 49 .#61#..665".I*.I
0000C0: 11 10 00 19 22 07 49 C3 7E 46 3A F8 48 B7 CA 1A ....".I.~F:.H...
0000D0: 47 2A 03 49 23 22 03 49 22 FC 48 2A FF 48 EB 21 G*.I#".I".H*.H.!
0000E0: 0B 00 19 7E 06 06 FE 4E CA ED 46 06 0E 2A 03 49 ...~...N..F..*.I
0000F0: 36 29 23 CD E4 36 22 03 49 3A FE 48 4F 2A 01 49 6)#..6".I:.HO*.I
000100: 11 C6 99 CD 11 27 C2 44 48 EB 2A 03 49 36 29 23 .....'.DH.*.I6)#
000110: CD E4 36 70 23 36 35 22 03 49 2A 03 49 23 22 03 ..6p#65".I*.I#".
000120: 49 22 05 49 21 C6 99 22 07 49 2A 07 49 7E FE 0D I".I!..".I*.I~..
000130: CA 5D 47 CD 92 28 C2 50 47 EB 2A 03 49 36 2D 23 .]G..(.PG.*.I6-#
000140: CD E4 36 EB 2A 07 49 EB CD E4 36 36 35 22 03 49 ..6.*.I...665".I
000150: 2A 07 49 11 10 00 19 22 07 49 C3 2A 47 21 FF FF *.I....".I.*G!..
000160: CD 5B 26 2A C4 99 44 4D 21 C7 9B 3E 20 CD FA 36 .[&*..DM!..> ..6
000170: CD D8 2C CD DC 1C 7E FE 2A CA 82 47 CD 78 27 C2 ..,...~.*..G.x'.
000180: 8E 47 CD 47 2B DA EA 47 C2 73 47 C3 EA 47 2A 05 .G.G+..G.sG..G*.
000190: 49 CD 20 0B 21 01 00 22 F4 48 C3 D8 47 3A F8 48 I. .!..".H..G:.H
0001A0: B7 CA AE 47 2A FC 48 CD 20 0B B7 CA B7 47 21 7E ...G*.H. ....G!~
0001B0: 97 CD 20 0B C3 D8 47 3A F6 48 CD 40 27 11 C7 9B .. ...G:.H.@'...
0001C0: 2A C4 99 44 4D CD C4 2E CD 61 27 2A F4 48 23 22 *..DM....a'*.H#"
0001D0: F4 48 2A 05 49 CD 20 0B CD 47 2B DA EA 47 CA EA .H*.I. ..G+..G..
0001E0: 47 CD 78 27 CA D8 47 C3 9D 47 2A F4 48 22 BF 99 G.x'..G..G*.H"..
0001F0: 3A F6 48 CD 40 27 11 C7 9B 2A C4 99 44 4D CD C4 :.H.@'...*..DM..
Size : 512 (Real : 512)
000000: 1D 4B C3 E5 46 3A 12 4B E6 C0 CA 10 47 C3 4C 4A .K..F:.K....G.LJ
000010: AF 32 09 4B 3A 12 4B E6 01 CA 42 47 CD E7 1C CD .2.K:.K...BG....
000020: D3 2E CD 9F 24 CA 42 47 CD 83 21 32 09 4B B7 CA ....$.BG..!2.K..
000030: 42 47 CD 99 2C 22 0B 4B 22 1F 4B CD DE 1F AF 32 BG..,".K".K....2
000040: 0D 4B 3A 12 4B E6 04 CA 55 48 3A 12 4B E6 02 CA .K:.K...UH:.K...
000050: DC 47 21 0E 4B 36 00 23 3A 17 4B 96 2F 3C 77 CD .G!.K6.#:.K./<w.
000060: 9F 24 CA 86 47 CD 5A 22 DA C6 47 22 0B 4B 3A 09 .$..G.Z"..G".K:.
000070: 4B B7 C2 CF 47 3A 17 4B 47 3A 18 4B 90 32 18 4B K...G:.KG:.K.2.K
000080: FA CF 47 C3 6D 46 2A 0B 4B 2B 22 0B 4B 7C B5 CA ..G.mF*.K+".K|..
000090: C6 47 3A 17 4B 47 3A 18 4B 90 32 18 4B FA A3 47 .G:.KG:.K.2.K..G
0000A0: C3 6D 46 2A 0B 4B 11 04 00 CD C0 36 D2 CF 47 11 .mF*.K.....6..G.
0000B0: FC FF 19 22 1F 4B 3E 04 32 0D 4B 3A 17 4B 87 87 ...".K>.2.K:.K..
0000C0: 32 18 4B C3 A0 45 CD D8 2C CD 99 2C 22 0B 4B 2A 2.K..E..,..,".K*
0000D0: 0B 4B 22 1F 4B AF 32 0D 4B C3 9C 45 21 0E 4B 36 .K".K.2.K..E!.K6
0000E0: 00 23 3A 17 4B 86 77 CD 9F 24 CA 13 48 CD E9 21 .#:.K.w..$..H..!
0000F0: DA 48 48 22 0B 4B 3A 09 4B B7 C2 48 48 3A 1A 4B .HH".K:.K..HH:.K
000100: 47 3A 18 4B 4F 3A 17 4B 81 32 18 4B B8 D2 48 48 G:.KO:.K.2.K..HH
000110: C3 6D 46 CD 9F 24 CA 25 48 CD E9 21 DA 48 48 CD .mF..$.%H..!.HH.
000120: 9D 27 C3 2B 48 CD 37 2C DA 48 48 2A 0B 4B 23 22 .'.+H.7,.HH*.K#"
000130: 0B 4B 3A 1A 4B 47 3A 18 4B 4F 3A 17 4B 81 32 18 .K:.KG:.KO:.K.2.
000140: 4B B8 D2 48 48 C3 6D 46 2A 0B 4B 22 1F 4B AF 32 K..HH.mF*.K".K.2
000150: 0D 4B C3 9C 45 3A 12 4B E6 30 CA 9E 48 E6 10 CA .K..E:.K.0..H...
000160: 73 48 3A 11 4B 3D FA 91 48 32 11 4B 21 13 4B 34 sH:.K=..H2.K!.K4
000170: C3 91 48 CD EA 49 11 10 00 19 7E FE 0D CA 91 48 ..H..I....~....H
000180: 3A 11 4B 3C 32 11 4B 3A 13 4B 3D FA 91 48 32 13 :.K<2.K:.K=..H2.
000190: 4B 2A 0B 4B 22 1F 4B AF 32 0D 4B C3 9C 45 C3 4C K*.K".K.2.K..E.L
0001A0: 4A 3A 54 01 4F 11 0C 00 19 7E B9 D2 B6 48 3A 0E J:T.O....~...H:.
0001B0: 4B 86 B9 DA DF 48 3A 10 4B B7 CA BF 48 37 C9 E5 K....H:.K...H7..
0001C0: 0E 00 7E 2F 3C 6F 26 FF 3A 54 01 5F 16 00 0C 19 ..~/<o&.:T._....
0001D0: 7C B7 FA CE 48 E1 79 32 17 4B 37 F5 C3 E1 48 3F |...H.y2.K7...H?
0001E0: F5 4E 79 32 15 4B 23 CD DF 36 11 21 4B CD 78 38 .Ny2.K#..6.!K.x8
0001F0: EB 3A 15 4B CD BB 36 36 00 2A 0E 4B 44 4D 11 21 .:.K..66.*.KDM.!
Size : 512 (Real : 512)
000000: 2E 3A F6 48 CD 40 27 CD D4 26 CD A8 2D 01 09 02 .:.H.@'..&..-...
000010: 11 BE 99 CD C4 2E CD 45 25 CD 61 27 3A 7D 44 B7 .......E%.a':}D.
000020: CA 7B 48 2A F4 48 CD 1B 36 CD 35 36 3E 27 CD 70 .{H*.H..6.56>'.p
000030: 3B C3 7B 48 3E 28 CD 70 3B C3 5C 48 3E 52 CD 70 ;.{H>(.p;.\H>R.p
000040: 3B C3 5C 48 3E 1C CD 70 3B C3 5C 48 3E 48 CD 70 ;.\H>..p;.\H>H.p
000050: 3B C3 5C 48 3E 52 CD 70 3B C3 5C 48 3A F6 48 CD ;.\H>R.p;.\H:.H.
000060: 40 27 CD 45 25 CD 61 27 3E 01 32 6F 44 C3 7B 48 @'.E%.a'>.2oD.{H
000070: CD 61 27 3E FF 32 6F 44 C3 7B 48 3E 01 21 00 45 .a'>.2oD.{H>.!.E
000080: C3 C7 3B 54 54 54 40 40 C8 84 82 A6 8A 40 92 92 ..;TTT@@.....@..
000090: 40 40 50 86 52 40 62 72 70 62 40 40 A6 86 88 A0 @@P.R@brpb@@....
0000A0: 40 40 40 40 AC CA E4 40 64 5C 2C 00 00 00 00 00 @@@@...@d\,.....
0000B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000E0: 00 00 00 00 00 00 00 46 49 45 4C 44 53 00 4F 4E .......FIELDS.ON
0000F0: 00 54 4F 00 00 00 00 44 C3 7B 48 3E 01 21 00 45 .TO....D.{H>.!.E
000100: CD 3C 29 AF 32 AC 49 32 AD 49 32 AB 49 32 AF 49 .<).2.I2.I2.I2.I
000110: 32 AE 49 CD 73 39 CA 2B 46 3A AC 49 B7 C2 3E 45 2.I.s9.+F:.I..>E
000120: 11 8C 49 CD B1 37 C2 3E 45 CD 8E 39 CD 73 39 AF ..I..7.>E..9.s9.
000130: CD AD 27 DA B7 48 3E FF 32 AC 49 C3 13 45 3A AD ..'..H>.2.I..E:.
000140: 49 B7 C2 6B 45 11 91 49 CD B1 37 C2 6B 45 CD 8E I..kE..I..7.kE..
000150: 39 CD 73 39 22 C4 49 CD F1 2A CA BF 48 32 B0 49 9.s9".I..*..H2.I
000160: CD 8E 39 3E FF 32 AD 49 C3 13 45 3A AB 49 B7 C2 ..9>.2.I..E:.I..
000170: A6 45 11 88 49 CD B1 37 C2 A6 45 CD 8E 39 CD 73 .E..I..7..E..9.s
000180: 39 CA 0B 49 22 C2 49 CD 73 39 CD F1 2A CA BF 48 9..I".I.s9..*..H
000190: CD 8E 39 3E FF 32 AB 49 CD 73 39 FE 2C C2 13 45 ..9>.2.I.s9.,..E
0001A0: CD 69 39 C3 87 45 3A AF 49 B7 C2 0A 46 11 9B 49 .i9..E:.I...F..I
0001B0: CD B1 37 C2 0A 46 CD 8E 39 CD 73 39 CA 0B 49 22 ..7..F..9.s9..I"
0001C0: C6 49 CD 73 39 CD F1 2A CA BF 48 CD 8E 39 3E FF .I.s9..*..H..9>.
0001D0: 32 AF 49 CD 73 39 FE 2C C2 E1 45 CD 69 39 C3 C2 2.I.s9.,..E.i9..
0001E0: 45 CD 73 39 11 A3 49 CD B1 37 C2 13 45 CD 8E 39 E.s9..I..7..E..9
0001F0: CD 73 39 CD F1 2A CA BF 48 CD 8E 39 CD 73 39 FE .s9..*..H..9.s9.
Size : 512 (Real : 512)
000000: 4B 21 C5 4A CD 72 06 2A 0E 4B 3A 15 4B 85 3C 6F K!.J.r.*.K:.K.<o
000010: 22 0E 4B F1 C9 3A 54 01 4F 22 C1 4A 11 0C 00 19 ".K..:T.O".J....
000020: 7E B9 D2 2D 49 3A 0E 4B 86 B9 DA 40 49 3A 10 4B ~..-I:.K...@I:.K
000030: B7 CA 36 49 37 C9 3E 01 32 10 4B 37 F5 C3 42 49 ..6I7.>.2.K7..BI
000040: 3F F5 7E 32 15 4B 2A 0E 4B 44 4D 11 C5 4A 21 C1 ?.~2.K*.KDM..J!.
000050: 4A CD 72 06 2A 0E 4B 3A 15 4B 85 3C 6F 22 0E 4B J.r.*.K:.K.<o".K
000060: F1 C9 3A 54 01 4F 06 00 11 0C 00 19 7E B9 D2 79 ..:T.O......~..y
000070: 49 3A 0E 4B 86 B9 DA 9E 49 3A 10 4B B7 CA 82 49 I:.K....I:.K...I
000080: 37 C9 E5 3E 2D 21 21 4B CD FA 36 21 21 4B 79 CD 7..>-!!K..6!!Ky.
000090: BB 36 36 00 E1 37 F5 7E 32 15 4B C3 B1 49 3F F5 .66..7.~2.K..I?.
0000A0: E5 7E 32 15 4B 4F 06 00 3E 2D 21 21 4B CD FA 36 .~2.KO..>-!!K..6
0000B0: E1 11 F4 FF 19 11 21 4B 7E B7 CA C3 49 12 23 13 ......!K~...I.#.
0000C0: C3 B8 49 21 21 4B 3A 15 4B CD BB 36 36 00 2A 0E ..I!!K:.K..66.*.
0000D0: 4B 44 4D 11 21 4B 21 C5 4A CD 72 06 2A 0E 4B 3A KDM.!K!.J.r.*.K:
0000E0: 15 4B 85 3C 6F 22 0E 4B F1 C9 D5 3A 11 4B 6F 26 .K.<o".K...:.Ko&
0000F0: 00 29 29 29 29 EB 3A 14 4B B7 C2 03 4A CD E3 1C .)))).:.K...J...
000100: C3 06 4A 21 20 4C 19 D1 C9 C5 D5 01 10 27 CD 2C ..J! L.......'.,
000110: 4A 01 E8 03 CD 2C 4A 01 64 00 CD 2C 4A 01 0A 00 J....,J.d..,J...
000120: CD 2C 4A 01 01 00 CD 2C 4A D1 C1 C9 D5 16 2F 14 .,J....,J...../.
000130: 7D 91 6F 7C 98 67 D2 2F 4A 09 7A D1 12 13 C9 3E }.o|.g./J.z....>
000140: FF 32 6F 44 C3 4C 4A 3E 01 C3 4F 4A CD AC 06 3A .2oD.LJ>..OJ...:
000150: 0A 4B 32 57 44 3E 01 21 00 45 C3 C7 3B 00 00 0B .K2WD>.!.E..;...
000160: 35 4E 43 4F 50 59 52 49 47 48 54 20 20 4E 3A 01 5NCOPYRIGHT N:.
000170: 4F 3C 28 43 29 20 31 39 38 32 20 20 20 4A 04 78 O<(C) 1982 J.x
000180: 32 01 52 53 50 2C 20 49 4E 43 20 20 20 F6 4E C3 2.RSP, INC .N.
000190: 09 49 29 02 00 29 82 4A 0B 35 29 82 4A 2F 02 00 .I)..).J.5).J/..
0001A0: 35 CD F5 4B 7E FE 1A C2 B4 4A 36 0D 23 36 0A 23 5..K~....J6.#6.#
0001B0: 36 1A 2B 2B 23 23 22 FD 4E 7E FE 1A C2 CE 4A 36 6.++##".N~....J6
0001C0: 0D 23 36 00 00 00 00 00 00 20 00 20 20 20 20 20 .#6...... .
0001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0001E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0001F0: 20 00 46 49 45 4C 44 53 00 52 45 43 4F 52 44 20 .FIELDS.RECORD
Size : 512 (Real : 512)
000000: 4D 3D 31 0D 0A 59 0D 0A 4C 49 53 54 45 20 44 45 M=1..Y..LISTE DE
000010: 53 20 43 48 49 46 46 52 45 53 20 44 27 41 46 46 S CHIFFRES D'AFF
000020: 41 49 52 45 20 50 41 52 20 50 52 4F 46 45 53 53 AIRE PAR PROFESS
000030: 49 4F 4E 0D 0A 4E 0D 0A 59 0D 0A 59 0D 0A 50 52 ION..N..Y..Y..PR
000040: 4F 46 0D 0A 4E 0D 0A 4E 0D 0A 50 72 6F 66 65 73 OF..N..N..Profes
000050: 73 69 6F 6E 3A 0D 0A 31 34 2C 4E 4F 4D 0D 0A 3C sion:..14,NOM..<
000060: 4E 6F 6D 20 64 75 20 43 6C 69 65 6E 74 3B 3D 3D Nom du Client;==
000070: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 0D 0A 31 32 2C ===========..12,
000080: 50 52 45 4E 4F 4D 0D 0A 3C 50 72 65 6E 6F 6D 3B PRENOM..<Prenom;
000090: 3D 3D 3D 3D 3D 3D 0D 0A 31 32 2C 56 49 4C 4C 45 ======..12,VILLE
0000A0: 0D 0A 3C 56 69 6C 6C 65 3B 3D 3D 3D 3D 3D 0D 0A ..<Ville;=====..
0000B0: 31 36 2C 54 45 4C 0D 0A 54 65 6C 65 70 68 6F 6E 16,TEL..Telephon
0000C0: 65 3B 3D 3D 3D 3D 3D 3D 3D 3D 3D 0D 0A 31 35 2C e;=========..15,
0000D0: 56 45 4E 54 45 0D 0A 3E 50 72 69 78 20 56 65 6E VENTE..>Prix Ven
0000E0: 74 65 20 48 54 3B 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D te HT;==========
0000F0: 3D 3D 3D 0D 0A 59 0D 0A 0D 0A 0D 0A 1A 1A 73 65 ===..Y........se
000100: 6C 65 63 74 20 70 72 69 6D 61 72 79 0D 0A 73 74 lect primary..st
000110: 6F 72 65 20 27 74 27 20 74 6F 20 74 65 73 74 0D ore 't' to test.
000120: 0A 65 6E 64 64 6F 0D 0A 72 65 74 75 72 6E 0D 0A .enddo..return..
000130: 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 1A 1A 65 20 ..............e
000140: 63 68 6F 69 78 3D 27 36 27 20 2E 6F 72 2E 20 63 choix='6' .or. c
000150: 68 6F 69 78 20 3D 20 27 37 27 0D 0A 64 6F 20 64 hoix = '7'..do d
000160: 65 6D 6C 69 73 74 0D 0A 63 61 73 65 20 63 68 6F emlist..case cho
000170: 69 78 20 3D 20 27 38 27 0D 0A 73 74 6F 72 65 20 ix = '8'..store
000180: 27 43 27 20 74 6F 20 65 6C 65 6D 0D 0A 64 6F 20 'C' to elem..do
000190: 6C 69 73 74 65 6C 65 6D 0D 0A 72 65 6C 65 61 73 listelem..releas
0001A0: 65 20 6E 6F 6D 61 66 66 0D 0A 63 61 73 65 20 63 e nomaff..case c
0001B0: 68 6F 69 78 20 3D 20 27 39 27 0D 0A 73 74 6F 72 hoix = '9'..stor
0001C0: 65 20 27 4C 27 20 74 6F 20 65 6C 65 6D 0D 0A 64 e 'L' to elem..d
0001D0: 6F 20 6C 69 73 74 65 6C 65 6D 0D 0A 72 65 6C 65 o listelem..rele
0001E0: 61 73 65 20 6E 6F 6D 61 66 66 0D 0A 63 61 73 65 ase nomaff..case
0001F0: 20 21 28 63 68 6F 69 78 29 3D 27 41 27 0D 0A 73 !(choix)='A'..s
Size : 512 (Real : 512)
000000: 23 20 3A 30 30 30 30 30 00 43 20 20 20 F6 4E C3 # :00000.C .N.
000010: 09 49 29 02 00 29 82 4A 0B 35 29 82 4A 2F 02 00 .I)..).J.5).J/..
000020: 35 CD F5 4B 7E FE 1A C2 B4 4A 36 0D 23 36 0A 23 5..K~....J6.#6.#
000030: 36 1A 2B 2B 23 23 22 FD 4E 7E FE 1A C2 CE 4A 36 6.++##".N~....J6
000040: 0D 23 36 00 00 00 00 00 00 20 00 20 20 20 20 20 .#6...... .
000050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000060: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000070: 20 00 46 49 45 4C 44 53 00 52 45 43 4F 52 44 20 .FIELDS.RECORD
000080: A1 2C 11 E9 4E CD 08 4D CD B2 2C 11 E6 4E CD 08 .,..N..M..,..N..
000090: 4D CD A1 2C 11 07 4F CD 08 4D CD B2 2C C3 B9 4B M..,..O..M..,..K
0000A0: 3A F1 4E B7 FA AD 4B CD 40 27 CD 45 25 3A 10 4F :.N...K.@'.E%:.O
0000B0: CD 40 27 CD 45 25 CD 03 27 CD 61 27 3A FA 4E 32 .@'.E%..'.a':.N2
0000C0: 57 44 CD AC 06 C3 2C 4E 2B 7E FE 0A C2 D0 4B 2B WD....,N+~....K+
0000D0: 2B 7E FE 0D C2 D0 4B 23 7E FE 0A C0 23 C9 CD 68 +~....K#~...#..h
0000E0: 27 0E 0C 3E 2E CD 13 37 23 22 05 4F 11 07 4F 0E '..>...7#".O..O.
0000F0: 03 CD 78 38 C9 C5 E5 3A 0B 4F 4F 06 00 3E 20 21 ..x8...:.OO..> !
000100: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000110: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000120: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000140: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000150: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
Size : 512 (Real : 512)
000000: 69 6D 61 72 79 0D 0A 20 20 20 75 73 65 20 26 66 imary.. use &f
000010: 72 65 66 20 69 6E 64 65 78 20 26 78 63 6C 65 0D ref index &xcle.
000020: 0A 20 20 20 67 6F 74 6F 20 74 6F 70 0D 0A 20 20 . goto top..
000030: 20 69 66 20 63 68 6F 69 78 20 23 20 27 35 27 0D if choix # '5'.
000040: 0A 20 20 20 40 20 6C 69 67 6D 31 2C 30 20 73 61 . @ ligm1,0 sa
000050: 79 20 27 6D 65 74 74 72 65 20 6C 61 20 70 72 65 y 'mettre la pre
000060: 6D 69 65 72 65 20 7A 6F 6E 65 20 61 20 62 6C 61 miere zone a bla
000070: 6E 63 20 6F 75 20 30 20 70 6F 75 72 20 61 62 61 nc ou 0 pour aba
000080: 6E 64 6F 6E 6E 65 72 20 20 20 20 20 27 0D 0A 20 ndonner '..
000090: 20 20 65 6E 64 69 66 0D 0A 20 20 20 73 74 6F 72 endif.. stor
0000A0: 65 20 31 20 74 6F 20 63 70 74 0D 0A 20 20 20 73 e 1 to cpt.. s
0000B0: 65 74 20 69 6E 74 65 6E 73 69 74 79 20 6F 66 66 et intensity off
0000C0: 0D 0A 20 20 20 64 6F 20 77 68 69 6C 65 20 63 70 .. do while cp
0000D0: 74 3C 3D 6E 62 7A 6F 6E 70 0D 0A 20 20 20 20 20 t<=nbzonp..
0000E0: 20 73 74 6F 72 65 20 27 6D 7A 6F 6E 27 2D 73 74 store 'mzon'-st
0000F0: 72 28 6E 6F 7A 2C 31 2B 69 6E 74 28 6E 6F 7A 2F r(noz,1+int(noz/
000100: 31 30 29 29 20 74 6F 20 6D 7A 6F 6E 0D 0A 20 20 10)) to mzon..
000110: 20 20 20 20 64 6F 20 69 6E 69 74 7A 6F 6E 65 0D do initzone.
000120: 0A 20 20 20 20 20 20 69 66 20 74 65 73 74 3D 27 . if test='
000130: 64 27 2E 61 6E 64 2E 6E 6F 6D 65 73 73 3D 30 0D d'.and.nomess=0.
000140: 0A 20 20 20 20 20 20 20 20 20 69 66 20 76 65 72 . if ver
000150: 69 66 20 3D 20 27 4E 41 27 2E 61 6E 64 2E 66 69 if = 'NA'.and.fi
000160: 65 6C 64 3A 74 79 70 65 23 27 4E 27 0D 0A 20 20 eld:type#'N'..
000170: 20 20 20 20 20 20 20 73 74 6F 72 65 20 74 61 62 store tab
000180: 76 2D 27 4E 27 20 74 6F 20 74 61 62 76 0D 0A 20 v-'N' to tabv..
000190: 20 20 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 else..
0001A0: 20 20 20 20 20 20 20 73 74 6F 72 65 20 74 61 62 store tab
0001B0: 76 2D 27 4F 27 20 74 6F 20 74 61 62 76 0D 0A 20 v-'O' to tabv..
0001C0: 20 20 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 endif..
0001D0: 20 20 20 20 20 20 20 20 40 20 6C 74 2C 63 74 20 @ lt,ct
0001E0: 73 61 79 20 74 65 78 74 65 0D 0A 20 20 20 20 20 say texte..
0001F0: 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 20 40 20 endif.. @
Size : 512 (Real : 512)
000000: 4B 21 C5 4A CD 72 06 2A 0E 4B 3A 15 4B 85 3C 6F K!.J.r.*.K:.K.<o
000010: 22 0E 4B F1 C9 3A 54 01 4F 22 C1 4A 11 0C 00 19 ".K..:T.O".J....
000020: 7E B9 D2 2D 49 3A 0E 4B 86 B9 DA 40 49 3A 10 4B ~..-I:.K...@I:.K
000030: B7 CA 36 49 37 C9 3E 01 32 10 4B 37 F5 C3 42 49 ..6I7.>.2.K7..BI
000040: 3F F5 7E 32 15 4B 2A 0E 4B 44 4D 11 C5 4A 21 C1 ?.~2.K*.KDM..J!.
000050: 4A CD 72 06 2A 0E 4B 3A 15 4B 85 3C 6F 22 0E 4B J.r.*.K:.K.<o".K
000060: F1 C9 3A 54 01 4F 06 00 11 0C 00 19 7E B9 D2 79 ..:T.O......~..y
000070: 49 3A 0E 4B 86 B9 DA 9E 49 3A 10 4B B7 CA 82 49 I:.K....I:.K...I
000080: 37 C9 E5 3E 2D 21 21 4B CD FA 36 21 21 4B 79 CD 7..>-!!K..6!!Ky.
000090: BB 36 36 00 E1 37 F5 7E 32 15 4B C3 B1 49 3F F5 .66..7.~2.K..I?.
0000A0: E5 7E 32 15 4B 4F 06 00 3E 2D 21 21 4B CD FA 36 .~2.KO..>-!!K..6
0000B0: E1 11 F4 FF 19 11 21 4B 7E B7 CA C3 49 12 23 13 ......!K~...I.#.
0000C0: C3 B8 49 21 21 4B 3A 15 4B CD BB 36 36 00 2A 0E ..I!!K:.K..66.*.
0000D0: 4B 44 4D 11 21 4B 21 C5 4A CD 72 06 2A 0E 4B 3A KDM.!K!.J.r.*.K:
0000E0: 15 4B 85 3C 6F 22 0E 4B F1 C9 D5 3A 11 4B 6F 26 .K.<o".K...:.Ko&
0000F0: 00 29 29 29 29 EB 3A 14 4B B7 C2 03 4A CD E3 1C .)))).:.K...J...
000100: C3 06 4A 21 20 4C 19 D1 C9 C5 D5 01 10 27 CD 2C ..J! L.......'.,
000110: 4A 01 E8 03 CD 2C 4A 01 64 00 CD 2C 4A 01 0A 00 J....,J.d..,J...
000120: CD 2C 4A 01 01 00 CD 2C 4A D1 C1 C9 D5 16 2F 14 .,J....,J...../.
000130: 7D 91 6F 7C 98 67 D2 2F 4A 09 7A D1 12 13 C9 3E }.o|.g./J.z....>
000140: FF 32 6F 44 C3 4C 4A 3E 01 C3 4F 4A CD AC 06 3A .2oD.LJ>..OJ...:
000150: 0A 4B 32 57 44 3E 01 21 00 45 C3 C7 3B 00 00 0B .K2WD>.!.E..;...
000160: 35 4E 43 4F 50 59 52 49 47 48 54 20 20 4E 3A 01 5NCOPYRIGHT N:.
000170: 4F 3C 28 43 29 20 31 39 38 32 20 20 20 4A 04 78 O<(C) 1982 J.x
000180: 32 01 52 53 50 2C 20 49 4E 43 20 20 20 F6 4E C3 2.RSP, INC .N.
000190: 09 49 29 02 00 29 82 4A 0B 35 29 82 4A 2F 02 00 .I)..).J.5).J/..
0001A0: 35 CD F5 4B 7E FE 1A C2 B4 4A 36 0D 23 36 0A 23 5..K~....J6.#6.#
0001B0: 36 1A 2B 2B 23 23 22 FD 4E 7E FE 1A C2 CE 4A 36 6.++##".N~....J6
0001C0: 0D 23 36 00 00 00 00 00 00 20 00 20 20 20 20 20 .#6...... .
0001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0001E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0001F0: 20 00 46 49 45 4C 44 53 00 52 45 43 4F 52 44 20 .FIELDS.RECORD
Size : 512 (Real : 512)
000000: 0B 64 62 61 73 65 20 6D 65 6E 75 70 00 54 52 41 .dbase menup.TRA
000010: 49 54 45 4D 45 4E 54 20 64 42 41 53 45 20 49 49 ITEMENT dBASE II
000020: 20 76 65 72 73 69 6F 6E 20 4C 2E 43 2E 45 20 2A version L.C.E *
000030: 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 **..............
000040: 0D 0A 2A 2A 2A 20 54 52 4F 50 20 44 45 20 43 4F ..*** TROP DE CO
000050: 4D 4D 41 4E 44 45 53 20 27 52 45 54 55 52 4E 27 MMANDES 'RETURN'
000060: 20 52 45 4E 43 4F 4E 54 52 45 45 53 20 2A 2A 2A RENCONTREES ***
000070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000080: 6F 74 6F 20 74 6F 70 0D 0A 73 74 6F 72 65 20 27 oto top..store '
000090: 20 20 20 20 20 20 20 20 27 20 74 6F 20 6E 6F 6D ' to nom
0000A0: 66 69 63 68 0D 0A 65 72 61 73 65 0D 0A 40 20 35 fich..erase..@ 5
0000B0: 2C 35 20 73 61 79 20 27 6E 6F 6D 20 64 75 20 66 ,5 say 'nom du f
0000C0: 69 63 68 69 65 72 20 73 75 72 20 6C 65 71 75 65 ichier sur leque
0000D0: 6C 20 76 6F 75 73 20 76 6F 75 6C 65 7A 20 74 72 l vous voulez tr
0000E0: 61 76 61 69 6C 6C 65 72 27 0D 0A 40 20 35 2C 36 availler'..@ 5,6
0000F0: 35 20 67 65 74 20 6E 6F 6D 66 69 63 68 20 70 69 5 get nomfich pi
000100: 63 74 75 72 65 20 27 41 41 41 41 41 41 41 41 27 cture 'AAAAAAAA'
000110: 0D 0A 40 20 6C 69 67 6D 31 2C 30 20 73 61 79 20 ..@ ligm1,0 say
000120: 27 74 61 70 65 7A 20 72 65 74 75 72 6E 20 70 6F 'tapez return po
000130: 75 72 20 61 62 61 6E 64 6F 6E 6E 65 72 27 0D 0A ur abandonner'..
000140: 72 65 61 64 0D 0A 2A 20 76 65 75 74 2D 6F 6E 20 read..* veut-on
000150: 72 65 76 65 6E 69 72 20 61 75 20 6D 65 6E 75 20 revenir au menu
000160: 70 72 69 6E 63 69 70 61 6C 0D 0A 69 66 20 6E 6F principal..if no
000170: 6D 66 69 63 68 3D 27 20 27 0D 0A 20 20 20 72 65 mfich=' '.. re
000180: 74 75 72 6E 0D 0A 65 6E 64 69 66 0D 0A 73 74 6F turn..endif..sto
000190: 72 65 20 21 28 6E 6F 6D 66 69 63 68 29 20 74 6F re !(nomfich) to
0001A0: 20 6E 6F 6D 66 69 63 68 0D 0A 73 74 6F 72 65 20 nomfich..store
0001B0: 6E 6F 6D 66 69 63 68 20 74 6F 20 6E 6F 6D 61 66 nomfich to nomaf
0001C0: 66 0D 0A 6C 6F 63 61 74 65 20 66 6F 72 20 6E 6F f..locate for no
0001D0: 6D 66 3D 6E 6F 6D 66 69 63 68 0D 0A 69 66 20 6E mf=nomfich..if n
0001E0: 6F 6D 66 20 23 20 6E 6F 6D 66 69 63 68 20 2E 6F omf # nomfich .o
0001F0: 72 2E 65 6F 66 0D 0A 20 20 20 73 74 6F 72 65 20 r.eof.. store
Size : 512 (Real : 512)
000000: 0B 64 62 61 73 65 20 6D 65 6E 75 70 00 54 52 41 .dbase menup.TRA
000010: 49 54 45 4D 45 4E 54 20 64 42 41 53 45 20 49 49 ITEMENT dBASE II
000020: 20 76 65 72 73 69 6F 6E 20 4C 2E 43 2E 45 20 2A version L.C.E *
000030: 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 **..............
000040: 0D 0A 2A 2A 2A 20 54 52 4F 50 20 44 45 20 43 4F ..*** TROP DE CO
000050: 4D 4D 41 4E 44 45 53 20 27 52 45 54 55 52 4E 27 MMANDES 'RETURN'
000060: 20 52 45 4E 43 4F 4E 54 52 45 45 53 20 2A 2A 2A RENCONTREES ***
000070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000080: 31 20 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 1 to nomess..
000090: 20 20 20 20 20 20 64 6F 20 61 66 66 6D 65 73 73 do affmess
0000A0: 0D 0A 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 .. else..
0000B0: 20 20 20 20 20 20 20 73 74 6F 72 65 20 27 74 27 store 't'
0000C0: 20 74 6F 20 63 6F 72 72 65 63 74 0D 0A 20 20 20 to correct..
0000D0: 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 65 6E 64 endif.. end
0000E0: 64 6F 0D 0A 20 20 20 67 6F 74 6F 20 74 6F 70 0D do.. goto top.
0000F0: 0A 20 20 20 72 65 70 6C 61 63 65 20 69 6E 74 69 . replace inti
000100: 74 66 20 77 69 74 68 20 64 61 74 65 2D 75 6E 69 tf with date-uni
000110: 74 2D 6D 61 74 0D 0A 20 20 20 69 66 20 6D 61 74 t-mat.. if mat
000120: 20 3D 20 22 36 31 32 38 22 0D 0A 20 20 20 73 74 = "6128".. st
000130: 6F 72 65 20 32 30 20 74 6F 20 6C 69 67 6D 31 0D ore 20 to ligm1.
000140: 0A 20 20 20 65 6C 73 65 0D 0A 20 20 20 73 74 6F . else.. sto
000150: 72 65 20 32 39 20 74 6F 20 6C 69 67 6D 31 0D 0A re 29 to ligm1..
000160: 20 20 20 65 6E 64 69 66 0D 0A 65 6E 64 69 66 0D endif..endif.
000170: 0A 72 65 6C 65 61 73 65 20 64 61 74 65 2C 63 6F .release date,co
000180: 72 72 65 63 74 2C 6D 61 74 0D 0A 75 73 65 0D 0A rrect,mat..use..
000190: 73 74 6F 72 65 20 27 74 27 20 74 6F 20 74 65 73 store 't' to tes
0001A0: 74 31 0D 0A 64 6F 20 77 68 69 6C 65 20 74 65 73 t1..do while tes
0001B0: 74 31 3D 27 74 27 0D 0A 20 20 20 69 66 20 72 65 t1='t'.. if re
0001C0: 70 72 69 73 65 3D 27 66 27 0D 0A 20 20 20 73 74 prise='f'.. st
0001D0: 6F 72 65 20 27 46 27 20 74 6F 20 72 65 70 0D 0A ore 'F' to rep..
0001E0: 20 20 20 65 72 61 73 65 0D 0A 20 20 20 40 20 31 erase.. @ 1
0001F0: 2C 32 36 20 53 41 59 20 27 47 45 53 54 49 4F 4E ,26 SAY 'GESTION
Size : 512 (Real : 512)
000000: 65 20 27 74 27 20 74 6F 20 76 69 64 65 0D 0A 20 e 't' to vide..
000010: 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 endif..
000020: 20 20 65 6E 64 63 61 73 65 0D 0A 20 20 20 20 20 endcase..
000030: 20 69 66 20 76 69 64 65 3D 27 74 27 0D 0A 20 20 if vide='t'..
000040: 20 20 20 20 72 65 6C 65 61 73 65 20 74 61 62 76 release tabv
000050: 2C 74 65 73 74 2C 76 69 64 65 2C 63 70 74 2C 63 ,test,vide,cpt,c
000060: 6C 65 2C 6D 7A 6F 6E 2C 6D 7A 6F 6E 31 2C 6D 7A le,mzon,mzon1,mz
000070: 6F 6E 32 2C 6D 7A 6F 6E 33 2C 6D 7A 6F 6E 34 2C on2,mzon3,mzon4,
000080: 6D 7A 6F 6E 35 0D 0A 20 20 20 20 20 20 72 65 74 mzon5.. ret
000090: 75 72 6E 0D 0A 20 20 20 20 20 20 65 6E 64 69 66 urn.. endif
0000A0: 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 30 20 .. store 0
0000B0: 74 6F 20 6E 6F 6D 65 73 73 0D 0A 20 20 20 20 20 to nomess..
0000C0: 20 69 66 20 63 68 6F 69 78 3D 27 31 27 0D 0A 20 if choix='1'..
0000D0: 20 20 20 20 20 73 74 6F 72 65 20 31 20 74 6F 20 store 1 to
0000E0: 76 31 0D 0A 20 20 20 20 20 20 73 74 6F 72 65 20 v1.. store
0000F0: 6E 62 7A 6F 6E 70 20 74 6F 20 76 32 0D 0A 20 20 nbzonp to v2..
000100: 20 20 20 20 64 6F 20 76 65 72 69 66 0D 0A 20 20 do verif..
000110: 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20 20 20 endif..
000120: 20 69 66 20 6E 6F 6D 65 73 73 23 30 0D 0A 20 20 if nomess#0..
000130: 20 20 20 20 20 20 20 40 20 6C 69 67 6D 31 2C 30 @ ligm1,0
000140: 0D 0A 20 20 20 20 20 20 20 20 20 64 6F 20 61 66 .. do af
000150: 66 6D 65 73 73 0D 0A 20 20 20 20 20 20 65 6C 73 fmess.. els
000160: 65 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72 e.. stor
000170: 65 20 27 20 27 20 74 6F 20 63 6C 65 0D 0A 20 20 e ' ' to cle..
000180: 20 20 20 20 20 20 20 73 65 6C 65 63 74 20 70 72 select pr
000190: 69 6D 61 72 79 0D 0A 20 20 20 20 20 20 20 20 20 imary..
0001A0: 75 73 65 20 26 66 72 65 66 20 69 6E 64 65 78 20 use &fref index
0001B0: 26 78 63 6C 65 0D 0A 20 20 20 20 20 20 20 20 20 &xcle..
0001C0: 73 74 6F 72 65 20 31 20 74 6F 20 63 70 74 0D 0A store 1 to cpt..
0001D0: 20 20 20 20 20 20 20 20 20 67 6F 74 6F 20 74 6F goto to
0001E0: 70 0D 0A 20 20 20 20 20 20 20 20 20 64 6F 20 77 p.. do w
0001F0: 68 69 6C 65 20 63 70 74 3C 3D 6E 62 7A 6F 6E 70 hile cpt<=nbzonp
Size : 512 (Real : 512)
000000: 00 00 00 00 00 00 00 00 00 20 4E 4F 4D 20 20 20 ......... NOM
000010: 20 20 20 20 43 20 31 32 20 20 30 20 33 20 37 4E C 12 0 3 7N
000020: 6F 6D 3A 20 20 20 20 20 20 20 20 20 20 20 20 20 om:
000030: 20 20 20 20 33 31 32 4E 41 20 20 20 20 20 20 20 312NA
000040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
000060: 20 20 20 20 20 20 20 20 20 20 20 20 31 20 50 52 1 PR
000070: 45 4E 4F 4D 20 20 20 20 43 20 31 32 20 20 30 20 ENOM C 12 0
000080: 33 32 36 50 72 7B 6E 6F 6D 3A 20 20 20 20 20 20 326Pr{nom:
000090: 20 20 20 20 20 20 20 20 33 33 34 4E 41 20 20 20 334NA
0000A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000D0: 32 20 44 45 52 56 49 53 49 54 45 20 43 20 20 38 2 DERVISITE C 8
0000E0: 20 20 30 31 36 35 33 44 65 72 6E 69 7D 72 65 20 01653Derni}re
0000F0: 56 69 73 69 74 65 3A 20 20 20 20 31 36 37 30 4E Visite: 1670N
000100: 44 20 20 20 20 20 20 20 20 20 20 30 30 2F 30 30 D 00/00
000110: 2F 30 30 20 20 20 20 20 20 20 20 20 20 20 20 20 /00
000120: 20 20 20 20 20 20 20 20 20 30 30 2F 30 30 2F 30 00/00/0
000130: 30 20 20 20 33 20 50 52 4F 56 49 53 49 54 45 20 0 3 PROVISITE
000140: 43 20 20 38 20 20 30 31 38 35 32 50 72 6F 63 68 C 8 01852Proch
000150: 61 69 6E 65 20 56 69 73 69 74 65 3A 20 20 20 31 aine Visite: 1
000160: 38 37 30 4E 44 20 20 20 20 20 20 20 20 20 20 30 870ND 0
000170: 30 2F 30 30 2F 30 30 20 20 20 20 20 20 20 20 20 0/00/00
000180: 20 20 20 20 20 20 20 20 20 20 20 20 20 30 30 2F 00/
000190: 30 30 2F 30 30 20 20 20 34 20 4C 49 45 55 20 20 00/00 4 LIEU
0001A0: 20 20 20 20 43 20 20 31 20 20 30 32 30 35 36 4C C 1 02056L
0001B0: 69 65 75 20 28 42 2C 44 2C 4E 29 3A 20 20 20 20 ieu (B,D,N):
0001C0: 20 20 20 32 30 37 30 4E 4C 20 20 20 20 20 20 20 2070NL
0001D0: 20 20 20 42 2C 44 2C 4E 20 20 20 20 20 20 20 20 B,D,N
0001E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0001F0: 20 20 20 20 20 20 20 20 20 20 20 20 35 20 42 45 5 BE
Tous droits réservés. Reproduction sans autorisation interdite. © Kukulcan