_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

SOUND HELPER.C

FILE INFORMATION

FILENAME(S): SOUND HELPER.C

FILE TYPE(S): PRG

FILE SIZE: 6.6K

FIRST SEEN: 2025-11-30 01:07:56

APPEARS ON: 2 disk(s)

FILE HASH

27413176b659973a2935b7edfd240a838ee8cc46fc62809fe6be724c09ae1a06

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
U TILITIE SOUND HELPER.C PRG Treasure Chest - Wolfgang Rauprich 29 7 DOWNLOAD FILE
FREESOFT DISK NR SOUND HELPER.C PRG Treasure Chest - Wolfgang Rauprich 29 7 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 01 04 22 04 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 04 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 04 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 04 06 00 3A  53 43 B2 31 30 32 34 00  |**.....:SC.1024.|
000000D0: 1E 05 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: 05 0C 00 3A 53 49 44 B2  35 34 32 37 32 00 7C 05  |...: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 05 13  |************....|
00000180: 00 3A 86 20 44 28 32 35  29 2C 41 28 32 35 29 00  |.:. D(25),A(25).|
00000190: DD 05 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 06  |*************...|
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 06  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 06 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 06 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 06 2D 00  3A 44 55 B2 32 35 35 00  |***...-.:DU.255.|
000002D0: 1E 07 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: 07 37 00 3A 8D 20 36 30  30 30 00 79 07 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 07 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 07 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 08 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 08 69 00 99 22 93 22  3B 00 66 08 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  08 82 00 99 22 46 52 45  |   (3).v...."FRE|
00000470: 51 55 45 4E 43 59 00 A5  08 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 08  91 00 99 22 22 00 DC 08  |  .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 08 A5  |.I.      .P.....|
000004E0: 00 99 22 22 00 F9 08 AA  00 99 22 56 41 52 49 41  |..""......"VARIA|
000004F0: 42 4C 45 20 50 55 4C 53  45 00 28 09 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 09 B9 00 99 22 22  |     .Q..0....""|
00000530: 00 5F 09 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 09 CD 00 99 22 22 00  96 09 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  09 DC 00 99 22 00 CC 09  |   .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 09 F0  |.M.      .T.....|
000005D0: 00 99 22 00 02 0A 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 0A 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 0A 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 0A 18 01 99 22  00 8A 0A 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 0A 2C 01 99  |VOICES .X....,..|
00000690: 22 00 B3 0A 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 0A 3B 01  8E 00 06 0B 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  0B 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 0B  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 0B 10 04  81 20 49 B2 30 20 A4 20  |. I.W.... I.0 . |
00000750: C3 28 4E 24 29 AB 31 00  87 0B 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 0B 24 04 82 20 49 00  |(N).I,0...$.. I.|
00000790: A0 0B 2E 04 97 20 53 49  44 AA 4E 2C 44 28 4E 29  |..... SID.N,D(N)|
000007A0: 00 A6 0B 38 04 8E 00 F3  0B 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 0C 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 0C  |55 . D(N).254...|
00000810: 56 04 44 28 4E 29 B2 44  28 4E 29 AA 31 00 2E 0C  |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: 0C 6A 04 81 20 49 B2 31  20 A4 20 44 55 3A 82 20  |.j.. I.1 . DU:. |
00000840: 49 00 51 0C 74 04 44 28  4E 29 B2 44 28 4E 29 AB  |I.Q.t.D(N).D(N).|
00000850: 31 00 62 0C 7E 04 97 20  53 49 44 AA 4E 2C 44 28  |1.b.~.. SID.N,D(|
00000860: 4E 29 00 68 0C 88 04 8E  00 B5 0C 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 0C  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 0C 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 0D 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 0D BA 04 97 20 53 49  |18).254...... SI|
00000910: 44 AA 34 2C 44 28 34 29  AA 31 00 2F 0D 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 0D 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 0D D8  04 81 20 49 B2 31 A4 44  |8).1.T.... I.1.D|
00000950: 55 3A 82 49 00 65 0D E2  04 97 20 53 49 44 AA 34  |U:.I.e.... SID.4|
00000960: 2C 44 28 34 29 00 78 0D  EC 04 97 20 53 49 44 AA  |,D(4).x.... SID.|
00000970: 31 31 2C 44 28 31 31 29  00 8B 0D F6 04 97 20 53  |11,D(11)...... S|
00000980: 49 44 AA 31 38 2C 44 28  31 38 29 00 91 0D 00 05  |ID.18,D(18).....|
00000990: 8E 00 DE 0D 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: 0D 1E 05 8D 20 31 35 35  30 00 06 0E 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  0E 32 05 A1 41 24 3A 8B  |TART";...2..A$:.|
00000A10: 41 24 B2 22 22 A7 20 31  33 33 30 00 26 0E 34 05  |A$."". 1330.&.4.|
00000A20: 8D 20 31 35 35 30 00 43  0E 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 0E 3C 05  8B 41 24 B3 B1 22 59 22  | ";.V.<..A$.."Y"|
00000A50: A7 20 32 30 30 30 00 62  0E 46 05 81 4E B2 30 A4  |. 2000.b.F..N.0.|
00000A60: 32 34 00 70 0E 50 05 97  20 53 49 44 AA 4E 2C 30  |24.p.P.. SID.N,0|
00000A70: 00 7B 0E 5A 05 44 28 4E  29 B2 30 00 AA 0E 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 0E 6E 05 97  |N).I,0:. I...n..|
00000AB0: 20 41 28 4E 29 2C 34 38  00 C0 0E 71 05 82 20 4E  | A(N),48...q.. N|
00000AC0: 00 C6 0E 73 05 8E 00 13  0F 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 0F 82 05  8D 20 31 35 35 30 00 3F  |***...... 1550.?|
00000B20: 0F 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 0F 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 0F 9B 05 8D 20  | . . 1430.d.... |
00000B60: 31 35 35 30 00 81 0F 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 0F A0 05 8B 20  41 24 B3 B1 22 59 22 20  |;...... A$.."Y" |
00000B90: A7 20 32 30 30 30 00 A1  0F AA 05 99 22 93 22 3A  |. 2000......".":|
00000BA0: 80 00 EE 0F 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: 10 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 10 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 10 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 10 04 06 8E 00 B3  10 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 10 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 11  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 11  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 11 36 06 8E 00 7A 11  |.....";.-.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 11 DA 07 8D  |**********......|
00000D80: 20 31 35 30 30 3A 8D 20  31 35 35 30 00 BC 11 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 11 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 11 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 12 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 12 0C 08 8B 20 41  24 B2 22 51 22 20 A7 20  |...... A$."Q" . |
00000E10: 8D 20 31 34 30 30 00 2C  12 11 08 8B 20 41 24 B2  |. 1400.,.... A$.|
00000E20: 22 49 22 20 A7 20 8D 20  37 30 30 30 00 46 12 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  12 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 12 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 12 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 12 3E 08 89  20 32 30 30 30 00 EA 12  |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 12 C2 0B 8D  |**********......|
00000EF0: 20 31 35 35 30 00 25 13  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 13  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 13  | 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 13 E0 0B 4E B2 C6  28 4E 24 29 AB 36 35 00  |.o...N..(N$).65.|
00000F70: 7A 13 EA 0B 8D 20 31 35  35 30 00 AA 13 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 13 FE 0B 8D  |        ";......|
00000FB0: 20 31 35 30 30 00 C0 13  08 0C 8D 20 38 30 30 30  | 1500...... 8000|
00000FC0: 00 E1 13 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 13 1C 0C 8D 20  31 30 30 30 00 F2 13 26  |0...... 1000...&|
00000FF0: 0C 8E 00 14 14 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 14 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  14 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 14 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 14 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 14 7A 17 99 22 93 11  |*******...z.."..|
000010D0: 11 11 11 11 11 11 11 22  3B 00 FB 14 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 15 8E 17  |PER       ".....|
00001100: 99 22 11 11 11 11 22 00  2A 15 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 15 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 15 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 15 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 15 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 16 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 16 DE 17  |MODORE  64".2...|
00001230: 99 22 00 7C 16 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 16 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 16 FC 17 99  |NG 54272)"......|
000012C0: 22 00 08 17 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 17 10 18 99 22 20  |5 IN A";......" |
00001310: 4C 4F 43 41 54 49 4F 4E  22 00 20 17 1A 18 99 22  |LOCATION". ...."|
00001320: 00 66 17 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  17 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  17 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 17 42  18 99 22 00 12 18 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 18 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 18 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 18 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 18 74 18  |         ";...t.|
000014C0: A1 20 41 24 00 D9 18 79  18 8B 20 41 24 B2 22 22  |. A$...y.. A$.""|
000014D0: 20 A7 20 89 20 36 32 36  30 00 0B 19 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 19 88 18  |         .".....|
00001510: 99 22 00 19 19 8D 18 99  22 00 3C 19 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 19 9C  |IT) PROGRAM".C..|
00001540: 18 99 22 00 70 19 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 19 B0 18 99 22 00  97 19 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 19 C4 18 99 22 00 DE  |S LIST"......"..|
000015A0: 19 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: 19 D8 18 99 22 00 01 1A  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 1A EC 18 99 22  00 24 1A 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 1A 00  19 99 22 00 47 1A 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 1A 14 19 99 22 00 6E  |OICE 3".N....".n|
00001650: 1A 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: 1A 28 19 99 22 00 9C 1A  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 1A 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 1A 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 1B 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 1B 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 1B 5A 19  8E 00 86 1B 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  1B 5D 1B 8D 20 36 32 37  |******...].. 627|
00001790: 30 00 9B 1B 62 1B 8D 20  31 30 30 00 AA 1B 6C 1B  |0...b.. 100...l.|
000017A0: 81 20 4E B2 30 20 A4 20  32 35 00 B5 1B 76 1B 8D  |. N.0 . 25...v..|
000017B0: 20 31 30 30 30 00 BD 1B  80 1B 82 20 4E 00 C3 1B  | 1000...... N...|
000017C0: 8A 1B 8E 00 10 1C 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 1C 4A 1F 4E 24 B2  22 22 00 2C 1C A4 1F 97  |...J.N$."".,....|
00001820: 20 53 43 AA 39 32 31 AA  4F 2C 33 30 00 35 1C AE  | SC.921.O,30.5..|
00001830: 1F A1 20 41 24 00 48 1C  B8 1F 97 20 53 43 AA 39  |.. A$.H.... SC.9|
00001840: 32 31 AA 4F 2C 31 35 38  00 5B 1C C2 1F 8B 20 41  |21.O,158.[.... A|
00001850: 24 B2 22 22 20 A7 20 38  31 30 30 00 77 1C 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 1C EA 1F 8B 20 41 24  |:. 8200...... A$|
00001880: B2 C7 28 31 33 29 20 A7  20 38 35 30 30 00 B1 1C  |..(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 1C FE 1F 89 20  38 31 31 30 00 09 1D 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 1D 12 20 4E 24  |*********.... N$|
00001910: B2 22 22 00 21 1D 1C 20  81 20 49 B2 30 20 A4 20  |."".!.. . I.0 . |
00001920: 33 00 33 1D 26 20 97 20  53 43 AA 39 32 31 AA 49  |3.3.& . SC.921.I|
00001930: 2C 33 32 00 3B 1D 94 20  82 20 49 00 41 1D 9E 20  |,32.;.. . I.A.. |
00001940: 8E 00 8E 1D 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: 1D 3E 21 44 28 4E 29 B2  C5 28 4E 24 29 00 B9 1D  |.>!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 1D 52 21 4E 24  |5 . O.0:....R!N$|
000019C0: B2 22 22 3A 89 20 38 31  31 30 00 17 1E 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 1E 9D 21 8B 20 4F B2  |*******.%..!. O.|
00001A20: 33 20 A7 20 8E 00 3A 1E  A2 21 97 20 53 43 AA 39  |3 . ..:..!. SC.9|
00001A30: 32 31 AA 4F 2C C6 28 41  24 29 00 47 1E A7 21 4E  |21.O,.(A$).G..!N|
00001A40: 24 B2 4E 24 AA 41 24 00  51 1E AC 21 4F B2 4F AA  |$.N$.A$.Q..!O.O.|
00001A50: 31 00 57 1E C0 21 8E 00  00 00                    |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..!....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL