C/DUP1
FILE INFORMATION
FILENAME(S): C/DUP1
FILE TYPE(S): PRG
FILE SIZE: 14.5K
FIRST SEEN: 2025-10-20 14:31:35
APPEARS ON: 1 disk(s)
FILE HASH
67d2ccde865d1112408893ef4b148356b570a84ed7842c8d493fd51f4de96d98
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| STEFAN IX | C/DUP1 | PRG | Treasure Chest - Klaus Der Suhler | 25 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1C 08 0A 00 97 35 33 32 38 31 2C 39 3A 97 |.......53281,9:.|
00000010: 35 33 32 38 30 2C 39 3A 99 22 05 22 00 64 08 64 |53280,9:.".".d.d|
00000020: 00 99 C7 28 31 34 32 29 3A 48 33 24 B2 22 44 49 |...(142):H3$."DI|
00000030: 53 4B 20 55 54 49 4C 49 54 59 20 50 52 4F 47 52 |SK UTILITY PROGR|
00000040: 41 4D 4D 20 56 20 36 34 22 3A 48 34 24 B2 22 C0 |AMM V 64":H4$.".|
00000050: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000060: C0 C0 C0 22 00 7D 08 6E 00 48 35 24 B2 22 20 27 |...".}.n.H5$." '|
00000070: 51 27 20 46 55 45 52 20 45 4E 44 45 22 00 99 08 |Q' FUER ENDE"...|
00000080: 78 00 89 20 38 32 30 3A 8F 20 49 4E 49 54 49 41 |x.. 820:. INITIA|
00000090: 4C 49 53 49 45 52 55 4E 47 00 B7 08 82 00 8F 20 |LISIERUNG...... |
000000A0: 2A 2A 2A 2A 20 41 53 43 49 49 20 45 49 4E 4C 45 |**** ASCII EINLE|
000000B0: 53 45 4E 20 2A 2A 2A 00 D5 08 8C 00 A1 23 38 2C |SEN ***......#8,|
000000C0: 42 59 24 3A 42 59 25 B2 C6 28 42 59 24 AA C7 28 |BY$:BY%..(BY$..(|
000000D0: 30 29 29 3A 8E 00 FB 08 96 00 99 22 13 11 11 11 |0)):......."....|
000000E0: 11 11 11 11 11 11 11 11 11 11 22 3A 81 4B B2 31 |..........":.K.1|
000000F0: 34 A4 32 33 3A 99 53 50 24 3A 82 00 13 09 A0 00 |4.23:.SP$:......|
00000100: 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 |."..............|
00000110: 22 3A 8E 00 1C 09 AA 00 99 22 93 22 00 4E 09 B4 |":.......".".N..|
00000120: 00 99 22 13 B0 22 53 54 24 22 AE 22 3A 50 B2 35 |..".."ST$".":P.5|
00000130: 37 2E 35 AB 28 C3 28 48 31 24 29 AD 32 29 3A 8B |7.5.(.(H1$).2):.|
00000140: 50 B3 B1 B5 28 50 29 A7 50 B2 50 AB 2E 35 00 67 |P...(P).P.P..5.g|
00000150: 09 BE 00 99 22 91 AB 22 C8 28 53 54 24 2C 50 AB |...."..".(ST$,P.|
00000160: 33 38 29 48 31 24 3B 00 86 09 C8 00 99 C8 28 53 |38)H1$;.......(S|
00000170: 54 24 2C 37 38 AB C3 28 48 31 24 29 AB 50 AB 31 |T$,78..(H1$).P.1|
00000180: 29 3B 22 B3 22 3B 00 BB 09 D2 00 99 22 9D 9D B3 |);".";......"...|
00000190: AB 22 53 54 24 22 B3 22 3B 3A 50 B2 35 37 2E 35 |."ST$".";:P.57.5|
000001A0: AB 28 C3 28 4B 4F 24 29 AD 32 29 3A 8B 50 B3 B1 |.(.(KO$).2):.P..|
000001B0: B5 28 50 29 A7 50 B2 50 AB 2E 35 00 E9 09 DC 00 |.(P).P.P..5.....|
000001C0: 99 22 AB 22 3B C8 28 53 54 24 2C 50 AB 33 38 29 |.".";.(ST$,P.38)|
000001D0: 4B 4F 24 3B 3A 99 C8 28 53 54 24 2C 37 38 AB C3 |KO$;:..(ST$,78..|
000001E0: 28 4B 4F 24 29 AB 50 29 3B 00 FD 09 E6 00 99 22 |(KO$).P);......"|
000001F0: 9D 9D B3 AD 22 53 54 24 22 BD 22 3A 8E 00 21 0A |...."ST$".":..!.|
00000200: F0 00 8F 2A 2A 2A 20 42 4C 4F 43 4B 20 4C 45 53 |...*** BLOCK LES|
00000210: 45 4E 20 28 4D 49 54 20 4F 50 45 4E 29 20 2A 2A |EN (MIT OPEN) **|
00000220: 2A 00 40 0A FA 00 98 31 35 2C 22 49 22 AA 44 52 |*.@....15,"I".DR|
00000230: 24 3A 4D 4B 25 B2 44 53 3A 8B 4D 4B 25 A7 20 8E |$:MK%.DS:.MK%. .|
00000240: 00 51 0A 04 01 9F 38 2C 38 2C 38 2C 22 23 22 3A |.Q....8,8,8,"#":|
00000250: 8E 00 6A 0A 0E 01 8F 2A 2A 2A 20 42 4C 4F 43 4B |..j....*** BLOCK|
00000260: 20 4C 45 53 45 4E 20 2A 2A 2A 00 85 0A 18 01 98 | LESEN ***......|
00000270: 31 35 2C 22 55 31 3A 22 38 3B 44 52 25 3B 54 52 |15,"U1:"8;DR%;TR|
00000280: 25 3B 53 43 25 00 8B 0A 22 01 8E 00 91 0A 2C 01 |%;SC%...".....,.|
00000290: 3A 00 AB 0A 36 01 8F 20 2A 2A 2A 2A 20 44 49 52 |:...6.. **** DIR|
000002A0: 45 43 54 4F 52 59 20 2A 2A 2A 2A 00 BC 0A 40 01 |ECTORY ****...@.|
000002B0: 8D 20 35 34 30 3A 8B 4D 4B 25 A7 8E 00 EC 0A 4A |. 540:.MK%.....J|
000002C0: 01 8B 28 51 55 25 B2 30 29 AF 28 49 44 24 B2 44 |..(QU%.0).(ID$.D|
000002D0: 49 24 29 AF 28 44 52 25 B2 4C 52 25 29 AF 28 5A |I$).(DR%.LR%).(Z|
000002E0: 59 24 B2 54 59 24 29 A7 A0 38 3A 8E 00 06 0B 54 |Y$.TY$)..8:....T|
000002F0: 01 99 22 11 11 43 41 54 41 4C 4F 47 20 45 49 4E |.."..CATALOG EIN|
00000300: 4C 45 53 45 4E 22 00 47 0B 5E 01 51 55 25 B2 30 |LESEN".G.^.QU%.0|
00000310: 3A 44 49 24 B2 49 44 24 3A 4C 52 25 B2 44 52 25 |:DI$.ID$:LR%.DR%|
00000320: 3A 4E 30 25 B2 30 3A 42 55 25 B2 30 3A 46 49 25 |:N0%.0:BU%.0:FI%|
00000330: B2 30 3A 54 52 25 B2 31 38 3A 53 43 25 B2 31 3A |.0:TR%.18:SC%.1:|
00000340: 5A 59 24 B2 54 59 24 00 5E 0B 68 01 8D 20 32 38 |ZY$.TY$.^.h.. 28|
00000350: 30 3A 8F 20 42 4C 4F 43 4B 2D 52 45 41 44 00 92 |0:. BLOCK-READ..|
00000360: 0B 72 01 81 49 B2 30 A4 31 3A A1 23 38 2C 42 59 |.r..I.0.1:.#8,BY|
00000370: 24 3A 42 44 25 28 49 29 B2 C6 28 42 59 24 AA C7 |$:BD%(I)..(BY$..|
00000380: 28 30 29 29 3A 82 3A 42 55 25 B2 32 3A 8D 20 38 |(0)):.:BU%.2:. 8|
00000390: 30 30 00 AA 0B 7C 01 8D 20 31 34 30 3A 42 31 25 |00...|.. 140:B1%|
000003A0: B2 28 42 59 25 20 AF 20 37 29 00 BF 0B 86 01 8B |.(BY% . 7)......|
000003B0: 42 31 25 B2 30 AF 52 45 25 B2 30 A7 34 39 30 00 |B1%.0.RE%.0.490.|
000003C0: D0 0B 90 01 8B 42 31 25 AF 52 45 25 A7 34 39 30 |.....B1%.RE%.490|
000003D0: 00 F7 0B 9A 01 8B 54 59 24 B3 B1 22 41 22 A7 8B |......TY$.."A"..|
000003E0: C6 28 54 59 24 28 42 31 25 29 29 B3 B1 C6 28 54 |.(TY$(B1%))...(T|
000003F0: 59 24 29 A7 34 39 30 00 1F 0C A4 01 48 24 B2 22 |Y$).490.....H$."|
00000400: 22 3A 81 49 B2 30 A4 31 3A 8D 20 31 34 30 3A 42 |":.I.0.1:. 140:B|
00000410: 4E 25 28 4E 30 25 2C 49 29 B2 42 59 25 3A 82 00 |N%(N0%,I).BY%:..|
00000420: 4B 0C AE 01 81 49 B2 33 A4 31 38 3A A1 23 38 2C |K....I.3.18:.#8,|
00000430: 42 59 24 3A 8B 42 59 24 B3 B1 C7 28 31 36 30 29 |BY$:.BY$...(160)|
00000440: A7 20 48 24 B2 48 24 AA 42 59 24 00 5A 0C B8 01 |. H$.H$.BY$.Z...|
00000450: 82 3A 8B 5A 25 A7 32 33 38 30 00 77 0C C2 01 81 |.:.Z%.2380.w....|
00000460: 49 B2 31 39 A4 32 37 3A A1 23 38 2C 42 59 24 3A |I.19.27:.#8,BY$:|
00000470: 82 3A 8D 20 31 34 30 00 99 0C CC 01 42 4C 25 B2 |.:. 140.....BL%.|
00000480: 42 59 25 3A 8D 20 31 34 30 3A 42 4C 25 B2 42 4C |BY%:. 140:BL%.BL|
00000490: 25 AA 32 35 36 AC 42 59 25 00 D2 0C D6 01 42 4C |%.256.BY%.....BL|
000004A0: 25 28 4E 30 25 29 B2 42 4C 25 3A 4E 41 24 28 4E |%(N0%).BL%:NA$(N|
000004B0: 30 25 29 B2 48 24 3A 46 54 24 28 4E 30 25 29 B2 |0%).H$:FT$(N0%).|
000004C0: 54 59 24 28 42 31 25 29 3A 4E 30 25 B2 4E 30 25 |TY$(B1%):N0%.N0%|
000004D0: AA 31 00 E5 0C E0 01 99 22 91 22 A3 32 35 AA 54 |.1......".".25.T|
000004E0: 42 29 4E 30 25 00 13 0D EA 01 46 49 25 B2 46 49 |B)N0%.....FI%.FI|
000004F0: 25 AA 31 3A 8B 46 49 25 B3 38 A7 42 55 25 B2 46 |%.1:.FI%.8.BU%.F|
00000500: 49 25 AC 33 32 AA 32 3A 8D 20 38 30 30 3A 89 20 |I%.32.2:. 800:. |
00000510: 33 38 30 00 25 0D F4 01 8B 42 44 25 28 30 29 B2 |380.%....BD%(0).|
00000520: 30 A7 35 32 30 00 4A 0D FE 01 54 52 25 B2 42 44 |0.520.J...TR%.BD|
00000530: 25 28 30 29 3A 53 43 25 B2 42 44 25 28 31 29 3A |%(0):SC%.BD%(1):|
00000540: 46 49 25 B2 30 3A 89 33 36 30 00 51 0D 08 02 A0 |FI%.0:.360.Q....|
00000550: 38 00 57 0D 12 02 8E 00 6D 0D 1C 02 8F 20 2A 2A |8.W.....m.... **|
00000560: 2A 20 47 45 54 20 49 44 24 20 2A 2A 2A 00 83 0D |* GET ID$ ***...|
00000570: 26 02 8D 20 32 35 30 3A 8F 20 4F 50 45 4E 20 46 |&.. 250:. OPEN F|
00000580: 49 4C 45 00 9E 0D 30 02 8B 20 4D 4B 25 20 A7 20 |ILE...0.. MK% . |
00000590: 8E 20 3A 8F 20 53 49 43 48 45 52 2E 2E 2E 00 B4 |. :. SICHER.....|
000005A0: 0D 3A 02 54 52 25 B2 31 38 3A 53 43 25 B2 30 3A |.:.TR%.18:SC%.0:|
000005B0: 8D 32 38 30 00 CD 0D 44 02 42 55 25 B2 31 36 32 |.280...D.BU%.162|
000005C0: 3A 49 44 24 B2 22 22 3A 8D 20 38 30 30 00 EB 0D |:ID$."":. 800...|
000005D0: 4E 02 81 49 B2 31 A4 35 3A 8D 31 34 30 3A 49 44 |N..I.1.5:.140:ID|
000005E0: 24 B2 49 44 24 AA 42 59 24 3A 82 00 F1 0D 58 02 |$.ID$.BY$:....X.|
000005F0: 8E 00 0E 0E 62 02 8F 20 2A 2A 2A 20 47 45 54 20 |....b.. *** GET |
00000600: 20 4E 41 4D 45 20 2B 20 49 44 20 2A 2A 2A 00 1E | NAME + ID ***..|
00000610: 0E 6C 02 8D 35 35 30 3A 8B 4D 4B 25 A7 8E 00 36 |.l..550:.MK%...6|
00000620: 0E 76 02 42 55 25 B2 31 34 34 3A 4E 41 24 B2 22 |.v.BU%.144:NA$."|
00000630: 22 3A 8D 38 30 30 00 5D 0E 80 02 81 49 B2 31 A4 |":.800.]....I.1.|
00000640: 31 36 3A 8D 31 34 30 3A 8B 42 59 25 B3 B1 31 36 |16:.140:.BY%..16|
00000650: 30 A7 4E 41 24 B2 4E 41 24 AA 42 59 24 00 65 0E |0.NA$.NA$.BY$.e.|
00000660: 8A 02 82 3A 8E 00 6B 0E 94 02 3A 00 88 0E 9E 02 |...:..k...:.....|
00000670: 8F 20 2A 2A 2A 20 47 45 54 20 45 49 4E 45 20 54 |. *** GET EINE T|
00000680: 41 53 54 45 20 2A 2A 2A 00 92 0E A8 02 8D 39 30 |ASTE ***......90|
00000690: 30 30 00 A3 0E B2 02 41 53 25 B2 C5 28 54 41 24 |00.....AS%..(TA$|
000006A0: 29 3A 8E 00 A9 0E BC 02 3A 00 C9 0E C6 02 8F 20 |):......:...... |
000006B0: 2A 2A 2A 20 45 52 46 52 41 47 45 20 44 52 49 56 |*** ERFRAGE DRIV|
000006C0: 45 20 4E 52 2E 20 2A 2A 2A 00 E0 0E D0 02 44 52 |E NR. ***.....DR|
000006D0: 25 B2 30 3A 54 41 24 B2 22 30 22 3A 89 37 33 30 |%.0:TA$."0":.730|
000006E0: 00 EE 0E DA 02 44 52 24 B2 54 41 24 3A 8E 00 F4 |.....DR$.TA$:...|
000006F0: 0E E4 02 3A 00 0F 0F EE 02 8F 20 2A 2A 2A 20 56 |...:...... *** V|
00000700: 45 52 5A 4F 45 47 45 52 55 4E 47 20 2A 2A 2A 00 |ERZOEGERUNG ***.|
00000710: 26 0F F8 02 8B 41 46 25 B2 30 A7 81 49 B2 31 A4 |&....AF%.0..I.1.|
00000720: 32 35 30 30 3A 82 00 2C 0F 02 03 8E 00 32 0F 0C |2500:..,.....2..|
00000730: 03 3A 00 55 0F 16 03 8F 2A 2A 2A 20 42 55 46 46 |.:.U....*** BUFF|
00000740: 45 52 20 50 4F 49 4E 54 45 52 20 53 45 54 5A 45 |ER POINTER SETZE|
00000750: 4E 20 2A 2A 2A 00 6B 0F 20 03 98 31 35 2C 22 42 |N ***.k. ..15,"B|
00000760: 2D 50 3A 22 38 3B 42 55 25 3A 8E 00 90 0F 2A 03 |-P:"8;BU%:....*.|
00000770: 8F 20 20 2A 2A 2A 2A 20 44 41 55 45 52 20 46 49 |. **** DAUER FI|
00000780: 4C 45 53 20 4F 45 46 46 4E 45 4E 20 2A 2A 2A 2A |LES OEFFNEN ****|
00000790: 00 96 0F 34 03 3A 00 B7 0F 3E 03 9F 20 31 35 2C |...4.:...>.. 15,|
000007A0: 38 2C 31 35 3A 8F 20 44 49 53 4B 20 45 52 52 4F |8,15:. DISK ERRO|
000007B0: 52 20 4B 41 4E 41 4C 00 D0 0F 48 03 9F 20 30 31 |R KANAL...H.. 01|
000007C0: 2C 30 2C 30 30 3A 8F 20 54 41 53 54 41 54 55 52 |,0,00:. TASTATUR|
000007D0: 00 02 10 52 03 53 50 24 B2 22 20 20 20 20 20 20 |...R.SP$." |
000007E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000007F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000800: 20 22 00 34 10 5C 03 46 4F 24 B2 22 DD 20 20 20 | ".4.\.FO$.". |
00000810: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DD 20 | . |
00000820: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000830: 20 20 DD 22 00 65 10 66 03 53 54 24 B2 22 C0 C0 | .".e.f.ST$."..|
00000840: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000850: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000860: C0 C0 C0 C0 22 00 8C 10 70 03 46 4D 24 B2 22 20 |...."...p.FM$." |
00000870: 2A 22 3A 8B 42 38 A7 53 54 24 B2 C8 28 53 54 24 |*":.B8.ST$..(ST$|
00000880: AA 53 54 24 AA 53 54 24 2C 37 38 29 00 B2 10 7A |.ST$.ST$,78)...z|
00000890: 03 48 31 24 B2 22 49 4E 49 54 49 41 4C 49 53 49 |.H1$."INITIALISI|
000008A0: 45 52 55 4E 47 20 56 4F 4E 20 44 55 50 20 20 36 |ERUNG VON DUP 6|
000008B0: 34 22 00 ED 10 84 03 4E 41 24 B2 22 22 3A 4E 42 |4".....NA$."":NB|
000008C0: 24 B2 22 22 3A 49 44 24 B2 22 22 3A 44 49 24 B2 |$."":ID$."":DI$.|
000008D0: 22 22 3A 54 41 24 B2 22 22 3A 54 59 24 B2 22 22 |"":TA$."":TY$.""|
000008E0: 3A 42 59 24 B2 22 22 3A 48 24 B2 22 22 00 09 11 |:BY$."":H$.""...|
000008F0: 8E 03 4B 4F 24 B2 48 34 24 3A 8D 31 37 30 3A 8D |..KO$.H4$:.170:.|
00000900: 34 30 39 30 3A 8D 37 36 30 00 24 11 98 03 48 5A |4090:.760.$...HZ|
00000910: 24 B2 22 30 31 32 33 34 35 36 37 38 39 41 42 43 |$."0123456789ABC|
00000920: 44 45 46 22 00 39 11 A2 03 81 49 B2 31 A4 34 3A |DEF".9....I.1.4:|
00000930: 87 54 59 24 28 49 29 3A 82 00 3F 11 AC 03 3A 00 |.TY$(I):..?...:.|
00000940: 62 11 B6 03 8F 20 2A 2A 2A 2A 20 20 48 41 55 50 |b.... **** HAUP|
00000950: 54 20 20 2D 20 20 4D 45 4E 55 45 20 20 20 2A 2A |T - MENUE **|
00000960: 2A 2A 00 68 11 C0 03 3A 00 7C 11 CA 03 4B 4F 24 |**.h...:.|...KO$|
00000970: B2 48 35 24 3A 48 31 24 B2 48 33 24 00 96 11 D4 |.H5$:H1$.H3$....|
00000980: 03 8D 31 37 30 3A 58 B2 B8 28 30 29 3A 8F 20 47 |..170:X..(0):. G|
00000990: 41 52 42 41 47 45 00 BB 11 DE 03 99 A3 38 AA 54 |ARBAGE.......8.T|
000009A0: 42 29 22 11 31 29 20 53 43 52 41 54 43 48 45 4E |B)".1) SCRATCHEN|
000009B0: 20 56 4F 4E 20 46 49 4C 45 53 22 00 E1 11 E8 03 | VON FILES".....|
000009C0: 99 A3 38 AA 54 42 29 22 11 32 29 20 46 4F 52 4D |..8.TB)".2) FORM|
000009D0: 41 54 49 45 52 45 4E 20 56 4F 4E 20 44 49 53 4B |ATIEREN VON DISK|
000009E0: 53 00 FD 11 F2 03 99 A3 38 AA 54 42 29 22 11 33 |S.......8.TB)".3|
000009F0: 29 20 46 49 4C 45 20 4C 49 53 54 45 4E 00 22 12 |) FILE LISTEN.".|
00000A00: FC 03 99 A3 38 AA 54 42 29 22 11 34 29 20 44 49 |....8.TB)".4) DI|
00000A10: 53 4B 20 4E 41 4D 45 2F 49 44 20 41 45 4E 44 45 |SK NAME/ID AENDE|
00000A20: 52 4E 00 47 12 06 04 99 A3 38 AA 54 42 29 22 11 |RN.G.....8.TB)".|
00000A30: 35 29 20 54 45 53 54 4C 45 53 45 4E 20 45 49 4E |5) TESTLESEN EIN|
00000A40: 45 52 20 44 49 53 4B 00 6A 12 10 04 99 A3 38 AA |ER DISK.j.....8.|
00000A50: 54 42 29 22 11 36 29 20 44 49 52 45 43 54 4F 52 |TB)".6) DIRECTOR|
00000A60: 59 20 20 41 4E 5A 45 49 47 45 00 92 12 1A 04 99 |Y ANZEIGE......|
00000A70: A3 38 AA 54 42 29 22 11 37 29 20 46 49 4C 45 20 |.8.TB)".7) FILE |
00000A80: 52 45 54 54 45 4E 20 28 55 4E 53 43 52 41 54 43 |RETTEN (UNSCRATC|
00000A90: 48 29 00 B9 12 24 04 99 A3 38 AA 54 42 29 22 11 |H)...$...8.TB)".|
00000AA0: 38 29 20 53 54 41 52 54 41 44 52 45 53 53 45 20 |8) STARTADRESSE |
00000AB0: 41 45 4E 44 45 52 4E 22 3B 00 D0 12 2E 04 8D 36 |AENDERN";......6|
00000AC0: 37 30 3A 8B 54 41 24 B2 22 51 22 A7 31 31 32 30 |70:.TA$."Q".1120|
00000AD0: 00 E0 12 38 04 8B 41 53 25 B2 30 A7 31 30 37 30 |...8..AS%.0.1070|
00000AE0: 00 F8 12 42 04 8F 20 2A 2A 2A 20 56 45 52 54 45 |...B.. *** VERTE|
00000AF0: 49 4C 45 52 20 2A 2A 2A 00 2E 13 4C 04 91 41 53 |ILER ***...L..AS|
00000B00: 25 8D 31 33 38 30 2C 31 31 36 30 2C 32 34 33 30 |%.1380,1160,2430|
00000B10: 2C 32 37 35 30 2C 33 30 30 30 2C 32 32 38 30 2C |,2750,3000,2280,|
00000B20: 33 34 38 30 2C 33 38 30 30 3A 89 39 37 30 00 49 |3480,3800:.970.I|
00000B30: 13 56 04 8E 20 3A 20 8F 20 44 55 4D 4D 59 20 53 |.V.. : . DUMMY S|
00000B40: 55 42 52 4F 55 54 49 4E 45 00 52 13 60 04 8D 31 |UBROUTINE.R.`..1|
00000B50: 37 30 00 7A 13 6A 04 98 31 35 2C 22 55 3A 22 3A |70.z.j..15,"U:":|
00000B60: 9C 3A 99 22 13 13 11 11 11 11 11 11 22 3A 80 3A |.:."........":.:|
00000B70: 8F 20 44 55 50 20 45 4E 44 45 00 80 13 74 04 3A |. DUP ENDE...t.:|
00000B80: 00 9A 13 7E 04 8F 20 2A 2A 2A 20 46 4F 52 4D 41 |...~.. *** FORMA|
00000B90: 54 49 45 52 45 4E 20 2A 2A 2A 00 C0 13 88 04 4B |TIEREN ***.....K|
00000BA0: 4F 24 B2 22 44 49 53 4B 20 46 4F 52 4D 41 54 49 |O$."DISK FORMATI|
00000BB0: 45 52 20 52 4F 55 54 49 4E 45 22 3A 8D 31 37 30 |ER ROUTINE":.170|
00000BC0: 00 DF 13 92 04 8D 20 37 32 30 3A 8F 20 5A 45 49 |...... 720:. ZEI|
00000BD0: 4C 45 4E 4E 55 4D 4D 45 52 20 4C 45 53 45 4E 00 |LENNUMMER LESEN.|
00000BE0: FD 13 9C 04 8D 20 36 32 30 3A A0 38 3A 8F 20 44 |..... 620:.8:. D|
00000BF0: 49 53 4B 20 49 44 20 26 20 4E 41 4D 45 00 17 14 |ISK ID & NAME...|
00000C00: A6 04 8B 4D 4B 25 A7 31 32 34 30 3A 8F 20 3F 42 |...MK%.1240:. ?B|
00000C10: 41 44 20 44 49 53 4B 00 59 14 B0 04 44 24 B2 22 |AD DISK.Y...D$."|
00000C20: 22 3A 99 22 11 44 49 53 4B 20 49 44 20 3D 22 49 |":.".DISK ID ="I|
00000C30: 44 24 3A 99 22 11 53 4F 4C 4C 20 44 45 52 20 49 |D$:.".SOLL DER I|
00000C40: 44 20 42 45 49 42 45 48 41 4C 54 45 4E 20 57 45 |D BEIBEHALTEN WE|
00000C50: 52 44 45 4E 20 3F 20 22 3B 00 81 14 BA 04 84 31 |RDEN ? ";......1|
00000C60: 2C 54 41 24 3A 99 3A 8B C8 28 54 41 24 2C 31 29 |,TA$:.:..(TA$,1)|
00000C70: B2 22 4A 22 A7 49 44 24 B2 22 22 3A 89 31 32 34 |."J".ID$."":.124|
00000C80: 30 00 A8 14 C4 04 8B C8 28 54 41 24 2C 31 29 B3 |0.......(TA$,1).|
00000C90: B1 22 4E 22 A7 99 22 91 22 3B 3A 97 32 31 31 2C |."N"..".";:.211,|
00000CA0: 33 33 3A 89 31 32 31 30 00 B7 14 CE 04 44 24 B2 |33:.1210.....D$.|
00000CB0: 22 2C 22 AA 49 44 24 00 EA 14 D8 04 99 22 11 44 |",".ID$......".D|
00000CC0: 49 53 4B 20 4E 41 4D 45 20 2C 20 49 44 20 20 3F |ISK NAME , ID ?|
00000CD0: 20 22 3B 3A 46 45 25 B2 C2 28 32 31 31 29 3A 99 | ";:FE%..(211):.|
00000CE0: 4E 41 24 22 2C 22 49 44 24 3B 00 1C 15 E2 04 97 |NA$","ID$;......|
00000CF0: 32 31 31 2C 46 45 25 3A 84 31 2C 4E 41 24 2C 49 |211,FE%:.1,NA$,I|
00000D00: 44 24 3A 99 3A 8B C8 28 4E 41 24 2C 31 29 B2 22 |D$:.:..(NA$,1)."|
00000D10: 2A 22 B0 4E 41 24 B2 22 22 A7 20 8E 00 36 15 EC |*".NA$."". ..6..|
00000D20: 04 8F 20 5E 5E 5E 20 41 42 42 52 55 43 48 20 5E |.. ^^^ ABBRUCH ^|
00000D30: 5E 5E 20 21 21 21 00 66 15 F6 04 51 55 25 B2 AB |^^ !!!.f...QU%..|
00000D40: 31 3A 43 43 24 B2 22 4E 3A 22 AA 4E 41 24 3A 8B |1:CC$."N:".NA$:.|
00000D50: 49 44 24 B1 22 22 A7 43 43 24 B2 43 43 24 AA 22 |ID$."".CC$.CC$."|
00000D60: 2C 22 AA 49 44 24 00 9A 15 00 05 99 22 11 44 49 |,".ID$......".DI|
00000D70: 53 4B 45 54 54 45 20 57 49 52 44 20 46 4F 52 4D |SKETTE WIRD FORM|
00000D80: 41 54 49 45 52 54 2E 22 3A A0 31 3A 9F 31 2C 38 |ATIERT.":.1:.1,8|
00000D90: 2C 31 35 2C 22 22 AA 43 43 24 00 A8 15 0A 05 A0 |,15,"".CC$......|
00000DA0: 31 3A 9F 31 2C 30 2C 30 00 B6 15 14 05 8B 44 53 |1:.1,0,0......DS|
00000DB0: B3 32 30 A7 20 8E 00 C9 15 1E 05 99 22 11 46 45 |.20. .......".FE|
00000DC0: 48 4C 45 52 20 3A 22 45 24 00 F2 15 28 05 98 31 |HLER :"E$...(..1|
00000DD0: 35 2C 22 49 22 AA 44 52 24 3A 99 22 11 4C 45 54 |5,"I".DR$:.".LET|
00000DE0: 5A 54 45 52 20 56 45 52 53 55 43 48 20 2E 2E 2E |ZTER VERSUCH ...|
00000DF0: 22 3B 00 12 16 32 05 98 31 35 2C 43 43 24 3A 8B |";...2..15,CC$:.|
00000E00: 44 53 B2 30 A7 99 22 12 4F 4B 20 21 22 3A 89 37 |DS.0..".OK !":.7|
00000E10: 36 30 00 30 16 3C 05 99 22 44 49 53 4B 20 12 44 |60.0.<.."DISK .D|
00000E20: 45 46 45 4B 54 92 20 21 21 21 22 3A 89 37 36 30 |EFEKT. !!!":.760|
00000E30: 00 4D 16 46 05 83 22 53 45 51 22 2C 22 50 52 47 |.M.F.."SEQ","PRG|
00000E40: 22 2C 22 55 53 52 22 2C 22 52 45 4C 22 00 53 16 |","USR","REL".S.|
00000E50: 50 05 3A 00 73 16 5A 05 8F 20 2A 2A 2A 2A 20 53 |P.:.s.Z.. **** S|
00000E60: 43 52 41 54 43 48 20 52 4F 55 54 49 4E 45 20 2A |CRATCH ROUTINE *|
00000E70: 2A 2A 2A 00 9D 16 64 05 4B 4F 24 B2 22 53 43 52 |***...d.KO$."SCR|
00000E80: 41 54 43 48 20 52 4F 55 54 49 4E 45 22 3A 4B 24 |ATCH ROUTINE":K$|
00000E90: B2 22 53 43 52 41 54 43 48 45 4E 20 22 00 AD 16 |."SCRATCHEN "...|
00000EA0: 6E 05 51 25 B2 AB 31 3A 89 31 34 33 30 00 B3 16 |n.Q%..1:.1430...|
00000EB0: 78 05 3A 00 D1 16 82 05 8F 20 2A 2A 2A 2A 20 4B |x.:...... **** K|
00000EC0: 4F 50 49 45 52 52 4F 55 54 49 4E 45 20 2A 2A 2A |OPIERROUTINE ***|
00000ED0: 2A 00 FE 16 8C 05 51 25 B2 30 3A 4B 4F 24 B2 22 |*.....Q%.0:KO$."|
00000EE0: 4B 4F 50 49 45 52 20 52 4F 55 54 49 4E 45 22 3A |KOPIER ROUTINE":|
00000EF0: 4B 24 B2 22 4B 4F 50 49 45 52 45 4E 20 22 00 0D |K$."KOPIEREN "..|
00000F00: 17 96 05 50 4C 25 B2 30 3A 8D 31 37 30 00 46 17 |...PL%.0:.170.F.|
00000F10: A0 05 8B 4D 44 25 B2 30 AF 51 25 B2 30 A7 99 22 |...MD%.0.Q%.0.."|
00000F20: 11 11 20 20 20 4E 49 43 48 54 20 42 45 49 20 45 |.. NICHT BEI E|
00000F30: 49 4E 45 52 20 12 34 30 33 31 92 20 21 21 21 22 |INER .4031. !!!"|
00000F40: 3A 89 20 36 38 30 00 5C 17 AA 05 99 4B 24 22 56 |:. 680.\....K$"V|
00000F50: 4F 4E 20 91 22 3B 3A 8D 20 37 32 30 00 74 17 B4 |ON .";:. 720.t..|
00000F60: 05 8B 51 25 A7 20 31 34 38 30 3A 8F 20 53 43 52 |..Q%. 1480:. SCR|
00000F70: 41 54 43 48 00 91 17 BE 05 99 22 91 22 A3 58 25 |ATCH......".".X%|
00000F80: AA 32 AA 54 42 29 22 4E 41 43 48 22 31 AB 44 52 |.2.TB)"NACH"1.DR|
00000F90: 25 00 D3 17 C8 05 99 22 11 54 59 50 3A 20 12 50 |%......".TYP: .P|
00000FA0: 92 52 47 2C 20 12 53 92 45 51 2C 20 12 55 92 53 |.RG, .S.EQ, .U.S|
00000FB0: 52 2C 20 12 52 92 45 4C 2C 20 4F 44 45 52 20 12 |R, .R.EL, ODER .|
00000FC0: 41 92 4C 4C 45 53 20 3F 20 22 3B 3A 58 25 B2 B9 |A.LLES ? ";:X%..|
00000FD0: 28 30 29 00 E2 17 D2 05 8D 36 38 30 3A 99 54 41 |(0)......680:.TA|
00000FE0: 24 3B 00 14 18 DC 05 8B 54 41 24 B2 22 50 22 B0 |$;......TA$."P".|
00000FF0: 54 41 24 B2 22 53 22 B0 54 41 24 B2 22 55 22 B0 |TA$."S".TA$."U".|
00001000: 54 41 24 B2 22 52 22 B0 54 41 24 B2 22 41 22 A7 |TA$."R".TA$."A".|
00001010: 31 35 32 30 00 26 18 E6 05 97 32 31 31 2C 58 25 |1520.&....211,X%|
00001020: 3A 89 31 34 39 30 00 42 18 F0 05 54 59 24 B2 54 |:.1490.B...TY$.T|
00001030: 41 24 3A 8B 51 25 A7 41 4C 25 B2 30 3A 89 31 35 |A$:.Q%.AL%.0:.15|
00001040: 36 30 00 6F 18 FA 05 99 3A 99 22 11 12 46 92 52 |60.o....:."..F.R|
00001050: 41 47 45 4E 20 4F 44 45 52 20 12 41 92 4C 4C 45 |AGEN ODER .A.LLE|
00001060: 53 20 4B 4F 50 49 45 52 45 4E 20 3F 20 22 3B 00 |S KOPIEREN ? ";.|
00001070: 9A 18 04 06 8D 36 38 30 3A 41 4C 25 B2 28 54 41 |.....680:AL%.(TA|
00001080: 24 B2 22 41 22 29 3A 8B 41 4C 25 A7 99 22 41 4C |$."A"):.AL%.."AL|
00001090: 4C 45 53 22 3A 89 31 35 36 30 00 A8 18 0E 06 99 |LES":.1560......|
000010A0: 22 46 52 41 47 45 4E 22 00 C0 18 18 06 99 3A 8D |"FRAGEN"......:.|
000010B0: 33 31 30 3A 8B 4E 30 25 B2 30 AF 41 46 25 A7 8E |310:.N0%.0.AF%..|
000010C0: 00 ED 18 22 06 8B 20 4E 30 25 B2 30 A7 99 22 11 |...".. N0%.0..".|
000010D0: 11 12 44 49 45 20 44 49 53 4B 20 49 53 54 20 4C |..DIE DISK IST L|
000010E0: 45 45 52 92 21 21 21 22 3A 89 37 36 30 00 0C 19 |EER.!!!":.760...|
000010F0: 2C 06 8D 20 31 35 30 3A 8F 20 44 45 4C 45 54 45 |,.. 150:. DELETE|
00001100: 20 5A 45 49 4C 45 20 31 30 2D 32 33 00 36 19 36 | ZEILE 10-23.6.6|
00001110: 06 99 22 4C 41 45 4E 47 45 20 20 20 20 20 20 20 |.."LAENGE |
00001120: 4E 41 4D 45 20 20 20 20 20 20 20 20 20 20 20 20 |NAME |
00001130: 20 20 41 52 54 22 00 4A 19 40 06 81 20 49 20 B2 | ART".J.@.. I .|
00001140: 20 30 20 A4 20 4E 30 25 AB 31 00 72 19 4A 06 99 | 0 . N0%.1.r.J..|
00001150: 22 11 22 42 4C 25 28 49 29 A3 38 AA 54 42 29 4E |"."BL%(I).8.TB)N|
00001160: 41 24 28 49 29 A3 33 31 AA 54 42 29 46 54 24 28 |A$(I).31.TB)FT$(|
00001170: 49 29 00 8B 19 54 06 99 22 11 20 20 20 20 20 20 |I)...T..". |
00001180: 20 22 4B 24 22 20 28 4A 2F 4E 29 00 99 19 5E 06 | "K$" (J/N)...^.|
00001190: 8B 41 4C 25 A7 31 36 37 30 00 B9 19 68 06 8D 20 |.AL%.1670...h.. |
000011A0: 36 38 30 3A 8B 54 41 24 B2 22 4E 22 B0 54 41 24 |680:.TA$."N".TA$|
000011B0: B2 22 11 22 A7 31 36 38 30 00 D2 19 72 06 8B 54 |.".".1680...r..T|
000011C0: 41 24 B2 22 91 22 A7 8D 32 34 31 30 3A 89 31 36 |A$."."..2410:.16|
000011D0: 38 30 00 E6 19 7C 06 8B 54 41 24 B3 B1 22 4A 22 |80...|..TA$.."J"|
000011E0: A7 20 31 36 34 30 00 04 1A 86 06 43 50 24 28 50 |. 1640.....CP$(P|
000011F0: 4C 25 29 B2 4E 41 24 28 49 29 3A 50 4C 25 B2 50 |L%).NA$(I):PL%.P|
00001200: 4C 25 AA 31 00 24 1A 90 06 99 22 91 91 91 22 53 |L%.1.$...."..."S|
00001210: 50 24 3A 99 53 50 24 3A 99 53 50 24 22 91 91 91 |P$:.SP$:.SP$"...|
00001220: 91 22 3A 82 00 63 1A 9A 06 8B 50 4C 25 B2 30 A7 |.":..c....PL%.0.|
00001230: 99 22 91 22 53 50 24 3A 99 22 11 11 20 20 20 20 |."."SP$:.".. |
00001240: 20 20 20 20 20 20 4E 49 43 48 54 53 20 5A 55 20 | NICHTS ZU |
00001250: 22 4B 24 22 2E 2E 2E 22 3A 51 55 25 B2 30 3A 89 |"K$"...":QU%.0:.|
00001260: 37 36 30 00 7A 1A A4 06 8B 41 46 25 A7 99 22 91 |760.z....AF%..".|
00001270: 22 53 50 24 3A 89 31 37 36 30 00 8D 1A AE 06 8B |"SP$:.1760......|
00001280: 51 25 B0 50 4C 25 B2 31 A7 31 38 31 30 00 B9 1A |Q%.PL%.1.1810...|
00001290: B8 06 99 22 91 22 53 50 24 3A 99 22 41 4C 50 48 |..."."SP$:."ALPH|
000012A0: 41 42 45 54 49 53 43 48 20 53 4F 52 54 49 45 52 |ABETISCH SORTIER|
000012B0: 45 4E 20 28 4A 2F 4E 29 22 00 D0 1A C2 06 8D 36 |EN (J/N)"......6|
000012C0: 38 30 3A 8B 54 41 24 B2 22 4E 22 A7 31 38 31 30 |80:.TA$."N".1810|
000012D0: 00 E3 1A CC 06 8B 54 41 24 B3 B1 22 4A 22 A7 31 |......TA$.."J".1|
000012E0: 37 33 30 00 05 1B D6 06 8F 20 2A 2A 2A 20 41 4C |730...... *** AL|
000012F0: 46 41 20 53 4F 52 54 20 28 45 49 4E 46 41 43 48 |FA SORT (EINFACH|
00001300: 29 20 2A 2A 2A 00 1B 1B E0 06 99 22 11 11 53 4F |) ***......"..SO|
00001310: 52 54 49 45 52 45 4E 2E 2E 2E 22 00 33 1B EA 06 |RTIEREN...".3...|
00001320: 45 52 25 B2 30 3A 81 49 B2 50 4C 25 AB 32 A4 30 |ER%.0:.I.PL%.2.0|
00001330: A9 AB 31 00 74 1B F4 06 8B 43 50 24 28 49 29 B1 |..1.t....CP$(I).|
00001340: 43 50 24 28 49 AA 31 29 A7 48 24 B2 43 50 24 28 |CP$(I.1).H$.CP$(|
00001350: 49 AA 31 29 3A 43 50 24 28 49 AA 31 29 B2 43 50 |I.1):CP$(I.1).CP|
00001360: 24 28 49 29 3A 43 50 24 28 49 29 B2 48 24 3A 45 |$(I):CP$(I).H$:E|
00001370: 52 25 B2 31 00 92 1B FE 06 82 3A 8B 45 52 25 A7 |R%.1......:.ER%.|
00001380: 31 37 37 30 3A 8F 20 4E 4F 43 48 4D 41 4C 20 2E |1770:. NOCHMAL .|
00001390: 2E 2E 00 AF 1B 08 07 8F 20 2A 2A 2A 20 43 4F 50 |........ *** COP|
000013A0: 59 20 46 49 4C 45 53 20 2E 2E 2E 20 2A 2A 2A 00 |Y FILES ... ***.|
000013B0: D7 1B 12 07 8B 51 25 A7 51 55 25 B2 AB 31 3A 8F |.....Q%.QU%..1:.|
000013C0: 20 44 49 52 20 4E 49 43 48 54 20 4D 45 48 52 20 | DIR NICHT MEHR |
000013D0: 47 55 45 4C 54 49 47 00 EA 1B 1C 07 8D 32 31 33 |GUELTIG......213|
000013E0: 30 3A 8F 20 52 41 48 4D 45 4E 00 F9 1B 26 07 81 |0:. RAHMEN...&..|
000013F0: 49 B2 30 A4 50 4C 25 AB 31 00 10 1C 30 07 99 22 |I.0.PL%.1...0.."|
00001400: 1D 22 43 50 24 28 49 29 A3 31 39 AA 54 42 29 3B |."CP$(I).19.TB);|
00001410: 00 4C 1C 3A 07 8B 51 25 B2 30 A7 98 31 35 2C 22 |.L.:..Q%.0..15,"|
00001420: 43 22 AA C7 28 34 38 AA 31 AB 44 52 25 29 AA 22 |C"..(48.1.DR%)."|
00001430: 3A 22 AA 43 50 24 28 49 29 AA 22 3D 22 AA 44 52 |:".CP$(I)."=".DR|
00001440: 24 AA 22 3A 22 AA 43 50 24 28 49 29 00 6B 1C 44 |$.":".CP$(I).k.D|
00001450: 07 8B 51 25 A7 98 31 35 2C 22 53 22 AA 44 52 24 |..Q%..15,"S".DR$|
00001460: AA 22 3A 22 AA 43 50 24 28 49 29 00 83 1C 4E 07 |.":".CP$(I)...N.|
00001470: 8D 32 32 32 30 3A 99 44 24 3A 45 52 25 28 49 29 |.2220:.D$:ER%(I)|
00001480: B2 45 25 00 AB 1C 58 07 8B 45 25 B2 37 32 A7 99 |.E%...X..E%.72..|
00001490: A3 31 39 AA 54 42 29 22 12 41 42 42 52 55 43 48 |.19.TB)".ABBRUCH|
000014A0: 12 20 21 21 21 22 3A 89 37 36 30 00 C6 1C 62 07 |. !!!":.760...b.|
000014B0: 8B 45 25 A7 45 52 25 B2 45 52 25 AA 31 3A 8F 20 |.E%.ER%.ER%.1:. |
000014C0: 46 45 48 4C 45 52 00 DB 1C 6C 07 8B C2 28 32 31 |FEHLER...l...(21|
000014D0: 34 29 B1 32 32 A7 8D 32 31 38 30 00 0A 1D 76 07 |4).22..2180...v.|
000014E0: 82 3A 8B 45 52 25 B2 30 B0 51 25 A7 99 A3 32 30 |.:.ER%.0.Q%...20|
000014F0: AA 54 42 29 22 2A 2A 2A 20 45 20 4E 20 44 20 45 |.TB)"*** E N D E|
00001500: 20 2A 2A 2A 22 3A 89 37 36 30 00 15 1D 80 07 8B | ***":.760......|
00001510: 41 46 25 A7 8E 00 35 1D 8A 07 8F 20 2A 2A 2A 20 |AF%...5.... *** |
00001520: 46 45 48 4C 45 52 20 42 45 48 41 4E 44 4C 55 4E |FEHLER BEHANDLUN|
00001530: 47 20 2A 2A 2A 00 71 1D 94 07 4B 4F 24 B2 C4 28 |G ***.q...KO$..(|
00001540: 45 52 25 29 AA 22 20 4B 4F 50 49 45 52 46 45 48 |ER%)." KOPIERFEH|
00001550: 4C 45 52 20 22 3A 8B 45 52 25 B1 31 A7 4B 4F 24 |LER ":.ER%.1.KO$|
00001560: B2 4B 4F 24 AA 22 53 49 4E 44 22 3A 89 31 39 36 |.KO$."SIND":.196|
00001570: 30 00 83 1D 9E 07 4B 4F 24 B2 4B 4F 24 AA 22 49 |0.....KO$.KO$."I|
00001580: 53 54 22 00 A0 1D A8 07 4B 4F 24 B2 4B 4F 24 AA |ST".....KO$.KO$.|
00001590: 22 20 41 55 46 47 45 54 52 45 54 45 4E 20 21 22 |" AUFGETRETEN !"|
000015A0: 00 C0 1D B2 07 81 49 B2 30 A4 50 4C 25 AB 31 3A |......I.0.PL%.1:|
000015B0: 8B 45 52 25 28 49 29 B3 B1 36 33 A7 32 31 31 30 |.ER%(I)..63.2110|
000015C0: 00 C9 1D BC 07 8D 31 37 30 00 DC 1D C6 07 99 22 |......170......"|
000015D0: 11 11 11 12 22 43 50 24 28 49 29 3B 00 FD 1D D0 |...."CP$(I);....|
000015E0: 07 99 A3 32 30 AA 54 42 29 22 92 45 58 49 53 54 |...20.TB)".EXIST|
000015F0: 49 45 52 54 20 42 45 52 45 49 54 53 2E 00 34 1E |IERT BEREITS..4.|
00001600: DA 07 99 22 11 11 12 4C 92 4F 45 53 43 48 45 4E |..."...L.OESCHEN|
00001610: 2C 20 12 55 92 4D 42 45 4E 45 4E 4E 45 4E 2C 20 |, .U.MBENENNEN, |
00001620: 12 49 92 47 4E 4F 52 49 45 52 45 4E 20 28 4C 2F |.I.GNORIEREN (L/|
00001630: 55 2F 49 29 00 58 1E E4 07 8D 36 38 30 3A 8B 54 |U/I).X....680:.T|
00001640: 41 24 B2 22 49 22 A7 32 31 30 30 3A 8F 20 49 47 |A$."I".2100:. IG|
00001650: 4E 4F 52 49 45 52 45 4E 00 79 1E EE 07 8B 54 41 |NORIEREN.y....TA|
00001660: 24 B2 22 4C 22 A7 32 30 37 30 3A 8F 20 53 43 52 |$."L".2070:. SCR|
00001670: 41 54 43 48 26 43 4F 50 59 00 9C 1E F8 07 8B 54 |ATCH©......T|
00001680: 41 24 B3 B1 22 55 22 A7 32 30 32 30 3A 8F 20 46 |A$.."U".2020:. F|
00001690: 41 4C 53 43 48 45 20 54 41 53 54 45 00 BB 1E 02 |ALSCHE TASTE....|
000016A0: 08 99 22 11 11 4E 45 55 45 52 20 4E 41 4D 45 20 |.."..NEUER NAME |
000016B0: 3F 20 22 3B 3A 84 31 2C 4E 4E 24 00 D3 1E 0C 08 |? ";:.1,NN$.....|
000016C0: 89 20 32 30 38 30 3A 8F 20 43 4F 50 59 20 41 47 |. 2080:. COPY AG|
000016D0: 41 49 4E 00 00 1F 16 08 4E 4E 24 B2 22 2A 22 3A |AIN.....NN$."*":|
000016E0: 98 31 35 2C 22 53 22 AA C7 28 34 38 AA 28 31 AB |.15,"S"..(48.(1.|
000016F0: 44 52 25 29 29 AA 22 3A 22 AA 43 50 24 28 49 29 |DR%)).":".CP$(I)|
00001700: 00 33 1F 20 08 98 31 35 2C 22 43 22 AA C7 28 34 |.3. ..15,"C"..(4|
00001710: 38 AA 31 AB 44 52 25 29 AA 22 3A 22 AA 4E 4E 24 |8.1.DR%).":".NN$|
00001720: AA 22 3D 22 AA 44 52 24 AA 22 3A 22 AA 43 50 24 |."=".DR$.":".CP$|
00001730: 28 49 29 00 4D 1F 2A 08 8B 44 53 A7 31 39 39 30 |(I).M.*..DS.1990|
00001740: 3A 8F 20 4E 4F 43 48 4D 41 4C 2E 2E 2E 00 65 1F |:. NOCHMAL....e.|
00001750: 34 08 99 53 50 24 3A 99 53 50 24 3A 99 53 50 24 |4..SP$:.SP$:.SP$|
00001760: 3A 99 53 50 24 00 6E 1F 3E 08 82 20 3A 8E 00 88 |:.SP$.n.>.. :...|
00001770: 1F 48 08 8F 20 2A 2A 2A 20 54 45 58 54 46 45 4E |.H.. *** TEXTFEN|
00001780: 53 54 45 52 20 2A 2A 2A 00 8E 1F 52 08 8F 00 B7 |STER ***...R....|
00001790: 1F 5C 08 99 22 93 22 A3 28 31 36 AB C3 28 4B 4F |.\..".".(16..(KO|
000017A0: 24 29 AD 32 29 AA 54 42 29 22 2A 2A 2A 20 22 4B |$).2).TB)"*** "K|
000017B0: 4F 24 22 20 2A 2A 2A 00 E5 1F 66 08 99 22 B0 C0 |O$" ***...f.."..|
000017C0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000017D0: B2 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000017E0: C0 C0 C0 C0 AE 00 14 20 70 08 99 22 DD 20 20 20 |....... p..". |
000017F0: 46 49 4C 45 20 2D 20 4E 41 4D 45 20 20 20 DD 20 |FILE - NAME . |
00001800: 20 46 45 48 4C 45 52 20 2D 20 4D 45 4C 44 55 4E | FEHLER - MELDUN|
00001810: 47 20 DD 22 00 42 20 7A 08 99 22 AB C0 C0 C0 C0 |G .".B z..".....|
00001820: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 DB C0 C0 |................|
00001830: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001840: C0 B3 00 5D 20 84 08 99 22 13 11 11 11 22 3A 81 |...] ..."....":.|
00001850: 4B B2 31 A4 32 30 3A 99 46 4F 24 3A 82 00 8D 20 |K.1.20:.FO$:... |
00001860: 8E 08 99 22 AD C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |..."............|
00001870: C0 C0 C0 C0 C0 C0 B1 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001880: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 BD 22 3B 00 9B 20 |...........";.. |
00001890: 98 08 99 22 13 11 11 11 22 3A 8E 00 B4 20 A2 08 |..."....":... ..|
000018A0: 8F 20 2A 2A 2A 20 46 4F 52 4D 41 54 20 44 53 24 |. *** FORMAT DS$|
000018B0: 20 2A 2A 2A 00 D0 20 AC 08 8D 33 37 38 30 3A 44 | ***.. ...3780:D|
000018C0: 24 B2 45 24 3A 44 24 B2 C8 28 44 24 2C 31 39 29 |$.E$:D$..(D$,19)|
000018D0: 00 04 21 B6 08 44 24 B2 C9 28 22 20 20 20 20 20 |..!..D$..(" |
000018E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000018F0: 20 20 20 20 20 22 AA 44 24 2C 39 AA C3 28 44 24 | ".D$,9..(D$|
00001900: 29 AD 32 29 00 14 21 C0 08 44 24 B2 C8 28 44 24 |).2)..!..D$..(D$|
00001910: 2C 31 39 29 00 1A 21 CA 08 8E 00 2F 21 D4 08 8F |,19)..!..../!...|
00001920: 2A 2A 2A 20 43 41 54 41 4C 4F 47 20 2A 2A 2A 00 |*** CATALOG ***.|
00001930: 35 21 DE 08 3A 00 60 21 E8 08 8B 42 38 A7 4B 4F |5!..:.`!...B8.KO|
00001940: 24 B2 22 44 49 52 45 43 54 4F 52 59 20 41 4E 5A |$."DIRECTORY ANZ|
00001950: 45 49 47 45 22 3A 8D 31 37 30 3A 89 32 33 32 30 |EIGE":.170:.2320|
00001960: 00 9E 21 F2 08 4B 4F 24 B2 20 22 4C 41 45 4E 47 |..!..KO$. "LAENG|
00001970: 45 20 20 20 20 46 49 4C 45 20 4E 41 4D 45 20 20 |E FILE NAME |
00001980: 20 20 54 59 50 20 20 20 53 54 41 52 54 22 3A 8D | TYP START":.|
00001990: 31 37 30 3A 8D 37 32 30 3A 99 22 11 11 22 00 DB |170:.720:.".."..|
000019A0: 21 FC 08 54 59 24 B2 22 41 22 3A 8D 33 31 30 3A |!..TY$."A":.310:|
000019B0: 8D 31 37 30 3A 8D 33 36 37 30 3A 99 22 11 11 22 |.170:.3670:.".."|
000019C0: A3 31 36 AA 54 42 29 22 12 54 41 53 54 45 20 42 |.16.TB)".TASTE B|
000019D0: 49 54 54 45 22 3B 3A 89 36 38 30 00 F5 21 06 09 |ITTE";:.680..!..|
000019E0: 99 22 11 46 45 48 4C 45 52 20 3D 20 12 22 45 24 |.".FEHLER = ."E$|
000019F0: 3A 89 36 38 30 00 06 22 10 09 81 49 B2 30 A4 31 |:.680.."...I.0.1|
00001A00: 3A 44 52 25 B2 49 00 35 22 1A 09 99 22 13 13 11 |:DR%.I.5"..."...|
00001A10: 11 11 11 22 A3 35 AA 44 52 25 AC 33 35 29 22 0F |...".5.DR%.35)".|
00001A20: 93 22 3A 97 32 31 34 2C 32 33 3A 99 A3 37 39 29 |.":.214,23:..79)|
00001A30: 22 8F 13 22 3B 00 72 22 24 09 44 52 24 B2 C7 28 |"..";.r"$.DR$..(|
00001A40: 49 AA 34 38 29 3A 98 31 35 2C 22 49 22 AA 44 52 |I.48):.15,"I".DR|
00001A50: 24 3A 8D 33 37 38 30 3A 8B 45 25 B2 30 A7 A0 31 |$:.3780:.E%.0..1|
00001A60: 35 3A D7 44 28 44 52 25 29 3A 9F 31 35 2C 38 2C |5:.D(DR%):.15,8,|
00001A70: 31 35 00 9D 22 2E 09 82 3A 99 3A 99 3A 97 32 31 |15.."...:.:.:.21|
00001A80: 31 2C 30 3A 99 A3 33 35 29 22 12 54 41 53 54 45 |1,0:..35)".TASTE|
00001A90: 20 42 49 54 54 45 22 3B 3A 8D 36 38 30 00 AA 22 | BITTE";:.680.."|
00001AA0: 38 09 99 22 13 13 93 22 3A 8E 00 CA 22 42 09 8F |8.."...":..."B..|
00001AB0: 2A 2A 2A 20 46 49 4E 44 20 53 50 45 43 49 46 49 |*** FIND SPECIFI|
00001AC0: 43 20 46 49 4C 45 20 2A 2A 2A 00 F8 22 4C 09 8B |C FILE ***.."L..|
00001AD0: C8 28 48 24 2C C3 28 46 49 24 29 29 B3 B1 46 49 |.(H$,.(FI$))..FI|
00001AE0: 24 20 A7 20 34 39 30 3A 8F 20 4E 49 43 48 54 20 |$ . 490:. NICHT |
00001AF0: 47 45 46 55 4E 44 45 4E 00 08 23 56 09 8B 52 45 |GEFUNDEN..#V..RE|
00001B00: 25 A7 5A 25 B2 30 3A 8E 00 3C 23 60 09 42 55 25 |%.Z%.0:..<#`.BU%|
00001B10: B2 42 55 25 AA 31 3A 8D 38 30 30 3A 8D 31 34 30 |.BU%.1:.800:.140|
00001B20: 3A 54 52 25 B2 42 59 25 3A 8D 31 34 30 3A 53 43 |:TR%.BY%:.140:SC|
00001B30: 25 B2 42 59 25 3A 5A 25 B2 30 3A 8E 00 51 23 6A |%.BY%:Z%.0:..Q#j|
00001B40: 09 49 B2 49 AB 32 3A 8B 49 B3 AB 31 A7 49 B2 AB |.I.I.2:.I..1.I..|
00001B50: 31 00 57 23 74 09 8E 00 79 23 7E 09 8F 20 2A 2A |1.W#t...y#~.. **|
00001B60: 2A 2A 20 56 49 45 57 20 46 49 4C 45 20 4F 4E 20 |** VIEW FILE ON |
00001B70: 44 49 53 4B 20 2A 2A 2A 2A 00 9A 23 88 09 4B 4F |DISK ****..#..KO|
00001B80: 24 B2 22 46 49 4C 45 20 2D 20 42 45 54 52 41 43 |$."FILE - BETRAC|
00001B90: 48 54 45 52 22 3A 8D 31 37 30 00 B9 23 92 09 99 |HTER":.170..#...|
00001BA0: 22 46 49 4C 45 4E 41 4D 45 20 5A 55 4D 20 4C 49 |"FILENAME ZUM LI|
00001BB0: 53 54 45 4E 20 3F 20 22 3B 00 C6 23 9C 09 84 31 |STEN ? ";..#...1|
00001BC0: 2C 46 49 24 3A 99 00 D9 23 A6 09 54 59 24 B2 22 |,FI$:...#..TY$."|
00001BD0: 41 22 3A 51 55 25 B2 AB 31 00 EE 23 B0 09 99 22 |A":QU%..1..#..."|
00001BE0: 11 11 41 55 46 20 91 22 3B 3A 8D 37 32 30 00 21 |..AUF .";:.720.!|
00001BF0: 24 BA 09 5A 25 B2 AB 31 3A 8D 33 32 30 3A 8B 5A |$..Z%..1:.320:.Z|
00001C00: 25 A7 99 22 11 11 4E 49 43 48 54 20 47 45 46 55 |%.."..NICHT GEFU|
00001C10: 4E 44 45 4E 20 21 22 3A 5A 25 B2 30 3A 89 36 38 |NDEN !":Z%.0:.68|
00001C20: 30 00 31 24 C4 09 46 49 24 B2 48 24 3A 8D 32 38 |0.1$..FI$.H$:.28|
00001C30: 30 00 5E 24 CE 09 99 22 13 13 11 11 11 11 0F 93 |0.^$..."........|
00001C40: 22 A3 32 30 29 22 0F 93 4C 49 53 54 49 4E 47 20 |".20)"..LISTING |
00001C50: 56 4F 4E 20 46 49 4C 45 20 12 22 46 49 24 00 8C |VON FILE ."FI$..|
00001C60: 24 D8 09 99 22 11 44 49 45 53 45 52 20 42 4C 4F |$...".DIESER BLO|
00001C70: 43 4B 20 49 4E 20 20 20 20 20 20 20 3A 20 20 20 |CK IN : |
00001C80: 20 20 22 54 52 25 22 2C 22 53 43 25 00 C5 24 E2 | "TR%","SC%..$.|
00001C90: 09 99 22 11 4E 41 45 43 48 53 54 45 52 20 42 4C |..".NAECHSTER BL|
00001CA0: 4F 43 4B 20 49 4E 20 20 20 20 3A 20 20 20 20 20 |OCK IN : |
00001CB0: 22 3B 3A 8D 31 34 30 3A 99 42 59 25 3B 3A 54 52 |";:.140:.BY%;:TR|
00001CC0: 25 B2 42 59 25 00 E9 24 EC 09 99 A3 32 38 AA 54 |%.BY%..$....28.T|
00001CD0: 42 29 22 9D 2C 22 3B 3A 8D 31 34 30 3A 99 42 59 |B)".,";:.140:.BY|
00001CE0: 25 3A 53 43 25 B2 42 59 25 00 27 25 F6 09 99 22 |%:SC%.BY%.'%..."|
00001CF0: 11 53 54 41 52 54 20 41 44 52 45 53 53 45 20 20 |.START ADRESSE |
00001D00: 20 20 20 20 20 20 20 3A 20 22 3B 3A 8D 31 34 30 | : ";:.140|
00001D10: 3A 41 B2 42 59 25 3A 8D 31 34 30 3A 41 B2 41 AA |:A.BY%:.140:A.A.|
00001D20: 32 35 36 AC 42 59 25 00 41 25 00 0A 99 A3 32 38 |256.BY%.A%....28|
00001D30: AA 54 42 29 41 A3 33 35 AA 54 42 29 22 44 45 5A |.TB)A.35.TB)"DEZ|
00001D40: 22 00 7F 25 0A 0A 99 22 11 45 52 53 54 45 20 4C |"..%...".ERSTE L|
00001D50: 49 4E 4B 41 44 52 45 53 53 45 20 20 20 20 20 3A |INKADRESSE :|
00001D60: 20 22 3B 3A 8D 31 34 30 3A 41 B2 42 59 25 3A 8D | ";:.140:A.BY%:.|
00001D70: 31 34 30 3A 41 B2 41 AA 32 35 36 AC 42 59 25 00 |140:A.A.256.BY%.|
00001D80: 99 25 14 0A 99 A3 32 38 AA 54 42 29 41 A3 33 35 |.%....28.TB)A.35|
00001D90: AA 54 42 29 22 44 45 5A 22 00 D7 25 1E 0A 99 22 |.TB)"DEZ"..%..."|
00001DA0: 11 45 52 53 54 45 20 5A 45 49 4C 45 4E 4E 55 4D |.ERSTE ZEILENNUM|
00001DB0: 4D 45 52 20 20 20 20 3A 20 22 3B 3A 8D 31 34 30 |MER : ";:.140|
00001DC0: 3A 41 B2 42 59 25 3A 8D 31 34 30 3A 41 B2 41 AA |:A.BY%:.140:A.A.|
00001DD0: 32 35 36 AC 42 59 25 00 F1 25 28 0A 99 A3 32 38 |256.BY%..%(...28|
00001DE0: AA 54 42 29 41 A3 33 35 AA 54 42 29 22 44 45 5A |.TB)A.35.TB)"DEZ|
00001DF0: 22 00 1C 26 32 0A 99 22 11 41 53 43 49 49 44 55 |"..&2..".ASCIIDU|
00001E00: 4D 50 3A 22 3A 51 41 25 B2 35 3A 51 42 25 B2 33 |MP:":QA%.5:QB%.3|
00001E10: 33 3A 8B 42 38 A7 51 42 25 B2 37 35 00 54 26 3C |3:.B8.QB%.75.T&<|
00001E20: 0A 48 58 24 B2 22 22 3A 81 49 B2 38 A4 32 35 35 |.HX$."":.I.8.255|
00001E30: 3A 8D 31 34 30 3A 48 58 24 B2 48 58 24 AA 42 59 |:.140:HX$.HX$.BY|
00001E40: 24 3A 82 3A 99 3A 97 32 31 31 2C 51 41 25 3A 99 |$:.:.:.211,QA%:.|
00001E50: 22 3A 22 3B 00 64 26 46 0A 81 49 B2 31 A4 C3 28 |":";.d&F..I.1..(|
00001E60: 48 58 24 29 00 86 26 50 0A 8B B9 28 49 29 B1 51 |HX$)..&P...(I).Q|
00001E70: 42 25 A7 99 22 3A 22 3A 97 32 31 31 2C 51 41 25 |B%..":":.211,QA%|
00001E80: 3A 99 22 3A 22 3B 00 A1 26 5A 0A 43 24 B2 CA 28 |:.":";..&Z.C$..(|
00001E90: 48 58 24 2C 49 2C 31 29 3A 43 25 B2 C6 28 43 24 |HX$,I,1):C%..(C$|
00001EA0: 29 00 BD 26 64 0A 8B 43 25 B1 31 32 37 A7 99 22 |)..&d..C%.127.."|
00001EB0: 12 22 3B 3A 43 25 B2 43 25 AF 31 32 37 00 CE 26 |.";:C%.C%.127..&|
00001EC0: 6E 0A 8B 43 25 B3 33 32 A7 43 25 B2 33 32 00 DF |n..C%.32.C%.32..|
00001ED0: 26 78 0A 8B 43 25 B2 33 34 A7 8D 33 36 36 30 00 |&x..C%.34..3660.|
00001EE0: 06 27 82 0A 99 C7 28 43 25 29 22 92 22 3B 3A 82 |.'....(C%)".";:.|
00001EF0: 3A 97 32 31 31 2C 51 42 25 AA 31 3A 99 22 3A 22 |:.211,QB%.1:.":"|
00001F00: 3A 8B 42 38 A7 99 00 2F 27 8C 0A 8B 54 52 25 B2 |:.B8.../'...TR%.|
00001F10: 30 A7 99 2C 22 54 41 53 54 45 20 46 55 45 52 53 |0..,"TASTE FUERS|
00001F20: 20 4D 45 4E 55 45 22 3A A0 38 3A 89 36 38 30 00 | MENUE":.8:.680.|
00001F30: 63 27 96 0A 99 22 12 45 92 20 46 55 45 52 20 45 |c'...".E. FUER E|
00001F40: 4E 44 45 2C 12 4E 92 20 46 55 45 52 20 44 45 4E |NDE,.N. FUER DEN|
00001F50: 20 4E 41 45 43 48 53 54 45 4E 20 42 4C 4F 43 4B | NAECHSTEN BLOCK|
00001F60: 2E 22 3B 00 81 27 A0 0A 8D 36 38 30 3A 8B 54 41 |.";..'...680:.TA|
00001F70: 24 B2 22 45 22 A7 A0 38 3A 99 22 13 13 93 22 3A |$."E"..8:."...":|
00001F80: 8E 00 94 27 AA 0A 8B 54 41 24 B3 B1 22 4E 22 A7 |...'...TA$.."N".|
00001F90: 32 37 32 30 00 9E 27 B4 0A 89 32 35 30 30 00 C0 |2720..'...2500..|
00001FA0: 27 BE 0A 8F 20 2A 2A 2A 20 4E 41 4D 45 4E 20 26 |'... *** NAMEN &|
00001FB0: 20 49 44 20 41 45 4E 44 45 52 4E 20 2A 2A 2A 2A | ID AENDERN ****|
00001FC0: 00 EA 27 C8 0A 4B 4F 24 B2 22 44 49 53 4B 20 4E |..'..KO$."DISK N|
00001FD0: 41 4D 45 4E 20 26 20 49 44 20 41 45 4E 44 45 52 |AMEN & ID AENDER|
00001FE0: 55 4E 47 22 3A 8D 20 31 37 30 00 FE 27 D2 0A 8D |UNG":. 170..'...|
00001FF0: 20 37 32 30 3A 8F 20 44 52 49 56 45 20 23 00 15 | 720:. DRIVE #..|
00002000: 28 DC 0A 8D 20 36 32 30 3A 8F 20 4E 41 4D 45 20 |(... 620:. NAME |
00002010: 2B 20 49 44 24 00 2E 28 E6 0A 99 22 11 11 44 49 |+ ID$..(..."..DI|
00002020: 53 4B 4E 41 4D 45 20 20 3A 20 22 4E 41 24 00 46 |SKNAME : "NA$.F|
00002030: 28 F0 0A 99 22 11 44 49 53 4B 20 49 44 20 20 20 |(...".DISK ID |
00002040: 3A 20 22 49 44 24 00 76 28 FA 0A 99 22 11 11 41 |: "ID$.v(..."..A|
00002050: 45 4E 44 45 52 55 4E 47 20 56 4F 4E 20 12 49 92 |ENDERUNG VON .I.|
00002060: 44 2C 20 12 4E 92 41 4D 45 2C 20 12 4B 92 45 49 |D, .N.AME, .K.EI|
00002070: 4E 45 20 3F 20 22 00 8D 28 04 0B 8D 36 38 30 3A |NE ? "..(...680:|
00002080: 8B 54 41 24 B2 22 4B 22 A7 A0 38 3A 8E 00 9F 28 |.TA$."K"..8:...(|
00002090: 0E 0B 8B 54 41 24 B2 22 49 22 A7 32 39 31 30 00 |...TA$."I".2910.|
000020A0: B2 28 18 0B 8B 54 41 24 B3 B1 22 4E 22 A7 32 38 |.(...TA$.."N".28|
000020B0: 32 30 00 CE 28 22 0B 8F 20 2A 2A 2A 20 4E 41 4D |20..(".. *** NAM|
000020C0: 45 4E 20 41 45 4E 44 45 52 4E 20 2A 2A 2A 00 FB |EN AENDERN ***..|
000020D0: 28 2C 0B 99 22 11 4E 45 55 45 52 20 4E 41 4D 45 |(,..".NEUER NAME|
000020E0: 20 3F 20 22 3B 3A 58 25 B2 B9 28 49 29 3A 99 4E | ? ";:X%..(I):.N|
000020F0: 41 24 3B 3A 97 32 31 31 2C 58 25 00 13 29 36 0B |A$;:.211,X%..)6.|
00002100: 84 31 2C 4E 41 24 3A 42 55 25 B2 31 34 34 3A 8D |.1,NA$:BU%.144:.|
00002110: 38 30 30 00 33 29 40 0B 4E 41 24 B2 4E 41 24 AA |800.3)@.NA$.NA$.|
00002120: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00002130: 20 20 22 00 45 29 4A 0B 4E 41 24 B2 C8 28 4E 41 | ".E)J.NA$..(NA|
00002140: 24 2C 31 36 29 00 57 29 54 0B 98 38 2C 4E 41 24 |$,16).W)T..8,NA$|
00002150: 3B 3A 89 32 39 37 30 00 70 29 5E 0B 8F 20 2A 2A |;:.2970.p)^.. **|
00002160: 2A 20 49 44 20 41 45 4E 44 45 52 4E 20 2A 2A 2A |* ID AENDERN ***|
00002170: 00 9B 29 68 0B 99 22 11 4E 45 55 45 52 20 49 44 |..)h..".NEUER ID|
00002180: 20 3F 20 22 3B 3A 58 25 B2 B9 28 49 29 3A 99 49 | ? ";:X%..(I):.I|
00002190: 44 24 3B 3A 97 32 31 31 2C 58 25 00 B3 29 72 0B |D$;:.211,X%..)r.|
000021A0: 84 31 2C 49 44 24 3A 42 55 25 B2 31 36 32 3A 8D |.1,ID$:BU%.162:.|
000021B0: 38 30 30 00 DC 29 7C 0B 58 B2 C3 28 49 44 24 29 |800..)|.X..(ID$)|
000021C0: 3A 49 44 24 B2 49 44 24 AA CA 28 22 20 20 20 32 |:ID$.ID$..(" 2|
000021D0: 41 20 22 2C 58 AA 31 2C 36 AB 58 29 00 ED 29 86 |A ",X.1,6.X)..).|
000021E0: 0B 49 44 24 B2 C8 28 49 44 24 2C 35 29 00 F9 29 |.ID$..(ID$,5)..)|
000021F0: 90 0B 98 38 2C 49 44 24 3B 00 1C 2A 9A 0B 98 31 |...8,ID$;..*...1|
00002200: 35 2C 22 55 32 3A 38 22 44 52 25 2C 31 38 2C 30 |5,"U2:8"DR%,18,0|
00002210: 3A 98 31 35 2C 22 49 22 AA 44 52 24 00 25 2A A4 |:.15,"I".DR$.%*.|
00002220: 0B A0 38 3A 8E 00 49 2A AE 0B 8F 20 2A 2A 2A 2A |..8:..I*... ****|
00002230: 20 54 45 53 54 4C 45 53 45 4E 20 45 49 4E 45 52 | TESTLESEN EINER|
00002240: 20 44 49 53 4B 20 2A 2A 2A 00 83 2A B8 0B 45 42 | DISK ***..*..EB|
00002250: 25 B2 30 3A 45 53 25 B2 30 3A 45 43 25 B2 30 3A |%.0:ES%.0:EC%.0:|
00002260: 44 43 25 B2 30 3A 48 44 25 B2 30 3A 45 58 25 B2 |DC%.0:HD%.0:EX%.|
00002270: 30 3A 45 52 25 B2 30 3A 46 52 25 B2 30 3A 42 45 |0:ER%.0:FR%.0:BE|
00002280: 25 B2 30 00 9C 2A C2 0B 4B 4F 24 B2 22 54 45 53 |%.0..*..KO$."TES|
00002290: 54 4C 45 53 45 4E 22 3A 8D 31 37 30 00 B9 2A CC |TLESEN":.170..*.|
000022A0: 0B 99 22 54 45 53 54 4C 45 53 45 4E 20 56 4F 4E |.."TESTLESEN VON|
000022B0: 20 91 22 3B 3A 8D 37 32 30 00 CE 2A D6 0B 54 52 | .";:.720..*..TR|
000022C0: 25 B2 31 3A 53 43 25 B2 30 3A 8D 32 35 30 00 F0 |%.1:SC%.0:.250..|
000022D0: 2A E0 0B 41 4E 25 B2 31 3A 45 4E 25 B2 33 35 3A |*..AN%.1:EN%.35:|
000022E0: 8F 20 44 45 46 41 55 4C 54 20 56 41 4C 55 45 53 |. DEFAULT VALUES|
000022F0: 00 15 2B EA 0B 99 22 11 11 42 45 53 54 49 4D 4D |..+..."..BESTIMM|
00002300: 54 45 52 20 42 45 52 45 49 43 48 20 28 4A 2F 4E |TER BEREICH (J/N|
00002310: 29 20 3F 20 22 00 2C 2B F4 0B 8D 36 38 30 3A 8B |) ? ".,+...680:.|
00002320: 54 41 24 B2 22 4E 22 A7 33 31 33 30 00 3F 2B FE |TA$."N".3130.?+.|
00002330: 0B 8B 54 41 24 B3 B1 22 4A 22 A7 33 30 36 30 00 |..TA$.."J".3060.|
00002340: 64 2B 08 0C 99 22 11 56 4F 4E 20 53 50 55 52 20 |d+...".VON SPUR |
00002350: 22 3B 3A 84 31 2C 54 41 24 3A 41 4E 25 B2 C5 28 |";:.1,TA$:AN%..(|
00002360: 54 41 24 29 00 80 2B 12 0C 8B 41 4E 25 B2 30 A7 |TA$)..+...AN%.0.|
00002370: 41 4E 25 B2 31 3A 99 C7 28 32 30 29 22 31 22 3B |AN%.1:..(20)"1";|
00002380: 00 A6 2B 1C 0C 99 22 20 20 42 49 53 20 53 50 55 |..+..." BIS SPU|
00002390: 52 20 22 3B 3A 84 31 2C 54 41 24 3A 45 4E 25 B2 |R ";:.1,TA$:EN%.|
000023A0: C5 28 54 41 24 29 00 D9 2B 26 0C 8B 28 45 4E 25 |.(TA$)..+&..(EN%|
000023B0: B2 30 29 B0 28 45 4E 25 B1 33 35 29 B0 28 45 4E |.0).(EN%.35).(EN|
000023C0: 25 B3 41 4E 25 29 A7 45 4E 25 B2 33 35 3A 99 C7 |%.AN%).EN%.35:..|
000023D0: 28 32 30 29 22 33 35 22 3B 00 E7 2B 30 0C 99 20 |(20)"35";..+0.. |
000023E0: 3A 51 55 25 B2 AB 31 00 25 2C 3A 0C 4B 4F 24 B2 |:QU%..1.%,:.KO$.|
000023F0: 22 56 4F 4E 20 53 50 55 52 22 AA C4 28 41 4E 25 |"VON SPUR"..(AN%|
00002400: 29 AA 22 20 42 49 53 20 53 50 55 52 22 AA C4 28 |)." BIS SPUR"..(|
00002410: 45 4E 25 29 3A 48 31 24 B2 22 44 49 53 4B 20 43 |EN%):H1$."DISK C|
00002420: 48 45 43 4B 22 00 2E 2C 44 0C 8D 31 37 30 00 39 |HECK"..,D..170.9|
00002430: 2C 4E 0C 99 22 11 11 11 22 00 5C 2C 58 0C 81 49 |,N.."...".\,X..I|
00002440: B2 41 4E 25 A4 45 4E 25 3A 4A 4A 25 B2 32 30 3A |.AN%.EN%:JJ%.20:|
00002450: 8B 49 B1 31 37 A7 4A 4A 25 B2 31 38 00 6D 2C 62 |.I.17.JJ%.18.m,b|
00002460: 0C 8B 49 B1 32 34 A7 4A 4A 25 B2 31 37 00 8F 2C |..I.24.JJ%.17..,|
00002470: 6C 0C 8B 49 B1 33 30 A7 4A 4A 25 B2 31 36 3A 8F |l..I.30.JJ%.16:.|
00002480: 20 53 45 4B 54 4F 52 45 4E 2F 54 52 41 43 4B 00 | SEKTOREN/TRACK.|
00002490: 9C 2C 76 0C 81 4A B2 30 A4 4A 4A 25 00 B2 2C 80 |.,v..J.0.JJ%..,.|
000024A0: 0C 98 31 35 2C 22 42 2D 41 3A 22 44 52 25 2C 49 |..15,"B-A:"DR%,I|
000024B0: 2C 4A 00 D6 2C 8A 0C 8B 44 53 B2 30 A7 46 52 25 |,J..,...DS.0.FR%|
000024C0: B2 46 52 25 AA 31 3A 46 24 B2 22 46 52 45 49 22 |.FR%.1:F$."FREI"|
000024D0: 3A 89 33 32 33 30 00 02 2D 94 0C 42 45 25 B2 42 |:.3230..-..BE%.B|
000024E0: 45 25 AA 31 3A 46 24 B2 22 42 45 4C 45 47 54 22 |E%.1:F$."BELEGT"|
000024F0: 3A 98 31 35 2C 22 42 2D 46 3A 22 44 52 25 2C 49 |:.15,"B-F:"DR%,I|
00002500: 2C 4A 00 14 2D 9E 0C 99 22 13 11 11 11 11 11 11 |,J..-...".......|
00002510: 22 53 50 24 00 32 2D A8 0C 99 22 91 53 50 55 52 |"SP$.2-...".SPUR|
00002520: 22 49 22 53 45 4B 54 4F 52 22 4A 22 3D 20 20 22 |"I"SEKTOR"J"= "|
00002530: 46 24 00 47 2D B2 0C 54 52 25 B2 49 3A 53 43 25 |F$.G-..TR%.I:SC%|
00002540: B2 4A 3A 8D 32 38 30 00 70 2D BC 0C 99 3A 8D 33 |.J:.280.p-...:.3|
00002550: 37 38 30 3A 44 24 B2 45 24 3A 99 53 50 24 3A 99 |780:D$.E$:.SP$:.|
00002560: 22 91 22 44 24 3A 8B 44 53 B2 30 A7 33 33 35 30 |"."D$:.DS.0.3350|
00002570: 00 A9 2D C6 0C 45 52 25 B2 45 52 25 AA 31 3A 8B |..-..ER%.ER%.1:.|
00002580: 45 25 B2 32 36 B0 45 25 B2 37 31 A7 99 22 4B 45 |E%.26.E%.71.."KE|
00002590: 49 4E 20 54 45 53 54 20 4D 4F 45 47 4C 49 43 48 |IN TEST MOEGLICH|
000025A0: 20 21 20 22 3A 89 36 38 30 00 C4 2D D0 0C 8B 45 | ! ":.680..-...E|
000025B0: 25 B2 32 30 A7 45 42 25 B2 45 42 25 AA 31 3A 89 |%.20.EB%.EB%.1:.|
000025C0: 33 33 34 30 00 DF 2D DA 0C 8B 45 25 B2 32 31 A7 |3340..-...E%.21.|
000025D0: 45 53 25 B2 45 53 25 AA 31 3A 89 33 33 34 30 00 |ES%.ES%.1:.3340.|
000025E0: FA 2D E4 0C 8B 45 25 B2 32 33 A7 45 43 25 B2 45 |.-...E%.23.EC%.E|
000025F0: 43 25 AA 31 3A 89 33 33 34 30 00 15 2E EE 0C 8B |C%.1:.3340......|
00002600: 45 25 B2 32 34 A7 44 43 25 B2 44 43 25 AA 31 3A |E%.24.DC%.DC%.1:|
00002610: 89 33 33 34 30 00 36 2E F8 0C 8B 45 25 B2 32 37 |.3340.6....E%.27|
00002620: B0 45 25 B2 32 39 A7 48 44 25 B2 48 44 25 AA 31 |.E%.29.HD%.HD%.1|
00002630: 3A 89 33 33 34 30 00 51 2E 02 0D 8B 45 25 B2 32 |:.3340.Q....E%.2|
00002640: 38 A7 45 58 25 B2 45 58 25 AA 31 3A 89 33 33 34 |8.EX%.EX%.1:.334|
00002650: 30 00 6C 2E 0C 0D A0 38 3A 8D 20 32 34 30 3A 8F |0.l....8:. 240:.|
00002660: 20 49 4E 49 54 20 2B 20 4F 50 45 4E 00 78 2E 16 | INIT + OPEN.x..|
00002670: 0D 82 4A 2C 49 3A A0 38 00 99 2E 20 0D 4B 4F 24 |..J,I:.8... .KO$|
00002680: B2 22 46 45 48 4C 45 52 20 55 45 42 45 52 53 49 |."FEHLER UEBERSI|
00002690: 43 48 54 22 3A 8D 31 37 30 00 C4 2E 2A 0D 99 A3 |CHT":.170...*...|
000026A0: 33 AA 54 42 29 22 42 45 4C 45 47 54 20 3D 22 42 |3.TB)"BELEGT ="B|
000026B0: 45 25 A3 32 38 AA 54 42 29 22 46 52 45 49 20 3D |E%.28.TB)"FREI =|
000026C0: 22 46 52 25 00 EB 2E 34 0D 99 A3 33 AA 54 42 29 |"FR%...4...3.TB)|
000026D0: 22 11 48 45 41 44 45 52 20 46 45 48 4C 54 20 20 |".HEADER FEHLT |
000026E0: 20 20 20 20 20 20 3A 22 45 42 25 00 12 2F 3E 0D | :"EB%../>.|
000026F0: 99 A3 33 AA 54 42 29 22 11 53 59 4E 43 52 4F 4E |..3.TB)".SYNCRON|
00002700: 49 4D 50 55 4C 53 20 46 45 48 4C 54 20 3A 22 45 |IMPULS FEHLT :"E|
00002710: 53 25 00 39 2F 48 0D 99 A3 33 AA 54 42 29 22 11 |S%.9/H...3.TB)".|
00002720: 50 52 55 45 46 53 55 4D 4D 45 4E 20 46 45 48 4C |PRUEFSUMMEN FEHL|
00002730: 45 52 20 20 3A 22 45 43 25 00 60 2F 52 0D 99 A3 |ER :"EC%.`/R...|
00002740: 33 AA 54 42 29 22 11 44 45 4B 4F 44 49 45 52 20 |3.TB)".DEKODIER |
00002750: 46 45 48 4C 45 52 20 20 20 20 20 3A 22 44 43 25 |FEHLER :"DC%|
00002760: 00 87 2F 5C 0D 99 A3 33 AA 54 42 29 22 11 48 45 |../\...3.TB)".HE|
00002770: 41 44 45 52 20 50 52 55 45 46 53 55 4D 4D 45 20 |ADER PRUEFSUMME |
00002780: 20 20 3A 22 48 44 25 00 AE 2F 66 0D 99 A3 33 AA | :"HD%../f...3.|
00002790: 54 42 29 22 11 4C 41 4E 47 45 52 20 44 41 54 45 |TB)".LANGER DATE|
000027A0: 4E 20 42 4C 4F 43 4B 20 20 3A 22 45 58 25 00 DF |N BLOCK :"EX%..|
000027B0: 2F 70 0D 99 A3 33 AA 54 42 29 22 11 11 47 45 53 |/p...3.TB)"..GES|
000027C0: 41 4D 54 46 45 48 4C 45 52 20 20 20 20 20 20 20 |AMTFEHLER |
000027D0: 20 3A 22 3B 3A 8B 45 52 25 A7 99 22 12 22 3B 00 | :";:.ER%..".";.|
000027E0: F4 2F 7A 0D 99 45 52 25 3A 98 31 35 2C 22 56 22 |./z..ER%:.15,"V"|
000027F0: AA 44 52 24 00 14 30 84 0D 99 22 11 20 20 20 42 |.DR$..0...". B|
00002800: 49 54 54 45 20 45 49 4E 45 20 54 41 53 54 45 2E |ITTE EINE TASTE.|
00002810: 2E 2E 22 3B 00 1D 30 8E 0D 89 36 38 30 00 3E 30 |..";..0...680.>0|
00002820: 98 0D 8F 20 2A 2A 2A 20 55 4E 53 43 52 41 54 43 |... *** UNSCRATC|
00002830: 48 20 45 49 4E 20 46 49 4C 45 20 2A 2A 2A 00 59 |H EIN FILE ***.Y|
00002840: 30 A2 0D 4B 4F 24 B2 22 44 49 53 4B 20 46 49 4C |0..KO$."DISK FIL|
00002850: 45 20 52 45 54 54 45 52 22 00 89 30 AC 0D 8D 31 |E RETTER"..0...1|
00002860: 37 30 3A 99 22 11 11 46 49 4C 45 20 4E 41 4D 45 |70:."..FILE NAME|
00002870: 20 5A 55 4D 20 52 45 54 54 45 4E 20 3F 20 22 3B | ZUM RETTEN ? ";|
00002880: 3A 84 31 2C 46 49 24 3A 99 00 9D 30 B6 0D 8D 20 |:.1,FI$:...0... |
00002890: 37 32 30 3A 8F 20 44 52 49 56 45 20 23 00 C9 30 |720:. DRIVE #..0|
000028A0: C0 0D 54 59 24 B2 22 41 22 3A 51 55 25 B2 AB 31 |..TY$."A":QU%..1|
000028B0: 3A 52 45 25 B2 AB 31 3A 5A 25 B2 AB 31 3A 8D 20 |:RE%..1:Z%..1:. |
000028C0: 33 32 30 3A 52 45 25 B2 30 00 F4 30 CA 0D 8B 5A |320:RE%.0..0...Z|
000028D0: 25 A7 99 22 11 11 4E 49 43 48 54 20 47 45 46 55 |%.."..NICHT GEFU|
000028E0: 4E 44 45 4E 20 21 22 3A A0 38 3A 5A 25 B2 30 3A |NDEN !":.8:Z%.0:|
000028F0: 89 36 38 30 00 14 31 D4 0D 99 22 11 47 45 46 55 |.680..1...".GEFU|
00002900: 4E 44 45 4E 20 20 20 46 49 4C 45 20 3A 20 20 20 |NDEN FILE : |
00002910: 12 22 48 24 00 43 31 DE 0D 99 22 11 11 54 59 50 |."H$.C1..."..TYP|
00002920: 3A 20 12 50 92 52 47 2C 20 12 53 92 45 51 2C 20 |: .P.RG, .S.EQ, |
00002930: 12 55 92 53 52 20 4F 44 45 52 20 12 52 92 45 4C |.U.SR ODER .R.EL|
00002940: 20 22 3B 00 72 31 E8 0D 8D 20 36 38 30 3A 99 54 | ";.r1... 680:.T|
00002950: 41 24 3B 3A 81 49 B2 31 A4 34 3A 8B 54 41 24 B2 |A$;:.I.1.4:.TA$.|
00002960: CA 28 22 53 50 55 52 22 2C 49 2C 31 29 A7 33 35 |.("SPUR",I,1).35|
00002970: 38 30 00 7E 31 F2 0D 82 3A 89 33 35 36 30 00 9D |80.~1...:.3560..|
00002980: 31 FC 0D 42 59 25 B2 31 32 38 AA 49 3A 8D 38 30 |1..BY%.128.I:.80|
00002990: 30 3A 8F 20 42 55 46 46 45 52 20 3D 30 00 AC 31 |0:. BUFFER =0..1|
000029A0: 06 0E 98 38 2C C7 28 42 59 25 29 3B 00 CA 31 10 |...8,.(BY%);..1.|
000029B0: 0E 98 31 35 2C 22 55 32 3A 22 38 3B 44 52 25 3B |..15,"U2:"8;DR%;|
000029C0: 54 52 25 3B 53 43 25 3A A0 38 00 03 32 1A 0E 99 |TR%;SC%:.8..2...|
000029D0: 3A 99 22 11 11 46 49 4C 45 20 57 49 45 44 45 52 |:."..FILE WIEDER|
000029E0: 20 4B 41 54 41 4C 4F 47 49 53 49 45 52 54 2E 22 | KATALOGISIERT."|
000029F0: 3A 98 31 35 2C 22 56 22 AA 44 52 24 3A 51 55 25 |:.15,"V".DR$:QU%|
00002A00: B2 AB 31 00 0C 32 24 0E 89 36 38 30 00 2B 32 2E |..1..2$..680.+2.|
00002A10: 0E 8F 20 2A 2A 2A 20 57 45 4C 43 48 45 20 20 46 |.. *** WELCHE F|
00002A20: 4C 4F 50 50 59 20 3F 20 2A 2A 2A 00 31 32 38 0E |LOPPY ? ***.128.|
00002A30: 3A 00 42 32 42 0E 8F 20 44 45 4C 45 54 45 20 5B |:.B2B.. DELETE [|
00002A40: 22 5D 00 60 32 4C 0E 58 25 B2 B9 28 49 29 3A 99 |"].`2L.X%..(I):.|
00002A50: C7 28 33 34 29 3B 3A 97 32 31 31 2C 58 25 3A 8E |.(34);:.211,X%:.|
00002A60: 00 A1 32 56 0E 81 49 B2 30 A4 4E 30 25 AB 31 3A |..2V..I.0.N0%.1:|
00002A70: 99 22 20 20 22 42 4C 25 28 49 29 A3 39 AA 54 42 |." "BL%(I).9.TB|
00002A80: 29 4E 41 24 28 49 29 A3 32 36 AA 54 42 29 46 54 |)NA$(I).26.TB)FT|
00002A90: 24 28 49 29 22 20 22 20 42 4E 25 28 49 2C 30 29 |$(I)" " BN%(I,0)|
00002AA0: 3B 00 B9 32 60 0E 99 A3 33 34 AA 54 42 29 22 2C |;..2`...34.TB)",|
00002AB0: 22 42 4E 25 28 49 2C 31 29 00 D0 32 6A 0E A1 54 |"BN%(I,1)..2j..T|
00002AC0: 41 24 3A 8B 54 41 24 B2 22 20 22 A7 8D 36 38 30 |A$:.TA$." "..680|
00002AD0: 00 04 33 74 0E 8B C2 28 32 31 34 29 B1 32 32 A7 |..3t...(214).22.|
00002AE0: 99 22 11 22 2C 22 20 20 20 20 20 20 12 54 41 53 |."."," .TAS|
00002AF0: 54 45 20 42 49 54 54 45 22 3B 3A 8D 36 38 30 3A |TE BITTE";:.680:|
00002B00: 8D 31 37 30 00 0C 33 7E 0E 82 3A 8E 00 2F 33 88 |.170..3~..:../3.|
00002B10: 0E 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..**************|
00002B20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00002B30: 52 33 92 0E 8F 2A 2A 2A 20 44 49 53 4B 20 53 54 |R3...*** DISK ST|
00002B40: 41 54 55 53 20 42 41 53 49 43 20 33 2E 30 20 2A |ATUS BASIC 3.0 *|
00002B50: 2A 2A 00 75 33 9C 0E 8F 2A 2A 2A 2A 2A 2A 2A 2A |**.u3...********|
00002B60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002B70: 2A 2A 2A 2A 2A 00 7B 33 A6 0E 8F 00 9D 33 B0 0E |*****.{3.....3..|
00002B80: 8F 20 3E 3E 3E 20 46 55 45 52 20 4C 4F 54 48 41 |. >>> FUER LOTHA|
00002B90: 52 20 48 4F 46 4D 41 4E 4E 20 3C 3C 3C 00 A3 33 |R HOFMANN <<<..3|
00002BA0: BA 0E 3A 00 BB 33 C4 0E 84 31 35 2C 45 25 2C 45 |..:..3...15,E%,E|
00002BB0: 24 2C 45 31 25 2C 45 32 25 3A 8E 00 DC 33 CE 0E |$,E1%,E2%:...3..|
00002BC0: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
00002BD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 FD 33 D8 |************..3.|
00002BE0: 0E 8F 2A 2A 2A 20 41 45 4E 44 45 52 55 4E 47 20 |..*** AENDERUNG |
00002BF0: 50 52 47 2E 53 54 41 52 54 20 2A 2A 2A 00 1E 34 |PRG.START ***..4|
00002C00: E2 0E 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...*************|
00002C10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 43 |**************.C|
00002C20: 34 EC 0E 4B 4F 24 B2 22 4E 45 55 45 20 53 54 41 |4..KO$."NEUE STA|
00002C30: 52 54 41 44 52 45 53 53 45 20 45 49 4E 47 45 42 |RTADRESSE EINGEB|
00002C40: 45 4E 22 00 5F 34 F6 0E 8D 31 37 30 3A 8D 37 32 |EN"._4...170:.72|
00002C50: 30 3A 8F 20 46 52 41 47 45 20 44 52 49 56 45 00 |0:. FRAGE DRIVE.|
00002C60: 72 34 00 0F 54 59 24 B2 22 50 22 3A 51 55 25 B2 |r4..TY$."P":QU%.|
00002C70: AB 31 00 A1 34 0A 0F 99 22 11 11 50 52 4F 47 52 |.1..4..."..PROGR|
00002C80: 41 4D 4D 20 4E 41 4D 45 20 3F 20 22 3B 3A 84 31 |AMM NAME ? ";:.1|
00002C90: 2C 46 49 24 3A 5A 25 B2 AB 31 3A 99 3A 8D 33 32 |,FI$:Z%..1:.:.32|
00002CA0: 30 00 B0 34 14 0F 8B 5A 25 B2 30 A7 33 38 38 30 |0..4...Z%.0.3880|
00002CB0: 00 F2 34 1E 0F 5A 25 B2 30 3A 99 22 11 11 50 52 |..4..Z%.0:."..PR|
00002CC0: 4F 47 52 41 4D 4D 20 22 C7 28 33 34 29 46 49 24 |OGRAMM ".(34)FI$|
00002CD0: C7 28 33 34 29 22 20 49 53 54 20 4E 49 43 48 54 |.(34)" IST NICHT|
00002CE0: 20 56 4F 52 48 41 4E 44 45 4E 21 22 3A 89 20 36 | VORHANDEN!":. 6|
00002CF0: 38 30 00 0D 35 28 0F 99 22 91 91 91 91 22 A3 31 |80..5(.."....".1|
00002D00: 36 AA 54 42 29 22 12 22 48 24 22 11 11 00 27 35 |6.TB)"."H$"...'5|
00002D10: 32 0F 46 49 24 B2 48 24 3A 8D 32 38 30 3A 8D 31 |2.FI$.H$:.280:.1|
00002D20: 34 30 3A 8D 31 34 30 00 49 35 3C 0F 8D 31 34 30 |40:.140.I5<..140|
00002D30: 3A 58 25 B2 42 59 25 3A 8D 31 34 30 3A 58 B2 58 |:X%.BY%:.140:X.X|
00002D40: 25 AA 32 35 36 AC 42 59 25 00 70 35 46 0F 8D 20 |%.256.BY%.p5F.. |
00002D50: 34 30 35 30 3A 99 22 53 54 41 52 54 41 44 52 45 |4050:."STARTADRE|
00002D60: 53 53 45 20 49 53 54 20 48 45 58 20 22 42 59 24 |SSE IST HEX "BY$|
00002D70: 00 8E 35 50 0F 99 22 20 20 20 20 20 20 20 20 20 |..5P.." |
00002D80: 20 20 20 20 20 44 45 5A 49 4D 41 4C 22 58 00 A5 | DEZIMAL"X..|
00002D90: 35 5A 0F 97 36 33 31 2C C6 28 22 1D 22 29 3A 97 |5Z..631,.("."):.|
00002DA0: 31 39 38 2C 31 00 CE 35 64 0F 99 22 11 11 4E 45 |198,1..5d.."..NE|
00002DB0: 55 45 20 53 54 41 52 54 41 44 52 45 53 53 45 20 |UE STARTADRESSE |
00002DC0: 3F 20 22 42 59 24 22 9D 9D 9D 9D 9D 22 3B 00 FA |? "BY$".....";..|
00002DD0: 35 6E 0F 84 31 2C 42 59 24 3A 99 3A 8B C8 28 42 |5n..1,BY$:.:..(B|
00002DE0: 59 24 2C 31 29 B2 22 40 22 A7 A0 38 3A 99 22 11 |Y$,1)."@"..8:.".|
00002DF0: 11 4F 4B 2E 22 3A 89 37 36 30 00 1C 36 78 0F 8B |.OK.":.760..6x..|
00002E00: C8 28 42 59 24 2C 31 29 B3 B1 22 24 22 A7 58 B2 |.(BY$,1).."$".X.|
00002E10: C5 28 42 59 24 29 3A 89 34 30 31 30 00 41 36 82 |.(BY$):.4010.A6.|
00002E20: 0F 42 59 24 B2 CA 28 42 59 24 2C 32 29 3A 42 59 |.BY$..(BY$,2):BY|
00002E30: 24 B2 C9 28 22 30 30 30 30 22 AA 42 59 24 2C 34 |$..("0000".BY$,4|
00002E40: 29 00 64 36 8C 0F 58 B2 30 3A 81 49 B2 31 A4 34 |).d6..X.0:.I.1.4|
00002E50: 3A 58 25 B2 C6 28 CA 28 42 59 24 2C 49 2C 31 29 |:X%..(.(BY$,I,1)|
00002E60: 29 AB 34 38 00 77 36 96 0F 8B 58 25 B1 31 30 A7 |).48.w6...X%.10.|
00002E70: 58 25 B2 58 25 AB 37 00 8D 36 A0 0F 58 B2 58 AA |X%.X%.7..6..X.X.|
00002E80: 58 25 AC 31 36 AE 28 34 AB 49 29 3A 82 00 A8 36 |X%.16.(4.I):...6|
00002E90: AA 0F 42 59 25 B2 58 AD 32 35 36 3A 58 25 B2 58 |..BY%.X.256:X%.X|
00002EA0: AB 32 35 36 AC 42 59 25 00 B7 36 B4 0F 42 55 25 |.256.BY%..6..BU%|
00002EB0: B2 32 3A 8D 38 30 30 00 ED 36 BE 0F 98 38 2C C7 |.2:.800..6...8,.|
00002EC0: 28 58 25 29 C7 28 42 59 25 29 3B 3A 98 31 35 2C |(X%).(BY%);:.15,|
00002ED0: 22 55 32 3A 38 22 44 52 25 2C 54 52 25 2C 53 43 |"U2:8"DR%,TR%,SC|
00002EE0: 25 3A 98 31 35 2C 22 49 22 AA 44 52 24 00 F6 36 |%:.15,"I".DR$..6|
00002EF0: C8 0F A0 38 3A 8E 00 1E 37 D2 0F 45 31 25 B2 42 |...8:...7..E1%.B|
00002F00: 59 25 AD 31 36 3A 45 32 25 B2 42 59 25 AF 31 35 |Y%.16:E2%.BY%.15|
00002F10: 3A 42 59 24 B2 22 24 22 3A 8D 34 30 37 30 00 36 |:BY$."$":.4070.6|
00002F20: 37 DC 0F 45 31 25 B2 58 25 AD 31 36 3A 45 32 25 |7..E1%.X%.16:E2%|
00002F30: B2 58 25 AF 31 35 00 60 37 E6 0F 42 59 24 B2 42 |.X%.15.`7..BY$.B|
00002F40: 59 24 AA CA 28 48 5A 24 2C 45 31 25 AA 31 2C 31 |Y$..(HZ$,E1%.1,1|
00002F50: 29 AA CA 28 48 5A 24 2C 45 32 25 AA 31 2C 31 29 |)..(HZ$,E2%.1,1)|
00002F60: 00 66 37 F0 0F 8E 00 89 37 FA 0F 8F 2A 2A 2A 2A |.f7.....7...****|
00002F70: 20 49 4E 49 54 49 41 4C 49 53 49 45 52 55 4E 47 | INITIALISIERUNG|
00002F80: 20 44 45 52 20 2A 2A 2A 2A 00 AC 37 04 10 8F 2A | DER ****..7...*|
00002F90: 2A 2A 2A 20 53 4B 41 4C 41 52 45 4E 20 20 56 41 |*** SKALAREN VA|
00002FA0: 52 49 41 42 4C 45 4E 20 2A 2A 2A 2A 00 B2 37 0E |RIABLEN ****..7.|
00002FB0: 10 3A 00 D5 37 18 10 8F 2A 2A 2A 2A 20 20 20 46 |.:..7...**** F|
00002FC0: 4C 4F 41 54 49 4E 47 20 50 4F 49 4E 54 20 20 20 |LOATING POINT |
00002FD0: 20 2A 2A 2A 2A 00 DB 37 22 10 3A 00 F3 37 2C 10 | ****..7".:..7,.|
00002FE0: 49 B2 30 20 20 20 20 20 20 3A 8F 20 5A 41 45 48 |I.0 :. ZAEH|
00002FF0: 4C 45 52 00 0B 38 36 10 4A B2 30 20 20 20 20 20 |LER..86.J.0 |
00003000: 20 3A 8F 20 5A 41 45 48 4C 45 52 00 23 38 40 10 | :. ZAEHLER.#8@.|
00003010: 4B B2 30 20 20 20 20 20 20 3A 8F 20 5A 41 45 48 |K.0 :. ZAEH|
00003020: 4C 45 52 00 3B 38 4A 10 42 B2 30 20 20 20 20 20 |LER.;8J.B.0 |
00003030: 20 3A 8F 20 5A 41 45 48 4C 45 52 00 5D 38 54 10 | :. ZAEHLER.]8T.|
00003040: 41 B2 30 20 20 20 20 20 20 3A 8F 20 41 44 52 45 |A.0 :. ADRE|
00003050: 53 53 45 20 28 30 2D 36 35 35 33 35 29 00 7F 38 |SSE (0-65535)..8|
00003060: 5E 10 58 B2 30 20 20 20 20 20 20 3A 8F 20 41 44 |^.X.0 :. AD|
00003070: 52 45 53 53 45 20 28 30 2D 36 35 35 33 35 29 00 |RESSE (0-65535).|
00003080: A1 38 68 10 50 B2 30 20 20 20 20 20 20 3A 8F 20 |.8h.P.0 :. |
00003090: 46 4F 52 4D 41 54 20 56 41 52 2E 20 28 54 41 42 |FORMAT VAR. (TAB|
000030A0: 29 00 A7 38 72 10 3A 00 CA 38 7C 10 8F 2A 2A 2A |)..8r.:..8|..***|
000030B0: 2A 20 20 20 20 20 49 4E 54 45 47 45 52 20 20 20 |* INTEGER |
000030C0: 20 20 20 20 20 20 2A 2A 2A 2A 00 D0 38 86 10 3A | ****..8..:|
000030D0: 00 EE 38 90 10 53 43 25 B2 30 20 20 20 20 3A 8F |..8..SC%.0 :.|
000030E0: 20 53 45 4B 54 4F 52 20 28 30 2D 32 30 29 00 0C | SEKTOR (0-20)..|
000030F0: 39 9A 10 54 52 25 B2 31 38 20 20 20 3A 8F 20 53 |9..TR%.18 :. S|
00003100: 50 55 52 20 20 20 28 31 2D 33 35 29 00 28 39 A4 |PUR (1-35).(9.|
00003110: 10 41 53 25 B2 30 20 20 20 20 3A 8F 20 56 41 4C |.AS%.0 :. VAL|
00003120: 20 28 54 41 53 54 45 29 00 43 39 AE 10 44 52 25 | (TASTE).C9..DR%|
00003130: B2 30 20 20 20 20 3A 8F 20 4C 41 55 46 57 45 52 |.0 :. LAUFWER|
00003140: 4B 20 23 00 63 39 B8 10 4C 52 25 B2 30 20 20 20 |K #.c9..LR%.0 |
00003150: 20 3A 8F 20 43 41 54 2E 20 4C 41 55 46 57 45 52 | :. CAT. LAUFWER|
00003160: 4B 20 23 00 84 39 C2 10 4D 44 25 B2 31 20 20 20 |K #..9..MD%.1 |
00003170: 20 3A 8F 20 41 4E 5A 41 48 4C 20 4C 41 55 46 57 | :. ANZAHL LAUFW|
00003180: 45 52 4B 45 00 A5 39 CC 10 4D 4B 25 B2 30 20 20 |ERKE..9..MK%.0 |
00003190: 20 20 3A 8F 20 44 49 53 4B 2D 53 54 41 54 55 53 | :. DISK-STATUS|
000031A0: 20 56 41 52 2E 00 C8 39 D6 10 50 4C 25 B2 30 20 | VAR...9..PL%.0 |
000031B0: 20 20 20 3A 8F 20 5A 41 48 4C 20 44 45 52 20 57 | :. ZAHL DER W|
000031C0: 4F 52 4B 46 49 4C 45 53 00 E9 39 E0 10 51 55 25 |ORKFILES..9..QU%|
000031D0: B2 AB 31 20 20 20 3A 8F 20 46 4C 41 47 20 43 41 |..1 :. FLAG CA|
000031E0: 54 20 47 55 45 4C 54 49 47 00 0A 3A EA 10 42 55 |T GUELTIG..:..BU|
000031F0: 25 B2 30 20 20 20 20 3A 8F 20 42 55 46 46 45 52 |%.0 :. BUFFER|
00003200: 20 50 4E 54 2E 20 56 41 52 2E 00 2D 3A F4 10 4E | PNT. VAR..-:..N|
00003210: 30 25 B2 30 20 20 20 20 3A 8F 20 5A 41 48 4C 20 |0%.0 :. ZAHL |
00003220: 43 41 54 41 4C 4F 47 20 46 49 4C 45 53 00 4D 3A |CATALOG FILES.M:|
00003230: FE 10 46 49 25 B2 30 20 20 20 20 3A 8F 20 46 49 |..FI%.0 :. FI|
00003240: 4C 45 53 20 50 52 4F 20 42 4C 4F 43 4B 00 6B 3A |LES PRO BLOCK.k:|
00003250: 08 11 42 59 25 B2 30 20 20 20 20 3A 8F 20 41 53 |..BY%.0 :. AS|
00003260: 43 20 28 47 45 54 42 59 54 45 29 00 8E 3A 12 11 |C (GETBYTE)..:..|
00003270: 42 31 25 B2 30 20 20 20 20 3A 8F 20 46 49 4C 45 |B1%.0 :. FILE|
00003280: 54 59 50 20 49 4E 20 43 41 54 41 4C 4F 47 00 B0 |TYP IN CATALOG..|
00003290: 3A 1C 11 45 52 25 B2 30 20 20 20 20 3A 8F 20 47 |:..ER%.0 :. G|
000032A0: 45 53 41 4D 54 46 45 48 4C 45 52 20 5A 41 48 4C |ESAMTFEHLER ZAHL|
000032B0: 00 CC 3A 26 11 43 25 20 B2 30 20 20 20 20 3A 8F |..:&.C% .0 :.|
000032C0: 20 41 53 43 20 28 48 45 58 20 24 29 00 EC 3A 30 | ASC (HEX $)..:0|
000032D0: 11 58 25 20 B2 30 20 20 20 20 3A 8F 20 43 55 52 |.X% .0 :. CUR|
000032E0: 53 4F 52 20 50 4F 53 49 54 49 4F 4E 00 0E 3B 3A |SOR POSITION..;:|
000032F0: 11 51 25 20 B2 30 20 20 20 20 3A 8F 20 46 4C 41 |.Q% .0 :. FLA|
00003300: 47 20 43 4F 50 59 2F 53 43 52 41 54 43 48 00 30 |G COPY/SCRATCH.0|
00003310: 3B 44 11 45 42 25 B2 30 20 20 20 20 3A 8F 20 46 |;D.EB%.0 :. F|
00003320: 45 48 4C 45 52 20 28 4B 45 49 4E 20 48 44 2E 29 |EHLER (KEIN HD.)|
00003330: 00 51 3B 4E 11 45 53 25 B2 30 20 20 20 20 3A 8F |.Q;N.ES%.0 :.|
00003340: 20 46 45 48 4C 45 52 20 28 53 59 4E 43 52 4F 4E | FEHLER (SYNCRON|
00003350: 29 00 68 3B 58 11 45 43 25 B2 30 20 20 20 20 3A |).h;X.EC%.0 :|
00003360: 8F 20 46 45 48 4C 45 52 00 7F 3B 62 11 44 43 25 |. FEHLER..;b.DC%|
00003370: B2 30 20 20 20 20 3A 8F 20 46 45 48 4C 45 52 00 |.0 :. FEHLER.|
00003380: 9F 3B 6C 11 48 44 25 B2 30 20 20 20 20 3A 8F 20 |.;l.HD%.0 :. |
00003390: 46 45 48 4C 45 52 20 28 48 45 41 44 45 52 29 00 |FEHLER (HEADER).|
000033A0: C2 3B 76 11 45 58 25 B2 30 20 20 20 20 3A 8F 20 |.;v.EX%.0 :. |
000033B0: 46 45 48 4C 45 52 20 28 4C 4F 4E 47 20 42 4C 4B |FEHLER (LONG BLK|
000033C0: 2E 29 00 DF 3B 80 11 46 52 25 B2 30 20 20 20 20 |.)..;..FR%.0 |
000033D0: 3A 8F 20 46 52 45 49 45 20 42 4C 4F 43 4B 53 00 |:. FREIE BLOCKS.|
000033E0: FE 3B 8A 11 42 45 25 B2 30 20 20 20 20 3A 8F 20 |.;..BE%.0 :. |
000033F0: 42 45 4C 45 47 54 45 20 42 4C 4F 43 4B 53 00 1B |BELEGTE BLOCKS..|
00003400: 3C 94 11 41 4E 25 B2 31 20 20 20 20 3A 8F 20 56 |<..AN%.1 :. V|
00003410: 4F 4E 20 53 50 55 52 20 2E 2E 2E 00 38 3C 9E 11 |ON SPUR ....8<..|
00003420: 45 4E 25 B2 33 35 20 20 20 3A 8F 20 2E 2E 2E 20 |EN%.35 :. ... |
00003430: 42 49 53 20 53 50 55 52 00 5B 3C A8 11 4A 4A 25 |BIS SPUR.[<..JJ%|
00003440: B2 32 30 20 20 20 3A 8F 20 4D 41 58 2E 20 53 45 |.20 :. MAX. SE|
00003450: 4B 54 4F 52 45 4E 2F 53 50 55 52 00 7E 3C B2 11 |KTOREN/SPUR.~<..|
00003460: 52 45 25 B2 30 20 20 20 20 3A 8F 20 46 4C 41 47 |RE%.0 :. FLAG|
00003470: 20 28 46 49 4C 45 20 52 45 54 54 45 4E 29 00 A1 | (FILE RETTEN)..|
00003480: 3C BC 11 45 25 20 B2 30 20 20 20 20 3A 8F 20 44 |<..E% .0 :. D|
00003490: 49 53 4B 20 46 45 48 4C 45 52 20 28 43 4F 44 45 |ISK FEHLER (CODE|
000034A0: 29 00 C4 3C C6 11 45 24 20 B2 22 22 20 20 20 3A |)..<..E$ ."" :|
000034B0: 8F 20 44 49 53 4B 20 46 45 48 4C 45 52 20 28 54 |. DISK FEHLER (T|
000034C0: 45 58 54 29 00 E7 3C D0 11 45 31 25 B2 30 20 20 |EXT)..<..E1%.0 |
000034D0: 20 20 3A 8F 20 44 49 53 4B 20 46 45 48 4C 45 52 | :. DISK FEHLER|
000034E0: 20 28 53 50 55 52 29 00 0A 3D DA 11 45 32 25 B2 | (SPUR)..=..E2%.|
000034F0: 30 20 20 20 20 3A 8F 20 44 49 53 4B 20 46 45 48 |0 :. DISK FEH|
00003500: 4C 45 52 20 28 53 4B 54 2E 29 00 2A 3D E4 11 41 |LER (SKT.).*=..A|
00003510: 46 25 B2 30 20 20 20 20 3A 8F 20 46 4C 41 47 20 |F%.0 :. FLAG |
00003520: 43 4F 50 59 20 41 4C 50 48 41 00 30 3D EE 11 3A |COPY ALPHA.0=..:|
00003530: 00 51 3D F8 11 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.Q=...**********|
00003540: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003550: 2A 00 72 3D 02 12 8F 2A 2A 2A 2A 3E 3E 3E 3E 3E |*.r=...****>>>>>|
00003560: 3E 46 45 4C 44 45 52 3C 3C 3C 3C 3C 3C 2A 2A 2A |>FELDER<<<<<<***|
00003570: 2A 2A 00 93 3D 0C 12 8F 2A 2A 2A 2A 2A 2A 2A 2A |**..=...********|
00003580: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003590: 2A 2A 2A 00 99 3D 16 12 3A 00 B8 3D 20 12 86 20 |***..=..:..= .. |
000035A0: 4E 41 24 28 31 35 30 29 20 20 20 3A 8F 20 46 49 |NA$(150) :. FI|
000035B0: 4C 45 20 4E 41 4D 45 4E 00 D7 3D 2A 12 86 20 43 |LE NAMEN..=*.. C|
000035C0: 50 24 28 31 35 30 29 20 20 20 3A 8F 20 57 4F 52 |P$(150) :. WOR|
000035D0: 4B 20 4E 41 4D 45 4E 00 F4 3D 34 12 86 20 46 54 |K NAMEN..=4.. FT|
000035E0: 24 28 31 35 30 29 20 20 20 3A 8F 20 46 49 4C 45 |$(150) :. FILE|
000035F0: 20 54 59 50 00 14 3E 3E 12 86 20 54 59 24 28 20 | TYP..>>.. TY$( |
00003600: 34 20 29 20 20 20 3A 8F 20 54 59 50 45 4E 20 4E |4 ) :. TYPEN N|
00003610: 41 4D 45 4E 00 1A 3E 48 12 3A 00 3A 3E 52 12 86 |AMEN..>H.:.:>R..|
00003620: 20 42 4C 25 28 31 35 30 29 20 20 20 3A 8F 20 46 | BL%(150) :. F|
00003630: 49 4C 45 20 4C 41 45 4E 47 45 00 5A 3E 5C 12 86 |ILE LAENGE.Z>\..|
00003640: 20 45 52 25 28 31 35 30 29 20 20 20 3A 8F 20 43 | ER%(150) :. C|
00003650: 4F 50 59 20 46 45 48 4C 45 52 00 7A 3E 66 12 86 |OPY FEHLER.z>f..|
00003660: 20 42 4E 25 28 31 35 30 2C 31 29 20 3A 8F 20 46 | BN%(150,1) :. F|
00003670: 49 4C 45 20 42 45 47 49 4E 4E 00 9C 3E 70 12 86 |ILE BEGINN..>p..|
00003680: 20 42 44 25 28 20 31 20 29 20 20 20 3A 8F 20 4E | BD%( 1 ) :. N|
00003690: 41 45 43 48 53 54 45 52 20 42 4C 4B 00 A2 3E 7A |AECHSTER BLK..>z|
000036A0: 12 8E 00 C7 3E 84 12 8F 20 2A 2A 2A 2A 20 41 4C |....>... **** AL|
000036B0: 50 48 41 20 53 4F 52 54 20 26 20 43 4F 50 59 20 |PHA SORT & COPY |
000036C0: 41 4C 4C 20 2A 2A 2A 00 ED 3E 8E 12 8F 20 2A 2A |ALL ***..>... **|
000036D0: 2A 20 50 52 49 4E 54 20 43 55 52 52 45 4E 54 20 |* PRINT CURRENT |
000036E0: 43 4F 50 59 20 54 59 50 45 20 2A 2A 2A 00 05 3F |COPY TYPE ***..?|
000036F0: 98 12 8B 42 B2 31 A7 99 22 50 52 4F 47 52 41 4D |...B.1.."PROGRAM|
00003700: 4D 45 22 3A 8E 00 20 3F A2 12 8B 42 B2 32 A7 99 |ME":.. ?...B.2..|
00003710: 22 53 45 51 55 45 4E 54 49 45 4C 4C 45 4E 22 3B |"SEQUENTIELLEN";|
00003720: 00 37 3F AC 12 8B 42 B2 33 A7 99 22 52 45 4C 41 |.7?...B.3.."RELA|
00003730: 54 49 56 45 4E 22 3B 00 49 3F B6 12 8B 42 B2 34 |TIVEN";.I?...B.4|
00003740: A7 99 22 55 53 45 52 22 3B 00 5C 3F C0 12 99 22 |.."USER";.\?..."|
00003750: 20 44 41 54 45 49 45 4E 2E 22 3A 8E 00 77 3F CA | DATEIEN.":..w?.|
00003760: 12 8F 20 2A 2A 2A 20 54 45 58 54 20 41 55 53 47 |.. *** TEXT AUSG|
00003770: 41 42 45 20 2A 2A 2A 00 A3 3F D4 12 99 22 11 12 |ABE ***..?..."..|
00003780: 41 43 48 54 55 4E 47 92 21 20 4C 45 47 45 4E 20 |ACHTUNG.! LEGEN |
00003790: 53 49 45 20 49 4E 20 44 52 49 56 45 20 31 20 45 |SIE IN DRIVE 1 E|
000037A0: 49 4E 45 00 D0 3F DE 12 99 22 11 4C 45 45 52 45 |INE..?...".LEERE|
000037B0: 20 4F 44 45 52 20 55 4E 42 45 4E 55 54 5A 54 45 | ODER UNBENUTZTE|
000037C0: 20 44 49 53 4B 20 45 49 4E 2E 20 44 52 49 56 45 | DISK EIN. DRIVE|
000037D0: 00 EB 3F E8 12 99 22 11 31 20 57 49 52 44 20 46 |..?...".1 WIRD F|
000037E0: 4F 52 4D 41 54 49 45 52 54 20 21 00 19 40 F2 12 |ORMATIERT !..@..|
000037F0: 99 22 11 11 46 41 4C 4C 53 20 49 4E 20 44 52 49 |."..FALLS IN DRI|
00003800: 56 45 20 30 20 4B 45 49 4E 20 4D 45 4E 55 45 20 |VE 0 KEIN MENUE |
00003810: 56 4F 52 48 41 4E 44 45 4E 00 49 40 FC 12 99 22 |VORHANDEN.I@..."|
00003820: 11 49 53 54 2C 20 4C 45 47 45 4E 20 53 49 45 20 |.IST, LEGEN SIE |
00003830: 42 49 54 54 45 20 41 55 43 48 20 44 49 45 53 45 |BITTE AUCH DIESE|
00003840: 53 20 42 45 52 45 49 54 2E 00 77 40 06 13 99 22 |S BEREIT..w@..."|
00003850: 11 11 11 44 52 55 45 43 4B 45 4E 20 53 49 45 20 |...DRUECKEN SIE |
00003860: 28 12 4A 92 29 20 46 55 45 52 20 57 45 49 54 45 |(.J.) FUER WEITE|
00003870: 52 2C 20 4A 45 44 45 00 AE 40 10 13 99 22 11 41 |R, JEDE..@...".A|
00003880: 4E 44 45 52 45 20 54 41 53 54 45 20 46 55 45 48 |NDERE TASTE FUEH|
00003890: 52 54 20 5A 55 4D 20 41 42 42 52 55 43 48 20 21 |RT ZUM ABBRUCH !|
000038A0: 28 D6 29 9D 9D 22 3B 3A 97 32 30 34 2C 30 00 DF |(.)..";:.204,0..|
000038B0: 40 1A 13 8D 36 38 30 3A 97 32 30 34 2C 31 3A 99 |@...680:.204,1:.|
000038C0: 22 9D 20 22 3B 3A 8B 54 41 24 B3 B1 22 4A 22 A7 |". ";:.TA$.."J".|
000038D0: 99 22 12 45 4E 44 45 92 22 3B 3A 89 37 36 30 00 |.".ENDE.";:.760.|
000038E0: EA 40 24 13 89 36 33 39 39 39 00 FD 40 28 23 8F |.@$..63999..@(#.|
000038F0: 20 2A 2A 2A 20 41 44 52 2E 20 2A 2A 2A 00 30 41 | *** ADR. ***.0A|
00003900: 32 23 48 55 24 B2 22 12 20 20 20 20 20 20 20 20 |2#HU$.". |
00003910: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003920: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00003930: 00 7B 41 3C 23 48 55 24 B2 48 55 24 AA 22 41 4E |.{A<#HU$.HU$."AN|
00003940: 44 52 45 41 53 20 20 4E 4F 52 4D 41 4E 20 20 44 |DREAS NORMAN D|
00003950: 4F 52 46 53 54 52 2E 31 33 34 20 28 33 30 36 31 |ORFSTR.134 (3061|
00003960: 29 20 48 45 53 50 45 20 20 54 45 4C 2E 20 30 35 |) HESPE TEL. 05|
00003970: 37 32 31 2F 33 32 34 30 20 20 22 00 98 41 46 23 |721/3240 "..AF#|
00003980: 81 4B 41 B2 31 A4 C3 28 48 55 24 29 3A 81 4D 49 |.KA.1..(HU$):.MI|
00003990: B2 31 A4 31 35 30 3A 82 00 A1 41 4B 23 A1 54 41 |.1.150:...AK#.TA|
000039A0: 24 00 B2 41 4C 23 8B 54 41 24 B3 B1 22 22 A7 36 |$..AL#.TA$.."".6|
000039B0: 39 30 00 D1 41 50 23 99 22 13 11 1D 1D 1D 1D 1D |90..AP#.".......|
000039C0: 1D 1D 22 3B CA 28 48 55 24 2C 4B 41 2C 32 36 29 |..";.(HU$,KA,26)|
000039D0: 3B 00 E9 41 5A 23 82 3A 81 4D 49 B2 31 A4 35 30 |;..AZ#.:.MI.1.50|
000039E0: 30 3A 82 3A 89 39 30 30 30 00 00 00 00 20 29 04 |0:.:.9000.... ).|
000039F0: 00 49 60 41 46 00 68 FF EA FF 00 3F 08 79 FF |.I`AF.h....?.y. |
.......53281,9:.53280,9:.".".D.D..G(142)
:H3$."DISK UTILITY PROGRAMM V 64":H4$.".
...................".}.N.H5$." 'Q' FUER
ENDE"...X.. 820:. INITIALISIERUNG......
**** ASCII EINLESEN ***.U....#8,BY$:BY%.
F(BY$.G(0)):......."..............":.K.1
4.23:.SP$:.... .."..............":......
.".".N....".."ST$".":P.57.5.(C(H1$).2):.
P...(P).P.P..5.G....".."H(ST$,P.38)H1$;.
..H..H(ST$,78.C(H1$).P.1);".";...R.."...
."ST$".";:P.57.5.(C(KO$).2):.P...(P).P.P
..5......".";H(ST$,P.38)KO$;:.H(ST$,78.C
(KO$).P);......"...."ST$".":..!....*** B
LOCK LESEN (MIT OPEN) ***.@....15,"I".DR
$:MK%.DS:.MK%. ..Q....8,8,8,"#":..J....*
** BLOCK LESEN ***......15,"U1:"8;DR%;TR
%;SC%...".....,.:...6.. **** DIRECTORY *
***...@.. 540:.MK%.....J..(QU%.0).(ID$.D
I$).(DR%.LR%).(ZY$.TY$). 8:....T.."..CAT
ALOG EINLESEN".G.^.QU%.0:DI$.ID$:LR%.DR%
:N0%.0:BU%.0:FI%.0:TR%.18:SC%.1:ZY$.TY$.
^.H.. 280:. BLOCK-READ...R..I.0.1:.#8,BY
$:BD%(I).F(BY$.G(0)):.:BU%.2:. 800...|..
140:B1%.(BY% . 7)......B1%.0.RE%.0.490.
P....B1%.RE%.490......TY$.."A"..F(TY$(B1
%))..F(TY$).490.....H$."":.I.0.1:. 140:B
N%(N0%,I).BY%:..K....I.3.18:.#8,BY$:.BY$
..G(160). H$.H$.BY$.Z....:.Z%.2380.W.B..
I.19.27:.#8,BY$:.:. 140...L.BL%.BY%:. 14
0:BL%.BL%.256.BY%.R.V.BL%(N0%).BL%:NA$(N
0%).H$:FT$(N0%).TY$(B1%):N0%.N0%.1......
".".25.TB)N0%.....FI%.FI%.1:.FI%.8.BU%.F
I%.32.2:. 800:. 380.%....BD%(0).0.520.J.
..TR%.BD%(0):SC%.BD%(1):FI%.0:.360.Q...
8.W.....M.... *** GET ID$ ***...&.. 250:
. OPEN FILE...0.. MK% . . :. SICHER.....
.:.TR%.18:SC%.0:.280.M.D.BU%.162:ID$."":
. 800...N..I.1.5:.140:ID$.ID$.BY$:....X.
....B.. *** GET NAME + ID ***...L..550:
.MK%...6.V.BU%.144:NA$."":.800.]....I.1.
16:.140:.BY%..160.NA$.NA$.BY$.E....:..K.
..:...... *** GET EINE TASTE ***......90
00.....AS%.E(TA$):......:.I.F.. *** ERFR
AGE DRIVE NR. ***...P.DR%.0:TA$."0":.730
...Z.DR$.TA$:......:...... *** VERZOEGER
UNG ***.&....AF%.0..I.1.2500:..,.....2..
.:.U....*** BUFFER POINTER SETZEN ***.K.
..15,"B-P:"8;BU%:....*.. **** DAUER FI
LES OEFFNEN ****...4.:...>.. 15,8,15:. D
ISK ERROR KANAL.P.H.. 01,0,00:. TASTATUR
...R.SP$."
".4.\.FO$.". .
.".E.F.ST$."..........
............................"...P.FM$."
*":.B8.ST$.H(ST$.ST$.ST$,78)...Z.H1$."IN
ITIALISIERUNG VON DUP 64".....NA$."":NB
$."":ID$."":DI$."":TA$."":TY$."":BY$."":
H$."".....KO$.H4$:.170:.4090:.760.$...HZ
$."0123456789ABCDEF".9....I.1.4:.TY$(I):
..?...:.B.... **** HAUPT - MENUE **
**.H...:.|.J.KO$.H5$:H1$.H3$...T..170:X.
.(0):. GARBAGE.......8.TB)".1) SCRATCHEN
VON FILES".......8.TB)".2) FORMATIEREN
VON DISKS.......8.TB)".3) FILE LISTEN.".
....8.TB)".4) DISK NAME/ID AENDERN.G....
.8.TB)".5) TESTLESEN EINER DISK.J.....8.
TB)".6) DIRECTORY ANZEIGE.......8.TB)".
7) FILE RETTEN (UNSCRATCH)...$...8.TB)".
8) STARTADRESSE AENDERN";.P....670:.TA$.
"Q".1120...8..AS%.0.1070...B.. *** VERTE
ILER ***...L..AS%.1380,1160,2430,2750,30
00,2280,3480,3800:.970.I.V.. : . DUMMY S
UBROUTINE.R.`..170.Z.J..15,"U:":.:."....
....":.:. DUP ENDE...T.:...~.. *** FORMA
TIEREN ***.....KO$."DISK FORMATIER ROUTI
NE":.170...... 720:. ZEILENNUMMER LESEN.
..... 620: 8:. DISK ID & NAME......MK%.1
240:. ?BAD DISK.Y...D$."":.".DISK ID ="I
D$:.".SOLL DER ID BEIBEHALTEN WERDEN ? "
;......1,TA$:.:.H(TA$,1)."J".ID$."":.124
0...D..H(TA$,1).."N"..".";:.211,33:.1210
...N.D$.",".ID$...X..".DISK NAME , ID ?
";:FE%.B(211):.NA$","ID$;......211,FE%:
.1,NA$,ID$:.:.H(NA$,1)."*".NA$."". ..6..
.. ^^^ ABBRUCH ^^^ !!!.F...QU%..1:CC$."N
:".NA$:.ID$."".CC$.CC$.",".ID$......".DI
SKETTE WIRD FORMATIERT.": 1:.1,8,15,"".C
C$..... 1:.1,0,0......DS.20. ..I....".FE
HLER :"E$...(..15,"I".DR$:.".LETZTER VER
SUCH ...";...2..15,CC$:.DS.0..".OK !":.7
60.0.<.."DISK .DEFEKT. !!!":.760.M.F.."S
EQ","PRG","USR","REL".S.P.:.S.Z.. **** S
CRATCH ROUTINE ****...D.KO$."SCRATCH ROU
TINE":K$."SCRATCHEN "...N.Q%..1:.1430...
X.:.Q.... **** KOPIERROUTINE ****.....Q%
.0:KO$."KOPIER ROUTINE":K$."KOPIEREN "..
...PL%.0:.170.F. ..MD%.0.Q%.0..".. NIC
HT BEI EINER .4031. !!!":. 680.\....K$"V
ON .";:. 720.T....Q%. 1480:. SCRATCH....
..".".X%.2.TB)"NACH"1.DR%.S.H..".TYP: .P
.RG, .S.EQ, .U.SR, .R.EL, ODER .A.LLES ?
";:X%..(0)...R..680:.TA$;......TA$."P".
TA$."S".TA$."U".TA$."R".TA$."A".1520.&..
..211,X%:.1490.B...TY$.TA$:.Q%.AL%.0:.15
60.O....:."..F.RAGEN ODER .A.LLES KOPIER
EN ? ";......680:AL%.(TA$."A"):.AL%.."AL
LES":.1560......"FRAGEN"......:.310:.N0%
.0.AF%.....".. N0%.0.."...DIE DISK IST L
EER.!!!":.760...,.. 150:. DELETE ZEILE 1
0-23.6.6.."LAENGE NAME
ART".J.@.. I . 0 . N0%.1.R.J.."."BL%(I
).8.TB)NA$(I).31.TB)FT$(I)...T..".
"K$" (J/N)...^..AL%.1670...H.. 680:.TA$
."N".TA$.".".1680.R.R..TA$."."..2410:.16
80...|..TA$.."J". 1640.....CP$(PL%).NA$(
I):PL%.PL%.1.$...."..."SP$:.SP$:.SP$"...
.":..C....PL%.0.."."SP$:.".. NI
CHTS ZU "K$"...":QU%.0:.760.Z....AF%..".
"SP$:.1760......Q%.PL%.1.1810......"."SP
$:."ALPHABETISCH SORTIEREN (J/N)".P.B..6
80:.TA$."N".1810...L..TA$.."J".1730...V.
. *** ALFA SORT (EINFACH) ***......"..SO
RTIEREN...".3...ER%.0:.I.PL%.2.0..1.T...
.CP$(I).CP$(I.1).H$.CP$(I.1):CP$(I.1).CP
$(I):CP$(I).H$:ER%.1......:.ER%.1770:. N
OCHMAL ......... *** COPY FILES ... ***.
W....Q%.QU%..1:. DIR NICHT MEHR GUELTIG.
.....2130:. RAHMEN...&..I.0.PL%.1...0.."
."CP$(I).19.TB);.L.:..Q%.0..15,"C".G(48.
1.DR%).":".CP$(I)."=".DR$.":".CP$(I).K.D
..Q%..15,"S".DR$.":".CP$(I)...N..2220:.D
$:ER%(I).E%...X..E%.72...19.TB)".ABBRUCH
. !!!":.760.F.B..E%.ER%.ER%.1:. FEHLER..
.L..B(214).22..2180...V..:.ER%.0.Q%...20
.TB)"*** E N D E ***":.760......AF%...5.
... *** FEHLER BEHANDLUNG ***.Q...KO$.D(
ER%)." KOPIERFEHLER ":.ER%.1.KO$.KO$."SI
ND":.1960.....KO$.KO$."IST". ...KO$.KO$.
" AUFGETRETEN !"......I.0.PL%.1:.ER%(I).
.63.2110.I....170...F.."...."CP$(I);...P
...20.TB)".EXISTIERT BEREITS..4.Z.."...L
.OESCHEN, .U.MBENENNEN, .I.GNORIEREN (L/
U/I).X....680:.TA$."I".2100:. IGNORIEREN
.Y....TA$."L".2070:. SCRATCH©......T
A$.."U".2020:. FALSCHE TASTE......"..NEU
ER NAME ? ";:.1,NN$.S.... 2080:. COPY AG
AIN.....NN$."*":.15,"S".G(48.(1.DR%)).":
".CP$(I).3. ..15,"C".G(48.1.DR%).":".NN$
."=".DR$.":".CP$(I).M.*..DS.1990:. NOCHM
AL....E.4..SP$:.SP$:.SP$:.SP$.N.>.. :...
.H.. *** TEXTFENSTER ***...R.....\..".".
(16.C(KO$).2).TB)"*** "KO$" ***...F.."..
.......................................
P..". FILE - NAME . FEHLER - MELDUN
G .".B Z..".............................
...........] ..."....":.K.1.20:.FO$:...
..."....................................
...";.. ..."....":... ... *** FORMAT DS$
***.P ...3780:D$.E$:D$.H(D$,19)..!..D$.
I(" ".D$,9.C(D$
).2)..!..D$.H(D$,19)..!J.../!T..*** CATA
LOG ***.5!..:.`!...B8.KO$."DIRECTORY ANZ
EIGE":.170:.2320..!..KO$. "LAENGE FIL
E NAME TYP START":.170:.720:.".."..
!..TY$."A":.310:.170:.3670:."..".16.TB)"
.TASTE BITTE";:.680..!...".FEHLER = ."E$
:.680.."...I.0.1:DR%.I.5"..."......".5.D
R%.35)"..":.214,23:..79)"..";.R"$.DR$.G(
I.48):.15,"I".DR$:.3780:.E%.0. 15:WD(DR%
):.15,8,15.."...:.:.:.211,0:..35)".TASTE
BITTE";:.680.."8.."...":..J"B..*** FIND
SPECIFIC FILE ***.."L..H(H$,C(FI$))..FI
$ . 490:. NICHT GEFUNDEN..#V..RE%.Z%.0:.
.<#`.BU%.BU%.1:.800:.140:TR%.BY%:.140:SC
%.BY%:Z%.0:..Q#J.I.I.2:.I..1.I..1.W#T...
Y#~.. **** VIEW FILE ON DISK ****..#..KO
$."FILE - BETRACHTER":.170..#..."FILENAM
E ZUM LISTEN ? ";.F#...1,FI$:..Y#..TY$."
A":QU%..1..#..."..AUF .";:.720.!$..Z%..1
:.320:.Z%.."..NICHT GEFUNDEN !":Z%.0:.68
0.1$D.FI$.H$:.280.^$N.."........".20)"..
LISTING VON FILE ."FI$..$X..".DIESER BLO
CK IN : "TR%","SC%.E$...".NAEC
HSTER BLOCK IN : ";:.140:.BY%;:TR
%.BY%..$....28.TB)".,";:.140:.BY%:SC%.BY
%.'%...".START ADRESSE : ";:.140
:A.BY%:.140:A.A.256.BY%.A%....28.TB)A.35
.TB)"DEZ".%...".ERSTE LINKADRESSE :
";:.140:A.BY%:.140:A.A.256.BY%..%....28
.TB)A.35.TB)"DEZ".W%...".ERSTE ZEILENNUM
MER : ";:.140:A.BY%:.140:A.A.256.BY%.
.%(...28.TB)A.35.TB)"DEZ"..&2..".ASCIIDU
MP:":QA%.5:QB%.33:.B8.QB%.75.T&<.HX$."":
.I.8.255:.140:HX$.HX$.BY$:.:.:.211,QA%:.
":";.D&F..I.1.C(HX$)..&P...(I).QB%..":":
.211,QA%:.":";..&Z.C$.J(HX$,I,1):C%.F(C$
)..&D..C%.127..".";:C%.C%.127.N&N..C%.32
.C%.32..&X..C%.34..3660..'...G(C%)".";:.
:.211,QB%.1:.":":.B8.../'...TR%.0..,"TAS
TE FUERS MENUE": 8:.680.C'...".E. FUER E
NDE,.N. FUER DEN NAECHSTEN BLOCK.";..' .
.680:.TA$."E". 8:."...":...'...TA$.."N".
2720..'...2500..'... *** NAMEN & ID AEND
ERN ****..'H.KO$."DISK NAMEN & ID AENDER
UNG":. 170..'R.. 720:. DRIVE #..(... 620
:. NAME + ID$..(..."..DISKNAME : "NA$.F
(...".DISK ID : "ID$.V(..."..AENDERUNG
VON .I.D, .N.AME, .K.EINE ? "..(...680:
.TA$."K". 8:...(...TA$."I".2910..(...TA$
.."N".2820.N(".. *** NAMEN AENDERN ***..
(,..".NEUER NAME ? ";:X%..(I):.NA$;:.211
,X%..)6..1,NA$:BU%.144:.800.3)@.NA$.NA$.
" ".E)J.NA$.H(NA$,16).W)
T..8,NA$;:.2970.P)^.. *** ID AENDERN ***
..)H..".NEUER ID ? ";:X%..(I):.ID$;:.211
,X%..)R..1,ID$:BU%.162:.800..)|.X.C(ID$)
:ID$.ID$.J(" 2A ",X.1,6.X)..)..ID$.H(I
D$,5)..)...8,ID$;..*...15,"U2:8"DR%,18,0
:.15,"I".DR$.%*.. 8:..I*... **** TESTLES
EN EINER DISK ***..*..EB%.0:ES%.0:EC%.0:
DC%.0:HD%.0:EX%.0:ER%.0:FR%.0:BE%.0..*B.
KO$."TESTLESEN":.170..*L.."TESTLESEN VON
.";:.720.N*V.TR%.1:SC%.0:.250..*..AN%.1
:EN%.35:. DEFAULT VALUES..+..."..BESTIMM
TER BEREICH (J/N) ? ".,+...680:.TA$."N".
3130.?+...TA$.."J".3060.D+...".VON SPUR
";:.1,TA$:AN%.E(TA$)..+...AN%.0.AN%.1:.G
(20)"1";..+..." BIS SPUR ";:.1,TA$:EN%.
E(TA$).Y+&..(EN%.0).(EN%.35).(EN%.AN%).E
N%.35:.G(20)"35";..+0.. :QU%..1.%,:.KO$.
"VON SPUR".D(AN%)." BIS SPUR".D(EN%):H1$
."DISK CHECK"..,D..170.9,N.."...".\,X..I
.AN%.EN%:JJ%.20:.I.17.JJ%.18.M,B..I.24.J
J%.17..,L..I.30.JJ%.16:. SEKTOREN/TRACK.
.,V..J.0.JJ%..,...15,"B-A:"DR%,I,J.V,...
DS.0.FR%.FR%.1:F$."FREI":.3230..-..BE%.B
E%.1:F$."BELEGT":.15,"B-F:"DR%,I,J..-...
"......."SP$.2-...".SPUR"I"SEKTOR"J"= "
F$.G-..TR%.I:SC%.J:.280.P-...:.3780:D$.E
$:.SP$:."."D$:.DS.0.3350..-F.ER%.ER%.1:.
E%.26.E%.71.."KEIN TEST MOEGLICH ! ":.68
0.D-P..E%.20.EB%.EB%.1:.3340..-Z..E%.21.
ES%.ES%.1:.3340..-...E%.23.EC%.EC%.1:.33
40......E%.24.DC%.DC%.1:.3340.6....E%.27
.E%.29.HD%.HD%.1:.3340.Q....E%.28.EX%.EX
%.1:.3340.L... 8:. 240:. INIT + OPEN.X..
..J,I: 8... .KO$."FEHLER UEBERSICHT":.17
0.D.*...3.TB)"BELEGT ="BE%.28.TB)"FREI =
"FR%...4...3.TB)".HEADER FEHLT :"
EB%../>...3.TB)".SYNCRONIMPULS FEHLT :"E
S%.9/H...3.TB)".PRUEFSUMMEN FEHLER :"EC
%.`/R...3.TB)".DEKODIER FEHLER :"DC%
../\...3.TB)".HEADER PRUEFSUMME :"HD%.
./F...3.TB)".LANGER DATEN BLOCK :"EX%..
/P...3.TB)"..GESAMTFEHLER :";:.ER
%..".";../Z..ER%:.15,"V".DR$..0...". B
ITTE EINE TASTE...";..0...680.>0... ***
UNSCRATCH EIN FILE ***.Y0..KO$."DISK FIL
E RETTER"..0...170:."..FILE NAME ZUM RET
TEN ? ";:.1,FI$:...0... 720:. DRIVE #.I0
..TY$."A":QU%..1:RE%..1:Z%..1:. 320:RE%.
0..0J..Z%.."..NICHT GEFUNDEN !": 8:Z%.0:
.680..1T..".GEFUNDEN FILE : ."H$.C1.
.."..TYP: .P.RG, .S.EQ, .U.SR ODER .R.EL
";.R1... 680:.TA$;:.I.1.4:.TA$.J("SPUR"
,I,1).3580.~1...:.3560..1..BY%.128.I:.80
0:. BUFFER =0..1...8,G(BY%);.J1...15,"U2
:"8;DR%;TR%;SC%: 8..2...:."..FILE WIEDER
KATALOGISIERT.":.15,"V".DR$:QU%..1..2$.
.680.+2... *** WELCHE FLOPPY ? ***.128.
:.B2B.. DELETE ["].`2L.X%..(I):.G(34);:.
211,X%:...2V..I.0.N0%.1:." "BL%(I).9.TB
)NA$(I).26.TB)FT$(I)" " BN%(I,0);..2`...
34.TB)","BN%(I,1).P2J..TA$:.TA$." "..680
..3T..B(214).22.."."," .TASTE BITTE
";:.680:.170..3~..:../3...**************
***************.R3...*** DISK STATUS BAS
IC 3.0 ***.U3...************************
*****.{3.....3... >>> FUER LOTHAR HOFMAN
N <<<..3..:..3D..15,E%,E$,E1%,E2%:...3N.
.***************************..3X..*** AE
NDERUNG PRG.START ***..4...*************
**************.C4..KO$."NEUE STARTADRESS
E EINGEBEN"._4...170:.720:. FRAGE DRIVE.
R4..TY$."P":QU%..1..4..."..PROGRAMM NAME
? ";:.1,FI$:Z%..1:.:.320..4...Z%.0.3880
..4..Z%.0:."..PROGRAMM "G(34)FI$G(34)" I
ST NICHT VORHANDEN!":. 680..5(.."....".1
6.TB)"."H$"...'52.FI$.H$:.280:.140:.140.
I5<..140:X%.BY%:.140:X.X%.256.BY%.P5F..
4050:."STARTADRESSE IST HEX "BY$..5P.."
DEZIMAL"X..5Z..631,F("."):.
198,1.N5D.."..NEUE STARTADRESSE ? "BY$".
....";..5N..1,BY$:.:.H(BY$,1)."@". 8:.".
.OK.":.760..6X..H(BY$,1).."$".X.E(BY$):.
4010.A6..BY$.J(BY$,2):BY$.I("0000".BY$,4
).D6..X.0:.I.1.4:X%.F(J(BY$,I,1)).48.W6.
..X%.10.X%.X%.7..6 .X.X.X%.16.(4.I):...6
..BY%.X.256:X%.X.256.BY%..6..BU%.2:.800.
.6...8,G(X%)G(BY%);:.15,"U2:8"DR%,TR%,SC
%:.15,"I".DR$..6H. 8:...7R.E1%.BY%.16:E2
%.BY%.15:BY$."$":.4070.67..E1%.X%.16:E2%
.X%.15.`7..BY$.BY$.J(HZ$,E1%.1,1).J(HZ$,
E2%.1,1).F7.....7...**** INITIALISIERUNG
DER ****..7...**** SKALAREN VARIABLEN
****..7..:.U7...**** FLOATING POINT
****..7".:..7,.I.0 :. ZAEHLER..86.
J.0 :. ZAEHLER.#8@.K.0 :. ZAEH
LER.;8J.B.0 :. ZAEHLER.]8T.A.0
:. ADRESSE (0-65535).8^.X.0 :. AD
RESSE (0-65535)..8H.P.0 :. FORMAT V
AR. (TAB)..8R.:.J8|..**** INTEGER
****.P8..:..8..SC%.0 :. SEKTOR
(0-20)..9..TR%.18 :. SPUR (1-35).(9.
.AS%.0 :. VAL (TASTE).C9..DR%.0 :.
LAUFWERK #.C9..LR%.0 :. CAT. LAUFWER
K #..9B.MD%.1 :. ANZAHL LAUFWERKE..9L
.MK%.0 :. DISK-STATUS VAR..H9V.PL%.0
:. ZAHL DER WORKFILES..9..QU%..1 :.
FLAG CAT GUELTIG..:..BU%.0 :. BUFFER
PNT. VAR..-:..N0%.0 :. ZAHL CATALOG
FILES.M:..FI%.0 :. FILES PRO BLOCK.K:
..BY%.0 :. ASC (GETBYTE)..:..B1%.0
:. FILETYP IN CATALOG..:..ER%.0 :. G
ESAMTFEHLER ZAHL.L:&.C% .0 :. ASC (HE
X $)..:0.X% .0 :. CURSOR POSITION..;:
.Q% .0 :. FLAG COPY/SCRATCH.0;D.EB%.0
:. FEHLER (KEIN HD.).Q;N.ES%.0 :.
FEHLER (SYNCRON).H;X.EC%.0 :. FEHLER
.;B.DC%.0 :. FEHLER..;L.HD%.0 :.
FEHLER (HEADER).B;V.EX%.0 :. FEHLER (
LONG BLK.)..;..FR%.0 :. FREIE BLOCKS.
.;..BE%.0 :. BELEGTE BLOCKS..<..AN%.1
:. VON SPUR ....8<..EN%.35 :. ...
BIS SPUR.[<..JJ%.20 :. MAX. SEKTOREN/S
PUR.~<..RE%.0 :. FLAG (FILE RETTEN)..
<..E% .0 :. DISK FEHLER (CODE).D<F.E$
."" :. DISK FEHLER (TEXT)..<P.E1%.0
:. DISK FEHLER (SPUR)..=Z.E2%.0 :.
DISK FEHLER (SKT.).*=..AF%.0 :. FLAG
COPY ALPHA.0=..:.Q=...******************
*********.R=...****>>>>>>FELDER<<<<<<***
**..=...***************************..=..
:..= .. NA$(150) :. FILE NAMEN.W=*.. C
P$(150) :. WORK NAMEN..=4.. FT$(150)
:. FILE TYP..>>.. TY$( 4 ) :. TYPEN N
AMEN..>H.:.:>R.. BL%(150) :. FILE LAEN
GE.Z>\.. ER%(150) :. COPY FEHLER.Z>F..
BN%(150,1) :. FILE BEGINN..>P.. BD%( 1
) :. NAECHSTER BLK..>Z...G>... **** AL
PHA SORT & COPY ALL ***..>... *** PRINT
CURRENT COPY TYPE ***..?...B.1.."PROGRAM
ME":.. ?...B.2.."SEQUENTIELLEN";.7?...B.
3.."RELATIVEN";.I?...B.4.."USER";.\?..."
DATEIEN.":..W?J.. *** TEXT AUSGABE ***.
.?T.."..ACHTUNG.! LEGEN SIE IN DRIVE 1 E
INE.P?...".LEERE ODER UNBENUTZTE DISK EI
N. DRIVE..?...".1 WIRD FORMATIERT !..@..
."..FALLS IN DRIVE 0 KEIN MENUE VORHANDE
N.I@...".IST, LEGEN SIE BITTE AUCH DIESE
S BEREIT..W@..."...DRUECKEN SIE (.J.) FU
ER WEITER, JEDE..@...".ANDERE TASTE FUEH
RT ZUM ABBRUCH !(V)..";:.204,0..@...680:
.204,1:.". ";:.TA$.."J"..".ENDE.";:.760.
.@$..63999..@(#. *** ADR. ***.0A2#HU$.".
"
.{A<#HU$.HU$."ANDREAS NORMAN DORFSTR.1
34 (3061) HESPE TEL. 05721/3240 "..AF#
.KA.1.C(HU$):.MI.1.150:...AK#.TA$..AL#.T
A$.."".690.QAP#.".........";J(HU$,KA,26)
;..AZ#.:.MI.1.500:.:.9000.... )..I`AF.H.
...?.Y.
> CLICK IMAGE PREVIEW FOR FULL MODAL