> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 22 08 64 00 8F 20 20 44 49 53 4B 2D 50 52 |..".d.. DISK-PR|
00000010: 4F 47 52 41 4D 4D 45 2D 42 49 42 4C 49 4F 54 48 |OGRAMME-BIBLIOTH|
00000020: 45 4B 00 3A 08 6E 00 8F 20 20 4D 49 54 20 44 52 |EK.:.n.. MIT DR|
00000030: 55 43 4B 45 52 20 31 35 32 36 00 80 08 78 00 8F |UCKER 1526...x..|
00000040: 20 20 4E 41 43 48 20 27 50 52 47 20 46 2E 44 2E | NACH 'PRG F.D.|
00000050: 43 42 4D 36 34 27 20 20 20 20 20 20 20 20 20 20 |CBM64' |
00000060: 20 20 20 20 20 20 20 20 20 20 47 45 53 43 48 52 | GESCHR|
00000070: 2E 20 47 2E 4B 4F 43 48 20 20 4F 45 33 47 4B 41 |. G.KOCH OE3GKA|
00000080: 00 96 08 82 00 97 35 33 32 38 30 2C 30 3A 97 35 |......53280,0:.5|
00000090: 33 32 38 31 2C 30 00 B1 08 8C 00 97 35 32 32 37 |3281,0......5227|
000000A0: 32 2C 32 33 3A 86 41 24 28 35 30 30 29 3A 4E B2 |2,23:.A$(500):N.|
000000B0: 31 00 FA 08 96 00 99 22 93 11 11 11 20 20 20 20 |1......".... |
000000C0: 20 20 50 52 4F 47 52 41 4D 4D 42 49 42 4C 49 4F | PROGRAMMBIBLIO|
000000D0: 54 48 45 4B 22 3A 99 22 11 11 42 49 54 54 45 20 |THEK":."..BITTE |
000000E0: 47 45 42 45 4E 20 53 49 45 20 45 49 4E 45 20 44 |GEBEN SIE EINE D|
000000F0: 49 53 4B 45 54 54 45 20 49 4E 00 15 09 A0 00 99 |ISKETTE IN......|
00000100: 22 11 45 49 4E 45 4E 20 44 52 49 56 45 22 3A 44 |".EINEN DRIVE":D|
00000110: 24 B2 22 30 22 00 3D 09 AA 00 99 22 11 11 11 57 |$."0".=...."...W|
00000120: 45 4C 43 48 45 52 20 44 52 49 56 45 20 20 12 22 |ELCHER DRIVE ."|
00000130: 44 24 22 92 9D 9D 9D 22 3B 3A 85 44 24 00 43 09 |D$"....";:.D$.C.|
00000140: B4 00 3A 00 6F 09 BE 00 9F 31 2C 38 2C 31 35 3A |..:.o....1,8,15:|
00000150: 46 4C 24 B2 22 49 22 AA 44 24 3A 98 31 2C 46 4C |FL$."I".D$:.1,FL|
00000160: 24 3A A0 31 3A 46 4C 24 B2 22 24 22 AA 44 24 00 |$:.1:FL$."$".D$.|
00000170: 83 09 C8 00 9F 32 2C 38 2C 30 2C 46 4C 24 3A 99 |.....2,8,0,FL$:.|
00000180: 22 93 22 00 89 09 D2 00 3A 00 A6 09 DC 00 48 24 |".".....:.....H$|
00000190: B2 22 22 3A 47 47 B2 30 3A 48 4C B2 30 3A 42 24 |."":GG.0:HL.0:B$|
000001A0: 28 31 29 B2 22 22 00 D2 09 E6 00 42 24 28 32 29 |(1)."".....B$(2)|
000001B0: B2 22 22 3A 4B B2 32 3A A1 23 32 2C 42 24 28 4B |."":K.2:.#2,B$(K|
000001C0: 29 3A 8B 42 24 28 4B 29 B2 C7 28 33 34 29 A7 33 |):.B$(K)..(34).3|
000001D0: 30 30 00 F8 09 F0 00 8B 42 24 28 4B AB 31 29 B2 |00......B$(K.1).|
000001E0: 22 53 22 AF 42 24 28 4B 29 B2 22 45 22 A7 49 B2 |"S".B$(K)."E".I.|
000001F0: 49 AB 31 3A 89 32 38 30 00 0A 0A FA 00 8B 42 24 |I.1:.280......B$|
00000200: 28 4B 29 B2 22 22 A7 32 38 30 00 38 0A 04 01 8B |(K)."".280.8....|
00000210: 48 4C B2 31 AF C6 28 42 24 28 4B 29 29 B1 34 37 |HL.1..(B$(K)).47|
00000220: AF C6 28 42 24 28 4B 29 29 B3 35 38 A7 48 24 B2 |..(B$(K)).58.H$.|
00000230: 48 24 AA 42 24 28 4B 29 00 4A 0A 0E 01 42 24 28 |H$.B$(K).J...B$(|
00000240: 4B AB 31 29 B2 42 24 28 4B 29 00 59 0A 18 01 8B |K.1).B$(K).Y....|
00000250: 53 54 B3 B1 30 A7 33 36 30 00 62 0A 22 01 89 32 |ST..0.360.b."..2|
00000260: 33 30 00 7E 0A 2C 01 48 4C B2 30 3A 49 B2 49 AA |30.~.,.HL.0:I.I.|
00000270: 31 3A 41 24 28 49 29 B2 22 22 3A 99 49 3B 00 9F |1:A$(I)."":.I;..|
00000280: 0A 36 01 A1 23 32 2C 41 24 3A 8B 41 24 B2 C7 28 |.6..#2,A$:.A$..(|
00000290: 33 34 29 A7 99 41 24 28 49 29 3A 89 33 33 30 00 |34)..A$(I):.330.|
000002A0: B7 0A 40 01 41 24 28 49 29 B2 41 24 28 49 29 AA |..@.A$(I).A$(I).|
000002B0: 41 24 3A 89 33 31 30 00 DA 0A 4A 01 8B 47 47 B2 |A$:.310...J..GG.|
000002C0: 30 A7 48 24 B2 41 24 28 4E 29 3A 49 B2 49 AB 31 |0.H$.A$(N):I.I.1|
000002D0: 3A 47 47 B2 31 3A 48 4C B2 31 00 E3 0A 54 01 89 |:GG.1:HL.1...T..|
000002E0: 32 33 30 00 E9 0A 5E 01 3A 00 F7 0A 68 01 A0 32 |230...^.:...h..2|
000002F0: 3A 81 4B B2 4E A4 49 00 0D 0B 72 01 8B C3 28 41 |:.K.N.I...r...(A|
00000300: 24 28 4B 29 29 B1 B2 32 35 A7 33 39 30 00 26 0B |$(K))..25.390.&.|
00000310: 7C 01 41 24 28 4B 29 B2 41 24 28 4B 29 AA 22 2E ||.A$(K).A$(K).".|
00000320: 22 3A 89 33 37 30 00 42 0B 86 01 41 24 28 4B 29 |":.370.B...A$(K)|
00000330: B2 41 24 28 4B 29 AA 48 24 3A 99 41 24 28 4B 29 |.A$(K).H$:.A$(K)|
00000340: 3A 82 00 48 0B 90 01 3A 00 92 0B 9A 01 99 22 11 |:..H...:......".|
00000350: 11 53 4F 4C 4C 20 45 49 4E 45 20 57 45 49 54 45 |.SOLL EINE WEITE|
00000360: 52 45 20 44 49 53 4B 45 54 54 45 20 44 55 52 43 |RE DISKETTE DURC|
00000370: 48 2D 22 3A 99 22 11 53 55 43 48 54 20 57 45 52 |H-":.".SUCHT WER|
00000380: 44 45 4E 20 3F 20 20 4A 2F 4E 22 3A 97 31 35 38 |DEN ? J/N":.158|
00000390: 2C 30 00 9D 0B 9F 01 97 31 39 38 2C 30 00 B8 0B |,0......198,0...|
000003A0: A4 01 92 31 39 38 2C 31 3A A1 58 24 3A 8B 58 24 |...198,1:.X$:.X$|
000003B0: B2 22 4E 22 A7 34 36 30 00 FC 0B AE 01 99 22 11 |."N".460......".|
000003C0: 11 42 49 54 54 45 20 41 4E 44 45 52 45 20 44 49 |.BITTE ANDERE DI|
000003D0: 53 4B 45 54 54 45 20 45 49 4E 4C 45 47 45 4E 22 |SKETTE EINLEGEN"|
000003E0: 3A 99 22 11 44 41 4E 4E 20 45 49 4E 45 20 54 41 |:.".DANN EINE TA|
000003F0: 53 54 45 20 44 52 55 45 43 4B 45 4E 00 10 0C B8 |STE DRUECKEN....|
00000400: 01 4E B2 49 AA 31 3A 99 22 93 22 3A 89 31 37 30 |.N.I.1:.".":.170|
00000410: 00 16 0C C2 01 3A 00 3C 0C CC 01 99 22 93 11 11 |.....:.<...."...|
00000420: 45 53 20 57 49 52 44 20 4E 55 4E 20 53 4F 52 54 |ES WIRD NUN SORT|
00000430: 49 45 52 54 11 11 11 22 3A 41 B2 49 00 4A 0C D6 |IERT...":A.I.J..|
00000440: 01 8B 41 B3 B2 31 A7 35 35 30 00 5D 0C E0 01 41 |..A..1.550.]...A|
00000450: B2 B5 28 41 AD 32 29 3A 42 B2 49 AB 41 00 65 0C |..(A.2):B.I.A.e.|
00000460: EA 01 43 B2 30 00 8E 0C F4 01 81 4C B2 31 A4 42 |..C.0......L.1.B|
00000470: 3A 99 22 91 22 4C 3A 44 B2 41 AA 4C 3A 8B 41 24 |:."."L:D.A.L:.A$|
00000480: 28 4C 29 B2 B3 41 24 28 44 29 A7 35 32 30 00 B4 |(L)..A$(D).520..|
00000490: 0C FE 01 53 24 B2 41 24 28 4C 29 3A 41 24 28 4C |...S$.A$(L):A$(L|
000004A0: 29 B2 41 24 28 44 29 3A 41 24 28 44 29 B2 53 24 |).A$(D):A$(D).S$|
000004B0: 3A 43 B2 31 00 C3 0C 08 02 82 3A 8B 43 B2 31 A7 |:C.1......:.C.1.|
000004C0: 34 39 30 00 CC 0C 12 02 89 34 37 30 00 D2 0C 1C |490......470....|
000004D0: 02 3A 00 FE 0C 26 02 81 4C B2 31 A4 49 3A 8B C8 |.:...&..L.1.I:..|
000004E0: 28 41 24 28 4C 29 2C 31 36 29 B2 C8 28 41 24 28 |(A$(L),16)..(A$(|
000004F0: 4C AB 31 29 2C 31 36 29 A7 4A B2 4A AA 31 00 12 |L.1),16).J.J.1..|
00000500: 0D 30 02 82 3A 41 B2 30 3A 9F 31 2C 34 3A 8D 36 |.0..:A.0:.1,4:.6|
00000510: 32 30 00 18 0D 3A 02 3A 00 2A 0D 44 02 81 4C B2 |20...:.:.*.D..L.|
00000520: 31 A4 49 3A 99 41 24 28 4C 29 00 58 0D 4E 02 98 |1.I:.A$(L).X.N..|
00000530: 31 2C 41 24 28 4C 29 3A 41 B2 41 AA 31 3A 8B 41 |1,A$(L):A.A.1:.A|
00000540: B2 36 32 A7 81 4A B2 31 A4 34 3A 98 31 3A 82 3A |.62..J.1.4:.1:.:|
00000550: 41 B2 30 3A 8D 36 32 30 00 79 0D 58 02 82 3A 98 |A.0:.620.y.X..:.|
00000560: 31 3A 98 31 2C 49 AB 4A 22 11 D0 52 4F 47 52 41 |1:.1,I.J"..ROGRA|
00000570: 4D 4D 45 22 3A A0 31 3A 80 00 7F 0D 62 02 3A 00 |MME":.1:....b.:.|
00000580: 89 0D 6C 02 98 31 3A 98 31 00 CF 0D 76 02 98 31 |..l..1:.1...v..1|
00000590: 2C C7 28 31 29 22 11 D0 52 4F 47 52 41 4D 4D 42 |,.(1)"..ROGRAMMB|
000005A0: 49 42 4C 49 4F 54 48 45 4B 22 C7 28 31 32 39 29 |IBLIOTHEK".(129)|
000005B0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
000005C0: 20 20 20 20 20 20 D3 45 49 54 45 20 22 3B 3A 00 | .EITE ";:.|
000005D0: D8 0D 80 02 98 31 2C 58 00 12 0E 8A 02 98 31 3A |.....1,X......1:|
000005E0: 98 31 2C 22 11 D0 52 4F 47 52 41 4D 4D 4E 41 4D |.1,"..ROGRAMMNAM|
000005F0: 45 20 20 20 20 20 20 20 20 20 20 20 20 20 C4 49 |E .I|
00000600: 53 4B 45 54 54 45 20 20 20 20 20 20 20 20 CE 52 |SKETTE .R|
00000610: 2E 22 00 1B 0E 94 02 98 31 3A 8E 00 00 00 3B 00 |."......1:....;.|
00000620: 50 2F |P/ |
..".D.. DISK-PROGRAMME-BIBLIOTHEK.:.N..
MIT DRUCKER 1526...X.. NACH 'PRG F.D.
CBM64' GESCHR. G.KOCH
OE3GKA......53280,0:.53281,0......5227
2,23:.A$(500):N.1......".... PROGRA
MMBIBLIOTHEK":."..BITTE GEBEN SIE EINE D
ISKETTE IN... ..".EINEN DRIVE":D$."0".=.
..."...WELCHER DRIVE ."D$"....";:.D$.C.
..:.O....1,8,15:FL$."I".D$:.1,FL$: 1:FL$
."$".D$...H..2,8,0,FL$:."."...R.:.....H$
."":GG.0:HL.0:B$(1)."".R...B$(2)."":K.2:
.#2,B$(K):.B$(K).G(34).300......B$(K.1).
"S".B$(K)."E".I.I.1:.280......B$(K)."".2
80.8....HL.1.F(B$(K)).47.F(B$(K)).58.H$.
H$.B$(K).J...B$(K.1).B$(K).Y....ST..0.36
0.B."..230.~.,.HL.0:I.I.1:A$(I)."":.I;..
.6..#2,A$:.A$.G(34)..A$(I):.330...@.A$(I
).A$(I).A$:.310.Z.J..GG.0.H$.A$(N):I.I.1
:GG.1:HL.1...T..230...^.:...H. 2:.K.N.I.
..R..C(A$(K))..25.390.&.|.A$(K).A$(K).".
":.370.B...A$(K).A$(K).H$:.A$(K):..H...:
......"..SOLL EINE WEITERE DISKETTE DURC
H-":.".SUCHT WERDEN ? J/N":.158,0......
198,0......198,1:.X$:.X$."N".460......".
.BITTE ANDERE DISKETTE EINLEGEN":.".DANN
EINE TASTE DRUECKEN.....N.I.1:.".":.170
...B.:.<.L.."...ES WIRD NUN SORTIERT..."
:A.I.J.V..A..1.550.]...A..(A.2):B.I.A.E.
..C.0......L.1.B:."."L:D.A.L:.A$(L)..A$(
D).520.....S$.A$(L):A$(L).A$(D):A$(D).S$
:C.1.C....:.C.1.490.L....470.R...:...&..
L.1.I:.H(A$(L),16).H(A$(L.1),16).J.J.1..
.0..:A.0:.1,4:.620...:.:.*.D..L.1.I:.A$(
L).X.N..1,A$(L):A.A.1:.A.62..J.1.4:.1:.:
A.0:.620.Y.X..:.1:.1,I.J".PROGRAMME": 1:
...B.:...L..1:.1.O.V..1,G(1)".PROGRAMMB
IBLIOTHEK"G(129)" SE
ITE ";:.X....1,X......1:.1,".PROGRAMMNAM
E DISKETTE NR."......
1:....;.P/
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL