00000000: 01 04 30 04 00 00 8F 20 54 48 45 20 54 52 41 4E |..0.... THE TRAN|
00000010: 53 41 43 54 4F 52 20 56 4F 4C 55 4D 45 20 34 20 |SACTOR VOLUME 4 |
00000020: 49 53 53 55 45 20 30 33 20 50 41 47 45 20 34 35 |ISSUE 03 PAGE 45|
00000030: 00 55 04 64 00 46 52 B2 33 35 32 30 3A 8F 20 4E |.U.d.FR.3520:. N|
00000040: 4F 54 45 20 27 41 27 20 49 4E 20 54 4F 50 20 4F |OTE 'A' IN TOP O|
00000050: 43 54 41 56 45 00 8D 04 6E 00 43 4F B2 32 AE 28 |CTAVE...n.CO.2.(|
00000060: 31 AD 31 32 29 3A 8F 20 43 4F 4E 53 54 41 4E 54 |1.12):. CONSTANT|
00000070: 20 4D 55 4C 54 49 50 4C 59 45 52 20 46 4F 52 20 | MULTIPLYER FOR |
00000080: 4E 45 58 54 20 53 45 4D 49 54 4F 4E 45 00 D2 04 |NEXT SEMITONE...|
00000090: 78 00 81 20 49 B2 31 20 A4 20 39 3A 46 52 B2 46 |x.. I.1 . 9:FR.F|
000000A0: 52 AD 43 4F 3A 82 3A 8F 20 53 54 41 52 54 20 46 |R.CO:.:. START F|
000000B0: 52 20 41 54 20 27 43 27 20 42 59 20 47 4F 49 4E |R AT 'C' BY GOIN|
000000C0: 47 20 42 41 43 4B 20 39 20 53 45 4D 49 54 4F 4E |G BACK 9 SEMITON|
000000D0: 45 53 00 EE 04 82 00 53 53 B2 31 36 37 37 37 32 |ES.....SS.167772|
000000E0: 31 36 3A 8F 20 53 49 44 20 43 4C 4F 43 4B 00 09 |16:. SID CLOCK..|
000000F0: 05 8C 00 43 53 B2 31 30 32 32 37 33 30 3A 8F 20 |...CS.1022730:. |
00000100: 43 50 55 20 43 4C 4F 43 4B 00 37 05 96 00 46 43 |CPU CLOCK.7...FC|
00000110: B2 53 53 AD 43 53 3A 8F 20 46 52 45 51 55 45 4E |.SS.CS:. FREQUEN|
00000120: 43 59 20 4D 55 4C 54 49 50 4C 59 49 4E 47 20 43 |CY MULTIPLYING C|
00000130: 4F 4E 53 54 41 4E 54 00 6A 05 C8 00 86 20 46 28 |ONSTANT.j.... F(|
00000140: 37 2C 31 31 29 3A 8F 20 46 52 45 51 55 45 4E 43 |7,11):. FREQUENC|
00000150: 59 20 41 52 52 41 59 20 28 4F 43 54 41 56 45 2C |Y ARRAY (OCTAVE,|
00000160: 20 53 45 4D 49 54 4F 4E 45 29 00 96 05 2C 01 81 | SEMITONE)...,..|
00000170: 20 49 B2 30 20 A4 20 31 31 3A 8F 20 43 59 43 4C | I.0 . 11:. CYCL|
00000180: 45 20 54 48 52 4F 55 47 48 20 31 32 20 53 45 4D |E THROUGH 12 SEM|
00000190: 49 54 4F 4E 45 53 00 D2 05 36 01 53 B2 46 52 AC |ITONES...6.S.FR.|
000001A0: 46 43 3A 8F 20 43 41 4C 43 55 4C 41 54 45 20 53 |FC:. CALCULATE S|
000001B0: 49 44 20 56 41 4C 55 45 20 4F 46 20 53 45 4D 49 |ID VALUE OF SEMI|
000001C0: 54 4F 4E 45 20 49 4E 20 54 4F 50 20 4F 43 54 41 |TONE IN TOP OCTA|
000001D0: 56 45 00 F3 05 90 01 81 20 4A B2 37 20 A4 20 30 |VE...... J.7 . 0|
000001E0: 20 A9 AB 31 3A 46 28 4A 2C 49 29 B2 53 3A 53 B2 | ..1:F(J,I).S:S.|
000001F0: 53 AD 32 00 18 06 9A 01 82 3A 8F 20 43 41 4C 43 |S.2......:. CALC|
00000200: 20 56 41 4C 55 45 20 46 4F 52 20 41 4C 4C 20 38 | VALUE FOR ALL 8|
00000210: 20 4F 43 54 41 56 45 53 00 3D 06 A4 01 46 52 B2 | OCTAVES.=...FR.|
00000220: 46 52 AC 43 4F 3A 8F 20 47 4F 20 4F 4E 54 4F 20 |FR.CO:. GO ONTO |
00000230: 4E 45 58 54 20 53 45 4D 49 54 4F 4E 45 00 67 06 |NEXT SEMITONE.g.|
00000240: AE 01 82 3A 8F 20 43 4F 4E 54 49 4E 55 45 20 54 |...:. CONTINUE T|
00000250: 48 52 4F 55 47 48 20 41 4C 4C 20 31 32 20 53 45 |HROUGH ALL 12 SE|
00000260: 4D 49 54 4F 4E 45 53 00 6D 06 C2 01 8F 00 91 06 |MITONES.m.......|
00000270: CC 01 8F 20 50 52 49 4E 54 20 4F 55 54 20 41 4C |... PRINT OUT AL|
00000280: 4C 20 54 48 45 20 46 52 45 51 55 45 4E 43 49 45 |L THE FREQUENCIE|
00000290: 53 00 B9 06 D6 01 53 B2 35 34 32 37 32 3A 8F 20 |S.....S.54272:. |
000002A0: 53 54 41 52 54 20 41 44 44 52 45 53 53 20 4F 46 |START ADDRESS OF|
000002B0: 20 53 49 44 20 43 48 49 50 00 E8 06 DB 01 81 20 | SID CHIP...... |
000002C0: 49 B2 30 20 A4 20 32 34 3A 97 20 53 AA 49 2C 30 |I.0 . 24:. S.I,0|
000002D0: 3A 82 3A 8F 20 49 4E 49 54 49 41 4C 49 53 45 20 |:.:. INITIALISE |
000002E0: 53 49 44 20 43 48 49 50 00 03 07 E0 01 97 20 53 |SID CHIP...... S|
000002F0: AA 32 34 2C 31 35 3A 8F 20 53 45 54 20 56 4F 4C |.24,15:. SET VOL|
00000300: 55 4D 45 00 38 07 E5 01 97 20 53 AA 35 2C 31 31 |UME.8.... S.5,11|
00000310: 3A 8F 20 41 54 54 41 43 4B 3D 30 3A 44 45 43 41 |:. ATTACK=0:DECA|
00000320: 59 3D 30 3A 53 55 53 54 41 49 4E 3D 30 3A 52 45 |Y=0:SUSTAIN=0:RE|
00000330: 4C 45 41 53 45 3D 31 31 00 50 07 F4 01 99 20 22 |LEASE=11.P.... "|
00000340: 46 52 45 51 55 45 4E 43 59 20 54 41 42 4C 45 22 |FREQUENCY TABLE"|
00000350: 00 68 07 FE 01 99 20 22 2D 2D 2D 2D 2D 2D 2D 2D |.h.... "--------|
00000360: 2D 2D 2D 2D 2D 2D 2D 22 00 82 07 08 02 99 20 22 |-------"...... "|
00000370: 4F 43 54 20 53 45 4D 20 46 52 45 51 55 45 4E 43 |OCT SEM FREQUENC|
00000380: 59 22 00 90 07 58 02 81 20 49 B2 30 20 A4 20 37 |Y"...X.. I.0 . 7|
00000390: 00 9F 07 62 02 81 20 4A B2 30 20 A4 20 31 31 00 |...b.. J.0 . 11.|
000003A0: B7 07 6C 02 99 20 49 3B A3 34 29 3B 4A 2C B5 28 |..l.. I;.4);J,.(|
000003B0: 46 28 49 2C 4A 29 29 00 DF 07 70 02 97 20 53 AA |F(I,J))...p.. S.|
000003C0: 34 2C 33 32 3A 8F 20 47 41 54 45 20 4F 46 46 20 |4,32:. GATE OFF |
000003D0: 54 48 45 20 56 4F 49 43 45 20 46 49 52 53 54 00 |THE VOICE FIRST.|
000003E0: 11 08 71 02 48 B2 B5 28 46 28 49 2C 4A 29 AD 32 |..q.H..(F(I,J).2|
000003F0: 35 36 29 3A 8F 20 43 41 4C 43 20 48 49 47 48 20 |56):. CALC HIGH |
00000400: 42 59 54 45 20 4F 46 20 46 52 45 51 55 45 4E 43 |BYTE OF FREQUENC|
00000410: 59 00 34 08 72 02 4C B2 46 28 49 2C 4A 29 AB 48 |Y.4.r.L.F(I,J).H|
00000420: AC 32 35 36 3A 8F 20 43 41 4C 43 20 4C 4F 57 20 |.256:. CALC LOW |
00000430: 42 59 54 45 00 59 08 73 02 97 20 53 2C 4C 3A 97 |BYTE.Y.s.. S,L:.|
00000440: 20 53 AA 31 2C 48 3A 8F 20 50 55 54 20 49 4E 20 | S.1,H:. PUT IN |
00000450: 46 52 45 51 55 45 4E 43 59 00 77 08 74 02 97 20 |FREQUENCY.w.t.. |
00000460: 53 AA 34 2C 33 33 3A 8F 20 4E 4F 57 20 47 41 54 |S.4,33:. NOW GAT|
00000470: 45 20 49 54 20 4F 4E 00 96 08 75 02 81 20 4B B2 |E IT ON...u.. K.|
00000480: 31 20 A4 20 31 30 30 3A 82 3A 8F 20 57 41 49 54 |1 . 100:.:. WAIT|
00000490: 20 41 20 42 49 54 00 A0 08 76 02 82 20 4A 2C 49 | A BIT...v.. J,I|
000004A0: 00 00 00 |... |
..0.... THE TRANSACTOR VOLUME 4 ISSUE 03
PAGE 45.U.D.FR.3520:. NOTE 'A' IN TOP O
CTAVE...N.CO.2.(1.12):. CONSTANT MULTIPL
YER FOR NEXT SEMITONE.R.X.. I.1 . 9:FR.F
R.CO:.:. START FR AT 'C' BY GOING BACK 9
SEMITONES.....SS.16777216:. SID CLOCK..
...CS.1022730:. CPU CLOCK.7...FC.SS.CS:.
FREQUENCY MULTIPLYING CONSTANT.J.H.. F(
7,11):. FREQUENCY ARRAY (OCTAVE, SEMITON
E)...,.. I.0 . 11:. CYCLE THROUGH 12 SEM
ITONES.R.6.S.FR.FC:. CALCULATE SID VALUE
OF SEMITONE IN TOP OCTAVE...... J.7 . 0
..1:F(J,I).S:S.S.2......:. CALC VALUE F
OR ALL 8 OCTAVES.=...FR.FR.CO:. GO ONTO
NEXT SEMITONE.G....:. CONTINUE THROUGH A
LL 12 SEMITONES.M.B.....L.. PRINT OUT AL
L THE FREQUENCIES...V.S.54272:. START AD
DRESS OF SID CHIP...... I.0 . 24:. S.I,0
:.:. INITIALISE SID CHIP...... S.24,15:.
SET VOLUME.8.... S.5,11:. ATTACK=0:DECA
Y=0:SUSTAIN=0:RELEASE=11.P.... "FREQUENC
Y TABLE".H.... "---------------"...... "
OCT SEM FREQUENCY"...X.. I.0 . 7...B.. J
.0 . 11...L.. I;.4);J,.(F(I,J))...P.. S.
4,32:. GATE OFF THE VOICE FIRST...Q.H..(
F(I,J).256):. CALC HIGH BYTE OF FREQUENC
Y.4.R.L.F(I,J).H.256:. CALC LOW BYTE.Y.S
.. S,L:. S.1,H:. PUT IN FREQUENCY.W.T..
S.4,33:. NOW GATE IT ON...U.. K.1 . 100:
.:. WAIT A BIT. .V.. J,I...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL