LIBRARY
FILE INFORMATION
FILENAME(S): LIBRARY
FILE TYPE(S): PRG
FILE SIZE: 1.5K
FIRST SEEN: 2025-11-30 01:13:13
APPEARS ON: 1 disk(s)
FILE HASH
0e6aa8a5083919f5736241c221dba35f3d813c880ebd5d3b781c10ab3f3d5690
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 15721 SEITE B | LIBRARY | PRG | C64er | 5 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1C 08 50 C3 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |....P.. ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 37 08 5A |************.7.Z|
00000020: C3 8F 20 2A 20 4C 49 42 52 41 52 59 20 56 20 31 |.. * LIBRARY V 1|
00000030: 2E 30 20 20 20 20 2A 00 52 08 64 C3 8F 20 2A 20 |.0 *.R.d.. * |
00000040: 5A 55 53 41 4D 4D 45 4E 47 45 53 54 45 4C 4C 54 |ZUSAMMENGESTELLT|
00000050: 20 2A 00 6D 08 6E C3 8F 20 2A 20 20 20 20 20 20 | *.m.n.. * |
00000060: 20 56 4F 4E 3A 20 20 20 20 20 20 20 2A 00 88 08 | VON: *...|
00000070: 78 C3 8F 20 2A 20 20 54 48 4F 4D 41 53 20 20 4B |x.. * THOMAS K|
00000080: 4F 4C 42 45 20 20 20 2A 00 A3 08 82 C3 8F 20 2A |OLBE *...... *|
00000090: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000A0: 2A 2A 2A 00 A9 08 8C C3 3A 00 C0 08 B4 C3 5C 50 |***.....:.....\P|
000000B0: 52 4F 43 20 43 4C 53 3A 99 22 93 22 3B 3A 5C 80 |ROC CLS:.".";:\.|
000000C0: 00 C6 08 BE C3 3A 00 DA 08 E6 C3 5C 50 52 4F 43 |.....:.....\PROC|
000000D0: 20 43 55 52 53 B0 20 58 2C 59 00 03 09 F0 C3 97 | CURS. X,Y......|
000000E0: 37 38 31 2C 59 3A 97 37 38 32 2C 58 3A 97 37 38 |781,Y:.782,X:.78|
000000F0: 33 2C C2 28 37 38 33 29 AF 32 35 34 3A 9E 36 35 |3,.(783).254:.65|
00000100: 35 32 30 00 0A 09 FA C3 5C 80 00 10 09 04 C4 3A |520.....\......:|
00000110: 00 3A 09 18 C4 5C 50 52 4F 43 20 50 52 54 41 54 |.:...\PROC PRTAT|
00000120: 20 58 2C 59 2C 41 24 3A 21 43 55 52 53 B0 20 58 | X,Y,A$:!CURS. X|
00000130: 2C 59 3A 99 41 24 3B 3A 5C 80 00 40 09 22 C4 3A |,Y:.A$;:\..@.".:|
00000140: 00 75 09 2C C4 5C 50 52 4F 43 20 92 4B 45 59 20 |.u.,.\PROC .KEY |
00000150: 23 5A 51 24 2C 45 52 24 2C 4D 4F 44 55 53 3A 5C |#ZQ$,ER$,MODUS:\|
00000160: 56 41 52 20 49 3A 8B 4D 4F 44 55 53 A7 99 22 12 |VAR I:.MODUS..".|
00000170: 20 92 9D 22 3B 00 8C 09 36 C4 A1 5A 51 24 3A 8B | ..";...6..ZQ$:.|
00000180: 5A 51 24 B2 22 22 A7 35 30 32 33 30 00 A0 09 3B |ZQ$."".50230...;|
00000190: C4 8B 20 45 52 24 B2 22 22 A7 20 35 30 32 34 35 |.. ER$."". 50245|
000001A0: 00 C2 09 40 C4 21 B9 49 54 49 91 20 5A 51 24 2C |...@.!.ITI. ZQ$,|
000001B0: 45 52 24 2C 49 3A 8B 49 B2 30 20 A7 20 35 30 32 |ER$,I:.I.0 . 502|
000001C0: 33 30 00 D3 09 45 C4 8B 4D 4F 44 55 53 A7 99 5A |30...E..MODUS..Z|
000001D0: 51 24 3B 00 DA 09 4A C4 5C 80 00 E0 09 54 C4 3A |Q$;...J.\....T.:|
000001E0: 00 FA 09 7C C4 5C 50 52 4F 43 20 B9 49 54 49 91 |...|.\PROC .ITI.|
000001F0: 20 41 24 2C 42 24 2C 23 5A 51 00 14 0A 86 C4 81 | A$,B$,#ZQ......|
00000200: 5A 51 B2 31 A4 28 C3 28 42 24 29 AB C3 28 41 24 |ZQ.1.(.(B$)..(A$|
00000210: 29 AA 31 29 00 36 0A 90 C4 8B 41 24 B3 B1 CA 28 |).1).6....A$...(|
00000220: 42 24 2C 5A 51 2C C3 28 41 24 29 29 A7 3A 82 5A |B$,ZQ,.(A$)).:.Z|
00000230: 51 3A 5A 51 B2 30 00 3D 0A 9A C4 5C 80 00 43 0A |Q:ZQ.0.=...\..C.|
00000240: A4 C4 3A 00 59 0A AE C4 5C 50 52 4F 43 20 9C 45 |..:.Y...\PROC .E|
00000250: 4F 4C 3A 5C 56 41 52 20 49 00 69 0A B8 C4 49 B2 |OL:\VAR I.i...I.|
00000260: 34 30 AB C2 28 32 31 31 29 00 A2 0A C2 C4 99 C8 |40..(211).......|
00000270: 28 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |(" |
00000280: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000290: 20 20 20 20 20 20 20 20 20 20 22 2C 49 29 3B 3A | ",I);:|
000002A0: 5C 80 00 A8 0A CC C4 3A 00 D1 0A E0 C4 5C 50 52 |\......:.....\PR|
000002B0: 4F 43 20 4C 49 4E 49 45 20 41 3A 81 20 41 B2 41 |OC LINIE A:. A.A|
000002C0: A4 31 A9 AB 31 3A 99 22 A4 22 3B 3A 82 41 3A 5C |.1..1:.".";:.A:\|
000002D0: 80 00 D7 0A EA C4 3A 00 03 0B 12 C5 5C 50 52 4F |......:.....\PRO|
000002E0: 43 20 43 4F 4C B0 20 52 41 2C 48 49 3A 97 35 33 |C COL. RA,HI:.53|
000002F0: 32 38 30 2C 52 41 3A 97 35 33 32 38 31 2C 48 49 |280,RA:.53281,HI|
00000300: 3A 5C 80 00 09 0B 1C C5 3A 00 1D 0B 44 C5 5C 50 |:\......:...D.\P|
00000310: 52 4F 43 20 43 45 4E 54 45 52 20 41 24 00 45 0B |ROC CENTER A$.E.|
00000320: 4E C5 21 50 52 54 41 54 20 B5 28 28 34 30 AB C3 |N.!PRTAT .((40..|
00000330: 28 41 24 29 29 AD 32 29 2C C2 28 32 31 34 29 2C |(A$)).2),.(214),|
00000340: 41 24 3A 5C 80 00 4B 0B 58 C5 3A 00 73 0B 76 C5 |A$:\..K.X.:.s.v.|
00000350: 5C 50 52 4F 43 20 46 45 54 43 48 20 23 5A 59 24 |\PROC FETCH #ZY$|
00000360: 2C 4C 3A 5C 56 41 52 20 49 2C 54 24 3A 5A 59 24 |,L:\VAR I,T$:ZY$|
00000370: B2 22 22 00 90 0B 80 C5 21 4C 49 4E 49 45 20 4C |."".....!LINIE L|
00000380: 3A 81 49 B2 31 A4 4C 3A 99 22 9D 22 3B 3A 82 49 |:.I.1.L:.".";:.I|
00000390: 00 9D 0B 8A C5 99 22 12 20 92 9D 22 3B 00 AF 0B |......". ..";...|
000003A0: 8F C5 21 92 4B 45 59 20 54 24 2C 22 22 2C 30 00 |..!.KEY T$,"",0.|
000003B0: E4 0B 94 C5 8B 54 24 B1 B2 22 20 22 AF 54 24 B3 |.....T$.." ".T$.|
000003C0: B2 22 5F 22 AF 4C B1 C3 28 5A 59 24 29 A7 99 54 |."_".L..(ZY$)..T|
000003D0: 24 3B 3A 5A 59 24 B2 5A 59 24 AA 54 24 3A 89 35 |$;:ZY$.ZY$.T$:.5|
000003E0: 30 35 37 30 00 19 0C 9E C5 8B 54 24 B2 C7 28 32 |0570......T$..(2|
000003F0: 30 29 AF C3 28 5A 59 24 29 B1 30 A7 5A 59 24 B2 |0)..(ZY$).0.ZY$.|
00000400: C8 28 5A 59 24 2C C3 28 5A 59 24 29 AB 31 29 3A |.(ZY$,.(ZY$).1):|
00000410: 99 22 9D 20 A4 9D 9D 22 3B 00 2D 0C A8 C5 8B 54 |.". ...";.-....T|
00000420: 24 B2 C7 28 32 30 29 A7 35 30 35 37 30 00 42 0C |$..(20).50570.B.|
00000430: B2 C5 8B 54 24 B3 B1 C7 28 31 33 29 A7 35 30 35 |...T$...(13).505|
00000440: 37 35 00 4E 0C BC C5 99 22 A4 22 3A 5C 80 00 54 |75.N....".":\..T|
00000450: 0C C6 C5 3A 00 7E 0C DA C5 5C 50 52 4F 43 20 4C |...:.~...\PROC L|
00000460: 99 20 53 45 4B 2C 41 24 3A 9F 20 31 2C 34 2C 53 |. SEK,A$:. 1,4,S|
00000470: 45 4B 3A 98 31 2C 41 24 3A A0 31 3A 5C 80 00 84 |EK:.1,A$:.1:\...|
00000480: 0C E4 C5 3A 00 B3 0C EE C5 5C 50 52 4F 43 20 53 |...:.....\PROC S|
00000490: 54 41 54 55 53 20 23 51 4E 2C 23 51 45 24 2C 23 |TATUS #QN,#QE$,#|
000004A0: 51 54 2C 23 51 53 3A A0 31 35 3A 9F 31 35 2C 38 |QT,#QS:.15:.15,8|
000004B0: 2C 31 35 00 CF 0C F8 C5 84 31 35 2C 51 4E 2C 51 |,15......15,QN,Q|
000004C0: 45 24 2C 51 54 2C 51 53 3A A0 31 35 3A 5C 80 00 |E$,QT,QS:.15:\..|
000004D0: D5 0C 02 C6 3A 00 18 0D 0C C6 5C 50 52 4F 43 20 |....:.....\PROC |
000004E0: 42 45 45 50 20 48 2C 4C 3A 5C 56 41 52 20 49 3A |BEEP H,L:\VAR I:|
000004F0: 97 35 34 32 39 36 2C 31 35 3A 97 35 34 32 39 35 |.54296,15:.54295|
00000500: 2C 30 3A 97 35 34 32 37 32 2C 48 AB B5 28 48 AD |,0:.54272,H..(H.|
00000510: 32 35 36 29 AC 32 35 36 00 48 0D 16 C6 97 35 34 |256).256.H....54|
00000520: 32 37 33 2C 48 AD 32 35 36 3A 97 35 34 32 37 37 |273,H.256:.54277|
00000530: 2C 32 36 3A 97 35 34 32 37 38 2C 32 33 30 3A 97 |,26:.54278,230:.|
00000540: 35 34 32 37 36 2C 33 33 00 63 0D 20 C6 81 49 B2 |54276,33.c. ..I.|
00000550: 31 A4 4C 3A 82 49 3A 97 35 34 32 37 36 2C 33 32 |1.L:.I:.54276,32|
00000560: 3A 5C 80 00 69 0D 2A C6 3A 00 87 0D 34 C6 5C 50 |:\..i.*.:...4.\P|
00000570: 52 4F 43 20 43 41 54 41 BC 3A 5C 56 41 52 20 41 |ROC CATA.:\VAR A|
00000580: 24 2C 42 24 3A A0 33 00 A0 0D 3E C6 9F 33 2C 38 |$,B$:.3...>..3,8|
00000590: 2C 30 2C 22 24 22 3A A1 23 33 2C 41 24 2C 41 24 |,0,"$":.#3,A$,A$|
000005A0: 00 BB 0D 48 C6 A1 23 33 2C 41 24 2C 41 24 3A 8B |...H..#3,A$,A$:.|
000005B0: 53 54 B2 36 34 A7 A0 33 3A 5C 80 00 F0 0D 52 C6 |ST.64..3:\....R.|
000005C0: A1 23 33 2C 41 24 2C 42 24 3A 99 CA 28 C4 28 C6 |.#3,A$,B$:..(.(.|
000005D0: 28 41 24 AA C7 28 30 29 29 AA 32 35 36 AC C6 28 |(A$..(0)).256..(|
000005E0: 42 24 AA C7 28 30 29 29 29 2C 32 29 22 20 22 3B |B$..(0))),2)" ";|
000005F0: 00 0E 0E 5C C6 A1 23 33 2C 41 24 3A 99 41 24 3B |...\..#3,A$:.A$;|
00000600: 3A 8B 41 24 B3 B1 22 22 A7 35 30 37 38 30 00 1B |:.A$.."".50780..|
00000610: 0E 66 C6 99 3A 89 35 30 37 36 30 00 00 00 |.f..:.50760... |
....PC. ********************.7.ZC. * LIB
RARY V 1.0 *.R.DC. * ZUSAMMENGESTELLT
*.M.NC. * VON: *...XC. * T
HOMAS KOLBE *....C. *****************
***....C:....C\PROC CLS:.".";:\..F..C:.Z
..C\PROC CURS. X,Y....C.781,Y:.782,X:.78
3,B(783).254:.65520....C\.....D:.:..D\PR
OC PRTAT X,Y,A$:!CURS. X,Y:.A$;:\..@."D:
.U.,D\PROC .KEY #ZQ$,ER$,MODUS:\VAR I:.M
ODUS..". ..";...6D.ZQ$:.ZQ$."".50230. .;
D. ER$."". 50245.B.@D!.ITI. ZQ$,ER$,I:.I
.0 . 50230.S.ED.MODUS..ZQ$;.Z.JD\....TD:
...|D\PROC .ITI. A$,B$,#ZQ....D.ZQ.1.(C(
B$).C(A$).1).6..D.A$..J(B$,ZQ,C(A$)).:.Z
Q:ZQ.0.=..D\..C..D:.Y..D\PROC .EOL:\VAR
I.I..DI.40.B(211)...BD.H("
",I);:\....LD:
.Q..D\PROC LINIE A:. A.A.1..1:.".";:.A:\
..W..D:....E\PROC COL. RA,HI:.53280,RA:.
53281,HI:\.....E:...DE\PROC CENTER A$.E.
NE!PRTAT .((40.C(A$)).2),B(214),A$:\..K.
XE:.S.VE\PROC FETCH #ZY$,L:\VAR I,T$:ZY$
.""....E!LINIE L:.I.1.L:.".";:.I....E.".
..";....E!.KEY T$,"",0....E.T$.." ".T$.
."_".L.C(ZY$)..T$;:ZY$.ZY$.T$:.50570....
E.T$.G(20).C(ZY$).0.ZY$.H(ZY$,C(ZY$).1):
.". ...";.-..E.T$.G(20).50570.B..E.T$..G
(13).50575.N..E.".":\..T.FE:.~.ZE\PROC L
. SEK,A$:. 1,4,SEK:.1,A$: 1:\.....E:....
E\PROC STATUS #QN,#QE$,#QT,#QS: 15:.15,8
,15.O..E.15,QN,QE$,QT,QS: 15:\..U..F:...
.F\PROC BEEP H,L:\VAR I:.54296,15:.54295
,0:.54272,H..(H.256).256.H..F.54273,H.25
6:.54277,26:.54278,230:.54276,33.C. F.I.
1.L:.I:.54276,32:\..I.*F:...4F\PROC CATA
.:\VAR A$,B$: 3. .>F.3,8,0,"$":.#3,A$,A$
...HF.#3,A$,A$:.ST.64. 3:\....RF.#3,A$,B
$:.J(D(F(A$.G(0)).256.F(B$.G(0))),2)" ";
...\F.#3,A$:.A$;:.A$.."".50780...FF.:.50
760...
> CLICK IMAGE PREVIEW FOR FULL MODAL