SCRATCH-SCHUTZ
FILE INFORMATION
FILENAME(S): SCRATCH-SCHUTZ
FILE TYPE(S): PRG
FILE SIZE: 3.4K
FIRST SEEN: 2025-11-30 01:08:17
APPEARS ON: 1 disk(s)
FILE HASH
44fd7dbdfbd803024db2bb0d58d9cbbc973865ab1d749a80e30a15e7737dcb86
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| NUTZPROGRAMME | SCRATCH-SCHUTZ | PRG | Treasure Chest - Wolfgang Rauprich | 24 | 13 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 27 08 64 00 97 35 33 32 38 30 2C 32 3A 97 |..'.d..53280,2:.| 00000010: 35 33 32 38 31 2C 32 3A 99 C7 28 31 35 38 29 3B |53281,2:..(158);| 00000020: C7 28 31 34 37 29 3B 00 53 08 6E 00 99 A3 34 29 |.(147);.S.n...4)| 00000030: 3B 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |;"==============| 00000040: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================| 00000050: 3D 3D 22 00 7F 08 78 00 99 A3 34 29 3B 22 4C 4F |=="...x...4);"LO| 00000060: 45 53 43 48 45 4E 20 55 4E 44 20 53 43 48 55 45 |ESCHEN UND SCHUE| 00000070: 54 5A 45 4E 20 56 4F 4E 20 46 49 4C 45 53 22 00 |TZEN VON FILES".| 00000080: AB 08 82 00 99 A3 34 29 3B 22 3D 3D 3D 3D 3D 3D |......4);"======| 00000090: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================| 000000A0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 00 B3 08 8C 00 |==========".....| 000000B0: 99 3A 99 00 E1 08 96 00 99 22 4D 49 54 20 44 49 |.:......."MIT DI| 000000C0: 45 53 45 4D 20 50 52 4F 47 52 41 4D 4D 4D 20 4B |ESEM PROGRAMMM K| 000000D0: 4F 45 4E 4E 45 4E 20 46 49 4C 45 53 20 47 45 2D |OENNEN FILES GE-| 000000E0: 22 00 0F 09 A0 00 99 22 53 43 48 55 45 54 5A 54 |"......"SCHUETZT| 000000F0: 2C 20 47 45 4C 4F 45 53 43 48 54 20 20 20 55 4E |, GELOESCHT UN| 00000100: 44 20 20 46 52 45 49 47 45 47 45 42 45 4E 22 00 |D FREIGEGEBEN".| 00000110: 1E 09 AA 00 99 22 57 45 52 44 45 4E 2E 22 00 26 |....."WERDEN.".&| 00000120: 09 B4 00 99 3A 99 00 4E 09 BE 00 99 A3 36 29 3B |....:..N.....6);| 00000130: 22 20 2D 31 2D 20 41 55 46 4C 49 53 54 45 4E 20 |" -1- AUFLISTEN | 00000140: 41 4C 4C 45 52 20 46 49 4C 45 53 22 3A 99 00 76 |ALLER FILES":..v| 00000150: 09 C8 00 99 A3 36 29 3B 22 20 2D 32 2D 20 53 43 |.....6);" -2- SC| 00000160: 48 55 45 54 5A 45 4E 20 45 49 4E 45 53 20 46 49 |HUETZEN EINES FI| 00000170: 4C 45 53 22 3A 99 00 9E 09 D2 00 99 A3 36 29 3B |LES":........6);| 00000180: 22 20 2D 33 2D 20 46 52 45 49 47 45 42 45 4E 20 |" -3- FREIGEBEN | 00000190: 45 49 4E 45 53 20 46 49 4C 45 53 22 3A 99 00 C6 |EINES FILES":...| 000001A0: 09 DC 00 99 A3 36 29 3B 22 20 2D 34 2D 20 4C 4F |.....6);" -4- LO| 000001B0: 45 53 43 48 45 4E 20 20 45 49 4E 45 53 20 46 49 |ESCHEN EINES FI| 000001C0: 4C 45 53 22 3A 99 00 EE 09 E6 00 99 A3 36 29 3B |LES":........6);| 000001D0: 22 20 2D 35 2D 20 42 45 45 4E 44 45 4E 20 44 45 |" -5- BEENDEN DE| 000001E0: 53 20 50 52 4F 47 52 41 4D 4D 53 22 3A 99 00 11 |S PROGRAMMS":...| 000001F0: 0A F0 00 A1 58 24 3A 8B 58 24 B2 22 22 B0 C5 28 |....X$:.X$.""..(| 00000200: 58 24 29 B3 31 B0 C5 28 58 24 29 B1 35 A7 32 34 |X$).1..(X$).5.24| 00000210: 30 00 20 0A FA 00 8B C5 28 58 24 29 B2 35 A7 80 |0. .....(X$).5..| 00000220: 00 3B 0A 04 01 91 C5 28 58 24 29 8D 32 38 30 2C |.;.....(X$).280,| 00000230: 33 36 30 2C 36 31 30 2C 38 36 30 00 44 0A 0E 01 |360,610,860.D...| 00000240: 89 31 30 30 00 60 0A 18 01 8F 20 2D 2D 2D 2D 2D |.100.`.... -----| 00000250: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000260: 00 7C 0A 22 01 8F 20 41 55 46 4C 49 53 54 45 4E |.|.".. AUFLISTEN| 00000270: 20 41 4C 4C 45 52 20 46 49 4C 45 53 00 98 0A 2C | ALLER FILES...,| 00000280: 01 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.. -------------| 00000290: 2D 2D 2D 2D 2D 2D 2D 2D 00 A4 0A 36 01 99 C7 28 |--------...6...(| 000002A0: 31 34 37 29 00 B3 0A 40 01 46 4C B2 31 3A 8D 31 |147)...@.FL.1:.1| 000002B0: 31 39 30 00 CE 0A 4A 01 99 3A 99 22 57 45 49 54 |190...J..:."WEIT| 000002C0: 45 52 20 4D 49 54 20 52 45 54 55 52 4E 22 00 D6 |ER MIT RETURN"..| 000002D0: 0A 54 01 85 58 24 00 E1 0A 5E 01 46 4C B2 30 3A |.T..X$...^.FL.0:| 000002E0: 8E 00 FD 0A 68 01 8F 20 2D 2D 2D 2D 2D 2D 2D 2D |....h.. --------| 000002F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 19 0B |-------------...| 00000300: 72 01 8F 20 53 43 48 55 45 54 5A 45 4E 20 45 49 |r.. SCHUETZEN EI| 00000310: 4E 45 53 20 46 49 4C 45 53 00 35 0B 7C 01 8F 20 |NES FILES.5.|.. | 00000320: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000330: 2D 2D 2D 2D 2D 00 3F 0B 86 01 8D 31 35 38 30 00 |-----.?....1580.| 00000340: 49 0B 90 01 8D 31 31 39 30 00 59 0B 9A 01 8B 47 |I....1190.Y....G| 00000350: 46 B2 20 31 20 A7 34 36 30 00 77 0B A4 01 99 22 |F. 1 .460.w...."| 00000360: 46 49 4C 45 20 4E 49 43 48 54 20 47 45 46 55 4E |FILE NICHT GEFUN| 00000370: 44 45 4E 21 22 3A 99 00 91 0B AE 01 99 22 57 45 |DEN!":......."WE| 00000380: 49 54 45 52 20 4D 49 54 20 52 45 54 55 52 4E 21 |ITER MIT RETURN!| 00000390: 22 00 A0 0B B8 01 85 58 24 3A A0 32 3A A0 31 35 |"......X$:.2:.15| 000003A0: 00 A6 0B C2 01 8E 00 BD 0B CC 01 98 31 35 2C 22 |............15,"| 000003B0: 42 2D 50 22 3B 32 3B 58 AC 33 32 AA 32 00 D7 0B |B-P";2;X.32.2...| 000003C0: D6 01 A1 23 32 2C 58 24 3A 8B 58 24 B2 22 22 A7 |...#2,X$:.X$."".| 000003D0: 58 24 B2 C7 28 30 29 00 E4 0B E0 01 46 54 B2 C6 |X$..(0).....FT..| 000003E0: 28 58 24 29 00 F9 0B EA 01 8B 28 46 54 20 AF 20 |(X$)......(FT . | 000003F0: 36 34 29 B2 30 A7 35 31 30 00 24 0C F4 01 99 22 |64).0.510.$...."| 00000400: 46 49 4C 45 20 49 53 54 20 42 45 52 45 49 54 53 |FILE IST BEREITS| 00000410: 20 47 45 53 43 48 55 45 54 5A 54 21 22 3A 99 3A | GESCHUETZT!":.:| 00000420: 89 34 33 30 00 35 0C FE 01 46 54 B2 28 46 54 20 |.430.5...FT.(FT | 00000430: B0 20 36 34 29 00 4C 0C 08 02 98 31 35 2C 22 42 |. 64).L....15,"B| 00000440: 2D 50 22 3B 32 3B 58 AC 33 32 AA 32 00 5A 0C 12 |-P";2;X.32.2.Z..| 00000450: 02 98 32 2C C7 28 46 54 29 3B 00 6C 0C 1C 02 98 |..2,.(FT);.l....| 00000460: 31 35 2C 22 42 2D 50 22 3B 32 3B 30 00 83 0C 26 |15,"B-P";2;0...&| 00000470: 02 98 31 35 2C 22 55 32 22 3B 32 3B 30 3B 54 54 |..15,"U2";2;0;TT| 00000480: 3B 53 53 00 8E 0C 30 02 A0 32 3A A0 31 35 00 A7 |;SS...0..2:.15..| 00000490: 0C 3A 02 99 22 46 49 4C 45 20 47 45 53 43 48 55 |.:.."FILE GESCHU| 000004A0: 45 54 5A 54 20 21 22 00 C1 0C 44 02 99 22 57 45 |ETZT !"...D.."WE| 000004B0: 49 54 45 52 20 4D 49 54 20 52 45 54 55 52 4E 21 |ITER MIT RETURN!| 000004C0: 22 00 C9 0C 4E 02 85 58 24 00 D6 0C 58 02 A0 32 |"...N..X$...X..2| 000004D0: 3A A0 31 35 3A 8E 00 F2 0C 62 02 8F 20 2D 2D 2D |:.15:....b.. ---| 000004E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000004F0: 2D 2D 00 0E 0D 6C 02 8F 20 46 52 45 49 47 45 42 |--...l.. FREIGEB| 00000500: 45 4E 20 45 49 4E 45 53 20 46 49 4C 45 53 00 2A |EN EINES FILES.*| 00000510: 0D 76 02 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.v.. -----------| 00000520: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 34 0D 80 02 8D |----------.4....| 00000530: 31 35 38 30 00 3E 0D 8A 02 8D 31 31 39 30 00 4E |1580.>....1190.N| 00000540: 0D 94 02 8B 47 46 B2 20 31 20 A7 37 31 30 00 6C |....GF. 1 .710.l| 00000550: 0D 9E 02 99 22 46 49 4C 45 20 4E 49 43 48 54 20 |...."FILE NICHT | 00000560: 47 45 46 55 4E 44 45 4E 21 22 3A 99 00 86 0D A8 |GEFUNDEN!":.....| 00000570: 02 99 22 57 45 49 54 45 52 20 4D 49 54 20 52 45 |.."WEITER MIT RE| 00000580: 54 55 52 4E 21 22 00 95 0D B2 02 85 58 24 3A A0 |TURN!"......X$:.| 00000590: 32 3A A0 31 35 00 9B 0D BC 02 8E 00 B2 0D C6 02 |2:.15...........| 000005A0: 98 31 35 2C 22 42 2D 50 22 3B 32 3B 58 AC 33 32 |.15,"B-P";2;X.32| 000005B0: AA 32 00 CC 0D D0 02 A1 23 32 2C 58 24 3A 8B 58 |.2......#2,X$:.X| 000005C0: 24 B2 22 22 A7 58 24 B2 C7 28 30 29 00 D9 0D DA |$."".X$..(0)....| 000005D0: 02 46 54 B2 C6 28 58 24 29 00 EF 0D E4 02 8B 28 |.FT..(X$)......(| 000005E0: 46 54 20 AF 20 36 34 29 B2 36 34 A7 37 36 30 00 |FT . 64).64.760.| 000005F0: 1B 0E EE 02 99 22 46 49 4C 45 20 49 53 54 20 42 |....."FILE IST B| 00000600: 45 52 45 49 54 53 20 46 52 45 49 47 45 47 45 42 |EREITS FREIGEGEB| 00000610: 45 4E 21 22 3A 99 3A 89 36 38 30 00 30 0E F8 02 |EN!":.:.680.0...| 00000620: 46 54 B2 28 46 54 20 AF 20 32 35 35 AB 36 34 29 |FT.(FT . 255.64)| 00000630: 00 47 0E 02 03 98 31 35 2C 22 42 2D 50 22 3B 32 |.G....15,"B-P";2| 00000640: 3B 58 AC 33 32 AA 32 00 55 0E 0C 03 98 32 2C C7 |;X.32.2.U....2,.| 00000650: 28 46 54 29 3B 00 67 0E 16 03 98 31 35 2C 22 42 |(FT);.g....15,"B| 00000660: 2D 50 22 3B 32 3B 30 00 7E 0E 20 03 98 31 35 2C |-P";2;0.~. ..15,| 00000670: 22 55 32 22 3B 32 3B 30 3B 54 54 3B 53 53 00 89 |"U2";2;0;TT;SS..| 00000680: 0E 2A 03 A0 32 3A A0 31 35 00 A2 0E 34 03 99 22 |.*..2:.15...4.."| 00000690: 46 49 4C 45 20 46 52 45 49 47 45 47 45 42 45 4E |FILE FREIGEGEBEN| 000006A0: 21 22 00 BC 0E 3E 03 99 22 57 45 49 54 45 52 20 |!"...>.."WEITER | 000006B0: 4D 49 54 20 52 45 54 55 52 4E 21 22 00 C4 0E 48 |MIT RETURN!"...H| 000006C0: 03 85 58 24 00 CA 0E 52 03 8E 00 E5 0E 5C 03 8F |..X$...R.....\..| 000006D0: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------| 000006E0: 2D 2D 2D 2D 2D 00 00 0F 66 03 8F 20 4C 4F 45 53 |-----...f.. LOES| 000006F0: 43 48 45 4E 20 45 49 4E 45 53 20 46 49 4C 45 53 |CHEN EINES FILES| 00000700: 00 1B 0F 70 03 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |...p.. ---------| 00000710: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 25 0F 7A 03 |-----------.%.z.| 00000720: 8D 31 35 38 30 00 2F 0F 84 03 8D 31 31 39 30 00 |.1580./....1190.| 00000730: 3F 0F 8E 03 8B 47 46 B2 20 31 20 A7 39 36 30 00 |?....GF. 1 .960.| 00000740: 5D 0F 98 03 99 22 46 49 4C 45 20 4E 49 43 48 54 |]...."FILE NICHT| 00000750: 20 47 45 46 55 4E 44 45 4E 21 22 3A 99 00 77 0F | GEFUNDEN!":..w.| 00000760: A2 03 99 22 57 45 49 54 45 52 20 4D 49 54 20 52 |..."WEITER MIT R| 00000770: 45 54 55 52 4E 21 22 00 86 0F AC 03 85 58 24 3A |ETURN!"......X$:| 00000780: A0 32 3A A0 31 35 00 8C 0F B6 03 8E 00 A3 0F C0 |.2:.15..........| 00000790: 03 98 31 35 2C 22 42 2D 50 22 3B 32 3B 58 AC 33 |..15,"B-P";2;X.3| 000007A0: 32 AA 32 00 BD 0F CA 03 A1 23 32 2C 58 24 3A 8B |2.2......#2,X$:.| 000007B0: 58 24 B2 22 22 A7 58 24 B2 C7 28 30 29 00 CA 0F |X$."".X$..(0)...| 000007C0: D4 03 46 54 B2 C6 28 58 24 29 00 E0 0F DE 03 8B |..FT..(X$)......| 000007D0: 28 46 54 20 AF 20 36 34 29 B2 30 A7 31 30 34 30 |(FT . 64).0.1040| 000007E0: 00 05 10 E8 03 99 22 41 43 48 54 55 4E 47 21 20 |......"ACHTUNG! | 000007F0: 46 49 4C 45 20 49 53 54 20 47 45 53 43 48 55 45 |FILE IST GESCHUE| 00000800: 54 5A 54 21 22 00 2A 10 F2 03 99 22 46 52 45 49 |TZT!".*...."FREI| 00000810: 47 45 42 45 4E 20 55 4E 44 20 4C 4F 45 53 43 48 |GEBEN UND LOESCH| 00000820: 45 4E 20 28 4A 2F 4E 29 3F 22 00 4E 10 FC 03 A1 |EN (J/N)?".N....| 00000830: 58 24 3A 8B 58 24 B2 22 22 B0 58 24 B3 B1 22 4E |X$:.X$."".X$.."N| 00000840: 22 AF 58 24 B3 B1 22 4A 22 A7 31 30 32 30 00 5F |".X$.."J".1020._| 00000850: 10 06 04 8B 58 24 B2 22 4E 22 A7 31 31 37 30 00 |....X$."N".1170.| 00000860: 74 10 10 04 99 22 53 49 43 48 45 52 20 28 4A 2F |t...."SICHER (J/| 00000870: 4E 29 3F 22 00 98 10 1A 04 A1 58 24 3A 8B 58 24 |N)?"......X$:.X$| 00000880: B2 22 22 B0 58 24 B3 B1 22 4E 22 AF 58 24 B3 B1 |."".X$.."N".X$..| 00000890: 22 4A 22 A7 31 30 35 30 00 A9 10 24 04 8B 58 24 |"J".1050...$..X$| 000008A0: B2 22 4E 22 A7 31 31 37 30 00 BE 10 2E 04 46 54 |."N".1170.....FT| 000008B0: B2 28 46 54 20 AF 20 32 35 35 AB 36 34 29 00 D5 |.(FT . 255.64)..| 000008C0: 10 38 04 98 31 35 2C 22 42 2D 50 22 3B 32 3B 58 |.8..15,"B-P";2;X| 000008D0: AC 33 32 AA 32 00 E3 10 42 04 98 32 2C C7 28 46 |.32.2...B..2,.(F| 000008E0: 54 29 3B 00 F5 10 4C 04 98 31 35 2C 22 42 2D 50 |T);...L..15,"B-P| 000008F0: 22 3B 32 3B 30 00 0C 11 56 04 98 31 35 2C 22 55 |";2;0...V..15,"U| 00000900: 32 22 3B 32 3B 30 3B 54 54 3B 53 53 00 19 11 60 |2";2;0;TT;SS...`| 00000910: 04 98 31 35 2C 22 49 30 22 00 29 11 6A 04 98 31 |..15,"I0".).j..1| 00000920: 35 2C 22 53 3A 22 AA 46 24 00 40 11 74 04 99 22 |5,"S:".F$.@.t.."| 00000930: 46 49 4C 45 20 47 45 4C 4F 45 53 43 48 54 21 22 |FILE GELOESCHT!"| 00000940: 00 5A 11 7E 04 99 22 57 45 49 54 45 52 20 4D 49 |.Z.~.."WEITER MI| 00000950: 54 20 52 45 54 55 52 4E 21 22 00 62 11 88 04 85 |T RETURN!".b....| 00000960: 58 24 00 6F 11 92 04 A0 32 3A A0 31 35 3A 8E 00 |X$.o....2:.15:..| 00000970: 75 11 9C 04 8F 00 94 11 A6 04 8F 20 2D 2D 2D 2D |u.......... ----| 00000980: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000990: 2D 2D 2D 2D 00 B3 11 B0 04 8F 20 4C 45 53 45 4E |----...... LESEN| 000009A0: 20 2F 20 53 55 43 48 45 4E 20 56 4F 4E 20 46 49 | / SUCHEN VON FI| 000009B0: 4C 45 53 00 D2 11 BA 04 8F 20 2D 2D 2D 2D 2D 2D |LES...... ------| 000009C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000009D0: 2D 2D 00 EF 11 C4 04 9F 31 35 2C 38 2C 31 35 2C |--......15,8,15,| 000009E0: 22 49 30 22 3A 9F 32 2C 38 2C 32 2C 22 23 22 00 |"I0":.2,8,2,"#".| 000009F0: 06 12 CE 04 98 31 35 2C 22 42 2D 52 22 3B 32 3B |.....15,"B-R";2;| 00000A00: 30 3B 31 38 3B 30 00 18 12 D8 04 98 31 35 2C 22 |0;18;0......15,"| 00000A10: 42 2D 50 22 3B 32 3B 30 00 2E 12 E2 04 98 31 35 |B-P";2;0......15| 00000A20: 2C 22 55 32 22 3B 32 3B 30 3B 31 38 3B 30 00 3A |,"U2";2;0;18;0.:| 00000A30: 12 EC 04 84 31 35 2C 58 31 24 00 4F 12 F6 04 8B |....15,X1$.O....| 00000A40: C5 28 58 31 24 29 B3 B1 32 36 A7 31 33 33 30 00 |.(X1$)..26.1330.| 00000A50: 80 12 00 05 99 22 42 49 54 54 45 20 56 4F 52 20 |....."BITTE VOR | 00000A60: 42 45 4E 55 54 5A 55 4E 47 20 44 49 45 53 45 53 |BENUTZUNG DIESES| 00000A70: 20 50 52 4F 47 52 41 4D 4D 53 20 44 45 4E 22 3B | PROGRAMMS DEN";| 00000A80: 00 A0 12 0A 05 99 22 53 43 48 52 45 49 42 53 43 |......"SCHREIBSC| 00000A90: 48 55 54 5A 20 45 4E 54 46 45 52 4E 45 4E 21 22 |HUTZ ENTFERNEN!"| 00000AA0: 00 BB 12 14 05 99 22 57 45 49 54 45 52 20 4D 49 |......"WEITER MI| 00000AB0: 54 20 52 45 54 55 52 4E 20 21 22 00 C3 12 1E 05 |T RETURN !".....| 00000AC0: 85 58 24 00 D0 12 28 05 A0 32 3A A0 31 35 3A 8E |.X$...(..2:.15:.| 00000AD0: 00 E8 12 32 05 54 B2 31 38 3A 53 B2 31 3A 54 54 |...2.T.18:S.1:TT| 00000AE0: B2 31 38 3A 53 53 B2 31 00 FE 12 3C 05 98 31 35 |.18:SS.1...<..15| 00000AF0: 2C 22 42 2D 52 22 3B 32 3B 30 3B 54 3B 53 00 10 |,"B-R";2;0;T;S..| 00000B00: 13 46 05 98 31 35 2C 22 42 2D 50 22 3B 32 3B 30 |.F..15,"B-P";2;0| 00000B10: 00 2A 13 50 05 A1 23 32 2C 58 24 3A 8B 58 24 B2 |.*.P..#2,X$:.X$.| 00000B20: 22 22 A7 58 24 B2 C7 28 30 29 00 41 13 5A 05 54 |"".X$..(0).A.Z.T| 00000B30: B2 C6 28 58 24 29 3A 8B 54 B3 B1 30 A7 54 54 B2 |..(X$):.T..0.TT.| 00000B40: 54 00 5B 13 64 05 A1 23 32 2C 58 24 3A 8B 58 24 |T.[.d..#2,X$:.X$| 00000B50: B2 22 22 A7 58 24 B2 C7 28 30 29 00 74 13 6E 05 |."".X$..(0).t.n.| 00000B60: 53 B2 C6 28 58 24 29 3A 8B 53 B3 B1 32 35 35 A7 |S..(X$):.S..255.| 00000B70: 53 53 B2 53 00 7F 13 78 05 81 58 B2 30 A4 37 00 |SS.S...x..X.0.7.| 00000B80: 96 13 82 05 98 31 35 2C 22 42 2D 50 22 3B 32 3B |.....15,"B-P";2;| 00000B90: 58 AC 33 32 AA 32 00 B0 13 8C 05 A1 23 32 2C 58 |X.32.2......#2,X| 00000BA0: 24 3A 8B 58 24 B2 22 22 A7 58 24 B2 C7 28 30 29 |$:.X$."".X$..(0)| 00000BB0: 00 C2 13 96 05 8B C6 28 58 24 29 B2 30 A7 31 35 |.......(X$).0.15| 00000BC0: 33 30 00 D9 13 A0 05 98 31 35 2C 22 42 2D 50 22 |30......15,"B-P"| 00000BD0: 3B 32 3B 58 AC 33 32 AA 35 00 E4 13 AA 05 46 46 |;2;X.32.5.....FF| 00000BE0: 24 B2 22 22 00 F0 13 B4 05 81 59 B2 30 A4 31 35 |$.""......Y.0.15| 00000BF0: 00 0A 14 BE 05 A1 23 32 2C 58 24 3A 8B 58 24 B2 |......#2,X$:.X$.| 00000C00: 22 22 A7 58 24 B2 C7 28 30 29 00 1E 14 C8 05 8B |"".X$..(0)......| 00000C10: C6 28 58 24 29 B2 31 36 30 A7 31 35 30 30 00 2D |.(X$).160.1500.-| 00000C20: 14 D2 05 46 46 24 B2 46 46 24 AA 58 24 00 34 14 |...FF$.FF$.X$.4.| 00000C30: DC 05 82 59 00 47 14 E6 05 8B 46 4C A7 99 46 46 |...Y.G....FL..FF| 00000C40: 24 3A 89 31 35 33 30 00 5E 14 F0 05 8B 46 24 B2 |$:.1530.^....F$.| 00000C50: 46 46 24 A7 47 46 B2 31 3A 89 31 35 37 30 00 65 |FF$.GF.1:.1570.e| 00000C60: 14 FA 05 82 58 00 74 14 04 06 8B 54 B3 B1 30 A7 |....X.t....T..0.| 00000C70: 31 33 34 30 00 7F 14 0E 06 A0 32 3A A0 31 35 00 |1340......2:.15.| 00000C80: B3 14 18 06 8B 20 46 4C B2 30 A7 99 22 46 49 4C |..... FL.0.."FIL| 00000C90: 45 4E 41 4D 45 20 4E 49 43 48 54 20 47 45 46 55 |ENAME NICHT GEFU| 00000CA0: 4E 44 45 4E 20 21 22 3A 81 49 B2 31 A4 32 30 30 |NDEN !":.I.1.200| 00000CB0: 30 3A 82 00 B9 14 22 06 8E 00 D6 14 2C 06 8F 20 |0:....".....,.. | 00000CC0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000CD0: 2D 2D 2D 2D 2D 2D 00 F3 14 36 06 8F 20 45 49 4E |------...6.. EIN| 00000CE0: 47 41 42 45 20 44 45 53 20 46 49 4C 45 4E 41 4D |GABE DES FILENAM| 00000CF0: 45 4E 53 00 10 15 40 06 8F 20 2D 2D 2D 2D 2D 2D |ENS...@.. ------| 00000D00: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000D10: 00 18 15 4A 06 99 3A 99 00 32 15 54 06 85 22 4E |...J..:..2.T.."N| 00000D20: 41 4D 45 20 44 45 53 20 46 49 4C 45 53 3A 22 3B |AME DES FILES:";| 00000D30: 46 24 00 46 15 5E 06 8B C3 28 46 24 29 B3 B2 31 |F$.F.^...(F$)..1| 00000D40: 36 A7 31 36 35 30 00 66 15 68 06 99 22 46 49 4C |6.1650.f.h.."FIL| 00000D50: 45 4E 41 4D 45 20 5A 55 20 4C 41 4E 47 20 21 22 |ENAME ZU LANG !"| 00000D60: 3A 89 31 36 32 30 00 74 15 72 06 47 46 B2 30 3A |:.1620.t.r.GF.0:| 00000D70: 46 4C B2 30 00 7A 15 7C 06 8E 00 00 00 84 AD 00 |FL.0.z.|........| 00000D80: 24 |$ |
..'.D..53280,2:.53281,2:.G(158);G(147);. S.N...4);"============================== =="..X...4);"LOESCHEN UND SCHUETZEN VON FILES".......4);"====================== =========="......:......."MIT DIESEM PRO GRAMMM KOENNEN FILES GE-"... .."SCHUETZT , GELOESCHT UND FREIGEGEBEN"......"WE RDEN.".&....:..N.....6);" -1- AUFLISTEN ALLER FILES":..V.H...6);" -2- SCHUETZEN EINES FILES":....R...6);" -3- FREIGEBEN EINES FILES":..F.....6);" -4- LOESCHEN EINES FILES":........6);" -5- BEENDEN DE S PROGRAMMS":.......X$:.X$."".E(X$).1.E( X$).5.240. ....E(X$).5...;....E(X$).280, 360,610,860.D....100.`.... ------------- --------.|.".. AUFLISTEN ALLER FILES..., .. ---------------------...6..G(147)...@ .FL.1:.1190.N.J..:."WEITER MIT RETURN".V .T..X$...^.FL.0:....H.. ---------------- -----...R.. SCHUETZEN EINES FILES.5.|.. ---------------------.?....1580.I....119 0.Y....GF. 1 .460.W...."FILE NICHT GEFUN DEN!":......."WEITER MIT RETURN!". ....X $: 2: 15...B.....L..15,"B-P";2;X.32.2.W. V..#2,X$:.X$."".X$.G(0).....FT.F(X$).... ..(FT . 64).0.510.$...."FILE IST BEREITS GESCHUETZT!":.:.430.5...FT.(FT . 64).L. ...15,"B-P";2;X.32.2.Z....2,G(FT);.L.... 15,"B-P";2;0...&..15,"U2";2;0;TT;SS...0. 2: 15...:.."FILE GESCHUETZT !".A.D.."WE ITER MIT RETURN!".I.N..X$.V.X. 2: 15:... .B.. ---------------------...L.. FREIGEB EN EINES FILES.*.V.. ------------------- --.4....1580.>....1190.N....GF. 1 .710.L ...."FILE NICHT GEFUNDEN!":......."WEITE R MIT RETURN!"......X$: 2: 15.........F. .15,"B-P";2;X.32.2.L.P..#2,X$:.X$."".X$. G(0).Y.Z.FT.F(X$)......(FT . 64).64.760. ....."FILE IST BEREITS FREIGEGEBEN!":.:. 680.0...FT.(FT . 255.64).G....15,"B-P";2 ;X.32.2.U....2,G(FT);.G....15,"B-P";2;0. ~. ..15,"U2";2;0;TT;SS...*. 2: 15...4.." FILE FREIGEGEBEN!"...>.."WEITER MIT RETU RN!".D.H..X$.J.R.....\.. --------------- -----...F.. LOESCHEN EINES FILES...P.. - -------------------.%.Z..1580./....1190. ?....GF. 1 .960.]...."FILE NICHT GEFUNDE N!":..W...."WEITER MIT RETURN!"......X$: 2: 15............15,"B-P";2;X.32.2...J. .#2,X$:.X$."".X$.G(0).J.T.FT.F(X$)...... (FT . 64).0.1040......"ACHTUNG! FILE IST GESCHUETZT!".*...."FREIGEBEN UND LOESCH EN (J/N)?".N....X$:.X$."".X$.."N".X$.."J ".1020._....X$."N".1170.T...."SICHER (J/ N)?"......X$:.X$."".X$.."N".X$.."J".1050 ...$..X$."N".1170.....FT.(FT . 255.64).U .8..15,"B-P";2;X.32.2...B..2,G(FT);...L. .15,"B-P";2;0...V..15,"U2";2;0;TT;SS...` ..15,"I0".).J..15,"S:".F$.@.T.."FILE GEL OESCHT!".Z.~.."WEITER MIT RETURN!".B.... X$.O... 2: 15:..U.......... ------------ ------------...... LESEN / SUCHEN VON FI LES.R.... ------------------------...D.. 15,8,15,"I0":.2,8,2,"#"...N..15,"B-R";2; 0;18;0...X..15,"B-P";2;0......15,"U2";2; 0;18;0.:....15,X1$.O....E(X1$)..26.1330. ....."BITTE VOR BENUTZUNG DIESES PROGRAM MS DEN";. ...."SCHREIBSCHUTZ ENTFERNEN!" ......"WEITER MIT RETURN !".C....X$.P.(. 2: 15:....2.T.18:S.1:TT.18:SS.1...<..15 ,"B-R";2;0;T;S...F..15,"B-P";2;0.*.P..#2 ,X$:.X$."".X$.G(0).A.Z.T.F(X$):.T..0.TT. T.[.D..#2,X$:.X$."".X$.G(0).T.N.S.F(X$): .S..255.SS.S..X..X.0.7......15,"B-P";2; X.32.2......#2,X$:.X$."".X$.G(0).B....F( X$).0.1530.Y. ..15,"B-P";2;X.32.5.....FF $.""......Y.0.15......#2,X$:.X$."".X$.G( 0)...H..F(X$).160.1500.-.R.FF$.FF$.X$.4. ...Y.G....FL..FF$:.1530.^....F$.FF$.GF.1 :.1570.E....X.T....T..0.1340.... 2: 15. ..... FL.0.."FILENAME NICHT GEFUNDEN !": .I.1.2000:...."...V.,.. ---------------- ------...6.. EINGABE DES FILENAMENS...@. . ----------------------...J..:..2.T.."N AME DES FILES:";F$.F.^..C(F$)..16.1650.F .H.."FILENAME ZU LANG !":.1620.T.R.GF.0: FL.0.Z.|........$
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL