> 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 CA 08 8E 00 85 22 93 11 11 49 48 52 20 4E |1......"...IHR N|
000000C0: 41 4D 45 3A 20 22 3B 50 41 24 00 D0 08 91 00 3A |AME: ";PA$.....:|
000000D0: 00 19 09 96 00 99 22 93 11 11 11 20 20 20 20 20 |......".... |
000000E0: 20 50 52 4F 47 52 41 4D 4D 42 49 42 4C 49 4F 54 | PROGRAMMBIBLIOT|
000000F0: 48 45 4B 22 3A 99 22 11 11 42 49 54 54 45 20 47 |HEK":."..BITTE G|
00000100: 45 42 45 4E 20 53 49 45 20 45 49 4E 45 20 44 49 |EBEN SIE EINE DI|
00000110: 53 4B 45 54 54 45 20 49 4E 00 34 09 A0 00 99 22 |SKETTE IN.4...."|
00000120: 11 45 49 4E 45 4E 20 44 52 49 56 45 22 3A 44 24 |.EINEN DRIVE":D$|
00000130: B2 22 30 22 00 5C 09 AA 00 99 22 11 11 11 57 45 |."0".\...."...WE|
00000140: 4C 43 48 45 52 20 44 52 49 56 45 20 20 12 22 44 |LCHER DRIVE ."D|
00000150: 24 22 92 9D 9D 9D 22 3B 3A 85 44 24 00 62 09 B4 |$"....";:.D$.b..|
00000160: 00 3A 00 8E 09 BE 00 9F 31 2C 38 2C 31 35 3A 46 |.:......1,8,15:F|
00000170: 4C 24 B2 22 49 22 AA 44 24 3A 98 31 2C 46 4C 24 |L$."I".D$:.1,FL$|
00000180: 3A A0 31 3A 46 4C 24 B2 22 24 22 AA 44 24 00 A2 |:.1:FL$."$".D$..|
00000190: 09 C8 00 9F 32 2C 38 2C 30 2C 46 4C 24 3A 99 22 |....2,8,0,FL$:."|
000001A0: 93 22 00 A8 09 D2 00 3A 00 C5 09 DC 00 48 24 B2 |.".....:.....H$.|
000001B0: 22 22 3A 47 47 B2 30 3A 48 4C B2 30 3A 42 24 28 |"":GG.0:HL.0:B$(|
000001C0: 31 29 B2 22 22 00 F1 09 E6 00 42 24 28 32 29 B2 |1)."".....B$(2).|
000001D0: 22 22 3A 4B B2 32 3A A1 23 32 2C 42 24 28 4B 29 |"":K.2:.#2,B$(K)|
000001E0: 3A 8B 42 24 28 4B 29 B2 C7 28 33 34 29 A7 33 30 |:.B$(K)..(34).30|
000001F0: 30 00 17 0A F0 00 8B 42 24 28 4B AB 31 29 B2 22 |0......B$(K.1)."|
00000200: 53 22 AF 42 24 28 4B 29 B2 22 45 22 A7 49 B2 49 |S".B$(K)."E".I.I|
00000210: AB 31 3A 89 32 38 30 00 29 0A FA 00 8B 42 24 28 |.1:.280.)....B$(|
00000220: 4B 29 B2 22 22 A7 32 38 30 00 57 0A 04 01 8B 48 |K)."".280.W....H|
00000230: 4C B2 31 AF C6 28 42 24 28 4B 29 29 B1 34 37 AF |L.1..(B$(K)).47.|
00000240: C6 28 42 24 28 4B 29 29 B3 35 38 A7 48 24 B2 48 |.(B$(K)).58.H$.H|
00000250: 24 AA 42 24 28 4B 29 00 69 0A 0E 01 42 24 28 4B |$.B$(K).i...B$(K|
00000260: AB 31 29 B2 42 24 28 4B 29 00 78 0A 18 01 8B 53 |.1).B$(K).x....S|
00000270: 54 B3 B1 30 A7 33 36 30 00 81 0A 22 01 89 32 33 |T..0.360..."..23|
00000280: 30 00 9D 0A 2C 01 48 4C B2 30 3A 49 B2 49 AA 31 |0...,.HL.0:I.I.1|
00000290: 3A 41 24 28 49 29 B2 22 22 3A 99 49 3B 00 BE 0A |:A$(I)."":.I;...|
000002A0: 36 01 A1 23 32 2C 41 24 3A 8B 41 24 B2 C7 28 33 |6..#2,A$:.A$..(3|
000002B0: 34 29 A7 99 41 24 28 49 29 3A 89 33 33 30 00 D6 |4)..A$(I):.330..|
000002C0: 0A 40 01 41 24 28 49 29 B2 41 24 28 49 29 AA 41 |.@.A$(I).A$(I).A|
000002D0: 24 3A 89 33 31 30 00 F9 0A 4A 01 8B 47 47 B2 30 |$:.310...J..GG.0|
000002E0: A7 48 24 B2 41 24 28 4E 29 3A 49 B2 49 AB 31 3A |.H$.A$(N):I.I.1:|
000002F0: 47 47 B2 31 3A 48 4C B2 31 00 02 0B 54 01 89 32 |GG.1:HL.1...T..2|
00000300: 33 30 00 08 0B 5E 01 3A 00 16 0B 68 01 A0 32 3A |30...^.:...h..2:|
00000310: 81 4B B2 4E A4 49 00 2C 0B 72 01 8B C3 28 41 24 |.K.N.I.,.r...(A$|
00000320: 28 4B 29 29 B1 B2 32 35 A7 33 39 30 00 45 0B 7C |(K))..25.390.E.||
00000330: 01 41 24 28 4B 29 B2 41 24 28 4B 29 AA 22 2E 22 |.A$(K).A$(K)."."|
00000340: 3A 89 33 37 30 00 61 0B 86 01 41 24 28 4B 29 B2 |:.370.a...A$(K).|
00000350: 41 24 28 4B 29 AA 48 24 3A 99 41 24 28 4B 29 3A |A$(K).H$:.A$(K):|
00000360: 82 00 67 0B 90 01 3A 00 B1 0B 9A 01 99 22 11 11 |..g...:......"..|
00000370: 53 4F 4C 4C 20 45 49 4E 45 20 57 45 49 54 45 52 |SOLL EINE WEITER|
00000380: 45 20 44 49 53 4B 45 54 54 45 20 44 55 52 43 48 |E DISKETTE DURCH|
00000390: 2D 22 3A 99 22 11 53 55 43 48 54 20 57 45 52 44 |-":.".SUCHT WERD|
000003A0: 45 4E 20 3F 20 20 4A 2F 4E 22 3A 97 31 35 38 2C |EN ? J/N":.158,|
000003B0: 30 00 BC 0B 9F 01 97 31 39 38 2C 30 00 D7 0B A4 |0......198,0....|
000003C0: 01 92 31 39 38 2C 31 3A A1 58 24 3A 8B 58 24 B2 |..198,1:.X$:.X$.|
000003D0: 22 4E 22 A7 34 36 30 00 1B 0C AE 01 99 22 11 11 |"N".460......"..|
000003E0: 42 49 54 54 45 20 41 4E 44 45 52 45 20 44 49 53 |BITTE ANDERE DIS|
000003F0: 4B 45 54 54 45 20 45 49 4E 4C 45 47 45 4E 22 3A |KETTE EINLEGEN":|
00000400: 99 22 11 44 41 4E 4E 20 45 49 4E 45 20 54 41 53 |.".DANN EINE TAS|
00000410: 54 45 20 44 52 55 45 43 4B 45 4E 00 2F 0C B8 01 |TE DRUECKEN./...|
00000420: 4E B2 49 AA 31 3A 99 22 93 22 3A 89 31 37 30 00 |N.I.1:.".":.170.|
00000430: 35 0C C2 01 3A 00 5B 0C CC 01 99 22 93 11 11 45 |5...:.[...."...E|
00000440: 53 20 57 49 52 44 20 4E 55 4E 20 53 4F 52 54 49 |S WIRD NUN SORTI|
00000450: 45 52 54 11 11 11 22 3A 41 B2 49 00 69 0C D6 01 |ERT...":A.I.i...|
00000460: 8B 41 B3 B2 31 A7 35 35 30 00 7C 0C E0 01 41 B2 |.A..1.550.|...A.|
00000470: B5 28 41 AD 32 29 3A 42 B2 49 AB 41 00 84 0C EA |.(A.2):B.I.A....|
00000480: 01 43 B2 30 00 AD 0C F4 01 81 4C B2 31 A4 42 3A |.C.0......L.1.B:|
00000490: 99 22 91 22 4C 3A 44 B2 41 AA 4C 3A 8B 41 24 28 |."."L:D.A.L:.A$(|
000004A0: 4C 29 B2 B3 41 24 28 44 29 A7 35 32 30 00 D3 0C |L)..A$(D).520...|
000004B0: FE 01 53 24 B2 41 24 28 4C 29 3A 41 24 28 4C 29 |..S$.A$(L):A$(L)|
000004C0: B2 41 24 28 44 29 3A 41 24 28 44 29 B2 53 24 3A |.A$(D):A$(D).S$:|
000004D0: 43 B2 31 00 E2 0C 08 02 82 3A 8B 43 B2 31 A7 34 |C.1......:.C.1.4|
000004E0: 39 30 00 EB 0C 12 02 89 34 37 30 00 F1 0C 1C 02 |90......470.....|
000004F0: 3A 00 1D 0D 26 02 81 4C B2 31 A4 49 3A 8B C8 28 |:...&..L.1.I:..(|
00000500: 41 24 28 4C 29 2C 31 36 29 B2 C8 28 41 24 28 4C |A$(L),16)..(A$(L|
00000510: AB 31 29 2C 31 36 29 A7 4A B2 4A AA 31 00 35 0D |.1),16).J.J.1.5.|
00000520: 30 02 82 3A 41 B2 30 3A 9F 31 2C 34 3A 53 B2 31 |0..:A.0:.1,4:S.1|
00000530: 3A 8D 36 32 30 00 3B 0D 3A 02 3A 00 4D 0D 44 02 |:.620.;.:.:.M.D.|
00000540: 81 4C B2 31 A4 49 3A 99 41 24 28 4C 29 00 81 0D |.L.1.I:.A$(L)...|
00000550: 4E 02 98 31 2C 41 24 28 4C 29 3A 41 B2 41 AA 31 |N..1,A$(L):A.A.1|
00000560: 3A 8B 41 B2 36 32 A7 81 4A B2 31 A4 34 3A 98 31 |:.A.62..J.1.4:.1|
00000570: 3A 82 3A 41 B2 30 3A 53 B2 53 AA 31 3A 8D 36 32 |:.:A.0:S.S.1:.62|
00000580: 30 00 A4 0D 58 02 82 3A 98 31 3A 98 31 2C 49 AB |0...X..:.1:.1,I.|
00000590: 4A 22 11 D0 52 4F 47 52 41 4D 4D 45 22 3A A0 31 |J"..ROGRAMME":.1|
000005A0: 3A 9C 3A 80 00 AA 0D 62 02 3A 00 B4 0D 6C 02 98 |:.:....b.:...l..|
000005B0: 31 3A 98 31 00 F6 0D 76 02 98 31 2C C7 28 31 29 |1:.1...v..1,.(1)|
000005C0: 22 11 D0 52 4F 47 52 41 4D 4D 42 49 42 4C 49 4F |"..ROGRAMMBIBLIO|
000005D0: 54 48 45 4B 22 C7 28 31 32 39 29 22 20 20 20 20 |THEK".(129)" |
000005E0: 20 20 20 20 20 20 20 20 20 20 20 20 D3 45 49 54 | .EIT|
000005F0: 45 20 3A 22 3B 53 00 1D 0E 80 02 98 31 2C 22 20 |E :";S......1," |
00000600: 20 43 42 4D 36 34 20 2B 56 43 31 35 34 31 20 2B | CBM64 +VC1541 +|
00000610: 20 56 43 31 35 32 36 20 22 3B 50 41 24 00 57 0E | VC1526 ";PA$.W.|
00000620: 8A 02 98 31 3A 98 31 2C 22 11 D0 52 4F 47 52 41 |...1:.1,"..ROGRA|
00000630: 4D 4D 4E 41 4D 45 20 20 20 20 20 20 20 20 20 20 |MMNAME |
00000640: 20 20 20 C4 49 53 4B 45 54 54 45 20 20 20 20 20 | .ISKETTE |
00000650: 20 20 20 CE 52 2E 22 00 60 0E 94 02 98 31 3A 8E | .R.".`....1:.|
00000660: 00 00 00 7F 00 5F |....._ |
..".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.J...."...IHR NAME: ";P
A$.P...:......".... PROGRAMMBIBLIOT
HEK":."..BITTE GEBEN SIE EINE DISKETTE I
N.4. ..".EINEN DRIVE":D$."0".\...."...WE
LCHER DRIVE ."D$"....";:.D$.B...:......
1,8,15:FL$."I".D$:.1,FL$: 1:FL$."$".D$..
.H..2,8,0,FL$:."."...R.:.E...H$."":GG.0:
HL.0:B$(1)."".....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)."".280.W....H
L.1.F(B$(K)).47.F(B$(K)).58.H$.H$.B$(K).
I...B$(K.1).B$(K).X....ST..0.360..."..23
0...,.HL.0:I.I.1:A$(I)."":.I;...6..#2,A$
:.A$.G(34)..A$(I):.330.V.@.A$(I).A$(I).A
$:.310...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.E.|.A$(K).A$(K).".":.370.A.
..A$(K).A$(K).H$:.A$(K):..G...:......"..
SOLL EINE WEITERE DISKETTE DURCH-":.".SU
CHT WERDEN ? J/N":.158,0......198,0.W..
..198,1:.X$:.X$."N".460......"..BITTE AN
DERE DISKETTE EINLEGEN":.".DANN EINE TAS
TE DRUECKEN./...N.I.1:.".":.170.5.B.:.[.
L.."...ES WIRD NUN SORTIERT...":A.I.I.V.
.A..1.550.|...A..(A.2):B.I.A.....C.0....
..L.1.B:."."L:D.A.L:.A$(L)..A$(D).520.S.
..S$.A$(L):A$(L).A$(D):A$(D).S$:C.1.....
.:.C.1.490......470.....:...&..L.1.I:.H(
A$(L),16).H(A$(L.1),16).J.J.1.5.0..:A.0:
.1,4:S.1:.620.;.:.:.M.D..L.1.I:.A$(L)...
N..1,A$(L):A.A.1:.A.62..J.1.4:.1:.:A.0:S
.S.1:.620...X..:.1:.1,I.J".PROGRAMME": 1
:.:....B.:...L..1:.1...V..1,G(1)".PROGRA
MMBIBLIOTHEK"G(129)" SEIT
E :";S......1," CBM64 +VC1541 + VC1526
";PA$.W....1:.1,".PROGRAMMNAME
DISKETTE NR.".`....1:....._
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL