DUP 64
FILE INFORMATION
FILENAME(S): DUP 64
FILE TYPE(S): PRG
FILE SIZE: 14.2K
FIRST SEEN: 2025-12-01 13:57:31
APPEARS ON: 1 disk(s)
FILE HASH
bd0b75c317eee4f28a8d9c877067ec567538c2cbbbab2e8d57f28f68ccc5d333
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 64 TILITIES | DUP 64 | PRG | HOL2001, Misc | 5 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 49 08 64 00 99 C7 28 31 34 32 29 3A 48 33 |..I.d...(142):H3|
00000010: 24 B2 22 44 49 53 4B 20 55 54 49 4C 49 54 59 20 |$."DISK UTILITY |
00000020: 50 52 4F 47 52 41 4D 4D 20 56 20 36 34 22 3A 48 |PROGRAMM V 64":H|
00000030: 34 24 B2 22 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |4$."............|
00000040: C0 C0 C0 C0 C0 C0 C0 C0 22 00 62 08 6E 00 48 35 |........".b.n.H5|
00000050: 24 B2 22 20 27 51 27 20 46 55 45 52 20 45 4E 44 |$." 'Q' FUER END|
00000060: 45 22 00 7E 08 78 00 89 20 38 32 30 3A 8F 20 49 |E".~.x.. 820:. I|
00000070: 4E 49 54 49 41 4C 49 53 49 45 52 55 4E 47 00 9C |NITIALISIERUNG..|
00000080: 08 82 00 8F 20 2A 2A 2A 2A 20 41 53 43 49 49 20 |.... **** ASCII |
00000090: 45 49 4E 4C 45 53 45 4E 20 2A 2A 2A 00 BA 08 8C |EINLESEN ***....|
000000A0: 00 A1 23 38 2C 42 59 24 3A 42 59 25 B2 C6 28 42 |..#8,BY$:BY%..(B|
000000B0: 59 24 AA C7 28 30 29 29 3A 8E 00 E0 08 96 00 99 |Y$..(0)):.......|
000000C0: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 22 |".............."|
000000D0: 3A 81 4B B2 31 34 A4 32 33 3A 99 53 50 24 3A 82 |:.K.14.23:.SP$:.|
000000E0: 00 F8 08 A0 00 99 22 13 11 11 11 11 11 11 11 11 |......".........|
000000F0: 11 11 11 11 11 22 3A 8E 00 01 09 AA 00 99 22 93 |.....":.......".|
00000100: 22 00 33 09 B4 00 99 22 13 B0 22 53 54 24 22 AE |".3....".."ST$".|
00000110: 22 3A 50 B2 35 37 2E 35 AB 28 C3 28 48 31 24 29 |":P.57.5.(.(H1$)|
00000120: AD 32 29 3A 8B 50 B3 B1 B5 28 50 29 A7 50 B2 50 |.2):.P...(P).P.P|
00000130: AB 2E 35 00 4C 09 BE 00 99 22 91 AB 22 C8 28 53 |..5.L...."..".(S|
00000140: 54 24 2C 50 AB 33 38 29 48 31 24 3B 00 6B 09 C8 |T$,P.38)H1$;.k..|
00000150: 00 99 C8 28 53 54 24 2C 37 38 AB C3 28 48 31 24 |...(ST$,78..(H1$|
00000160: 29 AB 50 AB 31 29 3B 22 B3 22 3B 00 A0 09 D2 00 |).P.1);".";.....|
00000170: 99 22 9D 9D B3 AB 22 53 54 24 22 B3 22 3B 3A 50 |."...."ST$".";:P|
00000180: B2 35 37 2E 35 AB 28 C3 28 4B 4F 24 29 AD 32 29 |.57.5.(.(KO$).2)|
00000190: 3A 8B 50 B3 B1 B5 28 50 29 A7 50 B2 50 AB 2E 35 |:.P...(P).P.P..5|
000001A0: 00 CE 09 DC 00 99 22 AB 22 3B C8 28 53 54 24 2C |......".";.(ST$,|
000001B0: 50 AB 33 38 29 4B 4F 24 3B 3A 99 C8 28 53 54 24 |P.38)KO$;:..(ST$|
000001C0: 2C 37 38 AB C3 28 4B 4F 24 29 AB 50 29 3B 00 E2 |,78..(KO$).P);..|
000001D0: 09 E6 00 99 22 9D 9D B3 AD 22 53 54 24 22 BD 22 |...."...."ST$"."|
000001E0: 3A 8E 00 06 0A F0 00 8F 2A 2A 2A 20 42 4C 4F 43 |:.......*** BLOC|
000001F0: 4B 20 4C 45 53 45 4E 20 28 4D 49 54 20 4F 50 45 |K LESEN (MIT OPE|
00000200: 4E 29 20 2A 2A 2A 00 25 0A FA 00 98 31 35 2C 22 |N) ***.%....15,"|
00000210: 49 22 AA 44 52 24 3A 4D 4B 25 B2 44 53 3A 8B 4D |I".DR$:MK%.DS:.M|
00000220: 4B 25 A7 20 8E 00 36 0A 04 01 9F 38 2C 38 2C 38 |K%. ..6....8,8,8|
00000230: 2C 22 23 22 3A 8E 00 4F 0A 0E 01 8F 2A 2A 2A 20 |,"#":..O....*** |
00000240: 42 4C 4F 43 4B 20 4C 45 53 45 4E 20 2A 2A 2A 00 |BLOCK LESEN ***.|
00000250: 6A 0A 18 01 98 31 35 2C 22 55 31 3A 22 38 3B 44 |j....15,"U1:"8;D|
00000260: 52 25 3B 54 52 25 3B 53 43 25 00 70 0A 22 01 8E |R%;TR%;SC%.p."..|
00000270: 00 76 0A 2C 01 3A 00 90 0A 36 01 8F 20 2A 2A 2A |.v.,.:...6.. ***|
00000280: 2A 20 44 49 52 45 43 54 4F 52 59 20 2A 2A 2A 2A |* DIRECTORY ****|
00000290: 00 A1 0A 40 01 8D 20 35 34 30 3A 8B 4D 4B 25 A7 |...@.. 540:.MK%.|
000002A0: 8E 00 D1 0A 4A 01 8B 28 51 55 25 B2 30 29 AF 28 |....J..(QU%.0).(|
000002B0: 49 44 24 B2 44 49 24 29 AF 28 44 52 25 B2 4C 52 |ID$.DI$).(DR%.LR|
000002C0: 25 29 AF 28 5A 59 24 B2 54 59 24 29 A7 A0 38 3A |%).(ZY$.TY$)..8:|
000002D0: 8E 00 EB 0A 54 01 99 22 11 11 43 41 54 41 4C 4F |....T.."..CATALO|
000002E0: 47 20 45 49 4E 4C 45 53 45 4E 22 00 2C 0B 5E 01 |G EINLESEN".,.^.|
000002F0: 51 55 25 B2 30 3A 44 49 24 B2 49 44 24 3A 4C 52 |QU%.0:DI$.ID$:LR|
00000300: 25 B2 44 52 25 3A 4E 30 25 B2 30 3A 42 55 25 B2 |%.DR%:N0%.0:BU%.|
00000310: 30 3A 46 49 25 B2 30 3A 54 52 25 B2 31 38 3A 53 |0:FI%.0:TR%.18:S|
00000320: 43 25 B2 31 3A 5A 59 24 B2 54 59 24 00 43 0B 68 |C%.1:ZY$.TY$.C.h|
00000330: 01 8D 20 32 38 30 3A 8F 20 42 4C 4F 43 4B 2D 52 |.. 280:. BLOCK-R|
00000340: 45 41 44 00 77 0B 72 01 81 49 B2 30 A4 31 3A A1 |EAD.w.r..I.0.1:.|
00000350: 23 38 2C 42 59 24 3A 42 44 25 28 49 29 B2 C6 28 |#8,BY$:BD%(I)..(|
00000360: 42 59 24 AA C7 28 30 29 29 3A 82 3A 42 55 25 B2 |BY$..(0)):.:BU%.|
00000370: 32 3A 8D 20 38 30 30 00 8F 0B 7C 01 8D 20 31 34 |2:. 800...|.. 14|
00000380: 30 3A 42 31 25 B2 28 42 59 25 20 AF 20 37 29 00 |0:B1%.(BY% . 7).|
00000390: A4 0B 86 01 8B 42 31 25 B2 30 AF 52 45 25 B2 30 |.....B1%.0.RE%.0|
000003A0: A7 34 39 30 00 B5 0B 90 01 8B 42 31 25 AF 52 45 |.490......B1%.RE|
000003B0: 25 A7 34 39 30 00 DC 0B 9A 01 8B 54 59 24 B3 B1 |%.490......TY$..|
000003C0: 22 41 22 A7 8B C6 28 54 59 24 28 42 31 25 29 29 |"A"...(TY$(B1%))|
000003D0: B3 B1 C6 28 54 59 24 29 A7 34 39 30 00 04 0C A4 |...(TY$).490....|
000003E0: 01 48 24 B2 22 22 3A 81 49 B2 30 A4 31 3A 8D 20 |.H$."":.I.0.1:. |
000003F0: 31 34 30 3A 42 4E 25 28 4E 30 25 2C 49 29 B2 42 |140:BN%(N0%,I).B|
00000400: 59 25 3A 82 00 30 0C AE 01 81 49 B2 33 A4 31 38 |Y%:..0....I.3.18|
00000410: 3A A1 23 38 2C 42 59 24 3A 8B 42 59 24 B3 B1 C7 |:.#8,BY$:.BY$...|
00000420: 28 31 36 30 29 A7 20 48 24 B2 48 24 AA 42 59 24 |(160). H$.H$.BY$|
00000430: 00 3F 0C B8 01 82 3A 8B 5A 25 A7 32 33 38 30 00 |.?....:.Z%.2380.|
00000440: 5C 0C C2 01 81 49 B2 31 39 A4 32 37 3A A1 23 38 |\....I.19.27:.#8|
00000450: 2C 42 59 24 3A 82 3A 8D 20 31 34 30 00 7E 0C CC |,BY$:.:. 140.~..|
00000460: 01 42 4C 25 B2 42 59 25 3A 8D 20 31 34 30 3A 42 |.BL%.BY%:. 140:B|
00000470: 4C 25 B2 42 4C 25 AA 32 35 36 AC 42 59 25 00 B7 |L%.BL%.256.BY%..|
00000480: 0C D6 01 42 4C 25 28 4E 30 25 29 B2 42 4C 25 3A |...BL%(N0%).BL%:|
00000490: 4E 41 24 28 4E 30 25 29 B2 48 24 3A 46 54 24 28 |NA$(N0%).H$:FT$(|
000004A0: 4E 30 25 29 B2 54 59 24 28 42 31 25 29 3A 4E 30 |N0%).TY$(B1%):N0|
000004B0: 25 B2 4E 30 25 AA 31 00 CA 0C E0 01 99 22 91 22 |%.N0%.1......"."|
000004C0: A3 32 35 AA 54 42 29 4E 30 25 00 F8 0C EA 01 46 |.25.TB)N0%.....F|
000004D0: 49 25 B2 46 49 25 AA 31 3A 8B 46 49 25 B3 38 A7 |I%.FI%.1:.FI%.8.|
000004E0: 42 55 25 B2 46 49 25 AC 33 32 AA 32 3A 8D 20 38 |BU%.FI%.32.2:. 8|
000004F0: 30 30 3A 89 20 33 38 30 00 0A 0D F4 01 8B 42 44 |00:. 380......BD|
00000500: 25 28 30 29 B2 30 A7 35 32 30 00 2F 0D FE 01 54 |%(0).0.520./...T|
00000510: 52 25 B2 42 44 25 28 30 29 3A 53 43 25 B2 42 44 |R%.BD%(0):SC%.BD|
00000520: 25 28 31 29 3A 46 49 25 B2 30 3A 89 33 36 30 00 |%(1):FI%.0:.360.|
00000530: 36 0D 08 02 A0 38 00 3C 0D 12 02 8E 00 52 0D 1C |6....8.<.....R..|
00000540: 02 8F 20 2A 2A 2A 20 47 45 54 20 49 44 24 20 2A |.. *** GET ID$ *|
00000550: 2A 2A 00 68 0D 26 02 8D 20 32 35 30 3A 8F 20 4F |**.h.&.. 250:. O|
00000560: 50 45 4E 20 46 49 4C 45 00 83 0D 30 02 8B 20 4D |PEN FILE...0.. M|
00000570: 4B 25 20 A7 20 8E 20 3A 8F 20 53 49 43 48 45 52 |K% . . :. SICHER|
00000580: 2E 2E 2E 00 99 0D 3A 02 54 52 25 B2 31 38 3A 53 |......:.TR%.18:S|
00000590: 43 25 B2 30 3A 8D 32 38 30 00 B2 0D 44 02 42 55 |C%.0:.280...D.BU|
000005A0: 25 B2 31 36 32 3A 49 44 24 B2 22 22 3A 8D 20 38 |%.162:ID$."":. 8|
000005B0: 30 30 00 D0 0D 4E 02 81 49 B2 31 A4 35 3A 8D 31 |00...N..I.1.5:.1|
000005C0: 34 30 3A 49 44 24 B2 49 44 24 AA 42 59 24 3A 82 |40:ID$.ID$.BY$:.|
000005D0: 00 D6 0D 58 02 8E 00 F3 0D 62 02 8F 20 2A 2A 2A |...X.....b.. ***|
000005E0: 20 47 45 54 20 20 4E 41 4D 45 20 2B 20 49 44 20 | GET NAME + ID |
000005F0: 2A 2A 2A 00 03 0E 6C 02 8D 35 35 30 3A 8B 4D 4B |***...l..550:.MK|
00000600: 25 A7 8E 00 1B 0E 76 02 42 55 25 B2 31 34 34 3A |%.....v.BU%.144:|
00000610: 4E 41 24 B2 22 22 3A 8D 38 30 30 00 42 0E 80 02 |NA$."":.800.B...|
00000620: 81 49 B2 31 A4 31 36 3A 8D 31 34 30 3A 8B 42 59 |.I.1.16:.140:.BY|
00000630: 25 B3 B1 31 36 30 A7 4E 41 24 B2 4E 41 24 AA 42 |%..160.NA$.NA$.B|
00000640: 59 24 00 4A 0E 8A 02 82 3A 8E 00 50 0E 94 02 3A |Y$.J....:..P...:|
00000650: 00 6D 0E 9E 02 8F 20 2A 2A 2A 20 47 45 54 20 45 |.m.... *** GET E|
00000660: 49 4E 45 20 54 41 53 54 45 20 2A 2A 2A 00 85 0E |INE TASTE ***...|
00000670: A8 02 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A |...198,0:.198,1:|
00000680: A1 20 54 41 24 00 96 0E B2 02 41 53 25 B2 C5 28 |. TA$.....AS%..(|
00000690: 54 41 24 29 3A 8E 00 9C 0E BC 02 3A 00 BC 0E C6 |TA$):......:....|
000006A0: 02 8F 20 2A 2A 2A 20 45 52 46 52 41 47 45 20 44 |.. *** ERFRAGE D|
000006B0: 52 49 56 45 20 4E 52 2E 20 2A 2A 2A 00 D3 0E D0 |RIVE NR. ***....|
000006C0: 02 44 52 25 B2 30 3A 54 41 24 B2 22 30 22 3A 89 |.DR%.0:TA$."0":.|
000006D0: 37 33 30 00 E1 0E DA 02 44 52 24 B2 54 41 24 3A |730.....DR$.TA$:|
000006E0: 8E 00 E7 0E E4 02 3A 00 02 0F EE 02 8F 20 2A 2A |......:...... **|
000006F0: 2A 20 56 45 52 5A 4F 45 47 45 52 55 4E 47 20 2A |* VERZOEGERUNG *|
00000700: 2A 2A 00 19 0F F8 02 8B 41 46 25 B2 30 A7 81 49 |**......AF%.0..I|
00000710: B2 31 A4 32 35 30 30 3A 82 00 1F 0F 02 03 8E 00 |.1.2500:........|
00000720: 25 0F 0C 03 3A 00 48 0F 16 03 8F 2A 2A 2A 20 42 |%...:.H....*** B|
00000730: 55 46 46 45 52 20 50 4F 49 4E 54 45 52 20 53 45 |UFFER POINTER SE|
00000740: 54 5A 45 4E 20 2A 2A 2A 00 5E 0F 20 03 98 31 35 |TZEN ***.^. ..15|
00000750: 2C 22 42 2D 50 3A 22 38 3B 42 55 25 3A 8E 00 83 |,"B-P:"8;BU%:...|
00000760: 0F 2A 03 8F 20 20 2A 2A 2A 2A 20 44 41 55 45 52 |.*.. **** DAUER|
00000770: 20 46 49 4C 45 53 20 4F 45 46 46 4E 45 4E 20 2A | FILES OEFFNEN *|
00000780: 2A 2A 2A 00 89 0F 34 03 3A 00 AA 0F 3E 03 9F 20 |***...4.:...>.. |
00000790: 31 35 2C 38 2C 31 35 3A 8F 20 44 49 53 4B 20 45 |15,8,15:. DISK E|
000007A0: 52 52 4F 52 20 4B 41 4E 41 4C 00 C3 0F 48 03 9F |RROR KANAL...H..|
000007B0: 20 30 31 2C 30 2C 30 30 3A 8F 20 54 41 53 54 41 | 01,0,00:. TASTA|
000007C0: 54 55 52 00 F5 0F 52 03 53 50 24 B2 22 20 20 20 |TUR...R.SP$." |
000007D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000007E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000007F0: 20 20 20 20 22 00 27 10 5C 03 46 4F 24 B2 22 DD | ".'.\.FO$.".|
00000800: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000810: 20 DD 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | . |
00000820: 20 20 20 20 20 DD 22 00 58 10 66 03 53 54 24 B2 | .".X.f.ST$.|
00000830: 22 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |"...............|
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 22 00 7F 10 70 03 46 4D 24 |......."...p.FM$|
00000860: B2 22 20 2A 22 3A 8B 42 38 A7 53 54 24 B2 C8 28 |." *":.B8.ST$..(|
00000870: 53 54 24 AA 53 54 24 AA 53 54 24 2C 37 38 29 00 |ST$.ST$.ST$,78).|
00000880: A5 10 7A 03 48 31 24 B2 22 49 4E 49 54 49 41 4C |..z.H1$."INITIAL|
00000890: 49 53 49 45 52 55 4E 47 20 56 4F 4E 20 44 55 50 |ISIERUNG VON DUP|
000008A0: 20 20 36 34 22 00 E0 10 84 03 4E 41 24 B2 22 22 | 64".....NA$.""|
000008B0: 3A 4E 42 24 B2 22 22 3A 49 44 24 B2 22 22 3A 44 |:NB$."":ID$."":D|
000008C0: 49 24 B2 22 22 3A 54 41 24 B2 22 22 3A 54 59 24 |I$."":TA$."":TY$|
000008D0: B2 22 22 3A 42 59 24 B2 22 22 3A 48 24 B2 22 22 |."":BY$."":H$.""|
000008E0: 00 FC 10 8E 03 4B 4F 24 B2 48 34 24 3A 8D 31 37 |.....KO$.H4$:.17|
000008F0: 30 3A 8D 34 30 39 30 3A 8D 37 36 30 00 17 11 98 |0:.4090:.760....|
00000900: 03 48 5A 24 B2 22 30 31 32 33 34 35 36 37 38 39 |.HZ$."0123456789|
00000910: 41 42 43 44 45 46 22 00 2C 11 A2 03 81 49 B2 31 |ABCDEF".,....I.1|
00000920: A4 34 3A 87 54 59 24 28 49 29 3A 82 00 32 11 AC |.4:.TY$(I):..2..|
00000930: 03 3A 00 55 11 B6 03 8F 20 2A 2A 2A 2A 20 20 48 |.:.U.... **** H|
00000940: 41 55 50 54 20 20 2D 20 20 4D 45 4E 55 45 20 20 |AUPT - MENUE |
00000950: 20 2A 2A 2A 2A 00 5B 11 C0 03 3A 00 6F 11 CA 03 | ****.[...:.o...|
00000960: 4B 4F 24 B2 48 35 24 3A 48 31 24 B2 48 33 24 00 |KO$.H5$:H1$.H3$.|
00000970: 89 11 D4 03 8D 31 37 30 3A 58 B2 B8 28 30 29 3A |.....170:X..(0):|
00000980: 8F 20 47 41 52 42 41 47 45 00 AE 11 DE 03 99 A3 |. GARBAGE.......|
00000990: 38 AA 54 42 29 22 11 31 29 20 53 43 52 41 54 43 |8.TB)".1) SCRATC|
000009A0: 48 45 4E 20 56 4F 4E 20 46 49 4C 45 53 22 00 D4 |HEN VON FILES"..|
000009B0: 11 E8 03 99 A3 38 AA 54 42 29 22 11 32 29 20 46 |.....8.TB)".2) F|
000009C0: 4F 52 4D 41 54 49 45 52 45 4E 20 56 4F 4E 20 44 |ORMATIEREN VON D|
000009D0: 49 53 4B 53 00 F0 11 F2 03 99 A3 38 AA 54 42 29 |ISKS.......8.TB)|
000009E0: 22 11 33 29 20 46 49 4C 45 20 4C 49 53 54 45 4E |".3) FILE LISTEN|
000009F0: 00 15 12 FC 03 99 A3 38 AA 54 42 29 22 11 34 29 |.......8.TB)".4)|
00000A00: 20 44 49 53 4B 20 4E 41 4D 45 2F 49 44 20 41 45 | DISK NAME/ID AE|
00000A10: 4E 44 45 52 4E 00 3A 12 06 04 99 A3 38 AA 54 42 |NDERN.:.....8.TB|
00000A20: 29 22 11 35 29 20 54 45 53 54 4C 45 53 45 4E 20 |)".5) TESTLESEN |
00000A30: 45 49 4E 45 52 20 44 49 53 4B 00 5D 12 10 04 99 |EINER DISK.]....|
00000A40: A3 38 AA 54 42 29 22 11 36 29 20 44 49 52 45 43 |.8.TB)".6) DIREC|
00000A50: 54 4F 52 59 20 20 41 4E 5A 45 49 47 45 00 85 12 |TORY ANZEIGE...|
00000A60: 1A 04 99 A3 38 AA 54 42 29 22 11 37 29 20 46 49 |....8.TB)".7) FI|
00000A70: 4C 45 20 52 45 54 54 45 4E 20 28 55 4E 53 43 52 |LE RETTEN (UNSCR|
00000A80: 41 54 43 48 29 00 AC 12 24 04 99 A3 38 AA 54 42 |ATCH)...$...8.TB|
00000A90: 29 22 11 38 29 20 53 54 41 52 54 41 44 52 45 53 |)".8) STARTADRES|
00000AA0: 53 45 20 41 45 4E 44 45 52 4E 22 3B 00 C3 12 2E |SE AENDERN";....|
00000AB0: 04 8D 36 37 30 3A 8B 54 41 24 B2 22 51 22 A7 31 |..670:.TA$."Q".1|
00000AC0: 31 32 30 00 D3 12 38 04 8B 41 53 25 B2 30 A7 31 |120...8..AS%.0.1|
00000AD0: 30 37 30 00 EB 12 42 04 8F 20 2A 2A 2A 20 56 45 |070...B.. *** VE|
00000AE0: 52 54 45 49 4C 45 52 20 2A 2A 2A 00 21 13 4C 04 |RTEILER ***.!.L.|
00000AF0: 91 41 53 25 8D 31 33 38 30 2C 31 31 36 30 2C 32 |.AS%.1380,1160,2|
00000B00: 34 33 30 2C 32 37 35 30 2C 33 30 30 30 2C 32 32 |430,2750,3000,22|
00000B10: 38 30 2C 33 34 38 30 2C 33 38 30 30 3A 89 39 37 |80,3480,3800:.97|
00000B20: 30 00 3C 13 56 04 8E 20 3A 20 8F 20 44 55 4D 4D |0.<.V.. : . DUMM|
00000B30: 59 20 53 55 42 52 4F 55 54 49 4E 45 00 45 13 60 |Y SUBROUTINE.E.`|
00000B40: 04 8D 31 37 30 00 6D 13 6A 04 98 31 35 2C 22 55 |..170.m.j..15,"U|
00000B50: 3A 22 3A 9C 3A 99 22 13 13 11 11 11 11 11 11 22 |:":.:."........"|
00000B60: 3A 80 3A 8F 20 44 55 50 20 45 4E 44 45 00 73 13 |:.:. DUP ENDE.s.|
00000B70: 74 04 3A 00 8D 13 7E 04 8F 20 2A 2A 2A 20 46 4F |t.:...~.. *** FO|
00000B80: 52 4D 41 54 49 45 52 45 4E 20 2A 2A 2A 00 B3 13 |RMATIEREN ***...|
00000B90: 88 04 4B 4F 24 B2 22 44 49 53 4B 20 46 4F 52 4D |..KO$."DISK FORM|
00000BA0: 41 54 49 45 52 20 52 4F 55 54 49 4E 45 22 3A 8D |ATIER ROUTINE":.|
00000BB0: 31 37 30 00 D2 13 92 04 8D 20 37 32 30 3A 8F 20 |170...... 720:. |
00000BC0: 5A 45 49 4C 45 4E 4E 55 4D 4D 45 52 20 4C 45 53 |ZEILENNUMMER LES|
00000BD0: 45 4E 00 F0 13 9C 04 8D 20 36 32 30 3A A0 38 3A |EN...... 620:.8:|
00000BE0: 8F 20 44 49 53 4B 20 49 44 20 26 20 4E 41 4D 45 |. DISK ID & NAME|
00000BF0: 00 0A 14 A6 04 8B 4D 4B 25 A7 31 32 34 30 3A 8F |......MK%.1240:.|
00000C00: 20 3F 42 41 44 20 44 49 53 4B 00 4C 14 B0 04 44 | ?BAD DISK.L...D|
00000C10: 24 B2 22 22 3A 99 22 11 44 49 53 4B 20 49 44 20 |$."":.".DISK ID |
00000C20: 3D 22 49 44 24 3A 99 22 11 53 4F 4C 4C 20 44 45 |="ID$:.".SOLL DE|
00000C30: 52 20 49 44 20 42 45 49 42 45 48 41 4C 54 45 4E |R ID BEIBEHALTEN|
00000C40: 20 57 45 52 44 45 4E 20 3F 20 22 3B 00 74 14 BA | WERDEN ? ";.t..|
00000C50: 04 84 31 2C 54 41 24 3A 99 3A 8B C8 28 54 41 24 |..1,TA$:.:..(TA$|
00000C60: 2C 31 29 B2 22 4A 22 A7 49 44 24 B2 22 22 3A 89 |,1)."J".ID$."":.|
00000C70: 31 32 34 30 00 9B 14 C4 04 8B C8 28 54 41 24 2C |1240.......(TA$,|
00000C80: 31 29 B3 B1 22 4E 22 A7 99 22 91 22 3B 3A 97 32 |1).."N"..".";:.2|
00000C90: 31 31 2C 33 33 3A 89 31 32 31 30 00 AA 14 CE 04 |11,33:.1210.....|
00000CA0: 44 24 B2 22 2C 22 AA 49 44 24 00 DD 14 D8 04 99 |D$.",".ID$......|
00000CB0: 22 11 44 49 53 4B 20 4E 41 4D 45 20 2C 20 49 44 |".DISK NAME , ID|
00000CC0: 20 20 3F 20 22 3B 3A 46 45 25 B2 C2 28 32 31 31 | ? ";:FE%..(211|
00000CD0: 29 3A 99 4E 41 24 22 2C 22 49 44 24 3B 00 0F 15 |):.NA$","ID$;...|
00000CE0: E2 04 97 32 31 31 2C 46 45 25 3A 84 31 2C 4E 41 |...211,FE%:.1,NA|
00000CF0: 24 2C 49 44 24 3A 99 3A 8B C8 28 4E 41 24 2C 31 |$,ID$:.:..(NA$,1|
00000D00: 29 B2 22 2A 22 B0 4E 41 24 B2 22 22 A7 20 8E 00 |)."*".NA$."". ..|
00000D10: 29 15 EC 04 8F 20 5E 5E 5E 20 41 42 42 52 55 43 |).... ^^^ ABBRUC|
00000D20: 48 20 5E 5E 5E 20 21 21 21 00 59 15 F6 04 51 55 |H ^^^ !!!.Y...QU|
00000D30: 25 B2 AB 31 3A 43 43 24 B2 22 4E 3A 22 AA 4E 41 |%..1:CC$."N:".NA|
00000D40: 24 3A 8B 49 44 24 B1 22 22 A7 43 43 24 B2 43 43 |$:.ID$."".CC$.CC|
00000D50: 24 AA 22 2C 22 AA 49 44 24 00 8D 15 00 05 99 22 |$.",".ID$......"|
00000D60: 11 44 49 53 4B 45 54 54 45 20 57 49 52 44 20 46 |.DISKETTE WIRD F|
00000D70: 4F 52 4D 41 54 49 45 52 54 2E 22 3A A0 31 3A 9F |ORMATIERT.":.1:.|
00000D80: 31 2C 38 2C 31 35 2C 22 22 AA 43 43 24 00 9B 15 |1,8,15,"".CC$...|
00000D90: 0A 05 A0 31 3A 9F 31 2C 30 2C 30 00 A9 15 14 05 |...1:.1,0,0.....|
00000DA0: 8B 44 53 B3 32 30 A7 20 8E 00 BC 15 1E 05 99 22 |.DS.20. ......."|
00000DB0: 11 46 45 48 4C 45 52 20 3A 22 45 24 00 E5 15 28 |.FEHLER :"E$...(|
00000DC0: 05 98 31 35 2C 22 49 22 AA 44 52 24 3A 99 22 11 |..15,"I".DR$:.".|
00000DD0: 4C 45 54 5A 54 45 52 20 56 45 52 53 55 43 48 20 |LETZTER VERSUCH |
00000DE0: 2E 2E 2E 22 3B 00 05 16 32 05 98 31 35 2C 43 43 |...";...2..15,CC|
00000DF0: 24 3A 8B 44 53 B2 30 A7 99 22 12 4F 4B 20 21 22 |$:.DS.0..".OK !"|
00000E00: 3A 89 37 36 30 00 23 16 3C 05 99 22 44 49 53 4B |:.760.#.<.."DISK|
00000E10: 20 12 44 45 46 45 4B 54 92 20 21 21 21 22 3A 89 | .DEFEKT. !!!":.|
00000E20: 37 36 30 00 40 16 46 05 83 22 53 45 51 22 2C 22 |760.@.F.."SEQ","|
00000E30: 50 52 47 22 2C 22 55 53 52 22 2C 22 52 45 4C 22 |PRG","USR","REL"|
00000E40: 00 46 16 50 05 3A 00 66 16 5A 05 8F 20 2A 2A 2A |.F.P.:.f.Z.. ***|
00000E50: 2A 20 53 43 52 41 54 43 48 20 52 4F 55 54 49 4E |* SCRATCH ROUTIN|
00000E60: 45 20 2A 2A 2A 2A 00 90 16 64 05 4B 4F 24 B2 22 |E ****...d.KO$."|
00000E70: 53 43 52 41 54 43 48 20 52 4F 55 54 49 4E 45 22 |SCRATCH ROUTINE"|
00000E80: 3A 4B 24 B2 22 53 43 52 41 54 43 48 45 4E 20 22 |:K$."SCRATCHEN "|
00000E90: 00 A0 16 6E 05 51 25 B2 AB 31 3A 89 31 34 33 30 |...n.Q%..1:.1430|
00000EA0: 00 A6 16 78 05 3A 00 C4 16 82 05 8F 20 2A 2A 2A |...x.:...... ***|
00000EB0: 2A 20 4B 4F 50 49 45 52 52 4F 55 54 49 4E 45 20 |* KOPIERROUTINE |
00000EC0: 2A 2A 2A 2A 00 F1 16 8C 05 51 25 B2 30 3A 4B 4F |****.....Q%.0:KO|
00000ED0: 24 B2 22 4B 4F 50 49 45 52 20 52 4F 55 54 49 4E |$."KOPIER ROUTIN|
00000EE0: 45 22 3A 4B 24 B2 22 4B 4F 50 49 45 52 45 4E 20 |E":K$."KOPIEREN |
00000EF0: 22 00 00 17 96 05 50 4C 25 B2 30 3A 8D 31 37 30 |".....PL%.0:.170|
00000F00: 00 39 17 A0 05 8B 4D 44 25 B2 30 AF 51 25 B2 30 |.9....MD%.0.Q%.0|
00000F10: A7 99 22 11 11 20 20 20 4E 49 43 48 54 20 42 45 |..".. NICHT BE|
00000F20: 49 20 45 49 4E 45 52 20 12 34 30 33 31 92 20 21 |I EINER .4031. !|
00000F30: 21 21 22 3A 89 20 36 38 30 00 4F 17 AA 05 99 4B |!!":. 680.O....K|
00000F40: 24 22 56 4F 4E 20 91 22 3B 3A 8D 20 37 32 30 00 |$"VON .";:. 720.|
00000F50: 67 17 B4 05 8B 51 25 A7 20 31 34 38 30 3A 8F 20 |g....Q%. 1480:. |
00000F60: 53 43 52 41 54 43 48 00 84 17 BE 05 99 22 91 22 |SCRATCH......"."|
00000F70: A3 58 25 AA 32 AA 54 42 29 22 4E 41 43 48 22 31 |.X%.2.TB)"NACH"1|
00000F80: AB 44 52 25 00 C6 17 C8 05 99 22 11 54 59 50 3A |.DR%......".TYP:|
00000F90: 20 12 50 92 52 47 2C 20 12 53 92 45 51 2C 20 12 | .P.RG, .S.EQ, .|
00000FA0: 55 92 53 52 2C 20 12 52 92 45 4C 2C 20 4F 44 45 |U.SR, .R.EL, ODE|
00000FB0: 52 20 12 41 92 4C 4C 45 53 20 3F 20 22 3B 3A 58 |R .A.LLES ? ";:X|
00000FC0: 25 B2 B9 28 30 29 00 D5 17 D2 05 8D 36 38 30 3A |%..(0)......680:|
00000FD0: 99 54 41 24 3B 00 07 18 DC 05 8B 54 41 24 B2 22 |.TA$;......TA$."|
00000FE0: 50 22 B0 54 41 24 B2 22 53 22 B0 54 41 24 B2 22 |P".TA$."S".TA$."|
00000FF0: 55 22 B0 54 41 24 B2 22 52 22 B0 54 41 24 B2 22 |U".TA$."R".TA$."|
00001000: 41 22 A7 31 35 32 30 00 19 18 E6 05 97 32 31 31 |A".1520......211|
00001010: 2C 58 25 3A 89 31 34 39 30 00 35 18 F0 05 54 59 |,X%:.1490.5...TY|
00001020: 24 B2 54 41 24 3A 8B 51 25 A7 41 4C 25 B2 30 3A |$.TA$:.Q%.AL%.0:|
00001030: 89 31 35 36 30 00 62 18 FA 05 99 3A 99 22 11 12 |.1560.b....:."..|
00001040: 46 92 52 41 47 45 4E 20 4F 44 45 52 20 12 41 92 |F.RAGEN ODER .A.|
00001050: 4C 4C 45 53 20 4B 4F 50 49 45 52 45 4E 20 3F 20 |LLES KOPIEREN ? |
00001060: 22 3B 00 8D 18 04 06 8D 36 38 30 3A 41 4C 25 B2 |";......680:AL%.|
00001070: 28 54 41 24 B2 22 41 22 29 3A 8B 41 4C 25 A7 99 |(TA$."A"):.AL%..|
00001080: 22 41 4C 4C 45 53 22 3A 89 31 35 36 30 00 9B 18 |"ALLES":.1560...|
00001090: 0E 06 99 22 46 52 41 47 45 4E 22 00 B3 18 18 06 |..."FRAGEN".....|
000010A0: 99 3A 8D 33 31 30 3A 8B 4E 30 25 B2 30 AF 41 46 |.:.310:.N0%.0.AF|
000010B0: 25 A7 8E 00 E0 18 22 06 8B 20 4E 30 25 B2 30 A7 |%.....".. N0%.0.|
000010C0: 99 22 11 11 12 44 49 45 20 44 49 53 4B 20 49 53 |."...DIE DISK IS|
000010D0: 54 20 4C 45 45 52 92 21 21 21 22 3A 89 37 36 30 |T LEER.!!!":.760|
000010E0: 00 FF 18 2C 06 8D 20 31 35 30 3A 8F 20 44 45 4C |...,.. 150:. DEL|
000010F0: 45 54 45 20 5A 45 49 4C 45 20 31 30 2D 32 33 00 |ETE ZEILE 10-23.|
00001100: 29 19 36 06 99 22 4C 41 45 4E 47 45 20 20 20 20 |).6.."LAENGE |
00001110: 20 20 20 4E 41 4D 45 20 20 20 20 20 20 20 20 20 | NAME |
00001120: 20 20 20 20 20 41 52 54 22 00 3D 19 40 06 81 20 | ART".=.@.. |
00001130: 49 20 B2 20 30 20 A4 20 4E 30 25 AB 31 00 65 19 |I . 0 . N0%.1.e.|
00001140: 4A 06 99 22 11 22 42 4C 25 28 49 29 A3 38 AA 54 |J.."."BL%(I).8.T|
00001150: 42 29 4E 41 24 28 49 29 A3 33 31 AA 54 42 29 46 |B)NA$(I).31.TB)F|
00001160: 54 24 28 49 29 00 7E 19 54 06 99 22 11 20 20 20 |T$(I).~.T..". |
00001170: 20 20 20 20 22 4B 24 22 20 28 4A 2F 4E 29 00 8C | "K$" (J/N)..|
00001180: 19 5E 06 8B 41 4C 25 A7 31 36 37 30 00 AC 19 68 |.^..AL%.1670...h|
00001190: 06 8D 20 36 38 30 3A 8B 54 41 24 B2 22 4E 22 B0 |.. 680:.TA$."N".|
000011A0: 54 41 24 B2 22 11 22 A7 31 36 38 30 00 C5 19 72 |TA$.".".1680...r|
000011B0: 06 8B 54 41 24 B2 22 91 22 A7 8D 32 34 31 30 3A |..TA$."."..2410:|
000011C0: 89 31 36 38 30 00 D9 19 7C 06 8B 54 41 24 B3 B1 |.1680...|..TA$..|
000011D0: 22 4A 22 A7 20 31 36 34 30 00 F7 19 86 06 43 50 |"J". 1640.....CP|
000011E0: 24 28 50 4C 25 29 B2 4E 41 24 28 49 29 3A 50 4C |$(PL%).NA$(I):PL|
000011F0: 25 B2 50 4C 25 AA 31 00 17 1A 90 06 99 22 91 91 |%.PL%.1......"..|
00001200: 91 22 53 50 24 3A 99 53 50 24 3A 99 53 50 24 22 |."SP$:.SP$:.SP$"|
00001210: 91 91 91 91 22 3A 82 00 56 1A 9A 06 8B 50 4C 25 |....":..V....PL%|
00001220: B2 30 A7 99 22 91 22 53 50 24 3A 99 22 11 11 20 |.0.."."SP$:.".. |
00001230: 20 20 20 20 20 20 20 20 20 4E 49 43 48 54 53 20 | NICHTS |
00001240: 5A 55 20 22 4B 24 22 2E 2E 2E 22 3A 51 55 25 B2 |ZU "K$"...":QU%.|
00001250: 30 3A 89 37 36 30 00 6D 1A A4 06 8B 41 46 25 A7 |0:.760.m....AF%.|
00001260: 99 22 91 22 53 50 24 3A 89 31 37 36 30 00 80 1A |."."SP$:.1760...|
00001270: AE 06 8B 51 25 B0 50 4C 25 B2 31 A7 31 38 31 30 |...Q%.PL%.1.1810|
00001280: 00 AC 1A B8 06 99 22 91 22 53 50 24 3A 99 22 41 |......"."SP$:."A|
00001290: 4C 50 48 41 42 45 54 49 53 43 48 20 53 4F 52 54 |LPHABETISCH SORT|
000012A0: 49 45 52 45 4E 20 28 4A 2F 4E 29 22 00 C3 1A C2 |IEREN (J/N)"....|
000012B0: 06 8D 36 38 30 3A 8B 54 41 24 B2 22 4E 22 A7 31 |..680:.TA$."N".1|
000012C0: 38 31 30 00 D6 1A CC 06 8B 54 41 24 B3 B1 22 4A |810......TA$.."J|
000012D0: 22 A7 31 37 33 30 00 F8 1A D6 06 8F 20 2A 2A 2A |".1730...... ***|
000012E0: 20 41 4C 46 41 20 53 4F 52 54 20 28 45 49 4E 46 | ALFA SORT (EINF|
000012F0: 41 43 48 29 20 2A 2A 2A 00 0E 1B E0 06 99 22 11 |ACH) ***......".|
00001300: 11 53 4F 52 54 49 45 52 45 4E 2E 2E 2E 22 00 26 |.SORTIEREN...".&|
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: AE 1E 02 08 99 22 11 11 4E 45 55 45 52 20 4E 41 |....."..NEUER NA|
000016A0: 4D 45 20 3F 20 22 3B 3A 84 31 2C 4E 4E 24 00 C6 |ME ? ";:.1,NN$..|
000016B0: 1E 0C 08 89 20 32 30 38 30 3A 8F 20 43 4F 50 59 |.... 2080:. COPY|
000016C0: 20 41 47 41 49 4E 00 F3 1E 16 08 4E 4E 24 B2 22 | AGAIN.....NN$."|
000016D0: 2A 22 3A 98 31 35 2C 22 53 22 AA C7 28 34 38 AA |*":.15,"S"..(48.|
000016E0: 28 31 AB 44 52 25 29 29 AA 22 3A 22 AA 43 50 24 |(1.DR%)).":".CP$|
000016F0: 28 49 29 00 26 1F 20 08 98 31 35 2C 22 43 22 AA |(I).&. ..15,"C".|
00001700: C7 28 34 38 AA 31 AB 44 52 25 29 AA 22 3A 22 AA |.(48.1.DR%).":".|
00001710: 4E 4E 24 AA 22 3D 22 AA 44 52 24 AA 22 3A 22 AA |NN$."=".DR$.":".|
00001720: 43 50 24 28 49 29 00 40 1F 2A 08 8B 44 53 A7 31 |CP$(I).@.*..DS.1|
00001730: 39 39 30 3A 8F 20 4E 4F 43 48 4D 41 4C 2E 2E 2E |990:. NOCHMAL...|
00001740: 00 58 1F 34 08 99 53 50 24 3A 99 53 50 24 3A 99 |.X.4..SP$:.SP$:.|
00001750: 53 50 24 3A 99 53 50 24 00 61 1F 3E 08 82 20 3A |SP$:.SP$.a.>.. :|
00001760: 8E 00 7B 1F 48 08 8F 20 2A 2A 2A 20 54 45 58 54 |..{.H.. *** TEXT|
00001770: 46 45 4E 53 54 45 52 20 2A 2A 2A 00 81 1F 52 08 |FENSTER ***...R.|
00001780: 8F 00 AA 1F 5C 08 99 22 93 22 A3 28 31 36 AB C3 |....\..".".(16..|
00001790: 28 4B 4F 24 29 AD 32 29 AA 54 42 29 22 2A 2A 2A |(KO$).2).TB)"***|
000017A0: 20 22 4B 4F 24 22 20 2A 2A 2A 00 D8 1F 66 08 99 | "KO$" ***...f..|
000017B0: 22 B0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |"...............|
000017C0: C0 C0 C0 B2 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000017D0: C0 C0 C0 C0 C0 C0 C0 AE 00 07 20 70 08 99 22 DD |.......... p..".|
000017E0: 20 20 20 46 49 4C 45 20 2D 20 4E 41 4D 45 20 20 | FILE - NAME |
000017F0: 20 DD 20 20 46 45 48 4C 45 52 20 2D 20 4D 45 4C | . FEHLER - MEL|
00001800: 44 55 4E 47 20 DD 22 00 35 20 7A 08 99 22 AB C0 |DUNG .".5 z.."..|
00001810: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001820: DB C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001830: C0 C0 C0 C0 B3 00 50 20 84 08 99 22 13 11 11 11 |......P ..."....|
00001840: 22 3A 81 4B B2 31 A4 32 30 3A 99 46 4F 24 3A 82 |":.K.1.20:.FO$:.|
00001850: 00 80 20 8E 08 99 22 AD C0 C0 C0 C0 C0 C0 C0 C0 |.. ...".........|
00001860: C0 C0 C0 C0 C0 C0 C0 C0 C0 B1 C0 C0 C0 C0 C0 C0 |................|
00001870: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 BD 22 3B |..............";|
00001880: 00 8E 20 98 08 99 22 13 11 11 11 22 3A 8E 00 A7 |.. ..."....":...|
00001890: 20 A2 08 8F 20 2A 2A 2A 20 46 4F 52 4D 41 54 20 | ... *** FORMAT |
000018A0: 44 53 24 20 2A 2A 2A 00 C3 20 AC 08 8D 33 37 38 |DS$ ***.. ...378|
000018B0: 30 3A 44 24 B2 45 24 3A 44 24 B2 C8 28 44 24 2C |0:D$.E$:D$..(D$,|
000018C0: 31 39 29 00 F7 20 B6 08 44 24 B2 C9 28 22 20 20 |19).. ..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 20 20 22 AA 44 24 2C 39 AA C3 | ".D$,9..|
000018F0: 28 44 24 29 AD 32 29 00 07 21 C0 08 44 24 B2 C8 |(D$).2)..!..D$..|
00001900: 28 44 24 2C 31 39 29 00 0D 21 CA 08 8E 00 22 21 |(D$,19)..!...."!|
00001910: D4 08 8F 2A 2A 2A 20 43 41 54 41 4C 4F 47 20 2A |...*** CATALOG *|
00001920: 2A 2A 00 28 21 DE 08 3A 00 53 21 E8 08 8B 42 38 |**.(!..:.S!...B8|
00001930: A7 4B 4F 24 B2 22 44 49 52 45 43 54 4F 52 59 20 |.KO$."DIRECTORY |
00001940: 41 4E 5A 45 49 47 45 22 3A 8D 31 37 30 3A 89 32 |ANZEIGE":.170:.2|
00001950: 33 32 30 00 91 21 F2 08 4B 4F 24 B2 20 22 4C 41 |320..!..KO$. "LA|
00001960: 45 4E 47 45 20 20 20 20 46 49 4C 45 20 4E 41 4D |ENGE FILE NAM|
00001970: 45 20 20 20 20 54 59 50 20 20 20 53 54 41 52 54 |E TYP START|
00001980: 22 3A 8D 31 37 30 3A 8D 37 32 30 3A 99 22 11 11 |":.170:.720:."..|
00001990: 22 00 CE 21 FC 08 54 59 24 B2 22 41 22 3A 8D 33 |"..!..TY$."A":.3|
000019A0: 31 30 3A 8D 31 37 30 3A 8D 33 36 37 30 3A 99 22 |10:.170:.3670:."|
000019B0: 11 11 22 A3 31 36 AA 54 42 29 22 12 54 41 53 54 |..".16.TB)".TAST|
000019C0: 45 20 42 49 54 54 45 22 3B 3A 89 36 38 30 00 E8 |E BITTE";:.680..|
000019D0: 21 06 09 99 22 11 46 45 48 4C 45 52 20 3D 20 12 |!...".FEHLER = .|
000019E0: 22 45 24 3A 89 36 38 30 00 F9 21 10 09 81 49 B2 |"E$:.680..!...I.|
000019F0: 30 A4 31 3A 44 52 25 B2 49 00 28 22 1A 09 99 22 |0.1:DR%.I.("..."|
00001A00: 13 13 11 11 11 11 22 A3 35 AA 44 52 25 AC 33 35 |......".5.DR%.35|
00001A10: 29 22 0F 93 22 3A 97 32 31 34 2C 32 33 3A 99 A3 |)"..":.214,23:..|
00001A20: 37 39 29 22 8F 13 22 3B 00 65 22 24 09 44 52 24 |79)"..";.e"$.DR$|
00001A30: B2 C7 28 49 AA 34 38 29 3A 98 31 35 2C 22 49 22 |..(I.48):.15,"I"|
00001A40: AA 44 52 24 3A 8D 33 37 38 30 3A 8B 45 25 B2 30 |.DR$:.3780:.E%.0|
00001A50: A7 A0 31 35 3A D7 44 28 44 52 25 29 3A 9F 31 35 |..15:.D(DR%):.15|
00001A60: 2C 38 2C 31 35 00 90 22 2E 09 82 3A 99 3A 99 3A |,8,15.."...:.:.:|
00001A70: 97 32 31 31 2C 30 3A 99 A3 33 35 29 22 12 54 41 |.211,0:..35)".TA|
00001A80: 53 54 45 20 42 49 54 54 45 22 3B 3A 8D 36 38 30 |STE BITTE";:.680|
00001A90: 00 9D 22 38 09 99 22 13 13 93 22 3A 8E 00 BD 22 |.."8.."...":..."|
00001AA0: 42 09 8F 2A 2A 2A 20 46 49 4E 44 20 53 50 45 43 |B..*** FIND SPEC|
00001AB0: 49 46 49 43 20 46 49 4C 45 20 2A 2A 2A 00 EB 22 |IFIC FILE ***.."|
00001AC0: 4C 09 8B C8 28 48 24 2C C3 28 46 49 24 29 29 B3 |L...(H$,.(FI$)).|
00001AD0: B1 46 49 24 20 A7 20 34 39 30 3A 8F 20 4E 49 43 |.FI$ . 490:. NIC|
00001AE0: 48 54 20 47 45 46 55 4E 44 45 4E 00 FB 22 56 09 |HT GEFUNDEN.."V.|
00001AF0: 8B 52 45 25 A7 5A 25 B2 30 3A 8E 00 2F 23 60 09 |.RE%.Z%.0:../#`.|
00001B00: 42 55 25 B2 42 55 25 AA 31 3A 8D 38 30 30 3A 8D |BU%.BU%.1:.800:.|
00001B10: 31 34 30 3A 54 52 25 B2 42 59 25 3A 8D 31 34 30 |140:TR%.BY%:.140|
00001B20: 3A 53 43 25 B2 42 59 25 3A 5A 25 B2 30 3A 8E 00 |:SC%.BY%:Z%.0:..|
00001B30: 44 23 6A 09 49 B2 49 AB 32 3A 8B 49 B3 AB 31 A7 |D#j.I.I.2:.I..1.|
00001B40: 49 B2 AB 31 00 4A 23 74 09 8E 00 6C 23 7E 09 8F |I..1.J#t...l#~..|
00001B50: 20 2A 2A 2A 2A 20 56 49 45 57 20 46 49 4C 45 20 | **** VIEW FILE |
00001B60: 4F 4E 20 44 49 53 4B 20 2A 2A 2A 2A 00 8D 23 88 |ON DISK ****..#.|
00001B70: 09 4B 4F 24 B2 22 46 49 4C 45 20 2D 20 42 45 54 |.KO$."FILE - BET|
00001B80: 52 41 43 48 54 45 52 22 3A 8D 31 37 30 00 AC 23 |RACHTER":.170..#|
00001B90: 92 09 99 22 46 49 4C 45 4E 41 4D 45 20 5A 55 4D |..."FILENAME ZUM|
00001BA0: 20 4C 49 53 54 45 4E 20 3F 20 22 3B 00 B9 23 9C | LISTEN ? ";..#.|
00001BB0: 09 84 31 2C 46 49 24 3A 99 00 CC 23 A6 09 54 59 |..1,FI$:...#..TY|
00001BC0: 24 B2 22 41 22 3A 51 55 25 B2 AB 31 00 E1 23 B0 |$."A":QU%..1..#.|
00001BD0: 09 99 22 11 11 41 55 46 20 91 22 3B 3A 8D 37 32 |.."..AUF .";:.72|
00001BE0: 30 00 14 24 BA 09 5A 25 B2 AB 31 3A 8D 33 32 30 |0..$..Z%..1:.320|
00001BF0: 3A 8B 5A 25 A7 99 22 11 11 4E 49 43 48 54 20 47 |:.Z%.."..NICHT G|
00001C00: 45 46 55 4E 44 45 4E 20 21 22 3A 5A 25 B2 30 3A |EFUNDEN !":Z%.0:|
00001C10: 89 36 38 30 00 24 24 C4 09 46 49 24 B2 48 24 3A |.680.$$..FI$.H$:|
00001C20: 8D 32 38 30 00 51 24 CE 09 99 22 13 13 11 11 11 |.280.Q$...".....|
00001C30: 11 0F 93 22 A3 32 30 29 22 0F 93 4C 49 53 54 49 |...".20)"..LISTI|
00001C40: 4E 47 20 56 4F 4E 20 46 49 4C 45 20 12 22 46 49 |NG VON FILE ."FI|
00001C50: 24 00 7F 24 D8 09 99 22 11 44 49 45 53 45 52 20 |$..$...".DIESER |
00001C60: 42 4C 4F 43 4B 20 49 4E 20 20 20 20 20 20 20 3A |BLOCK IN :|
00001C70: 20 20 20 20 20 22 54 52 25 22 2C 22 53 43 25 00 | "TR%","SC%.|
00001C80: B8 24 E2 09 99 22 11 4E 41 45 43 48 53 54 45 52 |.$...".NAECHSTER|
00001C90: 20 42 4C 4F 43 4B 20 49 4E 20 20 20 20 3A 20 20 | BLOCK IN : |
00001CA0: 20 20 20 22 3B 3A 8D 31 34 30 3A 99 42 59 25 3B | ";:.140:.BY%;|
00001CB0: 3A 54 52 25 B2 42 59 25 00 DC 24 EC 09 99 A3 32 |:TR%.BY%..$....2|
00001CC0: 38 AA 54 42 29 22 9D 2C 22 3B 3A 8D 31 34 30 3A |8.TB)".,";:.140:|
00001CD0: 99 42 59 25 3A 53 43 25 B2 42 59 25 00 1A 25 F6 |.BY%:SC%.BY%..%.|
00001CE0: 09 99 22 11 53 54 41 52 54 20 41 44 52 45 53 53 |..".START ADRESS|
00001CF0: 45 20 20 20 20 20 20 20 20 20 3A 20 22 3B 3A 8D |E : ";:.|
00001D00: 31 34 30 3A 41 B2 42 59 25 3A 8D 31 34 30 3A 41 |140:A.BY%:.140:A|
00001D10: B2 41 AA 32 35 36 AC 42 59 25 00 34 25 00 0A 99 |.A.256.BY%.4%...|
00001D20: A3 32 38 AA 54 42 29 41 A3 33 35 AA 54 42 29 22 |.28.TB)A.35.TB)"|
00001D30: 44 45 5A 22 00 72 25 0A 0A 99 22 11 45 52 53 54 |DEZ".r%...".ERST|
00001D40: 45 20 4C 49 4E 4B 41 44 52 45 53 53 45 20 20 20 |E LINKADRESSE |
00001D50: 20 20 3A 20 22 3B 3A 8D 31 34 30 3A 41 B2 42 59 | : ";:.140:A.BY|
00001D60: 25 3A 8D 31 34 30 3A 41 B2 41 AA 32 35 36 AC 42 |%:.140:A.A.256.B|
00001D70: 59 25 00 8C 25 14 0A 99 A3 32 38 AA 54 42 29 41 |Y%..%....28.TB)A|
00001D80: A3 33 35 AA 54 42 29 22 44 45 5A 22 00 CA 25 1E |.35.TB)"DEZ"..%.|
00001D90: 0A 99 22 11 45 52 53 54 45 20 5A 45 49 4C 45 4E |..".ERSTE ZEILEN|
00001DA0: 4E 55 4D 4D 45 52 20 20 20 20 3A 20 22 3B 3A 8D |NUMMER : ";:.|
00001DB0: 31 34 30 3A 41 B2 42 59 25 3A 8D 31 34 30 3A 41 |140:A.BY%:.140:A|
00001DC0: B2 41 AA 32 35 36 AC 42 59 25 00 E4 25 28 0A 99 |.A.256.BY%..%(..|
00001DD0: A3 32 38 AA 54 42 29 41 A3 33 35 AA 54 42 29 22 |.28.TB)A.35.TB)"|
00001DE0: 44 45 5A 22 00 0F 26 32 0A 99 22 11 41 53 43 49 |DEZ"..&2..".ASCI|
00001DF0: 49 44 55 4D 50 3A 22 3A 51 41 25 B2 35 3A 51 42 |IDUMP:":QA%.5:QB|
00001E00: 25 B2 33 33 3A 8B 42 38 A7 51 42 25 B2 37 35 00 |%.33:.B8.QB%.75.|
00001E10: 47 26 3C 0A 48 58 24 B2 22 22 3A 81 49 B2 38 A4 |G&<.HX$."":.I.8.|
00001E20: 32 35 35 3A 8D 31 34 30 3A 48 58 24 B2 48 58 24 |255:.140:HX$.HX$|
00001E30: AA 42 59 24 3A 82 3A 99 3A 97 32 31 31 2C 51 41 |.BY$:.:.:.211,QA|
00001E40: 25 3A 99 22 3A 22 3B 00 57 26 46 0A 81 49 B2 31 |%:.":";.W&F..I.1|
00001E50: A4 C3 28 48 58 24 29 00 79 26 50 0A 8B B9 28 49 |..(HX$).y&P...(I|
00001E60: 29 B1 51 42 25 A7 99 22 3A 22 3A 97 32 31 31 2C |).QB%..":":.211,|
00001E70: 51 41 25 3A 99 22 3A 22 3B 00 94 26 5A 0A 43 24 |QA%:.":";..&Z.C$|
00001E80: B2 CA 28 48 58 24 2C 49 2C 31 29 3A 43 25 B2 C6 |..(HX$,I,1):C%..|
00001E90: 28 43 24 29 00 B0 26 64 0A 8B 43 25 B1 31 32 37 |(C$)..&d..C%.127|
00001EA0: A7 99 22 12 22 3B 3A 43 25 B2 43 25 AF 31 32 37 |..".";:C%.C%.127|
00001EB0: 00 C1 26 6E 0A 8B 43 25 B3 33 32 A7 43 25 B2 33 |..&n..C%.32.C%.3|
00001EC0: 32 00 D2 26 78 0A 8B 43 25 B2 33 34 A7 8D 33 36 |2..&x..C%.34..36|
00001ED0: 36 30 00 F9 26 82 0A 99 C7 28 43 25 29 22 92 22 |60..&....(C%)"."|
00001EE0: 3B 3A 82 3A 97 32 31 31 2C 51 42 25 AA 31 3A 99 |;:.:.211,QB%.1:.|
00001EF0: 22 3A 22 3A 8B 42 38 A7 99 00 22 27 8C 0A 8B 54 |":":.B8..."'...T|
00001F00: 52 25 B2 30 A7 99 2C 22 54 41 53 54 45 20 46 55 |R%.0..,"TASTE FU|
00001F10: 45 52 53 20 4D 45 4E 55 45 22 3A A0 38 3A 89 36 |ERS MENUE":.8:.6|
00001F20: 38 30 00 56 27 96 0A 99 22 12 45 92 20 46 55 45 |80.V'...".E. FUE|
00001F30: 52 20 45 4E 44 45 2C 12 4E 92 20 46 55 45 52 20 |R ENDE,.N. FUER |
00001F40: 44 45 4E 20 4E 41 45 43 48 53 54 45 4E 20 42 4C |DEN NAECHSTEN BL|
00001F50: 4F 43 4B 2E 22 3B 00 74 27 A0 0A 8D 36 38 30 3A |OCK.";.t'...680:|
00001F60: 8B 54 41 24 B2 22 45 22 A7 A0 38 3A 99 22 13 13 |.TA$."E"..8:."..|
00001F70: 93 22 3A 8E 00 87 27 AA 0A 8B 54 41 24 B3 B1 22 |.":...'...TA$.."|
00001F80: 4E 22 A7 32 37 32 30 00 91 27 B4 0A 89 32 35 30 |N".2720..'...250|
00001F90: 30 00 B3 27 BE 0A 8F 20 2A 2A 2A 20 4E 41 4D 45 |0..'... *** NAME|
00001FA0: 4E 20 26 20 49 44 20 41 45 4E 44 45 52 4E 20 2A |N & ID AENDERN *|
00001FB0: 2A 2A 2A 00 DD 27 C8 0A 4B 4F 24 B2 22 44 49 53 |***..'..KO$."DIS|
00001FC0: 4B 20 4E 41 4D 45 4E 20 26 20 49 44 20 41 45 4E |K NAMEN & ID AEN|
00001FD0: 44 45 52 55 4E 47 22 3A 8D 20 31 37 30 00 F1 27 |DERUNG":. 170..'|
00001FE0: D2 0A 8D 20 37 32 30 3A 8F 20 44 52 49 56 45 20 |... 720:. DRIVE |
00001FF0: 23 00 08 28 DC 0A 8D 20 36 32 30 3A 8F 20 4E 41 |#..(... 620:. NA|
00002000: 4D 45 20 2B 20 49 44 24 00 21 28 E6 0A 99 22 11 |ME + ID$.!(...".|
00002010: 11 44 49 53 4B 4E 41 4D 45 20 20 3A 20 22 4E 41 |.DISKNAME : "NA|
00002020: 24 00 39 28 F0 0A 99 22 11 44 49 53 4B 20 49 44 |$.9(...".DISK ID|
00002030: 20 20 20 3A 20 22 49 44 24 00 69 28 FA 0A 99 22 | : "ID$.i(..."|
00002040: 11 11 41 45 4E 44 45 52 55 4E 47 20 56 4F 4E 20 |..AENDERUNG VON |
00002050: 12 49 92 44 2C 20 12 4E 92 41 4D 45 2C 20 12 4B |.I.D, .N.AME, .K|
00002060: 92 45 49 4E 45 20 3F 20 22 00 80 28 04 0B 8D 36 |.EINE ? "..(...6|
00002070: 38 30 3A 8B 54 41 24 B2 22 4B 22 A7 A0 38 3A 8E |80:.TA$."K"..8:.|
00002080: 00 92 28 0E 0B 8B 54 41 24 B2 22 49 22 A7 32 39 |..(...TA$."I".29|
00002090: 31 30 00 A5 28 18 0B 8B 54 41 24 B3 B1 22 4E 22 |10..(...TA$.."N"|
000020A0: A7 32 38 32 30 00 C1 28 22 0B 8F 20 2A 2A 2A 20 |.2820..(".. *** |
000020B0: 4E 41 4D 45 4E 20 41 45 4E 44 45 52 4E 20 2A 2A |NAMEN AENDERN **|
000020C0: 2A 00 EE 28 2C 0B 99 22 11 4E 45 55 45 52 20 4E |*..(,..".NEUER N|
000020D0: 41 4D 45 20 3F 20 22 3B 3A 58 25 B2 B9 28 49 29 |AME ? ";:X%..(I)|
000020E0: 3A 99 4E 41 24 3B 3A 97 32 31 31 2C 58 25 00 06 |:.NA$;:.211,X%..|
000020F0: 29 36 0B 84 31 2C 4E 41 24 3A 42 55 25 B2 31 34 |)6..1,NA$:BU%.14|
00002100: 34 3A 8D 38 30 30 00 26 29 40 0B 4E 41 24 B2 4E |4:.800.&)@.NA$.N|
00002110: 41 24 AA 22 20 20 20 20 20 20 20 20 20 20 20 20 |A$." |
00002120: 20 20 20 20 20 22 00 38 29 4A 0B 4E 41 24 B2 C8 | ".8)J.NA$..|
00002130: 28 4E 41 24 2C 31 36 29 00 4A 29 54 0B 98 38 2C |(NA$,16).J)T..8,|
00002140: 4E 41 24 3B 3A 89 32 39 37 30 00 63 29 5E 0B 8F |NA$;:.2970.c)^..|
00002150: 20 2A 2A 2A 20 49 44 20 41 45 4E 44 45 52 4E 20 | *** ID AENDERN |
00002160: 2A 2A 2A 00 8E 29 68 0B 99 22 11 4E 45 55 45 52 |***..)h..".NEUER|
00002170: 20 49 44 20 3F 20 22 3B 3A 58 25 B2 B9 28 49 29 | ID ? ";:X%..(I)|
00002180: 3A 99 49 44 24 3B 3A 97 32 31 31 2C 58 25 00 A6 |:.ID$;:.211,X%..|
00002190: 29 72 0B 84 31 2C 49 44 24 3A 42 55 25 B2 31 36 |)r..1,ID$:BU%.16|
000021A0: 32 3A 8D 38 30 30 00 CF 29 7C 0B 58 B2 C3 28 49 |2:.800..)|.X..(I|
000021B0: 44 24 29 3A 49 44 24 B2 49 44 24 AA CA 28 22 20 |D$):ID$.ID$..(" |
000021C0: 20 20 32 41 20 22 2C 58 AA 31 2C 36 AB 58 29 00 | 2A ",X.1,6.X).|
000021D0: E0 29 86 0B 49 44 24 B2 C8 28 49 44 24 2C 35 29 |.)..ID$..(ID$,5)|
000021E0: 00 EC 29 90 0B 98 38 2C 49 44 24 3B 00 0F 2A 9A |..)...8,ID$;..*.|
000021F0: 0B 98 31 35 2C 22 55 32 3A 38 22 44 52 25 2C 31 |..15,"U2:8"DR%,1|
00002200: 38 2C 30 3A 98 31 35 2C 22 49 22 AA 44 52 24 00 |8,0:.15,"I".DR$.|
00002210: 18 2A A4 0B A0 38 3A 8E 00 3C 2A AE 0B 8F 20 2A |.*...8:..<*... *|
00002220: 2A 2A 2A 20 54 45 53 54 4C 45 53 45 4E 20 45 49 |*** TESTLESEN EI|
00002230: 4E 45 52 20 44 49 53 4B 20 2A 2A 2A 00 76 2A B8 |NER DISK ***.v*.|
00002240: 0B 45 42 25 B2 30 3A 45 53 25 B2 30 3A 45 43 25 |.EB%.0:ES%.0:EC%|
00002250: B2 30 3A 44 43 25 B2 30 3A 48 44 25 B2 30 3A 45 |.0:DC%.0:HD%.0:E|
00002260: 58 25 B2 30 3A 45 52 25 B2 30 3A 46 52 25 B2 30 |X%.0:ER%.0:FR%.0|
00002270: 3A 42 45 25 B2 30 00 8F 2A C2 0B 4B 4F 24 B2 22 |:BE%.0..*..KO$."|
00002280: 54 45 53 54 4C 45 53 45 4E 22 3A 8D 31 37 30 00 |TESTLESEN":.170.|
00002290: AC 2A CC 0B 99 22 54 45 53 54 4C 45 53 45 4E 20 |.*..."TESTLESEN |
000022A0: 56 4F 4E 20 91 22 3B 3A 8D 37 32 30 00 C1 2A D6 |VON .";:.720..*.|
000022B0: 0B 54 52 25 B2 31 3A 53 43 25 B2 30 3A 8D 32 35 |.TR%.1:SC%.0:.25|
000022C0: 30 00 E3 2A E0 0B 41 4E 25 B2 31 3A 45 4E 25 B2 |0..*..AN%.1:EN%.|
000022D0: 33 35 3A 8F 20 44 45 46 41 55 4C 54 20 56 41 4C |35:. DEFAULT VAL|
000022E0: 55 45 53 00 08 2B EA 0B 99 22 11 11 42 45 53 54 |UES..+..."..BEST|
000022F0: 49 4D 4D 54 45 52 20 42 45 52 45 49 43 48 20 28 |IMMTER BEREICH (|
00002300: 4A 2F 4E 29 20 3F 20 22 00 1F 2B F4 0B 8D 36 38 |J/N) ? "..+...68|
00002310: 30 3A 8B 54 41 24 B2 22 4E 22 A7 33 31 33 30 00 |0:.TA$."N".3130.|
00002320: 32 2B FE 0B 8B 54 41 24 B3 B1 22 4A 22 A7 33 30 |2+...TA$.."J".30|
00002330: 36 30 00 57 2B 08 0C 99 22 11 56 4F 4E 20 53 50 |60.W+...".VON SP|
00002340: 55 52 20 22 3B 3A 84 31 2C 54 41 24 3A 41 4E 25 |UR ";:.1,TA$:AN%|
00002350: B2 C5 28 54 41 24 29 00 73 2B 12 0C 8B 41 4E 25 |..(TA$).s+...AN%|
00002360: B2 30 A7 41 4E 25 B2 31 3A 99 C7 28 32 30 29 22 |.0.AN%.1:..(20)"|
00002370: 31 22 3B 00 99 2B 1C 0C 99 22 20 20 42 49 53 20 |1";..+..." BIS |
00002380: 53 50 55 52 20 22 3B 3A 84 31 2C 54 41 24 3A 45 |SPUR ";:.1,TA$:E|
00002390: 4E 25 B2 C5 28 54 41 24 29 00 CC 2B 26 0C 8B 28 |N%..(TA$)..+&..(|
000023A0: 45 4E 25 B2 30 29 B0 28 45 4E 25 B1 33 35 29 B0 |EN%.0).(EN%.35).|
000023B0: 28 45 4E 25 B3 41 4E 25 29 A7 45 4E 25 B2 33 35 |(EN%.AN%).EN%.35|
000023C0: 3A 99 C7 28 32 30 29 22 33 35 22 3B 00 DA 2B 30 |:..(20)"35";..+0|
000023D0: 0C 99 20 3A 51 55 25 B2 AB 31 00 18 2C 3A 0C 4B |.. :QU%..1..,:.K|
000023E0: 4F 24 B2 22 56 4F 4E 20 53 50 55 52 22 AA C4 28 |O$."VON SPUR"..(|
000023F0: 41 4E 25 29 AA 22 20 42 49 53 20 53 50 55 52 22 |AN%)." BIS SPUR"|
00002400: AA C4 28 45 4E 25 29 3A 48 31 24 B2 22 44 49 53 |..(EN%):H1$."DIS|
00002410: 4B 20 43 48 45 43 4B 22 00 21 2C 44 0C 8D 31 37 |K CHECK".!,D..17|
00002420: 30 00 2C 2C 4E 0C 99 22 11 11 11 22 00 4F 2C 58 |0.,,N.."...".O,X|
00002430: 0C 81 49 B2 41 4E 25 A4 45 4E 25 3A 4A 4A 25 B2 |..I.AN%.EN%:JJ%.|
00002440: 32 30 3A 8B 49 B1 31 37 A7 4A 4A 25 B2 31 38 00 |20:.I.17.JJ%.18.|
00002450: 60 2C 62 0C 8B 49 B1 32 34 A7 4A 4A 25 B2 31 37 |`,b..I.24.JJ%.17|
00002460: 00 82 2C 6C 0C 8B 49 B1 33 30 A7 4A 4A 25 B2 31 |..,l..I.30.JJ%.1|
00002470: 36 3A 8F 20 53 45 4B 54 4F 52 45 4E 2F 54 52 41 |6:. SEKTOREN/TRA|
00002480: 43 4B 00 8F 2C 76 0C 81 4A B2 30 A4 4A 4A 25 00 |CK..,v..J.0.JJ%.|
00002490: A5 2C 80 0C 98 31 35 2C 22 42 2D 41 3A 22 44 52 |.,...15,"B-A:"DR|
000024A0: 25 2C 49 2C 4A 00 C9 2C 8A 0C 8B 44 53 B2 30 A7 |%,I,J..,...DS.0.|
000024B0: 46 52 25 B2 46 52 25 AA 31 3A 46 24 B2 22 46 52 |FR%.FR%.1:F$."FR|
000024C0: 45 49 22 3A 89 33 32 33 30 00 F5 2C 94 0C 42 45 |EI":.3230..,..BE|
000024D0: 25 B2 42 45 25 AA 31 3A 46 24 B2 22 42 45 4C 45 |%.BE%.1:F$."BELE|
000024E0: 47 54 22 3A 98 31 35 2C 22 42 2D 46 3A 22 44 52 |GT":.15,"B-F:"DR|
000024F0: 25 2C 49 2C 4A 00 07 2D 9E 0C 99 22 13 11 11 11 |%,I,J..-..."....|
00002500: 11 11 11 22 53 50 24 00 25 2D A8 0C 99 22 91 53 |..."SP$.%-...".S|
00002510: 50 55 52 22 49 22 53 45 4B 54 4F 52 22 4A 22 3D |PUR"I"SEKTOR"J"=|
00002520: 20 20 22 46 24 00 3A 2D B2 0C 54 52 25 B2 49 3A | "F$.:-..TR%.I:|
00002530: 53 43 25 B2 4A 3A 8D 32 38 30 00 63 2D BC 0C 99 |SC%.J:.280.c-...|
00002540: 3A 8D 33 37 38 30 3A 44 24 B2 45 24 3A 99 53 50 |:.3780:D$.E$:.SP|
00002550: 24 3A 99 22 91 22 44 24 3A 8B 44 53 B2 30 A7 33 |$:."."D$:.DS.0.3|
00002560: 33 35 30 00 9C 2D C6 0C 45 52 25 B2 45 52 25 AA |350..-..ER%.ER%.|
00002570: 31 3A 8B 45 25 B2 32 36 B0 45 25 B2 37 31 A7 99 |1:.E%.26.E%.71..|
00002580: 22 4B 45 49 4E 20 54 45 53 54 20 4D 4F 45 47 4C |"KEIN TEST MOEGL|
00002590: 49 43 48 20 21 20 22 3A 89 36 38 30 00 B7 2D D0 |ICH ! ":.680..-.|
000025A0: 0C 8B 45 25 B2 32 30 A7 45 42 25 B2 45 42 25 AA |..E%.20.EB%.EB%.|
000025B0: 31 3A 89 33 33 34 30 00 D2 2D DA 0C 8B 45 25 B2 |1:.3340..-...E%.|
000025C0: 32 31 A7 45 53 25 B2 45 53 25 AA 31 3A 89 33 33 |21.ES%.ES%.1:.33|
000025D0: 34 30 00 ED 2D E4 0C 8B 45 25 B2 32 33 A7 45 43 |40..-...E%.23.EC|
000025E0: 25 B2 45 43 25 AA 31 3A 89 33 33 34 30 00 08 2E |%.EC%.1:.3340...|
000025F0: EE 0C 8B 45 25 B2 32 34 A7 44 43 25 B2 44 43 25 |...E%.24.DC%.DC%|
00002600: AA 31 3A 89 33 33 34 30 00 29 2E F8 0C 8B 45 25 |.1:.3340.)....E%|
00002610: B2 32 37 B0 45 25 B2 32 39 A7 48 44 25 B2 48 44 |.27.E%.29.HD%.HD|
00002620: 25 AA 31 3A 89 33 33 34 30 00 44 2E 02 0D 8B 45 |%.1:.3340.D....E|
00002630: 25 B2 32 38 A7 45 58 25 B2 45 58 25 AA 31 3A 89 |%.28.EX%.EX%.1:.|
00002640: 33 33 34 30 00 5F 2E 0C 0D A0 38 3A 8D 20 32 34 |3340._....8:. 24|
00002650: 30 3A 8F 20 49 4E 49 54 20 2B 20 4F 50 45 4E 00 |0:. INIT + OPEN.|
00002660: 6B 2E 16 0D 82 4A 2C 49 3A A0 38 00 8C 2E 20 0D |k....J,I:.8... .|
00002670: 4B 4F 24 B2 22 46 45 48 4C 45 52 20 55 45 42 45 |KO$."FEHLER UEBE|
00002680: 52 53 49 43 48 54 22 3A 8D 31 37 30 00 B7 2E 2A |RSICHT":.170...*|
00002690: 0D 99 A3 33 AA 54 42 29 22 42 45 4C 45 47 54 20 |...3.TB)"BELEGT |
000026A0: 3D 22 42 45 25 A3 32 38 AA 54 42 29 22 46 52 45 |="BE%.28.TB)"FRE|
000026B0: 49 20 3D 22 46 52 25 00 DE 2E 34 0D 99 A3 33 AA |I ="FR%...4...3.|
000026C0: 54 42 29 22 11 48 45 41 44 45 52 20 46 45 48 4C |TB)".HEADER FEHL|
000026D0: 54 20 20 20 20 20 20 20 20 3A 22 45 42 25 00 05 |T :"EB%..|
000026E0: 2F 3E 0D 99 A3 33 AA 54 42 29 22 11 53 59 4E 43 |/>...3.TB)".SYNC|
000026F0: 52 4F 4E 49 4D 50 55 4C 53 20 46 45 48 4C 54 20 |RONIMPULS FEHLT |
00002700: 3A 22 45 53 25 00 2C 2F 48 0D 99 A3 33 AA 54 42 |:"ES%.,/H...3.TB|
00002710: 29 22 11 50 52 55 45 46 53 55 4D 4D 45 4E 20 46 |)".PRUEFSUMMEN F|
00002720: 45 48 4C 45 52 20 20 3A 22 45 43 25 00 53 2F 52 |EHLER :"EC%.S/R|
00002730: 0D 99 A3 33 AA 54 42 29 22 11 44 45 4B 4F 44 49 |...3.TB)".DEKODI|
00002740: 45 52 20 46 45 48 4C 45 52 20 20 20 20 20 3A 22 |ER FEHLER :"|
00002750: 44 43 25 00 7A 2F 5C 0D 99 A3 33 AA 54 42 29 22 |DC%.z/\...3.TB)"|
00002760: 11 48 45 41 44 45 52 20 50 52 55 45 46 53 55 4D |.HEADER PRUEFSUM|
00002770: 4D 45 20 20 20 3A 22 48 44 25 00 A1 2F 66 0D 99 |ME :"HD%../f..|
00002780: A3 33 AA 54 42 29 22 11 4C 41 4E 47 45 52 20 44 |.3.TB)".LANGER D|
00002790: 41 54 45 4E 20 42 4C 4F 43 4B 20 20 3A 22 45 58 |ATEN BLOCK :"EX|
000027A0: 25 00 D2 2F 70 0D 99 A3 33 AA 54 42 29 22 11 11 |%../p...3.TB)"..|
000027B0: 47 45 53 41 4D 54 46 45 48 4C 45 52 20 20 20 20 |GESAMTFEHLER |
000027C0: 20 20 20 20 3A 22 3B 3A 8B 45 52 25 A7 99 22 12 | :";:.ER%..".|
000027D0: 22 3B 00 E7 2F 7A 0D 99 45 52 25 3A 98 31 35 2C |";../z..ER%:.15,|
000027E0: 22 56 22 AA 44 52 24 00 07 30 84 0D 99 22 11 20 |"V".DR$..0...". |
000027F0: 20 20 42 49 54 54 45 20 45 49 4E 45 20 54 41 53 | BITTE EINE TAS|
00002800: 54 45 2E 2E 2E 22 3B 00 10 30 8E 0D 89 36 38 30 |TE...";..0...680|
00002810: 00 31 30 98 0D 8F 20 2A 2A 2A 20 55 4E 53 43 52 |.10... *** UNSCR|
00002820: 41 54 43 48 20 45 49 4E 20 46 49 4C 45 20 2A 2A |ATCH EIN FILE **|
00002830: 2A 00 4C 30 A2 0D 4B 4F 24 B2 22 44 49 53 4B 20 |*.L0..KO$."DISK |
00002840: 46 49 4C 45 20 52 45 54 54 45 52 22 00 7C 30 AC |FILE RETTER".|0.|
00002850: 0D 8D 31 37 30 3A 99 22 11 11 46 49 4C 45 20 4E |..170:."..FILE N|
00002860: 41 4D 45 20 5A 55 4D 20 52 45 54 54 45 4E 20 3F |AME ZUM RETTEN ?|
00002870: 20 22 3B 3A 84 31 2C 46 49 24 3A 99 00 90 30 B6 | ";:.1,FI$:...0.|
00002880: 0D 8D 20 37 32 30 3A 8F 20 44 52 49 56 45 20 23 |.. 720:. DRIVE #|
00002890: 00 BC 30 C0 0D 54 59 24 B2 22 41 22 3A 51 55 25 |..0..TY$."A":QU%|
000028A0: B2 AB 31 3A 52 45 25 B2 AB 31 3A 5A 25 B2 AB 31 |..1:RE%..1:Z%..1|
000028B0: 3A 8D 20 33 32 30 3A 52 45 25 B2 30 00 E7 30 CA |:. 320:RE%.0..0.|
000028C0: 0D 8B 5A 25 A7 99 22 11 11 4E 49 43 48 54 20 47 |..Z%.."..NICHT G|
000028D0: 45 46 55 4E 44 45 4E 20 21 22 3A A0 38 3A 5A 25 |EFUNDEN !":.8:Z%|
000028E0: B2 30 3A 89 36 38 30 00 07 31 D4 0D 99 22 11 47 |.0:.680..1...".G|
000028F0: 45 46 55 4E 44 45 4E 20 20 20 46 49 4C 45 20 3A |EFUNDEN FILE :|
00002900: 20 20 20 12 22 48 24 00 36 31 DE 0D 99 22 11 11 | ."H$.61..."..|
00002910: 54 59 50 3A 20 12 50 92 52 47 2C 20 12 53 92 45 |TYP: .P.RG, .S.E|
00002920: 51 2C 20 12 55 92 53 52 20 4F 44 45 52 20 12 52 |Q, .U.SR ODER .R|
00002930: 92 45 4C 20 22 3B 00 65 31 E8 0D 8D 20 36 38 30 |.EL ";.e1... 680|
00002940: 3A 99 54 41 24 3B 3A 81 49 B2 31 A4 34 3A 8B 54 |:.TA$;:.I.1.4:.T|
00002950: 41 24 B2 CA 28 22 53 50 55 52 22 2C 49 2C 31 29 |A$..("SPUR",I,1)|
00002960: A7 33 35 38 30 00 71 31 F2 0D 82 3A 89 33 35 36 |.3580.q1...:.356|
00002970: 30 00 90 31 FC 0D 42 59 25 B2 31 32 38 AA 49 3A |0..1..BY%.128.I:|
00002980: 8D 38 30 30 3A 8F 20 42 55 46 46 45 52 20 3D 30 |.800:. BUFFER =0|
00002990: 00 9F 31 06 0E 98 38 2C C7 28 42 59 25 29 3B 00 |..1...8,.(BY%);.|
000029A0: BD 31 10 0E 98 31 35 2C 22 55 32 3A 22 38 3B 44 |.1...15,"U2:"8;D|
000029B0: 52 25 3B 54 52 25 3B 53 43 25 3A A0 38 00 F6 31 |R%;TR%;SC%:.8..1|
000029C0: 1A 0E 99 3A 99 22 11 11 46 49 4C 45 20 57 49 45 |...:."..FILE WIE|
000029D0: 44 45 52 20 4B 41 54 41 4C 4F 47 49 53 49 45 52 |DER KATALOGISIER|
000029E0: 54 2E 22 3A 98 31 35 2C 22 56 22 AA 44 52 24 3A |T.":.15,"V".DR$:|
000029F0: 51 55 25 B2 AB 31 00 FF 31 24 0E 89 36 38 30 00 |QU%..1..1$..680.|
00002A00: 1E 32 2E 0E 8F 20 2A 2A 2A 20 57 45 4C 43 48 45 |.2... *** WELCHE|
00002A10: 20 20 46 4C 4F 50 50 59 20 3F 20 2A 2A 2A 00 24 | FLOPPY ? ***.$|
00002A20: 32 38 0E 3A 00 35 32 42 0E 8F 20 44 45 4C 45 54 |28.:.52B.. DELET|
00002A30: 45 20 5B 22 5D 00 53 32 4C 0E 58 25 B2 B9 28 49 |E ["].S2L.X%..(I|
00002A40: 29 3A 99 C7 28 33 34 29 3B 3A 97 32 31 31 2C 58 |):..(34);:.211,X|
00002A50: 25 3A 8E 00 94 32 56 0E 81 49 B2 30 A4 4E 30 25 |%:...2V..I.0.N0%|
00002A60: AB 31 3A 99 22 20 20 22 42 4C 25 28 49 29 A3 39 |.1:." "BL%(I).9|
00002A70: AA 54 42 29 4E 41 24 28 49 29 A3 32 36 AA 54 42 |.TB)NA$(I).26.TB|
00002A80: 29 46 54 24 28 49 29 22 20 22 20 42 4E 25 28 49 |)FT$(I)" " BN%(I|
00002A90: 2C 30 29 3B 00 AC 32 60 0E 99 A3 33 34 AA 54 42 |,0);..2`...34.TB|
00002AA0: 29 22 2C 22 42 4E 25 28 49 2C 31 29 00 C3 32 6A |)","BN%(I,1)..2j|
00002AB0: 0E A1 54 41 24 3A 8B 54 41 24 B2 22 20 22 A7 8D |..TA$:.TA$." "..|
00002AC0: 36 38 30 00 F7 32 74 0E 8B C2 28 32 31 34 29 B1 |680..2t...(214).|
00002AD0: 32 32 A7 99 22 11 22 2C 22 20 20 20 20 20 20 12 |22.."."," .|
00002AE0: 54 41 53 54 45 20 42 49 54 54 45 22 3B 3A 8D 36 |TASTE BITTE";:.6|
00002AF0: 38 30 3A 8D 31 37 30 00 FF 32 7E 0E 82 3A 8E 00 |80:.170..2~..:..|
00002B00: 22 33 88 0E 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |"3...***********|
00002B10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002B20: 2A 2A 00 45 33 92 0E 8F 2A 2A 2A 20 44 49 53 4B |**.E3...*** DISK|
00002B30: 20 53 54 41 54 55 53 20 42 41 53 49 43 20 33 2E | STATUS BASIC 3.|
00002B40: 30 20 2A 2A 2A 00 68 33 9C 0E 8F 2A 2A 2A 2A 2A |0 ***.h3...*****|
00002B50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002B60: 2A 2A 2A 2A 2A 2A 2A 2A 00 6E 33 A6 0E 8F 00 90 |********.n3.....|
00002B70: 33 B0 0E 8F 20 3E 3E 3E 20 46 55 45 52 20 4C 4F |3... >>> FUER LO|
00002B80: 54 48 41 52 20 48 4F 46 4D 41 4E 4E 20 3C 3C 3C |THAR HOFMANN <<<|
00002B90: 00 96 33 BA 0E 3A 00 AE 33 C4 0E 84 31 35 2C 45 |..3..:..3...15,E|
00002BA0: 25 2C 45 24 2C 45 31 25 2C 45 32 25 3A 8E 00 CF |%,E$,E1%,E2%:...|
00002BB0: 33 CE 0E 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |3...************|
00002BC0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00002BD0: F0 33 D8 0E 8F 2A 2A 2A 20 41 45 4E 44 45 52 55 |.3...*** AENDERU|
00002BE0: 4E 47 20 50 52 47 2E 53 54 41 52 54 20 2A 2A 2A |NG PRG.START ***|
00002BF0: 00 11 34 E2 0E 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..4...**********|
00002C00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002C10: 2A 00 36 34 EC 0E 4B 4F 24 B2 22 4E 45 55 45 20 |*.64..KO$."NEUE |
00002C20: 53 54 41 52 54 41 44 52 45 53 53 45 20 45 49 4E |STARTADRESSE EIN|
00002C30: 47 45 42 45 4E 22 00 52 34 F6 0E 8D 31 37 30 3A |GEBEN".R4...170:|
00002C40: 8D 37 32 30 3A 8F 20 46 52 41 47 45 20 44 52 49 |.720:. FRAGE DRI|
00002C50: 56 45 00 65 34 00 0F 54 59 24 B2 22 50 22 3A 51 |VE.e4..TY$."P":Q|
00002C60: 55 25 B2 AB 31 00 94 34 0A 0F 99 22 11 11 50 52 |U%..1..4..."..PR|
00002C70: 4F 47 52 41 4D 4D 20 4E 41 4D 45 20 3F 20 22 3B |OGRAMM NAME ? ";|
00002C80: 3A 84 31 2C 46 49 24 3A 5A 25 B2 AB 31 3A 99 3A |:.1,FI$:Z%..1:.:|
00002C90: 8D 33 32 30 00 A3 34 14 0F 8B 5A 25 B2 30 A7 33 |.320..4...Z%.0.3|
00002CA0: 38 38 30 00 E5 34 1E 0F 5A 25 B2 30 3A 99 22 11 |880..4..Z%.0:.".|
00002CB0: 11 50 52 4F 47 52 41 4D 4D 20 22 C7 28 33 34 29 |.PROGRAMM ".(34)|
00002CC0: 46 49 24 C7 28 33 34 29 22 20 49 53 54 20 4E 49 |FI$.(34)" IST NI|
00002CD0: 43 48 54 20 56 4F 52 48 41 4E 44 45 4E 21 22 3A |CHT VORHANDEN!":|
00002CE0: 89 20 36 38 30 00 00 35 28 0F 99 22 91 91 91 91 |. 680..5(.."....|
00002CF0: 22 A3 31 36 AA 54 42 29 22 12 22 48 24 22 11 11 |".16.TB)"."H$"..|
00002D00: 00 1A 35 32 0F 46 49 24 B2 48 24 3A 8D 32 38 30 |..52.FI$.H$:.280|
00002D10: 3A 8D 31 34 30 3A 8D 31 34 30 00 3C 35 3C 0F 8D |:.140:.140.<5<..|
00002D20: 31 34 30 3A 58 25 B2 42 59 25 3A 8D 31 34 30 3A |140:X%.BY%:.140:|
00002D30: 58 B2 58 25 AA 32 35 36 AC 42 59 25 00 63 35 46 |X.X%.256.BY%.c5F|
00002D40: 0F 8D 20 34 30 35 30 3A 99 22 53 54 41 52 54 41 |.. 4050:."STARTA|
00002D50: 44 52 45 53 53 45 20 49 53 54 20 48 45 58 20 22 |DRESSE IST HEX "|
00002D60: 42 59 24 00 81 35 50 0F 99 22 20 20 20 20 20 20 |BY$..5P.." |
00002D70: 20 20 20 20 20 20 20 20 44 45 5A 49 4D 41 4C 22 | DEZIMAL"|
00002D80: 58 00 98 35 5A 0F 97 36 33 31 2C C6 28 22 1D 22 |X..5Z..631,.("."|
00002D90: 29 3A 97 31 39 38 2C 31 00 C1 35 64 0F 99 22 11 |):.198,1..5d..".|
00002DA0: 11 4E 45 55 45 20 53 54 41 52 54 41 44 52 45 53 |.NEUE STARTADRES|
00002DB0: 53 45 20 3F 20 22 42 59 24 22 9D 9D 9D 9D 9D 22 |SE ? "BY$"....."|
00002DC0: 3B 00 ED 35 6E 0F 84 31 2C 42 59 24 3A 99 3A 8B |;..5n..1,BY$:.:.|
00002DD0: C8 28 42 59 24 2C 31 29 B2 22 40 22 A7 A0 38 3A |.(BY$,1)."@"..8:|
00002DE0: 99 22 11 11 4F 4B 2E 22 3A 89 37 36 30 00 0F 36 |."..OK.":.760..6|
00002DF0: 78 0F 8B C8 28 42 59 24 2C 31 29 B3 B1 22 24 22 |x...(BY$,1).."$"|
00002E00: A7 58 B2 C5 28 42 59 24 29 3A 89 34 30 31 30 00 |.X..(BY$):.4010.|
00002E10: 34 36 82 0F 42 59 24 B2 CA 28 42 59 24 2C 32 29 |46..BY$..(BY$,2)|
00002E20: 3A 42 59 24 B2 C9 28 22 30 30 30 30 22 AA 42 59 |:BY$..("0000".BY|
00002E30: 24 2C 34 29 00 57 36 8C 0F 58 B2 30 3A 81 49 B2 |$,4).W6..X.0:.I.|
00002E40: 31 A4 34 3A 58 25 B2 C6 28 CA 28 42 59 24 2C 49 |1.4:X%..(.(BY$,I|
00002E50: 2C 31 29 29 AB 34 38 00 6A 36 96 0F 8B 58 25 B1 |,1)).48.j6...X%.|
00002E60: 31 30 A7 58 25 B2 58 25 AB 37 00 80 36 A0 0F 58 |10.X%.X%.7..6..X|
00002E70: B2 58 AA 58 25 AC 31 36 AE 28 34 AB 49 29 3A 82 |.X.X%.16.(4.I):.|
00002E80: 00 9B 36 AA 0F 42 59 25 B2 58 AD 32 35 36 3A 58 |..6..BY%.X.256:X|
00002E90: 25 B2 58 AB 32 35 36 AC 42 59 25 00 AA 36 B4 0F |%.X.256.BY%..6..|
00002EA0: 42 55 25 B2 32 3A 8D 38 30 30 00 E0 36 BE 0F 98 |BU%.2:.800..6...|
00002EB0: 38 2C C7 28 58 25 29 C7 28 42 59 25 29 3B 3A 98 |8,.(X%).(BY%);:.|
00002EC0: 31 35 2C 22 55 32 3A 38 22 44 52 25 2C 54 52 25 |15,"U2:8"DR%,TR%|
00002ED0: 2C 53 43 25 3A 98 31 35 2C 22 49 22 AA 44 52 24 |,SC%:.15,"I".DR$|
00002EE0: 00 E9 36 C8 0F A0 38 3A 8E 00 11 37 D2 0F 45 31 |..6...8:...7..E1|
00002EF0: 25 B2 42 59 25 AD 31 36 3A 45 32 25 B2 42 59 25 |%.BY%.16:E2%.BY%|
00002F00: AF 31 35 3A 42 59 24 B2 22 24 22 3A 8D 34 30 37 |.15:BY$."$":.407|
00002F10: 30 00 29 37 DC 0F 45 31 25 B2 58 25 AD 31 36 3A |0.)7..E1%.X%.16:|
00002F20: 45 32 25 B2 58 25 AF 31 35 00 53 37 E6 0F 42 59 |E2%.X%.15.S7..BY|
00002F30: 24 B2 42 59 24 AA CA 28 48 5A 24 2C 45 31 25 AA |$.BY$..(HZ$,E1%.|
00002F40: 31 2C 31 29 AA CA 28 48 5A 24 2C 45 32 25 AA 31 |1,1)..(HZ$,E2%.1|
00002F50: 2C 31 29 00 59 37 F0 0F 8E 00 7C 37 FA 0F 8F 2A |,1).Y7....|7...*|
00002F60: 2A 2A 2A 20 49 4E 49 54 49 41 4C 49 53 49 45 52 |*** INITIALISIER|
00002F70: 55 4E 47 20 44 45 52 20 2A 2A 2A 2A 00 9F 37 04 |UNG DER ****..7.|
00002F80: 10 8F 2A 2A 2A 2A 20 53 4B 41 4C 41 52 45 4E 20 |..**** SKALAREN |
00002F90: 20 56 41 52 49 41 42 4C 45 4E 20 2A 2A 2A 2A 00 | VARIABLEN ****.|
00002FA0: A5 37 0E 10 3A 00 C8 37 18 10 8F 2A 2A 2A 2A 20 |.7..:..7...**** |
00002FB0: 20 20 46 4C 4F 41 54 49 4E 47 20 50 4F 49 4E 54 | FLOATING POINT|
00002FC0: 20 20 20 20 2A 2A 2A 2A 00 CE 37 22 10 3A 00 E6 | ****..7".:..|
00002FD0: 37 2C 10 49 B2 30 20 20 20 20 20 20 3A 8F 20 5A |7,.I.0 :. Z|
00002FE0: 41 45 48 4C 45 52 00 FE 37 36 10 4A B2 30 20 20 |AEHLER..76.J.0 |
00002FF0: 20 20 20 20 3A 8F 20 5A 41 45 48 4C 45 52 00 16 | :. ZAEHLER..|
00003000: 38 40 10 4B B2 30 20 20 20 20 20 20 3A 8F 20 5A |8@.K.0 :. Z|
00003010: 41 45 48 4C 45 52 00 2E 38 4A 10 42 B2 30 20 20 |AEHLER..8J.B.0 |
00003020: 20 20 20 20 3A 8F 20 5A 41 45 48 4C 45 52 00 50 | :. ZAEHLER.P|
00003030: 38 54 10 41 B2 30 20 20 20 20 20 20 3A 8F 20 41 |8T.A.0 :. A|
00003040: 44 52 45 53 53 45 20 28 30 2D 36 35 35 33 35 29 |DRESSE (0-65535)|
00003050: 00 72 38 5E 10 58 B2 30 20 20 20 20 20 20 3A 8F |.r8^.X.0 :.|
00003060: 20 41 44 52 45 53 53 45 20 28 30 2D 36 35 35 33 | ADRESSE (0-6553|
00003070: 35 29 00 94 38 68 10 50 B2 30 20 20 20 20 20 20 |5)..8h.P.0 |
00003080: 3A 8F 20 46 4F 52 4D 41 54 20 56 41 52 2E 20 28 |:. FORMAT VAR. (|
00003090: 54 41 42 29 00 9A 38 72 10 3A 00 BD 38 7C 10 8F |TAB)..8r.:..8|..|
000030A0: 2A 2A 2A 2A 20 20 20 20 20 49 4E 54 45 47 45 52 |**** INTEGER|
000030B0: 20 20 20 20 20 20 20 20 20 2A 2A 2A 2A 00 C3 38 | ****..8|
000030C0: 86 10 3A 00 E1 38 90 10 53 43 25 B2 30 20 20 20 |..:..8..SC%.0 |
000030D0: 20 3A 8F 20 53 45 4B 54 4F 52 20 28 30 2D 32 30 | :. SEKTOR (0-20|
000030E0: 29 00 FF 38 9A 10 54 52 25 B2 31 38 20 20 20 3A |)..8..TR%.18 :|
000030F0: 8F 20 53 50 55 52 20 20 20 28 31 2D 33 35 29 00 |. SPUR (1-35).|
00003100: 1B 39 A4 10 41 53 25 B2 30 20 20 20 20 3A 8F 20 |.9..AS%.0 :. |
00003110: 56 41 4C 20 28 54 41 53 54 45 29 00 36 39 AE 10 |VAL (TASTE).69..|
00003120: 44 52 25 B2 30 20 20 20 20 3A 8F 20 4C 41 55 46 |DR%.0 :. LAUF|
00003130: 57 45 52 4B 20 23 00 56 39 B8 10 4C 52 25 B2 30 |WERK #.V9..LR%.0|
00003140: 20 20 20 20 3A 8F 20 43 41 54 2E 20 4C 41 55 46 | :. CAT. LAUF|
00003150: 57 45 52 4B 20 23 00 77 39 C2 10 4D 44 25 B2 31 |WERK #.w9..MD%.1|
00003160: 20 20 20 20 3A 8F 20 41 4E 5A 41 48 4C 20 4C 41 | :. ANZAHL LA|
00003170: 55 46 57 45 52 4B 45 00 98 39 CC 10 4D 4B 25 B2 |UFWERKE..9..MK%.|
00003180: 30 20 20 20 20 3A 8F 20 44 49 53 4B 2D 53 54 41 |0 :. DISK-STA|
00003190: 54 55 53 20 56 41 52 2E 00 BB 39 D6 10 50 4C 25 |TUS VAR...9..PL%|
000031A0: B2 30 20 20 20 20 3A 8F 20 5A 41 48 4C 20 44 45 |.0 :. ZAHL DE|
000031B0: 52 20 57 4F 52 4B 46 49 4C 45 53 00 DC 39 E0 10 |R WORKFILES..9..|
000031C0: 51 55 25 B2 AB 31 20 20 20 3A 8F 20 46 4C 41 47 |QU%..1 :. FLAG|
000031D0: 20 43 41 54 20 47 55 45 4C 54 49 47 00 FD 39 EA | CAT GUELTIG..9.|
000031E0: 10 42 55 25 B2 30 20 20 20 20 3A 8F 20 42 55 46 |.BU%.0 :. BUF|
000031F0: 46 45 52 20 50 4E 54 2E 20 56 41 52 2E 00 20 3A |FER PNT. VAR.. :|
00003200: F4 10 4E 30 25 B2 30 20 20 20 20 3A 8F 20 5A 41 |..N0%.0 :. ZA|
00003210: 48 4C 20 43 41 54 41 4C 4F 47 20 46 49 4C 45 53 |HL CATALOG FILES|
00003220: 00 40 3A FE 10 46 49 25 B2 30 20 20 20 20 3A 8F |.@:..FI%.0 :.|
00003230: 20 46 49 4C 45 53 20 50 52 4F 20 42 4C 4F 43 4B | FILES PRO BLOCK|
00003240: 00 5E 3A 08 11 42 59 25 B2 30 20 20 20 20 3A 8F |.^:..BY%.0 :.|
00003250: 20 41 53 43 20 28 47 45 54 42 59 54 45 29 00 81 | ASC (GETBYTE)..|
00003260: 3A 12 11 42 31 25 B2 30 20 20 20 20 3A 8F 20 46 |:..B1%.0 :. F|
00003270: 49 4C 45 54 59 50 20 49 4E 20 43 41 54 41 4C 4F |ILETYP IN CATALO|
00003280: 47 00 A3 3A 1C 11 45 52 25 B2 30 20 20 20 20 3A |G..:..ER%.0 :|
00003290: 8F 20 47 45 53 41 4D 54 46 45 48 4C 45 52 20 5A |. GESAMTFEHLER Z|
000032A0: 41 48 4C 00 BF 3A 26 11 43 25 20 B2 30 20 20 20 |AHL..:&.C% .0 |
000032B0: 20 3A 8F 20 41 53 43 20 28 48 45 58 20 24 29 00 | :. ASC (HEX $).|
000032C0: DF 3A 30 11 58 25 20 B2 30 20 20 20 20 3A 8F 20 |.:0.X% .0 :. |
000032D0: 43 55 52 53 4F 52 20 50 4F 53 49 54 49 4F 4E 00 |CURSOR POSITION.|
000032E0: 01 3B 3A 11 51 25 20 B2 30 20 20 20 20 3A 8F 20 |.;:.Q% .0 :. |
000032F0: 46 4C 41 47 20 43 4F 50 59 2F 53 43 52 41 54 43 |FLAG COPY/SCRATC|
00003300: 48 00 23 3B 44 11 45 42 25 B2 30 20 20 20 20 3A |H.#;D.EB%.0 :|
00003310: 8F 20 46 45 48 4C 45 52 20 28 4B 45 49 4E 20 48 |. FEHLER (KEIN H|
00003320: 44 2E 29 00 44 3B 4E 11 45 53 25 B2 30 20 20 20 |D.).D;N.ES%.0 |
00003330: 20 3A 8F 20 46 45 48 4C 45 52 20 28 53 59 4E 43 | :. FEHLER (SYNC|
00003340: 52 4F 4E 29 00 5B 3B 58 11 45 43 25 B2 30 20 20 |RON).[;X.EC%.0 |
00003350: 20 20 3A 8F 20 46 45 48 4C 45 52 00 72 3B 62 11 | :. FEHLER.r;b.|
00003360: 44 43 25 B2 30 20 20 20 20 3A 8F 20 46 45 48 4C |DC%.0 :. FEHL|
00003370: 45 52 00 92 3B 6C 11 48 44 25 B2 30 20 20 20 20 |ER..;l.HD%.0 |
00003380: 3A 8F 20 46 45 48 4C 45 52 20 28 48 45 41 44 45 |:. FEHLER (HEADE|
00003390: 52 29 00 B5 3B 76 11 45 58 25 B2 30 20 20 20 20 |R)..;v.EX%.0 |
000033A0: 3A 8F 20 46 45 48 4C 45 52 20 28 4C 4F 4E 47 20 |:. FEHLER (LONG |
000033B0: 42 4C 4B 2E 29 00 D2 3B 80 11 46 52 25 B2 30 20 |BLK.)..;..FR%.0 |
000033C0: 20 20 20 3A 8F 20 46 52 45 49 45 20 42 4C 4F 43 | :. FREIE BLOC|
000033D0: 4B 53 00 F1 3B 8A 11 42 45 25 B2 30 20 20 20 20 |KS..;..BE%.0 |
000033E0: 3A 8F 20 42 45 4C 45 47 54 45 20 42 4C 4F 43 4B |:. BELEGTE BLOCK|
000033F0: 53 00 0E 3C 94 11 41 4E 25 B2 31 20 20 20 20 3A |S..<..AN%.1 :|
00003400: 8F 20 56 4F 4E 20 53 50 55 52 20 2E 2E 2E 00 2B |. VON SPUR ....+|
00003410: 3C 9E 11 45 4E 25 B2 33 35 20 20 20 3A 8F 20 2E |<..EN%.35 :. .|
00003420: 2E 2E 20 42 49 53 20 53 50 55 52 00 4E 3C A8 11 |.. BIS SPUR.N<..|
00003430: 4A 4A 25 B2 32 30 20 20 20 3A 8F 20 4D 41 58 2E |JJ%.20 :. MAX.|
00003440: 20 53 45 4B 54 4F 52 45 4E 2F 53 50 55 52 00 71 | SEKTOREN/SPUR.q|
00003450: 3C B2 11 52 45 25 B2 30 20 20 20 20 3A 8F 20 46 |<..RE%.0 :. F|
00003460: 4C 41 47 20 28 46 49 4C 45 20 52 45 54 54 45 4E |LAG (FILE RETTEN|
00003470: 29 00 94 3C BC 11 45 25 20 B2 30 20 20 20 20 3A |)..<..E% .0 :|
00003480: 8F 20 44 49 53 4B 20 46 45 48 4C 45 52 20 28 43 |. DISK FEHLER (C|
00003490: 4F 44 45 29 00 B7 3C C6 11 45 24 20 B2 22 22 20 |ODE)..<..E$ ."" |
000034A0: 20 20 3A 8F 20 44 49 53 4B 20 46 45 48 4C 45 52 | :. DISK FEHLER|
000034B0: 20 28 54 45 58 54 29 00 DA 3C D0 11 45 31 25 B2 | (TEXT)..<..E1%.|
000034C0: 30 20 20 20 20 3A 8F 20 44 49 53 4B 20 46 45 48 |0 :. DISK FEH|
000034D0: 4C 45 52 20 28 53 50 55 52 29 00 FD 3C DA 11 45 |LER (SPUR)..<..E|
000034E0: 32 25 B2 30 20 20 20 20 3A 8F 20 44 49 53 4B 20 |2%.0 :. DISK |
000034F0: 46 45 48 4C 45 52 20 28 53 4B 54 2E 29 00 1D 3D |FEHLER (SKT.)..=|
00003500: E4 11 41 46 25 B2 30 20 20 20 20 3A 8F 20 46 4C |..AF%.0 :. FL|
00003510: 41 47 20 43 4F 50 59 20 41 4C 50 48 41 00 23 3D |AG COPY ALPHA.#=|
00003520: EE 11 3A 00 44 3D F8 11 8F 2A 2A 2A 2A 2A 2A 2A |..:.D=...*******|
00003530: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003540: 2A 2A 2A 2A 00 65 3D 02 12 8F 2A 2A 2A 2A 3E 3E |****.e=...****>>|
00003550: 3E 3E 3E 3E 46 45 4C 44 45 52 3C 3C 3C 3C 3C 3C |>>>>FELDER<<<<<<|
00003560: 2A 2A 2A 2A 2A 00 86 3D 0C 12 8F 2A 2A 2A 2A 2A |*****..=...*****|
00003570: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003580: 2A 2A 2A 2A 2A 2A 00 8C 3D 16 12 3A 00 AB 3D 20 |******..=..:..= |
00003590: 12 86 20 4E 41 24 28 31 35 30 29 20 20 20 3A 8F |.. NA$(150) :.|
000035A0: 20 46 49 4C 45 20 4E 41 4D 45 4E 00 CA 3D 2A 12 | FILE NAMEN..=*.|
000035B0: 86 20 43 50 24 28 31 35 30 29 20 20 20 3A 8F 20 |. CP$(150) :. |
000035C0: 57 4F 52 4B 20 4E 41 4D 45 4E 00 E7 3D 34 12 86 |WORK NAMEN..=4..|
000035D0: 20 46 54 24 28 31 35 30 29 20 20 20 3A 8F 20 46 | FT$(150) :. F|
000035E0: 49 4C 45 20 54 59 50 00 07 3E 3E 12 86 20 54 59 |ILE TYP..>>.. TY|
000035F0: 24 28 20 34 20 29 20 20 20 3A 8F 20 54 59 50 45 |$( 4 ) :. TYPE|
00003600: 4E 20 4E 41 4D 45 4E 00 0D 3E 48 12 3A 00 2D 3E |N NAMEN..>H.:.->|
00003610: 52 12 86 20 42 4C 25 28 31 35 30 29 20 20 20 3A |R.. BL%(150) :|
00003620: 8F 20 46 49 4C 45 20 4C 41 45 4E 47 45 00 4D 3E |. FILE LAENGE.M>|
00003630: 5C 12 86 20 45 52 25 28 31 35 30 29 20 20 20 3A |\.. ER%(150) :|
00003640: 8F 20 43 4F 50 59 20 46 45 48 4C 45 52 00 6D 3E |. COPY FEHLER.m>|
00003650: 66 12 86 20 42 4E 25 28 31 35 30 2C 31 29 20 3A |f.. BN%(150,1) :|
00003660: 8F 20 46 49 4C 45 20 42 45 47 49 4E 4E 00 8F 3E |. FILE BEGINN..>|
00003670: 70 12 86 20 42 44 25 28 20 31 20 29 20 20 20 3A |p.. BD%( 1 ) :|
00003680: 8F 20 4E 41 45 43 48 53 54 45 52 20 42 4C 4B 00 |. NAECHSTER BLK.|
00003690: 95 3E 7A 12 8E 00 BA 3E 84 12 8F 20 2A 2A 2A 2A |.>z....>... ****|
000036A0: 20 41 4C 50 48 41 20 53 4F 52 54 20 26 20 43 4F | ALPHA SORT & CO|
000036B0: 50 59 20 41 4C 4C 20 2A 2A 2A 00 E0 3E 8E 12 8F |PY ALL ***..>...|
000036C0: 20 2A 2A 2A 20 50 52 49 4E 54 20 43 55 52 52 45 | *** PRINT CURRE|
000036D0: 4E 54 20 43 4F 50 59 20 54 59 50 45 20 2A 2A 2A |NT COPY TYPE ***|
000036E0: 00 F8 3E 98 12 8B 42 B2 31 A7 99 22 50 52 4F 47 |..>...B.1.."PROG|
000036F0: 52 41 4D 4D 45 22 3A 8E 00 13 3F A2 12 8B 42 B2 |RAMME":...?...B.|
00003700: 32 A7 99 22 53 45 51 55 45 4E 54 49 45 4C 4C 45 |2.."SEQUENTIELLE|
00003710: 4E 22 3B 00 2A 3F AC 12 8B 42 B2 33 A7 99 22 52 |N";.*?...B.3.."R|
00003720: 45 4C 41 54 49 56 45 4E 22 3B 00 3C 3F B6 12 8B |ELATIVEN";.<?...|
00003730: 42 B2 34 A7 99 22 55 53 45 52 22 3B 00 4F 3F C0 |B.4.."USER";.O?.|
00003740: 12 99 22 20 44 41 54 45 49 45 4E 2E 22 3A 8E 00 |.." DATEIEN.":..|
00003750: 6A 3F CA 12 8F 20 2A 2A 2A 20 54 45 58 54 20 41 |j?... *** TEXT A|
00003760: 55 53 47 41 42 45 20 2A 2A 2A 00 96 3F D4 12 99 |USGABE ***..?...|
00003770: 22 11 12 41 43 48 54 55 4E 47 92 21 20 4C 45 47 |"..ACHTUNG.! LEG|
00003780: 45 4E 20 53 49 45 20 49 4E 20 44 52 49 56 45 20 |EN SIE IN DRIVE |
00003790: 31 20 45 49 4E 45 00 C3 3F DE 12 99 22 11 4C 45 |1 EINE..?...".LE|
000037A0: 45 52 45 20 4F 44 45 52 20 55 4E 42 45 4E 55 54 |ERE ODER UNBENUT|
000037B0: 5A 54 45 20 44 49 53 4B 20 45 49 4E 2E 20 44 52 |ZTE DISK EIN. DR|
000037C0: 49 56 45 00 DE 3F E8 12 99 22 11 31 20 57 49 52 |IVE..?...".1 WIR|
000037D0: 44 20 46 4F 52 4D 41 54 49 45 52 54 20 21 00 0C |D FORMATIERT !..|
000037E0: 40 F2 12 99 22 11 11 46 41 4C 4C 53 20 49 4E 20 |@..."..FALLS IN |
000037F0: 44 52 49 56 45 20 30 20 4B 45 49 4E 20 4D 45 4E |DRIVE 0 KEIN MEN|
00003800: 55 45 20 56 4F 52 48 41 4E 44 45 4E 00 3C 40 FC |UE VORHANDEN.<@.|
00003810: 12 99 22 11 49 53 54 2C 20 4C 45 47 45 4E 20 53 |..".IST, LEGEN S|
00003820: 49 45 20 42 49 54 54 45 20 41 55 43 48 20 44 49 |IE BITTE AUCH DI|
00003830: 45 53 45 53 20 42 45 52 45 49 54 2E 00 6A 40 06 |ESES BEREIT..j@.|
00003840: 13 99 22 11 11 11 44 52 55 45 43 4B 45 4E 20 53 |.."...DRUECKEN S|
00003850: 49 45 20 28 12 4A 92 29 20 46 55 45 52 20 57 45 |IE (.J.) FUER WE|
00003860: 49 54 45 52 2C 20 4A 45 44 45 00 A1 40 10 13 99 |ITER, JEDE..@...|
00003870: 22 11 41 4E 44 45 52 45 20 54 41 53 54 45 20 46 |".ANDERE TASTE F|
00003880: 55 45 48 52 54 20 5A 55 4D 20 41 42 42 52 55 43 |UEHRT ZUM ABBRUC|
00003890: 48 20 21 28 D6 29 9D 9D 22 3B 3A 97 32 30 34 2C |H !(.)..";:.204,|
000038A0: 30 00 D2 40 1A 13 8D 36 38 30 3A 97 32 30 34 2C |0..@...680:.204,|
000038B0: 31 3A 99 22 9D 20 22 3B 3A 8B 54 41 24 B3 B1 22 |1:.". ";:.TA$.."|
000038C0: 4A 22 A7 99 22 12 45 4E 44 45 92 22 3B 3A 89 37 |J"..".ENDE.";:.7|
000038D0: 36 30 00 DD 40 24 13 89 36 33 39 39 39 00 00 00 |60..@$..63999...|
000038E0: 00 F6 17 30 F0 00 BF |...0... |
..I.D..G(142):H3$."DISK UTILITY PROGRAMM
V 64":H4$."....................".B.N.H5
$." 'Q' FUER ENDE".~.X.. 820:. INITIALIS
IERUNG...... **** ASCII EINLESEN ***....
..#8,BY$:BY%.F(BY$.G(0)):.......".......
.......":.K.14.23:.SP$:.... ..".........
.....":.......".".3....".."ST$".":P.57.5
.(C(H1$).2):.P...(P).P.P..5.L....".."H(S
T$,P.38)H1$;.K.H..H(ST$,78.C(H1$).P.1);"
.";. .R.."...."ST$".";:P.57.5.(C(KO$).2)
:.P...(P).P.P..5.N....".";H(ST$,P.38)KO$
;:.H(ST$,78.C(KO$).P);......"...."ST$"."
:.......*** BLOCK LESEN (MIT OPEN) ***.%
....15,"I".DR$:MK%.DS:.MK%. ..6....8,8,8
,"#":..O....*** BLOCK LESEN ***.J....15,
"U1:"8;DR%;TR%;SC%.P."...V.,.:...6.. ***
* DIRECTORY ****...@.. 540:.MK%...Q.J..(
QU%.0).(ID$.DI$).(DR%.LR%).(ZY$.TY$). 8:
....T.."..CATALOG EINLESEN".,.^.QU%.0:DI
$.ID$:LR%.DR%:N0%.0:BU%.0:FI%.0:TR%.18:S
C%.1:ZY$.TY$.C.H.. 280:. BLOCK-READ.W.R.
.I.0.1:.#8,BY$:BD%(I).F(BY$.G(0)):.:BU%.
2:. 800...|.. 140:B1%.(BY% . 7)......B1%
.0.RE%.0.490......B1%.RE%.490......TY$..
"A"..F(TY$(B1%))..F(TY$).490.....H$."":.
I.0.1:. 140:BN%(N0%,I).BY%:..0....I.3.18
:.#8,BY$:.BY$..G(160). H$.H$.BY$.?....:.
Z%.2380.\.B..I.19.27:.#8,BY$:.:. 140.~.L
.BL%.BY%:. 140:BL%.BL%.256.BY%...V.BL%(N
0%).BL%:NA$(N0%).H$:FT$(N0%).TY$(B1%):N0
%.N0%.1.J....".".25.TB)N0%.....FI%.FI%.1
:.FI%.8.BU%.FI%.32.2:. 800:. 380......BD
%(0).0.520./...TR%.BD%(0):SC%.BD%(1):FI%
.0:.360.6... 8.<.....R.... *** GET ID$ *
**.H.&.. 250:. OPEN FILE...0.. MK% . . :
. SICHER......:.TR%.18:SC%.0:.280...D.BU
%.162:ID$."":. 800.P.N..I.1.5:.140:ID$.I
D$.BY$:..V.X.....B.. *** GET NAME + ID
***...L..550:.MK%.....V.BU%.144:NA$."":.
800.B....I.1.16:.140:.BY%..160.NA$.NA$.B
Y$.J....:..P...:.M.... *** GET EINE TAST
E ***......198,0:.198,1:. TA$.....AS%.E(
TA$):......:...F.. *** ERFRAGE DRIVE NR.
***.S.P.DR%.0:TA$."0":.730...Z.DR$.TA$:
......:...... *** VERZOEGERUNG ***......
AF%.0..I.1.2500:........%...:.H....*** B
UFFER POINTER SETZEN ***.^. ..15,"B-P:"8
;BU%:....*.. **** DAUER FILES OEFFNEN *
***...4.:...>.. 15,8,15:. DISK ERROR KAN
AL.C.H.. 01,0,00:. TASTATUR...R.SP$."
".'.
\.FO$.". .
.".X.F.ST$.".......................
..............."..P.FM$." *":.B8.ST$.H(
ST$.ST$.ST$,78)...Z.H1$."INITIALISIERUNG
VON DUP 64".....NA$."":NB$."":ID$."":D
I$."":TA$."":TY$."":BY$."":H$."".....KO$
.H4$:.170:.4090:.760.....HZ$."0123456789
ABCDEF".,....I.1.4:.TY$(I):..2...:.U....
**** HAUPT - MENUE ****.[...:.O.J.
KO$.H5$:H1$.H3$...T..170:X..(0):. GARBAG
E.......8.TB)".1) SCRATCHEN VON FILES".T
.....8.TB)".2) FORMATIEREN VON DISKS....
...8.TB)".3) FILE LISTEN.......8.TB)".4)
DISK NAME/ID AENDERN.:.....8.TB)".5) TE
STLESEN EINER DISK.].....8.TB)".6) DIREC
TORY ANZEIGE.......8.TB)".7) FILE RETTE
N (UNSCRATCH)...$...8.TB)".8) STARTADRES
SE AENDERN";.C....670:.TA$."Q".1120.S.8.
.AS%.0.1070...B.. *** VERTEILER ***.!.L.
.AS%.1380,1160,2430,2750,3000,2280,3480,
3800:.970.<.V.. : . DUMMY SUBROUTINE.E.`
..170.M.J..15,"U:":.:."........":.:. DUP
ENDE.S.T.:...~.. *** FORMATIEREN ***...
..KO$."DISK FORMATIER ROUTINE":.170.R...
. 720:. ZEILENNUMMER LESEN...... 620: 8:
. DISK ID & NAME......MK%.1240:. ?BAD DI
SK.L...D$."":.".DISK ID ="ID$:.".SOLL DE
R ID BEIBEHALTEN WERDEN ? ";.T....1,TA$:
.:.H(TA$,1)."J".ID$."":.1240...D..H(TA$,
1).."N"..".";:.211,33:.1210...N.D$.",".I
D$...X..".DISK NAME , ID ? ";:FE%.B(211
):.NA$","ID$;......211,FE%:.1,NA$,ID$:.:
.H(NA$,1)."*".NA$."". ..).... ^^^ ABBRUC
H ^^^ !!!.Y...QU%..1:CC$."N:".NA$:.ID$."
".CC$.CC$.",".ID$......".DISKETTE WIRD F
ORMATIERT.": 1:.1,8,15,"".CC$..... 1:.1,
0,0......DS.20. .......".FEHLER :"E$...(
..15,"I".DR$:.".LETZTER VERSUCH ...";...
2..15,CC$:.DS.0..".OK !":.760.#.<.."DISK
.DEFEKT. !!!":.760.@.F.."SEQ","PRG","US
R","REL".F.P.:.F.Z.. **** SCRATCH ROUTIN
E ****...D.KO$."SCRATCH ROUTINE":K$."SCR
ATCHEN ". .N.Q%..1:.1430...X.:.D.... ***
* KOPIERROUTINE ****.....Q%.0:KO$."KOPIE
R ROUTINE":K$."KOPIEREN ".....PL%.0:.170
.9. ..MD%.0.Q%.0..".. NICHT BEI EINER
.4031. !!!":. 680.O....K$"VON .";:. 720.
G....Q%. 1480:. SCRATCH......".".X%.2.TB
)"NACH"1.DR%.F.H..".TYP: .P.RG, .S.EQ, .
U.SR, .R.EL, ODER .A.LLES ? ";:X%..(0).U
.R..680:.TA$;......TA$."P".TA$."S".TA$."
U".TA$."R".TA$."A".1520......211,X%:.149
0.5...TY$.TA$:.Q%.AL%.0:.1560.B....:."..
F.RAGEN ODER .A.LLES KOPIEREN ? ";......
680:AL%.(TA$."A"):.AL%.."ALLES":.1560...
..."FRAGEN"......:.310:.N0%.0.AF%.....".
. N0%.0.."...DIE DISK IST LEER.!!!":.760
...,.. 150:. DELETE ZEILE 10-23.).6.."LA
ENGE NAME ART".=.@..
I . 0 . N0%.1.E.J.."."BL%(I).8.TB)NA$(I)
.31.TB)FT$(I).~.T..". "K$" (J/N)..
.^..AL%.1670...H.. 680:.TA$."N".TA$.".".
1680.E.R..TA$."."..2410:.1680.Y.|..TA$..
"J". 1640.....CP$(PL%).NA$(I):PL%.PL%.1.
....."..."SP$:.SP$:.SP$"....":..V....PL%
.0.."."SP$:.".. NICHTS ZU "K$".
..":QU%.0:.760.M....AF%.."."SP$:.1760...
...Q%.PL%.1.1810......"."SP$:."ALPHABETI
SCH SORTIEREN (J/N)".C.B..680:.TA$."N".1
810.V.L..TA$.."J".1730...V.. *** ALFA SO
RT (EINFACH) ***......"..SORTIEREN...".&
...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......"..NEUER NAME ? ";:
.1,NN$.F.... 2080:. COPY AGAIN.....NN$."
*":.15,"S".G(48.(1.DR%)).":".CP$(I).&. .
.15,"C".G(48.1.DR%).":".NN$."=".DR$.":".
CP$(I).@.*..DS.1990:. NOCHMAL....X.4..SP
$:.SP$:.SP$:.SP$.A.>.. :..{.H.. *** TEXT
FENSTER ***...R.....\..".".(16.C(KO$).2)
.TB)"*** "KO$" ***.X.F.."...............
.......................... P..". FILE
- NAME . FEHLER - MELDUNG .".5 Z.."..
......................................P
..."....":.K.1.20:.FO$:... ...".........
..............................";.. ...".
...":... ... *** FORMAT DS$ ***.C ...378
0:D$.E$:D$.H(D$,19).. ..D$.I("
".D$,9.C(D$).2)..!..D$.H
(D$,19)..!J..."!T..*** CATALOG ***.(!..:
.S!...B8.KO$."DIRECTORY ANZEIGE":.170:.2
320..!..KO$. "LAENGE FILE NAME TYP
START":.170:.720:."..".N!..TY$."A":.3
10:.170:.3670:."..".16.TB)".TASTE BITTE"
;:.680..!...".FEHLER = ."E$:.680..!...I.
0.1:DR%.I.("..."......".5.DR%.35)"..":.2
14,23:..79)"..";.E"$.DR$.G(I.48):.15,"I"
.DR$:.3780:.E%.0. 15:WD(DR%):.15,8,15.."
...:.:.:.211,0:..35)".TASTE BITTE";:.680
.."8.."...":..."B..*** FIND SPECIFIC FIL
E ***.."L..H(H$,C(FI$))..FI$ . 490:. NIC
HT GEFUNDEN.."V..RE%.Z%.0:../#`.BU%.BU%.
1:.800:.140:TR%.BY%:.140:SC%.BY%:Z%.0:..
D#J.I.I.2:.I..1.I..1.J#T...L#~.. **** VI
EW FILE ON DISK ****..#..KO$."FILE - BET
RACHTER":.170..#..."FILENAME ZUM LISTEN
? ";..#...1,FI$:..L#..TY$."A":QU%..1..#.
.."..AUF .";:.720..$..Z%..1:.320:.Z%..".
.NICHT GEFUNDEN !":Z%.0:.680.$$D.FI$.H$:
.280.Q$N.."........".20)"..LISTING VON F
ILE ."FI$.$X..".DIESER BLOCK IN :
"TR%","SC%..$...".NAECHSTER BLOCK I
N : ";:.140:.BY%;:TR%.BY%..$....2
8.TB)".,";:.140:.BY%:SC%.BY%..%...".STAR
T ADRESSE : ";:.140:A.BY%:.140:A
.A.256.BY%.4%....28.TB)A.35.TB)"DEZ".R%.
..".ERSTE LINKADRESSE : ";:.140:A.BY
%:.140:A.A.256.BY%..%....28.TB)A.35.TB)"
DEZ".J%...".ERSTE ZEILENNUMMER : ";:.
140:A.BY%:.140:A.A.256.BY%..%(...28.TB)A
.35.TB)"DEZ"..&2..".ASCIIDUMP:":QA%.5:QB
%.33:.B8.QB%.75.G&<.HX$."":.I.8.255:.140
:HX$.HX$.BY$:.:.:.211,QA%:.":";.W&F..I.1
.C(HX$).Y&P...(I).QB%..":":.211,QA%:.":"
;..&Z.C$.J(HX$,I,1):C%.F(C$)..&D..C%.127
..".";:C%.C%.127.A&N..C%.32.C%.32.R&X..C
%.34..3660..&...G(C%)".";:.:.211,QB%.1:.
":":.B8..."'...TR%.0..,"TASTE FUERS MENU
E": 8:.680.V'...".E. FUER ENDE,.N. FUER
DEN NAECHSTEN BLOCK.";.T' ..680:.TA$."E"
. 8:."...":...'...TA$.."N".2720..'...250
0..'... *** NAMEN & ID AENDERN ****..'H.
KO$."DISK NAMEN & ID AENDERUNG":. 170..'
R.. 720:. DRIVE #..(... 620:. NAME + ID$
.!(..."..DISKNAME : "NA$.9(...".DISK ID
: "ID$.I(..."..AENDERUNG VON .I.D, .N
.AME, .K.EINE ? "..(...680:.TA$."K". 8:.
..(...TA$."I".2910..(...TA$.."N".2820.A(
".. *** NAMEN AENDERN ***..(,..".NEUER N
AME ? ";:X%..(I):.NA$;:.211,X%..)6..1,NA
$:BU%.144:.800.&)@.NA$.NA$."
".8)J.NA$.H(NA$,16).J)T..8,NA$;:.29
70.C)^.. *** ID AENDERN ***..)H..".NEUER
ID ? ";:X%..(I):.ID$;:.211,X%..)R..1,ID
$:BU%.162:.800.O)|.X.C(ID$):ID$.ID$.J("
2A ",X.1,6.X)..)..ID$.H(ID$,5)..)...8,
ID$;..*...15,"U2:8"DR%,18,0:.15,"I".DR$.
.*.. 8:..<*... **** TESTLESEN EINER DISK
***.V*..EB%.0:ES%.0:EC%.0:DC%.0:HD%.0:E
X%.0:ER%.0:FR%.0:BE%.0..*B.KO$."TESTLESE
N":.170..*L.."TESTLESEN VON .";:.720.A*V
.TR%.1:SC%.0:.250..*..AN%.1:EN%.35:. DEF
AULT VALUES..+..."..BESTIMMTER BEREICH (
J/N) ? "..+...680:.TA$."N".3130.2+...TA$
.."J".3060.W+...".VON SPUR ";:.1,TA$:AN%
.E(TA$).S+...AN%.0.AN%.1:.G(20)"1";..+..
." BIS SPUR ";:.1,TA$:EN%.E(TA$).L+&..(
EN%.0).(EN%.35).(EN%.AN%).EN%.35:.G(20)"
35";.Z+0.. :QU%..1..,:.KO$."VON SPUR".D(
AN%)." BIS SPUR".D(EN%):H1$."DISK CHECK"
.!,D..170.,,N.."...".O,X..I.AN%.EN%:JJ%.
20:.I.17.JJ%.18.`,B..I.24.JJ%.17..,L..I.
30.JJ%.16:. SEKTOREN/TRACK..,V..J.0.JJ%.
.,...15,"B-A:"DR%,I,J.I,...DS.0.FR%.FR%.
1:F$."FREI":.3230..,..BE%.BE%.1:F$."BELE
GT":.15,"B-F:"DR%,I,J..-..."......."SP$.
%-...".SPUR"I"SEKTOR"J"= "F$.:-..TR%.I:
SC%.J:.280.C-...:.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.R-Z..E%.21.ES%.ES%.1:.33
40..-...E%.23.EC%.EC%.1:.3340......E%.24
.DC%.DC%.1:.3340.)....E%.27.E%.29.HD%.HD
%.1:.3340.D....E%.28.EX%.EX%.1:.3340._..
. 8:. 240:. INIT + OPEN.K....J,I: 8... .
KO$."FEHLER UEBERSICHT":.170...*...3.TB)
"BELEGT ="BE%.28.TB)"FREI ="FR%...4...3.
TB)".HEADER FEHLT :"EB%../>...3.T
B)".SYNCRONIMPULS FEHLT :"ES%.,/H...3.TB
)".PRUEFSUMMEN FEHLER :"EC%.S/R...3.TB)
".DEKODIER FEHLER :"DC%.Z/\...3.TB)"
.HEADER PRUEFSUMME :"HD%../F...3.TB)".
LANGER DATEN BLOCK :"EX%.R/P...3.TB)"..
GESAMTFEHLER :";:.ER%..".";../Z..
ER%:.15,"V".DR$..0...". BITTE EINE TAS
TE...";..0...680.10... *** UNSCRATCH EIN
FILE ***.L0..KO$."DISK FILE RETTER".|0.
..170:."..FILE NAME ZUM RETTEN ? ";:.1,F
I$:...0... 720:. DRIVE #..0..TY$."A":QU%
..1:RE%..1:Z%..1:. 320:RE%.0..0J..Z%..".
.NICHT GEFUNDEN !": 8:Z%.0:.680..1T..".G
EFUNDEN FILE : ."H$.61..."..TYP: .P.
RG, .S.EQ, .U.SR ODER .R.EL ";.E1... 680
:.TA$;:.I.1.4:.TA$.J("SPUR",I,1).3580.Q1
...:.3560..1..BY%.128.I:.800:. BUFFER =0
..1...8,G(BY%);..1...15,"U2:"8;DR%;TR%;S
C%: 8..1...:."..FILE WIEDER KATALOGISIER
T.":.15,"V".DR$:QU%..1..1$..680..2... **
* WELCHE FLOPPY ? ***.$28.:.52B.. DELET
E ["].S2L.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).C2J..TA$:.TA$." "..680..2T..B(214).
22.."."," .TASTE BITTE";:.680:.170.
.2~..:.."3...***************************
**.E3...*** DISK STATUS BASIC 3.0 ***.H3
...*****************************.N3.....
3... >>> FUER LOTHAR HOFMANN <<<..3..:..
3D..15,E%,E$,E1%,E2%:..O3N..************
***************..3X..*** AENDERUNG PRG.S
TART ***..4...**************************
*.64..KO$."NEUE STARTADRESSE EINGEBEN".R
4...170:.720:. FRAGE DRIVE.E4..TY$."P":Q
U%..1..4..."..PROGRAMM NAME ? ";:.1,FI$:
Z%..1:.:.320..4...Z%.0.3880..4..Z%.0:.".
.PROGRAMM "G(34)FI$G(34)" IST NICHT VORH
ANDEN!":. 680..5(.."....".16.TB)"."H$"..
..52.FI$.H$:.280:.140:.140.<5<..140:X%.B
Y%:.140:X.X%.256.BY%.C5F.. 4050:."STARTA
DRESSE IST HEX "BY$..5P.."
DEZIMAL"X..5Z..631,F("."):.198,1.A5D..".
.NEUE STARTADRESSE ? "BY$".....";..5N..1
,BY$:.:.H(BY$,1)."@". 8:."..OK.":.760..6
X..H(BY$,1).."$".X.E(BY$):.4010.46..BY$.
J(BY$,2):BY$.I("0000".BY$,4).W6..X.0:.I.
1.4:X%.F(J(BY$,I,1)).48.J6...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.)7..E1%.X%.16:E2%.X%.15.S7..BY
$.BY$.J(HZ$,E1%.1,1).J(HZ$,E2%.1,1).Y7..
..|7...**** INITIALISIERUNG DER ****..7.
..**** SKALAREN VARIABLEN ****..7..:.H7
...**** FLOATING POINT ****.N7".:..
7,.I.0 :. ZAEHLER..76.J.0 :. Z
AEHLER..8@.K.0 :. ZAEHLER..8J.B.0
:. ZAEHLER.P8T.A.0 :. ADRESSE (
0-65535).R8^.X.0 :. ADRESSE (0-6553
5)..8H.P.0 :. FORMAT VAR. (TAB)..8R
.:..8|..**** INTEGER ****.C8
..:..8..SC%.0 :. SEKTOR (0-20)..8..TR
%.18 :. SPUR (1-35)..9..AS%.0 :.
VAL (TASTE).69..DR%.0 :. LAUFWERK #.V
9..LR%.0 :. CAT. LAUFWERK #.W9B.MD%.1
:. ANZAHL LAUFWERKE..9L.MK%.0 :.
DISK-STATUS VAR...9V.PL%.0 :. ZAHL DE
R WORKFILES..9..QU%..1 :. FLAG CAT GUE
LTIG..9..BU%.0 :. BUFFER PNT. VAR.. :
..N0%.0 :. ZAHL CATALOG FILES.@:..FI%
.0 :. FILES PRO BLOCK.^:..BY%.0 :.
ASC (GETBYTE)..:..B1%.0 :. FILETYP I
N CATALOG..:..ER%.0 :. GESAMTFEHLER Z
AHL..:&.C% .0 :. ASC (HEX $)..:0.X% .
0 :. CURSOR POSITION..;:.Q% .0 :.
FLAG COPY/SCRATCH.#;D.EB%.0 :. FEHLER
(KEIN HD.).D;N.ES%.0 :. FEHLER (SYNC
RON).[;X.EC%.0 :. FEHLER.R;B.DC%.0
:. FEHLER..;L.HD%.0 :. FEHLER (HEADE
R)..;V.EX%.0 :. FEHLER (LONG BLK.).R;
..FR%.0 :. FREIE BLOCKS..;..BE%.0
:. BELEGTE BLOCKS..<..AN%.1 :. VON SP
UR ....+<..EN%.35 :. ... BIS SPUR.N<..
JJ%.20 :. MAX. SEKTOREN/SPUR.Q<..RE%.0
:. FLAG (FILE RETTEN)..<..E% .0 :
. DISK FEHLER (CODE)..<F.E$ ."" :. DIS
K FEHLER (TEXT).Z<P.E1%.0 :. DISK FEH
LER (SPUR)..<Z.E2%.0 :. DISK FEHLER (
SKT.)..=..AF%.0 :. FLAG COPY ALPHA.#=
..:.D=...***************************.E=.
..****>>>>>>FELDER<<<<<<*****..=...*****
**********************..=..:..= .. NA$(1
50) :. FILE NAMEN.J=*.. CP$(150) :.
WORK NAMEN..=4.. FT$(150) :. FILE TYP.
.>>.. TY$( 4 ) :. TYPEN NAMEN..>H.:.->
R.. BL%(150) :. FILE LAENGE.M>\.. ER%(
150) :. COPY FEHLER.M>F.. BN%(150,1) :
. FILE BEGINN..>P.. BD%( 1 ) :. NAECHS
TER BLK..>Z....>... **** ALPHA SORT & CO
PY ALL ***..>... *** PRINT CURRENT COPY
TYPE ***..>...B.1.."PROGRAMME":...?...B.
2.."SEQUENTIELLEN";.*?...B.3.."RELATIVEN
";.<?...B.4.."USER";.O?..." DATEIEN.":..
J?J.. *** TEXT AUSGABE ***..?T.."..ACHTU
NG.! LEGEN SIE IN DRIVE 1 EINE.C?...".LE
ERE ODER UNBENUTZTE DISK EIN. DRIVE..?..
.".1 WIRD FORMATIERT !..@..."..FALLS IN
DRIVE 0 KEIN MENUE VORHANDEN.<@...".IST,
LEGEN SIE BITTE AUCH DIESES BEREIT..J@.
.."...DRUECKEN SIE (.J.) FUER WEITER, JE
DE..@...".ANDERE TASTE FUEHRT ZUM ABBRUC
H !(V)..";:.204,0.R@...680:.204,1:.". ";
:.TA$.."J"..".ENDE.";:.760..@$..63999...
...0...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL