_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

JANUS-MAIN 1581

FILE INFORMATION

FILENAME(S): JANUS-MAIN 1581

FILE TYPE(S): PRG

FILE SIZE: 22.5K

FIRST SEEN: 2025-10-20 14:30:06

APPEARS ON: 1 disk(s)

FILE HASH

03428c90a5ab400b837ba1a0715c49634e66c7a126c41351deb074cce06eaa9d

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
10002 SEITE C JANUS-MAIN 1581 PRG C64er, Treasure Chest - Klaus Der Suhler 13 15 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 0F 62 15 62 64 00 3B 00  45 62 6E 00 2E A8 22 C2  |.b.bd.;.Ebn...".|
00000010: 49 4C 44 53 43 48 49 52  4D 20 45 49 4E 20 28 31  |ILDSCHIRM EIN (1|
00000020: 29 20 4F 44 45 52 20 41  55 53 20 28 32 29 20 20  |) ODER AUS (2)  |
00000030: 22 2C 57 41 48 4C 30 00  56 62 78 00 2E 9F 57 41  |",WAHL0.Vbx...WA|
00000040: 48 4C 30 2E 45 51 2E 31  00 61 62 82 00 20 2E A3  |HL0.EQ.1.ab.. ..|
00000050: 30 2C 33 00 6E 62 8C 00  20 2E A4 57 2C 30 2C 33  |0,3.nb.. ..W,0,3|
00000060: 00 75 62 96 00 2E 9D 00  7B 62 A0 00 3B 00 A8 62  |.ub.....{b..;..b|
00000070: AA 00 2E A8 22 C4 52 55  43 4B 45 52 20 45 49 4E  |....".RUCKER EIN|
00000080: 20 28 31 29 20 4F 44 45  52 20 41 55 53 20 28 32  | (1) ODER AUS (2|
00000090: 29 20 20 22 2C 57 41 48  4C 31 00 B9 62 B4 00 2E  |)  ",WAHL1..b...|
000000A0: 9F 57 41 48 4C 31 2E 45  51 2E 31 00 C6 62 BE 00  |.WAHL1.EQ.1..b..|
000000B0: 20 2E A3 31 2C 34 2C 37  00 D2 62 C8 00 20 2E CF  | ..1,4,7..b.. ..|
000000C0: 38 36 2C 38 00 D9 62 D2  00 2E 9D 00 DF 62 DC 00  |86,8..b......b..|
000000D0: 3B 00 0C 63 E6 00 2E A8  22 D3 59 4D 42 4F 4C 53  |;..c....".YMBOLS|
000000E0: 20 45 49 4E 20 28 31 29  20 4F 44 45 52 20 41 55  | EIN (1) ODER AU|
000000F0: 53 20 28 32 29 20 20 22  2C 57 41 48 4C 33 00 1D  |S (2)  ",WAHL3..|
00000100: 63 F0 00 2E 9F 57 41 48  4C 33 2E 45 51 2E 31 00  |c....WAHL3.EQ.1.|
00000110: 29 63 FA 00 20 2E CF 38  36 2C 38 00 38 63 04 01  |)c.. ..86,8.8c..|
00000120: 20 2E A4 57 2C 32 2C 34  2C 37 00 3F 63 0E 01 2E  | ..W,2,4,7.?c...|
00000130: 9D 00 45 63 18 01 3B 00  4B 63 22 01 3B 00 51 63  |..Ec..;.Kc".;.Qc|
00000140: 2C 01 3B 00 9E 63 36 01  3B 2B 2B 2B 2B 2B 2B 2B  |,.;..c6.;+++++++|
00000150: 2B 2B 2B 2B 2B 2B 2B 2B  2B 2B 2B 2B 2B 2B 2B 2B  |++++++++++++++++|
00000160: 2B 2B 2B 2B 2B 2B 2B 2B  2B 2B 2B 2B 2B 2B 2B 2B  |++++++++++++++++|
00000170: 2B 2B 2B 2B 2B 2B 2B 2B  2B 2B 2B 2B 2B 2B 2B 2B  |++++++++++++++++|
00000180: 2B 2B 2B 2B 2B 2B 2B 2B  2B 2B 2B 2B 2B 2B 2B 2B  |++++++++++++++++|
00000190: 00 A4 63 40 01 3B 00 AA  63 4A 01 3B 00 E1 63 54  |..c@.;..cJ.;..cT|
000001A0: 01 2E A8 22 D1 55 45 4C  4C 54 45 58 54 20 41 55  |...".UELLTEXT AU|
000001B0: 46 20 C4 49 53 4B 20 28  31 29 20 4F 44 45 52 20  |F .ISK (1) ODER |
000001C0: D3 59 4E 54 41 58 20 28  32 29 20 20 22 2C 57 41  |.YNTAX (2)  ",WA|
000001D0: 48 4C 32 00 F2 63 5E 01  2E 9F 57 41 48 4C 32 2E  |HL2..c^...WAHL2.|
000001E0: 45 51 2E 31 00 FF 63 68  01 20 2E 90 24 35 30 30  |EQ.1..ch. ..$500|
000001F0: 30 00 18 64 72 01 20 2E  93 22 4A 41 4E 55 53 2D  |0..dr. .."JANUS-|
00000200: 4F 42 4A 20 30 35 2F 38  31 22 00 1F 64 7C 01 2E  |OBJ 05/81"..d|..|
00000210: 9E 00 2C 64 86 01 20 2E  90 24 35 30 30 30 00 3B  |..,d.. ..$5000.;|
00000220: 64 90 01 20 2E A9 31 2C  24 35 30 30 30 00 42 64  |d.. ..1,$5000.Bd|
00000230: 9A 01 2E 9D 00 82 64 A4  01 3B 20 20 20 20 20 20  |......d..;      |
00000240: 20 2A 2A 2A 2A 20 D6 45  52 53 49 4F 4E 20 56 4F  | **** .ERSION VO|
00000250: 4D 20 30 38 2E 30 38 2E  31 39 38 39 20 28 C4 49  |M 08.08.1989 (.I|
00000260: 45 4E 53 54 41 47 29 20  20 20 20 28 32 32 2E 33  |ENSTAG)    (22.3|
00000270: 35 20 48 29 00 CF 64 AE  01 3B 2B 2B 2B 2B 2B 2B  |5 H)..d..;++++++|
00000280: 2B 2B 2B 2B 2B 2B 2B 2B  2B 2B 2B 2B 2B 2B 2B 2B  |++++++++++++++++|
00000290: 2B 2B 2B 2B 2B 2B 2B 2B  2B 2B 2B 2B 2B 2B 2B 2B  |++++++++++++++++|
000002A0: 2B 2B 2B 2B 2B 2B 2B 2B  2B 2B 2B 2B 2B 2B 2B 2B  |++++++++++++++++|
000002B0: 2B 2B 2B 2B 2B 2B 2B 2B  2B 2B 2B 2B 2B 2B 2B 2B  |++++++++++++++++|
000002C0: 2B 00 F1 64 B8 01 3B 20  20 20 20 20 20 44 53 41  |+..d..;      DSA|
000002D0: 56 45 22 4A 41 4E 55 53  2D 4D 41 49 4E 20 30 35  |VE"JANUS-MAIN 05|
000002E0: 2F 38 22 00 F7 64 C2 01  3B 00 30 65 CC 01 2E A2  |/8"..d..;.0e....|
000002F0: 22 4A 41 4E 55 53 2D 4C  41 42 45 4C 53 20 38 31  |"JANUS-LABELS 81|
00000300: 22 3B 20 CC 41 42 45 4C  53 20 45 49 4E 42 49 4E  |"; .ABELS EINBIN|
00000310: 44 45 4E 20 55 4E 44 20  44 45 46 49 4E 49 45 52  |DEN UND DEFINIER|
00000320: 45 4E 00 36 65 D6 01 3B  00 79 65 E0 01 2E 8F 44  |EN.6e..;.ye....D|
00000330: 52 49 56 45 49 4E 51 3D  24 30 45 30 42 3B 20 DA  |RIVEINQ=$0E0B; .|
00000340: 45 49 47 45 52 20 41 55  46 20 C6 4C 41 47 20 46  |EIGER AUF .LAG F|
00000350: BD 52 20 C4 52 49 56 45  49 4E 51 20 4A 41 3D 27  |.R .RIVEINQ JA='|
00000360: C9 27 2F 4E 45 49 4E 3D  27 20 27 00 7F 65 EA 01  |.'/NEIN=' '..e..|
00000370: 3B 00 85 65 F4 01 3B 00  97 65 FE 01 4A 4C 45 53  |;..e..;..e..JLES|
00000380: 45 4E 20 96 4C 45 53 45  4E 00 B1 65 08 02 4A 53  |EN .LESEN..e..JS|
00000390: 43 48 52 45 49 42 45 4E  20 96 53 43 48 52 45 49  |CHREIBEN .SCHREI|
000003A0: 42 45 4E 00 C1 65 12 02  4A 53 41 56 45 20 96 53  |BEN..e..JSAVE .S|
000003B0: 41 56 45 00 D1 65 1C 02  4A 4C 4F 41 44 20 96 4C  |AVE..e..JLOAD .L|
000003C0: 4F 41 44 00 DF 65 26 02  4A 44 49 52 20 96 44 49  |OAD..e&.JDIR .DI|
000003D0: 52 00 F5 65 30 02 4A 4C  BC 53 43 48 45 4E 20 96  |R..e0.JL.SCHEN .|
000003E0: 4C BC 53 43 48 45 4E 00  FB 65 3A 02 3B 00 01 66  |L.SCHEN..e:.;..f|
000003F0: 44 02 3B 00 07 66 4E 02  3B 00 4F 66 58 02 3B 2A  |D.;..fN.;.OfX.;*|
00000400: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000410: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000420: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000430: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000440: 2A 00 97 66 62 02 3B 2A  20 20 20 20 20 20 20 20  |*..fb.;*        |
00000450: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000460: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000470: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000480: 20 20 20 20 20 20 20 20  2A 00 DF 66 6C 02 3B 2A  |        *..fl.;*|
00000490: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000004A0: 20 20 20 C6 49 4C 45 20  53 55 43 48 45 4E 20 26  |   .ILE SUCHEN &|
000004B0: 20 4C 45 53 45 4E 20 20  20 20 20 20 20 20 20 20  | LESEN          |
000004C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000004D0: 2A 00 27 67 76 02 3B 2A  20 20 20 20 20 20 20 20  |*.'gv.;*        |
000004E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000004F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000500: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000510: 20 20 20 20 20 20 20 20  2A 00 6F 67 80 02 3B 2A  |        *.og..;*|
00000520: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000530: 2A 2A 2A 2A 2A 2A 2A 2A  20 4D 2E C6 2E 2A 2A 2A  |******** M...***|
00000540: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000550: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000560: 2A 00 75 67 8A 02 3B 00  7B 67 94 02 3B 00 81 67  |*.ug..;.{g..;..g|
00000570: 9E 02 3B 00 AE 67 A8 02  4C 45 53 45 4E 20 97 52  |..;..g..LESEN .R|
00000580: 45 41 44 4E 41 4D 45 3B  A0 DA 45 49 43 48 45 4E  |EADNAME;..EICHEN|
00000590: 20 49 4E 20 C2 55 46 46  45 52 20 4C 45 53 45 4E  | IN .UFFER LESEN|
000005A0: 00 BC 67 B2 02 20 B6 4C  45 53 45 4E 30 31 00 C2  |..g.. .LESEN01..|
000005B0: 67 BC 02 3B 00 F4 67 C6  02 20 97 52 45 41 44 4E  |g..;..g.. .READN|
000005C0: 41 4D 45 42 3B 20 5A 45  49 43 48 45 4E 20 49 4E  |AMEB; ZEICHEN IN|
000005D0: 20 C2 41 53 49 43 42 55  46 46 45 52 20 41 55 53  | .ASICBUFFER AUS|
000005E0: 57 45 52 54 45 4E 00 16  68 D0 02 20 B6 4C 45 53  |WERTEN..h.. .LES|
000005F0: 45 4E 30 31 3B 20 42 45  49 20 C6 45 48 4C 45 52  |EN01; BEI .EHLER|
00000600: 20 53 50 52 49 4E 47 45  00 1C 68 DA 02 3B 00 55  | SPRINGE..h..;.U|
00000610: 68 E4 02 4C 45 53 45 4E  54 52 20 97 53 45 41 52  |h..LESENTR .SEAR|
00000620: 43 48 4D 53 47 3B 20 C1  55 53 47 41 42 45 20 27  |CHMSG; .USGABE '|
00000630: D3 55 43 48 45 20 4E 41  43 48 20 3C 44 41 54 45  |.UCHE NACH <DATE|
00000640: 49 4E 41 4D 45 3E 27 00  5B 68 EE 02 3B 00 6C 68  |INAME>'.[h..;.lh|
00000650: F8 02 20 97 53 45 41 52  43 48 4E 41 4D 45 00 79  |.. .SEARCHNAME.y|
00000660: 68 02 03 20 B5 4C 45 53  45 4E 31 00 7F 68 0C 03  |h.. .LESEN1..h..|
00000670: 3B 00 A3 68 16 03 20 97  50 52 49 4D 4D 3B 20 C6  |;..h.. .PRIMM; .|
00000680: 45 48 4C 45 52 4D 45 4C  44 55 4E 47 20 41 55 53  |EHLERMELDUNG AUS|
00000690: 47 45 42 45 4E 00 CD 68  20 03 20 2E 91 43 52 2C  |GEBEN..h . ..CR,|
000006A0: 37 2C 22 9E C4 41 54 45  49 20 4E 49 43 48 54 20  |7,"..ATEI NICHT |
000006B0: 47 45 46 55 4E 44 45 4E  21 99 22 2C 45 4F 4D 00  |GEFUNDEN!.",EOM.|
000006C0: E4 68 2A 03 4C 45 53 45  4E 30 31 20 96 4C 45 53  |.h*.LESEN01 .LES|
000006D0: 45 4E 45 52 52 30 00 EA  68 34 03 3B 00 24 69 3E  |ENERR0..h4.;.$i>|
000006E0: 03 4C 45 53 45 4E 31 20  97 44 49 52 43 4F 50 59  |.LESEN1 .DIRCOPY|
000006F0: 44 53 3B 20 41 4C 4C 45  20 C6 49 4C 45 44 41 54  |DS; ALLE .ILEDAT|
00000700: 45 4E 20 49 4D 20 D3 50  45 49 43 48 45 52 20 53  |EN IM .PEICHER S|
00000710: 49 43 48 45 52 4E 00 35  69 48 03 20 81 44 49 52  |ICHERN.5iH. .DIR|
00000720: 4C BB 4E 47 45 2B 33 00  55 69 52 03 20 8F 44 49  |L.NGE+3.UiR. .DI|
00000730: 52 4C BB 4E 47 45 2B 32  3B 20 CC BB 4E 47 45 20  |RL.NGE+2; ..NGE |
00000740: C8 49 2D 57 4F 52 44 00  75 69 5C 03 20 B8 4C 45  |.I-WORD.ui\. .LE|
00000750: 53 45 4E 32 3B 20 3D 20  30 2C 20 44 41 4E 4E 20  |SEN2; = 0, DANN |
00000760: 53 50 52 49 4E 47 45 00  7B 69 66 03 3B 00 87 69  |SPRINGE.{if.;..i|
00000770: 70 03 20 97 50 52 49 4D  4D 00 B7 69 7A 03 20 2E  |p. .PRIMM..iz. .|
00000780: 91 43 52 2C 37 2C 22 9E  C4 41 54 45 49 20 47 52  |.CR,7,"..ATEI GR|
00000790: BC BE 45 52 20 41 4C 53  20 36 34 20 CB C2 59 54  |..ER ALS 64 ..YT|
000007A0: 45 22 2C 43 52 2C 45 4F  4D 00 F9 69 84 03 4C 45  |E",CR,EOM..i..LE|
000007B0: 53 45 4E 31 5F 4D 20 96  4C 45 53 45 4E 45 52 52  |SEN1_M .LESENERR|
000007C0: 3B 20 CC 41 42 45 4C 20  49 4E 20 4C 45 53 45 4E  |; .ABEL IN LESEN|
000007D0: 32 20 BB 4E 44 45 52 4E  2C 20 57 45 4E 4E 20 41  |2 .NDERN, WENN A|
000007E0: 55 43 48 20 C4 41 54 45  49 45 4E 00 43 6A 8E 03  |UCH .ATEIEN.Cj..|
000007F0: 3B 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |;               |
00000800: 20 20 20 20 20 20 20 20  20 20 20 20 3E 20 36 34  |            > 64|
00000810: 4B C2 59 54 45 20 54 45  49 4C 57 45 49 53 45 20  |K.YTE TEILWEISE |
00000820: 47 45 4C 45 53 45 4E 20  57 45 52 44 45 4E 20 53  |GELESEN WERDEN S|
00000830: 4F 4C 4C 45 4E 00 49 6A  98 03 3B 00 7C 6A A2 03  |OLLEN.Ij..;.|j..|
00000840: 4C 45 53 45 4E 32 20 81  44 49 52 4E 41 4D 45 2B  |LESEN2 .DIRNAME+|
00000850: 31 31 3B 20 D3 54 41 54  55 53 42 59 54 45 20 44  |11; .TATUSBYTE D|
00000860: 45 53 20 C4 41 54 45 49  4E 41 4D 45 4E 53 00 B1  |ES .ATEINAMENS..|
00000870: 6A AC 03 20 87 23 25 30  30 30 31 31 30 30 30 3B  |j.. .#%00011000;|
00000880: 20 D5 4E 54 45 52 2D 20  55 4E 44 20 C8 41 55 50  | .NTER- UND .AUP|
00000890: 54 56 45 52 5A 45 49 43  48 4E 49 53 42 49 54 20  |TVERZEICHNISBIT |
000008A0: 3D 20 30 00 E2 6A B6 03  20 B8 4C 45 53 45 4E 33  |= 0..j.. .LESEN3|
000008B0: 3B 20 4A 41 2C 20 44 41  4E 4E 20 4B 41 4E 4E 20  |; JA, DANN KANN |
000008C0: C4 41 54 45 49 20 47 45  4C 45 53 45 4E 20 57 45  |.ATEI GELESEN WE|
000008D0: 52 44 45 4E 00 E8 6A C0  03 3B 00 14 6B CA 03 20  |RDEN..j..;..k.. |
000008E0: 97 50 52 49 4D 4D 3B 20  53 4F 4E 53 54 20 49 53  |.PRIMM; SONST IS|
000008F0: 54 20 46 49 4C 45 20 45  49 4E 20 D6 45 52 5A 45  |T FILE EIN .ERZE|
00000900: 49 43 48 4E 49 53 00 53  6B D4 03 20 2E 91 43 52  |ICHNIS.Sk.. ..CR|
00000910: 2C 37 2C 22 9E C5 49 4E  20 D6 45 52 5A 45 49 43  |,7,"..IN .ERZEIC|
00000920: 48 4E 49 53 20 4B 41 4E  4E 20 4E 49 43 48 54 20  |HNIS KANN NICHT |
00000930: 47 45 4C 41 44 45 4E 20  57 45 52 44 45 4E 21 99  |GELADEN WERDEN!.|
00000940: 22 2C 45 4F 4D 00 5A 6B  DE 03 20 A7 00 61 6B E8  |",EOM.Zk.. ..ak.|
00000950: 03 20 A4 00 67 6B F2 03  3B 00 79 6B FC 03 4C 45  |. ..gk..;.yk..LE|
00000960: 53 45 4E 33 20 97 50 52  49 4D 4D 00 95 6B 06 04  |SEN3 .PRIMM..k..|
00000970: 20 2E 91 43 52 2C 22 2E  2E 2E 20 C4 41 54 45 49  | ..CR,"... .ATEI|
00000980: 20 9E 22 2C 45 4F 4D 00  AE 6B 10 04 20 A6 3B 20  | .",EOM..k.. .; |
00000990: C6 4C 41 47 20 46 BD 52  20 4B 45 49 4E 20 43 52  |.LAG F.R KEIN CR|
000009A0: 00 D2 6B 1A 04 20 97 50  52 49 4E 54 4E 41 4D 45  |..k.. .PRINTNAME|
000009B0: 3B 20 C4 41 54 45 49 4E  41 4D 45 20 41 55 53 47  |; .ATEINAME AUSG|
000009C0: 45 42 45 4E 00 DE 6B 24  04 20 97 50 52 49 4D 4D  |EBEN..k$. .PRIMM|
000009D0: 00 FB 6B 2E 04 20 2E 91  22 99 20 57 49 52 44 20  |..k.. ..". WIRD |
000009E0: 47 45 4C 41 44 45 4E 2E  22 2C 45 4F 4D 00 01 6C  |GELADEN.",EOM..l|
000009F0: 38 04 3B 00 0E 6C 42 04  20 97 46 49 4C 45 52 44  |8.;..lB. .FILERD|
00000A00: 00 1D 6C 4C 04 20 B6 4C  45 53 45 4E 45 52 52 00  |..lL. .LESENERR.|
00000A10: 41 6C 56 04 20 97 50 52  54 4C BB 4E 47 45 3B 20  |AlV. .PRTL.NGE; |
00000A20: C4 41 54 45 49 4C BB 4E  47 45 20 41 55 53 47 45  |.ATEIL.NGE AUSGE|
00000A30: 42 45 4E 00 48 6C 60 04  20 A6 00 4F 6C 6A 04 20  |BEN.Hl`. ..Olj. |
00000A40: A4 00 55 6C 74 04 3B 00  69 6C 7E 04 4C 45 53 45  |..Ult.;.il~.LESE|
00000A50: 4E 45 52 52 20 97 50 52  49 4D 4D 00 9F 6C 88 04  |NERR .PRIMM..l..|
00000A60: 20 2E 91 43 52 2C 37 2C  22 9E 91 C4 41 54 45 49  | ..CR,7,"...ATEI|
00000A70: 20 4B 41 4E 4E 20 4E 49  43 48 54 20 47 45 4C 41  | KANN NICHT GELA|
00000A80: 44 45 4E 20 57 45 52 44  45 4E 21 99 22 2C 45 4F  |DEN WERDEN!.",EO|
00000A90: 4D 00 AF 6C 92 04 4C 45  53 45 4E 45 52 52 30 20  |M..l..LESENERR0 |
00000AA0: A7 00 B6 6C 9C 04 20 A4  00 BC 6C A6 04 3B 00 C2  |...l.. ...l..;..|
00000AB0: 6C B0 04 3B 00 C8 6C BA  04 3B 00 CE 6C C4 04 3B  |l..;..l..;..l..;|
00000AC0: 00 16 6D CE 04 3B 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |..m..;**********|
00000AD0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000AE0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000AF0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000B00: 2A 2A 2A 2A 2A 2A 2A 2A  00 5E 6D D8 04 3B 2A 20  |********.^m..;* |
00000B10: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000B20: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000B30: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000B40: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2A  |               *|
00000B50: 00 A6 6D E2 04 3B 2A 20  20 20 C6 49 4C 45 4E 41  |..m..;*   .ILENA|
00000B60: 4D 45 4E 20 53 55 43 48  45 4E 2C 20 CC BB 4E 47  |MEN SUCHEN, ..NG|
00000B70: 45 20 4C 45 53 45 4E 20  55 4E 44 20 44 41 4E 4E  |E LESEN UND DANN|
00000B80: 20 C4 41 54 45 49 20 53  43 48 52 45 49 42 45 4E  | .ATEI SCHREIBEN|
00000B90: 20 20 20 20 20 20 20 2A  00 EE 6D EC 04 3B 2A 20  |       *..m..;* |
00000BA0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000BB0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000BC0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000BD0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2A  |               *|
00000BE0: 00 36 6E F6 04 3B 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |.6n..;**********|
00000BF0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 20  |*************** |
00000C00: 4D 2E C6 2E 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |M...************|
00000C10: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000C20: 2A 2A 2A 2A 2A 2A 2A 2A  00 3C 6E 00 05 3B 00 42  |********.<n..;.B|
00000C30: 6E 0A 05 3B 00 48 6E 14  05 3B 00 79 6E 1E 05 53  |n..;.Hn..;.yn..S|
00000C40: 43 48 52 45 49 42 45 4E  20 97 52 45 41 44 4E 41  |CHREIBEN .READNA|
00000C50: 4D 45 3B A0 DA 45 49 43  48 45 4E 20 49 4E 20 C2  |ME;..EICHEN IN .|
00000C60: 55 46 46 45 52 20 4C 45  53 45 4E 00 8A 6E 28 05  |UFFER LESEN..n(.|
00000C70: 20 B6 53 43 48 52 42 45  52 52 30 3B 00 90 6E 32  | .SCHRBERR0;..n2|
00000C80: 05 3B 00 C2 6E 3C 05 20  97 52 45 41 44 4E 41 4D  |.;..n<. .READNAM|
00000C90: 45 42 3B 20 5A 45 49 43  48 45 4E 20 49 4E 20 C2  |EB; ZEICHEN IN .|
00000CA0: 41 53 49 43 42 55 46 46  45 52 20 41 55 53 57 45  |ASICBUFFER AUSWE|
00000CB0: 52 54 45 4E 00 E6 6E 46  05 20 B6 53 43 48 52 42  |RTEN..nF. .SCHRB|
00000CC0: 45 52 52 30 3B 20 42 45  49 20 C6 45 48 4C 45 52  |ERR0; BEI .EHLER|
00000CD0: 20 53 50 52 49 4E 47 45  00 EC 6E 50 05 3B 00 26  | SPRINGE..nP.;.&|
00000CE0: 6F 5A 05 53 43 48 52 45  49 42 54 52 20 81 44 49  |oZ.SCHREIBTR .DI|
00000CF0: 52 4E 41 4D 45 3B 20 50  52 BD 46 45 4E 2C 20 4F  |RNAME; PR.FEN, O|
00000D00: 42 20 31 2E 20 C2 55 43  48 53 54 41 42 45 20 45  |B 1. .UCHSTABE E|
00000D10: 49 4E 20 D3 50 41 43 45  00 32 6F 64 05 20 85 23  |IN .PACE.2od. .#|
00000D20: 22 20 22 3B 00 52 6F 6E  05 20 B8 53 43 48 52 42  |" ";.Ron. .SCHRB|
00000D30: 45 52 52 3B 20 4A 41 2C  20 44 41 4E 4E 20 C6 45  |ERR; JA, DANN .E|
00000D40: 48 4C 45 52 00 58 6F 78  05 3B 00 84 6F 82 05 20  |HLER.Xox.;..o.. |
00000D50: 84 23 31 31 3B 20 DA BB  48 4C 45 52 20 C1 4E 5A  |.#11; ..HLER .NZ|
00000D60: 41 48 4C 20 DA 45 49 43  48 45 4E 20 49 4E 20 C4  |AHL .EICHEN IN .|
00000D70: 49 52 4E 41 4D 45 00 B3  6F 8C 05 53 43 48 52 45  |IRNAME..o..SCHRE|
00000D80: 49 42 31 20 81 44 49 52  4E 41 4D 45 2C 59 3B 20  |IB1 .DIRNAME,Y; |
00000D90: C4 49 52 4E 41 4D 45 2D  DA 45 49 43 48 45 4E 20  |.IRNAME-.EICHEN |
00000DA0: 4C 41 44 45 4E 00 D1 6F  96 05 20 85 23 22 2A 22  |LADEN..o.. .#"*"|
00000DB0: 3B 20 49 53 54 20 44 41  53 20 45 49 4E 20 CA 4F  |; IST DAS EIN .O|
00000DC0: 4B 45 52 00 EC 6F A0 05  20 B8 53 43 48 52 42 45  |KER..o.. .SCHRBE|
00000DD0: 52 52 3B 20 4A 41 2C 20  C6 45 48 4C 45 52 00 0A  |RR; JA, .EHLER..|
00000DE0: 70 AA 05 20 85 23 22 3F  22 3B 20 49 53 54 20 44  |p.. .#"?"; IST D|
00000DF0: 41 53 20 45 49 4E 20 CA  4F 4B 45 52 00 25 70 B4  |AS EIN .OKER.%p.|
00000E00: 05 20 B7 53 43 48 52 45  49 42 32 3B 20 4A 41 2C  |. .SCHREIB2; JA,|
00000E10: 20 C6 45 48 4C 45 52 00  2B 70 BE 05 3B 00 56 70  | .EHLER.+p..;.Vp|
00000E20: C8 05 53 43 48 52 42 45  52 52 20 96 52 44 4E 41  |..SCHRBERR .RDNA|
00000E30: 4D 45 45 52 52 3B 20 53  50 52 49 4E 47 45 20 C1  |MEERR; SPRINGE .|
00000E40: 55 53 47 41 42 45 20 3F  00 66 70 D2 05 53 43 48  |USGABE ?.fp..SCH|
00000E50: 52 42 45 52 52 30 20 A7  00 6D 70 DC 05 20 A4 00  |RBERR0 ..mp.. ..|
00000E60: 73 70 E6 05 3B 00 95 70  F0 05 53 43 48 52 45 49  |sp..;..p..SCHREI|
00000E70: 42 32 20 A3 3B 20 45 52  4E 49 45 44 52 49 47 45  |B2 .; ERNIEDRIGE|
00000E80: 20 DA BB 48 4C 45 52 00  BD 70 FA 05 20 B1 53 43  | ..HLER..p.. .SC|
00000E90: 48 52 45 49 42 31 3B 20  41 4C 4C 45 20 DA 45 49  |HREIB1; ALLE .EI|
00000EA0: 43 48 45 4E 20 BD 42 45  52 50 52 BD 46 45 4E 00  |CHEN .BERPR.FEN.|
00000EB0: C3 70 04 06 3B 00 ED 70  0E 06 20 97 52 45 41 44  |.p..;..p.. .READ|
00000EC0: 4C BB 4E 47 45 3B 20 CC  BB 4E 47 45 20 44 45 52  |L.NGE; ..NGE DER|
00000ED0: 20 C4 41 54 45 49 20 56  4F 4E 20 43 4F 4E 3A 00  | .ATEI VON CON:.|
00000EE0: 09 71 18 06 20 B6 53 43  48 52 42 45 52 52 30 3B  |.q.. .SCHRBERR0;|
00000EF0: 20 42 45 49 20 C6 45 48  4C 45 52 00 0F 71 22 06  | BEI .EHLER..q".|
00000F00: 3B 00 20 71 2C 06 20 97  53 45 41 52 43 48 4E 41  |;. q,. .SEARCHNA|
00000F10: 4D 45 00 57 71 36 06 20  B5 53 43 48 52 45 49 42  |ME.Wq6. .SCHREIB|
00000F20: 44 56 3B 20 C4 41 54 45  49 20 56 4F 52 48 41 4E  |DV; .ATEI VORHAN|
00000F30: 44 45 4E 20 2D 3E 20 53  50 52 49 4E 47 45 2C 20  |DEN -> SPRINGE, |
00000F40: 44 41 20 46 41 4C 53 43  48 00 7D 71 40 06 20 85  |DA FALSCH.}q@. .|
00000F50: 23 24 31 3B 20 C6 4C 41  47 20 46 BD 52 20 C6 45  |#$1; .LAG F.R .E|
00000F60: 48 4C 45 52 20 28 C4 49  52 20 56 4F 4C 4C 29 00  |HLER (.IR VOLL).|
00000F70: 9D 71 4A 06 20 B5 53 43  48 52 45 49 42 33 3B 20  |.qJ. .SCHREIB3; |
00000F80: 41 3D 30 20 2D 3E 20 41  4C 4C 45 53 20 4F 4B 00  |A=0 -> ALLES OK.|
00000F90: C2 71 54 06 20 B8 4A 44  49 53 4B 46 55 4C 4C 3B  |.qT. .JDISKFULL;|
00000FA0: 20 41 3D 31 20 2D 3E 20  C4 49 52 20 49 53 54 20  | A=1 -> .IR IST |
00000FB0: 56 4F 4C 4C 00 E6 71 5E  06 20 96 53 43 48 52 42  |VOLL..q^. .SCHRB|
00000FC0: 37 45 52 52 3B 20 41 3D  46 46 20 2D 3E 20 CC 45  |7ERR; A=FF -> .E|
00000FD0: 53 45 46 45 48 4C 45 52  00 EC 71 68 06 3B 00 16  |SEFEHLER..qh.;..|
00000FE0: 72 72 06 53 43 48 52 45  49 42 44 56 20 97 50 52  |rr.SCHREIBDV .PR|
00000FF0: 49 4D 4D 3B 20 C4 41 54  45 49 20 49 53 54 20 56  |IMM; .ATEI IST V|
00001000: 4F 52 48 41 4E 44 45 4E  00 3A 72 7C 06 20 2E 91  |ORHANDEN.:r|. ..|
00001010: 43 52 2C 37 2C 22 9E C4  41 54 45 49 20 45 58 49  |CR,7,"..ATEI EXI|
00001020: 53 54 49 45 52 54 99 22  2C 45 4F 4D 00 41 72 86  |STIERT.",EOM.Ar.|
00001030: 06 20 A7 00 48 72 90 06  20 A4 00 4E 72 9A 06 3B  |. ..Hr.. ..Nr..;|
00001040: 00 64 72 A4 06 53 43 48  52 45 49 42 33 20 81 44  |.dr..SCHREIB3 .D|
00001050: 49 52 4E 41 4D 45 00 89  72 AE 06 20 A0 3B 20 55  |IRNAME..r.. .; U|
00001060: 4E 44 20 C1 4E 46 41 4E  47 53 42 55 43 48 53 54  |ND .NFANGSBUCHST|
00001070: 41 42 45 4E 20 52 45 54  54 45 4E 00 B4 72 B8 06  |ABEN RETTEN..r..|
00001080: 20 81 44 49 52 4E 41 4D  45 2B 31 3B 20 5A 57 45  | .DIRNAME+1; ZWE|
00001090: 49 54 45 4E 20 C2 55 43  48 53 54 41 42 45 4E 20  |ITEN .UCHSTABEN |
000010A0: 52 45 54 54 45 4E 00 BB  72 C2 06 20 A0 00 C1 72  |RETTEN..r.. ...r|
000010B0: CC 06 3B 00 DD 72 D6 06  20 81 23 24 45 35 3B 20  |..;..r.. .#$E5; |
000010C0: C7 45 4C BC 53 43 48 54  45 20 C4 41 54 45 49 00  |.EL.SCHTE .ATEI.|
000010D0: 09 73 E0 06 20 82 44 49  52 4E 41 4D 45 3B 20 4E  |.s.. .DIRNAME; N|
000010E0: 41 43 48 20 47 45 4C BC  53 43 48 54 45 52 20 C4  |ACH GEL.SCHTER .|
000010F0: 41 54 45 49 20 53 55 43  48 45 4E 00 2F 73 EA 06  |ATEI SUCHEN./s..|
00001100: 20 81 23 22 2A 22 3B 20  41 4E 44 45 52 45 20 DA  | .#"*"; ANDERE .|
00001110: 45 49 43 48 45 4E 20 49  47 4E 4F 52 49 45 52 45  |EICHEN IGNORIERE|
00001120: 4E 00 3F 73 F4 06 20 82  44 49 52 4E 41 4D 45 2B  |N.?s.. .DIRNAME+|
00001130: 31 00 45 73 FE 06 3B 00  7E 73 08 07 20 81 44 49  |1.Es..;.~s.. .DI|
00001140: 52 46 4C 41 47 3B 20 49  53 54 20 C4 49 52 20 31  |RFLAG; IST .IR 1|
00001150: 20 4F 44 45 52 20 C4 49  52 54 45 49 4C 20 32 2C  | ODER .IRTEIL 2,|
00001160: 33 2C 34 20 45 54 43 20  47 45 4C 41 44 45 4E 3F  |3,4 ETC GELADEN?|
00001170: 00 B7 73 12 07 20 B7 53  43 48 52 45 49 42 34 3B  |..s.. .SCHREIB4;|
00001180: 20 C4 49 52 20 31 20 56  4F 52 48 41 4E 44 45 4E  | .IR 1 VORHANDEN|
00001190: 2C 20 42 52 41 55 43 48  54 20 4D 41 4E 20 4E 49  |, BRAUCHT MAN NI|
000011A0: 43 48 54 20 4C 41 44 45  4E 00 E5 73 1C 07 20 97  |CHT LADEN..s.. .|
000011B0: 53 45 41 52 43 48 4E 31  42 3B 20 55 4E 44 20 4E  |SEARCHN1B; UND N|
000011C0: 41 43 48 20 46 52 45 49  45 4D 20 D0 4C 41 54 5A  |ACH FREIEM .LATZ|
000011D0: 20 53 55 43 48 45 4E 00  11 74 26 07 20 96 53 43  | SUCHEN..t&. .SC|
000011E0: 48 52 45 49 42 35 3B 20  42 45 49 20 D2 BD 43 4B  |HREIB5; BEI ..CK|
000011F0: 4B 45 48 52 20 57 45 49  54 45 52 41 52 42 45 49  |KEHR WEITERARBEI|
00001200: 54 45 4E 00 17 74 30 07  3B 00 5A 74 3A 07 53 43  |TEN..t0.;.Zt:.SC|
00001210: 48 52 45 49 42 34 20 97  53 45 41 52 43 48 4E 3B  |HREIB4 .SEARCHN;|
00001220: 20 45 52 53 54 20 C4 49  52 20 31 20 4C 41 44 45  | ERST .IR 1 LADE|
00001230: 4E 20 55 4E 44 20 44 41  4E 4E 20 4E 41 43 48 20  |N UND DANN NACH |
00001240: D0 4C 41 54 5A 20 53 55  43 48 45 4E 00 8C 74 44  |.LATZ SUCHEN..tD|
00001250: 07 3B 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.;              |
00001260: 20 20 20 20 20 20 20 20  20 20 20 20 20 41 42 45  |             ABE|
00001270: 52 20 4F 48 4E 45 49 4E  51 2D C4 49 53 4B 00 C4  |R OHNEINQ-.ISK..|
00001280: 74 4E 07 53 43 48 52 45  49 42 35 20 B5 53 43 48  |tN.SCHREIB5 .SCH|
00001290: 52 45 49 42 37 3B 20 47  45 4C BC 53 43 48 54 45  |REIB7; GEL.SCHTE|
000012A0: 20 C4 41 54 45 49 20 47  45 46 55 4E 44 45 4E 20  | .ATEI GEFUNDEN |
000012B0: 28 3D 24 45 35 29 00 FF  74 58 07 20 B8 53 43 48  |(=$E5)..tX. .SCH|
000012C0: 52 45 49 42 37 3B 20 57  45 4E 4E 20 42 49 53 48  |REIB7; WENN BISH|
000012D0: 45 52 20 4E 4F 43 48 20  4E 49 43 48 54 20 42 45  |ER NOCH NICHT BE|
000012E0: 4E 55 54 5A 54 2E 20 D0  4C 41 54 5A 20 47 45 46  |NUTZT. .LATZ GEF|
000012F0: 2E 00 05 75 62 07 3B 00  2A 75 6C 07 53 43 48 52  |...ub.;.*ul.SCHR|
00001300: 45 49 42 36 20 A1 3B 20  C1 4E 46 41 4E 47 53 5A  |EIB6 .; .NFANGSZ|
00001310: 45 49 43 48 45 4E 20 48  4F 4C 45 4E 00 31 75 76  |EICHEN HOLEN.1uv|
00001320: 07 20 A1 00 77 75 80 07  4A 44 49 53 4B 46 55 4C  |. ..wu..JDISKFUL|
00001330: 4C 20 96 44 49 53 4B 46  55 4C 4C 3B 20 41 4C 4C  |L .DISKFULL; ALL|
00001340: 45 20 41 4E 44 45 52 45  4E 20 C6 45 48 4C 45 52  |E ANDEREN .EHLER|
00001350: 4D 45 4C 44 55 4E 47 45  4E 20 3D 20 C4 49 53 4B  |MELDUNGEN = .ISK|
00001360: 45 54 54 45 20 56 4F 4C  4C 00 7D 75 8A 07 3B 00  |ETTE VOLL.}u..;.|
00001370: AB 75 94 07 53 43 48 52  45 49 42 37 20 A1 3B 20  |.u..SCHREIB7 .; |
00001380: 5A 57 45 49 54 45 53 20  DA 45 49 43 48 45 4E 20  |ZWEITES .EICHEN |
00001390: C4 49 52 4E 41 4D 45 20  48 4F 4C 45 4E 00 D0 75  |.IRNAME HOLEN..u|
000013A0: 9E 07 20 82 44 49 52 4E  41 4D 45 2B 31 3B 20 55  |.. .DIRNAME+1; U|
000013B0: 4E 44 20 5A 55 52 BD 43  4B 53 50 45 49 43 48 45  |ND ZUR.CKSPEICHE|
000013C0: 52 4E 00 D7 75 A8 07 20  A1 00 FC 75 B2 07 20 82  |RN..u.. ...u.. .|
000013D0: 44 49 52 4E 41 4D 45 3B  20 45 42 45 4E 53 4F 20  |DIRNAME; EBENSO |
000013E0: 45 52 53 54 45 53 20 DA  45 49 43 48 45 4E 00 02  |ERSTES .EICHEN..|
000013F0: 76 BC 07 3B 00 23 76 C6  07 20 81 42 55 46 46 45  |v..;.#v.. .BUFFE|
00001400: 52 3B 20 DA 45 49 47 45  52 20 41 55 46 20 C4 49  |R; .EIGER AUF .I|
00001410: 52 4E 41 4D 45 00 32 76  D0 07 20 A0 3B 20 52 45  |RNAME.2v.. .; RE|
00001420: 54 54 45 4E 00 41 76 DA  07 20 81 42 55 46 46 45  |TTEN.Av.. .BUFFE|
00001430: 52 2B 31 00 48 76 E4 07  20 A0 00 4E 76 EE 07 3B  |R+1.Hv.. ..Nv..;|
00001440: 00 5A 76 F8 07 20 97 50  52 49 4D 4D 00 77 76 02  |.Zv.. .PRIMM.wv.|
00001450: 08 20 2E 91 43 52 2C 22  2E 2E 2E 2E 20 C4 41 54  |. ..CR,".... .AT|
00001460: 45 49 20 9E 22 2C 45 4F  4D 00 8C 76 0C 08 20 A6  |EI .",EOM..v.. .|
00001470: 3B 20 C6 4C 41 47 20 4B  45 49 4E 20 43 52 00 B1  |; .LAG KEIN CR..|
00001480: 76 16 08 20 97 50 52 49  4E 54 4E 41 4D 45 3B 20  |v.. .PRINTNAME; |
00001490: C4 41 54 45 49 4E 41 4D  45 4E 20 41 55 53 47 45  |.ATEINAMEN AUSGE|
000014A0: 42 45 4E 00 BD 76 20 08  20 97 50 52 49 4D 4D 00  |BEN..v . .PRIMM.|
000014B0: DE 76 2A 08 20 2E 91 22  99 20 57 49 52 44 20 47  |.v*. ..". WIRD G|
000014C0: 45 53 43 48 52 49 45 42  45 4E 2E 22 2C 45 4F 4D  |ESCHRIEBEN.",EOM|
000014D0: 00 E4 76 34 08 3B 00 EA  76 3E 08 3B 00 08 77 48  |..v4.;..v>.;..wH|
000014E0: 08 20 97 46 49 4C 45 57  52 3B 20 C4 41 54 45 49  |. .FILEWR; .ATEI|
000014F0: 20 53 43 48 52 45 49 42  45 4E 00 2B 77 52 08 20  | SCHREIBEN.+wR. |
00001500: B5 53 43 48 52 45 49 42  38 3B 20 4B 45 49 4E 20  |.SCHREIB8; KEIN |
00001510: C6 45 48 4C 45 52 20 57  45 49 54 45 52 00 31 77  |.EHLER WEITER.1w|
00001520: 5C 08 3B 00 38 77 66 08  20 A1 00 4D 77 70 08 20  |\.;.8wf. ..Mwp. |
00001530: A1 3B 20 DA 45 49 47 45  52 20 48 4F 4C 45 4E 00  |.; .EIGER HOLEN.|
00001540: 73 77 7A 08 53 43 48 52  42 37 45 52 52 20 97 50  |swz.SCHRB7ERR .P|
00001550: 52 49 4D 4D 3B 20 C6 45  48 4C 45 52 20 41 55 53  |RIMM; .EHLER AUS|
00001560: 47 45 42 45 4E 00 AD 77  84 08 20 2E 91 43 52 2C  |GEBEN..w.. ..CR,|
00001570: 37 2C 22 91 9E C4 41 54  45 49 20 4B 41 4E 4E 20  |7,"...ATEI KANN |
00001580: 4E 49 43 48 54 20 47 45  53 43 48 52 49 45 42 45  |NICHT GESCHRIEBE|
00001590: 4E 20 57 45 52 44 45 4E  21 99 22 2C 45 4F 4D 00  |N WERDEN!.",EOM.|
000015A0: B4 77 8E 08 20 A7 00 BB  77 98 08 20 A4 00 C1 77  |.w.. ...w.. ...w|
000015B0: A2 08 3B 00 D0 77 AC 08  53 43 48 52 45 49 42 38  |..;..w..SCHREIB8|
000015C0: 20 A1 00 01 78 B6 08 20  82 42 55 46 46 45 52 2B  | ...x.. .BUFFER+|
000015D0: 31 3B 20 DA 45 49 47 45  52 20 41 55 46 20 CE 41  |1; .EIGER AUF .A|
000015E0: 4D 45 20 49 4E 20 C4 49  52 20 56 45 52 42 49 45  |ME IN .IR VERBIE|
000015F0: 47 45 4E 00 08 78 C0 08  20 A1 00 15 78 CA 08 20  |GEN..x.. ...x.. |
00001600: 82 42 55 46 46 45 52 00  1B 78 D4 08 3B 00 43 78  |.BUFFER..x..;.Cx|
00001610: DE 08 20 97 44 49 52 43  4F 50 59 53 44 3B 20 CE  |.. .DIRCOPYSD; .|
00001620: 41 4D 45 4E 20 49 4D 20  C4 49 52 20 53 50 45 49  |AMEN IM .IR SPEI|
00001630: 43 48 45 52 4E 00 5E 78  E8 08 20 A7 3B 20 C6 4C  |CHERN.^x.. .; .L|
00001640: 41 47 20 C4 49 52 20 53  43 48 52 45 49 42 45 4E  |AG .IR SCHREIBEN|
00001650: 00 88 78 F2 08 20 97 44  49 52 52 57 30 3B 20 C4  |..x.. .DIRRW0; .|
00001660: 49 52 20 53 43 48 52 45  49 42 45 4E 20 4F 48 4E  |IR SCHREIBEN OHN|
00001670: 45 20 49 4E 51 2D C4 49  53 4B 00 AF 78 FC 08 20  |E INQ-.ISK..x.. |
00001680: B6 53 43 48 52 42 37 45  52 52 3B 20 C6 45 48 4C  |.SCHRB7ERR; .EHL|
00001690: 45 52 20 42 45 49 4D 20  D3 43 48 52 45 49 42 45  |ER BEIM .CHREIBE|
000016A0: 4E 00 B6 78 06 09 20 A6  00 BD 78 10 09 20 A4 00  |N..x.. ...x.. ..|
000016B0: C3 78 1A 09 3B 00 C9 78  24 09 3B 00 CF 78 2E 09  |.x..;..x$.;..x..|
000016C0: 3B 00 D5 78 38 09 3B 00  DB 78 42 09 3B 00 29 79  |;..x8.;..xB.;.)y|
000016D0: 4C 09 3B 20 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |L.; ************|
000016E0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000016F0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00001700: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00001710: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 00 77 79 56 09  |***********.wyV.|
00001720: 3B 20 2A 20 20 20 20 20  20 20 20 20 20 20 20 20  |; *             |
00001730: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001740: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001750: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001760: 20 20 20 20 20 20 20 20  2A 00 C5 79 60 09 3B 20  |        *..y`.; |
00001770: 2A 20 20 20 20 20 20 20  C6 49 4C 45 4E 41 4D 45  |*       .ILENAME|
00001780: 4E 20 53 55 43 48 45 4E  20 55 4E 44 20 C4 41 54  |N SUCHEN UND .AT|
00001790: 45 49 20 41 55 46 20 CD  D3 2D C4 CF D3 20 4C BC  |EI AUF ..-... L.|
000017A0: 53 43 48 45 4E 20 20 20  20 20 20 20 20 20 20 20  |SCHEN           |
000017B0: 20 20 20 20 20 20 2A 00  13 7A 6A 09 3B 20 2A 20  |      *..zj.; * |
000017C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000017D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000017E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000017F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001800: 20 20 20 20 2A 00 61 7A  74 09 3B 20 2A 2A 2A 2A  |    *.azt.; ****|
00001810: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00001820: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00001830: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00001840: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00001850: 2A 2A 2A 00 67 7A 7E 09  3B 00 6D 7A 88 09 3B 00  |***.gz~.;.mz..;.|
00001860: 82 7A 92 09 4C BC 53 43  48 45 4E 20 97 49 4F 43  |.z..L.SCHEN .IOC|
00001870: 4C 4F 53 45 00 96 7A 9C  09 4C BC 53 43 48 45 4E  |LOSE..z..L.SCHEN|
00001880: 30 20 97 50 52 49 4D 4D  00 BA 7A A6 09 20 2E 91  |0 .PRIMM..z.. ..|
00001890: 43 52 2C 22 0E 02 9E C4  41 54 45 49 20 4C BC 53  |CR,"....ATEI L.S|
000018A0: 43 48 45 4E 22 2C 43 52  2C 45 4F 4D 00 DE 7A B0  |CHEN",CR,EOM..z.|
000018B0: 09 20 97 52 45 41 44 4E  41 4D 45 3B 20 C4 41 54  |. .READNAME; .AT|
000018C0: 45 49 4E 41 4D 45 4E 20  45 49 4E 4C 45 53 45 4E  |EINAMEN EINLESEN|
000018D0: 00 ED 7A BA 09 20 B6 4C  BC 53 43 48 45 52 52 00  |..z.. .L.SCHERR.|
000018E0: 13 7B C4 09 20 97 52 45  41 44 4E 41 4D 45 42 3B  |.{.. .READNAMEB;|
000018F0: 20 C4 41 54 45 49 4E 41  4D 45 4E 20 41 55 53 57  | .ATEINAMEN AUSW|
00001900: 45 52 54 45 4E 00 22 7B  CE 09 20 B6 4C BC 53 43  |ERTEN."{.. .L.SC|
00001910: 48 45 52 52 00 28 7B D8  09 3B 00 41 7B E2 09 4C  |HERR.({..;.A{..L|
00001920: BC 53 43 48 45 4E 54 52  20 97 53 45 41 52 43 48  |.SCHENTR .SEARCH|
00001930: 4D 53 47 00 47 7B EC 09  3B 00 58 7B F6 09 20 97  |MSG.G{..;.X{.. .|
00001940: 53 45 41 52 43 48 4E 41  4D 45 00 77 7B 00 0A 20  |SEARCHNAME.w{.. |
00001950: B5 4C BC 53 43 48 45 4E  32 3B 20 C4 41 54 45 49  |.L.SCHEN2; .ATEI|
00001960: 20 47 45 46 55 4E 44 45  4E 00 7D 7B 0A 0A 3B 00  | GEFUNDEN.}{..;.|
00001970: 89 7B 14 0A 20 97 50 52  49 4D 4D 00 B3 7B 1E 0A  |.{.. .PRIMM..{..|
00001980: 20 2E 91 43 52 2C 37 2C  22 9E A0 C4 41 54 45 49  | ..CR,7,"...ATEI|
00001990: 20 4E 49 43 48 54 20 47  45 46 55 4E 44 45 4E 99  | NICHT GEFUNDEN.|
000019A0: 22 2C 45 4F 4D 00 C2 7B  28 0A 4C BC 53 43 48 45  |",EOM..{(.L.SCHE|
000019B0: 52 52 20 A7 00 C9 7B 32  0A 20 A4 00 CF 7B 3C 0A  |RR ...{2. ...{<.|
000019C0: 3B 00 E7 7B 46 0A 4C BC  53 43 48 45 4E 32 20 97  |;..{F.L.SCHEN2 .|
000019D0: 44 49 52 43 4F 50 59 44  53 00 FC 7B 50 0A 20 81  |DIRCOPYDS..{P. .|
000019E0: 23 43 52 3B 20 CC 45 45  52 5A 45 49 4C 45 00 08  |#CR; .EERZEILE..|
000019F0: 7C 5A 0A 20 97 42 53 4F  55 54 00 0F 7C 64 0A 20  ||Z. .BSOUT..|d. |
00001A00: A6 00 28 7C 6E 0A 20 97  50 52 49 4E 54 4E 41 4D  |..(|n. .PRINTNAM|
00001A10: 45 3B 20 4F 48 4E 45 20  43 52 00 34 7C 78 0A 20  |E; OHNE CR.4|x. |
00001A20: 97 50 52 49 4D 4D 00 58  7C 82 0A 20 2E 91 22 99  |.PRIMM.X|.. ..".|
00001A30: 20 57 49 52 4B 4C 49 43  48 20 4C BC 53 43 48 45  | WIRKLICH L.SCHE|
00001A40: 4E 3F 20 20 9E 22 2C 45  4F 4D 00 7A 7C 8C 0A 20  |N?  .",EOM.z|.. |
00001A50: 97 42 41 53 49 4E 3B 20  DA 45 49 43 48 45 4E 20  |.BASIN; .EICHEN |
00001A60: 56 4F 4E 20 D4 41 53 54  41 54 55 52 00 85 7C 96  |VON .ASTATUR..|.|
00001A70: 0A 20 85 23 22 4A 22 00  A3 7C A0 0A 20 B7 4C BC  |. .#"J"..|.. .L.|
00001A80: 53 43 48 45 52 52 3B 20  4E 49 43 48 54 20 4C BC  |SCHERR; NICHT L.|
00001A90: 53 43 48 45 4E 00 AF 7C  AA 0A 20 97 50 52 49 4D  |SCHEN..|.. .PRIM|
00001AA0: 4D 00 C8 7C B4 0A 20 2E  91 43 52 2C 22 99 C4 41  |M..|.. ..CR,"..A|
00001AB0: 54 45 49 20 9E 22 2C 45  4F 4D 00 CF 7C BE 0A 20  |TEI .",EOM..|.. |
00001AC0: A6 00 ED 7C C8 0A 20 97  50 52 49 4E 54 4E 41 4D  |...|.. .PRINTNAM|
00001AD0: 45 3B 20 CE 41 4D 45 20  4F 48 4E 45 20 43 52 00  |E; .AME OHNE CR.|
00001AE0: F9 7C D2 0A 20 97 50 52  49 4D 4D 00 16 7D DC 0A  |.|.. .PRIMM..}..|
00001AF0: 20 2E 91 22 99 20 57 49  52 44 20 47 45 4C BC 53  | ..". WIRD GEL.S|
00001B00: 43 48 54 22 2C 45 4F 4D  00 1C 7D E6 0A 3B 00 40  |CHT",EOM..}..;.@|
00001B10: 7D F0 0A 20 81 42 55 46  46 45 52 3B 20 DA 45 49  |}.. .BUFFER; .EI|
00001B20: 47 45 52 20 41 55 46 20  C4 41 54 45 49 4E 41 4D  |GER AUF .ATEINAM|
00001B30: 45 4E 00 4F 7D FA 0A 20  A0 3B 20 52 45 54 54 45  |EN.O}.. .; RETTE|
00001B40: 4E 00 7A 7D 04 0B 20 81  42 55 46 46 45 52 2B 31  |N.z}.. .BUFFER+1|
00001B50: 3B 20 48 49 2D C2 59 54  45 20 44 45 53 20 DA 45  |; HI-.YTE DES .E|
00001B60: 49 47 45 52 53 20 52 45  54 54 45 4E 00 93 7D 0E  |IGERS RETTEN..}.|
00001B70: 0B 20 A0 3B 20 45 42 45  4E 46 41 4C 4C 53 20 52  |. .; EBENFALLS R|
00001B80: 45 54 54 45 4E 00 99 7D  18 0B 3B 00 AC 7D 22 0B  |ETTEN..}..;..}".|
00001B90: 20 A6 3B 20 C6 4C 41 47  20 4C 45 53 45 4E 00 C9  | .; .LAG LESEN..|
00001BA0: 7D 2C 0B 20 97 46 41 54  52 44 57 52 30 3B 20 C6  |},. .FATRDWR0; .|
00001BB0: C1 D4 20 45 49 4E 4C 45  53 45 4E 00 CF 7D 36 0B  |.. EINLESEN..}6.|
00001BC0: 3B 00 FC 7D 40 0B 4C BC  53 43 48 45 4E 33 20 81  |;..}@.L.SCHEN3 .|
00001BD0: 44 49 52 43 4C 55 53 54  45 52 3B 20 4C 4F 20 2D  |DIRCLUSTER; LO -|
00001BE0: 20 43 4C 55 53 54 45 52  20 4C 41 44 45 4E 00 0F  | CLUSTER LADEN..|
00001BF0: 7E 4A 0B 20 A0 3B 20 4C  4F 20 53 49 43 48 45 52  |~J. .; LO SICHER|
00001C00: 4E 00 16 7E 54 0B 20 9B  00 3B 7E 5E 0B 20 81 44  |N..~T. ..;~^. .D|
00001C10: 49 52 43 4C 55 53 54 45  52 2B 31 3B 20 48 49 2D  |IRCLUSTER+1; HI-|
00001C20: 43 4C 55 53 54 45 52 20  4C 41 44 45 4E 00 4E 7E  |CLUSTER LADEN.N~|
00001C30: 68 0B 20 A0 3B 20 48 49  20 53 49 43 48 45 52 4E  |h. .; HI SICHERN|
00001C40: 00 5F 7E 72 0B 20 99 3B  20 48 49 20 49 4E 20 58  |._~r. .; HI IN X|
00001C50: 52 00 66 7E 7C 0B 20 9A  00 87 7E 86 0B 20 96 4C  |R.f~|. ...~.. .L|
00001C60: BC 53 43 48 45 4E 35 3B  20 53 4E 20 41 55 53 20  |.SCHEN5; SN AUS |
00001C70: 46 41 54 20 48 4F 4C 45  4E 00 8D 7E 90 0B 3B 00  |FAT HOLEN..~..;.|
00001C80: AD 7E 9A 0B 4C BC 53 43  48 45 4E 34 20 81 53 4E  |.~..L.SCHEN4 .SN|
00001C90: 4C 4F 4E 45 57 3B 20 4C  4F 20 4C 41 44 45 4E 00  |LONEW; LO LADEN.|
00001CA0: C0 7E A4 0B 20 A0 3B 20  4C 4F 20 53 49 43 48 45  |.~.. .; LO SICHE|
00001CB0: 52 4E 00 C7 7E AE 0B 20  9B 00 DF 7E B8 0B 20 81  |RN..~.. ...~.. .|
00001CC0: 53 4E 48 49 4E 45 57 3B  20 48 49 20 4C 41 44 45  |SNHINEW; HI LADE|
00001CD0: 4E 00 F2 7E C2 0B 20 A0  3B 20 48 49 20 53 49 43  |N..~.. .; HI SIC|
00001CE0: 48 45 52 4E 00 05 7F CC  0B 20 99 3B 20 48 49 20  |HERN..... .; HI |
00001CF0: 4E 41 43 48 20 58 52 00  0C 7F D6 0B 20 9A 00 48  |NACH XR..... ..H|
00001D00: 7F E0 0B 4C BC 53 43 48  45 4E 35 20 97 47 45 54  |...L.SCHEN5 .GET|
00001D10: 53 4E 3B 20 53 4E 20 42  45 49 20 41 2C 58 2D 52  |SN; SN BEI A,X-R|
00001D20: 45 47 20 41 55 53 20 C6  41 54 20 4E 41 43 48 20  |EG AUS .AT NACH |
00001D30: 53 4E 4C 4F 2F 48 49 4E  45 57 00 59 7F EA 0B 20  |SNLO/HINEW.Y... |
00001D40: A1 3B 20 48 49 20 48 4F  4C 45 4E 00 6B 7F F4 0B  |.; HI HOLEN.k...|
00001D50: 20 99 3B 20 55 4E 44 20  49 4E 20 58 52 00 7C 7F  | .; UND IN XR.|.|
00001D60: FE 0B 20 A1 3B 20 4C 4F  20 48 4F 4C 45 4E 00 82  |.. .; LO HOLEN..|
00001D70: 7F 08 0C 3B 00 99 7F 12  0C 20 82 53 4E 4C 4F 3B  |...;..... .SNLO;|
00001D80: 20 55 4D 4B 4F 50 49 45  52 45 4E 00 A4 7F 1C 0C  | UMKOPIEREN.....|
00001D90: 20 88 53 4E 48 49 00 AA  7F 26 0C 3B 00 C7 7F 30  | .SNHI...&.;...0|
00001DA0: 0C 20 8F 53 4E 48 49 3B  20 50 52 BD 46 45 4E 20  |. .SNHI; PR.FEN |
00001DB0: 41 55 46 20 53 4E 20 3D  30 00 E3 7F 3A 0C 20 B7  |AUF SN =0...:. .|
00001DC0: 4C BC 53 43 48 45 4E 35  42 3B 20 55 4E 47 4C 45  |L.SCHEN5B; UNGLE|
00001DD0: 49 43 48 20 30 00 E9 7F  44 0C 3B 00 0F 80 4E 0C  |ICH 0...D.;...N.|
00001DE0: 20 A1 3B 20 DA 45 49 47  45 52 20 41 55 46 20 C4  | .; .EIGER AUF .|
00001DF0: 49 52 4E 41 4D 45 4E 20  56 45 52 57 45 52 46 45  |IRNAMEN VERWERFE|
00001E00: 4E 00 17 80 58 0C 20 A1  3B 00 1D 80 62 0C 3B 00  |N...X. .;...b.;.|
00001E10: 41 80 6C 0C 20 97 50 52  49 4D 4D 3B 20 C6 45 48  |A.l. .PRIMM; .EH|
00001E20: 4C 45 52 4D 45 4C 44 55  4E 47 20 41 55 53 47 45  |LERMELDUNG AUSGE|
00001E30: 42 45 4E 00 6F 80 76 0C  20 2E 91 37 2C 43 52 2C  |BEN.o.v. ..7,CR,|
00001E40: 22 9E C6 45 48 4C 45 52  20 49 4E 20 C3 4C 55 53  |"..EHLER IN .LUS|
00001E50: 54 45 52 4B 45 54 54 45  99 22 2C 43 52 2C 45 4F  |TERKETTE.",CR,EO|
00001E60: 4D 00 76 80 80 0C 20 A7  00 7D 80 8A 0C 20 A4 00  |M.v... ..}... ..|
00001E70: 83 80 94 0C 3B 00 95 80  9E 0C 4C BC 53 43 48 45  |....;.....L.SCHE|
00001E80: 4E 35 42 20 81 23 30 00  A3 80 A8 0C 20 82 43 4C  |N5B .#0..... .CL|
00001E90: 55 53 54 45 52 00 CE 80  B2 0C 20 82 43 4C 55 53  |USTER..... .CLUS|
00001EA0: 54 45 52 2B 31 3B 20 43  4C 55 53 54 45 52 56 45  |TER+1; CLUSTERVE|
00001EB0: 52 4B 45 54 54 55 4E 47  20 4C BC 53 43 48 45 4E  |RKETTUNG L.SCHEN|
00001EC0: 00 08 81 BC 0C 20 97 53  54 4F 52 45 53 4E 30 3B  |..... .STORESN0;|
00001ED0: 20 41 4C 54 45 20 43 4C  55 53 54 45 52 4E 55 4D  | ALTE CLUSTERNUM|
00001EE0: 4D 45 52 20 4D 49 54 20  24 30 30 30 20 BD 42 45  |MER MIT $000 .BE|
00001EF0: 52 53 43 48 52 45 49 42  45 4E 00 16 81 C6 0C 20  |RSCHREIBEN..... |
00001F00: 81 53 4E 48 49 4E 45 57  00 4E 81 D0 0C 20 85 4D  |.SNHINEW.N... .M|
00001F10: 41 58 53 4E 2B 31 3B 20  C1 42 46 52 41 47 45 20  |AXSN+1; .BFRAGE |
00001F20: 4F 42 20 4E 45 55 45 20  53 4E 20 3E 20 24 46 46  |OB NEUE SN > $FF|
00001F30: 38 20 42 5A 57 2E 20 4D  41 58 53 4E 20 49 53 54  |8 BZW. MAXSN IST|
00001F40: 00 8A 81 DA 0C 20 B5 4C  BC 53 43 48 45 4E 34 3B  |..... .L.SCHEN4;|
00001F50: 20 57 45 4E 4E 20 4E 49  43 48 54 2C 20 44 41 4E  | WENN NICHT, DAN|
00001F60: 4E 20 4E BB 43 48 53 54  45 20 D6 45 52 4B 45 54  |N N.CHSTE .ERKET|
00001F70: 54 55 4E 47 20 4C BC 53  43 48 45 4E 00 98 81 E4  |TUNG L.SCHEN....|
00001F80: 0C 20 81 53 4E 4C 4F 4E  45 57 00 D1 81 EE 0C 20  |. .SNLONEW..... |
00001F90: 85 4D 41 58 53 4E 3B 20  44 54 4F 2E 20 4C 4F 2E  |.MAXSN; DTO. LO.|
00001FA0: 20 20 CD 41 58 53 4E 20  49 53 54 20 44 49 45 20  |  .AXSN IST DIE |
00001FB0: 48 BC 43 48 53 54 45 20  4D BC 47 4C 49 43 48 45  |H.CHSTE M.GLICHE|
00001FC0: 20 53 4E 00 0F 82 F8 0C  3B 20 20 20 20 20 20 20  | SN.....;       |
00001FD0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001FE0: 20 20 20 20 33 35 36 20  42 45 49 20 31 35 37 31  |    356 BEI 1571|
00001FF0: 20 55 4E 44 20 37 31 35  20 42 45 49 20 31 35 38  | UND 715 BEI 158|
00002000: 31 00 1E 82 02 0D 20 B5  4C BC 53 43 48 45 4E 34  |1..... .L.SCHEN4|
00002010: 00 24 82 0C 0D 3B 00 4D  82 16 0D 20 A1 3B 20 DA  |.$...;.M... .; .|
00002020: 45 49 47 45 52 20 41 55  46 20 C4 49 52 4E 41 4D  |EIGER AUF .IRNAM|
00002030: 45 4E 20 5A 55 52 BD 43  4B 42 49 45 47 45 4E 00  |EN ZUR.CKBIEGEN.|
00002040: 65 82 20 0D 20 82 42 55  46 46 45 52 2B 31 3B 20  |e. . .BUFFER+1; |
00002050: C8 49 2D C2 59 54 45 00  6C 82 2A 0D 20 A1 00 82  |.I-.YTE.l.*. ...|
00002060: 82 34 0D 20 82 42 55 46  46 45 52 3B 20 CC 4F 2D  |.4. .BUFFER; .O-|
00002070: C2 59 54 45 00 88 82 3E  0D 3B 00 9B 82 48 0D 4C  |.YTE...>.;...H.L|
00002080: BC 53 43 48 45 4E 36 20  81 23 24 45 35 00 CA 82  |.SCHEN6 .#$E5...|
00002090: 52 0D 20 82 44 49 52 4E  41 4D 45 3B 20 C4 41 54  |R. .DIRNAME; .AT|
000020A0: 45 49 20 41 4C 53 20 47  45 4C BC 53 43 48 54 20  |EI ALS GEL.SCHT |
000020B0: 4B 45 4E 4E 5A 45 49 43  48 4E 45 4E 00 02 83 5C  |KENNZEICHNEN...\|
000020C0: 0D 20 97 44 49 52 43 4F  50 59 53 44 3B 20 C4 41  |. .DIRCOPYSD; .A|
000020D0: 54 45 49 4E 41 4D 45 4E  20 56 4F 4D 20 D0 55 46  |TEINAMEN VOM .UF|
000020E0: 46 45 52 20 49 4E 20 C6  41 54 20 53 43 48 52 45  |FER IN .AT SCHRE|
000020F0: 49 42 45 4E 00 09 83 66  0D 20 A7 00 42 83 70 0D  |IBEN...f. ..B.p.|
00002100: 20 97 44 49 52 52 57 30  3B 20 C9 4E 48 41 4C 54  | .DIRRW0; .NHALT|
00002110: 53 56 45 52 5A 45 49 43  48 4E 49 53 20 53 50 45  |SVERZEICHNIS SPE|
00002120: 49 43 48 45 52 4E 20 4F  48 4E 45 20 49 4E 51 2D  |ICHERN OHNE INQ-|
00002130: C4 49 53 4B 00 51 83 7A  0D 20 B5 4C BC 53 43 48  |.ISK.Q.z. .L.SCH|
00002140: 45 4E 37 00 70 83 84 0D  20 A4 3B 20 42 45 49 20  |EN7.p... .; BEI |
00002150: C6 45 48 4C 45 52 20 52  54 53 20 4D 49 54 20 53  |.EHLER RTS MIT S|
00002160: 45 43 00 76 83 8E 0D 3B  00 85 83 98 0D 4C BC 53  |EC.v...;.....L.S|
00002170: 43 48 45 4E 37 20 A7 00  B1 83 A2 0D 20 96 46 41  |CHEN7 ...... .FA|
00002180: 54 52 44 57 52 30 3B 20  C6 41 54 20 53 50 45 49  |TRDWR0; .AT SPEI|
00002190: 43 48 45 52 4E 20 4F 48  4E 45 20 49 4E 51 2D C4  |CHERN OHNE INQ-.|
000021A0: 49 53 4B 00 B7 83 AC 0D  3B 00 BD 83 B6 0D 3B 00  |ISK.....;.....;.|
000021B0: C3 83 C0 0D 3B 00 11 84  CA 0D 3B 20 2A 2A 2A 2A  |....;.....; ****|
000021C0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000021D0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000021E0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000021F0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00002200: 2A 2A 2A 00 5F 84 D4 0D  3B 20 2A 20 20 20 20 20  |***._...; *     |
00002210: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002220: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002230: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002240: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002250: 2A 00 AD 84 DE 0D 3B 20  2A 20 20 20 20 20 20 20  |*.....; *       |
00002260: C9 4E 48 41 4C 54 53 56  45 52 5A 45 49 43 48 4E  |.NHALTSVERZEICHN|
00002270: 49 53 20 41 55 46 20 44  45 4D 20 41 4B 54 55 45  |IS AUF DEM AKTUE|
00002280: 4C 4C 45 4E 20 CB 41 4E  41 4C 20 41 55 53 47 45  |LLEN .ANAL AUSGE|
00002290: 42 45 4E 20 20 20 20 20  20 20 20 20 20 20 2A 00  |BEN           *.|
000022A0: FB 84 E8 0D 3B 20 2A 20  20 20 20 20 20 20 20 20  |....; *         |
000022B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000022C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000022D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000022E0: 20 20 20 20 20 20 20 20  20 20 20 20 2A 00 49 85  |            *.I.|
000022F0: F2 0D 3B 20 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |..; ************|
00002300: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00002310: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00002320: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00002330: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 00 4F 85 FC 0D  |***********.O...|
00002340: 3B 00 55 85 06 0E 3B 00  5B 85 10 0E 3B 00 61 85  |;.U...;.[...;.a.|
00002350: 1A 0E 3B 00 80 85 24 0E  44 49 52 20 97 49 4F 43  |..;...$.DIR .IOC|
00002360: 4C 4F 53 45 3B 20 D3 54  41 4E 44 41 52 54 20 C9  |LOSE; .TANDART .|
00002370: 2F CF 00 90 85 2E 0E 44  49 52 30 20 97 50 52 49  |/......DIR0 .PRI|
00002380: 4D 4D 00 B2 85 38 0E 20  2E 91 43 52 2C 22 0E 9E  |MM...8. ..CR,"..|
00002390: C4 49 52 45 43 54 4F 52  59 20 3A 99 22 2C 43 52  |.IRECTORY :.",CR|
000023A0: 2C 45 4F 4D 00 B8 85 42  0E 3B 00 C3 85 4C 0E 20  |,EOM...B.;...L. |
000023B0: 83 23 24 30 31 00 EB 85  56 0E 20 88 49 4E 51 53  |.#$01...V. .INQS|
000023C0: 54 41 54 3B 20 C6 4C 41  47 20 C4 49 53 4B 20 49  |TAT; .LAG .ISK I|
000023D0: 4E 49 54 49 41 4C 49 53  49 45 52 45 4E 00 06 86  |NITIALISIEREN...|
000023E0: 60 0E 20 AF 3B 20 58 52  20 3D 20 30 20 3B A0 C4  |`. .; XR = 0 ;..|
000023F0: 49 52 54 45 49 4C 20 31  00 34 86 6A 0E 44 49 52  |IRTEIL 1.4.j.DIR|
00002400: 31 20 88 44 49 52 46 4C  41 47 3B 20 46 BD 52 20  |1 .DIRFLAG; F.R |
00002410: C4 49 52 54 45 49 4C 20  31 2C 20 32 2C 20 33 20  |.IRTEIL 1, 2, 3 |
00002420: 4F 44 45 52 20 34 00 3B  86 74 0E 20 A6 00 6C 86  |ODER 4.;.t. ..l.|
00002430: 7E 0E 20 97 44 49 52 52  57 30 3B 20 C4 49 52 20  |~. .DIRRW0; .IR |
00002440: 4C 45 53 45 4E 3B 20 4E  55 52 20 42 45 49 4D 20  |LESEN; NUR BEIM |
00002450: 31 2E CD 41 4C 20 49 4E  51 2D C4 49 53 4B 00 88  |1..AL INQ-.ISK..|
00002460: 86 88 0E 20 B5 44 49 52  32 3B 20 4B 45 49 4E 20  |... .DIR2; KEIN |
00002470: CC 45 53 45 46 45 48 4C  45 52 00 A5 86 92 0E 20  |.ESEFEHLER..... |
00002480: 96 44 49 52 45 52 52 3B  20 42 45 49 20 CC 45 53  |.DIRERR; BEI .ES|
00002490: 45 46 45 48 4C 45 52 00  AB 86 9C 0E 3B 00 CD 86  |EFEHLER.....;...|
000024A0: A6 0E 44 49 52 32 20 97  44 49 52 50 4E 54 52 3B  |..DIR2 .DIRPNTR;|
000024B0: 20 DA 45 49 47 45 52 20  52 49 43 48 54 45 4E 00  | .EIGER RICHTEN.|
000024C0: ED 86 B0 0E 20 84 44 49  52 46 4C 41 47 3B A0 C6  |.... .DIRFLAG;..|
000024D0: 4C 41 47 20 46 BD 52 20  C4 49 52 54 45 49 4C 00  |LAG F.R .IRTEIL.|
000024E0: 15 87 BA 0E 20 81 44 49  52 49 4E 46 4F 5F 41 4E  |.... .DIRINFO_AN|
000024F0: 2C 59 3B 20 C1 4E 5A 41  48 4C 20 44 45 52 20 D3  |,Y; .NZAHL DER .|
00002500: 45 4B 54 4F 52 45 4E 00  3E 87 C4 0E 20 8C 3B 20  |EKTOREN.>... .; |
00002510: 2A 32 20 4E 45 48 4D 45  4E 2C 20 44 41 20 31 20  |*2 NEHMEN, DA 1 |
00002520: D3 45 4B 54 4F 52 20 3D  20 32 20 D0 41 47 45 53  |.EKTOR = 2 .AGES|
00002530: 00 5D 87 CE 0E 20 99 3B  20 D0 41 47 45 53 20 49  |.]... .; .AGES I|
00002540: 4E 20 58 52 20 41 4C 53  20 DA BB 48 4C 45 52 00  |N XR ALS ..HLER.|
00002550: 63 87 D8 0E 3B 00 69 87  E2 0E 3B 00 7E 87 EC 0E  |c...;.i...;.~...|
00002560: 44 49 52 33 20 84 23 30  3B 20 CF 46 46 53 45 54  |DIR3 .#0; .FFSET|
00002570: 00 A1 87 F6 0E 20 81 28  42 55 46 46 45 52 29 2C  |..... .(BUFFER),|
00002580: 59 3B 20 C1 4E 46 41 4E  47 53 42 55 43 48 53 54  |Y; .NFANGSBUCHST|
00002590: 41 42 45 00 C8 87 00 0F  20 B7 44 49 52 33 42 3B  |ABE..... .DIR3B;|
000025A0: 20 4E 4F 43 48 20 45 49  4E 45 20 C4 41 54 45 49  | NOCH EINE .ATEI|
000025B0: 20 56 4F 52 48 41 4E 44  45 4E 00 F1 87 0A 0F 20  | VORHANDEN..... |
000025C0: 96 44 49 52 45 4E 44 3B  20 4B 45 49 4E 45 20 C4  |.DIREND; KEINE .|
000025D0: 41 54 45 49 20 4D 45 48  52 20 56 4F 52 48 41 4E  |ATEI MEHR VORHAN|
000025E0: 44 45 4E 00 F7 87 14 0F  3B 00 18 88 1E 0F 44 49  |DEN.....;.....DI|
000025F0: 52 33 42 20 85 23 24 45  35 3B 20 C4 41 54 45 49  |R3B .#$E5; .ATEI|
00002600: 20 47 45 4C BC 53 43 48  54 3F 00 35 88 28 0F 20  | GEL.SCHT?.5.(. |
00002610: B7 44 49 52 34 3B 20 4E  45 49 4E 20 2D 3E 20 41  |.DIR4; NEIN -> A|
00002620: 55 53 47 45 42 45 4E 00  5E 88 32 0F 20 96 44 49  |USGEBEN.^.2. .DI|
00002630: 52 38 41 41 3B 20 4E BB  43 48 53 54 45 20 C4 41  |R8AA; N.CHSTE .A|
00002640: 54 45 49 2C 20 44 41 20  47 45 4C BC 53 43 48 54  |TEI, DA GEL.SCHT|
00002650: 00 64 88 3C 0F 3B 00 79  88 46 0F 44 49 52 34 20  |.d.<.;.y.F.DIR4 |
00002660: 81 28 42 55 46 46 45 52  29 2C 59 00 99 88 50 0F  |.(BUFFER),Y...P.|
00002670: 20 87 23 31 32 37 3B 20  4E 55 52 20 CB 4C 45 49  | .#127; NUR .LEI|
00002680: 4E 42 55 43 48 53 54 41  42 45 4E 00 B4 88 5A 0F  |NBUCHSTABEN...Z.|
00002690: 20 97 42 53 4F 55 54 3B  20 CE 41 4D 45 20 41 55  | .BSOUT; .AME AU|
000026A0: 53 47 45 42 45 4E 00 BB  88 64 0F 20 9E 00 C4 88  |SGEBEN...d. ....|
000026B0: 6E 0F 20 93 23 38 00 E8  88 78 0F 20 B7 44 49 52  |n. .#8...x. .DIR|
000026C0: 34 3B 20 4E 4F 43 48 20  4E 49 43 48 54 20 41 4C  |4; NOCH NICHT AL|
000026D0: 4C 45 20 DA 45 49 43 48  45 4E 00 EE 88 82 0F 3B  |LE .EICHEN.....;|
000026E0: 00 F4 88 8C 0F 3B 00 0A  89 96 0F 44 49 52 35 20  |.....;.....DIR5 |
000026F0: 81 23 22 2E 22 3B 20 D0  55 4E 4B 54 00 16 89 A0  |.#"."; .UNKT....|
00002700: 0F 20 97 42 53 4F 55 54  00 1C 89 AA 0F 3B 00 32  |. .BSOUT.....;.2|
00002710: 89 B4 0F 44 49 52 35 42  20 81 28 42 55 46 46 45  |...DIR5B .(BUFFE|
00002720: 52 29 2C 59 00 3E 89 BE  0F 20 97 42 53 4F 55 54  |R),Y.>... .BSOUT|
00002730: 00 45 89 C8 0F 20 9E 00  69 89 D2 0F 20 93 23 31  |.E... ..i... .#1|
00002740: 31 3B 20 41 4C 4C 45 20  DA 45 49 43 48 45 4E 20  |1; ALLE .EICHEN |
00002750: 41 55 53 47 45 47 45 42  45 4E 3F 00 75 89 DC 0F  |AUSGEGEBEN?.u...|
00002760: 20 B7 44 49 52 35 42 00  7B 89 E6 0F 3B 00 87 89  | .DIR5B.{...;...|
00002770: F0 0F 20 97 50 52 49 4D  4D 00 98 89 FA 0F 20 2E  |.. .PRIMM..... .|
00002780: 91 22 20 20 20 22 2C 45  4F 4D 00 9E 89 04 10 3B  |."   ",EOM.....;|
00002790: 00 D0 89 0E 10 44 49 52  36 20 81 28 42 55 46 46  |.....DIR6 .(BUFF|
000027A0: 45 52 29 2C 59 3B 20 31  31 2E 20 C2 59 54 45 20  |ER),Y; 11. .YTE |
000027B0: 4C 41 44 45 4E 20 28 D3  54 41 54 55 53 42 59 54  |LADEN (.TATUSBYT|
000027C0: 45 29 00 F7 89 18 10 20  87 23 25 30 30 30 31 31  |E)..... .#%00011|
000027D0: 30 30 30 3B 20 C6 4C 41  47 20 46 BD 52 20 D6 45  |000; .LAG F.R .E|
000027E0: 52 5A 45 49 43 48 4E 49  53 00 1D 8A 22 10 20 B8  |RZEICHNIS...". .|
000027F0: 44 49 52 36 42 3B 20 57  45 4E 4E 20 4B 45 49 4E  |DIR6B; WENN KEIN|
00002800: 20 D6 45 52 5A 45 49 43  48 4E 49 53 20 2D 3E 00  | .ERZEICHNIS ->.|
00002810: 23 8A 2C 10 3B 00 48 8A  36 10 20 87 23 25 30 30  |#.,.;.H.6. .#%00|
00002820: 30 31 30 30 30 30 3B 20  D5 4E 54 45 52 56 45 52  |010000; .NTERVER|
00002830: 5A 45 49 43 48 4E 49 53  20 3F 00 7B 8A 40 10 20  |ZEICHNIS ?.{.@. |
00002840: B8 44 49 52 36 41 3B 20  4B 45 49 4E 20 D5 4E 54  |.DIR6A; KEIN .NT|
00002850: 45 52 2D 2C 20 53 4F 4E  44 45 52 4E 20 C8 41 55  |ER-, SONDERN .AU|
00002860: 50 54 56 45 52 5A 45 49  43 48 4E 49 53 00 81 8A  |PTVERZEICHNIS...|
00002870: 4A 10 3B 00 9F 8A 54 10  20 97 50 52 49 4D 4D 3B  |J.;...T. .PRIMM;|
00002880: 20 D5 4E 54 45 52 56 45  52 5A 45 49 43 48 4E 49  | .NTERVERZEICHNI|
00002890: 53 00 B2 8A 5E 10 20 2E  91 22 3C 44 49 52 3E 22  |S...^. .."<DIR>"|
000028A0: 2C 45 4F 4D 00 CF 8A 68  10 20 96 44 49 52 38 3B  |,EOM...h. .DIR8;|
000028B0: 20 4E BB 43 48 53 54 45  52 20 C5 49 4E 54 52 41  | N.CHSTER .INTRA|
000028C0: 47 00 D5 8A 72 10 3B 00  F8 8A 7C 10 44 49 52 36  |G...r.;...|.DIR6|
000028D0: 41 20 97 50 52 49 4D 4D  3B 20 C8 41 55 50 54 56  |A .PRIMM; .AUPTV|
000028E0: 45 52 5A 45 49 43 48 4E  49 53 00 0B 8B 86 10 20  |ERZEICHNIS..... |
000028F0: 2E 91 22 3C CC 41 42 3E  22 2C 45 4F 4D 00 28 8B  |.."<.AB>",EOM.(.|
00002900: 90 10 20 96 44 49 52 38  3B 20 4E BB 43 48 53 54  |.. .DIR8; N.CHST|
00002910: 45 52 20 C5 49 4E 54 52  41 47 00 2E 8B 9A 10 3B  |ER .INTRAG.....;|
00002920: 00 34 8B A4 10 3B 00 45  8B AE 10 44 49 52 36 42  |.4...;.E...DIR6B|
00002930: 20 97 50 52 49 4D 4D 00  56 8B B8 10 20 2E 91 22  | .PRIMM.V... .."|
00002940: 28 20 24 22 2C 45 4F 4D  00 60 8B C2 10 20 84 23  |( $",EOM.`... .#|
00002950: 33 31 00 71 8B CC 10 20  81 28 42 55 46 46 45 52  |31.q... .(BUFFER|
00002960: 29 2C 59 00 78 8B D6 10  20 A3 00 99 8B E0 10 20  |),Y.x... ...... |
00002970: 8F 28 42 55 46 46 45 52  29 2C 59 3B 20 C8 49 2D  |.(BUFFER),Y; .I-|
00002980: D7 4F 52 54 20 49 53 54  20 3D 30 00 B3 8B EA 10  |.ORT IST =0.....|
00002990: 20 B8 44 49 52 37 3B 20  4A 41 20 2D 3E 20 53 50  | .DIR7; JA -> SP|
000029A0: 52 49 4E 47 45 00 B9 8B  F4 10 3B 00 C5 8B FE 10  |RINGE.....;.....|
000029B0: 20 97 50 52 49 4D 4D 00  D9 8B 08 11 20 2E 91 22  | .PRIMM..... .."|
000029C0: 2D 2D 2D 2D 20 29 22 2C  45 4F 4D 00 F6 8B 12 11  |---- )",EOM.....|
000029D0: 20 96 44 49 52 38 3B 20  4E BB 43 48 53 54 45 4E  | .DIR8; N.CHSTEN|
000029E0: 20 C5 49 4E 54 52 41 47  00 FC 8B 1C 11 3B 00 0D  | .INTRAG.....;..|
000029F0: 8C 26 11 44 49 52 37 20  A3 3B 20 59 3D 32 39 00  |.&.DIR7 .; Y=29.|
00002A00: 14 8C 30 11 20 98 00 2E  8C 3A 11 20 A0 3B 20 58  |..0. ....:. .; X|
00002A10: 2D D2 45 47 49 53 54 45  52 20 52 45 54 54 45 4E  |-.EGISTER RETTEN|
00002A20: 00 52 8C 44 11 20 81 28  42 55 46 46 45 52 29 2C  |.R.D. .(BUFFER),|
00002A30: 59 3B 20 C8 49 2D C2 59  54 45 20 56 4F 4E 20 CC  |Y; .I-.YTE VON .|
00002A40: BB 4E 47 45 00 59 8C 4E  11 20 99 00 60 8C 58 11  |.NGE.Y.N. ..`.X.|
00002A50: 20 A3 00 84 8C 62 11 20  81 28 42 55 46 46 45 52  | ....b. .(BUFFER|
00002A60: 29 2C 59 3B 20 CC 4F 2D  C2 59 54 45 20 56 4F 4E  |),Y; .O-.YTE VON|
00002A70: 20 CC BB 4E 47 45 00 A9  8C 6C 11 20 97 50 55 54  | ..NGE...l. .PUT|
00002A80: 57 4F 52 44 3B 20 D7 4F  52 54 20 2B 20 D3 50 41  |WORD; .ORT + .PA|
00002A90: 43 45 20 41 55 53 47 45  42 45 4E 00 B5 8C 76 11  |CE AUSGEBEN...v.|
00002AA0: 20 97 50 52 49 4D 4D 00  C4 8C 80 11 20 2E 91 22  | .PRIMM..... .."|
00002AB0: 29 22 2C 45 4F 4D 00 CA  8C 8A 11 3B 00 D1 8C 94  |)",EOM.....;....|
00002AC0: 11 20 A1 00 F0 8C 9E 11  20 99 3B 20 58 2D D2 45  |. ...... .; X-.E|
00002AD0: 47 49 53 54 45 52 20 5A  55 52 BD 43 4B 48 4F 4C  |GISTER ZUR.CKHOL|
00002AE0: 45 4E 00 F6 8C A8 11 3B  00 01 8D B2 11 20 97 53  |EN.....;..... .S|
00002AF0: 54 4F 50 00 26 8D BC 11  20 B7 44 49 52 38 3B 20  |TOP.&... .DIR8; |
00002B00: 57 45 4E 4E 20 D3 54 4F  50 20 4E 49 43 48 54 20  |WENN .TOP NICHT |
00002B10: 47 45 44 52 BD 43 4B 54  00 4F 8D C6 11 20 96 53  |GEDR.CKT.O... .S|
00002B20: 41 56 45 42 52 4B 30 3B  20 42 45 49 20 D3 54 4F  |AVEBRK0; BEI .TO|
00002B30: 50 20 C1 55 53 47 41 42  45 20 2B 20 C3 41 52 52  |P .USGABE + .ARR|
00002B40: 59 00 55 8D D0 11 3B 00  93 8D DA 11 44 49 52 38  |Y.U...;.....DIR8|
00002B50: 20 96 44 49 52 38 41 3B  20 D6 45 4B 54 4F 52 20  | .DIR8A; .EKTOR |
00002B60: 5A 55 4D 20 D5 4D 42 49  45 47 45 4E 20 41 55 46  |ZUM .MBIEGEN AUF|
00002B70: 20 45 49 47 45 4E 45 20  D2 4F 55 54 49 4E 45 2C  | EIGENE .OUTINE,|
00002B80: 20 5A 2E C2 2E 00 DE 8D  E4 11 3B 20 20 20 20 20  | Z........;     |
00002B90: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002BA0: 20 20 20 20 20 20 55 4D  20 44 41 53 20 C4 41 54  |      UM DAS .AT|
00002BB0: 55 4D 20 4F 44 45 52 20  C6 49 4C 45 41 54 54 52  |UM ODER .ILEATTR|
00002BC0: 49 42 55 54 45 20 41 55  53 5A 55 47 45 42 45 4E  |IBUTE AUSZUGEBEN|
00002BD0: 00 E4 8D EE 11 3B 00 FB  8D F8 11 44 49 52 38 41  |.....;.....DIR8A|
00002BE0: 20 81 23 43 52 3B 20 D2  45 54 55 52 4E 00 08 8E  | .#CR; .ETURN...|
00002BF0: 02 12 20 97 42 53 4F 55  54 3B 00 0E 8E 0C 12 3B  |.. .BSOUT;.....;|
00002C00: 00 21 8E 16 12 44 49 52  38 41 41 20 81 42 55 46  |.!...DIR8AA .BUF|
00002C10: 46 45 52 00 28 8E 20 12  20 A6 00 3B 8E 2A 12 20  |FER.(. . ..;.*. |
00002C20: 86 23 33 32 3B 20 41 44  20 2B 2B 33 32 00 48 8E  |.#32; AD ++32.H.|
00002C30: 34 12 20 82 42 55 46 46  45 52 00 54 8E 3E 12 20  |4. .BUFFER.T.>. |
00002C40: B6 44 49 52 38 42 00 5F  8E 48 12 20 96 44 49 52  |.DIR8B._.H. .DIR|
00002C50: 33 00 73 8E 52 12 44 49  52 38 42 20 8A 42 55 46  |3.s.R.DIR8B .BUF|
00002C60: 46 45 52 2B 31 00 8D 8E  5C 12 20 AF 3B 20 D0 41  |FER+1...\. .; .A|
00002C70: 47 45 53 20 56 4F 4E 20  C4 49 52 54 45 49 4C 00  |GES VON .IRTEIL.|
00002C80: 98 8E 66 12 20 B8 44 49  52 39 00 A3 8E 70 12 20  |..f. .DIR9...p. |
00002C90: 96 44 49 52 33 00 A9 8E  7A 12 3B 00 BB 8E 84 12  |.DIR3...z.;.....|
00002CA0: 44 49 52 39 20 83 44 49  52 46 4C 41 47 00 C2 8E  |DIR9 .DIRFLAG...|
00002CB0: 8E 12 20 A2 00 D1 8E 98  12 20 8B 44 49 52 50 41  |.. ...... .DIRPA|
00002CC0: 52 54 53 00 F6 8E A2 12  20 B8 44 49 52 45 4E 44  |RTS..... .DIREND|
00002CD0: 3B 20 53 43 48 4F 4E 20  C4 49 52 54 45 49 4C 32  |; SCHON .IRTEIL2|
00002CE0: 20 47 45 4C 45 53 45 4E  00 01 8F AC 12 20 96 44  | GELESEN..... .D|
00002CF0: 49 52 31 00 07 8F B6 12  3B 00 49 8F C0 12 44 49  |IR1.....;.I...DI|
00002D00: 52 45 4E 44 20 96 44 49  52 45 4E 44 30 3B 20 D6  |REND .DIREND0; .|
00002D10: 45 4B 54 4F 52 20 5A 55  4D 20 D5 4D 42 49 45 47  |EKTOR ZUM .MBIEG|
00002D20: 45 4E 20 41 55 46 20 45  49 47 45 4E 45 20 D2 4F  |EN AUF EIGENE .O|
00002D30: 55 54 49 4E 45 2C 20 5A  2E C2 2E 00 98 8F CA 12  |UTINE, Z........|
00002D40: 3B 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |;               |
00002D50: 20 20 20 20 20 20 20 20  20 20 20 20 55 4D 20 44  |            UM D|
00002D60: 49 45 20 46 52 45 49 45  4E 20 C2 59 54 45 53 20  |IE FREIEN .YTES |
00002D70: 41 55 46 20 44 45 52 20  C4 49 53 4B 45 54 54 45  |AUF DER .ISKETTE|
00002D80: 20 41 4E 5A 55 47 45 42  45 4E 00 9E 8F D4 12 3B  | ANZUGEBEN.....;|
00002D90: 00 B1 8F DE 12 44 49 52  45 4E 44 30 20 97 50 52  |.....DIREND0 .PR|
00002DA0: 49 4D 4D 00 DB 8F E8 12  20 2E 91 22 5F 5F 5F 5F  |IMM..... .."____|
00002DB0: 5F 5F 5F 5F 5F 5F 5F 5F  5F 5F 5F 5F 5F 5F 5F 5F  |________________|
00002DC0: 5F 5F 5F 5F 99 22 2C 43  52 2C 45 4F 4D 00 E2 8F  |____.",CR,EOM...|
00002DD0: F2 12 20 A6 00 EF 8F FC  12 44 49 52 45 52 52 20  |.. ......DIRERR |
00002DE0: A4 00 F5 8F 06 13 3B 00  FB 8F 10 13 3B 00 49 90  |......;.....;.I.|
00002DF0: 1A 13 3B 20 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |..; ************|
00002E00: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00002E10: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00002E20: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00002E30: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 00 97 90 24 13  |***********...$.|
00002E40: 3B 20 2A 20 20 20 20 20  20 20 20 20 20 20 20 20  |; *             |
00002E50: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002E60: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002E70: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002E80: 20 20 20 20 20 20 20 20  2A 00 E5 90 2E 13 3B 20  |        *.....; |
00002E90: 2A 20 20 20 20 20 20 20  C4 41 54 45 49 20 41 4C  |*       .ATEI AL|
00002EA0: 53 20 27 4C 20 2D 20 31  32 33 34 35 36 37 38 2E  |S 'L - 12345678.|
00002EB0: 41 42 43 27 20 41 55 46  20 47 43 52 2D C4 49 53  |ABC' AUF GCR-.IS|
00002EC0: 4B 20 53 50 45 49 43 48  45 52 4E 20 20 20 20 20  |K SPEICHERN     |
00002ED0: 20 20 20 20 20 20 2A 00  33 91 38 13 3B 20 2A 20  |      *.3.8.; * |
00002EE0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002EF0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002F00: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002F10: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002F20: 20 20 20 20 2A 00 81 91  42 13 3B 20 2A 2A 2A 2A  |    *...B.; ****|
00002F30: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00002F40: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00002F50: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00002F60: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00002F70: 2A 2A 2A 00 87 91 4C 13  3B 00 8D 91 56 13 3B 00  |***...L.;...V.;.|
00002F80: 93 91 60 13 3B 00 99 91  6A 13 3B 00 C1 91 74 13  |..`.;...j.;...t.|
00002F90: 53 41 56 45 20 97 52 45  41 44 4E 41 4D 45 3B 20  |SAVE .READNAME; |
00002FA0: C4 41 54 45 49 4E 41 4D  45 4E 20 45 49 4E 4C 45  |.ATEINAMEN EINLE|
00002FB0: 53 45 4E 00 CF 91 7E 13  20 B6 53 41 56 45 45 52  |SEN...~. .SAVEER|
00002FC0: 52 00 F5 91 88 13 20 97  52 45 41 44 4E 41 4D 45  |R..... .READNAME|
00002FD0: 42 3B 20 C4 41 54 45 49  4E 41 4D 45 4E 20 41 55  |B; .ATEINAMEN AU|
00002FE0: 53 57 45 52 54 45 4E 00  17 92 92 13 20 B6 53 41  |SWERTEN..... .SA|
00002FF0: 56 45 45 52 52 3B 20 42  45 49 20 C6 45 48 4C 45  |VEERR; BEI .EHLE|
00003000: 52 20 53 50 52 49 4E 47  45 00 1D 92 9C 13 3B 00  |R SPRINGE.....;.|
00003010: 46 92 A6 13 53 41 56 45  54 52 20 97 53 41 56 45  |F...SAVETR .SAVE|
00003020: 55 3B 20 53 50 45 49 43  48 45 52 4E 20 56 4F 52  |U; SPEICHERN VOR|
00003030: 42 45 52 45 49 54 45 4E  00 6F 92 B0 13 20 84 45  |BEREITEN.o... .E|
00003040: 4E 44 54 45 58 54 42 3B  20 C2 41 4E 4B 20 44 45  |NDTEXTB; .ANK DE|
00003050: 53 20 D4 45 58 54 45 4E  44 45 53 20 4C 41 44 45  |S .EXTENDES LADE|
00003060: 4E 00 8F 92 BA 13 20 B8  53 41 56 45 32 3B 20 C5  |N..... .SAVE2; .|
00003070: 4E 44 45 20 4E 4F 43 48  20 49 4E 20 C2 41 4E 4B  |NDE NOCH IN .ANK|
00003080: 30 00 BB 92 C4 13 3B 20  20 20 20 20 20 20 20 20  |0.....;         |
00003090: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000030A0: 20 20 53 4F 4E 53 54 20  C2 41 4E 4B 31 00 E3 92  |  SONST .ANK1...|
000030B0: CE 13 53 41 56 45 31 20  83 23 30 30 3B 20 4C 4F  |..SAVE1 .#00; LO|
000030C0: 20 44 45 52 20 C5 4E 44  41 44 52 45 53 53 45 20  | DER .NDADRESSE |
000030D0: 49 4E 20 C2 30 00 F6 92  D8 13 20 84 23 4D 41 58  |IN .0..... .#MAX|
000030E0: 50 41 47 45 3B 20 48 49  00 1B 93 E2 13 20 81 23  |PAGE; HI..... .#|
000030F0: 54 32 3B 20 DA 45 49 47  45 52 20 41 55 46 20 C1  |T2; .EIGER AUF .|
00003100: 4E 46 41 4E 47 53 41 44  52 45 53 53 45 00 38 93  |NFANGSADRESSE.8.|
00003110: EC 13 20 97 53 41 56 45  53 3B 20 C4 41 54 45 49  |.. .SAVES; .ATEI|
00003120: 20 53 50 45 49 43 48 45  52 4E 00 46 93 F6 13 20  | SPEICHERN.F... |
00003130: B6 53 41 56 45 42 52 4B  00 55 93 00 14 20 97 47  |.SAVEBRK.U... .G|
00003140: 54 45 52 52 4D 53 47 00  6F 93 0A 14 20 B8 53 41  |TERRMSG.o... .SA|
00003150: 56 45 31 42 3B 20 4B 45  49 4E 20 C6 45 48 4C 45  |VE1B; KEIN .EHLE|
00003160: 52 00 86 93 14 14 20 85  23 36 33 3B 20 C6 49 4C  |R..... .#63; .IL|
00003170: 45 20 45 58 49 53 54 53  00 A3 93 1E 14 20 B7 53  |E EXISTS..... .S|
00003180: 41 56 45 45 52 52 3B 20  41 4E 44 45 52 45 20 C6  |AVEERR; ANDERE .|
00003190: 45 48 4C 45 52 00 B1 93  28 14 20 97 53 43 52 41  |EHLER...(. .SCRA|
000031A0: 54 43 48 00 D5 93 32 14  20 B7 53 41 56 45 45 52  |TCH...2. .SAVEER|
000031B0: 52 3B 20 C4 41 54 45 49  20 4E 49 43 48 54 20 47  |R; .ATEI NICHT G|
000031C0: 45 4C BC 53 43 48 54 00  DB 93 3C 14 3B 00 E8 93  |EL.SCHT...<.;...|
000031D0: 46 14 20 96 53 41 56 45  54 52 00 EE 93 50 14 3B  |F. .SAVETR...P.;|
000031E0: 00 2B 94 5A 14 53 41 56  45 31 42 20 97 53 41 56  |.+.Z.SAVE1B .SAV|
000031F0: 45 55 30 3B 20 53 50 45  49 43 48 45 52 4E 20 56  |EU0; SPEICHERN V|
00003200: 4F 52 42 45 52 45 49 54  45 4E 20 4F 48 4E 45 20  |ORBEREITEN OHNE |
00003210: CC BB 4E 47 45 4E 41 55  53 47 41 42 45 00 57 94  |..NGENAUSGABE.W.|
00003220: 64 14 20 81 23 22 48 22  3B 20 DA 45 49 43 48 45  |d. .#"H"; .EICHE|
00003230: 4E 20 46 BD 52 20 C8 49  2D 20 D4 45 49 4C 20 44  |N F.R .I- .EIL D|
00003240: 45 53 20 D4 45 58 54 45  53 00 73 94 6E 14 20 82  |ES .EXTES.s.n. .|
00003250: 58 43 4E 54 3B 20 4C 45  54 5A 54 45 53 20 DA 45  |XCNT; LETZTES .E|
00003260: 49 43 48 45 4E 00 9A 94  78 14 20 84 45 4E 44 54  |ICHEN...x. .ENDT|
00003270: 45 58 54 42 3B 20 41 4B  54 2E 20 D3 50 45 49 43  |EXTB; AKT. .PEIC|
00003280: 48 45 52 42 41 4E 4B 20  28 C2 31 29 00 AE 94 82  |HERBANK (.1)....|
00003290: 14 20 89 42 41 3B 20 41  4B 54 2E 20 C2 41 4E 4B  |. .BA; AKT. .ANK|
000032A0: 00 B4 94 8C 14 3B 00 CB  94 96 14 53 41 56 45 32  |.....;.....SAVE2|
000032B0: 20 83 45 4E 44 54 45 58  54 3B 20 4C 4F 00 DF 94  | .ENDTEXT; LO...|
000032C0: A0 14 20 84 45 4E 44 54  45 58 54 2B 31 3B 20 48  |.. .ENDTEXT+1; H|
000032D0: 49 00 FC 94 AA 14 20 81  23 54 32 3B 20 DA 45 49  |I..... .#T2; .EI|
000032E0: 47 45 52 20 41 55 46 20  C1 4E 46 41 4E 47 00 19  |GER AUF .NFANG..|
000032F0: 95 B4 14 20 97 53 41 56  45 53 3B 20 55 4E 44 20  |... .SAVES; UND |
00003300: 41 42 53 50 45 49 43 48  45 52 4E 00 3F 95 BE 14  |ABSPEICHERN.?...|
00003310: 20 B6 53 41 56 45 42 52  4B 3B 20 45 56 54 20 C1  | .SAVEBRK; EVT .|
00003320: 42 42 52 55 43 48 20 44  55 52 43 48 20 D3 54 4F  |BBRUCH DURCH .TO|
00003330: 50 00 4E 95 C8 14 20 97  47 54 45 52 52 4D 53 47  |P.N... .GTERRMSG|
00003340: 00 5A 95 D2 14 20 B7 53  41 56 45 33 00 61 95 DC  |.Z... .SAVE3.a..|
00003350: 14 20 A6 00 68 95 E6 14  20 A4 00 77 95 F0 14 53  |. ..h... ..w...S|
00003360: 41 56 45 33 20 85 23 36  33 00 94 95 FA 14 20 B7  |AVE3 .#63..... .|
00003370: 53 41 56 45 45 52 52 3B  20 41 4E 44 45 52 45 20  |SAVEERR; ANDERE |
00003380: C6 45 48 4C 45 52 00 B0  95 04 15 20 97 53 43 52  |.EHLER..... .SCR|
00003390: 41 54 43 48 3B 20 C6 49  4C 45 20 4C BC 53 43 48  |ATCH; .ILE L.SCH|
000033A0: 45 4E 00 D4 95 0E 15 20  B7 53 41 56 45 45 52 52  |EN..... .SAVEERR|
000033B0: 3B 20 C4 41 54 45 49 20  4E 49 43 48 54 20 47 45  |; .ATEI NICHT GE|
000033C0: 4C BC 53 43 48 54 00 F9  95 18 15 20 84 45 4E 44  |L.SCHT..... .END|
000033D0: 54 45 58 54 42 3B 20 48  BC 43 48 53 54 45 20 D3  |TEXTB; H.CHSTE .|
000033E0: 50 45 49 43 48 45 52 42  41 4E 4B 00 22 96 22 15  |PEICHERBANK.".".|
000033F0: 20 B7 53 41 56 45 31 42  3B 20 4E 55 52 20 C2 41  | .SAVE1B; NUR .A|
00003400: 4E 4B 31 2C 20 44 41 4E  4E 20 4E 4F 43 48 45 49  |NK1, DANN NOCHEI|
00003410: 4E 4D 41 4C 00 46 96 2C  15 20 96 53 41 56 45 54  |NMAL.F.,. .SAVET|
00003420: 52 3B 53 4F 4E 53 54 20  4E 4F 43 48 45 49 4E 4D  |R;SONST NOCHEINM|
00003430: 41 4C 20 C2 41 4E 4B 30  00 4C 96 36 15 3B 00 5A  |AL .ANK0.L.6.;.Z|
00003440: 96 40 15 53 41 56 45 42  52 4B 20 A0 00 69 96 4A  |.@.SAVEBRK ..i.J|
00003450: 15 20 97 47 54 45 52 52  4D 53 47 00 70 96 54 15  |. .GTERRMSG.p.T.|
00003460: 20 A1 00 94 96 5E 15 20  B7 53 41 56 45 45 52 52  | ....^. .SAVEERR|
00003470: 3B 20 4B 45 49 4E 20 C2  45 4E 55 54 5A 45 52 41  |; KEIN .ENUTZERA|
00003480: 42 42 52 55 43 48 00 9A  96 68 15 3B 00 AE 96 72  |BBRUCH...h.;...r|
00003490: 15 53 41 56 45 42 52 4B  30 20 97 50 52 49 4D 4D  |.SAVEBRK0 .PRIMM|
000034A0: 00 D8 96 7C 15 20 2E 91  43 52 2C 37 2C 22 9E C2  |...|. ..CR,7,"..|
000034B0: 45 4E 55 54 5A 45 52 55  4E 54 45 52 42 52 45 43  |ENUTZERUNTERBREC|
000034C0: 48 55 4E 47 99 22 2C 45  4F 4D 00 DE 96 86 15 3B  |HUNG.",EOM.....;|
000034D0: 00 EC 96 90 15 53 41 56  45 45 52 52 20 A7 00 F3  |.....SAVEERR ...|
000034E0: 96 9A 15 20 A4 00 F9 96  A4 15 3B 00 1D 97 AE 15  |... ......;.....|
000034F0: 53 43 52 41 54 43 48 20  81 58 43 4E 54 3B 20 C6  |SCRATCH .XCNT; .|
00003500: 4C 41 47 CC 4F 2F C8 49  C2 45 52 45 49 43 48 00  |LAG.O/.I.EREICH.|
00003510: 2D 97 B8 15 20 A0 3B 20  53 49 43 48 45 52 4E 00  |-... .; SICHERN.|
00003520: 39 97 C2 15 20 97 50 52  49 4D 4D 00 5F 97 CC 15  |9... .PRIMM._...|
00003530: 20 2E 91 22 9E C4 41 54  45 49 20 4C BC 53 43 48  | .."..ATEI L.SCH|
00003540: 45 4E 20 28 4A 2F 4E 29  20 3F 20 99 22 2C 45 4F  |EN (J/N) ? .",EO|
00003550: 4D 00 8F 97 D6 15 53 43  52 41 54 43 48 31 20 97  |M.....SCRATCH1 .|
00003560: 42 41 53 49 4E 3B 20 DA  45 49 43 48 45 4E 20 56  |BASIN; .EICHEN V|
00003570: 4F 4E 20 D4 41 53 54 41  54 55 52 20 48 4F 4C 45  |ON .ASTATUR HOLE|
00003580: 4E 00 9E 97 E0 15 20 B8  53 43 52 41 54 43 48 31  |N..... .SCRATCH1|
00003590: 00 A9 97 EA 15 20 85 23  22 4A 22 00 B9 97 F4 15  |..... .#"J".....|
000035A0: 20 B8 53 43 52 41 54 43  48 31 42 00 C0 97 FE 15  | .SCRATCH1B.....|
000035B0: 20 A1 00 E3 97 08 16 20  A4 3B 20 DA 45 52 4F 20  | ...... .; .ERO |
000035C0: 4E 49 43 48 54 20 47 45  53 45 54 5A 54 2C 20 44  |NICHT GESETZT, D|
000035D0: 41 20 50 4C 41 00 E9 97  12 16 3B 00 FE 97 1C 16  |A PLA.....;.....|
000035E0: 53 43 52 41 54 43 48 31  42 20 81 23 22 53 22 3B  |SCRATCH1B .#"S";|
000035F0: 00 09 98 26 16 20 82 58  43 4E 54 00 14 98 30 16  |...&. .XCNT...0.|
00003600: 20 81 23 22 3A 22 00 2F  98 3A 16 20 82 58 43 4E  | .#":"./.:. .XCN|
00003610: 54 2B 31 3B 20 2D 3E 20  22 53 30 3A 20 20 20 20  |T+1; -> "S0:    |
00003620: 22 00 38 98 44 16 20 84  23 30 00 5C 98 4E 16 53  |".8.D. .#0.\.N.S|
00003630: 43 52 41 54 43 48 32 20  81 44 49 52 4E 41 4D 45  |CRATCH2 .DIRNAME|
00003640: 2C 59 3B 20 55 4D 4B 4F  50 49 45 52 45 4E 00 6B  |,Y; UMKOPIEREN.k|
00003650: 98 58 16 20 82 58 43 4E  54 2B 36 2C 59 00 72 98  |.X. .XCNT+6,Y.r.|
00003660: 62 16 20 9E 00 7B 98 6C  16 20 93 23 38 00 8A 98  |b. ..{.l. .#8...|
00003670: 76 16 20 B7 53 43 52 41  54 43 48 32 00 90 98 80  |v. .SCRATCH2....|
00003680: 16 3B 00 9B 98 8A 16 20  81 23 22 2E 22 00 BE 98  |.;..... .#"."...|
00003690: 94 16 20 82 58 43 4E 54  2B 31 34 3B 20 49 4E 20  |.. .XCNT+14; IN |
000036A0: C2 55 46 46 45 52 20 53  50 45 49 43 48 45 52 4E  |.UFFER SPEICHERN|
000036B0: 00 D7 98 9E 16 53 43 52  41 54 43 48 32 42 20 81  |.....SCRATCH2B .|
000036C0: 44 49 52 4E 41 4D 45 2C  59 00 03 99 A8 16 20 82  |DIRNAME,Y..... .|
000036D0: 58 43 4E 54 2B 37 2C 59  3B 20 CE 41 4D 45 4E 53  |XCNT+7,Y; .AMENS|
000036E0: 45 52 57 45 49 54 45 52  55 4E 47 20 53 43 48 52  |ERWEITERUNG SCHR|
000036F0: 45 49 42 45 4E 00 0A 99  B2 16 20 9E 00 14 99 BC  |EIBEN..... .....|
00003700: 16 20 93 23 31 32 00 24  99 C6 16 20 B7 53 43 52  |. .#12.$... .SCR|
00003710: 41 54 43 48 32 42 00 2F  99 D0 16 20 81 23 22 20  |ATCH2B./... .#" |
00003720: 22 00 3A 99 DA 16 20 84  23 22 2D 22 00 47 99 E4  |".:... .#"-".G..|
00003730: 16 20 82 58 43 4E 54 2B  33 00 54 99 EE 16 20 82  |. .XCNT+3.T... .|
00003740: 58 43 4E 54 2B 35 00 61  99 F8 16 20 89 58 43 4E  |XCNT+5.a... .XCN|
00003750: 54 2B 34 00 68 99 02 17  20 A1 00 88 99 0C 17 20  |T+4.h... ...... |
00003760: 82 58 43 4E 54 2B 32 3B  20 45 4E 54 57 2E 20 27  |.XCNT+2; ENTW. '|
00003770: 4C 27 20 4F 44 2E 20 27  48 27 00 8E 99 16 17 3B  |L' OD. 'H'.....;|
00003780: 00 97 99 20 17 20 81 23  30 00 A3 99 2A 17 20 82  |... . .#0...*. .|
00003790: 46 4E 4C 45 4E 00 AC 99  34 17 20 82 42 41 00 B9  |FNLEN...4. .BA..|
000037A0: 99 3E 17 20 82 46 4E 42  41 4E 4B 00 BF 99 48 17  |.>. .FNBANK...H.|
000037B0: 3B 00 E6 99 52 17 20 83  47 4E 47 43 52 3B 20 C7  |;...R. .GNGCR; .|
000037C0: 45 52 BB 54 45 4E 55 4D  4D 45 52 20 46 BD 52 20  |ER.TENUMMER F.R |
000037D0: C7 C3 D2 2D C4 49 53 4B  00 00 9A 5C 17 20 84 23  |...-.ISK...\. .#|
000037E0: 31 35 3B 20 C4 41 54 45  49 20 23 30 2C 47 4E 2C  |15; .ATEI #0,GN,|
000037F0: 31 35 00 0D 9A 66 17 20  97 53 45 54 4C 46 53 00  |15...f. .SETLFS.|
00003800: 18 9A 70 17 20 97 4F 50  45 4E 00 1E 9A 7A 17 3B  |..p. .OPEN...z.;|
00003810: 00 27 9A 84 17 20 83 23  30 00 34 9A 8E 17 20 97  |.'... .#0.4... .|
00003820: 43 48 4B 4F 55 54 00 3A  9A 98 17 3B 00 43 9A A2  |CHKOUT.:...;.C..|
00003830: 17 20 84 23 30 00 58 9A  AC 17 53 43 52 41 54 43  |. .#0.X...SCRATC|
00003840: 48 33 20 81 58 43 4E 54  2C 59 00 64 9A B6 17 20  |H3 .XCNT,Y.d... |
00003850: 97 42 53 4F 55 54 00 6B  9A C0 17 20 9E 00 90 9A  |.BSOUT.k... ....|
00003860: CA 17 20 93 23 31 38 3B  20 41 4C 4C 45 20 DA 45  |.. .#18; ALLE .E|
00003870: 49 43 48 45 4E 20 BD 42  45 52 54 52 41 47 45 4E  |ICHEN .BERTRAGEN|
00003880: 20 3F 00 9F 9A D4 17 20  B7 53 43 52 41 54 43 48  | ?..... .SCRATCH|
00003890: 33 00 A5 9A DE 17 3B 00  B2 9A E8 17 20 97 43 4C  |3.....;..... .CL|
000038A0: 52 43 48 4E 00 BB 9A F2  17 20 81 23 30 00 C7 9A  |RCHN..... .#0...|
000038B0: FC 17 20 97 43 4C 4F 53  45 00 D6 9A 06 18 20 97  |.. .CLOSE..... .|
000038C0: 47 54 45 52 52 4D 53 47  00 01 9B 10 18 20 85 23  |GTERRMSG..... .#|
000038D0: 31 3B 20 57 45 4E 4E 20  47 45 4C BC 53 43 48 54  |1; WENN GEL.SCHT|
000038E0: 2C 20 44 41 4E 4E 20 DA  45 52 4F 20 47 45 53 45  |, DANN .ERO GESE|
000038F0: 54 5A 54 00 08 9B 1A 18  20 A6 00 0F 9B 24 18 20  |TZT..... ....$. |
00003900: A4 00 15 9B 2E 18 3B 00  1B 9B 38 18 3B 00 21 9B  |......;...8.;.!.|
00003910: 42 18 3B 00 27 9B 4C 18  3B 00 65 9B 56 18 3B 20  |B.;.'.L.;.e.V.; |
00003920: 20 20 20 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |   -------------|
00003930: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00003940: 2D 2D 2D 2D 2D 2D 2D 20  D5 20 2D 2D 2D 2D 2D 2D  |------- . ------|
00003950: 2D 2D 2D 2D 2D 2D 2D 00  6B 9B 60 18 3B 00 AB 9B  |-------.k.`.;...|
00003960: 6A 18 53 41 56 45 55 20  97 50 52 54 4C BB 4E 47  |j.SAVEU .PRTL.NG|
00003970: 45 3B 20 C5 4E 44 41 44  52 45 53 53 45 20 55 4E  |E; .NDADRESSE UN|
00003980: 44 20 C2 41 4E 4B 20 42  45 52 45 43 48 4E 45 4E  |D .ANK BERECHNEN|
00003990: 20 55 4E 44 20 41 55 53  47 45 42 45 4E 00 B1 9B  | UND AUSGEBEN...|
000039A0: 74 18 3B 00 E7 9B 7E 18  53 41 56 45 55 30 20 84  |t.;...~.SAVEU0 .|
000039B0: 47 4E 47 43 52 3B 20 41  4B 54 55 45 4C 4C 45 20  |GNGCR; AKTUELLE |
000039C0: C7 45 52 BB 54 45 4E 55  4D 4D 45 52 20 28 C7 C3  |.ER.TENUMMER (..|
000039D0: D2 29 20 20 4C 41 44 45  4E 00 FE 9B 88 18 20 89  |.)  LADEN..... .|
000039E0: 46 41 3B 20 C7 45 52 BB  54 45 4E 55 4D 4D 45 52  |FA; .ER.TENUMMER|
000039F0: 00 08 9C 92 18 20 84 23  31 36 00 2A 9C 9C 18 20  |..... .#16.*... |
00003A00: 89 46 4E 4C 45 4E 3B 20  CC BB 4E 47 45 20 44 45  |.FNLEN; ..NGE DE|
00003A10: 53 20 C4 41 54 45 49 4E  41 4D 45 4E 00 33 9C A6  |S .ATEINAMEN.3..|
00003A20: 18 20 84 23 30 00 4D 9C  B0 18 20 89 53 41 3B 20  |. .#0.M... .SA; |
00003A30: D3 45 4B 55 4E 44 BB 52  41 44 52 45 53 53 45 00  |.EKUND.RADRESSE.|
00003A40: 61 9C BA 18 20 89 42 41  3B 20 41 4B 54 2E 20 C2  |a... .BA; AKT. .|
00003A50: 41 4E 4B 00 82 9C C4 18  20 89 46 4E 42 41 4E 4B  |ANK..... .FNBANK|
00003A60: 3B 20 C2 41 4E 4B 20 44  45 53 20 C6 49 4C 45 4E  |; .ANK DES .ILEN|
00003A70: 41 4D 45 4E 00 A0 9C CE  18 20 89 53 54 41 54 55  |AMEN..... .STATU|
00003A80: 53 3B 20 49 2F 4F 20 D3  54 41 54 55 53 20 27 53  |S; I/O .TATUS 'S|
00003A90: 54 27 00 A6 9C D8 18 3B  00 BC 9C E2 18 3B 20 59  |T'.....;.....; Y|
00003AA0: 20 49 53 54 20 53 43 48  4F 4E 20 3D 20 30 00 C2  | IST SCHON = 0..|
00003AB0: 9C EC 18 3B 00 D8 9C F6  18 53 41 56 45 55 31 20  |...;.....SAVEU1 |
00003AC0: 81 44 49 52 4E 41 4D 45  2C 59 00 03 9D 00 19 20  |.DIRNAME,Y..... |
00003AD0: 82 58 43 4E 54 2B 34 2C  59 3B 20 CE 41 4D 45 4E  |.XCNT+4,Y; .AMEN|
00003AE0: 20 49 4E 20 C2 55 46 46  45 52 20 55 4D 4B 4F 50  | IN .UFFER UMKOP|
00003AF0: 49 45 52 45 4E 00 0A 9D  0A 19 20 9E 00 13 9D 14  |IEREN..... .....|
00003B00: 19 20 93 23 38 00 20 9D  1E 19 20 B7 53 41 56 45  |. .#8. ... .SAVE|
00003B10: 55 31 00 26 9D 28 19 3B  00 3E 9D 32 19 20 81 23  |U1.&.(.;.>.2. .#|
00003B20: 22 2E 22 3B 20 D0 55 4E  4B 54 20 4C 41 44 45 4E  |"."; .UNKT LADEN|
00003B30: 00 61 9D 3C 19 20 82 58  43 4E 54 2B 31 32 3B 20  |.a.<. .XCNT+12; |
00003B40: 49 4E 20 42 55 46 46 45  52 20 53 50 45 49 43 48  |IN BUFFER SPEICH|
00003B50: 45 52 4E 00 77 9D 46 19  53 41 56 45 55 32 20 81  |ERN.w.F.SAVEU2 .|
00003B60: 44 49 52 4E 41 4D 45 2C  59 00 A8 9D 50 19 20 82  |DIRNAME,Y...P. .|
00003B70: 58 43 4E 54 2B 35 2C 59  3B 20 CE 41 4D 45 4E 20  |XCNT+5,Y; .AMEN |
00003B80: 4E 41 43 48 20 D0 55 4E  4B 54 20 57 45 49 54 45  |NACH .UNKT WEITE|
00003B90: 52 53 43 48 52 45 49 42  45 4E 00 AF 9D 5A 19 20  |RSCHREIBEN...Z. |
00003BA0: 9E 00 B9 9D 64 19 20 93  23 31 32 00 E5 9D 6E 19  |....d. .#12...n.|
00003BB0: 20 B7 53 41 56 45 55 32  3B 20 57 45 4E 4E 20 4E  | .SAVEU2; WENN N|
00003BC0: 49 43 48 54 20 41 4C 4C  45 20 DA 20 47 45 53 43  |ICHT ALLE . GESC|
00003BD0: 48 52 49 45 42 45 4E 00  EB 9D 78 19 3B 00 FD 9D  |HRIEBEN...x.;...|
00003BE0: 82 19 20 81 23 22 20 22  3B 20 D3 50 41 43 45 00  |.. .#" "; .PACE.|
00003BF0: 15 9E 8C 19 20 84 23 22  2D 22 3B 20 C2 49 4E 44  |.... .#"-"; .IND|
00003C00: 45 53 54 52 49 43 48 00  22 9E 96 19 20 82 58 43  |ESTRICH."... .XC|
00003C10: 4E 54 2B 31 00 42 9E A0  19 20 82 58 43 4E 54 2B  |NT+1.B... .XCNT+|
00003C20: 33 3B 20 20 45 4E 54 53  50 52 49 43 48 54 20 27  |3;  ENTSPRICHT '|
00003C30: 20 2D 20 27 00 4F 9E AA  19 20 89 58 43 4E 54 2B  | - '.O... .XCNT+|
00003C40: 32 00 55 9E B4 19 3B 00  79 9E BE 19 20 81 23 22  |2.U...;.y... .#"|
00003C50: 4C 22 3B 20 DA 45 49 43  48 45 4E 20 46 BD 52 20  |L"; .EICHEN F.R |
00003C60: 4C 4F 2D 20 C2 45 52 45  49 43 48 00 8F 9E C8 19  |LO- .EREICH.....|
00003C70: 20 82 58 43 4E 54 3B 20  49 4E 20 C2 55 46 46 45  | .XCNT; IN .UFFE|
00003C80: 52 00 95 9E D2 19 3B 00  B8 9E DC 19 20 81 23 3E  |R.....;..... .#>|
00003C90: 28 58 43 4E 54 29 3B 20  C8 49 2D C2 59 54 45 20  |(XCNT); .I-.YTE |
00003CA0: 56 4F 4E 20 C2 55 46 46  45 52 00 D4 9E E6 19 20  |VON .UFFER..... |
00003CB0: 82 46 4E 41 44 52 2B 31  3B 20 46 BD 52 20 C6 49  |.FNADR+1; F.R .I|
00003CC0: 4C 45 4E 41 4D 45 00 EC  9E F0 19 20 81 23 3C 28  |LENAME..... .#<(|
00003CD0: 58 43 4E 54 29 3B 20 CC  4F 2D C2 59 54 45 00 F8  |XCNT); .O-.YTE..|
00003CE0: 9E FA 19 20 82 46 4E 41  44 52 00 FE 9E 04 1A 3B  |... .FNADR.....;|
00003CF0: 00 18 9F 0E 1A 20 81 23  3C 28 42 55 46 46 41 44  |..... .#<(BUFFAD|
00003D00: 29 3B 20 4C 4F 20 C2 59  54 45 00 41 9F 18 1A 20  |); LO .YTE.A... |
00003D10: 82 54 32 3B 20 49 4E 20  C8 49 4C 46 53 5A 45 49  |.T2; IN .ILFSZEI|
00003D20: 47 45 52 20 46 BD 52 20  C1 4E 46 41 4E 47 20 D4  |GER F.R .NFANG .|
00003D30: 45 58 54 00 5B 9F 22 1A  20 81 23 3E 28 42 55 46  |EXT.[.". .#>(BUF|
00003D40: 46 41 44 29 3B 20 48 49  20 C2 59 54 45 00 76 9F  |FAD); HI .YTE.v.|
00003D50: 2C 1A 20 82 54 32 2B 31  3B 20 49 4E 20 C8 49 4C  |,. .T2+1; IN .IL|
00003D60: 46 53 5A 45 49 47 45 52  00 7C 9F 36 1A 3B 00 83  |FSZEIGER.|.6.;..|
00003D70: 9F 40 1A 20 A4 00 89 9F  4A 1A 3B 00 8F 9F 54 1A  |.@. ....J.;...T.|
00003D80: 3B 00 95 9F 5E 1A 3B 00  9B 9F 68 1A 3B 00 A1 9F  |;...^.;...h.;...|
00003D90: 72 1A 3B 00 EF 9F 7C 1A  3B 20 2A 2A 2A 2A 2A 2A  |r.;...|.; ******|
00003DA0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00003DB0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00003DC0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00003DD0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00003DE0: 2A 00 3D A0 86 1A 3B 20  2A 20 20 20 20 20 20 20  |*.=...; *       |
00003DF0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003E00: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003E10: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003E20: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 2A 00  |              *.|
00003E30: 8B A0 90 1A 3B 20 2A 20  20 20 20 20 20 20 C4 41  |....; *       .A|
00003E40: 54 45 49 20 41 4C 53 20  27 4C 20 2D 20 31 32 33  |TEI ALS 'L - 123|
00003E50: 34 35 36 37 38 2E 41 42  43 27 20 56 4F 4E 20 47  |45678.ABC' VON G|
00003E60: 43 52 2D C4 49 53 4B 20  4C 41 44 45 4E 20 20 20  |CR-.ISK LADEN   |
00003E70: 20 20 20 20 20 20 20 20  20 20 20 20 2A 00 D9 A0  |            *...|
00003E80: 9A 1A 3B 20 2A 20 20 20  20 20 20 20 20 20 20 20  |..; *           |
00003E90: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003EA0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003EB0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003EC0: 20 20 20 20 20 20 20 20  20 20 2A 00 27 A1 A4 1A  |          *.'...|
00003ED0: 3B 20 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |; **************|
00003EE0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00003EF0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00003F00: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00003F10: 2A 2A 2A 2A 2A 2A 2A 2A  2A 00 2D A1 AE 1A 3B 00  |*********.-...;.|
00003F20: 33 A1 B8 1A 3B 00 39 A1  C2 1A 3B 00 5C A1 CC 1A  |3...;.9...;.\...|
00003F30: 4C 4F 41 44 20 97 52 45  41 44 4E 41 4D 45 3B 20  |LOAD .READNAME; |
00003F40: CE 41 4D 45 4E 20 45 49  4E 4C 45 53 45 4E 00 7E  |.AMEN EINLESEN.~|
00003F50: A1 D6 1A 20 B6 4C 4F 41  44 45 52 52 3B 20 42 45  |... .LOADERR; BE|
00003F60: 49 20 C6 45 48 4C 45 52  20 53 50 52 49 4E 47 45  |I .EHLER SPRINGE|
00003F70: 00 84 A1 E0 1A 3B 00 B6  A1 EA 1A 20 97 52 45 41  |.....;..... .REA|
00003F80: 44 4E 41 4D 45 42 3B 20  DA 45 49 43 48 45 4E 20  |DNAMEB; .EICHEN |
00003F90: 49 4E 20 C2 41 53 49 43  50 55 46 46 45 52 20 41  |IN .ASICPUFFER A|
00003FA0: 55 53 57 45 52 54 45 4E  00 D8 A1 F4 1A 20 B6 4C  |USWERTEN..... .L|
00003FB0: 4F 41 44 45 52 52 3B 20  42 45 49 20 C6 45 48 4C  |OADERR; BEI .EHL|
00003FC0: 45 52 20 53 50 52 49 4E  47 45 00 DE A1 FE 1A 3B  |ER SPRINGE.....;|
00003FD0: 00 04 A2 08 1B 4C 4F 41  44 54 52 20 97 53 41 56  |.....LOADTR .SAV|
00003FE0: 45 55 30 3B 20 4C 41 44  45 4E 20 56 4F 52 42 45  |EU0; LADEN VORBE|
00003FF0: 52 45 49 54 45 4E 00 11  A2 12 1B 20 83 54 32 3B  |REITEN..... .T2;|
00004000: 20 4C 4F 00 2B A2 1C 1B  20 84 54 32 2B 31 3B 20  | LO.+... .T2+1; |
00004010: 48 49 20 56 4F 4E 20 C2  55 46 46 45 52 00 34 A2  |HI VON .UFFER.4.|
00004020: 26 1B 20 81 23 30 00 56  A2 30 1B 20 82 53 41 3B  |&. .#0.V.0. .SA;|
00004030: 20 4C 41 44 45 4E 20 4D  49 54 20 C1 44 52 45 53  | LADEN MIT .DRES|
00004040: 53 56 4F 52 47 41 42 45  00 6D A2 3A 1B 20 97 4C  |SVORGABE.m.:. .L|
00004050: 4F 41 44 53 3B 20 55 4E  44 20 4C 41 44 45 4E 00  |OADS; UND LADEN.|
00004060: 79 A2 44 1B 20 B5 4C 4F  41 44 31 00 A9 A2 4E 1B  |y.D. .LOAD1...N.|
00004070: 4C 4F 41 44 42 52 4B 20  96 53 41 56 45 42 52 4B  |LOADBRK .SAVEBRK|
00004080: 3B 20 42 45 49 20 C2 45  4E 55 54 5A 45 52 55 4E  |; BEI .ENUTZERUN|
00004090: 54 45 52 42 52 45 43 48  55 4E 47 00 AF A2 58 1B  |TERBRECHUNG...X.|
000040A0: 3B 00 C7 A2 62 1B 4C 4F  41 44 31 20 88 44 49 52  |;...b.LOAD1 .DIR|
000040B0: 4C BB 4E 47 45 3B 20 4C  4F 00 D2 A2 6C 1B 20 9A  |L.NGE; LO...l. .|
000040C0: 3B 20 48 49 00 D9 A2 76  1B 20 A7 00 03 A3 80 1B  |; HI...v. ......|
000040D0: 20 92 23 3E 28 42 55 46  46 41 44 29 3B 20 4E 55  | .#>(BUFFAD); NU|
000040E0: 52 20 44 49 45 20 CC BB  4E 47 45 20 42 45 52 45  |R DIE ..NGE BERE|
000040F0: 43 48 4E 45 4E 00 1F A3  8A 1B 20 82 44 49 52 4C  |CHNEN..... .DIRL|
00004100: BB 4E 47 45 2B 31 3B 20  C8 49 20 2D 20 C2 59 54  |.NGE+1; .I - .YT|
00004110: 45 00 2E A3 94 1B 20 97  47 54 45 52 52 4D 53 47  |E..... .GTERRMSG|
00004120: 00 53 A3 9E 1B 20 B8 4C  4F 41 44 32 3B 20 4B 45  |.S... .LOAD2; KE|
00004130: 49 4E 20 C6 45 48 4C 45  52 20 41 55 46 47 45 54  |IN .EHLER AUFGET|
00004140: 52 45 54 45 4E 00 61 A3  A8 1B 4C 4F 41 44 45 52  |RETEN.a...LOADER|
00004150: 52 20 A7 00 68 A3 B2 1B  20 A4 00 6E A3 BC 1B 3B  |R ..h... ..n...;|
00004160: 00 80 A3 C6 1B 4C 4F 41  44 32 20 97 53 41 56 45  |.....LOAD2 .SAVE|
00004170: 55 30 00 8B A3 D0 1B 20  81 23 22 48 22 00 A9 A3  |U0..... .#"H"...|
00004180: DA 1B 20 82 58 43 4E 54  3B 20 32 2E 20 D4 45 49  |.. .XCNT; 2. .EI|
00004190: 4C 20 44 45 52 20 C4 41  54 45 49 00 B9 A3 E4 1B  |L DER .ATEI.....|
000041A0: 20 84 23 31 3B 20 C2 41  4E 4B 31 00 C2 A3 EE 1B  | .#1; .ANK1.....|
000041B0: 20 89 42 41 00 CF A3 F8  1B 20 83 54 32 3B 20 4C  | .BA..... .T2; L|
000041C0: 4F 00 DE A3 02 1C 20 84  54 32 2B 31 3B 20 48 49  |O..... .T2+1; HI|
000041D0: 00 E7 A3 0C 1C 20 81 23  30 00 01 A4 16 1C 20 82  |..... .#0..... .|
000041E0: 53 41 3B 20 D3 45 4B 55  4E 44 BB 52 41 44 52 45  |SA; .EKUND.RADRE|
000041F0: 53 53 45 00 0D A4 20 1C  20 97 4C 4F 41 44 53 00  |SSE... . .LOADS.|
00004200: 26 A4 2A 1C 20 B5 4C 4F  41 44 33 3B 20 4B 45 49  |&.*. .LOAD3; KEI|
00004210: 4E 20 C6 45 48 4C 45 52  00 41 A4 34 1C 20 85 23  |N .EHLER.A.4. .#|
00004220: 34 3B 20 46 49 4C 45 20  4E 4F 54 20 46 4F 55 4E  |4; FILE NOT FOUN|
00004230: 44 20 3F 00 78 A4 3E 1C  20 B8 4C 4F 41 44 34 3B  |D ?.x.>. .LOAD4;|
00004240: 20 4A 41 20 2D 3E 20 53  50 52 49 4E 47 45 2C 20  | JA -> SPRINGE, |
00004250: 41 42 45 52 20 CC BB 4E  47 45 20 4E 49 43 48 54  |ABER ..NGE NICHT|
00004260: 20 42 45 52 45 43 48 4E  45 4E 00 7E A4 48 1C 3B  | BERECHNEN.~.H.;|
00004270: 00 92 A4 52 1C 20 A7 3B  20 C6 45 48 4C 45 52 20  |...R. .; .EHLER |
00004280: C6 4C 41 47 00 A5 A4 5C  1C 20 A4 3B 20 55 4E 44  |.LAG...\. .; UND|
00004290: 20 5A 55 52 BD 43 4B 00  AB A4 66 1C 3B 00 B1 A4  | ZUR.CK...f.;...|
000042A0: 70 1C 3B 00 C7 A4 7A 1C  4C 4F 41 44 33 20 9A 3B  |p.;...z.LOAD3 .;|
000042B0: 20 48 49 20 48 4F 4C 45  4E 00 CE A4 84 1C 20 A7  | HI HOLEN..... .|
000042C0: 00 DF A4 8E 1C 20 92 23  3E 28 42 55 46 46 41 44  |..... .#>(BUFFAD|
000042D0: 29 00 EA A4 98 1C 20 9B  3B 20 48 49 00 FB A4 A2  |)..... .; HI....|
000042E0: 1C 20 98 3B 20 4C 4F 20  48 4F 4C 45 4E 00 02 A5  |. .; LO HOLEN...|
000042F0: AC 1C 20 A6 00 1E A5 B6  1C 20 86 44 49 52 4C BB  |.. ...... .DIRL.|
00004300: 4E 47 45 3B 20 4C 4F 20  41 44 44 49 45 52 45 4E  |NGE; LO ADDIEREN|
00004310: 00 2D A5 C0 1C 20 82 44  49 52 4C BB 4E 47 45 00  |.-... .DIRL.NGE.|
00004320: 3D A5 CA 1C 20 99 3B 20  4C 4F 20 49 4E 20 58 00  |=... .; LO IN X.|
00004330: 48 A5 D4 1C 20 9A 3B 20  48 49 00 6E A5 DE 1C 20  |H... .; HI.n... |
00004340: 86 44 49 52 4C BB 4E 47  45 2B 31 3B 20 41 44 44  |.DIRL.NGE+1; ADD|
00004350: 49 45 52 45 4E 20 2B 20  DD 42 45 52 54 52 41 47  |IEREN + .BERTRAG|
00004360: 00 7F A5 E8 1C 20 82 44  49 52 4C BB 4E 47 45 2B  |..... .DIRL.NGE+|
00004370: 31 00 85 A5 F2 1C 3B 00  99 A5 FC 1C 4C 4F 41 44  |1.....;.....LOAD|
00004380: 34 20 97 47 54 45 52 52  4D 53 47 00 9F A5 06 1D  |4 .GTERRMSG.....|
00004390: 3B 00 BE A5 10 1D 20 97  50 52 54 4C BB 4E 47 45  |;..... .PRTL.NGE|
000043A0: 3B 20 CC BB 4E 47 45 20  41 55 53 47 45 42 45 4E  |; ..NGE AUSGEBEN|
000043B0: 00 D2 A5 1A 1D 20 A6 3B  20 4B 45 49 4E 20 C6 45  |..... .; KEIN .E|
000043C0: 48 4C 45 52 00 E5 A5 24  1D 20 A4 3B 20 55 4E 44  |HLER...$. .; UND|
000043D0: 20 5A 55 52 BD 43 4B 00  EB A5 2E 1D 3B 00 F1 A5  | ZUR.CK.....;...|
000043E0: 38 1D 3B 00 F7 A5 42 1D  3B 00 FD A5 4C 1D 3B 00  |8.;...B.;...L.;.|
000043F0: 45 A6 56 1D 3B 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |E.V.;***********|
00004400: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00004410: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00004420: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00004430: 2A 2A 2A 2A 2A 2A 2A 00  8D A6 60 1D 3B 2A 20 20  |*******...`.;*  |
00004440: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00004450: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00004460: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00004470: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 2A 00  |              *.|
00004480: D5 A6 6A 1D 3B 2A 20 20  20 20 20 20 20 20 C4 41  |..j.;*        .A|
00004490: 54 45 49 4E 4E 41 4D 45  4E 20 53 55 43 48 45 4E  |TEINNAMEN SUCHEN|
000044A0: 3A 20 20 CE 41 4D 45 20  49 4E 20 44 49 52 4E 41  |:  .AME IN DIRNA|
000044B0: 4D 45 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |ME              |
000044C0: 20 20 20 20 20 20 2A 00  1D A7 74 1D 3B 2A 20 20  |      *...t.;*  |
000044D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000044E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000044F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00004500: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 2A 00  |              *.|
00004510: 65 A7 7E 1D 3B 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |e.~.;***********|
00004520: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 20 4D  |************** M|
00004530: 2E C6 2E 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |...*************|
00004540: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00004550: 2A 2A 2A 2A 2A 2A 2A 00  6B A7 88 1D 3B 00 71 A7  |*******.k...;.q.|
00004560: 92 1D 3B 00 77 A7 9C 1D  3B 00 8C A7 A6 1D 53 45  |..;.w...;.....SE|
00004570: 41 52 43 48 4E 41 4D 45  20 81 23 24 30 31 00 AF  |ARCHNAME .#$01..|
00004580: A7 B0 1D 20 82 49 4E 51  53 54 41 54 3B 20 C4 49  |... .INQSTAT; .I|
00004590: 53 4B 20 49 4E 49 54 49  41 4C 49 53 49 45 52 45  |SK INITIALISIERE|
000045A0: 4E 00 DE A7 BA 1D 53 45  41 52 43 48 4E 20 83 23  |N.....SEARCHN .#|
000045B0: 30 3B 20 C5 49 4E 53 50  52 55 4E 47 2C 20 57 45  |0; .INSPRUNG, WE|
000045C0: 4E 4E 20 4B 45 49 4E 20  49 4E 51 2D C4 49 53 4B  |NN KEIN INQ-.ISK|
000045D0: 00 0C A8 C4 1D 53 45 41  52 43 48 4E 30 20 88 44  |.....SEARCHN0 .D|
000045E0: 49 52 46 4C 41 47 3B 20  5A 55 45 52 53 54 20 C4  |IRFLAG; ZUERST .|
000045F0: 49 52 31 20 42 45 41 52  42 45 49 54 45 4E 00 12  |IR1 BEARBEITEN..|
00004600: A8 CE 1D 3B 00 21 A8 D8  1D 53 45 41 52 43 48 4E  |...;.!...SEARCHN|
00004610: 31 20 A6 00 48 A8 E2 1D  20 97 44 49 52 52 57 30  |1 ..H... .DIRRW0|
00004620: 3B 20 4E 55 52 20 42 45  49 4D 20 31 2E 20 CD 41  |; NUR BEIM 1. .A|
00004630: 4C 20 49 4E 51 2D C4 49  53 4B 00 65 A8 EC 1D 20  |L INQ-.ISK.e... |
00004640: B6 53 45 41 52 43 48 4E  45 52 52 3B 20 CC 45 53  |.SEARCHNERR; .ES|
00004650: 45 46 45 48 4C 45 52 00  7C A8 F6 1D 53 45 41 52  |EFEHLER.|...SEAR|
00004660: 43 48 4E 31 42 20 97 44  49 52 50 4E 54 52 00 A6  |CHN1B .DIRPNTR..|
00004670: A8 00 1E 20 84 44 49 52  46 4C 41 47 3B 20 57 49  |... .DIRFLAG; WI|
00004680: 45 56 49 45 4C 54 45 52  20 D4 45 49 4C 20 44 45  |EVIELTER .EIL DE|
00004690: 53 20 C4 49 52 53 20 3F  00 E1 A8 0A 1E 20 81 44  |S .IRS ?..... .D|
000046A0: 49 52 49 4E 46 4F 5F 41  4E 2C 59 3B 20 C1 4E 5A  |IRINFO_AN,Y; .NZ|
000046B0: 41 48 4C 20 44 45 52 20  D3 45 4B 54 4F 52 45 4E  |AHL DER .EKTOREN|
000046C0: 20 46 BD 52 20 44 49 45  53 45 53 20 C4 49 52 54  | F.R DIESES .IRT|
000046D0: 45 49 4C 00 16 A9 14 1E  20 8C 3B 20 2A 32 20 4E  |EIL..... .; *2 N|
000046E0: 45 48 4D 45 4E 2C 20 44  41 20 31 20 D3 45 4B 54  |EHMEN, DA 1 .EKT|
000046F0: 4F 52 20 3D 20 32 20 D0  41 47 45 53 20 3D 20 35  |OR = 2 .AGES = 5|
00004700: 31 32 20 C2 59 54 45 53  00 2B A9 1E 1E 20 99 3B  |12 .YTES.+... .;|
00004710: 20 C1 4E 5A 41 48 4C 20  49 4E 20 58 52 00 31 A9  | .NZAHL IN XR.1.|
00004720: 28 1E 3B 00 42 A9 32 1E  20 84 23 30 3B 20 CF 46  |(.;.B.2. .#0; .F|
00004730: 46 53 45 54 00 48 A9 3C  1E 3B 00 7A A9 46 1E 53  |FSET.H.<.;.z.F.S|
00004740: 45 41 52 43 48 4E 32 20  81 28 42 55 46 46 45 52  |EARCHN2 .(BUFFER|
00004750: 29 2C 59 3B 20 44 45 4E  20 31 2E 20 C2 55 43 48  |),Y; DEN 1. .UCH|
00004760: 53 54 41 42 45 4E 20 4C  41 44 45 4E 00 AE A9 50  |STABEN LADEN...P|
00004770: 1E 20 B8 53 45 41 52 43  48 4E 45 52 52 31 3B 20  |. .SEARCHNERR1; |
00004780: 57 45 4E 4E 20 3D 20 30  20 44 41 4E 4E 20 C6 45  |WENN = 0 DANN .E|
00004790: 48 4C 45 52 2C 20 44 41  20 C4 49 52 45 4E 44 45  |HLER, DA .IRENDE|
000047A0: 00 DD A9 5A 1E 20 85 44  49 52 4E 41 4D 45 3B 20  |...Z. .DIRNAME; |
000047B0: 53 54 49 4D 4D 54 20 44  45 52 20 31 2E 20 C2 55  |STIMMT DER 1. .U|
000047C0: 43 48 53 54 41 42 45 20  BD 42 45 52 45 49 4E 00  |CHSTABE .BEREIN.|
000047D0: 11 AA 64 1E 20 B8 53 45  41 52 43 48 4E 35 3B 20  |..d. .SEARCHN5; |
000047E0: 4A 41 2C 20 44 41 4E 4E  20 41 4E 44 45 52 45 20  |JA, DANN ANDERE |
000047F0: C2 2E 20 41 55 43 48 20  56 45 52 47 4C 45 49 43  |.. AUCH VERGLEIC|
00004800: 48 45 4E 00 17 AA 6E 1E  3B 00 48 AA 78 1E 20 81  |HEN...n.;.H.x. .|
00004810: 44 49 52 4E 41 4D 45 3B  20 31 2E 20 C2 55 43 48  |DIRNAME; 1. .UCH|
00004820: 53 54 41 42 45 4E 20 41  55 53 20 47 45 53 55 43  |STABEN AUS GESUC|
00004830: 48 54 45 4D 20 CE 41 4D  45 4E 00 66 AA 82 1E 20  |HTEM .AMEN.f... |
00004840: 85 23 22 2A 22 3B 20 C9  53 54 20 44 41 53 20 45  |.#"*"; .ST DAS E|
00004850: 49 4E 20 CA 4F 4B 45 52  00 83 AA 8C 1E 20 B7 53  |IN .OKER..... .S|
00004860: 45 41 52 43 48 4E 32 42  3B 20 57 45 4E 4E 20 4B  |EARCHN2B; WENN K|
00004870: 45 49 4E 20 2A 00 89 AA  96 1E 3B 00 B9 AA A0 1E  |EIN *.....;.....|
00004880: 20 85 23 24 45 35 3B 20  49 53 54 20 44 49 45 53  | .#$E5; IST DIES|
00004890: 45 20 47 45 4C 41 44 45  4E 45 20 C4 41 54 45 49  |E GELADENE .ATEI|
000048A0: 20 47 45 4C BC 53 43 48  54 20 3F 00 DF AA AA 1E  | GEL.SCHT ?.....|
000048B0: 20 B8 53 45 41 52 43 48  4E 45 52 52 31 3B 20 4A  | .SEARCHNERR1; J|
000048C0: 41 2C 20 44 41 4E 4E 20  C6 45 48 4C 45 52 20 23  |A, DANN .EHLER #|
000048D0: 31 00 E5 AA B4 1E 3B 00  1A AB BE 1E 3B 20 20 20  |1.....;.....;   |
000048E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000048F0: 20 20 20 20 20 20 3B 20  53 4F 4E 53 54 20 C4 41  |      ; SONST .A|
00004900: 54 45 49 20 47 45 46 55  4E 44 45 4E 00 2F AB C8  |TEI GEFUNDEN./..|
00004910: 1E 20 9A 3B 20 CF 46 46  53 45 54 20 49 4E 20 41  |. .; .FFSET IN A|
00004920: 43 00 5B AB D2 1E 20 96  53 45 41 52 43 48 4E 41  |C.[... .SEARCHNA|
00004930: 44 3B 20 CF 46 46 53 45  54 20 41 44 44 49 45 52  |D; .FFSET ADDIER|
00004940: 45 4E 20 55 4E 44 20 5A  55 52 BD 43 4B 00 61 AB  |EN UND ZUR.CK.a.|
00004950: DC 1E 3B 00 83 AB E6 1E  53 45 41 52 43 48 4E 45  |..;.....SEARCHNE|
00004960: 52 52 31 20 9A 3B 20 CF  46 46 53 45 54 20 49 4E  |RR1 .; .FFSET IN|
00004970: 20 C1 4B 4B 55 00 AF AB  F0 1E 20 97 53 45 41 52  | .KKU..... .SEAR|
00004980: 43 48 4E 41 44 3B 20 D0  55 46 46 45 52 20 41 55  |CHNAD; .UFFER AU|
00004990: 46 20 C5 49 4E 54 52 41  47 20 52 49 43 48 54 45  |F .INTRAG RICHTE|
000049A0: 4E 00 E5 AB FA 1E 20 81  23 30 3B 20 C6 4C 41 47  |N..... .#0; .LAG|
000049B0: 20 46 BD 52 20 C4 41 54  45 49 20 4E 49 43 48 54  | F.R .ATEI NICHT|
000049C0: 20 47 45 46 55 4E 44 45  4E 20 4F 44 45 52 20 47  | GEFUNDEN ODER G|
000049D0: 45 4C BC 53 43 48 54 00  EC AB 04 1F 20 A7 00 0B  |EL.SCHT..... ...|
000049E0: AC 0E 1F 20 A4 3B 20 4D  49 54 20 C6 4C 41 47 20  |... .; MIT .LAG |
000049F0: C6 45 48 4C 45 52 20 5A  55 52 BD 43 4B 00 11 AC  |.EHLER ZUR.CK...|
00004A00: 18 1F 3B 00 3F AC 22 1F  53 45 41 52 43 48 4E 32  |..;.?.".SEARCHN2|
00004A10: 42 20 85 23 22 3F 22 3B  20 49 53 54 20 44 41 53  |B .#"?"; IST DAS|
00004A20: 20 45 49 4E 20 D0 4C 41  54 5A 48 41 4C 54 45 52  | EIN .LATZHALTER|
00004A30: 3F 00 7B AC 2C 1F 20 B8  53 45 41 52 43 48 4E 35  |?.{.,. .SEARCHN5|
00004A40: 3B 20 4A 41 2C 20 44 41  4E 4E 20 44 49 45 20 41  |; JA, DANN DIE A|
00004A50: 4E 44 45 52 45 4E 20 C2  55 43 48 53 54 41 42 45  |NDEREN .UCHSTABE|
00004A60: 4E 20 56 45 52 47 4C 45  49 43 48 45 4E 00 81 AC  |N VERGLEICHEN...|
00004A70: 36 1F 3B 00 B8 AC 40 1F  3B 20 20 20 20 20 20 20  |6.;...@.;       |
00004A80: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00004A90: 20 20 3B 20 53 4F 4E 53  54 20 4E BB 43 48 53 54  |  ; SONST N.CHST|
00004AA0: 45 52 20 C5 49 4E 54 52  41 47 00 C7 AC 4A 1F 53  |ER .INTRAG...J.S|
00004AB0: 45 41 52 43 48 4E 33 20  9A 00 D6 AC 54 1F 53 45  |EARCHN3 ....T.SE|
00004AC0: 41 52 43 48 4E 34 20 A6  00 00 AD 5E 1F 20 86 23  |ARCHN4 ....^. .#|
00004AD0: 33 32 3B 20 DA 45 49 47  45 52 20 41 55 46 20 4E  |32; .EIGER AUF N|
00004AE0: BB 43 48 53 54 45 4E 20  C2 55 43 48 53 54 41 42  |.CHSTEN .UCHSTAB|
00004AF0: 45 4E 00 1C AD 68 1F 20  9B 3B 20 55 4E 44 20 5A  |EN...h. .; UND Z|
00004B00: 55 52 BD 43 4B 53 50 45  49 43 48 45 52 4E 00 4B  |UR.CKSPEICHERN.K|
00004B10: AD 72 1F 20 B5 53 45 41  52 43 48 4E 32 3B 20 4B  |.r. .SEARCHN2; K|
00004B20: 45 49 4E 20 DD 42 45 52  54 52 41 47 2C 20 4E BB  |EIN .BERTRAG, N.|
00004B30: 43 48 53 54 45 52 20 C4  2D CE 41 4D 45 00 73 AD  |CHSTER .-.AME.s.|
00004B40: 7C 1F 20 8A 42 55 46 46  45 52 2B 31 3B 20 53 4F  ||. .BUFFER+1; SO|
00004B50: 4E 53 54 20 48 49 2D DA  45 49 47 45 52 20 45 52  |NST HI-.EIGER ER|
00004B60: 48 BC 48 45 4E 00 90 AD  86 1F 20 AF 3B 20 41 4C  |H.HEN..... .; AL|
00004B70: 4C 45 20 D0 41 47 45 53  20 47 45 4C 45 53 45 4E  |LE .AGES GELESEN|
00004B80: 20 3F 00 B8 AD 90 1F 20  B7 53 45 41 52 43 48 4E  | ?..... .SEARCHN|
00004B90: 32 3B 20 4E 45 49 4E 20  2D 3E 20 4E BB 43 48 53  |2; NEIN -> N.CHS|
00004BA0: 54 45 52 20 C4 2D CE 41  4D 45 00 BE AD 9A 1F 3B  |TER .-.AME.....;|
00004BB0: 00 EB AD A4 1F 53 45 41  52 43 48 4E 34 42 20 83  |.....SEARCHN4B .|
00004BC0: 44 49 52 46 4C 41 47 3B  20 C4 49 52 20 31 2C 20  |DIRFLAG; .IR 1, |
00004BD0: 32 2C 20 33 20 4F 44 45  52 20 34 20 3F 00 0B AE  |2, 3 ODER 4 ?...|
00004BE0: AE 1F 20 A2 3B 20 DA 45  49 47 45 52 20 41 55 46  |.. .; .EIGER AUF|
00004BF0: 20 4E BB 43 48 53 54 45  20 D0 41 47 45 00 3D AE  | N.CHSTE .AGE.=.|
00004C00: B8 1F 20 8B 44 49 52 50  41 52 54 53 3B 20 C1 4E  |.. .DIRPARTS; .N|
00004C10: 5A 41 48 4C 20 44 45 52  20 C4 49 52 45 43 54 4F  |ZAHL DER .IRECTO|
00004C20: 52 59 20 D4 45 49 4C 45  20 3D 20 4D 41 58 3F 00  |RY .EILE = MAX?.|
00004C30: 73 AE C2 1F 20 B7 53 45  41 52 43 48 4E 30 3B 20  |s... .SEARCHN0; |
00004C40: 49 4E 20 44 49 52 46 4C  41 47 20 53 50 45 49 43  |IN DIRFLAG SPEIC|
00004C50: 48 45 52 4E 20 55 4E 44  20 57 45 49 54 45 52 53  |HERN UND WEITERS|
00004C60: 55 43 48 45 4E 00 79 AE  CC 1F 3B 00 B2 AE D6 1F  |UCHEN.y...;.....|
00004C70: 53 45 41 52 43 48 4E 45  52 52 32 20 81 23 31 3B  |SEARCHNERR2 .#1;|
00004C80: 20 C6 4C 41 47 20 C4 49  52 20 56 4F 4C 4C 2C 20  | .LAG .IR VOLL, |
00004C90: C4 41 54 45 49 20 4E 49  43 48 54 20 47 45 46 55  |.ATEI NICHT GEFU|
00004CA0: 4E 44 45 4E 00 BF AE E0  1F 20 2E 91 53 4B 49 50  |NDEN..... ..SKIP|
00004CB0: 32 00 C5 AE EA 1F 3B 00  EF AE F4 1F 53 45 41 52  |2.....;.....SEAR|
00004CC0: 43 48 4E 45 52 52 20 81  23 24 46 46 3B 20 C6 4C  |CHNERR .#$FF; .L|
00004CD0: 41 47 20 46 BD 52 20 CC  45 53 45 46 45 48 4C 45  |AG F.R .ESEFEHLE|
00004CE0: 52 00 F6 AE FE 1F 20 A7  00 FD AE 08 20 20 A4 00  |R..... .....  ..|
00004CF0: 03 AF 12 20 3B 00 22 AF  1C 20 3B 20 20 20 20 20  |... ;.".. ;     |
00004D00: 20 20 20 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |   -------------|
00004D10: 2D 2D 2D 2D 00 28 AF 26  20 3B 00 53 AF 30 20 53  |----.(.& ;.S.0 S|
00004D20: 45 41 52 43 48 4E 35 20  9A 3B 20 D2 45 47 49 53  |EARCHN5 .; .EGIS|
00004D30: 54 45 52 20 46 BD 52 20  CF 46 46 53 45 54 20 52  |TER F.R .FFSET R|
00004D40: 45 54 54 45 4E 00 5A AF  3A 20 20 A0 00 7C AF 44  |ETTEN.Z.:  ..|.D|
00004D50: 20 20 98 3B 20 D2 45 47  49 53 54 45 52 20 46 BD  |  .; .EGISTER F.|
00004D60: 52 20 D0 41 47 45 53 20  52 45 54 54 45 4E 00 83  |R .AGES RETTEN..|
00004D70: AF 4E 20 20 A0 00 89 AF  58 20 3B 00 B3 AF 62 20  |.N  ....X ;...b |
00004D80: 20 83 23 30 3B 20 DA BB  48 4C 45 52 20 C1 4E 5A  | .#0; ..HLER .NZ|
00004D90: 41 48 4C 20 56 45 52 47  4C 49 43 48 45 4E 45 20  |AHL VERGLICHENE |
00004DA0: C2 59 54 45 53 00 E3 AF  6C 20 53 45 41 52 43 48  |.YTES...l SEARCH|
00004DB0: 4E 36 20 9E 3B 20 DA BB  48 4C 45 52 20 41 55 46  |N6 .; ..HLER AUF|
00004DC0: 20 C2 59 54 45 20 49 4E  20 D0 41 47 45 20 45 52  | .YTE IN .AGE ER|
00004DD0: 48 BC 48 45 4E 00 09 B0  76 20 20 A2 3B 20 DA BB  |H.HEN...v  .; ..|
00004DE0: 48 4C 45 52 20 56 45 52  47 4C 49 43 48 45 4E 45  |HLER VERGLICHENE|
00004DF0: 20 C2 55 43 48 53 54 41  42 45 4E 00 31 B0 80 20  | .UCHSTABEN.1.. |
00004E00: 20 8B 23 31 31 3B 20 41  4C 4C 45 20 CE 41 4D 45  | .#11; ALLE .AME|
00004E10: 4E 42 59 54 45 53 20 56  45 52 47 4C 49 43 48 45  |NBYTES VERGLICHE|
00004E20: 4E 20 3F 00 56 B0 8A 20  20 B8 53 45 41 52 43 48  |N ?.V..  .SEARCH|
00004E30: 4E 38 3B 20 4A 41 20 2D  3E 20 C4 41 54 45 49 20  |N8; JA -> .ATEI |
00004E40: 47 45 46 55 4E 44 45 4E  00 81 B0 94 20 20 81 44  |GEFUNDEN....  .D|
00004E50: 49 52 4E 41 4D 45 2C 58  3B 20 58 2D 54 45 4E 20  |IRNAME,X; X-TEN |
00004E60: C4 49 52 42 55 43 48 53  54 41 42 45 4E 20 4C 41  |.IRBUCHSTABEN LA|
00004E70: 44 45 4E 00 87 B0 9E 20  3B 00 BA B0 A8 20 20 85  |DEN.... ;....  .|
00004E80: 23 22 2A 22 3B 20 49 53  54 20 44 41 53 20 C2 59  |#"*"; IST DAS .Y|
00004E90: 54 45 20 45 49 4E 20 41  42 53 43 48 4C 49 45 BE  |TE EIN ABSCHLIE.|
00004EA0: 45 4E 44 45 52 20 CA 4F  4B 45 52 3F 00 D9 B0 B2  |ENDER .OKER?....|
00004EB0: 20 20 B8 53 45 41 52 43  48 4E 38 3B 20 4A 41 20  |  .SEARCHN8; JA |
00004EC0: 2D 3E 20 47 45 46 55 4E  44 45 4E 00 DF B0 BC 20  |-> GEFUNDEN.... |
00004ED0: 3B 00 0F B1 C6 20 20 85  23 22 3F 22 3B 20 49 53  |;....  .#"?"; IS|
00004EE0: 54 20 44 41 53 20 C2 59  54 45 20 45 49 4E 20 45  |T DAS .YTE EIN E|
00004EF0: 52 53 45 54 5A 45 4E 44  45 52 20 CA 4F 4B 45 52  |RSETZENDER .OKER|
00004F00: 3F 00 45 B1 D0 20 20 B8  53 45 41 52 43 48 4E 36  |?.E..  .SEARCHN6|
00004F10: 3B 20 4A 41 20 2D 3E 20  4E BB 43 48 53 54 45 4E  |; JA -> N.CHSTEN|
00004F20: 20 C2 55 43 48 53 54 41  42 45 4E 20 56 45 52 47  | .UCHSTABEN VERG|
00004F30: 4C 45 49 43 48 45 4E 00  4B B1 DA 20 3B 00 77 B1  |LEICHEN.K.. ;.w.|
00004F40: E4 20 20 85 28 42 55 46  46 45 52 29 2C 59 3B 20  |.  .(BUFFER),Y; |
00004F50: 53 4F 4E 53 54 20 4D 49  54 20 C4 49 52 20 56 45  |SONST MIT .IR VE|
00004F60: 52 47 4C 45 49 43 48 45  4E 00 AC B1 EE 20 20 B8  |RGLEICHEN....  .|
00004F70: 53 45 41 52 43 48 4E 36  3B 20 57 45 4E 4E 20 47  |SEARCHN6; WENN G|
00004F80: 4C 45 49 43 48 2C 20 44  41 4E 4E 20 4E BB 43 48  |LEICH, DANN N.CH|
00004F90: 53 54 45 4E 20 C2 2E 20  56 45 52 47 4C 2E 00 B2  |STEN .. VERGL...|
00004FA0: B1 F8 20 3B 00 E2 B1 02  21 53 45 41 52 43 48 4E  |.. ;....!SEARCHN|
00004FB0: 37 20 A1 3B 20 44 41 53  20 49 53 54 20 4E 49 43  |7 .; DAS IST NIC|
00004FC0: 48 54 20 44 41 53 20 52  49 43 48 54 49 47 45 20  |HT DAS RICHTIGE |
00004FD0: C6 49 4C 45 00 01 B2 0C  21 20 99 3B 20 58 2D D2  |.ILE....! .; X-.|
00004FE0: 45 47 49 53 54 45 52 20  5A 55 52 BD 43 4B 48 4F  |EGISTER ZUR.CKHO|
00004FF0: 4C 45 4E 00 2E B2 16 21  20 A1 3B 20 59 2D D2 45  |LEN....! .; Y-.E|
00005000: 47 49 53 54 45 52 20 48  4F 4C 45 4E 20 2D 3E 20  |GISTER HOLEN -> |
00005010: 57 49 52 44 20 44 41 4E  4E 20 45 52 48 BC 48 54  |WIRD DANN ERH.HT|
00005020: 00 5F B2 20 21 20 96 53  45 41 52 43 48 4E 34 3B  |._. ! .SEARCHN4;|
00005030: 20 DA 45 49 47 45 52 20  41 55 46 20 4E BB 43 48  | .EIGER AUF N.CH|
00005040: 53 54 45 4E 20 CE 41 4D  45 4E 20 49 4E 20 C4 49  |STEN .AMEN IN .I|
00005050: 52 00 65 B2 2A 21 3B 00  8F B2 34 21 3B 20 20 20  |R.e.*!;...4!;   |
00005060: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00005070: 20 20 CE 41 4D 45 20 47  45 46 55 4E 44 45 4E 20  |  .AME GEFUNDEN |
00005080: 3A 00 B5 B2 3E 21 53 45  41 52 43 48 4E 38 20 A1  |:...>!SEARCHN8 .|
00005090: 3B 20 D0 41 47 45 20 57  4F 20 C4 41 54 45 49 4E  |; .AGE WO .ATEIN|
000050A0: 41 4D 45 20 49 53 54 00  CC B2 48 21 20 A1 3B 20  |AME IST...H! .; |
000050B0: CF 46 46 53 45 54 20 49  4E 20 D0 41 47 45 00 D2  |.FFSET IN .AGE..|
000050C0: B2 52 21 3B 00 E2 B2 5C  21 53 45 41 52 43 48 4E  |.R!;...\!SEARCHN|
000050D0: 41 44 20 A6 00 09 B3 66  21 20 86 42 55 46 46 45  |AD ....f! .BUFFE|
000050E0: 52 3B 20 DA 45 49 47 45  52 20 55 4D 20 CF 46 46  |R; .EIGER UM .FF|
000050F0: 53 45 54 20 45 52 48 BC  48 45 4E 00 2E B3 70 21  |SET ERH.HEN...p!|
00005100: 20 B5 53 45 41 52 43 48  4E 39 3B 20 4B 45 49 4E  | .SEARCHN9; KEIN|
00005110: 20 DD 42 45 52 54 52 41  47 20 2D 3E 20 4A 4D 50  | .BERTRAG -> JMP|
00005120: 00 50 B3 7A 21 20 8A 42  55 46 46 45 52 2B 31 3B  |.P.z! .BUFFER+1;|
00005130: 20 DD 42 45 52 54 52 41  47 20 41 44 44 49 45 52  | .BERTRAG ADDIER|
00005140: 45 4E 00 74 B3 84 21 53  45 41 52 43 48 4E 39 20  |EN.t..!SEARCHN9 |
00005150: 82 42 55 46 46 45 52 3B  20 DA 45 49 47 45 52 20  |.BUFFER; .EIGER |
00005160: 5A 55 52 BD 43 4B 00 84  B3 8E 21 53 45 41 52 43  |ZUR.CK....!SEARC|
00005170: 48 4E 31 30 20 A6 00 8B  B3 98 21 20 A4 00 91 B3  |HN10 .....! ....|
00005180: A2 21 3B 00 97 B3 AC 21  3B 00 9D B3 B6 21 3B 00  |.!;....!;....!;.|
00005190: E6 B3 C0 21 3B 20 2B 2D  2B 2D 2B 2D 2B 2D 2B 2D  |...!; +-+-+-+-+-|
000051A0: 2B 2D 2B 2D 2B 2D 2D 2B  2D 2B 2D 2B 2D 2B 2D 2B  |+-+-+--+-+-+-+-+|
000051B0: 2D 2B 2D 2B 2D 2B 2D 2B  2D 2B 2D 2B 2D 2B 2D 2B  |-+-+-+-+-+-+-+-+|
000051C0: 2D 2B 2D 2B 2D 2B 2D 2B  2D 2B 2D 2B 2D 2B 2D 2B  |-+-+-+-+-+-+-+-+|
000051D0: 2D 2B 2D 2B 2D 2B 2D 2B  00 EC B3 CA 21 3B 00 F2  |-+-+-+-+....!;..|
000051E0: B3 D4 21 3B 00 0C B4 DE  21 3B 20 20 20 20 CE 41  |..!;....!;    .A|
000051F0: 4D 45 4E 20 4B 4F 50 49  45 52 45 4E 20 3A 00 37  |MEN KOPIEREN :.7|
00005200: B4 E8 21 3B 20 20 20 20  20 20 20 20 20 20 20 20  |..!;            |
00005210: 20 20 C4 C9 D2 20 2D 3E  20 DA 57 49 53 43 48 45  |  ... -> .WISCHE|
00005220: 4E 53 50 45 49 43 48 45  52 00 3D B4 F2 21 3B 00  |NSPEICHER.=..!;.|
00005230: 43 B4 FC 21 3B 00 69 B4  06 22 44 49 52 43 4F 50  |C..!;.i.."DIRCOP|
00005240: 59 44 53 20 84 23 33 31  3B 20 C1 4E 5A 41 48 4C  |YDS .#31; .NZAHL|
00005250: 20 DA 45 49 43 48 45 4E  20 2D 31 00 82 B4 10 22  | .EICHEN -1...."|
00005260: 44 49 52 43 50 44 53 31  20 81 28 42 55 46 46 45  |DIRCPDS1 .(BUFFE|
00005270: 52 29 2C 59 00 92 B4 1A  22 20 82 44 49 52 4E 41  |R),Y...." .DIRNA|
00005280: 4D 45 2C 59 00 99 B4 24  22 20 A3 00 C0 B4 2E 22  |ME,Y...$" ....."|
00005290: 20 B1 44 49 52 43 50 44  53 31 3B 20 41 4C 4C 45  | .DIRCPDS1; ALLE|
000052A0: 20 DA 45 49 43 48 45 4E  20 4B 4F 50 49 45 52 54  | .EICHEN KOPIERT|
000052B0: 20 3F 00 C6 B4 38 22 3B  00 CD B4 42 22 20 A6 00  | ?...8";...B" ..|
000052C0: D4 B4 4C 22 20 A4 00 DA  B4 56 22 3B 00 E0 B4 60  |..L" ....V";...`|
000052D0: 22 3B 00 29 B5 6A 22 3B  20 2B 2D 2B 2D 2B 2D 2B  |";.).j"; +-+-+-+|
000052E0: 2D 2B 2D 2B 2D 2B 2D 2B  2D 2D 2B 2D 2B 2D 2B 2D  |-+-+-+-+--+-+-+-|
000052F0: 2B 2D 2B 2D 2B 2D 2B 2D  2B 2D 2B 2D 2B 2D 2B 2D  |+-+-+-+-+-+-+-+-|
00005300: 2B 2D 2B 2D 2B 2D 2B 2D  2B 2D 2B 2D 2B 2D 2B 2D  |+-+-+-+-+-+-+-+-|
00005310: 2B 2D 2B 2D 2B 2D 2B 2D  2B 2D 2B 00 2F B5 74 22  |+-+-+-+-+-+./.t"|
00005320: 3B 00 35 B5 7E 22 3B 00  4F B5 88 22 3B 20 20 20  |;.5.~";.O..";   |
00005330: 20 CE 41 4D 45 4E 20 4B  4F 50 49 45 52 45 4E 20  | .AMEN KOPIEREN |
00005340: 3A 00 7A B5 92 22 3B 20  20 20 20 20 20 20 20 20  |:.z..";         |
00005350: 20 20 20 20 20 DA 57 49  53 43 48 45 4E 53 50 45  |     .WISCHENSPE|
00005360: 49 43 48 45 52 20 2D 3E  20 C4 C9 D2 00 80 B5 9C  |ICHER -> .......|
00005370: 22 3B 00 86 B5 A6 22 3B  00 AC B5 B0 22 44 49 52  |";....";...."DIR|
00005380: 43 4F 50 59 53 44 20 84  23 33 31 3B 20 C1 4E 5A  |COPYSD .#31; .NZ|
00005390: 41 48 4C 20 DA 45 49 43  48 45 4E 20 2D 31 00 C4  |AHL .EICHEN -1..|
000053A0: B5 BA 22 44 49 52 43 50  53 44 31 20 81 44 49 52  |.."DIRCPSD1 .DIR|
000053B0: 4E 41 4D 45 2C 59 00 D5  B5 C4 22 20 82 28 42 55  |NAME,Y...." .(BU|
000053C0: 46 46 45 52 29 2C 59 00  DC B5 CE 22 20 A3 00 03  |FFER),Y...." ...|
000053D0: B6 D8 22 20 B1 44 49 52  43 50 53 44 31 3B 20 41  |.." .DIRCPSD1; A|
000053E0: 4C 4C 45 20 DA 45 49 43  48 45 4E 20 4B 4F 50 49  |LLE .EICHEN KOPI|
000053F0: 45 52 54 20 3F 00 09 B6  E2 22 3B 00 10 B6 EC 22  |ERT ?....";...."|
00005400: 20 A6 00 17 B6 F6 22 20  A4 00 1D B6 00 23 3B 00  | ....." .....#;.|
00005410: 23 B6 0A 23 3B 00 29 B6  14 23 3B 00 6D B6 1E 23  |#..#;.)..#;.m..#|
00005420: 3B 20 2B 2D 2B 2D 2B 2D  2B 2D 2B 2D 2B 2D 2B 2D  |; +-+-+-+-+-+-+-|
00005430: 2B 2D 2B 2D 2B 2D 2B 2D  2B 2D 2B 2D 2B 2D 2B 2D  |+-+-+-+-+-+-+-+-|
00005440: 2B 2D 2B 2D 2B 2D 2B 2D  2B 2D 2B 2D 2B 2D 2B 2D  |+-+-+-+-+-+-+-+-|
00005450: 2B 2D 2B 2D 2B 2D 2B 2D  2B 2D 2B 2D 2B 2D 2B 00  |+-+-+-+-+-+-+-+.|
00005460: B1 B6 28 23 3B 20 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |..(#; **********|
00005470: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 20 4F  |************** O|
00005480: 2E C6 2E 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |...*************|
00005490: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000054A0: 2A 2A 2A 00 B7 B6 32 23  3B 00 CC B6 3C 23 53 45  |***...2#;...<#SE|
000054B0: 41 52 43 48 4D 53 47 20  97 50 52 49 4D 4D 00 E8  |ARCHMSG .PRIMM..|
000054C0: B6 46 23 20 2E 91 43 52  2C 22 53 55 43 48 45 20  |.F# ..CR,"SUCHE |
000054D0: 4E 41 43 48 20 22 2C 45  4F 4D 00 FC B6 50 23 20  |NACH ",EOM...P# |
000054E0: A7 3B 20 CE 41 4D 45 20  4D 49 54 20 43 52 00 0C  |.; .AME MIT CR..|
000054F0: B7 5A 23 20 97 50 52 49  4E 54 4E 41 4D 45 00 37  |.Z# .PRINTNAME.7|
00005500: B7 64 23 20 A4 3B 20 CD  49 54 54 45 49 4C 55 4E  |.d# .; .ITTEILUN|
00005510: 47 20 55 4E 44 20 C4 41  54 45 49 4E 41 4D 45 4E  |G UND .ATEINAMEN|
00005520: 20 41 55 53 47 45 42 45  4E 00 3D B7 6E 23 3B 00  | AUSGEBEN.=.n#;.|
00005530: 81 B7 78 23 3B 20 2B 2D  2B 2D 2B 2D 2B 2D 2B 2D  |..x#; +-+-+-+-+-|
00005540: 2B 2D 2B 2D 2B 2D 2B 2D  2B 2D 2B 2D 2B 2D 2B 2D  |+-+-+-+-+-+-+-+-|
00005550: 2B 2D 2B 2D 2B 2D 2B 2D  2B 2D 2B 2D 2B 2D 2B 2D  |+-+-+-+-+-+-+-+-|
00005560: 2B 2D 2B 2D 2B 2D 2B 2D  2B 2D 2B 2D 2B 2D 2B 2D  |+-+-+-+-+-+-+-+-|
00005570: 2B 2D 2B 00 87 B7 82 23  3B 00 8D B7 8C 23 3B 00  |+-+....#;....#;.|
00005580: B5 B7 96 23 3B 20 C4 49  52 4E 41 4D 45 4E 20 41  |...#; .IRNAMEN A|
00005590: 55 53 47 45 42 45 4E 2C  20 42 45 49 20 53 45 43  |USGEBEN, BEI SEC|
000055A0: 20 4D 49 54 20 43 52 00  BB B7 A0 23 3B 00 EA B7  | MIT CR....#;...|
000055B0: AA 23 50 52 49 4E 54 4E  41 4D 45 20 AE 3B 20 C3  |.#PRINTNAME .; .|
000055C0: 41 52 52 59 2D C6 4C 41  47 20 46 BD 52 20 D4 45  |ARRY-.LAG F.R .E|
000055D0: 53 54 20 43 52 20 52 45  54 54 45 4E 00 F3 B7 B4  |ST CR RETTEN....|
000055E0: 23 20 84 23 30 00 0A B8  BE 23 50 52 49 4E 54 4E  |# .#0....#PRINTN|
000055F0: 31 20 81 44 49 52 4E 41  4D 45 2C 59 00 2A B8 C8  |1 .DIRNAME,Y.*..|
00005600: 23 20 85 23 22 20 22 3B  20 49 53 54 20 44 41 53  |# .#" "; IST DAS|
00005610: 20 45 49 4E 20 D3 50 41  43 45 20 3F 00 5B B8 D2  | EIN .PACE ?.[..|
00005620: 23 20 B8 50 52 49 4E 54  4E 30 31 3B 20 4A 41 2C  |# .PRINTN01; JA,|
00005630: 20 44 41 4E 4E 20 4B 45  49 4E 45 20 C1 55 53 47  | DANN KEINE .USG|
00005640: 41 42 45 20 41 55 46 20  CB 41 4E 41 4C 00 67 B8  |ABE AUF .ANAL.g.|
00005650: DC 23 20 97 42 53 4F 55  54 00 76 B8 E6 23 50 52  |.# .BSOUT.v..#PR|
00005660: 49 4E 54 4E 30 31 20 9E  00 7F B8 F0 23 20 93 23  |INTN01 .....# .#|
00005670: 38 00 8D B8 FA 23 20 B7  50 52 49 4E 54 4E 31 00  |8....# .PRINTN1.|
00005680: 93 B8 04 24 3B 00 CB B8  0E 24 20 81 44 49 52 4E  |...$;....$ .DIRN|
00005690: 41 4D 45 2C 59 3B 20 45  52 53 54 45 4E 20 C4 41  |AME,Y; ERSTEN .A|
000056A0: 54 45 49 45 52 47 BB 4E  5A 55 4E 47 53 42 55 43  |TEIERG.NZUNGSBUC|
000056B0: 48 53 54 41 42 45 4E 20  4C 41 44 45 4E 00 FB B8  |HSTABEN LADEN...|
000056C0: 18 24 20 85 23 22 20 22  3B 20 49 53 54 20 45 49  |.$ .#" "; IST EI|
000056D0: 4E 45 20 C4 41 54 45 49  45 52 47 BB 4E 5A 55 4E  |NE .ATEIERG.NZUN|
000056E0: 47 20 56 4F 52 48 41 4E  44 45 4E 20 3F 00 26 B9  |G VORHANDEN ?.&.|
000056F0: 22 24 20 B8 50 52 49 4E  54 4E 33 3B 20 4E 45 49  |"$ .PRINTN3; NEI|
00005700: 4E 2C 20 44 41 4E 4E 20  C5 4E 44 45 2C 20 4B 45  |N, DANN .NDE, KE|
00005710: 49 4E 20 D0 55 4E 4B 54  00 31 B9 2C 24 20 81 23  |IN .UNKT.1.,$ .#|
00005720: 22 2E 22 00 3D B9 36 24  20 97 42 53 4F 55 54 00  |".".=.6$ .BSOUT.|
00005730: 43 B9 40 24 3B 00 5A B9  4A 24 50 52 49 4E 54 4E  |C.@$;.Z.J$PRINTN|
00005740: 32 20 81 44 49 52 4E 41  4D 45 2C 59 00 66 B9 54  |2 .DIRNAME,Y.f.T|
00005750: 24 20 97 42 53 4F 55 54  00 6D B9 5E 24 20 9E 00  |$ .BSOUT.m.^$ ..|
00005760: 77 B9 68 24 20 93 23 31  31 00 85 B9 72 24 20 B7  |w.h$ .#11...r$ .|
00005770: 50 52 49 4E 54 4E 32 00  8B B9 7C 24 3B 00 99 B9  |PRINTN2...|$;...|
00005780: 86 24 50 52 49 4E 54 4E  33 20 9F 00 CA B9 90 24  |.$PRINTN3 .....$|
00005790: 20 B5 50 52 49 4E 54 4E  34 3B 20 57 45 4E 4E 20  | .PRINTN4; WENN |
000057A0: 4B 45 49 4E 20 43 52 20  45 52 57 BD 4E 53 43 48  |KEIN CR ERW.NSCH|
000057B0: 54 2C 20 44 41 4E 4E 20  C5 4E 44 45 00 E7 B9 9A  |T, DANN .NDE....|
000057C0: 24 20 81 23 43 52 3B 20  53 4F 4E 53 54 20 4C 41  |$ .#CR; SONST LA|
000057D0: 44 45 20 4D 49 54 20 43  52 00 0C BA A4 24 20 97  |DE MIT CR....$ .|
000057E0: 42 53 4F 55 54 3B 20 55  4E 44 20 41 55 46 20 41  |BSOUT; UND AUF A|
000057F0: 4B 54 55 45 4C 4C 45 4E  20 CB 41 4E 41 4C 00 1A  |KTUELLEN .ANAL..|
00005800: BA AE 24 50 52 49 4E 54  4E 34 20 A4 00 20 BA B8  |..$PRINTN4 .. ..|
00005810: 24 3B 00 26 BA C2 24 3B  00 2C BA CC 24 3B 00 32  |$;.&..$;.,..$;.2|
00005820: BA D6 24 3B 00 38 BA E0  24 3B 00 3E BA EA 24 3B  |..$;.8..$;.>..$;|
00005830: 00 44 BA F4 24 3B 00 4A  BA FE 24 3B 00 50 BA 08  |.D..$;.J..$;.P..|
00005840: 25 3B 00 98 BA 12 25 3B  2B 2B 2B 2B 2B 2B 2B 2B  |%;....%;++++++++|
00005850: 2B 2B 2B 2B 2B 2B 2B 2B  2B 2B 2B 2B 2B 2B 2B 2B  |++++++++++++++++|
00005860: 2B 2B 2B 2B 2B 2B 2B 2B  2B 2B 2B 2B 2B 2B 2B 2B  |++++++++++++++++|
00005870: 2B 2B 2B 2B 2B 2B 2B 2B  2B 2B 2B 2B 2B 2B 2B 2B  |++++++++++++++++|
00005880: 2B 2B 2B 2B 2B 2B 2B 2B  2B 2B 00 E0 BA 1C 25 3B  |++++++++++....%;|
00005890: 2B 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |+               |
000058A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000058B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000058C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000058D0: 20 2B 00 28 BB 26 25 3B  2B 20 20 20 20 20 41 4E  | +.(.&%;+     AN|
000058E0: 44 45 52 45 20 D1 55 45  4C 4C 54 45 58 54 54 45  |DERE .UELLTEXTTE|
000058F0: 49 4C 45 20 45 49 4E 42  49 4E 44 45 4E 20 3A 20  |ILE EINBINDEN : |
00005900: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00005910: 20 20 20 20 20 20 20 20  20 2B 00 70 BB 30 25 3B  |         +.p.0%;|
00005920: 2B 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |+               |
00005930: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00005940: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00005950: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00005960: 20 2B 00 B8 BB 3A 25 3B  2B 2B 2B 2B 2B 2B 2B 2B  | +...:%;++++++++|
00005970: 2B 2B 2B 2B 2B 2B 2B 2B  2B 2B 2B 2B 2B 2B 2B 2B  |++++++++++++++++|
00005980: 2B 2B 2B 2B 2B 2B 2B 2B  2B 2B 2B 2B 2B 2B 2B 2B  |++++++++++++++++|
00005990: 2B 2B 2B 2B 2B 2B 2B 2B  2B 2B 2B 2B 2B 2B 2B 2B  |++++++++++++++++|
000059A0: 2B 2B 2B 2B 2B 2B 2B 2B  2B 2B 00 BE BB 44 25 3B  |++++++++++...D%;|
000059B0: 00 C4 BB 4E 25 3B 00 DB  BB 58 25 2E A2 22 4A 41  |...N%;...X%.."JA|
000059C0: 4E 55 53 2D 49 4E 43 2E  41 20 30 35 22 00 F4 BB  |NUS-INC.A 05"...|
000059D0: 62 25 2E A2 22 4A 41 4E  55 53 2D 49 4E 43 2E 42  |b%.."JANUS-INC.B|
000059E0: 20 30 35 2F 38 22 00 FA  BB 6C 25 3B 00 00 00     | 05/8"...l%;... |
.B.BD.;.EBN..."BILDSCHIRM EIN (1) ODER A
US (2)  ",WAHL0.VBX...WAHL0.EQ.1.AB.. ..
0,3.NB.. ..W,0,3.UB.....{B .;..B...."DRU
CKER EIN (1) ODER AUS (2)  ",WAHL1..B...
.WAHL1.EQ.1.FB.. ..1,4,7.RBH. .O86,8.YBR
.....B..;..C...."SYMBOLS EIN (1) ODER AU
S (2)  ",WAHL3..C....WAHL3.EQ.1.)C.. .O8
6,8.8C.. ..W,2,4,7.?C.....EC..;.KC".;.QC
,.;..C6.;+++++++++++++++++++++++++++++++
++++++++++++++++++++++++++++++++++++++++
..C@.;..CJ.;..CT..."QUELLTEXT AUF DISK (
1) ODER SYNTAX (2)  ",WAHL2..C^...WAHL2.
EQ.1..CH. ..$5000..DR. .."JANUS-OBJ 05/8
1"..D|....,D.. ..$5000.;D.. ..1,$5000.BD
......D..;       **** VERSION VOM 08.08.
1989 (DIENSTAG)    (22.35 H).OD..;++++++
++++++++++++++++++++++++++++++++++++++++
+++++++++++++++++++++++++..D..;      DSA
VE"JANUS-MAIN 05/8"..DB.;.0EL..."JANUS-L
ABELS 81"; LABELS EINBINDEN UND DEFINIER
EN.6EV.;.YE....DRIVEINQ=$0E0B; ZEIGER AU
F FLAG F.R DRIVEINQ JA='I'/NEIN=' '.E..
;..E..;..E..JLESEN .LESEN..E..JSCHREIBEN
 .SCHREIBEN.AE..JSAVE .SAVE.QE..JLOAD .L
OAD..E&.JDIR .DIR..E0.JL.SCHEN .L.SCHEN.
.E:.;..FD.;..FN.;.OFX.;*****************
****************************************
*********..FB.;*                        
                                        
*..FL.;*                   FILE SUCHEN &
 LESEN                          *.'GV.;*
                                        
                        *.OG..;*********
**************** M.F.*******************
*****************.UG..;.{G..;..G..;..G..
LESEN .READNAME; ZEICHEN IN BUFFER LESEN
..G.. .LESEN01.BG..;..GF. .READNAMEB; ZE
ICHEN IN BASICBUFFER AUSWERTEN..HP. .LES
EN01; BEI FEHLER SPRINGE..HZ.;.UH..LESEN
TR .SEARCHMSG; AUSGABE 'SUCHE NACH <DATE
INAME>'.[H..;.LH.. .SEARCHNAME.YH.. .LES
EN1.H..;..H.. .PRIMM; FEHLERMELDUNG AUS
GEBEN.MH . ..CR,7,".DATEI NICHT GEFUNDEN
!.",EOM..H*.LESEN01 .LESENERR0..H4.;.$I>
.LESEN1 .DIRCOPYDS; ALLE FILEDATEN IM SP
EICHER SICHERN.5IH. .DIRL.NGE+3.UIR. .DI
RL.NGE+2; L.NGE HI-WORD.UI\. .LESEN2; = 
0, DANN SPRINGE.{IF.;..IP. .PRIMM..IZ. .
.CR,7,".DATEI GR..ER ALS 64 KBYTE",CR,EO
M..I..LESEN1_M .LESENERR; LABEL IN LESEN
2 .NDERN, WENN AUCH DATEIEN.CJ..;       
                    > 64KBYTE TEILWEISE 
GELESEN WERDEN SOLLEN.IJ..;.|J..LESEN2 .
DIRNAME+11; STATUSBYTE DES DATEINAMENS..
J.. .#%00011000; UNTER- UND HAUPTVERZEIC
HNISBIT = 0..J.. .LESEN3; JA, DANN KANN 
DATEI GELESEN WERDEN..J..;..KJ. .PRIMM; 
SONST IST FILE EIN VERZEICHNIS.SKT. ..CR
,7,".EIN VERZEICHNIS KANN NICHT GELADEN 
WERDEN!.",EOM.ZK.. ..AK.. ..GK..;.YK..LE
SEN3 .PRIMM..K.. ..CR,"... DATEI .",EOM.
.K.. .; FLAG F.R KEIN CR.RK.. .PRINTNAME
; DATEINAME AUSGEBEN..K$. .PRIMM..K.. ..
". WIRD GELADEN.",EOM..L8.;..LB. .FILERD
..LL. .LESENERR.ALV. .PRTL.NGE; DATEIL.N
GE AUSGEBEN.HL`. ..OLJ. ..ULT.;.IL~.LESE
NERR .PRIMM..L.. ..CR,7,"..DATEI KANN NI
CHT GELADEN WERDEN!.",EOM..L..LESENERR0 
...L.. ...L..;.BL..;.HL..;.NLD.;..MN.;**
****************************************
************************.^MX.;*         
                                        
               *..M..;*   FILENAMEN SUCH
EN, L.NGE LESEN UND DANN DATEI SCHREIBEN
       *..M..;*                         
                                       *
.6N..;************************* M.F.****
********************************.<N..;.B
N..;.HN..;.YN..SCHREIBEN .READNAME; ZEIC
HEN IN BUFFER LESEN..N(. .SCHRBERR0;..N2
.;.BN<. .READNAMEB; ZEICHEN IN BASICBUFF
ER AUSWERTEN..NF. .SCHRBERR0; BEI FEHLER
 SPRINGE..NP.;.&OZ.SCHREIBTR .DIRNAME; P
R.FEN, OB 1. BUCHSTABE EIN SPACE.2OD. .#
" ";.RON. .SCHRBERR; JA, DANN FEHLER.XOX
.;..O.. .#11; Z.HLER ANZAHL ZEICHEN IN D
IRNAME..O..SCHREIB1 .DIRNAME,Y; DIRNAME-
ZEICHEN LADEN.QO.. .#"*"; IST DAS EIN JO
KER..O . .SCHRBERR; JA, FEHLER..P.. .#"?
"; IST DAS EIN JOKER.%P.. .SCHREIB2; JA,
 FEHLER.+P..;.VPH.SCHRBERR .RDNAMEERR; S
PRINGE AUSGABE ?.FPR.SCHRBERR0 ..MP.. ..
SP..;..P..SCHREIB2 .; ERNIEDRIGE Z.HLER.
.P.. .SCHREIB1; ALLE ZEICHEN .BERPR.FEN.
CP..;..P.. .READL.NGE; L.NGE DER DATEI V
ON CON:..Q.. .SCHRBERR0; BEI FEHLER..Q".
;. Q,. .SEARCHNAME.WQ6. .SCHREIBDV; DATE
I VORHANDEN -> SPRINGE, DA FALSCH.}Q@. .
#$1; FLAG F.R FEHLER (DIR VOLL)..QJ. .SC
HREIB3; A=0 -> ALLES OK.BQT. .JDISKFULL;
 A=1 -> DIR IST VOLL..Q^. .SCHRB7ERR; A=
FF -> LESEFEHLER..QH.;..RR.SCHREIBDV .PR
IMM; DATEI IST VORHANDEN.:R|. ..CR,7,".D
ATEI EXISTIERT.",EOM.AR.. ..HR.. ..NR..;
.DR..SCHREIB3 .DIRNAME..R..  ; UND ANFAN
GSBUCHSTABEN RETTEN..R.. .DIRNAME+1; ZWE
ITEN BUCHSTABEN RETTEN..RB.  .ARL.;..RV.
 .#$E5; GEL.SCHTE DATEI..S.. .DIRNAME; N
ACH GEL.SCHTER DATEI SUCHEN./S.. .#"*"; 
ANDERE ZEICHEN IGNORIEREN.?S.. .DIRNAME+
1.ES..;.~S.. .DIRFLAG; IST DIR 1 ODER DI
RTEIL 2,3,4 ETC GELADEN?..S.. .SCHREIB4;
 DIR 1 VORHANDEN, BRAUCHT MAN NICHT LADE
N..S.. .SEARCHN1B; UND NACH FREIEM PLATZ
 SUCHEN..T&. .SCHREIB5; BEI R.CKKEHR WEI
TERARBEITEN..T0.;.ZT:.SCHREIB4 .SEARCHN;
 ERST DIR 1 LADEN UND DANN NACH PLATZ SU
CHEN..TD.;                           ABE
R OHNEINQ-DISK.DTN.SCHREIB5 .SCHREIB7; G
EL.SCHTE DATEI GEFUNDEN (=$E5)..TX. .SCH
REIB7; WENN BISHER NOCH NICHT BENUTZT. P
LATZ GEF...UB.;.*UL.SCHREIB6 .; ANFANGSZ
EICHEN HOLEN.1UV. ..WU..JDISKFULL .DISKF
ULL; ALLE ANDEREN FEHLERMELDUNGEN = DISK
ETTE VOLL.}U..;..U..SCHREIB7 .; ZWEITES 
ZEICHEN DIRNAME HOLEN.PU.. .DIRNAME+1; U
ND ZUR.CKSPEICHERN.WU.. ...U.. .DIRNAME;
 EBENSO ERSTES ZEICHEN..V..;.#VF. .BUFFE
R; ZEIGER AUF DIRNAME.2VP.  ; RETTEN.AVZ
. .BUFFER+1.HV..  .NV..;.ZV.. .PRIMM.WV.
. ..CR,".... DATEI .",EOM..V.. .; FLAG K
EIN CR..V.. .PRINTNAME; DATEINAMEN AUSGE
BEN..V . .PRIMM..V*. ..". WIRD GESCHRIEB
EN.",EOM..V4.;..V>.;..WH. .FILEWR; DATEI
 SCHREIBEN.+WR. .SCHREIB8; KEIN FEHLER W
EITER.1W\.;.8WF. ..MWP. .; ZEIGER HOLEN.
SWZ.SCHRB7ERR .PRIMM; FEHLER AUSGEBEN..W
.. ..CR,7,"..DATEI KANN NICHT GESCHRIEBE
N WERDEN!.",EOM..W.. ...W.. ..AW..;.PW..
SCHREIB8 ...X.. .BUFFER+1; ZEIGER AUF NA
ME IN DIR VERBIEGEN..X.. ...XJ. .BUFFER.
.XT.;.CX.. .DIRCOPYSD; NAMEN IM DIR SPEI
CHERN.^X.. .; FLAG DIR SCHREIBEN..X.. .D
IRRW0; DIR SCHREIBEN OHNE INQ-DISK..X.. 
.SCHRB7ERR; FEHLER BEIM SCHREIBEN..X.. .
..X.. ..CX..;.IX$.;.OX..;.UX8.;..XB.;.)Y
L.; ************************************
***********************************.WYV.
; *                                     
                                *.EY`.; 
*       FILENAMEN SUCHEN UND DATEI AUF M
S-DOS L.SCHEN                 *..ZJ.; * 
                                        
                            *.AZT.; ****
****************************************
***************************.GZ~.;.MZ..;.
.Z..L.SCHEN .IOCLOSE..Z..L.SCHEN0 .PRIMM
..Z.. ..CR,"...DATEI L.SCHEN",CR,EOM..Z.
. .READNAME; DATEINAMEN EINLESEN..Z.. .L
.SCHERR..{D. .READNAMEB; DATEINAMEN AUSW
ERTEN."{N. .L.SCHERR.({X.;.A{..L.SCHENTR
 .SEARCHMSG.G{..;.X{.. .SEARCHNAME.W{.. 
.L.SCHEN2; DATEI GEFUNDEN.}{..;..{.. .PR
IMM..{.. ..CR,7,". DATEI NICHT GEFUNDEN.
",EOM.B{(.L.SCHERR ..I{2. ..O{<.;..{F.L.
SCHEN2 .DIRCOPYDS..{P. .#CR; LEERZEILE..
|Z. .BSOUT..|D. ..(|N. .PRINTNAME; OHNE 
CR.4|X. .PRIMM.X|.. ..". WIRKLICH L.SCHE
N?  .",EOM.Z|.. .BASIN; ZEICHEN VON TAST
ATUR..|.. .#"J"..| . .L.SCHERR; NICHT L.
SCHEN..|.. .PRIMM.H|.. ..CR,".DATEI .",E
OM.O|.. ...|H. .PRINTNAME; NAME OHNE CR.
.|R. .PRIMM..}.. ..". WIRD GEL.SCHT",EOM
..}..;.@}.. .BUFFER; ZEIGER AUF DATEINAM
EN.O}..  ; RETTEN.Z}.. .BUFFER+1; HI-BYT
E DES ZEIGERS RETTEN..}..  ; EBENFALLS R
ETTEN..}..;..}". .; FLAG LESEN.I},. .FAT
RDWR0; FAT EINLESEN.O}6.;..}@.L.SCHEN3 .
DIRCLUSTER; LO - CLUSTER LADEN..~J.  ; L
O SICHERN..~T. ..;~^. .DIRCLUSTER+1; HI-
CLUSTER LADEN.N~H.  ; HI SICHERN._~R. .;
 HI IN XR.F~|. ...~.. .L.SCHEN5; SN AUS 
FAT HOLEN..~..;..~..L.SCHEN4 .SNLONEW; L
O LADEN..~..  ; LO SICHERN.G~.. ...~.. .
SNHINEW; HI LADEN..~B.  ; HI SICHERN..L
. .; HI NACH XR..V. ..H..L.SCHEN5 .GET
SN; SN BEI A,X-REG AUS FAT NACH SNLO/HIN
EW.Y.. .; HI HOLEN.K.. .; UND IN XR.|
.. .; LO HOLEN....;.... .SNLO; UMKOPIE
REN.... .SNHI..&.;.G0. .SNHI; PR.FEN 
AUF SN =0..:. .L.SCHEN5B; UNGLEICH 0..
D.;...N. .; ZEIGER AUF DIRNAMEN VERWERFE
N...X. .;...B.;.A.L. .PRIMM; FEHLERMELDU
NG AUSGEBEN.O.V. ..7,CR,".FEHLER IN CLUS
TERKETTE.",CR,EOM.V... ..}... ......;...
..L.SCHEN5B .#0..... .CLUSTER.N... .CLUS
TER+1; CLUSTERVERKETTUNG L.SCHEN..... .S
TORESN0; ALTE CLUSTERNUMMER MIT $000 .BE
RSCHREIBEN...F. .SNHINEW.N.P. .MAXSN+1; 
ABFRAGE OB NEUE SN > $FF8 BZW. MAXSN IST
...Z. .L.SCHEN4; WENN NICHT, DANN N.CHST
E VERKETTUNG L.SCHEN..... .SNLONEW.Q... 
.MAXSN; DTO. LO.  MAXSN IST DIE H.CHSTE 
M.GLICHE SN.....;                       
    356 BEI 1571 UND 715 BEI 1581..... .
L.SCHEN4.$...;.M... .; ZEIGER AUF DIRNAM
EN ZUR.CKBIEGEN.E. . .BUFFER+1; HI-BYTE.
L.*. ....4. .BUFFER; LO-BYTE...>.;...H.L
.SCHEN6 .#$E5.J.R. .DIRNAME; DATEI ALS G
EL.SCHT KENNZEICHNEN...\. .DIRCOPYSD; DA
TEINAMEN VOM PUFFER IN FAT SCHREIBEN...F
. ..B.P. .DIRRW0; INHALTSVERZEICHNIS SPE
ICHERN OHNE INQ-DISK.Q.Z. .L.SCHEN7.P...
 .; BEI FEHLER RTS MIT SEC.V...;.....L.S
CHEN7 ...... .FATRDWR0; FAT SPEICHERN OH
NE INQ-DISK.....;.....;.C...;...J.; ****
****************************************
***************************._.T.; *     
                                        
                        *.....; *       
INHALTSVERZEICHNIS AUF DEM AKTUELLEN KAN
AL AUSGEBEN           *.....; *         
                                        
                    *.I...; ************
****************************************
*******************.O...;.U...;.[...;.A.
..;...$.DIR .IOCLOSE; STANDART I/O.....D
IR0 .PRIMM...8. ..CR,"..DIRECTORY :.",CR
,EOM...B.;.C.L. .#$01...V. .INQSTAT; FLA
G DISK INITIALISIEREN...`. .; XR = 0 ; D
IRTEIL 1.4.J.DIR1 .DIRFLAG; F.R DIRTEIL 
1, 2, 3 ODER 4.;.T. ..L.~. .DIRRW0; DIR 
LESEN; NUR BEIM 1.MAL INQ-DISK..... .DIR
2; KEIN LESEFEHLER..... .DIRERR; BEI LES
EFEHLER.....;.M...DIR2 .DIRPNTR; ZEIGER 
RICHTEN..... .DIRFLAG; FLAG F.R DIRTEIL.
.... .DIRINFO_AN,Y; ANZAHL DER SEKTOREN.
>.D. .; *2 NEHMEN, DA 1 SEKTOR = 2 PAGES
.].N. .; PAGES IN XR ALS Z.HLER.C.X.;.I.
..;.~...DIR3 .#0; OFFSET..... .(BUFFER),
Y; ANFANGSBUCHSTABE.H... .DIR3B; NOCH EI
NE DATEI VORHANDEN..... .DIREND; KEINE D
ATEI MEHR VORHANDEN.....;.....DIR3B .#$E
5; DATEI GEL.SCHT?.5.(. .DIR4; NEIN -> A
USGEBEN.^.2. .DIR8AA; N.CHSTE DATEI, DA 
GEL.SCHT.D.<.;.Y.F.DIR4 .(BUFFER),Y...P.
 .#127; NUR KLEINBUCHSTABEN...Z. .BSOUT;
 NAME AUSGEBEN...D. ..D.N. .#8...X. .DIR
4; NOCH NICHT ALLE ZEICHEN.....;.....;..
...DIR5 .#"."; PUNKT... . .BSOUT.....;.2
...DIR5B .(BUFFER),Y.>... .BSOUT.E.H. ..
I.R. .#11; ALLE ZEICHEN AUSGEGEBEN?.U...
 .DIR5B.{...;..... .PRIMM..... .."   ",E
OM.....;.P...DIR6 .(BUFFER),Y; 11. BYTE 
LADEN (STATUSBYTE)..... .#%00011000; FLA
G F.R VERZEICHNIS...". .DIR6B; WENN KEIN
 VERZEICHNIS ->.#.,.;.H.6. .#%00010000; 
UNTERVERZEICHNIS ?.{.@. .DIR6A; KEIN UNT
ER-, SONDERN HAUPTVERZEICHNIS...J.;...T.
 .PRIMM; UNTERVERZEICHNIS...^. .."<DIR>"
,EOM.O.H. .DIR8; N.CHSTER EINTRAG.U.R.;.
..|.DIR6A .PRIMM; HAUPTVERZEICHNIS..... 
.."<LAB>",EOM.(... .DIR8; N.CHSTER EINTR
AG.....;.4...;.E...DIR6B .PRIMM.V... .."
( $",EOM.`.B. .#31.Q.L. .(BUFFER),Y.X.V.
 ...... .(BUFFER),Y; HI-WORT IST =0.....
 .DIR7; JA -> SPRINGE.....;.E... .PRIMM.
Y... .."---- )",EOM..... .DIR8; N.CHSTEN
 EINTRAG.....;...&.DIR7 .; Y=29...0. ...
.:.  ; X-REGISTER RETTEN.R.D. .(BUFFER),
Y; HI-BYTE VON L.NGE.Y.N. ..`.X. ....B. 
.(BUFFER),Y; LO-BYTE VON L.NGE...L. .PUT
WORD; WORT + SPACE AUSGEBEN...V. .PRIMM.
D... ..")",EOM.J...;.Q... ...... .; X-RE
GISTER ZUR.CKHOLEN.....;..... .STOP.&...
 .DIR8; WENN STOP NICHT GEDR.CKT.O.F. .S
AVEBRK0; BEI STOP AUSGABE + CARRY.U.P.;.
..Z.DIR8 .DIR8A; VEKTOR ZUM UMBIEGEN AUF
 EIGENE ROUTINE, Z.B......;             
              UM DAS DATUM ODER FILEATTR
IBUTE AUSZUGEBEN.....;.....DIR8A .#CR; R
ETURN..... .BSOUT;.....;.!...DIR8AA .BUF
FER.(. . ..;.*. .#32; AD ++32.H.4. .BUFF
ER.T.>. .DIR8B._.H. .DIR3.S.R.DIR8B .BUF
FER+1...\. .; PAGES VON DIRTEIL...F. .DI
R9...P. .DIR3...Z.;.....DIR9 .DIRFLAG.B.
.. ..Q... .DIRPARTS..... .DIREND; SCHON 
DIRTEIL2 GELESEN..... .DIR1.....;.I...DI
REND .DIREND0; VEKTOR ZUM UMBIEGEN AUF E
IGENE ROUTINE, Z.B....J.;               
            UM DIE FREIEN BYTES AUF DER 
DISKETTE ANZUGEBEN...T.;.....DIREND0 .PR
IMM..... .."________________________.",C
R,EOM..... ......DIRERR ......;.....;.I.
..; ************************************
***********************************...$.
; *                                     
                                *.....; 
*       DATEI ALS 'L - 12345678.ABC' AUF
 GCR-DISK SPEICHERN           *.3.8.; * 
                                        
                            *...B.; ****
****************************************
***************************...L.;...V.;.
..`.;...J.;.A.T.SAVE .READNAME; DATEINAM
EN EINLESEN.O.~. .SAVEERR..... .READNAME
B; DATEINAMEN AUSWERTEN..... .SAVEERR; B
EI FEHLER SPRINGE.....;.F...SAVETR .SAVE
U; SPEICHERN VORBEREITEN.O... .ENDTEXTB;
 BANK DES TEXTENDES LADEN..... .SAVE2; E
NDE NOCH IN BANK0...D.;                 
          SONST BANK1...N.SAVE1 .#00; LO
 DER ENDADRESSE IN B0...X. .#MAXPAGE; HI
..... .#T2; ZEIGER AUF ANFANGSADRESSE.8.
.. .SAVES; DATEI SPEICHERN.F... .SAVEBRK
.U... .GTERRMSG.O... .SAVE1B; KEIN FEHLE
R..... .#63; FILE EXISTS..... .SAVEERR; 
ANDERE FEHLER...(. .SCRATCH.U.2. .SAVEER
R; DATEI NICHT GEL.SCHT...<.;...F. .SAVE
TR...P.;.+.Z.SAVE1B .SAVEU0; SPEICHERN V
ORBEREITEN OHNE L.NGENAUSGABE.W.D. .#"H"
; ZEICHEN F.R HI- TEIL DES TEXTES.S.N. .
XCNT; LETZTES ZEICHEN...X. .ENDTEXTB; AK
T. SPEICHERBANK (B1)..... .BA; AKT. BANK
.....;.K...SAVE2 .ENDTEXT; LO... . .ENDT
EXT+1; HI..... .#T2; ZEIGER AUF ANFANG..
... .SAVES; UND ABSPEICHERN.?... .SAVEBR
K; EVT ABBRUCH DURCH STOP.N.H. .GTERRMSG
.Z.R. .SAVE3.A... ..H... ..W...SAVE3 .#6
3..... .SAVEERR; ANDERE FEHLER..... .SCR
ATCH; FILE L.SCHEN.T... .SAVEERR; DATEI 
NICHT GEL.SCHT..... .ENDTEXTB; H.CHSTE S
PEICHERBANK.".". .SAVE1B; NUR BANK1, DAN
N NOCHEINMAL.F.,. .SAVETR;SONST NOCHEINM
AL BANK0.L.6.;.Z.@.SAVEBRK  .I.J. .GTERR
MSG.P.T. ....^. .SAVEERR; KEIN BENUTZERA
BBRUCH...H.;...R.SAVEBRK0 .PRIMM.X.|. ..
CR,7,".BENUTZERUNTERBRECHUNG.",EOM.....;
.....SAVEERR ...... ......;.....SCRATCH 
.XCNT; FLAGLO/HIBEREICH.-...  ; SICHERN.
9.B. .PRIMM._.L. ..".DATEI L.SCHEN (J/N)
 ? .",EOM...V.SCRATCH1 .BASIN; ZEICHEN V
ON TASTATUR HOLEN..... .SCRATCH1..... .#
"J"..... .SCRATCH1B..... ...... .; ZERO 
NICHT GESETZT, DA PLA.....;.....SCRATCH1
B .#"S";...&. .XCNT...0. .#":"./.:. .XCN
T+1; -> "S0:    ".8.D. .#0.\.N.SCRATCH2 
.DIRNAME,Y; UMKOPIEREN.K.X. .XCNT+6,Y.R.
B. ..{.L. .#8...V. .SCRATCH2.....;..... 
.#"."..... .XCNT+14; IN BUFFER SPEICHERN
.W...SCRATCH2B .DIRNAME,Y..... .XCNT+7,Y
; NAMENSERWEITERUNG SCHREIBEN..... .....
. .#12.$.F. .SCRATCH2B./.P. .#" ".:.Z. .
#"-".G... .XCNT+3.T... .XCNT+5.A... .XCN
T+4.H... ...... .XCNT+2; ENTW. 'L' OD. '
H'.....;... . .#0...*. .FNLEN...4. .BA..
.>. .FNBANK...H.;...R. .GNGCR; GER.TENUM
MER F.R GCR-DISK...\. .#15; DATEI #0,GN,
15...F. .SETLFS...P. .OPEN...Z.;.'... .#
0.4... .CHKOUT.:...;.C... .#0.X...SCRATC
H3 .XCNT,Y.D... .BSOUT.K... ....J. .#18;
 ALLE ZEICHEN .BERTRAGEN ?...T. .SCRATCH
3.....;..... .CLRCHN..... .#0.G... .CLOS
E.V... .GTERRMSG..... .#1; WENN GEL.SCHT
, DANN ZERO GESETZT..... ....$. ......;.
..8.;.!.B.;.'.L.;.E.V.;    -------------
----------------------- U -------------.
K.`.;...J.SAVEU .PRTL.NGE; ENDADRESSE UN
D BANK BERECHNEN UND AUSGEBEN...T.;...~.
SAVEU0 .GNGCR; AKTUELLE GER.TENUMMER (GC
R)  LADEN..... .FA; GER.TENUMMER..... .#
16.*... .FNLEN; L.NGE DES DATEINAMEN.3..
. .#0.M... .SA; SEKUND.RADRESSE.A... .BA
; AKT. BANK...D. .FNBANK; BANK DES FILEN
AMEN. .N. .STATUS; I/O STATUS 'ST'...X.;
.....; Y IST SCHON = 0.B...;.X...SAVEU1 
.DIRNAME,Y..... .XCNT+4,Y; NAMEN IN BUFF
ER UMKOPIEREN..... ...... .#8. ... .SAVE
U1.&.(.;.>.2. .#"."; PUNKT LADEN.A.<. .X
CNT+12; IN BUFFER SPEICHERN.W.F.SAVEU2 .
DIRNAME,Y...P. .XCNT+5,Y; NAMEN NACH PUN
KT WEITERSCHREIBEN...Z. ....D. .#12...N.
 .SAVEU2; WENN NICHT ALLE Z GESCHRIEBEN.
..X.;..... .#" "; SPACE..... .#"-"; BIND
ESTRICH."... .XCNT+1.B. . .XCNT+3;  ENTS
PRICHT ' - '.O... .XCNT+2.U...;.Y... .#"
L"; ZEICHEN F.R LO- BEREICH...H. .XCNT; 
IN BUFFER...R.;..... .#>(XCNT); HI-BYTE 
VON BUFFER.T... .FNADR+1; F.R FILENAME..
... .#<(XCNT); LO-BYTE..... .FNADR.....;
..... .#<(BUFFAD); LO BYTE.A... .T2; IN 
HILFSZEIGER F.R ANFANG TEXT.[.". .#>(BUF
FAD); HI BYTE.V.,. .T2+1; IN HILFSZEIGER
.|.6.;...@. ....J.;...T.;...^.;...H.;...
R.;...|.; ******************************
****************************************
*.= ..; *                               
                                      *.
. ..; *       DATEI ALS 'L - 12345678.AB
C' VON GCR-DISK LADEN               *.Y 
..; *                                   
                                  *.'...
; **************************************
*********************************.-...;.
3...;.9.B.;.\.L.LOAD .READNAME; NAMEN EI
NLESEN.~.V. .LOADERR; BEI FEHLER SPRINGE
.....;..... .READNAMEB; ZEICHEN IN BASIC
PUFFER AUSWERTEN.X... .LOADERR; BEI FEHL
ER SPRINGE.....;.....LOADTR .SAVEU0; LAD
EN VORBEREITEN..... .T2; LO.+... .T2+1; 
HI VON BUFFER.4.&. .#0.V.0. .SA; LADEN M
IT ADRESSVORGABE.M.:. .LOADS; UND LADEN.
Y.D. .LOAD1...N.LOADBRK .SAVEBRK; BEI BE
NUTZERUNTERBRECHUNG...X.;.G.B.LOAD1 .DIR
L.NGE; LO.R.L. .; HI.Y.V. ...... .#>(BUF
FAD); NUR DIE L.NGE BERECHNEN..... .DIRL
.NGE+1; HI - BYTE..... .GTERRMSG.S... .L
OAD2; KEIN FEHLER AUFGETRETEN.A...LOADER
R ..H... ..N...;...F.LOAD2 .SAVEU0...P. 
.#"H"...Z. .XCNT; 2. TEIL DER DATEI.....
 .#1; BANK1.B... .BA.O... .T2; LO..... .
T2+1; HI..... .#0..... .SA; SEKUND.RADRE
SSE... . .LOADS.&.*. .LOAD3; KEIN FEHLER
.A.4. .#4; FILE NOT FOUND ?.X.>. .LOAD4;
 JA -> SPRINGE, ABER L.NGE NICHT BERECHN
EN.~.H.;...R. .; FEHLER FLAG...\. .; UND
 ZUR.CK...F.;...P.;.G.Z.LOAD3 .; HI HOLE
N.N... ...... .#>(BUFFAD)..... .; HI....
. .; LO HOLEN..... ...... .DIRL.NGE; LO 
ADDIEREN.-... .DIRL.NGE.=.J. .; LO IN X.
H.T. .; HI.N... .DIRL.NGE+1; ADDIEREN + 
.BERTRAG.... .DIRL.NGE+1.....;.....LOAD
4 .GTERRMSG.....;..... .PRTL.NGE; L.NGE 
AUSGEBEN.R... .; KEIN FEHLER...$. .; UND
 ZUR.CK.....;...8.;...B.;...L.;.E.V.;***
****************************************
***********************...`.;*          
                                        
              *.U.J.;*        DATEINNAME
N SUCHEN:  NAME IN DIRNAME              
      *...T.;*                          
                                      *.
E.~.;************************* M.F.*****
*******************************.K...;.Q.
..;.W...;.....SEARCHNAME .#$01..... .INQ
STAT; DISK INITIALISIEREN.....SEARCHN .#
0; EINSPRUNG, WENN KEIN INQ-DISK...D.SEA
RCHN0 .DIRFLAG; ZUERST DIR1 BEARBEITEN..
.N.;.!.X.SEARCHN1 ..H... .DIRRW0; NUR BE
IM 1. MAL INQ-DISK.E... .SEARCHNERR; LES
EFEHLER.|...SEARCHN1B .DIRPNTR..... .DIR
FLAG; WIEVIELTER TEIL DES DIRS ?..... .D
IRINFO_AN,Y; ANZAHL DER SEKTOREN F.R DIE
SES DIRTEIL..... .; *2 NEHMEN, DA 1 SEKT
OR = 2 PAGES = 512 BYTES.+... .; ANZAHL 
IN XR.1.(.;.B.2. .#0; OFFSET.H.<.;.Z.F.S
EARCHN2 .(BUFFER),Y; DEN 1. BUCHSTABEN L
ADEN...P. .SEARCHNERR1; WENN = 0 DANN FE
HLER, DA DIRENDE...Z. .DIRNAME; STIMMT D
ER 1. BUCHSTABE .BEREIN...D. .SEARCHN5; 
JA, DANN ANDERE B. AUCH VERGLEICHEN...N.
;.H.X. .DIRNAME; 1. BUCHSTABEN AUS GESUC
HTEM NAMEN.F... .#"*"; IST DAS EIN JOKER
..... .SEARCHN2B; WENN KEIN *.....;... .
 .#$E5; IST DIESE GELADENE DATEI GEL.SCH
T ?..... .SEARCHNERR1; JA, DANN FEHLER #
1.....;.....;                         ; 
SONST DATEI GEFUNDEN./.H. .; OFFSET IN A
C.[.R. .SEARCHNAD; OFFSET ADDIEREN UND Z
UR.CK.A...;.....SEARCHNERR1 .; OFFSET IN
 AKKU..... .SEARCHNAD; PUFFER AUF EINTRA
G RICHTEN..... .#0; FLAG F.R DATEI NICHT
 GEFUNDEN ODER GEL.SCHT..... ...... .; M
IT FLAG FEHLER ZUR.CK.....;.?.".SEARCHN2
B .#"?"; IST DAS EIN PLATZHALTER?.{.,. .
SEARCHN5; JA, DANN DIE ANDEREN BUCHSTABE
N VERGLEICHEN...6.;...@.;               
          ; SONST N.CHSTER EINTRAG.G.J.S
EARCHN3 ..V.T.SEARCHN4 ....^. .#32; ZEIG
ER AUF N.CHSTEN BUCHSTABEN...H. .; UND Z
UR.CKSPEICHERN.K.R. .SEARCHN2; KEIN .BER
TRAG, N.CHSTER D-NAME.S.|. .BUFFER+1; SO
NST HI-ZEIGER ERH.HEN..... .; ALLE PAGES
 GELESEN ?..... .SEARCHN2; NEIN -> N.CHS
TER D-NAME.....;.....SEARCHN4B .DIRFLAG;
 DIR 1, 2, 3 ODER 4 ?..... .; ZEIGER AUF
 N.CHSTE PAGE.=... .DIRPARTS; ANZAHL DER
 DIRECTORY TEILE = MAX?.S.B. .SEARCHN0; 
IN DIRFLAG SPEICHERN UND WEITERSUCHEN.Y.
L.;...V.SEARCHNERR2 .#1; FLAG DIR VOLL, 
DATEI NICHT GEFUNDEN..... ..SKIP2.E...;.
....SEARCHNERR .#$FF; FLAG F.R LESEFEHLE
R..... .....  ..... ;.".. ;        -----
------------.(.& ;.S.0 SEARCHN5 .; REGIS
TER F.R OFFSET RETTEN.Z.:   .|.D  .; REG
ISTER F.R PAGES RETTEN...N   ...X ;...B 
 .#0; Z.HLER ANZAHL VERGLICHENE BYTES...
L SEARCHN6 .; Z.HLER AUF BYTE IN PAGE ER
H.HEN...V  .; Z.HLER VERGLICHENE BUCHSTA
BEN.1..  .#11; ALLE NAMENBYTES VERGLICHE
N ?.V..  .SEARCHN8; JA -> DATEI GEFUNDEN
....  .DIRNAME,X; X-TEN DIRBUCHSTABEN LA
DEN.... ;....  .#"*"; IST DAS BYTE EIN A
BSCHLIE.ENDER JOKER?.Y..  .SEARCHN8; JA 
-> GEFUNDEN.... ;...F  .#"?"; IST DAS BY
TE EIN ERSETZENDER JOKER?.E.P  .SEARCHN6
; JA -> N.CHSTEN BUCHSTABEN VERGLEICHEN.
K.Z ;.W..  .(BUFFER),Y; SONST MIT DIR VE
RGLEICHEN....  .SEARCHN6; WENN GLEICH, D
ANN N.CHSTEN B. VERGL..... ;....!SEARCHN
7 .; DAS IST NICHT DAS RICHTIGE FILE....
! .; X-REGISTER ZUR.CKHOLEN....! .; Y-RE
GISTER HOLEN -> WIRD DANN ERH.HT._. ! .S
EARCHN4; ZEIGER AUF N.CHSTEN NAMEN IN DI
R.E.*!;...4!;                     NAME G
EFUNDEN :...>!SEARCHN8 .; PAGE WO DATEIN
AME IST.L.H! .; OFFSET IN PAGE.R.R!;...\
!SEARCHNAD ....F! .BUFFER; ZEIGER UM OFF
SET ERH.HEN...P! .SEARCHN9; KEIN .BERTRA
G -> JMP.P.Z! .BUFFER+1; .BERTRAG ADDIER
EN.T..!SEARCHN9 .BUFFER; ZEIGER ZUR.CK..
..!SEARCHN10 .....! .....!;....!;....!;.
...!; +-+-+-+-+-+-+-+--+-+-+-+-+-+-+-+-+
-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+...J!;..
.T!;....!;    NAMEN KOPIEREN :.7..!;    
          DIR -> ZWISCHENSPEICHER.=..!;.
C..!;.I.."DIRCOPYDS .#31; ANZAHL ZEICHEN
 -1...."DIRCPDS1 .(BUFFER),Y...." .DIRNA
ME,Y...$" ....." .DIRCPDS1; ALLE ZEICHEN
 KOPIERT ?.F.8";.M.B" ..T.L" ..Z.V";...`
";.).J"; +-+-+-+-+-+-+-+--+-+-+-+-+-+-+-
+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+./.T"
;.5.~";.O..";    NAMEN KOPIEREN :.Z.."; 
             ZWISCHENSPEICHER -> DIR....
";....";...."DIRCOPYSD .#31; ANZAHL ZEIC
HEN -1.D.."DIRCPSD1 .DIRNAME,Y.U.D" .(BU
FFER),Y...N" ....X" .DIRCPSD1; ALLE ZEIC
HEN KOPIERT ?....";...." ....." .....#;.
#..#;.)..#;.M..#; +-+-+-+-+-+-+-+-+-+-+-
+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+.
..(#; ************************ O.F.*****
***************************...2#;.L.<#SE
ARCHMSG .PRIMM...F# ..CR,"SUCHE NACH ",E
OM...P# .; NAME MIT CR...Z# .PRINTNAME.7
.D# .; MITTEILUNG UND DATEINAMEN AUSGEBE
N.=.N#;...X#; +-+-+-+-+-+-+-+-+-+-+-+-+-
+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+....#
;....#;....#; DIRNAMEN AUSGEBEN, BEI SEC
 MIT CR... #;....#PRINTNAME .; CARRY-FLA
G F.R TEST CR RETTEN....# .#0....#PRINTN
1 .DIRNAME,Y.*.H# .#" "; IST DAS EIN SPA
CE ?.[.R# .PRINTN01; JA, DANN KEINE AUSG
ABE AUF KANAL.G..# .BSOUT.V..#PRINTN01 .
...# .#8....# .PRINTN1....$;.K..$ .DIRN
AME,Y; ERSTEN DATEIERG.NZUNGSBUCHSTABEN 
LADEN....$ .#" "; IST EINE DATEIERG.NZUN
G VORHANDEN ?.&."$ .PRINTN3; NEIN, DANN 
ENDE, KEIN PUNKT.1.,$ .#".".=.6$ .BSOUT.
C.@$;.Z.J$PRINTN2 .DIRNAME,Y.F.T$ .BSOUT
.M.^$ ..W.H$ .#11...R$ .PRINTN2...|$;...
.$PRINTN3 ..J..$ .PRINTN4; WENN KEIN CR 
ERW.NSCHT, DANN ENDE....$ .#CR; SONST LA
DE MIT CR....$ .BSOUT; UND AUF AKTUELLEN
 KANAL....$PRINTN4 .. ..$;.&.B$;.,.L$;.2
.V$;.8..$;.>..$;.D..$;.J..$;.P..%;....%;
++++++++++++++++++++++++++++++++++++++++
++++++++++++++++++++++++++....%;+       
                                        
                 +.(.&%;+     ANDERE QUE
LLTEXTTEILE EINBINDEN :                 
         +.P.0%;+                       
                                        
 +...:%;++++++++++++++++++++++++++++++++
++++++++++++++++++++++++++++++++++...D%;
.D.N%;...X%.."JANUS-INC.A 05"...B%.."JAN
US-INC.B 05/8"...L%;...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL