Home » Personal collection » Commodore disks » disk54a_sound_master_64.d64 » scrsave

scrsave

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 » disk54a_sound_master_64.d64
Filename: scrsave
Read OK:
File size: 06C4 bytes
Load address: 0801
Exec address: 0000
Duplicates

There is 1 duplicate copy of this file in the archive:

File contents
     0 GOTO 1000
    10 REM  ****************
    20 REM  * MUSIC MASTER *
    30 REM  *      64      *
    40 REM  ****************
    50 REM  *    LOADER    *
    60 REM  ****************
    70 REM  *      BY      *
    80 REM  * DOMINIC FORD *
    90 REM  *   1993-1994  *
   100 REM ****************
   110 POKE 53280,0:POKE53281,0
   120 PRINTCHR$(8);CHR$(14);"<clr><purple>"
   130 FORR=1TO12:PRINT:NEXT
   140 PRINTSPC(12);"🭾LEASE WAIT. . ."
   150 OPEN 1,8,0,"CODE"
   160 FORR=49152 TO 53247
   170 INPUT#1,D:POKER,D
   180 NEXT:CLOSE 1
   190 PRINTCHR$(147);CHR$(142);
   200 DATA"<clr><orange>   ┌🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸┐    "
   210 DATA"   🭲MUSIC MASTER 64 BY DOMINIC FORD🭲    "
   220 DATA"┌🭸🭸┴┬🭸🭸🭸┬🭸🭸🭸🭸┬🭸🭸🭸🭸┬🭸🭸🭸🭸┬┬🭸🭸🭸🭸🭸🭸┬┬🭸🭸┴🭸🭸🭸┐"
   230 DATA"🭲MRK🭲DYN🭲 1  🭲 2  🭲 3  🭲🭲 MENU 🭲🭲SOUNDS🭲"
   240 DATA"├🭸🭸🭸┼🭸🭸🭸┼🭸🭸🭸🭸┼🭸🭸🭸🭸┼🭸🭸🭸🭸┤├🭸🭸🭸🭸🭸🭸┤├🭸🭸🭸🭸🭸🭸┤"
   250 DATA"│   │   │    │    │    ││EDIT  ││PIANO │"
   260 DATA"│   │   │    │    │    ││SAVE  ││FLUTE │"
   270 DATA"│   │   │    │    │    ││LOAD  ││HCHORD│"
   280 DATA"│   │   │    │    │    ││QUIT  ││XPHONE│"
   290 DATA"│   │   │    │    │    ││NAME  ││ORGAN │"
   300 DATA"│   │   │    │    │    ││PLAY  ││ACCORD│"
   310 DATA"│   │   │    │    │    ││TEMPO ││TRUMPT│"
   320 DATA"│   │   │    │    │    ││ORDER ││DBASS │"
   330 PRINT"│   │   │    │    │    ││NEW ->││VIOLIN│"
   340 DATA"│   │   │    │    │    ││SAVE->││CLRNET│"
   350 DATA"│   │   │    │    │    ││EDIT->│└🭸🭸🭸🭸🭸🭸┘"
   360 DATA"│   │   │    │    │    │├🭸🭸🭸🭸🭸🭸┴🭸🭸🭸🭸🭸🭸🭸┐"
   370 DATA"│   │   │    │    │    ││    WELCOME   │"
   380 DATA"│   │   │    │    │    ││TO SOUND M. 64│"
   390 DATA"│   │   │    │    │    │├🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸┤"
   400 DATA"└🭸🭸🭸┴🭸🭸🭸┴🭸🭸🭸🭸┴🭸🭸🭸🭸┴🭸🭸🭸🭸┘│ <green> <UNTITLED> <orange> │"
   410 DATA"               BAR ORDER│ <green> <UNTITLED> <orange> 🭲"
   420 DATA"┌🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸┴🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸┤"
   430 DATA"🭲                                      🭲"
   440 DATA"└🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸<home>"
   450 DATA"*"
   999 AD=0
  1000 READ A$:IF A$="*" THEN END
  1010 FORR=1 TO LEN(A$):POKE52224+AD,ASC(MID$(A$,R,1)):AD=AD+1:NEXT
  1020 GOTO 1000

� 1000$
�  ****************<�  * MUSIC MASTER *T�  *      64      *l(�  ****************�2�  *    LOADER    *�<�  ****************�F�  *      BY      *�P�  * DOMINIC FORD *�Z�  *   1993-1994  *�d� ****************	n� 53280,0:�53281,0'	x��(8);�(14);"��"7	��R�1�12:�:�T	���12);"�LEASE WAIT. . ."g	�� 1,8,0,"CODE"|	��R�49152 � 53247�	��1,D:�R,D�	��:� 1�	���(147);�(142);�	��"��   �������������������������������î    "

��"   �MUSIC MASTER 64 BY DOMINIC FORD�    ":
��"��ñ���ò���ò���ò���ò������ò��ñ��î"j
��"�MRK�DYN� 1  � 2  � 3  �� MENU ��SOUNDS�"�
��"����������������������ó������ó������ó"�
��"�   �   �    �    �    ��EDIT  ��PIANO �"�
�"�   �   �    �    �    ��SAVE  ��FLUTE �"*�"�   �   �    �    �    ��LOAD  ��HCHORD�"Z�"�   �   �    �    �    ��QUIT  ��XPHONE�"�"�"�   �   �    �    �    ��NAME  ��ORGAN �"�,�"�   �   �    �    �    ��PLAY  ��ACCORD�"�6�"�   �   �    �    �    ��TEMPO ��TRUMPT�"@�"�   �   �    �    �    ��ORDER ��DBASS �"JJ�"�   �   �    �    �    ��NEW ->��VIOLIN�"zT�"�   �   �    �    �    ��SAVE->��CLRNET�"�^�"�   �   �    �    �    ��EDIT->ݭ�����ý"�h�"�   �   �    �    �    ݫ�����ñ������î"

r�"�   �   �    �    �    ��    WELCOME   �":
|�"�   �   �    �    �    ��TO SOUND M. 64�"j
��"�   �   �    �    �    ݫ�������������ó"�
��"���ñ��ñ���ñ���ñ���ý�  <UNTITLED> � �"�
��"               BAR ORDER�  <UNTITLED> � �"�
��"�����������������������ñ�������������ó".��"�                                      �"^��"���������������������������������������"g��"*"p�AD�0��� A$:� A$�"*" � ����R�1 � �(A$):�52224�AD,�(�(A$,R,1)):AD�AD�1:���� 1000
LH@@. 1000@$HJ@.  ****************@<HT@.  * music master *@tH.@.  *      64      *@LH(@.  ****************@.H2@.  *    loader    *@.H<@.  ****************@.Hf@.  *      by      *@.Hp@.  * dominic ford *@.Hz@.  *   1993-1994  *@.HD@. ****************@RIN@. 53280,0:.53281,0@'IX@..(8);.(14);".."@7I.@.r.1.12:.:.@tI.@..12);".lease wait. . ."@GI.@. 1,8,0,"code"@.I.@.r.49152 . 53247@.I.@.1,d:.r,d@.I.@.:. 1@.I.@..(147);.(142);@.I.@."..   .................................    "@JJ.@."   .music master 64 by dominic ford.    "@:J.@."........................................"@JJ.@.".mrk.dyn. 1  . 2  . 3  .. menu ..sounds."@.J.@."........................................"@.J.@.".   .   .    .    .    ..edit  ..piano ."@.JDA.".   .   .    .    .    ..save  ..flute ."@*KNA.".   .   .    .    .    ..load  ..hchord."@zKXA.".   .   .    .    .    ..quit  ..xphone."@.K"A.".   .   .    .    .    ..name  ..organ ."@.K,A.".   .   .    .    .    ..play  ..accord."@.K6A.".   .   .    .    .    ..tempo ..trumpt."@ZL@A.".   .   .    .    .    ..order ..dbass ."@jLjA.".   .   .    .    .    ..new ->..violin."@ZLtA.".   .   .    .    .    ..save->..clrnet."@.L.A.".   .   .    .    .    ..edit->........."@.LHA.".   .   .    .    .    ................."@JMRA.".   .   .    .    .    ..    welcome   ."@:M.A.".   .   .    .    .    ..to sound m. 64."@JM.A.".   .   .    .    .    ................."@.M.A."......................... . <untitled> . ."@.M.A."               bar order. . <untitled> . ."@.M.A."........................................"@.N.A.".                                      ."@.N.A.".......................................S"@GN.A."*"@PN.Cad.0@.N.C. a$:. a$."*" . .@.N.C.r.1 . .(a$):.52224.ad,.(.(a$,r,1)):ad.ad.1:.@.N.C. 1000@@@
00000000  0c 08 00 00 89 20 31 30  30 30 00 24 08 0a 00 8f  |..... 1000.$....|
00000010  20 20 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |  **************|
00000020  2a 2a 00 3c 08 14 00 8f  20 20 2a 20 4d 55 53 49  |**.<....  * MUSI|
00000030  43 20 4d 41 53 54 45 52  20 2a 00 54 08 1e 00 8f  |C MASTER *.T....|
00000040  20 20 2a 20 20 20 20 20  20 36 34 20 20 20 20 20  |  *      64     |
00000050  20 2a 00 6c 08 28 00 8f  20 20 2a 2a 2a 2a 2a 2a  | *.l.(..  ******|
00000060  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 00 84 08 32 00 8f  |**********...2..|
00000070  20 20 2a 20 20 20 20 4c  4f 41 44 45 52 20 20 20  |  *    LOADER   |
00000080  20 2a 00 9c 08 3c 00 8f  20 20 2a 2a 2a 2a 2a 2a  | *...<..  ******|
00000090  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 00 b4 08 46 00 8f  |**********...F..|
000000a0  20 20 2a 20 20 20 20 20  20 42 59 20 20 20 20 20  |  *      BY     |
000000b0  20 2a 00 cc 08 50 00 8f  20 20 2a 20 44 4f 4d 49  | *...P..  * DOMI|
000000c0  4e 49 43 20 46 4f 52 44  20 2a 00 e4 08 5a 00 8f  |NIC FORD *...Z..|
000000d0  20 20 2a 20 20 20 31 39  39 33 2d 31 39 39 34 20  |  *   1993-1994 |
000000e0  20 2a 00 fb 08 64 00 8f  20 2a 2a 2a 2a 2a 2a 2a  | *...d.. *******|
000000f0  2a 2a 2a 2a 2a 2a 2a 2a  2a 00 12 09 6e 00 97 20  |*********...n.. |
00000100  35 33 32 38 30 2c 30 3a  97 35 33 32 38 31 2c 30  |53280,0:.53281,0|
00000110  00 27 09 78 00 99 c7 28  38 29 3b c7 28 31 34 29  |.'.x...(8);.(14)|
00000120  3b 22 93 9c 22 00 37 09  82 00 81 52 b2 31 a4 31  |;"..".7....R.1.1|
00000130  32 3a 99 3a 82 00 54 09  8c 00 99 a6 31 32 29 3b  |2:.:..T.....12);|
00000140  22 d0 4c 45 41 53 45 20  57 41 49 54 2e 20 2e 20  |".LEASE WAIT. . |
00000150  2e 22 00 67 09 96 00 9f  20 31 2c 38 2c 30 2c 22  |.".g.... 1,8,0,"|
00000160  43 4f 44 45 22 00 7c 09  a0 00 81 52 b2 34 39 31  |CODE".|....R.491|
00000170  35 32 20 a4 20 35 33 32  34 37 00 8a 09 aa 00 84  |52 . 53247......|
00000180  31 2c 44 3a 97 52 2c 44  00 94 09 b4 00 82 3a a0  |1,D:.R,D......:.|
00000190  20 31 00 a8 09 be 00 99  c7 28 31 34 37 29 3b c7  | 1.......(147);.|
000001a0  28 31 34 32 29 3b 00 da  09 c8 00 83 22 93 81 20  |(142);......".. |
000001b0  20 20 b0 c3 c3 c3 c3 c3  c3 c3 c3 c3 c3 c3 c3 c3  |  ..............|
000001c0  c3 c3 c3 c3 c3 c3 c3 c3  c3 c3 c3 c3 c3 c3 c3 c3  |................|
000001d0  c3 c3 ae 20 20 20 20 22  00 0a 0a d2 00 83 22 20  |...    "......" |
000001e0  20 20 c2 4d 55 53 49 43  20 4d 41 53 54 45 52 20  |  .MUSIC MASTER |
000001f0  36 34 20 42 59 20 44 4f  4d 49 4e 49 43 20 46 4f  |64 BY DOMINIC FO|
00000200  52 44 c2 20 20 20 20 22  00 3a 0a dc 00 83 22 b0  |RD.    ".:....".|
00000210  c3 c3 b1 b2 c3 c3 c3 b2  c3 c3 c3 c3 b2 c3 c3 c3  |................|
00000220  c3 b2 c3 c3 c3 c3 b2 b2  c3 c3 c3 c3 c3 c3 b2 b2  |................|
00000230  c3 c3 b1 c3 c3 c3 ae 22  00 6a 0a e6 00 83 22 c2  |.......".j....".|
00000240  4d 52 4b c2 44 59 4e c2  20 31 20 20 c2 20 32 20  |MRK.DYN. 1  . 2 |
00000250  20 c2 20 33 20 20 c2 c2  20 4d 45 4e 55 20 c2 c2  | . 3  .. MENU ..|
00000260  53 4f 55 4e 44 53 c2 22  00 9a 0a f0 00 83 22 ab  |SOUNDS."......".|
00000270  c3 c3 c3 db c3 c3 c3 db  c3 c3 c3 c3 db c3 c3 c3  |................|
00000280  c3 db c3 c3 c3 c3 b3 ab  c3 c3 c3 c3 c3 c3 b3 ab  |................|
00000290  c3 c3 c3 c3 c3 c3 b3 22  00 ca 0a fa 00 83 22 dd  |......."......".|
000002a0  20 20 20 dd 20 20 20 dd  20 20 20 20 dd 20 20 20  |   .   .    .   |
000002b0  20 dd 20 20 20 20 dd dd  45 44 49 54 20 20 dd dd  | .    ..EDIT  ..|
000002c0  50 49 41 4e 4f 20 dd 22  00 fa 0a 04 01 83 22 dd  |PIANO ."......".|
000002d0  20 20 20 dd 20 20 20 dd  20 20 20 20 dd 20 20 20  |   .   .    .   |
000002e0  20 dd 20 20 20 20 dd dd  53 41 56 45 20 20 dd dd  | .    ..SAVE  ..|
000002f0  46 4c 55 54 45 20 dd 22  00 2a 0b 0e 01 83 22 dd  |FLUTE .".*....".|
00000300  20 20 20 dd 20 20 20 dd  20 20 20 20 dd 20 20 20  |   .   .    .   |
00000310  20 dd 20 20 20 20 dd dd  4c 4f 41 44 20 20 dd dd  | .    ..LOAD  ..|
00000320  48 43 48 4f 52 44 dd 22  00 5a 0b 18 01 83 22 dd  |HCHORD.".Z....".|
00000330  20 20 20 dd 20 20 20 dd  20 20 20 20 dd 20 20 20  |   .   .    .   |
00000340  20 dd 20 20 20 20 dd dd  51 55 49 54 20 20 dd dd  | .    ..QUIT  ..|
00000350  58 50 48 4f 4e 45 dd 22  00 8a 0b 22 01 83 22 dd  |XPHONE."..."..".|
00000360  20 20 20 dd 20 20 20 dd  20 20 20 20 dd 20 20 20  |   .   .    .   |
00000370  20 dd 20 20 20 20 dd dd  4e 41 4d 45 20 20 dd dd  | .    ..NAME  ..|
00000380  4f 52 47 41 4e 20 dd 22  00 ba 0b 2c 01 83 22 dd  |ORGAN ."...,..".|
00000390  20 20 20 dd 20 20 20 dd  20 20 20 20 dd 20 20 20  |   .   .    .   |
000003a0  20 dd 20 20 20 20 dd dd  50 4c 41 59 20 20 dd dd  | .    ..PLAY  ..|
000003b0  41 43 43 4f 52 44 dd 22  00 ea 0b 36 01 83 22 dd  |ACCORD."...6..".|
000003c0  20 20 20 dd 20 20 20 dd  20 20 20 20 dd 20 20 20  |   .   .    .   |
000003d0  20 dd 20 20 20 20 dd dd  54 45 4d 50 4f 20 dd dd  | .    ..TEMPO ..|
000003e0  54 52 55 4d 50 54 dd 22  00 1a 0c 40 01 83 22 dd  |TRUMPT."...@..".|
000003f0  20 20 20 dd 20 20 20 dd  20 20 20 20 dd 20 20 20  |   .   .    .   |
00000400  20 dd 20 20 20 20 dd dd  4f 52 44 45 52 20 dd dd  | .    ..ORDER ..|
00000410  44 42 41 53 53 20 dd 22  00 4a 0c 4a 01 99 22 dd  |DBASS .".J.J..".|
00000420  20 20 20 dd 20 20 20 dd  20 20 20 20 dd 20 20 20  |   .   .    .   |
00000430  20 dd 20 20 20 20 dd dd  4e 45 57 20 2d 3e dd dd  | .    ..NEW ->..|
00000440  56 49 4f 4c 49 4e dd 22  00 7a 0c 54 01 83 22 dd  |VIOLIN.".z.T..".|
00000450  20 20 20 dd 20 20 20 dd  20 20 20 20 dd 20 20 20  |   .   .    .   |
00000460  20 dd 20 20 20 20 dd dd  53 41 56 45 2d 3e dd dd  | .    ..SAVE->..|
00000470  43 4c 52 4e 45 54 dd 22  00 aa 0c 5e 01 83 22 dd  |CLRNET."...^..".|
00000480  20 20 20 dd 20 20 20 dd  20 20 20 20 dd 20 20 20  |   .   .    .   |
00000490  20 dd 20 20 20 20 dd dd  45 44 49 54 2d 3e dd ad  | .    ..EDIT->..|
000004a0  c3 c3 c3 c3 c3 c3 bd 22  00 da 0c 68 01 83 22 dd  |......."...h..".|
000004b0  20 20 20 dd 20 20 20 dd  20 20 20 20 dd 20 20 20  |   .   .    .   |
000004c0  20 dd 20 20 20 20 dd ab  c3 c3 c3 c3 c3 c3 b1 c3  | .    ..........|
000004d0  c3 c3 c3 c3 c3 c3 ae 22  00 0a 0d 72 01 83 22 dd  |......."...r..".|
000004e0  20 20 20 dd 20 20 20 dd  20 20 20 20 dd 20 20 20  |   .   .    .   |
000004f0  20 dd 20 20 20 20 dd dd  20 20 20 20 57 45 4c 43  | .    ..    WELC|
00000500  4f 4d 45 20 20 20 dd 22  00 3a 0d 7c 01 83 22 dd  |OME   .".:.|..".|
00000510  20 20 20 dd 20 20 20 dd  20 20 20 20 dd 20 20 20  |   .   .    .   |
00000520  20 dd 20 20 20 20 dd dd  54 4f 20 53 4f 55 4e 44  | .    ..TO SOUND|
00000530  20 4d 2e 20 36 34 dd 22  00 6a 0d 86 01 83 22 dd  | M. 64.".j....".|
00000540  20 20 20 dd 20 20 20 dd  20 20 20 20 dd 20 20 20  |   .   .    .   |
00000550  20 dd 20 20 20 20 dd ab  c3 c3 c3 c3 c3 c3 c3 c3  | .    ..........|
00000560  c3 c3 c3 c3 c3 c3 b3 22  00 9c 0d 90 01 83 22 ad  |......."......".|
00000570  c3 c3 c3 b1 c3 c3 c3 b1  c3 c3 c3 c3 b1 c3 c3 c3  |................|
00000580  c3 b1 c3 c3 c3 c3 bd dd  20 1e 20 3c 55 4e 54 49  |........ . <UNTI|
00000590  54 4c 45 44 3e 20 81 20  dd 22 00 ce 0d 9a 01 83  |TLED> . ."......|
000005a0  22 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |"               |
000005b0  42 41 52 20 4f 52 44 45  52 dd 20 1e 20 3c 55 4e  |BAR ORDER. . <UN|
000005c0  54 49 54 4c 45 44 3e 20  81 20 c2 22 00 fe 0d a4  |TITLED> . ."....|
000005d0  01 83 22 b0 c3 c3 c3 c3  c3 c3 c3 c3 c3 c3 c3 c3  |..".............|
000005e0  c3 c3 c3 c3 c3 c3 c3 c3  c3 c3 c3 b1 c3 c3 c3 c3  |................|
000005f0  c3 c3 c3 c3 c3 c3 c3 c3  c3 c3 b3 22 00 2e 0e ae  |..........."....|
00000600  01 83 22 c2 20 20 20 20  20 20 20 20 20 20 20 20  |..".            |
00000610  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000620  20 20 20 20 20 20 20 20  20 20 c2 22 00 5e 0e b8  |          .".^..|
00000630  01 83 22 ad c3 c3 c3 c3  c3 c3 c3 c3 c3 c3 c3 c3  |..".............|
00000640  c3 c3 c3 c3 c3 c3 c3 c3  c3 c3 c3 c3 c3 c3 c3 c3  |................|
00000650  c3 c3 c3 c3 c3 c3 c3 c3  c3 c3 13 22 00 67 0e c2  |...........".g..|
00000660  01 83 22 2a 22 00 70 0e  e7 03 41 44 b2 30 00 86  |.."*".p...AD.0..|
00000670  0e e8 03 87 20 41 24 3a  8b 20 41 24 b2 22 2a 22  |.... A$:. A$."*"|
00000680  20 a7 20 80 00 b8 0e f2  03 81 52 b2 31 20 a4 20  | . .......R.1 . |
00000690  c3 28 41 24 29 3a 97 35  32 32 32 34 aa 41 44 2c  |.(A$):.52224.AD,|
000006a0  c6 28 ca 28 41 24 2c 52  2c 31 29 29 3a 41 44 b2  |.(.(A$,R,1)):AD.|
000006b0  41 44 aa 31 3a 82 00 c3  0e fc 03 89 20 31 30 30  |AD.1:....... 100|
000006c0  30 00 00 00                                       |0...|
000006c4