Multiple names: FILTER DEMO, DEMO
FILE INFORMATION
FILENAME(S):
• FILTER DEMO<br>• DEMO
FILE TYPE(S): PRG
FILE SIZE: 7K
FIRST SEEN: 2025-11-30 17:31:21
APPEARS ON: 4 disk(s)
FILE HASH
eef66ce5526b6abc7ba0137d4699dacfc3c5c4ed8ba179213ed0252f5098e522
FOUND ON DISKS (4 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| COMM DISK USER 8 | FILTER DEMO | PRG | UK CD | 14 | 0 | DOWNLOAD FILE |
| TEST | DEMO | PRG | DuncanTwain | 15 | 2 | DOWNLOAD FILE |
| COMM DISK USER 8 | FILTER DEMO | PRG | DuncanTwain | 14 | 0 | DOWNLOAD FILE |
| COMM DISK USER 8 | FILTER DEMO | PRG | DuncanTwain | 14 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 26 08 64 00 8F 20 2A 20 20 20 46 49 4C 54 |..&.d.. * FILT|
00000010: 45 52 20 44 45 4D 4F 20 50 52 4F 47 52 41 4D 20 |ER DEMO PROGRAM |
00000020: 20 20 20 20 20 2A 00 4B 08 6E 00 8F 20 2A 20 46 | *.K.n.. * F|
00000030: 4F 52 20 55 53 45 20 57 49 54 48 20 53 49 44 20 |OR USE WITH SID |
00000040: 53 45 51 55 45 4E 43 45 52 20 2A 00 70 08 78 00 |SEQUENCER *.p.x.|
00000050: 8F 20 2A 20 20 20 20 42 59 20 56 2E 48 2E 42 45 |. * BY V.H.BE|
00000060: 52 52 59 20 31 39 38 39 20 20 20 20 20 20 20 2A |RRY 1989 *|
00000070: 00 8D 08 C8 00 8D 20 35 30 30 31 30 3A 8F 20 49 |...... 50010:. I|
00000080: 4E 49 54 49 41 4C 49 53 41 54 49 4F 4E 00 AA 08 |NITIALISATION...|
00000090: D2 00 8D 20 33 30 30 31 30 3A 8F 20 45 4E 54 45 |... 30010:. ENTE|
000000A0: 52 20 46 49 4C 45 4E 41 4D 45 00 C3 08 DC 00 8D |R FILENAME......|
000000B0: 20 34 30 30 31 30 3A 8F 20 4C 4F 41 44 20 4D 55 | 40010:. LOAD MU|
000000C0: 53 49 43 00 DC 08 E6 00 8D 20 34 32 30 31 30 3A |SIC...... 42010:|
000000D0: 8F 20 4C 4F 41 44 20 53 4F 55 4E 44 00 F6 08 F0 |. LOAD SOUND....|
000000E0: 00 8D 20 35 30 31 30 3A 8F 20 50 52 49 4E 54 20 |.. 5010:. PRINT |
000000F0: 53 43 52 45 45 4E 00 0F 09 FA 00 8D 20 32 30 31 |SCREEN...... 201|
00000100: 30 3A 8F 20 53 54 41 52 54 20 4D 55 53 49 43 00 |0:. START MUSIC.|
00000110: 2A 09 E8 03 8F 20 53 57 45 45 50 20 46 49 4C 54 |*.... SWEEP FILT|
00000120: 45 52 20 52 4F 55 54 49 4E 45 00 4A 09 F2 03 41 |ER ROUTINE.J...A|
00000130: B2 44 31 3A 44 31 B2 44 32 3A 44 32 B2 41 3A 53 |.D1:D1.D2:D2.A:S|
00000140: 57 B2 AB 53 57 3A 49 B2 44 31 00 78 09 FC 03 A1 |W..SW:I.D1.x....|
00000150: 20 4B 24 3A 8B 20 4B 24 B2 C7 28 31 33 36 29 20 | K$:. K$..(136) |
00000160: A7 20 31 35 31 30 3A 8F 20 46 37 20 45 58 49 54 |. 1510:. F7 EXIT|
00000170: 20 50 52 4F 47 52 41 4D 00 A3 09 FE 03 8B 20 4B | PROGRAM...... K|
00000180: 24 B2 C7 28 31 33 35 29 20 A7 20 8D 20 32 30 31 |$..(135) . . 201|
00000190: 30 3A 8F 20 46 35 20 4D 55 53 49 43 20 4F 4E 2F |0:. F5 MUSIC ON/|
000001A0: 4F 46 46 00 C6 09 00 04 8B 20 4B 24 B2 C7 28 31 |OFF...... K$..(1|
000001B0: 33 34 29 20 A7 20 8D 20 36 30 31 30 3A 8F 20 46 |34) . . 6010:. F|
000001C0: 33 20 48 45 4C 50 00 FC 09 02 04 8B 20 4B 24 B2 |3 HELP...... K$.|
000001D0: C7 28 31 33 33 29 20 A7 20 8D 20 31 38 31 30 3A |.(133) . . 1810:|
000001E0: 8F 20 46 31 20 43 48 41 4E 47 45 20 53 57 45 45 |. F1 CHANGE SWEE|
000001F0: 50 20 50 41 52 41 4D 45 54 45 52 53 00 3C 0A 04 |P PARAMETERS.<..|
00000200: 04 8B 20 4B 24 B2 22 31 22 20 A7 20 46 47 B2 46 |.. K$."1" . FG.F|
00000210: 31 3A 8D 20 31 36 31 30 3A 46 31 B2 46 47 3A 8D |1:. 1610:F1.FG:.|
00000220: 20 31 37 31 30 3A 8F 20 43 48 41 4E 20 31 20 46 | 1710:. CHAN 1 F|
00000230: 49 4C 54 45 52 20 4F 4E 2F 4F 46 46 00 7C 0A 06 |ILTER ON/OFF.|..|
00000240: 04 8B 20 4B 24 B2 22 32 22 20 A7 20 46 47 B2 46 |.. K$."2" . FG.F|
00000250: 32 3A 8D 20 31 36 31 30 3A 46 32 B2 46 47 3A 8D |2:. 1610:F2.FG:.|
00000260: 20 31 37 31 30 3A 8F 20 43 48 41 4E 20 32 20 46 | 1710:. CHAN 2 F|
00000270: 49 4C 54 45 52 20 4F 4E 2F 4F 46 46 00 BC 0A 08 |ILTER ON/OFF....|
00000280: 04 8B 20 4B 24 B2 22 33 22 20 A7 20 46 47 B2 46 |.. K$."3" . FG.F|
00000290: 33 3A 8D 20 31 36 31 30 3A 46 33 B2 46 47 3A 8D |3:. 1610:F3.FG:.|
000002A0: 20 31 37 31 30 3A 8F 20 43 48 41 4E 20 33 20 46 | 1710:. CHAN 3 F|
000002B0: 49 4C 54 45 52 20 4F 4E 2F 4F 46 46 00 F8 0A 0A |ILTER ON/OFF....|
000002C0: 04 8B 20 4B 24 B2 22 48 22 20 A7 20 46 47 B2 48 |.. K$."H" . FG.H|
000002D0: 50 3A 8D 20 31 36 31 30 3A 48 50 B2 46 47 3A 8D |P:. 1610:HP.FG:.|
000002E0: 20 31 37 31 30 3A 8F 20 48 49 47 48 20 50 41 53 | 1710:. HIGH PAS|
000002F0: 53 20 4F 4E 2F 4F 46 46 00 33 0B 0C 04 8B 20 4B |S ON/OFF.3.... K|
00000300: 24 B2 22 4C 22 20 A7 20 46 47 B2 4C 50 3A 8D 20 |$."L" . FG.LP:. |
00000310: 31 36 31 30 3A 4C 50 B2 46 47 3A 8D 20 31 37 31 |1610:LP.FG:. 171|
00000320: 30 3A 8F 20 4C 4F 57 20 50 41 53 53 20 4F 4E 2F |0:. LOW PASS ON/|
00000330: 4F 46 46 00 6F 0B 0E 04 8B 20 4B 24 B2 22 42 22 |OFF.o.... K$."B"|
00000340: 20 A7 20 46 47 B2 42 50 3A 8D 20 31 36 31 30 3A | . FG.BP:. 1610:|
00000350: 42 50 B2 46 47 3A 8D 20 31 37 31 30 3A 8F 20 42 |BP.FG:. 1710:. B|
00000360: 41 4E 44 20 50 41 53 53 20 4F 4E 2F 4F 46 46 00 |AND PASS ON/OFF.|
00000370: B2 0B 10 04 8B 20 4B 24 B2 22 56 22 20 A7 20 46 |..... K$."V" . F|
00000380: 47 B2 56 4F 4C 55 4D 45 3A 8D 20 31 36 36 30 3A |G.VOLUME:. 1660:|
00000390: 56 4F 4C 55 4D 45 B2 46 47 3A 8D 20 31 37 31 30 |VOLUME.FG:. 1710|
000003A0: 3A 8F 20 49 4E 43 52 45 41 53 45 20 56 4F 4C 55 |:. INCREASE VOLU|
000003B0: 4D 45 00 F5 0B 12 04 8B 20 4B 24 B2 22 D6 22 20 |ME...... K$."." |
000003C0: A7 20 46 47 B2 56 4F 4C 55 4D 45 3A 8D 20 31 36 |. FG.VOLUME:. 16|
000003D0: 38 30 3A 56 4F 4C 55 4D 45 B2 46 47 3A 8D 20 31 |80:VOLUME.FG:. 1|
000003E0: 37 31 30 3A 8F 20 44 45 43 52 45 41 53 45 20 56 |710:. DECREASE V|
000003F0: 4F 4C 55 4D 45 00 35 0C 14 04 8B 20 4B 24 B2 22 |OLUME.5.... K$."|
00000400: 52 22 20 A7 20 46 47 B2 52 45 53 3A 8D 20 31 36 |R" . FG.RES:. 16|
00000410: 36 30 3A 52 45 53 B2 46 47 3A 8D 20 31 37 31 30 |60:RES.FG:. 1710|
00000420: 3A 8F 20 49 4E 43 52 45 41 53 45 20 52 45 53 4F |:. INCREASE RESO|
00000430: 4E 41 4E 43 45 00 75 0C 16 04 8B 20 4B 24 B2 22 |NANCE.u.... K$."|
00000440: D2 22 20 A7 20 46 47 B2 52 45 53 3A 8D 20 31 36 |." . FG.RES:. 16|
00000450: 38 30 3A 52 45 53 B2 46 47 3A 8D 20 31 37 31 30 |80:RES.FG:. 1710|
00000460: 3A 8F 20 44 45 43 52 45 41 53 45 20 52 45 53 4F |:. DECREASE RESO|
00000470: 4E 41 4E 43 45 00 9B 0C 1A 04 49 B2 49 AA 53 57 |NANCE.....I.I.SW|
00000480: 3A 8B 20 28 B4 28 53 57 29 B2 31 29 AF 28 49 B1 |:. (.(SW).1).(I.|
00000490: B2 44 32 29 20 A7 20 31 30 31 30 00 BB 0C 24 04 |.D2) . 1010...$.|
000004A0: 8B 20 28 B4 28 53 57 29 B2 AB 31 29 AF 28 49 B3 |. (.(SW)..1).(I.|
000004B0: B2 44 32 29 20 A7 20 31 30 31 30 00 EC 0C 38 04 |.D2) . 1010...8.|
000004C0: 97 20 53 49 44 AA 32 32 2C 49 3A 99 22 13 11 11 |. SID.22,I:."...|
000004D0: 11 11 11 11 11 11 11 11 11 22 3B A3 32 39 29 3B |.........";.29);|
000004E0: 22 20 20 20 20 9D 9D 9D 9D 22 3B 49 00 F7 0C 42 |" ....";I...B|
000004F0: 04 89 20 31 30 32 30 00 0A 0D DC 05 8F 20 45 58 |.. 1020...... EX|
00000500: 49 54 20 50 52 4F 47 52 41 4D 00 1F 0D E6 05 99 |IT PROGRAM......|
00000510: 22 93 1E 46 49 4C 54 45 52 20 44 45 4D 4F 22 00 |"..FILTER DEMO".|
00000520: 30 0D F0 05 99 22 56 2E 48 2E 42 45 52 52 59 22 |0...."V.H.BERRY"|
00000530: 00 3D 0D FA 05 99 22 31 39 38 39 2E 22 00 43 0D |.=...."1989.".C.|
00000540: 04 06 80 00 58 0D 40 06 8F 20 4F 4E 2F 4F 46 46 |....X.@.. ON/OFF|
00000550: 20 52 4F 55 54 49 4E 45 00 6C 0D 4A 06 8B 20 46 | ROUTINE.l.J.. F|
00000560: 47 B2 30 20 A7 20 46 47 B2 31 3A 8E 00 77 0D 54 |G.0 . FG.1:..w.T|
00000570: 06 46 47 B2 30 3A 8E 00 9B 0D 72 06 8F 20 49 4E |.FG.0:....r.. IN|
00000580: 43 52 45 4D 45 4E 54 2F 44 45 43 52 45 4D 45 4E |CREMENT/DECREMEN|
00000590: 54 20 50 41 52 41 4D 45 54 45 52 00 B7 0D 7C 06 |T PARAMETER...|.|
000005A0: 46 47 B2 46 47 AA 31 3A 8B 20 46 47 B1 31 35 20 |FG.FG.1:. FG.15 |
000005B0: A7 20 46 47 B2 31 35 00 BD 0D 86 06 8E 00 D7 0D |. FG.15.........|
000005C0: 90 06 46 47 B2 46 47 AB 31 3A 8B 20 46 47 B3 30 |..FG.FG.1:. FG.0|
000005D0: 20 A7 20 46 47 B2 30 00 DD 0D 9A 06 8E 00 F6 0D | . FG.0.........|
000005E0: A4 06 8F 20 4E 45 57 20 46 49 4C 54 45 52 20 53 |... NEW FILTER S|
000005F0: 45 54 54 49 4E 47 00 19 0E AE 06 8D 20 35 30 32 |ETTING...... 502|
00000600: 38 30 3A 8F 20 43 41 4C 43 55 4C 41 54 45 20 4E |80:. CALCULATE N|
00000610: 45 57 20 56 41 4C 55 45 53 00 3A 0E B8 06 8D 20 |EW VALUES.:.... |
00000620: 32 30 33 30 3A 8F 20 41 4C 54 45 52 20 53 49 44 |2030:. ALTER SID|
00000630: 20 52 45 47 49 53 54 45 52 53 00 54 0E C2 06 8D | REGISTERS.T....|
00000640: 20 35 32 32 30 3A 8F 20 50 52 49 4E 54 20 56 41 | 5220:. PRINT VA|
00000650: 4C 55 45 53 00 5A 0E CC 06 8E 00 7E 0E 08 07 8F |LUES.Z.....~....|
00000660: 20 41 4C 54 45 52 20 53 57 45 45 50 20 46 49 4C | ALTER SWEEP FIL|
00000670: 54 45 52 20 50 41 52 41 4D 45 54 45 52 53 00 AC |TER PARAMETERS..|
00000680: 0E 12 07 99 22 93 1E 1D 1D 12 20 43 48 41 4E 47 |...."..... CHANG|
00000690: 45 20 53 57 45 45 50 20 46 49 4C 54 45 52 20 50 |E SWEEP FILTER P|
000006A0: 41 52 41 4D 45 54 45 52 53 20 92 22 00 C7 0E 13 |ARAMETERS ."....|
000006B0: 07 99 22 1D 1D B0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |..".............|
000006C0: C0 C0 C0 C0 C0 AE 22 00 E0 0E 14 07 99 22 20 20 |......"......" |
000006D0: 20 20 20 20 20 53 57 45 45 50 20 52 41 54 45 22 | SWEEP RATE"|
000006E0: 00 F8 0E 16 07 99 22 20 20 20 20 20 20 20 4C 49 |......" LI|
000006F0: 4D 49 54 20 27 58 27 22 00 10 0F 18 07 99 22 20 |MIT 'X'"......" |
00000700: 20 20 20 20 20 20 4C 49 4D 49 54 20 27 59 27 22 | LIMIT 'Y'"|
00000710: 00 27 0F 1A 07 99 22 20 20 20 20 20 20 20 43 4F |.'...." CO|
00000720: 4E 54 49 4E 55 45 22 00 42 0F 1B 07 99 22 1D 1D |NTINUE".B...."..|
00000730: AD C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000740: BD 22 00 61 0F 1C 07 8D 20 35 31 31 30 3A 8F 20 |.".a.... 5110:. |
00000750: 53 43 52 45 45 4E 20 50 41 52 41 4D 45 54 45 52 |SCREEN PARAMETER|
00000760: 53 00 8E 0F 26 07 99 22 13 11 11 22 3B 3A 4C 4C |S...&.."...";:LL|
00000770: B2 33 3A 54 31 B2 34 3A 8D 20 33 39 30 31 30 3A |.3:T1.4:. 39010:|
00000780: 8F 20 4D 45 4E 55 20 52 4F 55 54 49 4E 45 00 A8 |. MENU ROUTINE..|
00000790: 0F 30 07 8B 20 41 B2 33 20 A7 20 49 B2 44 31 3A |.0.. A.3 . I.D1:|
000007A0: 8D 20 35 30 32 30 3A 8E 00 D6 0F 35 07 46 47 B2 |. 5020:....5.FG.|
000007B0: 41 3A 99 22 13 11 11 22 3B A3 32 30 29 3B 22 12 |A:."...";.20);".|
000007C0: 45 4E 54 45 52 20 56 41 4C 55 45 20 28 30 2D 32 |ENTER VALUE (0-2|
000007D0: 35 35 29 92 11 22 00 04 10 3A 07 4C B2 33 3A 54 |55).."...:.L.3:T|
000007E0: 42 B2 32 35 3A 52 53 B2 30 3A 8D 20 33 32 30 34 |B.25:RS.0:. 3204|
000007F0: 30 3A 8F 20 49 4E 50 55 54 20 53 55 42 52 4F 55 |0:. INPUT SUBROU|
00000800: 54 49 4E 45 00 17 10 3F 07 8B 20 59 24 B2 22 22 |TINE...?.. Y$.""|
00000810: 20 A7 20 31 38 31 30 00 48 10 40 07 8B 20 C5 28 | . 1810.H.@.. .(|
00000820: 59 24 29 B3 30 20 B0 20 C5 28 59 24 29 B1 32 35 |Y$).0 . .(Y$).25|
00000830: 35 20 A7 20 99 20 A3 32 35 29 3B 22 13 11 11 11 |5 . . .25);"....|
00000840: 22 3A 89 20 31 38 35 30 00 6C 10 44 07 8B 20 46 |":. 1850.l.D.. F|
00000850: 47 B2 30 20 A7 20 53 57 B2 C5 28 59 24 29 3A 8F |G.0 . SW..(Y$):.|
00000860: 20 43 48 41 4E 47 45 20 52 41 54 45 00 97 10 46 | CHANGE RATE...F|
00000870: 07 8B 20 46 47 B2 31 20 A7 20 44 31 B2 C5 28 59 |.. FG.1 . D1..(Y|
00000880: 24 29 3A 8F 20 43 48 41 4E 47 45 20 4C 4F 57 45 |$):. CHANGE LOWE|
00000890: 52 20 4C 49 4D 49 54 00 C2 10 48 07 8B 20 46 47 |R LIMIT...H.. FG|
000008A0: B2 32 20 A7 20 44 32 B2 C5 28 59 24 29 3A 8F 20 |.2 . D2..(Y$):. |
000008B0: 43 48 41 4E 47 45 20 55 50 50 45 52 20 4C 49 4D |CHANGE UPPER LIM|
000008C0: 49 54 00 E1 10 4A 07 8B 20 44 31 B1 44 32 20 AF |IT...J.. D1.D2 .|
000008D0: 20 B4 28 53 57 29 B2 31 20 A7 20 53 57 B2 AB 53 | .(SW).1 . SW..S|
000008E0: 57 00 01 11 4C 07 8B 20 44 31 B3 44 32 20 AF 20 |W...L.. D1.D2 . |
000008F0: B4 28 53 57 29 B2 AB 31 20 A7 20 53 57 B2 AB 53 |.(SW)..1 . SW..S|
00000900: 57 00 0C 11 4E 07 89 20 31 38 31 30 00 1F 11 D0 |W...N.. 1810....|
00000910: 07 8F 20 4D 55 53 49 43 20 4F 4E 2F 4F 46 46 00 |.. MUSIC ON/OFF.|
00000920: 47 11 DA 07 8B 20 4D 46 B2 31 20 A7 20 4D 46 B2 |G.... MF.1 . MF.|
00000930: 30 3A 9E 20 34 39 32 30 39 3A 8E 3A 8F 20 4D 55 |0:. 49209:.:. MU|
00000940: 53 49 43 20 4F 46 46 00 63 11 E4 07 4D 46 B2 31 |SIC OFF.c...MF.1|
00000950: 3A 9E 20 34 39 32 33 35 3A 8F 20 4D 55 53 49 43 |:. 49235:. MUSIC|
00000960: 20 4F 4E 00 7F 11 EE 07 97 20 53 49 44 AA 32 34 | ON...... SID.24|
00000970: 2C 46 4C 3A 97 20 53 49 44 AA 32 33 2C 52 4E 00 |,FL:. SID.23,RN.|
00000980: 85 11 F8 07 8E 00 97 11 88 13 8F 20 4D 41 49 4E |........... MAIN|
00000990: 20 53 43 52 45 45 4E 00 AF 11 92 13 97 20 35 33 | SCREEN...... 53|
000009A0: 32 38 30 2C 30 3A 97 20 35 33 32 38 31 2C 30 00 |280,0:. 53281,0.|
000009B0: B8 11 9C 13 99 22 93 22 00 DC 11 A6 13 99 22 1E |....."."......".|
000009C0: 20 20 20 20 20 20 20 20 2A 2A 2A 20 46 49 4C 54 | *** FILT|
000009D0: 45 52 20 44 45 4D 4F 20 2A 2A 2A 22 00 F4 11 B0 |ER DEMO ***"....|
000009E0: 13 99 22 11 20 20 20 20 05 46 49 4C 45 20 3A 20 |..". .FILE : |
000009F0: 22 3B 4E 24 00 24 12 BA 13 99 22 11 1E 1D 12 20 |";N$.$....".... |
00000A00: 20 20 20 20 46 31 20 20 20 20 20 1D 20 46 33 20 | F1 . F3 |
00000A10: 1D 20 20 20 20 20 46 35 20 20 20 20 20 1D 20 46 |. F5 . F|
00000A20: 37 20 92 22 00 52 12 C4 13 99 22 1D 12 53 57 45 |7 .".R...."..SWE|
00000A30: 45 50 20 46 49 4C 54 45 52 1D 48 45 4C 50 1D 4D |EP FILTER.HELP.M|
00000A40: 55 53 49 43 20 4F 4E 2F 4F 46 46 1D 45 58 49 54 |USIC ON/OFF.EXIT|
00000A50: 92 22 00 6C 12 F6 13 99 22 11 1E B0 60 60 60 60 |.".l...."...````|
00000A60: 60 60 60 60 60 60 60 60 60 60 AE 22 00 99 12 00 |``````````."....|
00000A70: 14 99 22 7D 50 41 53 53 1D 46 49 4C 54 45 52 53 |.."}PASS.FILTERS|
00000A80: 1D 1D 7D 1D 12 20 46 49 4C 54 45 52 20 50 41 52 |..}.. FILTER PAR|
00000A90: 41 4D 45 54 45 52 53 20 22 00 C4 12 0A 14 99 22 |AMETERS "......"|
00000AA0: AB 60 60 60 60 B2 60 60 60 60 B2 60 60 60 60 B3 |.````.````.````.|
00000AB0: 1D B0 60 60 60 60 60 60 60 60 60 60 60 60 60 60 |..``````````````|
00000AC0: 60 60 AE 22 00 F5 12 14 14 99 22 7D 05 48 49 47 |``."......"}.HIG|
00000AD0: 48 1E 7D 05 4C 4F 57 1D 1E 7D 05 42 41 4E 44 1E |H.}.LOW..}.BAND.|
00000AE0: 7D 1D 7D 53 57 45 45 50 1D 43 54 52 4C 1D 1D 1D |}.}SWEEP.CTRL...|
00000AF0: 1D 1D 1D 7D 22 00 20 13 1E 14 99 22 7D 1D 1D 1D |...}". ...."}...|
00000B00: 1D 7D 1D 1D 1D 1D 7D 1D 1D 1D 1D 7D 1D AB 60 60 |.}....}....}..``|
00000B10: 60 60 60 60 60 60 60 60 60 60 60 60 60 60 B3 22 |``````````````."|
00000B20: 00 4D 13 28 14 99 22 AB 60 60 60 60 7B 60 60 60 |.M.(..".````{```|
00000B30: 60 7B 60 60 60 60 B3 1D 7D 05 4C 49 4D 49 54 1D |`{````..}.LIMIT.|
00000B40: 1D 1D 1D 1D 2D 1D 1D 1D 1D 1D 1E 7D 22 00 7E 13 |....-......}".~.|
00000B50: 32 14 99 22 7D 1D 1D 1F 31 1D 1E 7D 1D 1D 9E 32 |2.."}...1..}...2|
00000B60: 1D 1E 7D 1D 1D 1C 33 1D 1E 7D 1D AB 60 60 60 60 |..}...3..}..````|
00000B70: 60 60 60 60 60 60 60 60 60 60 60 60 B3 22 00 AB |````````````."..|
00000B80: 13 3C 14 99 22 7D 1D 1D 1D 1D 7D 1D 1D 1D 1D 7D |.<.."}....}....}|
00000B90: 1D 1D 1D 1D 7D 1D 7D 05 52 41 54 45 1D 1D 1D 1D |....}.}.RATE....|
00000BA0: 1D 1D 1D 1D 1D 1D 1D 1D 1E 7D 22 00 D6 13 46 14 |.........}"...F.|
00000BB0: 99 22 AB 60 60 60 60 B1 60 60 60 60 B1 60 60 60 |.".````.````.```|
00000BC0: 60 B3 1D AD 60 60 60 60 60 60 60 60 60 60 60 60 |`...````````````|
00000BD0: 60 60 60 60 BD 22 00 F0 13 50 14 99 22 7D 05 52 |````."...P.."}.R|
00000BE0: 45 53 4F 4E 41 4E 43 45 1D 1D 1D 1D 1D 1E 7D 22 |ESONANCE......}"|
00000BF0: 00 08 14 5A 14 99 22 AD 60 60 60 60 60 60 60 60 |...Z..".````````|
00000C00: 60 60 60 60 60 60 BD 22 00 24 14 64 14 99 22 13 |``````.".$.d..".|
00000C10: 11 11 11 11 11 11 11 11 11 11 11 11 1D 05 20 20 |.............. |
00000C20: 20 20 22 3B 00 40 14 6E 14 8B 20 48 50 B2 31 20 | ";.@.n.. HP.1 |
00000C30: A7 20 99 22 9D 9D 9D 9D 12 20 4F 4E 20 92 22 3B |. ."..... ON .";|
00000C40: 00 66 14 78 14 99 22 1D 20 20 20 20 22 3B 3A 8B |.f.x..". ";:.|
00000C50: 20 4C 50 B2 31 20 A7 20 99 22 9D 9D 9D 9D 12 20 | LP.1 . ."..... |
00000C60: 4F 4E 20 92 22 3B 00 8C 14 82 14 99 22 1D 20 20 |ON .";......". |
00000C70: 20 20 22 3B 3A 8B 20 42 50 B2 31 20 A7 20 99 22 | ";:. BP.1 . ."|
00000C80: 9D 9D 9D 9D 12 20 4F 4E 20 92 22 3B 00 92 14 8C |..... ON .";....|
00000C90: 14 99 00 BC 14 96 14 99 22 11 11 1D 20 20 20 20 |........"... |
00000CA0: 22 3B 3A 8B 20 46 31 B2 31 20 A7 20 99 22 9D 9D |";:. F1.1 . ."..|
00000CB0: 9D 9D 1F 12 20 4F 4E 20 92 05 22 3B 00 E4 14 A0 |.... ON ..";....|
00000CC0: 14 99 22 1D 20 20 20 20 22 3B 3A 8B 20 46 32 B2 |..". ";:. F2.|
00000CD0: 31 20 A7 20 99 22 9D 9D 9D 9D 9E 12 20 4F 4E 20 |1 . ."...... ON |
00000CE0: 92 05 22 3B 00 0C 15 AA 14 99 22 1D 20 20 20 20 |..";......". |
00000CF0: 22 3B 3A 8B 20 46 33 B2 31 20 A7 20 99 22 9D 9D |";:. F3.1 . ."..|
00000D00: 9D 9D 1C 12 20 4F 4E 20 92 05 22 3B 00 12 15 B4 |.... ON ..";....|
00000D10: 14 99 00 35 15 BE 14 99 22 11 1D 1D 1D 1D 1D 1D |...5....".......|
00000D20: 1D 1D 1D 1D 1D 20 20 20 20 9D 9D 9D 9D 22 3B C4 |..... ....";.|
00000D30: 28 52 45 53 29 00 74 15 C8 14 99 22 13 11 11 11 |(RES).t...."....|
00000D40: 11 11 11 11 11 11 11 11 11 11 22 3B A3 32 34 29 |..........";.24)|
00000D50: 3B 22 20 20 20 20 9D 9D 9D 9D 22 3B C4 28 44 31 |;" ....";.(D1|
00000D60: 29 3B 22 20 2D 20 20 20 20 9D 9D 9D 9D 22 3B C4 |);" - ....";.|
00000D70: 28 44 32 29 00 91 15 D2 14 99 20 A3 32 34 29 3B |(D2)...... .24);|
00000D80: 22 11 20 20 20 20 9D 9D 9D 9D 22 3B C4 28 53 57 |". ....";.(SW|
00000D90: 29 00 97 15 DC 14 8E 00 A9 15 70 17 8F 20 48 45 |).........p.. HE|
00000DA0: 4C 50 20 53 43 52 45 45 4E 00 C7 15 7A 17 97 20 |LP SCREEN...z.. |
00000DB0: 35 33 32 38 30 2C 35 3A 97 20 35 33 32 38 31 2C |53280,5:. 53281,|
00000DC0: 35 3A 99 22 93 22 3B 00 0C 16 7B 17 99 22 12 05 |5:.".";...{.."..|
00000DD0: 20 5B 46 37 5D 20 54 4F 20 43 4F 4E 54 49 4E 55 | [F7] TO CONTINU|
00000DE0: 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |E |
00000DF0: 20 20 20 20 20 20 20 20 11 1D 92 90 46 49 4C 54 | ....FILT|
00000E00: 45 52 1D 43 4F 4E 54 52 4F 4C 53 22 00 24 16 7C |ER.CONTROLS".$.||
00000E10: 17 99 22 1D 60 60 60 60 60 60 60 60 60 60 60 60 |..".````````````|
00000E20: 60 60 60 22 00 46 16 7D 17 99 22 11 1D 12 05 5B |```".F.}.."....[|
00000E30: 48 5D 1D 92 90 48 49 47 48 1D 50 41 53 53 1D 4F |H]...HIGH.PASS.O|
00000E40: 4E 2F 4F 46 46 22 00 67 16 7E 17 99 22 1D 12 05 |N/OFF".g.~.."...|
00000E50: 5B 4C 5D 1D 92 90 4C 4F 57 1D 1D 50 41 53 53 1D |[L]...LOW..PASS.|
00000E60: 4F 4E 2F 4F 46 46 22 00 88 16 7F 17 99 22 1D 12 |ON/OFF"......"..|
00000E70: 05 5B 42 5D 1D 92 90 42 41 4E 44 1D 50 41 53 53 |.[B]...BAND.PASS|
00000E80: 1D 4F 4E 2F 4F 46 46 22 00 B1 16 80 17 99 22 11 |.ON/OFF"......".|
00000E90: 1D 12 05 5B 31 5D 1D 92 90 46 49 4C 54 45 52 1D |...[1]...FILTER.|
00000EA0: 43 48 41 4E 4E 45 4C 1D 31 1D 49 4E 2F 4F 55 54 |CHANNEL.1.IN/OUT|
00000EB0: 22 00 D9 16 81 17 99 22 1D 12 05 5B 32 5D 1D 92 |"......"...[2]..|
00000EC0: 90 46 49 4C 54 45 52 1D 43 48 41 4E 4E 45 4C 1D |.FILTER.CHANNEL.|
00000ED0: 32 1D 49 4E 2F 4F 55 54 22 00 01 17 82 17 99 22 |2.IN/OUT"......"|
00000EE0: 1D 12 05 5B 33 5D 1D 92 90 46 49 4C 54 45 52 1D |...[3]...FILTER.|
00000EF0: 43 48 41 4E 4E 45 4C 1D 33 1D 49 4E 2F 4F 55 54 |CHANNEL.3.IN/OUT|
00000F00: 22 00 2A 17 83 17 99 22 11 1D 1D 1D 1D 1D 49 4E |".*...."......IN|
00000F10: 43 52 45 41 53 45 2F 44 45 43 52 45 41 53 45 1D |CREASE/DECREASE.|
00000F20: 52 45 53 4F 4E 41 4E 43 45 22 00 50 17 84 17 99 |RESONANCE".P....|
00000F30: 22 11 1D 1D 1D 1D 1D 12 05 5B 52 5D 1D 1D 1D 1D |"........[R]....|
00000F40: 1D 1D 5B 53 48 49 46 54 5D 20 26 20 5B 52 5D 22 |..[SHIFT] & [R]"|
00000F50: 00 77 17 85 17 99 22 11 1D 1D 1D 1D 1D 90 49 4E |.w....".......IN|
00000F60: 43 52 45 41 53 45 2F 44 45 43 52 45 41 53 45 1D |CREASE/DECREASE.|
00000F70: 56 4F 4C 55 4D 45 22 00 9D 17 86 17 99 22 11 1D |VOLUME"......"..|
00000F80: 1D 1D 1D 1D 12 05 5B 56 5D 1D 1D 1D 1D 1D 1D 5B |......[V]......[|
00000F90: 53 48 49 46 54 5D 20 26 20 5B 56 5D 22 00 BA 17 |SHIFT] & [V]"...|
00000FA0: E8 17 A1 20 4B 24 3A 8B 20 4B 24 B3 B1 C7 28 31 |... K$:. K$...(1|
00000FB0: 33 36 29 20 A7 20 36 31 32 30 00 D3 17 F2 17 8D |36) . 6120......|
00000FC0: 20 35 30 31 30 3A 8F 20 4D 41 49 4E 20 53 43 52 | 5010:. MAIN SCR|
00000FD0: 45 45 4E 00 D9 17 FC 17 8E 00 F2 17 30 75 8F 20 |EEN.........0u. |
00000FE0: 49 4E 50 55 54 20 4E 45 57 20 46 49 4C 45 4E 41 |INPUT NEW FILENA|
00000FF0: 4D 45 00 0A 18 3A 75 97 20 35 33 32 38 30 2C 35 |ME...:u. 53280,5|
00001000: 3A 97 20 35 33 32 38 31 2C 35 00 3D 18 44 75 99 |:. 53281,5.=.Du.|
00001010: 22 93 05 12 20 45 4E 54 45 52 20 4E 45 57 20 46 |"... ENTER NEW F|
00001020: 49 4C 45 4E 41 4D 45 20 3A 20 50 52 45 53 53 20 |ILENAME : PRESS |
00001030: 5B 52 45 54 55 52 4E 5D 20 20 92 22 3B 00 43 18 |[RETURN] .";.C.|
00001040: 4E 75 99 00 5C 18 58 75 99 22 11 11 1D 1D 1D 1D |Nu..\.Xu."......|
00001050: 1D 46 49 4C 45 20 3A 20 22 3B 4E 24 00 66 18 62 |.FILE : ";N$.f.b|
00001060: 75 99 22 11 11 22 00 94 18 6C 75 4C B2 31 34 3A |u.".."...luL.14:|
00001070: 54 42 B2 35 3A 52 53 B2 31 3A 8D 20 33 32 30 34 |TB.5:RS.1:. 3204|
00001080: 30 3A 8F 20 49 4E 50 55 54 20 53 55 42 52 4F 55 |0:. INPUT SUBROU|
00001090: 54 49 4E 45 00 A6 18 76 75 8B 20 41 B1 30 20 A7 |TINE...vu. A.0 .|
000010A0: 20 4E 24 B2 59 24 00 BE 18 80 75 97 20 35 33 32 | N$.Y$....u. 532|
000010B0: 38 30 2C 30 3A 97 20 35 33 32 38 31 2C 30 00 D9 |80,0:. 53281,0..|
000010C0: 18 85 75 99 22 93 11 11 1D 1D 1D 1D 1D 05 46 49 |..u.".........FI|
000010D0: 4C 45 20 3A 20 22 3B 4E 24 00 DF 18 8A 75 8E 00 |LE : ";N$....u..|
000010E0: 02 19 00 7D 8F 20 49 4E 50 55 54 20 52 45 53 54 |...}. INPUT REST|
000010F0: 52 49 43 54 49 4F 4E 20 53 55 42 52 4F 55 54 49 |RICTION SUBROUTI|
00001100: 4E 45 00 1A 19 0A 7D 8F 20 4C 3D 4C 45 4E 47 54 |NE....}. L=LENGT|
00001110: 48 20 4F 46 20 49 4E 50 55 54 00 39 19 14 7D 8F |H OF INPUT.9..}.|
00001120: 20 54 42 3D 54 41 42 55 4C 41 54 49 4F 4E 20 4F | TB=TABULATION O|
00001130: 46 20 52 4F 55 54 49 4E 45 00 59 19 1E 7D 8F 20 |F ROUTINE.Y..}. |
00001140: 52 53 3D 43 48 41 52 41 43 54 45 52 20 52 45 53 |RS=CHARACTER RES|
00001150: 54 52 49 43 54 49 4F 4E 53 00 6C 19 28 7D 41 B2 |TRICTIONS.l.(}A.|
00001160: 30 3A 59 24 B2 22 22 3A 53 50 B2 31 00 AB 19 32 |0:Y$."":SP.1...2|
00001170: 7D 99 20 A3 54 42 AA 4C AA 31 29 3A 99 22 91 AE |}. .TB.L.1):."..|
00001180: 9D 11 11 BD 91 22 3B 3A 81 20 58 B2 30 20 A4 20 |.....";:. X.0 . |
00001190: 4C AA 31 3A 99 22 9D 9D 20 22 3B 3A 82 3A 99 22 |L.1:.".. ";:.:."|
000011A0: 91 B0 9D 11 11 AD 91 A4 9D 22 3B 00 C4 19 3C 7D |.........";...<}|
000011B0: A1 20 58 24 3A 8B 20 58 24 B2 22 22 20 A7 20 33 |. X$:. X$."" . 3|
000011C0: 32 30 36 30 00 FB 19 46 7D 8B 20 58 24 B2 C7 28 |2060...F}. X$..(|
000011D0: 31 36 30 29 20 B0 20 58 24 B2 22 20 22 20 B0 20 |160) . X$." " . |
000011E0: 58 24 B2 C7 28 32 30 29 20 B0 20 58 24 B2 C7 28 |X$..(20) . X$..(|
000011F0: 31 33 29 20 A7 20 33 32 31 33 30 00 24 1A 50 7D |13) . 32130.$.P}|
00001200: 8B 20 52 53 B2 30 20 A7 20 8B 20 58 24 B2 B1 22 |. RS.0 . . X$.."|
00001210: 30 22 20 AF 20 58 24 B2 B3 22 39 22 20 A7 20 33 |0" . X$.."9" . 3|
00001220: 32 31 33 30 00 4F 1A 5A 7D 8B 20 52 53 B2 31 20 |2130.O.Z}. RS.1 |
00001230: AF 20 58 24 B2 B1 C7 28 33 35 29 20 AF 20 58 24 |. X$...(35) . X$|
00001240: B2 B3 C7 28 39 33 29 20 A7 20 33 32 31 33 30 00 |...(93) . 32130.|
00001250: 5B 1A 64 7D 89 20 33 32 30 36 30 00 71 1A 6E 7D |[.d}. 32060.q.n}|
00001260: 8B 20 41 B2 4C AB 31 20 A7 20 99 22 1D 9D 9D 22 |. A.L.1 . ."..."|
00001270: 3B 00 7D 1A 78 7D 89 20 33 32 30 36 30 00 9A 1A |;.}.x}. 32060...|
00001280: 82 7D 8B 20 58 24 B2 C7 28 32 30 29 20 AF 20 41 |.}. X$..(20) . A|
00001290: B2 30 20 A7 20 33 32 30 36 30 00 D0 1A 8C 7D 8B |.0 . 32060....}.|
000012A0: 20 58 24 B2 C7 28 31 33 29 20 AF 20 C9 28 59 24 | X$..(13) . .(Y$|
000012B0: 2C 31 29 B2 22 20 22 20 A7 20 59 24 B2 C8 28 59 |,1)." " . Y$..(Y|
000012C0: 24 2C C3 28 59 24 29 AB 31 29 3A 41 B2 41 AB 31 |$,.(Y$).1):A.A.1|
000012D0: 00 E5 1A 96 7D 8B 20 58 24 B2 C7 28 31 33 29 20 |....}. X$..(13) |
000012E0: A7 20 99 3A 8E 00 02 1B A0 7D 41 B2 41 AA 31 3A |. .:.....}A.A.1:|
000012F0: 8B 20 58 24 B3 B1 C7 28 33 32 29 20 A7 20 53 50 |. X$...(32) . SP|
00001300: B2 30 00 26 1B AA 7D 8B 20 41 B1 4C 20 AF 20 58 |.0.&..}. A.L . X|
00001310: 24 B3 B1 C7 28 32 30 29 20 A7 20 58 24 B2 22 22 |$...(20) . X$.""|
00001320: 3A 41 B2 41 AB 31 00 3C 1B B4 7D 8B 20 41 B3 31 |:A.A.1.<..}. A.1|
00001330: 20 A7 20 58 24 B2 22 22 3A 41 B2 30 00 7A 1B BE | . X$."":A.0.z..|
00001340: 7D 8B 20 58 24 B2 C7 28 32 30 29 20 A7 20 99 20 |}. X$..(20) . . |
00001350: A3 41 29 22 9D A4 20 9D 9D 22 3B 3A 41 B2 41 AB |.A)".. ..";:A.A.|
00001360: 32 3A 59 24 B2 C8 28 59 24 2C C3 28 59 24 29 AB |2:Y$..(Y$,.(Y$).|
00001370: 31 29 3A 89 20 33 32 31 31 30 00 9E 1B C8 7D 8B |1):. 32110....}.|
00001380: 20 58 24 B2 C7 28 33 32 29 20 AF 20 53 50 B2 31 | X$..(32) . SP.1|
00001390: 20 A7 20 58 24 B2 22 22 3A 41 B2 41 AB 31 00 B7 | . X$."":A.A.1..|
000013A0: 1B D2 7D 8B 20 58 24 B2 C7 28 33 32 29 20 A7 20 |..}. X$..(32) . |
000013B0: 53 50 B2 53 50 AA 31 00 D9 1B DC 7D 59 24 B2 59 |SP.SP.1....}Y$.Y|
000013C0: 24 AA 58 24 3A 99 20 58 24 3B 3A 8B 20 41 B3 4C |$.X$:. X$;:. A.L|
000013D0: 20 A7 20 99 22 A4 9D 22 3B 00 E5 1B E6 7D 89 20 | . ."..";....}. |
000013E0: 33 32 30 36 30 00 FF 1B 58 98 8F 20 4D 45 4E 55 |32060...X.. MENU|
000013F0: 20 53 59 53 54 45 4D 20 52 4F 55 54 49 4E 45 00 | SYSTEM ROUTINE.|
00001400: 13 1C 62 98 41 B2 30 3A 99 20 A3 54 31 29 3B 22 |..b.A.0:. .T1);"|
00001410: 05 3E 22 00 2C 1C 6C 98 A1 20 58 24 3A 8B 20 58 |.>".,.l.. X$:. X|
00001420: 24 B2 22 22 20 A7 20 33 39 30 32 30 00 50 1C 76 |$."" . 39020.P.v|
00001430: 98 8B 20 41 B2 4C 4C 20 AF 20 58 24 B2 C7 28 31 |.. A.LL . X$..(1|
00001440: 37 29 20 A7 20 41 B2 41 AB 31 3A 99 22 91 91 22 |7) . A.A.1:.".."|
00001450: 00 70 1C 80 98 8B 20 41 B2 30 20 AF 20 58 24 B2 |.p.... A.0 . X$.|
00001460: C7 28 31 34 35 29 20 A7 20 41 B2 41 AA 31 3A 99 |.(145) . A.A.1:.|
00001470: 00 96 1C 8A 98 8B 20 58 24 B2 C7 28 31 37 29 20 |...... X$..(17) |
00001480: A7 20 41 B2 41 AA 31 3A 99 20 A3 54 31 29 3B 22 |. A.A.1:. .T1);"|
00001490: 91 20 9D 11 3E 22 00 BD 1C 94 98 8B 20 58 24 B2 |. ..>"...... X$.|
000014A0: C7 28 31 34 35 29 20 A7 20 41 B2 41 AB 31 3A 99 |.(145) . A.A.1:.|
000014B0: 20 A3 54 31 29 3B 22 91 20 9D 91 3E 22 00 D0 1C | .T1);". ..>"...|
000014C0: 9E 98 8B 20 58 24 B2 C7 28 31 33 29 20 A7 20 8E |... X$..(13) . .|
000014D0: 00 DC 1C A8 98 89 20 33 39 30 32 30 00 F2 1C 40 |...... 39020...@|
000014E0: 9C 8F 20 4C 4F 41 44 20 4D 55 53 49 43 20 46 49 |.. LOAD MUSIC FI|
000014F0: 4C 45 00 02 1D 4A 9C 58 24 B2 22 2E 31 22 3A 49 |LE...J.X$.".1":I|
00001500: B2 30 00 0A 1D 54 9C 4E B2 30 00 18 1D 5E 9C 9F |.0...T.N.0...^..|
00001510: 20 31 35 2C 38 2C 31 35 00 31 1D 68 9C 9F 20 32 | 15,8,15.1.h.. 2|
00001520: 2C 38 2C 32 2C 4E 24 AA 58 24 AA 22 2C 53 2C 52 |,8,2,N$.X$.",S,R|
00001530: 22 00 46 1D 72 9C 84 31 35 2C 45 4E 2C 45 52 24 |".F.r..15,EN,ER$|
00001540: 2C 54 52 2C 53 45 00 6A 1D 7C 9C 8B 20 45 4E B3 |,TR,SE.j.|.. EN.|
00001550: B1 30 20 A7 20 99 22 93 1E 12 20 4C 4F 41 44 92 |.0 . ."... LOAD.|
00001560: 22 3B 3A 89 20 34 34 30 31 30 00 9D 1D 86 9C 99 |";:. 44010......|
00001570: 22 13 1E 12 20 4C 4F 41 44 49 4E 47 20 4D 55 53 |"... LOADING MUS|
00001580: 49 43 20 46 49 4C 45 20 3A 20 20 20 20 20 20 20 |IC FILE : |
00001590: 20 20 20 20 20 20 20 20 20 20 92 22 3B 00 A6 1D | .";...|
000015A0: 90 9C 84 32 2C 41 00 B9 1D 9A 9C 97 20 43 48 AA |...2,A...... CH.|
000015B0: 49 AC 32 35 36 AA 4E 2C 41 00 D6 1D A4 9C 8B 20 |I.256.N,A...... |
000015C0: 41 B3 B1 32 35 35 20 A7 20 4E B2 4E AA 31 3A 89 |A..255 . N.N.1:.|
000015D0: 20 34 30 30 38 30 00 E3 1D AE 9C 4E 28 49 AA 31 | 40080.....N(I.1|
000015E0: 29 B2 4E 00 EB 1D B8 9C A0 20 32 00 F4 1D C2 9C |).N...... 2.....|
000015F0: A0 20 31 35 00 14 1E CC 9C 8B 20 49 B2 30 20 A7 |. 15...... I.0 .|
00001600: 20 49 B2 31 3A 58 24 B2 22 2E 32 22 3A 89 20 34 | I.1:X$.".2":. 4|
00001610: 30 30 32 30 00 34 1E D6 9C 8B 20 49 B2 31 20 A7 |0020.4.... I.1 .|
00001620: 20 49 B2 32 3A 58 24 B2 22 2E 33 22 3A 89 20 34 | I.2:X$.".3":. 4|
00001630: 30 30 32 30 00 3A 1E E0 9C 8E 00 54 1E 10 A4 8F |0020.:.....T....|
00001640: 20 4C 4F 41 44 20 46 53 49 44 20 52 45 47 49 53 | LOAD FSID REGIS|
00001650: 54 45 52 53 00 62 1E 1A A4 9F 20 31 35 2C 38 2C |TERS.b.... 15,8,|
00001660: 31 35 00 7A 1E 24 A4 9F 20 32 2C 38 2C 32 2C 4E |15.z.$.. 2,8,2,N|
00001670: 24 AA 22 2E 53 2C 53 2C 52 22 00 8F 1E 2E A4 84 |$.".S,S,R"......|
00001680: 31 35 2C 45 4E 2C 45 52 24 2C 54 52 2C 53 45 00 |15,EN,ER$,TR,SE.|
00001690: B3 1E 38 A4 8B 20 45 4E B3 B1 30 20 A7 20 99 22 |..8.. EN..0 . ."|
000016A0: 93 1E 12 20 4C 4F 41 44 92 22 3B 3A 89 20 34 34 |... LOAD.";:. 44|
000016B0: 30 31 30 00 E5 1E 42 A4 99 22 13 1E 12 20 4C 4F |010...B.."... LO|
000016C0: 41 44 49 4E 47 20 53 4F 55 4E 44 20 46 49 4C 45 |ADING SOUND FILE|
000016D0: 20 3A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | : |
000016E0: 20 20 92 22 3B 00 EE 1E 4C A4 84 32 2C 41 00 FC | .";...L..2,A..|
000016F0: 1E 56 A4 97 20 34 39 32 37 35 2C 41 00 0B 1F 60 |.V.. 49275,A...`|
00001700: A4 81 20 43 45 B2 30 20 A4 20 32 00 1A 1F 6A A4 |.. CE.0 . 2...j.|
00001710: 81 20 52 47 B2 30 20 A4 20 36 00 23 1F 74 A4 84 |. RG.0 . 6.#.t..|
00001720: 32 2C 41 00 38 1F 7E A4 97 20 46 53 49 44 AA 52 |2,A.8.~.. FSID.R|
00001730: 47 AA 37 AC 43 45 2C 41 00 44 1F 88 A4 82 20 52 |G.7.CE,A.D.... R|
00001740: 47 2C 43 45 00 4C 1F 92 A4 A0 20 32 00 55 1F 9C |G,CE.L.... 2.U..|
00001750: A4 A0 20 31 35 00 5B 1F A6 A4 8E 00 74 1F E0 AB |.. 15.[.....t...|
00001760: 8F 20 46 49 4C 45 20 45 52 52 4F 52 20 52 4F 55 |. FILE ERROR ROU|
00001770: 54 49 4E 45 00 81 1F EA AB A0 20 32 3A A0 20 31 |TINE...... 2:. 1|
00001780: 35 00 AF 1F F4 AB 99 22 12 20 45 52 52 4F 52 20 |5......". ERROR |
00001790: 3A 20 50 52 45 53 53 20 5B 52 45 54 55 52 4E 5D |: PRESS [RETURN]|
000017A0: 20 20 20 20 20 20 20 20 20 20 92 22 3B 3A 99 00 | .";:..|
000017B0: C5 1F FE AB 99 22 11 11 1D 05 46 49 4C 45 20 3A |....."....FILE :|
000017C0: 20 22 3B 4E 24 00 0E 20 08 AC 99 22 11 11 1D 1D | ";N$.. ..."....|
000017D0: 1D 1D 1D 1E 45 52 52 4F 52 20 23 20 3A 20 22 3B |....ERROR # : ";|
000017E0: 45 4E 3A 99 22 1D 1D 1D 1D 1D 22 3B 45 52 24 3A |EN:.".....";ER$:|
000017F0: 99 22 1D 1D 1D 1D 1D 54 52 20 3D 20 22 3B 54 52 |.".....TR = ";TR|
00001800: 3B 22 20 3A 20 53 45 20 3D 20 22 3B 53 45 00 2B |;" : SE = ";SE.+|
00001810: 20 12 AC A1 20 4B 24 3A 8B 20 4B 24 B3 B1 C7 28 | ... K$:. K$...(|
00001820: 31 33 29 20 A7 20 34 34 30 35 30 00 31 20 1C AC |13) . 44050.1 ..|
00001830: 8E 00 46 20 50 C3 8F 20 49 4E 49 54 49 41 4C 49 |..F P.. INITIALI|
00001840: 53 41 54 49 4F 4E 00 76 20 5A C3 8B 20 C2 28 35 |SATION.v Z.. .(5|
00001850: 31 37 31 32 29 B2 31 20 A7 20 35 30 31 32 30 3A |1712).1 . 50120:|
00001860: 8F 20 4D 41 43 48 49 4E 45 20 43 4F 44 45 20 50 |. MACHINE CODE P|
00001870: 52 45 53 45 4E 54 00 8E 20 64 C3 8F 20 4C 4F 41 |RESENT.. d.. LOA|
00001880: 44 20 4D 41 43 48 49 4E 45 20 43 4F 44 45 00 A6 |D MACHINE CODE..|
00001890: 20 6E C3 97 20 35 33 32 38 30 2C 35 3A 97 20 35 | n.. 53280,5:. 5|
000018A0: 33 32 38 31 2C 35 00 D3 20 78 C3 99 22 93 11 11 |3281,5.. x.."...|
000018B0: 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 05 B0 1D 1D |................|
000018C0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000018D0: 1D AE 22 00 F3 20 82 C3 99 22 1D 1D 1D 1D 1D 1D |..".. ..."......|
000018E0: 1D 1D 1D 1D 1D 1D 1D 46 49 4C 54 45 52 20 44 45 |.......FILTER DE|
000018F0: 4D 4F 22 00 17 21 8C C3 99 22 11 1D 1D 1D 1D 1D |MO"..!..."......|
00001900: 1D 1D 1D 1D 1D 56 2E 48 2E 42 45 52 52 59 1D 1D |.....V.H.BERRY..|
00001910: 43 2E 31 39 38 39 22 00 3D 21 96 C3 99 22 11 1D |C.1989".=!..."..|
00001920: 1D 1D 1D 1D 1D 1D 1D AD 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001930: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D BD 22 00 65 21 |............".e!|
00001940: A0 C3 99 22 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D |..."............|
00001950: 4C 4F 41 44 49 4E 47 1D 4D 41 43 48 49 4E 45 1D |LOADING.MACHINE.|
00001960: 43 4F 44 45 22 00 8E 21 AA C3 46 47 B2 46 47 AA |CODE"..!..FG.FG.|
00001970: 31 3A 8B 20 46 47 B2 31 20 A7 20 93 22 53 45 51 |1:. FG.1 . ."SEQ|
00001980: 55 45 4E 43 45 52 20 4D 43 22 2C 38 2C 31 00 B1 |UENCER MC",8,1..|
00001990: 21 B4 C3 8B 20 46 47 B2 32 20 A7 20 93 20 22 4E |!... FG.2 . . "N|
000019A0: 4F 54 45 20 54 41 42 4C 45 20 4D 43 22 2C 38 2C |OTE TABLE MC",8,|
000019B0: 31 00 CF 21 BE C3 8F 20 44 45 46 49 4E 45 20 53 |1..!... DEFINE S|
000019C0: 59 53 54 45 4D 20 56 41 52 49 41 42 4C 45 53 00 |YSTEM VARIABLES.|
000019D0: F5 21 C8 C3 4E 24 B2 22 44 45 4D 4F 20 46 49 4C |.!..N$."DEMO FIL|
000019E0: 45 22 3A 8F 20 44 45 46 41 55 4C 54 20 46 49 4C |E":. DEFAULT FIL|
000019F0: 45 4E 41 4D 45 00 18 22 D2 C3 46 53 49 44 B2 34 |ENAME.."..FSID.4|
00001A00: 39 31 37 35 3A 8F 20 46 41 4C 53 45 20 53 49 44 |9175:. FALSE SID|
00001A10: 20 41 44 44 52 45 53 53 00 3C 22 DC C3 43 48 B2 | ADDRESS.<"..CH.|
00001A20: 35 31 39 36 38 3A 8F 20 43 48 41 4E 4E 45 4C 20 |51968:. CHANNEL |
00001A30: 44 41 54 41 20 41 44 44 52 45 53 53 00 5F 22 E6 |DATA ADDRESS._".|
00001A40: C3 53 49 44 B2 35 34 32 37 32 3A 8F 20 53 4F 55 |.SID.54272:. SOU|
00001A50: 4E 44 20 43 48 49 50 20 41 44 44 52 45 53 53 00 |ND CHIP ADDRESS.|
00001A60: 6E 22 E8 C3 42 4B 24 B2 22 20 20 20 20 22 00 8D |n"..BK$." "..|
00001A70: 22 F0 C3 8F 20 44 45 46 49 4E 45 20 46 49 4C 54 |"... DEFINE FILT|
00001A80: 45 52 20 50 41 52 41 4D 45 54 45 52 53 00 A1 22 |ER PARAMETERS.."|
00001A90: FA C3 56 4F 4C 55 4D 45 B2 38 3A 52 45 53 B2 31 |..VOLUME.8:RES.1|
00001AA0: 32 00 B8 22 04 C4 8F 20 46 49 4C 54 45 52 53 20 |2.."... FILTERS |
00001AB0: 53 45 54 54 49 4E 47 53 00 D8 22 0E C4 46 31 B2 |SETTINGS.."..F1.|
00001AC0: 30 3A 8F 20 43 48 41 4E 4E 45 4C 20 31 20 46 49 |0:. CHANNEL 1 FI|
00001AD0: 4C 54 45 52 20 4F 46 46 00 F7 22 18 C4 46 32 B2 |LTER OFF.."..F2.|
00001AE0: 31 3A 8F 20 43 48 41 4E 4E 45 4C 20 32 20 46 49 |1:. CHANNEL 2 FI|
00001AF0: 4C 54 45 52 20 4F 4E 00 16 23 22 C4 46 33 B2 31 |LTER ON..#".F3.1|
00001B00: 3A 8F 20 43 48 41 4E 4E 45 4C 20 33 20 46 49 4C |:. CHANNEL 3 FIL|
00001B10: 54 45 52 20 4F 4E 00 2F 23 2C C4 48 50 B2 30 3A |TER ON./#,.HP.0:|
00001B20: 8F 20 48 49 47 48 20 50 41 53 53 20 4F 46 46 00 |. HIGH PASS OFF.|
00001B30: 47 23 36 C4 4C 50 B2 30 3A 8F 20 4C 4F 57 20 50 |G#6.LP.0:. LOW P|
00001B40: 41 53 53 20 4F 46 46 00 5F 23 40 C4 42 50 B2 31 |ASS OFF._#@.BP.1|
00001B50: 3A 8F 20 42 41 4E 44 20 50 41 53 53 20 4F 4E 00 |:. BAND PASS ON.|
00001B60: 74 23 4A C4 8F 20 53 57 45 45 50 20 53 45 54 54 |t#J.. SWEEP SETT|
00001B70: 49 4E 47 53 00 A3 23 54 C4 44 31 B2 31 30 3A 44 |INGS..#T.D1.10:D|
00001B80: 32 B2 31 38 30 3A 8F 20 44 45 50 54 48 20 4F 46 |2.180:. DEPTH OF|
00001B90: 20 53 57 45 45 50 20 48 49 47 48 20 41 4E 44 20 | SWEEP HIGH AND |
00001BA0: 4C 4F 57 00 BE 23 5E C4 53 57 B2 31 30 3A 8F 20 |LOW..#^.SW.10:. |
00001BB0: 53 50 45 45 44 20 4F 46 20 53 57 45 45 50 00 DE |SPEED OF SWEEP..|
00001BC0: 23 68 C4 46 4C B2 56 4F 4C 55 4D 45 AA 4C 50 AC |#h.FL.VOLUME.LP.|
00001BD0: 31 36 AA 42 50 AC 33 32 AA 48 50 AC 36 34 00 F9 |16.BP.32.HP.64..|
00001BE0: 23 72 C4 52 4E B2 52 45 53 AC 31 36 AA 46 33 AC |#r.RN.RES.16.F3.|
00001BF0: 34 AA 46 32 AC 32 AA 46 31 00 FF 23 7C C4 8E 00 |4.F2.2.F1..#|...|
00001C00: 00 00 |.. |
..&.D.. * FILTER DEMO PROGRAM *.K
.N.. * FOR USE WITH SID SEQUENCER *.P.X.
. * BY V.H.BERRY 1989 *...H.. 5
0010:. INITIALISATION...R.. 30010:. ENTE
R FILENAME.C.... 40010:. LOAD MUSIC.....
. 42010:. LOAD SOUND...... 5010:. PRINT
SCREEN...... 2010:. START MUSIC.*.... SW
EEP FILTER ROUTINE.J...A.D1:D1.D2:D2.A:S
W..SW:I.D1.X.... K$:. K$.G(136) . 1510:.
F7 EXIT PROGRAM...... K$.G(135) . . 201
0:. F5 MUSIC ON/OFF.F.... K$.G(134) . .
6010:. F3 HELP...... K$.G(133) . . 1810:
. F1 CHANGE SWEEP PARAMETERS.<.... K$."1
" . FG.F1:. 1610:F1.FG:. 1710:. CHAN 1 F
ILTER ON/OFF.|.... K$."2" . FG.F2:. 1610
:F2.FG:. 1710:. CHAN 2 FILTER ON/OFF....
.. K$."3" . FG.F3:. 1610:F3.FG:. 1710:.
CHAN 3 FILTER ON/OFF...... K$."H" . FG.H
P:. 1610:HP.FG:. 1710:. HIGH PASS ON/OFF
.3.... K$."L" . FG.LP:. 1610:LP.FG:. 171
0:. LOW PASS ON/OFF.O.... K$."B" . FG.BP
:. 1610:BP.FG:. 1710:. BAND PASS ON/OFF.
..... K$."V" . FG.VOLUME:. 1660:VOLUME.F
G:. 1710:. INCREASE VOLUME...... K$."V"
. FG.VOLUME:. 1680:VOLUME.FG:. 1710:. DE
CREASE VOLUME.5.... K$."R" . FG.RES:. 16
60:RES.FG:. 1710:. INCREASE RESONANCE.U.
... K$."R" . FG.RES:. 1680:RES.FG:. 1710
:. DECREASE RESONANCE.....I.I.SW:. (.(SW
).1).(I..D2) . 1010...$.. (.(SW)..1).(I.
.D2) . 1010...8.. SID.22,I:."...........
.";.29);" ....";I...B.. 1020...... EX
IT PROGRAM......"..FILTER DEMO".0...."V.
H.BERRY".=...."1989.".C.....X.@.. ON/OFF
ROUTINE.L.J.. FG.0 . FG.1:..W.T.FG.0:..
..R.. INCREMENT/DECREMENT PARAMETER...|.
FG.FG.1:. FG.15 . FG.15.......W...FG.FG.
1:. FG.0 . FG.0............ NEW FILTER S
ETTING...... 50280:. CALCULATE NEW VALUE
S.:.... 2030:. ALTER SID REGISTERS.T.B..
5220:. PRINT VALUES.Z.L...~.... ALTER S
WEEP FILTER PARAMETERS......"..... CHANG
E SWEEP FILTER PARAMETERS .".G....".....
.............."......" SWEEP RATE"
......" LIMIT 'X'"......" LI
MIT 'Y'".'...." CONTINUE".B...."..
.................".A.... 5110:. SCREEN P
ARAMETERS...&.."...";:LL.3:T1.4:. 39010:
. MENU ROUTINE...0.. A.3 . I.D1:. 5020:.
.V.5.FG.A:."...";.20);".ENTER VALUE (0-2
55).."...:.L.3:TB.25:RS.0:. 32040:. INPU
T SUBROUTINE...?.. Y$."" . 1810.H.@.. E(
Y$).0 . E(Y$).255 . . .25);"....":. 1850
.L.D.. FG.0 . SW.E(Y$):. CHANGE RATE...F
.. FG.1 . D1.E(Y$):. CHANGE LOWER LIMIT.
B.H.. FG.2 . D2.E(Y$):. CHANGE UPPER LIM
IT...J.. D1.D2 . .(SW).1 . SW..SW...L..
D1.D2 . .(SW)..1 . SW..SW...N.. 1810...P
.. MUSIC ON/OFF.G.Z.. MF.1 . MF.0:. 4920
9:.:. MUSIC OFF.C...MF.1:. 49235:. MUSIC
ON..... SID.24,FL:. SID.23,RN.........
... MAIN SCREEN...... 53280,0:. 53281,0.
....."."......". *** FILTER DEMO
***"......". .FILE : ";N$.$...."....
F1 . F3 . F5 . F7 .".R.D
.."..SWEEP FILTER.HELP.MUSIC ON/OFF.EXIT
.".L...."...``````````````."......"}PASS
.FILTERS..}.. FILTER PARAMETERS ".D...."
.````.````.````...````````````````."....
.."}.HIGH.}.LOW..}.BAND.}.}SWEEP.CTRL...
...}". ...."}....}....}....}..``````````
``````.".M.(..".````{````{````..}.LIMIT.
....-......}".~.2.."}...1..}...2..}...3.
.}..````````````````."...<.."}....}....}
....}.}.RATE.............}".V.F..".````.
````.````...````````````````."...P.."}.R
ESONANCE......}"...Z..".``````````````."
.$.D.."............... ";.@.N.. HP.1
. ."..... ON .";.F.X..". ";:. LP.1 .
."..... ON .";......". ";:. BP.1 . ."
..... ON .";............"... ";:. F1.
1 . ."...... ON ..";... ..". ";:. F2.
1 . ."...... ON ..";......". ";:. F3.
1 . ."...... ON ..";.......5....".......
..... ....";D(RES).T.H.."............
..";.24);" ....";D(D1);" - ....";D
(D2)...R.. .24);". ....";D(SW).......
..P.. HELP SCREEN.G.Z.. 53280,5:. 53281,
5:.".";...{..".. [F7] TO CONTINUE
....FILTER.CONTROLS".$.|
..".```````````````".F.}.."....[H]...HIG
H.PASS.ON/OFF".G.~.."...[L]...LOW..PASS.
ON/OFF"....."...[B]...BAND.PASS.ON/OFF"
......"....[1]...FILTER.CHANNEL.1.IN/OUT
".Y...."...[2]...FILTER.CHANNEL.2.IN/OUT
"......"...[3]...FILTER.CHANNEL.3.IN/OUT
".*...."......INCREASE/DECREASE.RESONANC
E".P...."........[R]......[SHIFT] & [R]"
.W....".......INCREASE/DECREASE.VOLUME".
....."........[V]......[SHIFT] & [V]"...
... K$:. K$..G(136) . 6120.S.... 5010:.
MAIN SCREEN.Y.......0U. INPUT NEW FILENA
ME...:U. 53280,5:. 53281,5.=.DU."... ENT
ER NEW FILENAME : PRESS [RETURN] .";.C.
NU..\.XU.".......FILE : ";N$.F.BU.".."..
.LUL.14:TB.5:RS.1:. 32040:. INPUT SUBROU
TINE...VU. A.0 . N$.Y$....U. 53280,0:. 5
3281,0.Y..U.".........FILE : ";N$....U..
...}. INPUT RESTRICTION SUBROUTINE....}.
L=LENGTH OF INPUT.9..}. TB=TABULATION O
F ROUTINE.Y..}. RS=CHARACTER RESTRICTION
S.L.(}A.0:Y$."":SP.1...2}. .TB.L.1):."..
.....";:. X.0 . L.1:.".. ";:.:."........
.";.D.<}. X$:. X$."" . 32060...F}. X$.G(
160) . X$." " . X$.G(20) . X$.G(13) . 32
130.$.P}. RS.0 . . X$.."0" . X$.."9" . 3
2130.O.Z}. RS.1 . X$..G(35) . X$..G(93)
. 32130.[.D}. 32060.Q.N}. A.L.1 . ."..."
;.}.X}. 32060....}. X$.G(20) . A.0 . 320
60.P..}. X$.G(13) . I(Y$,1)." " . Y$.H(Y
$,C(Y$).1):A.A.1....}. X$.G(13) . .:....
}A.A.1:. X$..G(32) . SP.0.&..}. A.L . X
$..G(20) . X$."":A.A.1.<..}. A.1 . X$.""
:A.0.Z..}. X$.G(20) . . .A)".. ..";:A.A.
2:Y$.H(Y$,C(Y$).1):. 32110...H}. X$.G(32
) . SP.1 . X$."":A.A.1...R}. X$.G(32) .
SP.SP.1.Y..}Y$.Y$.X$:. X$;:. A.L . .".."
;....}. 32060...X.. MENU SYSTEM ROUTINE.
..B.A.0:. .T1);".>".,.L.. X$:. X$."" . 3
9020.P.V.. A.LL . X$.G(17) . A.A.1:.".."
.P.... A.0 . X$.G(145) . A.A.1:....... X
$.G(17) . A.A.1:. .T1);". ..>"...... X$.
G(145) . A.A.1:. .T1);". ..>".P.... X$.G
(13) . ....... 39020...@.. LOAD MUSIC FI
LE...J.X$.".1":I.0...T.N.0...^.. 15,8,15
.1.H.. 2,8,2,N$.X$.",S,R".F.R..15,EN,ER$
,TR,SE.J.|.. EN..0 . ."... LOAD.";:. 440
10......"... LOADING MUSIC FILE :
.";......2,A...... CH.I.256.N,
A.V.... A..255 . N.N.1:. 40080.....N(I.1
).N..... 2...B. 15...L.. I.0 . I.1:X$.
".2":. 40020.4.V.. I.1 . I.2:X$.".3":. 4
0020.:.....T.... LOAD FSID REGISTERS.B..
.. 15,8,15.Z.$.. 2,8,2,N$.".S,S,R"......
15,EN,ER$,TR,SE...8.. EN..0 . ."... LOAD
.";:. 44010...B.."... LOADING SOUND FILE
: .";...L..2,A...V.. 492
75,A...`.. CE.0 . 2...J.. RG.0 . 6.#.T..
2,A.8.~.. FSID.RG.7.CE,A.D.... RG,CE.L..
. 2.U... 15.[.....T.... FILE ERROR ROU
TINE..... 2: 15......". ERROR : PRESS
[RETURN] .";:..E...."....FILE :
";N$.. ..."........ERROR # : ";EN:."...
..";ER$:.".....TR = ";TR;" : SE = ";SE.+
... K$:. K$..G(13) . 44050.1 ....F PC.
INITIALISATION.V ZC. B(51712).1 . 50120:
. MACHINE CODE PRESENT.. DC. LOAD MACHIN
E CODE.. NC. 53280,5:. 53281,5.S XC."...
..................................".. .C
.".............FILTER DEMO"..!.C."......
.....V.H.BERRY..C.1989".=!.C."..........
....................".E! C."............
LOADING.MACHINE.CODE"..!.CFG.FG.1:. FG.1
. ."SEQUENCER MC",8,1..!.C. FG.2 . . "N
OTE TABLE MC",8,1.O!.C. DEFINE SYSTEM VA
RIABLES..!HCN$."DEMO FILE":. DEFAULT FIL
ENAME.."RCFSID.49175:. FALSE SID ADDRESS
.<".CCH.51968:. CHANNEL DATA ADDRESS._".
CSID.54272:. SOUND CHIP ADDRESS.N".CBK$.
" "..".C. DEFINE FILTER PARAMETERS.."
.CVOLUME.8:RES.12..".D. FILTERS SETTINGS
.X".DF1.0:. CHANNEL 1 FILTER OFF..".DF2.
1:. CHANNEL 2 FILTER ON..#"DF3.1:. CHANN
EL 3 FILTER ON./#,DHP.0:. HIGH PASS OFF.
G#6DLP.0:. LOW PASS OFF._#@DBP.1:. BAND
PASS ON.T#JD. SWEEP SETTINGS..#TDD1.10:D
2.180:. DEPTH OF SWEEP HIGH AND LOW..#^D
SW.10:. SPEED OF SWEEP..#HDFL.VOLUME.LP.
16.BP.32.HP.64..#RDRN.RES.16.F3.4.F2.2.F
1..#|D....
> CLICK IMAGE PREVIEW FOR FULL MODAL