Home » Personal collection » Acorn ADFS disks » Electron » Music_2.ADF » SAMPLES/RAGTIME

SAMPLES/RAGTIME

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 » Acorn ADFS disks » Electron » Music_2.ADF
Filename: SAMPLES/RAGTIME
Read OK:
File size: 029E bytes
Load address: FFFF1D00
Exec address: FFFF8023
File contents
   10 REM RAGTIME
   20 REM CONVERTED TO THE ELK BY BOB.
   30REMOTHERWISEOTHERWISEOTHERWISEOTHERWISEOTHERWISE BY PAUL LAYZELL 
   40MODE4
   50X=&2000:IFX?46=1  ANDX?326=13 ANDX?2000=165 ANDX?2056=1 : GOTO100 
   60VDU28,13,17,26,15
   70*LO."RAGDATA"2000
   90CLS:VDU26
  100ENVELOPE1,1,0,0,0,0,0,0,126,-1,0,-1,126,63
  110ENVELOPE12,1,0,0,0,0,0,0,126,-4,-2,-2,126,63
  120B%=&2000 :REM This is the start of  the music data. 
  130DIMZ%8
  140C%=158 
  150TIME=0
  160REM This part of the program loads  each note into a 6 byte block called    Z%, the parameters are then passed to   the SOUND statement.   
  170REPEAT
  180!Z%=C%!B%
  190C%=C%+4
  200Z%!4=C%!B%
  210C%=C%+2
  220Z%!6=0
  230IF Z%!4=&2E THEN TIME=-10  
  240 REPEAT:UNTILTIME*8>=Z%!4  
  250 A%=21:X%=Z%?1+4:Y%=0:CALL&FFF4 
  260SOUND Z%?1,Z%?3,?Z%,Z%?2
  270UNTIL ?Z%=0

 � RAGTIME
# � CONVERTED TO THE ELK BY BOB.
� BY PAUL LAYZELL 
(�4
2=X=&2000:�X?46=1  �X?326=13 �X?2000=165 �X?2056=1 : �Dd@ 
<�28,13,17,26,15
F*LO."RAGDATA"2000
Z	�:�26
d'�1,1,0,0,0,0,0,0,126,-1,0,-1,126,63
n)�12,1,0,0,0,0,0,0,126,-4,-2,-2,126,63
x6B%=&2000 :� This is the start of  the music data. 
��Z%8
�C%=158 
��=0
��� This part of the program loads  each note into a 6 byte block called    Z%, the parameters are then passed to   the SOUND statement.   
��
�
!Z%=C%!B%
�C%=C%+4
�Z%!4=C%!B%
�C%=C%+2
�
Z%!6=0
�� Z%!4=&2E � �=-10  
� �:��*8>=Z%!4  
�! A%=21:X%=Z%?1+4:Y%=0:�&FFF4 
� Z%?1,Z%?3,?Z%,Z%?2
� ?Z%=0
�
00000000  0d 00 0a 0e 20 f4 20 52  41 47 54 49 4d 45 0d 00  |.... . RAGTIME..|
00000010  14 23 20 f4 20 43 4f 4e  56 45 52 54 45 44 20 54  |.# . CONVERTED T|
00000020  4f 20 54 48 45 20 45 4c  4b 20 42 59 20 42 4f 42  |O THE ELK BY BOB|
00000030  2e 0d 00 1e 1b f4 7f 7f  7f 7f 7f 20 42 59 20 50  |........... BY P|
00000040  41 55 4c 20 4c 41 59 5a  45 4c 4c 20 0d 00 28 06  |AUL LAYZELL ..(.|
00000050  eb 34 0d 00 32 3d 58 3d  26 32 30 30 30 3a e7 58  |.4..2=X=&2000:.X|
00000060  3f 34 36 3d 31 20 20 80  58 3f 33 32 36 3d 31 33  |?46=1  .X?326=13|
00000070  20 80 58 3f 32 30 30 30  3d 31 36 35 20 80 58 3f  | .X?2000=165 .X?|
00000080  32 30 35 36 3d 31 20 3a  20 e5 8d 44 64 40 20 0d  |2056=1 : ..Dd@ .|
00000090  00 3c 13 ef 32 38 2c 31  33 2c 31 37 2c 32 36 2c  |.<..28,13,17,26,|
000000a0  31 35 0d 00 46 15 2a 4c  4f 2e 22 52 41 47 44 41  |15..F.*LO."RAGDA|
000000b0  54 41 22 32 30 30 30 0d  00 5a 09 db 3a ef 32 36  |TA"2000..Z..:.26|
000000c0  0d 00 64 27 e2 31 2c 31  2c 30 2c 30 2c 30 2c 30  |..d'.1,1,0,0,0,0|
000000d0  2c 30 2c 30 2c 31 32 36  2c 2d 31 2c 30 2c 2d 31  |,0,0,126,-1,0,-1|
000000e0  2c 31 32 36 2c 36 33 0d  00 6e 29 e2 31 32 2c 31  |,126,63..n).12,1|
000000f0  2c 30 2c 30 2c 30 2c 30  2c 30 2c 30 2c 31 32 36  |,0,0,0,0,0,0,126|
00000100  2c 2d 34 2c 2d 32 2c 2d  32 2c 31 32 36 2c 36 33  |,-4,-2,-2,126,63|
00000110  0d 00 78 36 42 25 3d 26  32 30 30 30 20 3a f4 20  |..x6B%=&2000 :. |
00000120  54 68 69 73 20 69 73 20  74 68 65 20 73 74 61 72  |This is the star|
00000130  74 20 6f 66 20 20 74 68  65 20 6d 75 73 69 63 20  |t of  the music |
00000140  64 61 74 61 2e 20 0d 00  82 08 de 5a 25 38 0d 00  |data. .....Z%8..|
00000150  8c 0b 43 25 3d 31 35 38  20 0d 00 96 07 d1 3d 30  |..C%=158 .....=0|
00000160  0d 00 a0 8d f4 20 54 68  69 73 20 70 61 72 74 20  |..... This part |
00000170  6f 66 20 74 68 65 20 70  72 6f 67 72 61 6d 20 6c  |of the program l|
00000180  6f 61 64 73 20 20 65 61  63 68 20 6e 6f 74 65 20  |oads  each note |
00000190  69 6e 74 6f 20 61 20 36  20 62 79 74 65 20 62 6c  |into a 6 byte bl|
000001a0  6f 63 6b 20 63 61 6c 6c  65 64 20 20 20 20 5a 25  |ock called    Z%|
000001b0  2c 20 74 68 65 20 70 61  72 61 6d 65 74 65 72 73  |, the parameters|
000001c0  20 61 72 65 20 74 68 65  6e 20 70 61 73 73 65 64  | are then passed|
000001d0  20 74 6f 20 20 20 74 68  65 20 53 4f 55 4e 44 20  | to   the SOUND |
000001e0  73 74 61 74 65 6d 65 6e  74 2e 20 20 20 0d 00 aa  |statement.   ...|
000001f0  05 f5 0d 00 b4 0d 21 5a  25 3d 43 25 21 42 25 0d  |......!Z%=C%!B%.|
00000200  00 be 0b 43 25 3d 43 25  2b 34 0d 00 c8 0e 5a 25  |...C%=C%+4....Z%|
00000210  21 34 3d 43 25 21 42 25  0d 00 d2 0b 43 25 3d 43  |!4=C%!B%....C%=C|
00000220  25 2b 32 0d 00 dc 0a 5a  25 21 36 3d 30 0d 00 e6  |%+2....Z%!6=0...|
00000230  18 e7 20 5a 25 21 34 3d  26 32 45 20 8c 20 d1 3d  |.. Z%!4=&2E . .=|
00000240  2d 31 30 20 20 0d 00 f0  13 20 f5 3a fd 91 2a 38  |-10  .... .:..*8|
00000250  3e 3d 5a 25 21 34 20 20  0d 00 fa 21 20 41 25 3d  |>=Z%!4  ...! A%=|
00000260  32 31 3a 58 25 3d 5a 25  3f 31 2b 34 3a 59 25 3d  |21:X%=Z%?1+4:Y%=|
00000270  30 3a d6 26 46 46 46 34  20 0d 01 04 18 d4 20 5a  |0:.&FFF4 ..... Z|
00000280  25 3f 31 2c 5a 25 3f 33  2c 3f 5a 25 2c 5a 25 3f  |%?1,Z%?3,?Z%,Z%?|
00000290  32 0d 01 0e 0b fd 20 3f  5a 25 3d 30 0d ff        |2..... ?Z%=0..|
0000029e
SAMPLES/RAGTIME.m0
SAMPLES/RAGTIME.m1
SAMPLES/RAGTIME.m2
SAMPLES/RAGTIME.m4
SAMPLES/RAGTIME.m5