MUSIC EDITOR
FILE INFORMATION
FILENAME(S): MUSIC EDITOR
FILE TYPE(S): PRG
FILE SIZE: 7.9K
FIRST SEEN: 2025-11-30 21:23:55
APPEARS ON: 1 disk(s)
FILE HASH
ec60122fa38fbefb9fa839e4f4d5a22385dfa909efbadf79dacf2c3bf6f76218
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 SPEL 28 1 | MUSIC EDITOR | PRG | DuncanTwain | 29 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 27 08 64 00 8F 20 42 41 43 4B 47 52 4F 55 |..'.d.. BACKGROU|
00000010: 4E 44 20 4D 55 53 49 43 20 50 4C 41 59 45 52 20 |ND MUSIC PLAYER |
00000020: 56 45 52 20 31 2E 30 00 41 08 6E 00 8F 20 47 41 |VER 1.0.A.n.. GA|
00000030: 52 59 20 44 41 56 49 53 20 31 31 2F 32 35 2F 38 |RY DAVIS 11/25/8|
00000040: 33 00 47 08 78 00 3A 00 6A 08 82 00 86 4D 25 28 |3.G.x.:.j....M%(|
00000050: 39 34 30 2C 36 29 2C 53 49 44 28 32 34 29 3A 4D |940,6),SID(24):M|
00000060: 45 B2 30 3A 54 42 B2 39 34 30 00 91 08 8C 00 4E |E.0:TB.940.....N|
00000070: 4F 24 B2 22 43 20 43 23 44 20 44 23 45 20 46 20 |O$."C C#D D#E F |
00000080: 46 23 47 20 47 23 41 20 41 23 42 20 52 20 4D 20 |F#G G#A A#B R M |
00000090: 22 00 A8 08 96 00 97 35 33 32 38 30 2C 31 34 3A |"......53280,14:|
000000A0: 97 35 33 32 38 31 2C 30 00 D5 08 A0 00 99 22 99 |.53281,0......".|
000000B0: 93 11 11 20 20 20 20 20 20 20 20 12 42 41 43 4B |... .BACK|
000000C0: 47 52 4F 55 4E 44 20 4D 55 53 49 43 20 45 44 49 |GROUND MUSIC EDI|
000000D0: 54 4F 52 92 22 00 FA 08 AA 00 99 22 11 11 20 20 |TOR."......".. |
000000E0: 20 20 20 20 20 20 20 20 20 20 20 9E 53 45 54 54 | .SETT|
000000F0: 49 4E 47 20 55 50 2E 2E 2E 22 00 17 09 B4 00 81 |ING UP..."......|
00000100: 41 44 B2 36 37 39 A4 37 31 30 3A 87 44 41 3A 97 |AD.679.710:.DA:.|
00000110: 41 44 2C 44 41 3A 82 00 38 09 BE 00 81 41 44 B2 |AD,DA:..8....AD.|
00000120: 34 39 31 35 32 A4 34 39 34 35 30 3A 87 44 41 3A |49152.49450:.DA:|
00000130: 97 41 44 2C 44 41 3A 82 00 54 09 C8 00 81 49 B2 |.AD,DA:..T....I.|
00000140: 30 A4 31 36 3A 44 4C 24 B2 44 4C 24 AA C7 28 32 |0.16:DL$.DL$..(2|
00000150: 30 29 3A 82 00 6E 09 D2 00 81 49 B2 34 A4 31 38 |0):..n....I.4.18|
00000160: A9 37 3A 53 49 44 28 49 29 B2 31 37 3A 82 00 74 |.7:SID(I).17:..t|
00000170: 09 DC 00 3A 00 7A 09 E6 00 3A 00 8B 09 F0 00 8F |...:.z...:......|
00000180: 20 20 4D 41 49 4E 20 4D 45 4E 55 00 91 09 FA 00 | MAIN MENU.....|
00000190: 3A 00 97 09 04 01 3A 00 C0 09 0E 01 99 22 93 11 |:.....:......"..|
000001A0: 20 20 20 20 20 20 20 20 20 20 20 12 99 2A 2A 2A | ..***|
000001B0: 20 4D 41 49 4E 20 4D 45 4E 55 20 2A 2A 2A 92 22 | MAIN MENU ***."|
000001C0: 00 DB 09 18 01 99 22 11 11 22 A6 31 31 29 22 12 |......"..".11)".|
000001D0: 9E 31 92 20 9F 45 44 49 54 4F 52 00 FF 09 22 01 |.1. .EDITOR...".|
000001E0: 99 22 11 22 A6 31 31 29 22 12 9E 32 92 20 9F 43 |.".".11)"..2. .C|
000001F0: 4F 50 59 20 4D 55 53 49 43 20 44 41 54 41 22 00 |OPY MUSIC DATA".|
00000200: 20 0A 2C 01 99 22 11 22 A6 31 31 29 22 12 9E 33 | .,..".".11)"..3|
00000210: 92 20 9F 54 4F 47 47 4C 45 20 4D 55 53 49 43 22 |. .TOGGLE MUSIC"|
00000220: 00 44 0A 36 01 99 22 11 22 A6 31 31 29 22 12 9E |.D.6..".".11)"..|
00000230: 34 92 20 9F 4C 4F 41 44 2F 53 41 56 45 20 4D 55 |4. .LOAD/SAVE MU|
00000240: 53 49 43 22 00 5D 0A 40 01 99 22 11 22 A6 31 31 |SIC".].@..".".11|
00000250: 29 22 12 9E 35 92 20 9F 45 58 49 54 22 00 81 0A |)"..5. .EXIT"...|
00000260: 4A 01 A1 41 24 3A 41 B2 C6 28 41 24 AA C7 28 30 |J..A$:A..(A$..(0|
00000270: 29 29 3A 8B 41 B3 34 38 B0 41 B1 35 33 A7 33 33 |)):.A.48.A.53.33|
00000280: 30 00 A0 0A 54 01 91 41 AB 34 38 8D 33 38 30 2C |0...T..A.48.380,|
00000290: 35 33 30 2C 37 35 30 2C 38 32 30 2C 31 34 32 30 |530,750,820,1420|
000002A0: 00 A9 0A 5E 01 89 32 37 30 00 AF 0A 68 01 3A 00 |...^..270...h.:.|
000002B0: B5 0A 72 01 3A 00 C8 0A 7C 01 8F 20 20 45 44 49 |..r.:...|.. EDI|
000002C0: 54 4F 52 20 4D 45 4E 55 00 CE 0A 86 01 3A 00 D4 |TOR MENU.....:..|
000002D0: 0A 90 01 3A 00 FE 0A 9A 01 99 22 93 11 20 20 20 |...:......".. |
000002E0: 20 20 20 20 20 20 20 12 99 2A 2A 2A 20 45 44 49 | ..*** EDI|
000002F0: 54 4F 52 20 4D 45 4E 55 20 2A 2A 2A 92 22 00 1E |TOR MENU ***."..|
00000300: 0B A4 01 99 22 11 11 22 A6 31 31 29 22 12 9E 31 |...."..".11)"..1|
00000310: 92 20 9F 53 45 54 20 55 50 20 53 49 44 22 00 3D |. .SET UP SID".=|
00000320: 0B AE 01 99 22 11 22 A6 31 31 29 22 12 9E 32 92 |....".".11)"..2.|
00000330: 20 9F 41 44 44 20 54 4F 20 45 4E 44 22 00 5E 0B | .ADD TO END".^.|
00000340: B8 01 99 22 11 22 A6 31 31 29 22 12 9E 33 92 20 |...".".11)"..3. |
00000350: 9F 49 4E 53 45 52 54 20 4C 49 4E 45 53 22 00 79 |.INSERT LINES".y|
00000360: 0B C2 01 99 22 11 22 A6 31 31 29 22 12 9E 34 92 |....".".11)"..4.|
00000370: 20 9F 44 45 4C 45 54 45 22 00 95 0B CC 01 99 22 | .DELETE"......"|
00000380: 11 22 A6 31 31 29 22 12 9E 35 92 20 9F 52 45 50 |.".11)"..5. .REP|
00000390: 4C 41 43 45 22 00 AE 0B D6 01 99 22 11 22 A6 31 |LACE"......".".1|
000003A0: 31 29 22 12 9E 36 92 20 9F 4C 49 53 54 22 00 C7 |1)"..6. .LIST"..|
000003B0: 0B E0 01 99 22 11 22 A6 31 31 29 22 12 9E 37 92 |....".".11)"..7.|
000003C0: 20 9F 45 58 49 54 22 00 EB 0B EA 01 A1 41 24 3A | .EXIT"......A$:|
000003D0: 41 B2 C6 28 41 24 AA C7 28 30 29 29 3A 8B 41 24 |A..(A$..(0)):.A$|
000003E0: B2 22 85 22 B0 41 B2 35 35 A7 8E 00 FE 0B F4 01 |.".".A.55.......|
000003F0: 8B 41 B3 34 38 B0 41 B1 35 34 A7 34 39 30 00 26 |.A.48.A.54.490.&|
00000400: 0C FE 01 91 41 AB 34 38 8D 33 30 37 30 2C 31 35 |....A.48.3070,15|
00000410: 38 30 2C 31 38 32 30 2C 31 39 39 30 2C 31 36 39 |80,1820,1990,169|
00000420: 30 2C 32 31 36 30 00 2F 0C 08 02 89 34 31 30 00 |0,2160./....410.|
00000430: 59 0C 12 02 99 22 93 11 11 43 4F 50 59 49 4E 47 |Y...."...COPYING|
00000440: 20 4D 55 53 49 43 20 44 41 54 41 20 54 4F 20 4D | MUSIC DATA TO M|
00000450: 45 4D 4F 52 59 2E 2E 2E 22 00 66 0C 1C 02 41 44 |EMORY...".f...AD|
00000460: B2 34 39 34 35 30 00 72 0C 26 02 81 49 B2 30 A4 |.49450.r.&..I.0.|
00000470: 32 34 00 81 0C 30 02 97 41 44 2C 53 49 44 28 49 |24...0..AD,SID(I|
00000480: 29 00 8D 0C 3A 02 41 44 B2 41 44 AA 31 00 93 0C |)...:.AD.AD.1...|
00000490: 44 02 82 00 9F 0C 4E 02 81 49 B2 30 A4 4D 45 00 |D.....N..I.0.ME.|
000004A0: AC 0C 58 02 81 4A B2 30 A4 34 A9 32 00 CA 0C 62 |..X..J.0.4.2...b|
000004B0: 02 44 41 B2 28 4D 25 28 49 2C 4A 29 AC 31 36 29 |.DA.(M%(I,J).16)|
000004C0: AA 4D 25 28 49 2C 4A AA 31 29 00 D5 0C 6C 02 97 |.M%(I,J.1)...l..|
000004D0: 41 44 2C 44 41 00 E1 0C 76 02 41 44 B2 41 44 AA |AD,DA...v.AD.AD.|
000004E0: 31 00 E8 0C 80 02 82 4A 00 F8 0C 8A 02 97 41 44 |1......J......AD|
000004F0: 2C 4D 25 28 49 2C 36 29 00 04 0D 94 02 41 44 B2 |,M%(I,6).....AD.|
00000500: 41 44 AA 31 00 0B 0D 9E 02 82 49 00 22 0D A8 02 |AD.1......I."...|
00000510: 81 49 B2 41 44 A4 41 44 AA 34 3A 97 41 44 2C 30 |.I.AD.AD.4:.AD,0|
00000520: 3A 82 00 28 0D B2 02 8E 00 2E 0D BC 02 3A 00 34 |:..(.........:.4|
00000530: 0D C6 02 3A 00 49 0D D0 02 8F 20 20 54 4F 47 47 |...:.I.... TOGG|
00000540: 4C 45 20 4F 4E 2F 4F 46 46 00 4F 0D DA 02 3A 00 |LE ON/OFF.O...:.|
00000550: 55 0D E4 02 3A 00 60 0D EE 02 9E 34 39 31 35 32 |U...:.`....49152|
00000560: 00 66 0D F8 02 8E 00 6C 0D 02 03 3A 00 72 0D 0C |.f.....l...:.r..|
00000570: 03 3A 00 83 0D 16 03 8F 20 20 4C 4F 41 44 2F 53 |.:...... LOAD/S|
00000580: 41 56 45 00 89 0D 20 03 3A 00 8F 0D 2A 03 3A 00 |AVE... .:...*.:.|
00000590: B2 0D 34 03 99 22 93 11 11 53 41 56 45 20 4F 52 |..4.."...SAVE OR|
000005A0: 20 4C 4F 41 44 20 28 53 2F 4C 29 20 3A 20 A6 9D | LOAD (S/L) : ..|
000005B0: 22 3B 00 BB 0D 3E 03 53 4C B2 31 00 D8 0D 48 03 |";...>.SL.1...H.|
000005C0: A1 41 24 3A 8B 41 24 B2 22 53 22 A7 99 22 53 41 |.A$:.A$."S".."SA|
000005D0: 56 45 22 3A 89 38 38 30 00 E7 0D 52 03 8B 41 24 |VE":.880...R..A$|
000005E0: B2 22 85 22 A7 20 8E 00 F9 0D 5C 03 8B 20 41 24 |.".". ....\.. A$|
000005F0: B3 B1 22 4C 22 A7 38 34 30 00 0A 0E 66 03 53 4C |.."L".840...f.SL|
00000600: B2 30 3A 99 22 4C 4F 41 44 22 00 14 0E 70 03 44 |.0:."LOAD"...p.D|
00000610: 45 56 B2 31 00 36 0E 7A 03 99 22 11 11 54 41 50 |EV.1.6.z.."..TAP|
00000620: 45 20 4F 52 20 44 49 53 4B 20 28 54 2F 44 29 20 |E OR DISK (T/D) |
00000630: 3A 20 A6 9D 22 3B 00 53 0E 84 03 A1 41 24 3A 8B |: ..";.S....A$:.|
00000640: 41 24 B2 22 54 22 A7 99 22 54 41 50 45 22 3A 89 |A$."T".."TAPE":.|
00000650: 39 34 30 00 61 0E 8E 03 8B 41 24 B2 22 85 22 A7 |940.a....A$.".".|
00000660: 8E 00 72 0E 98 03 8B 41 24 B3 B1 22 44 22 A7 39 |..r....A$.."D".9|
00000670: 30 30 00 84 0E A2 03 44 45 56 B2 38 3A 99 22 44 |00.....DEV.8:."D|
00000680: 49 53 4B 22 00 A0 0E AC 03 9F 31 2C 30 3A 99 22 |ISK"......1,0:."|
00000690: 11 11 46 49 4C 45 20 4E 41 4D 45 20 3A 20 22 3B |..FILE NAME : ";|
000006A0: 00 AA 0E B6 03 84 31 2C 4E 24 00 B1 0E C0 03 A0 |......1,N$......|
000006B0: 31 00 B7 0E CA 03 99 00 C8 0E D4 03 9F 31 2C 44 |1............1,D|
000006C0: 45 56 2C 53 4C 2C 4E 24 00 D7 0E DE 03 8B 53 4C |EV,SL,N$......SL|
000006D0: B2 30 A7 31 31 30 30 00 EE 0E E8 03 49 B2 34 39 |.0.1100.....I.49|
000006E0: 34 38 30 AA 28 28 4D 45 AA 31 29 AC 34 29 00 1A |480.((ME.1).4)..|
000006F0: 0F F2 03 97 32 35 34 2C B5 28 49 AD 32 35 36 29 |....254,.(I.256)|
00000700: 3A 97 32 35 33 2C 28 49 AD 32 35 36 AB B5 28 49 |:.253,(I.256..(I|
00000710: AD 32 35 36 29 29 AC 32 35 36 00 43 0F FC 03 99 |.256)).256.C....|
00000720: 22 11 11 43 4F 50 59 49 4E 47 20 4D 55 53 49 43 |"..COPYING MUSIC|
00000730: 20 44 41 54 41 20 54 4F 20 4D 45 4D 4F 52 59 2E | DATA TO MEMORY.|
00000740: 2E 2E 22 00 4C 0F 06 04 8D 35 34 30 00 5D 0F 10 |..".L....540.]..|
00000750: 04 9E 36 37 39 3A 20 8F 20 53 41 56 45 00 64 0F |..679: . SAVE.d.|
00000760: 1A 04 A0 31 00 70 0F 24 04 8B 53 54 B2 30 A7 8E |...1.p.$..ST.0..|
00000770: 00 87 0F 2E 04 99 3A 99 22 11 12 53 41 56 45 20 |......:."..SAVE |
00000780: 45 52 52 4F 52 92 22 00 91 0F 38 04 8D 31 33 34 |ERROR."...8..134|
00000790: 30 00 97 0F 42 04 8E 00 A8 0F 4C 04 9E 36 39 37 |0...B.....L..697|
000007A0: 3A 20 8F 20 4C 4F 41 44 00 AF 0F 56 04 A0 31 00 |: . LOAD...V..1.|
000007B0: C0 0F 60 04 8B 53 54 B3 B1 36 36 A7 31 31 36 30 |..`..ST..66.1160|
000007C0: 00 D8 0F 6A 04 99 3A 99 22 11 11 12 4C 4F 41 44 |...j..:."...LOAD|
000007D0: 20 45 52 52 4F 52 92 22 00 E2 0F 74 04 8D 31 33 | ERROR."...t..13|
000007E0: 34 30 00 E8 0F 7E 04 8E 00 10 10 88 04 99 3A 99 |40...~........:.|
000007F0: 22 11 11 52 45 41 44 49 4E 47 20 4D 55 53 49 43 |"..READING MUSIC|
00000800: 20 49 4E 54 4F 20 45 44 49 54 4F 52 2E 2E 2E 22 | INTO EDITOR..."|
00000810: 00 35 10 92 04 4D 45 B2 28 28 C2 28 32 35 32 29 |.5...ME.((.(252)|
00000820: AC 32 35 36 AA C2 28 32 35 31 29 AB 34 39 34 38 |.256..(251).4948|
00000830: 34 29 AD 34 29 00 42 10 9C 04 41 44 B2 34 39 34 |4).4).B...AD.494|
00000840: 35 30 00 4E 10 A6 04 81 49 B2 30 A4 32 34 00 5F |50.N....I.0.24._|
00000850: 10 B0 04 53 49 44 28 49 29 B2 C2 28 41 44 29 00 |...SID(I)..(AD).|
00000860: 6B 10 BA 04 41 44 B2 41 44 AA 31 00 71 10 C4 04 |k...AD.AD.1.q...|
00000870: 82 00 7D 10 CE 04 81 49 B2 30 A4 4D 45 00 8A 10 |..}....I.0.ME...|
00000880: D8 04 81 4A B2 30 A4 34 A9 32 00 97 10 E2 04 44 |...J.0.4.2.....D|
00000890: 41 B2 C2 28 41 44 29 00 A3 10 EC 04 41 44 B2 41 |A..(AD).....AD.A|
000008A0: 44 AA 31 00 B8 10 F6 04 4D 25 28 49 2C 4A 29 B2 |D.1.....M%(I,J).|
000008B0: B5 28 44 41 AD 31 36 29 00 CC 10 00 05 4D 25 28 |.(DA.16).....M%(|
000008C0: 49 2C 4A AA 31 29 B2 44 41 AF 31 35 00 D3 10 0A |I,J.1).DA.15....|
000008D0: 05 82 4A 00 E5 10 14 05 4D 25 28 49 2C 36 29 B2 |..J.....M%(I,6).|
000008E0: C2 28 41 44 29 00 F1 10 1E 05 41 44 B2 41 44 AA |.(AD).....AD.AD.|
000008F0: 31 00 F7 10 28 05 82 00 FD 10 32 05 8E 00 0D 11 |1...(.....2.....|
00000900: 3C 05 8B 44 45 56 B2 31 A7 31 33 37 30 00 28 11 |<..DEV.1.1370.(.|
00000910: 46 05 9F 31 35 2C 38 2C 31 35 3A 84 31 35 2C 41 |F..15,8,15:.15,A|
00000920: 24 2C 42 24 3A A0 31 35 00 44 11 50 05 99 22 11 |$,B$:.15.D.P..".|
00000930: 11 44 49 53 4B 20 45 52 52 4F 52 20 23 22 3B 41 |.DISK ERROR #";A|
00000940: 24 2C 42 24 00 69 11 5A 05 99 22 11 11 12 50 52 |$,B$.i.Z.."...PR|
00000950: 45 53 53 20 41 4E 59 20 4B 45 59 20 54 4F 20 43 |ESS ANY KEY TO C|
00000960: 4F 4E 54 49 4E 55 45 92 22 00 7D 11 64 05 A1 41 |ONTINUE.".}.d..A|
00000970: 24 3A 8B 41 24 B2 22 22 A7 31 33 38 30 00 83 11 |$:.A$."".1380...|
00000980: 6E 05 8E 00 89 11 78 05 3A 00 8F 11 82 05 3A 00 |n.....x.:.....:.|
00000990: 9B 11 8C 05 8F 20 20 45 58 49 54 00 A1 11 96 05 |..... EXIT.....|
000009A0: 3A 00 A7 11 A0 05 3A 00 D1 11 AA 05 99 22 93 11 |:.....:......"..|
000009B0: 11 45 58 49 54 2D 2D 2D 3E 20 41 52 45 20 59 4F |.EXIT---> ARE YO|
000009C0: 55 20 53 55 52 45 20 28 59 2F 4E 29 3F 3A 20 A6 |U SURE (Y/N)?: .|
000009D0: 22 00 E5 11 B4 05 A1 41 24 3A 8B 20 41 24 B2 22 |"......A$:. A$."|
000009E0: 4E 22 A7 20 8E 00 F7 11 BE 05 8B 41 24 B3 B1 22 |N". .......A$.."|
000009F0: 59 22 A7 31 34 36 30 00 27 12 C8 05 8B C2 28 37 |Y".1460.'.....(7|
00000A00: 38 38 29 B3 B1 34 39 A7 9E 34 39 31 35 32 3A 8F |88)..49..49152:.|
00000A10: 20 4D 41 4B 45 20 53 55 52 45 20 4D 55 53 49 43 | MAKE SURE MUSIC|
00000A20: 20 49 53 20 4F 46 46 00 38 12 D2 05 99 22 93 11 | IS OFF.8...."..|
00000A30: 11 20 20 20 20 20 22 3B 00 7A 12 DC 05 99 22 12 |. ";.z....".|
00000A40: 4D 55 53 49 43 20 44 41 54 41 20 49 53 20 4C 4F |MUSIC DATA IS LO|
00000A50: 43 41 54 45 44 20 42 45 54 57 45 45 4E 3A 92 22 |CATED BETWEEN:."|
00000A60: 3A 99 22 11 20 20 20 20 20 20 20 20 20 20 20 34 |:.". 4|
00000A70: 39 31 35 32 20 41 4E 44 22 3B 00 8C 12 E6 05 99 |9152 AND";......|
00000A80: 34 39 34 37 39 AA 28 4D 45 AC 34 29 00 92 12 F0 |49479.(ME.4)....|
00000A90: 05 80 00 98 12 FA 05 3A 00 9E 12 04 06 3A 00 B0 |.......:.....:..|
00000AA0: 12 0E 06 8F 20 20 41 44 44 20 54 4F 20 45 4E 44 |.... ADD TO END|
00000AB0: 00 B6 12 18 06 3A 00 BC 12 22 06 3A 00 EB 12 2C |.....:...".:...,|
00000AC0: 06 54 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 |.T$." |
00000AD0: 12 2A 2A 2A 20 41 44 44 20 54 4F 20 45 4E 44 20 |.*** ADD TO END |
00000AE0: 2A 2A 2A 92 22 3A 8D 32 37 33 30 00 F5 12 36 06 |***.":.2730...6.|
00000AF0: 4D 50 B2 4D 45 00 0E 13 40 06 8D 32 33 37 30 3A |MP.ME...@..2370:|
00000B00: 20 8F 20 45 4E 54 45 52 20 43 48 4F 52 44 00 1D | . ENTER CHORD..|
00000B10: 13 4A 06 8B 45 58 B2 30 A7 31 36 30 30 00 27 13 |.J..EX.0.1600.'.|
00000B20: 54 06 4D 45 B2 4D 50 00 2D 13 5E 06 8E 00 33 13 |T.ME.MP.-.^...3.|
00000B30: 68 06 3A 00 39 13 72 06 3A 00 48 13 7C 06 8F 20 |h.:.9.r.:.H.|.. |
00000B40: 20 52 45 50 4C 41 43 45 00 4E 13 86 06 3A 00 54 | REPLACE.N...:.T|
00000B50: 13 90 06 3A 00 77 13 9A 06 99 22 93 11 11 52 45 |...:.w...."...RE|
00000B60: 50 4C 41 43 45 20 53 54 41 52 54 49 4E 47 20 4C |PLACE STARTING L|
00000B70: 49 4E 45 3A 20 22 3B 00 95 13 A4 06 4D 58 B2 4D |INE: ";.....MX.M|
00000B80: 45 3A 4E 4E B2 34 3A 8D 32 38 39 30 3A 8B 45 58 |E:NN.4:.2890:.EX|
00000B90: A7 31 37 35 30 00 A2 13 AE 06 4D 50 B2 C5 28 4E |.1750.....MP..(N|
00000BA0: 24 29 00 D2 13 B8 06 54 24 B2 22 20 20 20 20 20 |$).....T$." |
00000BB0: 20 20 20 20 12 2A 2A 2A 20 52 45 50 4C 41 43 45 | .*** REPLACE|
00000BC0: 20 4C 49 4E 45 53 20 2A 2A 2A 92 22 3A 8D 32 37 | LINES ***.":.27|
00000BD0: 33 30 00 EB 13 C2 06 8D 32 33 37 30 3A 20 8F 20 |30......2370: . |
00000BE0: 45 4E 54 45 52 20 43 48 4F 52 44 00 FA 13 CC 06 |ENTER CHORD.....|
00000BF0: 8B 45 58 B2 30 A7 31 37 33 30 00 0B 14 D6 06 8B |.EX.0.1730......|
00000C00: 4D 50 B1 4D 45 A7 4D 45 B2 4D 50 00 11 14 E0 06 |MP.ME.ME.MP.....|
00000C10: 8E 00 17 14 EA 06 3A 00 1D 14 F4 06 3A 00 30 14 |......:.....:.0.|
00000C20: FE 06 8F 20 20 49 4E 53 45 52 54 20 4C 49 4E 45 |... INSERT LINE|
00000C30: 00 36 14 08 07 3A 00 3C 14 12 07 3A 00 5E 14 1C |.6...:.<...:.^..|
00000C40: 07 99 22 93 11 11 49 4E 53 45 52 54 20 53 54 41 |.."...INSERT STA|
00000C50: 52 54 49 4E 47 20 4C 49 4E 45 3A 20 22 3B 00 79 |RTING LINE: ";.y|
00000C60: 14 26 07 4D 58 B2 4D 45 3A 4E 4E B2 34 3A 8D 32 |.&.MX.ME:NN.4:.2|
00000C70: 38 39 30 3A 8B 45 58 A7 8E 00 86 14 30 07 4D 50 |890:.EX.....0.MP|
00000C80: B2 C5 28 4E 24 29 00 B5 14 3A 07 54 24 B2 22 20 |..(N$)...:.T$." |
00000C90: 20 20 20 20 20 20 20 20 12 2A 2A 2A 20 49 4E 53 | .*** INS|
00000CA0: 45 52 54 20 4C 49 4E 45 53 20 2A 2A 2A 92 22 3A |ERT LINES ***.":|
00000CB0: 8D 32 37 33 30 00 D0 14 44 07 8B 45 58 B2 31 A7 |.2730...D..EX.1.|
00000CC0: 49 B2 4D 50 3A 4A B2 31 3A 8D 32 30 35 30 3A 8E |I.MP:J.1:.2050:.|
00000CD0: 00 E0 14 4E 07 81 49 B2 4D 45 A4 4D 50 A9 AB 31 |...N..I.ME.MP..1|
00000CE0: 00 EB 14 58 07 81 4A B2 30 A4 36 00 01 15 62 07 |...X..J.0.6...b.|
00000CF0: 4D 25 28 49 AA 31 2C 4A 29 B2 4D 25 28 49 2C 4A |M%(I.1,J).M%(I,J|
00000D00: 29 00 0A 15 6C 07 82 4A 2C 49 00 23 15 76 07 8D |)...l..J,I.#.v..|
00000D10: 32 33 37 30 3A 20 8F 20 45 4E 54 45 52 20 43 48 |2370: . ENTER CH|
00000D20: 4F 52 44 00 5B 15 80 07 4D 45 B2 4D 45 AA 31 3A |ORD.[...ME.ME.1:|
00000D30: 8B 4D 45 B1 54 42 A7 4D 45 B2 54 42 3A 99 22 93 |.ME.TB.ME.TB:.".|
00000D40: 4F 55 54 20 4F 46 20 4D 45 4D 4F 52 59 22 3A 81 |OUT OF MEMORY":.|
00000D50: 49 B2 31 A4 35 30 30 3A 82 3A 8E 00 65 15 8A 07 |I.1.500:.:..e...|
00000D60: 89 31 38 36 30 00 6B 15 94 07 3A 00 71 15 9E 07 |.1860.k...:.q...|
00000D70: 3A 00 84 15 A8 07 8F 20 20 44 45 4C 45 54 45 20 |:...... DELETE |
00000D80: 4C 49 4E 45 00 8A 15 B2 07 3A 00 90 15 BC 07 3A |LINE.....:.....:|
00000D90: 00 B2 15 C6 07 99 22 93 11 11 44 45 4C 45 54 45 |......"...DELETE|
00000DA0: 20 53 54 41 52 54 49 4E 47 20 4C 49 4E 45 3A 20 | STARTING LINE: |
00000DB0: 22 3B 00 C8 15 D0 07 4D 58 B2 4D 45 3A 8D 32 38 |";.....MX.ME:.28|
00000DC0: 39 30 3A 8B 45 58 A7 8E 00 D4 15 DA 07 49 B2 C5 |90:.EX.......I..|
00000DD0: 28 4E 24 29 00 F9 15 E4 07 99 22 11 4E 55 4D 42 |(N$)......".NUMB|
00000DE0: 45 52 20 4F 46 20 4C 49 4E 45 53 20 54 4F 20 44 |ER OF LINES TO D|
00000DF0: 45 4C 45 54 45 3A 20 22 3B 00 11 16 EE 07 4D 58 |ELETE: ";.....MX|
00000E00: B2 4D 45 AB 49 3A 8D 32 38 39 30 3A 8B 45 58 A7 |.ME.I:.2890:.EX.|
00000E10: 8E 00 1D 16 F8 07 4A B2 C5 28 4E 24 29 00 2B 16 |......J..(N$).+.|
00000E20: 02 08 81 43 B2 49 A4 4D 45 AB 4A 00 36 16 0C 08 |...C.I.ME.J.6...|
00000E30: 81 4B B2 30 A4 36 00 4C 16 16 08 4D 25 28 43 2C |.K.0.6.L...M%(C,|
00000E40: 4B 29 B2 4D 25 28 43 AA 4A 2C 4B 29 00 55 16 20 |K).M%(C.J,K).U. |
00000E50: 08 82 4B 2C 43 00 61 16 2A 08 4D 45 B2 4D 45 AB |..K,C.a.*.ME.ME.|
00000E60: 4A 00 67 16 34 08 8E 00 6D 16 3E 08 3A 00 73 16 |J.g.4...m.>.:.s.|
00000E70: 48 08 3A 00 7F 16 52 08 8F 20 20 4C 49 53 54 00 |H.:...R.. LIST.|
00000E80: 85 16 5C 08 3A 00 8B 16 66 08 3A 00 AB 16 70 08 |..\.:...f.:...p.|
00000E90: 99 22 93 11 11 4C 49 53 54 20 53 54 41 52 54 49 |."...LIST STARTI|
00000EA0: 4E 47 20 4C 49 4E 45 3A 20 22 3B 00 CB 16 7A 08 |NG LINE: ";...z.|
00000EB0: 4D 58 B2 4D 45 3A 4E 4E B2 34 3A 8D 32 38 39 30 |MX.ME:NN.4:.2890|
00000EC0: 3A 8B 45 58 A7 4E 24 B2 22 30 22 00 D7 16 84 08 |:.EX.N$."0".....|
00000ED0: 49 B2 C5 28 4E 24 29 00 E1 16 8E 08 99 22 93 22 |I..(N$)......"."|
00000EE0: 3B 00 0F 17 98 08 54 24 B2 22 20 20 20 20 20 20 |;.....T$." |
00000EF0: 20 20 20 20 20 12 2A 2A 2A 20 4C 49 53 54 20 4D | .*** LIST M|
00000F00: 55 53 49 43 20 2A 2A 2A 22 3A 8D 32 37 33 30 00 |USIC ***":.2730.|
00000F10: 1D 17 A2 08 81 4A B2 49 A4 49 AA 31 39 00 2C 17 |.....J.I.I.19.,.|
00000F20: AC 08 8B 4A B2 4D 45 A7 32 33 30 30 00 49 17 B6 |...J.ME.2300.I..|
00000F30: 08 99 22 9E 12 22 C9 28 22 20 20 22 AA C4 28 4A |.."..".(" "..(J|
00000F40: 29 2C 33 29 22 92 9F 22 3B 00 54 17 C0 08 81 4B |),3)"..";.T....K|
00000F50: B2 30 A4 36 00 8C 17 CA 08 8B 4B AD 32 B3 B1 B5 |.0.6......K.2...|
00000F60: 28 4B AD 32 29 A7 99 A3 35 AA 28 4B AC 35 29 29 |(K.2)...5.(K.5))|
00000F70: 3B CA 28 4E 4F 24 2C 4D 25 28 4A 2C 4B 29 AC 32 |;.(NO$,M%(J,K).2|
00000F80: AA 31 2C 32 29 3B 3A 89 32 32 37 30 00 A4 17 D4 |.1,2);:.2270....|
00000F90: 08 99 A3 35 AA 28 4B AC 35 29 29 3B 4D 25 28 4A |...5.(K.5));M%(J|
00000FA0: 2C 4B 29 3B 00 AA 17 DE 08 82 00 B0 17 E8 08 99 |,K);............|
00000FB0: 00 B6 17 F2 08 82 00 E9 17 FC 08 99 22 11 20 20 |............". |
00000FC0: 12 99 20 50 52 45 53 53 20 53 50 41 43 45 20 46 |.. PRESS SPACE F|
00000FD0: 4F 52 20 4D 4F 52 45 2C 20 27 46 31 27 20 54 4F |OR MORE, 'F1' TO|
00000FE0: 20 45 58 49 54 20 92 22 3B 00 F7 17 06 09 8B 4A | EXIT .";......J|
00000FF0: B2 4D 45 A7 4A B2 30 00 FF 17 10 09 49 B2 4A 00 |.ME.J.0.....I.J.|
00001000: 07 18 1A 09 A1 41 24 00 18 18 24 09 8B 41 24 B2 |.....A$...$..A$.|
00001010: 22 20 22 A7 32 31 39 30 00 2A 18 2E 09 8B 41 24 |" ".2190.*....A$|
00001020: B3 B1 22 85 22 A7 32 33 33 30 00 30 18 38 09 8E |..".".2330.0.8..|
00001030: 00 54 18 42 09 99 22 12 9E 22 C9 28 22 20 20 20 |.T.B.."..".(" |
00001040: 20 22 AA C4 28 4D 50 29 2C 33 29 3B 22 92 9F 20 | "..(MP),3);".. |
00001050: 20 20 22 3B 00 79 18 4C 09 4E 4E B2 32 3A 4D 58 | ";.y.L.NN.2:MX|
00001060: B2 37 3A 8D 32 38 39 30 3A 8B 5A 5A B2 30 A7 99 |.7:.2890:.ZZ.0..|
00001070: 22 91 22 3A 89 32 33 37 30 00 86 18 56 09 8B 45 |".":.2370...V..E|
00001080: 58 A7 32 37 32 30 00 96 18 60 09 54 4D 28 30 29 |X.2720...`.TM(0)|
00001090: B2 C5 28 4E 24 29 00 A4 18 6A 09 99 A3 31 30 29 |..(N$)...j...10)|
000010A0: 22 91 22 3B 00 C0 18 74 09 4D 58 B2 32 35 36 3A |".";...t.MX.256:|
000010B0: 8D 32 38 39 30 3A 8B 5A 5A B2 30 A7 32 34 31 30 |.2890:.ZZ.0.2410|
000010C0: 00 CD 18 7E 09 8B 45 58 A7 32 37 32 30 00 E3 18 |...~..EX.2720...|
000010D0: 88 09 8D 32 37 37 30 3A 8B 49 B2 32 35 35 A7 32 |...2770:.I.255.2|
000010E0: 34 31 30 00 EF 18 92 09 54 4D 28 31 29 B2 49 00 |410.....TM(1).I.|
000010F0: FD 18 9C 09 99 A3 31 36 29 22 91 22 3B 00 17 19 |......16)".";...|
00001100: A6 09 4D 58 B2 37 3A 8D 32 38 39 30 3A 8B 5A 5A |..MX.7:.2890:.ZZ|
00001110: B2 30 A7 32 34 36 30 00 24 19 B0 09 8B 45 58 A7 |.0.2460.$....EX.|
00001120: 32 37 32 30 00 34 19 BA 09 54 4D 28 32 29 B2 C5 |2720.4...TM(2)..|
00001130: 28 4E 24 29 00 42 19 C4 09 99 A3 32 30 29 22 91 |(N$).B.....20)".|
00001140: 22 3B 00 5E 19 CE 09 4D 58 B2 32 35 36 3A 8D 32 |";.^...MX.256:.2|
00001150: 38 39 30 3A 8B 5A 5A B2 30 A7 32 35 30 30 00 6B |890:.ZZ.0.2500.k|
00001160: 19 D8 09 8B 45 58 A7 32 37 32 30 00 81 19 E2 09 |....EX.2720.....|
00001170: 8D 32 37 37 30 3A 8B 49 B2 32 35 35 A7 32 35 30 |.2770:.I.255.250|
00001180: 30 00 8D 19 EC 09 54 4D 28 33 29 B2 49 00 9B 19 |0.....TM(3).I...|
00001190: F6 09 99 A3 32 36 29 22 91 22 3B 00 B5 19 00 0A |....26)".";.....|
000011A0: 4D 58 B2 37 3A 8D 32 38 39 30 3A 8B 5A 5A B2 30 |MX.7:.2890:.ZZ.0|
000011B0: A7 32 35 35 30 00 C2 19 0A 0A 8B 45 58 A7 32 37 |.2550......EX.27|
000011C0: 32 30 00 D2 19 14 0A 54 4D 28 34 29 B2 C5 28 4E |20.....TM(4)..(N|
000011D0: 24 29 00 E0 19 1E 0A 99 A3 33 30 29 22 91 22 3B |$).......30)".";|
000011E0: 00 FC 19 28 0A 4D 58 B2 32 35 36 3A 8D 32 38 39 |...(.MX.256:.289|
000011F0: 30 3A 8B 5A 5A B2 30 A7 32 35 39 30 00 09 1A 32 |0:.ZZ.0.2590...2|
00001200: 0A 8B 45 58 A7 32 37 32 30 00 1F 1A 3C 0A 8D 32 |..EX.2720...<..2|
00001210: 37 37 30 3A 8B 49 B2 32 35 35 A7 32 35 39 30 00 |770:.I.255.2590.|
00001220: 2B 1A 46 0A 54 4D 28 35 29 B2 49 00 39 1A 50 0A |+.F.TM(5).I.9.P.|
00001230: 99 A3 33 35 29 22 91 22 3B 00 5A 1A 5A 0A 4D 58 |..35)".";.Z.Z.MX|
00001240: B2 32 35 35 3A 4E 4E B2 33 3A 8D 32 38 39 30 3A |.255:NN.3:.2890:|
00001250: 8B 5A 5A B2 30 A7 32 36 34 30 00 67 1A 64 0A 8B |.ZZ.0.2640.g.d..|
00001260: 45 58 A7 32 37 32 30 00 77 1A 6E 0A 54 4D 28 36 |EX.2720.w.n.TM(6|
00001270: 29 B2 C5 28 4E 24 29 00 93 1A 78 0A 81 49 B2 30 |)..(N$)...x..I.0|
00001280: A4 36 3A 4D 25 28 4D 50 2C 49 29 B2 54 4D 28 49 |.6:M%(MP,I).TM(I|
00001290: 29 3A 82 00 CB 1A 82 0A 4D 50 B2 4D 50 AA 31 3A |):......MP.MP.1:|
000012A0: 8B 4D 50 B1 54 42 A7 4D 50 B2 54 42 3A 99 22 93 |.MP.TB.MP.TB:.".|
000012B0: 4F 55 54 20 4F 46 20 4D 45 4D 4F 52 59 22 3A 81 |OUT OF MEMORY":.|
000012C0: 49 B2 31 A4 35 30 30 3A 82 3A 8E 00 D8 1A 8C 0A |I.1.500:.:......|
000012D0: 59 B2 C2 28 32 31 34 29 00 E8 1A 96 0A 8B 59 B2 |Y..(214)......Y.|
000012E0: 32 34 A7 8D 32 37 33 30 00 EE 1A A0 0A 8E 00 FB |24..2730........|
000012F0: 1A AA 0A 99 22 93 99 22 3B 54 24 00 2E 1B B4 0A |...."..";T$.....|
00001300: 99 22 12 4C 49 4E 45 20 56 4F 49 43 45 20 23 31 |.".LINE VOICE #1|
00001310: 20 20 56 4F 49 43 45 20 23 32 20 20 56 4F 49 43 | VOICE #2 VOIC|
00001320: 45 20 23 33 20 20 44 55 52 41 20 92 22 3B 00 61 |E #3 DURA .";.a|
00001330: 1B BE 0A 99 22 12 20 23 20 20 20 4F 43 54 20 4E |....". # OCT N|
00001340: 4F 54 45 20 20 4F 43 54 20 4E 4F 54 45 20 20 4F |OTE OCT NOTE O|
00001350: 43 54 20 4E 4F 54 45 20 20 54 49 4F 4E 20 92 22 |CT NOTE TION ."|
00001360: 3B 00 67 1B C8 0A 8E 00 75 1B D2 0A 4E 24 B2 4E |;.g.....u...N$.N|
00001370: 24 AA 22 20 22 00 83 1B DC 0A 81 49 B2 31 A4 32 |$." "......I.1.2|
00001380: 37 A9 32 00 A3 1B E6 0A 8B C8 28 4E 24 2C 32 29 |7.2.......(N$,2)|
00001390: B2 CA 28 4E 4F 24 2C 49 2C 32 29 A7 49 B2 49 AD |..(NO$,I,2).I.I.|
000013A0: 32 3A 8E 00 A9 1B F0 0A 82 00 B3 1B FA 0A 49 B2 |2:............I.|
000013B0: 32 35 35 00 B9 1B 04 0B 8E 00 BF 1B 0E 0B 3A 00 |255...........:.|
000013C0: C5 1B 18 0B 3A 00 DC 1B 22 0B 8F 20 49 4E 50 55 |....:...".. INPU|
000013D0: 54 20 53 55 42 52 4F 55 54 49 4E 45 00 25 1C 2C |T SUBROUTINE.%.,|
000013E0: 0B 8F 20 4E 24 3D 20 53 54 52 49 4E 47 20 52 45 |.. N$= STRING RE|
000013F0: 54 55 52 4E 45 44 20 20 4D 58 3D 20 48 49 47 48 |TURNED MX= HIGH|
00001400: 20 23 20 41 4C 4C 4F 57 45 44 20 4E 4E 3D 20 4E | # ALLOWED NN= N|
00001410: 55 4D 42 45 52 20 4F 46 20 4B 45 59 53 20 41 4C |UMBER OF KEYS AL|
00001420: 4C 4F 57 45 44 00 2B 1C 36 0B 3A 00 31 1C 40 0B |LOWED.+.6.:.1.@.|
00001430: 3A 00 45 1C 4A 0B 4E 24 B2 22 22 3A 5A 5A B2 30 |:.E.J.N$."":ZZ.0|
00001440: 3A 45 58 B2 30 00 50 1C 54 0B 99 22 A6 9D 22 3B |:EX.0.P.T.."..";|
00001450: 00 64 1C 5E 0B A1 41 24 3A 8B 41 24 B2 22 22 A7 |.d.^..A$:.A$."".|
00001460: 32 39 31 30 00 7C 1C 68 0B 8B 41 24 B2 22 85 22 |2910.|.h..A$."."|
00001470: A7 45 58 B2 31 3A 5A 5A B2 31 3A 8E 00 AB 1C 72 |.EX.1:ZZ.1:....r|
00001480: 0B 8B 41 24 B2 C7 28 32 30 29 AF C3 28 4E 24 29 |..A$..(20)..(N$)|
00001490: A7 99 22 20 9D 9D 20 9D 22 3B 3A 4E 24 B2 C8 28 |.." .. .";:N$..(|
000014A0: 4E 24 2C C3 28 4E 24 29 AB 31 29 00 C0 1C 7C 0B |N$,.(N$).1)...|.|
000014B0: 8B 41 24 B2 C7 28 31 33 29 A7 99 22 20 22 3A 8E |.A$..(13).." ":.|
000014C0: 00 DA 1C 86 0B 8B 41 24 B1 B2 22 30 22 AF 41 24 |......A$.."0".A$|
000014D0: B3 B2 22 39 22 A7 32 39 38 30 00 0B 1D 90 0B 8B |.."9".2980......|
000014E0: 28 41 24 B1 B2 22 41 22 AF 41 24 B3 B2 22 47 22 |(A$.."A".A$.."G"|
000014F0: 29 B0 41 24 B2 22 23 22 B0 41 24 B2 22 52 22 B0 |).A$."#".A$."R".|
00001500: 41 24 B2 22 4D 22 A7 32 39 38 30 00 15 1D 9A 0B |A$."M".2980.....|
00001510: 89 32 39 30 30 00 2F 1D A4 0B 4E 24 B2 4E 24 AA |.2900./...N$.N$.|
00001520: 41 24 3A 5A 5A B2 5A 5A AA 31 3A 99 41 24 3B 00 |A$:ZZ.ZZ.1:.A$;.|
00001530: 5A 1D AE 0B 8B 4D 58 B3 B1 32 35 36 AF C5 28 4E |Z....MX..256..(N|
00001540: 24 29 B1 4D 58 A7 99 C9 28 44 4C 24 2C C3 28 4E |$).MX...(DL$,.(N|
00001550: 24 29 29 3B 3A 89 32 38 39 30 00 7A 1D B8 0B 8B |$));:.2890.z....|
00001560: 5A 5A B1 4E 4E A7 99 C9 28 44 4C 24 2C C3 28 4E |ZZ.NN...(DL$,.(N|
00001570: 24 29 29 3B 3A 89 32 38 39 30 00 84 1D C2 0B 89 |$));:.2890......|
00001580: 32 39 30 30 00 8A 1D CC 0B 3A 00 90 1D D6 0B 3A |2900.....:.....:|
00001590: 00 A1 1D E0 0B 8F 20 53 45 54 20 55 50 20 53 49 |...... SET UP SI|
000015A0: 44 00 A7 1D EA 0B 3A 00 AD 1D F4 0B 3A 00 D5 1D |D.....:.....:...|
000015B0: FE 0B 99 22 93 20 20 20 20 20 20 20 20 20 20 12 |...". .|
000015C0: 99 2A 2A 2A 20 53 45 54 20 55 50 20 53 49 44 20 |.*** SET UP SID |
000015D0: 2A 2A 2A 92 22 00 05 1E 08 0C 99 22 13 22 3B 3A |***."......".";:|
000015E0: 81 56 4F B2 30 A4 31 34 A9 37 3A 99 22 11 99 56 |.VO.0.14.7:."..V|
000015F0: 4F 49 43 45 20 23 22 56 4F AD 37 AA 31 3A 8D 33 |OICE #"VO.7.1:.3|
00001600: 31 37 30 3A 82 00 30 1E 12 0C 99 22 11 9F 56 4F |170:..0...."..VO|
00001610: 4C 55 4D 45 20 20 20 20 12 9E 22 3B 53 49 44 28 |LUME ..";SID(|
00001620: 32 34 29 AF 31 35 3B 22 9D 20 92 9F 3D 20 22 3B |24).15;". ..= ";|
00001630: 00 4B 1E 1C 0C 4D 58 B2 31 35 3A 4E 4E B2 32 3A |.K...MX.15:NN.2:|
00001640: 8D 32 38 39 30 3A 8B 45 58 A7 99 00 64 1E 26 0C |.2890:.EX...d.&.|
00001650: 8B 5A 5A B3 B1 30 A7 53 49 44 28 32 34 29 B2 C5 |.ZZ..0.SID(24)..|
00001660: 28 4E 24 29 00 88 1E 30 0C 99 22 11 99 53 45 54 |(N$)...0.."..SET|
00001670: 55 50 20 43 4F 52 52 45 43 54 20 3F 9F 20 28 59 |UP CORRECT ?. (Y|
00001680: 2F 4E 29 20 A6 9D 22 3B 00 A4 1E 3A 0C A1 41 24 |/N) ..";...:..A$|
00001690: 3A 8B 41 24 B2 22 4E 22 A7 99 22 20 22 3B 3A 89 |:.A$."N".." ";:.|
000016A0: 33 30 38 30 00 B2 1E 44 0C 8B 41 24 B2 22 59 22 |3080...D..A$."Y"|
000016B0: A7 8E 00 C0 1E 4E 0C 8B 41 24 B2 22 85 22 A7 8E |.....N..A$."."..|
000016C0: 00 CA 1E 58 0C 89 33 31 33 30 00 FD 1E 62 0C 99 |...X..3130...b..|
000016D0: 22 9F 41 54 54 41 43 4B 20 20 20 20 12 9E 22 B5 |".ATTACK ..".|
000016E0: 28 53 49 44 28 56 4F AA 35 29 AD 31 36 29 22 9D |(SID(VO.5).16)".|
000016F0: 20 92 9F 3D 20 20 20 20 9D 9D 9D 22 3B 00 0C 1F | ..= ...";...|
00001700: 6C 0C 4D 58 B2 31 35 3A 4E 4E B2 32 00 1F 1F 76 |l.MX.15:NN.2...v|
00001710: 0C 8D 32 38 39 30 3A 8B 45 58 A7 99 22 20 22 00 |..2890:.EX.." ".|
00001720: 4C 1F 80 0C 8B 5A 5A B3 B1 30 A7 53 49 44 28 56 |L....ZZ..0.SID(V|
00001730: 4F AA 35 29 B2 28 53 49 44 28 56 4F AA 35 29 AF |O.5).(SID(VO.5).|
00001740: 31 35 29 B0 C5 28 4E 24 29 AC 31 36 00 7C 1F 8A |15)..(N$).16.|..|
00001750: 0C 99 22 9F 44 45 43 41 59 20 20 20 20 20 12 9E |..".DECAY ..|
00001760: 22 53 49 44 28 56 4F AA 35 29 AF 31 35 22 9D 20 |"SID(VO.5).15". |
00001770: 92 9F 3D 20 20 20 20 9D 9D 9D 22 3B 00 8F 1F 94 |..= ...";....|
00001780: 0C 8D 32 38 39 30 3A 8B 45 58 A7 99 22 20 22 00 |..2890:.EX.." ".|
00001790: B8 1F 9E 0C 8B 5A 5A B3 B1 30 A7 53 49 44 28 56 |.....ZZ..0.SID(V|
000017A0: 4F AA 35 29 B2 53 49 44 28 56 4F AA 35 29 AF 32 |O.5).SID(VO.5).2|
000017B0: 34 30 B0 C5 28 4E 24 29 00 EB 1F A8 0C 99 22 9F |40..(N$)......".|
000017C0: 53 55 53 54 41 49 4E 20 20 20 12 9E 22 B5 28 53 |SUSTAIN ..".(S|
000017D0: 49 44 28 56 4F AA 36 29 AD 31 36 29 22 9D 20 92 |ID(VO.6).16)". .|
000017E0: 9F 3D 20 20 20 20 9D 9D 9D 22 3B 00 FE 1F B2 0C |.= ...";.....|
000017F0: 8D 32 38 39 30 3A 8B 45 58 A7 99 22 20 22 00 2B |.2890:.EX.." ".+|
00001800: 20 BC 0C 8B 5A 5A B3 B1 30 A7 53 49 44 28 56 4F | ...ZZ..0.SID(VO|
00001810: AA 36 29 B2 28 53 49 44 28 56 4F AA 36 29 AF 31 |.6).(SID(VO.6).1|
00001820: 35 29 B0 C5 28 4E 24 29 AC 31 36 00 5B 20 C6 0C |5)..(N$).16.[ ..|
00001830: 99 22 9F 52 45 4C 45 41 53 45 20 20 20 12 9E 22 |.".RELEASE .."|
00001840: 53 49 44 28 56 4F AA 36 29 AF 31 35 22 9D 20 92 |SID(VO.6).15". .|
00001850: 9F 3D 20 20 20 20 9D 9D 9D 22 3B 00 6E 20 D0 0C |.= ...";.n ..|
00001860: 8D 32 38 39 30 3A 8B 45 58 A7 99 22 20 22 00 97 |.2890:.EX.." "..|
00001870: 20 DA 0C 8B 5A 5A B3 B1 30 A7 53 49 44 28 56 4F | ...ZZ..0.SID(VO|
00001880: AA 36 29 B2 53 49 44 28 56 4F AA 36 29 AF 32 34 |.6).SID(VO.6).24|
00001890: 30 B0 C5 28 4E 24 29 00 AD 20 E4 0C 99 22 9F 57 |0..(N$).. ...".W|
000018A0: 41 56 45 46 4F 52 4D 20 20 12 9E 22 3B 00 C3 20 |AVEFORM ..";.. |
000018B0: EE 0C 49 B2 B5 28 53 49 44 28 56 4F AA 34 29 AD |..I..(SID(VO.4).|
000018C0: 31 36 29 00 ED 20 F8 0C 99 CA 28 22 53 41 57 54 |16).. ....("SAWT|
000018D0: 52 49 50 55 4C 4E 4F 49 22 2C 28 BC 28 49 29 AD |RIPULNOI",(.(I).|
000018E0: BC 28 32 29 AC 33 29 AA 31 2C 33 29 3B 00 24 21 |.(2).3).1,3);.$!|
000018F0: 02 0D 99 22 92 9F 3D 20 20 20 20 20 20 20 20 20 |..."..= |
00001900: 20 20 20 20 20 20 20 20 20 20 20 20 9D 9D 9D 9D | ....|
00001910: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |................|
00001920: A6 9D 22 3B 00 3F 21 0C 0D A1 41 24 3A 8B 41 24 |..";.?!...A$:.A$|
00001930: B2 22 85 22 A7 99 22 20 22 3A 89 33 34 36 30 00 |.".".." ":.3460.|
00001940: 4A 21 16 0D 81 49 B2 31 A4 34 00 65 21 20 0D 8B |J!...I.1.4.e! ..|
00001950: 41 24 B2 CA 28 22 53 54 50 4E 22 2C 49 2C 31 29 |A$..("STPN",I,1)|
00001960: A7 33 33 39 30 00 7E 21 2A 0D 8B 41 24 B2 C7 28 |.3390.~!*..A$..(|
00001970: 31 33 29 A7 99 22 20 22 3A 89 33 34 36 30 00 8A |13).." ":.3460..|
00001980: 21 34 0D 82 3A 89 33 33 34 30 00 AC 21 3E 0D 99 |!4..:.3340..!>..|
00001990: CA 28 22 53 41 57 54 52 49 50 55 4C 4E 4F 49 22 |.("SAWTRIPULNOI"|
000019A0: 2C 28 33 AC 49 29 AB 32 2C 33 29 3B 00 C7 21 48 |,(3.I).2,3);..!H|
000019B0: 0D 53 49 44 28 56 4F AA 34 29 B2 32 AE 28 49 AB |.SID(VO.4).2.(I.|
000019C0: 31 29 AC 31 36 AA 31 00 D9 21 52 0D 8B 49 B3 B1 |1).16.1..!R..I..|
000019D0: 33 A7 99 3A 89 33 34 36 30 00 EA 21 5C 0D 99 22 |3..:.3460..!\.."|
000019E0: 20 44 55 52 2E 20 12 9E 22 3B 00 10 22 66 0D 99 | DUR. ..";.."f..|
000019F0: 53 49 44 28 56 4F AA 33 29 AC 32 35 36 AA 53 49 |SID(VO.3).256.SI|
00001A00: 44 28 56 4F AA 32 29 22 9D 20 92 9F 3D 20 22 3B |D(VO.2)". ..= ";|
00001A10: 00 32 22 70 0D 4D 58 B2 34 30 39 35 3A 4E 4E B2 |.2"p.MX.4095:NN.|
00001A20: 34 3A 8D 32 38 39 30 3A 8B 5A 5A B2 30 A7 33 34 |4:.2890:.ZZ.0.34|
00001A30: 36 30 00 6A 22 7A 0D 4E B2 C5 28 4E 24 29 3A 53 |60.j"z.N..(N$):S|
00001A40: 49 44 28 56 4F AA 32 29 B2 4E AB 32 35 36 AC B5 |ID(VO.2).N.256..|
00001A50: 28 4E AD 32 35 36 29 3A 53 49 44 28 56 4F AA 33 |(N.256):SID(VO.3|
00001A60: 29 B2 B5 28 4E AD 32 35 36 29 00 70 22 84 0D 8E |)..(N.256).p"...|
00001A70: 00 76 22 8E 0D 3A 00 7C 22 98 0D 3A 00 95 22 A2 |.v"..:.|"..:..".|
00001A80: 0D 8F 20 53 41 56 45 2F 4C 4F 41 44 20 52 4F 55 |.. SAVE/LOAD ROU|
00001A90: 54 49 4E 45 53 00 9B 22 AC 0D 3A 00 A1 22 B6 0D |TINES.."..:.."..|
00001AA0: 3A 00 EA 22 C0 0D 83 31 36 39 2C 30 2C 31 33 33 |:.."...169,0,133|
00001AB0: 2C 32 35 31 2C 31 36 39 2C 31 39 32 2C 31 33 33 |,251,169,192,133|
00001AC0: 2C 32 35 32 2C 31 36 39 2C 32 35 31 2C 31 36 36 |,252,169,251,166|
00001AD0: 2C 32 35 33 2C 31 36 34 2C 32 35 34 2C 33 32 2C |,253,164,254,32,|
00001AE0: 32 31 36 2C 32 35 35 2C 39 36 00 23 23 CA 0D 83 |216,255,96.##...|
00001AF0: 31 36 39 2C 30 2C 31 36 32 2C 32 35 35 2C 31 36 |169,0,162,255,16|
00001B00: 30 2C 32 35 35 2C 33 32 2C 32 31 33 2C 32 35 35 |0,255,32,213,255|
00001B10: 2C 31 33 34 2C 32 35 31 2C 31 33 32 2C 32 35 32 |,134,251,132,252|
00001B20: 2C 39 36 00 29 23 D4 0D 3A 00 2F 23 DE 0D 3A 00 |,96.)#..:./#..:.|
00001B30: 4D 23 E8 0D 8F 20 42 41 43 4B 47 52 4F 55 4E 44 |M#... BACKGROUND|
00001B40: 20 4D 55 53 49 43 20 50 4C 41 59 45 52 00 53 23 | MUSIC PLAYER.S#|
00001B50: F2 0D 3A 00 59 23 FC 0D 3A 00 9D 23 06 0E 83 31 |..:.Y#..:..#...1|
00001B60: 32 30 2C 31 37 33 2C 32 30 2C 33 2C 32 30 31 2C |20,173,20,3,201,|
00001B70: 34 39 2C 32 30 38 2C 32 38 2C 31 36 39 2C 30 2C |49,208,28,169,0,|
00001B80: 31 34 31 2C 32 35 35 2C 33 2C 31 36 39 2C 35 31 |141,255,3,169,51|
00001B90: 2C 31 34 31 2C 32 30 2C 33 2C 31 36 39 00 DF 23 |,141,20,3,169..#|
00001BA0: 10 0E 83 31 39 32 2C 31 34 31 2C 32 31 2C 33 2C |...192,141,21,3,|
00001BB0: 31 36 39 2C 36 37 2C 31 33 33 2C 32 35 31 2C 31 |169,67,133,251,1|
00001BC0: 36 39 2C 31 39 33 2C 31 33 33 2C 32 35 32 2C 33 |69,193,133,252,3|
00001BD0: 32 2C 31 31 32 2C 31 39 32 2C 38 38 2C 39 36 00 |2,112,192,88,96.|
00001BE0: 22 24 1A 0E 83 31 36 39 2C 34 39 2C 31 34 31 2C |"$...169,49,141,|
00001BF0: 32 30 2C 33 2C 31 36 39 2C 32 33 34 2C 31 34 31 |20,3,169,234,141|
00001C00: 2C 32 31 2C 33 2C 33 32 2C 32 30 36 2C 31 39 32 |,21,3,32,206,192|
00001C10: 2C 38 38 2C 39 36 2C 38 2C 37 32 2C 31 33 38 2C |,88,96,8,72,138,|
00001C20: 37 32 00 65 24 24 0E 83 31 35 32 2C 37 32 2C 31 |72.e$$..152,72,1|
00001C30: 37 33 2C 32 35 35 2C 33 2C 32 34 30 2C 33 30 2C |73,255,3,240,30,|
00001C40: 32 30 31 2C 31 2C 32 30 38 2C 31 31 2C 33 32 2C |201,1,208,11,32,|
00001C50: 31 39 37 2C 31 39 32 2C 31 36 39 2C 30 2C 31 34 |197,192,169,0,14|
00001C60: 31 2C 32 35 35 00 A9 24 2E 0E 83 33 2C 37 36 2C |1,255..$...3,76,|
00001C70: 39 32 2C 31 39 32 2C 32 30 31 2C 32 2C 32 30 38 |92,192,201,2,208|
00001C80: 2C 32 32 2C 33 32 2C 32 30 36 2C 31 39 32 2C 31 |,22,32,206,192,1|
00001C90: 36 39 2C 33 2C 31 34 31 2C 32 35 35 2C 33 2C 37 |69,3,141,255,3,7|
00001CA0: 36 2C 31 30 33 2C 31 39 32 00 EC 24 38 0E 83 32 |6,103,192..$8..2|
00001CB0: 30 36 2C 34 31 2C 31 39 33 2C 32 30 38 2C 33 2C |06,41,193,208,3,|
00001CC0: 33 32 2C 31 31 32 2C 31 39 32 2C 33 32 2C 32 31 |32,112,192,32,21|
00001CD0: 37 2C 31 39 32 2C 31 30 34 2C 31 36 38 2C 31 30 |7,192,104,168,10|
00001CE0: 34 2C 31 37 30 2C 31 30 34 2C 34 30 00 2F 25 42 |4,170,104,40./%B|
00001CF0: 0E 83 37 36 2C 34 39 2C 32 33 34 2C 31 36 30 2C |..76,49,234,160,|
00001D00: 30 2C 31 36 32 2C 30 2C 31 37 37 2C 32 35 31 2C |0,162,0,177,251,|
00001D10: 32 30 31 2C 31 33 2C 32 34 30 2C 34 33 2C 31 38 |201,13,240,43,18|
00001D20: 39 2C 34 36 2C 31 39 33 2C 34 31 2C 32 35 34 00 |9,46,193,41,254.|
00001D30: 65 25 4C 0E 83 31 35 37 2C 34 36 2C 31 39 33 2C |e%L..157,46,193,|
00001D40: 31 36 39 2C 38 2C 31 35 37 2C 34 2C 32 31 32 2C |169,8,157,4,212,|
00001D50: 31 37 37 2C 32 35 31 2C 32 30 31 2C 31 32 2C 32 |177,251,201,12,2|
00001D60: 34 30 2C 32 34 00 93 25 56 0E 83 31 38 39 2C 34 |40,24..%V..189,4|
00001D70: 36 2C 31 39 33 2C 39 2C 31 2C 31 35 37 2C 34 36 |6,193,9,1,157,46|
00001D80: 2C 31 39 33 2C 33 32 2C 32 32 39 2C 31 39 32 2C |,193,32,229,192,|
00001D90: 31 37 33 00 DD 25 60 0E 83 34 30 2C 31 39 33 2C |173..%`..40,193,|
00001DA0: 31 35 37 2C 34 32 2C 31 39 33 2C 32 33 34 2C 31 |157,42,193,234,1|
00001DB0: 37 33 2C 33 39 2C 31 39 33 2C 31 35 37 2C 34 33 |73,39,193,157,43|
00001DC0: 2C 31 39 33 2C 31 33 38 2C 32 34 2C 31 30 35 2C |,193,138,24,105,|
00001DD0: 37 2C 31 37 30 2C 32 30 30 2C 31 39 32 00 F4 25 |7,170,200,192..%|
00001DE0: 6A 0E 83 33 2C 32 30 38 2C 31 39 37 2C 31 37 37 |j..3,208,197,177|
00001DF0: 2C 32 35 31 00 39 26 74 0E 83 31 34 31 2C 34 31 |,251.9&t..141,41|
00001E00: 2C 31 39 33 2C 32 34 2C 31 36 35 2C 32 35 31 2C |,193,24,165,251,|
00001E10: 31 30 35 2C 34 2C 31 33 33 2C 32 35 31 2C 31 34 |105,4,133,251,14|
00001E20: 34 2C 32 2C 32 33 30 2C 32 35 32 2C 31 36 30 2C |4,2,230,252,160,|
00001E30: 33 2C 31 37 37 2C 32 35 31 00 7D 26 7E 0E 83 32 |3,177,251.}&~..2|
00001E40: 30 38 2C 38 2C 31 36 39 2C 36 37 2C 31 33 33 2C |08,8,169,67,133,|
00001E50: 32 35 31 2C 31 36 39 2C 31 39 33 2C 31 33 33 2C |251,169,193,133,|
00001E60: 32 35 32 2C 39 36 2C 31 36 30 2C 32 34 2C 31 36 |252,96,160,24,16|
00001E70: 39 2C 30 2C 31 35 33 2C 30 2C 32 31 32 00 BE 26 |9,0,153,0,212..&|
00001E80: 88 0E 83 31 33 36 2C 31 36 2C 32 35 30 2C 39 36 |...136,16,250,96|
00001E90: 2C 31 36 30 2C 32 34 2C 31 38 35 2C 34 32 2C 31 |,160,24,185,42,1|
00001EA0: 39 33 2C 31 35 33 2C 30 2C 32 31 32 2C 31 33 36 |93,153,0,212,136|
00001EB0: 2C 31 36 2C 32 34 37 2C 39 36 2C 31 33 38 00 04 |,16,247,96,138..|
00001EC0: 27 92 0E 83 37 32 2C 31 37 37 2C 32 35 31 2C 34 |'...72,177,251,4|
00001ED0: 31 2C 31 35 2C 31 30 2C 31 37 30 2C 31 38 39 2C |1,15,10,170,189,|
00001EE0: 31 35 2C 31 39 33 2C 31 34 31 2C 33 39 2C 31 39 |15,193,141,39,19|
00001EF0: 33 2C 32 33 32 2C 31 38 39 2C 31 35 2C 31 39 33 |3,232,189,15,193|
00001F00: 2C 31 34 31 00 46 27 9C 0E 83 34 30 2C 31 39 33 |,141.F'...40,193|
00001F10: 2C 31 37 37 2C 32 35 31 2C 37 34 2C 37 34 2C 37 |,177,251,74,74,7|
00001F20: 34 2C 37 34 2C 31 37 30 2C 32 34 30 2C 39 2C 31 |4,74,170,240,9,1|
00001F30: 34 2C 34 30 2C 31 39 33 2C 34 36 2C 33 39 2C 31 |4,40,193,46,39,1|
00001F40: 39 33 2C 32 30 32 00 85 27 A6 0E 83 32 30 38 2C |93,202..'...208,|
00001F50: 32 34 37 2C 31 30 34 2C 31 37 30 2C 39 36 2C 31 |247,104,170,96,1|
00001F60: 2C 31 32 2C 31 2C 32 38 2C 31 2C 34 35 2C 31 2C |,12,1,28,1,45,1,|
00001F70: 36 32 2C 31 2C 38 31 2C 31 2C 31 30 32 2C 31 2C |62,1,81,1,102,1,|
00001F80: 31 32 33 2C 31 00 AE 27 B0 0E 83 31 34 35 2C 31 |123,1..'...145,1|
00001F90: 2C 31 36 39 2C 31 2C 31 39 35 2C 31 2C 32 32 31 |,169,1,195,1,221|
00001FA0: 2C 31 2C 32 35 30 2C 30 2C 30 2C 30 2C 30 00 00 |,1,250,0,0,0,0..|
00001FB0: 00 |. |
..'.D.. BACKGROUND MUSIC PLAYER VER 1.0.
A.N.. GARY DAVIS 11/25/83.G.X.:.J....M%(
940,6),SID(24):ME.0:TB.940.....NO$."C C#
D D#E F F#G G#A A#B R M "......53280,14:
.53281,0.U. ..".... .BACKGROUND M
USIC EDITOR."......".. .SETT
ING UP..."......AD.679.710:.DA:.AD,DA:..
8....AD.49152.49450:.DA:.AD,DA:..T.H..I.
0.16:DL$.DL$.G(20):..N.R..I.4.18.7:SID(I
).17:..T...:.Z...:...... MAIN MENU.....
:.....:......".. ..*** MAIN ME
NU ***."......"..".11)"..1. .EDITOR...".
.".".11)"..2. .COPY MUSIC DATA". .,.."."
.11)"..3. .TOGGLE MUSIC".D.6..".".11)"..
4. .LOAD/SAVE MUSIC".].@..".".11)"..5. .
EXIT"...J..A$:A.F(A$.G(0)):.A.48.A.53.33
0. .T..A.48.380,530,750,820,1420...^..27
0...H.:...R.:.H.|.. EDITOR MENU.N...:.T
...:......".. ..*** EDITOR MENU
***."......"..".11)"..1. .SET UP SID".=
....".".11)"..2. .ADD TO END".^....".".1
1)"..3. .INSERT LINES".Y.B..".".11)"..4.
.DELETE"...L..".".11)"..5. .REPLACE"...
V..".".11)"..6. .LIST".G....".".11)"..7.
.EXIT"......A$:A.F(A$.G(0)):.A$.".".A.5
5........A.48.A.54.490.&....A.48.3070,15
80,1820,1990,1690,2160./....410.Y...."..
.COPYING MUSIC DATA TO MEMORY...".F...AD
.49450.R.&..I.0.24...0..AD,SID(I)...:.AD
.AD.1...D.....N..I.0.ME...X..J.0.4.2.J.B
.DA.(M%(I,J).16).M%(I,J.1).U.L..AD,DA...
V.AD.AD.1......J......AD,M%(I,6).....AD.
AD.1......I."....I.AD.AD.4:.AD,0:..(....
.....:.4.F.:.I.P.. TOGGLE ON/OFF.O.Z.:.
U...:.`....49152.F.....L...:.R...:......
LOAD/SAVE... .:...*.:...4.."...SAVE OR
LOAD (S/L) : ..";...>.SL.1.X.H..A$:.A$.
"S".."SAVE":.880...R..A$.".". ....\.. A$
.."L".840...F.SL.0:."LOAD"...P.DEV.1.6.Z
.."..TAPE OR DISK (T/D) : ..";.S....A$:.
A$."T".."TAPE":.940.A....A$."."...R....A
$.."D".900.....DEV.8:."DISK". ....1,0:."
..FILE NAME : ";......1,N$..... 1...J...
H.T..1,DEV,SL,N$.W....SL.0.1100.....I.49
480.((ME.1).4)......254,.(I.256):.253,(I
.256..(I.256)).256.C...."..COPYING MUSIC
DATA TO MEMORY...".L....540.]....679: .
SAVE.D... 1.P.$..ST.0........:."..SAVE
ERROR."...8..1340...B.....L..697: . LOAD
...V. 1...`..ST..66.1160.X.J..:."...LOAD
ERROR."...T..1340...~........:."..READI
NG MUSIC INTO EDITOR...".5...ME.((B(252)
.256.B(251).49484).4).B...AD.49450.N....
I.0.24._...SID(I).B(AD).K...AD.AD.1.Q.D.
..}.N..I.0.ME...X..J.0.4.2.....DA.B(AD).
....AD.AD.1.....M%(I,J)..(DA.16).L...M%(
I,J.1).DA.15.S....J.....M%(I,6).B(AD)...
..AD.AD.1...(.....2.....<..DEV.1.1370.(.
F..15,8,15:.15,A$,B$: 15.D.P.."..DISK ER
ROR #";A$,B$.I.Z.."...PRESS ANY KEY TO C
ONTINUE.".}.D..A$:.A$."".1380...N.....X.
:.....:...... EXIT.....:... .:.Q...."..
.EXIT---> ARE YOU SURE (Y/N)?: ."......A
$:. A$."N". .......A$.."Y".1460.'.H..B(7
88)..49..49152:. MAKE SURE MUSIC IS OFF.
8.R.."... ";.Z....".MUSIC DATA IS LO
CATED BETWEEN:.":.". 49152 AND
";......49479.(ME.4)...........:.....:..
.... ADD TO END.....:...".:...,.T$."
.*** ADD TO END ***.":.2730...6.
MP.ME...@..2370: . ENTER CHORD...J..EX.0
.1600.'.T.ME.MP.-.^...3.H.:.9.R.:.H.|..
REPLACE.N...:.T...:.W...."...REPLACE ST
ARTING LINE: ";.....MX.ME:NN.4:.2890:.EX
.1750.....MP.E(N$).R...T$." .***
REPLACE LINES ***.":.2730...B..2370: .
ENTER CHORD...L..EX.0.1730...V..MP.ME.ME
.MP...........:.....:.0.... INSERT LINE
.6...:.<...:.^...."...INSERT STARTING LI
NE: ";.Y.&.MX.ME:NN.4:.2890:.EX.....0.MP
.E(N$)...:.T$." .*** INSERT LINE
S ***.":.2730.P.D..EX.1.I.MP:J.1:.2050:.
...N..I.ME.MP..1...X..J.0.6...B.M%(I.1,J
).M%(I,J)...L..J,I.#.V..2370: . ENTER CH
ORD.[...ME.ME.1:.ME.TB.ME.TB:.".OUT OF M
EMORY":.I.1.500:.:..E....1860.K...:.Q...
:...... DELETE LINE.....:.....:...F..".
..DELETE STARTING LINE: ";.H.P.MX.ME:.28
90:.EX...T.Z.I.E(N$)......".NUMBER OF LI
NES TO DELETE: ";.....MX.ME.I:.2890:.EX.
......J.E(N$).+....C.I.ME.J.6....K.0.6.L
...M%(C,K).M%(C.J,K).U. ..K,C.A.*.ME.ME.
J.G.4...M.>.:.S.H.:..R.. LIST...\.:...
F.:...P.."...LIST STARTING LINE: ";.K.Z.
MX.ME:NN.4:.2890:.EX.N$."0".W...I.E(N$).
.....".";.....T$." .*** LIST M
USIC ***":.2730......J.I.I.19.,....J.ME.
2300.I....".."I(" ".D(J),3)"..";.T....K
.0.6...J..K.2...(K.2)...5.(K.5));J(NO$,M
%(J,K).2.1,2);:.2270...T...5.(K.5));M%(J
,K);........................". .. PRESS
SPACE FOR MORE, 'F1' TO EXIT .";......J
.ME.J.0.....I.J......A$...$..A$." ".2190
.*....A$..".".2330.0.8...T.B..".."I("
".D(MP),3);".. ";.Y.L.NN.2:MX.7:.2890
:.ZZ.0..".":.2370...V..EX.2720...`.TM(0)
.E(N$)...J...10)".";...T.MX.256:.2890:.Z
Z.0.2410.M.~..EX.2720......2770:.I.255.2
410.....TM(1).I.......16)".";.....MX.7:.
2890:.ZZ.0.2460.$....EX.2720.4...TM(2).E
(N$).B.D...20)".";.^.N.MX.256:.2890:.ZZ.
0.2500.K.X..EX.2720......2770:.I.255.250
0.....TM(3).I.......26)".";.....MX.7:.28
90:.ZZ.0.2550.B....EX.2720.R...TM(4).E(N
$).......30)".";...(.MX.256:.2890:.ZZ.0.
2590...2..EX.2720...<..2770:.I.255.2590.
+.F.TM(5).I.9.P...35)".";.Z.Z.MX.255:NN.
3:.2890:.ZZ.0.2640.G.D..EX.2720.W.N.TM(6
).E(N$)...X..I.0.6:M%(MP,I).TM(I):..K...
MP.MP.1:.MP.TB.MP.TB:.".OUT OF MEMORY":.
I.1.500:.:..X...Y.B(214)......Y.24..2730
... ........"..";T$......".LINE VOICE #1
VOICE #2 VOICE #3 DURA .";.A....". #
OCT NOTE OCT NOTE OCT NOTE TION ."
;.G.H...U.R.N$.N$." "......I.1.27.2.....
.H(N$,2).J(NO$,I,2).I.I.2:............I.
255...........:.E...:...".. INPUT SUBROU
TINE.%.,.. N$= STRING RETURNED MX= HIGH
# ALLOWED NN= NUMBER OF KEYS ALLOWED.+.
6.:.1.@.:.E.J.N$."":ZZ.0:EX.0.P.T.."..";
.D.^..A$:.A$."".2910.|.H..A$.".".EX.1:ZZ
.1:....R..A$.G(20).C(N$).." .. .";:N$.H(
N$,C(N$).1)...|..A$.G(13).." ":..Z....A$
.."0".A$.."9".2980......(A$.."A".A$.."G"
).A$."#".A$."R".A$."M".2980......2900./.
..N$.N$.A$:ZZ.ZZ.1:.A$;.Z....MX..256.E(N
$).MX..I(DL$,C(N$));:.2890.Z....ZZ.NN..I
(DL$,C(N$));:.2890...B..2900...L.:...V.:
...... SET UP SID.....:.....:.U....".
..*** SET UP SID ***."......".";:
.VO.0.14.7:."..VOICE #"VO.7.1:.3170:..0.
..."..VOLUME ..";SID(24).15;". ..= ";
.K...MX.15:NN.2:.2890:.EX...D.&..ZZ..0.S
ID(24).E(N$)...0.."..SETUP CORRECT ?. (Y
/N) ..";...:..A$:.A$."N".." ";:.3080...D
..A$."Y".....N..A$."."...J.X..3130...B..
".ATTACK ..".(SID(VO.5).16)". ..=
...";...L.MX.15:NN.2...V..2890:.EX.." ".
L....ZZ..0.SID(VO.5).(SID(VO.5).15).E(N$
).16.|....".DECAY .."SID(VO.5).15".
..= ...";......2890:.EX.." "......ZZ.
.0.SID(VO.5).SID(VO.5).240.E(N$)......".
SUSTAIN ..".(SID(VO.6).16)". ..= ..
.";......2890:.EX.." ".+ ...ZZ..0.SID(VO
.6).(SID(VO.6).15).E(N$).16.[ F..".RELEA
SE .."SID(VO.6).15". ..= ...";.N P.
.2890:.EX.." ".. Z..ZZ..0.SID(VO.6).SID(
VO.6).240.E(N$).. ...".WAVEFORM ..";.C
..I..(SID(VO.4).16).. ...J("SAWTRIPULNOI
",(.(I)..(2).3).1,3);.$!..."..=
......................";.?!.
..A$:.A$.".".." ":.3460.J!...I.1.4.E! ..
A$.J("STPN",I,1).3390.~!*..A$.G(13).." "
:.3460..!4..:.3340..!>..J("SAWTRIPULNOI"
,(3.I).2,3);.G!H.SID(VO.4).2.(I.1).16.1.
Y!R..I..3..:.3460..!\.." DUR. ..";.."F..
SID(VO.3).256.SID(VO.2)". ..= ";.2"P.MX.
4095:NN.4:.2890:.ZZ.0.3460.J"Z.N.E(N$):S
ID(VO.2).N.256..(N.256):SID(VO.3)..(N.25
6).P"....V"..:.|"..:.."... SAVE/LOAD ROU
TINES.."..:.."..:.."...169,0,133,251,169
,192,133,252,169,251,166,253,164,254,32,
216,255,96.##J..169,0,162,255,160,255,32
,213,255,134,251,132,252,96.)#T.:./#..:.
M#... BACKGROUND MUSIC PLAYER.S#..:.Y#..
:..#...120,173,20,3,201,49,208,28,169,0,
141,255,3,169,51,141,20,3,169..#...192,1
41,21,3,169,67,133,251,169,193,133,252,3
2,112,192,88,96."$...169,49,141,20,3,169
,234,141,21,3,32,206,192,88,96,8,72,138,
72.E$$..152,72,173,255,3,240,30,201,1,20
8,11,32,197,192,169,0,141,255..$...3,76,
92,192,201,2,208,22,32,206,192,169,3,141
,255,3,76,103,192..$8..206,41,193,208,3,
32,112,192,32,217,192,104,168,104,170,10
4,40./%B..76,49,234,160,0,162,0,177,251,
201,13,240,43,189,46,193,41,254.E%L..157
,46,193,169,8,157,4,212,177,251,201,12,2
40,24..%V..189,46,193,9,1,157,46,193,32,
229,192,173..%`..40,193,157,42,193,234,1
73,39,193,157,43,193,138,24,105,7,170,20
0,192..%J..3,208,197,177,251.9&T..141,41
,193,24,165,251,105,4,133,251,144,2,230,
252,160,3,177,251.}&~..208,8,169,67,133,
251,169,193,133,252,96,160,24,169,0,153,
0,212..&...136,16,250,96,160,24,185,42,1
93,153,0,212,136,16,247,96,138..'...72,1
77,251,41,15,10,170,189,15,193,141,39,19
3,232,189,15,193,141.F'...40,193,177,251
,74,74,74,74,170,240,9,14,40,193,46,39,1
93,202..'...208,247,104,170,96,1,12,1,28
,1,45,1,62,1,81,1,102,1,123,1..'...145,1
,169,1,195,1,221,1,250,0,0,0,0...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL