FILESCHUTZ
FILE INFORMATION
FILENAME(S): FILESCHUTZ
FILE TYPE(S): PRG
FILE SIZE: 3.5K
FIRST SEEN: 2025-12-01 13:51:36
APPEARS ON: 1 disk(s)
FILE HASH
799bd5fe238000e84e85c70651bdf96fc53559791505bf9d2df09da734b7eafc
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| NIX | FILESCHUTZ | PRG | hedning, The Viking | 14 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 14 08 63 00 86 54 54 28 32 33 29 2C 53 53 |....c..TT(23),SS|
00000010: 28 32 33 29 00 39 08 64 00 97 35 33 32 38 30 2C |(23).9.d..53280,|
00000020: 32 3A 97 35 33 32 38 31 2C 32 3A 99 C7 28 31 35 |2:.53281,2:..(15|
00000030: 38 29 3B C7 28 31 34 37 29 00 63 08 6E 00 99 A3 |8);.(147).c.n...|
00000040: 34 29 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |4)"=============|
00000050: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000060: 3D 3D 22 00 8D 08 78 00 99 A3 34 29 22 4C 4F 45 |=="...x...4)"LOE|
00000070: 53 43 48 45 4E 20 55 4E 44 20 53 43 48 55 45 54 |SCHEN UND SCHUET|
00000080: 5A 45 4E 20 56 4F 4E 20 46 49 4C 53 22 00 B7 08 |ZEN VON FILS"...|
00000090: 82 00 99 A3 34 29 22 3D 3D 3D 3D 3D 3D 3D 3D 3D |....4)"=========|
000000A0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000000B0: 3D 3D 3D 3D 3D 3D 22 00 BF 08 8C 00 99 3A 99 00 |======"......:..|
000000C0: EC 08 96 00 99 22 4D 49 54 20 44 49 45 53 45 4D |....."MIT DIESEM|
000000D0: 20 50 52 4F 47 52 41 4D 4D 20 4B 4F 45 4E 4E 45 | PROGRAMM KOENNE|
000000E0: 4E 20 46 49 4C 45 53 20 47 45 2D 22 00 18 09 A0 |N FILES GE-"....|
000000F0: 00 99 22 53 43 48 55 45 54 5A 54 2C 20 47 45 4C |.."SCHUETZT, GEL|
00000100: 4F 45 53 43 48 54 20 55 4E 44 20 46 52 45 49 47 |OESCHT UND FREIG|
00000110: 45 47 45 42 45 4E 20 22 00 39 09 AA 00 99 22 57 |EGEBEN ".9...."W|
00000120: 45 52 44 45 4E 2E 28 53 4F 46 45 52 4E 20 45 53 |ERDEN.(SOFERN ES|
00000130: 20 4C 41 45 55 46 54 29 22 00 41 09 B4 00 99 3A | LAEUFT)".A....:|
00000140: 99 00 69 09 BE 00 99 A3 36 29 3B 22 20 2D 31 2D |..i.....6);" -1-|
00000150: 20 41 55 46 4C 49 53 54 45 4E 20 41 4C 4C 45 52 | AUFLISTEN ALLER|
00000160: 20 46 49 4C 45 53 22 3A 99 00 91 09 C8 00 99 A3 | FILES":........|
00000170: 36 29 3B 22 20 2D 32 2D 20 53 43 48 55 45 54 5A |6);" -2- SCHUETZ|
00000180: 45 4E 20 45 49 4E 45 53 20 46 49 4C 45 53 22 3A |EN EINES FILES":|
00000190: 99 00 B9 09 D2 00 99 A3 36 29 3B 22 20 2D 33 2D |........6);" -3-|
000001A0: 20 46 52 45 49 47 45 42 45 4E 20 45 49 4E 45 53 | FREIGEBEN EINES|
000001B0: 20 46 49 4C 45 53 22 3A 99 00 E1 09 DC 00 99 A3 | FILES":........|
000001C0: 36 29 3B 22 20 2D 34 2D 20 4C 4F 45 53 43 48 45 |6);" -4- LOESCHE|
000001D0: 4E 20 20 45 49 4E 45 53 20 46 49 4C 45 53 22 3A |N EINES FILES":|
000001E0: 99 00 09 0A E6 00 99 A3 36 29 3B 22 20 2D 35 2D |........6);" -5-|
000001F0: 20 42 45 45 4E 44 45 4E 20 44 45 53 20 50 52 4F | BEENDEN DES PRO|
00000200: 47 52 41 4D 4D 53 22 3A 99 00 2C 0A F0 00 A1 58 |GRAMMS":..,....X|
00000210: 24 3A 8B 58 24 B2 22 22 B0 C5 28 58 24 29 B3 31 |$:.X$.""..(X$).1|
00000220: B0 C5 28 58 24 29 B1 35 A7 32 34 30 00 3B 0A FA |..(X$).5.240.;..|
00000230: 00 8B C5 28 58 24 29 B2 35 A7 80 00 56 0A 04 01 |...(X$).5...V...|
00000240: 91 C5 28 58 24 29 8D 32 38 30 2C 33 36 30 2C 36 |..(X$).280,360,6|
00000250: 31 30 2C 38 36 30 00 5F 0A 0E 01 89 31 30 30 00 |10,860._....100.|
00000260: 7B 0A 18 01 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |{.... ----------|
00000270: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 97 0A 22 01 |-----------...".|
00000280: 8F 20 41 55 46 4C 49 53 54 45 4E 20 41 4C 4C 45 |. AUFLISTEN ALLE|
00000290: 52 20 46 49 4C 45 53 00 B3 0A 2C 01 8F 20 2D 2D |R FILES...,.. --|
000002A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000002B0: 2D 2D 2D 00 BF 0A 36 01 99 C7 28 31 34 37 29 00 |---...6...(147).|
000002C0: CE 0A 40 01 46 4C B2 31 3A 8D 31 31 39 30 00 EA |..@.FL.1:.1190..|
000002D0: 0A 4A 01 3A 99 3A 99 22 57 45 49 54 45 52 20 4D |.J.:.:."WEITER M|
000002E0: 49 54 20 52 45 54 55 52 4E 22 00 F2 0A 54 01 85 |IT RETURN"...T..|
000002F0: 58 24 00 FD 0A 5E 01 46 4C B2 30 3A 8E 00 19 0B |X$...^.FL.0:....|
00000300: 68 01 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |h.. ------------|
00000310: 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 35 0B 72 01 8F 20 |---------.5.r.. |
00000320: 53 43 48 55 45 54 5A 45 4E 20 45 49 4E 45 53 20 |SCHUETZEN EINES |
00000330: 46 49 4C 45 53 00 51 0B 7C 01 8F 20 2D 2D 2D 2D |FILES.Q.|.. ----|
00000340: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000350: 2D 00 5B 0B 86 01 8D 31 35 38 30 00 65 0B 90 01 |-.[....1580.e...|
00000360: 8D 31 31 39 30 00 73 0B 9A 01 8B 47 46 B2 31 A7 |.1190.s....GF.1.|
00000370: 34 36 30 00 91 0B A4 01 99 22 46 49 4C 45 20 4E |460......"FILE N|
00000380: 49 43 48 54 20 47 45 46 55 4E 44 45 4E 21 22 3A |ICHT GEFUNDEN!":|
00000390: 99 00 AA 0B AE 01 99 22 57 45 49 54 45 52 20 4D |......."WEITER M|
000003A0: 49 54 20 52 45 54 55 52 4E 22 00 B9 0B B8 01 85 |IT RETURN"......|
000003B0: 58 24 3A A0 32 3A A0 31 35 00 BF 0B C2 01 8E 00 |X$:.2:.15.......|
000003C0: D6 0B CC 01 98 31 35 2C 22 42 2D 50 22 3B 32 3B |.....15,"B-P";2;|
000003D0: 58 AC 33 32 AA 32 00 F0 0B D6 01 A1 23 32 2C 58 |X.32.2......#2,X|
000003E0: 24 3A 8B 58 24 B2 22 22 A7 58 24 B2 C7 28 30 29 |$:.X$."".X$..(0)|
000003F0: 00 FD 0B E0 01 46 54 B2 C6 28 58 24 29 00 14 0C |.....FT..(X$)...|
00000400: EA 01 8B 20 28 46 54 20 AF 20 36 34 29 B2 30 20 |... (FT . 64).0 |
00000410: A7 35 31 30 00 3F 0C F4 01 99 22 46 49 4C 45 20 |.510.?...."FILE |
00000420: 49 53 54 20 42 45 52 45 49 54 53 20 47 45 53 43 |IST BEREITS GESC|
00000430: 48 55 45 54 5A 54 21 22 3A 99 3A 89 34 33 30 00 |HUETZT!":.:.430.|
00000440: 50 0C FE 01 46 54 B2 28 46 54 20 B0 20 36 34 29 |P...FT.(FT . 64)|
00000450: 00 67 0C 08 02 98 31 35 2C 22 42 2D 50 22 3B 32 |.g....15,"B-P";2|
00000460: 3B 58 AC 33 32 AA 32 00 75 0C 12 02 98 32 2C C7 |;X.32.2.u....2,.|
00000470: 28 46 54 29 3B 00 87 0C 1C 02 98 31 35 2C 22 42 |(FT);......15,"B|
00000480: 2D 50 22 3B 32 3B 30 00 A8 0C 26 02 98 31 35 2C |-P";2;0...&..15,|
00000490: 22 55 32 22 3B 32 3B 30 3B 54 54 28 41 AB 31 29 |"U2";2;0;TT(A.1)|
000004A0: 3B 53 53 28 41 AB 31 29 00 B3 0C 30 02 A0 32 3A |;SS(A.1)...0..2:|
000004B0: A0 31 35 00 CB 0C 3A 02 99 22 46 49 4C 45 20 47 |.15...:.."FILE G|
000004C0: 45 53 43 48 55 45 54 5A 54 21 22 00 E4 0C 44 02 |ESCHUETZT!"...D.|
000004D0: 99 22 57 45 49 54 45 52 20 4D 49 54 20 52 45 54 |."WEITER MIT RET|
000004E0: 55 52 4E 22 00 EC 0C 4E 02 85 58 24 00 F9 0C 58 |URN"...N..X$...X|
000004F0: 02 A0 32 3A A0 31 35 3A 8E 00 13 0D 62 02 8F 20 |..2:.15:....b.. |
00000500: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000510: 2D 2D 2D 00 2D 0D 6C 02 8F 20 46 52 45 49 47 45 |---.-.l.. FREIGE|
00000520: 42 45 4E 20 56 4F 4E 20 46 49 4C 45 53 00 47 0D |BEN VON FILES.G.|
00000530: 76 02 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |v.. ------------|
00000540: 2D 2D 2D 2D 2D 2D 2D 00 51 0D 80 02 8D 31 35 38 |-------.Q....158|
00000550: 30 00 5B 0D 8A 02 8D 31 31 39 30 00 69 0D 94 02 |0.[....1190.i...|
00000560: 8B 47 46 B2 31 A7 37 31 30 00 87 0D 9E 02 99 22 |.GF.1.710......"|
00000570: 46 49 4C 45 20 4E 49 43 48 54 20 47 45 46 55 4E |FILE NICHT GEFUN|
00000580: 44 45 4E 21 22 3A 99 00 A0 0D A8 02 99 22 57 45 |DEN!":......."WE|
00000590: 49 54 45 52 20 4D 49 54 20 52 45 54 55 52 4E 22 |ITER MIT RETURN"|
000005A0: 00 AF 0D B2 02 85 58 24 3A A0 32 3A A0 31 35 00 |......X$:.2:.15.|
000005B0: B5 0D BC 02 8E 00 CC 0D C6 02 98 31 35 2C 22 42 |...........15,"B|
000005C0: 2D 50 22 3B 32 3B 58 AC 33 32 AA 32 00 E6 0D D0 |-P";2;X.32.2....|
000005D0: 02 A1 23 32 2C 58 24 3A 8B 58 24 B2 22 22 A7 58 |..#2,X$:.X$."".X|
000005E0: 24 B2 C7 28 30 29 00 F3 0D DA 02 46 54 B2 C6 28 |$..(0).....FT..(|
000005F0: 58 24 29 00 0A 0E E4 02 8B 20 28 46 54 20 AF 20 |X$)...... (FT . |
00000600: 36 34 29 B2 36 34 A7 37 36 30 00 36 0E EE 02 99 |64).64.760.6....|
00000610: 22 46 49 4C 45 20 49 53 54 20 42 45 52 45 49 54 |"FILE IST BEREIT|
00000620: 53 20 46 52 45 49 47 45 47 45 42 45 4E 21 22 3A |S FREIGEGEBEN!":|
00000630: 99 3A 89 36 38 30 00 4B 0E F8 02 46 54 B2 28 46 |.:.680.K...FT.(F|
00000640: 54 20 AF 20 32 35 35 AB 36 34 29 00 62 0E 02 03 |T . 255.64).b...|
00000650: 98 31 35 2C 22 42 2D 50 22 3B 32 3B 58 AC 33 32 |.15,"B-P";2;X.32|
00000660: AA 32 00 70 0E 0C 03 98 32 2C C7 28 46 54 29 3B |.2.p....2,.(FT);|
00000670: 00 82 0E 16 03 98 31 35 2C 22 42 2D 50 22 3B 32 |......15,"B-P";2|
00000680: 3B 30 00 A3 0E 20 03 98 31 35 2C 22 55 32 22 3B |;0... ..15,"U2";|
00000690: 32 3B 30 3B 54 54 28 41 AB 31 29 3B 53 53 28 41 |2;0;TT(A.1);SS(A|
000006A0: AB 31 29 00 AE 0E 2A 03 A0 32 3A A0 31 35 00 C7 |.1)...*..2:.15..|
000006B0: 0E 34 03 99 22 46 49 4C 45 20 46 52 45 49 47 45 |.4.."FILE FREIGE|
000006C0: 47 45 42 45 4E 21 22 00 E0 0E 3E 03 99 22 57 45 |GEBEN!"...>.."WE|
000006D0: 49 54 45 52 20 4D 49 54 20 52 45 54 55 52 4E 22 |ITER MIT RETURN"|
000006E0: 00 E8 0E 48 03 85 58 24 00 EE 0E 52 03 8E 00 0A |...H..X$...R....|
000006F0: 0F 5C 03 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.\.. -----------|
00000700: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 26 0F 66 03 8F |----------.&.f..|
00000710: 20 4C 4F 45 53 43 48 45 4E 20 20 45 49 4E 45 53 | LOESCHEN EINES|
00000720: 20 46 49 4C 45 53 00 42 0F 70 03 8F 20 2D 2D 2D | FILES.B.p.. ---|
00000730: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000740: 2D 2D 00 4C 0F 7A 03 8D 31 35 38 30 00 56 0F 84 |--.L.z..1580.V..|
00000750: 03 8D 31 31 39 30 00 64 0F 8E 03 8B 47 46 B2 31 |..1190.d....GF.1|
00000760: A7 39 36 30 00 82 0F 98 03 99 22 46 49 4C 45 20 |.960......"FILE |
00000770: 4E 49 43 48 54 20 47 45 46 55 4E 44 45 4E 21 22 |NICHT GEFUNDEN!"|
00000780: 3A 99 00 9B 0F A2 03 99 22 57 45 49 54 45 52 20 |:......."WEITER |
00000790: 4D 49 54 20 52 45 54 55 52 4E 22 00 AA 0F AC 03 |MIT RETURN".....|
000007A0: 85 58 24 3A A0 32 3A A0 31 35 00 B0 0F B6 03 8E |.X$:.2:.15......|
000007B0: 00 C7 0F C0 03 98 31 35 2C 22 42 2D 50 22 3B 32 |......15,"B-P";2|
000007C0: 3B 58 AC 33 32 AA 32 00 E1 0F CA 03 A1 23 32 2C |;X.32.2......#2,|
000007D0: 58 24 3A 8B 58 24 B2 22 22 A7 58 24 B2 C7 28 30 |X$:.X$."".X$..(0|
000007E0: 29 00 EE 0F D4 03 46 54 B2 C6 28 58 24 29 00 05 |).....FT..(X$)..|
000007F0: 10 DE 03 8B 28 46 54 20 AF 20 36 34 29 B2 30 20 |....(FT . 64).0 |
00000800: A7 31 30 34 30 00 2A 10 E8 03 99 22 41 43 48 54 |.1040.*...."ACHT|
00000810: 55 4E 47 21 20 46 49 4C 45 20 49 53 54 20 47 45 |UNG! FILE IST GE|
00000820: 53 43 48 55 45 54 5A 54 21 22 00 4F 10 F2 03 99 |SCHUETZT!".O....|
00000830: 22 46 52 45 49 47 45 42 45 4E 20 55 4E 44 20 4C |"FREIGEBEN UND L|
00000840: 4F 45 53 43 48 45 4E 20 28 4A 2F 4E 29 3F 22 00 |OESCHEN (J/N)?".|
00000850: 73 10 FC 03 A1 58 24 3A 8B 58 24 B2 22 22 B0 58 |s....X$:.X$."".X|
00000860: 24 B3 B1 22 4E 22 AF 58 24 B3 B1 22 4A 22 A7 31 |$.."N".X$.."J".1|
00000870: 30 32 30 00 84 10 06 04 8B 58 24 B2 22 4E 22 A7 |020......X$."N".|
00000880: 31 31 37 30 00 99 10 10 04 99 22 53 49 43 48 45 |1170......"SICHE|
00000890: 52 20 28 4A 2F 4E 29 3F 22 00 BD 10 1A 04 A1 58 |R (J/N)?"......X|
000008A0: 24 3A 8B 58 24 B2 22 22 B0 58 24 B3 B1 22 4E 22 |$:.X$."".X$.."N"|
000008B0: AF 58 24 B3 B1 22 4A 22 A7 31 30 35 30 00 CE 10 |.X$.."J".1050...|
000008C0: 24 04 8B 58 24 B2 22 4E 22 A7 31 31 37 30 00 E3 |$..X$."N".1170..|
000008D0: 10 2E 04 46 54 B2 28 46 54 20 AF 20 32 35 35 AB |...FT.(FT . 255.|
000008E0: 36 34 29 00 FA 10 38 04 98 31 35 2C 22 42 2D 50 |64)...8..15,"B-P|
000008F0: 22 3B 32 3B 58 AC 33 32 AA 32 00 08 11 42 04 98 |";2;X.32.2...B..|
00000900: 32 2C C7 28 46 54 29 3B 00 1A 11 4C 04 98 31 35 |2,.(FT);...L..15|
00000910: 2C 22 42 2D 50 22 3B 32 3B 30 00 3B 11 56 04 98 |,"B-P";2;0.;.V..|
00000920: 31 35 2C 22 55 32 22 3B 32 3B 30 3B 54 54 28 41 |15,"U2";2;0;TT(A|
00000930: AB 31 29 3B 53 53 28 41 AB 31 29 00 48 11 60 04 |.1);SS(A.1).H.`.|
00000940: 98 31 35 2C 22 49 30 22 00 58 11 6A 04 98 31 35 |.15,"I0".X.j..15|
00000950: 2C 22 53 3A 22 AA 46 24 00 6F 11 74 04 99 22 46 |,"S:".F$.o.t.."F|
00000960: 49 4C 45 20 47 45 4C 4F 45 53 43 48 54 21 22 00 |ILE GELOESCHT!".|
00000970: 88 11 7E 04 99 22 57 45 49 54 45 52 20 4D 49 54 |..~.."WEITER MIT|
00000980: 20 52 45 54 55 52 4E 22 00 90 11 88 04 85 58 24 | RETURN"......X$|
00000990: 00 9D 11 92 04 A0 32 3A A0 31 35 3A 8E 00 BA 11 |......2:.15:....|
000009A0: A6 04 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |... ------------|
000009B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 D7 11 B0 04 8F |----------......|
000009C0: 20 4C 45 53 45 4E 2F 53 55 43 48 45 4E 20 56 4F | LESEN/SUCHEN VO|
000009D0: 4E 20 46 49 4C 45 53 00 F4 11 BA 04 8F 20 2D 2D |N FILES...... --|
000009E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000009F0: 2D 2D 2D 2D 00 11 12 C4 04 9F 31 35 2C 38 2C 31 |----......15,8,1|
00000A00: 35 2C 22 49 30 22 3A 9F 32 2C 38 2C 32 2C 22 23 |5,"I0":.2,8,2,"#|
00000A10: 22 00 28 12 CE 04 98 31 35 2C 22 42 2D 52 22 3B |".(....15,"B-R";|
00000A20: 32 3B 30 3B 31 38 3B 30 00 3A 12 D8 04 98 31 35 |2;0;18;0.:....15|
00000A30: 2C 22 42 2D 50 22 3B 32 3B 30 00 50 12 E2 04 98 |,"B-P";2;0.P....|
00000A40: 31 35 2C 22 55 32 22 3B 32 3B 30 3B 31 38 3B 30 |15,"U2";2;0;18;0|
00000A50: 00 5C 12 EC 04 84 31 35 2C 58 31 24 00 71 12 F6 |.\....15,X1$.q..|
00000A60: 04 8B C5 28 58 31 24 29 B3 B1 32 36 A7 31 33 33 |...(X1$)..26.133|
00000A70: 30 00 A1 12 00 05 99 22 42 54 54 45 20 56 4F 52 |0......"BTTE VOR|
00000A80: 20 42 45 4E 55 54 5A 55 4E 47 20 44 49 45 53 45 | BENUTZUNG DIESE|
00000A90: 53 20 50 52 4F 47 52 41 4D 4D 53 20 44 45 4E 22 |S PROGRAMMS DEN"|
00000AA0: 3B 00 C1 12 0A 05 99 22 53 43 48 52 45 49 42 53 |;......"SCHREIBS|
00000AB0: 43 48 55 54 5A 20 45 4E 54 46 45 52 4E 45 4E 21 |CHUTZ ENTFERNEN!|
00000AC0: 22 00 D9 12 14 05 99 22 57 45 49 54 52 20 4D 49 |"......"WEITR MI|
00000AD0: 54 20 52 45 54 55 52 4E 22 00 E1 12 1E 05 85 58 |T RETURN"......X|
00000AE0: 24 00 EE 12 28 05 A0 32 3A A0 31 35 3A 8E 00 10 |$...(..2:.15:...|
00000AF0: 13 32 05 54 B2 31 38 3A 53 B2 31 3A 41 B2 31 3A |.2.T.18:S.1:A.1:|
00000B00: 54 54 28 30 29 B2 31 38 3A 53 53 28 30 29 B2 31 |TT(0).18:SS(0).1|
00000B10: 00 26 13 3C 05 98 31 35 2C 22 42 2D 52 22 3B 32 |.&.<..15,"B-R";2|
00000B20: 3B 30 3B 54 3B 53 00 38 13 46 05 98 31 35 2C 22 |;0;T;S.8.F..15,"|
00000B30: 42 2D 50 22 3B 32 3B 30 00 52 13 50 05 A1 23 32 |B-P";2;0.R.P..#2|
00000B40: 2C 58 24 3A 8B 58 24 B2 22 22 A7 58 24 B2 C7 28 |,X$:.X$."".X$..(|
00000B50: 30 29 00 6C 13 5A 05 54 B2 C6 28 58 24 29 3A 8B |0).l.Z.T..(X$):.|
00000B60: 54 B3 B1 30 A7 54 54 28 41 29 B2 54 00 86 13 64 |T..0.TT(A).T...d|
00000B70: 05 A1 23 32 2C 58 24 3A 8B 58 24 B2 22 22 A7 58 |..#2,X$:.X$."".X|
00000B80: 24 B2 C7 28 30 29 00 A2 13 6E 05 53 B2 C6 28 58 |$..(0)...n.S..(X|
00000B90: 24 29 3A 8B 53 B3 B1 32 35 35 A7 53 53 28 41 29 |$):.S..255.SS(A)|
00000BA0: B2 53 00 AD 13 78 05 81 58 B2 30 A4 37 00 C4 13 |.S...x..X.0.7...|
00000BB0: 82 05 98 31 35 2C 22 42 2D 50 22 3B 32 3B 58 AC |...15,"B-P";2;X.|
00000BC0: 33 32 AA 32 00 DE 13 8C 05 A1 23 32 2C 58 24 3A |32.2......#2,X$:|
00000BD0: 8B 58 24 B2 22 22 A7 58 24 B2 C7 28 30 29 00 F0 |.X$."".X$..(0)..|
00000BE0: 13 96 05 8B C6 28 58 24 29 B2 30 A7 31 35 33 30 |.....(X$).0.1530|
00000BF0: 00 07 14 A0 05 98 31 35 2C 22 42 2D 50 22 3B 32 |......15,"B-P";2|
00000C00: 3B 58 AC 33 32 AA 35 00 12 14 AA 05 46 46 24 B2 |;X.32.5.....FF$.|
00000C10: 22 22 00 1E 14 B4 05 81 59 B2 30 A4 31 35 00 38 |""......Y.0.15.8|
00000C20: 14 BE 05 A1 23 32 2C 58 24 3A 8B 58 24 B2 22 22 |....#2,X$:.X$.""|
00000C30: A7 58 24 B2 C7 28 30 29 00 4C 14 C8 05 8B C6 28 |.X$..(0).L.....(|
00000C40: 58 24 29 B2 31 36 30 A7 31 35 30 30 00 5B 14 D2 |X$).160.1500.[..|
00000C50: 05 46 46 24 B2 46 46 24 AA 58 24 00 62 14 DC 05 |.FF$.FF$.X$.b...|
00000C60: 82 59 00 77 14 E6 05 8B 46 4C B2 31 A7 99 46 46 |.Y.w....FL.1..FF|
00000C70: 24 3A 89 31 35 33 30 00 8E 14 F0 05 8B 46 24 B2 |$:.1530......F$.|
00000C80: 46 46 24 A7 47 46 B2 31 3A 89 31 35 37 30 00 95 |FF$.GF.1:.1570..|
00000C90: 14 FA 05 82 58 00 AB 14 04 06 8B 54 B3 B1 30 A7 |....X......T..0.|
00000CA0: 41 B2 41 AA 31 3A 89 31 33 34 30 00 B6 14 0E 06 |A.A.1:.1340.....|
00000CB0: A0 32 3A A0 31 35 00 E8 14 18 06 8B 46 4C B2 30 |.2:.15......FL.0|
00000CC0: A7 99 22 46 49 4C 45 4E 41 4D 45 20 4E 49 43 48 |.."FILENAME NICH|
00000CD0: 54 20 47 45 46 55 4E 44 45 4E 21 22 3A 81 49 B2 |T GEFUNDEN!":.I.|
00000CE0: 31 A4 32 30 30 30 3A 82 00 0F 15 22 06 99 22 58 |1.2000:....".."X|
00000CF0: 22 3B 58 3B 22 54 54 22 3B 54 54 28 41 AB 31 29 |";X;"TT";TT(A.1)|
00000D00: 3B 22 53 53 22 3B 53 53 28 41 AB 31 29 3A 8E 00 |;"SS";SS(A.1):..|
00000D10: 2C 15 2C 06 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |,.,.. ----------|
00000D20: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 49 15 36 |------------.I.6|
00000D30: 06 8F 20 45 49 4E 47 41 42 45 20 44 45 53 20 46 |.. EINGABE DES F|
00000D40: 49 4C 45 4E 41 4D 45 4E 53 00 66 15 40 06 8F 20 |ILENAMENS.f.@.. |
00000D50: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000D60: 2D 2D 2D 2D 2D 2D 00 6E 15 4A 06 99 3A 99 00 88 |------.n.J..:...|
00000D70: 15 54 06 85 22 4E 41 4D 45 20 44 45 53 20 46 49 |.T.."NAME DES FI|
00000D80: 4C 45 53 3A 22 3B 46 24 00 9C 15 5E 06 8B C3 28 |LES:";F$...^...(|
00000D90: 46 24 29 B3 B2 31 36 A7 31 36 35 30 00 BB 15 68 |F$)..16.1650...h|
00000DA0: 06 99 22 46 49 4C 45 4E 41 4D 45 20 5A 55 20 4C |.."FILENAME ZU L|
00000DB0: 41 4E 47 21 22 3A 89 31 36 32 30 00 C9 15 72 06 |ANG!":.1620...r.|
00000DC0: 47 46 B2 30 3A 46 4C B2 30 00 CF 15 7C 06 8E 00 |GF.0:FL.0...|...|
00000DD0: 00 00 FF 8D |.... |
....C..TT(23),SS(23).9.D..53280,2:.53281
,2:.G(158);G(147).C.N...4)"=============
=================="...X...4)"LOESCHEN UN
D SCHUETZEN VON FILS".......4)"=========
======================"......:......."MI
T DIESEM PROGRAMM KOENNEN FILES GE-"...
.."SCHUETZT, GELOESCHT UND FREIGEGEBEN "
.9...."WERDEN.(SOFERN ES LAEUFT)".A....:
..I.....6);" -1- AUFLISTEN ALLER FILES":
....H...6);" -2- SCHUETZEN EINES FILES":
....R...6);" -3- FREIGEBEN EINES FILES":
........6);" -4- LOESCHEN EINES FILES":
........6);" -5- BEENDEN DES PROGRAMMS":
..,....X$:.X$."".E(X$).1.E(X$).5.240.;..
..E(X$).5...V....E(X$).280,360,610,860._
....100.{.... ---------------------...".
. AUFLISTEN ALLER FILES...,.. ----------
-----------...6..G(147).N.@.FL.1:.1190..
.J.:.:."WEITER MIT RETURN"...T..X$...^.F
L.0:....H.. ---------------------.5.R..
SCHUETZEN EINES FILES.Q.|.. ------------
---------.[....1580.E....1190.S....GF.1.
460......"FILE NICHT GEFUNDEN!":......."
WEITER MIT RETURN"......X$: 2: 15...B...
V.L..15,"B-P";2;X.32.2...V..#2,X$:.X$.""
.X$.G(0).....FT.F(X$)...... (FT . 64).0
.510.?...."FILE IST BEREITS GESCHUETZT!"
:.:.430.P...FT.(FT . 64).G....15,"B-P";2
;X.32.2.U....2,G(FT);......15,"B-P";2;0.
..&..15,"U2";2;0;TT(A.1);SS(A.1)...0. 2:
15.K.:.."FILE GESCHUETZT!"...D.."WEITER
MIT RETURN"...N..X$...X. 2: 15:....B..
-------------------.-.L.. FREIGEBEN VON
FILES.G.V.. -------------------.Q....158
0.[....1190.I....GF.1.710......"FILE NIC
HT GEFUNDEN!":.. ...."WEITER MIT RETURN"
......X$: 2: 15.......L.F..15,"B-P";2;X.
32.2...P..#2,X$:.X$."".X$.G(0)...Z.FT.F(
X$)...... (FT . 64).64.760.6...."FILE IS
T BEREITS FREIGEGEBEN!":.:.680.K...FT.(F
T . 255.64).B....15,"B-P";2;X.32.2.P....
2,G(FT);......15,"B-P";2;0... ..15,"U2";
2;0;TT(A.1);SS(A.1)...*. 2: 15.G.4.."FIL
E FREIGEGEBEN!"...>.."WEITER MIT RETURN"
...H..X$...R.....\.. -------------------
--.&.F.. LOESCHEN EINES FILES.B.P.. ---
------------------.L.Z..1580.V....1190.D
....GF.1.960......"FILE NICHT GEFUNDEN!"
:......."WEITER MIT RETURN"......X$: 2:
15.......G....15,"B-P";2;X.32.2...J..#2,
X$:.X$."".X$.G(0)...T.FT.F(X$)......(FT
. 64).0 .1040.*...."ACHTUNG! FILE IST GE
SCHUETZT!".O...."FREIGEBEN UND LOESCHEN
(J/N)?".S....X$:.X$."".X$.."N".X$.."J".1
020......X$."N".1170......"SICHER (J/N)?
"......X$:.X$."".X$.."N".X$.."J".1050.N.
$..X$."N".1170.....FT.(FT . 255.64)...8.
.15,"B-P";2;X.32.2...B..2,G(FT);...L..15
,"B-P";2;0.;.V..15,"U2";2;0;TT(A.1);SS(A
.1).H.`..15,"I0".X.J..15,"S:".F$.O.T.."F
ILE GELOESCHT!"...~.."WEITER MIT RETURN"
......X$..... 2: 15:....... ------------
----------.W.... LESEN/SUCHEN VON FILES.
..... ----------------------...D..15,8,1
5,"I0":.2,8,2,"#".(.N..15,"B-R";2;0;18;0
.:.X..15,"B-P";2;0.P....15,"U2";2;0;18;0
.\....15,X1$.Q....E(X1$)..26.1330......"
BTTE VOR BENUTZUNG DIESES PROGRAMMS DEN"
;.A...."SCHREIBSCHUTZ ENTFERNEN!".Y...."
WEITR MIT RETURN"......X$...(. 2: 15:...
.2.T.18:S.1:A.1:TT(0).18:SS(0).1.&.<..15
,"B-R";2;0;T;S.8.F..15,"B-P";2;0.R.P..#2
,X$:.X$."".X$.G(0).L.Z.T.F(X$):.T..0.TT(
A).T...D..#2,X$:.X$."".X$.G(0)...N.S.F(X
$):.S..255.SS(A).S...X..X.0.7.D....15,"B
-P";2;X.32.2......#2,X$:.X$."".X$.G(0)..
....F(X$).0.1530... ..15,"B-P";2;X.32.5.
....FF$.""......Y.0.15.8....#2,X$:.X$.""
.X$.G(0).L.H..F(X$).160.1500.[.R.FF$.FF$
.X$.B....Y.W....FL.1..FF$:.1530......F$.
FF$.GF.1:.1570......X......T..0.A.A.1:.1
340..... 2: 15......FL.0.."FILENAME NICH
T GEFUNDEN!":.I.1.2000:....".."X";X;"TT"
;TT(A.1);"SS";SS(A.1):..,.,.. ----------
------------.I.6.. EINGABE DES FILENAMEN
S.F.@.. ----------------------.N.J..:...
.T.."NAME DES FILES:";F$...^..C(F$)..16.
1650...H.."FILENAME ZU LANG!":.1620.I.R.
GF.0:FL.0.O.|.......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL