> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 27 08 0A 00 8F 20 43 4F 50 59 52 49 47 48 |..'.... COPYRIGH|
00000010: 54 20 28 43 29 20 41 4E 44 52 45 57 20 43 4F 4C |T (C) ANDREW COL|
00000020: 49 4E 20 31 39 38 32 00 44 08 0F 00 56 B2 35 34 |IN 1982.D...V.54|
00000030: 32 37 32 3A 81 49 B2 30 A4 32 38 3A 97 56 AA 49 |272:.I.0.28:.V.I|
00000040: 2C 30 3A 82 00 4F 08 14 00 99 22 93 05 22 3B 00 |,0:..O...."..";.|
00000050: 66 08 1E 00 97 35 34 32 39 35 2C 30 3A 97 35 34 |f....54295,0:.54|
00000060: 32 39 36 2C 31 35 00 72 08 28 00 86 20 54 24 28 |296,15.r.(.. T$(|
00000070: 34 29 00 89 08 32 00 81 4A B2 31 A4 34 3A 87 20 |4)...2..J.1.4:. |
00000080: 54 24 28 4A 29 3A 82 20 4A 00 B0 08 3C 00 83 20 |T$(J):. J...<.. |
00000090: 54 52 49 41 4E 47 55 4C 41 52 2C 53 41 57 54 4F |TRIANGULAR,SAWTO|
000000A0: 4F 54 48 2C 50 55 4C 53 45 44 2C 4E 4F 49 53 45 |OTH,PULSED,NOISE|
000000B0: 00 D6 08 46 00 46 B2 35 31 32 3A 50 B2 32 30 30 |...F.F.512:P.200|
000000C0: 3A 57 B2 31 3A 41 B2 30 3A 44 B2 39 3A 53 B2 30 |:W.1:A.0:D.9:S.0|
000000D0: 3A 54 B2 32 35 30 00 03 09 50 00 99 22 93 11 11 |:T.250...P.."...|
000000E0: 05 1D 1D 1D 1D 1D 45 58 50 45 52 49 4D 45 4E 54 |......EXPERIMENT|
000000F0: 41 4C 20 53 4F 55 4E 44 20 47 45 4E 45 52 41 54 |AL SOUND GENERAT|
00000100: 4F 52 22 00 2C 09 5A 00 99 22 1D 1D 1D 1D 1D C5 |OR".,.Z.."......|
00000110: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |................|
00000120: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 22 00 5F 09 64 |..........."._.d|
00000130: 00 99 3A 99 22 1D 50 52 45 53 53 20 54 48 45 20 |..:.".PRESS THE |
00000140: 53 50 41 43 45 20 42 41 52 20 54 4F 20 48 45 41 |SPACE BAR TO HEA|
00000150: 52 20 54 48 45 20 53 4F 55 4E 44 22 3A 99 3A 00 |R THE SOUND":.:.|
00000160: 8E 09 6E 00 99 22 1D 4F 52 20 54 59 50 45 20 54 |..n..".OR TYPE T|
00000170: 48 45 20 49 4E 49 54 49 41 4C 20 4C 45 54 54 45 |HE INITIAL LETTE|
00000180: 52 20 54 4F 20 43 48 41 4E 47 45 22 3A 99 00 A4 |R TO CHANGE":...|
00000190: 09 78 00 99 22 1D 41 20 56 41 4C 55 45 20 22 20 |.x..".A VALUE " |
000001A0: 3A 99 3A 99 00 C8 09 82 00 99 22 1D 1D 1D 46 52 |:.:......."...FR|
000001B0: 45 51 55 45 4E 43 59 20 20 20 20 20 20 20 20 28 |EQUENCY (|
000001C0: 46 29 20 3D 20 22 3B 46 00 EC 09 8C 00 99 22 1D |F) = ";F......".|
000001D0: 1D 1D 44 55 52 41 54 49 4F 4E 20 4F 52 20 54 49 |..DURATION OR TI|
000001E0: 4D 45 20 28 54 29 20 3D 20 22 3B 54 00 10 0A 96 |ME (T) = ";T....|
000001F0: 00 99 22 1D 1D 1D 53 55 53 54 41 49 4E 20 4C 45 |.."...SUSTAIN LE|
00000200: 56 45 4C 20 20 20 20 28 53 29 20 3D 20 22 3B 53 |VEL (S) = ";S|
00000210: 00 34 0A A0 00 99 22 1D 1D 1D 41 54 54 41 43 4B |.4...."...ATTACK|
00000220: 20 56 41 4C 55 45 20 20 20 20 20 28 41 29 20 3D | VALUE (A) =|
00000230: 20 22 3B 41 00 58 0A AA 00 99 22 1D 1D 1D 44 45 | ";A.X...."...DE|
00000240: 43 41 59 20 56 41 4C 55 45 20 20 20 20 20 20 28 |CAY VALUE (|
00000250: 44 29 20 3D 20 22 3B 44 00 81 0A B4 00 99 22 1D |D) = ";D......".|
00000260: 1D 1D 57 41 56 45 46 4F 52 4D 20 54 59 50 45 20 |..WAVEFORM TYPE |
00000270: 20 20 20 28 57 29 20 49 53 20 22 3B 54 24 28 57 | (W) IS ";T$(W|
00000280: 29 00 AB 0A BE 00 8B 20 57 B2 33 20 A7 20 20 99 |)...... W.3 . .|
00000290: 22 50 55 4C 53 45 20 57 49 44 54 48 20 20 20 20 |"PULSE WIDTH |
000002A0: 20 20 28 50 29 20 3D 20 22 3B 50 00 C0 0A C8 00 | (P) = ";P.....|
000002B0: A1 20 41 24 3A 8B 41 24 B2 22 22 A7 20 32 30 30 |. A$:.A$."". 200|
000002C0: 00 D6 0A CD 00 8B 41 24 B2 22 20 22 A7 20 5A B2 |......A$." ". Z.|
000002D0: 30 3A 89 36 31 30 00 DE 0A CF 00 5A B2 31 00 F4 |0:.610.....Z.1..|
000002E0: 0A D2 00 8B 20 41 24 20 B3 B1 20 22 46 22 20 A7 |.... A$ .. "F" .|
000002F0: 20 32 35 30 00 19 0B DC 00 85 22 1D 1D 1D 4E 45 | 250......"...NE|
00000300: 57 20 46 52 45 51 55 45 4E 43 59 20 28 32 30 2D |W FREQUENCY (20-|
00000310: 34 30 30 30 29 20 22 3B 46 00 3B 0B E6 00 8B 20 |4000) ";F.;.... |
00000320: 46 B3 32 30 20 B0 20 46 B1 34 30 39 35 20 20 A7 |F.20 . F.4095 .|
00000330: 20 8D 31 30 30 30 3A 89 32 30 30 00 44 0B F0 00 | .1000:.200.D...|
00000340: 89 36 30 30 00 57 0B FA 00 8B 20 41 24 B3 B1 22 |.600.W.... A$.."|
00000350: 54 22 A7 20 32 39 30 00 7D 0B 04 01 85 20 22 1D |T". 290.}.... ".|
00000360: 1D 1D 4E 45 57 20 44 55 52 41 54 49 4F 4E 20 28 |..NEW DURATION (|
00000370: 31 20 54 4F 20 35 30 30 30 29 22 3B 54 00 9D 0B |1 TO 5000)";T...|
00000380: 0E 01 8B 20 54 B3 31 20 B0 20 54 B1 35 30 30 30 |... T.1 . T.5000|
00000390: 20 A7 20 8D 31 30 30 30 3A 89 32 36 30 00 A6 0B | . .1000:.260...|
000003A0: 18 01 89 36 31 30 00 B8 0B 22 01 8B 41 24 B3 B1 |...610..."..A$..|
000003B0: 22 53 22 A7 20 33 33 30 00 E0 0B 2C 01 85 22 1D |"S". 330...,..".|
000003C0: 1D 1D 4E 45 57 20 53 55 53 54 41 49 4E 20 56 41 |..NEW SUSTAIN VA|
000003D0: 4C 55 45 20 28 30 20 54 4F 20 31 35 29 22 3B 53 |LUE (0 TO 15)";S|
000003E0: 00 FE 0B 36 01 8B 20 53 B3 30 20 B0 20 53 B1 31 |...6.. S.0 . S.1|
000003F0: 35 20 A7 20 8D 31 30 30 30 3A 89 33 30 30 00 07 |5 . .1000:.300..|
00000400: 0C 40 01 89 36 31 30 00 19 0C 4A 01 8B 41 24 B3 |.@..610...J..A$.|
00000410: B1 22 41 22 A7 20 33 37 30 00 41 0C 54 01 85 22 |."A". 370.A.T.."|
00000420: 1D 1D 1D 4E 45 57 20 41 54 54 41 43 4B 20 56 41 |...NEW ATTACK VA|
00000430: 4C 55 45 20 28 30 20 54 4F 20 31 35 29 20 22 3B |LUE (0 TO 15) ";|
00000440: 41 00 5F 0C 5E 01 8B 20 41 B3 30 20 B0 20 41 B1 |A._.^.. A.0 . A.|
00000450: 31 35 20 A7 20 8D 31 30 30 30 3A 89 33 34 30 00 |15 . .1000:.340.|
00000460: 68 0C 68 01 89 36 31 30 00 7A 0C 72 01 8B 41 24 |h.h..610.z.r..A$|
00000470: B3 B1 22 44 22 A7 20 34 31 30 00 A1 0C 7C 01 85 |.."D". 410...|..|
00000480: 22 1D 1D 1D 4E 45 57 20 44 45 43 41 59 20 56 41 |"...NEW DECAY VA|
00000490: 4C 55 45 20 28 30 20 54 4F 20 31 35 29 20 22 3B |LUE (0 TO 15) ";|
000004A0: 44 00 BF 0C 86 01 8B 20 44 B3 30 20 B0 20 44 B1 |D...... D.0 . D.|
000004B0: 31 35 20 A7 20 8D 31 30 30 30 3A 89 33 38 30 00 |15 . .1000:.380.|
000004C0: C8 0C 90 01 89 36 31 30 00 DB 0C 9A 01 8B 20 41 |.....610...... A|
000004D0: 24 B3 B1 22 57 22 A7 20 34 38 30 00 00 0D A4 01 |$.."W". 480.....|
000004E0: 99 22 1D 1D 1D 4E 45 57 20 57 41 56 45 46 4F 52 |."...NEW WAVEFOR|
000004F0: 4D 20 28 54 2C 53 2C 50 20 4F 52 20 4E 29 22 3B |M (T,S,P OR N)";|
00000500: 00 14 0D A9 01 A1 41 24 3A 8B 41 24 B2 22 22 A7 |......A$:.A$."".|
00000510: 20 34 32 35 00 2A 0D AE 01 8B 41 24 B2 22 54 22 | 425.*....A$."T"|
00000520: A7 20 57 B2 31 3A 89 36 31 30 00 40 0D B8 01 8B |. W.1:.610.@....|
00000530: 41 24 B2 22 53 22 A7 20 57 B2 32 3A 89 36 31 30 |A$."S". W.2:.610|
00000540: 00 56 0D C2 01 8B 41 24 B2 22 50 22 A7 20 57 B2 |.V....A$."P". W.|
00000550: 33 3A 89 36 31 30 00 6C 0D CC 01 8B 41 24 B2 22 |3:.610.l....A$."|
00000560: 4E 22 A7 20 57 B2 34 3A 89 36 31 30 00 7D 0D D6 |N". W.4:.610.}..|
00000570: 01 8D 31 30 30 30 3A 99 3A 89 34 32 30 00 98 0D |..1000:.:.420...|
00000580: E0 01 8B 41 24 B3 B1 22 50 22 B0 20 57 20 B3 B1 |...A$.."P". W ..|
00000590: 20 33 20 A7 20 35 32 30 00 C0 0D EA 01 85 22 1D | 3 . 520......".|
000005A0: 1D 1D 4E 45 57 20 50 55 4C 53 45 20 57 49 44 54 |..NEW PULSE WIDT|
000005B0: 48 20 28 38 20 54 4F 20 39 39 39 29 20 22 3B 50 |H (8 TO 999) ";P|
000005C0: 00 DE 0D F4 01 8B 20 50 B3 30 20 B0 20 50 B1 39 |...... P.0 . P.9|
000005D0: 39 39 A7 20 8D 31 30 30 30 3A 89 34 39 30 00 E7 |99. .1000:.490..|
000005E0: 0D FE 01 89 36 31 30 00 00 0E 08 02 8B 20 41 24 |....610...... A$|
000005F0: B3 B1 22 20 22 A7 20 8D 31 30 30 30 3A 89 38 30 |.." ". .1000:.80|
00000600: 00 10 0E 58 02 8F 20 50 4C 41 59 20 4E 4F 54 45 |...X.. PLAY NOTE|
00000610: 00 3D 0E 62 02 51 B2 31 36 AC 46 3A 97 35 34 32 |.=.b.Q.16.F:.542|
00000620: 37 33 2C 51 AD 32 35 36 3A 97 35 34 32 37 32 2C |73,Q.256:.54272,|
00000630: 28 51 AB 33 32 37 36 38 29 AF 32 35 35 00 67 0E |(Q.32768).255.g.|
00000640: 6C 02 97 20 35 34 32 37 35 2C 50 AD 38 3A 97 35 |l.. 54275,P.8:.5|
00000650: 34 32 37 37 2C 31 36 AC 41 AA 44 3A 97 35 34 32 |4277,16.A.D:.542|
00000660: 37 38 2C 31 36 AC 53 00 7C 0E 76 02 97 35 34 32 |78,16.S.|.v..542|
00000670: 37 36 2C 31 AA 32 AE 28 57 AA 33 29 00 8A 0E 80 |76,1.2.(W.3)....|
00000680: 02 81 4E B2 31 A4 54 3A 82 4E 00 97 0E 8A 02 97 |..N.1.T:.N......|
00000690: 35 34 32 37 36 2C 30 00 A5 0E 94 02 8B 20 5A B2 |54276,0...... Z.|
000006A0: 31 A7 20 38 30 00 AE 0E 9E 02 89 32 30 30 00 C2 |1. 80......200..|
000006B0: 0E E8 03 8F 20 45 52 52 4F 52 20 57 41 52 4E 49 |.... ERROR WARNI|
000006C0: 4E 47 00 DA 0E F2 03 97 20 35 34 32 37 38 2C 30 |NG...... 54278,0|
000006D0: 3A 97 20 35 34 32 37 37 2C 38 00 F2 0E FC 03 97 |:. 54277,8......|
000006E0: 20 35 34 32 37 36 2C 30 3A 97 35 34 32 37 36 2C | 54276,0:.54276,|
000006F0: 31 37 00 06 0F 06 04 81 4E 4E B2 31 30 30 A4 32 |17......NN.100.2|
00000700: 30 A9 AB 31 2E 35 00 14 0F 10 04 97 35 34 32 37 |0..1.5......5427|
00000710: 33 2C 4E 4E 00 1C 0F 1A 04 82 4E 4E 00 2A 0F 24 |3,NN......NN.*.$|
00000720: 04 97 20 35 34 32 37 36 2C 30 00 30 0F 2E 04 8E |.. 54276,0.0....|
00000730: 00 00 00 |... |
..'.... COPYRIGHT (C) ANDREW COLIN 1982.
D...V.54272:.I.0.28:.V.I,0:..O...."..";.
F....54295,0:.54296,15.R.(.. T$(4)...2..
J.1.4:. T$(J):. J...<.. TRIANGULAR,SAWTO
OTH,PULSED,NOISE.V.F.F.512:P.200:W.1:A.0
:D.9:S.0:T.250...P..".........EXPERIMENT
AL SOUND GENERATOR".,.Z..".....EEEEEEEEE
EEEEEEEEEEEEEEEEEEE"._.D..:.".PRESS THE
SPACE BAR TO HEAR THE SOUND":.:...N..".O
R TYPE THE INITIAL LETTER TO CHANGE":...
.X..".A VALUE " :.:..H...."...FREQUENCY
(F) = ";F......"...DURATION OR TI
ME (T) = ";T......"...SUSTAIN LEVEL (
S) = ";S.4. .."...ATTACK VALUE (A) =
";A.X...."...DECAY VALUE (D) = ";D
......"...WAVEFORM TYPE (W) IS ";T$(W
)...... W.3 . ."PULSE WIDTH (P) =
";P...H.. A$:.A$."". 200.V.M..A$." ". Z.
0:.610...O.Z.1...R.. A$ .. "F" . 250....
.."...NEW FREQUENCY (20-4000) ";F.;....
F.20 . F.4095 . .1000:.200.D....600.W..
.. A$.."T". 290.}.... "...NEW DURATION (
1 TO 5000)";T...... T.1 . T.5000 . .1000
:.260......610..."..A$.."S". 330...,..".
..NEW SUSTAIN VALUE (0 TO 15)";S...6.. S
.0 . S.15 . .1000:.300...@..610...J..A$.
."A". 370.A.T.."...NEW ATTACK VALUE (0 T
O 15) ";A._.^.. A.0 . A.15 . .1000:.340.
H.H..610.Z.R..A$.."D". 410...|.."...NEW
DECAY VALUE (0 TO 15) ";D...... D.0 . D.
15 . .1000:.380.H....610...... A$.."W".
480......"...NEW WAVEFORM (T,S,P OR N)";
......A$:.A$."". 425.*....A$."T". W.1:.6
10.@....A$."S". W.2:.610.V.B..A$."P". W.
3:.610.L.L..A$."N". W.4:.610.}.V..1000:.
:.420......A$.."P". W .. 3 . 520......".
..NEW PULSE WIDTH (8 TO 999) ";P...... P
.0 . P.999. .1000:.490......610...... A$
.." ". .1000:.80...X.. PLAY NOTE.=.B.Q.1
6.F:.54273,Q.256:.54272,(Q.32768).255.G.
L.. 54275,P.8:.54277,16.A.D:.54278,16.S.
|.V..54276,1.2.(W.3)......N.1.T:.N......
54276,0...... Z.1. 80......200.B.... ERR
OR WARNING.Z.... 54278,0:. 54277,8......
54276,0:.54276,17......NN.100.20..1.5..
....54273,NN......NN.*.$.. 54276,0.0....
...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL