00000000: 01 1C 28 1C 01 00 8F 2B 2B 2B 2B 2B 2B 2B 2B 2B |..(....+++++++++|
00000010: 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B |++++++++++++++++|
00000020: 2B 2B 2B 2B 2B 2B 2B 2B 00 4F 1C 03 00 8F 2B 2B |++++++++.O....++|
00000030: 2B 2B 20 20 44 49 53 4B 45 54 54 45 4E 4E 41 4D |++ DISKETTENNAM|
00000040: 45 20 41 45 4E 44 45 52 4E 20 20 2B 2B 2B 2B 00 |E AENDERN ++++.|
00000050: 76 1C 04 00 8F 2B 2B 2B 20 20 55 57 45 20 52 45 |v....+++ UWE RE|
00000060: 50 50 4C 49 4E 47 45 52 20 20 28 31 39 38 33 29 |PPLINGER (1983)|
00000070: 20 20 2B 2B 2B 2B 00 9D 1C 05 00 8F 2B 2B 2B 2B | ++++......++++|
00000080: 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B |++++++++++++++++|
00000090: 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 00 A3 1C |+++++++++++++...|
000000A0: 09 00 3A 00 C3 1C 0A 00 E8 3A E7 20 35 2C 30 38 |..:......:. 5,08|
000000B0: 3A 99 20 C7 28 31 34 29 3B C7 28 32 37 29 AA 22 |:. .(14);.(27)."|
000000C0: 4E 22 3B 00 D7 1C 0C 00 8B 20 CE 09 28 32 29 B2 |N";...... ..(2).|
000000D0: 38 30 20 A7 20 FE 25 00 E9 1C E8 03 8D 20 31 35 |80 . .%...... 15|
000000E0: 30 30 3A E7 20 35 2C 31 32 00 15 1D FC 03 E0 2C |00:. 5,12......,|
000000F0: 33 34 2C 36 3A 85 20 57 24 3A 8F 20 52 49 43 48 |34,6:. W$:. RICH|
00000100: 54 49 47 45 20 44 49 53 4B 20 42 45 53 54 41 45 |TIGE DISK BESTAE|
00000110: 54 49 47 45 4E 00 2C 1D 06 04 8B 57 24 B3 B1 22 |TIGEN.,....W$.."|
00000120: 4A 22 A7 20 E0 2C 35 2C 32 32 3A 80 00 3D 1D 0B |J". .,5,22:..=..|
00000130: 04 E7 20 35 2C 35 3A 8D 20 32 30 33 35 00 61 1D |.. 5,5:. 2035.a.|
00000140: 7E 04 E7 20 35 2C 31 31 3A E0 2C 35 32 2C 31 33 |~.. 5,11:.,52,13|
00000150: 2C 22 4E 9D 9D 9D 22 3A 85 20 57 24 3A 47 25 B2 |,"N...":. W$:G%.|
00000160: 30 00 74 1D 88 04 8B 20 57 24 B3 B1 22 4A 22 A7 |0.t.... W$.."J".|
00000170: 31 32 31 30 00 9D 1D 92 04 E0 2C 35 30 2C 31 35 |1210......,50,15|
00000180: 3A 85 20 44 4E 24 3A 8F 20 4E 45 55 45 4E 20 4E |:. DN$:. NEUEN N|
00000190: 41 4D 45 4E 20 45 49 4E 47 45 42 45 4E 00 C2 1D |AMEN EINGEBEN...|
000001A0: 9C 04 44 4E 24 B2 C8 28 44 4E 24 AA 22 20 20 20 |..DN$..(DN$." |
000001B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2C 31 | ",1|
000001C0: 36 29 00 D6 1D A6 04 98 31 2C 22 42 2D 50 3A 22 |6)......1,"B-P:"|
000001D0: 3B 38 3B 31 34 34 00 E6 1D B0 04 98 38 2C 44 4E |;8;144......8,DN|
000001E0: 24 3A 47 25 B2 31 00 FE 1D BA 04 E0 2C 35 32 2C |$:G%.1......,52,|
000001F0: 31 38 2C 22 4E 9D 9D 9D 22 3A 85 20 57 24 00 12 |18,"N...":. W$..|
00000200: 1E C4 04 8B 20 57 24 B3 B1 22 4A 22 A7 20 31 32 |.... W$.."J". 12|
00000210: 37 30 00 37 1E CE 04 E0 2C 35 30 2C 32 30 3A 85 |70.7....,50,20:.|
00000220: 20 49 44 24 3A 8F 20 4E 45 55 45 20 49 44 20 45 | ID$:. NEUE ID E|
00000230: 49 4E 47 45 42 45 4E 00 50 1E D8 04 49 44 24 B2 |INGEBEN.P...ID$.|
00000240: C8 28 49 44 24 AA 22 20 20 20 20 20 22 2C 35 29 |.(ID$." ",5)|
00000250: 00 63 1E E2 04 98 31 2C 22 42 2D 50 22 3B 38 3B |.c....1,"B-P";8;|
00000260: 31 36 32 00 73 1E EC 04 98 38 2C 49 44 24 3A 47 |162.s....8,ID$:G|
00000270: 25 B2 31 00 90 1E F6 04 8B 20 47 25 B2 31 A7 98 |%.1...... G%.1..|
00000280: 31 2C 22 55 32 3A 22 3B 38 3B 30 3B 31 38 3B 30 |1,"U2:";8;0;18;0|
00000290: 00 A4 1E 00 05 98 31 2C 22 49 30 22 3A A0 20 38 |......1,"I0":. 8|
000002A0: 3A A0 20 31 00 EC 1E 0A 05 99 22 11 11 12 22 3B |:. 1......"...";|
000002B0: 3A 8B 47 25 B2 31 A7 20 E7 20 35 2C 31 35 3A 8D |:.G%.1. . 5,15:.|
000002C0: 20 32 30 33 35 3A E0 2C 35 38 2C 39 2C 22 1C 20 | 2035:.,58,9,". |
000002D0: C4 49 53 4B 45 54 54 45 20 47 45 41 45 4E 44 45 |.ISKETTE GEAENDE|
000002E0: 52 54 20 22 2C 31 3A E7 20 35 2C 38 00 29 1F 14 |RT ",1:. 5,8.)..|
000002F0: 05 FE 0F 3A E0 2C 33 33 2C 32 33 2C 22 A0 D0 52 |...:.,33,23,"..R|
00000300: 4F 47 52 41 4D 4D 2D C5 4E 44 45 20 22 2C 31 3A |OGRAMM-.NDE ",1:|
00000310: E7 35 2C 31 35 3A E0 2C 35 32 2C 32 33 2C 22 4A |.5,15:.,52,23,"J|
00000320: 9D 9D 9D 22 3A 85 20 59 24 00 54 1F 16 05 8B 59 |...":. Y$.T....Y|
00000330: 24 B2 22 4A 22 B0 59 24 B2 C7 28 31 33 29 A7 99 |$."J".Y$..(13)..|
00000340: 22 9E 93 11 11 11 11 43 41 54 41 4C 4F 47 91 91 |"......CATALOG..|
00000350: 91 22 3A 80 00 62 1F 17 05 8B 59 24 B2 22 4E 22 |.":..b....Y$."N"|
00000360: A7 8A 00 9F 1F DC 05 E0 2C 35 2C 32 2C 22 B0 C0 |........,5,2,"..|
00000370: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000380: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000390: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE 22 00 |..............".|
000003A0: DC 1F DE 05 E0 2C 35 2C 33 2C 22 DD 20 20 20 20 |.....,5,3,". |
000003B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003D0: 20 20 20 20 20 20 20 20 20 20 DD 22 00 19 20 DF | .".. .|
000003E0: 05 E0 2C 35 2C 34 2C 22 AD C0 C0 C0 C0 C0 C0 C0 |..,5,4,"........|
000003F0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000400: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000410: C0 C0 C0 C0 C0 C0 C0 BD 22 00 24 20 E0 05 E7 20 |........".$ ... |
00000420: 35 2C 31 34 00 60 20 E1 05 E0 2C 31 30 2C 33 2C |5,14.` ...,10,3,|
00000430: 22 20 20 20 20 3D 2D 3D 20 C4 49 53 4B 45 54 54 |" =-= .ISKETT|
00000440: 45 4E 4E 41 4D 45 20 41 45 4E 44 45 52 4E 20 3D |ENNAME AENDERN =|
00000450: 2D 3D 20 20 20 20 22 2C 31 3A E7 20 35 2C 30 38 |-= ",1:. 5,08|
00000460: 00 86 20 E6 05 E0 2C 35 35 2C 33 2C 20 22 3C 43 |.. ...,55,3, "<C|
00000470: 3E 20 42 59 20 D5 57 45 20 D2 45 50 50 4C 49 4E |> BY .WE .EPPLIN|
00000480: 47 45 52 22 3A 99 00 C0 20 F0 05 E0 2C 35 2C 36 |GER":... ...,5,6|
00000490: 2C 22 D2 49 43 48 54 49 47 45 20 C4 49 53 4B 45 |,".ICHTIGE .ISKE|
000004A0: 54 54 45 20 45 49 4E 47 45 4C 45 47 54 22 3A E7 |TTE EINGELEGT":.|
000004B0: 20 35 2C 31 32 3A E0 2C 33 36 2C 36 2C 22 4A 22 | 5,12:.,36,6,"J"|
000004C0: 00 EA 20 FF 05 E0 2C 35 2C 39 2C 22 C4 49 53 4B |.. ...,5,9,".ISK|
000004D0: 4E 41 4D 45 3A 20 22 3A E0 2C 33 38 2C 39 2C 22 |NAME: ":.,38,9,"|
000004E0: C4 49 53 4B 20 C9 C4 3A 20 22 00 F4 20 00 06 E7 |.ISK ..: ".. ...|
000004F0: 20 35 2C 32 00 29 21 0E 06 E0 2C 31 35 2C 38 2C | 5,2.)!...,15,8,|
00000500: 22 B0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |"...............|
00000510: C0 C0 C0 C0 AE 22 3A E0 2C 34 37 2C 38 2C 22 B0 |.....":.,47,8,".|
00000520: C0 C0 C0 C0 C0 C0 C0 AE 22 00 5E 21 10 06 E0 2C |........".^!...,|
00000530: 31 35 2C 39 2C 22 DD 20 20 20 20 20 20 20 20 20 |15,9,". |
00000540: 20 20 20 20 20 20 20 20 20 DD 22 3A E0 2C 34 37 | .":.,47|
00000550: 2C 39 2C 22 DD 20 20 20 20 20 20 20 DD 22 00 95 |,9,". ."..|
00000560: 21 12 06 E0 2C 31 35 2C 31 30 2C 22 AD C0 C0 C0 |!...,15,10,"....|
00000570: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 BD |................|
00000580: 22 3A E0 2C 34 37 2C 31 30 2C 22 AD C0 C0 C0 C0 |":.,47,10,".....|
00000590: C0 C0 C0 BD 22 00 9F 21 18 06 E7 20 35 2C 36 00 |...."..!... 5,6.|
000005A0: CD 21 72 06 E0 2C 31 35 2C 31 33 2C 22 53 4F 4C |.!r..,15,13,"SOL|
000005B0: 4C 20 44 45 52 20 CE 41 4D 45 20 47 45 41 45 4E |L DER .AME GEAEN|
000005C0: 44 45 52 54 20 57 45 52 44 45 4E 20 22 00 EF 21 |DERT WERDEN "..!|
000005D0: 86 06 E0 2C 31 35 2C 31 35 2C 22 4E 45 55 45 52 |...,15,15,"NEUER|
000005E0: 20 C4 49 53 4B 45 54 54 45 4E 4E 41 4D 45 22 00 | .ISKETTENNAME".|
000005F0: 1F 22 AE 06 E0 2C 31 35 2C 31 38 2C 22 53 4F 4C |."...,15,18,"SOL|
00000600: 4C 20 44 49 45 20 C4 49 53 4B 2D C9 C4 20 47 45 |L DIE .ISK-.. GE|
00000610: 41 45 4E 44 45 52 54 20 57 45 52 44 45 4E 22 00 |AENDERT WERDEN".|
00000620: 3A 22 C2 06 E0 2C 31 35 2C 32 30 2C 22 4E 45 55 |:"...,15,20,"NEU|
00000630: 45 20 C4 49 53 4B 20 C9 C4 22 00 40 22 08 07 8E |E .ISK ..".@"...|
00000640: 00 4F 22 F3 07 E0 2C 31 37 2C 39 2C 22 12 22 00 |.O"...,17,9,".".|
00000650: 64 22 02 08 9F 20 31 2C 38 2C 31 35 3A 98 31 2C |d"... 1,8,15:.1,|
00000660: 22 49 30 22 00 74 22 0C 08 9F 20 38 2C 38 2C 38 |"I0".t"... 8,8,8|
00000670: 2C 22 23 22 00 8A 22 16 08 98 31 2C 22 55 31 3A |,"#".."...1,"U1:|
00000680: 22 3B 38 3B 30 3B 31 38 3B 30 00 9E 22 20 08 98 |";8;0;18;0.." ..|
00000690: 31 2C 22 42 2D 50 3A 22 3B 38 3B 31 34 34 00 AB |1,"B-P:";8;144..|
000006A0: 22 2A 08 81 20 49 B2 31 A4 31 36 00 CD 22 34 08 |"*.. I.1.16.."4.|
000006B0: A1 23 38 2C 43 48 24 3A 99 20 43 48 24 3B 3A 8F |.#8,CH$:. CH$;:.|
000006C0: 20 43 48 24 3D 44 49 53 4B 4E 41 4D 45 00 D5 22 | CH$=DISKNAME.."|
000006D0: 3E 08 82 20 49 00 E9 22 48 08 98 31 2C 22 42 2D |>.. I.."H..1,"B-|
000006E0: 50 3A 22 3B 38 3B 31 36 32 00 05 23 52 08 A1 23 |P:";8;162..#R..#|
000006F0: 38 2C 43 31 24 2C 43 32 24 2C 43 33 24 2C 43 34 |8,C1$,C2$,C3$,C4|
00000700: 24 2C 43 35 24 00 27 23 5C 08 99 A6 31 36 29 3B |$,C5$.'#\...16);|
00000710: 43 31 24 3B 43 32 24 3B 43 33 24 3B 43 34 24 3B |C1$;C2$;C3$;C4$;|
00000720: 43 35 24 3B 22 92 22 00 2D 23 66 08 8E 00 00 00 |C5$;".".-#f.....|
..(....+++++++++++++++++++++++++++++++++
.O....++++ DISKETTENNAME AENDERN ++++.
V....+++ UWE REPPLINGER (1983) ++++..
....+++++++++++++++++++++++++++++++++...
..:.C....:. 5,08:. G(14);G(27)."N";.W...
. N.(2).80 . .%...... 1500:. 5,12......,
34,6:. W$:. RICHTIGE DISK BESTAETIGEN.,.
...W$.."J". .,5,22:..=.... 5,5:. 2035.A.
~.. 5,11:.,52,13,"N...":. W$:G%.0.T....
W$.."J".1210......,50,15:. DN$:. NEUEN N
AMEN EINGEBEN.B...DN$.H(DN$."
",16).V....1,"B-P:";8;144......8,DN
$:G%.1......,52,18,"N...":. W$...D.. W$.
."J". 1270.7.N..,50,20:. ID$:. NEUE ID E
INGEBEN.P.X.ID$.H(ID$." ",5).C....1,
"B-P";8;162.S....8,ID$:G%.1...... G%.1..
1,"U2:";8;0;18;0......1,"I0": 8: 1....
.."...";:.G%.1. . 5,15:. 2035:.,58,9,".
DISKETTE GEAENDERT ",1:. 5,8.).....:.,33
,23," PROGRAMM-ENDE ",1:.5,15:.,52,23,"J
...":. Y$.T....Y$."J".Y$.G(13).."......C
ATALOG...":..B....Y$."N"........,5,2,"..
........................................
......"......,5,3,".
.".. ...,5,4,"
........................................
........".$ ... 5,14.` ...,10,3," =-=
DISKETTENNAME AENDERN =-= ",1:. 5,08
.. ...,55,3, "<C> BY UWE REPPLINGER":...
...,5,6,"RICHTIGE DISKETTE EINGELEGT":.
5,12:.,36,6,"J".. ...,5,9,"DISKNAME: ":
.,38,9,"DISK ID: ".. ... 5,2.)!...,15,8,
"....................":.,47,8,".........
".^!...,15,9,". .":.,47
,9,". ."..!...,15,10,"............
........":.,47,10,"........."..!... 5,6.
M!R..,15,13,"SOLL DER NAME GEAENDERT WER
DEN "..!...,15,15,"NEUER DISKETTENNAME".
."...,15,18,"SOLL DIE DISK-ID GEAENDERT
WERDEN".:"B..,15,20,"NEUE DISK ID".@"...
.O"...,17,9,".".D"... 1,8,15:.1,"I0".T".
.. 8,8,8,"#".."...1,"U1:";8;0;18;0.." ..
1,"B-P:";8;144.."*.. I.1.16.M"4..#8,CH$:
. CH$;:. CH$=DISKNAME.U">.. I.."H..1,"B-
P:";8;162..#R..#8,C1$,C2$,C3$,C4$,C5$.'#
\...16);C1$;C2$;C3$;C4$;C5$;".".-#F.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL