SOUND
FILE INFORMATION
FILENAME(S): SOUND
FILE TYPE(S): PRG
FILE SIZE: 2.9K
FIRST SEEN: 2025-11-02 16:30:37
APPEARS ON: 1 disk(s)
FILE HASH
505ecd87bb3da1e42438aaab19a03cd67c51c0cf225b5d5de39a902388dc9678
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| USERS 05A | SOUND | PRG | Treasure Chest - OzzyC64 | 13 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 00 70 50 52 3A 45 0D 44 3A 59 24 28 37 32 29 0D |.pPR:E.D:Y$(72).| 00000010: 44 3A 5A 24 28 31 29 0D 43 3A 59 24 3D 22 30 30 |D:Z$(1).C:Y$="00| 00000020: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 |0000000000000000| 00000030: 30 30 30 30 30 30 22 0D 43 3A 59 24 3D 59 24 21 |000000".C:Y$=Y$!| 00000040: 21 59 24 21 21 59 24 0D 4A 3A 40 50 0D 2A 53 43 |!Y$!!Y$.J:@P.*SC| 00000050: 52 45 45 4E 20 47 3A 53 30 0D 54 53 48 3A 56 4F |REEN G:S0.TSH:VO| 00000060: 49 43 45 28 31 2D 33 29 20 20 20 20 56 4F 4C 28 |ICE(1-3) VOL(| 00000070: 30 2D 31 35 29 20 20 20 20 52 45 53 0D 3A 28 30 |0-15) RES.:(0| 00000080: 2D 31 35 29 0D 54 3A 0D 3A 0D 54 3A 52 45 47 49 |-15).T:.:.T:REGI| 00000090: 53 54 45 52 0D 3A 20 23 41 20 20 20 20 20 20 3C |STER.: #A <| 000000A0: 2D 20 4C 6F 77 20 46 72 65 71 20 20 20 20 41 74 |- Low Freq At| 000000B0: 74 61 63 6B 28 30 2D 31 35 29 0D 3A 20 23 42 20 |tack(0-15).: #B | 000000C0: 20 20 20 20 20 3C 2D 20 48 69 67 68 20 22 20 20 | <- High " | 000000D0: 20 20 20 20 44 65 63 61 79 20 28 30 2D 31 35 29 | Decay (0-15)| 000000E0: 0D 3A 20 23 43 20 20 20 20 20 20 3C 2D 20 4C 6F |.: #C <- Lo| 000000F0: 77 20 50 75 6C 73 65 0D 3A 20 23 44 20 20 20 20 |w Pulse.: #D | 00000100: 20 20 3C 2D 20 48 69 67 68 20 22 20 20 20 20 20 | <- High " | 00000110: 53 75 73 74 61 69 6E 28 30 2D 31 35 29 0D 3A 20 |Sustain(0-15).: | 00000120: 23 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |#E | 00000130: 20 20 20 20 20 20 52 65 6C 65 61 73 65 28 30 2D | Release(0-| 00000140: 31 35 29 0D 3A 20 23 46 0D 3A 20 23 47 0D 3A 20 |15).: #F.: #G.: | 00000150: 32 31 20 20 20 20 20 20 3C 2D 20 43 75 74 20 46 |21 <- Cut F| 00000160: 72 65 71 20 20 20 20 20 53 57 49 54 43 48 45 53 |req SWITCHES| 00000170: 0D 3A 20 32 32 20 20 20 20 20 20 3C 2D 20 48 69 |.: 22 <- Hi| 00000180: 67 68 20 22 20 20 20 20 46 69 6C 74 65 72 20 20 |gh " Filter | 00000190: 20 20 43 75 74 33 0D 3A 20 32 33 20 20 20 20 20 | Cut3.: 23 | 000001A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 48 69 | Hi| 000001B0: 67 68 20 20 20 20 20 20 42 61 6E 64 0D 3A 20 32 |gh Band.: 2| 000001C0: 34 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |4 | 000001D0: 20 20 20 20 4C 6F 77 20 20 20 20 20 20 20 53 79 | Low Sy| 000001E0: 6E 63 0D 3A 20 20 20 20 20 20 20 20 20 20 20 20 |nc.: | 000001F0: 20 20 20 20 20 20 20 20 20 20 52 69 6E 67 0D 3A | Ring.:| 00000200: 0D 3A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.: | 00000210: 57 41 56 45 46 4F 52 4D 20 20 0D 3A 20 20 20 20 |WAVEFORM .: | 00000220: 20 20 20 20 20 20 20 20 20 20 20 20 4E 6F 69 73 | Nois| 00000230: 65 20 31 32 38 0D 3A 20 20 20 50 75 6C 73 65 20 |e 128.: Pulse | 00000240: 36 34 20 20 53 61 77 74 6F 6F 74 68 20 33 32 20 |64 Sawtooth 32 | 00000250: 20 54 72 69 61 6E 67 6C 65 20 31 36 0D 47 3A 53 | Triangle 16.G:S| 00000260: 35 0D 45 3A 0D 2A 46 49 4C 4C 0D 43 3A 4B 3D 59 |5.E:.*FILL.C:K=Y| 00000270: 24 28 48 2A 32 31 2D 31 33 2C 33 29 0D 43 3A 4C |$(H*21-13,3).C:L| 00000280: 3D 59 24 28 48 2A 32 31 2D 31 30 2C 33 29 0D 43 |=Y$(H*21-10,3).C| 00000290: 3A 4D 3D 59 24 28 48 2A 32 31 2D 37 2C 33 29 0D |:M=Y$(H*21-7,3).| 000002A0: 43 3A 4E 3D 59 24 28 48 2A 32 31 2D 34 2C 33 29 |C:N=Y$(H*21-4,3)| 000002B0: 0D 43 3A 4F 3D 59 24 28 48 2A 32 31 2D 31 2C 33 |.C:O=Y$(H*21-1,3| 000002C0: 29 0D 43 3A 50 3D 59 24 28 48 2A 32 31 2B 32 2C |).C:P=Y$(H*21+2,| 000002D0: 33 29 0D 43 3A 51 3D 59 24 28 48 2A 32 31 2B 35 |3).C:Q=Y$(H*21+5| 000002E0: 2C 33 29 0D 47 3A 4D 38 38 2C 31 38 34 3B 54 0D |,3).G:M88,184;T.| 000002F0: 54 3A 23 48 20 20 0D 47 3A 4D 31 39 32 2C 31 38 |T:#H .G:M192,18| 00000300: 34 3B 54 0D 54 3A 23 49 20 20 0D 47 3A 4D 33 30 |4;T.T:#I .G:M30| 00000310: 34 2C 31 38 34 3B 54 0D 54 48 3A 23 4A 20 20 0D |4,184;T.TH:#J .| 00000320: 47 3A 4D 33 32 2C 31 36 30 3B 54 0D 54 3A 23 4B |G:M32,160;T.T:#K| 00000330: 20 20 0D 47 3A 4D 33 32 2C 31 35 32 3B 54 0D 54 | .G:M32,152;T.T| 00000340: 3A 23 4C 20 20 0D 47 3A 4D 33 32 2C 31 34 34 3B |:#L .G:M32,144;| 00000350: 54 0D 54 3A 23 4D 20 20 0D 47 3A 4D 33 32 2C 31 |T.T:#M .G:M32,1| 00000360: 33 36 3B 54 0D 54 3A 23 4E 20 20 0D 47 3A 4D 33 |36;T.T:#N .G:M3| 00000370: 32 2C 31 32 38 3B 54 0D 54 3A 23 4F 20 20 0D 47 |2,128;T.T:#O .G| 00000380: 3A 4D 33 32 2C 31 32 30 3B 54 0D 54 3A 23 50 20 |:M32,120;T.T:#P | 00000390: 20 0D 47 3A 4D 33 32 2C 31 31 32 3B 54 0D 54 3A | .G:M32,112;T.T:| 000003A0: 23 51 20 20 0D 47 3A 4D 33 32 2C 31 30 34 3B 54 |#Q .G:M32,104;T| 000003B0: 0D 54 3A 23 52 20 20 0D 47 3A 4D 33 32 2C 39 36 |.T:#R .G:M32,96| 000003C0: 3B 54 0D 54 3A 23 53 20 20 0D 47 3A 4D 33 32 2C |;T.T:#S .G:M32,| 000003D0: 38 38 3B 54 0D 54 3A 23 54 20 20 0D 47 3A 4D 33 |88;T.T:#T .G:M3| 000003E0: 32 2C 38 30 3B 54 0D 54 3A 23 55 20 20 0D 43 3A |2,80;T.T:#U .C:| 000003F0: 56 3D 28 30 2F 31 36 29 2A 31 36 0D 43 3A 59 24 |V=(0/16)*16.C:Y$| 00000400: 28 37 29 3D 28 4F 2D 56 29 2F 34 0D 43 3A 59 24 |(7)=(O-V)/4.C:Y$| 00000410: 28 36 29 3D 28 4F 2D 56 2D 34 2A 59 24 28 37 29 |(6)=(O-V-4*Y$(7)| 00000420: 29 2F 32 0D 47 3A 4D 31 38 34 2C 35 36 3B 54 0D |)/2.G:M184,56;T.| 00000430: 54 3A 23 56 0D 43 3A 57 3D 50 2F 31 36 0D 43 3A |T:#V.C:W=P/16.C:| 00000440: 58 3D 50 2D 57 2A 31 36 0D 47 3A 4D 32 39 36 2C |X=P-W*16.G:M296,| 00000450: 31 36 30 3B 54 0D 54 3A 23 57 0D 47 3A 4D 32 39 |160;T.T:#W.G:M29| 00000460: 36 2C 31 35 32 3B 54 0D 54 3A 23 58 20 20 0D 43 |6,152;T.T:#X .C| 00000470: 3A 57 3D 51 2F 31 36 0D 43 3A 58 3D 51 2D 57 2A |:W=Q/16.C:X=Q-W*| 00000480: 31 36 0D 47 3A 4D 32 39 36 2C 31 33 36 3B 54 0D |16.G:M296,136;T.| 00000490: 54 3A 23 57 20 20 0D 47 3A 4D 32 39 36 2C 31 32 |T:#W .G:M296,12| 000004A0: 38 3B 54 0D 54 3A 23 58 20 20 0D 47 3A 4D 32 34 |8;T.T:#X .G:M24| 000004B0: 30 2C 39 36 3B 54 0D 43 3A 5A 24 3D 59 24 28 31 |0,96;T.C:Z$=Y$(1| 000004C0: 29 0D 54 3A 24 5A 24 0D 47 3A 4D 33 30 34 2C 39 |).T:$Z$.G:M304,9| 000004D0: 36 3B 54 0D 43 3A 5A 24 3D 59 24 28 32 29 0D 54 |6;T.C:Z$=Y$(2).T| 000004E0: 3A 24 5A 24 0D 47 3A 4D 32 34 30 2C 38 38 3B 54 |:$Z$.G:M240,88;T| 000004F0: 0D 43 3A 5A 24 3D 59 24 28 33 29 0D 54 3A 24 5A |.C:Z$=Y$(3).T:$Z| 00000500: 24 0D 47 3A 4D 33 30 34 2C 38 38 3B 54 0D 43 3A |$.G:M304,88;T.C:| 00000510: 5A 24 3D 59 24 28 34 29 0D 54 3A 24 5A 24 0D 47 |Z$=Y$(4).T:$Z$.G| 00000520: 3A 4D 32 34 30 2C 38 30 3B 54 0D 43 3A 5A 24 3D |:M240,80;T.C:Z$=| 00000530: 59 24 28 35 29 0D 54 3A 24 5A 24 0D 47 3A 4D 33 |Y$(5).T:$Z$.G:M3| 00000540: 30 34 2C 38 30 3B 54 0D 43 3A 5A 24 3D 59 24 28 |04,80;T.C:Z$=Y$(| 00000550: 36 29 0D 54 3A 24 5A 24 0D 47 3A 4D 32 34 30 2C |6).T:$Z$.G:M240,| 00000560: 37 32 3B 54 0D 43 3A 5A 24 3D 59 24 28 37 29 0D |72;T.C:Z$=Y$(7).| 00000570: 54 3A 24 5A 24 0D 45 3A 0D 50 52 3A 0D 55 3A 53 |T:$Z$.E:.PR:.U:S| 00000580: 43 52 45 45 4E 0D 2A 4E 45 58 54 20 47 3A 4D 38 |CREEN.*NEXT G:M8| 00000590: 38 2C 31 38 34 3B 54 0D 41 53 3A 23 48 0D 4A 28 |8,184;T.AS:#H.J(| 000005A0: 48 3D 30 21 48 3E 33 29 3A 4E 45 58 54 0D 43 3A |H=0!H>3):NEXT.C:| 000005B0: 41 3D 28 48 2D 31 29 2A 37 0D 43 3A 42 3D 41 2B |A=(H-1)*7.C:B=A+| 000005C0: 31 0D 43 3A 43 3D 41 2B 32 0D 43 3A 44 3D 41 2B |1.C:C=A+2.C:D=A+| 000005D0: 33 0D 43 3A 45 3D 41 2B 34 0D 43 3A 46 3D 41 2B |3.C:E=A+4.C:F=A+| 000005E0: 35 0D 43 3A 47 3D 41 2B 36 0D 55 3A 53 43 52 45 |5.C:G=A+6.U:SCRE| 000005F0: 45 4E 0D 55 3A 46 49 4C 4C 0D 47 3A 4D 31 39 32 |EN.U:FILL.G:M192| 00000600: 2C 31 38 34 3B 54 0D 41 3A 0D 43 28 25 42 3C 3E |,184;T.A:.C(%B<>| 00000610: 43 48 52 28 30 29 29 3A 49 3D 25 42 0D 47 3A 4D |CHR(0)):I=%B.G:M| 00000620: 33 30 34 2C 31 38 34 3B 54 0D 41 3A 0D 43 28 25 |304,184;T.A:.C(%| 00000630: 42 3C 3E 43 48 52 28 30 29 29 3A 4A 3D 25 42 0D |B<>CHR(0)):J=%B.| 00000640: 47 3A 4D 33 32 2C 31 36 30 3B 54 0D 41 3A 0D 43 |G:M32,160;T.A:.C| 00000650: 28 25 42 3C 3E 43 48 52 28 30 29 29 3A 4B 3D 25 |(%B<>CHR(0)):K=%| 00000660: 42 0D 47 3A 4D 33 32 2C 31 35 32 3B 54 0D 41 3A |B.G:M32,152;T.A:| 00000670: 0D 43 28 25 42 3C 3E 43 48 52 28 30 29 29 3A 4C |.C(%B<>CHR(0)):L| 00000680: 3D 25 42 0D 47 3A 4D 33 32 2C 31 34 34 3B 54 0D |=%B.G:M32,144;T.| 00000690: 41 3A 0D 43 28 25 42 3C 3E 43 48 52 28 30 29 29 |A:.C(%B<>CHR(0))| 000006A0: 3A 4D 3D 25 42 0D 47 3A 4D 33 32 2C 31 33 36 3B |:M=%B.G:M32,136;| 000006B0: 54 0D 41 3A 0D 43 28 25 42 3C 3E 43 48 52 28 30 |T.A:.C(%B<>CHR(0| 000006C0: 29 29 3A 4E 3D 25 42 0D 43 3A 57 3D 50 2F 31 36 |)):N=%B.C:W=P/16| 000006D0: 0D 43 3A 58 3D 50 2D 57 2A 31 36 0D 47 3A 4D 32 |.C:X=P-W*16.G:M2| 000006E0: 39 36 2C 31 36 30 3B 54 0D 41 3A 0D 43 28 25 42 |96,160;T.A:.C(%B| 000006F0: 3C 3E 43 48 52 28 30 29 29 3A 57 3D 25 42 0D 47 |<>CHR(0)):W=%B.G| 00000700: 3A 4D 32 39 36 2C 31 35 32 3B 54 0D 41 3A 0D 43 |:M296,152;T.A:.C| 00000710: 28 25 42 3C 3E 43 48 52 28 30 29 29 3A 58 3D 25 |(%B<>CHR(0)):X=%| 00000720: 42 0D 43 3A 50 3D 31 36 2A 57 20 2B 20 58 0D 47 |B.C:P=16*W + X.G| 00000730: 3A 4D 33 32 2C 31 32 30 3B 54 0D 54 3A 23 50 20 |:M32,120;T.T:#P | 00000740: 20 0D 43 3A 57 3D 51 2F 31 36 0D 43 3A 58 3D 51 | .C:W=Q/16.C:X=Q| 00000750: 2D 57 2A 31 36 0D 47 3A 4D 32 39 36 2C 31 33 36 |-W*16.G:M296,136| 00000760: 3B 54 0D 41 3A 0D 43 28 25 42 3C 3E 43 48 52 28 |;T.A:.C(%B<>CHR(| 00000770: 30 29 29 3A 57 3D 25 42 0D 47 3A 4D 32 39 36 2C |0)):W=%B.G:M296,| 00000780: 31 32 38 3B 54 0D 41 3A 0D 43 28 25 42 3C 3E 43 |128;T.A:.C(%B<>C| 00000790: 48 52 28 30 29 29 3A 58 3D 25 42 0D 43 3A 51 3D |HR(0)):X=%B.C:Q=| 000007A0: 31 36 2A 57 20 2B 20 58 0D 47 3A 4D 33 32 2C 31 |16*W + X.G:M32,1| 000007B0: 31 32 3B 54 0D 54 3A 23 51 20 20 0D 47 3A 4D 33 |12;T.T:#Q .G:M3| 000007C0: 32 2C 31 30 34 3B 54 0D 41 3A 0D 43 28 25 42 3C |2,104;T.A:.C(%B<| 000007D0: 3E 43 48 52 28 30 29 29 3A 52 3D 25 42 0D 47 3A |>CHR(0)):R=%B.G:| 000007E0: 4D 33 32 2C 39 36 3B 54 0D 41 3A 0D 43 28 25 42 |M32,96;T.A:.C(%B| 000007F0: 3C 3E 43 48 52 28 30 29 29 3A 53 3D 25 42 0D 47 |<>CHR(0)):S=%B.G| 00000800: 3A 4D 32 34 30 2C 39 36 3B 54 0D 41 53 3A 0D 43 |:M240,96;T.AS:.C| 00000810: 28 25 42 3C 3E 43 48 52 28 31 33 29 29 3A 59 24 |(%B<>CHR(13)):Y$| 00000820: 28 31 29 3D 25 42 0D 47 3A 4D 33 30 34 2C 39 36 |(1)=%B.G:M304,96| 00000830: 3B 54 0D 41 53 3A 0D 43 28 25 42 3C 3E 43 48 52 |;T.AS:.C(%B<>CHR| 00000840: 28 31 33 29 29 3A 59 24 28 32 29 3D 25 42 0D 47 |(13)):Y$(2)=%B.G| 00000850: 3A 4D 32 34 30 2C 38 38 3B 54 0D 41 53 3A 0D 43 |:M240,88;T.AS:.C| 00000860: 28 25 42 3C 3E 43 48 52 28 31 33 29 29 3A 59 24 |(%B<>CHR(13)):Y$| 00000870: 28 33 29 3D 25 42 0D 47 3A 4D 33 30 34 2C 38 38 |(3)=%B.G:M304,88| 00000880: 3B 54 0D 41 53 3A 0D 43 28 25 42 3C 3E 43 48 52 |;T.AS:.C(%B<>CHR| 00000890: 28 31 33 29 29 3A 59 24 28 34 29 3D 25 42 0D 47 |(13)):Y$(4)=%B.G| 000008A0: 3A 4D 32 34 30 2C 38 30 3B 54 0D 41 53 3A 0D 43 |:M240,80;T.AS:.C| 000008B0: 28 25 42 3C 3E 43 48 52 28 31 33 29 29 3A 59 24 |(%B<>CHR(13)):Y$| 000008C0: 28 35 29 3D 25 42 0D 47 3A 4D 33 30 34 2C 38 30 |(5)=%B.G:M304,80| 000008D0: 3B 54 0D 41 53 3A 0D 43 28 25 42 3C 3E 43 48 52 |;T.AS:.C(%B<>CHR| 000008E0: 28 31 33 29 29 3A 59 24 28 36 29 3D 25 42 0D 47 |(13)):Y$(6)=%B.G| 000008F0: 3A 4D 32 34 30 2C 37 32 3B 54 0D 41 53 3A 0D 43 |:M240,72;T.AS:.C| 00000900: 28 25 42 3C 3E 43 48 52 28 31 33 29 29 3A 59 24 |(%B<>CHR(13)):Y$| 00000910: 28 37 29 3D 25 42 0D 43 3A 54 3D 31 36 2A 4A 2B |(7)=%B.C:T=16*J+| 00000920: 59 24 28 31 29 0D 47 3A 4D 33 32 2C 38 38 3B 54 |Y$(1).G:M32,88;T| 00000930: 0D 54 3A 23 54 20 20 0D 43 3A 55 3D 31 32 38 2A |.T:#T .C:U=128*| 00000940: 59 28 32 29 2B 36 34 2A 59 28 33 29 2B 33 32 2A |Y(2)+64*Y(3)+32*| 00000950: 59 28 34 29 2B 31 36 2A 59 28 35 29 2B 49 0D 47 |Y(4)+16*Y(5)+I.G| 00000960: 3A 4D 33 32 2C 38 30 3B 54 0D 54 3A 23 55 20 20 |:M32,80;T.T:#U | 00000970: 0D 47 3A 4D 31 38 34 2C 35 36 3B 54 0D 41 3A 0D |.G:M184,56;T.A:.| 00000980: 43 28 25 42 3C 3E 43 48 52 28 30 29 29 3A 56 3D |C(%B<>CHR(0)):V=| 00000990: 25 42 0D 43 3A 56 3D 28 56 2F 32 29 2A 32 0D 43 |%B.C:V=(V/2)*2.C| 000009A0: 3A 4F 3D 56 2B 32 2A 59 24 28 36 29 2B 34 2A 59 |:O=V+2*Y$(6)+4*Y| 000009B0: 24 28 37 29 0D 47 3A 4D 33 32 2C 31 32 38 3B 54 |$(7).G:M32,128;T| 000009C0: 0D 54 3A 23 4F 20 20 0D 2A 50 4C 41 59 0D 43 3A |.T:#O .*PLAY.C:| 000009D0: 59 24 28 48 2A 32 31 2D 31 33 2C 33 29 3D 4B 0D |Y$(H*21-13,3)=K.| 000009E0: 43 3A 59 24 28 48 2A 32 31 2D 31 30 2C 33 29 3D |C:Y$(H*21-10,3)=| 000009F0: 4C 0D 43 3A 59 24 28 48 2A 32 31 2D 37 2C 33 29 |L.C:Y$(H*21-7,3)| 00000A00: 3D 4D 0D 43 3A 59 24 28 48 2A 32 31 2D 34 2C 33 |=M.C:Y$(H*21-4,3| 00000A10: 29 3D 4E 0D 43 3A 59 24 28 48 2A 32 31 2D 31 2C |)=N.C:Y$(H*21-1,| 00000A20: 33 29 3D 4F 0D 43 3A 59 24 28 48 2A 32 31 2B 32 |3)=O.C:Y$(H*21+2| 00000A30: 2C 33 29 3D 50 0D 43 3A 59 24 28 48 2A 32 31 2B |,3)=P.C:Y$(H*21+| 00000A40: 35 2C 33 29 3D 51 0D 54 53 3A 4E 6F 77 20 77 65 |5,3)=Q.TS:Now we| 00000A50: 27 6C 6C 20 73 65 74 20 74 68 6F 73 65 2E 0D 56 |'ll set those..V| 00000A60: 3A 41 2C 4B 3B 42 2C 4C 3B 43 2C 4D 3B 44 2C 4E |:A,K;B,L;C,M;D,N| 00000A70: 3B 46 2C 50 3B 47 2C 51 3B 32 31 2C 52 3B 32 32 |;F,P;G,Q;21,R;22| 00000A80: 2C 53 0D 56 3A 32 33 2C 54 3B 32 34 2C 55 0D 43 |,S.V:23,T;24,U.C| 00000A90: 3A 57 3D 59 24 28 32 30 2C 33 29 0D 43 3A 58 3D |:W=Y$(20,3).C:X=| 00000AA0: 59 24 28 34 31 2C 33 29 0D 43 3A 4F 3D 59 24 28 |Y$(41,3).C:O=Y$(| 00000AB0: 36 32 2C 33 29 0D 54 3A 0D 3A 56 6F 69 63 65 73 |62,3).T:.:Voices| 00000AC0: 20 74 6F 20 70 6C 61 79 20 28 59 20 6F 72 20 4E | to play (Y or N| 00000AD0: 29 0D 54 48 3A 20 4E 75 6D 62 65 72 20 31 3F 0D |).TH: Number 1?.| 00000AE0: 41 53 3A 0D 4D 3A 59 21 79 0D 43 59 3A 57 3D 57 |AS:.M:Y!y.CY:W=W| 00000AF0: 2B 31 0D 54 48 3A 20 4E 75 6D 62 65 72 20 32 3F |+1.TH: Number 2?| 00000B00: 0D 41 53 3A 0D 4D 3A 59 21 79 0D 43 59 3A 58 3D |.AS:.M:Y!y.CY:X=| 00000B10: 58 2B 31 0D 54 48 3A 20 4E 75 6D 62 65 72 20 33 |X+1.TH: Number 3| 00000B20: 3F 0D 41 53 3A 0D 4D 3A 59 21 79 0D 43 59 3A 4F |?.AS:.M:Y!y.CY:O| 00000B30: 3D 4F 2B 31 0D 56 3A 34 2C 57 3B 31 31 2C 58 3B |=O+1.V:4,W;11,X;| 00000B40: 31 38 2C 4F 0D 43 3A 57 3D 30 0D 57 3A 33 30 0D |18,O.C:W=0.W:30.| 00000B50: 56 3A 34 2C 30 3B 31 31 2C 30 3B 31 38 2C 30 0D |V:4,0;11,0;18,0.| 00000B60: 43 3A 4F 3D 59 24 28 48 2A 32 31 2D 31 2C 33 29 |C:O=Y$(H*21-1,3)| 00000B70: 0D 4A 3A 4E 45 58 54 0D 2A 53 59 53 58 0D 43 3A |.J:NEXT.*SYSX.C:| 00000B80: 48 3D 31 0D 45 3A 50 4C 41 59 0D 0D 0D 0D 0D FF |H=1.E:PLAY......|
.PPR:E.D:Y$(72).D:Z$(1).C:Y$="0000000000
00000000000000".C:Y$=Y$!!Y$!!Y$.J:@P.*SC
REEN G:S0.TSH:VOICE(1-3) VOL(0-15)
RES.:(0-15).T:.:.T:REGISTER.: #A <
- LOW FREQ ATTACK(0-15).: #B <-
HIGH " DECAY (0-15).: #C <- LO
W PULSE.: #D <- HIGH " SUSTAIN(
0-15).: #E RELEASE(0-
15).: #F.: #G.: 21 <- CUT FREQ
SWITCHES.: 22 <- HIGH " FILTER
CUT3.: 23 HIGH
BAND.: 24 LOW SY
NC.: RING.:.:
WAVEFORM .: NOIS
E 128.: PULSE 64 SAWTOOTH 32 TRIANGL
E 16.G:S5.E:.*FILL.C:K=Y$(H*21-13,3).C:L
=Y$(H*21-10,3).C:M=Y$(H*21-7,3).C:N=Y$(H
*21-4,3).C:O=Y$(H*21-1,3).C:P=Y$(H*21+2,
3).C:Q=Y$(H*21+5,3).G:M88,184;T.T:#H .G
:M192,184;T.T:#I .G:M304,184;T.TH:#J .
G:M32,160;T.T:#K .G:M32,152;T.T:#L .G:
M32,144;T.T:#M .G:M32,136;T.T:#N .G:M3
2,128;T.T:#O .G:M32,120;T.T:#P .G:M32,
112;T.T:#Q .G:M32,104;T.T:#R .G:M32,96
;T.T:#S .G:M32,88;T.T:#T .G:M32,80;T.T
:#U .C:V=(0/16)*16.C:Y$(7)=(O-V)/4.C:Y$
(6)=(O-V-4*Y$(7))/2.G:M184,56;T.T:#V.C:W
=P/16.C:X=P-W*16.G:M296,160;T.T:#W.G:M29
6,152;T.T:#X .C:W=Q/16.C:X=Q-W*16.G:M29
6,136;T.T:#W .G:M296,128;T.T:#X .G:M24
0,96;T.C:Z$=Y$(1).T:$Z$.G:M304,96;T.C:Z$
=Y$(2).T:$Z$.G:M240,88;T.C:Z$=Y$(3).T:$Z
$.G:M304,88;T.C:Z$=Y$(4).T:$Z$.G:M240,80
;T.C:Z$=Y$(5).T:$Z$.G:M304,80;T.C:Z$=Y$(
6).T:$Z$.G:M240,72;T.C:Z$=Y$(7).T:$Z$.E:
.PR:.U:SCREEN.*NEXT G:M88,184;T.AS:#H.J(
H=0!H>3):NEXT.C:A=(H-1)*7.C:B=A+1.C:C=A+
2.C:D=A+3.C:E=A+4.C:F=A+5.C:G=A+6.U:SCRE
EN.U:FILL.G:M192,184;T.A:.C(%B<>CHR(0)):
I=%B.G:M304,184;T.A:.C(%B<>CHR(0)):J=%B.
G:M32,160;T.A:.C(%B<>CHR(0)):K=%B.G:M32,
152;T.A:.C(%B<>CHR(0)):L=%B.G:M32,144;T.
A:.C(%B<>CHR(0)):M=%B.G:M32,136;T.A:.C(%
B<>CHR(0)):N=%B.C:W=P/16.C:X=P-W*16.G:M2
96,160;T.A:.C(%B<>CHR(0)):W=%B.G:M296,15
2;T.A:.C(%B<>CHR(0)):X=%B.C:P=16*W + X.G
:M32,120;T.T:#P .C:W=Q/16.C:X=Q-W*16.G:
M296,136;T.A:.C(%B<>CHR(0)):W=%B.G:M296,
128;T.A:.C(%B<>CHR(0)):X=%B.C:Q=16*W + X
.G:M32,112;T.T:#Q .G:M32,104;T.A:.C(%B<
>CHR(0)):R=%B.G:M32,96;T.A:.C(%B<>CHR(0)
):S=%B.G:M240,96;T.AS:.C(%B<>CHR(13)):Y$
(1)=%B.G:M304,96;T.AS:.C(%B<>CHR(13)):Y$
(2)=%B.G:M240,88;T.AS:.C(%B<>CHR(13)):Y$
(3)=%B.G:M304,88;T.AS:.C(%B<>CHR(13)):Y$
(4)=%B.G:M240,80;T.AS:.C(%B<>CHR(13)):Y$
(5)=%B.G:M304,80;T.AS:.C(%B<>CHR(13)):Y$
(6)=%B.G:M240,72;T.AS:.C(%B<>CHR(13)):Y$
(7)=%B.C:T=16*J+Y$(1).G:M32,88;T.T:#T .
C:U=128*Y(2)+64*Y(3)+32*Y(4)+16*Y(5)+I.G
:M32,80;T.T:#U .G:M184,56;T.A:.C(%B<>CH
R(0)):V=%B.C:V=(V/2)*2.C:O=V+2*Y$(6)+4*Y
$(7).G:M32,128;T.T:#O .*PLAY.C:Y$(H*21-
13,3)=K.C:Y$(H*21-10,3)=L.C:Y$(H*21-7,3)
=M.C:Y$(H*21-4,3)=N.C:Y$(H*21-1,3)=O.C:Y
$(H*21+2,3)=P.C:Y$(H*21+5,3)=Q.TS:NOW WE
'LL SET THOSE..V:A,K;B,L;C,M;D,N;F,P;G,Q
;21,R;22,S.V:23,T;24,U.C:W=Y$(20,3).C:X=
Y$(41,3).C:O=Y$(62,3).T:.:VOICES TO PLAY
(Y OR N).TH: NUMBER 1?.AS:.M:Y!Y.CY:W=W
+1.TH: NUMBER 2?.AS:.M:Y!Y.CY:X=X+1.TH:
NUMBER 3?.AS:.M:Y!Y.CY:O=O+1.V:4,W;11,X;
18,O.C:W=0.W:30.V:4,0;11,0;18,0.C:O=Y$(H
*21-1,3).J:NEXT.*SYSX.C:H=1.E:PLAY......
> CLICK IMAGE PREVIEW FOR FULL MODAL