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

JANUS-INC.A 05

FILE INFORMATION

FILENAME(S): JANUS-INC.A 05

FILE TYPE(S): PRG

FILE SIZE: 18.3K

FIRST SEEN: 2025-10-20 14:31:10

APPEARS ON: 2 disk(s)

FILE HASH

d39af5b230a91da5757a7f86468d93dc16a95f4fef4a5aeb7583544c3f93415e

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
10002 JANUS-INC.A 05 PRG C64er, Treasure Chest - Klaus Der Suhler 25 2 DOWNLOAD FILE
10002 JANUS-INC.A 05 PRG DuncanTwain 25 2 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 61 5C 97 5C 64 00 3B 20  20 C4 49 45 53 45 20 C9  |a\.\d.;  .IESE .|
00000010: 4E 43 4C 55 44 45 44 41  54 45 49 20 48 45 49 BE  |NCLUDEDATEI HEI.|
00000020: 54 20 20 20 20 20 20 27  4A 41 4E 55 53 2D 49 4E  |T      'JANUS-IN|
00000030: 43 2E 41 20 30 33 27 00  BC 5C 6E 00 3B 20 20 C4  |C.A 03'..\n.;  .|
00000040: 41 54 55 4D 20 30 38 2E  30 38 2E 31 39 38 39 20  |ATUM 08.08.1989 |
00000050: 20 20 20 32 30 2E 30 30  20 D5 48 52 00 C2 5C 78  |   20.00 .HR..\x|
00000060: 00 3B 00 0A 5D 82 00 3B  2A 2A 2A 2A 2A 2A 2A 2A  |.;..]..;********|
00000070: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000080: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000090: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000000A0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 00 52 5D 8C 00 3B  |**********.R]..;|
000000B0: 2A 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |*               |
000000C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000F0: 20 2A 00 9A 5D 96 00 3B  2A 20 20 20 20 20 C6 49  | *..]..;*     .I|
00000100: 4C 45 20 4C 45 53 45 4E  3B 20 53 4E 20 41 55 53  |LE LESEN; SN AUS|
00000110: 20 44 49 52 20 4D 55 BE  20 49 4E 20 44 49 52 43  | DIR MU. IN DIRC|
00000120: 4C 55 53 54 45 52 20 26  5E 2B 31 20 53 45 49 4E  |LUSTER &^+1 SEIN|
00000130: 20 20 20 20 20 20 20 20  20 2A 00 E2 5D A0 00 3B  |         *..]..;|
00000140: 2A 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |*               |
00000150: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000160: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000170: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000180: 20 2A 00 2A 5E AA 00 3B  2A 2A 2A 2A 2A 2A 2A 2A  | *.*^..;********|
00000190: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000001A0: 2A 2A 2A 2A 2A 20 4D 2E  C6 2E 2A 2A 2A 2A 2A 2A  |***** M...******|
000001B0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000001C0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 00 30 5E B4 00 3B  |**********.0^..;|
000001D0: 00 36 5E BE 00 3B 00 3C  5E C8 00 3B 00 42 5E D2  |.6^..;.<^..;.B^.|
000001E0: 00 3B 00 48 5E DC 00 3B  00 55 5E E6 00 46 49 4C  |.;.H^..;.U^..FIL|
000001F0: 45 52 44 20 A6 00 88 5E  F0 00 20 97 46 41 54 52  |ERD ...^.. .FATR|
00000200: 44 57 52 30 3B 20 46 41  54 20 4E 41 43 48 20 42  |DWR0; FAT NACH B|
00000210: 55 46 41 44 20 4C 45 53  45 4E 20 4F 48 4E 45 20  |UFAD LESEN OHNE |
00000220: 49 4E 51 2D C4 49 53 4B  00 97 5E FA 00 20 B6 46  |INQ-.ISK..^.. .F|
00000230: 49 4C 45 52 44 45 31 00  9D 5E 04 01 3B 00 AB 5E  |ILERDE1..^..;..^|
00000240: 0E 01 20 97 53 45 54 50  4E 54 52 00 B1 5E 18 01  |.. .SETPNTR..^..|
00000250: 3B 00 BA 5E 22 01 20 81  23 30 00 C6 5E 2C 01 20  |;..^". .#0..^,. |
00000260: 82 4C BB 4E 47 45 00 E8  5E 36 01 20 82 4C BB 4E  |.L.NGE..^6. .L.N|
00000270: 47 45 2B 31 3B 20 C6 49  4C 45 4C BB 4E 47 45 20  |GE+1; .ILEL.NGE |
00000280: 41 55 46 20 4E 55 4C 4C  00 EE 5E 40 01 3B 00 FF  |AUF NULL..^@.;..|
00000290: 5E 4A 01 20 81 44 49 52  43 4C 55 53 54 45 52 00  |^J. .DIRCLUSTER.|
000002A0: 12 5F 54 01 20 83 44 49  52 43 4C 55 53 54 45 52  |._T. .DIRCLUSTER|
000002B0: 2B 31 00 18 5F 5E 01 3B  00 47 5F 68 01 46 49 4C  |+1.._^.;.G_h.FIL|
000002C0: 45 52 44 31 20 97 53 4E  43 41 4C 43 3B 20 41 55  |ERD1 .SNCALC; AU|
000002D0: 53 20 53 4E 20 53 49 2C  54 52 2C 53 45 20 42 45  |S SN SI,TR,SE BE|
000002E0: 52 45 43 48 4E 45 4E 00  6A 5F 72 01 20 B6 46 49  |RECHNEN.j_r. .FI|
000002F0: 4C 45 52 44 45 31 3B 20  42 45 49 20 C6 45 48 4C  |LERDE1; BEI .EHL|
00000300: 45 52 20 53 50 52 49 4E  47 45 00 8B 5F 7C 01 20  |ER SPRINGE.._|. |
00000310: 84 23 30 3B 20 DA BB 48  4C 45 52 20 C8 41 4C 42  |.#0; ..HLER .ALB|
00000320: 43 4C 55 53 54 45 52 20  3D 20 30 00 A1 5F 86 01  |CLUSTER = 0.._..|
00000330: 46 49 4C 45 52 44 33 20  81 43 41 4C 43 53 45 2C  |FILERD3 .CALCSE,|
00000340: 59 00 AE 5F 90 01 20 82  53 45 4B 54 4F 52 00 BD  |Y.._.. .SEKTOR..|
00000350: 5F 9A 01 20 81 43 41 4C  43 54 52 2C 59 00 C8 5F  |_.. .CALCTR,Y.._|
00000360: A4 01 20 82 53 50 55 52  00 D7 5F AE 01 20 81 43  |.. .SPUR.._.. .C|
00000370: 41 4C 43 53 49 2C 59 00  E3 5F B8 01 20 82 53 45  |ALCSI,Y.._.. .SE|
00000380: 49 54 45 00 E9 5F C2 01  3B 00 F0 5F CC 01 20 9A  |ITE.._..;.._.. .|
00000390: 00 F7 5F D6 01 20 A0 00  FD 5F E0 01 3B 00 16 60  |.._.. ..._..;..`|
000003A0: EA 01 20 97 52 45 41 44  30 3B 20 C2 4C 4F 43 4B  |.. .READ0; .LOCK|
000003B0: 20 4C 45 53 45 4E 00 1C  60 F4 01 3B 00 32 60 FE  | LESEN..`..;.2`.|
000003C0: 01 20 B6 46 49 4C 45 52  44 45 3B 20 C6 45 48 4C  |. .FILERDE; .EHL|
000003D0: 45 52 00 39 60 08 02 20  A1 00 42 60 12 02 20 85  |ER.9`.. ..B`.. .|
000003E0: 23 31 00 50 60 1C 02 20  B8 46 49 4C 45 52 44 34  |#1.P`.. .FILERD4|
000003F0: 00 57 60 26 02 20 9B 00  5E 60 30 02 20 9E 00 80  |.W`&. ..^`0. ...|
00000400: 60 3A 02 20 B7 46 49 4C  45 52 44 33 3B 20 53 50  |`:. .FILERD3; SP|
00000410: 52 49 4E 47 45 20 49 4D  4D 45 52 2C 44 41 20 59  |RINGE IMMER,DA Y|
00000420: 00 86 60 44 02 3B 00 94  60 4E 02 46 49 4C 45 52  |..`D.;..`N.FILER|
00000430: 44 34 20 A6 00 A2 60 58  02 20 81 4C BB 4E 47 45  |D4 ...`X. .L.NGE|
00000440: 2B 31 00 AB 60 62 02 20  86 23 34 00 CA 60 6C 02  |+1..`b. .#4..`l.|
00000450: 20 82 4C BB 4E 47 45 2B  31 3B 20 4C BB 4E 47 45  | .L.NGE+1; L.NGE|
00000460: 20 3D 20 5E 2B 20 31 30  32 34 00 D0 60 76 02 3B  | = ^+ 1024..`v.;|
00000470: 00 DE 60 80 02 20 81 53  4E 4C 4F 4E 45 57 00 EC  |..`.. .SNLONEW..|
00000480: 60 8A 02 20 83 53 4E 48  49 4E 45 57 00 1E 61 94  |`.. .SNHINEW..a.|
00000490: 02 20 97 47 45 54 53 4E  3B 20 53 4E 20 41 55 53  |. .GETSN; SN AUS|
000004A0: 20 46 41 54 20 48 4F 4C  45 4E 20 55 4E 44 20 4E  | FAT HOLEN UND N|
000004B0: 41 43 48 20 53 4E 4C 4F  2F 48 49 4E 45 57 00 24  |ACH SNLO/HINEW.$|
000004C0: 61 9E 02 3B 00 2F 61 A8  02 20 8B 23 24 30 46 00  |a..;./a.. .#$0F.|
000004D0: 3D 61 B2 02 20 B5 46 49  4C 45 52 44 31 00 48 61  |=a.. .FILERD1.Ha|
000004E0: BC 02 20 85 23 24 46 38  00 56 61 C6 02 20 B5 46  |.. .#$F8.Va.. .F|
000004F0: 49 4C 45 52 44 31 00 5C  61 D0 02 3B 00 70 61 DA  |ILERD1.\a..;.pa.|
00000500: 02 20 A6 3B 20 4B 45 49  4E 20 C6 45 48 4C 45 52  |. .; KEIN .EHLER|
00000510: 00 77 61 E4 02 20 A4 00  7D 61 EE 02 3B 00 83 61  |.wa.. ..}a..;..a|
00000520: F8 02 3B 00 91 61 02 03  46 49 4C 45 52 44 45 20  |..;..a..FILERDE |
00000530: A1 00 B4 61 0C 03 46 49  4C 45 52 44 45 31 20 A7  |...a..FILERDE1 .|
00000540: 3B 20 C6 45 48 4C 45 52  20 41 55 46 47 45 54 52  |; .EHLER AUFGETR|
00000550: 45 54 45 4E 00 BB 61 16  03 20 A4 00 C1 61 20 03  |ETEN..a.. ...a .|
00000560: 3B 00 C7 61 2A 03 3B 00  FE 61 34 03 3B 58 20 20  |;..a*.;..a4.;X  |
00000570: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000580: 20 20 20 20 20 58 20 20  20 20 20 20 20 20 20 20  |     X          |
00000590: 20 20 20 20 20 20 20 20  20 20 20 20 20 58 00 32  |             X.2|
000005A0: 62 3E 03 3B 20 20 20 58  20 20 20 20 20 20 20 20  |b>.;   X        |
000005B0: 20 20 20 20 20 20 20 20  20 58 20 20 20 20 20 58  |         X     X|
000005C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000005D0: 20 58 00 63 62 48 03 3B  20 20 20 20 20 20 58 20  | X.cbH.;      X |
000005E0: 20 20 20 20 20 20 20 20  20 20 58 20 20 20 20 20  |          X     |
000005F0: 20 20 20 20 20 20 58 20  20 20 20 20 20 20 20 20  |      X         |
00000600: 20 20 58 00 91 62 52 03  3B 20 20 20 20 20 20 20  |  X..bR.;       |
00000610: 20 20 58 20 20 20 20 20  58 20 20 20 20 20 20 20  |  X     X       |
00000620: 20 20 20 20 20 20 20 20  20 20 58 20 20 20 20 20  |          X     |
00000630: 58 00 BC 62 5C 03 3B 20  20 20 20 20 20 20 20 20  |X..b\.;         |
00000640: 20 20 20 58 20 20 20 20  20 20 20 20 20 20 20 20  |   X            |
00000650: 20 20 20 20 20 20 20 20  20 20 20 58 00 EA 62 66  |           X..bf|
00000660: 03 3B 20 20 20 20 20 20  20 20 20 58 20 20 20 20  |.;         X    |
00000670: 20 58 20 20 20 20 20 20  20 20 20 20 20 20 20 20  | X              |
00000680: 20 20 20 58 20 20 20 20  20 58 00 1B 63 70 03 3B  |   X     X..cp.;|
00000690: 20 20 20 20 20 20 58 20  20 20 20 20 20 20 20 20  |      X         |
000006A0: 20 20 58 20 20 20 20 20  20 20 20 20 20 20 58 20  |  X           X |
000006B0: 20 20 20 20 20 20 20 20  20 20 58 00 4F 63 7A 03  |          X.Ocz.|
000006C0: 3B 20 20 20 58 20 20 20  20 20 20 20 20 20 20 20  |;   X           |
000006D0: 20 20 20 20 20 20 58 20  20 20 20 20 58 20 20 20  |      X     X   |
000006E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 58 00  |              X.|
000006F0: 86 63 84 03 3B 58 20 20  20 20 20 20 20 20 20 20  |.c..;X          |
00000700: 20 20 20 20 20 20 20 20  20 20 20 20 20 58 20 20  |             X  |
00000710: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000720: 20 20 20 20 20 58 00 8C  63 8E 03 3B 00 D4 63 98  |     X..c..;..c.|
00000730: 03 3B 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |.;**************|
00000740: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000750: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000760: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000770: 2A 2A 2A 2A 00 1C 64 A2  03 3B 2A 20 20 20 20 20  |****..d..;*     |
00000780: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000790: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000007A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000007B0: 20 20 20 20 20 20 20 20  20 20 20 2A 00 64 64 AC  |           *.dd.|
000007C0: 03 3B 2A 20 20 20 20 20  20 C6 49 4C 45 20 53 43  |.;*      .ILE SC|
000007D0: 48 52 45 49 42 45 4E 2C  20 C6 49 4C 45 4C BB 4E  |HREIBEN, .ILEL.N|
000007E0: 47 45 20 49 4E 20 27 4C  BB 4E 47 45 27 20 20 20  |GE IN 'L.NGE'   |
000007F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000800: 20 20 20 2A 00 AC 64 B6  03 3B 2A 20 20 20 20 20  |   *..d..;*     |
00000810: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000820: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000830: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000840: 20 20 20 20 20 20 20 20  20 20 20 2A 00 F4 64 C0  |           *..d.|
00000850: 03 3B 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |.;**************|
00000860: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 20 4D 2E C6 2E  |*********** M...|
00000870: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000880: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000890: 2A 2A 2A 2A 00 FA 64 CA  03 3B 00 00 65 D4 03 3B  |****..d..;..e..;|
000008A0: 00 06 65 DE 03 3B 00 0C  65 E8 03 3B 00 12 65 F2  |..e..;..e..;..e.|
000008B0: 03 3B 00 24 65 FC 03 46  49 4C 45 57 52 20 81 4C  |.;.$e..FILEWR .L|
000008C0: BB 4E 47 45 00 33 65 06  04 20 82 44 49 52 4C BB  |.NGE.3e.. .DIRL.|
000008D0: 4E 47 45 00 41 65 10 04  20 81 4C BB 4E 47 45 2B  |NGE.Ae.. .L.NGE+|
000008E0: 31 00 52 65 1A 04 20 82  44 49 52 4C BB 4E 47 45  |1.Re.. .DIRL.NGE|
000008F0: 2B 31 00 58 65 24 04 3B  00 71 65 2E 04 20 81 23  |+1.Xe$.;.qe.. .#|
00000900: 30 3B 20 C1 4E 46 41 4E  47 53 5A 55 53 54 41 4E  |0; .NFANGSZUSTAN|
00000910: 44 00 82 65 38 04 20 82  43 4C 55 53 54 45 52 4F  |D..e8. .CLUSTERO|
00000920: 4C 44 00 95 65 42 04 20  82 43 4C 55 53 54 45 52  |LD..eB. .CLUSTER|
00000930: 4F 4C 44 2B 31 00 9B 65  4C 04 3B 00 B2 65 56 04  |OLD+1..eL.;..eV.|
00000940: 20 A6 3B 20 C6 4C 41 47  20 46 BD 52 20 4C 45 53  | .; .LAG F.R LES|
00000950: 45 4E 00 DD 65 60 04 20  97 46 41 54 52 44 57 52  |EN..e`. .FATRDWR|
00000960: 30 3B 20 C6 C1 D4 20 45  49 4E 4C 45 53 45 4E 20  |0; ... EINLESEN |
00000970: 4F 48 4E 45 20 C9 4E 51  2D C4 49 53 4B 00 00 66  |OHNE .NQ-.ISK..f|
00000980: 6A 04 20 B6 46 57 52 45  52 52 4F 52 3B 20 42 45  |j. .FWRERROR; BE|
00000990: 49 20 C6 45 48 4C 45 52  20 53 50 52 49 4E 47 45  |I .EHLER SPRINGE|
000009A0: 00 06 66 74 04 3B 00 2C  66 7E 04 20 97 53 45 54  |..ft.;.,f~. .SET|
000009B0: 50 4E 54 52 3B 20 DA 45  49 47 45 52 20 41 55 46  |PNTR; .EIGER AUF|
000009C0: 20 C1 4E 46 41 4E 47 20  D4 45 58 54 00 32 66 88  | .NFANG .EXT.2f.|
000009D0: 04 3B 00 55 66 92 04 20  81 23 32 3B 20 C1 4E 46  |.;.Uf.. .#2; .NF|
000009E0: 41 4E 47 53 2D D3 4E 20  C8 49 2D C2 59 54 45 20  |ANGS-.N .I-.YTE |
000009F0: 4C 41 44 45 4E 00 72 66  9C 04 20 82 43 4C 55 53  |LADEN.rf.. .CLUS|
00000A00: 54 45 52 3B 20 53 50 45  49 43 48 45 52 4E 20 55  |TER; SPEICHERN U|
00000A10: 4E 44 00 8E 66 A6 04 20  83 23 30 3B 20 CC 4F 2D  |ND..f.. .#0; .O-|
00000A20: C2 59 54 45 20 4C 41 44  45 4E 20 55 4E 44 00 B3  |.YTE LADEN UND..|
00000A30: 66 B0 04 20 88 43 4C 55  53 54 45 52 2B 31 3B 20  |f.. .CLUSTER+1; |
00000A40: 45 42 45 4E 46 41 4C 4C  53 20 53 50 45 49 43 48  |EBENFALLS SPEICH|
00000A50: 45 52 4E 00 B9 66 BA 04  3B 00 CC 66 C4 04 46 49  |ERN..f..;..f..FI|
00000A60: 4C 45 57 52 31 20 97 47  45 54 53 4E 00 D2 66 CE  |LEWR1 .GETSN..f.|
00000A70: 04 3B 00 E5 66 D8 04 20  85 23 30 3B 20 4C 4F 20  |.;..f.. .#0; LO |
00000A80: 3D 20 30 20 3F 00 F3 66  E2 04 20 B7 46 49 4C 45  |= 0 ?..f.. .FILE|
00000A90: 57 52 32 00 12 67 EC 04  20 8B 23 30 3B 20 49 53  |WR2..g.. .#0; IS|
00000AA0: 54 20 48 49 2D 53 4E 20  41 55 43 48 20 3D 20 30  |T HI-SN AUCH = 0|
00000AB0: 20 3F 00 4D 67 F6 04 20  B8 46 49 4C 45 57 52 42  | ?.Mg.. .FILEWRB|
00000AC0: 31 3B 20 57 45 4E 4E 20  4A 41 2C 20 46 52 45 49  |1; WENN JA, FREI|
00000AD0: 45 53 20 C3 4C 55 53 54  45 52 20 47 45 46 55 4E  |ES .LUSTER GEFUN|
00000AE0: 44 45 4E 2D 3E 20 53 50  52 49 4E 47 45 00 53 67  |DEN-> SPRINGE.Sg|
00000AF0: 00 05 3B 00 89 67 0A 05  46 49 4C 45 57 52 32 20  |..;..g..FILEWR2 |
00000B00: 8A 43 4C 55 53 54 45 52  3B 20 45 52 48 BC 48 45  |.CLUSTER; ERH.HE|
00000B10: 20 5A 55 20 BD 42 45 52  50 52 BD 46 45 4E 44 45  | ZU .BERPR.FENDE|
00000B20: 53 20 C3 4C 55 53 54 45  52 00 AD 67 14 05 20 B7  |S .LUSTER..g.. .|
00000B30: 46 49 4C 45 57 52 33 3B  20 4B 45 49 4E 20 DD 42  |FILEWR3; KEIN .B|
00000B40: 45 52 54 52 41 47 20 2D  3E 20 4A 4D 50 00 D0 67  |ERTRAG -> JMP..g|
00000B50: 1E 05 20 8A 43 4C 55 53  54 45 52 2B 31 3B 20 BD  |.. .CLUSTER+1; .|
00000B60: 42 45 52 54 52 41 47 20  41 44 44 49 45 52 45 4E  |BERTRAG ADDIEREN|
00000B70: 00 D6 67 28 05 3B 00 EB  67 32 05 46 49 4C 45 57  |..g(.;..g2.FILEW|
00000B80: 52 33 20 81 43 4C 55 53  54 45 52 00 FC 67 3C 05  |R3 .CLUSTER..g<.|
00000B90: 20 83 43 4C 55 53 54 45  52 2B 31 3B 00 0A 68 46  | .CLUSTER+1;..hF|
00000BA0: 05 20 8B 4D 41 58 53 4E  2B 31 00 18 68 50 05 20  |. .MAXSN+1..hP. |
00000BB0: B7 46 49 4C 45 57 52 31  00 1E 68 5A 05 3B 00 4B  |.FILEWR1..hZ.;.K|
00000BC0: 68 64 05 20 85 4D 41 58  53 4E 3B 20 4D 41 58 53  |hd. .MAXSN; MAXS|
00000BD0: 4E 20 2D 3E 20 41 4C 4C  45 20 C3 4C 55 53 54 45  |N -> ALLE .LUSTE|
00000BE0: 52 20 BD 42 45 52 50 52  BD 46 54 00 6D 68 6E 05  |R .BERPR.FT.mhn.|
00000BF0: 20 B5 46 49 4C 45 57 52  31 3B 20 4E 45 49 4E 2C  | .FILEWR1; NEIN,|
00000C00: 20 44 41 4E 4E 20 53 50  52 49 4E 47 45 00 73 68  | DANN SPRINGE.sh|
00000C10: 78 05 3B 00 A1 68 82 05  44 49 53 4B 46 55 4C 4C  |x.;..h..DISKFULL|
00000C20: 20 97 50 52 49 4D 4D 3B  20 53 4F 4E 53 54 20 47  | .PRIMM; SONST G|
00000C30: 49 42 20 44 45 4E 20 C6  45 48 4C 45 52 20 41 55  |IB DEN .EHLER AU|
00000C40: 53 00 C9 68 8C 05 20 2E  91 22 9E C6 45 48 4C 45  |S..h.. .."..EHLE|
00000C50: 52 3A 20 C4 49 53 4B 20  49 53 54 20 56 4F 4C 4C  |R: .ISK IST VOLL|
00000C60: 99 22 2C 43 52 2C 45 4F  4D 00 D8 68 96 05 46 57  |.",CR,EOM..h..FW|
00000C70: 52 45 52 52 4F 52 20 A7  00 DF 68 A0 05 20 A4 00  |RERROR ...h.. ..|
00000C80: E5 68 AA 05 3B 00 EB 68  B4 05 3B 00 FD 68 BE 05  |.h..;..h..;..h..|
00000C90: 46 49 4C 45 57 52 42 31  20 81 23 30 3B 00 29 69  |FILEWRB1 .#0;.)i|
00000CA0: C8 05 20 85 43 4C 55 53  54 45 52 4F 4C 44 3B 20  |.. .CLUSTEROLD; |
00000CB0: 49 53 54 20 44 41 53 20  44 41 53 20 45 52 53 54  |IST DAS DAS ERST|
00000CC0: 45 20 C3 4C 55 53 54 45  52 00 55 69 D2 05 20 B7  |E .LUSTER.Ui.. .|
00000CD0: 46 49 4C 45 57 52 42 32  3B 20 44 45 53 20 5A 55  |FILEWRB2; DES ZU|
00000CE0: 20 53 43 48 52 45 49 42  45 4E 44 45 4E 20 C6 49  | SCHREIBENDEN .I|
00000CF0: 4C 45 53 20 3F 00 82 69  DC 05 20 85 43 4C 55 53  |LES ?..i.. .CLUS|
00000D00: 54 45 52 4F 4C 44 2B 31  3B 20 57 45 4E 4E 20 4E  |TEROLD+1; WENN N|
00000D10: 49 43 48 54 2C 20 44 41  4E 4E 20 53 50 52 49 4E  |ICHT, DANN SPRIN|
00000D20: 47 45 00 9A 69 E6 05 20  B7 46 49 4C 45 57 52 42  |GE..i.. .FILEWRB|
00000D30: 32 3B 20 4E 41 43 48 20  5E 2C 00 A0 69 F0 05 3B  |2; NACH ^,..i..;|
00000D40: 00 CC 69 FA 05 20 81 43  4C 55 53 54 45 52 3B 20  |..i.. .CLUSTER; |
00000D50: 53 4F 4E 53 54 20 53 50  45 49 43 48 45 52 45 20  |SONST SPEICHERE |
00000D60: 44 49 45 20 C3 4C 55 53  54 45 52 2D 00 F9 69 04  |DIE .LUSTER-..i.|
00000D70: 06 20 82 44 49 52 43 4C  55 53 54 45 52 3B 20 4E  |. .DIRCLUSTER; N|
00000D80: 55 4D 4D 45 52 20 49 4D  20 C4 49 52 45 43 54 4F  |UMMER IM .IRECTO|
00000D90: 52 59 45 49 4E 54 52 41  47 00 09 6A 0E 06 20 81  |RYEINTRAG..j.. .|
00000DA0: 43 4C 55 53 54 45 52 2B  31 00 1C 6A 18 06 20 82  |CLUSTER+1..j.. .|
00000DB0: 44 49 52 43 4C 55 53 54  45 52 2B 31 00 52 6A 22  |DIRCLUSTER+1.Rj"|
00000DC0: 06 20 96 46 49 4C 45 57  52 43 31 3B 20 44 41 4E  |. .FILEWRC1; DAN|
00000DD0: 4E 20 53 50 52 49 4E 47  45 20 55 4D 20 41 55 46  |N SPRINGE UM AUF|
00000DE0: 20 C4 49 53 4B 20 5A 55  20 53 43 48 52 45 49 42  | .ISK ZU SCHREIB|
00000DF0: 45 4E 00 58 6A 2C 06 3B  00 8E 6A 36 06 46 49 4C  |EN.Xj,.;..j6.FIL|
00000E00: 45 57 52 42 32 20 97 53  54 4F 52 45 53 4E 3B 20  |EWRB2 .STORESN; |
00000E10: C3 4C 55 53 54 45 52 4E  55 4D 4D 45 52 20 49 4E  |.LUSTERNUMMER IN|
00000E20: 20 C6 C1 D4 20 53 50 45  49 43 48 45 52 4E 00 94  | ... SPEICHERN..|
00000E30: 6A 40 06 3B 00 9A 6A 4A  06 3B 00 B0 6A 54 06 46  |j@.;..jJ.;..jT.F|
00000E40: 49 4C 45 57 52 43 31 20  81 43 4C 55 53 54 45 52  |ILEWRC1 .CLUSTER|
00000E50: 00 C0 6A 5E 06 20 83 43  4C 55 53 54 45 52 2B 31  |..j^. .CLUSTER+1|
00000E60: 00 CD 6A 68 06 20 97 53  4E 43 41 4C 43 00 F0 6A  |..jh. .SNCALC..j|
00000E70: 72 06 20 B6 46 57 52 45  52 52 4F 52 3B 20 42 45  |r. .FWRERROR; BE|
00000E80: 49 20 C6 45 48 4C 45 52  20 53 50 52 49 4E 47 45  |I .EHLER SPRINGE|
00000E90: 00 F6 6A 7C 06 3B 00 17  6B 86 06 20 84 23 30 3B  |..j|.;..k.. .#0;|
00000EA0: 20 DA BB 48 4C 45 52 20  C8 41 4C 42 43 4C 55 53  | ..HLER .ALBCLUS|
00000EB0: 54 45 52 20 3D 20 30 00  2E 6B 90 06 46 49 4C 45  |TER = 0..k..FILE|
00000EC0: 57 52 43 32 20 81 43 41  4C 43 53 45 2C 59 00 51  |WRC2 .CALCSE,Y.Q|
00000ED0: 6B 9A 06 20 82 53 45 4B  54 4F 52 3B 20 C4 41 54  |k.. .SEKTOR; .AT|
00000EE0: 45 4E 20 44 45 53 20 4A  45 57 45 49 4C 49 47 45  |EN DES JEWEILIGE|
00000EF0: 4E 00 60 6B A4 06 20 81  43 41 4C 43 54 52 2C 59  |N.`k.. .CALCTR,Y|
00000F00: 00 7C 6B AE 06 20 82 53  50 55 52 3B 20 C8 41 4C  |.|k.. .SPUR; .AL|
00000F10: 42 43 4C 55 53 54 45 52  20 46 BD 52 00 8B 6B B8  |BCLUSTER F.R..k.|
00000F20: 06 20 81 43 41 4C 43 53  49 2C 59 00 A7 6B C2 06  |. .CALCSI,Y..k..|
00000F30: 20 82 53 45 49 54 45 3B  20 D2 45 41 44 20 53 50  | .SEITE; .EAD SP|
00000F40: 45 49 43 48 45 52 4E 00  AD 6B CC 06 3B 00 B4 6B  |EICHERN..k..;..k|
00000F50: D6 06 20 9A 00 CB 6B E0  06 20 A0 3B 20 DA BB 48  |.. ...k.. .; ..H|
00000F60: 4C 45 52 20 53 49 43 48  45 52 4E 00 D1 6B EA 06  |LER SICHERN..k..|
00000F70: 3B 00 EF 6B F4 06 20 97  57 52 49 54 45 30 3B 20  |;..k.. .WRITE0; |
00000F80: C2 4C 4F 43 4B 20 53 43  48 52 45 49 42 45 4E 00  |.LOCK SCHREIBEN.|
00000F90: F6 6B FE 06 20 A1 00 19  6C 08 07 20 B6 46 57 52  |.k.. ...l.. .FWR|
00000FA0: 45 52 52 4F 52 3B 20 42  45 49 20 C6 45 48 4C 45  |ERROR; BEI .EHLE|
00000FB0: 52 20 53 50 52 49 4E 47  45 00 1F 6C 12 07 3B 00  |R SPRINGE..l..;.|
00000FC0: 4A 6C 1C 07 20 85 23 31  3B 20 53 43 48 4F 4E 20  |Jl.. .#1; SCHON |
00000FD0: 42 45 49 44 45 20 C8 41  4C 42 43 4C 55 53 54 45  |BEIDE .ALBCLUSTE|
00000FE0: 52 20 47 45 4C 45 53 45  4E 3F 00 6B 6C 26 07 20  |R GELESEN?.kl&. |
00000FF0: B8 46 49 4C 45 57 52 43  33 3B 20 4A 41 2C 20 44  |.FILEWRC3; JA, D|
00001000: 41 4E 4E 20 53 50 52 49  4E 47 45 00 93 6C 30 07  |ANN SPRINGE..l0.|
00001010: 20 9B 3B 20 53 4F 4E 53  54 20 5A 57 45 49 54 45  | .; SONST ZWEITE|
00001020: 53 20 C8 41 4C 42 43 4C  55 53 54 45 52 20 4C 45  |S .ALBCLUSTER LE|
00001030: 53 45 4E 00 9A 6C 3A 07  20 9E 00 BD 6C 44 07 20  |SEN..l:. ...lD. |
00001040: B7 46 49 4C 45 57 52 43  32 3B 20 53 50 52 49 4E  |.FILEWRC2; SPRIN|
00001050: 47 45 20 49 4D 4D 45 52  2C 44 41 20 59 00 C3 6C  |GE IMMER,DA Y..l|
00001060: 4E 07 3B 00 FE 6C 58 07  46 49 4C 45 57 52 43 33  |N.;..lX.FILEWRC3|
00001070: 20 81 43 4C 55 53 54 45  52 3B 20 47 45 53 43 48  | .CLUSTER; GESCH|
00001080: 52 49 45 42 45 4E 45 53  20 C3 4C 55 53 54 45 52  |RIEBENES .LUSTER|
00001090: 20 49 4E 20 43 4C 55 53  54 45 52 4F 4C 44 00 0F  | IN CLUSTEROLD..|
000010A0: 6D 62 07 20 82 43 4C 55  53 54 45 52 4F 4C 44 00  |mb. .CLUSTEROLD.|
000010B0: 2B 6D 6C 07 20 81 43 4C  55 53 54 45 52 2B 31 3B  |+ml. .CLUSTER+1;|
000010C0: 20 55 4D 4B 4F 50 49 45  52 45 4E 00 3E 6D 76 07  | UMKOPIEREN.>mv.|
000010D0: 20 82 43 4C 55 53 54 45  52 4F 4C 44 2B 31 00 44  | .CLUSTEROLD+1.D|
000010E0: 6D 80 07 3B 00 53 6D 8A  07 46 49 4C 45 57 52 43  |m..;.Sm..FILEWRC|
000010F0: 34 20 A7 00 80 6D 94 07  20 81 4C BB 4E 47 45 2B  |4 ...m.. .L.NGE+|
00001100: 31 3B 20 47 45 53 43 48  52 49 45 42 45 4E 45 20  |1; GESCHRIEBENE |
00001110: CC BB 4E 47 45 20 55 4D  20 34 20 D0 41 47 45 53  |..NGE UM 4 .AGES|
00001120: 00 96 6D 9E 07 20 92 23  34 3B 20 45 52 4E 49 45  |..m.. .#4; ERNIE|
00001130: 44 52 49 47 45 4E 00 A4  6D A8 07 20 82 4C BB 4E  |DRIGEN..m.. .L.N|
00001140: 47 45 2B 31 00 D5 6D B2  07 20 B5 46 49 4C 45 57  |GE+1..m.. .FILEW|
00001150: 52 45 3B 20 57 45 4E 4E  20 41 4C 4C 45 20 42 59  |RE; WENN ALLE BY|
00001160: 54 45 53 20 BD 42 45 52  54 52 41 47 45 4E 20 2D  |TES .BERTRAGEN -|
00001170: 3E 20 4A 4D 50 00 09 6E  BC 07 20 B7 46 49 4C 45  |> JMP..n.. .FILE|
00001180: 57 52 44 3B 20 53 50 52  49 4E 47 45 2C 20 57 45  |WRD; SPRINGE, WE|
00001190: 4E 4E 20 48 49 3C 3E 30  20 49 53 54 2C 20 44 41  |NN HI<>0 IST, DA|
000011A0: 4E 4E 20 2D 3E 20 4A 4D  50 00 36 6E C6 07 20 81  |NN -> JMP.6n.. .|
000011B0: 4C BB 4E 47 45 3B 20 53  4F 4E 53 54 20 50 52 BD  |L.NGE; SONST PR.|
000011C0: 46 45 2C 20 4F 42 20 41  55 43 48 20 4C 4F 20 3D  |FE, OB AUCH LO =|
000011D0: 30 20 49 53 54 2E 00 73  6E D0 07 20 B8 46 49 4C  |0 IST..sn.. .FIL|
000011E0: 45 57 52 45 3B 20 57 45  4E 4E 20 4A 41 2C 20 44  |EWRE; WENN JA, D|
000011F0: 41 4E 4E 20 45 4E 44 45  2C 20 44 41 20 41 4C 4C  |ANN ENDE, DA ALL|
00001200: 45 20 C4 41 54 45 4E 20  47 45 53 43 48 52 49 45  |E .ATEN GESCHRIE|
00001210: 42 45 4E 00 79 6E DA 07  3B 00 AE 6E E4 07 46 49  |BEN.yn..;..n..FI|
00001220: 4C 45 57 52 44 20 96 46  49 4C 45 57 52 32 3B 20  |LEWRD .FILEWR2; |
00001230: 4E BB 43 48 53 54 45 53  20 46 52 45 49 45 53 20  |N.CHSTES FREIES |
00001240: C3 4C 55 53 54 45 52 20  53 55 43 48 45 4E 00 B4  |.LUSTER SUCHEN..|
00001250: 6E EE 07 3B 00 BA 6E F8  07 3B 00 E6 6E 02 08 46  |n..;..n..;..n..F|
00001260: 49 4C 45 57 52 45 20 81  23 24 46 46 3B 20 CB 45  |ILEWRE .#$FF; .E|
00001270: 4E 4E 4E 55 4D 4D 45 52  20 46 BD 52 20 C4 41 54  |NNNUMMER F.R .AT|
00001280: 45 49 45 4E 44 45 00 F4  6E 0C 08 20 82 43 4C 55  |EIENDE..n.. .CLU|
00001290: 53 54 45 52 00 16 6F 16  08 20 83 24 30 46 3B 20  |STER..o.. .$0F; |
000012A0: 53 4E 20 49 4E 20 C6 41  54 20 46 BD 52 20 C6 49  |SN IN .AT F.R .I|
000012B0: 4C 45 45 4E 44 45 00 26  6F 20 08 20 82 43 4C 55  |LEENDE.&o . .CLU|
000012C0: 53 54 45 52 2B 31 00 34  6F 2A 08 20 97 53 54 4F  |STER+1.4o*. .STO|
000012D0: 52 45 53 4E 00 3A 6F 34  08 3B 00 49 6F 3E 08 46  |RESN.:o4.;.Io>.F|
000012E0: 49 4C 45 57 52 45 31 20  A7 00 7E 6F 48 08 20 96  |ILEWRE1 ..~oH. .|
000012F0: 46 41 54 52 44 57 52 30  3B 20 C6 41 54 20 41 55  |FATRDWR0; .AT AU|
00001300: 46 20 C4 49 53 4B 20 53  43 48 52 45 49 42 45 4E  |F .ISK SCHREIBEN|
00001310: 20 4F 48 4E 45 20 44 49  53 4B 2D 49 4E 51 00 84  | OHNE DISK-INQ..|
00001320: 6F 52 08 3B 00 8A 6F 5C  08 3B 00 90 6F 66 08 3B  |oR.;..o\.;..of.;|
00001330: 00 D8 6F 70 08 3B 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |..op.;**********|
00001340: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00001350: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00001360: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00001370: 2A 2A 2A 2A 2A 2A 2A 2A  00 20 70 7A 08 3B 2A 20  |********. pz.;* |
00001380: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001390: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000013A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000013B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2A  |               *|
000013C0: 00 68 70 84 08 3B 2A 20  20 20 20 20 20 20 20 D3  |.hp..;*        .|
000013D0: 45 4B 54 4F 52 4E 52 2E  20 41 55 53 20 C6 C1 D4  |EKTORNR. AUS ...|
000013E0: 20 4C 45 53 45 4E 20 55  4E 44 20 4E 45 55 45 20  | LESEN UND NEUE |
000013F0: D3 4E 20 42 45 52 45 43  48 4E 45 4E 20 20 20 20  |.N BERECHNEN    |
00001400: 20 20 20 20 20 20 20 2A  00 B0 70 8E 08 3B 2A 20  |       *..p..;* |
00001410: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001420: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001430: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001440: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2A  |               *|
00001450: 00 F8 70 98 08 3B 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |..p..;**********|
00001460: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 20  |*************** |
00001470: 4F 2E C6 2E 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |O...************|
00001480: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00001490: 2A 2A 2A 2A 2A 2A 2A 2A  00 FE 70 A2 08 3B 00 04  |********..p..;..|
000014A0: 71 AC 08 3B 00 0A 71 B6  08 3B 00 10 71 C0 08 3B  |q..;..q..;..q..;|
000014B0: 00 16 71 CA 08 3B 00 53  71 D4 08 3B 20 20 20 20  |..q..;.Sq..;    |
000014C0: 20 D3 45 4B 54 4F 52 4E  4E 52 2E 20 41 55 53 20  | .EKTORNNR. AUS |
000014D0: C6 C1 D4 20 4C 45 53 45  4E 2C 20 20 20 20 41 4C  |... LESEN,    AL|
000014E0: 54 45 20 D3 CE 20 49 4E  20 53 4E 4C 4F 2C 20 53  |TE .. IN SNLO, S|
000014F0: 4E 48 49 00 59 71 DE 08  3B 00 5F 71 E8 08 3B 00  |NHI.Yq..;._q..;.|
00001500: 94 71 F2 08 3B 20 20 C8  49 2D C2 59 54 45 20 49  |.q..;  .I-.YTE I|
00001510: 4E 20 D8 2D D2 45 47 49  53 54 45 52 2C 20 CC 4F  |N .-.EGISTER, .O|
00001520: 2D C2 59 54 45 20 49 4E  20 C1 4B 4B 55 4D 55 4C  |-.YTE IN .KKUMUL|
00001530: 41 54 4F 52 00 9A 71 FC  08 3B 00 AA 71 06 09 47  |ATOR..q..;..q..G|
00001540: 45 54 53 4E 20 82 53 4E  4C 4F 00 B5 71 10 09 20  |ETSN .SNLO..q.. |
00001550: 88 53 4E 48 49 00 BB 71  1A 09 3B 00 D6 71 24 09  |.SNHI..q..;..q$.|
00001560: 3B 20 45 49 47 45 4E 54  4C 49 43 48 45 20 D2 4F  |; EIGENTLICHE .O|
00001570: 55 54 49 4E 45 3A 00 DC  71 2E 09 3B 00 EF 71 38  |UTINE:..q..;..q8|
00001580: 09 47 45 54 53 4E 30 20  97 47 54 53 54 53 4E 00  |.GETSN0 .GTSTSN.|
00001590: 15 72 42 09 20 B6 47 54  53 4E 4F 44 44 3B 20 57  |.rB. .GTSNODD; W|
000015A0: 45 4E 4E 20 55 4E 47 45  52 41 44 45 20 44 41 4E  |ENN UNGERADE DAN|
000015B0: 4E 20 4A 4D 50 00 1B 72  4C 09 3B 00 45 72 56 09  |N JMP..rL.;.ErV.|
000015C0: 47 54 53 4E 45 56 45 4E  20 81 28 46 41 54 29 2C  |GTSNEVEN .(FAT),|
000015D0: 59 3B 20 53 4E 4C 4F 20  41 55 53 20 46 41 54 20  |Y; SNLO AUS FAT |
000015E0: 4C 41 44 45 4E 00 62 72  60 09 20 82 53 4E 4C 4F  |LADEN.br`. .SNLO|
000015F0: 4E 45 57 3B 20 55 4E 44  20 53 50 45 49 43 48 45  |NEW; UND SPEICHE|
00001600: 52 4E 00 7C 72 6A 09 20  8A 46 41 54 3B 20 45 49  |RN.|rj. .FAT; EI|
00001610: 4E 20 C2 59 54 45 20 48  BC 48 45 52 00 A6 72 74  |N .YTE H.HER..rt|
00001620: 09 20 B7 47 45 54 53 4E  33 3B 20 57 45 4E 4E 20  |. .GETSN3; WENN |
00001630: 4B 45 49 4E 20 DD 42 45  52 4C 41 55 46 20 44 41  |KEIN .BERLAUF DA|
00001640: 4E 4E 20 4A 4D 50 00 C9  72 7E 09 20 8A 46 41 54  |NN JMP..r~. .FAT|
00001650: 2B 31 3B 20 53 4F 4E 53  54 20 C8 49 2D C2 59 54  |+1; SONST .I-.YT|
00001660: 45 20 45 52 48 BC 48 45  4E 00 CF 72 88 09 3B 00  |E ERH.HEN..r..;.|
00001670: F1 72 92 09 47 45 54 53  4E 33 20 81 28 46 41 54  |.r..GETSN3 .(FAT|
00001680: 29 2C 59 3B 20 48 49 42  59 54 45 20 4C 41 44 45  |),Y; HIBYTE LADE|
00001690: 4E 00 1E 73 9C 09 20 87  23 25 30 30 30 30 31 31  |N..s.. .#%000011|
000016A0: 31 31 3B 20 55 4E 54 45  52 45 53 20 C8 41 4C 42  |11; UNTERES .ALB|
000016B0: 2D C2 59 54 45 20 41 55  53 4D 41 53 4B 2E 00 3B  |-.YTE AUSMASK..;|
000016C0: 73 A6 09 20 82 53 4E 48  49 4E 45 57 3B 20 55 4E  |s.. .SNHINEW; UN|
000016D0: 44 20 53 50 45 49 43 48  45 52 4E 00 42 73 B0 09  |D SPEICHERN.Bs..|
000016E0: 20 99 00 50 73 BA 09 20  81 53 4E 4C 4F 4E 45 57  | ..Ps.. .SNLONEW|
000016F0: 00 57 73 C4 09 20 A4 00  88 73 CE 09 3B 20 20 20  |.Ws.. ...s..;   |
00001700: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001710: 20 20 20 20 20 20 20 20  2D 2D 2D 2D 2D 2D 2D 2D  |        --------|
00001720: 2D 2D 2D 2D 2D 2D 2D 2D  00 AE 73 D8 09 47 54 53  |--------..s..GTS|
00001730: 4E 4F 44 44 20 81 28 46  41 54 29 2C 59 3B 20 C8  |NODD .(FAT),Y; .|
00001740: 41 4C 42 2D C2 59 54 45  20 4C 41 44 45 4E 00 D3  |ALB-.YTE LADEN..|
00001750: 73 E2 09 20 82 53 4E 48  49 4E 45 57 3B 20 55 4E  |s.. .SNHINEW; UN|
00001760: 44 20 5A 57 49 53 43 48  45 4E 53 50 45 49 43 48  |D ZWISCHENSPEICH|
00001770: 45 52 4E 00 E9 73 EC 09  20 8A 46 41 54 3B 20 DA  |ERN..s.. .FAT; .|
00001780: 45 49 47 45 52 3D 5E 2B  31 00 10 74 F6 09 20 B7  |EIGER=^+1..t.. .|
00001790: 47 45 54 53 4E 34 3B 20  57 45 4E 4E 20 4B 45 49  |GETSN4; WENN KEI|
000017A0: 4E 20 DD 42 45 52 54 52  41 47 20 2D 3E 4A 4D 50  |N .BERTRAG ->JMP|
000017B0: 00 35 74 00 0A 20 8A 46  41 54 2B 31 3B 20 53 4F  |.5t.. .FAT+1; SO|
000017C0: 4E 53 54 20 DD 42 45 52  54 52 41 47 20 41 44 44  |NST .BERTRAG ADD|
000017D0: 49 45 52 45 4E 00 5D 74  0A 0A 47 45 54 53 4E 34  |IEREN.]t..GETSN4|
000017E0: 20 81 28 46 41 54 29 2C  59 3B 20 C8 41 4C 42 2D  | .(FAT),Y; .ALB-|
000017F0: C2 59 54 45 20 4C 4F 20  4C 41 44 45 4E 00 7A 74  |.YTE LO LADEN.zt|
00001800: 14 0A 20 82 53 4E 4C 4F  4E 45 57 3B 20 55 4E 44  |.. .SNLONEW; UND|
00001810: 20 53 50 45 49 43 48 45  52 4E 00 80 74 1E 0A 3B  | SPEICHERN..t..;|
00001820: 00 A2 74 28 0A 47 45 54  53 4E 35 20 84 23 34 3B  |..t(.GETSN5 .#4;|
00001830: 20 4C 4F 2B 48 49 20 41  55 46 42 45 52 45 49 54  | LO+HI AUFBEREIT|
00001840: 45 4E 00 B6 74 32 0A 47  45 54 53 4E 36 20 90 53  |EN..t2.GETSN6 .S|
00001850: 4E 48 49 4E 45 57 00 C4  74 3C 0A 20 90 53 4E 4C  |NHINEW..t<. .SNL|
00001860: 4F 4E 45 57 00 CA 74 46  0A 3B 00 E1 74 50 0A 20  |ONEW..tF.;..tP. |
00001870: A3 3B 20 34 C2 49 54 53  20 52 4F 54 49 45 52 45  |.; 4.ITS ROTIERE|
00001880: 4E 00 EE 74 5A 0A 20 B7  47 45 54 53 4E 36 00 FC  |N..tZ. .GETSN6..|
00001890: 74 64 0A 20 90 53 4E 48  49 4E 45 57 00 02 75 6E  |td. .SNHINEW..un|
000018A0: 0A 3B 00 1F 75 78 0A 20  81 53 4E 48 49 4E 45 57  |.;..ux. .SNHINEW|
000018B0: 3B 20 C8 49 2D C2 59 54  45 20 4C 41 44 45 4E 00  |; .I-.YTE LADEN.|
000018C0: 48 75 82 0A 20 87 23 25  30 30 30 30 31 31 31 31  |Hu.. .#%00001111|
000018D0: 3B 20 55 4E 54 45 52 45  53 20 C8 41 4C 42 42 59  |; UNTERES .ALBBY|
000018E0: 54 45 20 41 55 53 4D 2E  00 65 75 8C 0A 20 82 53  |TE AUSM..eu.. .S|
000018F0: 4E 48 49 4E 45 57 3B 20  55 4E 44 20 53 50 45 49  |NHINEW; UND SPEI|
00001900: 43 48 45 52 4E 00 6C 75  96 0A 20 99 00 7A 75 A0  |CHERN.lu.. ..zu.|
00001910: 0A 20 81 53 4E 4C 4F 4E  45 57 00 81 75 AA 0A 20  |. .SNLONEW..u.. |
00001920: A4 00 87 75 B4 0A 3B 00  8D 75 BE 0A 3B 00 C4 75  |...u..;..u..;..u|
00001930: C8 0A 3B 58 20 20 20 20  20 20 20 20 20 20 20 20  |..;X            |
00001940: 20 20 20 20 20 20 20 20  20 20 20 58 20 20 20 20  |           X    |
00001950: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001960: 20 20 20 58 00 F8 75 D2  0A 3B 20 20 20 58 20 20  |   X..u..;   X  |
00001970: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 58  |               X|
00001980: 20 20 20 20 20 58 20 20  20 20 20 20 20 20 20 20  |     X          |
00001990: 20 20 20 20 20 20 20 58  00 29 76 DC 0A 3B 20 20  |       X.)v..;  |
000019A0: 20 20 20 20 58 20 20 20  20 20 20 20 20 20 20 20  |    X           |
000019B0: 58 20 20 20 20 20 20 20  20 20 20 20 58 20 20 20  |X           X   |
000019C0: 20 20 20 20 20 20 20 20  58 00 57 76 E6 0A 3B 20  |        X.Wv..; |
000019D0: 20 20 20 20 20 20 20 20  58 20 20 20 20 20 58 20  |        X     X |
000019E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000019F0: 58 20 20 20 20 20 58 00  82 76 F0 0A 3B 20 20 20  |X     X..v..;   |
00001A00: 20 20 20 20 20 20 20 20  20 58 20 20 20 20 20 20  |         X      |
00001A10: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001A20: 20 58 00 B0 76 FA 0A 3B  20 20 20 20 20 20 20 20  | X..v..;        |
00001A30: 20 58 20 20 20 20 20 58  20 20 20 20 20 20 20 20  | X     X        |
00001A40: 20 20 20 20 20 20 20 20  20 58 20 20 20 20 20 58  |         X     X|
00001A50: 00 E1 76 04 0B 3B 20 20  20 20 20 20 58 20 20 20  |..v..;      X   |
00001A60: 20 20 20 20 20 20 20 20  58 20 20 20 20 20 20 20  |        X       |
00001A70: 20 20 20 20 58 20 20 20  20 20 20 20 20 20 20 20  |    X           |
00001A80: 58 00 15 77 0E 0B 3B 20  20 20 58 20 20 20 20 20  |X..w..;   X     |
00001A90: 20 20 20 20 20 20 20 20  20 20 20 20 58 20 20 20  |            X   |
00001AA0: 20 20 58 20 20 20 20 20  20 20 20 20 20 20 20 20  |  X             |
00001AB0: 20 20 20 20 58 00 4C 77  18 0B 3B 58 20 20 20 20  |    X.Lw..;X    |
00001AC0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001AD0: 20 20 20 58 20 20 20 20  20 20 20 20 20 20 20 20  |   X            |
00001AE0: 20 20 20 20 20 20 20 20  20 20 20 58 00 52 77 22  |           X.Rw"|
00001AF0: 0B 3B 00 58 77 2C 0B 3B  00 A0 77 36 0B 3B 2A 2A  |.;.Xw,.;..w6.;**|
00001B00: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00001B10: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00001B20: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00001B30: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00001B40: 00 E8 77 40 0B 3B 2A 20  20 20 20 20 20 20 20 20  |..w@.;*         |
00001B50: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001B60: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001B70: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001B80: 20 20 20 20 20 20 20 2A  00 30 78 4A 0B 3B 2A 20  |       *.0xJ.;* |
00001B90: 20 20 20 20 20 20 20 D3  45 4B 54 4F 52 4E 52 2E  |       .EKTORNR.|
00001BA0: 20 49 4E 20 C6 C1 D4 20  53 43 48 52 45 49 42 45  | IN ... SCHREIBE|
00001BB0: 4E 20 42 45 49 20 43 4C  55 53 54 45 52 4F 4C 44  |N BEI CLUSTEROLD|
00001BC0: 3B 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2A  |;              *|
00001BD0: 00 78 78 54 0B 3B 2A 20  20 20 20 20 20 20 20 49  |.xxT.;*        I|
00001BE0: 4E 20 C3 4C 55 53 54 45  52 20 49 53 54 20 44 49  |N .LUSTER IST DI|
00001BF0: 45 20 5A 55 20 53 43 48  52 45 49 42 45 4E 44 45  |E ZU SCHREIBENDE|
00001C00: 20 D3 45 4B 54 4F 52 4E  55 4D 4D 45 52 20 20 20  | .EKTORNUMMER   |
00001C10: 20 20 20 20 20 20 20 2A  00 C0 78 5E 0B 3B 2A 2A  |       *..x^.;**|
00001C20: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00001C30: 2A 2A 2A 2A 2A 2A 2A 20  4F 2E C6 2E 2A 2A 2A 2A  |******* O...****|
00001C40: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00001C50: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00001C60: 00 C6 78 68 0B 3B 00 CC  78 72 0B 3B 00 D2 78 7C  |..xh.;..xr.;..x||
00001C70: 0B 3B 00 D8 78 86 0B 3B  00 DE 78 90 0B 3B 00 1D  |.;..x..;..x..;..|
00001C80: 79 9A 0B 3B 20 20 20 20  20 D3 45 4B 54 4F 52 4E  |y..;     .EKTORN|
00001C90: 4E 52 2E 20 49 4E 20 C6  C1 D4 20 53 43 48 52 45  |NR. IN ... SCHRE|
00001CA0: 49 42 45 4E 2C 20 20 20  C1 44 52 45 53 53 45 20  |IBEN,   .DRESSE |
00001CB0: 49 4E 20 43 4C 55 53 54  45 52 4F 4C 44 00 23 79  |IN CLUSTEROLD.#y|
00001CC0: A4 0B 3B 00 29 79 AE 0B  3B 00 2F 79 B8 0B 3B 00  |..;.)y..;./y..;.|
00001CD0: 35 79 C2 0B 3B 00 4D 79  CC 0B 53 54 4F 52 45 53  |5y..;.My..STORES|
00001CE0: 4E 20 81 43 4C 55 53 54  45 52 4F 4C 44 00 58 79  |N .CLUSTEROLD.Xy|
00001CF0: D6 0B 20 82 53 4E 4C 4F  00 6B 79 E0 0B 20 83 43  |.. .SNLO.ky.. .C|
00001D00: 4C 55 53 54 45 52 4F 4C  44 2B 31 00 76 79 EA 0B  |LUSTEROLD+1.vy..|
00001D10: 20 88 53 4E 48 49 00 7C  79 F4 0B 3B 00 8C 79 FE  | .SNHI.|y..;..y.|
00001D20: 0B 20 81 43 4C 55 53 54  45 52 2B 31 00 9D 79 08  |. .CLUSTER+1..y.|
00001D30: 0C 20 87 23 25 30 30 30  30 31 31 31 31 00 AD 79  |. .#%00001111..y|
00001D40: 12 0C 20 82 43 4C 55 53  54 45 52 2B 31 00 B3 79  |.. .CLUSTER+1..y|
00001D50: 1C 0C 3B 00 B9 79 26 0C  3B 00 D4 79 30 0C 3B 20  |..;..y&.;..y0.; |
00001D60: 45 49 47 45 4E 54 4C 49  43 48 45 20 D2 4F 55 54  |EIGENTLICHE .OUT|
00001D70: 49 4E 45 3A 00 DA 79 3A  0C 3B 00 EF 79 44 0C 53  |INE:..y:.;..yD.S|
00001D80: 54 4F 52 45 53 4E 30 20  97 47 54 53 54 53 4E 00  |TORESN0 .GTSTSN.|
00001D90: 15 7A 4E 0C 20 B6 53 54  53 4E 4F 44 44 3B 20 57  |.zN. .STSNODD; W|
00001DA0: 45 4E 4E 20 55 4E 47 45  52 41 44 45 20 44 41 4E  |ENN UNGERADE DAN|
00001DB0: 4E 20 4A 4D 50 00 1B 7A  58 0C 3B 00 3D 7A 62 0C  |N JMP..zX.;.=zb.|
00001DC0: 53 54 53 4E 45 56 45 4E  20 81 43 4C 55 53 54 45  |STSNEVEN .CLUSTE|
00001DD0: 52 3B 20 53 4E 4C 4F 20  4C 41 44 45 4E 00 61 7A  |R; SNLO LADEN.az|
00001DE0: 6C 0C 20 97 53 54 53 4E  46 41 54 3B 20 55 4E 44  |l. .STSNFAT; UND|
00001DF0: 20 49 4E 20 46 41 54 20  53 50 45 49 43 48 45 52  | IN FAT SPEICHER|
00001E00: 4E 00 7B 7A 76 0C 20 8A  46 41 54 3B 20 45 49 4E  |N.{zv. .FAT; EIN|
00001E10: 20 C2 59 54 45 20 48 BC  48 45 52 00 A8 7A 80 0C  | .YTE H.HER..z..|
00001E20: 20 B7 53 54 53 4E 45 56  45 4E 31 3B 20 57 45 4E  | .STSNEVEN1; WEN|
00001E30: 4E 20 4B 45 49 4E 20 DD  42 45 52 4C 41 55 46 20  |N KEIN .BERLAUF |
00001E40: 44 41 4E 4E 20 4A 4D 50  00 CB 7A 8A 0C 20 8A 46  |DANN JMP..z.. .F|
00001E50: 41 54 2B 31 3B 20 53 4F  4E 53 54 20 C8 49 2D C2  |AT+1; SONST .I-.|
00001E60: 59 54 45 20 45 52 48 BC  48 45 4E 00 D1 7A 94 0C  |YTE ERH.HEN..z..|
00001E70: 3B 00 F6 7A 9E 0C 53 54  53 4E 45 56 45 4E 31 20  |;..z..STSNEVEN1 |
00001E80: 81 28 46 41 54 29 2C 59  3B 20 48 49 42 59 54 45  |.(FAT),Y; HIBYTE|
00001E90: 20 4C 41 44 45 4E 00 22  7B A8 0C 20 87 23 25 31  | LADEN."{.. .#%1|
00001EA0: 31 31 31 30 30 30 30 3B  20 55 4E 54 45 52 45 53  |1110000; UNTERES|
00001EB0: 20 C8 41 4C 42 2D C2 59  54 45 20 4C BC 53 43 48  | .ALB-.YTE L.SCH|
00001EC0: 45 4E 00 32 7B B2 0C 20  8F 43 4C 55 53 54 45 52  |EN.2{.. .CLUSTER|
00001ED0: 2B 31 00 56 7B BC 0C 20  97 53 54 53 4E 46 41 54  |+1.V{.. .STSNFAT|
00001EE0: 3B 20 55 4E 44 20 49 4E  20 C6 C1 D4 20 53 50 45  |; UND IN ... SPE|
00001EF0: 49 43 48 45 52 4E 00 5D  7B C6 0C 20 A4 00 8E 7B  |ICHERN.]{.. ...{|
00001F00: D0 0C 3B 20 20 20 20 20  20 20 20 20 20 20 20 20  |..;             |
00001F10: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 2D 2D  |              --|
00001F20: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 00 A3  |--------------..|
00001F30: 7B DA 0C 53 54 53 4E 4F  44 44 20 81 43 4C 55 53  |{..STSNODD .CLUS|
00001F40: 54 45 52 00 AE 7B E4 0C  20 82 53 4E 4C 4F 00 BE  |TER..{.. .SNLO..|
00001F50: 7B EE 0C 20 83 43 4C 55  53 54 45 52 2B 31 00 C9  |{.. .CLUSTER+1..|
00001F60: 7B F8 0C 20 88 53 4E 48  49 00 CF 7B 02 0D 3B 00  |{.. .SNHI..{..;.|
00001F70: EB 7B 0C 0D 20 84 23 34  3B 20 4C 4F 2B 48 49 20  |.{.. .#4; LO+HI |
00001F80: 41 55 46 42 45 52 45 49  54 45 4E 00 FE 7B 16 0D  |AUFBEREITEN..{..|
00001F90: 53 54 53 4E 4F 44 44 31  20 91 53 4E 48 49 00 09  |STSNODD1 .SNHI..|
00001FA0: 7C 20 0D 20 91 53 4E 4C  4F 00 0F 7C 2A 0D 3B 00  || . .SNLO..|*.;.|
00001FB0: 26 7C 34 0D 20 A3 3B 20  34 C2 49 54 53 20 52 4F  |&|4. .; 4.ITS RO|
00001FC0: 54 49 45 52 45 4E 00 35  7C 3E 0D 20 B7 53 54 53  |TIEREN.5|>. .STS|
00001FD0: 4E 4F 44 44 31 00 40 7C  48 0D 20 91 53 4E 48 49  |NODD1.@|H. .SNHI|
00001FE0: 00 46 7C 52 0D 3B 00 51  7C 5C 0D 20 81 53 4E 48  |.F|R.;.Q|\. .SNH|
00001FF0: 49 00 7C 7C 66 0D 20 87  23 25 31 31 31 31 30 30  |I.||f. .#%111100|
00002000: 30 30 3B 20 55 4E 54 45  52 45 53 20 C8 41 4C 42  |00; UNTERES .ALB|
00002010: 42 59 54 45 20 4C BC 53  43 48 45 4E 00 87 7C 70  |BYTE L.SCHEN..|p|
00002020: 0D 20 82 53 4E 48 49 00  8D 7C 7A 0D 3B 00 AC 7C  |. .SNHI..|z.;..||
00002030: 84 0D 20 81 28 46 41 54  29 2C 59 3B 20 C8 41 4C  |.. .(FAT),Y; .AL|
00002040: 42 2D C2 59 54 45 20 4C  41 44 45 4E 00 D6 7C 8E  |B-.YTE LADEN..|.|
00002050: 0D 20 87 23 25 30 30 30  30 31 31 31 31 3B 20 4F  |. .#%00001111; O|
00002060: 42 45 52 45 53 20 C8 41  4C 42 42 59 54 45 20 4C  |BERES .ALBBYTE L|
00002070: BC 53 43 48 45 4E 00 E1  7C 98 0D 20 8F 53 4E 48  |.SCHEN..|.. .SNH|
00002080: 49 00 FE 7C A2 0D 20 97  53 54 53 4E 46 41 54 3B  |I..|.. .STSNFAT;|
00002090: 20 55 4E 44 20 53 50 45  49 43 48 45 52 4E 00 14  | UND SPEICHERN..|
000020A0: 7D AC 0D 20 8A 46 41 54  3B 20 DA 45 49 47 45 52  |}.. .FAT; .EIGER|
000020B0: 3D 5E 2B 31 00 3D 7D B6  0D 20 B7 53 54 53 4E 4F  |=^+1.=}.. .STSNO|
000020C0: 44 44 32 3B 20 57 45 4E  4E 20 4B 45 49 4E 20 DD  |DD2; WENN KEIN .|
000020D0: 42 45 52 54 52 41 47 20  2D 3E 4A 4D 50 00 62 7D  |BERTRAG ->JMP.b}|
000020E0: C0 0D 20 8A 46 41 54 2B  31 3B 20 53 4F 4E 53 54  |.. .FAT+1; SONST|
000020F0: 20 DD 42 45 52 54 52 41  47 20 41 44 44 49 45 52  | .BERTRAG ADDIER|
00002100: 45 4E 00 84 7D CA 0D 53  54 53 4E 4F 44 44 32 20  |EN..}..STSNODD2 |
00002110: 81 53 4E 4C 4F 3B 20 CC  4F 2D C2 59 54 45 20 4C  |.SNLO; .O-.YTE L|
00002120: 41 44 45 4E 00 A1 7D D4  0D 20 97 53 54 53 4E 46  |ADEN..}.. .STSNF|
00002130: 41 54 3B 20 55 4E 44 20  53 50 45 49 43 48 45 52  |AT; UND SPEICHER|
00002140: 4E 00 A7 7D DE 0D 3B 00  AE 7D E8 0D 20 A4 00 B4  |N..}..;..}.. ...|
00002150: 7D F2 0D 3B 00 F5 7D FC  0D 3B 20 2B 2D 2B 2D 2B  |}..;..}..; +-+-+|
00002160: 2D 2B 2D 2B 2D 2B 2D 2B  2D 2B 2D 2B 2D 2B 2D 2B  |-+-+-+-+-+-+-+-+|
00002170: 2D 2B 2D 2B 2D 2B 2D 2B  2D 2B 2D 2B 2D 2B 2D 2B  |-+-+-+-+-+-+-+-+|
00002180: 2D 2B 2D 2B 2D 2B 2D 2B  2D 2B 2D 2B 2D 2B 2D 2B  |-+-+-+-+-+-+-+-+|
00002190: 2D 2B 2D 2B 2D 00 FB 7D  06 0E 3B 00 1E 7E 10 0E  |-+-+-..}..;..~..|
000021A0: 47 54 53 54 53 4E 20 8E  53 4E 48 49 3B 20 C8 49  |GTSTSN .SNHI; .I|
000021B0: 2D C2 59 54 45 20 49 4E  20 C3 41 52 52 59 00 4A  |-.YTE IN .ARRY.J|
000021C0: 7E 1A 0E 20 91 53 4E 4C  4F 3B 20 44 55 52 43 48  |~.. .SNLO; DURCH|
000021D0: 20 32 20 54 45 49 4C 45  4E 20 2C 20 C2 49 54 20  | 2 TEILEN , .IT |
000021E0: 30 20 49 4E 20 C3 41 52  52 59 00 6D 7E 24 0E 20  |0 IN .ARRY.m~$. |
000021F0: AE 3B 20 55 4E 44 20 46  BD 52 20 D4 45 53 54 20  |.; UND F.R .EST |
00002200: 47 45 52 41 44 45 20 52  45 54 54 45 4E 00 73 7E  |GERADE RETTEN.s~|
00002210: 2E 0E 3B 00 9E 7E 38 0E  20 83 53 4E 4C 4F 3B 20  |..;..~8. .SNLO; |
00002220: CC 4F 2D C2 59 54 45 20  3D 20 4C 4F 28 49 4E 54  |.O-.YTE = LO(INT|
00002230: 28 53 4E 2F 32 29 29 20  52 45 54 54 45 4E 00 C9  |(SN/2)) RETTEN..|
00002240: 7E 42 0E 20 84 53 4E 48  49 3B 20 C8 49 2D C2 59  |~B. .SNHI; .I-.Y|
00002250: 54 45 20 3D 20 48 49 28  49 4E 54 28 53 4E 2F 32  |TE = HI(INT(SN/2|
00002260: 29 29 20 52 45 54 54 45  4E 00 D0 7E 4C 0E 20 9F  |)) RETTEN..~L. .|
00002270: 00 EF 7E 56 0E 20 AE 3B  20 C3 41 52 52 59 20 48  |..~V. .; .ARRY H|
00002280: 4F 4C 45 4E 20 55 4E 44  20 52 45 54 54 45 4E 00  |OLEN UND RETTEN.|
00002290: FA 7E 60 0E 20 90 53 4E  4C 4F 00 14 7F 6A 0E 20  |.~`. .SNLO...j. |
000022A0: 90 53 4E 48 49 3B 20 28  53 4E 2F 32 29 2A 32 20  |.SNHI; (SN/2)*2 |
000022B0: 3D 20 53 4E 00 1A 7F 74  0E 3B 00 36 7F 7E 0E 20  |= SN...t.;.6.~. |
000022C0: 98 3B 20 4C 4F 28 49 4E  54 28 53 4E 2F 32 29 29  |.; LO(INT(SN/2))|
000022D0: 20 48 4F 4C 45 4E 00 3D  7F 88 0E 20 A6 00 58 7F  | HOLEN.=... ..X.|
000022E0: 92 0E 20 86 53 4E 4C 4F  3B 20 53 4E 20 2B 20 49  |.. .SNLO; SN + I|
000022F0: 4E 54 28 53 4E 2F 32 29  00 80 7F 9C 0E 20 B5 47  |NT(SN/2)..... .G|
00002300: 54 53 54 53 4E 31 3B 20  4B 45 49 4E 20 DD 42 45  |TSTSN1; KEIN .BE|
00002310: 52 54 52 41 47 20 2D 3E  20 53 50 52 49 4E 47 45  |RTRAG -> SPRINGE|
00002320: 00 9D 7F A6 0E 20 8A 53  4E 48 49 3B 20 53 4F 4E  |..... .SNHI; SON|
00002330: 53 54 20 48 49 2D C2 59  54 45 20 2B 31 00 C2 7F  |ST HI-.YTE +1...|
00002340: B0 0E 47 54 53 54 53 4E  31 20 82 53 4E 4C 4F 3B  |..GTSTSN1 .SNLO;|
00002350: 20 4C 4F 2D C2 59 54 45  20 53 50 45 49 43 48 45  | LO-.YTE SPEICHE|
00002360: 52 4E 00 C8 7F BA 0E 3B  00 D9 7F C4 0E 20 81 23  |RN.....;..... .#|
00002370: 3C 28 46 41 54 42 55 46  29 00 E0 7F CE 0E 20 A6  |<(FATBUF)..... .|
00002380: 00 EB 7F D8 0E 20 86 53  4E 4C 4F 00 F9 7F E2 0E  |..... .SNLO.....|
00002390: 20 B5 47 54 53 54 53 4E  32 00 04 80 EC 0E 20 8A  | .GTSTSN2..... .|
000023A0: 53 4E 48 49 00 15 80 F6  0E 47 54 53 54 53 4E 32  |SNHI.....GTSTSN2|
000023B0: 20 82 46 41 54 00 1B 80  00 0F 3B 00 3D 80 0A 0F  | .FAT.....;.=...|
000023C0: 20 9A 3B A0 48 49 28 49  4E 54 28 53 4E 2F 32 29  | .;.HI(INT(SN/2)|
000023D0: 29 20 5A 55 52 BD 43 4B  48 4F 4C 45 4E 00 52 80  |) ZUR.CKHOLEN.R.|
000023E0: 14 0F 20 A6 3B 20 46 BD  52 20 41 44 44 49 45 52  |.. .; F.R ADDIER|
000023F0: 45 4E 00 84 80 1E 0F 20  86 23 3E 28 46 41 54 42  |EN..... .#>(FATB|
00002400: 55 46 29 3B 20 DA 45 52  4F 50 41 47 45 5A 45 49  |UF); .EROPAGEZEI|
00002410: 47 45 52 20 41 55 46 20  C6 C1 D4 20 41 44 44 49  |GER AUF ... ADDI|
00002420: 45 52 45 4E 00 AD 80 28  0F 20 86 53 4E 48 49 3B  |EREN...(. .SNHI;|
00002430: A0 55 4E 44 20 41 4C 54  45 53 20 C8 49 2D C2 59  |.UND ALTES .I-.Y|
00002440: 54 45 20 44 41 5A 55 5A  BB 48 4C 45 4E 00 B3 80  |TE DAZUZ.HLEN...|
00002450: 32 0F 3B 00 CE 80 3C 0F  20 82 46 41 54 2B 31 3B  |2.;...<. .FAT+1;|
00002460: 20 55 4E 44 20 53 50 45  49 43 48 45 52 4E 00 D7  | UND SPEICHERN..|
00002470: 80 46 0F 20 84 23 30 00  DD 80 50 0F 3B 00 00 81  |.F. .#0...P.;...|
00002480: 5A 0F 20 9F 3B 20 C6 4C  41 47 20 46 BD 52 20 47  |Z. .; .LAG F.R G|
00002490: 45 52 41 44 45 20 2F 20  55 4E 47 45 52 41 44 45  |ERADE / UNGERADE|
000024A0: 00 2F 81 64 0F 20 A4 3B  20 47 49 42 54 20 49 4E  |./.d. .; GIBT IN|
000024B0: 20 46 41 54 42 55 46 20  44 49 45 20 4E 45 55 45  | FATBUF DIE NEUE|
000024C0: 20 C1 44 52 45 53 53 45  20 5A 55 52 BD 43 4B 00  | .DRESSE ZUR.CK.|
000024D0: 64 81 6E 0F 3B 20 20 20  20 20 20 20 20 20 20 20  |d.n.;           |
000024E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000024F0: C6 4F 52 4D 45 4C 3A 20  58 20 3D 20 31 2E 35 20  |.ORMEL: X = 1.5 |
00002500: 2A 20 53 4E 00 6A 81 78  0F 3B 00 70 81 82 0F 3B  |* SN.j.x.;.p...;|
00002510: 00 91 81 8C 0F 3B 20 20  20 20 20 2A 2A 2A 2A 2A  |.....;     *****|
00002520: 2A 2A 2A 20 4F 2E C6 2E  20 2A 2A 2A 2A 2A 2A 2A  |*** O... *******|
00002530: 2A 00 97 81 96 0F 3B 00  9D 81 A0 0F 3B 00 CB 81  |*.....;.....;...|
00002540: AA 0F 53 54 53 4E 46 41  54 20 82 28 46 41 54 29  |..STSNFAT .(FAT)|
00002550: 2C 59 3B 20 C2 59 54 45  20 49 4E 20 C6 41 54 20  |,Y; .YTE IN .AT |
00002560: 31 20 53 50 45 49 43 48  45 52 4E 00 E0 81 B4 0F  |1 SPEICHERN.....|
00002570: 20 99 3B 20 C2 59 54 45  20 53 49 43 48 45 52 4E  | .; .YTE SICHERN|
00002580: 00 07 82 BE 0F 20 81 46  41 54 2B 31 3B 20 48 49  |..... .FAT+1; HI|
00002590: 2D DA 45 49 47 45 52 20  41 55 46 20 46 41 54 2D  |-.EIGER AUF FAT-|
000025A0: C1 44 52 45 53 53 45 00  24 82 C8 0F 20 A0 3B 20  |.DRESSE.$... .; |
000025B0: 41 55 46 20 44 45 4E 20  D3 54 41 43 4B 20 52 45  |AUF DEN .TACK RE|
000025C0: 54 54 45 4E 00 2B 82 D2  0F 20 A6 00 5C 82 DC 0F  |TTEN.+... ..\...|
000025D0: 20 86 46 41 54 50 41 47  45 53 3B 20 C1 4E 5A 41  | .FATPAGES; .NZA|
000025E0: 48 4C 20 44 45 52 20 D0  41 47 45 53 20 45 49 4E  |HL DER .AGES EIN|
000025F0: 45 53 20 C6 41 54 2D D4  45 49 4C 53 00 7D 82 E6  |ES .AT-.EILS.}..|
00002600: 0F 20 82 46 41 54 2B 31  3B 20 49 4E 20 DA 45 49  |. .FAT+1; IN .EI|
00002610: 47 45 52 20 53 50 45 49  43 48 45 52 4E 00 83 82  |GER SPEICHERN...|
00002620: F0 0F 3B 00 AC 82 FA 0F  20 98 3B 20 5A 55 20 53  |..;..... .; ZU S|
00002630: 50 45 49 43 48 45 52 4E  44 45 53 20 C2 59 54 45  |PEICHERNDES .YTE|
00002640: 20 5A 55 52 BD 43 4B 48  4F 4C 45 4E 00 D3 82 04  | ZUR.CKHOLEN....|
00002650: 10 20 82 28 46 41 54 29  2C 59 3B 20 C2 59 54 45  |. .(FAT),Y; .YTE|
00002660: 20 49 4E 20 C6 41 54 20  32 20 53 50 45 49 43 48  | IN .AT 2 SPEICH|
00002670: 45 52 4E 00 FE 82 0E 10  20 A1 3B 20 55 52 53 50  |ERN..... .; URSP|
00002680: 52 BD 4E 47 4C 49 43 48  45 53 20 C8 49 2D C2 59  |R.NGLICHES .I-.Y|
00002690: 54 45 20 5A 55 52 BD 43  4B 48 4F 4C 45 4E 00 31  |TE ZUR.CKHOLEN.1|
000026A0: 83 18 10 20 82 46 41 54  2B 31 3B 20 55 4E 44 20  |... .FAT+1; UND |
000026B0: 49 4E 20 DA 45 49 47 45  52 20 53 50 45 49 43 48  |IN .EIGER SPEICH|
000026C0: 45 52 4E 20 28 41 4C 54  45 52 20 D3 54 41 4E 44  |ERN (ALTER .TAND|
000026D0: 29 00 38 83 22 10 20 A4  00 3E 83 2C 10 3B 00 44  |).8.". ..>.,.;.D|
000026E0: 83 36 10 3B 00 4A 83 40  10 3B 00 50 83 4A 10 3B  |.6.;.J.@.;.P.J.;|
000026F0: 00 56 83 54 10 3B 00 8D  83 5E 10 3B 58 20 20 20  |.V.T.;...^.;X   |
00002700: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002710: 20 20 20 20 58 20 20 20  20 20 20 20 20 20 20 20  |    X           |
00002720: 20 20 20 20 20 20 20 20  20 20 20 20 58 00 C1 83  |            X...|
00002730: 68 10 3B 20 20 20 58 20  20 20 20 20 20 20 20 20  |h.;   X         |
00002740: 20 20 20 20 20 20 20 20  58 20 20 20 20 20 58 20  |        X     X |
00002750: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002760: 58 00 F2 83 72 10 3B 20  20 20 20 20 20 58 20 20  |X...r.;      X  |
00002770: 20 20 20 20 20 20 20 20  20 58 20 20 20 20 20 20  |         X      |
00002780: 20 20 20 20 20 58 20 20  20 20 20 20 20 20 20 20  |     X          |
00002790: 20 58 00 20 84 7C 10 3B  20 20 20 20 20 20 20 20  | X. .|.;        |
000027A0: 20 58 20 20 20 20 20 58  20 20 20 20 20 20 20 20  | X     X        |
000027B0: 20 20 20 20 20 20 20 20  20 58 20 20 20 20 20 58  |         X     X|
000027C0: 00 4B 84 86 10 3B 20 20  20 20 20 20 20 20 20 20  |.K...;          |
000027D0: 20 20 58 20 20 20 20 20  20 20 20 20 20 20 20 20  |  X             |
000027E0: 20 20 20 20 20 20 20 20  20 20 58 00 79 84 90 10  |          X.y...|
000027F0: 3B 20 20 20 20 20 20 20  20 20 58 20 20 20 20 20  |;         X     |
00002800: 58 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |X               |
00002810: 20 20 58 20 20 20 20 20  58 00 AA 84 9A 10 3B 20  |  X     X.....; |
00002820: 20 20 20 20 20 58 20 20  20 20 20 20 20 20 20 20  |     X          |
00002830: 20 58 20 20 20 20 20 20  20 20 20 20 20 58 20 20  | X           X  |
00002840: 20 20 20 20 20 20 20 20  20 58 00 DE 84 A4 10 3B  |         X.....;|
00002850: 20 20 20 58 20 20 20 20  20 20 20 20 20 20 20 20  |   X            |
00002860: 20 20 20 20 20 58 20 20  20 20 20 58 20 20 20 20  |     X     X    |
00002870: 20 20 20 20 20 20 20 20  20 20 20 20 20 58 00 15  |             X..|
00002880: 85 AE 10 3B 58 20 20 20  20 20 20 20 20 20 20 20  |...;X           |
00002890: 20 20 20 20 20 20 20 20  20 20 20 20 58 20 20 20  |            X   |
000028A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000028B0: 20 20 20 20 58 00 1B 85  B8 10 3B 00 63 85 C2 10  |    X.....;.c...|
000028C0: 3B 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |;***************|
000028D0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000028E0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000028F0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00002900: 2A 2A 2A 00 AB 85 CC 10  3B 2A 20 20 20 20 20 20  |***.....;*      |
00002910: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002920: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002930: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002940: 20 20 20 20 20 20 20 20  20 20 2A 00 F3 85 D6 10  |          *.....|
00002950: 3B 2A 20 20 20 20 20 20  20 20 D3 45 49 54 45 2C  |;*        .EITE,|
00002960: 20 D3 50 55 52 2C 20 D3  45 4B 54 4F 52 20 55 4E  | .PUR, .EKTOR UN|
00002970: 44 20 D3 45 4B 54 4F 52  2B 31 20 41 55 53 20 D3  |D .EKTOR+1 AUS .|
00002980: 4E 20 42 45 52 45 43 48  4E 45 4E 20 20 20 20 20  |N BERECHNEN     |
00002990: 20 20 2A 00 3B 86 E0 10  3B 2A 20 20 20 20 20 20  |  *.;...;*      |
000029A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000029B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000029C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000029D0: 20 20 20 20 20 20 20 20  20 20 2A 00 83 86 EA 10  |          *.....|
000029E0: 3B 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |;***************|
000029F0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 20 4D 2E C6 2E 20  |********** M... |
00002A00: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00002A10: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00002A20: 2A 2A 2A 00 89 86 F4 10  3B 00 8F 86 FE 10 3B 00  |***.....;.....;.|
00002A30: 95 86 08 11 3B 00 9B 86  12 11 3B 00 A1 86 1C 11  |....;.....;.....|
00002A40: 3B 00 C1 86 26 11 3B 20  20 20 20 D3 CE 20 49 4E  |;...&.;    .. IN|
00002A50: 20 53 4E 4C 4F 4E 45 57  2C 20 53 4E 48 49 4E 45  | SNLONEW, SNHINE|
00002A60: 57 00 C7 86 30 11 3B 00  CD 86 3A 11 3B 00 02 87  |W...0.;...:.;...|
00002A70: 44 11 3B 20 20 C8 49 2D  C2 59 54 45 20 49 4E 20  |D.;  .I-.YTE IN |
00002A80: D8 2D D2 45 47 49 53 54  45 52 2C 20 CC 4F 2D C2  |.-.EGISTER, .O-.|
00002A90: 59 54 45 20 49 4E 20 C1  4B 4B 55 4D 55 4C 41 54  |YTE IN .KKUMULAT|
00002AA0: 4F 52 00 08 87 4E 11 3B  00 1C 87 58 11 53 4E 43  |OR...N.;...X.SNC|
00002AB0: 41 4C 43 20 82 53 4E 4C  4F 4E 45 57 00 2A 87 62  |ALC .SNLONEW.*.b|
00002AC0: 11 20 88 53 4E 48 49 4E  45 57 00 30 87 6C 11 3B  |. .SNHINEW.0.l.;|
00002AD0: 00 4B 87 76 11 3B 20 45  49 47 45 4E 54 4C 49 43  |.K.v.; EIGENTLIC|
00002AE0: 48 45 20 D2 4F 55 54 49  4E 45 3A 00 51 87 80 11  |HE .OUTINE:.Q...|
00002AF0: 3B 00 75 87 8A 11 53 4E  43 41 4C 43 30 20 81 53  |;.u...SNCALC0 .S|
00002B00: 4E 4C 4F 4E 45 57 3B 20  4C 4F 2D C2 59 54 45 20  |NLONEW; LO-.YTE |
00002B10: 4C 41 44 45 4E 00 9A 87  94 11 20 83 53 4E 48 49  |LADEN..... .SNHI|
00002B20: 4E 45 57 3B 20 49 53 54  20 44 41 53 20 48 49 2D  |NEW; IST DAS HI-|
00002B30: C2 59 54 45 20 3E 20 30  20 3F 00 B1 87 9E 11 20  |.YTE > 0 ?..... |
00002B40: B7 43 41 4C 43 31 3B 20  4A 41 20 2D 3E 20 4A 4D  |.CALC1; JA -> JM|
00002B50: 50 00 B7 87 A8 11 3B 00  EF 87 B2 11 20 85 23 32  |P.....;..... .#2|
00002B60: 3B 20 49 53 54 20 44 41  53 20 4C 4F 2D C2 59 54  |; IST DAS LO-.YT|
00002B70: 45 20 28 41 4C 53 4F 20  47 41 4E 5A 20 53 4E 2C  |E (ALSO GANZ SN,|
00002B80: 20 44 41 20 48 49 3D 30  29 20 3C 20 32 20 3F 00  | DA HI=0) < 2 ?.|
00002B90: 20 88 BC 11 20 B5 43 41  4C 43 45 52 3B 20 4A 41  | ... .CALCER; JA|
00002BA0: 20 2D 3E 20 44 41 4E 4E  20 C6 45 48 4C 45 52 2C  | -> DANN .EHLER,|
00002BB0: 20 44 41 20 55 4E 47 BD  4C 54 49 47 45 20 53 4E  | DA UNG.LTIGE SN|
00002BC0: 00 26 88 C6 11 3B 00 56  88 D0 11 20 85 53 50 55  |.&...;.V... .SPU|
00002BD0: 52 53 54 41 52 54 3B 20  49 53 54 20 53 4E 20 41  |RSTART; IST SN A|
00002BE0: 55 46 20 D3 50 55 52 20  30 3F 20 20 28 20 3C 20  |UF .PUR 0?  ( < |
00002BF0: 28 34 2F 35 29 29 00 6F  88 DA 11 20 B6 43 41 4C  |(4/5)).o... .CAL|
00002C00: 43 31 3B 20 4E 45 49 4E  20 2D 3E 20 4A 4D 50 00  |C1; NEIN -> JMP.|
00002C10: 75 88 E4 11 3B 00 85 88  EE 11 20 8C 3B 20 53 4E  |u...;..... .; SN|
00002C20: 20 2A 3D 20 32 00 8C 88  F8 11 20 A6 00 C4 88 02  | *= 2..... .....|
00002C30: 12 20 86 53 50 55 52 4F  46 46 53 45 54 3B 20 D3  |. .SPUROFFSET; .|
00002C40: 45 4B 54 4F 52 20 46 BD  52 20 D3 50 55 52 20 30  |EKTOR F.R .PUR 0|
00002C50: 20 42 45 52 45 43 48 4E  45 4E 20 2D 20 D3 45 49  | BERECHNEN - .EI|
00002C60: 54 45 20 42 00 DC 88 0C  12 20 99 3B 20 49 4E 20  |TE B..... .; IN |
00002C70: 58 52 20 53 50 45 49 43  48 45 52 4E 00 F6 88 16  |XR SPEICHERN....|
00002C80: 12 20 84 23 24 30 30 3B  20 59 52 20 46 BD 52 20  |. .#$00; YR F.R |
00002C90: D3 50 55 52 20 30 00 2A  89 20 12 20 96 43 41 4C  |.PUR 0.*. . .CAL|
00002CA0: 43 46 44 5F 32 3B 20 C4  41 54 45 4E 20 49 4E 20  |CFD_2; .ATEN IN |
00002CB0: 43 41 4C 43 53 45 2C 20  2D 54 52 2C 20 2D 53 49  |CALCSE, -TR, -SI|
00002CC0: 20 53 50 45 49 43 48 45  52 4E 00 48 89 2A 12 3B  | SPEICHERN.H.*.;|
00002CD0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00002CE0: 2D 2D 2D 2D 2D 2D 2D 2D  00 4E 89 34 12 3B 00 5A  |--------.N.4.;.Z|
00002CF0: 89 3E 12 43 41 4C 43 31  20 A7 00 92 89 48 12 20  |.>.CALC1 ....H. |
00002D00: 92 53 50 55 52 53 4F 4C  4C 3B 20 44 41 20 53 4E  |.SPURSOLL; DA SN|
00002D10: 20 3E 20 53 50 55 52 53  54 41 52 54 2C 20 42 45  | > SPURSTART, BE|
00002D20: 49 20 D3 50 55 52 20 31  20 42 45 52 45 43 48 4E  |I .PUR 1 BERECHN|
00002D30: 45 4E 00 B8 89 52 12 20  B6 43 41 4C 43 32 3B 20  |EN...R. .CALC2; |
00002D40: 4B 45 49 4E 45 4E 20 DD  42 45 52 54 52 41 47 20  |KEINEN .BERTRAG |
00002D50: 41 42 5A 49 45 48 45 4E  00 D2 89 5C 12 20 AF 3B  |ABZIEHEN...\. .;|
00002D60: 20 DD 42 45 52 54 52 41  47 20 41 42 5A 49 45 48  | .BERTRAG ABZIEH|
00002D70: 45 4E 00 D8 89 66 12 3B  00 F9 89 70 12 43 41 4C  |EN...f.;...p.CAL|
00002D80: 43 32 20 84 23 24 30 31  3B 20 D3 54 41 52 54 53  |C2 .#$01; .TARTS|
00002D90: 50 55 52 20 49 53 54 20  31 00 19 8A 7A 12 43 41  |PUR IST 1...z.CA|
00002DA0: 4C 43 4C 4F 4F 50 20 8B  23 24 30 30 3B 20 48 49  |LCLOOP .#$00; HI|
00002DB0: 2D 53 4E 20 3D 20 30 20  3F 00 45 8A 84 12 20 B7  |-SN = 0 ?.E... .|
00002DC0: 43 41 4C 43 33 3B 20 57  45 4E 4E 20 4E 49 43 48  |CALC3; WENN NICH|
00002DD0: 54 20 44 41 4E 4E 20 57  45 49 54 45 52 41 42 5A  |T DANN WEITERABZ|
00002DE0: 49 45 48 45 4E 00 4B 8A  8E 12 3B 00 70 8A 98 12  |IEHEN.K...;.p...|
00002DF0: 20 85 23 53 50 55 52 44  49 53 54 2B 31 3B 20 57  | .#SPURDIST+1; W|
00002E00: 45 4E 4E 20 53 4E 20 3C  20 31 30 20 44 41 4E 4E  |ENN SN < 10 DANN|
00002E10: 00 A2 8A A2 12 20 B5 43  41 4C 43 46 44 5F 31 3B  |..... .CALCFD_1;|
00002E20: 20 49 53 54 20 44 49 45  20 52 49 43 48 54 49 47  | IST DIE RICHTIG|
00002E30: 45 20 D3 50 55 52 20 47  45 46 55 4E 44 45 4E 20  |E .PUR GEFUNDEN |
00002E40: 2D 3E 00 A8 8A AC 12 3B  00 C2 8A B6 12 43 41 4C  |->.....;.....CAL|
00002E50: 43 33 20 9E 3B 20 4E BB  43 48 53 54 45 20 D3 50  |C3 .; N.CHSTE .P|
00002E60: 55 52 00 EA 8A C0 12 20  93 4D 41 58 53 50 55 52  |UR..... .MAXSPUR|
00002E70: 3B 20 49 53 54 20 53 49  45 20 47 52 BC BE 45 52  |; IST SIE GR..ER|
00002E80: 20 41 4C 53 20 33 39 2F  37 39 00 1A 8B CA 12 20  | ALS 39/79..... |
00002E90: B6 43 41 4C 43 45 52 3B  20 4A 41 20 2D 3E 20 C6  |.CALCER; JA -> .|
00002EA0: 45 48 4C 45 52 20 28 4E  55 52 20 38 30 20 D3 50  |EHLER (NUR 80 .P|
00002EB0: 55 52 45 4E 20 30 2D 37  39 29 00 20 8B D4 12 3B  |UREN 0-79). ...;|
00002EC0: 00 28 8B DE 12 20 A7 20  00 5D 8B E8 12 20 92 23  |.(... . .]... .#|
00002ED0: 53 50 55 52 44 49 53 54  3B 20 39 20 C3 4C 55 53  |SPURDIST; 9 .LUS|
00002EE0: 54 45 52 53 20 41 42 5A  49 45 48 45 4E 20 2D 3E  |TERS ABZIEHEN ->|
00002EF0: 20 4E BB 43 48 53 54 45  20 D3 50 55 52 00 7B 8B  | N.CHSTE .PUR.{.|
00002F00: F2 12 20 B6 43 41 4C 43  4C 4F 4F 50 3B 20 4B 45  |.. .CALCLOOP; KE|
00002F10: 49 4E 20 DD 42 45 52 54  52 41 47 00 95 8B FC 12  |IN .BERTRAG.....|
00002F20: 20 AF 3B 20 DD 42 45 52  54 52 41 47 20 41 42 5A  | .; .BERTRAG ABZ|
00002F30: 49 45 48 45 4E 00 B4 8B  06 13 20 B1 43 41 4C 43  |IEHEN..... .CALC|
00002F40: 4C 4F 4F 50 3B 20 49 4D  4D 45 52 20 53 50 52 49  |LOOP; IMMER SPRI|
00002F50: 4E 47 45 4E 00 BA 8B 10  13 3B 00 D8 8B 1A 13 3B  |NGEN.....;.....;|
00002F60: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00002F70: 2D 2D 2D 2D 2D 2D 2D 2D  00 DE 8B 24 13 3B 00 03  |--------...$.;..|
00002F80: 8C 2E 13 43 41 4C 43 46  44 5F 31 20 8C 3B 20 C3  |...CALCFD_1 .; .|
00002F90: 4C 55 53 54 45 52 20 2A  20 32 20 3D 20 D3 45 4B  |LUSTER * 2 = .EK|
00002FA0: 54 4F 52 00 1A 8C 38 13  20 99 3B 20 D3 45 4B 54  |TOR...8. .; .EKT|
00002FB0: 4F 52 20 4E 41 43 48 20  58 52 00 4A 8C 42 13 43  |OR NACH XR.J.B.C|
00002FC0: 41 4C 43 46 44 5F 32 20  89 43 41 4C 43 54 52 3B  |ALCFD_2 .CALCTR;|
00002FD0: 20 45 52 52 45 43 48 4E  45 54 45 20 D3 50 55 52  | ERRECHNETE .PUR|
00002FE0: 20 53 50 45 49 43 48 45  52 4E 00 5F 8C 4C 13 20  | SPEICHERN._.L. |
00002FF0: 89 43 41 4C 43 54 52 2B  31 3B 20 44 54 4F 2E 00  |.CALCTR+1; DTO..|
00003000: 65 8C 56 13 3B 00 88 8C  60 13 20 84 23 24 30 31  |e.V.;...`. .#$01|
00003010: 3B 20 59 52 20 49 53 54  20 D3 43 48 4C 45 49 46  |; YR IST .CHLEIF|
00003020: 45 4E 5A BB 48 4C 45 52  00 B3 8C 6A 13 20 97 43  |ENZ.HLER...j. .C|
00003030: 41 4C 43 53 54 3B 20 D3  45 4B 54 4F 52 2B 31 20  |ALCST; .EKTOR+1 |
00003040: 26 20 D3 45 49 54 45 2B  31 20 53 50 45 49 43 48  |& .EITE+1 SPEICH|
00003050: 45 52 4E 00 CD 8C 74 13  20 A3 3B 20 DA BB 48 4C  |ERN...t. .; ..HL|
00003060: 45 52 20 56 45 52 52 49  4E 47 45 52 4E 00 EB 8C  |ER VERRINGERN...|
00003070: 7E 13 20 AF 3B 20 56 4F  52 48 45 52 47 45 48 45  |~. .; VORHERGEHE|
00003080: 4E 44 45 52 20 D3 45 4B  54 4F 52 00 12 8D 88 13  |NDER .EKTOR.....|
00003090: 20 97 43 41 4C 43 53 54  3B 20 D3 45 4B 54 4F 52  | .CALCST; .EKTOR|
000030A0: 20 26 20 D3 45 49 54 45  20 53 50 45 49 43 48 45  | & .EITE SPEICHE|
000030B0: 52 4E 00 19 8D 92 13 20  A6 00 34 8D 9C 13 20 A4  |RN..... ..4... .|
000030C0: 3B 20 5A 55 52 BD 43 4B  20 4F 48 4E 45 20 C6 45  |; ZUR.CK OHNE .E|
000030D0: 48 4C 45 52 00 3A 8D A6  13 3B 00 58 8D B0 13 3B  |HLER.:...;.X...;|
000030E0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000030F0: 2D 2D 2D 2D 2D 2D 2D 2D  00 5E 8D BA 13 3B 00 7A  |--------.^...;.z|
00003100: 8D C4 13 43 41 4C 43 53  54 20 98 3B 20 D3 45 4B  |...CALCST .; .EK|
00003110: 54 4F 52 20 52 45 54 54  45 4E 00 81 8D CE 13 20  |TOR RETTEN..... |
00003120: A0 00 B4 8D D8 13 20 83  D3 45 49 54 45 5F 41 3B  |...... ..EITE_A;|
00003130: 20 C6 4C 41 47 20 46 BD  52 20 D3 45 49 54 45 20  | .LAG F.R .EITE |
00003140: C1 20 28 42 45 49 20 31  35 38 31 20 D3 45 49 54  |. (BEI 1581 .EIT|
00003150: 45 20 32 29 00 BA 8D E2  13 3B 00 DD 8D EC 13 20  |E 2).....;..... |
00003160: 85 23 53 50 55 52 44 49  53 54 2B 31 3B 20 D3 45  |.#SPURDIST+1; .E|
00003170: 4B 54 4F 52 4E 52 2E 20  3E 20 39 20 3F 00 0C 8E  |KTORNR. > 9 ?...|
00003180: F6 13 20 B5 43 41 4C 43  53 54 32 3B 20 4E 45 49  |.. .CALCST2; NEI|
00003190: 4E 20 2D 3E 20 41 42 53  50 45 49 43 48 45 52 4E  |N -> ABSPEICHERN|
000031A0: 20 41 55 46 20 D3 45 49  54 45 20 C1 00 12 8E 00  | AUF .EITE .....|
000031B0: 14 3B 00 1A 8E 0A 14 20  A7 20 00 45 8E 14 14 20  |.;..... . .E... |
000031C0: 92 23 53 50 55 52 44 49  53 54 3B 20 53 4F 4E 53  |.#SPURDIST; SONS|
000031D0: 54 20 39 20 D3 45 4B 54  4F 52 45 4E 20 41 42 5A  |T 9 .EKTOREN ABZ|
000031E0: 49 45 48 45 4E 00 76 8E  1E 14 20 83 D3 45 49 54  |IEHEN.v... ..EIT|
000031F0: 45 5F 42 3B 20 55 4E 44  20 C6 4C 41 47 20 46 BD  |E_B; UND .LAG F.|
00003200: 52 20 D3 45 49 54 45 20  C2 20 28 31 20 42 45 49  |R .EITE . (1 BEI|
00003210: 20 31 35 38 31 29 00 AA  8E 28 14 43 41 4C 43 53  | 1581)...(.CALCS|
00003220: 54 32 20 82 43 41 4C 43  53 45 2C 59 3B 20 42 45  |T2 .CALCSE,Y; BE|
00003230: 52 45 43 48 4E 45 54 45  4E 20 D3 45 4B 54 4F 52  |RECHNETEN .EKTOR|
00003240: 20 53 50 45 49 43 48 45  52 4E 00 B2 8E 32 14 20  | SPEICHERN...2. |
00003250: 98 20 00 DD 8E 3C 14 20  82 43 41 4C 43 53 49 2C  |. ...<. .CALCSI,|
00003260: 59 3B 20 42 45 52 45 43  48 4E 45 54 45 20 D3 45  |Y; BERECHNETE .E|
00003270: 49 54 45 20 53 50 45 49  43 48 45 52 4E 00 04 8F  |ITE SPEICHERN...|
00003280: 46 14 20 A1 3B 20 47 45  53 49 43 48 45 52 54 45  |F. .; GESICHERTE|
00003290: 4E 20 D3 45 4B 54 4F 52  20 5A 55 52 BD 43 4B 48  |N .EKTOR ZUR.CKH|
000032A0: 4F 4C 45 4E 00 0C 8F 50  14 20 99 20 00 14 8F 5A  |OLEN...P. . ...Z|
000032B0: 14 20 A4 20 00 32 8F 64  14 3B 2D 2D 2D 2D 2D 2D  |. . .2.d.;------|
000032C0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000032D0: 2D 2D 00 38 8F 6E 14 3B  00 64 8F 78 14 43 41 4C  |--.8.n.;.d.x.CAL|
000032E0: 43 45 52 20 A7 3B 20 45  53 20 49 53 54 20 45 49  |CER .; ES IST EI|
000032F0: 4E 20 C6 45 48 4C 45 52  20 41 55 46 47 45 54 52  |N .EHLER AUFGETR|
00003300: 45 54 45 4E 00 6B 8F 82  14 20 A4 00 71 8F 8C 14  |ETEN.k... ..q...|
00003310: 3B 00 77 8F 96 14 3B 00  7D 8F A0 14 3B 00 83 8F  |;.w...;.}...;...|
00003320: AA 14 3B 00 CB 8F B4 14  3B 2A 2A 2A 2A 2A 2A 2A  |..;.....;*******|
00003330: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00003340: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00003350: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00003360: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 00 13 90 BE 14  |***********.....|
00003370: 3B 2A 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |;*              |
00003380: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003390: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000033A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000033B0: 20 20 2A 00 5B 90 C8 14  3B 2A 20 20 20 20 20 20  |  *.[...;*      |
000033C0: 20 20 C4 41 54 45 49 4E  4E 41 4D 45 4E 20 56 4F  |  .ATEINNAMEN VO|
000033D0: 4E 20 D4 41 53 54 41 55  52 20 45 49 4E 4C 45 53  |N .ASTAUR EINLES|
000033E0: 45 4E 20 55 4E 44 20 49  4E 20 C4 49 52 4E 41 4D  |EN UND IN .IRNAM|
000033F0: 45 20 53 50 2E 20 20 20  20 20 2A 00 A3 90 D2 14  |E SP.     *.....|
00003400: 3B 2A 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |;*              |
00003410: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003420: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003430: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003440: 20 20 2A 00 EB 90 DC 14  3B 2A 2A 2A 2A 2A 2A 2A  |  *.....;*******|
00003450: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00003460: 2A 2A 20 4D 2E C6 2E 2A  2A 2A 2A 2A 2A 2A 2A 2A  |** M...*********|
00003470: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00003480: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 00 F1 90 E6 14  |***********.....|
00003490: 3B 00 F7 90 F0 14 3B 00  FD 90 FA 14 3B 00 13 91  |;.....;.....;...|
000034A0: 04 15 52 45 41 44 4E 41  4D 45 20 97 49 4F 43 4C  |..READNAME .IOCL|
000034B0: 4F 53 45 00 20 91 0E 15  20 97 43 4C 52 43 48 4E  |OSE. ... .CLRCHN|
000034C0: 00 26 91 18 15 3B 00 32  91 22 15 20 97 50 52 49  |.&...;.2.". .PRI|
000034D0: 4D 4D 00 5F 91 2C 15 20  2E 91 43 52 2C 45 53 43  |MM._.,. ..CR,ESC|
000034E0: 2C 22 51 0E 9E C4 41 54  45 49 4E 41 4D 45 20 3A  |,"Q...ATEINAME :|
000034F0: 20 99 22 2C 45 53 43 2C  22 54 22 2C 45 4F 4D 00  | .",ESC,"T",EOM.|
00003500: 66 91 36 15 20 A6 00 88  91 40 15 20 97 50 52 49  |f.6. ....@. .PRI|
00003510: 4E 54 4E 41 4D 45 3B 20  41 55 53 47 45 42 45 4E  |NTNAME; AUSGEBEN|
00003520: 20 4F 48 4E 45 20 43 52  00 AC 91 4A 15 52 45 41  | OHNE CR...J.REA|
00003530: 44 4E 41 4D 45 30 20 81  23 22 13 22 3B 20 4D 49  |DNAME0 .#"."; MI|
00003540: 54 20 48 4F 4D 45 20 4C  41 44 45 4E 00 B8 91 54  |T HOME LADEN...T|
00003550: 15 20 97 42 53 4F 55 54  00 BE 91 5E 15 3B 00 D1  |. .BSOUT...^.;..|
00003560: 91 68 15 52 45 41 44 4E  41 4D 45 30 42 20 83 23  |.h.READNAME0B .#|
00003570: 30 00 DE 91 72 15 20 88  54 58 54 50 54 52 00 F3  |0...r. .TXTPTR..|
00003580: 91 7C 15 52 45 41 44 4E  41 4D 45 31 20 97 42 41  |.|.READNAME1 .BA|
00003590: 53 49 4E 00 13 92 86 15  20 87 23 31 32 37 3B 20  |SIN..... .#127; |
000035A0: 4E 55 52 20 CB 4C 45 49  4E 42 55 43 48 53 54 41  |NUR .LEINBUCHSTA|
000035B0: 42 45 4E 00 1F 92 90 15  20 82 42 55 46 2C 58 00  |BEN..... .BUF,X.|
000035C0: 26 92 9A 15 20 A2 00 53  92 A4 15 20 8B 23 31 35  |&... ..S... .#15|
000035D0: 36 3B 20 4D 45 48 52 20  41 4C 53 20 31 35 35 20  |6; MEHR ALS 155 |
000035E0: DA 45 49 43 48 45 4E 20  28 3D 32 20 DA 45 49 4C  |.EICHEN (=2 .EIL|
000035F0: 45 4E 29 00 63 92 AE 15  20 B5 52 45 41 44 4E 41  |EN).c... .READNA|
00003600: 4D 45 32 00 69 92 B8 15  3B 00 8D 92 C2 15 20 96  |ME2.i...;..... .|
00003610: 52 44 4E 41 4D 45 45 52  52 3B 20 42 45 49 20 C6  |RDNAMEERR; BEI .|
00003620: 45 48 4C 45 52 20 53 50  52 49 4E 47 45 00 93 92  |EHLER SPRINGE...|
00003630: CC 15 3B 00 C7 92 D6 15  52 45 41 44 4E 41 4D 45  |..;.....READNAME|
00003640: 32 20 85 23 43 52 3B 20  D2 45 54 55 52 4E 20 3F  |2 .#CR; .ETURN ?|
00003650: 20 3D 20 41 4C 4C 45 20  DA 45 49 43 48 45 4E 20  | = ALLE .EICHEN |
00003660: 47 45 4C 45 53 45 4E 00  EC 92 E0 15 20 B7 52 45  |GELESEN..... .RE|
00003670: 41 44 4E 41 4D 45 31 3B  20 4E 45 49 4E 20 2D 3E  |ADNAME1; NEIN ->|
00003680: 20 57 45 49 54 45 52 4C  45 53 45 4E 00 F2 92 EA  | WEITERLESEN....|
00003690: 15 3B 00 04 93 F4 15 52  45 41 44 4E 41 4D 45 33  |.;.....READNAME3|
000036A0: 20 81 23 30 00 2C 93 FE  15 20 82 42 55 46 2D 31  | .#0.,... .BUF-1|
000036B0: 2C 58 3B 20 C2 55 46 46  45 52 20 4D 49 54 20 30  |,X; .UFFER MIT 0|
000036C0: 20 41 42 53 43 48 4C 49  45 BE 45 4E 00 4D 93 08  | ABSCHLIE.EN.M..|
000036D0: 16 20 82 53 43 54 4F 50  3B 20 4F 42 45 52 45 20  |. .SCTOP; OBERE |
000036E0: C6 45 4E 53 54 45 52 47  52 45 4E 5A 45 00 6D 93  |.ENSTERGRENZE.m.|
000036F0: 12 16 20 82 53 43 4C 46  3B 20 4C 49 4E 4B 45 20  |.. .SCLF; LINKE |
00003700: C6 45 4E 53 54 45 52 47  52 45 4E 5A 45 00 73 93  |.ENSTERGRENZE.s.|
00003710: 1C 16 3B 00 7A 93 26 16  20 A6 00 8D 93 30 16 20  |..;.z.&. ....0. |
00003720: A4 3B 20 55 4E 44 20 5A  55 52 BD 43 4B 00 A1 93  |.; UND ZUR.CK...|
00003730: 3A 16 3B 20 20 C5 4E 44  45 20 31 2E 20 D4 45 49  |:.;  .NDE 1. .EI|
00003740: 4C 00 A7 93 44 16 3B 00  DB 93 4E 16 3B 20 C4 41  |L...D.;...N.; .A|
00003750: 54 45 49 4E 41 4D 45 4E  20 41 55 53 57 45 52 54  |TEINAMEN AUSWERT|
00003760: 45 4E 20 55 4E 44 20 49  4E 20 C4 49 52 4E 41 4D  |EN UND IN .IRNAM|
00003770: 45 20 53 50 45 49 43 48  45 52 4E 00 E1 93 58 16  |E SPEICHERN...X.|
00003780: 3B 00 0F 94 62 16 52 45  41 44 4E 41 4D 45 42 20  |;...b.READNAMEB |
00003790: 83 23 31 30 3B 20 C1 4E  5A 41 48 4C 20 DA 45 49  |.#10; .NZAHL .EI|
000037A0: 43 48 45 4E 20 49 4E 20  C4 49 52 4E 41 4D 45 00  |CHEN IN .IRNAME.|
000037B0: 2B 94 6C 16 20 81 23 22  20 22 3B 20 4D 49 54 20  |+.l. .#" "; MIT |
000037C0: D3 50 41 43 45 20 4C 41  44 45 4E 00 5E 94 76 16  |.PACE LADEN.^.v.|
000037D0: 52 45 41 44 4E 41 4D 45  34 20 82 44 49 52 4E 41  |READNAME4 .DIRNA|
000037E0: 4D 45 2C 58 3B 20 C4 49  52 4E 41 4D 45 20 4D 49  |ME,X; .IRNAME MI|
000037F0: 54 20 D3 50 41 43 45 20  46 BD 4C 4C 45 4E 00 65  |T .PACE F.LLEN.e|
00003800: 94 80 16 20 AF 00 8F 94  8A 16 20 B1 52 45 41 44  |... ...... .READ|
00003810: 4E 41 4D 45 34 3B 20 42  49 53 20 41 4C 4C 45 20  |NAME4; BIS ALLE |
00003820: DA 45 49 43 48 45 4E 20  47 45 46 BD 4C 4C 54 00  |.EICHEN GEF.LLT.|
00003830: 95 94 94 16 3B 00 D0 94  9E 16 20 81 46 49 4C 45  |....;..... .FILE|
00003840: 53 54 41 54 55 53 3B 20  D3 54 41 54 55 53 20 44  |STATUS; .TATUS D|
00003850: 45 52 20 C4 41 54 45 49  20 28 5A 2E C2 2E 20 D5  |ER .ATEI (Z... .|
00003860: 4E 54 45 52 56 45 52 5A  45 49 43 48 4E 49 53 29  |NTERVERZEICHNIS)|
00003870: 00 05 95 A8 16 20 82 44  49 52 4E 41 4D 45 2B 31  |..... .DIRNAME+1|
00003880: 31 3B 20 49 4E 20 C4 49  52 4E 41 4D 45 20 53 50  |1; IN .IRNAME SP|
00003890: 45 49 43 48 45 52 4E 20  28 56 4F 52 42 45 53 45  |EICHERN (VORBESE|
000038A0: 54 5A 45 4E 29 00 0B 95  B2 16 3B 00 14 95 BC 16  |TZEN).....;.....|
000038B0: 20 83 23 30 00 21 95 C6  16 20 88 54 58 54 50 54  | .#0.!... .TXTPT|
000038C0: 52 00 34 95 D0 16 52 45  41 44 4E 41 4D 45 35 20  |R.4...READNAME5 |
000038D0: 97 47 4E 43 00 65 95 DA  16 20 B8 52 45 41 44 4E  |.GNC.e... .READN|
000038E0: 41 4D 45 45 3B 20 41 4C  4C 45 20 DA 45 49 43 48  |AMEE; ALLE .EICH|
000038F0: 45 4E 20 47 45 4C 45 53  45 4E 3F 20 4A 41 20 2D  |EN GELESEN? JA -|
00003900: 3E 20 4A 4D 50 00 6B 95  E4 16 3B 00 87 95 EE 16  |> JMP.k...;.....|
00003910: 20 85 23 22 2E 22 3B 20  DA 45 49 43 48 45 4E 20  | .#"."; .EICHEN |
00003920: 3D 20 27 2E 27 20 3F 00  AA 95 F8 16 20 B8 52 45  |= '.' ?..... .RE|
00003930: 41 44 4E 41 4D 45 36 3B  20 C1 54 54 52 49 42 55  |ADNAME6; .TTRIBU|
00003940: 54 20 45 49 4E 4C 45 53  45 4E 00 B0 95 02 17 3B  |T EINLESEN.....;|
00003950: 00 D6 95 0C 17 20 82 44  49 52 4E 41 4D 45 2C 58  |..... .DIRNAME,X|
00003960: 3B 20 49 4E 20 C4 49 52  4E 41 4D 45 20 53 50 45  |; IN .IRNAME SPE|
00003970: 49 43 48 45 52 4E 00 DD  95 16 17 20 A2 00 0F 96  |ICHERN..... ....|
00003980: 20 17 20 8B 23 39 3B 20  42 45 52 45 49 54 53 20  | . .#9; BEREITS |
00003990: 41 4C 4C 45 20 4D BC 47  4C 49 43 48 45 4E 20 DA  |ALLE M.GLICHEN .|
000039A0: 45 49 43 48 45 4E 20 47  45 4C 45 53 45 4E 3F 00  |EICHEN GELESEN?.|
000039B0: 1F 96 2A 17 20 B7 52 45  41 44 4E 41 4D 45 35 00  |..*. .READNAME5.|
000039C0: 25 96 34 17 3B 00 65 96  3E 17 52 44 4E 41 4D 45  |%.4.;.e.>.RDNAME|
000039D0: 45 52 52 20 97 50 52 49  4D 4D 3B 20 C6 45 48 4C  |ERR .PRIMM; .EHL|
000039E0: 45 52 4D 45 4C 44 55 4E  47 2C 20 44 41 20 C4 41  |ERMELDUNG, DA .A|
000039F0: 54 45 49 4E 41 4D 45 20  4E 49 43 48 54 20 52 49  |TEINAME NICHT RI|
00003A00: 43 48 54 49 47 00 7B 96  48 17 20 2E 91 22 1D 1D  |CHTIG.{.H. .."..|
00003A10: 9E 3F 99 22 2C 43 52 2C  45 4F 4D 00 84 96 52 17  |.?.",CR,EOM...R.|
00003A20: 20 81 23 30 00 A5 96 5C  17 20 82 54 58 54 50 54  | .#0...\. .TXTPT|
00003A30: 52 3B 20 D4 45 58 54 5A  45 49 47 45 52 20 4C BC  |R; .EXTZEIGER L.|
00003A40: 53 43 48 45 4E 00 C6 96  66 17 20 82 53 43 54 4F  |SCHEN...f. .SCTO|
00003A50: 50 3B 20 4F 42 45 52 45  20 C6 45 4E 53 54 45 52  |P; OBERE .ENSTER|
00003A60: 47 52 45 4E 5A 45 00 E6  96 70 17 20 82 53 43 4C  |GRENZE...p. .SCL|
00003A70: 46 3B 20 4C 49 4E 4B 45  20 C6 45 4E 53 54 45 52  |F; LINKE .ENSTER|
00003A80: 47 52 45 4E 5A 45 00 ED  96 7A 17 20 A7 00 F4 96  |GRENZE...z. ....|
00003A90: 84 17 20 A4 00 FA 96 8E  17 3B 00 24 97 98 17 52  |.. ......;.$...R|
00003AA0: 45 41 44 4E 41 4D 45 36  20 83 23 38 3B 20 C1 54  |EADNAME6 .#8; .T|
00003AB0: 54 52 49 42 55 54 20 41  42 20 38 2E 20 DA 45 49  |TRIBUT AB 8. .EI|
00003AC0: 43 48 45 4E 00 46 97 A2  17 52 45 41 44 4E 41 4D  |CHEN.F...READNAM|
00003AD0: 45 37 20 97 47 4E 43 3B  20 DA 45 49 43 48 45 4E  |E7 .GNC; .EICHEN|
00003AE0: 20 4C 45 53 45 4E 00 56  97 AC 17 20 B8 52 45 41  | LESEN.V... .REA|
00003AF0: 44 4E 41 4D 45 45 00 76  97 B6 17 20 85 23 22 2E  |DNAMEE.v... .#".|
00003B00: 22 3B 20 49 53 54 20 44  41 53 20 45 49 4E 20 D0  |"; IST DAS EIN .|
00003B10: 55 4E 4B 54 20 3F 00 AC  97 C0 17 20 B8 52 44 4E  |UNKT ?..... .RDN|
00003B20: 41 4D 45 45 52 52 3B 20  C6 45 48 4C 45 52 2C 20  |AMEERR; .EHLER, |
00003B30: 44 41 20 4E 55 52 20 45  49 4E 20 D0 55 4E 4B 54  |DA NUR EIN .UNKT|
00003B40: 20 45 52 4C 41 55 42 54  20 49 53 54 00 D3 97 CA  | ERLAUBT IST....|
00003B50: 17 20 82 44 49 52 4E 41  4D 45 2C 58 3B 20 49 4E  |. .DIRNAME,X; IN|
00003B60: 20 D3 50 45 49 43 48 45  52 20 53 50 45 49 43 48  | .PEICHER SPEICH|
00003B70: 45 52 4E 00 D9 97 D4 17  3B 00 E0 97 DE 17 20 A2  |ERN.....;..... .|
00003B80: 00 0A 98 E8 17 20 8B 23  31 31 3B 20 41 4C 4C 45  |..... .#11; ALLE|
00003B90: 20 C1 54 54 52 49 42 55  54 5A 45 49 43 48 45 4E  | .TTRIBUTZEICHEN|
00003BA0: 20 47 45 4C 45 53 45 4E  20 3F 00 2D 98 F2 17 20  | GELESEN ?.-... |
00003BB0: B5 52 45 41 44 4E 41 4D  45 37 3B 20 4E 45 49 4E  |.READNAME7; NEIN|
00003BC0: 2C 20 44 41 4E 4E 20 57  45 49 54 45 52 00 33 98  |, DANN WEITER.3.|
00003BD0: FC 17 3B 00 46 98 06 18  52 45 41 44 4E 41 4D 45  |..;.F...READNAME|
00003BE0: 38 20 97 47 4E 43 00 56  98 10 18 20 B8 52 45 41  |8 .GNC.V... .REA|
00003BF0: 44 4E 41 4D 45 45 00 79  98 1A 18 20 85 23 22 20  |DNAMEE.y... .#" |
00003C00: 22 3B 20 49 53 54 20 44  41 53 20 DA 2E 20 45 49  |"; IST DAS .. EI|
00003C10: 4E 20 D3 50 41 43 45 20  3F 00 B0 98 24 18 20 B7  |N .PACE ?...$. .|
00003C20: 52 44 4E 41 4D 45 45 52  52 3B 20 4E 45 49 4E 20  |RDNAMEERR; NEIN |
00003C30: 44 41 4E 4E 20 C6 45 48  4C 45 52 2C 20 44 41 20  |DANN .EHLER, DA |
00003C40: 53 43 48 4F 4E 20 31 32  20 DA 45 49 43 48 45 4E  |SCHON 12 .EICHEN|
00003C50: 00 EC 98 2E 18 20 B8 52  45 41 44 4E 41 4D 45 38  |..... .READNAME8|
00003C60: 3B 20 57 45 49 54 45 52  20 45 49 4E 4C 45 53 45  |; WEITER EINLESE|
00003C70: 4E 20 55 4E 44 20 50 52  BD 46 45 4E 2C 20 4F 42  |N UND PR.FEN, OB|
00003C80: 20 4E 4F 43 48 20 41 4E  44 45 52 45 00 2A 99 38  | NOCH ANDERE.*.8|
00003C90: 18 3B 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.;              |
00003CA0: 20 20 20 20 20 20 20 20  20 20 20 3B 20 DA 45 49  |           ; .EI|
00003CB0: 43 48 45 4E 20 41 55 BE  45 52 20 D3 50 41 43 45  |CHEN AU.ER .PACE|
00003CC0: 20 56 4F 52 48 41 4E 44  45 4E 00 30 99 42 18 3B  | VORHANDEN.0.B.;|
00003CD0: 00 36 99 4C 18 3B 00 3C  99 56 18 3B 00 4E 99 60  |.6.L.;.<.V.;.N.`|
00003CE0: 18 52 45 41 44 4E 41 4D  45 45 20 81 23 30 00 6F  |.READNAMEE .#0.o|
00003CF0: 99 6A 18 20 82 54 58 54  50 54 52 3B 20 D4 45 58  |.j. .TXTPTR; .EX|
00003D00: 54 5A 45 49 47 45 52 20  4C BC 53 43 48 45 4E 00  |TZEIGER L.SCHEN.|
00003D10: 76 99 74 18 20 A6 00 7D  99 7E 18 20 A4 00 83 99  |v.t. ..}.~. ....|
00003D20: 88 18 3B 00 89 99 92 18  3B 00 B1 99 9C 18 3B 20  |..;.....;.....; |
00003D30: 20 DA 45 49 43 48 45 4E  20 41 55 53 20 C2 41 53  | .EICHEN AUS .AS|
00003D40: 49 43 42 55 46 46 45 52  20 45 49 4E 4C 45 53 45  |ICBUFFER EINLESE|
00003D50: 4E 00 B7 99 A6 18 3B 00  D9 99 B0 18 47 4E 43 20  |N.....;.....GNC |
00003D60: 88 53 58 52 45 47 3B 20  58 2D D2 45 47 49 53 54  |.SXREG; X-.EGIST|
00003D70: 45 52 20 52 45 54 54 45  4E 00 02 9A BA 18 20 83  |ER RETTEN..... .|
00003D80: 54 58 54 50 54 52 3B 20  DA 45 49 47 45 52 20 41  |TXTPTR; .EIGER A|
00003D90: 55 46 20 DA 45 49 43 48  45 4E 20 49 4E 20 D4 45  |UF .EICHEN IN .E|
00003DA0: 58 54 00 21 9A C4 18 20  81 42 55 46 2C 58 3B 20  |XT.!... .BUF,X; |
00003DB0: 4D 49 54 20 DA 45 49 43  48 45 4E 20 4C 41 44 45  |MIT .EICHEN LADE|
00003DC0: 4E 00 27 9A CE 18 3B 00  3D 9A D8 18 20 AE 3B 20  |N.'...;.=... .; |
00003DD0: D3 54 41 54 55 53 20 52  45 54 54 45 4E 00 67 9A  |.TATUS RETTEN.g.|
00003DE0: E2 18 20 8A 54 58 54 50  54 52 3B 20 DA 45 49 47  |.. .TXTPTR; .EIG|
00003DF0: 45 52 20 41 55 46 20 4E  BB 43 48 53 54 45 53 20  |ER AUF N.CHSTES |
00003E00: DA 45 49 43 48 45 4E 00  8C 9A EC 18 20 83 53 58  |.EICHEN..... .SX|
00003E10: 52 45 47 3B 20 58 2D D2  45 47 49 53 54 45 52 20  |REG; X-.EGISTER |
00003E20: 57 49 45 44 45 52 20 4C  41 44 45 4E 00 A7 9A F6  |WIEDER LADEN....|
00003E30: 18 20 9F 3B 20 D3 54 41  54 55 53 20 57 49 45 44  |. .; .TATUS WIED|
00003E40: 45 52 48 4F 4C 45 4E 00  C7 9A 00 19 20 A4 3B 20  |ERHOLEN..... .; |
00003E50: 5A 55 52 BD 43 4B 20 5A  55 52 20 C8 41 55 50 54  |ZUR.CK ZUR .AUPT|
00003E60: 52 4F 55 54 49 4E 45 00  CD 9A 0A 19 3B 00 D3 9A  |ROUTINE.....;...|
00003E70: 14 19 3B 00 D9 9A 1E 19  3B 00 21 9B 28 19 3B 2A  |..;.....;.!.(.;*|
00003E80: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00003E90: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00003EA0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00003EB0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00003EC0: 2A 00 69 9B 32 19 3B 2A  20 20 20 20 20 20 20 20  |*.i.2.;*        |
00003ED0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003EE0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003EF0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003F00: 20 20 20 20 20 20 20 20  2A 00 B1 9B 3C 19 3B 2A  |        *...<.;*|
00003F10: 20 20 20 20 20 20 20 20  C4 41 54 45 49 4C BB 4E  |        .ATEIL.N|
00003F20: 47 45 20 56 4F 4E 20 D4  41 53 54 41 54 55 52 20  |GE VON .ASTATUR |
00003F30: 45 49 4E 4C 45 53 45 4E  20 55 4E 44 20 49 4E 20  |EINLESEN UND IN |
00003F40: CC BB 4E 47 45 20 53 50  45 49 43 48 45 52 4E 20  |..NGE SPEICHERN |
00003F50: 2A 00 F9 9B 46 19 3B 2A  20 20 20 20 20 20 20 20  |*...F.;*        |
00003F60: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003F70: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003F80: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00003F90: 20 20 20 20 20 20 20 20  2A 00 41 9C 50 19 3B 2A  |        *.A.P.;*|
00003FA0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00003FB0: 2A 2A 2A 2A 2A 2A 2A 2A  20 4D 2E C6 2E 2A 2A 2A  |******** M...***|
00003FC0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00003FD0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00003FE0: 2A 00 47 9C 5A 19 3B 00  4D 9C 64 19 3B 00 77 9C  |*.G.Z.;.M.d.;.w.|
00003FF0: 6E 19 52 45 41 44 4C BB  4E 47 45 20 81 4D 46 4C  |n.READL.NGE .MFL|
00004000: 41 47 3B 20 C6 4C 41 47  20 46 BD 52 20 CD 45 4E  |AG; .LAG F.R .EN|
00004010: 55 45 50 55 4E 4B 54 00  AA 9C 78 19 20 B8 52 45  |UEPUNKT...x. .RE|
00004020: 41 44 4C BB 4E 47 45 30  3B 20 57 45 4E 4E 20 CD  |ADL.NGE0; WENN .|
00004030: 45 4E 55 45 50 55 4E 4B  54 20 3D 30 2C 20 44 41  |ENUEPUNKT =0, DA|
00004040: 4E 4E 20 53 50 52 49 4E  47 45 00 B1 9C 82 19 20  |NN SPRINGE..... |
00004050: A6 00 CA 9C 8C 19 20 A4  3B 20 41 4E 53 4F 4E 53  |...... .; ANSONS|
00004060: 54 45 4E 20 5A 55 52 BD  43 4B 00 D0 9C 96 19 3B  |TEN ZUR.CK.....;|
00004070: 00 E6 9C A0 19 52 45 41  44 4C BB 4E 47 45 30 20  |.....READL.NGE0 |
00004080: 97 50 52 49 4D 4D 00 13  9D AA 19 20 2E 91 43 52  |.PRIMM..... ..CR|
00004090: 2C 45 53 43 2C 22 51 9E  C4 41 54 45 49 4C BB 4E  |,ESC,"Q..ATEIL.N|
000040A0: 47 45 20 3A 20 99 22 2C  45 53 43 2C 22 54 22 2C  |GE : .",ESC,"T",|
000040B0: 45 4F 4D 00 22 9D B4 19  20 81 44 49 52 4C BB 4E  |EOM."... .DIRL.N|
000040C0: 47 45 00 33 9D BE 19 20  83 44 49 52 4C BB 4E 47  |GE.3... .DIRL.NG|
000040D0: 45 2B 31 00 56 9D C8 19  20 97 50 55 54 57 4F 52  |E+1.V... .PUTWOR|
000040E0: 44 3B 20 C4 41 54 45 49  4C BB 4E 47 45 20 41 55  |D; .ATEIL.NGE AU|
000040F0: 53 47 45 42 45 4E 00 5C  9D D2 19 3B 00 6C 9D DC  |SGEBEN.\...;.l..|
00004100: 19 20 97 52 45 41 44 4E  41 4D 45 30 00 9E 9D E6  |. .READNAME0....|
00004110: 19 20 B6 52 44 4C BB 4E  47 45 52 52 30 3B 20 42  |. .RDL.NGERR0; B|
00004120: 45 49 20 C6 45 48 4C 45  52 20 53 50 52 49 4E 47  |EI .EHLER SPRING|
00004130: 45 20 4F 48 4E 45 20 C1  55 53 47 41 42 45 00 BB  |E OHNE .USGABE..|
00004140: 9D F0 19 20 97 45 56 41  4C 3B 20 C4 41 54 45 49  |... .EVAL; .ATEI|
00004150: 4C BB 4E 47 45 20 4C 41  44 45 4E 00 DF 9D FA 19  |L.NGE LADEN.....|
00004160: 20 B6 52 44 4C BB 4E 47  45 52 52 3B 20 42 45 49  | .RDL.NGERR; BEI|
00004170: 20 C6 45 48 4C 45 52 20  53 50 52 49 4E 47 45 00  | .EHLER SPRINGE.|
00004180: FF 9D 04 1A 20 81 54 4F  2B 32 3B 20 C8 49 2D C2  |.... .TO+2; .I-.|
00004190: 59 54 45 2D CC BB 4E 47  45 20 4C 41 44 45 4E 00  |YTE-..NGE LADEN.|
000041A0: 2F 9E 0E 1A 20 B7 52 44  4C BB 4E 47 45 52 52 3B  |/... .RDL.NGERR;|
000041B0: 20 57 45 4E 4E 20 CC BB  4E 47 45 20 3E 20 46 46  | WENN ..NGE > FF|
000041C0: 46 46 2C 20 44 41 4E 4E  20 C6 45 48 4C 45 52 00  |FF, DANN .EHLER.|
000041D0: 35 9E 18 1A 3B 00 3E 9E  22 1A 20 81 54 4F 00 5D  |5...;.>.". .TO.]|
000041E0: 9E 2C 1A 20 82 4C BB 4E  47 45 3B 20 4C 4F 2D C2  |.,. .L.NGE; LO-.|
000041F0: 59 54 45 20 53 50 45 49  43 48 45 52 4E 00 68 9E  |YTE SPEICHERN.h.|
00004200: 36 1A 20 81 54 4F 2B 31  00 89 9E 40 1A 20 82 4C  |6. .TO+1...@. .L|
00004210: BB 4E 47 45 2B 31 3B 20  48 49 2D C2 59 54 45 20  |.NGE+1; HI-.YTE |
00004220: 53 50 45 49 43 48 45 52  4E 00 8F 9E 4A 1A 3B 00  |SPEICHERN...J.;.|
00004230: 96 9E 54 1A 20 A6 00 A9  9E 5E 1A 20 A4 3B 20 55  |..T. ....^. .; U|
00004240: 4E 44 20 5A 55 52 BD 43  4B 00 AF 9E 68 1A 3B 00  |ND ZUR.CK...h.;.|
00004250: D5 9E 72 1A 52 44 4C BB  4E 47 45 52 52 20 96 52  |..r.RDL.NGERR .R|
00004260: 44 4E 41 4D 45 45 52 52  3B 20 C1 55 53 47 41 42  |DNAMEERR; .USGAB|
00004270: 45 20 27 3F 27 00 DB 9E  7C 1A 3B 00 FD 9E 86 1A  |E '?'...|.;.....|
00004280: 52 44 4C BB 4E 47 45 52  52 30 20 A7 3B 20 C6 4C  |RDL.NGERR0 .; .L|
00004290: 41 47 20 46 BD 52 20 C6  45 48 4C 45 52 00 10 9F  |AG F.R .EHLER...|
000042A0: 90 1A 20 A4 3B 20 55 4E  44 20 5A 55 52 BD 43 4B  |.. .; UND ZUR.CK|
000042B0: 00 16 9F 9A 1A 3B 00 1C  9F A4 1A 3B 00 22 9F AE  |.....;.....;."..|
000042C0: 1A 3B 00 70 9F B8 1A 3B  20 2A 2A 2A 2A 2A 2A 2A  |.;.p...; *******|
000042D0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000042E0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000042F0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00004300: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00004310: 00 BE 9F C2 1A 3B 20 2A  20 20 20 20 20 20 20 20  |.....; *        |
00004320: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00004330: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00004340: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00004350: 20 20 20 20 20 20 20 20  20 20 20 20 20 2A 00 0C  |             *..|
00004360: A0 CC 1A 3B 20 2A 20 20  20 20 20 20 20 C4 41 54  |...; *       .AT|
00004370: 45 49 4C BB 4E 47 45 2C  20 C1 4E 46 41 4E 47 53  |EIL.NGE, .NFANGS|
00004380: 41 44 52 45 53 53 45 20  55 4E 44 20 C5 4E 44 41  |ADRESSE UND .NDA|
00004390: 44 52 45 53 53 45 20 41  55 53 47 45 42 45 4E 20  |DRESSE AUSGEBEN |
000043A0: 20 20 20 20 20 20 20 20  20 20 20 2A 00 5A A0 D6  |           *.Z..|
000043B0: 1A 3B 20 2A 20 20 20 20  20 20 20 20 20 20 20 20  |.; *            |
000043C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000043D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000043E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000043F0: 20 20 20 20 20 20 20 20  20 2A 00 A8 A0 E0 1A 3B  |         *.....;|
00004400: 20 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 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00004440: 2A 2A 2A 2A 2A 2A 2A 2A  00 AE A0 EA 1A 3B 00 B4  |********.....;..|
00004450: A0 F4 1A 3B 00 C8 A0 FE  1A 50 52 54 4C BB 4E 47  |...;.....PRTL.NG|
00004460: 45 20 97 50 52 49 4D 4D  00 E4 A0 08 1B 20 2E 91  |E .PRIMM..... ..|
00004470: 43 52 2C 22 99 CC BB 4E  47 45 20 3A 20 24 9E 22  |CR,"...NGE : $."|
00004480: 2C 45 4F 4D 00 EA A0 12  1B 3B 00 F9 A0 1C 1B 20  |,EOM.....;..... |
00004490: 81 44 49 52 4C BB 4E 47  45 00 0A A1 26 1B 20 83  |.DIRL.NGE...&. .|
000044A0: 44 49 52 4C BB 4E 47 45  2B 31 00 18 A1 30 1B 20  |DIRL.NGE+1...0. |
000044B0: 97 50 55 54 57 4F 52 44  00 1E A1 3A 1B 3B 00 2A  |.PUTWORD...:.;.*|
000044C0: A1 44 1B 20 97 50 52 49  4D 4D 00 42 A1 4E 1B 20  |.D. .PRIMM.B.N. |
000044D0: 2E 91 43 52 2C 22 99 56  4F 4E 20 9E 24 22 2C 45  |..CR,".VON .$",E|
000044E0: 4F 4D 00 58 A1 58 1B 20  81 23 3C 28 42 55 46 46  |OM.X.X. .#<(BUFF|
000044F0: 41 44 29 3B 20 4C 4F 57  00 6D A1 62 1B 20 83 23  |AD); LOW.m.b. .#|
00004500: 3E 28 42 55 46 46 41 44  29 3B 20 48 49 00 7C A1  |>(BUFFAD); HI.|.|
00004510: 6C 1B 20 97 50 52 54 57  4F 52 44 30 00 82 A1 76  |l. .PRTWORD0...v|
00004520: 1B 3B 00 8E A1 80 1B 20  97 50 52 49 4D 4D 00 A4  |.;..... .PRIMM..|
00004530: A1 8A 1B 20 2E 91 22 99  20 42 49 53 20 9E 24 22  |... ..". BIS .$"|
00004540: 2C 45 4F 4D 00 B5 A1 94  1B 20 81 23 3E 28 42 55  |,EOM..... .#>(BU|
00004550: 46 46 41 44 29 00 BC A1  9E 1B 20 A6 00 CD A1 A8  |FFAD)..... .....|
00004560: 1B 20 86 44 49 52 4C BB  4E 47 45 2B 31 00 E7 A1  |. .DIRL.NGE+1...|
00004570: B2 1B 20 B6 50 52 54 4C  BB 4E 47 45 31 3B 20 DD  |.. .PRTL.NGE1; .|
00004580: 42 45 52 54 52 41 47 00  ED A1 BC 1B 3B 00 FC A1  |BERTRAG.....;...|
00004590: C6 1B 20 85 23 4D 41 58  50 41 47 45 00 3A A2 D0  |.. .#MAXPAGE.:..|
000045A0: 1B 20 B5 50 52 54 4C BB  4E 47 45 32 3B 20 57 45  |. .PRTL.NGE2; WE|
000045B0: 4E 4E 20 4C BB 4E 47 45  20 3C 20 28 4D 41 58 50  |NN L.NGE < (MAXP|
000045C0: 41 47 45 20 2D 20 C2 55  46 46 41 44 29 20 44 41  |AGE - .UFFAD) DA|
000045D0: 4E 4E 20 53 50 52 49 4E  47 45 00 6B A2 DA 1B 20  |NN SPRINGE.k... |
000045E0: B7 50 52 54 4C BB 4E 47  45 31 3B 20 57 45 4E 4E  |.PRTL.NGE1; WENN|
000045F0: 20 4C BB 4E 47 45 20 3E  20 28 4D 41 58 50 41 47  | L.NGE > (MAXPAG|
00004600: 45 20 2D 20 42 55 46 46  41 44 29 00 84 A2 E4 1B  |E - BUFFAD).....|
00004610: 20 83 44 49 52 4C BB 4E  47 45 3B 20 4C 4F 2D 20  | .DIRL.NGE; LO- |
00004620: C2 59 54 45 00 B5 A2 EE  1B 20 B8 50 52 54 4C BB  |.YTE..... .PRTL.|
00004630: 4E 47 45 32 3B 20 57 45  4E 4E 20 4C BB 4E 47 45  |NGE2; WENN L.NGE|
00004640: 20 3D 20 28 4D 41 58 50  41 47 45 20 2D 20 42 55  | = (MAXPAGE - BU|
00004650: 46 46 41 44 29 00 BB A2  F8 1B 3B 00 D9 A2 02 1C  |FFAD).....;.....|
00004660: 50 52 54 4C BB 4E 47 45  31 20 83 23 4D 41 58 50  |PRTL.NGE1 .#MAXP|
00004670: 41 47 45 2D 31 3B 20 48  49 00 E8 A2 0C 1C 20 81  |AGE-1; HI..... .|
00004680: 23 24 46 46 3B 20 4C 4F  00 F7 A2 16 1C 20 97 50  |#$FF; LO..... .P|
00004690: 52 54 57 4F 52 44 30 00  03 A3 20 1C 20 97 50 52  |RTWORD0... . .PR|
000046A0: 49 4D 4D 00 22 A3 2A 1C  20 2E 91 22 99 20 55 4E  |IMM.".*. ..". UN|
000046B0: 44 22 2C 43 52 2C 22 56  4F 4E 20 9E 24 22 2C 45  |D",CR,"VON .$",E|
000046C0: 4F 4D 00 37 A3 34 1C 20  81 23 3C 28 42 55 46 46  |OM.7.4. .#<(BUFF|
000046D0: 41 44 29 3B 20 4C 4F 00  4B A3 3E 1C 20 83 23 3E  |AD); LO.K.>. .#>|
000046E0: 28 42 55 46 46 41 44 29  3B 48 49 00 5A A3 48 1C  |(BUFFAD);HI.Z.H.|
000046F0: 20 97 50 52 54 57 4F 52  44 31 00 66 A3 52 1C 20  | .PRTWORD1.f.R. |
00004700: 97 50 52 49 4D 4D 00 7C  A3 5C 1C 20 2E 91 22 99  |.PRIMM.|.\. ..".|
00004710: 20 42 49 53 20 9E 24 22  2C 45 4F 4D 00 82 A3 66  | BIS .$",EOM...f|
00004720: 1C 3B 00 97 A3 70 1C 20  81 44 49 52 4C BB 4E 47  |.;...p. .DIRL.NG|
00004730: 45 2B 31 3B 20 48 49 00  9E A3 7A 1C 20 A7 00 C1  |E+1; HI...z. ...|
00004740: A3 84 1C 20 92 23 28 4D  41 58 50 41 47 45 2D 32  |... .#(MAXPAGE-2|
00004750: 2A 3E 28 42 55 46 46 41  44 29 29 3B 20 3D 24 31  |*>(BUFFAD)); =$1|
00004760: 30 00 D2 A3 8E 1C 20 84  23 31 3B 20 C2 41 4E 4B  |0..... .#1; .ANK|
00004770: 20 31 00 FC A3 98 1C 20  2E 91 53 4B 49 50 32 3B  | 1..... ..SKIP2;|
00004780: 20 4E BB 43 48 53 54 45  4E 20 C2 59 54 45 53 20  | N.CHSTEN .YTES |
00004790: BD 42 45 52 53 50 52 49  4E 47 45 4E 00 16 A4 A2  |.BERSPRINGEN....|
000047A0: 1C 50 52 54 4C BB 4E 47  45 32 20 84 23 30 3B 20  |.PRTL.NGE2 .#0; |
000047B0: C2 41 4E 4B 20 30 00 28  A4 AC 1C 20 99 3B 20 C8  |.ANK 0.(... .; .|
000047C0: 49 20 2D 20 C2 59 54 45  00 41 A4 B6 1C 20 81 44  |I - .YTE.A... .D|
000047D0: 49 52 4C BB 4E 47 45 3B  20 4C 4F 2D 20 C2 59 54  |IRL.NGE; LO- .YT|
000047E0: 45 00 61 A4 C0 1C 20 82  45 4E 44 54 45 58 54 3B  |E.a... .ENDTEXT;|
000047F0: 20 20 C5 4E 44 45 20 44  45 53 20 D4 45 58 54 45  |  .NDE DES .EXTE|
00004800: 53 00 71 A4 CA 1C 20 88  45 4E 44 54 45 58 54 2B  |S.q... .ENDTEXT+|
00004810: 31 00 94 A4 D4 1C 20 89  45 4E 44 54 45 58 54 42  |1..... .ENDTEXTB|
00004820: 3B 20 45 4E 54 53 50 52  45 43 48 45 4E 44 45 20  |; ENTSPRECHENDE |
00004830: C2 41 4E 4B 00 C1 A4 DE  1C 20 96 50 52 54 57 4F  |.ANK..... .PRTWO|
00004840: 52 44 3B 20 C1 44 52 45  53 53 45 20 41 55 53 47  |RD; .DRESSE AUSG|
00004850: 45 42 45 4E 20 28 C5 4E  44 41 44 52 45 53 53 45  |EBEN (.NDADRESSE|
00004860: 29 00 C7 A4 E8 1C 3B 00  CD A4 F2 1C 3B 00 13 A5  |).....;.....;...|
00004870: FC 1C 3B 20 2B 2B 2B 2B  2B 2B 2B 2B 2B 2B 2B 2B  |..; ++++++++++++|
00004880: 2B 2B 2B 2B 2B 2B 2B 2B  2B 2B 2B 2B 2B 2B 2B 2B  |++++++++++++++++|
00004890: 2B 2B 2B 2B 2B 2B 2B 2B  2B 2B 2B 2B 2B 2B 2B 2B  |++++++++++++++++|
000048A0: 2B 2B 2B 2B 2B 2B 2B 2B  2B 2B 2B 2B 2B 2B 2B 2B  |++++++++++++++++|
000048B0: 2B 2B 2B 00 19 A5 06 1D  3B 00 32 A5 10 1D 50 52  |+++.....;.2...PR|
000048C0: 54 57 4F 52 44 30 20 84  23 30 3B 20 C2 41 4E 4B  |TWORD0 .#0; .ANK|
000048D0: 20 30 00 3F A5 1A 1D 20  2E 91 53 4B 49 50 32 00  | 0.?... ..SKIP2.|
000048E0: 58 A5 24 1D 50 52 54 57  4F 52 44 31 20 84 23 31  |X.$.PRTWORD1 .#1|
000048F0: 3B 20 C2 41 4E 4B 20 31  00 6C A5 2E 1D 50 52 54  |; .ANK 1.l...PRT|
00004900: 57 4F 52 44 20 82 54 32  3B 20 4C 4F 00 7B A5 38  |WORD .T2; LO.{.8|
00004910: 1D 20 88 54 32 2B 31 3B  20 48 49 00 8C A5 42 1D  |. .T2+1; HI...B.|
00004920: 20 89 54 32 2B 32 3B 20  C2 41 4E 4B 00 A7 A5 4C  | .T2+2; .ANK...L|
00004930: 1D 20 96 50 55 54 54 32  3B 20 D7 4F 52 54 20 41  |. .PUTT2; .ORT A|
00004940: 55 53 47 45 42 45 4E 00  AD A5 56 1D 3B 00 B3 A5  |USGEBEN...V.;...|
00004950: 60 1D 3B 00 B9 A5 6A 1D  3B 00 BF A5 74 1D 3B 00  |`.;...j.;...t.;.|
00004960: 00 00                                             |..              |
A\.\D.;  DIESE INCLUDEDATEI HEI.T      '
JANUS-INC.A 03'..\N.;  DATUM 08.08.1989 
   20.00 UHR.B\X.;..]..;****************
****************************************
**********.R]..;*                       
                                        
 *..]..;*     FILE LESEN; SN AUS DIR MU.
 IN DIRCLUSTER &^+1 SEIN         *..] .;
*                                       
                         *.*^..;********
********************* M.F.**************
******************.0^..;.6^..;.<^H.;.B^R
.;.H^..;.U^..FILERD ...^.. .FATRDWR0; FA
T NACH BUFAD LESEN OHNE INQ-DISK..^.. .F
ILERDE1..^..;..^.. .SETPNTR..^..;..^". .
#0.F^,. .L.NGE..^6. .L.NGE+1; FILEL.NGE 
AUF NULL..^@.;..^J. .DIRCLUSTER.._T. .DI
RCLUSTER+1.._^.;.G_H.FILERD1 .SNCALC; AU
S SN SI,TR,SE BERECHNEN.J_R. .FILERDE1; 
BEI FEHLER SPRINGE.._|. .#0; Z.HLER HALB
CLUSTER = 0.._..FILERD3 .CALCSE,Y.._.. .
SEKTOR.._.. .CALCTR,Y.H_.. .SPUR.W_.. .C
ALCSI,Y.._.. .SEITE.._B.;.._L. ..._V.  .
._..;..`.. .READ0; BLOCK LESEN..`..;.2`.
. .FILERDE; FEHLER.9`.. ..B`.. .#1.P`.. 
.FILERD4.W`&. ..^`0. ...`:. .FILERD3; SP
RINGE IMMER,DA Y..`D.;..`N.FILERD4 ...`X
. .L.NGE+1..`B. .#4.J`L. .L.NGE+1; L.NGE
 = ^+ 1024.P`V.;..`.. .SNLONEW..`.. .SNH
INEW..A.. .GETSN; SN AUS FAT HOLEN UND N
ACH SNLO/HINEW.$A..;./A.. .#$0F.=A.. .FI
LERD1.HA.. .#$F8.VAF. .FILERD1.\AP.;.PAZ
. .; KEIN FEHLER.WA.. ..}A..;..A..;..A..
FILERDE ...A..FILERDE1 .; FEHLER AUFGETR
ETEN..A.. ..AA .;.GA*.;..A4.;X          
             X                       X.2
B>.;   X                 X     X        
         X.CBH.;      X           X     
      X           X..BR.;         X     
X                 X     X..B\.;         
   X                       X..BF.;      
   X     X                 X     X..CP.;
      X           X           X         
  X.OCZ.;   X                 X     X   
              X..C..;X                  
     X                       X..C..;.TC.
.;**************************************
****************************..D..;*     
                                        
                   *.DD..;*      FILE SC
HREIBEN, FILEL.NGE IN 'L.NGE'           
           *..D..;*                     
                                        
   *..D..;************************* M.F.
************************************..DJ
.;..ET.;..E..;..E..;..E..;.$E..FILEWR .L
.NGE.3E.. .DIRL.NGE.AE.. .L.NGE+1.RE.. .
DIRL.NGE+1.XE$.;.QE.. .#0; ANFANGSZUSTAN
D..E8. .CLUSTEROLD..EB. .CLUSTEROLD+1..E
L.;..EV. .; FLAG F.R LESEN..E`. .FATRDWR
0; FAT EINLESEN OHNE INQ-DISK..FJ. .FWRE
RROR; BEI FEHLER SPRINGE..FT.;.,F~. .SET
PNTR; ZEIGER AUF ANFANG TEXT.2F..;.UF.. 
.#2; ANFANGS-SN HI-BYTE LADEN.RF.. .CLUS
TER; SPEICHERN UND..F.. .#0; LO-BYTE LAD
EN UND..F.. .CLUSTER+1; EBENFALLS SPEICH
ERN..F..;.LFD.FILEWR1 .GETSN.RFN.;..FX. 
.#0; LO = 0 ?..F.. .FILEWR2..G.. .#0; IS
T HI-SN AUCH = 0 ?.MG.. .FILEWRB1; WENN 
JA, FREIES CLUSTER GEFUNDEN-> SPRINGE.SG
..;..G..FILEWR2 .CLUSTER; ERH.HE ZU .BER
PR.FENDES CLUSTER..G.. .FILEWR3; KEIN .B
ERTRAG -> JMP.PG.. .CLUSTER+1; .BERTRAG 
ADDIEREN.VG(.;..G2.FILEWR3 .CLUSTER..G<.
 .CLUSTER+1;..HF. .MAXSN+1..HP. .FILEWR1
..HZ.;.KHD. .MAXSN; MAXSN -> ALLE CLUSTE
R .BERPR.FT.MHN. .FILEWR1; NEIN, DANN SP
RINGE.SHX.;..H..DISKFULL .PRIMM; SONST G
IB DEN FEHLER AUS.IH.. ..".FEHLER: DISK 
IST VOLL.",CR,EOM.XH..FWRERROR ...H . ..
.H..;..H..;..H..FILEWRB1 .#0;.)IH. .CLUS
TEROLD; IST DAS DAS ERSTE CLUSTER.UIR. .
FILEWRB2; DES ZU SCHREIBENDEN FILES ?..I
.. .CLUSTEROLD+1; WENN NICHT, DANN SPRIN
GE..I.. .FILEWRB2; NACH ^,. I..;.LI.. .C
LUSTER; SONST SPEICHERE DIE CLUSTER-..I.
. .DIRCLUSTER; NUMMER IM DIRECTORYEINTRA
G..J.. .CLUSTER+1..J.. .DIRCLUSTER+1.RJ"
. .FILEWRC1; DANN SPRINGE UM AUF DISK ZU
 SCHREIBEN.XJ,.;..J6.FILEWRB2 .STORESN; 
CLUSTERNUMMER IN FAT SPEICHERN..J@.;..JJ
.;..JT.FILEWRC1 .CLUSTER..J^. .CLUSTER+1
.MJH. .SNCALC..JR. .FWRERROR; BEI FEHLER
 SPRINGE..J|.;..K.. .#0; Z.HLER HALBCLUS
TER = 0..K..FILEWRC2 .CALCSE,Y.QK.. .SEK
TOR; DATEN DES JEWEILIGEN.`K.. .CALCTR,Y
.|K.. .SPUR; HALBCLUSTER F.R..K.. .CALCS
I,Y..KB. .SEITE; READ SPEICHERN..KL.;..K
V. ..KK..  ; Z.HLER SICHERN.QK..;..K.. .
WRITE0; BLOCK SCHREIBEN..K.. ...L.. .FWR
ERROR; BEI FEHLER SPRINGE..L..;.JL.. .#1
; SCHON BEIDE HALBCLUSTER GELESEN?.KL&. 
.FILEWRC3; JA, DANN SPRINGE..L0. .; SONS
T ZWEITES HALBCLUSTER LESEN..L:. ...LD. 
.FILEWRC2; SPRINGE IMMER,DA Y.CLN.;..LX.
FILEWRC3 .CLUSTER; GESCHRIEBENES CLUSTER
 IN CLUSTEROLD..MB. .CLUSTEROLD.+ML. .CL
USTER+1; UMKOPIEREN.>MV. .CLUSTEROLD+1.D
M..;.SM..FILEWRC4 ...M.. .L.NGE+1; GESCH
RIEBENE L.NGE UM 4 PAGES..M.. .#4; ERNIE
DRIGEN..M.. .L.NGE+1.UM.. .FILEWRE; WENN
 ALLE BYTES .BERTRAGEN -> JMP..N.. .FILE
WRD; SPRINGE, WENN HI<>0 IST, DANN -> JM
P.6NF. .L.NGE; SONST PR.FE, OB AUCH LO =
0 IST..SNP. .FILEWRE; WENN JA, DANN ENDE
, DA ALLE DATEN GESCHRIEBEN.YNZ.;..N..FI
LEWRD .FILEWR2; N.CHSTES FREIES CLUSTER 
SUCHEN..N..;..N..;..N..FILEWRE .#$FF; KE
NNNUMMER F.R DATEIENDE..N.. .CLUSTER..O.
. .$0F; SN IN FAT F.R FILEENDE.&O . .CLU
STER+1.4O*. .STORESN.:O4.;.IO>.FILEWRE1 
..~OH. .FATRDWR0; FAT AUF DISK SCHREIBEN
 OHNE DISK-INQ..OR.;..O\.;..OF.;.XOP.;**
****************************************
************************. PZ.;*         
                                        
               *.HP..;*        SEKTORNR.
 AUS FAT LESEN UND NEUE SN BERECHNEN    
       *..P..;*                         
                                       *
..P..;************************* O.F.****
********************************..P..;..
Q..;..Q..;..Q..;..QJ.;.SQT.;     SEKTORN
NR. AUS FAT LESEN,    ALTE SN IN SNLO, S
NHI.YQ..;._Q..;..Q..;  HI-BYTE IN X-REGI
STER, LO-BYTE IN AKKUMULATOR..Q..;..Q..G
ETSN .SNLO..Q.. .SNHI..Q..;.VQ$.; EIGENT
LICHE ROUTINE:..Q..;..Q8.GETSN0 .GTSTSN.
.RB. .GTSNODD; WENN UNGERADE DANN JMP..R
L.;.ERV.GTSNEVEN .(FAT),Y; SNLO AUS FAT 
LADEN.BR`. .SNLONEW; UND SPEICHERN.|RJ. 
.FAT; EIN BYTE H.HER..RT. .GETSN3; WENN 
KEIN .BERLAUF DANN JMP.IR~. .FAT+1; SONS
T HI-BYTE ERH.HEN.OR..;..R..GETSN3 .(FAT
),Y; HIBYTE LADEN..S.. .#%00001111; UNTE
RES HALB-BYTE AUSMASK..;S.. .SNHINEW; UN
D SPEICHERN.BS.. ..PS.. .SNLONEW.WSD. ..
.SN.;                           --------
--------..SX.GTSNODD .(FAT),Y; HALB-BYTE
 LADEN.SS.. .SNHINEW; UND ZWISCHENSPEICH
ERN..S.. .FAT; ZEIGER=^+1..T.. .GETSN4; 
WENN KEIN .BERTRAG ->JMP.5T.. .FAT+1; SO
NST .BERTRAG ADDIEREN.]T..GETSN4 .(FAT),
Y; HALB-BYTE LO LADEN.ZT.. .SNLONEW; UND
 SPEICHERN..T..;..T(.GETSN5 .#4; LO+HI A
UFBEREITEN..T2.GETSN6 .SNHINEW.DT<. .SNL
ONEW.JTF.;..TP. .; 4BITS ROTIEREN..TZ. .
GETSN6..TD. .SNHINEW..UN.;..UX. .SNHINEW
; HI-BYTE LADEN.HU.. .#%00001111; UNTERE
S HALBBYTE AUSM..EU.. .SNHINEW; UND SPEI
CHERN.LU.. ..ZU . .SNLONEW..U.. ...U..;.
.U..;.DUH.;X                       X    
                   X..UR.;   X          
       X     X                 X.)V..;  
    X           X           X           
X.WV..;         X     X                 
X     X..V..;            X              
         X..V..;         X     X        
         X     X..V..;      X           
X           X           X..W..;   X     
            X     X                 X.LW
..;X                       X            
           X.RW".;.XW,.;. W6.;**********
****************************************
****************..W@.;*                 
                                        
       *.0XJ.;*        SEKTORNR. IN FAT 
SCHREIBEN BEI CLUSTEROLD;              *
.XXT.;*        IN CLUSTER IST DIE ZU SCH
REIBENDE SEKTORNUMMER          *..X^.;**
*********************** O.F.************
************************.FXH.;.LXR.;.RX|
.;.XX..;..X..;..Y..;     SEKTORNNR. IN F
AT SCHREIBEN,   ADRESSE IN CLUSTEROLD.#Y
..;.)Y..;./Y..;.5YB.;.MYL.STORESN .CLUST
EROLD.XYV. .SNLO.KY.. .CLUSTEROLD+1.VY..
 .SNHI.|Y..;..Y.. .CLUSTER+1..Y.. .#%000
01111..Y.. .CLUSTER+1..Y..;..Y&.;.TY0.; 
EIGENTLICHE ROUTINE:.ZY:.;..YD.STORESN0 
.GTSTSN..ZN. .STSNODD; WENN UNGERADE DAN
N JMP..ZX.;.=ZB.STSNEVEN .CLUSTER; SNLO 
LADEN.AZL. .STSNFAT; UND IN FAT SPEICHER
N.{ZV. .FAT; EIN BYTE H.HER..Z.. .STSNEV
EN1; WENN KEIN .BERLAUF DANN JMP.KZ.. .F
AT+1; SONST HI-BYTE ERH.HEN.QZ..;..Z..ST
SNEVEN1 .(FAT),Y; HIBYTE LADEN."{.. .#%1
1110000; UNTERES HALB-BYTE L.SCHEN.2{.. 
.CLUSTER+1.V{.. .STSNFAT; UND IN FAT SPE
ICHERN.]{F. ...{P.;                     
      ----------------..{Z.STSNODD .CLUS
TER..{.. .SNLO..{.. .CLUSTER+1.I{.. .SNH
I.O{..;..{.. .#4; LO+HI AUFBEREITEN..{..
STSNODD1 .SNHI..| . .SNLO..|*.;.&|4. .; 
4BITS ROTIEREN.5|>. .STSNODD1.@|H. .SNHI
.F|R.;.Q|\. .SNHI.||F. .#%11110000; UNTE
RES HALBBYTE L.SCHEN..|P. .SNHI..|Z.;..|
.. .(FAT),Y; HALB-BYTE LADEN.V|.. .#%000
01111; OBERES HALBBYTE L.SCHEN..|.. .SNH
I..|.. .STSNFAT; UND SPEICHERN..}.. .FAT
; ZEIGER=^+1.=}.. .STSNODD2; WENN KEIN .
BERTRAG ->JMP.B}.. .FAT+1; SONST .BERTRA
G ADDIEREN..}J.STSNODD2 .SNLO; LO-BYTE L
ADEN..}T. .STSNFAT; UND SPEICHERN..}..;.
.}.. ...}..;..}..; +-+-+-+-+-+-+-+-+-+-+
-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-..}
..;..~..GTSTSN .SNHI; HI-BYTE IN CARRY.J
~.. .SNLO; DURCH 2 TEILEN , BIT 0 IN CAR
RY.M~$. .; UND F.R TEST GERADE RETTEN.S~
..;..~8. .SNLO; LO-BYTE = LO(INT(SN/2)) 
RETTEN.I~B. .SNHI; HI-BYTE = HI(INT(SN/2
)) RETTEN.P~L. ...~V. .; CARRY HOLEN UND
 RETTEN..~`. .SNLO..J. .SNHI; (SN/2)*2 
= SN..T.;.6~. .; LO(INT(SN/2)) HOLEN.=
.. ..X.. .SNLO; SN + INT(SN/2).... .G
TSTSN1; KEIN .BERTRAG -> SPRINGE.... .S
NHI; SONST HI-BYTE +1.B..GTSTSN1 .SNLO;
 LO-BYTE SPEICHERN.H..;.YD. .#<(FATBUF
)..N. ...X. .SNLO.... .GTSTSN2..... .
SNHI.....GTSTSN2 .FAT.....;.=... .; HI(I
NT(SN/2)) ZUR.CKHOLEN.R... .; F.R ADDIER
EN..... .#>(FATBUF); ZEROPAGEZEIGER AUF 
FAT ADDIEREN...(. .SNHI; UND ALTES HI-BY
TE DAZUZ.HLEN...2.;.N.<. .FAT+1; UND SPE
ICHERN.W.F. .#0...P.;...Z. .; FLAG F.R G
ERADE / UNGERADE./.D. .; GIBT IN FATBUF 
DIE NEUE ADRESSE ZUR.CK.D.N.;           
                FORMEL: X = 1.5 * SN.J.X
.;.P...;.....;     ******** O.F. *******
*.....;... .;.K...STSNFAT .(FAT),Y; BYTE
 IN FAT 1 SPEICHERN..... .; BYTE SICHERN
..... .FAT+1; HI-ZEIGER AUF FAT-ADRESSE.
$.H.  ; AUF DEN STACK RETTEN.+.R. ..\...
 .FATPAGES; ANZAHL DER PAGES EINES FAT-T
EILS.}... .FAT+1; IN ZEIGER SPEICHERN...
..;..... .; ZU SPEICHERNDES BYTE ZUR.CKH
OLEN.S... .(FAT),Y; BYTE IN FAT 2 SPEICH
ERN..... .; URSPR.NGLICHES HI-BYTE ZUR.C
KHOLEN.1... .FAT+1; UND IN ZEIGER SPEICH
ERN (ALTER STAND).8.". ..>.,.;.D.6.;.J.@
.;.P.J.;.V.T.;...^.;X                   
    X                       X.A.H.;   X 
                X     X                 
X...R.;      X           X           X  
         X. .|.;         X     X        
         X     X.K...;            X     
                  X.Y...;         X     
X                 X     X.....;      X  
         X           X           X.....;
   X                 X     X            
     X.....;X                       X   
                    X.....;.C.B.;*******
****************************************
*******************...L.;*              
                                        
          *...V.;*        SEITE, SPUR, S
EKTOR UND SEKTOR+1 AUS SN BERECHNEN     
  *.;...;*                              
                                  *.....
;************************* M.F. ********
***************************.....;.....;.
....;.....;.....;.A.&.;    SN IN SNLONEW
, SNHINEW.G.0.;.M.:.;...D.;  HI-BYTE IN 
X-REGISTER, LO-BYTE IN AKKUMULATOR...N.;
...X.SNCALC .SNLONEW.*.B. .SNHINEW.0.L.;
.K.V.; EIGENTLICHE ROUTINE:.Q...;.U...SN
CALC0 .SNLONEW; LO-BYTE LADEN..... .SNHI
NEW; IST DAS HI-BYTE > 0 ?..... .CALC1; 
JA -> JMP.....;..... .#2; IST DAS LO-BYT
E (ALSO GANZ SN, DA HI=0) < 2 ?. ... .CA
LCER; JA -> DANN FEHLER, DA UNG.LTIGE SN
.&.F.;.V.P. .SPURSTART; IST SN AUF SPUR 
0?  ( < (4/5)).O.Z. .CALC1; NEIN -> JMP.
U...;..... .; SN *= 2..... ..D... .SPURO
FFSET; SEKTOR F.R SPUR 0 BERECHNEN - SEI
TE B..... .; IN XR SPEICHERN..... .#$00;
 YR F.R SPUR 0.*. . .CALCFD_2; DATEN IN 
CALCSE, -TR, -SI SPEICHERN.H.*.;--------
----------------.N.4.;.Z.>.CALC1 ....H. 
.SPURSOLL; DA SN > SPURSTART, BEI SPUR 1
 BERECHNEN...R. .CALC2; KEINEN .BERTRAG 
ABZIEHEN.R.\. .; .BERTRAG ABZIEHEN.X.F.;
...P.CALC2 .#$01; STARTSPUR IST 1...Z.CA
LCLOOP .#$00; HI-SN = 0 ?.E... .CALC3; W
ENN NICHT DANN WEITERABZIEHEN.K...;.P...
 .#SPURDIST+1; WENN SN < 10 DANN..... .C
ALCFD_1; IST DIE RICHTIGE SPUR GEFUNDEN 
->.....;.B...CALC3 .; N.CHSTE SPUR..... 
.MAXSPUR; IST SIE GR..ER ALS 39/79...J. 
.CALCER; JA -> FEHLER (NUR 80 SPUREN 0-7
9). .T.;.(... . .]... .#SPURDIST; 9 CLUS
TERS ABZIEHEN -> N.CHSTE SPUR.{... .CALC
LOOP; KEIN .BERTRAG..... .; .BERTRAG ABZ
IEHEN..... .CALCLOOP; IMMER SPRINGEN....
.;.X...;------------------------...$.;..
...CALCFD_1 .; CLUSTER * 2 = SEKTOR...8.
 .; SEKTOR NACH XR.J.B.CALCFD_2 .CALCTR;
 ERRECHNETE SPUR SPEICHERN._.L. .CALCTR+
1; DTO..E.V.;...`. .#$01; YR IST SCHLEIF
ENZ.HLER...J. .CALCST; SEKTOR+1 & SEITE+
1 SPEICHERN.M.T. .; Z.HLER VERRINGERN...
~. .; VORHERGEHENDER SEKTOR..... .CALCST
; SEKTOR & SEITE SPEICHERN..... ..4... .
; ZUR.CK OHNE FEHLER.:...;.X...;--------
----------------.^...;.Z.D.CALCST .; SEK
TOR RETTEN...N.  ...X. .SEITE_A; FLAG F.
R SEITE A (BEI 1581 SEITE 2).....;..... 
.#SPURDIST+1; SEKTORNR. > 9 ?..... .CALC
ST2; NEIN -> ABSPEICHERN AUF SEITE A....
.;..... . .E... .#SPURDIST; SONST 9 SEKT
OREN ABZIEHEN.V... .SEITE_B; UND FLAG F.
R SEITE B (1 BEI 1581)...(.CALCST2 .CALC
SE,Y; BERECHNETEN SEKTOR SPEICHERN...2. 
. ...<. .CALCSI,Y; BERECHNETE SEITE SPEI
CHERN...F. .; GESICHERTEN SEKTOR ZUR.CKH
OLEN...P. . ...Z. . .2.D.;--------------
----------.8.N.;.D.X.CALCER .; ES IST EI
N FEHLER AUFGETRETEN.K... ..Q...;.W...;.
}. .;.....;.K...;***********************
****************************************
***.....;*                              
                                  *.[.H.
;*        DATEINNAMEN VON TASTAUR EINLES
EN UND IN DIRNAME SP.     *...R.;*      
                                        
                  *.....;***************
********** M.F.*************************
***********.....;.....;.....;.....READNA
ME .IOCLOSE. ... .CLRCHN.&...;.2.". .PRI
MM._.,. ..CR,ESC,"Q..DATEINAME : .",ESC,
"T",EOM.F.6. ....@. .PRINTNAME; AUSGEBEN
 OHNE CR...J.READNAME0 .#"."; MIT HOME L
ADEN...T. .BSOUT...^.;.Q.H.READNAME0B .#
0...R. .TXTPTR...|.READNAME1 .BASIN.....
 .#127; NUR KLEINBUCHSTABEN..... .BUF,X.
&... ..S... .#156; MEHR ALS 155 ZEICHEN 
(=2 ZEILEN).C... .READNAME2.I...;...B. .
RDNAMEERR; BEI FEHLER SPRINGE...L.;.G.V.
READNAME2 .#CR; RETURN ? = ALLE ZEICHEN 
GELESEN..... .READNAME1; NEIN -> WEITERL
ESEN.....;.....READNAME3 .#0.,... .BUF-1
,X; BUFFER MIT 0 ABSCHLIE.EN.M... .SCTOP
; OBERE FENSTERGRENZE.M... .SCLF; LINKE 
FENSTERGRENZE.S...;.Z.&. ....0. .; UND Z
UR.CK...:.;  ENDE 1. TEIL...D.;...N.; DA
TEINAMEN AUSWERTEN UND IN DIRNAME SPEICH
ERN...X.;...B.READNAMEB .#10; ANZAHL ZEI
CHEN IN DIRNAME.+.L. .#" "; MIT SPACE LA
DEN.^.V.READNAME4 .DIRNAME,X; DIRNAME MI
T SPACE F.LLEN.E... ...... .READNAME4; B
IS ALLE ZEICHEN GEF.LLT.....;.P... .FILE
STATUS; STATUS DER DATEI (Z.B. UNTERVERZ
EICHNIS)..... .DIRNAME+11; IN DIRNAME SP
EICHERN (VORBESETZEN).....;..... .#0.!.F
. .TXTPTR.4.P.READNAME5 .GNC.E.Z. .READN
AMEE; ALLE ZEICHEN GELESEN? JA -> JMP.K.
..;..... .#"."; ZEICHEN = '.' ?..... .RE
ADNAME6; ATTRIBUT EINLESEN.....;.V... .D
IRNAME,X; IN DIRNAME SPEICHERN..... ....
 . .#9; BEREITS ALLE M.GLICHEN ZEICHEN G
ELESEN?...*. .READNAME5.%.4.;.E.>.RDNAME
ERR .PRIMM; FEHLERMELDUNG, DA DATEINAME 
NICHT RICHTIG.{.H. .."...?.",CR,EOM...R.
 .#0...\. .TXTPTR; TEXTZEIGER L.SCHEN.F.
F. .SCTOP; OBERE FENSTERGRENZE...P. .SCL
F; LINKE FENSTERGRENZE...Z. ...... .....
.;.$...READNAME6 .#8; ATTRIBUT AB 8. ZEI
CHEN.F...READNAME7 .GNC; ZEICHEN LESEN.V
... .READNAMEE.V... .#"."; IST DAS EIN P
UNKT ?..... .RDNAMEERR; FEHLER, DA NUR E
IN PUNKT ERLAUBT IST.S.J. .DIRNAME,X; IN
 SPEICHER SPEICHERN.Y.T.;..... ...... .#
11; ALLE ATTRIBUTZEICHEN GELESEN ?.-... 
.READNAME7; NEIN, DANN WEITER.3...;.F...
READNAME8 .GNC.V... .READNAMEE.Y... .#" 
"; IST DAS Z. EIN SPACE ?...$. .RDNAMEER
R; NEIN DANN FEHLER, DA SCHON 12 ZEICHEN
..... .READNAME8; WEITER EINLESEN UND PR
.FEN, OB NOCH ANDERE.*.8.;              
           ; ZEICHEN AU.ER SPACE VORHAND
EN.0.B.;.6.L.;.<.V.;.N.`.READNAMEE .#0.O
.J. .TXTPTR; TEXTZEIGER L.SCHEN.V.T. ..}
.~. ......;.....;.....;  ZEICHEN AUS BAS
ICBUFFER EINLESEN.....;.Y...GNC .SXREG; 
X-REGISTER RETTEN..... .TXTPTR; ZEIGER A
UF ZEICHEN IN TEXT.!.D. .BUF,X; MIT ZEIC
HEN LADEN.'.N.;.=.X. .; STATUS RETTEN.G.
.. .TXTPTR; ZEIGER AUF N.CHSTES ZEICHEN.
.... .SXREG; X-REGISTER WIEDER LADEN....
. .; STATUS WIEDERHOLEN.G... .; ZUR.CK Z
UR HAUPTROUTINE.M...;.S...;.Y...;.!.(.;*
****************************************
*************************.I.2.;*        
                                        
                *...<.;*        DATEIL.N
GE VON TASTATUR EINLESEN UND IN L.NGE SP
EICHERN *...F.;*                        
                                        
*.A.P.;************************* M.F.***
*********************************.G.Z.;.
M.D.;.W.N.READL.NGE .MFLAG; FLAG F.R MEN
UEPUNKT...X. .READL.NGE0; WENN MENUEPUNK
T =0, DANN SPRINGE..... ..J... .; ANSONS
TEN ZUR.CK.P...;... .READL.NGE0 .PRIMM..
... ..CR,ESC,"Q.DATEIL.NGE : .",ESC,"T",
EOM."... .DIRL.NGE.3... .DIRL.NGE+1.V.H.
 .PUTWORD; DATEIL.NGE AUSGEBEN.\.R.;.L..
. .READNAME0..... .RDL.NGERR0; BEI FEHLE
R SPRINGE OHNE AUSGABE..... .EVAL; DATEI
L.NGE LADEN..... .RDL.NGERR; BEI FEHLER 
SPRINGE..... .TO+2; HI-BYTE-L.NGE LADEN.
/... .RDL.NGERR; WENN L.NGE > FFFF, DANN
 FEHLER.5...;.>.". .TO.].,. .L.NGE; LO-B
YTE SPEICHERN.H.6. .TO+1...@. .L.NGE+1; 
HI-BYTE SPEICHERN...J.;...T. ....^. .; U
ND ZUR.CK...H.;.U.R.RDL.NGERR .RDNAMEERR
; AUSGABE '?'...|.;.....RDL.NGERR0 .; FL
AG F.R FEHLER..... .; UND ZUR.CK.....;..
...;."...;.P...; ***********************
****************************************
********...B.; *                        
                                        
     *.. L.; *       DATEIL.NGE, ANFANGS
ADRESSE UND ENDADRESSE AUSGEBEN         
   *.Z V.; *                            
                                        
 *.. ..; *******************************
****************************************
.. ..;.. ..;.H ..PRTL.NGE .PRIMM.. .. ..
CR,".L.NGE : $.",EOM.. ..;.. .. .DIRL.NG
E...&. .DIRL.NGE+1...0. .PUTWORD...:.;.*
.D. .PRIMM.B.N. ..CR,".VON .$",EOM.X.X. 
.#<(BUFFAD); LOW.M.B. .#>(BUFFAD); HI.|.
L. .PRTWORD0...V.;..... .PRIMM..... ..".
 BIS .$",EOM..... .#>(BUFFAD)..... ..M..
. .DIRL.NGE+1..... .PRTL.NGE1; .BERTRAG.
....;...F. .#MAXPAGE.:.P. .PRTL.NGE2; WE
NN L.NGE < (MAXPAGE - BUFFAD) DANN SPRIN
GE.K.Z. .PRTL.NGE1; WENN L.NGE > (MAXPAG
E - BUFFAD)..... .DIRL.NGE; LO- BYTE....
. .PRTL.NGE2; WENN L.NGE = (MAXPAGE - BU
FFAD).....;.Y...PRTL.NGE1 .#MAXPAGE-1; H
I..... .#$FF; LO..... .PRTWORD0... . .PR
IMM.".*. ..". UND",CR,"VON .$",EOM.7.4. 
.#<(BUFFAD); LO.K.>. .#>(BUFFAD);HI.Z.H.
 .PRTWORD1.F.R. .PRIMM.|.\. ..". BIS .$"
,EOM...F.;...P. .DIRL.NGE+1; HI...Z. ..A
... .#(MAXPAGE-2*>(BUFFAD)); =$10.R... .
#1; BANK 1..... ..SKIP2; N.CHSTEN BYTES 
.BERSPRINGEN.....PRTL.NGE2 .#0; BANK 0.(
... .; HI - BYTE.A... .DIRL.NGE; LO- BYT
E.A... .ENDTEXT;  ENDE DES TEXTES.Q.J. .
ENDTEXT+1...T. .ENDTEXTB; ENTSPRECHENDE 
BANK.A... .PRTWORD; ADRESSE AUSGEBEN (EN
DADRESSE).G...;.M...;.....; ++++++++++++
++++++++++++++++++++++++++++++++++++++++
+++++++++++.....;.2...PRTWORD0 .#0; BANK
 0.?... ..SKIP2.X.$.PRTWORD1 .#1; BANK 1
.L...PRTWORD .T2; LO.{.8. .T2+1; HI...B.
 .T2+2; BANK...L. .PUTT2; WORT AUSGEBEN.
..V.;...`.;...J.;...T.;...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL