> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 19 08 0A 00 8F 20 28 43 29 20 47 4F 4C 44 |....... (C) GOLD|
00000010: 20 44 49 53 4B 20 49 4E 43 00 2C 08 14 00 8F 20 | DISK INC.,.... |
00000020: 50 48 41 53 4F 52 20 53 4F 55 4E 44 00 3C 08 1E |PHASOR SOUND.<..|
00000030: 00 99 C7 28 31 34 29 3B C7 28 38 29 00 53 08 28 |...(14);.(8).S.(|
00000040: 00 97 20 35 33 32 38 31 2C 30 3A 97 35 33 32 38 |.. 53281,0:.5328|
00000050: 30 2C 30 00 74 08 32 00 99 22 05 93 11 20 20 20 |0,0.t.2.."... |
00000060: 20 20 20 20 20 20 20 20 20 20 20 20 20 D0 48 41 | .HA|
00000070: 53 4F 52 22 00 93 08 3C 00 99 22 9C 20 20 20 20 |SOR"...<..". |
00000080: 20 20 20 20 20 20 20 20 20 20 20 20 B7 B7 B7 B7 | ....|
00000090: B7 B7 22 00 BA 08 46 00 99 22 9F 20 20 20 20 20 |.."...F..". |
000000A0: 20 20 20 20 20 3C C6 31 3E 20 20 54 4F 20 53 54 | <.1> TO ST|
000000B0: 41 52 54 20 53 4F 55 4E 44 22 00 DF 08 50 00 99 |ART SOUND"...P..|
000000C0: 22 20 20 20 20 20 20 20 20 20 20 3C C6 33 3E 20 |" <.3> |
000000D0: 20 54 4F 20 53 54 4F 50 20 53 4F 55 4E 44 22 00 | TO STOP SOUND".|
000000E0: 07 09 5A 00 99 22 20 20 20 20 20 20 20 20 20 20 |..Z.." |
000000F0: 3C 5F 3E 20 20 20 81 C7 CF CC C4 20 C4 C9 D3 CB |<_> ..... ....|
00000100: A0 9F 4D 45 4E 55 22 00 17 09 64 00 99 22 05 CC |..MENU"...d.."..|
00000110: 49 53 54 49 4E 47 3A 00 27 09 6E 00 99 22 9C B7 |ISTING:.'.n.."..|
00000120: B7 B7 B7 B7 B7 B7 B7 00 50 09 78 00 99 22 05 20 |........P.x..". |
00000130: 31 30 30 20 52 45 4D 20 47 4F 4C 44 20 44 49 53 |100 REM GOLD DIS|
00000140: 4B 27 53 20 50 48 41 53 4F 52 20 53 4F 55 4E 44 |K'S PHASOR SOUND|
00000150: 00 7D 09 82 00 99 22 20 31 31 30 20 44 49 4D 20 |.}...." 110 DIM |
00000160: 41 28 32 30 29 20 20 20 20 20 20 20 3A 52 45 4D |A(20) :REM|
00000170: 20 49 4E 49 54 49 41 4C 41 54 49 4F 4E 00 AA 09 | INITIALATION...|
00000180: 8C 00 99 22 20 31 32 30 20 44 41 54 41 20 37 34 |..." 120 DATA 74|
00000190: 2C 37 35 2C 37 37 2C 38 30 2C 38 34 2C 38 37 2C |,75,77,80,84,87,|
000001A0: 38 39 2C 39 30 2C 38 39 2C 22 00 C9 09 96 00 99 |89,90,89,"......|
000001B0: 22 20 20 20 20 20 20 20 20 20 20 38 37 2C 38 34 |" 87,84|
000001C0: 2C 38 30 2C 37 37 2C 37 35 00 F1 09 A0 00 99 22 |,80,77,75......"|
000001D0: 20 31 33 30 20 46 4F 52 20 49 3D 31 20 54 4F 20 | 130 FOR I=1 TO |
000001E0: 31 34 3A 52 45 41 44 20 41 28 49 29 3A 4E 45 58 |14:READ A(I):NEX|
000001F0: 54 00 1F 0A AA 00 99 22 20 31 34 30 20 53 53 3D |T......" 140 SS=|
00000200: 35 34 32 37 32 20 20 20 20 20 20 20 3A 52 45 4D |54272 :REM|
00000210: 20 53 49 44 20 43 48 49 50 20 53 54 41 52 54 00 | SID CHIP START.|
00000220: 49 0A B4 00 99 22 20 31 35 30 20 46 4F 52 20 49 |I...." 150 FOR I|
00000230: 3D 30 54 4F 32 34 3A 20 50 4F 4B 45 20 53 53 2B |=0TO24: POKE SS+|
00000240: 49 2C 30 3A 20 4E 45 58 54 00 77 0A BE 00 99 22 |I,0: NEXT.w...."|
00000250: 20 31 36 30 20 50 4F 4B 45 20 53 53 2B 32 34 2C | 160 POKE SS+24,|
00000260: 31 35 20 20 3A 52 45 4D 20 56 4F 4C 55 4D 45 20 |15 :REM VOLUME |
00000270: 43 4F 4E 54 52 4F 4C 00 A4 0A C8 00 99 22 20 31 |CONTROL......" 1|
00000280: 37 30 20 50 4F 4B 45 20 53 53 2B 36 2C 32 34 35 |70 POKE SS+6,245|
00000290: 20 20 3A 52 45 4D 20 56 43 20 23 31 20 53 55 53 | :REM VC #1 SUS|
000002A0: 2F 52 45 4C 00 D1 0A D2 00 99 22 20 31 38 30 20 |/REL......" 180 |
000002B0: 50 4F 4B 45 20 53 53 2B 35 2C 35 30 20 20 20 3A |POKE SS+5,50 :|
000002C0: 52 45 4D 20 56 43 20 23 31 20 41 54 54 2F 44 45 |REM VC #1 ATT/DE|
000002D0: 43 00 FF 0A DC 00 99 22 20 31 39 30 20 50 4F 4B |C......" 190 POK|
000002E0: 45 20 53 53 2B 34 2C 31 37 20 20 20 3A 52 45 4D |E SS+4,17 :REM|
000002F0: 20 56 43 20 23 31 20 54 52 49 41 4E 47 4C 45 00 | VC #1 TRIANGLE.|
00000300: 18 0B E6 00 99 22 20 32 30 30 20 46 4F 52 20 49 |....." 200 FOR I|
00000310: 3D 31 20 54 4F 20 31 34 00 32 0B F0 00 99 22 20 |=1 TO 14.2...." |
00000320: 32 31 30 20 50 4F 4B 45 20 53 53 2B 31 2C 41 28 |210 POKE SS+1,A(|
00000330: 49 29 00 44 0B FA 00 99 22 20 32 32 30 20 4E 45 |I).D...." 220 NE|
00000340: 58 54 20 49 00 58 0B 04 01 99 22 20 32 33 30 20 |XT I.X...." 230 |
00000350: 47 4F 54 4F 20 32 30 30 00 83 0B 0E 01 99 22 11 |GOTO 200......".|
00000360: D3 4F 55 52 43 45 20 43 4F 44 45 20 46 4F 55 4E |.OURCE CODE FOUN|
00000370: 44 20 49 4E 20 46 49 4C 45 3A 20 D0 C8 C1 D3 CF |D IN FILE: .....|
00000380: D2 22 3B 00 A5 0B 18 01 86 20 41 28 32 30 29 20 |.";...... A(20) |
00000390: 20 20 20 20 20 20 3A 8F 20 49 4E 49 54 49 41 4C | :. INITIAL|
000003A0: 41 54 49 4F 4E 00 D5 0B 22 01 83 20 37 34 2C 37 |ATION...".. 74,7|
000003B0: 35 2C 37 37 2C 38 30 2C 38 34 2C 38 37 2C 38 39 |5,77,80,84,87,89|
000003C0: 2C 39 30 2C 38 39 2C 38 37 2C 38 34 2C 38 30 2C |,90,89,87,84,80,|
000003D0: 37 37 2C 37 35 00 ED 0B 2C 01 81 20 49 B2 31 20 |77,75...,.. I.1 |
000003E0: A4 20 31 34 3A 87 20 41 28 49 29 3A 82 00 12 0C |. 14:. A(I):....|
000003F0: 36 01 53 53 B2 35 34 32 37 32 20 20 20 20 20 20 |6.SS.54272 |
00000400: 20 3A 8F 20 53 49 44 20 43 48 49 50 20 53 54 41 | :. SID CHIP STA|
00000410: 52 54 00 2C 0C 40 01 81 20 49 B2 30 A4 32 34 3A |RT.,.@.. I.0.24:|
00000420: 20 97 20 53 53 AA 49 2C 30 3A 20 82 00 4E 0C 4A | . SS.I,0: ..N.J|
00000430: 01 97 20 53 53 AA 32 34 2C 31 35 20 20 3A 8F 20 |.. SS.24,15 :. |
00000440: 56 4F 4C 55 4D 45 20 43 4F 4E 54 52 4F 4C 00 6F |VOLUME CONTROL.o|
00000450: 0C 54 01 97 20 53 53 AA 36 2C 32 34 35 20 20 3A |.T.. SS.6,245 :|
00000460: 8F 20 56 43 20 23 31 20 53 55 53 2F 52 45 4C 00 |. VC #1 SUS/REL.|
00000470: 90 0C 5E 01 97 20 53 53 AA 35 2C 35 30 20 20 20 |..^.. SS.5,50 |
00000480: 3A 8F 20 56 43 20 23 31 20 41 54 54 2F 44 45 43 |:. VC #1 ATT/DEC|
00000490: 00 B2 0C 68 01 97 20 53 53 AA 34 2C 31 37 20 20 |...h.. SS.4,17 |
000004A0: 20 3A 8F 20 56 43 20 23 31 20 54 52 49 41 4E 47 | :. VC #1 TRIANG|
000004B0: 4C 45 00 C1 0C 72 01 81 20 49 B2 31 20 A4 20 31 |LE...r.. I.1 . 1|
000004C0: 34 00 D1 0C 7C 01 97 20 53 53 AA 31 2C 41 28 49 |4...|.. SS.1,A(I|
000004D0: 29 00 D7 0C 86 01 82 00 F4 0C 90 01 A1 41 24 3A |)............A$:|
000004E0: 8B 41 24 B3 B1 22 5F 22 AF 41 24 B3 B1 22 86 22 |.A$.."_".A$.."."|
000004F0: A7 33 37 30 00 06 0D 9A 01 8B 20 41 24 B2 22 5F |.370...... A$."_|
00000500: 22 A7 20 34 36 30 00 12 0D A4 01 97 53 53 AA 34 |". 460......SS.4|
00000510: 2C 30 00 27 0D AE 01 A1 41 24 3A 8B 41 24 B2 22 |,0.'....A$:.A$."|
00000520: 5F 22 A7 20 34 36 30 00 39 0D B8 01 8B 41 24 B3 |_". 460.9....A$.|
00000530: B1 22 85 22 A7 20 34 33 30 00 4B 0D C2 01 97 53 |.".". 430.K....S|
00000540: 53 AA 34 2C 31 37 3A 89 33 37 30 00 67 0D CC 01 |S.4,17:.370.g...|
00000550: 97 20 53 53 AA 32 34 2C 30 3A 99 20 22 93 22 3A |. SS.24,0:. ".":|
00000560: 9E 20 34 39 31 35 32 00 00 00 |. 49152... |
....... (C) GOLD DISK INC.,.... PHASOR S
OUND.<....G(14);G(8).S.(.. 53281,0:.5328
0,0.T.2.."... PHASOR"...<
..". ......"...F..".
<F1> TO START SOUND"...P.."
<F3> TO STOP SOUND"...Z.."
<_> .GOLD DISK .MENU"...D..".LISTING:.
'.N.."..........P.X..". 100 REM GOLD DIS
K'S PHASOR SOUND.}...." 110 DIM A(20)
:REM INITIALATION......" 120 DATA 74
,75,77,80,84,87,89,90,89,".I...."
87,84,80,77,75... .." 130 FOR I=1 TO
14:READ A(I):NEXT......" 140 SS=54272
:REM SID CHIP START.I...." 150 FOR I
=0TO24: POKE SS+I,0: NEXT.W...." 160 POK
E SS+24,15 :REM VOLUME CONTROL...H.." 1
70 POKE SS+6,245 :REM VC #1 SUS/REL.Q.R
.." 180 POKE SS+5,50 :REM VC #1 ATT/DE
C......" 190 POKE SS+4,17 :REM VC #1 T
RIANGLE......" 200 FOR I=1 TO 14.2...."
210 POKE SS+1,A(I).D...." 220 NEXT I.X..
.." 230 GOTO 200......".SOURCE CODE FOUN
D IN FILE: PHASOR";...... A(20) :.
INITIALATION.U.".. 74,75,77,80,84,87,89
,90,89,87,84,80,77,75...,.. I.1 . 14:. A
(I):....6.SS.54272 :. SID CHIP STA
RT.,.@.. I.0.24: . SS.I,0: ..N.J.. SS.24
,15 :. VOLUME CONTROL.O.T.. SS.6,245 :
. VC #1 SUS/REL...^.. SS.5,50 :. VC #1
ATT/DEC...H.. SS.4,17 :. VC #1 TRIANG
LE.A.R.. I.1 . 14.Q.|.. SS.1,A(I).W.....
.....A$:.A$.."_".A$..".".370...... A$."_
". 460......SS.4,0.'....A$:.A$."_". 460.
9....A$..".". 430.K.B..SS.4,17:.370.G.L.
. SS.24,0:. ".":. 49152...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL