FLOPPY BEFEHLE
FILE INFORMATION
FILENAME(S): FLOPPY BEFEHLE
FILE TYPE(S): PRG
FILE SIZE: 5.1K
FIRST SEEN: 2025-11-02 16:39:06
APPEARS ON: 2 disk(s)
FILE HASH
204a87c04a13442c1612203b1fbec5e32e1e73ce12b30c869b6d7b5f7a1b4c45
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FLOPPY 2A | FLOPPY BEFEHLE | PRG | Treasure Chest - Plattfuss | 26 | 1 | DOWNLOAD FILE |
| FLOPPY 2A | FLOPPY BEFEHLE | PRG | Treasure Chest - Plattfuss | 26 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 32 00 97 35 33 32 38 30 2C 31 33 20 |....2..53280,13 |
00000010: 20 20 3A 8F 20 52 41 4E 44 46 41 52 42 45 00 42 | :. RANDFARBE.B|
00000020: 08 3C 00 97 35 33 32 38 31 2C 31 34 20 20 20 3A |.<..53281,14 :|
00000030: 8F 20 48 49 4E 54 45 52 47 52 55 4E 44 46 41 52 |. HINTERGRUNDFAR|
00000040: 42 45 00 62 08 46 00 97 36 34 36 2C 30 20 20 20 |BE.b.F..646,0 |
00000050: 20 20 20 3A 8F 20 43 55 52 53 4F 52 20 46 41 52 | :. CURSOR FAR|
00000060: 42 45 00 8A 08 50 00 8F 20 3D 3D 3D 3D 3D 3D 3D |BE...P.. =======|
00000070: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000080: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 A9 08 64 00 99 |==========...d..|
00000090: 22 93 22 3B A3 39 33 29 3B 22 46 4C 4F 50 50 59 |".";.93);"FLOPPY|
000000A0: 20 42 45 46 45 48 4C 45 22 00 C4 08 6E 00 99 A3 | BEFEHLE"...n...|
000000B0: 31 33 29 3B 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |13);"===========|
000000C0: 3D 3D 3D 22 00 D0 08 78 00 99 A3 31 32 30 29 3B |==="...x...120);|
000000D0: 00 00 09 82 00 99 22 20 46 4F 52 4D 41 54 49 45 |......" FORMATIE|
000000E0: 52 45 4E 20 28 4E 45 57 29 20 2E 2E 2E 2E 2E 2E |REN (NEW) ......|
000000F0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 20 31 20 22 |............ 1 "|
00000100: 00 30 09 8C 00 99 22 20 49 4E 49 54 49 41 4C 49 |.0...." INITIALI|
00000110: 5A 45 20 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |ZE .............|
00000120: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 20 32 20 22 |............ 2 "|
00000130: 00 60 09 96 00 99 22 20 44 49 52 45 43 54 4F 52 |.`...." DIRECTOR|
00000140: 59 20 4C 41 44 45 4E 20 2E 2E 2E 2E 2E 2E 2E 2E |Y LADEN ........|
00000150: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 20 33 20 22 |............ 3 "|
00000160: 00 90 09 A0 00 99 22 20 56 41 4C 49 44 41 54 41 |......" VALIDATA|
00000170: 20 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E | ...............|
00000180: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 20 34 20 22 |............ 4 "|
00000190: 00 C0 09 AA 00 99 22 20 43 4F 50 59 20 2E 2E 2E |......" COPY ...|
000001A0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |................|
000001B0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 20 35 20 22 |............ 5 "|
000001C0: 00 F0 09 B4 00 99 22 20 52 45 4E 41 4D 45 20 2E |......" RENAME .|
000001D0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |................|
000001E0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 20 36 20 22 |............ 6 "|
000001F0: 00 20 0A BE 00 99 22 20 53 43 52 41 54 43 48 20 |. ...." SCRATCH |
00000200: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |................|
00000210: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 20 37 20 22 |............ 7 "|
00000220: 00 50 0A C3 00 99 22 20 45 4E 44 45 20 50 52 4F |.P...." ENDE PRO|
00000230: 47 52 41 4D 4D 20 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |GRAMM ..........|
00000240: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 20 38 20 22 |............ 8 "|
00000250: 00 6D 0A C8 00 99 22 20 49 48 52 45 20 45 49 4E |.m...." IHRE EIN|
00000260: 47 41 42 45 20 2E 2E 2E 20 3F 9D 22 3B 00 78 0A |GABE ... ?.";.x.|
00000270: CD 00 A0 31 3A A0 31 35 00 83 0A D2 00 97 32 30 |...1:.15......20|
00000280: 34 2C 30 00 96 0A DC 00 A1 51 24 3A 8B 51 24 B2 |4,0......Q$:.Q$.|
00000290: 22 22 A7 32 32 30 00 A1 0A E6 00 97 32 30 34 2C |"".220......204,|
000002A0: 31 00 AB 0A F0 00 99 22 93 22 3B 00 DD 0A FA 00 |1......".";.....|
000002B0: 91 C5 28 51 24 29 89 31 30 30 30 2C 32 30 30 30 |..(Q$).1000,2000|
000002C0: 2C 33 30 30 30 2C 34 30 30 30 2C 35 30 30 30 2C |,3000,4000,5000,|
000002D0: 36 30 30 30 2C 37 30 30 30 2C 35 30 30 00 E6 0A |6000,7000,500...|
000002E0: 04 01 89 31 30 30 00 0D 0B 0E 01 8F 20 3D 3D 3D |...100...... ===|
000002F0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000300: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 13 0B |=============...|
00000310: F4 01 80 00 31 0B E8 03 99 22 11 1D 44 49 53 43 |....1...."..DISC|
00000320: 45 54 54 45 20 46 4F 52 4D 41 54 49 45 52 45 4E |ETTE FORMATIEREN|
00000330: 22 00 4E 0B F2 03 99 22 1D 2A 2A 2A 2A 2A 2A 2A |".N....".*******|
00000340: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 00 59 |*************".Y|
00000350: 0B FC 03 99 A3 34 30 29 3B 00 84 0B 06 04 99 22 |.....40);......"|
00000360: 11 1D 42 49 54 54 45 20 4E 41 4D 45 20 44 45 52 |..BITTE NAME DER|
00000370: 20 44 49 53 43 45 54 54 45 20 45 49 4E 47 45 42 | DISCETTE EINGEB|
00000380: 45 4E 3A 22 00 A1 0B 10 04 85 22 11 1D 22 3B 4E |EN:"......"..";N|
00000390: 24 3A 8B C3 28 4E 24 29 B3 B2 31 37 A7 31 30 39 |$:..(N$)..17.109|
000003A0: 30 00 BC 0B 1A 04 99 22 11 1D 4E 41 4D 45 20 49 |0......"..NAME I|
000003B0: 53 54 20 5A 55 20 4C 41 4E 47 2E 22 00 E3 0B 24 |ST ZU LANG."...$|
000003C0: 04 99 22 11 1D 4D 41 58 49 4D 41 4C 45 20 4C 41 |.."..MAXIMALE LA|
000003D0: 45 4E 47 45 20 3D 20 31 37 20 5A 45 49 43 48 45 |ENGE = 17 ZEICHE|
000003E0: 4E 2E 22 00 07 0C 2E 04 99 22 11 1D 42 49 54 54 |N."......"..BITT|
000003F0: 45 20 45 49 4E 47 41 42 45 20 57 49 45 44 45 52 |E EINGABE WIEDER|
00000400: 48 4F 4C 45 4E 2E 22 00 11 0C 38 04 89 31 30 33 |HOLEN."...8..103|
00000410: 30 00 32 0C 42 04 99 22 11 1D 42 49 54 54 45 20 |0.2.B.."..BITTE |
00000420: 55 53 45 52 20 49 44 20 45 49 4E 47 45 42 45 4E |USER ID EINGEBEN|
00000430: 3A 22 00 40 0C 4C 04 85 22 11 1D 22 3B 49 44 24 |:".@.L.."..";ID$|
00000440: 00 53 0C 56 04 8B C3 28 49 44 24 29 B2 32 A7 31 |.S.V...(ID$).2.1|
00000450: 31 36 30 00 70 0C 60 04 99 22 11 1D 45 49 4E 47 |160.p.`.."..EING|
00000460: 41 42 45 20 46 45 48 4C 45 52 48 41 46 54 2E 22 |ABE FEHLERHAFT."|
00000470: 00 93 0C 6A 04 99 22 11 1D 45 58 41 43 54 20 32 |...j.."..EXACT 2|
00000480: 20 5A 45 49 43 48 45 4E 20 45 49 4E 47 45 42 45 | ZEICHEN EINGEBE|
00000490: 4E 2E 22 00 B7 0C 74 04 99 22 11 1D 42 49 54 54 |N."...t.."..BITT|
000004A0: 45 20 45 49 4E 47 41 42 45 20 57 49 45 44 45 52 |E EINGABE WIEDER|
000004B0: 48 4F 4C 45 4E 2E 22 00 C2 0C 7E 04 89 20 31 30 |HOLEN."...~.. 10|
000004C0: 39 30 00 F2 0C 88 04 99 22 11 1D 42 49 54 54 45 |90......"..BITTE|
000004D0: 20 50 52 55 45 46 45 4E 20 53 49 45 20 44 45 4E | PRUEFEN SIE DEN|
000004E0: 20 45 49 4E 47 45 47 45 42 45 4E 45 4E 20 4E 41 | EINGEGEBENEN NA|
000004F0: 2D 22 00 22 0D 92 04 99 22 11 1D 4D 45 4E 20 55 |-"."...."..MEN U|
00000500: 4E 44 20 44 49 45 20 55 53 45 52 20 49 44 2E 20 |ND DIE USER ID. |
00000510: 20 20 57 45 4E 4E 20 42 45 49 44 45 20 45 49 4E | WENN BEIDE EIN|
00000520: 2D 22 00 52 0D 9C 04 99 22 11 1D 47 41 42 45 4E |-".R...."..GABEN|
00000530: 20 4F 4B 20 53 49 4E 44 2C 20 20 44 52 55 45 43 | OK SIND, DRUEC|
00000540: 4B 45 4E 20 53 49 45 20 42 49 54 54 45 20 44 49 |KEN SIE BITTE DI|
00000550: 45 22 00 70 0D A6 04 99 22 11 1D 27 52 20 45 20 |E".p...."..'R E |
00000560: 54 20 55 20 52 20 4E 27 20 54 41 53 54 45 2E 22 |T U R N' TASTE."|
00000570: 00 A0 0D B0 04 99 22 11 1D 42 45 49 20 46 45 48 |......"..BEI FEH|
00000580: 4C 45 52 48 41 46 54 45 52 20 20 45 49 4E 47 41 |LERHAFTER EINGA|
00000590: 42 45 20 44 52 55 45 43 4B 45 4E 20 53 49 45 22 |BE DRUECKEN SIE"|
000005A0: 00 BC 0D BA 04 99 22 11 1D 42 49 54 54 45 20 27 |......"..BITTE '|
000005B0: 4E 27 20 28 4E 45 55 29 2E 20 22 3B 00 C7 0D BF |N' (NEU). ";....|
000005C0: 04 97 32 30 34 2C 30 00 DB 0D C4 04 A1 51 24 3A |..204,0......Q$:|
000005D0: 8B 51 24 B2 22 22 A7 31 32 32 30 00 E6 0D C9 04 |.Q$."".1220.....|
000005E0: 97 32 30 34 2C 31 00 F9 0D CE 04 8B C6 28 51 24 |.204,1.......(Q$|
000005F0: 29 B2 31 33 A7 31 32 36 30 00 0A 0E D8 04 8B 51 |).13.1260......Q|
00000600: 24 B2 22 4E 22 A7 31 30 32 30 00 14 0E E2 04 89 |$."N".1020......|
00000610: 31 32 31 35 00 45 0E EC 04 99 22 93 11 1D 42 49 |1215.E...."...BI|
00000620: 54 54 45 20 20 4C 45 47 45 4E 20 20 53 49 45 20 |TTE LEGEN SIE |
00000630: 20 44 49 45 20 5A 55 20 46 4F 52 4D 41 54 49 45 | DIE ZU FORMATIE|
00000640: 52 4E 44 45 22 00 75 0E F6 04 99 22 11 1D 44 49 |RNDE".u...."..DI|
00000650: 53 43 45 54 54 45 20 49 4E 20 44 41 53 20 4C 41 |SCETTE IN DAS LA|
00000660: 55 46 57 45 52 4B 2E 20 44 52 55 45 43 4B 45 4E |UFWERK. DRUECKEN|
00000670: 20 53 49 45 22 00 A5 0E 00 05 99 22 11 1D 44 49 | SIE"......"..DI|
00000680: 45 20 27 52 20 45 20 54 20 55 20 52 20 4E 27 20 |E 'R E T U R N' |
00000690: 20 54 41 53 54 45 20 5A 55 52 20 42 45 53 54 41 | TASTE ZUR BESTA|
000006A0: 45 54 49 2D 22 00 B4 0E 0A 05 99 22 11 1D 47 55 |ETI-"......"..GU|
000006B0: 4E 47 2E 22 00 D0 0E 14 05 A1 51 24 3A 8B C6 28 |NG."......Q$:..(|
000006C0: 51 24 AA 22 20 22 29 B3 B1 31 33 A7 31 33 30 30 |Q$." ")..13.1300|
000006D0: 00 E3 0E 1E 05 99 22 11 11 1D 42 20 55 20 53 20 |......"...B U S |
000006E0: 59 2E 22 00 FB 0E 28 05 46 4F 24 B2 22 4E 3A 22 |Y."...(.FO$."N:"|
000006F0: AA 4E 24 AA 22 2C 22 AA 49 44 24 00 08 0F 32 05 |.N$.",".ID$...2.|
00000700: 9F 31 35 2C 38 2C 31 35 00 14 0F 3C 05 98 31 35 |.15,8,15...<..15|
00000710: 2C 46 4F 24 00 1C 0F 46 05 A0 31 35 00 27 0F 50 |,FO$...F..15.'.P|
00000720: 05 89 31 30 30 30 30 00 48 0F D0 07 99 22 11 1D |..10000.H...."..|
00000730: 44 49 53 43 45 54 54 45 20 49 4E 49 54 49 41 4C |DISCETTE INITIAL|
00000740: 49 53 49 45 52 45 4E 22 00 68 0F DA 07 99 22 1D |ISIEREN".h....".|
00000750: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000760: 2A 2A 2A 2A 2A 2A 2A 22 00 7B 0F E4 07 99 22 11 |*******".{....".|
00000770: 11 1D 42 20 55 20 53 20 59 2E 22 00 88 0F EE 07 |..B U S Y.".....|
00000780: 9F 31 35 2C 38 2C 31 35 00 94 0F F8 07 98 31 35 |.15,8,15......15|
00000790: 2C 22 49 22 00 9C 0F 02 08 A0 31 35 00 A7 0F 0C |,"I"......15....|
000007A0: 08 89 31 30 30 30 30 00 C0 0F B8 0B 99 22 11 1D |..10000......"..|
000007B0: 44 49 52 45 43 54 4F 52 59 20 4C 41 44 45 4E 22 |DIRECTORY LADEN"|
000007C0: 00 D8 0F C2 0B 99 22 1D 2A 2A 2A 2A 2A 2A 2A 2A |......".********|
000007D0: 2A 2A 2A 2A 2A 2A 2A 22 00 ED 0F CC 0B 99 22 11 |*******"......".|
000007E0: 11 1D 42 20 55 20 53 20 59 2E 11 11 22 00 FC 0F |..B U S Y..."...|
000007F0: 1C 0C 9F 31 2C 38 2C 30 2C 22 24 22 00 0A 10 26 |...1,8,0,"$"...&|
00000800: 0C A1 23 31 2C 41 24 2C 42 24 00 18 10 30 0C A1 |..#1,A$,B$...0..|
00000810: 23 31 2C 41 24 2C 42 24 00 26 10 3A 0C A1 23 31 |#1,A$,B$.&.:..#1|
00000820: 2C 41 24 2C 42 24 00 2E 10 44 0C 43 B2 30 00 42 |,A$,B$...D.C.0.B|
00000830: 10 4E 0C 8B 41 24 B3 B1 22 22 A7 43 B2 C6 28 41 |.N..A$.."".C..(A|
00000840: 24 29 00 5C 10 58 0C 8B 42 24 B3 B1 22 22 A7 43 |$).\.X..B$.."".C|
00000850: B2 43 AA C6 28 42 24 29 AC 32 35 36 00 6B 10 5D |.C..(B$).256.k.]|
00000860: 0C 8B 43 B2 30 A7 99 22 12 22 3B 00 89 10 62 0C |..C.0..".";...b.|
00000870: 99 22 1D 22 3B CA 28 C4 28 43 29 2C 32 29 3B A3 |.".";.(.(C),2);.|
00000880: 35 29 3B C7 28 33 34 29 3B 00 A0 10 6C 0C A1 23 |5);.(34);...l..#|
00000890: 31 2C 42 24 3A 8B 53 54 B3 B1 30 A7 33 32 37 30 |1,B$:.ST..0.3270|
000008A0: 00 B4 10 76 0C 8B 42 24 B3 B1 C7 28 33 34 29 A7 |...v..B$...(34).|
000008B0: 33 31 38 30 00 D5 10 80 0C A1 23 31 2C 42 24 3A |3180......#1,B$:|
000008C0: 8B 42 24 B3 B1 C7 28 33 34 29 A7 99 42 24 3B 3A |.B$...(34)..B$;:|
000008D0: 89 33 32 30 30 00 E1 10 85 0C 99 C7 28 33 34 29 |.3200.......(34)|
000008E0: 3B 00 FB 10 8A 0C A1 23 31 2C 42 24 3A 8B 42 24 |;......#1,B$:.B$|
000008F0: B2 C7 28 33 32 29 A7 33 32 31 30 00 0C 11 94 0C |..(32).3210.....|
00000900: 99 A3 32 35 29 3B 3A 43 24 B2 22 22 00 2D 11 9E |..25);:C$."".-..|
00000910: 0C 43 24 B2 43 24 AA 42 24 3A A1 23 31 2C 42 24 |.C$.C$.B$:.#1,B$|
00000920: 3A 8B 42 24 B3 B1 22 22 A7 33 32 33 30 00 3A 11 |:.B$.."".3230.:.|
00000930: A8 0C 99 C8 28 43 24 2C 33 29 00 49 11 BC 0C 8B |....(C$,3).I....|
00000940: 53 54 B2 30 A7 33 31 32 30 00 68 11 C6 0C 99 C7 |ST.0.3120.h.....|
00000950: 28 33 34 29 3B 22 9D 9D 20 20 9D 9D 42 4C 4F 43 |(34);".. ..BLOC|
00000960: 4B 53 20 46 52 45 45 22 00 76 11 D0 0C A0 31 3A |KS FREE".v....1:|
00000970: 89 31 30 30 30 30 00 88 11 A0 0F 99 22 11 1D 56 |.10000......"..V|
00000980: 41 4C 49 44 41 54 41 22 00 99 11 AA 0F 99 22 1D |ALIDATA"......".|
00000990: 2A 2A 2A 2A 2A 2A 2A 2A 22 00 AC 11 B4 0F 99 22 |********"......"|
000009A0: 11 11 1D 42 20 55 20 53 20 59 2E 22 00 B9 11 BE |...B U S Y."....|
000009B0: 0F 9F 31 35 2C 38 2C 31 35 00 C5 11 C8 0F 98 31 |..15,8,15......1|
000009C0: 35 2C 22 56 22 00 CD 11 D2 0F A0 31 35 00 D8 11 |5,"V"......15...|
000009D0: DC 0F 89 31 30 30 30 30 00 E6 11 88 13 99 22 11 |...10000......".|
000009E0: 1D 43 4F 50 59 22 00 F3 11 92 13 99 22 1D 2A 2A |.COPY"......".**|
000009F0: 2A 2A 22 00 23 12 9C 13 99 22 11 1D 4D 49 54 20 |**".#...."..MIT |
00000A00: 44 45 4D 20 42 45 46 45 48 4C 20 43 4F 50 59 2C |DEM BEFEHL COPY,|
00000A10: 20 4B 4F 45 4E 4E 45 4E 20 53 49 45 20 5A 57 45 | KOENNEN SIE ZWE|
00000A20: 49 2D 22 00 3D 12 A6 13 99 22 11 1D 45 52 4C 45 |I-".=...."..ERLE|
00000A30: 49 20 45 52 52 45 49 43 48 45 4E 3A 22 00 6D 12 |I ERREICHEN:".m.|
00000A40: B0 13 99 22 11 1D 31 2E 29 20 20 45 49 4E 20 20 |..."..1.) EIN |
00000A50: 41 55 46 20 20 44 45 52 20 44 49 53 43 45 54 45 |AUF DER DISCETE|
00000A60: 20 42 45 53 54 45 48 45 4E 44 45 53 22 00 9D 12 | BESTEHENDES"...|
00000A70: BA 13 99 22 11 1D 20 20 20 20 20 46 49 4C 45 20 |...".. FILE |
00000A80: 20 55 4E 54 45 52 20 20 45 49 4E 45 4D 20 20 41 | UNTER EINEM A|
00000A90: 4E 44 45 52 45 4E 20 4E 41 4D 45 4E 22 00 CD 12 |NDEREN NAMEN"...|
00000AA0: C4 13 99 22 11 1D 20 20 20 20 20 45 52 4E 45 55 |...".. ERNEU|
00000AB0: 54 20 41 42 53 50 45 49 43 48 45 52 4E 2E 20 20 |T ABSPEICHERN. |
00000AC0: 44 41 53 20 46 49 4C 45 20 49 53 54 22 00 F3 12 |DAS FILE IST"...|
00000AD0: CE 13 99 22 11 1D 20 20 20 20 20 44 41 4E 4E 20 |...".. DANN |
00000AE0: 44 4F 50 50 45 4C 54 20 56 4F 52 48 41 4E 44 45 |DOPPELT VORHANDE|
00000AF0: 4E 2E 22 00 23 13 D8 13 99 22 11 1D 32 2E 29 20 |N.".#...."..2.) |
00000B00: 20 4D 45 48 52 45 52 45 20 20 46 49 4C 45 53 20 | MEHRERE FILES |
00000B10: 5A 55 53 41 4D 4D 45 4E 46 41 53 53 45 4E 20 55 |ZUSAMMENFASSEN U|
00000B20: 4E 44 22 00 4C 13 E2 13 99 22 11 1D 20 20 20 20 |ND".L....".. |
00000B30: 20 55 4E 54 45 52 20 45 49 4E 45 4D 20 4E 41 4D | UNTER EINEM NAM|
00000B40: 45 4E 20 41 42 4C 45 47 45 4E 2E 22 00 7D 13 EC |EN ABLEGEN.".}..|
00000B50: 13 99 22 11 11 1D 5A 55 4D 20 57 45 49 54 45 52 |.."...ZUM WEITER|
00000B60: 4C 45 53 45 4E 20 42 49 54 54 45 20 44 49 45 20 |LESEN BITTE DIE |
00000B70: 20 52 20 45 20 54 20 55 20 52 20 4E 22 00 98 13 | R E T U R N"...|
00000B80: F6 13 99 22 11 1D 54 41 53 54 45 20 44 52 55 45 |..."..TASTE DRUE|
00000B90: 43 4B 45 4E 2E 20 22 3B 00 A3 13 00 14 97 32 30 |CKEN. ";......20|
00000BA0: 34 2C 30 00 BF 13 0A 14 A1 51 24 3A 8B C6 28 51 |4,0......Q$:..(Q|
00000BB0: 24 AA 22 20 22 29 B3 B1 31 33 A7 35 31 33 30 00 |$." ")..13.5130.|
00000BC0: CA 13 14 14 97 32 30 34 2C 31 00 D4 13 1E 14 99 |.....204,1......|
00000BD0: 22 93 22 3B 00 04 14 28 14 99 22 11 1D 20 20 20 |".";...(..".. |
00000BE0: 20 20 57 45 4E 4E 20 53 49 45 20 44 49 45 53 45 | WENN SIE DIESE|
00000BF0: 20 4D 4F 45 47 4C 49 43 48 4B 45 49 54 20 57 41 | MOEGLICHKEIT WA|
00000C00: 45 48 2D 22 00 34 14 32 14 99 22 11 1D 20 20 20 |EH-".4.2..".. |
00000C10: 20 20 4C 45 4E 2C 20 20 53 4F 20 42 45 41 43 48 | LEN, SO BEACH|
00000C20: 54 45 4E 20 53 49 45 20 42 49 49 54 45 2C 20 44 |TEN SIE BIITE, D|
00000C30: 41 53 53 22 00 64 14 3C 14 99 22 11 1D 20 20 20 |ASS".d.<..".. |
00000C40: 20 20 44 49 45 20 20 41 4E 5A 41 48 4C 20 20 56 | DIE ANZAHL V|
00000C50: 4F 4E 20 5A 45 49 43 48 45 4E 20 46 55 45 52 20 |ON ZEICHEN FUER |
00000C60: 44 41 53 22 00 94 14 46 14 99 22 11 1D 20 20 20 |DAS"...F..".. |
00000C70: 20 20 4E 45 55 45 20 55 4E 44 20 44 49 45 20 41 | NEUE UND DIE A|
00000C80: 4C 54 45 4E 20 46 49 4C 45 53 20 34 30 20 4E 49 |LTEN FILES 40 NI|
00000C90: 43 48 54 22 00 B7 14 50 14 99 22 11 1D 20 20 20 |CHT"...P..".. |
00000CA0: 20 20 55 45 42 45 52 53 43 48 52 45 49 54 45 4E | UEBERSCHREITEN|
00000CB0: 20 44 41 52 46 2E 22 00 E0 14 5A 14 99 22 11 11 | DARF."...Z.."..|
00000CC0: 1D 42 49 54 54 45 20 27 31 27 20 4F 44 45 52 20 |.BITTE '1' ODER |
00000CD0: 27 32 27 20 44 52 55 45 43 4B 45 4E 2E 20 22 3B |'2' DRUECKEN. ";|
00000CE0: 00 EB 14 64 14 97 32 30 34 2C 30 00 07 15 6E 14 |...d..204,0...n.|
00000CF0: A1 51 24 3A 8B 51 24 B3 22 31 22 B0 51 24 B1 22 |.Q$:.Q$."1".Q$."|
00000D00: 32 22 A7 35 32 33 30 00 12 15 78 14 97 32 30 34 |2".5230...x..204|
00000D10: 2C 31 00 1E 15 82 14 99 22 92 22 3B 51 24 00 33 |,1......".";Q$.3|
00000D20: 15 8C 14 91 C5 28 51 24 29 89 35 33 30 30 2C 35 |.....(Q$).5300,5|
00000D30: 34 30 30 00 59 15 96 14 8F 20 3D 3D 3D 3D 3D 3D |400.Y.... ======|
00000D40: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000D50: 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 76 15 B4 14 85 22 |=========.v...."|
00000D60: 11 1D 41 4C 54 45 52 20 46 49 4C 45 4E 41 4D 45 |..ALTER FILENAME|
00000D70: 20 22 3B 41 46 24 00 93 15 BE 14 85 22 11 1D 4E | ";AF$......"..N|
00000D80: 45 55 45 52 20 46 49 4C 45 4E 41 4D 45 20 22 3B |EUER FILENAME ";|
00000D90: 4E 46 24 00 AC 15 C8 14 42 46 24 B2 22 43 3A 22 |NF$.....BF$."C:"|
00000DA0: AA 4E 46 24 AA 22 3D 22 AA 41 46 24 00 B6 15 D2 |.NF$."=".AF$....|
00000DB0: 14 89 35 36 30 30 00 D4 15 18 15 85 22 11 1D 53 |..5600......"..S|
00000DC0: 55 4D 4D 45 4E 20 46 49 4C 45 4E 41 4D 45 20 22 |UMMEN FILENAME "|
00000DD0: 3B 53 46 24 00 DF 15 22 15 81 49 B2 30 A4 39 00 |;SF$..."..I.0.9.|
00000DE0: FF 15 2C 15 99 22 11 1D 46 49 4C 45 4E 41 4D 45 |..,.."..FILENAME|
00000DF0: 22 3B 49 3B 22 28 40 3D 45 4E 44 29 20 22 3B 00 |";I;"(@=END) ";.|
00000E00: 21 16 36 15 85 46 24 28 49 29 3A 8B 46 24 28 49 |!.6..F$(I):.F$(I|
00000E10: 29 B2 22 40 22 A7 4A B2 49 AB 31 3A 89 35 34 36 |)."@".J.I.1:.546|
00000E20: 30 00 28 16 40 15 82 49 00 30 16 4A 15 4A B2 39 |0.(.@..I.0.J.J.9|
00000E30: 00 45 16 54 15 42 46 24 B2 22 43 3A 22 AA 53 46 |.E.T.BF$."C:".SF|
00000E40: 24 AA 22 3D 22 00 50 16 5E 15 81 49 B2 30 A4 4A |$."=".P.^..I.0.J|
00000E50: 00 66 16 68 15 42 46 24 B2 42 46 24 AA 46 24 28 |.f.h.BF$.BF$.F$(|
00000E60: 49 29 AA 22 2C 22 00 6D 16 72 15 82 49 00 85 16 |I).",".m.r..I...|
00000E70: 7C 15 42 46 24 B2 C8 28 42 46 24 2C C3 28 42 46 ||.BF$..(BF$,.(BF|
00000E80: 24 29 AB 31 29 00 9A 16 86 15 8B C3 28 42 46 24 |$).1).......(BF$|
00000E90: 29 B3 B2 34 30 A7 35 36 30 30 00 BC 16 90 15 99 |)..40.5600......|
00000EA0: 22 11 1D 44 49 45 20 45 49 4E 47 41 42 45 20 49 |"..DIE EINGABE I|
00000EB0: 53 54 20 5A 55 20 4C 41 4E 47 2E 22 00 D8 16 9A |ST ZU LANG."....|
00000EC0: 15 99 22 11 1D 42 49 54 54 45 20 57 49 45 44 45 |.."..BITTE WIEDE|
00000ED0: 52 48 4F 4C 45 4E 2E 22 00 E2 16 A4 15 89 35 34 |RHOLEN."......54|
00000EE0: 30 30 00 F5 16 E0 15 99 22 11 11 1D 42 20 55 20 |00......"...B U |
00000EF0: 53 20 59 2E 22 00 02 17 EA 15 9F 31 35 2C 38 2C |S Y."......15,8,|
00000F00: 31 35 00 0E 17 F4 15 98 31 35 2C 42 46 24 00 16 |15......15,BF$..|
00000F10: 17 FE 15 A0 31 35 00 21 17 08 16 89 31 30 30 30 |....15.!....1000|
00000F20: 30 00 31 17 70 17 99 22 11 1D 52 45 4E 41 4D 45 |0.1.p.."..RENAME|
00000F30: 22 00 40 17 7A 17 99 22 1D 2A 2A 2A 2A 2A 2A 22 |".@.z..".******"|
00000F40: 00 5D 17 84 17 85 22 11 1D 41 4C 54 45 52 20 46 |.]...."..ALTER F|
00000F50: 49 4C 45 4E 41 4D 45 20 22 3B 41 46 24 00 7A 17 |ILENAME ";AF$.z.|
00000F60: 8E 17 85 22 11 1D 4E 45 55 45 52 20 46 49 4C 45 |..."..NEUER FILE|
00000F70: 4E 41 4D 45 20 22 3B 4E 46 24 00 93 17 98 17 42 |NAME ";NF$.....B|
00000F80: 46 24 B2 22 52 3A 22 AA 4E 46 24 AA 22 3D 22 AA |F$."R:".NF$."=".|
00000F90: 41 46 24 00 A6 17 A2 17 99 22 11 11 1D 42 20 55 |AF$......"...B U|
00000FA0: 20 53 20 59 2E 22 00 B3 17 AC 17 9F 31 35 2C 38 | S Y."......15,8|
00000FB0: 2C 31 35 00 BF 17 B6 17 98 31 35 2C 42 46 24 00 |,15......15,BF$.|
00000FC0: C7 17 C0 17 A0 31 35 00 D2 17 CA 17 89 31 30 30 |.....15......100|
00000FD0: 30 30 00 E3 17 58 1B 99 22 11 1D 53 43 52 41 54 |00...X.."..SCRAT|
00000FE0: 43 48 22 00 F3 17 62 1B 99 22 1D 2A 2A 2A 2A 2A |CH"...b..".*****|
00000FF0: 2A 2A 22 00 23 18 6C 1B 99 22 11 1D 44 45 52 20 |**".#.l.."..DER |
00001000: 20 53 43 52 41 54 43 48 20 42 45 46 45 48 4C 20 | SCRATCH BEFEHL |
00001010: 45 52 4C 41 55 42 54 20 5A 57 45 49 20 41 52 54 |ERLAUBT ZWEI ART|
00001020: 45 4E 22 00 45 18 76 1B 99 22 11 1D 44 45 53 20 |EN".E.v.."..DES |
00001030: 4C 4F 45 53 43 48 45 4E 53 20 56 4F 4E 20 46 49 |LOESCHENS VON FI|
00001040: 4C 45 53 3A 22 00 75 18 80 1B 99 22 11 1D 31 2E |LES:".u...."..1.|
00001050: 29 20 44 41 53 20 4C 4F 45 53 43 48 45 4E 20 45 |) DAS LOESCHEN E|
00001060: 49 4E 5A 45 4C 4E 45 52 20 46 49 4C 45 53 2E 20 |INZELNER FILES. |
00001070: 44 41 5A 55 22 00 A5 18 8A 1B 99 22 11 1D 20 20 |DAZU"......".. |
00001080: 20 20 4D 55 53 53 20 20 44 45 52 20 20 46 49 4C | MUSS DER FIL|
00001090: 45 4E 41 4D 45 20 41 4E 47 45 47 45 42 45 4E 20 |ENAME ANGEGEBEN |
000010A0: 57 45 52 2D 22 00 B7 18 94 1B 99 22 11 1D 20 20 |WER-"......".. |
000010B0: 20 20 44 45 4E 2E 22 00 E7 18 9E 1B 99 22 11 1D | DEN."......"..|
000010C0: 32 2E 29 20 44 41 53 20 4C 4F 45 53 43 48 45 4E |2.) DAS LOESCHEN|
000010D0: 20 44 45 52 20 47 45 53 41 4D 54 45 4E 20 44 49 | DER GESAMTEN DI|
000010E0: 53 43 45 54 54 45 22 00 17 19 A8 1B 99 22 11 1D |SCETTE"......"..|
000010F0: 20 20 20 20 4F 48 4E 45 20 44 49 45 20 46 4F 52 | OHNE DIE FOR|
00001100: 4D 41 54 49 45 52 55 4E 47 20 4E 45 55 20 41 55 |MATIERUNG NEU AU|
00001110: 53 46 55 45 48 2D 22 00 34 19 B2 1B 99 22 11 1D |SFUEH-".4...."..|
00001120: 20 20 20 20 52 45 4E 20 5A 55 20 4D 55 45 53 53 | REN ZU MUESS|
00001130: 45 4E 2E 22 00 5C 19 BC 1B 99 22 11 11 1D 42 49 |EN.".\...."...BI|
00001140: 54 54 45 20 27 31 27 20 4F 44 45 52 20 27 32 27 |TTE '1' ODER '2'|
00001150: 20 45 49 4E 47 45 42 45 4E 20 22 3B 00 67 19 C6 | EINGEBEN ";.g..|
00001160: 1B 97 32 30 34 2C 30 00 83 19 D0 1B A1 51 24 3A |..204,0......Q$:|
00001170: 8B 51 24 B3 22 31 22 B0 51 24 B1 22 32 22 A7 37 |.Q$."1".Q$."2".7|
00001180: 31 32 30 00 96 19 DA 1B 97 32 30 34 2C 31 3A 99 |120......204,1:.|
00001190: 22 92 22 3B 51 24 00 AB 19 E4 1B 91 C5 28 51 24 |".";Q$.......(Q$|
000011A0: 29 89 37 32 30 30 2C 37 33 30 30 00 D1 19 EE 1B |).7200,7300.....|
000011B0: 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |. ==============|
000011C0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000011D0: 3D 00 E7 19 20 1C 85 22 11 1D 46 49 4C 45 4E 41 |=... .."..FILENA|
000011E0: 4D 45 20 22 3B 46 24 00 F7 19 2A 1C 42 46 24 B2 |ME ";F$...*.BF$.|
000011F0: 22 53 3A 22 AA 46 24 00 23 1A 34 1C 99 22 11 1D |"S:".F$.#.4.."..|
00001200: 53 49 4E 44 20 53 49 45 20 53 49 43 48 45 52 2C |SIND SIE SICHER,|
00001210: 20 44 41 53 53 20 53 49 45 20 44 41 53 20 46 49 | DASS SIE DAS FI|
00001220: 4C 45 22 00 34 1A 3E 1C 99 22 11 1D 1D 1D 1D 1D |LE".4.>.."......|
00001230: 22 3B 46 24 00 57 1A 48 1C 99 22 11 1D 4C 4F 45 |";F$.W.H.."..LOE|
00001240: 53 43 48 45 4E 20 57 4F 4C 4C 45 4E 20 28 4A 2F |SCHEN WOLLEN (J/|
00001250: 4E 29 20 3F 20 22 3B 00 62 1A 52 1C 97 32 30 34 |N) ? ";.b.R..204|
00001260: 2C 30 00 76 1A 5C 1C A1 51 24 3A 8B 51 24 B2 22 |,0.v.\..Q$:.Q$."|
00001270: 22 A7 37 32 36 30 00 89 1A 61 1C 97 32 30 34 2C |".7260...a..204,|
00001280: 31 3A 99 22 92 22 3B 51 24 00 9A 1A 66 1C 8B 51 |1:.".";Q$...f..Q|
00001290: 24 B2 22 4A 22 A7 37 34 30 30 00 A3 1A 70 1C 89 |$."J".7400...p..|
000012A0: 31 30 30 00 B1 1A 84 1C 42 46 24 B2 22 53 3A 2A |100.....BF$."S:*|
000012B0: 22 00 E1 1A 8E 1C 99 22 11 1D 53 49 4E 44 20 53 |"......"..SIND S|
000012C0: 49 45 20 53 49 43 48 45 52 2C 20 20 44 41 53 53 |IE SICHER, DASS|
000012D0: 20 53 49 45 20 44 49 45 20 47 45 53 41 4D 54 45 | SIE DIE GESAMTE|
000012E0: 22 00 0D 1B 98 1C 99 22 11 1D 44 49 53 43 45 54 |"......"..DISCET|
000012F0: 54 45 20 4C 4F 45 53 43 48 45 4E 20 57 4F 4C 4C |TE LOESCHEN WOLL|
00001300: 45 4E 20 28 4A 2F 4E 29 20 3F 20 22 3B 00 17 1B |EN (J/N) ? ";...|
00001310: A2 1C 89 37 32 35 30 00 29 1B E8 1C 99 22 11 1D |...7250.)...."..|
00001320: 42 20 55 20 53 20 59 2E 22 00 36 1B F2 1C 9F 31 |B U S Y.".6....1|
00001330: 35 2C 38 2C 31 35 00 42 1B FC 1C 98 31 35 2C 42 |5,8,15.B....15,B|
00001340: 46 24 00 4A 1B 06 1D A0 31 35 00 55 1B 10 1D 89 |F$.J....15.U....|
00001350: 31 30 30 30 30 00 62 1B 10 27 9F 31 35 2C 38 2C |10000.b..'.15,8,|
00001360: 31 35 00 76 1B 1A 27 84 31 35 2C 41 24 2C 42 24 |15.v..'.15,A$,B$|
00001370: 2C 43 24 2C 44 24 00 89 1B 24 27 8B C5 28 41 24 |,C$,D$...$'..(A$|
00001380: 29 B2 30 A7 31 30 30 37 30 00 B8 1B 2E 27 99 22 |).0.10070....'."|
00001390: 11 11 1D 45 53 20 49 53 54 20 46 4F 4C 47 45 4E |...ES IST FOLGEN|
000013A0: 44 45 52 20 46 45 48 4C 45 52 20 41 55 46 47 45 |DER FEHLER AUFGE|
000013B0: 54 52 45 54 45 4E 3A 22 00 CA 1B 38 27 99 22 11 |TRETEN:"...8'.".|
000013C0: 1D 12 22 3B 42 24 3B 22 12 22 00 E0 1B 42 27 99 |..";B$;"."...B'.|
000013D0: 22 11 1D 54 52 41 43 4B 3A 22 3B C5 28 43 24 29 |"..TRACK:";.(C$)|
000013E0: 00 F7 1B 4C 27 99 22 11 1D 53 45 43 54 4F 52 3A |...L'."..SECTOR:|
000013F0: 22 3B C5 28 44 24 29 00 20 1C 56 27 99 22 11 11 |";.(D$). .V'."..|
00001400: 1D 27 52 20 45 20 54 20 55 20 52 20 4E 27 20 20 |.'R E T U R N' |
00001410: 54 41 53 54 45 20 44 52 55 45 43 4B 45 4E 2E 22 |TASTE DRUECKEN."|
00001420: 00 39 1C 60 27 A1 51 24 3A 8B 51 24 B3 B1 C7 28 |.9.`'.Q$:.Q$...(|
00001430: 31 33 29 A7 31 30 30 38 30 00 42 1C 6A 27 89 31 |13).10080.B.j'.1|
00001440: 30 30 00 00 00 83 |00.... |
....2..53280,13 :. RANDFARBE.B.<..5328
1,14 :. HINTERGRUNDFARBE.B.F..646,0
:. CURSOR FARBE...P.. ===============
==================...D..".";.93);"FLOPPY
BEFEHLE".D.N...13);"==============".P.X
...120);......" FORMATIEREN (NEW) ......
............ 1 ".0...." INITIALIZE .....
.................... 2 ".`...." DIRECTOR
Y LADEN .................... 3 "... .."
VALIDATA ........................... 4 "
......" COPY ...........................
.... 5 "......" RENAME .................
............ 6 ". ...." SCRATCH ........
.................... 7 ".P.C.." ENDE PRO
GRAMM ...................... 8 ".M.H.."
IHRE EINGABE ... ?.";.X.M. 1: 15...R..20
4,0......Q$:.Q$."".220......204,1......"
.";......E(Q$).1000,2000,3000,4000,5000,
6000,7000,500......100...... ===========
=====================.......1...."..DISC
ETTE FORMATIEREN".N....".***************
*****".Y.....40);......"..BITTE NAME DER
DISCETTE EINGEBEN:"......"..";N$:.C(N$)
..17.1090......"..NAME IST ZU LANG."...$
.."..MAXIMALE LAENGE = 17 ZEICHEN.".....
."..BITTE EINGABE WIEDERHOLEN."...8..103
0.2.B.."..BITTE USER ID EINGEBEN:".@.L..
"..";ID$.S.V..C(ID$).2.1160.P.`.."..EING
ABE FEHLERHAFT."...J.."..EXACT 2 ZEICHEN
EINGEBEN."...T.."..BITTE EINGABE WIEDER
HOLEN.".B.~.. 1090......"..BITTE PRUEFEN
SIE DEN EINGEGEBENEN NA-"."...."..MEN U
ND DIE USER ID. WENN BEIDE EIN-".R....
"..GABEN OK SIND, DRUECKEN SIE BITTE DI
E".P...."..'R E T U R N' TASTE.". ....".
.BEI FEHLERHAFTER EINGABE DRUECKEN SIE"
......"..BITTE 'N' (NEU). ";.G....204,0.
..D..Q$:.Q$."".1220...I..204,1...N..F(Q$
).13.1260...X..Q$."N".1020......1215.E..
.."...BITTE LEGEN SIE DIE ZU FORMATIE
RNDE".U...."..DISCETTE IN DAS LAUFWERK.
DRUECKEN SIE"......"..DIE 'R E T U R N'
TASTE ZUR BESTAETI-"......"..GUNG.".P..
..Q$:.F(Q$." ")..13.1300......"...B U S
Y."...(.FO$."N:".N$.",".ID$...2..15,8,15
...<..15,FO$...F. 15.'.P..10000.H.P.."..
DISCETTE INITIALISIEREN".H.Z..".********
***************".{...."...B U S Y.".....
.15,8,15......15,"I"..... 15......10000.
....."..DIRECTORY LADEN".X.B..".********
*******"...L.."...B U S Y..."......1,8,0
,"$"...&..#1,A$,B$...0..#1,A$,B$.&.:..#1
,A$,B$...D.C.0.B.N..A$.."".C.F(A$).\.X..
B$.."".C.C.F(B$).256.K.]..C.0..".";...B.
.".";J(D(C),2);.5);G(34);. .L..#1,B$:.ST
..0.3270...V..B$..G(34).3180.U....#1,B$:
.B$..G(34)..B$;:.3200......G(34);......#
1,B$:.B$.G(32).3210.......25);:C$."".-..
.C$.C$.B$:.#1,B$:.B$.."".3230.:....H(C$,
3).I....ST.0.3120.H.F..G(34);".. ..BLOC
KS FREE".V.P. 1:.10000... .."..VALIDATA"
......".********"......"...B U S Y."....
..15,8,15.E.H..15,"V".M.R. 15.X....10000
......"..COPY"......".****".#...."..MIT
DEM BEFEHL COPY, KOENNEN SIE ZWEI-".=...
."..ERLEI ERREICHEN:".M...."..1.) EIN
AUF DER DISCETE BESTEHENDES"......"..
FILE UNTER EINEM ANDEREN NAMEN".M.
D..".. ERNEUT ABSPEICHERN. DAS FILE
IST"...N..".. DANN DOPPELT VORHANDE
N.".#.X.."..2.) MEHRERE FILES ZUSAMMEN
FASSEN UND".L....".. UNTER EINEM NAM
EN ABLEGEN.".}...."...ZUM WEITERLESEN BI
TTE DIE R E T U R N"......"..TASTE DRUE
CKEN. ";......204,0......Q$:.F(Q$." ")..
13.5130.J....204,1.T....".";...(.."..
WENN SIE DIESE MOEGLICHKEIT WAEH-".4.2
..".. LEN, SO BEACHTEN SIE BIITE, D
ASS".D.<..".. DIE ANZAHL VON ZEICH
EN FUER DAS"...F..".. NEUE UND DIE A
LTEN FILES 40 NICHT"...P..".. UEBERS
CHREITEN DARF."...Z.."...BITTE '1' ODER
'2' DRUECKEN. ";...D..204,0...N..Q$:.Q$.
"1".Q$."2".5230...X..204,1......".";Q$.3
....E(Q$).5300,5400.Y.... ==============
=================.V...."..ALTER FILENAME
";AF$......"..NEUER FILENAME ";NF$...H.
BF$."C:".NF$."=".AF$...R..5600.T...."..S
UMMEN FILENAME ";SF$..."..I.0.9...,.."..
FILENAME";I;"(@=END) ";.!.6..F$(I):.F$(I
)."@".J.I.1:.5460.(.@..I.0.J.J.9.E.T.BF$
."C:".SF$."=".P.^..I.0.J.F.H.BF$.BF$.F$(
I).",".M.R..I...|.BF$.H(BF$,C(BF$).1)...
...C(BF$)..40.5600......"..DIE EINGABE I
ST ZU LANG.".X...."..BITTE WIEDERHOLEN."
......5400......"...B U S Y."......15,8,
15......15,BF$..... 15.!....10000.1.P.."
..RENAME".@.Z..".******".]...."..ALTER F
ILENAME ";AF$.Z...."..NEUER FILENAME ";N
F$.....BF$."R:".NF$."=".AF$......"...B U
S Y."......15,8,15......15,BF$.G... 15.
R.J..10000...X.."..SCRATCH"...B..".*****
**".#.L.."..DER SCRATCH BEFEHL ERLAUBT
ZWEI ARTEN".E.V.."..DES LOESCHENS VON FI
LES:".U...."..1.) DAS LOESCHEN EINZELNER
FILES. DAZU"......".. MUSS DER FIL
ENAME ANGEGEBEN WER-"......".. DEN.".
....."..2.) DAS LOESCHEN DER GESAMTEN DI
SCETTE"......".. OHNE DIE FORMATIERUN
G NEU AUSFUEH-".4....".. REN ZU MUESS
EN.".\...."...BITTE '1' ODER '2' EINGEBE
N ";.G.F..204,0...P..Q$:.Q$."1".Q$."2".7
120...Z..204,1:.".";Q$......E(Q$).7200,7
300.Q.... ==============================
=... .."..FILENAME ";F$...*.BF$."S:".F$.
#.4.."..SIND SIE SICHER, DASS SIE DAS FI
LE".4.>.."......";F$.W.H.."..LOESCHEN WO
LLEN (J/N) ? ";.B.R..204,0.V.\..Q$:.Q$."
".7260...A..204,1:.".";Q$...F..Q$."J".74
00...P..100.....BF$."S:*"......"..SIND S
IE SICHER, DASS SIE DIE GESAMTE"......"
..DISCETTE LOESCHEN WOLLEN (J/N) ? ";...
...7250.)...."..B U S Y.".6....15,8,15.B
....15,BF$.J... 15.U....10000.B..'.15,8,
15.V..'.15,A$,B$,C$,D$...$'.E(A$).0.1007
0....'."...ES IST FOLGENDER FEHLER AUFGE
TRETEN:".J.8'."...";B$;"."...B'."..TRACK
:";E(C$)...L'."..SECTOR:";E(D$). .V'."..
.'R E T U R N' TASTE DRUECKEN.".9.`'.Q$
:.Q$..G(13).10080.B.J'.100....
> CLICK IMAGE PREVIEW FOR FULL MODAL