> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 15 08 01 00 97 35 33 32 38 31 2C 31 3A 97 |.......53281,1:.|
00000010: 36 34 36 2C 30 00 3B 08 02 00 99 22 93 2A 2A 2A |646,0.;....".***|
00000020: 53 4F 55 4E 44 4D 41 4B 45 52 20 46 4F 52 20 54 |SOUNDMAKER FOR T|
00000030: 48 45 20 36 34 2A 2A 2A 22 3A 99 00 82 08 03 00 |HE 64***":......|
00000040: 99 22 54 48 49 53 20 50 52 4F 47 52 41 4D 20 57 |."THIS PROGRAM W|
00000050: 49 4C 4C 20 41 49 44 20 59 4F 55 20 49 4E 20 4D |ILL AID YOU IN M|
00000060: 41 4B 49 4E 47 20 20 20 20 20 53 4F 55 4E 44 53 |AKING SOUNDS|
00000070: 20 41 4E 44 20 53 41 56 49 4E 47 20 54 48 45 4D | AND SAVING THEM|
00000080: 2E 22 00 D3 08 04 00 99 22 49 54 20 57 49 4C 4C |."......"IT WILL|
00000090: 20 47 49 56 45 20 59 4F 55 20 41 4C 4C 20 54 48 | GIVE YOU ALL TH|
000000A0: 45 20 50 41 52 41 4D 41 54 45 52 53 20 46 4F 52 |E PARAMATERS FOR|
000000B0: 20 4D 41 4B 49 4E 47 20 41 20 53 4F 55 4E 44 20 | MAKING A SOUND |
000000C0: 41 4E 44 20 50 4C 41 59 20 41 20 53 41 4D 50 4C |AND PLAY A SAMPL|
000000D0: 45 2E 22 00 1F 09 05 00 99 22 49 54 20 57 49 4C |E."......"IT WIL|
000000E0: 4C 20 54 48 45 4E 20 41 53 4B 20 59 4F 55 20 49 |L THEN ASK YOU I|
000000F0: 46 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 20 20 |F YOU WANT TO |
00000100: 20 20 43 48 41 4E 47 45 20 54 48 45 20 53 4F 55 | CHANGE THE SOU|
00000110: 4E 44 20 4F 52 20 53 41 56 45 20 49 54 2E 22 00 |ND OR SAVE IT.".|
00000120: 6A 09 06 00 99 22 49 46 20 59 4F 55 20 44 45 43 |j...."IF YOU DEC|
00000130: 49 44 45 20 54 4F 20 53 41 56 45 20 49 54 2C 20 |IDE TO SAVE IT, |
00000140: 49 54 20 57 49 4C 4C 20 41 53 4B 20 20 20 59 4F |IT WILL ASK YO|
00000150: 55 20 46 4F 52 20 41 20 53 54 41 52 54 49 4E 47 |U FOR A STARTING|
00000160: 20 4C 49 4E 45 20 23 20 26 22 00 B8 09 07 00 99 | LINE # &"......|
00000170: 22 49 4E 43 52 45 4D 45 4E 54 20 41 4E 44 20 4E |"INCREMENT AND N|
00000180: 45 57 20 49 54 53 45 4C 46 20 4F 55 54 20 4F 46 |EW ITSELF OUT OF|
00000190: 20 54 48 45 20 57 41 59 2E 59 4F 55 20 43 41 4E | THE WAY.YOU CAN|
000001A0: 20 54 48 45 4E 20 4E 41 4D 45 20 54 48 45 20 53 | THEN NAME THE S|
000001B0: 4F 55 4E 44 20 41 4E 44 00 D2 09 08 00 99 22 53 |OUND AND......"S|
000001C0: 41 56 45 20 49 54 20 54 4F 20 44 49 53 4B 2E 22 |AVE IT TO DISK."|
000001D0: 3A 99 00 03 0A 09 00 99 22 50 52 45 53 53 20 41 |:......."PRESS A|
000001E0: 4E 59 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E |NY KEY TO CONTIN|
000001F0: 55 45 2E 22 3A 97 31 39 38 2C 30 3A 92 31 39 38 |UE.":.198,0:.198|
00000200: 2C 31 3A 00 20 0A 0A 00 53 B2 35 34 32 37 32 3A |,1:. ...S.54272:|
00000210: 81 45 B2 53 A4 53 AA 32 34 3A 97 45 2C 30 3A 82 |.E.S.S.24:.E,0:.|
00000220: 00 2F 0A 0F 00 99 22 93 91 22 3A 8D 32 30 30 00 |./...."..":.200.|
00000230: 74 0A 14 00 85 22 41 54 54 41 43 4B 20 52 41 54 |t...."ATTACK RAT|
00000240: 45 3A 30 2D 31 35 22 3B 41 54 3A 85 22 44 45 43 |E:0-15";AT:."DEC|
00000250: 41 59 20 52 41 54 45 3A 30 2D 31 35 22 3B 44 45 |AY RATE:0-15";DE|
00000260: 3A 41 44 B2 31 36 AC 41 54 AA 44 45 3A 97 53 AA |:AD.16.AT.DE:.S.|
00000270: 35 2C 41 44 00 B5 0A 19 00 85 22 53 55 53 54 41 |5,AD......"SUSTA|
00000280: 49 4E A0 56 4F 4C 55 4D 45 3A 31 2D 31 35 22 3B |IN.VOLUME:1-15";|
00000290: 53 55 3A 85 22 52 45 4C 45 41 53 45 20 52 41 54 |SU:."RELEASE RAT|
000002A0: 45 3A 30 2D 31 35 22 3B 52 4C 3A 4A B2 31 36 AC |E:0-15";RL:J.16.|
000002B0: 53 55 AA 52 4C 00 E1 0A 1E 00 97 53 AA 36 2C 4A |SU.RL......S.6,J|
000002C0: 3A 85 22 4F 56 45 52 41 4C 4C 20 56 4F 4C 55 4D |:."OVERALL VOLUM|
000002D0: 45 3A 31 2D 31 35 22 3B 56 3A 97 53 AA 32 34 2C |E:1-15";V:.S.24,|
000002E0: 56 00 05 0B 20 00 85 22 57 41 56 45 46 4F 52 4D |V... .."WAVEFORM|
000002F0: 3A 31 37 2F 33 33 2F 31 32 39 20 22 3B 57 3A 97 |:17/33/129 ";W:.|
00000300: 53 AA 34 2C 57 00 36 0B 21 00 85 22 53 55 53 54 |S.4,W.6.!.."SUST|
00000310: 41 49 4E 20 4C 45 4E 47 54 48 28 31 2F 31 30 54 |AIN LENGTH(1/10T|
00000320: 48 20 53 45 43 53 2E 29 22 3B 4C 45 3A 4C 45 B2 |H SECS.)";LE:LE.|
00000330: 4C 45 AC 31 30 30 00 67 0B 22 00 85 22 52 45 4C |LE.100.g.".."REL|
00000340: 45 41 53 45 20 4C 45 4E 47 54 48 28 31 2F 31 30 |EASE LENGTH(1/10|
00000350: 54 48 20 53 45 43 53 2E 29 22 3B 44 4C 3A 44 4C |TH SECS.)";DL:DL|
00000360: B2 44 4C AC 31 30 30 00 94 0B 23 00 85 22 48 49 |.DL.100...#.."HI|
00000370: 47 48 20 42 59 54 45 22 3B 48 3A 85 22 4C 4F 57 |GH BYTE";H:."LOW|
00000380: 20 42 59 54 45 22 3B 4C 3A 97 53 AA 31 2C 48 3A | BYTE";L:.S.1,H:|
00000390: 97 53 2C 4C 00 A3 0B 28 00 81 54 B2 31 A4 4C 45 |.S,L...(..T.1.LE|
000003A0: 3A 82 54 00 B2 0B 2A 00 97 53 AA 34 2C 28 57 AB |:.T...*..S.4,(W.|
000003B0: 31 29 00 C0 0B 2B 00 81 54 B2 31 A4 44 4C 3A 82 |1)...+..T.1.DL:.|
000003C0: 00 D5 0B 32 00 81 45 B2 53 A4 53 AA 32 34 3A 97 |...2..E.S.S.24:.|
000003D0: 45 2C 30 3A 82 00 03 0C 3C 00 99 22 13 11 11 11 |E,0:....<.."....|
000003E0: 11 11 11 11 11 11 11 11 11 11 12 43 48 41 4E 47 |...........CHANG|
000003F0: 45 20 4F 52 20 53 41 56 45 3F 92 20 43 20 4F 52 |E OR SAVE?. C OR|
00000400: 20 53 22 00 2C 0C 41 00 A1 41 24 3A 8B 41 24 B2 | S".,.A..A$:.A$.|
00000410: 22 22 A7 89 36 35 3A 8B 41 24 B3 B1 43 A7 89 36 |""..65:.A$..C..6|
00000420: 35 3A 8B 41 24 B3 B1 53 A7 89 36 35 00 5E 0C 46 |5:.A$..S..65.^.F|
00000430: 00 8B 41 24 B2 22 43 22 A7 99 22 13 11 11 11 11 |..A$."C"..".....|
00000440: 11 11 11 11 11 11 11 11 11 20 20 20 20 20 20 20 |......... |
00000450: 20 20 20 20 20 20 20 20 20 22 3A 89 32 30 00 72 | ":.20.r|
00000460: 0C 50 00 8F 20 D0 D2 C9 CE D4 A0 D0 D2 CF C7 D2 |.P.. ...........|
00000470: C1 CD 00 9B 0C 55 00 85 22 93 53 54 41 52 54 49 |.....U..".STARTI|
00000480: 4E 47 20 4C 49 4E 45 22 3B 53 4C 3A 85 22 49 4E |NG LINE";SL:."IN|
00000490: 43 52 45 4D 45 4E 54 22 3B 49 4E 00 A4 0C 56 00 |CREMENT";IN...V.|
000004A0: 99 22 93 22 00 B5 0C 58 00 99 22 11 11 11 4E 45 |."."...X.."...NE|
000004B0: 57 11 11 11 22 00 EA 0C 59 00 99 53 4C 3B 22 53 |W..."...Y..SL;"S|
000004C0: 3D 35 34 32 37 32 3A 46 4F 52 45 3D 53 54 4F 53 |=54272:FORE=STOS|
000004D0: 2B 32 34 3A 50 4F 4B 45 45 2C 30 3A 4E 45 58 54 |+24:POKEE,0:NEXT|
000004E0: 22 3A 53 4C B2 53 4C AA 49 4E 00 26 0D 5A 00 99 |":SL.SL.IN.&.Z..|
000004F0: 53 4C 3B 22 50 4F 4B 45 53 2B 32 34 2C 22 3B 56 |SL;"POKES+24,";V|
00000500: 3B 22 3A 50 4F 4B 45 53 2B 35 2C 22 3B 41 44 3B |;":POKES+5,";AD;|
00000510: 22 3A 50 4F 4B 45 53 2B 36 2C 22 3B 4A 3A 53 4C |":POKES+6,";J:SL|
00000520: B2 53 4C AA 49 4E 00 5E 0D 78 00 99 53 4C 3B 22 |.SL.IN.^.x..SL;"|
00000530: 50 4F 4B 45 53 2B 34 2C 22 3B 57 3B 22 3A 50 4F |POKES+4,";W;":PO|
00000540: 4B 45 53 2B 31 2C 22 3B 48 3B 22 3A 50 4F 4B 45 |KES+1,";H;":POKE|
00000550: 53 2C 22 3B 4C 3A 53 4C B2 53 4C AA 49 4E 00 A6 |S,";L:SL.SL.IN..|
00000560: 0D 8C 00 99 53 4C 3B 22 46 4F 52 54 3D 31 54 4F |....SL;"FORT=1TO|
00000570: 22 3B 4C 45 3B 22 3A 4E 45 58 54 22 3B 22 3A 50 |";LE;":NEXT";":P|
00000580: 4F 4B 45 53 2B 34 2C 22 3B 28 57 AB 31 29 3B 22 |OKES+4,";(W.1);"|
00000590: 9D 3A 46 4F 52 54 3D 31 54 4F 22 3B 44 4C 3B 22 |.:FORT=1TO";DL;"|
000005A0: 3A 4E 45 58 54 22 00 D3 0D 96 00 53 4C B2 53 4C |:NEXT".....SL.SL|
000005B0: AA 49 4E 3A 99 53 4C 3B 22 46 4F 52 45 3D 53 54 |.IN:.SL;"FORE=ST|
000005C0: 4F 53 2B 32 34 3A 50 4F 4B 45 45 2C 30 3A 4E 45 |OS+24:POKEE,0:NE|
000005D0: 58 54 22 00 F0 0D 9B 00 99 22 13 22 3B 3A 81 52 |XT"......".";:.R|
000005E0: B2 36 33 31 A4 36 34 34 3A 97 52 2C 31 33 3A 82 |.631.644:.R,13:.|
000005F0: 00 FC 0D A0 00 97 31 39 38 2C 31 33 00 02 0E A5 |......198,13....|
00000600: 00 80 00 26 0E C8 00 99 22 53 41 4D 50 4C 45 20 |...&...."SAMPLE |
00000610: 44 41 54 41 20 46 4F 52 20 50 49 54 43 48 20 56 |DATA FOR PITCH V|
00000620: 41 4C 55 45 53 22 00 51 0E CD 00 99 22 50 49 54 |ALUES".Q...."PIT|
00000630: 43 48 20 48 49 47 48 20 42 59 54 45 2F 4C 4F 57 |CH HIGH BYTE/LOW|
00000640: 20 42 59 54 45 20 20 12 57 41 56 45 46 4F 52 4D | BYTE .WAVEFORM|
00000650: 53 00 7E 0E D2 00 99 22 20 20 20 43 20 20 20 20 |S.~...." C |
00000660: 20 20 20 33 33 20 20 20 20 20 20 31 33 35 20 20 | 33 135 |
00000670: 20 20 20 54 52 49 41 4E 47 4C 45 3D 31 37 00 AB | TRIANGLE=17..|
00000680: 0E DC 00 99 22 20 20 20 43 23 20 20 20 20 20 20 |...." C# |
00000690: 33 35 20 20 20 20 20 20 31 33 34 20 20 20 20 20 |35 134 |
000006A0: 53 41 57 54 4F 4F 54 48 3D 33 33 00 D6 0E E6 00 |SAWTOOTH=33.....|
000006B0: 99 22 20 20 20 44 20 20 20 20 20 20 20 33 37 20 |." D 37 |
000006C0: 20 20 20 20 20 31 36 32 20 20 20 20 20 4E 4F 49 | 162 NOI|
000006D0: 53 45 3D 31 32 39 00 F3 0E F0 00 99 22 20 20 20 |SE=129......" |
000006E0: 44 23 20 20 20 20 20 20 33 39 20 20 20 20 20 20 |D# 39 |
000006F0: 32 32 33 00 0F 0F FA 00 99 22 20 20 20 45 20 20 |223......" E |
00000700: 20 20 20 20 20 34 32 20 20 20 20 20 20 36 32 00 | 42 62.|
00000710: 2C 0F 04 01 99 22 20 20 20 46 20 20 20 20 20 20 |,...." F |
00000720: 20 34 34 20 20 20 20 20 20 31 39 33 00 49 0F 0E | 44 193.I..|
00000730: 01 99 22 20 20 20 46 23 20 20 20 20 20 20 34 37 |.." F# 47|
00000740: 20 20 20 20 20 20 31 30 37 00 65 0F 18 01 99 22 | 107.e...."|
00000750: 20 20 20 47 20 20 20 20 20 20 20 35 30 20 20 20 | G 50 |
00000760: 20 20 20 36 30 00 81 0F 22 01 99 22 20 20 20 47 | 60...".." G|
00000770: 23 20 20 20 20 20 20 35 33 20 20 20 20 20 20 35 |# 53 5|
00000780: 37 00 9D 0F 2C 01 99 22 20 20 20 41 20 20 20 20 |7...,.." A |
00000790: 20 20 20 35 36 20 20 20 20 20 20 39 39 00 BA 0F | 56 99...|
000007A0: 36 01 99 22 20 20 20 41 23 20 20 20 20 20 20 35 |6.." A# 5|
000007B0: 39 20 20 20 20 20 20 31 39 30 00 D6 0F 40 01 99 |9 190...@..|
000007C0: 22 20 20 20 42 20 20 20 20 20 20 20 36 33 20 20 |" B 63 |
000007D0: 20 20 20 20 37 35 00 DC 0F 4A 01 99 00 E2 0F 54 | 75...J.....T|
000007E0: 01 8E 00 00 00 |..... |
.......53281,1:.646,0.;....".***SOUNDMAK
ER FOR THE 64***":......."THIS PROGRAM W
ILL AID YOU IN MAKING SOUNDS AND SAV
ING THEM.".S...."IT WILL GIVE YOU ALL TH
E PARAMATERS FOR MAKING A SOUND AND PLAY
A SAMPLE."......"IT WILL THEN ASK YOU I
F YOU WANT TO CHANGE THE SOUND OR SA
VE IT.".J...."IF YOU DECIDE TO SAVE IT,
IT WILL ASK YOU FOR A STARTING LINE #
&"......"INCREMENT AND NEW ITSELF OUT OF
THE WAY.YOU CAN THEN NAME THE SOUND AND
.R...."SAVE IT TO DISK.":......."PRESS A
NY KEY TO CONTINUE.":.198,0:.198,1:. ...
S.54272:.E.S.S.24:.E,0:../...."..":.200.
T...."ATTACK RATE:0-15";AT:."DECAY RATE:
0-15";DE:AD.16.AT.DE:.S.5,AD......"SUSTA
IN VOLUME:1-15";SU:."RELEASE RATE:0-15";
RL:J.16.SU.RL......S.6,J:."OVERALL VOLUM
E:1-15";V:.S.24,V... .."WAVEFORM:17/33/1
29 ";W:.S.4,W.6.!.."SUSTAIN LENGTH(1/10T
H SECS.)";LE:LE.LE.100.G.".."RELEASE LEN
GTH(1/10TH SECS.)";DL:DL.DL.100...#.."HI
GH BYTE";H:."LOW BYTE";L:.S.1,H:.S,L...(
..T.1.LE:.T...*..S.4,(W.1)...+..T.1.DL:.
.U.2..E.S.S.24:.E,0:....<.."............
...CHANGE OR SAVE?. C OR S".,.A..A$:.A$.
""..65:.A$..C..65:.A$..S..65.^.F..A$."C"
..".............. ":.20.R
.P.. PRINT PROGRAM...U..".STARTING LINE"
;SL:."INCREMENT";IN...V.."."...X.."...NE
W..."...Y..SL;"S=54272:FORE=STOS+24:POKE
E,0:NEXT":SL.SL.IN.&.Z..SL;"POKES+24,";V
;":POKES+5,";AD;":POKES+6,";J:SL.SL.IN.^
.X..SL;"POKES+4,";W;":POKES+1,";H;":POKE
S,";L:SL.SL.IN......SL;"FORT=1TO";LE;":N
EXT";":POKES+4,";(W.1);".:FORT=1TO";DL;"
:NEXT".S...SL.SL.IN:.SL;"FORE=STOS+24:PO
KEE,0:NEXT"......".";:.R.631.644:.R,13:.
... ..198,13.......&.H.."SAMPLE DATA FOR
PITCH VALUES".Q.M.."PITCH HIGH BYTE/LOW
BYTE .WAVEFORMS.~.R.." C 33
135 TRIANGLE=17......" C#
35 134 SAWTOOTH=33.V...." D
37 162 NOISE=129......"
D# 39 223......" E 42
62.,...." F 44 193.I..
.." F# 47 107.E...." G
50 60...".." G# 53 5
7...,.." A 56 99...6.." A
# 59 190.V.@.." B 63
75...J.....T.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL