Home » Personal collection » Commodore disks » disk51a3_c16_music.d64 » elves
elves
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 » disk51a3_c16_music.d64 |
Filename: | elves |
Read OK: | ✔ |
File size: | 050C 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 » elves
- Personal collection » Commodore disks » disk51a2_c16_music.d64 » elves
- Personal collection » Commodore disks » disk51a3_c16_music.d64 » elves
File contents
0 AD=24704 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);"MARCH OF THE ELVES" 30 POKE54296,10:POKE54277,7:POKE54291,7 40 POKE54278,133:POKE54285,133:POKE54292,133 50 POKE54284,7:READV,P,L:L=L*5 51 N%(V,0)=P-INT(P/256)*256 52 N%(V,1)=INT(P/256) 53 V=(V-1)*7:IF V<>14 THEN 70 55 POKEAD,N%(1,0):POKEAD+1,N%(1,1):POKEAD+2,N%(2,0):POKEAD+3,N%(2,1) 56 POKEAD+4,N%(3,0):POKEAD+5,N%(3,1):POKEAD+6,L:AD=AD+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 105 PA=PA+L:IFPA=V1THENN%(1,0)=0:N%(1,1)=0:N%(2,0)=0:N%(2,1)=0 110 GOTO50 120 DATA 3,2145,4,3,3215,4,3,2145,4,3,3215,4 130 DATA 1,4291,16,3,2145,4,3,3215,4,3,2145,4,3,3215,4 140 DATA 1,4817,8,3,2145,4,3,3215,4,1,4291,8,3,2145,4,3,3215,4 150 DATA 1,5407,4,3,2145,4,1,4291,4,3,3215,4,1,5728,4,3,2145,4,1,4291,4,3,3215,4 160 DATA 1,6430,8,3,2145,4,3,3215,4,1,4291,8,3,2145,4,3,3215,4 170 DATA 1,2145,4,3,4817,2,3,4291,2,1,3215,4,3,5407,2,3,4291,2,1,2145,4,3,5728,2 180 DATA 3,4291,2,1,3215,4,3,6430,2,3,4291,2 190 DATA 1,2145,8,3,4291,3,3,0,1,3,4291,4,1,3215,8,3,4291,3,3,0,1,3,4291,4 200 DATA 3,2408,4,3,3608,4,3,2408,4,3,3608,4 210 DATA 1,4817,16,3,2408,4,3,3608,4,3,2408,4,3,3608,4 220 DATA 1,5407,8,3,2408,4,3,3608,4,1,4817,8,3,2408,4,3,3608,4 230 DATA 1,5407,16,3,2703,4,3,4050,4,3,2703,4,3,4050,4 240 DATA 1,5728,8,3,2864,4,3,4291,4,1,6430,8,3,3215,4,3,4291,4
AD�24704 ( �R�54272�54296:�R,0:� ? �53280,14:�53281,1 o �"��";�12);"MARCH OF THE ELVES"