_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

EXTRACT.64

FILE INFORMATION

FILENAME(S): EXTRACT.64

FILE TYPE(S): PRG

FILE SIZE: 1.3K

FIRST SEEN: 2025-12-01 13:49:06

APPEARS ON: 1 disk(s)

FILE HASH

7ae6d725a3933751124bf481b732381a2ec475de35579a33486404dd19ce765c

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
HJ 1987 EXTRACT.64 PRG hedning, Helsinborg 28 9 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 40 08 64 00 99 20  C7 28 31 34 37 29 3A 99  |..@.d.. .(147):.|
00000010: 20 22 20 53 49 44 50 4C  41 59 45 52 22 3A 99 20  | " SIDPLAYER":. |
00000020: 22 20 4D 55 53 49 43 20  46 49 4C 45 20 45 58 54  |" MUSIC FILE EXT|
00000030: 52 41 43 54 49 4F 4E 20  55 54 49 4C 49 54 59 22  |RACTION UTILITY"|
00000040: 00 60 08 6E 00 99 20 22  20 42 59 20 43 52 41 49  |.`.n.. " BY CRAI|
00000050: 47 20 43 48 41 4D 42 45  52 4C 41 49 4E 22 3A 99  |G CHAMBERLAIN":.|
00000060: 00 8D 08 78 00 44 4E B2  38 3A 53 41 B2 37 38 30  |...x.DN.8:SA.780|
00000070: 3A 53 58 B2 37 38 31 3A  53 59 B2 37 38 32 3A 53  |:SX.781:SY.782:S|
00000080: 50 B2 37 38 33 3A 86 20  4C 4E 28 33 29 00 B9 08  |P.783:. LN(3)...|
00000090: 82 00 96 20 A5 48 28 4E  29 B2 B5 28 4E AD 32 35  |... .H(N)..(N.25|
000000A0: 36 29 3A 96 20 A5 4C 28  4E 29 B2 4E AB 32 35 36  |6):. .L(N).N.256|
000000B0: AC B5 28 4E AD 32 35 36  29 00 F3 08 8C 00 96 20  |..(N.256)...... |
000000C0: A5 44 50 28 4E 29 B2 C2  28 4E 29 AA 32 35 36 AC  |.DP(N)..(N).256.|
000000D0: C2 28 4E AA 31 29 3A 42  41 B2 A5 44 50 28 34 39  |.(N.1):BA..DP(49|
000000E0: 29 AA 35 30 30 3A 50 54  B2 42 41 AA 36 3A 44 50  |).500:PT.BA.6:DP|
000000F0: B2 50 54 00 2C 09 2C 01  46 24 B2 22 22 3A 85 20  |.PT.,.,.F$."":. |
00000100: 22 20 4C 4F 41 44 20 46  49 4C 45 4E 41 4D 45 22  |" LOAD FILENAME"|
00000110: 3B 46 24 3A 8B 20 46 24  B2 22 22 20 B0 20 C3 28  |;F$:. F$."" . .(|
00000120: 46 24 29 B1 31 32 20 89  20 33 30 30 00 55 09 36  |F$).12 . 300.U.6|
00000130: 01 8D 20 36 30 30 3A 97  20 53 41 2C 30 3A 97 20  |.. 600:. SA,0:. |
00000140: 53 58 2C A5 4C 28 42 41  29 3A 97 20 53 59 2C A5  |SX,.L(BA):. SY,.|
00000150: 48 28 42 41 29 00 71 09  40 01 9E 20 36 35 34 39  |H(BA).q.@.. 6549|
00000160: 33 3A 8B 20 C2 28 53 50  29 AF 31 20 89 20 37 30  |3:. .(SP).1 . 70|
00000170: 30 00 95 09 4A 01 81 20  56 B2 31 20 A4 20 33 3A  |0...J.. V.1 . 3:|
00000180: 4C 4E 28 56 29 B2 A5 44  50 28 42 41 AA 32 AC 56  |LN(V)..DP(BA.2.V|
00000190: AB 32 29 3A 82 00 D0 09  5E 01 53 4D B2 AB 31 3A  |.2):....^.SM..1:|
000001A0: 85 20 22 20 53 54 41 52  54 49 4E 47 20 4D 45 41  |. " STARTING MEA|
000001B0: 53 55 52 45 22 3B 53 4D  3A 8B 20 53 4D B3 AB 31  |SURE";SM:. SM..1|
000001C0: 20 B0 20 53 4D B1 31 30  32 33 20 89 20 33 35 30  | . SM.1023 . 350|
000001D0: 00 09 0A 68 01 45 4D B2  30 3A 85 20 22 20 20 20  |...h.EM.0:. "   |
000001E0: 45 4E 44 49 4E 47 20 4D  45 41 53 55 52 45 22 3B  |ENDING MEASURE";|
000001F0: 45 4D 3A 8B 20 45 4D B3  30 20 B0 20 45 4D B1 31  |EM:. EM.0 . EM.1|
00000200: 30 32 33 20 89 20 33 36  30 00 49 0A 72 01 99 3A  |023 . 360.I.r..:|
00000210: 53 4C B2 53 4D 20 AF 32  35 35 3A 53 48 B2 28 53  |SL.SM .255:SH.(S|
00000220: 4D AD 34 20 AF 31 39 32  29 AA 33 30 3A 45 4C B2  |M.4 .192).30:EL.|
00000230: 45 4D 20 AF 32 35 35 3A  45 48 B2 28 45 4D AD 34  |EM .255:EH.(EM.4|
00000240: 20 AF 31 39 32 29 AA 33  30 00 8E 0A 90 01 81 20  | .192).30...... |
00000250: 56 B2 31 20 A4 20 33 3A  99 20 22 20 50 52 4F 43  |V.1 . 3:. " PROC|
00000260: 45 53 53 49 4E 47 20 56  4F 49 43 45 22 3B 56 3A  |ESSING VOICE";V:|
00000270: 44 42 B2 44 50 3A 4D 50  B2 50 54 AA 4C 4E 28 56  |DB.DP:MP.PT.LN(V|
00000280: 29 3A 8B 20 53 4D B3 30  20 89 20 34 35 30 00 B2  |):. SM.0 . 450..|
00000290: 0A 9A 01 8B 20 C2 28 50  54 29 B2 53 48 20 A7 20  |.... .(PT).SH . |
000002A0: 8B 20 C2 28 50 54 AA 31  29 B2 53 4C 20 89 20 34  |. .(PT.1).SL . 4|
000002B0: 35 30 00 CC 0A A4 01 50  54 B2 50 54 AA 32 3A 8B  |50.....PT.PT.2:.|
000002C0: 20 50 54 B3 4D 50 20 89  20 34 31 30 00 F8 0A AE  | PT.MP . 410....|
000002D0: 01 99 20 22 20 45 52 52  4F 52 3A 53 54 41 52 54  |.. " ERROR:START|
000002E0: 49 4E 47 20 4D 45 41 53  55 52 45 20 4E 4F 54 20  |ING MEASURE NOT |
000002F0: 46 4F 55 4E 44 22 3A 80  00 24 0B C2 01 50 B2 C2  |FOUND":..$...P..|
00000300: 28 50 54 29 3A 51 B2 C2  28 50 54 AA 31 29 3A 8B  |(PT):Q..(PT.1):.|
00000310: 20 50 B2 45 48 20 A7 20  8B 20 51 B2 45 4C 20 89  | P.EH . . Q.EL .|
00000320: 20 34 38 30 00 56 0B CC  01 97 20 44 50 2C 50 3A  | 480.V.... DP,P:|
00000330: 97 20 44 50 AA 31 2C 51  3A 44 50 B2 44 50 AA 32  |. DP.1,Q:DP.DP.2|
00000340: 3A 50 54 B2 50 54 AA 32  3A 8B 20 50 54 B3 4D 50  |:PT.PT.2:. PT.MP|
00000350: 20 89 20 34 35 30 00 7E  0B D6 01 99 20 22 20 4E  | . 450.~.... " N|
00000360: 4F 54 45 3A 52 41 4E 20  54 4F 20 45 4E 44 20 4F  |OTE:RAN TO END O|
00000370: 46 20 56 4F 49 43 45 22  3A 89 20 34 39 30 00 9B  |F VOICE":. 490..|
00000380: 0B E0 01 97 20 44 50 2C  31 3A 97 20 44 50 AA 31  |.... DP,1:. DP.1|
00000390: 2C 37 39 3A 44 50 B2 44  50 AA 32 00 D3 0B EA 01  |,79:DP.DP.2.....|
000003A0: 97 20 42 41 AA 32 AC 56  AB 32 2C A5 4C 28 44 50  |. BA.2.V.2,.L(DP|
000003B0: AB 44 42 29 3A 97 20 42  41 AA 32 AC 56 AB 31 2C  |.DB):. BA.2.V.1,|
000003C0: A5 48 28 44 50 AB 44 42  29 3A 50 54 B2 4D 50 3A  |.H(DP.DB):PT.MP:|
000003D0: 82 3A 99 00 00 0C F4 01  50 B2 C2 28 50 54 29 3A  |.:......P..(PT):|
000003E0: 50 54 B2 50 54 AA 31 3A  97 20 44 50 2C 50 3A 44  |PT.PT.1:. DP,P:D|
000003F0: 50 B2 44 50 AA 31 3A 8B  20 50 20 89 20 35 30 30  |P.DP.1:. P . 500|
00000400: 00 39 0C FE 01 46 24 B2  22 22 3A 85 20 22 20 53  |.9...F$."":. " S|
00000410: 41 56 45 20 46 49 4C 45  4E 41 4D 45 22 3B 46 24  |AVE FILENAME";F$|
00000420: 3A 8B 20 46 24 B2 22 22  20 B0 20 C3 28 46 24 29  |:. F$."" . .(F$)|
00000430: B1 31 32 20 89 20 35 31  30 00 66 0C 08 02 8D 20  |.12 . 510.f.... |
00000440: 36 30 30 3A 97 20 53 41  2C 32 35 31 3A 97 20 32  |600:. SA,251:. 2|
00000450: 35 31 2C A5 4C 28 42 41  29 3A 97 20 32 35 32 2C  |51,.L(BA):. 252,|
00000460: A5 48 28 42 41 29 00 9A  0C 12 02 97 20 53 58 2C  |.H(BA)...... SX,|
00000470: A5 4C 28 44 50 29 3A 97  20 53 59 2C A5 48 28 44  |.L(DP):. SY,.H(D|
00000480: 50 29 3A 9E 20 36 35 34  39 36 3A 8B 20 C2 28 53  |P):. 65496:. .(S|
00000490: 50 29 AF 31 20 89 20 37  30 30 00 A2 0C 1C 02 9C  |P).1 . 700......|
000004A0: 3A 80 00 D3 0C 58 02 99  3A 97 20 53 41 2C 31 3A  |:....X..:. SA,1:|
000004B0: 97 20 53 58 2C 44 4E 3A  97 20 53 59 2C 30 3A 9E  |. SX,DN:. SY,0:.|
000004C0: 20 36 35 34 36 36 3A 46  24 B2 46 24 AA 22 2E 4D  | 65466:F$.F$.".M|
000004D0: 55 53 22 00 FA 0C 62 02  81 20 4B B2 31 20 A4 20  |US"...b.. K.1 . |
000004E0: C3 28 46 24 29 3A 97 20  35 38 34 AA 4B 2C C6 28  |.(F$):. 584.K,.(|
000004F0: CA 28 46 24 2C 4B 29 29  3A 82 00 22 0D 6C 02 97  |.(F$,K)):..".l..|
00000500: 20 53 41 2C C3 28 46 24  29 3A 97 20 53 58 2C 37  | SA,.(F$):. SX,7|
00000510: 33 3A 97 20 53 59 2C 32  3A 9E 20 36 35 34 36 39  |3:. SY,2:. 65469|
00000520: 3A 8E 00 33 0D BC 02 99  20 22 20 45 52 52 4F 52  |:..3.... " ERROR|
00000530: 22 3A 80 00 00 00                                 |":....          |
..@.D.. G(147):. " SIDPLAYER":. " MUSIC 
FILE EXTRACTION UTILITY".`.N.. " BY CRAI
G CHAMBERLAIN":....X.DN.8:SA.780:SX.781:
SY.782:SP.783:. LN(3)...... .H(N)..(N.25
6):. .L(N).N.256..(N.256)...... .DP(N).B
(N).256.B(N.1):BA..DP(49).500:PT.BA.6:DP
.PT.,.,.F$."":. " LOAD FILENAME";F$:. F$
."" . C(F$).12 . 300.U.6.. 600:. SA,0:. 
SX,.L(BA):. SY,.H(BA).Q.@.. 65493:. B(SP
).1 . 700...J.. V.1 . 3:LN(V)..DP(BA.2.V
.2):..P.^.SM..1:. " STARTING MEASURE";SM
:. SM..1 . SM.1023 . 350...H.EM.0:. "   
ENDING MEASURE";EM:. EM.0 . EM.1023 . 36
0.I.R..:SL.SM .255:SH.(SM.4 .192).30:EL.
EM .255:EH.(EM.4 .192).30...... V.1 . 3:
. " PROCESSING VOICE";V:DB.DP:MP.PT.LN(V
):. SM.0 . 450...... B(PT).SH . . B(PT.1
).SL . 450.L...PT.PT.2:. PT.MP . 410....
.. " ERROR:STARTING MEASURE NOT FOUND":.
.$.B.P.B(PT):Q.B(PT.1):. P.EH . . Q.EL .
 480.V.L.. DP,P:. DP.1,Q:DP.DP.2:PT.PT.2
:. PT.MP . 450.~.V.. " NOTE:RAN TO END O
F VOICE":. 490...... DP,1:. DP.1,79:DP.D
P.2.S.... BA.2.V.2,.L(DP.DB):. BA.2.V.1,
.H(DP.DB):PT.MP:.:......P.B(PT):PT.PT.1:
. DP,P:DP.DP.1:. P . 500.9...F$."":. " S
AVE FILENAME";F$:. F$."" . C(F$).12 . 51
0.F.... 600:. SA,251:. 251,.L(BA):. 252,
.H(BA)...... SX,.L(DP):. SY,.H(DP):. 654
96:. B(SP).1 . 700......:..S.X..:. SA,1:
. SX,DN:. SY,0:. 65466:F$.F$.".MUS"...B.
. K.1 . C(F$):. 584.K,F(J(F$,K)):..".L..
 SA,C(F$):. SX,73:. SY,2:. 65469:..3....
 " ERROR":....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL