> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 0A 00 8F 20 28 43 29 20 31 39 38 35 |....... (C) 1985|
00000010: 20 47 4F 4C 44 20 44 49 53 4B 20 49 4E 43 00 24 | GOLD DISK INC.$|
00000020: 08 14 00 8F 00 43 08 1E 00 8F 20 53 4F 55 4E 44 |.....C.... SOUND|
00000030: 20 2D 20 46 55 54 55 52 49 53 54 49 43 20 41 4C | - FUTURISTIC AL|
00000040: 41 52 4D 00 49 08 28 00 8F 00 59 08 32 00 99 C7 |ARM.I.(...Y.2...|
00000050: 28 31 34 29 3B C7 28 38 29 00 70 08 3C 00 97 20 |(14);.(8).p.<.. |
00000060: 35 33 32 38 31 2C 30 3A 97 35 33 32 38 30 2C 30 |53281,0:.53280,0|
00000070: 00 8B 08 46 00 99 22 93 05 11 C6 55 54 55 52 49 |...F.."....UTURI|
00000080: 53 54 49 43 20 C1 4C 41 52 4D 22 00 A4 08 50 00 |STIC .LARM"...P.|
00000090: 99 22 9C B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |."..............|
000000A0: B7 B7 B7 22 00 CE 08 5A 00 99 22 20 20 20 20 20 |..."...Z.." |
000000B0: 20 20 20 20 20 9F 20 20 20 3C C6 31 3E 20 20 54 | . <.1> T|
000000C0: 4F 20 53 54 41 52 54 20 53 4F 55 4E 44 22 00 F6 |O START SOUND"..|
000000D0: 08 64 00 99 22 20 20 20 20 20 20 20 20 20 20 20 |.d.." |
000000E0: 20 20 3C C6 33 3E 20 20 54 4F 20 53 54 4F 50 20 | <.3> TO STOP |
000000F0: 53 4F 55 4E 44 22 00 21 09 6E 00 99 22 20 20 20 |SOUND".!.n.." |
00000100: 20 20 20 20 20 20 20 20 20 20 3C 5F 3E 20 20 20 | <_> |
00000110: 81 C7 CF CC C4 20 C4 C9 D3 CB A0 9F 4D 45 4E 55 |..... ......MENU|
00000120: 22 00 32 09 78 00 99 22 05 CC 49 53 54 49 4E 47 |".2.x.."..ISTING|
00000130: 3A 22 00 42 09 82 00 99 22 9C B7 B7 B7 B7 B7 B7 |:".B....".......|
00000140: B7 B7 00 70 09 8C 00 99 22 05 31 30 30 20 53 53 |...p....".100 SS|
00000150: 3D 35 34 32 37 32 20 20 20 20 20 20 20 3A 52 45 |=54272 :RE|
00000160: 4D 20 43 4C 45 41 52 20 53 49 44 20 43 48 49 50 |M CLEAR SID CHIP|
00000170: 00 98 09 96 00 99 22 31 31 30 20 46 4F 52 20 49 |......"110 FOR I|
00000180: 3D 30 54 4F 32 34 3A 20 50 4F 4B 45 53 53 2B 49 |=0TO24: POKESS+I|
00000190: 2C 30 3A 20 4E 45 58 54 00 C5 09 A0 00 99 22 31 |,0: NEXT......"1|
000001A0: 32 30 20 50 4F 4B 45 20 53 53 2B 32 34 2C 31 35 |20 POKE SS+24,15|
000001B0: 20 20 3A 52 45 4D 20 56 4F 4C 55 4D 45 20 43 4F | :REM VOLUME CO|
000001C0: 4E 54 52 4F 4C 00 F3 09 AA 00 99 22 31 33 30 20 |NTROL......"130 |
000001D0: 50 4F 4B 45 20 53 53 2B 36 2C 32 34 36 20 20 3A |POKE SS+6,246 :|
000001E0: 52 45 4D 20 53 55 53 54 41 49 4E 2F 52 45 4C 45 |REM SUSTAIN/RELE|
000001F0: 41 53 45 00 1E 0A B4 00 99 22 31 34 30 20 50 4F |ASE......"140 PO|
00000200: 4B 45 20 53 53 2B 35 2C 31 37 20 20 20 3A 52 45 |KE SS+5,17 :RE|
00000210: 4D 20 41 54 54 41 43 4B 2F 44 45 43 41 59 00 45 |M ATTACK/DECAY.E|
00000220: 0A BE 00 99 22 31 35 30 20 50 4F 4B 45 20 53 53 |...."150 POKE SS|
00000230: 2B 32 2C 30 20 20 20 20 3A 52 45 4D 20 4C 4F 20 |+2,0 :REM LO |
00000240: 50 55 4C 53 45 00 6B 0A C8 00 99 22 31 36 30 20 |PULSE.k...."160 |
00000250: 50 4F 4B 45 20 53 53 2B 31 2C 31 36 20 20 20 3A |POKE SS+1,16 :|
00000260: 52 45 4D 20 48 49 20 46 52 45 51 00 91 0A D2 00 |REM HI FREQ.....|
00000270: 99 22 31 37 30 20 50 4F 4B 45 20 53 53 2B 30 2C |."170 POKE SS+0,|
00000280: 30 20 20 20 20 3A 52 45 4D 20 4C 4F 20 46 52 45 |0 :REM LO FRE|
00000290: 51 00 BB 0A DC 00 99 22 31 38 30 20 50 4F 4B 45 |Q......"180 POKE|
000002A0: 20 53 53 2B 34 2C 36 35 20 20 20 3A 52 45 4D 20 | SS+4,65 :REM |
000002B0: 53 51 55 41 52 45 20 57 41 56 45 00 D3 0A E6 00 |SQUARE WAVE.....|
000002C0: 99 22 31 39 30 20 46 4F 52 20 49 3D 31 20 54 4F |."190 FOR I=1 TO|
000002D0: 20 31 35 00 01 0B F0 00 99 22 32 30 30 20 50 4F | 15......"200 PO|
000002E0: 4B 45 20 53 53 2B 33 2C 49 3A 54 49 24 3D 22 C7 |KE SS+3,I:TI$=".|
000002F0: 28 33 34 29 22 30 30 30 30 30 30 22 C7 28 33 34 |(34)"000000".(34|
00000300: 29 00 1C 0B FA 00 99 22 32 31 30 20 49 46 20 54 |)......"210 IF T|
00000310: 49 3C 32 20 54 48 45 4E 20 32 31 30 00 2D 0B 04 |I<2 THEN 210.-..|
00000320: 01 99 22 32 32 30 20 4E 45 58 54 20 49 00 40 0B |.."220 NEXT I.@.|
00000330: 0E 01 99 22 32 33 30 20 47 4F 54 4F 20 31 39 30 |..."230 GOTO 190|
00000340: 00 6D 0B 18 01 99 22 9F 11 11 D3 4F 55 52 43 45 |.m...."....OURCE|
00000350: 20 43 4F 44 45 20 46 4F 55 4E 44 20 49 4E 20 46 | CODE FOUND IN F|
00000360: 49 4C 45 3A 20 05 C1 CC C1 D2 CD 22 3B 00 92 0B |ILE: ......";...|
00000370: 22 01 53 53 B2 35 34 32 37 32 20 20 20 20 20 20 |".SS.54272 |
00000380: 20 3A 8F 20 43 4C 45 41 52 20 53 49 44 20 43 48 | :. CLEAR SID CH|
00000390: 49 50 00 AB 0B 2C 01 81 20 49 B2 30 A4 32 34 3A |IP...,.. I.0.24:|
000003A0: 20 97 53 53 AA 49 2C 30 3A 20 82 00 CD 0B 36 01 | .SS.I,0: ....6.|
000003B0: 97 20 53 53 AA 32 34 2C 31 35 20 20 3A 8F 20 56 |. SS.24,15 :. V|
000003C0: 4F 4C 55 4D 45 20 43 4F 4E 54 52 4F 4C 00 F0 0B |OLUME CONTROL...|
000003D0: 40 01 97 20 53 53 AA 36 2C 32 34 36 20 20 3A 8F |@.. SS.6,246 :.|
000003E0: 20 53 55 53 54 41 49 4E 2F 52 45 4C 45 41 53 45 | SUSTAIN/RELEASE|
000003F0: 00 10 0C 4A 01 97 20 53 53 AA 35 2C 31 37 20 20 |...J.. SS.5,17 |
00000400: 20 3A 8F 20 41 54 54 41 43 4B 2F 44 45 43 41 59 | :. ATTACK/DECAY|
00000410: 00 2C 0C 54 01 97 20 53 53 AA 32 2C 30 20 20 20 |.,.T.. SS.2,0 |
00000420: 20 3A 8F 20 4C 4F 20 50 55 4C 53 45 00 47 0C 5E | :. LO PULSE.G.^|
00000430: 01 97 20 53 53 AA 31 2C 31 36 20 20 20 3A 8F 20 |.. SS.1,16 :. |
00000440: 48 49 20 46 52 45 51 00 62 0C 68 01 97 20 53 53 |HI FREQ.b.h.. SS|
00000450: AA 30 2C 30 20 20 20 20 3A 8F 20 4C 4F 20 46 52 |.0,0 :. LO FR|
00000460: 45 51 00 81 0C 72 01 97 20 53 53 AA 34 2C 36 35 |EQ...r.. SS.4,65|
00000470: 20 20 20 3A 8F 20 53 51 55 41 52 45 20 57 41 56 | :. SQUARE WAV|
00000480: 45 00 90 0C 7C 01 81 20 49 B2 31 20 A4 20 31 35 |E...|.. I.1 . 15|
00000490: 00 AA 0C 86 01 97 20 53 53 AA 33 2C 49 3A 54 49 |...... SS.3,I:TI|
000004A0: 24 B2 22 30 30 30 30 30 30 22 00 BB 0C 90 01 8B |$."000000"......|
000004B0: 20 54 49 B3 32 20 A7 20 34 30 30 00 D6 0C 9A 01 | TI.2 . 400.....|
000004C0: A1 20 49 4E 24 3A 20 8B 20 49 4E 24 B2 22 5F 22 |. IN$: . IN$."_"|
000004D0: 20 A7 20 34 39 30 00 EB 0C A4 01 8B 20 49 4E 24 | . 490...... IN$|
000004E0: B3 B1 22 86 22 20 A7 20 34 37 30 00 F9 0C AE 01 |.."." . 470.....|
000004F0: 97 20 53 53 AA 34 2C 36 34 00 14 0D B8 01 A1 20 |. SS.4,64...... |
00000500: 49 4E 24 3A 20 8B 20 49 4E 24 B2 22 5F 22 20 A7 |IN$: . IN$."_" .|
00000510: 20 34 39 30 00 29 0D C2 01 8B 20 49 4E 24 B3 B1 | 490.).... IN$..|
00000520: 22 85 22 20 A7 20 34 34 30 00 37 0D CC 01 97 20 |"." . 440.7.... |
00000530: 53 53 AA 34 2C 36 35 00 3F 0D D6 01 82 20 49 00 |SS.4,65.?.... I.|
00000540: 49 0D E0 01 89 20 33 38 30 00 65 0D EA 01 97 20 |I.... 380.e.... |
00000550: 53 53 AA 32 34 2C 30 3A 99 20 22 93 22 3A 9E 20 |SS.24,0:. ".":. |
00000560: 34 39 31 35 32 00 00 00 |49152... |
....... (C) 1985 GOLD DISK INC.$.....C..
.. SOUND - FUTURISTIC ALARM.I.(...Y.2..G
(14);G(8).P.<.. 53281,0:.53280,0...F..".
..FUTURISTIC ALARM"...P.."..............
...".N.Z.." . <F1> TO START
SOUND"...D.." <F3> TO STOP
SOUND".!.N.." <_> .GOLD DI
SK .MENU".2.X..".LISTING:".B....".......
...P....".100 SS=54272 :REM CLEAR
SID CHIP......"110 FOR I=0TO24: POKESS+I
,0: NEXT.E. .."120 POKE SS+24,15 :REM V
OLUME CONTROL......"130 POKE SS+6,246 :
REM SUSTAIN/RELEASE......"140 POKE SS+5,
17 :REM ATTACK/DECAY.E...."150 POKE SS
+2,0 :REM LO PULSE.K.H.."160 POKE SS+
1,16 :REM HI FREQ...R.."170 POKE SS+0,
0 :REM LO FREQ......"180 POKE SS+4,65
:REM SQUARE WAVE.S...."190 FOR I=1 TO
15......"200 POKE SS+3,I:TI$="G(34)"000
000"G(34)......"210 IF TI<2 THEN 210.-..
.."220 NEXT I.@...."230 GOTO 190.M....".
..SOURCE CODE FOUND IN FILE: .ALARM";...
".SS.54272 :. CLEAR SID CHIP...,..
I.0.24: .SS.I,0: ..M.6.. SS.24,15 :. V
OLUME CONTROL...@.. SS.6,246 :. SUSTAIN
/RELEASE...J.. SS.5,17 :. ATTACK/DECAY
.,.T.. SS.2,0 :. LO PULSE.G.^.. SS.1,
16 :. HI FREQ.B.H.. SS.0,0 :. LO FR
EQ...R.. SS.4,65 :. SQUARE WAVE...|..
I.1 . 15...... SS.3,I:TI$."000000"......
TI.2 . 400.V.... IN$: . IN$."_" . 490..
.... IN$.."." . 470...... SS.4,64......
IN$: . IN$."_" . 490.).B.. IN$.."." . 44
0.7.L.. SS.4,65.?.V.. I.I.... 380.E....
SS.24,0:. ".":. 49152...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL