PGM-BIBLIOTHEK
FILE INFORMATION
FILENAME(S): PGM-BIBLIOTHEK
FILE TYPE(S): PRG
FILE SIZE: 1.6K
FIRST SEEN: 2025-12-02 23:21:57
APPEARS ON: 1 disk(s)
FILE HASH
a88df713351be13bc0629819986f6f67f56224f568d89e02defb6b40fbab9191
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SPIELE 71 | PGM-BIBLIOTHEK | PRG | swasti, dinkel | 33 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 21 08 6E 00 8F 20 2A 2A 2A 50 52 4F 47 52 |..!.n.. ***PROGR| 00000010: 41 4D 4D 42 49 42 4C 49 4F 54 48 45 4B 2A 2A 2A |AMMBIBLIOTHEK***| 00000020: 2A 00 4C 08 73 00 8F 20 44 49 45 53 45 53 20 50 |*.L.s.. DIESES P| 00000030: 52 4F 47 52 41 4D 4D 20 44 55 52 43 48 53 55 43 |ROGRAMM DURCHSUC| 00000040: 48 54 20 44 49 53 4B 45 54 54 45 4E 00 72 08 78 |HT DISKETTEN.r.x| 00000050: 00 8F 20 4E 41 43 48 20 50 52 4F 47 52 41 4D 4D |.. NACH PROGRAMM| 00000060: 4E 41 4D 45 4E 2C 53 4F 52 54 49 45 52 54 20 55 |NAMEN,SORTIERT U| 00000070: 4E 44 00 88 08 82 00 8F 20 44 52 55 43 4B 54 20 |ND...... DRUCKT | 00000080: 53 49 45 20 41 55 53 2E 00 A3 08 8C 00 97 35 32 |SIE AUS.......52| 00000090: 32 37 32 2C 32 33 3A 86 41 24 28 35 30 30 29 3A |272,23:.A$(500):| 000000A0: 4E B2 31 00 EC 08 96 00 99 22 93 11 11 11 20 20 |N.1......".... | 000000B0: 20 20 20 20 50 52 4F 47 52 41 4D 4D 42 49 42 4C | PROGRAMMBIBL| 000000C0: 49 4F 54 48 45 4B 22 3A 99 22 11 11 42 49 54 54 |IOTHEK":."..BITT| 000000D0: 45 20 47 45 42 45 4E 20 53 49 45 20 49 48 52 45 |E GEBEN SIE IHRE| 000000E0: 20 44 49 53 4B 45 54 54 45 20 49 4E 00 07 09 A0 | DISKETTE IN....| 000000F0: 00 99 22 11 45 49 4E 45 4E 20 44 52 49 56 45 22 |..".EINEN DRIVE"| 00000100: 3A 44 24 B2 22 30 22 00 30 09 AA 00 99 22 11 11 |:D$."0".0...."..| 00000110: 11 57 45 4C 43 48 45 52 20 44 52 49 56 45 20 20 |.WELCHER DRIVE | 00000120: 20 12 22 44 24 22 92 9D 9D 9D 22 3B 3A 85 44 24 | ."D$"....";:.D$| 00000130: 00 45 09 B4 00 8F 20 49 4E 49 54 49 41 4C 49 53 |.E.... INITIALIS| 00000140: 49 45 52 45 4E 00 71 09 BE 00 9F 31 2C 38 2C 31 |IEREN.q....1,8,1| 00000150: 35 3A 46 4C 24 B2 22 49 22 AA 44 24 3A 98 31 2C |5:FL$."I".D$:.1,| 00000160: 46 4C 24 3A A0 31 3A 46 4C 24 B2 22 24 22 AA 44 |FL$:.1:FL$."$".D| 00000170: 24 00 85 09 C8 00 9F 32 2C 38 2C 30 2C 46 4C 24 |$......2,8,0,FL$| 00000180: 3A 99 22 93 22 00 94 09 D2 00 8F 20 45 49 4E 4C |:."."...... EINL| 00000190: 45 53 45 4E 00 B1 09 DC 00 48 24 B2 22 22 3A 47 |ESEN.....H$."":G| 000001A0: 47 B2 30 3A 48 4C B2 30 3A 42 24 28 31 29 B2 22 |G.0:HL.0:B$(1)."| 000001B0: 22 00 DD 09 E6 00 42 24 28 32 29 B2 22 22 3A 4B |".....B$(2)."":K| 000001C0: B2 32 3A A1 23 32 2C 42 24 28 4B 29 3A 8B 42 24 |.2:.#2,B$(K):.B$| 000001D0: 28 4B 29 B2 C7 28 33 34 29 A7 33 30 30 00 03 0A |(K)..(34).300...| 000001E0: F0 00 8B 42 24 28 4B AB 31 29 B2 22 53 22 AF 42 |...B$(K.1)."S".B| 000001F0: 24 28 4B 29 B2 22 45 22 A7 49 B2 49 AB 31 3A 89 |$(K)."E".I.I.1:.| 00000200: 32 38 30 00 15 0A FA 00 8B 42 24 28 4B 29 B2 22 |280......B$(K)."| 00000210: 22 A7 32 38 30 00 43 0A 04 01 8B 48 4C B2 31 AF |".280.C....HL.1.| 00000220: C6 28 42 24 28 4B 29 29 B1 34 37 AF C6 28 42 24 |.(B$(K)).47..(B$| 00000230: 28 4B 29 29 B3 35 38 A7 48 24 B2 48 24 AA 42 24 |(K)).58.H$.H$.B$| 00000240: 28 4B 29 00 55 0A 0E 01 42 24 28 4B AB 31 29 B2 |(K).U...B$(K.1).| 00000250: 42 24 28 4B 29 00 64 0A 18 01 8B 53 54 B3 B1 30 |B$(K).d....ST..0| 00000260: A7 33 36 30 00 6D 0A 22 01 89 32 33 30 00 89 0A |.360.m."..230...| 00000270: 2C 01 48 4C B2 30 3A 49 B2 49 AA 31 3A 41 24 28 |,.HL.0:I.I.1:A$(| 00000280: 49 29 B2 22 22 3A 99 49 3B 00 AA 0A 36 01 A1 23 |I)."":.I;...6..#| 00000290: 32 2C 41 24 3A 8B 41 24 B2 C7 28 33 34 29 A7 99 |2,A$:.A$..(34)..| 000002A0: 41 24 28 49 29 3A 89 33 33 30 00 C2 0A 40 01 41 |A$(I):.330...@.A| 000002B0: 24 28 49 29 B2 41 24 28 49 29 AA 41 24 3A 89 33 |$(I).A$(I).A$:.3| 000002C0: 31 30 00 E5 0A 4A 01 8B 47 47 B2 30 A7 48 24 B2 |10...J..GG.0.H$.| 000002D0: 41 24 28 4E 29 3A 49 B2 49 AB 31 3A 47 47 B2 31 |A$(N):I.I.1:GG.1| 000002E0: 3A 48 4C B2 31 00 EE 0A 54 01 89 32 33 30 00 06 |:HL.1...T..230..| 000002F0: 0B 5E 01 8F 20 53 54 52 49 4E 47 20 41 55 46 46 |.^.. STRING AUFF| 00000300: 55 45 4C 4C 45 4E 00 14 0B 68 01 A0 32 3A 81 4B |UELLEN...h..2:.K| 00000310: B2 4E A4 49 00 2A 0B 72 01 8B C3 28 41 24 28 4B |.N.I.*.r...(A$(K| 00000320: 29 29 B1 B2 32 35 A7 33 39 30 00 43 0B 7C 01 41 |))..25.390.C.|.A| 00000330: 24 28 4B 29 B2 41 24 28 4B 29 AA 22 2E 22 3A 89 |$(K).A$(K).".":.| 00000340: 33 37 30 00 5F 0B 86 01 41 24 28 4B 29 B2 41 24 |370._...A$(K).A$| 00000350: 28 4B 29 AA 48 24 3A 99 41 24 28 4B 29 3A 82 00 |(K).H$:.A$(K):..| 00000360: 6E 0B 90 01 8F 20 53 43 48 4C 45 49 46 45 00 B4 |n.... SCHLEIFE..| 00000370: 0B 9A 01 99 22 11 11 53 4F 4C 4C 20 45 49 4E 45 |...."..SOLL EINE| 00000380: 20 57 45 49 54 45 52 45 20 44 49 53 4B 45 54 54 | WEITERE DISKETT| 00000390: 45 20 44 55 52 43 48 2D 22 3A 99 22 53 55 43 48 |E DURCH-":."SUCH| 000003A0: 54 20 57 45 52 44 45 4E 3F 4A 2F 4E 22 3A 97 31 |T WERDEN?J/N":.1| 000003B0: 35 38 2C 30 00 BF 0B 9F 01 97 31 39 38 2C 30 00 |58,0......198,0.| 000003C0: DA 0B A4 01 92 31 39 38 2C 31 3A A1 58 24 3A 8B |.....198,1:.X$:.| 000003D0: 58 24 B2 22 4E 22 A7 34 36 30 00 23 0C AE 01 99 |X$."N".460.#....| 000003E0: 22 11 11 42 49 54 54 45 20 45 49 4E 45 20 41 4E |"..BITTE EINE AN| 000003F0: 44 45 52 45 20 44 49 53 4B 45 54 54 45 20 45 49 |DERE DISKETTE EI| 00000400: 4E 4C 45 47 45 4E 22 3A 99 22 11 44 41 4E 4E 20 |NLEGEN":.".DANN | 00000410: 45 49 4E 45 20 54 41 53 54 45 20 44 52 55 45 43 |EINE TASTE DRUEC| 00000420: 4B 45 4E 00 37 0C B8 01 4E B2 49 AA 31 3A 99 22 |KEN.7...N.I.1:."| 00000430: 93 22 3A 89 31 37 30 00 4C 0C C2 01 8F 20 53 4F |.":.170.L.... SO| 00000440: 52 54 49 45 52 52 4F 55 54 49 4E 45 00 74 0C CC |RTIERROUTINE.t..| 00000450: 01 99 22 93 11 11 45 53 20 57 49 52 44 20 53 4F |.."...ES WIRD SO| 00000460: 52 54 49 45 52 54 11 11 11 11 11 11 11 11 11 22 |RTIERT........."| 00000470: 3A 41 B2 49 00 82 0C D6 01 8B 41 B3 B2 31 A7 35 |:A.I......A..1.5| 00000480: 35 30 00 95 0C E0 01 41 B2 B5 28 41 AD 32 29 3A |50.....A..(A.2):| 00000490: 42 B2 49 AB 41 00 9D 0C EA 01 43 B2 30 00 C6 0C |B.I.A.....C.0...| 000004A0: F4 01 81 4C B2 31 A4 42 3A 99 22 91 22 4C 3A 44 |...L.1.B:."."L:D| 000004B0: B2 41 AA 4C 3A 8B 41 24 28 4C 29 B2 B3 41 24 28 |.A.L:.A$(L)..A$(| 000004C0: 44 29 A7 35 32 30 00 EC 0C FE 01 53 24 B2 41 24 |D).520.....S$.A$| 000004D0: 28 4C 29 3A 41 24 28 4C 29 B2 41 24 28 44 29 3A |(L):A$(L).A$(D):| 000004E0: 41 24 28 44 29 B2 53 24 3A 43 B2 31 00 FB 0C 08 |A$(D).S$:C.1....| 000004F0: 02 82 3A 8B 43 B2 31 A7 34 39 30 00 04 0D 12 02 |..:.C.1.490.....| 00000500: 89 34 37 30 00 17 0D 1C 02 8F 20 5A 41 45 48 4C |.470...... ZAEHL| 00000510: 52 4F 55 54 49 4E 45 00 43 0D 26 02 81 4C B2 31 |ROUTINE.C.&..L.1| 00000520: A4 49 3A 8B C8 28 41 24 28 4C 29 2C 31 36 29 B2 |.I:..(A$(L),16).| 00000530: C8 28 41 24 28 4C AB 31 29 2C 31 36 29 A7 4A B2 |.(A$(L.1),16).J.| 00000540: 4A AA 31 00 57 0D 30 02 82 3A 41 B2 30 3A 9F 31 |J.1.W.0..:A.0:.1| 00000550: 2C 34 3A 8D 36 32 30 00 6A 0D 3A 02 8F 20 44 52 |,4:.620.j.:.. DR| 00000560: 55 43 4B 52 4F 55 54 49 4E 45 00 7C 0D 44 02 81 |UCKROUTINE.|.D..| 00000570: 4C B2 31 A4 49 3A 99 41 24 28 4C 29 00 AA 0D 4E |L.1.I:.A$(L)...N| 00000580: 02 98 31 2C 41 24 28 4C 29 3A 41 B2 41 AA 31 3A |..1,A$(L):A.A.1:| 00000590: 8B 41 B2 36 32 A7 81 4A B2 31 A4 34 3A 98 31 3A |.A.62..J.1.4:.1:| 000005A0: 82 3A 41 B2 30 3A 8D 36 32 30 00 CB 0D 58 02 82 |.:A.0:.620...X..| 000005B0: 3A 98 31 3A 98 31 2C 49 AB 4A 22 11 50 52 4F 47 |:.1:.1,I.J".PROG| 000005C0: 52 41 4D 4D 45 22 3A A0 31 3A 80 00 E1 0D 62 02 |RAMME":.1:....b.| 000005D0: 8F 20 20 20 20 54 49 54 45 4C 52 4F 55 54 49 4E |. TITELROUTIN| 000005E0: 45 00 EB 0D 6C 02 98 31 3A 98 31 00 30 0E 76 02 |E...l..1:.1.0.v.| 000005F0: 98 31 2C C7 28 31 29 22 11 50 52 4F 47 52 41 4D |.1,.(1)".PROGRAM| 00000600: 4D 42 49 42 4C 49 4F 54 48 45 4B 22 C7 28 31 32 |MBIBLIOTHEK".(12| 00000610: 39 29 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |9)" | 00000620: 20 20 20 20 20 20 20 53 45 49 54 45 20 22 3B 3A | SEITE ";:| 00000630: 00 39 0E 80 02 98 31 2C 58 00 74 0E 8A 02 98 31 |.9....1,X.t....1| 00000640: 3A 98 31 2C 22 11 50 52 4F 47 52 41 4D 4D 4E 41 |:.1,".PROGRAMMNA| 00000650: 4D 45 20 20 20 20 20 20 20 20 20 20 20 20 20 44 |ME D| 00000660: 49 53 4B 45 54 54 45 20 20 20 20 20 20 20 20 20 |ISKETTE | 00000670: 4E 52 2E 22 00 7D 0E 94 02 98 31 3A 8E 00 00 00 |NR.".}....1:....| 00000680: 53 3A 00 64 57 9C |S:.dW. |
..!.N.. ***PROGRAMMBIBLIOTHEK****.L.S..
DIESES PROGRAMM DURCHSUCHT DISKETTEN.R.X
.. NACH PROGRAMMNAMEN,SORTIERT UND......
DRUCKT SIE AUS.......52272,23:.A$(500):
N.1......".... PROGRAMMBIBLIOTHEK":
."..BITTE GEBEN SIE IHRE DISKETTE IN...
..".EINEN DRIVE":D$."0".0...."...WELCHER
DRIVE ."D$"....";:.D$.E.... INITIALIS
IEREN.Q....1,8,15:FL$."I".D$:.1,FL$: 1:F
L$."$".D$...H..2,8,0,FL$:."."...R.. EINL
ESEN.....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.C....HL.1.F(B$(K)).47.F(B$
(K)).58.H$.H$.B$(K).U...B$(K.1).B$(K).D.
...ST..0.360.M."..230...,.HL.0:I.I.1:A$(
I)."":.I;...6..#2,A$:.A$.G(34)..A$(I):.3
30.B.@.A$(I).A$(I).A$:.310...J..GG.0.H$.
A$(N):I.I.1:GG.1:HL.1...T..230...^.. STR
ING AUFFUELLEN...H. 2:.K.N.I.*.R..C(A$(K
))..25.390.C.|.A$(K).A$(K).".":.370._...
A$(K).A$(K).H$:.A$(K):..N.... SCHLEIFE..
...."..SOLL EINE WEITERE DISKETTE DURCH-
":."SUCHT WERDEN?J/N":.158,0......198,0.
Z....198,1:.X$:.X$."N".460.#...."..BITTE
EINE ANDERE DISKETTE EINLEGEN":.".DANN
EINE TASTE DRUECKEN.7...N.I.1:.".":.170.
L.B.. SORTIERROUTINE.T.L.."...ES WIRD SO
RTIERT.........":A.I...V..A..1.550.....A
..(A.2):B.I.A.....C.0.F....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.1.490.....
.470...... ZAEHLROUTINE.C.&..L.1.I:.H(A$
(L),16).H(A$(L.1),16).J.J.1.W.0..:A.0:.1
,4:.620.J.:.. DRUCKROUTINE.|.D..L.1.I:.A
$(L)...N..1,A$(L):A.A.1:.A.62..J.1.4:.1:
.:A.0:.620.K.X..:.1:.1,I.J".PROGRAMME":
1:....B.. TITELROUTINE...L..1:.1.0.V.
.1,G(1)".PROGRAMMBIBLIOTHEK"G(129)"
SEITE ";:.9....1,X.T....1
:.1,".PROGRAMMNAME DISKETTE
NR.".}....1:....S:.DW.
> CLICK IMAGE PREVIEW FOR FULL MODAL