DISKHILFE 2.0
FILE INFORMATION
FILENAME(S): DISKHILFE 2.0
FILE TYPE(S): PRG
FILE SIZE: 5K
FIRST SEEN: 2025-12-02 22:47:32
APPEARS ON: 1 disk(s)
FILE HASH
16f45094aaae45d2e7cea85a3cc411d8f83ff1ffe18124835b40ae789150c4ee
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SEITE 2 DISK NR | DISKHILFE 2.0 | PRG | swasti, charly | 15 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 52 08 00 00 8F 20 44 49 53 4B 48 49 4C 46 |..R.... DISKHILF| 00000010: 45 20 52 45 56 49 53 45 44 20 42 59 20 28 43 29 |E REVISED BY (C)| 00000020: 20 45 4C 43 48 2D 53 4F 46 54 20 2A 2A 2A 2A 2A | ELCH-SOFT *****| 00000030: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000040: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000050: 2A CC 00 67 08 0A 00 99 C7 28 31 34 29 3A 99 22 |*..g.....(14):."| 00000060: 93 22 3A 89 39 32 30 00 78 08 14 00 9C 3A 8D 35 |.":.920.x....:.5| 00000070: 36 30 3A 52 45 25 B2 30 00 A0 08 1E 00 99 22 93 |60:RE%.0......".| 00000080: 05 C2 45 47 49 4E 4E 20 44 45 52 20 D3 55 43 48 |..EGINN DER .UCH| 00000090: 45 20 D3 50 55 52 20 22 44 49 25 22 2C 31 11 22 |E .PUR "DI%",1."| 000000A0: 00 BF 08 28 00 53 50 25 B2 31 3A 54 52 25 B2 44 |...(.SP%.1:TR%.D| 000000B0: 49 25 3A 9F 31 35 2C 38 2C 31 35 2C 22 49 30 00 |I%:.15,8,15,"I0.| 000000C0: D5 08 32 00 9F 38 2C 38 2C 32 2C 22 23 32 22 3A |..2..8,8,2,"#2":| 000000D0: 46 49 25 B2 30 00 F3 08 3C 00 98 31 35 2C 22 55 |FI%.0...<..15,"U| 000000E0: 31 3A 22 32 3B 30 3B 54 52 25 3B 53 50 25 3A 8D |1:"2;0;TR%;SP%:.| 000000F0: 35 30 30 00 21 09 46 00 81 49 B2 30 A4 31 3A A1 |500.!.F..I.0.1:.| 00000100: 23 38 2C 41 24 3A 8D 34 37 30 3A 50 25 28 49 29 |#8,A$:.470:P%(I)| 00000110: B2 C6 28 41 24 29 3A 82 3A 41 B2 32 3A 8D 34 39 |..(A$):.:A.2:.49| 00000120: 30 00 3B 09 50 00 A1 23 38 2C 41 24 3A 8D 34 37 |0.;.P..#8,A$:.47| 00000130: 30 3A 41 B2 C6 28 41 24 29 AF 37 00 66 09 5A 00 |0:A..(A$).7.f.Z.| 00000140: 48 24 B2 22 22 3A 81 49 B2 30 A4 31 3A A1 23 38 |H$."":.I.0.1:.#8| 00000150: 2C 41 24 3A 8D 34 37 30 3A 4C 25 28 49 29 B2 C6 |,A$:.470:L%(I)..| 00000160: 28 41 24 29 3A 82 00 85 09 64 00 81 49 B2 33 A4 |(A$):....d..I.3.| 00000170: 31 38 3A A1 23 38 2C 41 24 3A 48 24 B2 48 24 AA |18:.#8,A$:H$.H$.| 00000180: 41 24 3A 82 3A 00 94 09 6E 00 8B 48 24 B2 22 22 |A$:.:...n..H$.""| 00000190: A7 31 33 30 00 CB 09 78 00 99 20 4B 49 24 28 41 |.130...x.. KI$(A| 000001A0: 29 3B 22 20 22 3B 43 4F 24 3B 48 24 3B A3 31 31 |);" ";CO$;H$;.11| 000001B0: 29 43 4F 24 3B 3B 4C 25 28 30 29 3B 4C 25 28 31 |)CO$;;L%(0);L%(1| 000001C0: 29 3A 8B 41 B2 30 A7 89 33 30 30 00 F4 09 82 00 |):.A.0..300.....| 000001D0: 46 49 25 B2 46 49 25 AA 31 3A 8B 46 49 25 B3 38 |FI%.FI%.1:.FI%.8| 000001E0: A7 41 B2 46 49 25 AC 33 32 AA 32 3A 8D 34 39 30 |.A.FI%.32.2:.490| 000001F0: 3A 89 38 30 00 05 0A 8C 00 8B 50 25 28 30 29 B2 |:.80......P%(0).| 00000200: 30 A7 31 36 30 00 49 0A 96 00 99 22 11 D7 45 43 |0.160.I...."..EC| 00000210: 48 53 45 4C 20 41 55 46 20 D3 50 55 52 22 3B 3A |HSEL AUF .PUR";:| 00000220: 54 52 25 B2 50 25 28 30 29 3A 53 50 25 B2 50 25 |TR%.P%(0):SP%.P%| 00000230: 28 31 29 3A 46 49 25 B2 30 3A 99 54 52 25 3B 53 |(1):FI%.0:.TR%;S| 00000240: 50 25 22 11 22 3A 89 36 30 00 86 0A A0 00 A0 38 |P%".":.60......8| 00000250: 3A 99 22 12 11 C4 49 52 45 43 54 4F 52 59 20 C5 |:."...IRECTORY .| 00000260: 4E 44 45 92 22 2C 3A 8B 52 45 25 A7 99 22 C3 4F |NDE.",:.RE%..".O| 00000270: 4C 4C 45 43 54 20 C4 52 49 56 45 20 31 22 3A 98 |LLECT .RIVE 1":.| 00000280: 31 35 2C 22 56 30 00 98 0A AA 00 8D 35 30 30 3A |15,"V0......500:| 00000290: A0 31 35 3A 89 39 33 30 00 B4 0A B4 00 8F 2A 2A |.15:.930......**| 000002A0: 20 20 52 45 54 52 49 45 56 45 20 41 20 46 49 4C | RETRIEVE A FIL| 000002B0: 45 20 2A 2A 00 D3 0A BE 00 98 31 35 2C 22 55 31 |E **......15,"U1| 000002C0: 3A 22 32 3B 30 3B 4C 25 28 30 29 3B 4C 25 28 31 |:"2;0;L%(0);L%(1| 000002D0: 29 3A 8E 00 EE 0A C8 00 44 25 B2 32 3A 99 22 11 |):......D%.2:.".| 000002E0: D3 50 55 52 2C 20 D3 45 4B 54 4F 52 22 3B 00 16 |.PUR, .EKTOR";..| 000002F0: 0B D2 00 8D 31 39 30 3A 81 49 B2 30 A4 31 3A A1 |....190:.I.0.1:.| 00000300: 23 38 2C 41 24 3A 8D 34 37 30 3A 5A 25 28 49 29 |#8,A$:.470:Z%(I)| 00000310: B2 C6 28 41 24 29 00 3C 0B DC 00 99 5A 25 28 49 |..(A$).<....Z%(I| 00000320: 29 22 9D 20 22 3B 3A 82 3A 99 3A 99 22 91 D3 50 |)". ";:.:.:."..P| 00000330: 55 52 2C 20 D3 45 4B 54 4F 52 22 3B 00 4D 0B E6 |UR, .EKTOR";.M..| 00000340: 00 8B 5A 25 28 30 29 B2 30 A7 99 3A 8E 00 8D 0B |..Z%(0).0..:....| 00000350: F0 00 98 31 35 2C 22 42 2D 46 22 30 3B 5A 25 28 |...15,"B-F"0;Z%(| 00000360: 30 29 3B 5A 25 28 31 29 3A 4C 25 28 30 29 B2 5A |0);Z%(1):L%(0).Z| 00000370: 25 28 30 29 3A 4C 25 28 31 29 B2 5A 25 28 31 29 |%(0):L%(1).Z%(1)| 00000380: 3A 5A 25 28 44 25 29 B2 5A 25 28 30 29 00 A8 0B |:Z%(D%).Z%(0)...| 00000390: FA 00 5A 25 28 44 25 AA 31 29 B2 5A 25 28 31 29 |..Z%(D%.1).Z%(1)| 000003A0: 3A 44 25 B2 44 25 AA 32 00 B6 0B 04 01 8B 44 53 |:D%.D%.2......DS| 000003B0: B2 30 A7 32 31 30 00 FC 0B 0E 01 99 3A 99 22 12 |.0.210......:.".| 000003C0: C4 41 53 20 C6 49 4C 45 20 57 55 52 44 45 20 42 |.AS .ILE WURDE B| 000003D0: 45 52 45 49 54 53 20 55 45 42 45 52 53 43 48 52 |EREITS UEBERSCHR| 000003E0: 49 45 42 45 4E 92 21 22 3A 58 25 B2 A8 28 58 25 |IEBEN.!":X%..(X%| 000003F0: 29 3A 41 B2 46 49 25 AC 33 32 AA 32 00 28 0C 18 |):A.FI%.32.2.(..| 00000400: 01 81 49 B2 32 A4 44 25 AB 34 A9 32 3A 98 31 35 |..I.2.D%.4.2:.15| 00000410: 2C 22 42 2D 46 3A 22 30 3B 5A 25 28 49 29 3B 5A |,"B-F:"0;Z%(I);Z| 00000420: 25 28 49 AA 31 29 3A 82 00 4A 0C 22 01 4C 25 28 |%(I.1):..J.".L%(| 00000430: 30 29 B2 54 52 25 3A 4C 25 28 31 29 B2 53 50 25 |0).TR%:L%(1).SP%| 00000440: 3A 8D 31 39 30 3A 89 34 39 30 00 68 0C 2C 01 99 |:.190:.490.h.,..| 00000450: 22 DA 55 52 55 45 43 4B 48 4F 4C 45 4E 3F 20 28 |".URUECKHOLEN? (| 00000460: CA 2F CE 29 A0 A0 A0 A0 00 7F 0C 36 01 A1 20 41 |./.).......6.. A| 00000470: 24 3A 8B 20 41 24 B2 22 22 20 A7 20 33 31 30 00 |$:. A$."" . 310.| 00000480: 91 0C 40 01 8B 20 41 24 B3 B1 22 4A 22 A7 31 33 |..@.. A$.."J".13| 00000490: 30 00 CF 0C 4A 01 58 25 B2 30 3A 99 22 11 C2 4C |0...J.X%.0:."..L| 000004A0: 4F 43 4B 53 20 57 49 45 44 45 52 42 45 4C 45 47 |OCKS WIEDERBELEG| 000004B0: 45 4E 2E 2E 2E 22 3A 5A 25 28 30 29 B2 4C 25 28 |EN...":Z%(0).L%(| 000004C0: 30 29 3A 8D 32 30 30 3A 8B 58 25 A7 31 33 30 00 |0):.200:.X%.130.| 000004D0: 07 0D 54 01 99 22 11 C9 53 54 20 44 49 45 53 20 |..T.."..ST DIES | 000004E0: 45 49 4E 20 12 D0 92 52 4F 47 52 41 4D 4D 2C 12 |EIN ...ROGRAMM,.| 000004F0: D3 92 45 51 55 45 4E 49 45 4C 4C 45 53 2C 20 12 |..EQUENIELLES, .| 00000500: D5 92 53 45 52 2C 22 00 25 0D 5E 01 99 22 4F 44 |..SER,".%.^.."OD| 00000510: 45 52 20 12 D2 92 45 4C 41 54 49 56 45 53 20 C6 |ER ...ELATIVES .| 00000520: 49 4C 45 22 3B 00 58 0D 68 01 A1 20 4A 41 24 3A |ILE";.X.h.. JA$:| 00000530: 8B 4A 41 24 B3 B1 22 50 22 AF 4A 41 24 B3 B1 22 |.JA$.."P".JA$.."| 00000540: 53 22 AF 4A 41 24 B3 B1 22 55 22 AF 4A 41 24 B3 |S".JA$.."U".JA$.| 00000550: B1 22 52 22 A7 33 36 30 00 60 0D 72 01 99 3A 99 |."R".360.`.r..:.| 00000560: 00 8B 0D 7C 01 99 3A 8B 4A 41 24 B2 22 50 22 A7 |...|..:.JA$."P".| 00000570: 99 22 12 D0 52 4F 47 52 41 4D 4D 92 2D 22 3A 4B |."..ROGRAMM.-":K| 00000580: 49 25 B2 31 33 30 3A 89 34 32 30 00 B0 0D 86 01 |I%.130:.420.....| 00000590: 8B 4A 41 24 B2 22 55 22 A7 99 22 12 D5 53 45 52 |.JA$."U".."..SER| 000005A0: 92 2D 22 3A 4B 49 25 B2 31 33 31 3A 89 34 32 30 |.-":KI%.131:.420| 000005B0: 00 DA 0D 90 01 8B 4A 41 24 B2 22 52 22 A7 99 22 |......JA$."R".."| 000005C0: 12 D2 45 4C 41 54 49 56 45 53 92 2D 22 3A 4B 49 |..ELATIVES.-":KI| 000005D0: 25 B2 31 33 32 3A 89 34 32 30 00 FA 0D 9A 01 99 |%.132:.420......| 000005E0: 22 12 D3 45 51 55 45 4E 54 49 45 4C 4C 45 53 92 |"..EQUENTIELLES.| 000005F0: 2D 22 3A 4B 49 25 B2 31 32 39 00 15 0E A4 01 99 |-":KI%.129......| 00000600: 22 C6 49 4C 45 20 57 49 45 44 45 52 48 4F 4C 45 |".ILE WIEDERHOLE| 00000610: 4E 2E 2E 2E 22 00 32 0E AE 01 4C 25 28 30 29 B2 |N...".2...L%(0).| 00000620: 54 52 25 3A 4C 25 28 31 29 B2 53 50 25 3A 8D 31 |TR%:L%(1).SP%:.1| 00000630: 39 30 00 51 0E B8 01 41 B2 46 49 25 AC 33 32 AA |90.Q...A.FI%.32.| 00000640: 32 3A 8D 34 39 30 3A 98 38 2C C7 28 4B 49 25 29 |2:.490:.8,.(KI%)| 00000650: 3B 00 79 0E C2 01 42 4C 25 B2 28 28 44 25 AB 32 |;.y...BL%.((D%.2| 00000660: 29 AD 32 29 AA 31 3A 99 22 11 22 42 4C 25 22 C2 |).2).1:."."BL%".| 00000670: 4C 4F 45 43 4B 45 20 22 3B 00 B5 0E CC 01 98 31 |LOECKE ";......1| 00000680: 35 2C 22 55 32 3A 22 32 3B 30 3B 54 52 25 3B 53 |5,"U2:"2;0;TR%;S| 00000690: 50 25 3A 99 22 D7 49 45 44 45 52 48 45 52 47 45 |P%:.".IEDERHERGE| 000006A0: 53 54 45 4C 4C 54 20 21 11 22 3A 52 45 25 B2 31 |STELLT !.":RE%.1| 000006B0: 3A 89 31 33 30 00 C8 0E D6 01 8B 41 24 B2 22 22 |:.130......A$.""| 000006C0: A7 41 24 B2 C7 28 30 29 00 CE 0E E0 01 8E 00 E0 |.A$..(0)........| 000006D0: 0E EA 01 98 31 35 2C 22 42 2D 50 3A 22 32 3B 41 |....15,"B-P:"2;A| 000006E0: 00 01 0F F4 01 84 31 35 2C 45 4E 25 2C 45 4D 24 |......15,EN%,EM$| 000006F0: 2C 45 54 25 2C 45 53 25 3A 8B 45 4E 25 B2 30 A7 |,ET%,ES%:.EN%.0.| 00000700: 8E 00 17 0F FE 01 99 22 11 11 12 44 49 53 4B 20 |......."...DISK | 00000710: 46 45 48 4C 45 52 92 00 46 0F 08 02 99 22 11 C6 |FEHLER..F...."..| 00000720: 45 48 4C 45 52 20 CD 45 4C 44 55 4E 47 92 3A 20 |EHLER .ELDUNG.: | 00000730: 22 45 4E 25 22 20 22 45 4D 24 22 2C 22 45 54 25 |"EN%" "EM$","ET%| 00000740: 22 2C 22 45 53 25 00 60 0F 12 02 99 22 42 49 54 |","ES%.`...."BIT| 00000750: 54 45 20 27 C3 CF CE D4 27 20 47 45 42 45 4E 2E |TE '....' GEBEN.| 00000760: 00 69 0F 1C 02 89 39 33 30 00 6F 0F 26 02 8E 00 |.i....930.o.&...| 00000770: 99 0F 30 02 86 50 25 28 31 29 2C 4C 25 28 31 29 |..0..P%(1),L%(1)| 00000780: 2C 5A 25 28 33 30 30 29 2C 4B 49 24 28 34 29 3A |,Z%(300),KI$(4):| 00000790: 43 4F 24 B2 C7 28 33 34 29 00 D0 0F 3A 02 50 47 |CO$..(34)...:.PG| 000007A0: 24 B2 22 05 93 12 20 20 20 20 20 20 C4 49 53 4B |$."... .ISK| 000007B0: 20 C6 49 4C 45 20 D2 45 54 54 45 52 20 D6 C3 31 | .ILE .ETTER ..1| 000007C0: 35 34 30 2F 31 35 34 31 20 20 20 20 20 20 92 22 |540/1541 ."| 000007D0: 00 07 10 44 02 99 50 47 24 22 11 22 3A 99 22 C4 |...D..PG$".":.".| 000007E0: 49 45 53 45 53 20 D0 52 4F 47 52 41 4D 4D 20 45 |IESES .ROGRAMM E| 000007F0: 52 4D 4F 45 47 4C 49 43 48 54 20 44 41 53 20 D7 |RMOEGLICHT DAS .| 00000800: 49 45 44 45 52 2D 22 00 2F 10 4E 02 99 22 48 45 |IEDER-"./.N.."HE| 00000810: 52 53 54 45 4C 4C 45 4E 20 56 4F 4E 20 47 45 4C |RSTELLEN VON GEL| 00000820: 4F 45 53 43 48 54 45 4E 20 C6 49 4C 45 53 2E 00 |OESCHTEN .ILES..| 00000830: 60 10 58 02 99 22 C5 53 20 57 49 52 44 20 56 4F |`.X..".S WIRD VO| 00000840: 52 41 55 53 47 45 53 45 54 5A 54 2C 44 41 53 53 |RAUSGESETZT,DASS| 00000850: 20 44 49 45 20 C4 49 53 4B 20 4E 4F 43 48 22 3B | DIE .ISK NOCH";| 00000860: 00 86 10 62 02 99 22 4E 49 43 48 54 20 57 49 45 |...b.."NICHT WIE| 00000870: 44 45 52 20 42 45 53 43 48 52 49 45 42 45 4E 20 |DER BESCHRIEBEN | 00000880: 57 55 52 44 45 2E 00 B5 10 6C 02 99 22 11 31 30 |WURDE....l..".10| 00000890: 30 25 20 C5 52 46 4F 4C 47 20 49 53 54 20 4E 55 |0% .RFOLG IST NU| 000008A0: 52 20 4E 41 43 48 20 27 D3 C3 D2 C1 D4 C3 C8 27 |R NACH '.......'| 000008B0: 20 47 45 2D 22 00 C9 10 76 02 99 22 57 41 45 48 | GE-"...v.."WAEH| 000008C0: 52 4C 45 49 53 54 45 54 2E 00 0B 11 80 02 99 22 |RLEISTET......."| 000008D0: 11 C2 45 49 4D 20 D3 55 43 48 45 4E 20 57 45 52 |..EIM .UCHEN WER| 000008E0: 44 45 4E 20 4E 55 52 20 44 49 45 20 47 45 4C 4F |DEN NUR DIE GELO| 000008F0: 45 53 43 48 54 45 4E 20 20 C4 41 54 45 49 45 4E |ESCHTEN .ATEIEN| 00000900: 20 41 42 47 45 46 52 41 47 54 22 00 29 11 8A 02 | ABGEFRAGT".)...| 00000910: 99 22 11 11 11 20 20 20 D4 41 53 54 45 20 44 52 |."... .ASTE DR| 00000920: 55 45 43 4B 45 4E 20 21 22 00 42 11 94 02 A1 20 |UECKEN !".B.... | 00000930: 54 44 24 3A 8B 20 54 44 24 B2 22 22 20 A7 20 36 |TD$:. TD$."" . 6| 00000940: 36 30 00 4F 11 9E 02 44 49 25 B2 31 38 3A 8E 00 |60.O...DI%.18:..| 00000950: 60 11 A8 02 99 22 91 91 91 91 22 3A 89 36 35 30 |`...."....":.650| 00000960: 00 69 11 B2 02 89 39 33 30 00 84 11 BC 02 50 4E |.i....930.....PN| 00000970: 24 B2 22 C4 C9 D3 CB 20 C9 C4 20 C3 C8 C1 CE C7 |$.".... .. .....| 00000980: C5 D2 22 3A 00 C1 11 C6 02 99 22 93 11 12 20 22 |..":......"... "| 00000990: AA 50 4E 24 AA 22 20 22 3A 99 22 11 4D 49 54 20 |.PN$." ":.".MIT | 000009A0: 44 49 45 53 45 4D 20 D0 52 4F 47 52 41 4D 4D 20 |DIESEM .ROGRAMM | 000009B0: 4B 4F 45 4E 4E 45 4E 20 C4 49 53 4B 2D CE 41 4D |KOENNEN .ISK-.AM| 000009C0: 45 00 EB 11 D0 02 99 22 11 55 4E 44 2F 4F 44 45 |E......".UND/ODE| 000009D0: 52 20 C4 49 53 4B 2D C9 C4 20 47 45 41 45 4E 44 |R .ISK-.. GEAEND| 000009E0: 45 52 54 20 57 45 52 44 45 4E 2E 00 0C 12 DA 02 |ERT WERDEN......| 000009F0: 81 4C B2 31 A4 31 33 3A 99 22 A3 A3 A3 22 3B 3A |.L.1.13:."...";:| 00000A00: 82 3A 99 3A 99 3A 58 24 B2 22 30 22 00 19 12 E4 |.:.:.:X$."0"....| 00000A10: 02 44 56 B2 C5 28 58 24 29 00 3B 12 EE 02 44 56 |.DV..(X$).;...DV| 00000A20: 24 B2 58 24 3A 8B 44 56 AF 32 35 34 A7 99 22 91 |$.X$:.DV.254..".| 00000A30: 91 91 91 91 91 22 3A 89 37 33 30 00 43 12 F8 02 |.....":.730.C...| 00000A40: 99 44 56 00 80 12 02 03 99 22 11 C1 45 4E 44 45 |.DV......"..ENDE| 00000A50: 52 55 4E 47 20 56 4F 4E 20 20 C4 C9 D3 CB 2D 12 |RUNG VON ....-.| 00000A60: CE 92 C1 CD C5 22 3A 99 3A 99 A3 39 29 22 4F 44 |.....":.:..9)"OD| 00000A70: 45 52 20 C4 C9 D3 CB 2D 12 C9 92 C4 20 3F 22 3B |ER ....-.... ?";| 00000A80: 00 BC 12 0C 03 99 22 20 20 20 20 20 28 12 CE 92 |......" (...| 00000A90: 2F 12 C9 92 29 20 20 22 3B 3A 8D 39 31 30 3A 8B |/...) ";:.910:.| 00000AA0: 58 24 B3 B1 22 4E 22 AF 58 24 B3 B1 22 49 22 A7 |X$.."N".X$.."I".| 00000AB0: 99 22 91 91 91 91 22 3A 89 37 37 30 00 04 13 16 |."....":.770....| 00000AC0: 03 99 58 24 3A 9F 31 35 2C 38 2C 31 35 3A 98 31 |..X$:.15,8,15:.1| 00000AD0: 35 2C 22 49 22 AA 44 56 24 3A 9F 31 2C 38 2C 33 |5,"I".DV$:.1,8,3| 00000AE0: 2C 22 23 22 3A 98 31 35 2C 22 55 31 3A 33 22 44 |,"#":.15,"U1:3"D| 00000AF0: 56 22 2C 31 38 2C 30 22 3A 8B 58 24 B2 22 4E 22 |V",18,0":.X$."N"| 00000B00: 89 38 36 30 00 4D 13 20 03 98 31 35 2C 22 42 2D |.860.M. ..15,"B-| 00000B10: 50 3A 33 2C 31 36 32 22 3A A1 23 31 2C 41 24 2C |P:3,162":.#1,A$,| 00000B20: 42 24 2C 43 24 2C 44 24 2C 45 24 3A 99 22 11 C4 |B$,C$,D$,E$:."..| 00000B30: 45 52 5A 45 49 54 49 47 45 52 20 C4 C9 D3 CB 2D |ERZEITIGER ....-| 00000B40: C9 C4 20 49 53 54 20 12 20 22 41 24 3B 00 86 13 |.. IST . "A$;...| 00000B50: 2A 03 99 42 24 3B 43 24 3B 44 24 3B 45 24 3A 85 |*..B$;C$;D$;E$:.| 00000B60: 22 11 CE 45 55 45 52 20 C4 C9 D3 CB 2D C9 C4 20 |"..EUER ....-.. | 00000B70: 28 4D 41 58 2E 20 35 20 DA 45 49 43 48 45 4E 29 |(MAX. 5 .EICHEN)| 00000B80: 20 22 3B 4E 49 24 00 A5 13 34 03 8B C3 28 4E 49 | ";NI$...4...(NI| 00000B90: 24 29 B3 B1 34 A7 49 24 B2 C8 28 4E 49 24 AA 22 |$)..4.I$..(NI$."| 00000BA0: 20 22 2C 35 29 00 D4 13 3E 03 98 31 35 2C 22 42 | ",5)...>..15,"B| 00000BB0: 2D 50 3A 33 2C 31 36 32 22 3A 98 31 2C 4E 49 24 |-P:3,162":.1,NI$| 00000BC0: 3B 3A 98 31 35 2C 22 55 32 3A 33 22 44 56 22 2C |;:.15,"U2:3"DV",| 00000BD0: 31 38 2C 30 00 F1 13 48 03 49 24 B2 22 49 22 AA |18,0...H.I$."I".| 00000BE0: CA 28 C4 28 44 56 29 2C 32 29 3A 98 31 35 2C 49 |.(.(DV),2):.15,I| 00000BF0: 24 00 FA 13 52 03 89 39 33 30 00 31 14 5C 03 98 |$...R..930.1.\..| 00000C00: 31 35 2C 22 42 2D 50 3A 33 2C 31 34 34 22 3A 44 |15,"B-P:3,144":D| 00000C10: 4E 24 B2 22 22 3A 81 4C B2 31 A4 31 36 3A A1 23 |N$."":.L.1.16:.#| 00000C20: 31 2C 41 24 3A 44 4E 24 B2 44 4E 24 AA 41 24 3A |1,A$:DN$.DN$.A$:| 00000C30: 82 00 64 14 66 03 99 22 11 C4 45 52 5A 45 49 54 |..d.f.."..ERZEIT| 00000C40: 49 47 45 52 20 C4 C9 D3 CB 2D CE C1 CD C5 20 49 |IGER ....-.... I| 00000C50: 53 54 3A 22 3A 99 3A 99 22 12 20 22 AA 44 4E 24 |ST:":.:.". ".DN$| 00000C60: AA 22 20 22 00 9C 14 70 03 99 22 11 CE 45 55 45 |." "...p.."..EUE| 00000C70: 52 20 C4 C9 D3 CB 2D CE C1 CD C5 20 28 20 4D 41 |R ....-.... ( MA| 00000C80: 58 49 4D 41 4C 20 31 36 20 DA 45 49 43 48 45 4E |XIMAL 16 .EICHEN| 00000C90: 21 20 29 20 22 3A 85 4E 44 24 3A 99 00 BF 14 7A |! ) ":.ND$:....z| 00000CA0: 03 4E 44 24 B2 C8 28 4E 44 24 AA 22 20 20 20 20 |.ND$..(ND$." | 00000CB0: 20 20 20 20 20 20 20 20 20 20 22 2C 31 36 29 00 | ",16).| 00000CC0: F4 14 84 03 98 31 35 2C 22 42 2D 50 3A 33 2C 31 |.....15,"B-P:3,1| 00000CD0: 34 34 22 3A 98 31 2C 4E 44 24 3B 3A 98 31 35 2C |44":.1,ND$;:.15,| 00000CE0: 22 55 32 3A 33 22 44 56 22 2C 31 38 2C 30 22 3A |"U2:3"DV",18,0":| 00000CF0: 89 38 34 30 00 FE 14 8E 03 A1 58 24 3A 8E 00 09 |.840......X$:...| 00000D00: 15 98 03 8D 20 31 33 34 30 00 42 15 A2 03 9C 3A |.... 1340.B....:| 00000D10: 20 20 20 99 22 93 11 05 12 20 2D 2D 2D 2D 20 20 | .".... ---- | 00000D20: 20 C4 49 53 4B 45 54 54 45 4E 2D C8 49 4C 46 53 | .ISKETTEN-.ILFS| 00000D30: 50 52 4F 47 52 41 4D 4D 20 20 20 20 2D 2D 2D 2D |PROGRAMM ----| 00000D40: 20 22 00 73 15 AC 03 99 22 9B 11 20 28 43 29 20 | ".s....".. (C) | 00000D50: 42 59 20 CA 2E D7 49 4C 44 4E 45 52 20 52 45 56 |BY ...ILDNER REV| 00000D60: 2E 20 28 43 29 20 42 59 20 C5 4C 43 48 2D D3 4F |. (C) BY .LCH-.O| 00000D70: 46 54 05 00 89 15 B6 03 99 22 20 11 12 31 92 20 |FT......." ..1. | 00000D80: C4 49 52 45 43 54 4F 52 59 00 A1 15 C0 03 99 22 |.IRECTORY......"| 00000D90: 20 11 12 32 92 20 C4 49 53 4B 2D 46 45 48 4C 45 | ..2. .ISK-FEHLE| 00000DA0: 52 00 B4 15 CA 03 99 22 20 12 11 33 92 20 D2 45 |R......" ..3. .E| 00000DB0: 4E 41 4D 45 00 C8 15 D4 03 99 22 20 12 11 34 92 |NAME......" ..4.| 00000DC0: 20 D3 43 52 41 54 43 48 00 DF 15 DE 03 99 22 20 | .CRATCH......" | 00000DD0: 12 11 35 92 20 C9 4E 49 54 49 41 4C 49 5A 45 00 |..5. .NITIALIZE.| 00000DE0: F6 15 E8 03 99 22 20 12 11 36 92 20 CE 45 57 2F |....." ..6. .EW/| 00000DF0: C6 4F 52 4D 41 54 00 0D 16 F2 03 99 22 20 12 11 |.ORMAT......" ..| 00000E00: 37 92 20 C4 49 53 4B 52 45 54 54 45 52 00 2C 16 |7. .ISKRETTER.,.| 00000E10: FC 03 99 22 20 12 11 38 92 20 C3 48 41 4E 47 45 |..." ..8. .HANGE| 00000E20: 20 C4 49 53 4B 4E 41 4D 45 2F C9 C4 00 41 16 06 | .ISKNAME/...A..| 00000E30: 04 99 22 11 20 12 39 92 20 D6 41 4C 49 44 41 54 |..". .9. .ALIDAT| 00000E40: 45 00 71 16 10 04 99 22 11 20 12 3C D3 D0 C3 3E |E.q....". .<...>| 00000E50: 92 20 D2 45 54 55 52 4E 20 CD 45 4E 55 45 20 20 |. .ETURN .ENUE | 00000E60: 20 20 20 20 20 12 C6 38 92 20 C5 20 CE 20 C4 20 | ..8. . . . | 00000E70: C5 00 87 16 1A 04 8F 20 54 41 53 54 41 54 55 52 |....... TASTATUR| 00000E80: 41 42 46 52 41 47 45 00 9B 16 24 04 A1 54 24 3A |ABFRAGE...$..T$:| 00000E90: 8B 54 24 B2 22 22 A7 31 30 36 30 00 B2 16 2E 04 |.T$."".1060.....| 00000EA0: 8B 54 24 B2 22 31 22 A7 99 22 93 22 3A 8D 31 31 |.T$."1"..".":.11| 00000EB0: 38 30 00 CD 16 38 04 8B 54 24 B2 22 32 22 A7 99 |80...8..T$."2"..| 00000EC0: 22 93 11 11 11 22 3A 8D 20 31 31 39 30 00 E5 16 |"....":. 1190...| 00000ED0: 42 04 8B 54 24 B2 22 33 22 A7 99 22 11 22 3A 8D |B..T$."3"..".":.| 00000EE0: 20 31 32 30 30 00 00 17 4C 04 8B 54 24 B2 22 34 | 1200...L..T$."4| 00000EF0: 22 A7 99 22 93 11 11 11 22 3A 8D 20 31 32 33 30 |".."....":. 1230| 00000F00: 00 2B 17 56 04 8B 54 24 B2 22 35 22 A7 99 22 93 |.+.V..T$."5"..".| 00000F10: 11 11 11 22 3A 9F 31 2C 38 2C 31 35 3A 98 31 2C |...":.1,8,15:.1,| 00000F20: 22 49 22 3A A0 31 3A 89 39 33 30 00 45 17 60 04 |"I":.1:.930.E.`.| 00000F30: 8B 54 24 B2 22 36 22 A7 99 22 93 11 11 11 22 3A |.T$."6".."....":| 00000F40: 89 31 32 35 30 00 5D 17 6A 04 8B 54 24 B2 22 37 |.1250.].j..T$."7| 00000F50: 22 A7 99 22 93 11 11 11 22 3A 89 32 30 00 77 17 |".."....":.20.w.| 00000F60: 74 04 8B 54 24 B2 22 38 22 A7 99 22 93 11 11 11 |t..T$."8".."....| 00000F70: 22 3A 8D 20 37 30 30 00 B2 17 7E 04 8B 54 24 B2 |":. 700...~..T$.| 00000F80: 22 39 22 A7 99 22 93 11 11 1D 12 D6 41 4C 49 44 |"9".."......ALID| 00000F90: 41 54 45 92 20 11 11 2A 57 49 52 44 20 44 55 52 |ATE. ..*WIRD DUR| 00000FA0: 43 48 47 45 46 55 45 48 52 54 2A 22 3A 89 31 31 |CHGEFUEHRT*":.11| 00000FB0: 37 35 00 C3 17 88 04 8B 54 24 B2 22 20 22 A7 89 |75......T$." "..| 00000FC0: 39 33 30 00 D6 17 8D 04 8B 54 24 B2 22 8C 22 A7 |930......T$.".".| 00000FD0: 9E 36 34 37 33 38 00 E0 17 92 04 89 31 30 35 30 |.64738......1050| 00000FE0: 00 FB 17 97 04 9F 31 2C 38 2C 31 35 3A 98 31 2C |......1,8,15:.1,| 00000FF0: 22 56 22 3A A0 31 3A 89 39 33 30 00 26 18 9C 04 |"V":.1:.930.&...| 00001000: 9E 34 39 31 35 32 3A 99 22 1D 1D 1D 1D 11 11 12 |.49152:.".......| 00001010: 3C D3 D0 C3 3E 92 20 D2 45 54 55 52 4E 20 CD 45 |<...>. .ETURN .E| 00001020: 4E 55 45 22 3A 8E 00 63 18 A6 04 9F 31 35 2C 38 |NUE":..c....15,8| 00001030: 2C 31 35 3A 84 31 35 2C 41 24 2C 42 24 2C 43 24 |,15:.15,A$,B$,C$| 00001040: 2C 44 24 3A 99 41 24 3B 22 2C 22 3B 42 24 3B 22 |,D$:.A$;",";B$;"| 00001050: 2C 22 3B 43 24 3B 22 2C 22 3B 44 24 3A A0 20 31 |,";C$;",";D$:. 1| 00001060: 35 3A 8E 00 79 18 B0 04 85 22 41 4C 54 45 52 20 |5:..y...."ALTER | 00001070: 4E 41 4D 45 20 22 3B 41 24 00 92 18 BA 04 85 22 |NAME ";A$......"| 00001080: 11 11 11 4E 45 55 45 52 20 4E 41 4D 45 20 22 3B |...NEUER NAME ";| 00001090: 42 24 00 B6 18 C4 04 9F 31 2C 38 2C 31 35 3A 98 |B$......1,8,15:.| 000010A0: 31 2C 22 52 3A 22 3B 42 24 3B 22 3D 22 3B 41 24 |1,"R:";B$;"=";A$| 000010B0: 20 3A A0 31 3A 8E 00 E3 18 CE 04 85 22 57 45 4C | :.1:......."WEL| 000010C0: 43 48 45 53 20 50 52 47 2E 20 53 4F 4C 4C 20 47 |CHES PRG. SOLL G| 000010D0: 45 4C 4F 45 53 43 48 54 20 57 45 52 44 45 4E 22 |ELOESCHT WERDEN"| 000010E0: 3B 41 24 00 FF 18 D8 04 9F 31 2C 38 2C 31 35 3A |;A$......1,8,15:| 000010F0: 98 31 2C 22 53 3A 22 3B 41 24 3A A0 31 3A 8E 00 |.1,"S:";A$:.1:..| 00001100: 12 19 E2 04 85 22 44 49 53 4B 4E 41 4D 45 22 3B |....."DISKNAME";| 00001110: 41 24 00 25 19 EC 04 85 22 44 49 53 4B 20 49 44 |A$.%...."DISK ID| 00001120: 20 22 3B 42 24 00 55 19 F6 04 99 22 11 11 41 43 | ";B$.U...."..AC| 00001130: 48 54 55 4E 47 20 44 49 53 4B 45 54 54 45 20 57 |HTUNG DISKETTE W| 00001140: 49 52 44 20 4E 45 55 20 46 4F 52 4D 41 54 49 45 |IRD NEU FORMATIE| 00001150: 52 54 20 21 22 00 73 19 00 05 99 22 11 20 20 20 |RT !".s....". | 00001160: 20 20 20 12 4A 92 41 20 4F 44 45 52 20 12 4E 92 | .J.A ODER .N.| 00001170: 45 49 4E 00 8A 19 0A 05 A1 20 54 54 24 3A 8B 54 |EIN...... TT$:.T| 00001180: 54 24 B2 22 22 A7 31 32 39 30 00 9D 19 14 05 8B |T$."".1290......| 00001190: 54 54 24 B2 22 4A 22 A7 20 31 33 32 30 00 AF 19 |TT$."J". 1320...| 000011A0: 1E 05 8B 54 54 24 B2 22 4E 22 A7 20 39 33 30 00 |...TT$."N". 930.| 000011B0: D5 19 28 05 9F 31 2C 38 2C 31 35 3A 98 31 2C 22 |..(..1,8,15:.1,"| 000011C0: 4E 3A 22 41 24 22 2C 22 3B 42 24 3A A0 31 3A 9C |N:"A$",";B$:.1:.| 000011D0: 3A 89 39 33 30 00 E5 19 32 05 8F 20 44 49 52 45 |:.930...2.. DIRE| 000011E0: 43 54 4F 52 59 00 03 1A 3C 05 81 54 B2 30 A4 31 |CTORY...<..T.0.1| 000011F0: 31 35 3A 87 41 3A 97 34 39 31 35 32 AA 54 2C 41 |15:.A:.49152.T,A| 00001200: 3A 82 3A 00 1A 1A 46 05 81 49 B2 30 A4 34 3A 87 |:.:...F..I.0.4:.| 00001210: 4B 49 24 28 49 29 3A 82 3A 8E 00 64 1A 50 05 83 |KI$(I):.:..d.P..| 00001220: 31 36 39 2C 33 36 2C 31 33 33 2C 32 35 31 2C 31 |169,36,133,251,1| 00001230: 36 39 2C 32 35 31 2C 31 33 33 2C 31 38 37 2C 31 |69,251,133,187,1| 00001240: 36 39 2C 30 2C 31 33 33 2C 31 38 38 2C 31 36 39 |69,0,133,188,169| 00001250: 2C 31 2C 31 33 33 2C 31 38 33 2C 31 36 39 2C 38 |,1,133,183,169,8| 00001260: 2C 31 33 33 00 AD 1A 5A 05 83 31 38 36 2C 31 36 |,133...Z..186,16| 00001270: 39 2C 39 36 2C 31 33 33 2C 31 38 35 2C 33 32 2C |9,96,133,185,32,| 00001280: 32 31 33 2C 32 34 33 2C 31 36 35 2C 31 38 36 2C |213,243,165,186,| 00001290: 33 32 2C 31 38 30 2C 32 35 35 2C 31 36 35 2C 31 |32,180,255,165,1| 000012A0: 38 35 2C 33 32 2C 31 35 30 2C 32 35 35 00 F7 1A |85,32,150,255...| 000012B0: 64 05 83 31 36 39 2C 30 2C 31 33 33 2C 31 34 34 |d..169,0,133,144| 000012C0: 2C 31 36 30 2C 33 2C 31 33 32 2C 32 35 31 2C 33 |,160,3,132,251,3| 000012D0: 32 2C 31 36 35 2C 32 35 35 2C 31 33 33 2C 32 35 |2,165,255,133,25| 000012E0: 32 2C 31 36 34 2C 31 34 34 2C 32 30 38 2C 35 38 |2,164,144,208,58| 000012F0: 2C 33 32 2C 31 36 35 00 40 1B 6E 05 83 32 35 35 |,32,165.@.n..255| 00001300: 2C 31 36 34 2C 31 34 34 2C 32 30 38 2C 35 31 2C |,164,144,208,51,| 00001310: 31 36 34 2C 32 35 31 2C 31 33 36 2C 32 30 38 2C |164,251,136,208,| 00001320: 32 33 33 2C 31 36 36 2C 32 35 32 2C 33 32 2C 32 |233,166,252,32,2| 00001330: 30 35 2C 31 38 39 2C 31 36 39 2C 33 32 2C 33 32 |05,189,169,32,32| 00001340: 00 8B 1B 78 05 83 32 31 30 2C 32 35 35 2C 33 32 |...x..210,255,32| 00001350: 2C 31 36 35 2C 32 35 35 2C 31 36 36 2C 31 34 34 |,165,255,166,144| 00001360: 2C 32 30 38 2C 32 39 2C 31 37 30 2C 32 34 30 2C |,208,29,170,240,| 00001370: 31 37 2C 33 32 2C 32 31 30 2C 32 35 35 2C 31 37 |17,32,210,255,17| 00001380: 33 2C 31 39 37 2C 30 2C 32 30 31 00 D5 1B 82 05 |3,197,0,201.....| 00001390: 83 36 34 2C 32 34 30 2C 34 2C 32 30 31 2C 36 30 |.64,240,4,201,60| 000013A0: 2C 32 34 30 2C 32 34 35 2C 37 36 2C 37 36 2C 31 |,240,245,76,76,1| 000013B0: 39 32 2C 31 36 39 2C 31 33 2C 33 32 2C 32 31 30 |92,169,13,32,210| 000013C0: 2C 32 35 35 2C 31 36 30 2C 32 2C 32 30 38 2C 31 |,255,160,2,208,1| 000013D0: 38 37 2C 33 32 00 E8 1B 8C 05 83 36 36 2C 32 34 |87,32......66,24| 000013E0: 36 2C 39 36 2C 30 2C 30 00 0E 1C 96 05 83 20 22 |6,96,0,0...... "| 000013F0: 12 C4 C5 CC 92 22 2C 22 D3 C5 D1 22 2C 22 D0 D2 |.....","...","..| 00001400: C7 22 2C 22 D5 D3 D2 22 2C 22 D2 C5 CC 22 00 00 |.","...","..."..| 00001410: FD |. |
..R.... DISKHILFE REVISED BY (C) ELCH-SO
FT *************************************
*L.G....G(14):.".":.920.X....:.560:RE%.0
. ...."..BEGINN DER SUCHE SPUR "DI%",1."
...(.SP%.1:TR%.DI%:.15,8,15,"I0.U.2..8,8
,2,"#2":FI%.0...<..15,"U1:"2;0;TR%;SP%:.
500.!.F..I.0.1:.#8,A$:.470:P%(I).F(A$):.
:A.2:.490.;.P..#8,A$:.470:A.F(A$).7.F.Z.
H$."":.I.0.1:.#8,A$:.470:L%(I).F(A$):...
.D..I.3.18:.#8,A$:H$.H$.A$:.:...N..H$.""
.130.K.X.. KI$(A);" ";CO$;H$;.11)CO$;;L%
(0);L%(1):.A.0..300.....FI%.FI%.1:.FI%.8
.A.FI%.32.2:.490:.80......P%(0).0.160.I.
...".WECHSEL AUF SPUR";:TR%.P%(0):SP%.P%
(1):FI%.0:.TR%;SP%".":.60... . 8:."..DIR
ECTORY ENDE.",:.RE%.."COLLECT DRIVE 1":.
15,"V0......500: 15:.930......** RETRIE
VE A FILE **.S....15,"U1:"2;0;L%(0);L%(1
):....H.D%.2:.".SPUR, SEKTOR";...R..190:
.I.0.1:.#8,A$:.470:Z%(I).F(A$).<....Z%(I
)". ";:.:.:.".SPUR, SEKTOR";.M....Z%(0).
0..:.......15,"B-F"0;Z%(0);Z%(1):L%(0).Z
%(0):L%(1).Z%(1):Z%(D%).Z%(0).....Z%(D%.
1).Z%(1):D%.D%.2......DS.0.210......:.".
DAS FILE WURDE BEREITS UEBERSCHRIEBEN.!"
:X%..(X%):A.FI%.32.2.(....I.2.D%.4.2:.15
,"B-F:"0;Z%(I);Z%(I.1):..J.".L%(0).TR%:L
%(1).SP%:.190:.490.H.,.."ZURUECKHOLEN? (
J/N) ..6.. A$:. A$."" . 310...@.. A$
.."J".130.O.J.X%.0:.".BLOCKS WIEDERBELEG
EN...":Z%(0).L%(0):.200:.X%.130...T..".I
ST DIES EIN .P.ROGRAMM,.S.EQUENIELLES, .
U.SER,".%.^.."ODER .R.ELATIVES FILE";.X.
H.. JA$:.JA$.."P".JA$.."S".JA$.."U".JA$.
."R".360.`.R..:....|..:.JA$."P"..".PROGR
AMM.-":KI%.130:.420......JA$."U"..".USER
.-":KI%.131:.420.Z....JA$."R"..".RELATIV
ES.-":KI%.132:.420......".SEQUENTIELLES.
-":KI%.129......"FILE WIEDERHOLEN...".2.
..L%(0).TR%:L%(1).SP%:.190.Q...A.FI%.32.
2:.490:.8,G(KI%);.Y.B.BL%.((D%.2).2).1:.
"."BL%"BLOECKE ";...L..15,"U2:"2;0;TR%;S
P%:."WIEDERHERGESTELLT !.":RE%.1:.130.H.
V..A$."".A$.G(0).N..........15,"B-P:"2;A
......15,EN%,EM$,ET%,ES%:.EN%.0........"
...DISK FEHLER..F....".FEHLER MELDUNG.:
"EN%" "EM$","ET%","ES%.`...."BITTE 'CONT
' GEBEN..I....930.O.&.....0..P%(1),L%(1)
,Z%(300),KI$(4):CO$.G(34).P.:.PG$."...
DISK FILE RETTER VC1540/1541 ."
...D..PG$".":."DIESES PROGRAMM ERMOEGLIC
HT DAS WIEDER-"./.N.."HERSTELLEN VON GEL
OESCHTEN FILES..`.X.."ES WIRD VORAUSGESE
TZT,DASS DIE DISK NOCH";...B.."NICHT WIE
DER BESCHRIEBEN WURDE....L..".100% ERFOL
G IST NUR NACH 'SCRATCH' GE-".I.V.."WAEH
RLEISTET.......".BEIM SUCHEN WERDEN NUR
DIE GELOESCHTEN DATEIEN ABGEFRAGT".)...
."... TASTE DRUECKEN !".B.... TD$:. TD
$."" . 660.O...DI%.18:..`...."....":.650
.I....930.....PN$."DISK ID CHANGER":.A.F
.."... ".PN$." ":.".MIT DIESEM PROGRAMM
KOENNEN DISK-NAME...P..".UND/ODER DISK-I
D GEAENDERT WERDEN....Z..L.1.13:."...";:
.:.:.:X$."0".....DV.E(X$).;...DV$.X$:.DV
.254.."......":.730.C....DV......".AENDE
RUNG VON DISK-.N.AME":.:..9)"ODER DISK-
.I.D ?";......" (.N./.I.) ";:.910:.
X$.."N".X$.."I".."....":.770......X$:.15
,8,15:.15,"I".DV$:.1,8,3,"#":.15,"U1:3"D
V",18,0":.X$."N".860.M. ..15,"B-P:3,162"
:.#1,A$,B$,C$,D$,E$:.".DERZEITIGER DISK-
ID IST . "A$;...*..B$;C$;D$;E$:.".NEUER
DISK-ID (MAX. 5 ZEICHEN) ";NI$...4..C(NI
$)..4.I$.H(NI$." ",5).T.>..15,"B-P:3,162
":.1,NI$;:.15,"U2:3"DV",18,0...H.I$."I".
J(D(DV),2):.15,I$...R..930.1.\..15,"B-P:
3,144":DN$."":.L.1.16:.#1,A$:DN$.DN$.A$:
..D.F..".DERZEITIGER DISK-NAME IST:":.:.
". ".DN$." "...P..".NEUER DISK-NAME ( MA
XIMAL 16 ZEICHEN! ) ":.ND$:....Z.ND$.H(N
D$." ",16)......15,"B-P:3,1
44":.1,ND$;:.15,"U2:3"DV",18,0":.840....
..X$:....... 1340.B....: .".... ----
DISKETTEN-HILFSPROGRAMM ---- ".S....
".. (C) BY J.WILDNER REV. (C) BY ELCH-SO
FT......." ..1. DIRECTORY......" ..2. DI
SK-FEHLER...J.." ..3. RENAME.H.T.." ..4.
SCRATCH......" ..5. INITIALIZE......" .
.6. NEW/FORMAT......" ..7. DISKRETTER.,.
..." ..8. CHANGE DISKNAME/ID.A....". .9.
VALIDATE.Q....". .<SPC>. RETURN MENUE
.F8. E N D E...... TASTATURABFRAGE.
..$..T$:.T$."".1060......T$."1"..".":.11
80.M.8..T$."2".."....":. 1190...B..T$."3
"..".":. 1200...L..T$."4".."....":. 1230
.+.V..T$."5".."....":.1,8,15:.1,"I": 1:.
930.E.`..T$."6".."....":.1250.].J..T$."7
".."....":.20.W.T..T$."8".."....":. 700.
..~..T$."9"..".....VALIDATE. ..*WIRD DUR
CHGEFUEHRT*":.1175.C....T$." "..930.V...
.T$."."..64738......1050......1,8,15:.1,
"V": 1:.930.&....49152:.".......<SPC>. R
ETURN MENUE":..C....15,8,15:.15,A$,B$,C$
,D$:.A$;",";B$;",";C$;",";D$: 15:..Y...
."ALTER NAME ";A$......"...NEUER NAME ";
B$...D..1,8,15:.1,"R:";B$;"=";A$ : 1:...
.N.."WELCHES PRG. SOLL GELOESCHT WERDEN"
;A$...X..1,8,15:.1,"S:";A$: 1:......."DI
SKNAME";A$.%...."DISK ID ";B$.U...."..AC
HTUNG DISKETTE WIRD NEU FORMATIERT !".S.
...". .J.A ODER .N.EIN...... TT$:.T
T$."".1290......TT$."J". 1320......TT$."
N". 930.U.(..1,8,15:.1,"N:"A$",";B$: 1:.
:.930...2.. DIRECTORY...<..T.0.115:.A:.4
9152.T,A:.:...F..I.0.4:.KI$(I):.:..D.P..
169,36,133,251,169,251,133,187,169,0,133
,188,169,1,133,183,169,8,133...Z..186,16
9,96,133,185,32,213,243,165,186,32,180,2
55,165,185,32,150,255...D..169,0,133,144
,160,3,132,251,32,165,255,133,252,164,14
4,208,58,32,165.@.N..255,164,144,208,51,
164,251,136,208,233,166,252,32,205,189,1
69,32,32...X..210,255,32,165,255,166,144
,208,29,170,240,17,32,210,255,173,197,0,
201.U....64,240,4,201,60,240,245,76,76,1
92,169,13,32,210,255,160,2,208,187,32...
...66,246,96,0,0...... ".DEL.","SEQ","PR
G","USR","REL"...
> CLICK IMAGE PREVIEW FOR FULL MODAL