DISK MANAGEMENT
FILE INFORMATION
FILENAME(S): DISK MANAGEMENT
FILE TYPE(S): PRG
FILE SIZE: 14.4K
FIRST SEEN: 2025-12-02 00:16:57
APPEARS ON: 1 disk(s)
FILE HASH
8eda69e52cad65bd6f488bd341e95f7f717b63f0d3922a607b1541fd941786a1
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PETE WORK DISK | DISK MANAGEMENT | PRG | Maestro | 19 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1D 08 63 00 97 35 33 32 38 30 2C 38 3A 97 |....c..53280,8:.|
00000010: 35 33 32 38 31 2C 38 3A 99 22 93 90 22 00 68 08 |53281,8:."..".h.|
00000020: 64 00 99 C7 28 31 34 32 29 3A 48 33 24 B2 22 44 |d...(142):H3$."D|
00000030: 49 53 4B 20 4D 41 4E 41 47 45 4D 45 4E 54 20 50 |ISK MANAGEMENT P|
00000040: 52 4F 47 52 41 4D 4D 20 56 20 36 34 22 3A 48 34 |ROGRAMM V 64":H4|
00000050: 24 B2 22 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |$.".............|
00000060: C0 C0 C0 C0 C0 C0 C0 22 00 7D 08 6E 00 48 35 24 |.......".}.n.H5$|
00000070: B2 22 27 51 27 20 54 4F 20 45 4E 44 22 00 99 08 |."'Q' TO END"...|
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 07 0B 54 |Y$.TY$)..8:....T|
000002F0: 01 99 22 11 11 52 45 41 44 49 4E 47 20 44 49 52 |.."..READING DIR|
00000300: 45 43 54 4F 52 59 22 00 48 0B 5E 01 51 55 25 B2 |ECTORY".H.^.QU%.|
00000310: 30 3A 44 49 24 B2 49 44 24 3A 4C 52 25 B2 44 52 |0:DI$.ID$:LR%.DR|
00000320: 25 3A 4E 30 25 B2 30 3A 42 55 25 B2 30 3A 46 49 |%:N0%.0:BU%.0:FI|
00000330: 25 B2 30 3A 54 52 25 B2 31 38 3A 53 43 25 B2 31 |%.0:TR%.18:SC%.1|
00000340: 3A 5A 59 24 B2 54 59 24 00 5F 0B 68 01 8D 20 32 |:ZY$.TY$._.h.. 2|
00000350: 38 30 3A 8F 20 42 4C 4F 43 4B 2D 52 45 41 44 00 |80:. BLOCK-READ.|
00000360: 93 0B 72 01 81 49 B2 30 A4 31 3A A1 23 38 2C 42 |..r..I.0.1:.#8,B|
00000370: 59 24 3A 42 44 25 28 49 29 B2 C6 28 42 59 24 AA |Y$:BD%(I)..(BY$.|
00000380: C7 28 30 29 29 3A 82 3A 42 55 25 B2 32 3A 8D 20 |.(0)):.:BU%.2:. |
00000390: 38 30 30 00 AB 0B 7C 01 8D 20 31 34 30 3A 42 31 |800...|.. 140:B1|
000003A0: 25 B2 28 42 59 25 20 AF 20 37 29 00 C0 0B 86 01 |%.(BY% . 7).....|
000003B0: 8B 42 31 25 B2 30 AF 52 45 25 B2 30 A7 34 39 30 |.B1%.0.RE%.0.490|
000003C0: 00 D1 0B 90 01 8B 42 31 25 AF 52 45 25 A7 34 39 |......B1%.RE%.49|
000003D0: 30 00 F8 0B 9A 01 8B 54 59 24 B3 B1 22 41 22 A7 |0......TY$.."A".|
000003E0: 8B C6 28 54 59 24 28 42 31 25 29 29 B3 B1 C6 28 |..(TY$(B1%))...(|
000003F0: 54 59 24 29 A7 34 39 30 00 20 0C A4 01 48 24 B2 |TY$).490. ...H$.|
00000400: 22 22 3A 81 49 B2 30 A4 31 3A 8D 20 31 34 30 3A |"":.I.0.1:. 140:|
00000410: 42 4E 25 28 4E 30 25 2C 49 29 B2 42 59 25 3A 82 |BN%(N0%,I).BY%:.|
00000420: 00 4C 0C AE 01 81 49 B2 33 A4 31 38 3A A1 23 38 |.L....I.3.18:.#8|
00000430: 2C 42 59 24 3A 8B 42 59 24 B3 B1 C7 28 31 36 30 |,BY$:.BY$...(160|
00000440: 29 A7 20 48 24 B2 48 24 AA 42 59 24 00 5B 0C B8 |). H$.H$.BY$.[..|
00000450: 01 82 3A 8B 5A 25 A7 32 33 38 30 00 78 0C C2 01 |..:.Z%.2380.x...|
00000460: 81 49 B2 31 39 A4 32 37 3A A1 23 38 2C 42 59 24 |.I.19.27:.#8,BY$|
00000470: 3A 82 3A 8D 20 31 34 30 00 9A 0C CC 01 42 4C 25 |:.:. 140.....BL%|
00000480: B2 42 59 25 3A 8D 20 31 34 30 3A 42 4C 25 B2 42 |.BY%:. 140:BL%.B|
00000490: 4C 25 AA 32 35 36 AC 42 59 25 00 D3 0C D6 01 42 |L%.256.BY%.....B|
000004A0: 4C 25 28 4E 30 25 29 B2 42 4C 25 3A 4E 41 24 28 |L%(N0%).BL%:NA$(|
000004B0: 4E 30 25 29 B2 48 24 3A 46 54 24 28 4E 30 25 29 |N0%).H$:FT$(N0%)|
000004C0: B2 54 59 24 28 42 31 25 29 3A 4E 30 25 B2 4E 30 |.TY$(B1%):N0%.N0|
000004D0: 25 AA 31 00 E6 0C E0 01 99 22 91 22 A3 32 35 AA |%.1......".".25.|
000004E0: 54 42 29 4E 30 25 00 14 0D EA 01 46 49 25 B2 46 |TB)N0%.....FI%.F|
000004F0: 49 25 AA 31 3A 8B 46 49 25 B3 38 A7 42 55 25 B2 |I%.1:.FI%.8.BU%.|
00000500: 46 49 25 AC 33 32 AA 32 3A 8D 20 38 30 30 3A 89 |FI%.32.2:. 800:.|
00000510: 20 33 38 30 00 26 0D F4 01 8B 42 44 25 28 30 29 | 380.&....BD%(0)|
00000520: B2 30 A7 35 32 30 00 4B 0D FE 01 54 52 25 B2 42 |.0.520.K...TR%.B|
00000530: 44 25 28 30 29 3A 53 43 25 B2 42 44 25 28 31 29 |D%(0):SC%.BD%(1)|
00000540: 3A 46 49 25 B2 30 3A 89 33 36 30 00 52 0D 08 02 |:FI%.0:.360.R...|
00000550: A0 38 00 58 0D 12 02 8E 00 6E 0D 1C 02 8F 20 2A |.8.X.....n.... *|
00000560: 2A 2A 20 47 45 54 20 49 44 24 20 2A 2A 2A 00 84 |** GET ID$ ***..|
00000570: 0D 26 02 8D 20 32 35 30 3A 8F 20 4F 50 45 4E 20 |.&.. 250:. OPEN |
00000580: 46 49 4C 45 00 9F 0D 30 02 8B 20 4D 4B 25 20 A7 |FILE...0.. MK% .|
00000590: 20 8E 20 3A 8F 20 53 49 43 48 45 52 2E 2E 2E 00 | . :. SICHER....|
000005A0: B5 0D 3A 02 54 52 25 B2 31 38 3A 53 43 25 B2 30 |..:.TR%.18:SC%.0|
000005B0: 3A 8D 32 38 30 00 CE 0D 44 02 42 55 25 B2 31 36 |:.280...D.BU%.16|
000005C0: 32 3A 49 44 24 B2 22 22 3A 8D 20 38 30 30 00 EC |2:ID$."":. 800..|
000005D0: 0D 4E 02 81 49 B2 31 A4 35 3A 8D 31 34 30 3A 49 |.N..I.1.5:.140:I|
000005E0: 44 24 B2 49 44 24 AA 42 59 24 3A 82 00 F2 0D 58 |D$.ID$.BY$:....X|
000005F0: 02 8E 00 0F 0E 62 02 8F 20 2A 2A 2A 20 47 45 54 |.....b.. *** GET|
00000600: 20 20 4E 41 4D 45 20 2B 20 49 44 20 2A 2A 2A 00 | NAME + ID ***.|
00000610: 1F 0E 6C 02 8D 35 35 30 3A 8B 4D 4B 25 A7 8E 00 |..l..550:.MK%...|
00000620: 37 0E 76 02 42 55 25 B2 31 34 34 3A 4E 41 24 B2 |7.v.BU%.144:NA$.|
00000630: 22 22 3A 8D 38 30 30 00 5E 0E 80 02 81 49 B2 31 |"":.800.^....I.1|
00000640: A4 31 36 3A 8D 31 34 30 3A 8B 42 59 25 B3 B1 31 |.16:.140:.BY%..1|
00000650: 36 30 A7 4E 41 24 B2 4E 41 24 AA 42 59 24 00 66 |60.NA$.NA$.BY$.f|
00000660: 0E 8A 02 82 3A 8E 00 6C 0E 94 02 3A 00 89 0E 9E |....:..l...:....|
00000670: 02 8F 20 2A 2A 2A 20 47 45 54 20 45 49 4E 45 20 |.. *** GET EINE |
00000680: 54 41 53 54 45 20 2A 2A 2A 00 A1 0E A8 02 97 31 |TASTE ***......1|
00000690: 39 38 2C 30 3A 92 31 39 38 2C 31 3A A1 20 54 41 |98,0:.198,1:. TA|
000006A0: 24 00 B2 0E B2 02 41 53 25 B2 C5 28 54 41 24 29 |$.....AS%..(TA$)|
000006B0: 3A 8E 00 B8 0E BC 02 3A 00 D8 0E C6 02 8F 20 2A |:......:...... *|
000006C0: 2A 2A 20 45 52 46 52 41 47 45 20 44 52 49 56 45 |** ERFRAGE DRIVE|
000006D0: 20 4E 52 2E 20 2A 2A 2A 00 EF 0E D0 02 44 52 25 | NR. ***.....DR%|
000006E0: B2 30 3A 54 41 24 B2 22 30 22 3A 89 37 33 30 00 |.0:TA$."0":.730.|
000006F0: FD 0E DA 02 44 52 24 B2 54 41 24 3A 8E 00 03 0F |....DR$.TA$:....|
00000700: E4 02 3A 00 1E 0F EE 02 8F 20 2A 2A 2A 20 56 45 |..:...... *** VE|
00000710: 52 5A 4F 45 47 45 52 55 4E 47 20 2A 2A 2A 00 35 |RZOEGERUNG ***.5|
00000720: 0F F8 02 8B 41 46 25 B2 30 A7 81 49 B2 31 A4 32 |....AF%.0..I.1.2|
00000730: 35 30 30 3A 82 00 3B 0F 02 03 8E 00 41 0F 0C 03 |500:..;.....A...|
00000740: 3A 00 64 0F 16 03 8F 2A 2A 2A 20 42 55 46 46 45 |:.d....*** BUFFE|
00000750: 52 20 50 4F 49 4E 54 45 52 20 53 45 54 5A 45 4E |R POINTER SETZEN|
00000760: 20 2A 2A 2A 00 7A 0F 20 03 98 31 35 2C 22 42 2D | ***.z. ..15,"B-|
00000770: 50 3A 22 38 3B 42 55 25 3A 8E 00 9F 0F 2A 03 8F |P:"8;BU%:....*..|
00000780: 20 20 2A 2A 2A 2A 20 44 41 55 45 52 20 46 49 4C | **** DAUER FIL|
00000790: 45 53 20 4F 45 46 46 4E 45 4E 20 2A 2A 2A 2A 00 |ES OEFFNEN ****.|
000007A0: A5 0F 34 03 3A 00 C6 0F 3E 03 9F 20 31 35 2C 38 |..4.:...>.. 15,8|
000007B0: 2C 31 35 3A 8F 20 44 49 53 4B 20 45 52 52 4F 52 |,15:. DISK ERROR|
000007C0: 20 4B 41 4E 41 4C 00 DF 0F 48 03 9F 20 30 31 2C | KANAL...H.. 01,|
000007D0: 30 2C 30 30 3A 8F 20 54 41 53 54 41 54 55 52 00 |0,00:. TASTATUR.|
000007E0: 11 10 52 03 53 50 24 B2 22 20 20 20 20 20 20 20 |..R.SP$." |
000007F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000800: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000810: 22 00 43 10 5C 03 46 4F 24 B2 22 DD 20 20 20 20 |".C.\.FO$.". |
00000820: 20 20 20 20 20 20 20 20 20 20 20 20 20 DD 20 20 | . |
00000830: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000840: 20 DD 22 00 74 10 66 03 53 54 24 B2 22 C0 C0 C0 | .".t.f.ST$."...|
00000850: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000860: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000870: C0 C0 C0 22 00 9B 10 70 03 46 4D 24 B2 22 20 2A |..."...p.FM$." *|
00000880: 22 3A 8B 42 38 A7 53 54 24 B2 C8 28 53 54 24 AA |":.B8.ST$..(ST$.|
00000890: 53 54 24 AA 53 54 24 2C 37 38 29 00 BF 10 7A 03 |ST$.ST$,78)...z.|
000008A0: 48 31 24 B2 22 49 4E 49 54 49 41 4C 49 53 49 4E |H1$."INITIALISIN|
000008B0: 47 20 44 49 53 4B 20 4D 41 4E 41 47 45 52 22 00 |G DISK MANAGER".|
000008C0: FA 10 84 03 4E 41 24 B2 22 22 3A 4E 42 24 B2 22 |....NA$."":NB$."|
000008D0: 22 3A 49 44 24 B2 22 22 3A 44 49 24 B2 22 22 3A |":ID$."":DI$."":|
000008E0: 54 41 24 B2 22 22 3A 54 59 24 B2 22 22 3A 42 59 |TA$."":TY$."":BY|
000008F0: 24 B2 22 22 3A 48 24 B2 22 22 00 16 11 8E 03 4B |$."":H$."".....K|
00000900: 4F 24 B2 48 34 24 3A 8D 31 37 30 3A 8D 34 30 39 |O$.H4$:.170:.409|
00000910: 30 3A 8D 37 36 30 00 31 11 98 03 48 5A 24 B2 22 |0:.760.1...HZ$."|
00000920: 30 31 32 33 34 35 36 37 38 39 41 42 43 44 45 46 |0123456789ABCDEF|
00000930: 22 00 46 11 A2 03 81 49 B2 31 A4 34 3A 87 54 59 |".F....I.1.4:.TY|
00000940: 24 28 49 29 3A 82 00 4C 11 AC 03 3A 00 6F 11 B6 |$(I):..L...:.o..|
00000950: 03 8F 20 2A 2A 2A 2A 20 20 48 41 55 50 54 20 20 |.. **** HAUPT |
00000960: 2D 20 20 4D 45 4E 55 45 20 20 20 2A 2A 2A 2A 00 |- MENUE ****.|
00000970: 75 11 C0 03 3A 00 89 11 CA 03 4B 4F 24 B2 48 35 |u...:.....KO$.H5|
00000980: 24 3A 48 31 24 B2 48 33 24 00 A3 11 D4 03 8D 31 |$:H1$.H3$......1|
00000990: 37 30 3A 58 B2 B8 28 30 29 3A 8F 20 47 41 52 42 |70:X..(0):. GARB|
000009A0: 41 47 45 00 C2 11 DE 03 99 A3 38 AA 54 42 29 22 |AGE.......8.TB)"|
000009B0: 11 31 29 20 53 43 52 41 54 43 48 20 46 49 4C 45 |.1) SCRATCH FILE|
000009C0: 53 22 00 DE 11 E8 03 99 A3 38 AA 54 42 29 22 11 |S".......8.TB)".|
000009D0: 32 29 20 46 4F 52 4D 41 54 20 44 49 53 4B 00 FF |2) FORMAT DISK..|
000009E0: 11 F2 03 99 A3 38 AA 54 42 29 22 11 33 29 20 52 |.....8.TB)".3) R|
000009F0: 45 41 44 20 46 49 4C 45 20 42 4C 4F 43 4B 53 00 |EAD FILE BLOCKS.|
00000A00: 25 12 FC 03 99 A3 38 AA 54 42 29 22 11 34 29 20 |%.....8.TB)".4) |
00000A10: 43 48 41 4E 47 45 20 44 49 53 4B 20 4E 41 4D 45 |CHANGE DISK NAME|
00000A20: 20 26 20 49 44 00 44 12 06 04 99 A3 38 AA 54 42 | & ID.D.....8.TB|
00000A30: 29 22 11 35 29 20 54 45 53 54 20 52 45 41 44 20 |)".5) TEST READ |
00000A40: 44 49 53 4B 00 63 12 10 04 99 A3 38 AA 54 42 29 |DISK.c.....8.TB)|
00000A50: 22 11 36 29 20 4C 49 53 54 20 44 49 52 45 43 54 |".6) LIST DIRECT|
00000A60: 4F 52 59 00 8C 12 1A 04 99 A3 38 AA 54 42 29 22 |ORY.......8.TB)"|
00000A70: 11 37 29 20 52 45 53 43 55 45 20 46 49 4C 45 53 |.7) RESCUE FILES|
00000A80: 20 28 55 4E 53 43 52 41 54 43 48 29 00 B1 12 24 | (UNSCRATCH)...$|
00000A90: 04 99 A3 38 AA 54 42 29 22 11 38 29 20 43 48 41 |...8.TB)".8) CHA|
00000AA0: 4E 47 45 20 53 54 41 52 54 20 41 44 44 52 45 53 |NGE START ADDRES|
00000AB0: 53 00 CF 12 29 04 99 A3 38 AA 54 42 29 22 11 39 |S...)...8.TB)".9|
00000AC0: 29 20 56 41 4C 49 44 41 54 45 20 44 49 53 4B 00 |) VALIDATE DISK.|
00000AD0: E6 12 2E 04 8D 36 37 30 3A 8B 54 41 24 B2 22 51 |.....670:.TA$."Q|
00000AE0: 22 A7 31 31 32 30 00 F6 12 38 04 8B 41 53 25 B2 |".1120...8..AS%.|
00000AF0: 30 A7 31 30 37 30 00 0E 13 42 04 8F 20 2A 2A 2A |0.1070...B.. ***|
00000B00: 20 56 45 52 54 45 49 4C 45 52 20 2A 2A 2A 00 49 | VERTEILER ***.I|
00000B10: 13 4C 04 91 41 53 25 8D 31 33 38 30 2C 31 31 36 |.L..AS%.1380,116|
00000B20: 30 2C 32 34 33 30 2C 32 37 35 30 2C 33 30 30 30 |0,2430,2750,3000|
00000B30: 2C 32 32 38 30 2C 33 34 38 30 2C 33 38 30 30 2C |,2280,3480,3800,|
00000B40: 35 30 30 30 3A 89 39 37 30 00 64 13 56 04 8E 20 |5000:.970.d.V.. |
00000B50: 3A 20 8F 20 44 55 4D 4D 59 20 53 55 42 52 4F 55 |: . DUMMY SUBROU|
00000B60: 54 49 4E 45 00 6D 13 60 04 8D 31 37 30 00 95 13 |TINE.m.`..170...|
00000B70: 6A 04 98 31 35 2C 22 55 3A 22 3A 9C 3A 99 22 13 |j..15,"U:":.:.".|
00000B80: 13 11 11 11 11 11 11 22 3A 80 3A 8F 20 44 55 50 |.......":.:. DUP|
00000B90: 20 45 4E 44 45 00 9B 13 74 04 3A 00 B5 13 7E 04 | ENDE...t.:...~.|
00000BA0: 8F 20 2A 2A 2A 20 46 4F 52 4D 41 54 49 45 52 45 |. *** FORMATIERE|
00000BB0: 4E 20 2A 2A 2A 00 D8 13 88 04 4B 4F 24 B2 22 44 |N ***.....KO$."D|
00000BC0: 49 53 4B 20 46 4F 52 4D 41 54 20 52 4F 55 54 49 |ISK FORMAT ROUTI|
00000BD0: 4E 45 22 3A 8D 31 37 30 00 F7 13 92 04 8D 20 37 |NE":.170...... 7|
00000BE0: 32 30 3A 8F 20 5A 45 49 4C 45 4E 4E 55 4D 4D 45 |20:. ZEILENNUMME|
00000BF0: 52 20 4C 45 53 45 4E 00 15 14 9C 04 8D 20 36 32 |R LESEN...... 62|
00000C00: 30 3A A0 38 3A 8F 20 44 49 53 4B 20 49 44 20 26 |0:.8:. DISK ID &|
00000C10: 20 4E 41 4D 45 00 2F 14 A6 04 8B 4D 4B 25 A7 31 | NAME./....MK%.1|
00000C20: 32 34 30 3A 8F 20 3F 42 41 44 20 44 49 53 4B 00 |240:. ?BAD DISK.|
00000C30: 71 14 B0 04 44 24 B2 22 22 3A 99 22 11 44 49 53 |q...D$."":.".DIS|
00000C40: 4B 20 49 44 20 3D 22 49 44 24 3A 99 22 11 44 4F |K ID ="ID$:.".DO|
00000C50: 20 59 4F 55 20 57 49 53 48 20 54 4F 20 4B 45 45 | YOU WISH TO KEE|
00000C60: 50 20 4F 52 49 47 49 4E 41 4C 20 49 44 3F 20 22 |P ORIGINAL ID? "|
00000C70: 3B 00 99 14 BA 04 84 31 2C 54 41 24 3A 99 3A 8B |;......1,TA$:.:.|
00000C80: C8 28 54 41 24 2C 31 29 B2 22 59 22 A7 49 44 24 |.(TA$,1)."Y".ID$|
00000C90: B2 22 22 3A 89 31 32 34 30 00 C0 14 C4 04 8B C8 |."":.1240.......|
00000CA0: 28 54 41 24 2C 31 29 B3 B1 22 4E 22 A7 99 22 91 |(TA$,1).."N"..".|
00000CB0: 22 3B 3A 97 32 31 31 2C 33 33 3A 89 31 32 31 30 |";:.211,33:.1210|
00000CC0: 00 CF 14 CE 04 44 24 B2 22 2C 22 AA 49 44 24 00 |.....D$.",".ID$.|
00000CD0: 02 15 D8 04 99 22 11 44 49 53 4B 20 4E 41 4D 45 |.....".DISK NAME|
00000CE0: 20 2C 20 49 44 20 20 3F 20 22 3B 3A 46 45 25 B2 | , ID ? ";:FE%.|
00000CF0: C2 28 32 31 31 29 3A 99 4E 41 24 22 2C 22 49 44 |.(211):.NA$","ID|
00000D00: 24 3B 00 34 15 E2 04 97 32 31 31 2C 46 45 25 3A |$;.4....211,FE%:|
00000D10: 84 31 2C 4E 41 24 2C 49 44 24 3A 99 3A 8B C8 28 |.1,NA$,ID$:.:..(|
00000D20: 4E 41 24 2C 31 29 B2 22 2A 22 B0 4E 41 24 B2 22 |NA$,1)."*".NA$."|
00000D30: 22 A7 20 8E 00 4E 15 EC 04 8F 20 5E 5E 5E 20 41 |". ..N.... ^^^ A|
00000D40: 42 42 52 55 43 48 20 5E 5E 5E 20 21 21 21 00 7E |BBRUCH ^^^ !!!.~|
00000D50: 15 F6 04 51 55 25 B2 AB 31 3A 43 43 24 B2 22 4E |...QU%..1:CC$."N|
00000D60: 3A 22 AA 4E 41 24 3A 8B 49 44 24 B1 22 22 A7 43 |:".NA$:.ID$."".C|
00000D70: 43 24 B2 43 43 24 AA 22 2C 22 AA 49 44 24 00 A7 |C$.CC$.",".ID$..|
00000D80: 15 00 05 99 22 11 46 4F 52 4D 41 54 49 4E 47 20 |....".FORMATING |
00000D90: 44 49 53 4B 22 3A A0 31 3A 9F 31 2C 38 2C 31 35 |DISK":.1:.1,8,15|
00000DA0: 2C 22 22 AA 43 43 24 00 B5 15 0A 05 A0 31 3A 9F |,"".CC$......1:.|
00000DB0: 31 2C 30 2C 30 00 C3 15 14 05 8B 44 53 B3 32 30 |1,0,0......DS.20|
00000DC0: A7 20 8E 00 D5 15 1E 05 99 22 11 53 54 41 54 45 |. .......".STATE|
00000DD0: 20 3A 22 45 24 00 FE 15 28 05 98 31 35 2C 22 49 | :"E$...(..15,"I|
00000DE0: 22 AA 44 52 24 3A 99 22 11 57 49 53 48 20 54 4F |".DR$:.".WISH TO|
00000DF0: 20 54 52 59 20 41 47 41 49 4E 2E 2E 22 3B 00 1E | TRY AGAIN..";..|
00000E00: 16 32 05 98 31 35 2C 43 43 24 3A 8B 44 53 B2 30 |.2..15,CC$:.DS.0|
00000E10: A7 99 22 12 4F 4B 20 21 22 3A 89 37 36 30 00 3F |..".OK !":.760.?|
00000E20: 16 3C 05 99 22 44 49 53 4B 20 12 44 45 46 45 43 |.<.."DISK .DEFEC|
00000E30: 54 49 56 45 92 20 21 21 21 22 3A 89 37 36 30 00 |TIVE. !!!":.760.|
00000E40: 5C 16 46 05 83 22 53 45 51 22 2C 22 50 52 47 22 |\.F.."SEQ","PRG"|
00000E50: 2C 22 55 53 52 22 2C 22 52 45 4C 22 00 62 16 50 |,"USR","REL".b.P|
00000E60: 05 3A 00 82 16 5A 05 8F 20 2A 2A 2A 2A 20 53 43 |.:...Z.. **** SC|
00000E70: 52 41 54 43 48 20 52 4F 55 54 49 4E 45 20 2A 2A |RATCH ROUTINE **|
00000E80: 2A 2A 00 AA 16 64 05 4B 4F 24 B2 22 53 43 52 41 |**...d.KO$."SCRA|
00000E90: 54 43 48 20 52 4F 55 54 49 4E 45 22 3A 4B 24 B2 |TCH ROUTINE":K$.|
00000EA0: 22 53 43 52 41 54 43 48 20 22 00 BA 16 6E 05 51 |"SCRATCH "...n.Q|
00000EB0: 25 B2 AB 31 3A 89 31 34 33 30 00 C0 16 78 05 3A |%..1:.1430...x.:|
00000EC0: 00 DE 16 82 05 8F 20 2A 2A 2A 2A 20 4B 4F 50 49 |...... **** KOPI|
00000ED0: 45 52 52 4F 55 54 49 4E 45 20 2A 2A 2A 2A 00 06 |ERROUTINE ****..|
00000EE0: 17 8C 05 51 25 B2 30 3A 4B 4F 24 B2 22 43 4F 50 |...Q%.0:KO$."COP|
00000EF0: 59 20 52 4F 55 54 49 4E 45 22 3A 4B 24 B2 22 43 |Y ROUTINE":K$."C|
00000F00: 4F 50 49 45 44 22 00 15 17 96 05 50 4C 25 B2 30 |OPIED".....PL%.0|
00000F10: 3A 8D 31 37 30 00 4E 17 A0 05 8B 4D 44 25 B2 30 |:.170.N....MD%.0|
00000F20: AF 51 25 B2 30 A7 99 22 11 11 20 20 20 4E 49 43 |.Q%.0..".. NIC|
00000F30: 48 54 20 42 45 49 20 45 49 4E 45 52 20 12 34 30 |HT BEI EINER .40|
00000F40: 33 31 92 20 21 21 21 22 3A 89 20 36 38 30 00 65 |31. !!!":. 680.e|
00000F50: 17 AA 05 99 4B 24 22 46 49 4C 45 20 91 22 3B 3A |....K$"FILE .";:|
00000F60: 8D 20 37 32 30 00 7D 17 B4 05 8B 51 25 A7 20 31 |. 720.}....Q%. 1|
00000F70: 34 38 30 3A 8F 20 53 43 52 41 54 43 48 00 9A 17 |480:. SCRATCH...|
00000F80: BE 05 99 22 91 22 A3 58 25 AA 32 AA 54 42 29 22 |...".".X%.2.TB)"|
00000F90: 4E 41 43 48 22 31 AB 44 52 25 00 D2 17 C8 05 99 |NACH"1.DR%......|
00000FA0: 22 11 54 59 50 45 3A 20 12 50 92 52 47 20 12 53 |".TYPE: .P.RG .S|
00000FB0: 92 45 51 20 12 55 92 53 52 20 12 52 92 45 4C 20 |.EQ .U.SR .R.EL |
00000FC0: 12 41 92 4C 4C 20 20 20 22 3B 3A 58 25 B2 B9 28 |.A.LL ";:X%..(|
00000FD0: 30 29 00 E1 17 D2 05 8D 36 38 30 3A 99 54 41 24 |0)......680:.TA$|
00000FE0: 3B 00 13 18 DC 05 8B 54 41 24 B2 22 50 22 B0 54 |;......TA$."P".T|
00000FF0: 41 24 B2 22 53 22 B0 54 41 24 B2 22 55 22 B0 54 |A$."S".TA$."U".T|
00001000: 41 24 B2 22 52 22 B0 54 41 24 B2 22 41 22 A7 31 |A$."R".TA$."A".1|
00001010: 35 32 30 00 25 18 E6 05 97 32 31 31 2C 58 25 3A |520.%....211,X%:|
00001020: 89 31 34 39 30 00 41 18 F0 05 54 59 24 B2 54 41 |.1490.A...TY$.TA|
00001030: 24 3A 8B 51 25 A7 41 4C 25 B2 30 3A 89 31 35 36 |$:.Q%.AL%.0:.156|
00001040: 30 00 6B 18 FA 05 99 3A 99 22 11 12 49 92 4E 44 |0.k....:."..I.ND|
00001050: 49 56 49 44 55 41 4C 2D 12 43 92 4F 4D 42 49 4E |IVIDUAL-.C.OMBIN|
00001060: 45 44 20 43 4F 50 49 45 53 22 3B 00 99 18 04 06 |ED COPIES";.....|
00001070: 8D 36 38 30 3A 41 4C 25 B2 28 54 41 24 B2 22 41 |.680:AL%.(TA$."A|
00001080: 22 29 3A 8B 41 4C 25 A7 99 22 43 4F 4D 42 49 4E |"):.AL%.."COMBIN|
00001090: 45 44 22 3A 89 31 35 36 30 00 AB 18 0E 06 99 22 |ED":.1560......"|
000010A0: 49 4E 44 49 56 49 44 55 41 4C 22 00 C3 18 18 06 |INDIVIDUAL".....|
000010B0: 99 3A 8D 33 31 30 3A 8B 4E 30 25 B2 30 AF 41 46 |.:.310:.N0%.0.AF|
000010C0: 25 A7 8E 00 ED 18 22 06 8B 20 4E 30 25 B2 30 A7 |%.....".. N0%.0.|
000010D0: 99 22 11 11 12 54 48 45 20 44 49 53 4B 20 49 53 |."...THE DISK IS|
000010E0: 20 43 4C 45 41 52 92 22 3A 89 37 36 30 00 0C 19 | CLEAR.":.760...|
000010F0: 2C 06 8D 20 31 35 30 3A 8F 20 44 45 4C 45 54 45 |,.. 150:. DELETE|
00001100: 20 42 4C 4F 43 4B 20 31 30 2D 32 33 00 37 19 36 | BLOCK 10-23.7.6|
00001110: 06 99 22 42 4C 4F 43 4B 53 20 20 20 20 20 20 20 |.."BLOCKS |
00001120: 4E 41 4D 45 20 20 20 20 20 20 20 20 20 20 20 20 |NAME |
00001130: 20 20 54 59 50 45 22 00 4B 19 40 06 81 20 49 20 | TYPE".K.@.. I |
00001140: B2 20 30 20 A4 20 4E 30 25 AB 31 00 73 19 4A 06 |. 0 . N0%.1.s.J.|
00001150: 99 22 11 22 42 4C 25 28 49 29 A3 38 AA 54 42 29 |."."BL%(I).8.TB)|
00001160: 4E 41 24 28 49 29 A3 33 31 AA 54 42 29 46 54 24 |NA$(I).31.TB)FT$|
00001170: 28 49 29 00 8C 19 54 06 99 22 11 20 20 20 20 20 |(I)...T..". |
00001180: 20 20 22 4B 24 22 20 28 59 2F 4E 29 00 9A 19 5E | "K$" (Y/N)...^|
00001190: 06 8B 41 4C 25 A7 31 36 37 30 00 BA 19 68 06 8D |..AL%.1670...h..|
000011A0: 20 36 38 30 3A 8B 54 41 24 B2 22 4E 22 B0 54 41 | 680:.TA$."N".TA|
000011B0: 24 B2 22 11 22 A7 31 36 38 30 00 D3 19 72 06 8B |$.".".1680...r..|
000011C0: 54 41 24 B2 22 91 22 A7 8D 32 34 31 30 3A 89 31 |TA$."."..2410:.1|
000011D0: 36 38 30 00 E7 19 7C 06 8B 54 41 24 B3 B1 22 59 |680...|..TA$.."Y|
000011E0: 22 A7 20 31 36 34 30 00 05 1A 86 06 43 50 24 28 |". 1640.....CP$(|
000011F0: 50 4C 25 29 B2 4E 41 24 28 49 29 3A 50 4C 25 B2 |PL%).NA$(I):PL%.|
00001200: 50 4C 25 AA 31 00 25 1A 90 06 99 22 91 91 91 22 |PL%.1.%...."..."|
00001210: 53 50 24 3A 99 53 50 24 3A 99 53 50 24 22 91 91 |SP$:.SP$:.SP$"..|
00001220: 91 91 22 3A 82 00 60 1A 9A 06 8B 50 4C 25 B2 30 |..":..`....PL%.0|
00001230: A7 99 22 91 22 53 50 24 3A 99 22 11 11 20 20 20 |.."."SP$:.".. |
00001240: 20 20 20 20 20 20 20 41 42 4F 52 54 20 22 4B 24 | ABORT "K$|
00001250: 22 2E 2E 2E 22 3A 51 55 25 B2 30 3A 89 37 36 30 |"...":QU%.0:.760|
00001260: 00 77 1A A4 06 8B 41 46 25 A7 99 22 91 22 53 50 |.w....AF%.."."SP|
00001270: 24 3A 89 31 37 36 30 00 8A 1A AE 06 8B 51 25 B0 |$:.1760......Q%.|
00001280: 50 4C 25 B2 31 A7 31 38 31 30 00 B1 1A B8 06 99 |PL%.1.1810......|
00001290: 22 91 22 53 50 24 3A 99 22 41 4C 50 48 41 42 45 |"."SP$:."ALPHABE|
000012A0: 54 49 43 41 4C 20 53 4F 52 54 20 28 59 2F 4E 29 |TICAL SORT (Y/N)|
000012B0: 22 00 C8 1A C2 06 8D 36 38 30 3A 8B 54 41 24 B2 |"......680:.TA$.|
000012C0: 22 4E 22 A7 31 38 31 30 00 DB 1A CC 06 8B 54 41 |"N".1810......TA|
000012D0: 24 B3 B1 22 59 22 A7 31 37 33 30 00 FD 1A D6 06 |$.."Y".1730.....|
000012E0: 8F 20 2A 2A 2A 20 41 4C 46 41 20 53 4F 52 54 20 |. *** ALFA SORT |
000012F0: 28 45 49 4E 46 41 43 48 29 20 2A 2A 2A 00 0E 1B |(EINFACH) ***...|
00001300: E0 06 99 22 11 11 53 4F 52 54 49 4E 47 22 00 26 |..."..SORTING".&|
00001310: 1B EA 06 45 52 25 B2 30 3A 81 49 B2 50 4C 25 AB |...ER%.0:.I.PL%.|
00001320: 32 A4 30 A9 AB 31 00 67 1B F4 06 8B 43 50 24 28 |2.0..1.g....CP$(|
00001330: 49 29 B1 43 50 24 28 49 AA 31 29 A7 48 24 B2 43 |I).CP$(I.1).H$.C|
00001340: 50 24 28 49 AA 31 29 3A 43 50 24 28 49 AA 31 29 |P$(I.1):CP$(I.1)|
00001350: B2 43 50 24 28 49 29 3A 43 50 24 28 49 29 B2 48 |.CP$(I):CP$(I).H|
00001360: 24 3A 45 52 25 B2 31 00 85 1B FE 06 82 3A 8B 45 |$:ER%.1......:.E|
00001370: 52 25 A7 31 37 37 30 3A 8F 20 4E 4F 43 48 4D 41 |R%.1770:. NOCHMA|
00001380: 4C 20 2E 2E 2E 00 A2 1B 08 07 8F 20 2A 2A 2A 20 |L ......... *** |
00001390: 43 4F 50 59 20 46 49 4C 45 53 20 2E 2E 2E 20 2A |COPY FILES ... *|
000013A0: 2A 2A 00 CA 1B 12 07 8B 51 25 A7 51 55 25 B2 AB |**......Q%.QU%..|
000013B0: 31 3A 8F 20 44 49 52 20 4E 49 43 48 54 20 4D 45 |1:. DIR NICHT ME|
000013C0: 48 52 20 47 55 45 4C 54 49 47 00 DD 1B 1C 07 8D |HR GUELTIG......|
000013D0: 32 31 33 30 3A 8F 20 52 41 48 4D 45 4E 00 EC 1B |2130:. RAHMEN...|
000013E0: 26 07 81 49 B2 30 A4 50 4C 25 AB 31 00 03 1C 30 |&..I.0.PL%.1...0|
000013F0: 07 99 22 1D 22 43 50 24 28 49 29 A3 31 39 AA 54 |.."."CP$(I).19.T|
00001400: 42 29 3B 00 3F 1C 3A 07 8B 51 25 B2 30 A7 98 31 |B);.?.:..Q%.0..1|
00001410: 35 2C 22 43 22 AA C7 28 34 38 AA 31 AB 44 52 25 |5,"C"..(48.1.DR%|
00001420: 29 AA 22 3A 22 AA 43 50 24 28 49 29 AA 22 3D 22 |).":".CP$(I)."="|
00001430: AA 44 52 24 AA 22 3A 22 AA 43 50 24 28 49 29 00 |.DR$.":".CP$(I).|
00001440: 5E 1C 44 07 8B 51 25 A7 98 31 35 2C 22 53 22 AA |^.D..Q%..15,"S".|
00001450: 44 52 24 AA 22 3A 22 AA 43 50 24 28 49 29 00 76 |DR$.":".CP$(I).v|
00001460: 1C 4E 07 8D 32 32 32 30 3A 99 44 24 3A 45 52 25 |.N..2220:.D$:ER%|
00001470: 28 49 29 B2 45 25 00 9E 1C 58 07 8B 45 25 B2 37 |(I).E%...X..E%.7|
00001480: 32 A7 99 A3 31 39 AA 54 42 29 22 12 41 42 42 52 |2...19.TB)".ABBR|
00001490: 55 43 48 12 20 21 21 21 22 3A 89 37 36 30 00 B9 |UCH. !!!":.760..|
000014A0: 1C 62 07 8B 45 25 A7 45 52 25 B2 45 52 25 AA 31 |.b..E%.ER%.ER%.1|
000014B0: 3A 8F 20 46 45 48 4C 45 52 00 CE 1C 6C 07 8B C2 |:. FEHLER...l...|
000014C0: 28 32 31 34 29 B1 32 32 A7 8D 32 31 38 30 00 FD |(214).22..2180..|
000014D0: 1C 76 07 82 3A 8B 45 52 25 B2 30 B0 51 25 A7 99 |.v..:.ER%.0.Q%..|
000014E0: A3 32 30 AA 54 42 29 22 2A 2A 2A 20 45 20 4E 20 |.20.TB)"*** E N |
000014F0: 44 20 45 20 2A 2A 2A 22 3A 89 37 36 30 00 08 1D |D E ***":.760...|
00001500: 80 07 8B 41 46 25 A7 8E 00 28 1D 8A 07 8F 20 2A |...AF%...(.... *|
00001510: 2A 2A 20 46 45 48 4C 45 52 20 42 45 48 41 4E 44 |** FEHLER BEHAND|
00001520: 4C 55 4E 47 20 2A 2A 2A 00 64 1D 94 07 4B 4F 24 |LUNG ***.d...KO$|
00001530: B2 C4 28 45 52 25 29 AA 22 20 4B 4F 50 49 45 52 |..(ER%)." KOPIER|
00001540: 46 45 48 4C 45 52 20 22 3A 8B 45 52 25 B1 31 A7 |FEHLER ":.ER%.1.|
00001550: 4B 4F 24 B2 4B 4F 24 AA 22 53 49 4E 44 22 3A 89 |KO$.KO$."SIND":.|
00001560: 31 39 36 30 00 76 1D 9E 07 4B 4F 24 B2 4B 4F 24 |1960.v...KO$.KO$|
00001570: AA 22 49 53 54 22 00 93 1D A8 07 4B 4F 24 B2 4B |."IST".....KO$.K|
00001580: 4F 24 AA 22 20 41 55 46 47 45 54 52 45 54 45 4E |O$." AUFGETRETEN|
00001590: 20 21 22 00 B3 1D B2 07 81 49 B2 30 A4 50 4C 25 | !"......I.0.PL%|
000015A0: AB 31 3A 8B 45 52 25 28 49 29 B3 B1 36 33 A7 32 |.1:.ER%(I)..63.2|
000015B0: 31 31 30 00 BC 1D BC 07 8D 31 37 30 00 CF 1D C6 |110......170....|
000015C0: 07 99 22 11 11 11 12 22 43 50 24 28 49 29 3B 00 |.."...."CP$(I);.|
000015D0: F0 1D D0 07 99 A3 32 30 AA 54 42 29 22 92 45 58 |......20.TB)".EX|
000015E0: 49 53 54 49 45 52 54 20 42 45 52 45 49 54 53 2E |ISTIERT BEREITS.|
000015F0: 00 27 1E DA 07 99 22 11 11 12 4C 92 4F 45 53 43 |.'...."...L.OESC|
00001600: 48 45 4E 2C 20 12 55 92 4D 42 45 4E 45 4E 4E 45 |HEN, .U.MBENENNE|
00001610: 4E 2C 20 12 49 92 47 4E 4F 52 49 45 52 45 4E 20 |N, .I.GNORIEREN |
00001620: 28 4C 2F 55 2F 49 29 00 4B 1E E4 07 8D 36 38 30 |(L/U/I).K....680|
00001630: 3A 8B 54 41 24 B2 22 49 22 A7 32 31 30 30 3A 8F |:.TA$."I".2100:.|
00001640: 20 49 47 4E 4F 52 49 45 52 45 4E 00 6C 1E EE 07 | IGNORIEREN.l...|
00001650: 8B 54 41 24 B2 22 4C 22 A7 32 30 37 30 3A 8F 20 |.TA$."L".2070:. |
00001660: 53 43 52 41 54 43 48 26 43 4F 50 59 00 8F 1E F8 |SCRATCH©....|
00001670: 07 8B 54 41 24 B3 B1 22 55 22 A7 32 30 32 30 3A |..TA$.."U".2020:|
00001680: 8F 20 46 41 4C 53 43 48 45 20 54 41 53 54 45 00 |. FALSCHE TASTE.|
00001690: AC 1E 02 08 99 22 11 11 4E 45 57 20 4E 41 4D 45 |....."..NEW NAME|
000016A0: 20 3F 20 22 3B 3A 84 31 2C 4E 4E 24 00 C4 1E 0C | ? ";:.1,NN$....|
000016B0: 08 89 20 32 30 38 30 3A 8F 20 43 4F 50 59 20 41 |.. 2080:. COPY A|
000016C0: 47 41 49 4E 00 F1 1E 16 08 4E 4E 24 B2 22 2A 22 |GAIN.....NN$."*"|
000016D0: 3A 98 31 35 2C 22 53 22 AA C7 28 34 38 AA 28 31 |:.15,"S"..(48.(1|
000016E0: AB 44 52 25 29 29 AA 22 3A 22 AA 43 50 24 28 49 |.DR%)).":".CP$(I|
000016F0: 29 00 24 1F 20 08 98 31 35 2C 22 43 22 AA C7 28 |).$. ..15,"C"..(|
00001700: 34 38 AA 31 AB 44 52 25 29 AA 22 3A 22 AA 4E 4E |48.1.DR%).":".NN|
00001710: 24 AA 22 3D 22 AA 44 52 24 AA 22 3A 22 AA 43 50 |$."=".DR$.":".CP|
00001720: 24 28 49 29 00 3E 1F 2A 08 8B 44 53 A7 31 39 39 |$(I).>.*..DS.199|
00001730: 30 3A 8F 20 4E 4F 43 48 4D 41 4C 2E 2E 2E 00 56 |0:. NOCHMAL....V|
00001740: 1F 34 08 99 53 50 24 3A 99 53 50 24 3A 99 53 50 |.4..SP$:.SP$:.SP|
00001750: 24 3A 99 53 50 24 00 5F 1F 3E 08 82 20 3A 8E 00 |$:.SP$._.>.. :..|
00001760: 79 1F 48 08 8F 20 2A 2A 2A 20 54 45 58 54 46 45 |y.H.. *** TEXTFE|
00001770: 4E 53 54 45 52 20 2A 2A 2A 00 7F 1F 52 08 8F 00 |NSTER ***...R...|
00001780: A8 1F 5C 08 99 22 93 22 A3 28 31 36 AB C3 28 4B |..\..".".(16..(K|
00001790: 4F 24 29 AD 32 29 AA 54 42 29 22 2A 2A 2A 20 22 |O$).2).TB)"*** "|
000017A0: 4B 4F 24 22 20 2A 2A 2A 00 D6 1F 66 08 99 22 B0 |KO$" ***...f..".|
000017B0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000017C0: C0 B2 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000017D0: C0 C0 C0 C0 C0 AE 00 05 20 70 08 99 22 DD 20 20 |........ p..". |
000017E0: 20 46 49 4C 45 20 2D 20 4E 41 4D 45 20 20 20 DD | FILE - NAME .|
000017F0: 20 20 20 46 49 4C 45 20 2D 20 53 54 41 54 45 20 | FILE - STATE |
00001800: 20 20 20 DD 22 00 33 20 7A 08 99 22 AB C0 C0 C0 | .".3 z.."....|
00001810: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 DB C0 |................|
00001820: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001830: C0 C0 B3 00 4E 20 84 08 99 22 13 11 11 11 22 3A |....N ..."....":|
00001840: 81 4B B2 31 A4 32 30 3A 99 46 4F 24 3A 82 00 7E |.K.1.20:.FO$:..~|
00001850: 20 8E 08 99 22 AD C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 | ..."...........|
00001860: C0 C0 C0 C0 C0 C0 C0 B1 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001870: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 BD 22 3B 00 8C |............";..|
00001880: 20 98 08 99 22 13 11 11 11 22 3A 8E 00 A5 20 A2 | ..."....":... .|
00001890: 08 8F 20 2A 2A 2A 20 46 4F 52 4D 41 54 20 44 53 |.. *** FORMAT DS|
000018A0: 24 20 2A 2A 2A 00 C1 20 AC 08 8D 33 37 38 30 3A |$ ***.. ...3780:|
000018B0: 44 24 B2 45 24 3A 44 24 B2 C8 28 44 24 2C 31 39 |D$.E$:D$..(D$,19|
000018C0: 29 00 F5 20 B6 08 44 24 B2 C9 28 22 20 20 20 20 |).. ..D$..(" |
000018D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000018E0: 20 20 20 20 20 20 22 AA 44 24 2C 39 AA C3 28 44 | ".D$,9..(D|
000018F0: 24 29 AD 32 29 00 05 21 C0 08 44 24 B2 C8 28 44 |$).2)..!..D$..(D|
00001900: 24 2C 31 39 29 00 0B 21 CA 08 8E 00 20 21 D4 08 |$,19)..!.... !..|
00001910: 8F 2A 2A 2A 20 43 41 54 41 4C 4F 47 20 2A 2A 2A |.*** CATALOG ***|
00001920: 00 26 21 DE 08 3A 00 51 21 E8 08 8B 42 38 A7 4B |.&!..:.Q!...B8.K|
00001930: 4F 24 B2 22 52 45 41 44 49 4E 47 20 44 49 52 45 |O$."READING DIRE|
00001940: 43 54 4F 52 59 22 3A 8D 31 37 30 3A 89 32 33 32 |CTORY":.170:.232|
00001950: 30 00 8F 21 F2 08 4B 4F 24 B2 20 22 42 4C 4F 43 |0..!..KO$. "BLOC|
00001960: 4B 53 20 20 20 20 46 49 4C 45 20 4E 41 4D 45 20 |KS FILE NAME |
00001970: 20 20 20 54 59 50 20 20 20 53 54 41 52 54 22 3A | TYP START":|
00001980: 8D 31 37 30 3A 8D 37 32 30 3A 99 22 11 11 22 00 |.170:.720:."..".|
00001990: CC 21 FC 08 54 59 24 B2 22 41 22 3A 8D 33 31 30 |.!..TY$."A":.310|
000019A0: 3A 8D 31 37 30 3A 8D 33 36 37 30 3A 99 22 11 11 |:.170:.3670:."..|
000019B0: 22 A3 31 33 AA 54 42 29 22 12 50 52 45 53 53 20 |".13.TB)".PRESS |
000019C0: 53 50 41 43 45 22 3B 3A 89 36 38 30 00 E6 21 06 |SPACE";:.680..!.|
000019D0: 09 99 22 11 46 45 48 4C 45 52 20 3D 20 12 22 45 |..".FEHLER = ."E|
000019E0: 24 3A 89 36 38 30 00 F7 21 10 09 81 49 B2 30 A4 |$:.680..!...I.0.|
000019F0: 31 3A 44 52 25 B2 49 00 26 22 1A 09 99 22 13 13 |1:DR%.I.&"..."..|
00001A00: 11 11 11 11 22 A3 35 AA 44 52 25 AC 33 35 29 22 |....".5.DR%.35)"|
00001A10: 0F 93 22 3A 97 32 31 34 2C 32 33 3A 99 A3 37 39 |..":.214,23:..79|
00001A20: 29 22 8F 13 22 3B 00 63 22 24 09 44 52 24 B2 C7 |)"..";.c"$.DR$..|
00001A30: 28 49 AA 34 38 29 3A 98 31 35 2C 22 49 22 AA 44 |(I.48):.15,"I".D|
00001A40: 52 24 3A 8D 33 37 38 30 3A 8B 45 25 B2 30 A7 A0 |R$:.3780:.E%.0..|
00001A50: 31 35 3A D7 44 28 44 52 25 29 3A 9F 31 35 2C 38 |15:.D(DR%):.15,8|
00001A60: 2C 31 35 00 8E 22 2E 09 82 3A 99 3A 99 3A 97 32 |,15.."...:.:.:.2|
00001A70: 31 31 2C 30 3A 99 A3 33 32 29 22 12 50 52 45 53 |11,0:..32)".PRES|
00001A80: 53 20 53 50 41 43 45 22 3B 3A 8D 36 38 30 00 9B |S SPACE";:.680..|
00001A90: 22 38 09 99 22 13 13 93 22 3A 8E 00 BB 22 42 09 |"8.."...":..."B.|
00001AA0: 8F 2A 2A 2A 20 46 49 4E 44 20 53 50 45 43 49 46 |.*** FIND SPECIF|
00001AB0: 49 43 20 46 49 4C 45 20 2A 2A 2A 00 E9 22 4C 09 |IC FILE ***.."L.|
00001AC0: 8B C8 28 48 24 2C C3 28 46 49 24 29 29 B3 B1 46 |..(H$,.(FI$))..F|
00001AD0: 49 24 20 A7 20 34 39 30 3A 8F 20 4E 49 43 48 54 |I$ . 490:. NICHT|
00001AE0: 20 47 45 46 55 4E 44 45 4E 00 F9 22 56 09 8B 52 | GEFUNDEN.."V..R|
00001AF0: 45 25 A7 5A 25 B2 30 3A 8E 00 2D 23 60 09 42 55 |E%.Z%.0:..-#`.BU|
00001B00: 25 B2 42 55 25 AA 31 3A 8D 38 30 30 3A 8D 31 34 |%.BU%.1:.800:.14|
00001B10: 30 3A 54 52 25 B2 42 59 25 3A 8D 31 34 30 3A 53 |0:TR%.BY%:.140:S|
00001B20: 43 25 B2 42 59 25 3A 5A 25 B2 30 3A 8E 00 42 23 |C%.BY%:Z%.0:..B#|
00001B30: 6A 09 49 B2 49 AB 32 3A 8B 49 B3 AB 31 A7 49 B2 |j.I.I.2:.I..1.I.|
00001B40: AB 31 00 48 23 74 09 8E 00 6A 23 7E 09 8F 20 2A |.1.H#t...j#~.. *|
00001B50: 2A 2A 2A 20 56 49 45 57 20 46 49 4C 45 20 4F 4E |*** VIEW FILE ON|
00001B60: 20 44 49 53 4B 20 2A 2A 2A 2A 00 87 23 88 09 4B | DISK ****..#..K|
00001B70: 4F 24 B2 22 46 49 4C 45 20 2D 20 53 45 41 52 43 |O$."FILE - SEARC|
00001B80: 48 22 3A 8D 31 37 30 00 A3 23 92 09 99 22 45 4E |H":.170..#..."EN|
00001B90: 54 45 52 20 46 49 4C 45 20 4E 41 4D 45 20 20 20 |TER FILE NAME |
00001BA0: 20 22 3B 00 B0 23 9C 09 84 31 2C 46 49 24 3A 99 | ";..#...1,FI$:.|
00001BB0: 00 C3 23 A6 09 54 59 24 B2 22 41 22 3A 51 55 25 |..#..TY$."A":QU%|
00001BC0: B2 AB 31 00 D8 23 B0 09 99 22 11 11 57 41 49 54 |..1..#..."..WAIT|
00001BD0: 91 22 3B 3A 8D 37 32 30 00 04 24 BA 09 5A 25 B2 |.";:.720..$..Z%.|
00001BE0: AB 31 3A 8D 33 32 30 3A 8B 5A 25 A7 99 22 11 11 |.1:.320:.Z%.."..|
00001BF0: 4E 4F 54 20 46 4F 55 4E 44 22 3A 5A 25 B2 30 3A |NOT FOUND":Z%.0:|
00001C00: 89 36 38 30 00 14 24 C4 09 46 49 24 B2 48 24 3A |.680..$..FI$.H$:|
00001C10: 8D 32 38 30 00 3D 24 CE 09 99 22 13 13 11 11 11 |.280.=$...".....|
00001C20: 11 0F 93 22 A3 32 30 29 22 0F 93 4C 49 53 54 49 |...".20)"..LISTI|
00001C30: 4E 47 20 46 49 4C 45 53 12 22 46 49 24 00 6B 24 |NG FILES."FI$.k$|
00001C40: D8 09 99 22 11 44 49 45 53 45 52 20 42 4C 4F 43 |...".DIESER BLOC|
00001C50: 4B 20 49 4E 20 20 20 20 20 20 20 3A 20 20 20 20 |K IN : |
00001C60: 20 22 54 52 25 22 2C 22 53 43 25 00 A4 24 E2 09 | "TR%","SC%..$..|
00001C70: 99 22 11 4E 41 45 43 48 53 54 45 52 20 42 4C 4F |.".NAECHSTER BLO|
00001C80: 43 4B 20 49 4E 20 20 20 20 3A 20 20 20 20 20 22 |CK IN : "|
00001C90: 3B 3A 8D 31 34 30 3A 99 42 59 25 3B 3A 54 52 25 |;:.140:.BY%;:TR%|
00001CA0: B2 42 59 25 00 C8 24 EC 09 99 A3 32 38 AA 54 42 |.BY%..$....28.TB|
00001CB0: 29 22 9D 2C 22 3B 3A 8D 31 34 30 3A 99 42 59 25 |)".,";:.140:.BY%|
00001CC0: 3A 53 43 25 B2 42 59 25 00 06 25 F6 09 99 22 11 |:SC%.BY%..%...".|
00001CD0: 53 54 41 52 54 20 41 44 52 45 53 53 45 20 20 20 |START ADRESSE |
00001CE0: 20 20 20 20 20 20 3A 20 22 3B 3A 8D 31 34 30 3A | : ";:.140:|
00001CF0: 41 B2 42 59 25 3A 8D 31 34 30 3A 41 B2 41 AA 32 |A.BY%:.140:A.A.2|
00001D00: 35 36 AC 42 59 25 00 20 25 00 0A 99 A3 32 38 AA |56.BY%. %....28.|
00001D10: 54 42 29 41 A3 33 35 AA 54 42 29 22 44 45 5A 22 |TB)A.35.TB)"DEZ"|
00001D20: 00 5E 25 0A 0A 99 22 11 45 52 53 54 45 20 4C 49 |.^%...".ERSTE LI|
00001D30: 4E 4B 41 44 52 45 53 53 45 20 20 20 20 20 3A 20 |NKADRESSE : |
00001D40: 22 3B 3A 8D 31 34 30 3A 41 B2 42 59 25 3A 8D 31 |";:.140:A.BY%:.1|
00001D50: 34 30 3A 41 B2 41 AA 32 35 36 AC 42 59 25 00 78 |40:A.A.256.BY%.x|
00001D60: 25 14 0A 99 A3 32 38 AA 54 42 29 41 A3 33 35 AA |%....28.TB)A.35.|
00001D70: 54 42 29 22 44 45 5A 22 00 B6 25 1E 0A 99 22 11 |TB)"DEZ"..%...".|
00001D80: 45 52 53 54 45 20 5A 45 49 4C 45 4E 4E 55 4D 4D |ERSTE ZEILENNUMM|
00001D90: 45 52 20 20 20 20 3A 20 22 3B 3A 8D 31 34 30 3A |ER : ";:.140:|
00001DA0: 41 B2 42 59 25 3A 8D 31 34 30 3A 41 B2 41 AA 32 |A.BY%:.140:A.A.2|
00001DB0: 35 36 AC 42 59 25 00 D0 25 28 0A 99 A3 32 38 AA |56.BY%..%(...28.|
00001DC0: 54 42 29 41 A3 33 35 AA 54 42 29 22 44 45 5A 22 |TB)A.35.TB)"DEZ"|
00001DD0: 00 FB 25 32 0A 99 22 11 41 53 43 49 49 44 55 4D |..%2..".ASCIIDUM|
00001DE0: 50 3A 22 3A 51 41 25 B2 35 3A 51 42 25 B2 33 33 |P:":QA%.5:QB%.33|
00001DF0: 3A 8B 42 38 A7 51 42 25 B2 37 35 00 33 26 3C 0A |:.B8.QB%.75.3&<.|
00001E00: 48 58 24 B2 22 22 3A 81 49 B2 38 A4 32 35 35 3A |HX$."":.I.8.255:|
00001E10: 8D 31 34 30 3A 48 58 24 B2 48 58 24 AA 42 59 24 |.140:HX$.HX$.BY$|
00001E20: 3A 82 3A 99 3A 97 32 31 31 2C 51 41 25 3A 99 22 |:.:.:.211,QA%:."|
00001E30: 3A 22 3B 00 43 26 46 0A 81 49 B2 31 A4 C3 28 48 |:";.C&F..I.1..(H|
00001E40: 58 24 29 00 65 26 50 0A 8B B9 28 49 29 B1 51 42 |X$).e&P...(I).QB|
00001E50: 25 A7 99 22 3A 22 3A 97 32 31 31 2C 51 41 25 3A |%..":":.211,QA%:|
00001E60: 99 22 3A 22 3B 00 80 26 5A 0A 43 24 B2 CA 28 48 |.":";..&Z.C$..(H|
00001E70: 58 24 2C 49 2C 31 29 3A 43 25 B2 C6 28 43 24 29 |X$,I,1):C%..(C$)|
00001E80: 00 9C 26 64 0A 8B 43 25 B1 31 32 37 A7 99 22 12 |..&d..C%.127..".|
00001E90: 22 3B 3A 43 25 B2 43 25 AF 31 32 37 00 AD 26 6E |";:C%.C%.127..&n|
00001EA0: 0A 8B 43 25 B3 33 32 A7 43 25 B2 33 32 00 BE 26 |..C%.32.C%.32..&|
00001EB0: 78 0A 8B 43 25 B2 33 34 A7 8D 33 36 36 30 00 E5 |x..C%.34..3660..|
00001EC0: 26 82 0A 99 C7 28 43 25 29 22 92 22 3B 3A 82 3A |&....(C%)".";:.:|
00001ED0: 97 32 31 31 2C 51 42 25 AA 31 3A 99 22 3A 22 3A |.211,QB%.1:.":":|
00001EE0: 8B 42 38 A7 99 00 11 27 8C 0A 8B 54 52 25 B2 30 |.B8....'...TR%.0|
00001EF0: A7 99 2C 22 50 52 45 53 53 20 53 50 41 43 45 20 |..,"PRESS SPACE |
00001F00: 46 4F 52 20 4D 45 4E 55 22 3A A0 38 3A 89 36 38 |FOR MENU":.8:.68|
00001F10: 30 00 3C 27 96 0A 99 22 12 45 92 20 54 4F 20 45 |0.<'...".E. TO E|
00001F20: 4E 44 20 12 4E 92 20 54 4F 20 52 45 41 44 20 4E |ND .N. TO READ N|
00001F30: 45 58 54 20 42 4C 4F 43 4B 2E 22 3B 00 5A 27 A0 |EXT BLOCK.";.Z'.|
00001F40: 0A 8D 36 38 30 3A 8B 54 41 24 B2 22 45 22 A7 A0 |..680:.TA$."E"..|
00001F50: 38 3A 99 22 13 13 93 22 3A 8E 00 6D 27 AA 0A 8B |8:."...":..m'...|
00001F60: 54 41 24 B3 B1 22 4E 22 A7 32 37 32 30 00 77 27 |TA$.."N".2720.w'|
00001F70: B4 0A 89 32 35 30 30 00 99 27 BE 0A 8F 20 2A 2A |...2500..'... **|
00001F80: 2A 20 4E 41 4D 45 4E 20 26 20 49 44 20 41 45 4E |* NAMEN & ID AEN|
00001F90: 44 45 52 4E 20 2A 2A 2A 2A 00 C0 27 C8 0A 4B 4F |DERN ****..'..KO|
00001FA0: 24 B2 22 44 49 53 4B 20 4E 41 4D 45 20 26 20 49 |$."DISK NAME & I|
00001FB0: 44 20 43 48 41 4E 47 45 53 22 3A 8D 20 31 37 30 |D CHANGES":. 170|
00001FC0: 00 D4 27 D2 0A 8D 20 37 32 30 3A 8F 20 44 52 49 |..'... 720:. DRI|
00001FD0: 56 45 20 23 00 EB 27 DC 0A 8D 20 36 32 30 3A 8F |VE #..'... 620:.|
00001FE0: 20 4E 41 4D 45 20 2B 20 49 44 24 00 04 28 E6 0A | NAME + ID$..(..|
00001FF0: 99 22 11 11 44 49 53 4B 4E 41 4D 45 20 20 3A 20 |."..DISKNAME : |
00002000: 22 4E 41 24 00 1C 28 F0 0A 99 22 11 44 49 53 4B |"NA$..(...".DISK|
00002010: 20 49 44 20 20 20 3A 20 22 49 44 24 00 4D 28 FA | ID : "ID$.M(.|
00002020: 0A 99 22 11 11 4D 41 4B 45 20 59 4F 55 52 20 53 |.."..MAKE YOUR S|
00002030: 45 4C 45 43 54 49 4F 4E 20 12 49 92 44 20 12 4E |ELECTION .I.D .N|
00002040: 92 41 4D 45 20 12 41 92 42 4F 52 54 22 00 64 28 |.AME .A.BORT".d(|
00002050: 04 0B 8D 36 38 30 3A 8B 54 41 24 B2 22 41 22 A7 |...680:.TA$."A".|
00002060: A0 38 3A 8E 00 76 28 0E 0B 8B 54 41 24 B2 22 49 |.8:..v(...TA$."I|
00002070: 22 A7 32 39 31 30 00 89 28 18 0B 8B 54 41 24 B3 |".2910..(...TA$.|
00002080: B1 22 4E 22 A7 32 38 32 30 00 A5 28 22 0B 8F 20 |."N".2820..(".. |
00002090: 2A 2A 2A 20 4E 41 4D 45 4E 20 41 45 4E 44 45 52 |*** NAMEN AENDER|
000020A0: 4E 20 2A 2A 2A 00 D0 28 2C 0B 99 22 11 4E 45 57 |N ***..(,..".NEW|
000020B0: 20 4E 41 4D 45 20 3F 20 22 3B 3A 58 25 B2 B9 28 | NAME ? ";:X%..(|
000020C0: 49 29 3A 99 4E 41 24 3B 3A 97 32 31 31 2C 58 25 |I):.NA$;:.211,X%|
000020D0: 00 E8 28 36 0B 84 31 2C 4E 41 24 3A 42 55 25 B2 |..(6..1,NA$:BU%.|
000020E0: 31 34 34 3A 8D 38 30 30 00 08 29 40 0B 4E 41 24 |144:.800..)@.NA$|
000020F0: B2 4E 41 24 AA 22 20 20 20 20 20 20 20 20 20 20 |.NA$." |
00002100: 20 20 20 20 20 20 20 22 00 1A 29 4A 0B 4E 41 24 | "..)J.NA$|
00002110: B2 C8 28 4E 41 24 2C 31 36 29 00 2C 29 54 0B 98 |..(NA$,16).,)T..|
00002120: 38 2C 4E 41 24 3B 3A 89 32 39 37 30 00 45 29 5E |8,NA$;:.2970.E)^|
00002130: 0B 8F 20 2A 2A 2A 20 49 44 20 41 45 4E 44 45 52 |.. *** ID AENDER|
00002140: 4E 20 2A 2A 2A 00 6E 29 68 0B 99 22 11 4E 45 57 |N ***.n)h..".NEW|
00002150: 20 49 44 20 3F 20 22 3B 3A 58 25 B2 B9 28 49 29 | ID ? ";:X%..(I)|
00002160: 3A 99 49 44 24 3B 3A 97 32 31 31 2C 58 25 00 86 |:.ID$;:.211,X%..|
00002170: 29 72 0B 84 31 2C 49 44 24 3A 42 55 25 B2 31 36 |)r..1,ID$:BU%.16|
00002180: 32 3A 8D 38 30 30 00 AF 29 7C 0B 58 B2 C3 28 49 |2:.800..)|.X..(I|
00002190: 44 24 29 3A 49 44 24 B2 49 44 24 AA CA 28 22 20 |D$):ID$.ID$..(" |
000021A0: 20 20 32 41 20 22 2C 58 AA 31 2C 36 AB 58 29 00 | 2A ",X.1,6.X).|
000021B0: C0 29 86 0B 49 44 24 B2 C8 28 49 44 24 2C 35 29 |.)..ID$..(ID$,5)|
000021C0: 00 CC 29 90 0B 98 38 2C 49 44 24 3B 00 EF 29 9A |..)...8,ID$;..).|
000021D0: 0B 98 31 35 2C 22 55 32 3A 38 22 44 52 25 2C 31 |..15,"U2:8"DR%,1|
000021E0: 38 2C 30 3A 98 31 35 2C 22 49 22 AA 44 52 24 00 |8,0:.15,"I".DR$.|
000021F0: F8 29 A4 0B A0 38 3A 8E 00 1C 2A AE 0B 8F 20 2A |.)...8:...*... *|
00002200: 2A 2A 2A 20 54 45 53 54 4C 45 53 45 4E 20 45 49 |*** TESTLESEN EI|
00002210: 4E 45 52 20 44 49 53 4B 20 2A 2A 2A 00 56 2A B8 |NER DISK ***.V*.|
00002220: 0B 45 42 25 B2 30 3A 45 53 25 B2 30 3A 45 43 25 |.EB%.0:ES%.0:EC%|
00002230: B2 30 3A 44 43 25 B2 30 3A 48 44 25 B2 30 3A 45 |.0:DC%.0:HD%.0:E|
00002240: 58 25 B2 30 3A 45 52 25 B2 30 3A 46 52 25 B2 30 |X%.0:ER%.0:FR%.0|
00002250: 3A 42 45 25 B2 30 00 72 2A C2 0B 4B 4F 24 B2 22 |:BE%.0.r*..KO$."|
00002260: 54 45 53 54 20 52 45 41 44 49 4E 47 22 3A 8D 31 |TEST READING":.1|
00002270: 37 30 00 8E 2A CC 0B 99 22 52 45 41 44 49 4E 47 |70..*..."READING|
00002280: 20 46 52 4F 4E 20 91 22 3B 3A 8D 37 32 30 00 A3 | FRON .";:.720..|
00002290: 2A D6 0B 54 52 25 B2 31 3A 53 43 25 B2 30 3A 8D |*..TR%.1:SC%.0:.|
000022A0: 32 35 30 00 C5 2A E0 0B 41 4E 25 B2 31 3A 45 4E |250..*..AN%.1:EN|
000022B0: 25 B2 33 35 3A 8F 20 44 45 46 41 55 4C 54 20 56 |%.35:. DEFAULT V|
000022C0: 41 4C 55 45 53 00 ED 2A EA 0B 99 22 11 11 52 45 |ALUES..*..."..RE|
000022D0: 41 44 20 53 45 43 54 4F 52 20 53 45 4C 45 43 54 |AD SECTOR SELECT|
000022E0: 49 4F 4E 20 28 59 2F 4E 29 20 3F 20 22 00 04 2B |ION (Y/N) ? "..+|
000022F0: F4 0B 8D 36 38 30 3A 8B 54 41 24 B2 22 4E 22 A7 |...680:.TA$."N".|
00002300: 33 31 33 30 00 17 2B FE 0B 8B 54 41 24 B3 B1 22 |3130..+...TA$.."|
00002310: 59 22 A7 33 30 36 30 00 3E 2B 08 0C 99 22 11 46 |Y".3060.>+...".F|
00002320: 52 4F 4D 20 54 52 41 43 4B 20 22 3B 3A 84 31 2C |ROM TRACK ";:.1,|
00002330: 54 41 24 3A 41 4E 25 B2 C5 28 54 41 24 29 00 5A |TA$:AN%..(TA$).Z|
00002340: 2B 12 0C 8B 41 4E 25 B2 30 A7 41 4E 25 B2 31 3A |+...AN%.0.AN%.1:|
00002350: 99 C7 28 32 30 29 22 31 22 3B 00 80 2B 1C 0C 99 |..(20)"1";..+...|
00002360: 22 20 20 54 4F 20 54 52 41 43 4B 20 22 3B 3A 84 |" TO TRACK ";:.|
00002370: 31 2C 54 41 24 3A 45 4E 25 B2 C5 28 54 41 24 29 |1,TA$:EN%..(TA$)|
00002380: 00 B3 2B 26 0C 8B 28 45 4E 25 B2 30 29 B0 28 45 |..+&..(EN%.0).(E|
00002390: 4E 25 B1 33 35 29 B0 28 45 4E 25 B3 41 4E 25 29 |N%.35).(EN%.AN%)|
000023A0: A7 45 4E 25 B2 33 35 3A 99 C7 28 32 30 29 22 33 |.EN%.35:..(20)"3|
000023B0: 35 22 3B 00 C1 2B 30 0C 99 20 3A 51 55 25 B2 AB |5";..+0.. :QU%..|
000023C0: 31 00 01 2C 3A 0C 4B 4F 24 B2 22 46 52 4F 4D 20 |1..,:.KO$."FROM |
000023D0: 54 52 41 43 4B 22 AA C4 28 41 4E 25 29 AA 22 20 |TRACK"..(AN%)." |
000023E0: 54 4F 20 54 52 41 43 4B 22 AA C4 28 45 4E 25 29 |TO TRACK"..(EN%)|
000023F0: 3A 48 31 24 B2 22 44 49 53 4B 20 43 48 45 43 4B |:H1$."DISK CHECK|
00002400: 22 00 0A 2C 44 0C 8D 31 37 30 00 15 2C 4E 0C 99 |"..,D..170..,N..|
00002410: 22 11 11 11 22 00 38 2C 58 0C 81 49 B2 41 4E 25 |"...".8,X..I.AN%|
00002420: A4 45 4E 25 3A 4A 4A 25 B2 32 30 3A 8B 49 B1 31 |.EN%:JJ%.20:.I.1|
00002430: 37 A7 4A 4A 25 B2 31 38 00 49 2C 62 0C 8B 49 B1 |7.JJ%.18.I,b..I.|
00002440: 32 34 A7 4A 4A 25 B2 31 37 00 6B 2C 6C 0C 8B 49 |24.JJ%.17.k,l..I|
00002450: B1 33 30 A7 4A 4A 25 B2 31 36 3A 8F 20 53 45 4B |.30.JJ%.16:. SEK|
00002460: 54 4F 52 45 4E 2F 54 52 41 43 4B 00 78 2C 76 0C |TOREN/TRACK.x,v.|
00002470: 81 4A B2 30 A4 4A 4A 25 00 8E 2C 80 0C 98 31 35 |.J.0.JJ%..,...15|
00002480: 2C 22 42 2D 41 3A 22 44 52 25 2C 49 2C 4A 00 B2 |,"B-A:"DR%,I,J..|
00002490: 2C 8A 0C 8B 44 53 B2 30 A7 46 52 25 B2 46 52 25 |,...DS.0.FR%.FR%|
000024A0: AA 31 3A 46 24 B2 22 46 52 45 45 22 3A 89 33 32 |.1:F$."FREE":.32|
000024B0: 33 30 00 DE 2C 94 0C 42 45 25 B2 42 45 25 AA 31 |30..,..BE%.BE%.1|
000024C0: 3A 46 24 B2 22 42 45 4C 45 47 54 22 3A 98 31 35 |:F$."BELEGT":.15|
000024D0: 2C 22 42 2D 46 3A 22 44 52 25 2C 49 2C 4A 00 F0 |,"B-F:"DR%,I,J..|
000024E0: 2C 9E 0C 99 22 13 11 11 11 11 11 11 22 53 50 24 |,..."......."SP$|
000024F0: 00 0F 2D A8 0C 99 22 91 54 52 41 43 4B 22 49 22 |..-...".TRACK"I"|
00002500: 53 45 43 54 4F 52 22 4A 22 3D 20 20 22 46 24 00 |SECTOR"J"= "F$.|
00002510: 24 2D B2 0C 54 52 25 B2 49 3A 53 43 25 B2 4A 3A |$-..TR%.I:SC%.J:|
00002520: 8D 32 38 30 00 4D 2D BC 0C 99 3A 8D 33 37 38 30 |.280.M-...:.3780|
00002530: 3A 44 24 B2 45 24 3A 99 53 50 24 3A 99 22 91 22 |:D$.E$:.SP$:."."|
00002540: 44 24 3A 8B 44 53 B2 30 A7 33 33 35 30 00 86 2D |D$:.DS.0.3350..-|
00002550: C6 0C 45 52 25 B2 45 52 25 AA 31 3A 8B 45 25 B2 |..ER%.ER%.1:.E%.|
00002560: 32 36 B0 45 25 B2 37 31 A7 99 22 4B 45 49 4E 20 |26.E%.71.."KEIN |
00002570: 54 45 53 54 20 4D 4F 45 47 4C 49 43 48 20 21 20 |TEST MOEGLICH ! |
00002580: 22 3A 89 36 38 30 00 A1 2D D0 0C 8B 45 25 B2 32 |":.680..-...E%.2|
00002590: 30 A7 45 42 25 B2 45 42 25 AA 31 3A 89 33 33 34 |0.EB%.EB%.1:.334|
000025A0: 30 00 BC 2D DA 0C 8B 45 25 B2 32 31 A7 45 53 25 |0..-...E%.21.ES%|
000025B0: B2 45 53 25 AA 31 3A 89 33 33 34 30 00 D7 2D E4 |.ES%.1:.3340..-.|
000025C0: 0C 8B 45 25 B2 32 33 A7 45 43 25 B2 45 43 25 AA |..E%.23.EC%.EC%.|
000025D0: 31 3A 89 33 33 34 30 00 F2 2D EE 0C 8B 45 25 B2 |1:.3340..-...E%.|
000025E0: 32 34 A7 44 43 25 B2 44 43 25 AA 31 3A 89 33 33 |24.DC%.DC%.1:.33|
000025F0: 34 30 00 13 2E F8 0C 8B 45 25 B2 32 37 B0 45 25 |40......E%.27.E%|
00002600: B2 32 39 A7 48 44 25 B2 48 44 25 AA 31 3A 89 33 |.29.HD%.HD%.1:.3|
00002610: 33 34 30 00 2E 2E 02 0D 8B 45 25 B2 32 38 A7 45 |340......E%.28.E|
00002620: 58 25 B2 45 58 25 AA 31 3A 89 33 33 34 30 00 49 |X%.EX%.1:.3340.I|
00002630: 2E 0C 0D A0 38 3A 8D 20 32 34 30 3A 8F 20 49 4E |....8:. 240:. IN|
00002640: 49 54 20 2B 20 4F 50 45 4E 00 55 2E 16 0D 82 4A |IT + OPEN.U....J|
00002650: 2C 49 3A A0 38 00 76 2E 20 0D 4B 4F 24 B2 22 46 |,I:.8.v. .KO$."F|
00002660: 45 48 4C 45 52 20 55 45 42 45 52 53 49 43 48 54 |EHLER UEBERSICHT|
00002670: 22 3A 8D 31 37 30 00 A1 2E 2A 0D 99 A3 33 AA 54 |":.170...*...3.T|
00002680: 42 29 22 42 45 4C 45 47 54 20 3D 22 42 45 25 A3 |B)"BELEGT ="BE%.|
00002690: 32 38 AA 54 42 29 22 46 52 45 49 20 3D 22 46 52 |28.TB)"FREI ="FR|
000026A0: 25 00 C8 2E 34 0D 99 A3 33 AA 54 42 29 22 11 48 |%...4...3.TB)".H|
000026B0: 45 41 44 45 52 20 46 45 48 4C 54 20 20 20 20 20 |EADER FEHLT |
000026C0: 20 20 20 3A 22 45 42 25 00 EF 2E 3E 0D 99 A3 33 | :"EB%...>...3|
000026D0: AA 54 42 29 22 11 53 59 4E 43 52 4F 4E 49 4D 50 |.TB)".SYNCRONIMP|
000026E0: 55 4C 53 20 46 45 48 4C 54 20 3A 22 45 53 25 00 |ULS FEHLT :"ES%.|
000026F0: 16 2F 48 0D 99 A3 33 AA 54 42 29 22 11 50 52 55 |./H...3.TB)".PRU|
00002700: 45 46 53 55 4D 4D 45 4E 20 46 45 48 4C 45 52 20 |EFSUMMEN FEHLER |
00002710: 20 3A 22 45 43 25 00 3D 2F 52 0D 99 A3 33 AA 54 | :"EC%.=/R...3.T|
00002720: 42 29 22 11 44 45 4B 4F 44 49 45 52 20 46 45 48 |B)".DEKODIER FEH|
00002730: 4C 45 52 20 20 20 20 20 3A 22 44 43 25 00 64 2F |LER :"DC%.d/|
00002740: 5C 0D 99 A3 33 AA 54 42 29 22 11 48 45 41 44 45 |\...3.TB)".HEADE|
00002750: 52 20 50 52 55 45 46 53 55 4D 4D 45 20 20 20 3A |R PRUEFSUMME :|
00002760: 22 48 44 25 00 8B 2F 66 0D 99 A3 33 AA 54 42 29 |"HD%../f...3.TB)|
00002770: 22 11 4C 41 4E 47 45 52 20 44 41 54 45 4E 20 42 |".LANGER DATEN B|
00002780: 4C 4F 43 4B 20 20 3A 22 45 58 25 00 BC 2F 70 0D |LOCK :"EX%../p.|
00002790: 99 A3 33 AA 54 42 29 22 11 11 47 45 53 41 4D 54 |..3.TB)"..GESAMT|
000027A0: 46 45 48 4C 45 52 20 20 20 20 20 20 20 20 3A 22 |FEHLER :"|
000027B0: 3B 3A 8B 45 52 25 A7 99 22 12 22 3B 00 D1 2F 7A |;:.ER%..".";../z|
000027C0: 0D 99 45 52 25 3A 98 31 35 2C 22 56 22 AA 44 52 |..ER%:.15,"V".DR|
000027D0: 24 00 F1 2F 84 0D 99 22 11 20 20 20 4D 41 4B 45 |$../...". MAKE|
000027E0: 20 59 4F 55 52 20 53 45 4C 45 43 54 49 4F 4E 22 | YOUR SELECTION"|
000027F0: 3B 00 FA 2F 8E 0D 89 36 38 30 00 1B 30 98 0D 8F |;../...680..0...|
00002800: 20 2A 2A 2A 20 55 4E 53 43 52 41 54 43 48 20 45 | *** UNSCRATCH E|
00002810: 49 4E 20 46 49 4C 45 20 2A 2A 2A 00 36 30 A2 0D |IN FILE ***.60..|
00002820: 4B 4F 24 B2 22 44 49 53 4B 20 46 49 4C 45 20 52 |KO$."DISK FILE R|
00002830: 45 54 54 45 52 22 00 66 30 AC 0D 8D 31 37 30 3A |ETTER".f0...170:|
00002840: 99 22 11 11 46 49 4C 45 20 4E 41 4D 45 20 5A 55 |."..FILE NAME ZU|
00002850: 4D 20 52 45 54 54 45 4E 20 3F 20 22 3B 3A 84 31 |M RETTEN ? ";:.1|
00002860: 2C 46 49 24 3A 99 00 7A 30 B6 0D 8D 20 37 32 30 |,FI$:..z0... 720|
00002870: 3A 8F 20 44 52 49 56 45 20 23 00 A6 30 C0 0D 54 |:. DRIVE #..0..T|
00002880: 59 24 B2 22 41 22 3A 51 55 25 B2 AB 31 3A 52 45 |Y$."A":QU%..1:RE|
00002890: 25 B2 AB 31 3A 5A 25 B2 AB 31 3A 8D 20 33 32 30 |%..1:Z%..1:. 320|
000028A0: 3A 52 45 25 B2 30 00 CA 30 CA 0D 8B 5A 25 A7 99 |:RE%.0..0...Z%..|
000028B0: 22 11 11 4E 4F 54 20 46 4F 55 4E 44 22 3A A0 38 |"..NOT FOUND":.8|
000028C0: 3A 5A 25 B2 30 3A 89 36 38 30 00 E5 30 D4 0D 99 |:Z%.0:.680..0...|
000028D0: 22 11 46 4F 55 4E 44 20 46 49 4C 45 20 3A 20 20 |".FOUND FILE : |
000028E0: 20 12 22 48 24 00 10 31 DE 0D 99 22 11 11 54 59 | ."H$..1..."..TY|
000028F0: 50 3A 20 12 50 92 52 47 2C 20 12 53 92 45 51 2C |P: .P.RG, .S.EQ,|
00002900: 20 12 55 92 53 52 2C 20 12 52 92 45 4C 20 22 3B | .U.SR, .R.EL ";|
00002910: 00 3F 31 E8 0D 8D 20 36 38 30 3A 99 54 41 24 3B |.?1... 680:.TA$;|
00002920: 3A 81 49 B2 31 A4 34 3A 8B 54 41 24 B2 CA 28 22 |:.I.1.4:.TA$..("|
00002930: 53 50 55 52 22 2C 49 2C 31 29 A7 33 35 38 30 00 |SPUR",I,1).3580.|
00002940: 4B 31 F2 0D 82 3A 89 33 35 36 30 00 6A 31 FC 0D |K1...:.3560.j1..|
00002950: 42 59 25 B2 31 32 38 AA 49 3A 8D 38 30 30 3A 8F |BY%.128.I:.800:.|
00002960: 20 42 55 46 46 45 52 20 3D 30 00 79 31 06 0E 98 | BUFFER =0.y1...|
00002970: 38 2C C7 28 42 59 25 29 3B 00 97 31 10 0E 98 31 |8,.(BY%);..1...1|
00002980: 35 2C 22 55 32 3A 22 38 3B 44 52 25 3B 54 52 25 |5,"U2:"8;DR%;TR%|
00002990: 3B 53 43 25 3A A0 38 00 D0 31 1A 0E 99 3A 99 22 |;SC%:.8..1...:."|
000029A0: 11 11 46 49 4C 45 20 57 49 45 44 45 52 20 4B 41 |..FILE WIEDER KA|
000029B0: 54 41 4C 4F 47 49 53 49 45 52 54 2E 22 3A 98 31 |TALOGISIERT.":.1|
000029C0: 35 2C 22 56 22 AA 44 52 24 3A 51 55 25 B2 AB 31 |5,"V".DR$:QU%..1|
000029D0: 00 D9 31 24 0E 89 36 38 30 00 F8 31 2E 0E 8F 20 |..1$..680..1... |
000029E0: 2A 2A 2A 20 57 45 4C 43 48 45 20 20 46 4C 4F 50 |*** WELCHE FLOP|
000029F0: 50 59 20 3F 20 2A 2A 2A 00 FE 31 38 0E 3A 00 0F |PY ? ***..18.:..|
00002A00: 32 42 0E 8F 20 44 45 4C 45 54 45 20 5B 22 5D 00 |2B.. DELETE ["].|
00002A10: 2D 32 4C 0E 58 25 B2 B9 28 49 29 3A 99 C7 28 33 |-2L.X%..(I):..(3|
00002A20: 34 29 3B 3A 97 32 31 31 2C 58 25 3A 8E 00 6E 32 |4);:.211,X%:..n2|
00002A30: 56 0E 81 49 B2 30 A4 4E 30 25 AB 31 3A 99 22 20 |V..I.0.N0%.1:." |
00002A40: 20 22 42 4C 25 28 49 29 A3 39 AA 54 42 29 4E 41 | "BL%(I).9.TB)NA|
00002A50: 24 28 49 29 A3 32 36 AA 54 42 29 46 54 24 28 49 |$(I).26.TB)FT$(I|
00002A60: 29 22 20 22 20 42 4E 25 28 49 2C 30 29 3B 00 86 |)" " BN%(I,0);..|
00002A70: 32 60 0E 99 A3 33 34 AA 54 42 29 22 2C 22 42 4E |2`...34.TB)","BN|
00002A80: 25 28 49 2C 31 29 00 9D 32 6A 0E A1 54 41 24 3A |%(I,1)..2j..TA$:|
00002A90: 8B 54 41 24 B2 22 20 22 A7 8D 36 38 30 00 CE 32 |.TA$." "..680..2|
00002AA0: 74 0E 8B C2 28 32 31 34 29 B1 32 32 A7 99 22 11 |t...(214).22..".|
00002AB0: 22 2C 22 20 20 20 12 50 52 45 53 53 20 53 50 41 |"," .PRESS SPA|
00002AC0: 43 45 22 3B 3A 8D 36 38 30 3A 8D 31 37 30 00 D6 |CE";:.680:.170..|
00002AD0: 32 7E 0E 82 3A 8E 00 F9 32 88 0E 8F 2A 2A 2A 2A |2~..:...2...****|
00002AE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002AF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 1C 33 92 0E 8F 2A |*********..3...*|
00002B00: 2A 2A 20 44 49 53 4B 20 53 54 41 54 55 53 20 42 |** DISK STATUS B|
00002B10: 41 53 49 43 20 33 2E 30 20 2A 2A 2A 00 3F 33 9C |ASIC 3.0 ***.?3.|
00002B20: 0E 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..**************|
00002B30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00002B40: 45 33 A6 0E 8F 00 67 33 B0 0E 8F 20 3E 3E 3E 20 |E3....g3... >>> |
00002B50: 46 55 45 52 20 4C 4F 54 48 41 52 20 48 4F 46 4D |FUER LOTHAR HOFM|
00002B60: 41 4E 4E 20 3C 3C 3C 00 6D 33 BA 0E 3A 00 85 33 |ANN <<<.m3..:..3|
00002B70: C4 0E 84 31 35 2C 45 25 2C 45 24 2C 45 31 25 2C |...15,E%,E$,E1%,|
00002B80: 45 32 25 3A 8E 00 A6 33 CE 0E 8F 2A 2A 2A 2A 2A |E2%:...3...*****|
00002B90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002BA0: 2A 2A 2A 2A 2A 2A 00 C7 33 D8 0E 8F 2A 2A 2A 20 |******..3...*** |
00002BB0: 41 45 4E 44 45 52 55 4E 47 20 50 52 47 2E 53 54 |AENDERUNG PRG.ST|
00002BC0: 41 52 54 20 2A 2A 2A 00 E8 33 E2 0E 8F 2A 2A 2A |ART ***..3...***|
00002BD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002BE0: 2A 2A 2A 2A 2A 2A 2A 2A 00 0D 34 EC 0E 4B 4F 24 |********..4..KO$|
00002BF0: B2 22 4E 45 55 45 20 53 54 41 52 54 41 44 52 45 |."NEUE STARTADRE|
00002C00: 53 53 45 20 45 49 4E 47 45 42 45 4E 22 00 29 34 |SSE EINGEBEN".)4|
00002C10: F6 0E 8D 31 37 30 3A 8D 37 32 30 3A 8F 20 46 52 |...170:.720:. FR|
00002C20: 41 47 45 20 44 52 49 56 45 00 3C 34 00 0F 54 59 |AGE DRIVE.<4..TY|
00002C30: 24 B2 22 50 22 3A 51 55 25 B2 AB 31 00 6A 34 0A |$."P":QU%..1.j4.|
00002C40: 0F 99 22 11 11 50 52 4F 47 52 41 4D 20 4E 41 4D |.."..PROGRAM NAM|
00002C50: 45 20 3F 20 22 3B 3A 84 31 2C 46 49 24 3A 5A 25 |E ? ";:.1,FI$:Z%|
00002C60: B2 AB 31 3A 99 3A 8D 33 32 30 00 79 34 14 0F 8B |..1:.:.320.y4...|
00002C70: 5A 25 B2 30 A7 33 38 38 30 00 BB 34 1E 0F 5A 25 |Z%.0.3880..4..Z%|
00002C80: B2 30 3A 99 22 11 11 50 52 4F 47 52 41 4D 4D 20 |.0:."..PROGRAMM |
00002C90: 22 C7 28 33 34 29 46 49 24 C7 28 33 34 29 22 20 |".(34)FI$.(34)" |
00002CA0: 49 53 54 20 4E 49 43 48 54 20 56 4F 52 48 41 4E |IST NICHT VORHAN|
00002CB0: 44 45 4E 21 22 3A 89 20 36 38 30 00 D6 34 28 0F |DEN!":. 680..4(.|
00002CC0: 99 22 91 91 91 91 22 A3 31 36 AA 54 42 29 22 12 |."....".16.TB)".|
00002CD0: 22 48 24 22 11 11 00 F0 34 32 0F 46 49 24 B2 48 |"H$"....42.FI$.H|
00002CE0: 24 3A 8D 32 38 30 3A 8D 31 34 30 3A 8D 31 34 30 |$:.280:.140:.140|
00002CF0: 00 12 35 3C 0F 8D 31 34 30 3A 58 25 B2 42 59 25 |..5<..140:X%.BY%|
00002D00: 3A 8D 31 34 30 3A 58 B2 58 25 AA 32 35 36 AC 42 |:.140:X.X%.256.B|
00002D10: 59 25 00 39 35 46 0F 8D 20 34 30 35 30 3A 99 22 |Y%.95F.. 4050:."|
00002D20: 53 54 41 52 54 41 44 52 45 53 53 45 20 49 53 54 |STARTADRESSE IST|
00002D30: 20 48 45 58 20 22 42 59 24 00 57 35 50 0F 99 22 | HEX "BY$.W5P.."|
00002D40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 45 | DE|
00002D50: 5A 49 4D 41 4C 22 58 00 6E 35 5A 0F 97 36 33 31 |ZIMAL"X.n5Z..631|
00002D60: 2C C6 28 22 1D 22 29 3A 97 31 39 38 2C 31 00 97 |,.("."):.198,1..|
00002D70: 35 64 0F 99 22 11 11 4E 45 57 20 53 54 41 52 54 |5d.."..NEW START|
00002D80: 20 41 44 44 52 45 53 53 20 3F 20 22 42 59 24 22 | ADDRESS ? "BY$"|
00002D90: 9D 9D 9D 9D 9D 22 3B 00 C3 35 6E 0F 84 31 2C 42 |.....";..5n..1,B|
00002DA0: 59 24 3A 99 3A 8B C8 28 42 59 24 2C 31 29 B2 22 |Y$:.:..(BY$,1)."|
00002DB0: 40 22 A7 A0 38 3A 99 22 11 11 4F 4B 2E 22 3A 89 |@"..8:."..OK.":.|
00002DC0: 37 36 30 00 E5 35 78 0F 8B C8 28 42 59 24 2C 31 |760..5x...(BY$,1|
00002DD0: 29 B3 B1 22 24 22 A7 58 B2 C5 28 42 59 24 29 3A |).."$".X..(BY$):|
00002DE0: 89 34 30 31 30 00 0A 36 82 0F 42 59 24 B2 CA 28 |.4010..6..BY$..(|
00002DF0: 42 59 24 2C 32 29 3A 42 59 24 B2 C9 28 22 30 30 |BY$,2):BY$..("00|
00002E00: 30 30 22 AA 42 59 24 2C 34 29 00 2D 36 8C 0F 58 |00".BY$,4).-6..X|
00002E10: B2 30 3A 81 49 B2 31 A4 34 3A 58 25 B2 C6 28 CA |.0:.I.1.4:X%..(.|
00002E20: 28 42 59 24 2C 49 2C 31 29 29 AB 34 38 00 40 36 |(BY$,I,1)).48.@6|
00002E30: 96 0F 8B 58 25 B1 31 30 A7 58 25 B2 58 25 AB 37 |...X%.10.X%.X%.7|
00002E40: 00 56 36 A0 0F 58 B2 58 AA 58 25 AC 31 36 AE 28 |.V6..X.X.X%.16.(|
00002E50: 34 AB 49 29 3A 82 00 71 36 AA 0F 42 59 25 B2 58 |4.I):..q6..BY%.X|
00002E60: AD 32 35 36 3A 58 25 B2 58 AB 32 35 36 AC 42 59 |.256:X%.X.256.BY|
00002E70: 25 00 80 36 B4 0F 42 55 25 B2 32 3A 8D 38 30 30 |%..6..BU%.2:.800|
00002E80: 00 B6 36 BE 0F 98 38 2C C7 28 58 25 29 C7 28 42 |..6...8,.(X%).(B|
00002E90: 59 25 29 3B 3A 98 31 35 2C 22 55 32 3A 38 22 44 |Y%);:.15,"U2:8"D|
00002EA0: 52 25 2C 54 52 25 2C 53 43 25 3A 98 31 35 2C 22 |R%,TR%,SC%:.15,"|
00002EB0: 49 22 AA 44 52 24 00 BF 36 C8 0F A0 38 3A 8E 00 |I".DR$..6...8:..|
00002EC0: E7 36 D2 0F 45 31 25 B2 42 59 25 AD 31 36 3A 45 |.6..E1%.BY%.16:E|
00002ED0: 32 25 B2 42 59 25 AF 31 35 3A 42 59 24 B2 22 24 |2%.BY%.15:BY$."$|
00002EE0: 22 3A 8D 34 30 37 30 00 FF 36 DC 0F 45 31 25 B2 |":.4070..6..E1%.|
00002EF0: 58 25 AD 31 36 3A 45 32 25 B2 58 25 AF 31 35 00 |X%.16:E2%.X%.15.|
00002F00: 29 37 E6 0F 42 59 24 B2 42 59 24 AA CA 28 48 5A |)7..BY$.BY$..(HZ|
00002F10: 24 2C 45 31 25 AA 31 2C 31 29 AA CA 28 48 5A 24 |$,E1%.1,1)..(HZ$|
00002F20: 2C 45 32 25 AA 31 2C 31 29 00 2F 37 F0 0F 8E 00 |,E2%.1,1)./7....|
00002F30: 52 37 FA 0F 8F 2A 2A 2A 2A 20 49 4E 49 54 49 41 |R7...**** INITIA|
00002F40: 4C 49 53 49 45 52 55 4E 47 20 44 45 52 20 2A 2A |LISIERUNG DER **|
00002F50: 2A 2A 00 75 37 04 10 8F 2A 2A 2A 2A 20 53 4B 41 |**.u7...**** SKA|
00002F60: 4C 41 52 45 4E 20 20 56 41 52 49 41 42 4C 45 4E |LAREN VARIABLEN|
00002F70: 20 2A 2A 2A 2A 00 7B 37 0E 10 3A 00 9E 37 18 10 | ****.{7..:..7..|
00002F80: 8F 2A 2A 2A 2A 20 20 20 46 4C 4F 41 54 49 4E 47 |.**** FLOATING|
00002F90: 20 50 4F 49 4E 54 20 20 20 20 2A 2A 2A 2A 00 A4 | POINT ****..|
00002FA0: 37 22 10 3A 00 BC 37 2C 10 49 B2 30 20 20 20 20 |7".:..7,.I.0 |
00002FB0: 20 20 3A 8F 20 5A 41 45 48 4C 45 52 00 D4 37 36 | :. ZAEHLER..76|
00002FC0: 10 4A B2 30 20 20 20 20 20 20 3A 8F 20 5A 41 45 |.J.0 :. ZAE|
00002FD0: 48 4C 45 52 00 EC 37 40 10 4B B2 30 20 20 20 20 |HLER..7@.K.0 |
00002FE0: 20 20 3A 8F 20 5A 41 45 48 4C 45 52 00 04 38 4A | :. ZAEHLER..8J|
00002FF0: 10 42 B2 30 20 20 20 20 20 20 3A 8F 20 5A 41 45 |.B.0 :. ZAE|
00003000: 48 4C 45 52 00 26 38 54 10 41 B2 30 20 20 20 20 |HLER.&8T.A.0 |
00003010: 20 20 3A 8F 20 41 44 52 45 53 53 45 20 28 30 2D | :. ADRESSE (0-|
00003020: 36 35 35 33 35 29 00 48 38 5E 10 58 B2 30 20 20 |65535).H8^.X.0 |
00003030: 20 20 20 20 3A 8F 20 41 44 52 45 53 53 45 20 28 | :. ADRESSE (|
00003040: 30 2D 36 35 35 33 35 29 00 6A 38 68 10 50 B2 30 |0-65535).j8h.P.0|
00003050: 20 20 20 20 20 20 3A 8F 20 46 4F 52 4D 41 54 20 | :. FORMAT |
00003060: 56 41 52 2E 20 28 54 41 42 29 00 70 38 72 10 3A |VAR. (TAB).p8r.:|
00003070: 00 93 38 7C 10 8F 2A 2A 2A 2A 20 20 20 20 20 49 |..8|..**** I|
00003080: 4E 54 45 47 45 52 20 20 20 20 20 20 20 20 20 2A |NTEGER *|
00003090: 2A 2A 2A 00 99 38 86 10 3A 00 B7 38 90 10 53 43 |***..8..:..8..SC|
000030A0: 25 B2 30 20 20 20 20 3A 8F 20 53 45 4B 54 4F 52 |%.0 :. SEKTOR|
000030B0: 20 28 30 2D 32 30 29 00 D5 38 9A 10 54 52 25 B2 | (0-20)..8..TR%.|
000030C0: 31 38 20 20 20 3A 8F 20 53 50 55 52 20 20 20 28 |18 :. SPUR (|
000030D0: 31 2D 33 35 29 00 F1 38 A4 10 41 53 25 B2 30 20 |1-35)..8..AS%.0 |
000030E0: 20 20 20 3A 8F 20 56 41 4C 20 28 54 41 53 54 45 | :. VAL (TASTE|
000030F0: 29 00 0C 39 AE 10 44 52 25 B2 30 20 20 20 20 3A |)..9..DR%.0 :|
00003100: 8F 20 4C 41 55 46 57 45 52 4B 20 23 00 2C 39 B8 |. LAUFWERK #.,9.|
00003110: 10 4C 52 25 B2 30 20 20 20 20 3A 8F 20 43 41 54 |.LR%.0 :. CAT|
00003120: 2E 20 4C 41 55 46 57 45 52 4B 20 23 00 4D 39 C2 |. LAUFWERK #.M9.|
00003130: 10 4D 44 25 B2 31 20 20 20 20 3A 8F 20 41 4E 5A |.MD%.1 :. ANZ|
00003140: 41 48 4C 20 4C 41 55 46 57 45 52 4B 45 00 6E 39 |AHL LAUFWERKE.n9|
00003150: CC 10 4D 4B 25 B2 30 20 20 20 20 3A 8F 20 44 49 |..MK%.0 :. DI|
00003160: 53 4B 2D 53 54 41 54 55 53 20 56 41 52 2E 00 91 |SK-STATUS VAR...|
00003170: 39 D6 10 50 4C 25 B2 30 20 20 20 20 3A 8F 20 5A |9..PL%.0 :. Z|
00003180: 41 48 4C 20 44 45 52 20 57 4F 52 4B 46 49 4C 45 |AHL DER WORKFILE|
00003190: 53 00 B2 39 E0 10 51 55 25 B2 AB 31 20 20 20 3A |S..9..QU%..1 :|
000031A0: 8F 20 46 4C 41 47 20 43 41 54 20 47 55 45 4C 54 |. FLAG CAT GUELT|
000031B0: 49 47 00 D3 39 EA 10 42 55 25 B2 30 20 20 20 20 |IG..9..BU%.0 |
000031C0: 3A 8F 20 42 55 46 46 45 52 20 50 4E 54 2E 20 56 |:. BUFFER PNT. V|
000031D0: 41 52 2E 00 F6 39 F4 10 4E 30 25 B2 30 20 20 20 |AR...9..N0%.0 |
000031E0: 20 3A 8F 20 5A 41 48 4C 20 43 41 54 41 4C 4F 47 | :. ZAHL CATALOG|
000031F0: 20 46 49 4C 45 53 00 16 3A FE 10 46 49 25 B2 30 | FILES..:..FI%.0|
00003200: 20 20 20 20 3A 8F 20 46 49 4C 45 53 20 50 52 4F | :. FILES PRO|
00003210: 20 42 4C 4F 43 4B 00 34 3A 08 11 42 59 25 B2 30 | BLOCK.4:..BY%.0|
00003220: 20 20 20 20 3A 8F 20 41 53 43 20 28 47 45 54 42 | :. ASC (GETB|
00003230: 59 54 45 29 00 57 3A 12 11 42 31 25 B2 30 20 20 |YTE).W:..B1%.0 |
00003240: 20 20 3A 8F 20 46 49 4C 45 54 59 50 20 49 4E 20 | :. FILETYP IN |
00003250: 43 41 54 41 4C 4F 47 00 79 3A 1C 11 45 52 25 B2 |CATALOG.y:..ER%.|
00003260: 30 20 20 20 20 3A 8F 20 47 45 53 41 4D 54 46 45 |0 :. GESAMTFE|
00003270: 48 4C 45 52 20 5A 41 48 4C 00 95 3A 26 11 43 25 |HLER ZAHL..:&.C%|
00003280: 20 B2 30 20 20 20 20 3A 8F 20 41 53 43 20 28 48 | .0 :. ASC (H|
00003290: 45 58 20 24 29 00 B5 3A 30 11 58 25 20 B2 30 20 |EX $)..:0.X% .0 |
000032A0: 20 20 20 3A 8F 20 43 55 52 53 4F 52 20 50 4F 53 | :. CURSOR POS|
000032B0: 49 54 49 4F 4E 00 D7 3A 3A 11 51 25 20 B2 30 20 |ITION..::.Q% .0 |
000032C0: 20 20 20 3A 8F 20 46 4C 41 47 20 43 4F 50 59 2F | :. FLAG COPY/|
000032D0: 53 43 52 41 54 43 48 00 F9 3A 44 11 45 42 25 B2 |SCRATCH..:D.EB%.|
000032E0: 30 20 20 20 20 3A 8F 20 46 45 48 4C 45 52 20 28 |0 :. FEHLER (|
000032F0: 4B 45 49 4E 20 48 44 2E 29 00 1A 3B 4E 11 45 53 |KEIN HD.)..;N.ES|
00003300: 25 B2 30 20 20 20 20 3A 8F 20 46 45 48 4C 45 52 |%.0 :. FEHLER|
00003310: 20 28 53 59 4E 43 52 4F 4E 29 00 31 3B 58 11 45 | (SYNCRON).1;X.E|
00003320: 43 25 B2 30 20 20 20 20 3A 8F 20 46 45 48 4C 45 |C%.0 :. FEHLE|
00003330: 52 00 48 3B 62 11 44 43 25 B2 30 20 20 20 20 3A |R.H;b.DC%.0 :|
00003340: 8F 20 46 45 48 4C 45 52 00 68 3B 6C 11 48 44 25 |. FEHLER.h;l.HD%|
00003350: B2 30 20 20 20 20 3A 8F 20 46 45 48 4C 45 52 20 |.0 :. FEHLER |
00003360: 28 48 45 41 44 45 52 29 00 8B 3B 76 11 45 58 25 |(HEADER)..;v.EX%|
00003370: B2 30 20 20 20 20 3A 8F 20 46 45 48 4C 45 52 20 |.0 :. FEHLER |
00003380: 28 4C 4F 4E 47 20 42 4C 4B 2E 29 00 A8 3B 80 11 |(LONG BLK.)..;..|
00003390: 46 52 25 B2 30 20 20 20 20 3A 8F 20 46 52 45 49 |FR%.0 :. FREI|
000033A0: 45 20 42 4C 4F 43 4B 53 00 C7 3B 8A 11 42 45 25 |E BLOCKS..;..BE%|
000033B0: B2 30 20 20 20 20 3A 8F 20 42 45 4C 45 47 54 45 |.0 :. BELEGTE|
000033C0: 20 42 4C 4F 43 4B 53 00 E4 3B 94 11 41 4E 25 B2 | BLOCKS..;..AN%.|
000033D0: 31 20 20 20 20 3A 8F 20 56 4F 4E 20 53 50 55 52 |1 :. VON SPUR|
000033E0: 20 2E 2E 2E 00 01 3C 9E 11 45 4E 25 B2 33 35 20 | .....<..EN%.35 |
000033F0: 20 20 3A 8F 20 2E 2E 2E 20 42 49 53 20 53 50 55 | :. ... BIS SPU|
00003400: 52 00 24 3C A8 11 4A 4A 25 B2 32 30 20 20 20 3A |R.$<..JJ%.20 :|
00003410: 8F 20 4D 41 58 2E 20 53 45 4B 54 4F 52 45 4E 2F |. MAX. SEKTOREN/|
00003420: 53 50 55 52 00 47 3C B2 11 52 45 25 B2 30 20 20 |SPUR.G<..RE%.0 |
00003430: 20 20 3A 8F 20 46 4C 41 47 20 28 46 49 4C 45 20 | :. FLAG (FILE |
00003440: 52 45 54 54 45 4E 29 00 6A 3C BC 11 45 25 20 B2 |RETTEN).j<..E% .|
00003450: 30 20 20 20 20 3A 8F 20 44 49 53 4B 20 46 45 48 |0 :. DISK FEH|
00003460: 4C 45 52 20 28 43 4F 44 45 29 00 8D 3C C6 11 45 |LER (CODE)..<..E|
00003470: 24 20 B2 22 22 20 20 20 3A 8F 20 44 49 53 4B 20 |$ ."" :. DISK |
00003480: 46 45 48 4C 45 52 20 28 54 45 58 54 29 00 B0 3C |FEHLER (TEXT)..<|
00003490: D0 11 45 31 25 B2 30 20 20 20 20 3A 8F 20 44 49 |..E1%.0 :. DI|
000034A0: 53 4B 20 46 45 48 4C 45 52 20 28 53 50 55 52 29 |SK FEHLER (SPUR)|
000034B0: 00 D3 3C DA 11 45 32 25 B2 30 20 20 20 20 3A 8F |..<..E2%.0 :.|
000034C0: 20 44 49 53 4B 20 46 45 48 4C 45 52 20 28 53 4B | DISK FEHLER (SK|
000034D0: 54 2E 29 00 F3 3C E4 11 41 46 25 B2 30 20 20 20 |T.)..<..AF%.0 |
000034E0: 20 3A 8F 20 46 4C 41 47 20 43 4F 50 59 20 41 4C | :. FLAG COPY AL|
000034F0: 50 48 41 00 F9 3C EE 11 3A 00 1A 3D F8 11 8F 2A |PHA..<..:..=...*|
00003500: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003510: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 3B 3D 02 12 8F |**********.;=...|
00003520: 2A 2A 2A 2A 3E 3E 3E 3E 3E 3E 46 45 4C 44 45 52 |****>>>>>>FELDER|
00003530: 3C 3C 3C 3C 3C 3C 2A 2A 2A 2A 2A 00 5C 3D 0C 12 |<<<<<<*****.\=..|
00003540: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
00003550: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 62 3D 16 |************.b=.|
00003560: 12 3A 00 81 3D 20 12 86 20 4E 41 24 28 31 35 30 |.:..= .. NA$(150|
00003570: 29 20 20 20 3A 8F 20 46 49 4C 45 20 4E 41 4D 45 |) :. FILE NAME|
00003580: 4E 00 A0 3D 2A 12 86 20 43 50 24 28 31 35 30 29 |N..=*.. CP$(150)|
00003590: 20 20 20 3A 8F 20 57 4F 52 4B 20 4E 41 4D 45 4E | :. WORK NAMEN|
000035A0: 00 BD 3D 34 12 86 20 46 54 24 28 31 35 30 29 20 |..=4.. FT$(150) |
000035B0: 20 20 3A 8F 20 46 49 4C 45 20 54 59 50 00 DD 3D | :. FILE TYP..=|
000035C0: 3E 12 86 20 54 59 24 28 20 34 20 29 20 20 20 3A |>.. TY$( 4 ) :|
000035D0: 8F 20 54 59 50 45 4E 20 4E 41 4D 45 4E 00 E3 3D |. TYPEN NAMEN..=|
000035E0: 48 12 3A 00 03 3E 52 12 86 20 42 4C 25 28 31 35 |H.:..>R.. BL%(15|
000035F0: 30 29 20 20 20 3A 8F 20 46 49 4C 45 20 4C 41 45 |0) :. FILE LAE|
00003600: 4E 47 45 00 23 3E 5C 12 86 20 45 52 25 28 31 35 |NGE.#>\.. ER%(15|
00003610: 30 29 20 20 20 3A 8F 20 43 4F 50 59 20 46 45 48 |0) :. COPY FEH|
00003620: 4C 45 52 00 43 3E 66 12 86 20 42 4E 25 28 31 35 |LER.C>f.. BN%(15|
00003630: 30 2C 31 29 20 3A 8F 20 46 49 4C 45 20 42 45 47 |0,1) :. FILE BEG|
00003640: 49 4E 4E 00 65 3E 70 12 86 20 42 44 25 28 20 31 |INN.e>p.. BD%( 1|
00003650: 20 29 20 20 20 3A 8F 20 4E 41 45 43 48 53 54 45 | ) :. NAECHSTE|
00003660: 52 20 42 4C 4B 00 6B 3E 7A 12 8E 00 90 3E 84 12 |R BLK.k>z....>..|
00003670: 8F 20 2A 2A 2A 2A 20 41 4C 50 48 41 20 53 4F 52 |. **** ALPHA SOR|
00003680: 54 20 26 20 43 4F 50 59 20 41 4C 4C 20 2A 2A 2A |T & COPY ALL ***|
00003690: 00 B6 3E 8E 12 8F 20 2A 2A 2A 20 50 52 49 4E 54 |..>... *** PRINT|
000036A0: 20 43 55 52 52 45 4E 54 20 43 4F 50 59 20 54 59 | CURRENT COPY TY|
000036B0: 50 45 20 2A 2A 2A 00 CC 3E 98 12 8B 42 B2 31 A7 |PE ***..>...B.1.|
000036C0: 99 22 50 52 4F 47 52 41 4D 22 3A 8E 00 E4 3E A2 |."PROGRAM":...>.|
000036D0: 12 8B 42 B2 32 A7 99 22 53 45 51 55 45 4E 54 49 |..B.2.."SEQUENTI|
000036E0: 41 4C 22 3B 00 FA 3E AC 12 8B 42 B2 33 A7 99 22 |AL";..>...B.3.."|
000036F0: 52 45 4C 41 54 49 56 45 22 3B 00 0C 3F B6 12 8B |RELATIVE";..?...|
00003700: 42 B2 34 A7 99 22 55 53 45 52 22 3B 00 1C 3F C0 |B.4.."USER";..?.|
00003710: 12 99 22 20 44 41 54 41 2E 22 3A 8E 00 37 3F CA |.." DATA.":..7?.|
00003720: 12 8F 20 2A 2A 2A 20 54 45 58 54 20 41 55 53 47 |.. *** TEXT AUSG|
00003730: 41 42 45 20 2A 2A 2A 00 65 3F D4 12 99 22 11 12 |ABE ***.e?..."..|
00003740: 41 54 54 45 4E 54 49 4F 4E 92 21 20 4C 45 47 45 |ATTENTION.! LEGE|
00003750: 4E 20 53 49 45 20 49 4E 20 44 52 49 56 45 20 31 |N SIE IN DRIVE 1|
00003760: 20 45 49 4E 45 00 92 3F DE 12 99 22 11 4C 45 45 | EINE..?...".LEE|
00003770: 52 45 20 4F 44 45 52 20 55 4E 42 45 4E 55 54 5A |RE ODER UNBENUTZ|
00003780: 54 45 20 44 49 53 4B 20 45 49 4E 2E 20 44 52 49 |TE DISK EIN. DRI|
00003790: 56 45 00 AD 3F E8 12 99 22 11 31 20 57 49 52 44 |VE..?...".1 WIRD|
000037A0: 20 46 4F 52 4D 41 54 49 45 52 54 20 21 00 DB 3F | FORMATIERT !..?|
000037B0: F2 12 99 22 11 11 46 41 4C 4C 53 20 49 4E 20 44 |..."..FALLS IN D|
000037C0: 52 49 56 45 20 30 20 4B 45 49 4E 20 4D 45 4E 55 |RIVE 0 KEIN MENU|
000037D0: 45 20 56 4F 52 48 41 4E 44 45 4E 00 0B 40 FC 12 |E VORHANDEN..@..|
000037E0: 99 22 11 49 53 54 2C 20 4C 45 47 45 4E 20 53 49 |.".IST, LEGEN SI|
000037F0: 45 20 42 49 54 54 45 20 41 55 43 48 20 44 49 45 |E BITTE AUCH DIE|
00003800: 53 45 53 20 42 45 52 45 49 54 2E 00 39 40 06 13 |SES BEREIT..9@..|
00003810: 99 22 11 11 11 44 52 55 45 43 4B 45 4E 20 53 49 |."...DRUECKEN SI|
00003820: 45 20 28 12 4A 92 29 20 46 55 45 52 20 57 45 49 |E (.J.) FUER WEI|
00003830: 54 45 52 2C 20 4A 45 44 45 00 70 40 10 13 99 22 |TER, JEDE.p@..."|
00003840: 11 41 4E 44 45 52 45 20 54 41 53 54 45 20 46 55 |.ANDERE TASTE FU|
00003850: 45 48 52 54 20 5A 55 4D 20 41 42 42 52 55 43 48 |EHRT ZUM ABBRUCH|
00003860: 20 21 28 D6 29 9D 9D 22 3B 3A 97 32 30 34 2C 30 | !(.)..";:.204,0|
00003870: 00 A0 40 1A 13 8D 36 38 30 3A 97 32 30 34 2C 31 |..@...680:.204,1|
00003880: 3A 99 22 9D 20 22 3B 3A 8B 54 41 24 B3 B1 22 4A |:.". ";:.TA$.."J|
00003890: 22 A7 99 22 12 45 4E 44 92 22 3B 3A 89 37 36 30 |"..".END.";:.760|
000038A0: 00 AB 40 24 13 89 36 33 39 39 39 00 BF 40 88 13 |..@$..63999..@..|
000038B0: 8F 2A 2A 2A 56 41 4C 49 44 41 54 45 2A 2A 2A 00 |.***VALIDATE***.|
000038C0: F3 40 89 13 99 22 93 11 11 11 11 4C 4F 41 44 20 |.@...".....LOAD |
000038D0: 56 41 4C 49 44 41 54 49 4F 4E 20 44 49 53 4B 20 |VALIDATION DISK |
000038E0: 41 4E 44 20 50 52 45 53 53 20 12 52 45 54 55 52 |AND PRESS .RETUR|
000038F0: 4E 92 22 00 0B 41 8A 13 A1 56 24 3A 8B 56 24 B3 |N."..A...V$:.V$.|
00003900: B1 C7 28 31 33 29 A7 35 30 30 32 00 32 41 8C 13 |..(13).5002.2A..|
00003910: 99 22 11 11 11 11 56 41 4C 49 44 41 54 49 4F 4E |."....VALIDATION|
00003920: 20 53 45 51 55 45 4E 43 45 20 52 55 4E 4E 49 4E | SEQUENCE RUNNIN|
00003930: 47 22 00 4C 41 8D 13 98 31 35 2C 22 56 30 22 3A |G".LA...15,"V0":|
00003940: A0 31 35 3A 9F 31 35 2C 38 2C 31 35 00 7B 41 8E |.15:.15,8,15.{A.|
00003950: 13 99 A3 31 32 29 22 11 11 11 11 11 12 44 49 53 |...12)"......DIS|
00003960: 4B 20 56 41 4C 49 44 41 54 45 44 92 22 3A 81 54 |K VALIDATED.":.T|
00003970: B2 31 A4 33 30 30 30 3A 82 3A 8E 00 00 00 00 20 |.1.3000:.:..... |
00003980: 29 04 00 49 60 41 46 00 68 FF EA 4B 01 FF BE FF |)..I`AF.h..K....|
00003990: 00 20 FE FF |. .. |
....C..53280,8:.53281,8:."..".H.D..G(142
):H3$."DISK MANAGEMENT PROGRAMM V 64":H4
$."....................".}.N.H5$."'Q' TO
END"...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.."..REA
DING DIRECTORY".H.^.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,B
Y$:BD%(I).F(BY$.G(0)):.:BU%.2:. 800...|.
. 140:B1%.(BY% . 7)......B1%.0.RE%.0.490
.Q....B1%.RE%.490......TY$.."A"..F(TY$(B
1%))..F(TY$).490. ...H$."":.I.0.1:. 140:
BN%(N0%,I).BY%:..L....I.3.18:.#8,BY$:.BY
$..G(160). H$.H$.BY$.[....:.Z%.2380.X.B.
.I.19.27:.#8,BY$:.:. 140...L.BL%.BY%:. 1
40:BL%.BL%.256.BY%.S.V.BL%(N0%).BL%:NA$(
N0%).H$:FT$(N0%).TY$(B1%):N0%.N0%.1.....
.".".25.TB)N0%.....FI%.FI%.1:.FI%.8.BU%.
FI%.32.2:. 800:. 380.&....BD%(0).0.520.K
...TR%.BD%(0):SC%.BD%(1):FI%.0:.360.R...
8.X.....N.... *** GET ID$ ***...&.. 250
:. OPEN FILE...0.. MK% . . :. SICHER....
..:.TR%.18:SC%.0:.280.N.D.BU%.162:ID$.""
:. 800...N..I.1.5:.140:ID$.ID$.BY$:....X
.....B.. *** GET NAME + ID ***...L..550
:.MK%...7.V.BU%.144:NA$."":.800.^....I.1
.16:.140:.BY%..160.NA$.NA$.BY$.F....:..L
...:...... *** GET EINE TASTE ***......1
98,0:.198,1:. TA$.....AS%.E(TA$):......:
.X.F.. *** ERFRAGE DRIVE NR. ***...P.DR%
.0:TA$."0":.730...Z.DR$.TA$:......:.....
. *** VERZOEGERUNG ***.5....AF%.0..I.1.2
500:..;.....A...:.D....*** BUFFER POINTE
R SETZEN ***.Z. ..15,"B-P:"8;BU%:....*..
**** DAUER FILES OEFFNEN ****...4.:.F.
>.. 15,8,15:. DISK ERROR KANAL...H.. 01,
0,00:. TASTATUR...R.SP$."
".C.\.FO$.".
. .".T.F.
ST$."...................................
..."...P.FM$." *":.B8.ST$.H(ST$.ST$.ST$,
78)...Z.H1$."INITIALISING DISK MANAGER".
....NA$."":NB$."":ID$."":DI$."":TA$."":T
Y$."":BY$."":H$."".....KO$.H4$:.170:.409
0:.760.1...HZ$."0123456789ABCDEF".F....I
.1.4:.TY$(I):..L...:.O.... **** HAUPT
- MENUE ****.U...:...J.KO$.H5$:H1$.H3
$...T..170:X..(0):. GARBAGE.B.....8.TB)"
.1) SCRATCH FILES".......8.TB)".2) FORMA
T DISK.......8.TB)".3) READ FILE BLOCKS.
%.....8.TB)".4) CHANGE DISK NAME & ID.D.
....8.TB)".5) TEST READ DISK.C.....8.TB)
".6) LIST DIRECTORY.......8.TB)".7) RESC
UE FILES (UNSCRATCH)...$...8.TB)".8) CHA
NGE START ADDRESS.O.)...8.TB)".9) VALIDA
TE DISK......670:.TA$."Q".1120...8..AS%.
0.1070...B.. *** VERTEILER ***.I.L..AS%.
1380,1160,2430,2750,3000,2280,3480,3800,
5000:.970.D.V.. : . DUMMY SUBROUTINE.M.`
..170...J..15,"U:":.:."........":.:. DUP
ENDE...T.:...~.. *** FORMATIEREN ***.X.
..KO$."DISK FORMAT ROUTINE":.170...... 7
20:. ZEILENNUMMER LESEN...... 620: 8:. D
ISK ID & NAME./....MK%.1240:. ?BAD DISK.
Q...D$."":.".DISK ID ="ID$:.".DO YOU WIS
H TO KEEP ORIGINAL ID? ";......1,TA$:.:.
H(TA$,1)."Y".ID$."":.1240...D..H(TA$,1).
."N"..".";:.211,33:.1210.O.N.D$.",".ID$.
..X..".DISK NAME , ID ? ";:FE%.B(211):.
NA$","ID$;.4....211,FE%:.1,NA$,ID$:.:.H(
NA$,1)."*".NA$."". ..N.... ^^^ ABBRUCH ^
^^ !!!.~...QU%..1:CC$."N:".NA$:.ID$."".C
C$.CC$.",".ID$......".FORMATING DISK": 1
:.1,8,15,"".CC$..... 1:.1,0,0.C....DS.20
. ..U....".STATE :"E$...(..15,"I".DR$:."
.WISH TO TRY AGAIN..";...2..15,CC$:.DS.0
..".OK !":.760.?.<.."DISK .DEFECTIVE. !!
!":.760.\.F.."SEQ","PRG","USR","REL".B.P
.:...Z.. **** SCRATCH ROUTINE ****...D.K
O$."SCRATCH ROUTINE":K$."SCRATCH "...N.Q
%..1:.1430...X.:...... **** KOPIERROUTIN
E ****.....Q%.0:KO$."COPY ROUTINE":K$."C
OPIED".....PL%.0:.170.N. ..MD%.0.Q%.0.."
.. NICHT BEI EINER .4031. !!!":. 680.E
....K$"FILE .";:. 720.}....Q%. 1480:. SC
RATCH......".".X%.2.TB)"NACH"1.DR%.R.H..
".TYPE: .P.RG .S.EQ .U.SR .R.EL .A.LL
";:X%..(0)...R..680:.TA$;......TA$."P".T
A$."S".TA$."U".TA$."R".TA$."A".1520.%...
.211,X%:.1490.A...TY$.TA$:.Q%.AL%.0:.156
0.K....:."..I.NDIVIDUAL-.C.OMBINED COPIE
S";......680:AL%.(TA$."A"):.AL%.."COMBIN
ED":.1560......"INDIVIDUAL".C....:.310:.
N0%.0.AF%.....".. N0%.0.."...THE DISK IS
CLEAR.":.760...,.. 150:. DELETE BLOCK 1
0-23.7.6.."BLOCKS NAME
TYPE".K.@.. I . 0 . N0%.1.S.J.."."BL%(
I).8.TB)NA$(I).31.TB)FT$(I)...T..".
"K$" (Y/N)...^..AL%.1670...H.. 680:.TA
$."N".TA$.".".1680.S.R..TA$."."..2410:.1
680...|..TA$.."Y". 1640.....CP$(PL%).NA$
(I):PL%.PL%.1.%...."..."SP$:.SP$:.SP$"..
..":..`....PL%.0.."."SP$:.".. A
BORT "K$"...":QU%.0:.760.W....AF%.."."SP
$:.1760......Q%.PL%.1.1810......"."SP$:.
"ALPHABETICAL SORT (Y/N)".H.B..680:.TA$.
"N".1810...L..TA$.."Y".1730...V.. *** AL
FA SORT (EINFACH) ***......"..SORTING".&
...ER%.0:.I.PL%.2.0..1.G....CP$(I).CP$(I
.1).H$.CP$(I.1):CP$(I.1).CP$(I):CP$(I).H
$:ER%.1......:.ER%.1770:. NOCHMAL ......
... *** COPY FILES ... ***.J....Q%.QU%..
1:. DIR NICHT MEHR GUELTIG......2130:. R
AHMEN...&..I.0.PL%.1...0.."."CP$(I).19.T
B);.?.:..Q%.0..15,"C".G(48.1.DR%).":".CP
$(I)."=".DR$.":".CP$(I).^.D..Q%..15,"S".
DR$.":".CP$(I).V.N..2220:.D$:ER%(I).E%..
.X..E%.72...19.TB)".ABBRUCH. !!!":.760..
.B..E%.ER%.ER%.1:. FEHLER.N.L..B(214).22
..2180...V..:.ER%.0.Q%...20.TB)"*** E N
D E ***":.760......AF%...(.... *** FEHLE
R BEHANDLUNG ***.D...KO$.D(ER%)." KOPIER
FEHLER ":.ER%.1.KO$.KO$."SIND":.1960.V..
.KO$.KO$."IST".....KO$.KO$." AUFGETRETEN
!"......I.0.PL%.1:.ER%(I)..63.2110.....
.170.O.F.."...."CP$(I);...P...20.TB)".EX
ISTIERT BEREITS..'.Z.."...L.OESCHEN, .U.
MBENENNEN, .I.GNORIEREN (L/U/I).K....680
:.TA$."I".2100:. IGNORIEREN.L....TA$."L"
.2070:. SCRATCH©......TA$.."U".2020:
. FALSCHE TASTE......"..NEW NAME ? ";:.1
,NN$.D.... 2080:. COPY AGAIN.....NN$."*"
:.15,"S".G(48.(1.DR%)).":".CP$(I).$. ..1
5,"C".G(48.1.DR%).":".NN$."=".DR$.":".CP
$(I).>.*..DS.1990:. NOCHMAL....V.4..SP$:
.SP$:.SP$:.SP$._.>.. :..Y.H.. *** TEXTFE
NSTER ***..R.....\..".".(16.C(KO$).2).T
B)"*** "KO$" ***.V.F..".................
........................ P..". FILE -
NAME . FILE - STATE .".3 Z.."....
....................................N ..
."....":.K.1.20:.FO$:..~ ..."...........
............................";.. ..."...
.":... ... *** FORMAT DS$ ***.A ...3780:
D$.E$:D$.H(D$,19).. ..D$.I("
".D$,9.C(D$).2)..!..D$.H(D
$,19)..!J... !T..*** CATALOG ***.&!..:.Q
!...B8.KO$."READING DIRECTORY":.170:.232
0..!..KO$. "BLOCKS FILE NAME TYP
START":.170:.720:."..".L!..TY$."A":.310
:.170:.3670:."..".13.TB)".PRESS SPACE";:
.680..!...".FEHLER = ."E$:.680..!...I.0.
1:DR%.I.&"..."......".5.DR%.35)"..":.214
,23:..79)"..";.C"$.DR$.G(I.48):.15,"I".D
R$:.3780:.E%.0. 15:WD(DR%):.15,8,15.."..
.:.:.:.211,0:..32)".PRESS SPACE";:.680..
"8.."...":..."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:..B#
J.I.I.2:.I..1.I..1.H#T...J#~.. **** VIEW
FILE ON DISK ****..#..KO$."FILE - SEARC
H":.170..#..."ENTER FILE NAME ";..#..
.1,FI$:..C#..TY$."A":QU%..1.X#..."..WAIT
.";:.720..$..Z%..1:.320:.Z%.."..NOT FOUN
D":Z%.0:.680..$D.FI$.H$:.280.=$N..".....
...".20)"..LISTING FILES."FI$.K$X..".DIE
SER BLOCK IN : "TR%","SC%..$..
.".NAECHSTER BLOCK IN : ";:.140:.
BY%;:TR%.BY%.H$....28.TB)".,";:.140:.BY%
:SC%.BY%..%...".START ADRESSE :
";:.140:A.BY%:.140:A.A.256.BY%. %....28.
TB)A.35.TB)"DEZ".^%...".ERSTE LINKADRESS
E : ";:.140:A.BY%:.140:A.A.256.BY%.X
%....28.TB)A.35.TB)"DEZ"..%...".ERSTE ZE
ILENNUMMER : ";:.140:A.BY%:.140:A.A.2
56.BY%.P%(...28.TB)A.35.TB)"DEZ"..%2..".
ASCIIDUMP:":QA%.5:QB%.33:.B8.QB%.75.3&<.
HX$."":.I.8.255:.140:HX$.HX$.BY$:.:.:.21
1,QA%:.":";.C&F..I.1.C(HX$).E&P...(I).QB
%..":":.211,QA%:.":";..&Z.C$.J(HX$,I,1):
C%.F(C$)..&D..C%.127..".";:C%.C%.127..&N
..C%.32.C%.32..&X..C%.34..3660..&...G(C%
)".";:.:.211,QB%.1:.":":.B8....'...TR%.0
..,"PRESS SPACE FOR MENU": 8:.680.<'..."
.E. TO END .N. TO READ NEXT BLOCK.";.Z'
..680:.TA$."E". 8:."...":..M'...TA$.."N"
.2720.W'...2500..'... *** NAMEN & ID AEN
DERN ****..'H.KO$."DISK NAME & ID CHANGE
S":. 170.T'R.. 720:. DRIVE #..'... 620:.
NAME + ID$..(..."..DISKNAME : "NA$..(.
..".DISK ID : "ID$.M(..."..MAKE YOUR S
ELECTION .I.D .N.AME .A.BORT".D(...680:.
TA$."A". 8:..V(...TA$."I".2910..(...TA$.
."N".2820..(".. *** NAMEN AENDERN ***.P(
,..".NEW NAME ? ";:X%..(I):.NA$;:.211,X%
..(6..1,NA$:BU%.144:.800..)@.NA$.NA$."
"..)J.NA$.H(NA$,16).,)T..
8,NA$;:.2970.E)^.. *** ID AENDERN ***.N)
H..".NEW 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(ID$,5)
.L)...8,ID$;..)...15,"U2:8"DR%,18,0:.15,
"I".DR$..).. 8:...*... **** TESTLESEN EI
NER DISK ***.V*..EB%.0:ES%.0:EC%.0:DC%.0
:HD%.0:EX%.0:ER%.0:FR%.0:BE%.0.R*B.KO$."
TEST READING":.170..*L.."READING FRON ."
;:.720..*V.TR%.1:SC%.0:.250.E*..AN%.1:EN
%.35:. DEFAULT VALUES..*..."..READ SECTO
R SELECTION (Y/N) ? "..+...680:.TA$."N".
3130..+...TA$.."Y".3060.>+...".FROM TRAC
K ";:.1,TA$:AN%.E(TA$).Z+...AN%.0.AN%.1:
.G(20)"1";..+..." TO TRACK ";:.1,TA$:EN
%.E(TA$)..+&..(EN%.0).(EN%.35).(EN%.AN%)
.EN%.35:.G(20)"35";.A+0.. :QU%..1..,:.KO
$."FROM TRACK".D(AN%)." TO TRACK".D(EN%)
:H1$."DISK CHECK"..,D..170..,N.."...".8,
X..I.AN%.EN%:JJ%.20:.I.17.JJ%.18.I,B..I.
24.JJ%.17.K,L..I.30.JJ%.16:. SEKTOREN/TR
ACK.X,V..J.0.JJ%..,...15,"B-A:"DR%,I,J..
,...DS.0.FR%.FR%.1:F$."FREE":.3230..,..B
E%.BE%.1:F$."BELEGT":.15,"B-F:"DR%,I,J..
,..."......."SP$..-...".TRACK"I"SECTOR"J
"= "F$.$-..TR%.I:SC%.J:.280.M-...:.3780
:D$.E$:.SP$:."."D$:.DS.0.3350..-F.ER%.ER
%.1:.E%.26.E%.71.."KEIN TEST MOEGLICH !
":.680..-P..E%.20.EB%.EB%.1:.3340..-Z..E
%.21.ES%.ES%.1:.3340.W-...E%.23.EC%.EC%.
1:.3340..-...E%.24.DC%.DC%.1:.3340......
E%.27.E%.29.HD%.HD%.1:.3340......E%.28.E
X%.EX%.1:.3340.I... 8:. 240:. INIT + OPE
N.U....J,I: 8.V. .KO$."FEHLER UEBERSICHT
":.170...*...3.TB)"BELEGT ="BE%.28.TB)"F
REI ="FR%.H.4...3.TB)".HEADER FEHLT
:"EB%...>...3.TB)".SYNCRONIMPULS FEHL
T :"ES%../H...3.TB)".PRUEFSUMMEN FEHLER
:"EC%.=/R...3.TB)".DEKODIER FEHLER
:"DC%.D/\...3.TB)".HEADER PRUEFSUMME :
"HD%../F...3.TB)".LANGER DATEN BLOCK :"
EX%../P...3.TB)"..GESAMTFEHLER :"
;:.ER%..".";.Q/Z..ER%:.15,"V".DR$../..."
. MAKE YOUR SELECTION";../...680..0...
*** UNSCRATCH EIN FILE ***.60..KO$."DIS
K FILE RETTER".F0...170:."..FILE NAME ZU
M RETTEN ? ";:.1,FI$:..Z0... 720:. DRIVE
#..0..TY$."A":QU%..1:RE%..1:Z%..1:. 320
:RE%.0.J0J..Z%.."..NOT FOUND": 8:Z%.0:.6
80..0T..".FOUND FILE : ."H$..1..."..TY
P: .P.RG, .S.EQ, .U.SR, .R.EL ";.?1... 6
80:.TA$;:.I.1.4:.TA$.J("SPUR",I,1).3580.
K1...:.3560.J1..BY%.128.I:.800:. BUFFER
=0.Y1...8,G(BY%);..1...15,"U2:"8;DR%;TR%
;SC%: 8.P1...:."..FILE WIEDER KATALOGISI
ERT.":.15,"V".DR$:QU%..1.Y1$..680..1...
*** WELCHE FLOPPY ? ***..18.:..2B.. DEL
ETE ["].-2L.X%..(I):.G(34);:.211,X%:..N2
V..I.0.N0%.1:." "BL%(I).9.TB)NA$(I).26.
TB)FT$(I)" " BN%(I,0);..2`...34.TB)","BN
%(I,1)..2J..TA$:.TA$." "..680.N2T..B(214
).22.."."," .PRESS SPACE";:.680:.170.V
2~..:...2...****************************
*..3...*** DISK STATUS BASIC 3.0 ***.?3.
..*****************************.E3....G3
... >>> FUER LOTHAR HOFMANN <<<.M3..:..3
D..15,E%,E$,E1%,E2%:...3N..*************
**************.G3X..*** AENDERUNG PRG.ST
ART ***..3...***************************
..4..KO$."NEUE STARTADRESSE EINGEBEN".)4
...170:.720:. FRAGE DRIVE.<4..TY$."P":QU
%..1.J4..."..PROGRAM NAME ? ";:.1,FI$:Z%
..1:.:.320.Y4...Z%.0.3880..4..Z%.0:."..P
ROGRAMM "G(34)FI$G(34)" IST NICHT VORHAN
DEN!":. 680.V4(.."....".16.TB)"."H$"....
42.FI$.H$:.280:.140:.140..5<..140:X%.BY%
:.140:X.X%.256.BY%.95F.. 4050:."STARTADR
ESSE IST HEX "BY$.W5P.." DE
ZIMAL"X.N5Z..631,F("."):.198,1..5D.."..N
EW START ADDRESS ? "BY$".....";.C5N..1,B
Y$:.:.H(BY$,1)."@". 8:."..OK.":.760..5X.
.H(BY$,1).."$".X.E(BY$):.4010..6..BY$.J(
BY$,2):BY$.I("0000".BY$,4).-6..X.0:.I.1.
4:X%.F(J(BY$,I,1)).48.@6...X%.10.X%.X%.7
.V6 .X.X.X%.16.(4.I):..Q6..BY%.X.256:X%.
X.256.BY%..6..BU%.2:.800..6...8,G(X%)G(B
Y%);:.15,"U2:8"DR%,TR%,SC%:.15,"I".DR$..
6H. 8:...6R.E1%.BY%.16:E2%.BY%.15:BY$."$
":.4070..6..E1%.X%.16:E2%.X%.15.)7..BY$.
BY$.J(HZ$,E1%.1,1).J(HZ$,E2%.1,1)./7....
R7...**** INITIALISIERUNG DER ****.U7...
**** SKALAREN VARIABLEN ****.{7..:..7..
.**** FLOATING POINT ****..7".:..7,
.I.0 :. ZAEHLER.T76.J.0 :. ZAE
HLER..7@.K.0 :. ZAEHLER..8J.B.0
:. ZAEHLER.&8T.A.0 :. ADRESSE (0-
65535).H8^.X.0 :. ADRESSE (0-65535)
.J8H.P.0 :. FORMAT VAR. (TAB).P8R.:
..8|..**** INTEGER ****..8..
:..8..SC%.0 :. SEKTOR (0-20).U8..TR%.
18 :. SPUR (1-35)..8..AS%.0 :. VA
L (TASTE)..9..DR%.0 :. LAUFWERK #.,9.
.LR%.0 :. CAT. LAUFWERK #.M9B.MD%.1
:. ANZAHL LAUFWERKE.N9L.MK%.0 :. DI
SK-STATUS VAR...9V.PL%.0 :. ZAHL DER
WORKFILES..9..QU%..1 :. FLAG CAT GUELT
IG.S9..BU%.0 :. BUFFER PNT. VAR...9..
N0%.0 :. ZAHL CATALOG FILES..:..FI%.0
:. FILES PRO BLOCK.4:..BY%.0 :. A
SC (GETBYTE).W:..B1%.0 :. FILETYP IN
CATALOG.Y:..ER%.0 :. GESAMTFEHLER ZAH
L..:&.C% .0 :. ASC (HEX $)..:0.X% .0
:. CURSOR POSITION.W::.Q% .0 :. FL
AG COPY/SCRATCH..:D.EB%.0 :. FEHLER (
KEIN HD.)..;N.ES%.0 :. FEHLER (SYNCRO
N).1;X.EC%.0 :. FEHLER.H;B.DC%.0 :
. FEHLER.H;L.HD%.0 :. FEHLER (HEADER)
..;V.EX%.0 :. FEHLER (LONG BLK.)..;..
FR%.0 :. FREIE BLOCKS.G;..BE%.0 :.
BELEGTE BLOCKS..;..AN%.1 :. VON SPUR
.....<..EN%.35 :. ... BIS SPUR.$<..JJ
%.20 :. MAX. SEKTOREN/SPUR.G<..RE%.0
:. FLAG (FILE RETTEN).J<..E% .0 :.
DISK FEHLER (CODE)..<F.E$ ."" :. DISK
FEHLER (TEXT)..<P.E1%.0 :. DISK FEHLE
R (SPUR).S<Z.E2%.0 :. DISK FEHLER (SK
T.)..<..AF%.0 :. FLAG COPY ALPHA..<..
:..=...***************************.;=...
****>>>>>>FELDER<<<<<<*****.\=...*******
********************.B=..:..= .. NA$(150
) :. FILE NAMEN. =*.. CP$(150) :. WO
RK NAMEN..=4.. FT$(150) :. FILE TYP..=
>.. TY$( 4 ) :. TYPEN NAMEN..=H.:..>R.
. BL%(150) :. FILE LAENGE.#>\.. ER%(15
0) :. COPY FEHLER.C>F.. BN%(150,1) :.
FILE BEGINN.E>P.. BD%( 1 ) :. NAECHSTE
R BLK.K>Z....>... **** ALPHA SORT & COPY
ALL ***..>... *** PRINT CURRENT COPY TY
PE ***.L>...B.1.."PROGRAM":...>...B.2.."
SEQUENTIAL";..>...B.3.."RELATIVE";..?...
B.4.."USER";..?..." DATA.":..7?J.. *** T
EXT AUSGABE ***.E?T.."..ATTENTION.! LEGE
N SIE IN DRIVE 1 EINE..?...".LEERE ODER
UNBENUTZTE DISK EIN. DRIVE..?...".1 WIRD
FORMATIERT !..?..."..FALLS IN DRIVE 0 K
EIN MENUE VORHANDEN..@...".IST, LEGEN SI
E BITTE AUCH DIESES BEREIT..9@..."...DRU
ECKEN SIE (.J.) FUER WEITER, JEDE.P@..."
.ANDERE TASTE FUEHRT ZUM ABBRUCH !(V).."
;:.204,0. @...680:.204,1:.". ";:.TA$.."J
"..".END.";:.760..@$..63999..@...***VALI
DATE***..@...".....LOAD VALIDATION DISK
AND PRESS .RETURN."..A...V$:.V$..G(13).5
002.2A..."....VALIDATION SEQUENCE RUNNIN
G".LA...15,"V0": 15:.15,8,15.{A....12)".
.....DISK VALIDATED.":.T.1.3000:.:.....
)..I`AF.H..K..... ..
> CLICK IMAGE PREVIEW FOR FULL MODAL