Home » Personal collection » Commodore disks » disk51a_c16_music.d64 » moonlight
moonlight
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
Tape/disk: | Home » Personal collection » Commodore disks » disk51a_c16_music.d64 |
Filename: | moonlight |
Read OK: | ✔ |
File size: | 2D40 bytes |
Load address: | 0801 |
Exec address: | 0000 |
Duplicates
There are 2 duplicate copies of this file in the archive:
- Personal collection » Commodore disks » disk51a_c16_music.d64 » moonlight
- Personal collection » Commodore disks » disk51a2_c16_music.d64 » moonlight
- Personal collection » Commodore disks » disk51a3_c16_music.d64 » moonlight
File contents
5 FORR=54272TO54296:POKER,0:NEXT 10 POKE53280,14:POKE53281,1 20 PRINT"<clr><black><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down>";TAB(12);"MOONLIGHT SONATA" 30 POKE54296,10:POKE54277,7:POKE54291,7 40 POKE54278,133:POKE54285,133:POKE54292,133 50 POKE54284,7:READV,P,L:V=(V-1)*7 70 POKE54273+V,INT(P/256) 80 POKE54272+V,P-INT(P/256)*256 90 POKE54276+V,17:IFV<>14THENPA=0:V1=L:GOTO50 100 FORW=0TOL*150:NEXT:POKE54276+V,16 105 PA=PA+L:IFPA=V1THENPOKE54276,16:POKE54283,16 110 GOTO50 120 DATA 1,2273,24,2,1136,24,3,3406,2,3,4547,2,3,5407,2,3,3406,2,3,4547,2 130 DATA 3,5407,2,3,3406,2,3,4547,2,3,5407,2,3,3406,2,3,4547,2,3,5407,2 140 DATA 1,2025,24,2,1012,24,3,3406,2,3,4547,2,3,5407,2,3,3406,2,3,4547,2 150 DATA 3,5407,2,3,3406,2,3,4547,2,3,5407,2,3,3406,2,3,4547,2,3,5407,2 160 DATA 1,1804,13,2,902,13,3,3608,2,3,4547,2,3,5407,2,3,3608,2,3,4547,2 170 DATA 3,5407,2,1,1517,13,2,758,13,3,3608,2,3,4817,2,3,6069,2,3,3608,2 180 DATA 3,4817,2,3,6069,2 190 DATA 1,1703,10,2,851,10,3,3406,2,3,4291,2,3,6069,2,3,3406,2,3,4547,2 200 DATA 3,5407,2,1,1703,13,2,851,13,3,3406,2,3,4547,2,3,5103,2,3,3034,2 210 DATA 3,4291,2,3,5103,2 220 DATA 1,1703,24,3,2703,2,3,3406,2,3,4547,2,3,3406,2,3,4547,2,3,5407,2 230 DATA 3,3406,2,3,4547,2,3,5407,2,2,6812,4,3,3406,2,3,4547,2,3,5407,1 240 DATA 1,1703,1,2,6812,1,3,5407,1 250 DATA 1,2145,24,2,6812,16,3,3406,2,3,5103,2,3,6069,2,3,3406,2,3,5103,2 260 DATA 3,6069,2,3,3406,2,3,5103,2,3,6069,2,1,2145,4,2,6812,4,3,3406,2 270 DATA 3,5103,2,3,6069,1,1,2145,1,2,6812,1,3,6069,1 280 DATA 1,2273,13,2,6812,13,3,3406,2,3,4547,2,3,5407,2,3,3406,2,3,4547,2 290 DATA 3,5407,2,1,1517,13,2,7217,13,3,3608,2,3,4547,2,3,6069,2,3,3608,2 300 DATA 3,4547,2,3,6069,2 310 DATA 1,2025,13,2,6812,13,3,3406,2,3,4050,2,3,5407,2,3,3406,2,3,4050,2 320 DATA 3,5407,2,2,6069,7,3,3608,2,3,4050,2,3,5103,2,2,8101,6 330 DATA 3,3608,2,3,4050,2,3,5103,2 340 DATA 1,2703,24,2,5407,6,3,3406,2,3,4050,2,3,5407,2,1,2703,18,3,3406,2 350 DATA 3,4050,2,3,5407,2,3,3406,2,3,4050,2,3,5407,2,3,3406,2,3,4050,2,3,5407,2 360 DATA 1,2703,24,3,3215,2,3,4050,2,3,5407,2,3,3215,2,3,4050,2,3,5407,2 370 DATA 3,3215,2,3,4050,2,3,5407,2,2,6430,4,3,3215,2,3,4050,2,3,5407,1 380 DATA 1,2703,1,2,6430,1,3,5407,1 390 DATA 1,2408,24,2,6430,16,3,3215,2,3,4050,2,3,5728,2,3,3215,2,3,4050,2 400 DATA 3,5728,2,3,3215,2,3,4050,2,3,5728,2,1,2408,4,2,6430,4,3,3215,2 410 DATA 3,4050,2,3,5728,1,1,2408,1,2,6430,1,3,5728,1 420 DATA 1,2145,6,2,6430,12,3,3215,2,3,4291,2,3,5407,2,1,2025,7,3,3215,2 430 DATA 3,4291,2,3,5407,2,1,1911,7,3,3215,2,3,4547,2,3,5407,2,2,6069,6,3,3034,2 440 DATA 3,4547,2,3,5407,2 450 DATA 1,8101,13,2,6069,13,3,3034,2,3,4050,2,3,4817,2,3,3034,2,3,4050,2 460 DATA 3,4817,2,1,1315,7,2,6430,7,3,3215,2,3,4050,2,3,4547,2,1,1607,7 470 DATA 2,5407,7,3,2703,2,3,4050,2,3,4547,2 480 DATA 1,1517,10,2,6069,10,3,3034,2,3,4050,2,3,4817,2,3,3034,2,3,4050,2 490 DATA 3,4817,2,1,1517,12,2,6069,12,3,3034,2,3,3823,2,3,4547,2,3,3034,2 500 DATA 3,3823,2,3,4547,2 510 DATA 1,2025,24,3,4050,2,3,4817,2,3,6069,2,3,4050,2,3,4817,2,3,6069,2 520 DATA 3,4050,2,3,5103,2,3,6069,2,2,8101,6,3,4050,2,3,5103,2,3,6069,2 530 DATA 1,2025,7,2,8583,7,3,4050,2,3,5407,2,3,6430,2,1,2703,7,3,4050,2 540 DATA 3,5407,2,3,6430,2,1,3215,7,3,4050,2,3,5407,2,3,6430,2,1,2703,6,2,7647,6 550 DATA 3,4050,2,3,5407,2,3,6430,2 560 DATA 1,2025,24,2,8101,16,3,4050,2,3,5103,2,3,6069,2,3,4050,2,3,5103,2 570 DATA 3,6069,2,3,4050,2,3,5103,2,3,6069,2,1,2025,6,2,8101,7,3,4050,2 580 DATA 3,5103,2,3,6069,2 590 DATA 1,2025,7,2,8583,7,3,4050,2,3,5407,2,3,6430,2,1,2703,7,3,4050,2 600 DATA 3,5407,2,3,6430,2,1,3215,7,3,4050,2,3,5407,2,3,6430,2,1,2703,6,2,7647,6 610 DATA 3,4050,2,3,5407,2,3,6430,2 620 DATA 1,2025,10,2,8101,10,3,4050,2,3,5103,2,3,6069,2,3,4050,2,3,5103,2 630 DATA 3,6069,2,1,1703,13,2,8101,13,3,4050,2,3,4817,2,3,5728,2,3,4050,2 640 DATA 3,4817,2,3,5728,2 650 DATA 1,1432,13,3,4050,2,3,4547,2,3,6812,2,3,4050,2,3,4547,2,3,6812,2 660 DATA 1,1517,12,2,7217,12,3,3608,2,3,4547,2,3,6069,2,3,3608,2,3,4547,2 670 DATA 3,6069,2 680 DATA 1,2025,13,2,6430,13,3,3215,2,3,4050,2,3,4817,2,3,3215,2,3,4050,2 690 DATA 3,4817,2,1,2145,12,2,6069,12,3,3034,2,3,3608,2,3,5103,2,3,3034,2 700 DATA 3,3608,2,3,5103,2 710 DATA 1,1136,10,2,4547,10,3,2273,2,3,3034,2,3,3608,2,3,2273,2,3,3034,2 720 DATA 3,3608,2,1,1136,4,2,4547,4,3,2273,2,3,3034,2,3,3406,2,1,1136,7 730 DATA 2,4547,7,3,2273,2,3,2864,2,3,3406,2 740 DATA1,1517,6,2,3034,6,3,3034,2,3,3608,2,3,4547,2,1,1517,18,3,3608,2,3,4547,2 750 DATA 3,6069,2,3,4547,2,3,6069,2,3,7217,2,2,9094,4,3,4547,2,3,6069,2 760 DATA 3,7217,1,1,1517,1,2,9094,1,3,7217,1 770 DATA 1,2864,24,2,9094,16,3,4547,2,3,6812,2,3,8101,2,3,4547,2,3,6812,2 780 DATA 3,8101,2,3,4547,2,3,6812,2,3,8101,2,1,2864,4,2,9094,4,3,4547,2 790 DATA 3,6812,2,3,8101,1,1,2864,1,2,9094,1,3,8101,1 800 DATA 1,3034,13,2,9094,13,3,4547,2,3,6069,2,3,7217,2,3,4547,2,3,6069,2 810 DATA 3,7217,2,1,2551,7,2,8583,7,3,4291,2,3,6069,2,3,7217,2,1,2273,7 820 DATA 2,9094,7,3,4547,2,3,6069,2,3,7217,2 830 DATA 1,2145,16,2,10207,16,3,5103,2,3,6069,2,3,6812,2,3,5103,2,3,6069,2 840 DATA 3,6812,2,3,5103,2,3,6069,2,3,6812,2,1,2145,7,2,10207,7,3,5103,2 850 DATA 3,6069,2,3,6812,2 860 DATA 1,2273,13,2,10814,13,3,5407,2,3,6812,2,3,9094,2,3,5407,2,3,6812,2 870 DATA 3,9094,2,1,1517,7,2,10207,7,3,5103,2,3,6069,2,3,7217,2,1,1607,7 880 DATA 2,9094,7,3,4547,2,3,5407,2,3,7647,2 890 DATA 1,1703,24,2,8583,7,3,,2,3,4291,2,3,5103,2,2,6812,7,3,,2,3,4291,2 900 DATA 3,5103,2,2,7217,7,3,,2,3,4291,2,3,5103,2,2,6069,6,3,,2 910 DATA 3,4291,2,3,5103,2 920 DATA 1,1703,24,3,,2,3,4291,2,3,5103,2,2,3406,7,3,,2,3,4291,2,3,5103,2 930 DATA 2,3608,7,3,,2,3,4291,2,3,5103,2,2,3034,7,3,,2,3,4291,2,3,5103,2 940 DATA 1,1703,24,2,2703,7,3,,2,3,5407,2,3,6812,2,2,9094,7,3,,2 950 DATA 3,5407,2,3,6812,2,2,10814,7,3,,2,3,5407,2,3,6812,2,2,9094,6 960 DATA 3,,2,3,5407,2,3,6812,2 970 DATA 1,1703,24,3,,2,3,2703,2,3,3406,2,2,4547,7,3,,2,3,2703,2,3,3406,2 980 DATA 2,5407,7,3,,2,3,2703,2,3,3406,2,2,4547,6,3,,2,3,2703,2,3,3406,2 990 DATA 1,1703,24,2,851,24,3,2551,2,3,3608,2,3,3034,2,3,4291,2,3,3608,2 1000 DATA 3,5103,2,3,4291,2,3,6069,2,3,5103,2,3,7217,2,3,6069,2,3,8583,2 1010 DATA 1,1703,24,2,851,24,3,2703,2,3,4547,2,3,3406,2,3,5407,2,3,4547,2 1020 DATA 3,6812,2,3,5407,2,3,9094,2,3,6812,2,3,10814,2,3,9094,2,3,6812,2 1030 DATA 1,1703,24,2,851,24,3,4547,2,3,6430,2,3,5407,2,3,7647,2,3,6430,2 1040 DATA 3,9094,2,3,7647,2,3,10814,2,3,9094,2,3,12860,2,3,10814,2,3,15294,2 1050 DATA 1,1703,72,2,851,72,3,6069,2,3,8583,2,3,7217,2,3,10207,2,3,8583,2 1060 DATA 3,12139,2,3,10207,2,3,14435,2,3,12139,2,3,17167,2,3,14435,2,3,20415,2 1070 DATA 3,17167,2,3,12139,2,3,14435,2,3,10207,2,3,12139,2 1080 DATA 3,8583,2,3,10207,2,3,7217,2,3,8583,2,3,6069,2,3,7217,2,3,5103,2 1090 DATA 3,6069,2,3,4291,2,3,5103,2,3,3608,2,3,4291,2,3,3034,2,3,3608,2 1100 DATA 2,2551,6,3,,2,3,3034,2,2,2273,6,3,2703,2,3,3034,2,3,3608,2 1110 DATA 1,1703,24,2,2145,12,3,,2,3,6069,2,3,6812,2,3,7217,2,3,6812,2,3,6069,2 1120 DATA 2,2551,7,3,,2,3,3034,2,3,3608,2,2,2273,7,3,,2,3,3034,2,3,3608,2 1130 DATA 1,1703,24,2,2145,12,3,,2,3,6069,2,3,6812,2,3,7217,2,3,6812,2,3,6069,2 1140 DATA 2,2408,7,3,,2,3,3034,2,3,3608,2,2,2273,7,3,,2,3,3034,2,3,3608,2 1150 DATA 1,1703,13,2,2145,13,3,,2,3,6069,2,3,6812,2,3,7217,2,3,6812,2,3,6069,2 1160 DATA1,1804,13,2,902,13,3,2273,2,3,2703,2,3,4547,2,3,2273,2,3,2703,2,3,4547,2 1170 DATA1,1517,13,2,758,13,3,2551,2,3,3608,2,3,4547,2,3,2551,2,3,3608,2,3,4547 1180 DATA 2,1,1703,13,3,2551,2,3,3406,2,3,4291,2,3,2551,2,3,3034,2,3,4291,2 1190 DATA 1,2273,24,3,2703,2,3,3406,2,3,4547,2,3,3406,2,3,4547,2,3,5407,2 1200 DATA 3,3406,2,3,4547,2,3,5407,2,2,6812,4,3,3406,2,3,4547,2,3,5407,1 1210 DATA 1,2273,1,2,6812,1,3,5407,1 1220 DATA 1,2145,24,2,6812,16,3,3406,2,3,5103,2,3,6069,2,3,3406,2,3,5103,2 1230 DATA 3,6069,2,3,3406,2,3,5103,2,3,6069,2,2,6812,4,1,2145,4,3,3406,2 1240 DATA 3,5103,2,3,6069,1,1,2145,1,2,6812,1,3,5103,1 1250 DATA 1,2273,13,2,6812,13,3,3406,2,3,4547,2,3,5407,2,3,3406,2,3,4547,2 1260 DATA 3,5407,2,1,1517,13,2,7217,13,3,3608,2,3,4547,2,3,6069,2,3,3608,2 1270 DATA 3,4547,2,3,6069,2 1280 DATA 1,2025,13,2,6812,13,3,3406,2,3,4050,2,3,5407,2,3,3406,2,3,4050,2 1290 DATA 3,5407,2,2,6069,7,3,3608,2,3,4050,2,3,5103,2,2,8101,6 1300 DATA 3,3608,2,3,4050,2,3,5103,2 1310 DATA 1,2703,24,2,5407,6,3,3406,2,3,4050,2,3,5407,2,1,2703,18,3,4050,2 1320 DATA3,5407,2,3,6812,2,3,4050,2,3,5407,2,3,6812,2,2,8101,4,3,4050,2 1330 DATA 3,5407,2,3,6812,1,1,2703,1,2,8101,1,3,6812,1 1340 DATA 1,2551,24,2,8101,16,3,4050,2,3,6069,2,3,7217,2,3,4050,2,3,6069,2 1350 DATA 3,7217,2,3,4050,2,3,6069,2,3,7217,2,1,2551,4,2,8101,4,3,4050,2 1360 DATA 3,6069,2,3,7217,1,1,2551,1,2,8101,1,3,7217,1 1370 DATA 1,2703,13,2,8101,13,3,4050,2,3,5407,2,3,6812,2,3,4050,2,3,5407,2 1380 DATA 3,6812,2,1,2551,7,2,8583,7,3,4291,2,3,6069,2,3,6812,2,1,2273,7 1390 DATA 2,9094,7,3,4547,2,3,5407,2,3,6812,2 1400 DATA 1,2145,13,2,10207,13,3,5103,2,3,6069,2,3,6812,2,3,5103,2,3,6069,2 1410 DATA 3,6812,2,1,2273,7,2,10814,7,3,5407,2,3,6812,2,3,9094,2,3,5407,2 1420 DATA 3,6812,2,3,9094,2 1430 DATA 1,1517,13,2,9634,13,3,4817,2,3,6069,2,3,7217,2,3,4817,2,3,6069,2 1440 DATA 3,7217,2,1,1703,13,2,8583,13,3,4291,2,3,6069,2,3,6812,2,3,4291,2 1450 DATA 3,6069,2,3,6812,2 1460 DATA 1,2273,24,2,9094,16,3,4547,2,3,5407,2,3,6812,2,3,4547,2,3,5407,2 1470 DATA 3,6812,2,3,4547,2,3,5728,2,3,6812,2,1,2273,7,2,9094,7,3,4547,2 1480 DATA 3,5728,2,3,6812,2 1490 DATA 2,9634,19,3,4547,2,3,6069,2,3,7217,2,1,3034,7,3,4547,2,3,6069,2 1500 DATA 3,7217,2,1,3608,7,3,4547,2,3,6069,2,3,7217,2,1,3034,7,2,8583,7 1510 DATA 3,4547,2,3,6069,2,3,7217,2 1520 DATA 1,2273,24,2,9094,16,3,4547,2,3,5728,2,3,6812,2,3,4547,2,3,5728,2 1530 DATA 3,6812,2,3,4547,2,3,5728,2,3,6812,2,1,2273,7,2,9094,7,3,4547,2 1540 DATA 3,5728,2,3,6812,2 1550 DATA 2,9634,19,3,4547,2,3,6069,2,3,7217,2,1,3034,7,3,4547,2,3,6069,2 1560 DATA 3,7217,2,1,3608,7,3,4547,2,3,6069,2,3,7217,2,1,3034,7,2,8583,7 1570 DATA 3,4547,2,3,6069,2,3,7217,2 1580 DATA 1,2273,10,2,9094,10,3,4547,2,3,5728,2,3,6812,2,3,4547,2,3,5728,2 1590 DATA 3,6812,2,1,1517,13,2,9094,13,3,4547,2,3,6069,2,3,7217,2,3,4547,2 1600 DATA 3,6069,2,3,7217,2 1610 DATA 1,2551,16,2,8101,16,3,4050,2,3,6069,2,3,7217,2,3,4050,2,3,6069,2 1620 DATA 3,7217,2,3,4050,2,3,6069,2,3,7217,2,1,2703,7,2,8101,7,3,4050,2 1630 DATA 3,5407,2,3,6812,2 1640 DATA 1,2273,7,2,7217,7,3,3608,2,3,5407,2,3,6812,2,1,2551,7,2,7217,7 1650 DATA 3,3608,2,3,5103,2,3,6069,2,1,2145,7,2,6812,7,3,3406,2,3,5103,2 1660 DATA 3,6069,2,1,2273,7,2,6812,7,3,3406,2,3,4547,2,3,5407,2 1670 DATA 1,1804,13,2,6069,13,3,3034,2,3,4547,2,3,5103,2,3,3034,2,3,4547,2 1680 DATA 3,5103,2,1,1703,7,2,6812,7,3,3406,2,3,4547,2,3,5103,2,1,1517,7 1690 DATA 2,7217,7,3,3608,2,3,4547,2,3,5103,2 1700 DATA 1,1703,10,2,6812,10,3,3406,2,3,4547,2,3,5407,2,3,3406,2,3,4547,2 1710 DATA 3,5407,2,1,1703,13,2,6812,13,3,3608,2,3,4291,2,3,5103,2,3,3034,2 1720 DATA 3,4291,2,3,5103,2 1730 DATA 1,1703,16,2,4547,7,3,2703,2,3,3406,2,3,4547,2,2,,10,3,3406,2,3,4547,2 1740 DATA 3,5407,2,3,3406,2,3,4547,2,3,5407,2 1750 DATA 1,1703,4,3,3406,2,3,4547,2,2,5407,2,3,,.5,3,1703,1 1760 DATA 1,1072,24,2,1703,16,3,3406,2,3,5103,2,3,6069,2,3,3406,2,3,5103,2 1770 DATA 3,6069,2,3,3406,2,3,5103,2,3,6069,2,1,1072,4,2,1703,4,3,3406,2 1780 DATA 3,5103,2,2,6069,2,3,,.5,3,1703,1 1790 DATA 1,1136,24,2,1703,16,3,3406,2,3,5407,2,3,4547,2,3,6812,2,3,5407,2 1800 DATA 3,9094,2,3,6812,2,3,10814,2,3,9094,2,2,1703,4,3,13625,2 1810 DATA 3,10814,2,2,9094,2,3,,.5,3,1703,1 1820 DATA 1,851,24,2,1703,16,3,8583,2,3,10207,2,3,7217,2,3,8583,2,3,6069,2 1830 DATA 3,7217,2,3,5103,2,3,6069,2,3,3608,2,1,4291,7,2,1703,4,3,3608,2 1840 DATA 3,3406,2,1,4291,2,2,3034,2,3,,.5,3,1703,1 1850 DATA 1,4547,3,2,1703,16,3,2703,2,1,1136,14,3,5407,2,3,4547,2,3,6812,2 1860 DATA 3,5407,2,3,9094,2,3,6812,2,3,10814,2,3,9094,2,2,1703,4,3,13625,2 1870 DATA 3,10814,2,2,9094,2,3,,.5,3,1703,1 1880 DATA 1,851,24,2,1703,16,3,8583,2,3,10207,2,3,7217,2,3,8583,2,3,6069,2 1890 DATA 3,7217,2,3,5103,2,3,6069,2,3,3608,2,1,4291,7,2,1703,4,3,3608,2 1900 DATA 3,3406,2,1,4291,2,2,3034,2,3,,.5,3,1703,1 1910 DATA 1,14435,7,2,1703,13,3,9094,2,3,10814,2,3,14435,2,1,1136,7,3,18188,2 1920 DATA 3,14435,2,3,10814,2,2,2273,13,3,,2,3,9094,2,3,10814,2,3,14435,2 1930 DATA 3,10814,2,3,9094,2 1940 DATA 1,1136,24,2,1703,13,3,,2,3,7217,2,3,9094,2,3,10814,2,3,9094,2 1950 DATA 3,7217,2,2,,13,3,1703,2,3,2273,2,3,1703,2,3,1351,2,3,1703,2,3,1351,2 1960 DATA 1,,13,2,,13,3,1136,12,1,2273,12,2,9094,12,3,14435,12 1970 DATA 1,2273,24,2,9094,24,3,14435,24
�R�54272�54296:�R,0:� 2 �53280,14:�53281,1 ` �"��";�12);"MOONLIGHT SONATA"