Home » Personal collection » Acorn hard disk » misc » dcfprogs » Musi/Music/BOURREE

Musi/Music/BOURREE

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 hard disk » misc » dcfprogs
Filename: Musi/Music/BOURREE
Read OK:
File size: 0310 bytes
Load address: 0000
Exec address: 0000
Duplicates

There are 2 duplicate copies of this file in the archive:

File contents
   10 MODE 2:COLOUR 1
   20 PRINT''''''''''"      Bourree"
   30 R=0
   40 REPEAT
   50 READ A,B
   60 IF A=-1 THEN S=0 ELSE S=-15
   70 SOUND 1,S,A,1000
   75 FORR=0TO2000*B:NEXT
   80 UNTIL B=0
   90 IF R=0 THEN RESTORE 130:R=1:GOTO 40
  100 IF R=1 THEN RESTORE 210:R=2:GOTO 40
  110 IF R=2 THEN RESTORE 210:R=3:GOTO 40
  120 END
  130 DATA 96,6,128,6,124,6,-1,1,124,6,116,3,112,3
  140 DATA 116,6,96,6,-1,1,96,6,100,6
  150 DATA 96,6,88,6,80,6,76,6
  160 DATA 80,6,76,3,80,3,68,6,-1,2,96,6
  170 DATA 128,6,124,6,-1,1,124,6,116,3,112,3
  180 DATA 116,6,96,6,-1,1,96,6,100,6
  190 DATA 96,6,88,6,80,6,76,6
  200 DATA 68,6,48,6,20,6,-1,20,0,0
  210 DATA 116,6,-1,1,116,6,108,6,-1,1,108,6,100,6,-1,1
  220 DATA 100,6,96,6,-1,1,96,6,104,6
  230 DATA 112,6,116,6,112,6,116,6
  240 DATA 124,6,96,6,-1,1,96,6,124,6
  250 DATA 128,6,124,6,-1,1,124,6,116,3,112,3
  260 DATA 116,6,96,6,-1,1,96,6,88,6
  270 DATA 80,6,76,6,68,6,64,6
  280 DATA 68,6,48,6,20,6,-1,20,0,0

 � 2:� 1
 �''''''''''"      Bourree"
 R=0
( �
2
 � A,B
< � A=-1 � S=0 � S=-15
F � 1,S,A,1000
K �R=0�2000*B:�
P
 � B=0
Z � R=0 � � �tB@:R=1:� �Th@
d � R=1 � � �dR@:R=2:� �Th@
n � R=2 � � �dR@:R=3:� �Th@
x �
�. � 96,6,128,6,124,6,-1,1,124,6,116,3,112,3
�! � 116,6,96,6,-1,1,96,6,100,6
� � 96,6,88,6,80,6,76,6
�$ � 80,6,76,3,80,3,68,6,-1,2,96,6
�) � 128,6,124,6,-1,1,124,6,116,3,112,3
�! � 116,6,96,6,-1,1,96,6,100,6
� � 96,6,88,6,80,6,76,6
� � 68,6,48,6,20,6,-1,20,0,0
�3 � 116,6,-1,1,116,6,108,6,-1,1,108,6,100,6,-1,1
�! � 100,6,96,6,-1,1,96,6,104,6
� � 112,6,116,6,112,6,116,6
�! � 124,6,96,6,-1,1,96,6,124,6
�) � 128,6,124,6,-1,1,124,6,116,3,112,3
  � 116,6,96,6,-1,1,96,6,88,6
 � 80,6,76,6,68,6,64,6
 � 68,6,48,6,20,6,-1,20,0,0
�
00000000  0d 00 0a 0c 20 eb 20 32  3a fb 20 31 0d 00 14 1f  |.... . 2:. 1....|
00000010  20 f1 27 27 27 27 27 27  27 27 27 27 22 20 20 20  | .''''''''''"   |
00000020  20 20 20 42 6f 75 72 72  65 65 22 0d 00 1e 08 20  |   Bourree".... |
00000030  52 3d 30 0d 00 28 06 20  f5 0d 00 32 0a 20 f3 20  |R=0..(. ...2. . |
00000040  41 2c 42 0d 00 3c 19 20  e7 20 41 3d 2d 31 20 8c  |A,B..<. . A=-1 .|
00000050  20 53 3d 30 20 8b 20 53  3d 2d 31 35 0d 00 46 11  | S=0 . S=-15..F.|
00000060  20 d4 20 31 2c 53 2c 41  2c 31 30 30 30 0d 00 4b  | . 1,S,A,1000..K|
00000070  12 20 e3 52 3d 30 b8 32  30 30 30 2a 42 3a ed 0d  |. .R=0.2000*B:..|
00000080  00 50 0a 20 fd 20 42 3d  30 0d 00 5a 1e 20 e7 20  |.P. . B=0..Z. . |
00000090  52 3d 30 20 8c 20 f7 20  8d 74 42 40 3a 52 3d 31  |R=0 . . .tB@:R=1|
000000a0  3a e5 20 8d 54 68 40 0d  00 64 1e 20 e7 20 52 3d  |:. .Th@..d. . R=|
000000b0  31 20 8c 20 f7 20 8d 64  52 40 3a 52 3d 32 3a e5  |1 . . .dR@:R=2:.|
000000c0  20 8d 54 68 40 0d 00 6e  1e 20 e7 20 52 3d 32 20  | .Th@..n. . R=2 |
000000d0  8c 20 f7 20 8d 64 52 40  3a 52 3d 33 3a e5 20 8d  |. . .dR@:R=3:. .|
000000e0  54 68 40 0d 00 78 06 20  e0 0d 00 82 2e 20 dc 20  |Th@..x. ..... . |
000000f0  39 36 2c 36 2c 31 32 38  2c 36 2c 31 32 34 2c 36  |96,6,128,6,124,6|
00000100  2c 2d 31 2c 31 2c 31 32  34 2c 36 2c 31 31 36 2c  |,-1,1,124,6,116,|
00000110  33 2c 31 31 32 2c 33 0d  00 8c 21 20 dc 20 31 31  |3,112,3...! . 11|
00000120  36 2c 36 2c 39 36 2c 36  2c 2d 31 2c 31 2c 39 36  |6,6,96,6,-1,1,96|
00000130  2c 36 2c 31 30 30 2c 36  0d 00 96 1a 20 dc 20 39  |,6,100,6.... . 9|
00000140  36 2c 36 2c 38 38 2c 36  2c 38 30 2c 36 2c 37 36  |6,6,88,6,80,6,76|
00000150  2c 36 0d 00 a0 24 20 dc  20 38 30 2c 36 2c 37 36  |,6...$ . 80,6,76|
00000160  2c 33 2c 38 30 2c 33 2c  36 38 2c 36 2c 2d 31 2c  |,3,80,3,68,6,-1,|
00000170  32 2c 39 36 2c 36 0d 00  aa 29 20 dc 20 31 32 38  |2,96,6...) . 128|
00000180  2c 36 2c 31 32 34 2c 36  2c 2d 31 2c 31 2c 31 32  |,6,124,6,-1,1,12|
00000190  34 2c 36 2c 31 31 36 2c  33 2c 31 31 32 2c 33 0d  |4,6,116,3,112,3.|
000001a0  00 b4 21 20 dc 20 31 31  36 2c 36 2c 39 36 2c 36  |..! . 116,6,96,6|
000001b0  2c 2d 31 2c 31 2c 39 36  2c 36 2c 31 30 30 2c 36  |,-1,1,96,6,100,6|
000001c0  0d 00 be 1a 20 dc 20 39  36 2c 36 2c 38 38 2c 36  |.... . 96,6,88,6|
000001d0  2c 38 30 2c 36 2c 37 36  2c 36 0d 00 c8 1f 20 dc  |,80,6,76,6.... .|
000001e0  20 36 38 2c 36 2c 34 38  2c 36 2c 32 30 2c 36 2c  | 68,6,48,6,20,6,|
000001f0  2d 31 2c 32 30 2c 30 2c  30 0d 00 d2 33 20 dc 20  |-1,20,0,0...3 . |
00000200  31 31 36 2c 36 2c 2d 31  2c 31 2c 31 31 36 2c 36  |116,6,-1,1,116,6|
00000210  2c 31 30 38 2c 36 2c 2d  31 2c 31 2c 31 30 38 2c  |,108,6,-1,1,108,|
00000220  36 2c 31 30 30 2c 36 2c  2d 31 2c 31 0d 00 dc 21  |6,100,6,-1,1...!|
00000230  20 dc 20 31 30 30 2c 36  2c 39 36 2c 36 2c 2d 31  | . 100,6,96,6,-1|
00000240  2c 31 2c 39 36 2c 36 2c  31 30 34 2c 36 0d 00 e6  |,1,96,6,104,6...|
00000250  1e 20 dc 20 31 31 32 2c  36 2c 31 31 36 2c 36 2c  |. . 112,6,116,6,|
00000260  31 31 32 2c 36 2c 31 31  36 2c 36 0d 00 f0 21 20  |112,6,116,6...! |
00000270  dc 20 31 32 34 2c 36 2c  39 36 2c 36 2c 2d 31 2c  |. 124,6,96,6,-1,|
00000280  31 2c 39 36 2c 36 2c 31  32 34 2c 36 0d 00 fa 29  |1,96,6,124,6...)|
00000290  20 dc 20 31 32 38 2c 36  2c 31 32 34 2c 36 2c 2d  | . 128,6,124,6,-|
000002a0  31 2c 31 2c 31 32 34 2c  36 2c 31 31 36 2c 33 2c  |1,1,124,6,116,3,|
000002b0  31 31 32 2c 33 0d 01 04  20 20 dc 20 31 31 36 2c  |112,3...  . 116,|
000002c0  36 2c 39 36 2c 36 2c 2d  31 2c 31 2c 39 36 2c 36  |6,96,6,-1,1,96,6|
000002d0  2c 38 38 2c 36 0d 01 0e  1a 20 dc 20 38 30 2c 36  |,88,6.... . 80,6|
000002e0  2c 37 36 2c 36 2c 36 38  2c 36 2c 36 34 2c 36 0d  |,76,6,68,6,64,6.|
000002f0  01 18 1f 20 dc 20 36 38  2c 36 2c 34 38 2c 36 2c  |... . 68,6,48,6,|
00000300  32 30 2c 36 2c 2d 31 2c  32 30 2c 30 2c 30 0d ff  |20,6,-1,20,0,0..|
00000310