SOUND HELPER
FILE INFORMATION
FILENAME(S): SOUND HELPER
FILE TYPE(S): PRG
FILE SIZE: 6.6K
FIRST SEEN: 2025-11-30 20:18:58
APPEARS ON: 1 disk(s)
FILE HASH
c0f84a8108c2833d439d0d60c4064c8c9d705734b15b40ea0245e71e4fcfee13
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| COMMODORE 64 | SOUND HELPER | PRG | Curtcool, Malcom | 17 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 22 08 01 00 8F 20 20 4D 49 43 41 48 20 4B |..".... MICAH K|
00000010: 4F 52 4E 42 45 52 47 20 4D 41 59 20 36 2C 31 39 |ORNBERG MAY 6,19|
00000020: 38 33 00 72 08 04 00 8F 20 20 2A 2A 2A 2A 2A 2A |83.r.... ******|
00000030: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000040: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000050: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000060: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000070: 2A 2A 00 C2 08 05 00 8F 20 20 2A 2A 2A 2A 2A 2A |**...... ******|
00000080: 2A 20 53 43 52 45 45 4E 20 4C 4F 43 41 54 49 4F |* SCREEN LOCATIO|
00000090: 4E 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |N **************|
000000A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000C0: 2A 2A 00 CF 08 06 00 3A 53 43 B2 31 30 32 34 00 |**.....:SC.1024.|
000000D0: 1E 09 0A 00 8F 20 2A 2A 2A 2A 20 53 49 44 20 4C |..... **** SID L|
000000E0: 4F 43 41 54 49 4F 4E 20 2A 2A 2A 2A 2A 2A 2A 2A |OCATION ********|
000000F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000100: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000110: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 2D |**************.-|
00000120: 09 0C 00 3A 53 49 44 B2 35 34 32 37 32 00 7C 09 |...:SID.54272.|.|
00000130: 0F 00 8F 20 2A 2A 2A 2A 20 44 49 4D 20 41 52 52 |... **** DIM ARR|
00000140: 41 59 20 41 20 41 4E 44 20 53 20 2A 2A 2A 2A 2A |AY A AND S *****|
00000150: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000160: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000170: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 8F 09 13 |************....|
00000180: 00 3A 86 20 44 28 32 35 29 2C 41 28 32 35 29 00 |.:. D(25),A(25).|
00000190: DD 09 14 00 8F 20 2A 2A 2A 2A 20 52 45 41 44 20 |..... **** READ |
000001A0: 41 52 52 41 59 20 41 20 28 53 43 52 45 45 4E 20 |ARRAY A (SCREEN |
000001B0: 4C 4F 43 41 54 49 4F 4E 29 2A 2A 2A 2A 2A 2A 2A |LOCATION)*******|
000001C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000001D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 05 0A |*************...|
000001E0: 19 00 3A 81 20 49 B2 30 20 A4 20 32 34 3A 87 20 |..:. I.0 . 24:. |
000001F0: 41 28 49 29 3A 41 28 49 29 B2 41 28 49 29 AA 53 |A(I):A(I).A(I).S|
00000200: 43 3A 82 20 49 00 54 0A 1E 00 8F 20 2A 2A 2A 2A |C:. I.T.... ****|
00000210: 20 53 43 52 45 45 4E 2C 42 4F 52 44 45 52 20 41 | SCREEN,BORDER A|
00000220: 4E 44 20 43 48 41 52 41 43 54 45 52 20 43 4F 4C |ND CHARACTER COL|
00000230: 4F 55 52 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |OUR*************|
00000240: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000250: 2A 2A 2A 2A 00 74 0A 23 00 3A 99 22 90 22 3A 97 |****.t.#.:.".":.|
00000260: 20 35 33 32 38 30 2C 31 35 3A 97 20 35 33 32 38 | 53280,15:. 5328|
00000270: 31 2C 31 35 00 C3 0A 28 00 8F 20 2A 2A 2A 2A 20 |1,15...(.. **** |
00000280: 53 45 54 20 44 55 52 41 54 49 4F 4E 20 4F 46 20 |SET DURATION OF |
00000290: 53 4F 55 4E 44 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |SOUND **********|
000002A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000002B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000002C0: 2A 2A 2A 00 CF 0A 2D 00 3A 44 55 B2 32 35 35 00 |***...-.:DU.255.|
000002D0: 1E 0B 32 00 8F 20 2A 2A 2A 2A 20 50 52 49 4E 54 |..2.. **** PRINT|
000002E0: 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 20 2A 2A | INSTRUCTIONS **|
000002F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000300: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000310: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 2A |**************.*|
00000320: 0B 37 00 3A 8D 20 36 30 30 30 00 79 0B 3C 00 8F |.7.:. 6000.y.<..|
00000330: 20 2A 2A 2A 2A 20 53 45 54 55 50 20 53 43 52 45 | **** SETUP SCRE|
00000340: 45 4E 20 44 49 53 50 4C 41 59 20 2A 2A 2A 2A 2A |EN DISPLAY *****|
00000350: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000360: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000370: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 92 0B 41 00 3A 8D |*********...A.:.|
00000380: 20 31 30 30 3A 8D 20 31 33 35 30 3A 89 20 32 30 | 100:. 1350:. 20|
00000390: 30 30 00 E1 0B 46 00 8F 20 2A 2A 2A 2A 2A 2A 2A |00...F.. *******|
000003A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000003B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000003C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000003D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000003E0: 2A 00 2F 0C 64 00 8F 20 2A 2A 2A 20 53 43 52 45 |*./.d.. *** SCRE|
000003F0: 45 4E 20 53 45 54 55 50 20 2A 2A 2A 2A 2A 2A 2A |EN SETUP *******|
00000400: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000410: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000420: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00000430: 39 0C 69 00 99 22 93 22 3B 00 66 0C 6E 00 99 22 |9.i..".";.f.n.."|
00000440: 20 20 20 20 20 20 20 20 20 20 20 20 20 56 4F 49 | VOI|
00000450: 43 45 20 20 20 28 31 29 20 20 20 20 28 32 29 20 |CE (1) (2) |
00000460: 20 20 20 28 33 29 00 76 0C 82 00 99 22 46 52 45 | (3).v...."FRE|
00000470: 51 55 45 4E 43 59 00 A5 0C 8C 00 99 22 20 20 20 |QUENCY......" |
00000480: 28 4C 29 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 20 |(L)------------ |
00000490: 12 41 92 20 20 20 20 20 20 12 48 92 20 20 20 20 |.A. .H. |
000004A0: 20 20 12 4F 92 00 AD 0C 91 00 99 22 22 00 DC 0C | .O.......""...|
000004B0: A0 00 99 22 20 20 20 28 48 29 2D 2D 2D 2D 2D 2D |..." (H)------|
000004C0: 2D 2D 2D 2D 2D 2D 20 12 42 92 20 20 20 20 20 20 |------ .B. |
000004D0: 12 49 92 20 20 20 20 20 20 12 50 92 00 E4 0C A5 |.I. .P.....|
000004E0: 00 99 22 22 00 F9 0C AA 00 99 22 56 41 52 49 41 |..""......"VARIA|
000004F0: 42 4C 45 20 50 55 4C 53 45 00 28 0D B4 00 99 22 |BLE PULSE.(...."|
00000500: 20 20 20 28 4C 29 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | (L)----------|
00000510: 2D 2D 20 12 43 92 20 20 20 20 20 20 12 4A 92 20 |-- .C. .J. |
00000520: 20 20 20 20 20 12 51 92 00 30 0D B9 00 99 22 22 | .Q..0....""|
00000530: 00 5F 0D C8 00 99 22 20 20 20 28 48 29 2D 2D 2D |._...." (H)---|
00000540: 2D 2D 2D 2D 2D 2D 2D 2D 2D 20 12 44 92 20 20 20 |--------- .D. |
00000550: 20 20 20 12 4B 92 20 20 20 20 20 20 12 52 92 00 | .K. .R..|
00000560: 67 0D CD 00 99 22 22 00 96 0D D2 00 99 22 43 4F |g....""......"CO|
00000570: 4E 54 52 4F 4C 20 52 45 47 49 53 54 45 52 2D 2D |NTROL REGISTER--|
00000580: 20 12 45 92 20 20 20 20 20 20 12 4C 92 20 20 20 | .E. .L. |
00000590: 20 20 20 12 53 92 00 9D 0D DC 00 99 22 00 CC 0D | .S......."...|
000005A0: E6 00 99 22 41 54 54 41 43 4B 2F 44 45 43 41 59 |..."ATTACK/DECAY|
000005B0: 2D 2D 2D 2D 2D 2D 20 12 46 92 20 20 20 20 20 20 |------ .F. |
000005C0: 12 4D 92 20 20 20 20 20 20 12 54 92 00 D3 0D F0 |.M. .T.....|
000005D0: 00 99 22 00 02 0E FA 00 99 22 53 55 53 54 41 49 |.."......"SUSTAI|
000005E0: 4E 2F 52 45 4C 45 41 53 45 2D 2D 2D 20 12 47 92 |N/RELEASE--- .G.|
000005F0: 20 20 20 20 20 20 12 4E 92 20 20 20 20 20 20 12 | .N. .|
00000600: 55 92 00 33 0E 04 01 99 22 C0 C0 C0 C0 C0 C0 C0 |U..3....".......|
00000610: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000620: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000630: C0 22 3B 00 61 0E 0E 01 99 22 46 49 4C 54 45 52 |.";.a...."FILTER|
00000640: 20 46 52 45 51 55 45 4E 43 59 20 20 20 20 28 4C | FREQUENCY (L|
00000650: 29 20 12 56 92 20 20 20 20 20 28 48 29 20 12 57 |) .V. (H) .W|
00000660: 92 00 68 0E 18 01 99 22 00 8A 0E 22 01 99 22 52 |..h...."...".."R|
00000670: 45 53 4F 4E 41 4E 43 45 2F 46 49 4C 54 45 52 20 |ESONANCE/FILTER |
00000680: 56 4F 49 43 45 53 20 12 58 92 00 91 0E 2C 01 99 |VOICES .X....,..|
00000690: 22 00 B3 0E 36 01 99 22 50 41 53 53 42 41 4E 44 |"...6.."PASSBAND|
000006A0: 2F 4D 41 53 54 45 52 20 56 4F 4C 55 4D 45 20 20 |/MASTER VOLUME |
000006B0: 12 59 92 00 B9 0E 3B 01 8E 00 06 0F E8 03 8F 20 |.Y....;........ |
000006C0: 2A 2A 20 52 4F 55 54 49 4E 45 20 54 4F 20 50 4F |** ROUTINE TO PO|
000006D0: 4B 45 20 54 4F 20 53 43 52 45 45 4E 20 41 4E 44 |KE TO SCREEN AND|
000006E0: 20 4D 45 4D 4F 52 59 20 2A 2A 2A 2A 2A 2A 2A 2A | MEMORY ********|
000006F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000700: 2A 2A 2A 2A 2A 2A 00 25 0F 06 04 4E 24 B2 C9 28 |******.%...N$..(|
00000710: C4 28 44 28 4E 29 29 2C C3 28 C4 28 44 28 4E 29 |.(D(N)),.(.(D(N)|
00000720: 29 29 AB 31 29 00 43 0F 0B 04 81 20 49 B2 30 20 |)).1).C.... I.0 |
00000730: A4 20 32 3A 97 20 41 28 4E 29 AA 49 2C 33 32 3A |. 2:. A(N).I,32:|
00000740: 82 20 49 00 57 0F 10 04 81 20 49 B2 30 20 A4 20 |. I.W.... I.0 . |
00000750: C3 28 4E 24 29 AB 31 00 87 0F 1A 04 97 20 41 28 |.(N$).1...... A(|
00000760: 4E 29 AA 49 2C C5 28 CA 28 4E 24 2C 49 AA 31 2C |N).I,.(.(N$,I.1,|
00000770: 31 29 29 AA 34 38 3A 97 20 35 34 32 37 32 AA 41 |1)).48:. 54272.A|
00000780: 28 4E 29 AA 49 2C 30 00 8F 0F 24 04 82 20 49 00 |(N).I,0...$.. I.|
00000790: A0 0F 2E 04 97 20 53 49 44 AA 4E 2C 44 28 4E 29 |..... SID.N,D(N)|
000007A0: 00 A6 0F 38 04 8E 00 F3 0F 4C 04 8F 20 2A 2A 20 |...8.....L.. ** |
000007B0: 52 4F 55 54 49 4E 45 20 46 4F 52 20 56 4F 49 43 |ROUTINE FOR VOIC|
000007C0: 45 20 31 2C 32 2C 20 4F 52 20 33 20 2A 2A 2A 2A |E 1,2, OR 3 ****|
000007D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000007E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000007F0: 2A 2A 2A 00 0D 10 51 04 8B 20 44 28 4E 29 B2 32 |***...Q.. D(N).2|
00000800: 35 35 20 A7 20 44 28 4E 29 B2 32 35 34 00 1D 10 |55 . D(N).254...|
00000810: 56 04 44 28 4E 29 B2 44 28 4E 29 AA 31 00 2E 10 |V.D(N).D(N).1...|
00000820: 60 04 97 20 53 49 44 AA 4E 2C 44 28 4E 29 00 41 |`.. SID.N,D(N).A|
00000830: 10 6A 04 81 20 49 B2 31 20 A4 20 44 55 3A 82 20 |.j.. I.1 . DU:. |
00000840: 49 00 51 10 74 04 44 28 4E 29 B2 44 28 4E 29 AB |I.Q.t.D(N).D(N).|
00000850: 31 00 62 10 7E 04 97 20 53 49 44 AA 4E 2C 44 28 |1.b.~.. SID.N,D(|
00000860: 4E 29 00 68 10 88 04 8E 00 B5 10 B0 04 8F 20 2A |N).h.......... *|
00000870: 2A 20 52 4F 55 54 49 4E 45 20 46 4F 52 20 56 4F |* ROUTINE FOR VO|
00000880: 49 43 45 20 31 2C 32 41 4E 44 20 33 20 2A 2A 2A |ICE 1,2AND 3 ***|
00000890: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000008A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000008B0: 2A 2A 2A 2A 2A 00 CF 10 B5 04 8B 20 44 28 34 29 |*****...... D(4)|
000008C0: B2 32 35 35 20 A7 20 44 28 34 29 B2 32 35 34 00 |.255 . D(4).254.|
000008D0: EB 10 B6 04 8B 20 44 28 31 31 29 B2 32 35 35 20 |..... D(11).255 |
000008E0: A7 20 44 28 31 31 29 B2 32 35 34 00 07 11 B7 04 |. D(11).254.....|
000008F0: 8B 20 44 28 31 38 29 B2 32 35 35 20 A7 20 44 28 |. D(18).255 . D(|
00000900: 31 38 29 B2 32 35 34 00 1A 11 BA 04 97 20 53 49 |18).254...... SI|
00000910: 44 AA 34 2C 44 28 34 29 AA 31 00 2F 11 C4 04 97 |D.4,D(4).1./....|
00000920: 20 53 49 44 AA 31 31 2C 44 28 31 31 29 AA 31 00 | SID.11,D(11).1.|
00000930: 44 11 CE 04 97 20 53 49 44 AA 31 38 2C 44 28 31 |D.... SID.18,D(1|
00000940: 38 29 AA 31 00 54 11 D8 04 81 20 49 B2 31 A4 44 |8).1.T.... I.1.D|
00000950: 55 3A 82 49 00 65 11 E2 04 97 20 53 49 44 AA 34 |U:.I.e.... SID.4|
00000960: 2C 44 28 34 29 00 78 11 EC 04 97 20 53 49 44 AA |,D(4).x.... SID.|
00000970: 31 31 2C 44 28 31 31 29 00 8B 11 F6 04 97 20 53 |11,D(11)...... S|
00000980: 49 44 AA 31 38 2C 44 28 31 38 29 00 91 11 00 05 |ID.18,D(18).....|
00000990: 8E 00 DE 11 14 05 8F 20 2A 2A 20 52 4F 55 54 49 |....... ** ROUTI|
000009A0: 4E 45 20 54 4F 20 52 45 53 54 41 52 54 20 2A 2A |NE TO RESTART **|
000009B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000009C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000009D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 E9 |**************..|
000009E0: 11 1E 05 8D 20 31 35 35 30 00 06 12 28 05 99 22 |.... 1550...(.."|
000009F0: 50 52 45 53 53 20 12 59 92 20 54 4F 20 52 45 53 |PRESS .Y. TO RES|
00000A00: 54 41 52 54 22 3B 00 1B 12 32 05 A1 41 24 3A 8B |TART";...2..A$:.|
00000A10: 41 24 B2 22 22 A7 20 31 33 33 30 00 26 12 34 05 |A$."". 1330.&.4.|
00000A20: 8D 20 31 35 35 30 00 43 12 38 05 99 22 20 20 20 |. 1550.C.8.." |
00000A30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000A40: 20 22 3B 00 56 12 3C 05 8B 41 24 B3 B1 22 59 22 | ";.V.<..A$.."Y"|
00000A50: A7 20 32 30 30 30 00 62 12 46 05 81 4E B2 30 A4 |. 2000.b.F..N.0.|
00000A60: 32 34 00 70 12 50 05 97 20 53 49 44 AA 4E 2C 30 |24.p.P.. SID.N,0|
00000A70: 00 7B 12 5A 05 44 28 4E 29 B2 30 00 AA 12 64 05 |.{.Z.D(N).0...d.|
00000A80: 81 20 49 B2 30 20 A4 20 32 3A 97 20 41 28 4E 29 |. I.0 . 2:. A(N)|
00000A90: AA 49 2C 33 32 3A 97 20 35 34 32 37 32 AA 41 28 |.I,32:. 54272.A(|
00000AA0: 4E 29 AA 49 2C 30 3A 82 20 49 00 B8 12 6E 05 97 |N).I,0:. I...n..|
00000AB0: 20 41 28 4E 29 2C 34 38 00 C0 12 71 05 82 20 4E | A(N),48...q.. N|
00000AC0: 00 C6 12 73 05 8E 00 13 13 78 05 8F 20 2A 2A 20 |...s.....x.. ** |
00000AD0: 52 4F 55 54 49 4E 45 20 54 4F 20 51 55 49 54 20 |ROUTINE TO QUIT |
00000AE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000AF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000B00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000B10: 2A 2A 2A 00 1E 13 82 05 8D 20 31 35 35 30 00 3F |***...... 1550.?|
00000B20: 13 8C 05 99 22 50 52 45 53 53 20 12 59 92 20 54 |...."PRESS .Y. T|
00000B30: 4F 20 51 55 49 54 20 20 20 20 20 20 20 22 3B 00 |O QUIT ";.|
00000B40: 59 13 96 05 A1 20 41 24 3A 8B 20 41 24 B2 22 22 |Y.... A$:. A$.""|
00000B50: 20 A7 20 89 20 31 34 33 30 00 64 13 9B 05 8D 20 | . . 1430.d.... |
00000B60: 31 35 35 30 00 81 13 9D 05 99 22 20 20 20 20 20 |1550......" |
00000B70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00000B80: 3B 00 96 13 A0 05 8B 20 41 24 B3 B1 22 59 22 20 |;...... A$.."Y" |
00000B90: A7 20 32 30 30 30 00 A1 13 AA 05 99 22 93 22 3A |. 2000......".":|
00000BA0: 80 00 EE 13 DC 05 8F 20 2A 2A 20 52 4F 55 54 49 |....... ** ROUTI|
00000BB0: 4E 45 20 54 4F 20 47 4F 54 4F 20 4C 49 4E 45 20 |NE TO GOTO LINE |
00000BC0: 32 33 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |23 *************|
00000BD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000BE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 0F |**************..|
00000BF0: 14 E6 05 99 22 13 11 11 11 11 11 11 11 11 11 11 |...."...........|
00000C00: 11 11 11 11 11 11 11 11 11 11 11 11 11 22 3B 00 |.............";.|
00000C10: 3F 14 F0 05 99 22 20 20 20 20 20 20 20 20 20 20 |?...." |
00000C20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000C30: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3B 00 | ";.|
00000C40: 60 14 FA 05 99 22 13 11 11 11 11 11 11 11 11 11 |`...."..........|
00000C50: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 3B |..............";|
00000C60: 00 66 14 04 06 8E 00 B3 14 0E 06 8F 20 2A 2A 20 |.f.......... ** |
00000C70: 52 4F 55 54 49 4E 45 20 54 4F 20 47 4F 54 4F 20 |ROUTINE TO GOTO |
00000C80: 4C 49 4E 45 20 32 34 20 2A 2A 2A 2A 2A 2A 2A 2A |LINE 24 ********|
00000C90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000CA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000CB0: 2A 2A 2A 00 D5 14 18 06 99 22 13 11 11 11 11 11 |***......"......|
00000CC0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000CD0: 11 11 11 22 3B 00 05 15 22 06 99 22 20 20 20 20 |...";...".." |
00000CE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000CF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000D00: 20 20 20 22 3B 00 27 15 2C 06 99 22 13 11 11 11 | ";.'.,.."....|
00000D10: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000D20: 11 11 11 11 11 22 3B 00 2D 15 36 06 8E 00 7A 15 |.....";.-.6...z.|
00000D30: D0 07 8F 20 2A 2A 20 4D 41 49 4E 20 49 4E 50 55 |... ** MAIN INPU|
00000D40: 54 20 52 4F 55 54 49 4E 45 20 2A 2A 2A 2A 2A 2A |T ROUTINE ******|
00000D50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000D60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000D70: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 8C 15 DA 07 8D |**********......|
00000D80: 20 31 35 30 30 3A 8D 20 31 35 35 30 00 BC 15 E4 | 1500:. 1550....|
00000D90: 07 99 22 45 4E 54 45 52 20 43 4F 4D 4D 41 4E 44 |.."ENTER COMMAND|
00000DA0: 20 20 20 20 20 43 3A 52 3A 51 3A 49 3A 46 31 3A | C:R:Q:I:F1:|
00000DB0: 46 33 3A 46 35 3A 46 37 20 20 22 3B 00 D4 15 EE |F3:F5:F7 ";....|
00000DC0: 07 A1 20 41 24 3A 8B 20 41 24 B2 22 22 20 A7 20 |.. A$:. A$."" . |
00000DD0: 32 30 33 30 00 EA 15 F8 07 8B 20 41 24 B2 22 43 |2030...... A$."C|
00000DE0: 22 20 A7 20 8D 20 33 30 30 30 00 00 16 02 08 8B |" . . 3000......|
00000DF0: 20 41 24 B2 22 52 22 20 A7 20 8D 20 31 33 30 30 | A$."R" . . 1300|
00000E00: 00 16 16 0C 08 8B 20 41 24 B2 22 51 22 20 A7 20 |...... A$."Q" . |
00000E10: 8D 20 31 34 30 30 00 2C 16 11 08 8B 20 41 24 B2 |. 1400.,.... A$.|
00000E20: 22 49 22 20 A7 20 8D 20 37 30 30 30 00 46 16 16 |"I" . . 7000.F..|
00000E30: 08 8B 20 41 24 B2 22 85 22 20 A7 20 4E B2 34 3A |.. A$."." . N.4:|
00000E40: 8D 20 31 31 30 30 00 61 16 20 08 8B 20 41 24 B2 |. 1100.a. .. A$.|
00000E50: 22 86 22 20 A7 20 4E B2 31 31 3A 8D 20 31 31 30 |"." . N.11:. 110|
00000E60: 30 00 7C 16 2A 08 8B 20 41 24 B2 22 87 22 20 A7 |0.|.*.. A$."." .|
00000E70: 20 4E B2 31 38 3A 8D 20 31 31 30 30 00 92 16 34 | N.18:. 1100...4|
00000E80: 08 8B 20 41 24 B2 22 88 22 20 A7 20 8D 20 31 32 |.. A$."." . . 12|
00000E90: 30 30 00 9D 16 3E 08 89 20 32 30 30 30 00 EA 16 |00...>.. 2000...|
00000EA0: B8 0B 8F 20 2A 2A 20 52 4F 55 54 49 4E 45 20 54 |... ** ROUTINE T|
00000EB0: 4F 20 43 48 41 4E 47 45 20 56 41 4C 55 45 53 20 |O CHANGE VALUES |
00000EC0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000ED0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000EE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 F5 16 C2 0B 8D |**********......|
00000EF0: 20 31 35 35 30 00 25 17 CC 0B 99 22 46 4F 52 20 | 1550.%...."FOR |
00000F00: 57 48 49 43 48 20 4C 4F 43 41 54 49 4F 4E 20 28 |WHICH LOCATION (|
00000F10: 41 2D 59 29 20 20 20 20 20 20 20 20 20 20 20 20 |A-Y) |
00000F20: 20 20 20 22 3B 00 3D 17 D6 0B A1 20 4E 24 3A 8B | ";.=.... N$:.|
00000F30: 20 4E 24 B2 22 22 20 A7 20 33 30 33 30 00 60 17 | N$."" . 3030.`.|
00000F40: DB 0B 8B 20 C6 28 4E 24 29 B3 36 35 20 B0 20 C6 |... .(N$).65 . .|
00000F50: 28 4E 24 29 B1 38 39 20 A7 20 89 20 33 30 33 30 |(N$).89 . . 3030|
00000F60: 00 6F 17 E0 0B 4E B2 C6 28 4E 24 29 AB 36 35 00 |.o...N..(N$).65.|
00000F70: 7A 17 EA 0B 8D 20 31 35 35 30 00 AA 17 F4 0B 99 |z.... 1550......|
00000F80: 22 43 48 41 4E 47 45 20 20 12 22 3B 4E 24 3B 22 |"CHANGE .";N$;"|
00000F90: 92 20 20 54 4F 20 28 30 2D 32 35 35 29 20 20 20 |. TO (0-255) |
00000FA0: 20 20 20 20 20 20 20 20 22 3B 00 B5 17 FE 0B 8D | ";......|
00000FB0: 20 31 35 30 30 00 C0 17 08 0C 8D 20 38 30 30 30 | 1500...... 8000|
00000FC0: 00 E1 17 12 0C 8B 20 44 28 4E 29 B3 30 20 B0 20 |...... D(N).0 . |
00000FD0: 44 28 4E 29 B1 32 35 35 20 A7 20 89 20 33 30 37 |D(N).255 . . 307|
00000FE0: 30 00 EC 17 1C 0C 8D 20 31 30 30 30 00 F2 17 26 |0...... 1000...&|
00000FF0: 0C 8E 00 14 18 88 13 83 20 31 30 31 2C 31 38 31 |........ 101,181|
00001000: 2C 33 30 31 2C 33 38 31 2C 34 36 31 2C 35 34 31 |,301,381,461,541|
00001010: 2C 36 32 31 00 36 18 92 13 83 20 31 30 38 2C 31 |,621.6.... 108,1|
00001020: 38 38 2C 33 30 38 2C 33 38 38 2C 34 36 38 2C 35 |88,308,388,468,5|
00001030: 34 38 2C 36 32 38 00 58 18 9C 13 83 20 31 31 35 |48,628.X.... 115|
00001040: 2C 31 39 35 2C 33 31 35 2C 33 39 35 2C 34 37 35 |,195,315,395,475|
00001050: 2C 35 35 35 2C 36 33 35 00 7A 18 A6 13 83 20 37 |,555,635.z.... 7|
00001060: 30 36 2C 37 31 36 2C 37 38 36 2C 38 36 36 2C 30 |06,716,786,866,0|
00001070: 2C 30 2C 30 2C 30 2C 30 2C 30 00 C7 18 70 17 8F |,0,0,0,0,0...p..|
00001080: 20 2A 2A 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 | ** INSTRUCTIONS|
00001090: 20 4F 4E 20 48 4F 57 20 54 4F 20 55 53 45 20 2A | ON HOW TO USE *|
000010A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000010B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000010C0: 2A 2A 2A 2A 2A 2A 2A 00 D9 18 7A 17 99 22 93 11 |*******...z.."..|
000010D0: 11 11 11 11 11 11 11 22 3B 00 FB 18 84 17 99 22 |.......";......"|
000010E0: 20 20 20 20 20 20 53 4F 55 4E 44 20 20 48 45 4C | SOUND HEL|
000010F0: 50 45 52 20 20 20 20 20 20 20 22 00 07 19 8E 17 |PER ".....|
00001100: 99 22 11 11 11 11 22 00 2A 19 98 17 99 22 20 20 |."....".*...." |
00001110: 20 20 20 20 20 20 20 20 42 59 20 4D 49 43 41 48 | BY MICAH|
00001120: 20 4B 4F 52 4E 42 45 52 47 22 00 3F 19 A2 17 81 | KORNBERG".?....|
00001130: 20 49 B2 31 20 A4 20 32 30 30 30 3A 82 20 49 00 | I.1 . 2000:. I.|
00001140: 73 19 AC 17 99 22 93 12 49 4E 53 54 52 55 43 54 |s...."..INSTRUCT|
00001150: 49 4F 4E 53 20 46 4F 52 20 53 4F 55 4E 44 20 48 |IONS FOR SOUND H|
00001160: 45 4C 50 45 52 20 20 20 20 20 20 A0 20 20 20 20 |ELPER . |
00001170: 92 22 3B 00 B2 19 C0 17 99 22 20 20 20 20 54 48 |.";......" TH|
00001180: 49 53 20 49 53 20 41 20 56 45 52 59 20 53 49 4D |IS IS A VERY SIM|
00001190: 50 4C 45 20 50 52 4F 47 52 41 4D 2C 20 54 48 45 |PLE PROGRAM, THE|
000011A0: 52 45 41 52 45 20 4F 4E 4C 59 20 41 20 46 45 57 |REARE ONLY A FEW|
000011B0: 22 3B 00 F8 19 CA 17 99 22 20 54 48 49 4E 47 53 |";......" THINGS|
000011C0: 20 59 4F 55 20 48 41 56 45 20 54 4F 20 20 4B 4E | YOU HAVE TO KN|
000011D0: 4F 57 20 54 4F 20 42 45 20 41 42 4C 45 20 54 4F |OW TO BE ABLE TO|
000011E0: 20 4F 50 45 52 41 54 45 20 54 48 49 53 20 50 52 | OPERATE THIS PR|
000011F0: 4F 47 52 41 4D 20 22 3B 00 2B 1A D4 17 99 22 41 |OGRAM ";.+...."A|
00001200: 4E 44 20 20 4D 41 4B 45 20 47 52 45 41 54 20 53 |ND MAKE GREAT S|
00001210: 4F 55 4E 44 53 20 4F 4E 20 54 48 45 20 43 4F 4D |OUNDS ON THE COM|
00001220: 4D 4F 44 4F 52 45 20 20 36 34 22 00 32 1A DE 17 |MODORE 64".2...|
00001230: 99 22 00 7C 1A E8 17 99 22 31 2E 20 20 45 56 45 |.".|...."1. EVE|
00001240: 52 59 20 4C 4F 43 41 54 49 4F 4E 20 49 4E 20 54 |RY LOCATION IN T|
00001250: 48 45 20 53 49 44 20 43 48 49 50 20 49 53 20 20 |HE SID CHIP IS |
00001260: 20 52 45 50 52 45 53 45 4E 54 45 44 20 42 59 20 | REPRESENTED BY |
00001270: 41 20 4C 4F 43 41 54 49 4F 4E 22 3B 00 BA 1A F2 |A LOCATION";....|
00001280: 17 99 22 20 4F 4E 20 54 48 45 20 53 43 52 45 45 |.." ON THE SCREE|
00001290: 4E 20 20 28 41 2D 59 29 20 49 4E 20 54 48 41 54 |N (A-Y) IN THAT|
000012A0: 20 4F 52 44 45 52 20 28 41 20 45 51 55 41 4C 49 | ORDER (A EQUALI|
000012B0: 4E 47 20 35 34 32 37 32 29 22 00 C1 1A FC 17 99 |NG 54272)"......|
000012C0: 22 00 08 1B 06 18 99 22 32 2E 20 20 54 48 45 52 |"......"2. THER|
000012D0: 45 46 4F 52 45 20 59 4F 55 20 41 52 45 20 4F 4E |EFORE YOU ARE ON|
000012E0: 4C 59 20 41 42 4C 45 20 54 4F 20 50 55 54 20 20 |LY ABLE TO PUT |
000012F0: 54 48 45 20 4E 55 4D 42 45 52 53 20 30 2D 32 35 |THE NUMBERS 0-25|
00001300: 35 20 49 4E 20 41 22 3B 00 19 1B 10 18 99 22 20 |5 IN A";......" |
00001310: 4C 4F 43 41 54 49 4F 4E 22 00 20 1B 1A 18 99 22 |LOCATION". ...."|
00001320: 00 66 1B 24 18 99 22 33 2E 20 20 54 4F 20 53 45 |.f.$.."3. TO SE|
00001330: 45 20 41 20 4C 49 53 54 20 4F 46 20 41 4C 4C 20 |E A LIST OF ALL |
00001340: 54 48 45 20 43 4F 4D 4D 41 4E 44 53 20 41 54 41 |THE COMMANDS ATA|
00001350: 4E 59 20 54 49 4D 45 20 28 57 49 54 48 4F 55 54 |NY TIME (WITHOUT|
00001360: 20 41 4E 59 22 3B 00 A6 1B 2E 18 99 22 20 45 46 | ANY";......" EF|
00001370: 46 45 43 54 20 4F 4E 20 57 48 41 54 20 20 20 20 |FECT ON WHAT |
00001380: 59 4F 55 20 41 52 45 20 44 4F 49 4E 47 29 20 50 |YOU ARE DOING) P|
00001390: 52 45 53 53 20 54 48 45 20 4C 45 54 54 45 52 20 |RESS THE LETTER |
000013A0: 27 49 27 20 22 3B 00 C4 1B 38 18 99 22 20 20 20 |'I' ";...8.." |
000013B0: 20 28 46 4F 52 20 49 4E 53 54 52 55 43 54 49 4F | (FOR INSTRUCTIO|
000013C0: 4E 53 29 22 00 CB 1B 42 18 99 22 00 12 1C 4C 18 |NS)"...B.."...L.|
000013D0: 99 22 34 2E 20 20 46 49 4E 41 4C 4C 59 20 54 4F |."4. FINALLY TO|
000013E0: 20 55 4E 44 45 52 53 54 41 4E 44 2C 20 41 4E 44 | UNDERSTAND, AND|
000013F0: 20 42 45 20 41 42 4C 45 20 20 54 4F 20 50 55 54 | BE ABLE TO PUT|
00001400: 20 54 48 45 20 52 49 47 48 54 20 56 41 4C 55 45 | THE RIGHT VALUE|
00001410: 22 3B 00 4F 1C 56 18 99 22 20 49 4E 20 54 48 45 |";.O.V.." IN THE|
00001420: 20 41 50 50 52 4F 52 49 41 54 45 4C 4F 43 41 54 | APPRORIATELOCAT|
00001430: 49 4F 4E 20 52 45 46 45 52 20 54 4F 20 54 48 45 |ION REFER TO THE|
00001440: 20 43 4F 4D 4D 4F 44 4F 52 45 20 36 34 22 3B 00 | COMMODORE 64";.|
00001450: 8A 1C 60 18 99 22 20 20 20 20 20 20 52 45 46 45 |..`.." REFE|
00001460: 52 45 4E 43 45 20 4D 41 4E 55 41 4C 27 53 20 53 |RENCE MANUAL'S S|
00001470: 45 43 54 49 4F 4E 20 4F 4E 20 53 4F 55 4E 44 20 |ECTION ON SOUND |
00001480: 41 4E 44 20 4D 55 53 49 43 22 00 BB 1C 6A 18 99 |AND MUSIC"...j..|
00001490: 22 12 20 20 20 48 49 54 20 41 4E 59 20 4B 45 59 |". HIT ANY KEY|
000014A0: 20 54 4F 20 43 4F 4E 54 49 4E 55 45 20 20 20 20 | TO CONTINUE |
000014B0: 20 20 20 20 20 20 20 20 20 22 3B 00 C4 1C 74 18 | ";...t.|
000014C0: A1 20 41 24 00 D9 1C 79 18 8B 20 41 24 B2 22 22 |. A$...y.. A$.""|
000014D0: 20 A7 20 89 20 36 32 36 30 00 0B 1D 7E 18 99 22 | . . 6260...~.."|
000014E0: 93 12 20 20 20 20 20 20 43 4F 4D 4D 41 4E 44 20 |.. COMMAND |
000014F0: 20 20 4C 49 53 54 20 20 20 20 20 20 20 20 20 20 | LIST |
00001500: 20 20 20 20 20 20 20 20 20 92 22 00 12 1D 88 18 | .".....|
00001510: 99 22 00 19 1D 8D 18 99 22 00 3C 1D 92 18 99 22 |."......".<...."|
00001520: 20 20 20 51 20 2D 2D 20 51 55 49 54 20 28 45 58 | Q -- QUIT (EX|
00001530: 49 54 29 20 50 52 4F 47 52 41 4D 22 00 43 1D 9C |IT) PROGRAM".C..|
00001540: 18 99 22 00 70 1D A6 18 99 22 20 20 20 52 20 2D |..".p...." R -|
00001550: 2D 20 52 45 53 45 54 20 41 4C 4C 20 56 41 4C 55 |- RESET ALL VALU|
00001560: 45 53 20 20 28 4C 4F 43 41 54 49 4F 4E 53 29 22 |ES (LOCATIONS)"|
00001570: 00 77 1D B0 18 99 22 00 97 1D BA 18 99 22 20 20 |.w...."......" |
00001580: 20 49 20 2D 2D 20 50 52 49 4E 54 53 20 54 48 49 | I -- PRINTS THI|
00001590: 53 20 4C 49 53 54 22 00 9E 1D C4 18 99 22 00 DE |S LIST"......"..|
000015A0: 1D CE 18 99 22 20 20 20 43 20 2D 2D 20 43 48 41 |...." C -- CHA|
000015B0: 4E 47 45 20 56 41 4C 55 45 20 4F 46 20 41 20 53 |NGE VALUE OF A S|
000015C0: 50 45 43 49 46 49 43 20 20 20 20 20 20 20 20 20 |PECIFIC |
000015D0: 20 20 20 20 20 4C 4F 43 41 54 49 4F 4E 22 00 E5 | LOCATION"..|
000015E0: 1D D8 18 99 22 00 01 1E E2 18 99 22 20 20 46 31 |...."......" F1|
000015F0: 20 2D 2D 20 50 4C 41 59 20 56 4F 49 43 45 20 31 | -- PLAY VOICE 1|
00001600: 22 00 08 1E EC 18 99 22 00 24 1E F6 18 99 22 20 |"......".$...." |
00001610: 20 46 33 20 2D 2D 20 50 4C 41 59 20 56 4F 49 43 | F3 -- PLAY VOIC|
00001620: 45 20 32 22 00 2B 1E 00 19 99 22 00 47 1E 0A 19 |E 2".+....".G...|
00001630: 99 22 20 20 46 35 20 2D 2D 20 50 4C 41 59 20 56 |." F5 -- PLAY V|
00001640: 4F 49 43 45 20 33 22 00 4E 1E 14 19 99 22 00 6E |OICE 3".N....".n|
00001650: 1E 1E 19 99 22 20 20 46 37 20 2D 2D 20 50 4C 41 |...." F7 -- PLA|
00001660: 59 20 56 4F 49 43 45 20 31 2C 32 2C 33 22 00 75 |Y VOICE 1,2,3".u|
00001670: 1E 28 19 99 22 00 9C 1E 32 19 99 22 20 50 2E 53 |.(.."...2.." P.S|
00001680: 2E 20 4D 41 53 54 45 52 20 56 4F 4C 55 4D 45 20 |. MASTER VOLUME |
00001690: 49 53 20 46 52 4F 4D 20 31 2D 31 35 00 C4 1E 3C |IS FROM 1-15...<|
000016A0: 19 99 22 20 20 20 20 54 48 45 20 43 4F 4E 54 52 |.." THE CONTR|
000016B0: 4F 4C 20 52 45 47 49 53 54 45 52 20 43 4F 4E 54 |OL REGISTER CONT|
000016C0: 41 49 4E 53 00 EA 1E 3D 19 99 22 20 20 20 20 20 |AINS...=.." |
000016D0: 20 20 20 20 20 20 31 36 2C 33 32 2C 36 34 2C 4F | 16,32,64,O|
000016E0: 52 20 31 32 38 20 4F 4E 4C 59 00 1B 1F 46 19 99 |R 128 ONLY...F..|
000016F0: 22 12 20 20 20 20 20 20 20 48 49 54 20 41 4E 59 |". HIT ANY|
00001700: 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E 55 45 | KEY TO CONTINUE|
00001710: 20 20 20 20 20 20 20 20 20 92 22 00 33 1F 50 19 | .".3.P.|
00001720: A1 20 41 24 3A 8B 20 41 24 B2 22 22 20 A7 20 36 |. A$:. A$."" . 6|
00001730: 34 38 30 00 39 1F 5A 19 8E 00 86 1F 58 1B 8F 20 |480.9.Z.....X.. |
00001740: 2A 2A 20 52 4F 55 54 49 4E 45 20 46 4F 52 20 4F |** ROUTINE FOR O|
00001750: 4E 2D 4C 49 4E 45 20 49 4E 53 54 52 55 43 54 49 |N-LINE INSTRUCTI|
00001760: 4F 4E 53 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |ONS ************|
00001770: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001780: 2A 2A 2A 2A 2A 2A 00 91 1F 5D 1B 8D 20 36 32 37 |******...].. 627|
00001790: 30 00 9B 1F 62 1B 8D 20 31 30 30 00 AA 1F 6C 1B |0...b.. 100...l.|
000017A0: 81 20 4E B2 30 20 A4 20 32 35 00 B5 1F 76 1B 8D |. N.0 . 25...v..|
000017B0: 20 31 30 30 30 00 BD 1F 80 1B 82 20 4E 00 C3 1F | 1000...... N...|
000017C0: 8A 1B 8E 00 10 20 40 1F 8F 20 2A 2A 20 47 45 54 |..... @.. ** GET|
000017D0: 20 52 4F 55 54 49 4E 45 20 46 4F 52 20 50 4F 4B | ROUTINE FOR POK|
000017E0: 45 20 56 41 4C 55 45 20 2A 2A 2A 2A 2A 2A 2A 2A |E VALUE ********|
000017F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001800: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001810: 00 1A 20 4A 1F 4E 24 B2 22 22 00 2C 20 A4 1F 97 |.. J.N$.""., ...|
00001820: 20 53 43 AA 39 32 31 AA 4F 2C 33 30 00 35 20 AE | SC.921.O,30.5 .|
00001830: 1F A1 20 41 24 00 48 20 B8 1F 97 20 53 43 AA 39 |.. A$.H ... SC.9|
00001840: 32 31 AA 4F 2C 31 35 38 00 5B 20 C2 1F 8B 20 41 |21.O,158.[ ... A|
00001850: 24 B2 22 22 20 A7 20 38 31 30 30 00 77 20 CC 1F |$."" . 8100.w ..|
00001860: 8B 20 41 24 B2 C7 28 32 30 29 20 A7 20 4F B2 30 |. A$..(20) . O.0|
00001870: 3A 8D 20 38 32 30 30 00 8D 20 EA 1F 8B 20 41 24 |:. 8200.. ... A$|
00001880: B2 C7 28 31 33 29 20 A7 20 38 35 30 30 00 B1 20 |..(13) . 8500.. |
00001890: F4 1F 8B 20 C6 28 41 24 29 B1 34 37 20 AF 20 C6 |... .(A$).47 . .|
000018A0: 28 41 24 29 B3 35 38 20 A7 20 8D 20 20 38 36 30 |(A$).58 . . 860|
000018B0: 30 00 BC 20 FE 1F 89 20 38 31 31 30 00 09 21 08 |0.. ... 8110..!.|
000018C0: 20 8F 20 2A 2A 20 47 45 54 20 52 4F 55 54 49 4E | . ** GET ROUTIN|
000018D0: 45 20 46 4F 52 20 54 48 45 20 44 45 4C 20 4B 45 |E FOR THE DEL KE|
000018E0: 59 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |Y **************|
000018F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001900: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 13 21 12 20 4E 24 |*********..!. N$|
00001910: B2 22 22 00 21 21 1C 20 81 20 49 B2 30 20 A4 20 |."".!!. . I.0 . |
00001920: 33 00 33 21 26 20 97 20 53 43 AA 39 32 31 AA 49 |3.3!& . SC.921.I|
00001930: 2C 33 32 00 3B 21 94 20 82 20 49 00 41 21 9E 20 |,32.;!. . I.A!. |
00001940: 8E 00 8E 21 34 21 8F 20 2A 2A 20 47 45 54 20 52 |...!4!. ** GET R|
00001950: 4F 55 54 49 4E 45 20 46 4F 52 20 54 48 45 20 52 |OUTINE FOR THE R|
00001960: 45 54 55 52 4E 20 4B 45 59 20 2A 2A 2A 2A 2A 2A |ETURN KEY ******|
00001970: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001980: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 9D |**************..|
00001990: 21 3E 21 44 28 4E 29 B2 C5 28 4E 24 29 00 B9 21 |!>!D(N)..(N$)..!|
000019A0: 48 21 8B 20 4E B2 B1 30 20 AF 20 4E B2 B3 32 35 |H!. N..0 . N..25|
000019B0: 35 20 A7 20 4F B2 30 3A 8E 00 CA 21 52 21 4E 24 |5 . O.0:...!R!N$|
000019C0: B2 22 22 3A 89 20 38 31 31 30 00 17 22 98 21 8F |."":. 8110..".!.|
000019D0: 20 2A 2A 20 47 45 54 20 52 4F 55 54 49 4E 45 20 | ** GET ROUTINE |
000019E0: 41 20 4E 55 4D 42 45 52 20 2A 2A 2A 2A 2A 2A 2A |A NUMBER *******|
000019F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001A00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001A10: 2A 2A 2A 2A 2A 2A 2A 00 25 22 9D 21 8B 20 4F B2 |*******.%".!. O.|
00001A20: 33 20 A7 20 8E 00 3A 22 A2 21 97 20 53 43 AA 39 |3 . ..:".!. SC.9|
00001A30: 32 31 AA 4F 2C C6 28 41 24 29 00 47 22 A7 21 4E |21.O,.(A$).G".!N|
00001A40: 24 B2 4E 24 AA 41 24 00 51 22 AC 21 4F B2 4F AA |$.N$.A$.Q".!O.O.|
00001A50: 31 00 57 22 C0 21 8E 00 00 00 BF |1.W".!..... |
..".... MICAH KORNBERG MAY 6,1983.R....
**************************************
**********************************.B....
******* SCREEN LOCATION **************
**********************************.O...:
SC.1024...... **** SID LOCATION ********
****************************************
******.-...:SID.54272.|.... **** DIM ARR
AY A AND S *****************************
********************.....:. D(25),A(25).
..... **** READ ARRAY A (SCREEN LOCATION
)************************************...
..:. I.0 . 24:. A(I):A(I).A(I).SC:. I.T.
... **** SCREEN,BORDER AND CHARACTER COL
OUR*********************************.T.#
.:.".":. 53280,15:. 53281,15.C.(.. ****
SET DURATION OF SOUND ******************
***************************.O.-.:DU.255.
..2.. **** PRINT INSTRUCTIONS **********
**************************************.*
.7.:. 6000.Y.<.. **** SETUP SCREEN DISPL
AY *************************************
*********...A.:. 100:. 1350:. 2000...F..
***************************************
*********************************./.D..
*** SCREEN SETUP ***********************
*******************************.9.I.."."
;.F.N.." VOICE (1) (2)
(3).V...."FREQUENCY......" (L)-----
------- .A. .H. .O.......""...
.." (H)------------ .B. .I.
.P.......""......"VARIABLE PULSE.(...."
(L)------------ .C. .J. .Q.
.0....""._.H.." (H)------------ .D.
.K. .R..G.M..""...R.."CONTROL RE
GISTER-- .E. .L. .S.......".L.
..."ATTACK/DECAY------ .F. .M.
.T..S...."......"SUSTAIN/RELEASE--- .G.
.N. .U..3...."...............
.........................";.A...."FILTER
FREQUENCY (L) .V. (H) .W..H...."
...".."RESONANCE/FILTER VOICES .X....,..
"...6.."PASSBAND/MASTER VOLUME .Y....;.
....... ** ROUTINE TO POKE TO SCREEN AND
MEMORY ******************************.%
...N$.I(D(D(N)),C(D(D(N))).1).C.... I.0
. 2:. A(N).I,32:. I.W.... I.0 . C(N$).1.
..... A(N).I,E(J(N$,I.1,1)).48:. 54272.A
(N).I,0...$.. I. .... SID.N,D(N)...8....
.L.. ** ROUTINE FOR VOICE 1,2, OR 3 ****
***********************************...Q.
. D(N).255 . D(N).254...V.D(N).D(N).1...
`.. SID.N,D(N).A.J.. I.1 . DU:. I.Q.T.D(
N).D(N).1.B.~.. SID.N,D(N).H.......... *
* ROUTINE FOR VOICE 1,2AND 3 ***********
*****************************.O.... D(4)
.255 . D(4).254...... D(11).255 . D(11).
254...... D(18).255 . D(18).254...... SI
D.4,D(4).1./.D.. SID.11,D(11).1.D.N.. SI
D.18,D(18).1.T.X.. I.1.DU:.I.E.... SID.4
,D(4).X.... SID.11,D(11)...... SID.18,D(
18)............ ** ROUTINE TO RESTART **
****************************************
******...... 1550...(.."PRESS .Y. TO RES
TART";...2..A$:.A$."". 1330.&.4.. 1550.C
.8.." ";.V.<..A$.."Y"
. 2000.B.F..N.0.24.P.P.. SID.N,0.{.Z.D(N
).0...D.. I.0 . 2:. A(N).I,32:. 54272.A(
N).I,0:. I...N.. A(N),48...Q.. N.F.S....
.X.. ** ROUTINE TO QUIT ****************
***********************************.....
. 1550.?...."PRESS .Y. TO QUIT ";.
Y.... A$:. A$."" . . 1430.D.... 1550....
.." ";... .. A$.."Y"
. 2000......".":....... ** ROUTINE TO GO
TO LINE 23 *****************************
**************......"...................
.....";.?...."
";.`...."..................
......";.F.......... ** ROUTINE TO GOTO
LINE 24 ********************************
***********.U...."......................
...";...".."
";.'.,.."....................
.....";.-.6...Z.P.. ** MAIN INPUT ROUTIN
E **************************************
**********...Z.. 1500:. 1550......"ENTER
COMMAND C:R:Q:I:F1:F3:F5:F7 ";.T..
.. A$:. A$."" . 2030...... A$."C" . . 30
00...... A$."R" . . 1300...... A$."Q" .
. 1400.,.... A$."I" . . 7000.F.... A$.".
" . N.4:. 1100.A. .. A$."." . N.11:. 110
0.|.*.. A$."." . N.18:. 1100...4.. A$.".
" . . 1200...>.. 2000...... ** ROUTINE T
O CHANGE VALUES ************************
******************...B.. 1550.%.L.."FOR
WHICH LOCATION (A-Y) ";.=.
V.. N$:. N$."" . 3030.`.... F(N$).65 . F
(N$).89 . . 3030.O...N.F(N$).65.Z.... 15
50......"CHANGE .";N$;". TO (0-255)
";...... 1500...... 8000...... D
(N).0 . D(N).255 . . 3070...... 1000...&
........ 101,181,301,381,461,541,621.6..
.. 108,188,308,388,468,548,628.X.... 115
,195,315,395,475,555,635.Z.... 706,716,7
86,866,0,0,0,0,0,0.G.P.. ** INSTRUCTIONS
ON HOW TO USE *************************
***************.Y.Z..".........";......"
SOUND HELPER "......"....".
*...." BY MICAH KORNBERG".?....
I.1 . 2000:. I.S...."..INSTRUCTIONS FOR
SOUND HELPER .";......" TH
IS IS A VERY SIMPLE PROGRAM, THEREARE ON
LY A FEW";...J.." THINGS YOU HAVE TO KN
OW TO BE ABLE TO OPERATE THIS PROGRAM ";
.+.T.."AND MAKE GREAT SOUNDS ON THE COM
MODORE 64".2....".|...."1. EVERY LOCAT
ION IN THE SID CHIP IS REPRESENTED BY
A LOCATION";......" ON THE SCREEN (A-Y)
IN THAT ORDER (A EQUALING 54272)".A....
"......"2. THEREFORE YOU ARE ONLY ABLE
TO PUT THE NUMBERS 0-255 IN A";......"
LOCATION". ....".F.$.."3. TO SEE A LIST
OF ALL THE COMMANDS ATANY TIME (WITHOUT
ANY";......" EFFECT ON WHAT YOU ARE
DOING) PRESS THE LETTER 'I' ";.D.8.."
(FOR INSTRUCTIONS)".K.B.."...L.."4. FI
NALLY TO UNDERSTAND, AND BE ABLE TO PUT
THE RIGHT VALUE";.O.V.." IN THE APPRORI
ATELOCATION REFER TO THE COMMODORE 64";.
..`.." REFERENCE MANUAL'S SECTION O
N SOUND AND MUSIC"...J..". HIT ANY KEY
TO CONTINUE ";.D.T.. A$.Y.Y
.. A$."" . . 6260...~..".. COMMAND
LIST ."......"......
".<...." Q -- QUIT (EXIT) PROGRAM".C..
..".P...." R -- RESET ALL VALUES (LOC
ATIONS)".W...."......" I -- PRINTS THI
S LIST"...D.."...N.." C -- CHANGE VALU
E OF A SPECIFIC LOCATION"..
.X.."......" F1 -- PLAY VOICE 1"......"
.$...." F3 -- PLAY VOICE 2".+....".G...
." F5 -- PLAY VOICE 3".N....".N...." F
7 -- PLAY VOICE 1,2,3".U.(.."...2.." P.S
. MASTER VOLUME IS FROM 1-15.D.<.." T
HE CONTROL REGISTER CONTAINS...=.."
16,32,64,OR 128 ONLY...F..".
HIT ANY KEY TO CONTINUE .".3.P.
. A$:. A$."" . 6480.9.Z.....X.. ** ROUTI
NE FOR ON-LINE INSTRUCTIONS ************
**********************...].. 6270...B..
100...L.. N.0 . 25...V.. 1000...... N.C.
..... @.. ** GET ROUTINE FOR POKE VALUE
****************************************
.. J.N$.""., ... SC.921.O,30.5 ... A$.H
... SC.921.O,158.[ B.. A$."" . 8100.W L.
. A$.G(20) . O.0:. 8200.. ... A$.G(13) .
8500.. ... F(A$).47 . F(A$).58 . . 860
0.. ... 8110..!. . ** GET ROUTINE FOR TH
E DEL KEY ******************************
*********..!. N$."".!!. . I.0 . 3.3!& .
SC.921.I,32.;!. . I.A!. ...!4!. ** GET R
OUTINE FOR THE RETURN KEY **************
**********************..!>!D(N).E(N$)..!
H!. N..0 . N..255 . O.0:..J!R!N$."":. 81
10..".!. ** GET ROUTINE A NUMBER *******
***************************************.
%".!. O.3 . ..:".!. SC.921.O,F(A$).G".!N
$.N$.A$.Q".!O.O.1.W".!.....
> CLICK IMAGE PREVIEW FOR FULL MODAL