> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 32 08 64 00 8F 3A 20 50 52 4F 47 52 41 4D |..2.d..: PROGRAM|
00000010: 20 54 4F 20 52 45 41 44 20 41 20 4D 55 53 49 43 | TO READ A MUSIC|
00000020: 20 4D 41 53 54 45 52 20 4D 55 53 49 43 20 46 49 | MASTER MUSIC FI|
00000030: 4C 45 00 38 08 6E 00 3A 00 6E 08 78 00 4E B2 31 |LE.8.n.:.n.x.N.1|
00000040: 35 30 30 3A 20 8F 20 4D 41 58 49 4D 55 4D 20 4E |500: . MAXIMUM N|
00000050: 55 4D 42 45 52 20 4F 46 20 4E 4F 54 45 53 20 49 |UMBER OF NOTES I|
00000060: 4E 20 45 41 43 48 20 43 48 41 4E 4E 45 4C 00 74 |N EACH CHANNEL.t|
00000070: 08 80 00 3A 00 9F 08 82 00 86 20 4C 25 28 4E 2C |...:...... L%(N,|
00000080: 33 29 2C 48 25 28 4E 2C 33 29 2C 44 25 28 4E 2C |3),H%(N,3),D%(N,|
00000090: 33 29 2C 46 51 28 32 32 29 2C 54 57 28 37 29 00 |3),FQ(22),TW(7).|
000000A0: DE 08 87 00 8F 20 4C 25 28 49 2C 4A 29 20 41 4E |..... L%(I,J) AN|
000000B0: 44 20 48 25 28 49 2C 4A 29 20 41 52 45 20 54 48 |D H%(I,J) ARE TH|
000000C0: 45 20 4C 4F 57 20 26 20 48 49 47 48 20 42 59 54 |E LOW & HIGH BYT|
000000D0: 45 53 2C 20 57 48 49 43 48 20 4D 55 53 54 00 2C |ES, WHICH MUST.,|
000000E0: 09 88 00 8F 20 42 45 20 50 4F 4B 45 44 20 49 4E |.... BE POKED IN|
000000F0: 54 4F 20 53 49 44 27 53 20 46 52 45 51 55 45 4E |TO SID'S FREQUEN|
00000100: 43 59 20 52 45 47 49 53 54 45 52 53 2C 20 4F 46 |CY REGISTERS, OF|
00000110: 20 54 48 45 20 49 27 54 48 20 4E 4F 54 45 20 49 | THE I'TH NOTE I|
00000120: 4E 20 43 48 41 4E 4E 45 4C 20 4A 2E 00 6C 09 89 |N CHANNEL J..l..|
00000130: 00 8F 20 44 25 28 49 2C 4A 29 20 3D 20 44 55 52 |.. D%(I,J) = DUR|
00000140: 41 54 49 4F 4E 20 28 31 2D 32 35 35 29 20 4F 46 |ATION (1-255) OF|
00000150: 20 54 48 45 20 49 27 54 48 20 4E 4F 54 45 20 49 | THE I'TH NOTE I|
00000160: 4E 20 43 48 41 4E 4E 45 4C 20 4A 2E 00 A7 09 8A |N CHANNEL J.....|
00000170: 00 8F 20 46 51 28 29 20 48 4F 4C 44 53 20 53 49 |.. FQ() HOLDS SI|
00000180: 44 20 46 52 45 51 55 45 4E 43 49 45 53 20 46 4F |D FREQUENCIES FO|
00000190: 52 20 4F 43 54 41 56 45 20 37 20 4F 46 20 4B 45 |R OCTAVE 7 OF KE|
000001A0: 59 42 4F 41 52 44 2E 00 AD 09 8B 00 3A 00 DD 09 |YBOARD......:...|
000001B0: 8C 00 54 57 28 37 29 B2 31 3A 81 49 B2 36 A4 31 |..TW(7).1:.I.6.1|
000001C0: A9 AB 31 3A 54 57 28 49 29 B2 54 57 28 49 AA 31 |..1:TW(I).TW(I.1|
000001D0: 29 AD 32 3A 82 3A 54 57 28 30 29 B2 30 00 FC 09 |).2:.:TW(0).0...|
000001E0: 8E 00 8F 20 53 43 41 4C 45 20 46 41 43 54 4F 52 |... SCALE FACTOR|
000001F0: 53 20 46 4F 52 20 4F 43 54 41 56 45 00 02 0A 90 |S FOR OCTAVE....|
00000200: 00 3A 00 3C 0A 96 00 43 4C 4F 43 4B B2 30 2E 39 |.:.<...CLOCK.0.9|
00000210: 38 35 45 36 3A 20 8F 20 43 4C 4F 43 4B 20 46 52 |85E6: . CLOCK FR|
00000220: 45 51 55 45 4E 43 59 20 49 4E 20 48 45 52 54 5A |EQUENCY IN HERTZ|
00000230: 20 46 4F 52 20 55 2E 4B 2E 20 36 34 00 52 0A A0 | FOR U.K. 64.R..|
00000240: 00 53 43 B2 31 36 37 37 37 32 31 36 AD 43 4C 4F |.SC.16777216.CLO|
00000250: 43 4B 00 70 0A AA 00 5A B2 32 AE 28 31 AD 31 32 |CK.p...Z.2.(1.12|
00000260: 29 3A 59 B2 32 AC 34 34 30 AC 5A AC 5A AC 53 43 |):Y.2.440.Z.Z.SC|
00000270: 00 9B 0A B4 00 81 49 B2 30 A4 32 31 3A 59 B2 59 |......I.0.21:Y.Y|
00000280: AC 5A 3A 46 51 28 49 29 B2 B5 28 59 AA 2E 35 29 |.Z:FQ(I)..(Y..5)|
00000290: 3A 82 3A 46 51 28 32 32 29 B2 30 00 A1 0A BE 00 |:.:FQ(22).0.....|
000002A0: 3A 00 B4 0A C8 00 85 22 46 49 4C 45 4E 41 4D 45 |:......"FILENAME|
000002B0: 22 3B 46 24 00 CB 0A D2 00 85 22 54 41 50 45 20 |";F$......"TAPE |
000002C0: 4F 52 20 44 49 53 4B 22 3B 5A 24 00 EF 0A DC 00 |OR DISK";Z$.....|
000002D0: 8B C8 28 5A 24 2C 31 29 B3 B1 22 44 22 A7 20 9F |..(Z$,1).."D". .|
000002E0: 20 31 2C 31 2C 30 2C 46 24 3A 89 20 32 34 35 00 | 1,1,0,F$:. 245.|
000002F0: 0A 0B E6 00 9F 20 31 2C 38 2C 32 2C 22 30 3A 22 |..... 1,8,2,"0:"|
00000300: AA 46 24 AA 22 2C 53 2C 52 22 00 10 0B F0 00 3A |.F$.",S,R".....:|
00000310: 00 2A 0B F5 00 84 31 2C 5A 24 3A 8B 5A 24 B2 22 |.*....1,Z$:.Z$."|
00000320: 4D 55 53 49 43 22 A7 32 35 30 00 4C 0B F7 00 99 |MUSIC".250.L....|
00000330: 22 46 49 4C 45 20 54 59 50 45 20 45 52 52 4F 52 |"FILE TYPE ERROR|
00000340: 20 3A 20 22 3B 5A 24 3A A0 31 3A 80 00 61 0B FA | : ";Z$:.1:..a..|
00000350: 00 84 31 2C 4A 3A 8B 20 4A B3 30 20 A7 20 33 33 |..1,J:. J.0 . 33|
00000360: 30 00 7A 0B 04 01 99 22 4C 4F 41 44 49 4E 47 20 |0.z...."LOADING |
00000370: 43 48 41 4E 4E 45 4C 22 3B 4A 00 8C 0B 0E 01 81 |CHANNEL";J......|
00000380: 49 B2 31 A4 4E 3A 84 31 2C 44 2C 43 00 9C 0B 18 |I.1.N:.1,D,C....|
00000390: 01 8B 44 B2 AB 31 20 A7 20 32 35 30 00 BF 0B 22 |..D..1 . 250..."|
000003A0: 01 44 25 28 49 2C 4A 29 B2 44 3A 4F 43 B2 B5 28 |.D%(I,J).D:OC..(|
000003B0: 43 AD 33 32 29 3A 4E 54 B2 43 20 AF 20 33 31 00 |C.32):NT.C . 31.|
000003C0: DF 0B 2C 01 46 B2 46 51 28 4E 54 29 AC 54 57 28 |..,.F.FQ(NT).TW(|
000003D0: 4F 43 29 3A 48 42 B2 B5 28 46 AD 32 35 36 29 00 |OC):HB..(F.256).|
000003E0: FF 0B 31 01 48 25 28 49 2C 4A 29 B2 48 42 3A 4C |..1.H%(I,J).HB:L|
000003F0: 25 28 49 2C 4A 29 B2 46 AB 32 35 36 AC 48 42 00 |%(I,J).F.256.HB.|
00000400: 06 0C 36 01 82 49 00 0C 0C 40 01 3A 00 26 0C 4A |..6..I...@.:.&.J|
00000410: 01 99 22 45 44 49 54 20 43 48 41 4E 4E 45 4C 20 |.."EDIT CHANNEL |
00000420: 3D 20 22 3B AB 4A 00 41 0C 54 01 84 31 2C 4A 3A |= ";.J.A.T..1,J:|
00000430: 99 22 54 45 4D 50 4F 20 3D 20 22 3B 32 35 35 AA |."TEMPO = ";255.|
00000440: 4A 00 48 0C 5E 01 A0 31 00 4E 0C 68 01 3A 00 74 |J.H.^..1.N.h.:.t|
00000450: 0C 2A 03 53 49 44 B2 35 34 32 37 32 3A 97 53 49 |.*.SID.54272:.SI|
00000460: 44 AA 32 34 2C 31 35 3A 97 53 49 44 AA 36 2C 31 |D.24,15:.SID.6,1|
00000470: 35 AC 31 36 00 89 0C 2F 03 97 53 49 44 AA 34 2C |5.16.../..SID.4,|
00000480: 33 33 3A 44 44 B2 31 30 30 00 9A 0C 31 03 85 22 |33:DD.100...1.."|
00000490: 43 48 41 4E 4E 45 4C 22 3B 4A 00 C1 0C 34 03 81 |CHANNEL";J...4..|
000004A0: 49 B2 31 A4 4E 3A 97 53 49 44 2C 4C 25 28 49 2C |I.1.N:.SID,L%(I,|
000004B0: 4A 29 3A 97 53 49 44 AA 31 2C 48 25 28 49 2C 4A |J):.SID.1,H%(I,J|
000004C0: 29 00 D4 0C 39 03 8B 44 25 28 49 2C 4A 29 B2 30 |)...9..D%(I,J).0|
000004D0: A7 38 35 30 00 EB 0C 3E 03 81 4B B2 31 A4 44 25 |.850...>..K.1.D%|
000004E0: 28 49 2C 4A 29 AC 44 44 3A 82 4B 00 F2 0C 48 03 |(I,J).DD:.K...H.|
000004F0: 82 49 00 02 0D 52 03 97 53 49 44 AA 32 34 2C 30 |.I...R..SID.24,0|
00000500: 3A 80 00 08 0D 5C 03 80 00 00 00 |:....\..... |
..2.D..: PROGRAM TO READ A MUSIC MASTER
MUSIC FILE.8.N.:.N.X.N.1500: . MAXIMUM N
UMBER OF NOTES IN EACH CHANNEL.T...:....
.. L%(N,3),H%(N,3),D%(N,3),FQ(22),TW(7).
..... L%(I,J) AND H%(I,J) ARE THE LOW &
HIGH BYTES, WHICH MUST.,.... BE POKED IN
TO SID'S FREQUENCY REGISTERS, OF THE I'T
H NOTE IN CHANNEL J..L.... D%(I,J) = DUR
ATION (1-255) OF THE I'TH NOTE IN CHANNE
L J....... FQ() HOLDS SID FREQUENCIES FO
R OCTAVE 7 OF KEYBOARD......:.....TW(7).
1:.I.6.1..1:TW(I).TW(I.1).2:.:TW(0).0...
... SCALE FACTORS FOR OCTAVE.....:.<...C
LOCK.0.985E6: . CLOCK FREQUENCY IN HERTZ
FOR U.K. 64.R. .SC.16777216.CLOCK.P...Z
.2.(1.12):Y.2.440.Z.Z.SC......I.0.21:Y.Y
.Z:FQ(I)..(Y..5):.:FQ(22).0.....:...H.."
FILENAME";F$.K.R.."TAPE OR DISK";Z$.....
.H(Z$,1).."D". . 1,1,0,F$:. 245...... 1,
8,2,"0:".F$.",S,R".....:.*....1,Z$:.Z$."
MUSIC".250.L...."FILE TYPE ERROR : ";Z$:
1:..A....1,J:. J.0 . 330.Z...."LOADING
CHANNEL";J......I.1.N:.1,D,C......D..1 .
250...".D%(I,J).D:OC..(C.32):NT.C . 31.
..,.F.FQ(NT).TW(OC):HB..(F.256)...1.H%(I
,J).HB:L%(I,J).F.256.HB...6..I...@.:.&.J
.."EDIT CHANNEL = ";.J.A.T..1,J:."TEMPO
= ";255.J.H.^. 1.N.H.:.T.*.SID.54272:.SI
D.24,15:.SID.6,15.16.../..SID.4,33:DD.10
0...1.."CHANNEL";J.A.4..I.1.N:.SID,L%(I,
J):.SID.1,H%(I,J).T.9..D%(I,J).0.850...>
..K.1.D%(I,J).DD:.K...H..I...R..SID.24,0
:....\.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL