_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

HEADER CHANGE

FILE INFORMATION

FILENAME(S): HEADER CHANGE

FILE TYPE(S): PRG

FILE SIZE: 2.4K

FIRST SEEN: 2025-12-02 23:21:54

APPEARS ON: 1 disk(s)

FILE HASH

d2d265efb76a763a46903f3c6af62859a139ff66749bc5bfac679cd0fa36c5b9

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
DRAGAN PROG HEADER CHANGE PRG swasti, dinkel 20 6 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 1C 08 82 00 86 50  24 28 33 29 3A 81 49 B2  |.......P$(3):.I.|
00000010: 30 A4 33 3A 87 50 24 28  49 29 3A 82 00 22 08 8C  |0.3:.P$(I):.."..|
00000020: 00 3A 00 2F 08 A0 00 9F  31 35 2C 38 2C 31 35 00  |.:./....15,8,15.|
00000030: 41 08 AA 00 99 22 93 22  3A 98 31 35 2C 22 49 30  |A....".":.15,"I0|
00000040: 22 00 53 08 B4 00 84 31  35 2C 45 4E 2C 45 24 2C  |".S....15,EN,E$,|
00000050: 54 2C 53 00 73 08 BE 00  99 22 20 44 49 53 4B 2D  |T,S.s...." DISK-|
00000060: 53 54 41 54 55 53 3A 22  45 4E 3B 45 24 3B 54 3B  |STATUS:"EN;E$;T;|
00000070: 53 3A 99 00 84 08 C8 00  8B 45 4E B3 B1 30 A7 A0  |S:.......EN..0..|
00000080: 31 35 3A 80 00 9F 08 D2  00 98 31 35 2C 22 4D 2D  |15:.......15,"M-|
00000090: 52 22 C7 28 31 38 29 C7  28 30 29 C7 28 32 29 00  |R".(18).(0).(2).|
000000A0: BC 08 DC 00 A1 23 31 35  2C 49 31 24 2C 49 32 24  |.....#15,I1$,I2$|
000000B0: 3A 49 44 24 B2 49 31 24  AA 49 32 24 00 CE 08 E6  |:ID$.I1$.I2$....|
000000C0: 00 A0 32 3A 9F 32 2C 38  2C 32 2C 22 23 22 00 E4  |..2:.2,8,2,"#"..|
000000D0: 08 F0 00 98 31 35 2C 22  55 31 20 32 20 30 20 31  |....15,"U1 2 0 1|
000000E0: 38 20 30 22 00 F8 08 FA  00 98 31 35 2C 22 42 2D  |8 0"......15,"B-|
000000F0: 50 20 32 20 31 34 34 22  00 13 09 04 01 99 22 20  |P 2 144"......" |
00000100: 41 4B 54 55 45 4C 4C 45  52 20 48 45 41 44 45 52  |AKTUELLER HEADER|
00000110: 3A 11 22 00 1E 09 0E 01  99 22 20 12 22 3B 00 38  |:."......" .";.8|
00000120: 09 18 01 81 49 B2 30 A4  32 32 3A A1 23 32 2C 58  |....I.0.22:.#2,X|
00000130: 24 3A 99 58 24 3B 3A 82  00 42 09 22 01 99 22 92  |$:.X$;:..B."..".|
00000140: 11 22 00 5D 09 2C 01 98  31 35 2C 22 42 2D 50 20  |.".].,..15,"B-P |
00000150: 32 20 32 33 39 22 3A A1  23 32 2C 58 24 00 6E 09  |2 239":.#2,X$.n.|
00000160: 36 01 58 B2 C6 28 58 24  AA C7 28 30 29 29 00 81  |6.X..(X$..(0))..|
00000170: 09 40 01 8B 58 A7 99 50  24 28 31 29 50 24 28 32  |.@..X..P$(1)P$(2|
00000180: 29 00 96 09 4A 01 8B 58  B2 30 A7 99 50 24 28 31  |)...J..X.0..P$(1|
00000190: 29 50 24 28 33 29 00 AA  09 54 01 98 31 35 2C 22  |)P$(3)...T..15,"|
000001A0: 42 2D 50 20 32 20 31 36  32 22 00 C6 09 5E 01 A1  |B-P 2 162"...^..|
000001B0: 23 32 2C 49 31 24 2C 49  32 24 3A 49 41 24 B2 49  |#2,I1$,I2$:IA$.I|
000001C0: 31 24 AA 49 32 24 00 E0  09 68 01 8B 49 44 24 B3  |1$.I2$...h..ID$.|
000001D0: B1 49 41 24 A7 99 50 24  28 30 29 50 24 28 32 29  |.IA$..P$(0)P$(2)|
000001E0: 00 F9 09 72 01 8B 49 44  24 B2 49 41 24 A7 99 50  |...r..ID$.IA$..P|
000001F0: 24 28 30 29 50 24 28 33  29 00 01 0A 7C 01 99 3A  |$(0)P$(3)...|..:|
00000200: 99 00 07 0A 86 01 3A 00  37 0A 90 01 99 22 AF AF  |......:.7...."..|
00000210: AF AF AF AF AF AF AF AF  AF AF AF AF AF AF AF AF  |................|
00000220: AF AF AF AF AF AF AF AF  AF AF AF AF AF AF AF AF  |................|
00000230: AF AF AF AF AF AF 22 00  53 0A 91 01 99 22 20 20  |......".S...."  |
00000240: 20 20 20 20 20 20 4D 20  45 20 4E 20 55 20 45 20  |      M E N U E |
00000250: 3A 11 22 00 73 0A 9A 01  99 22 20 20 20 20 20 20  |:.".s...."      |
00000260: 20 20 31 2D 4E 41 4D 45  4E 20 41 45 4E 44 45 52  |  1-NAMEN AENDER|
00000270: 4E 11 22 00 90 0A A4 01  99 22 20 20 20 20 20 20  |N."......"      |
00000280: 20 20 32 2D 49 44 20 41  45 4E 44 45 52 4E 11 22  |  2-ID AENDERN."|
00000290: 00 BB 0A AE 01 99 22 20  20 20 20 20 20 20 20 33  |......"        3|
000002A0: 2D 4F 52 49 47 49 4E 41  4C 20 49 44 20 52 45 53  |-ORIGINAL ID RES|
000002B0: 54 41 55 52 49 45 52 45  4E 11 22 00 E6 0A B3 01  |TAURIEREN.".....|
000002C0: 99 22 20 20 20 20 20 20  20 20 34 2D 44 49 53 4B  |."        4-DISK|
000002D0: 20 53 43 48 55 45 54 5A  45 4E 2F 46 52 45 49 47  | SCHUETZEN/FREIG|
000002E0: 45 42 45 4E 11 22 00 FF  0A B8 01 99 22 20 20 20  |EBEN."......"   |
000002F0: 20 20 20 20 20 35 2D 42  45 45 4E 44 45 4E 22 00  |     5-BEENDEN".|
00000300: 12 0B C2 01 A1 4B 24 3A  8B 4B 24 B2 22 22 A7 34  |.....K$:.K$."".4|
00000310: 35 30 00 32 0B CC 01 91  C5 28 4B 24 29 89 35 30  |50.2.....(K$).50|
00000320: 30 2C 35 38 30 2C 36 34  30 2C 31 30 30 30 2C 36  |0,580,640,1000,6|
00000330: 37 30 00 3F 0B D6 01 A0  32 3A A0 31 35 3A 8A 00  |70.?....2:.15:..|
00000340: 45 0B E0 01 3A 00 5C 0B  F4 01 85 22 20 4E 45 55  |E...:.\...." NEU|
00000350: 45 52 20 4E 41 4D 45 20  22 3B 4E 24 00 72 0B FE  |ER NAME ";N$.r..|
00000360: 01 4C B2 C3 28 4E 24 29  3A 8B 4C B1 31 36 A7 35  |.L..(N$):.L.16.5|
00000370: 30 30 00 91 0B 08 02 81  49 B2 31 A4 28 31 36 AB  |00......I.1.(16.|
00000380: 4C 29 3A 4E 24 B2 4E 24  AA C7 28 31 36 30 29 3A  |L):N$.N$..(160):|
00000390: 82 00 AC 0B 12 02 98 31  35 2C 22 42 2D 50 20 32  |.......15,"B-P 2|
000003A0: 20 31 34 34 22 3A 98 32  2C 4E 24 3B 00 C7 0B 1C  | 144":.2,N$;....|
000003B0: 02 98 31 35 2C 22 42 2D  50 20 32 20 32 33 39 22  |..15,"B-P 2 239"|
000003C0: 3A 98 32 2C 4E 24 3B 00  E2 0B 26 02 98 31 35 2C  |:.2,N$;...&..15,|
000003D0: 22 55 32 20 32 20 30 20  31 38 20 30 22 3A 89 31  |"U2 2 0 18 0":.1|
000003E0: 37 30 00 E8 0B 30 02 3A  00 0A 0C 44 02 85 22 20  |70...0.:...D.." |
000003F0: 4E 45 55 45 20 49 44 28  32 2D 35 20 5A 45 49 43  |NEUE ID(2-5 ZEIC|
00000400: 48 45 4E 29 20 22 3B 49  44 24 00 24 0C 4E 02 4C  |HEN) ";ID$.$.N.L|
00000410: B2 C3 28 49 44 24 29 3A  8B 4C B3 32 B0 4C B1 35  |..(ID$):.L.2.L.5|
00000420: A7 35 38 30 00 40 0C 58  02 98 31 35 2C 22 42 2D  |.580.@.X..15,"B-|
00000430: 50 20 32 20 31 36 32 22  3A 98 32 2C 49 44 24 3B  |P 2 162":.2,ID$;|
00000440: 00 5B 0C 62 02 98 31 35  2C 22 55 32 20 32 20 30  |.[.b..15,"U2 2 0|
00000450: 20 31 38 20 30 22 3A 89  31 37 30 00 61 0C 6C 02  | 18 0":.170.a.l.|
00000460: 3A 00 7E 0C 80 02 49 44  24 B2 49 44 24 AA C7 28  |:.~...ID$.ID$..(|
00000470: 31 36 30 29 AA 22 32 41  22 3A 89 36 30 30 00 84  |160)."2A":.600..|
00000480: 0C 8A 02 3A 00 96 0C 9E  02 A0 32 3A A0 31 35 3A  |...:......2:.15:|
00000490: 99 22 93 22 3A 80 00 9C  0C A8 02 3A 00 BD 0C BC  |.".":......:....|
000004A0: 02 83 22 20 49 44 20 20  3D 22 2C 22 20 4E 41 4D  |.." ID  ="," NAM|
000004B0: 45 3D 22 2C 47 45 41 45  4E 44 45 52 54 00 DC 0C  |E=",GEAENDERT...|
000004C0: C6 02 83 4F 52 49 47 49  4E 41 4C 20 28 57 49 45  |...ORIGINAL (WIE|
000004D0: 20 46 4F 52 4D 41 54 49  45 52 54 29 00 E5 0C 9D  | FORMATIERT)....|
000004E0: 03 8D 39 36 35 00 00 0D  A2 03 9F 31 2C 38 2C 31  |..965......1,8,1|
000004F0: 35 2C 22 49 22 3A 9F 32  2C 38 2C 32 2C 22 23 22  |5,"I":.2,8,2,"#"|
00000500: 00 15 0D A7 03 98 31 2C  22 55 31 20 32 20 30 20  |......1,"U1 2 0 |
00000510: 31 38 20 30 22 00 28 0D  AC 03 98 31 2C 22 42 2D  |18 0".(....1,"B-|
00000520: 50 20 32 20 31 34 34 22  00 33 0D B1 03 44 4E 24  |P 2 144".3...DN$|
00000530: B2 22 22 00 54 0D B6 03  81 49 B2 31 A4 32 33 3A  |."".T....I.1.23:|
00000540: A1 23 32 2C 41 24 3A 44  4E 24 B2 44 4E 24 AA 41  |.#2,A$:DN$.DN$.A|
00000550: 24 3A 82 49 00 5A 0D BB  03 8E 00 80 0D C0 03 8F  |$:.I.Z..........|
00000560: 2A 2A 2A 2A 2A 2A 2A 2A  20 43 48 45 43 4B 20 44  |******** CHECK D|
00000570: 49 53 4B 20 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |ISK ************|
00000580: 00 8F 0D C5 03 9F 31 2C  38 2C 31 35 3A A0 31 00  |......1,8,15:.1.|
00000590: AF 0D CA 03 8B 53 54 B3  B1 30 A7 39 38 35 3A 8F  |.....ST..0.985:.|
000005A0: 20 41 4E 47 45 53 43 48  41 4C 54 45 54 20 3F 00  | ANGESCHALTET ?.|
000005B0: C4 0D CF 03 9F 31 2C 38  2C 31 35 2C 22 49 22 3A  |.....1,8,15,"I":|
000005C0: 84 31 2C 41 00 E5 0D D4  03 8B 41 B2 30 A7 A0 31  |.1,A......A.0..1|
000005D0: 3A 8E 3A 8F 20 44 49 53  4B 20 45 49 4E 47 45 4C  |:.:. DISK EINGEL|
000005E0: 45 47 54 20 3F 00 08 0E  D9 03 97 35 33 32 38 31  |EGT ?......53281|
000005F0: 2C 32 3A 99 22 93 22 3A  99 22 4C 41 55 46 57 45  |,2:.".":."LAUFWE|
00000600: 52 4B 20 4F 4B 20 3F 22  00 11 0E DE 03 89 39 39  |RK OK ?"......99|
00000610: 35 00 1B 0E E3 03 89 31  30 30 35 00 40 0E E8 03  |5......1005.@...|
00000620: 8F 2A 2A 2A 2A 2A 2A 2A  20 53 43 48 52 45 49 42  |.******* SCHREIB|
00000630: 53 43 48 55 54 5A 20 2A  2A 2A 2A 2A 2A 2A 2A 2A  |SCHUTZ *********|
00000640: 00 4E 0E E9 03 A0 31 3A  A0 32 3A A0 31 35 00 74  |.N....1:.2:.15.t|
00000650: 0E ED 03 99 22 93 20 20  20 20 20 20 20 20 20 20  |....".          |
00000660: 20 2D 20 53 43 48 52 45  49 42 53 43 48 55 54 5A  | - SCHREIBSCHUTZ|
00000670: 20 2D 11 22 00 91 0E F2  03 8D 39 32 35 3A 99 22  | -."......925:."|
00000680: 11 20 20 20 20 20 20 20  20 12 22 44 4E 24 22 92  |.        ."DN$".|
00000690: 22 00 AD 0E F7 03 98 31  2C 22 4D 2D 52 22 3B C7  |"......1,"M-R";.|
000006A0: 28 31 29 3B C7 28 31 29  3B C7 28 31 29 00 CB 0E  |(1);.(1);.(1)...|
000006B0: FC 03 A1 23 31 2C 41 24  3A 8B 41 24 B2 22 41 22  |...#1,A$:.A$."A"|
000006C0: B0 41 24 B2 22 22 A7 31  30 38 35 00 EC 0E 01 04  |.A$."".1085.....|
000006D0: 99 22 11 11 11 11 44 49  53 4B 45 54 54 45 20 47  |."....DISKETTE G|
000006E0: 45 53 43 48 55 45 54 5A  54 20 21 22 00 1C 0F 06  |ESCHUETZT !"....|
000006F0: 04 99 22 11 11 53 4F 4C  4C 20 44 49 45 20 44 49  |.."..SOLL DIE DI|
00000700: 53 4B 45 54 54 45 20 46  52 45 49 47 45 47 45 42  |SKETTE FREIGEGEB|
00000710: 45 4E 20 57 45 52 44 45  4E 20 3F 22 00 3C 0F 0B  |EN WERDEN ?".<..|
00000720: 04 99 3A 99 22 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |..:."...........|
00000730: 1D 1D 1D 1D 1D 28 4A 2F  4E 29 3F 22 00 50 0F 10  |.....(J/N)?".P..|
00000740: 04 A1 52 24 3A 8B 52 24  B2 22 22 A7 31 30 34 30  |..R$:.R$."".1040|
00000750: 00 83 0F 15 04 8B 52 24  B2 22 4A 22 A7 99 22 91  |......R$."J"..".|
00000760: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |................|
00000770: 1D 1D 1D 1D 1D 1D 1D 1D  12 4A 41 92 22 3A 89 31  |.........JA.":.1|
00000780: 30 36 30 00 B8 0F 1A 04  8B 52 24 B2 22 4E 22 A7  |060......R$."N".|
00000790: 99 22 91 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |."..............|
000007A0: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 12 4E 45 49 4E  |............NEIN|
000007B0: 92 22 3A 89 31 31 34 30  00 C2 0F 1F 04 89 31 30  |.":.1140......10|
000007C0: 34 30 00 E4 0F 24 04 98  31 2C 22 4D 2D 57 22 3B  |40...$..1,"M-W";|
000007D0: C7 28 31 29 3B C7 28 31  29 3B C7 28 31 29 3B C7  |.(1);.(1);.(1);.|
000007E0: 28 36 35 29 00 FE 0F 29  04 98 31 2C 22 42 2D 50  |(65)...)..1,"B-P|
000007F0: 20 32 20 32 22 3A 98 32  2C C7 28 36 35 29 00 21  | 2 2":.2,.(65).!|
00000800: 10 2E 04 98 31 2C 22 42  2D 50 20 32 20 31 36 35  |....1,"B-P 2 165|
00000810: 22 3A 98 32 2C C7 28 35  30 29 3B C7 28 36 35 29  |":.2,.(50);.(65)|
00000820: 3B 00 36 10 33 04 98 31  2C 22 55 32 20 32 20 30  |;.6.3..1,"U2 2 0|
00000830: 20 31 38 20 30 22 00 40  10 38 04 89 31 31 33 35  | 18 0".@.8..1135|
00000840: 00 67 10 3D 04 99 22 11  11 11 11 44 49 53 4B 45  |.g.=.."....DISKE|
00000850: 54 54 45 20 4E 49 43 48  54 20 47 45 53 43 48 55  |TTE NICHT GESCHU|
00000860: 45 54 5A 54 20 21 22 00  96 10 42 04 99 22 11 11  |ETZT !"...B.."..|
00000870: 53 4F 4C 4C 20 44 49 45  20 44 49 53 4B 45 54 54  |SOLL DIE DISKETT|
00000880: 45 20 47 45 53 43 48 55  45 54 5A 54 20 57 45 52  |E GESCHUETZT WER|
00000890: 44 45 4E 20 3F 22 00 B6  10 47 04 99 3A 99 22 1D  |DEN ?"...G..:.".|
000008A0: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 28  |...............(|
000008B0: 4A 2F 4E 29 3F 22 00 CA  10 4C 04 A1 52 24 3A 8B  |J/N)?"...L..R$:.|
000008C0: 52 24 B2 22 22 A7 31 31  30 30 00 FD 10 51 04 8B  |R$."".1100...Q..|
000008D0: 52 24 B2 22 4A 22 A7 99  22 91 1D 1D 1D 1D 1D 1D  |R$."J"..".......|
000008E0: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |................|
000008F0: 1D 1D 12 4A 41 92 22 3A  89 31 31 32 30 00 32 11  |...JA.":.1120.2.|
00000900: 56 04 8B 52 24 B2 22 4E  22 A7 99 22 91 1D 1D 1D  |V..R$."N".."....|
00000910: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |................|
00000920: 1D 1D 1D 1D 1D 12 4E 45  49 4E 92 22 3A 89 31 31  |......NEIN.":.11|
00000930: 34 30 00 3C 11 5B 04 89  31 31 30 30 00 56 11 60  |40.<.[..1100.V.`|
00000940: 04 98 31 2C 22 42 2D 50  20 32 20 32 22 3A 98 32  |..1,"B-P 2 2":.2|
00000950: 2C C7 28 36 36 29 00 79  11 65 04 98 31 2C 22 42  |,.(66).y.e..1,"B|
00000960: 2D 50 20 32 20 31 36 35  22 3A 98 32 2C C7 28 36  |-P 2 165":.2,.(6|
00000970: 30 29 3B C7 28 36 30 29  3B 00 8E 11 6A 04 98 31  |0);.(60);...j..1|
00000980: 2C 22 55 32 20 32 20 30  20 31 38 20 30 22 00 9C  |,"U2 2 0 18 0"..|
00000990: 11 6F 04 99 22 2D 20 4F  4B 20 2D 22 00 A6 11 74  |.o.."- OK -"...t|
000009A0: 04 A0 32 3A A0 31 00 B8  11 79 04 81 4C B2 31 A4  |..2:.1...y..L.1.|
000009B0: 31 30 30 30 3A 82 3A 8A  00 00 00                 |1000:.:....     |
.......P$(3):.I.0.3:.P$(I):.."...:./. ..
15,8,15.A....".":.15,"I0".S....15,EN,E$,
T,S.S...." DISK-STATUS:"EN;E$;T;S:....H.
.EN..0. 15:....R..15,"M-R"G(18)G(0)G(2).
.....#15,I1$,I2$:ID$.I1$.I2$.N... 2:.2,8
,2,"#"......15,"U1 2 0 18 0"......15,"B-
P 2 144"......" AKTUELLER HEADER:.".....
." .";.8....I.0.22:.#2,X$:.X$;:..B."..".
.".].,..15,"B-P 2 239":.#2,X$.N.6.X.F(X$
.G(0))...@..X..P$(1)P$(2)...J..X.0..P$(1
)P$(3)...T..15,"B-P 2 162".F.^..#2,I1$,I
2$:IA$.I1$.I2$...H..ID$..IA$..P$(0)P$(2)
...R..ID$.IA$..P$(0)P$(3)...|..:......:.
7...."..................................
......".S...."        M E N U E :.".S...
."        1-NAMEN AENDERN."......"      
  2-ID AENDERN."......"        3-ORIGINA
L ID RESTAURIEREN."......"        4-DISK
 SCHUETZEN/FREIGEBEN."......"        5-B
EENDEN"...B..K$:.K$."".450.2.L..E(K$).50
0,580,640,1000,670.?.V. 2: 15:..E...:.\.
..." NEUER NAME ";N$.R...L.C(N$):.L.16.5
00......I.1.(16.L):N$.N$.G(160):.......1
5,"B-P 2 144":.2,N$;.G....15,"B-P 2 239"
:.2,N$;...&..15,"U2 2 0 18 0":.170...0.:
...D.." NEUE ID(2-5 ZEICHEN) ";ID$.$.N.L
.C(ID$):.L.2.L.5.580.@.X..15,"B-P 2 162"
:.2,ID$;.[.B..15,"U2 2 0 18 0":.170.A.L.
:.~...ID$.ID$.G(160)."2A":.600.....:....
. 2: 15:.".":......:......" ID  ="," NAM
E=",GEAENDERT...F..ORIGINAL (WIE FORMATI
ERT)......965......1,8,15,"I":.2,8,2,"#"
......1,"U1 2 0 18 0".(....1,"B-P 2 144"
.3...DN$."".T....I.1.23:.#2,A$:DN$.DN$.A
$:.I.Z..........******** CHECK DISK ****
********...E..1,8,15: 1...J..ST..0.985:.
 ANGESCHALTET ?.D.O..1,8,15,"I":.1,A...T
..A.0. 1:.:. DISK EINGELEGT ?...Y..53281
,2:.".":."LAUFWERK OK ?"......995......1
005.@....******* SCHREIBSCHUTZ *********
.N... 1: 2: 15.T....".           - SCHRE
IBSCHUTZ -."......925:.".        ."DN$".
"......1,"M-R";G(1);G(1);G(1).K....#1,A$
:.A$."A".A$."".1085......"....DISKETTE G
ESCHUETZT !"......"..SOLL DIE DISKETTE F
REIGEGEBEN WERDEN ?".<....:."...........
.....(J/N)?".P....R$:.R$."".1040......R$
."J".."..........................JA.":.1
060......R$."N".."......................
....NEIN.":.1140.B....1040...$..1,"M-W";
G(1);G(1);G(1);G(65)...)..1,"B-P 2 2":.2
,G(65).!....1,"B-P 2 165":.2,G(50);G(65)
;.6.3..1,"U2 2 0 18 0".@.8..1135.G.=..".
...DISKETTE NICHT GESCHUETZT !"...B.."..
SOLL DIE DISKETTE GESCHUETZT WERDEN ?"..
.G..:."................(J/N)?".J.L..R$:.
R$."".1100...Q..R$."J".."...............
...........JA.":.1120.2.V..R$."N".."....
......................NEIN.":.1140.<.[..
1100.V.`..1,"B-P 2 2":.2,G(66).Y.E..1,"B
-P 2 165":.2,G(60);G(60);...J..1,"U2 2 0
 18 0"...O.."- OK -"...T. 2: 1...Y..L.1.
1000:.:....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL