Home » Archimedes archive » Acorn User » AU 1994-05.adf » !Armony_Armony » !Armony/menus

!Armony/menus

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 » Archimedes archive » Acorn User » AU 1994-05.adf » !Armony_Armony
Filename: !Armony/menus
Read OK:
File size: 1CAE bytes
Load address: 0000
Exec address: 0000
File contents
beginmenu            REM menu 1 - Main menu
!Armony
Info,window(info%)
Keyboard
Chords and Rhythms
Update Instruments
Quit
beginmenu            REM menu 2 - Chord Sequences
SEQUENCE
Play sequence
Repeat,line
Copy sequence
Add sequence
Clear sequence,line
Global rhythm,submenu(3)
beginmenu            REM menu 3 - Global rhythm

a,write(1:1)
beginmenu            REM menu 4 - Rhythms
RHYTHM
Play rhythm
Repeat,line
Copy rhythm
Add rhythm
Clear rhythm,line
No. of beats,submenu(19)
Chord Volume,submenu(20)
Bass Volume,submenu(21)
FX Volume,submenu(22),line
Load rhythm,submenu(23)
Save rhythm,window(save_rthm%)
beginmenu            REM menu 5 - Keyboard
SONG
Load song,submenu(6)
Save song,window(save%),line
Play song
Repeat
Song structure,submenu(9)
Tempo,submenu(7),line
Chord octave,submenu(10)
Bass octave,submenu(11)
Keyboard octave,submenu(12),line
Instruments,submenu(13)
Stereo position,window(stereo_pos%)
Transpose,submenu(8)
beginmenu            REM menu 6 - Load song name

Newsong   ,write(2:40)
beginmenu            REM menu 7 - Tempo

32   ,write(3:5)
beginmenu            REM menu 8 - Transpose
                                
0   ,write(4:4)
beginmenu            REM menu 9 - Song structure

A                ,write(5:17)
beginmenu            REM menu 10 - Chord octaves

1st
2nd
3rd,tick
4th
5th
beginmenu            REM menu 11 - Bass octaves

1st
2nd,tick
3rd
4th
5th
beginmenu            REM menu 12 - Keyboard 0ctaves

1st
2nd,tick
3rd
4th
5th
beginmenu            REM menu 13 - Instruments

Chords,submenu(14)
Bass,submenu(15)
Keyboard,submenu(16)
FX 1,submenu(17)
FX 2,submenu(17)
FX 3,submenu(17)
FX 4,submenu(17)
FX 5,submenu(17)
FX 6,submenu(17)
FX channels,submenu (18)
beginmenu            REM menu 14 - Chord voice
VOICES
1                        ,write(6,25)
2                        ,write(7,25),tick
3                        ,write(8,25)
4                        ,write(9,25)
5                        ,write(10,25)
6                        ,write(11,25)
7                        ,write(12,25)
8                        ,write(13,25)
9                        ,write(14,25)
10                       ,write(15,25)
11                       ,write(16,25)
12                       ,write(17,25)
13                       ,write(18,25)
14                       ,write(19,25)
15                       ,write(20,25)
16                       ,write(21,25)
17                       ,write(22,25)
18                       ,write(23,25)
19                       ,write(24,25)
20                       ,write(25,25)
21                       ,write(26,25)
22                       ,write(27,25)
23                       ,write(28,25)
24                       ,write(29,25)
25                       ,write(30,25)
26                       ,write(31,25)
27                       ,write(32,25)
28                       ,write(33,25)
29                       ,write(34,25)
30                       ,write(35,25)
31                       ,write(36,25)
32                       ,write(37,25)
beginmenu            REM menu 15 - Bass voice
VOICES
1                        ,write(38,25),tick
2                        ,write(39,25)
3                        ,write(40,25)
4                        ,write(41,25)
5                        ,write(42,25)
6                        ,write(43,25)
7                        ,write(44,25)
8                        ,write(45,25)
9                        ,write(46,25)
10                       ,write(47,25)
11                       ,write(48,25)
12                       ,write(49,25)
13                       ,write(50,25)
14                       ,write(51,25)
15                       ,write(52,25)
16                       ,write(53,25)
17                       ,write(54,25)
18                       ,write(55,25)
19                       ,write(56,25)
20                       ,write(57,25)
21                       ,write(58,25)
22                       ,write(59,25)
23                       ,write(60,25)
24                       ,write(61,25)
25                       ,write(62,25)
26                       ,write(63,25)
27                       ,write(64,25)
28                       ,write(65,25)
29                       ,write(66,25)
30                       ,write(67,25)
31                       ,write(68,25)
32                       ,write(69,25)
beginmenu            REM menu 16 - Keyboard voice
VOICES
1                        ,write(70,25)
2                        ,write(71,25)
3                        ,write(72,25),tick
4                        ,write(73,25)
5                        ,write(74,25)
6                        ,write(75,25)
7                        ,write(76,25)
8                        ,write(77,25)
9                        ,write(78,25)
10                       ,write(79,25)
11                       ,write(80,25)
12                       ,write(81,25)
13                       ,write(82,25)
14                       ,write(83,25)
15                       ,write(84,25)
16                       ,write(85,25)
17                       ,write(86,25)
18                       ,write(87,25)
19                       ,write(88,25)
20                       ,write(89,25)
21                       ,write(90,25)
22                       ,write(91,25)
23                       ,write(92,25)
24                       ,write(93,25)
25                       ,write(94,25)
26                       ,write(95,25)
27                       ,write(96,25)
28                       ,write(97,25)
29                       ,write(98,25)
30                       ,write(99,25)
31                       ,write(100,25)
32                       ,write(101,25)
beginmenu            REM menu 17 - FX voices
VOICES
1                        ,write(102,25)
2                        ,write(103,25)
3                        ,write(104,25)
4                        ,write(105,25)
5                        ,write(106,25)
6                        ,write(107,25)
7                        ,write(108,25)
8                        ,write(109,25)
9                        ,write(110,25)
10                       ,write(111,25)
11                       ,write(112,25)
12                       ,write(113,25)
13                       ,write(114,25)
14                       ,write(115,25)
15                       ,write(116,25)
16                       ,write(117,25)
17                       ,write(118,25)
18                       ,write(119,25)
19                       ,write(120,25)
20                       ,write(121,25)
21                       ,write(122,25)
22                       ,write(123,25)
23                       ,write(124,25)
24                       ,write(125,25)
25                       ,write(126,25)
26                       ,write(127,25)
27                       ,write(128,25)
28                       ,write(129,25)
29                       ,write(130,25)
30                       ,write(131,25)
31                       ,write(132,25)
32                       ,write(133,25)
beginmenu            REM menu 18 - FX channels

6
5
4
3
2
1
beginmenu            REM menu 19 - Number of beats

8 ,write(134:2)
beginmenu            REM menu 20 - Chord volume

half,tick
full
beginmenu            REM menu 21 - Bass volume

half
full,tick
beginmenu            REM menu 22 - FX volume

half,tick
full
beginmenu            REM menu 23 - Load rhythm

Rhythm    ,write(135:40)
00000000  62 65 67 69 6e 6d 65 6e  75 20 20 20 20 20 20 20  |beginmenu       |
00000010  20 20 20 20 20 52 45 4d  20 6d 65 6e 75 20 31 20  |     REM menu 1 |
00000020  2d 20 4d 61 69 6e 20 6d  65 6e 75 0a 21 41 72 6d  |- Main menu.!Arm|
00000030  6f 6e 79 0a 49 6e 66 6f  2c 77 69 6e 64 6f 77 28  |ony.Info,window(|
00000040  69 6e 66 6f 25 29 0a 4b  65 79 62 6f 61 72 64 0a  |info%).Keyboard.|
00000050  43 68 6f 72 64 73 20 61  6e 64 20 52 68 79 74 68  |Chords and Rhyth|
00000060  6d 73 0a 55 70 64 61 74  65 20 49 6e 73 74 72 75  |ms.Update Instru|
00000070  6d 65 6e 74 73 0a 51 75  69 74 0a 62 65 67 69 6e  |ments.Quit.begin|
00000080  6d 65 6e 75 20 20 20 20  20 20 20 20 20 20 20 20  |menu            |
00000090  52 45 4d 20 6d 65 6e 75  20 32 20 2d 20 43 68 6f  |REM menu 2 - Cho|
000000a0  72 64 20 53 65 71 75 65  6e 63 65 73 0a 53 45 51  |rd Sequences.SEQ|
000000b0  55 45 4e 43 45 0a 50 6c  61 79 20 73 65 71 75 65  |UENCE.Play seque|
000000c0  6e 63 65 0a 52 65 70 65  61 74 2c 6c 69 6e 65 0a  |nce.Repeat,line.|
000000d0  43 6f 70 79 20 73 65 71  75 65 6e 63 65 0a 41 64  |Copy sequence.Ad|
000000e0  64 20 73 65 71 75 65 6e  63 65 0a 43 6c 65 61 72  |d sequence.Clear|
000000f0  20 73 65 71 75 65 6e 63  65 2c 6c 69 6e 65 0a 47  | sequence,line.G|
00000100  6c 6f 62 61 6c 20 72 68  79 74 68 6d 2c 73 75 62  |lobal rhythm,sub|
00000110  6d 65 6e 75 28 33 29 0a  62 65 67 69 6e 6d 65 6e  |menu(3).beginmen|
00000120  75 20 20 20 20 20 20 20  20 20 20 20 20 52 45 4d  |u            REM|
00000130  20 6d 65 6e 75 20 33 20  2d 20 47 6c 6f 62 61 6c  | menu 3 - Global|
00000140  20 72 68 79 74 68 6d 0a  0a 61 2c 77 72 69 74 65  | rhythm..a,write|
00000150  28 31 3a 31 29 0a 62 65  67 69 6e 6d 65 6e 75 20  |(1:1).beginmenu |
00000160  20 20 20 20 20 20 20 20  20 20 20 52 45 4d 20 6d  |           REM m|
00000170  65 6e 75 20 34 20 2d 20  52 68 79 74 68 6d 73 0a  |enu 4 - Rhythms.|
00000180  52 48 59 54 48 4d 0a 50  6c 61 79 20 72 68 79 74  |RHYTHM.Play rhyt|
00000190  68 6d 0a 52 65 70 65 61  74 2c 6c 69 6e 65 0a 43  |hm.Repeat,line.C|
000001a0  6f 70 79 20 72 68 79 74  68 6d 0a 41 64 64 20 72  |opy rhythm.Add r|
000001b0  68 79 74 68 6d 0a 43 6c  65 61 72 20 72 68 79 74  |hythm.Clear rhyt|
000001c0  68 6d 2c 6c 69 6e 65 0a  4e 6f 2e 20 6f 66 20 62  |hm,line.No. of b|
000001d0  65 61 74 73 2c 73 75 62  6d 65 6e 75 28 31 39 29  |eats,submenu(19)|
000001e0  0a 43 68 6f 72 64 20 56  6f 6c 75 6d 65 2c 73 75  |.Chord Volume,su|
000001f0  62 6d 65 6e 75 28 32 30  29 0a 42 61 73 73 20 56  |bmenu(20).Bass V|
00000200  6f 6c 75 6d 65 2c 73 75  62 6d 65 6e 75 28 32 31  |olume,submenu(21|
00000210  29 0a 46 58 20 56 6f 6c  75 6d 65 2c 73 75 62 6d  |).FX Volume,subm|
00000220  65 6e 75 28 32 32 29 2c  6c 69 6e 65 0a 4c 6f 61  |enu(22),line.Loa|
00000230  64 20 72 68 79 74 68 6d  2c 73 75 62 6d 65 6e 75  |d rhythm,submenu|
00000240  28 32 33 29 0a 53 61 76  65 20 72 68 79 74 68 6d  |(23).Save rhythm|
00000250  2c 77 69 6e 64 6f 77 28  73 61 76 65 5f 72 74 68  |,window(save_rth|
00000260  6d 25 29 0a 62 65 67 69  6e 6d 65 6e 75 20 20 20  |m%).beginmenu   |
00000270  20 20 20 20 20 20 20 20  20 52 45 4d 20 6d 65 6e  |         REM men|
00000280  75 20 35 20 2d 20 4b 65  79 62 6f 61 72 64 0a 53  |u 5 - Keyboard.S|
00000290  4f 4e 47 0a 4c 6f 61 64  20 73 6f 6e 67 2c 73 75  |ONG.Load song,su|
000002a0  62 6d 65 6e 75 28 36 29  0a 53 61 76 65 20 73 6f  |bmenu(6).Save so|
000002b0  6e 67 2c 77 69 6e 64 6f  77 28 73 61 76 65 25 29  |ng,window(save%)|
000002c0  2c 6c 69 6e 65 0a 50 6c  61 79 20 73 6f 6e 67 0a  |,line.Play song.|
000002d0  52 65 70 65 61 74 0a 53  6f 6e 67 20 73 74 72 75  |Repeat.Song stru|
000002e0  63 74 75 72 65 2c 73 75  62 6d 65 6e 75 28 39 29  |cture,submenu(9)|
000002f0  0a 54 65 6d 70 6f 2c 73  75 62 6d 65 6e 75 28 37  |.Tempo,submenu(7|
00000300  29 2c 6c 69 6e 65 0a 43  68 6f 72 64 20 6f 63 74  |),line.Chord oct|
00000310  61 76 65 2c 73 75 62 6d  65 6e 75 28 31 30 29 0a  |ave,submenu(10).|
00000320  42 61 73 73 20 6f 63 74  61 76 65 2c 73 75 62 6d  |Bass octave,subm|
00000330  65 6e 75 28 31 31 29 0a  4b 65 79 62 6f 61 72 64  |enu(11).Keyboard|
00000340  20 6f 63 74 61 76 65 2c  73 75 62 6d 65 6e 75 28  | octave,submenu(|
00000350  31 32 29 2c 6c 69 6e 65  0a 49 6e 73 74 72 75 6d  |12),line.Instrum|
00000360  65 6e 74 73 2c 73 75 62  6d 65 6e 75 28 31 33 29  |ents,submenu(13)|
00000370  0a 53 74 65 72 65 6f 20  70 6f 73 69 74 69 6f 6e  |.Stereo position|
00000380  2c 77 69 6e 64 6f 77 28  73 74 65 72 65 6f 5f 70  |,window(stereo_p|
00000390  6f 73 25 29 0a 54 72 61  6e 73 70 6f 73 65 2c 73  |os%).Transpose,s|
000003a0  75 62 6d 65 6e 75 28 38  29 0a 62 65 67 69 6e 6d  |ubmenu(8).beginm|
000003b0  65 6e 75 20 20 20 20 20  20 20 20 20 20 20 20 52  |enu            R|
000003c0  45 4d 20 6d 65 6e 75 20  36 20 2d 20 4c 6f 61 64  |EM menu 6 - Load|
000003d0  20 73 6f 6e 67 20 6e 61  6d 65 0a 0a 4e 65 77 73  | song name..News|
000003e0  6f 6e 67 20 20 20 2c 77  72 69 74 65 28 32 3a 34  |ong   ,write(2:4|
000003f0  30 29 0a 62 65 67 69 6e  6d 65 6e 75 20 20 20 20  |0).beginmenu    |
00000400  20 20 20 20 20 20 20 20  52 45 4d 20 6d 65 6e 75  |        REM menu|
00000410  20 37 20 2d 20 54 65 6d  70 6f 0a 0a 33 32 20 20  | 7 - Tempo..32  |
00000420  20 2c 77 72 69 74 65 28  33 3a 35 29 0a 62 65 67  | ,write(3:5).beg|
00000430  69 6e 6d 65 6e 75 20 20  20 20 20 20 20 20 20 20  |inmenu          |
00000440  20 20 52 45 4d 20 6d 65  6e 75 20 38 20 2d 20 54  |  REM menu 8 - T|
00000450  72 61 6e 73 70 6f 73 65  0a 20 20 20 20 20 20 20  |ranspose.       |
00000460  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000470  20 20 20 20 20 20 20 20  20 0a 30 20 20 20 2c 77  |         .0   ,w|
00000480  72 69 74 65 28 34 3a 34  29 0a 62 65 67 69 6e 6d  |rite(4:4).beginm|
00000490  65 6e 75 20 20 20 20 20  20 20 20 20 20 20 20 52  |enu            R|
000004a0  45 4d 20 6d 65 6e 75 20  39 20 2d 20 53 6f 6e 67  |EM menu 9 - Song|
000004b0  20 73 74 72 75 63 74 75  72 65 0a 0a 41 20 20 20  | structure..A   |
000004c0  20 20 20 20 20 20 20 20  20 20 20 20 20 2c 77 72  |             ,wr|
000004d0  69 74 65 28 35 3a 31 37  29 0a 62 65 67 69 6e 6d  |ite(5:17).beginm|
000004e0  65 6e 75 20 20 20 20 20  20 20 20 20 20 20 20 52  |enu            R|
000004f0  45 4d 20 6d 65 6e 75 20  31 30 20 2d 20 43 68 6f  |EM menu 10 - Cho|
00000500  72 64 20 6f 63 74 61 76  65 73 0a 0a 31 73 74 0a  |rd octaves..1st.|
00000510  32 6e 64 0a 33 72 64 2c  74 69 63 6b 0a 34 74 68  |2nd.3rd,tick.4th|
00000520  0a 35 74 68 0a 62 65 67  69 6e 6d 65 6e 75 20 20  |.5th.beginmenu  |
00000530  20 20 20 20 20 20 20 20  20 20 52 45 4d 20 6d 65  |          REM me|
00000540  6e 75 20 31 31 20 2d 20  42 61 73 73 20 6f 63 74  |nu 11 - Bass oct|
00000550  61 76 65 73 0a 0a 31 73  74 0a 32 6e 64 2c 74 69  |aves..1st.2nd,ti|
00000560  63 6b 0a 33 72 64 0a 34  74 68 0a 35 74 68 0a 62  |ck.3rd.4th.5th.b|
00000570  65 67 69 6e 6d 65 6e 75  20 20 20 20 20 20 20 20  |eginmenu        |
00000580  20 20 20 20 52 45 4d 20  6d 65 6e 75 20 31 32 20  |    REM menu 12 |
00000590  2d 20 4b 65 79 62 6f 61  72 64 20 30 63 74 61 76  |- Keyboard 0ctav|
000005a0  65 73 0a 0a 31 73 74 0a  32 6e 64 2c 74 69 63 6b  |es..1st.2nd,tick|
000005b0  0a 33 72 64 0a 34 74 68  0a 35 74 68 0a 62 65 67  |.3rd.4th.5th.beg|
000005c0  69 6e 6d 65 6e 75 20 20  20 20 20 20 20 20 20 20  |inmenu          |
000005d0  20 20 52 45 4d 20 6d 65  6e 75 20 31 33 20 2d 20  |  REM menu 13 - |
000005e0  49 6e 73 74 72 75 6d 65  6e 74 73 0a 0a 43 68 6f  |Instruments..Cho|
000005f0  72 64 73 2c 73 75 62 6d  65 6e 75 28 31 34 29 0a  |rds,submenu(14).|
00000600  42 61 73 73 2c 73 75 62  6d 65 6e 75 28 31 35 29  |Bass,submenu(15)|
00000610  0a 4b 65 79 62 6f 61 72  64 2c 73 75 62 6d 65 6e  |.Keyboard,submen|
00000620  75 28 31 36 29 0a 46 58  20 31 2c 73 75 62 6d 65  |u(16).FX 1,subme|
00000630  6e 75 28 31 37 29 0a 46  58 20 32 2c 73 75 62 6d  |nu(17).FX 2,subm|
00000640  65 6e 75 28 31 37 29 0a  46 58 20 33 2c 73 75 62  |enu(17).FX 3,sub|
00000650  6d 65 6e 75 28 31 37 29  0a 46 58 20 34 2c 73 75  |menu(17).FX 4,su|
00000660  62 6d 65 6e 75 28 31 37  29 0a 46 58 20 35 2c 73  |bmenu(17).FX 5,s|
00000670  75 62 6d 65 6e 75 28 31  37 29 0a 46 58 20 36 2c  |ubmenu(17).FX 6,|
00000680  73 75 62 6d 65 6e 75 28  31 37 29 0a 46 58 20 63  |submenu(17).FX c|
00000690  68 61 6e 6e 65 6c 73 2c  73 75 62 6d 65 6e 75 20  |hannels,submenu |
000006a0  28 31 38 29 0a 62 65 67  69 6e 6d 65 6e 75 20 20  |(18).beginmenu  |
000006b0  20 20 20 20 20 20 20 20  20 20 52 45 4d 20 6d 65  |          REM me|
000006c0  6e 75 20 31 34 20 2d 20  43 68 6f 72 64 20 76 6f  |nu 14 - Chord vo|
000006d0  69 63 65 0a 56 4f 49 43  45 53 0a 31 20 20 20 20  |ice.VOICES.1    |
000006e0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000006f0  20 20 20 20 2c 77 72 69  74 65 28 36 2c 32 35 29  |    ,write(6,25)|
00000700  0a 32 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.2              |
00000710  20 20 20 20 20 20 20 20  20 20 2c 77 72 69 74 65  |          ,write|
00000720  28 37 2c 32 35 29 2c 74  69 63 6b 0a 33 20 20 20  |(7,25),tick.3   |
00000730  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000740  20 20 20 20 20 2c 77 72  69 74 65 28 38 2c 32 35  |     ,write(8,25|
00000750  29 0a 34 20 20 20 20 20  20 20 20 20 20 20 20 20  |).4             |
00000760  20 20 20 20 20 20 20 20  20 20 20 2c 77 72 69 74  |           ,writ|
00000770  65 28 39 2c 32 35 29 0a  35 20 20 20 20 20 20 20  |e(9,25).5       |
00000780  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000790  20 2c 77 72 69 74 65 28  31 30 2c 32 35 29 0a 36  | ,write(10,25).6|
000007a0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000007b0  20 20 20 20 20 20 20 20  2c 77 72 69 74 65 28 31  |        ,write(1|
000007c0  31 2c 32 35 29 0a 37 20  20 20 20 20 20 20 20 20  |1,25).7         |
000007d0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2c  |               ,|
000007e0  77 72 69 74 65 28 31 32  2c 32 35 29 0a 38 20 20  |write(12,25).8  |
000007f0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000800  20 20 20 20 20 20 2c 77  72 69 74 65 28 31 33 2c  |      ,write(13,|
00000810  32 35 29 0a 39 20 20 20  20 20 20 20 20 20 20 20  |25).9           |
00000820  20 20 20 20 20 20 20 20  20 20 20 20 20 2c 77 72  |             ,wr|
00000830  69 74 65 28 31 34 2c 32  35 29 0a 31 30 20 20 20  |ite(14,25).10   |
00000840  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000850  20 20 20 20 2c 77 72 69  74 65 28 31 35 2c 32 35  |    ,write(15,25|
00000860  29 0a 31 31 20 20 20 20  20 20 20 20 20 20 20 20  |).11            |
00000870  20 20 20 20 20 20 20 20  20 20 20 2c 77 72 69 74  |           ,writ|
00000880  65 28 31 36 2c 32 35 29  0a 31 32 20 20 20 20 20  |e(16,25).12     |
00000890  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000008a0  20 20 2c 77 72 69 74 65  28 31 37 2c 32 35 29 0a  |  ,write(17,25).|
000008b0  31 33 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |13              |
000008c0  20 20 20 20 20 20 20 20  20 2c 77 72 69 74 65 28  |         ,write(|
000008d0  31 38 2c 32 35 29 0a 31  34 20 20 20 20 20 20 20  |18,25).14       |
000008e0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000008f0  2c 77 72 69 74 65 28 31  39 2c 32 35 29 0a 31 35  |,write(19,25).15|
00000900  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000910  20 20 20 20 20 20 20 2c  77 72 69 74 65 28 32 30  |       ,write(20|
00000920  2c 32 35 29 0a 31 36 20  20 20 20 20 20 20 20 20  |,25).16         |
00000930  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2c 77  |              ,w|
00000940  72 69 74 65 28 32 31 2c  32 35 29 0a 31 37 20 20  |rite(21,25).17  |
00000950  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000960  20 20 20 20 20 2c 77 72  69 74 65 28 32 32 2c 32  |     ,write(22,2|
00000970  35 29 0a 31 38 20 20 20  20 20 20 20 20 20 20 20  |5).18           |
00000980  20 20 20 20 20 20 20 20  20 20 20 20 2c 77 72 69  |            ,wri|
00000990  74 65 28 32 33 2c 32 35  29 0a 31 39 20 20 20 20  |te(23,25).19    |
000009a0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000009b0  20 20 20 2c 77 72 69 74  65 28 32 34 2c 32 35 29  |   ,write(24,25)|
000009c0  0a 32 30 20 20 20 20 20  20 20 20 20 20 20 20 20  |.20             |
000009d0  20 20 20 20 20 20 20 20  20 20 2c 77 72 69 74 65  |          ,write|
000009e0  28 32 35 2c 32 35 29 0a  32 31 20 20 20 20 20 20  |(25,25).21      |
000009f0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000a00  20 2c 77 72 69 74 65 28  32 36 2c 32 35 29 0a 32  | ,write(26,25).2|
00000a10  32 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |2               |
00000a20  20 20 20 20 20 20 20 20  2c 77 72 69 74 65 28 32  |        ,write(2|
00000a30  37 2c 32 35 29 0a 32 33  20 20 20 20 20 20 20 20  |7,25).23        |
00000a40  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2c  |               ,|
00000a50  77 72 69 74 65 28 32 38  2c 32 35 29 0a 32 34 20  |write(28,25).24 |
00000a60  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000a70  20 20 20 20 20 20 2c 77  72 69 74 65 28 32 39 2c  |      ,write(29,|
00000a80  32 35 29 0a 32 35 20 20  20 20 20 20 20 20 20 20  |25).25          |
00000a90  20 20 20 20 20 20 20 20  20 20 20 20 20 2c 77 72  |             ,wr|
00000aa0  69 74 65 28 33 30 2c 32  35 29 0a 32 36 20 20 20  |ite(30,25).26   |
00000ab0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000ac0  20 20 20 20 2c 77 72 69  74 65 28 33 31 2c 32 35  |    ,write(31,25|
00000ad0  29 0a 32 37 20 20 20 20  20 20 20 20 20 20 20 20  |).27            |
00000ae0  20 20 20 20 20 20 20 20  20 20 20 2c 77 72 69 74  |           ,writ|
00000af0  65 28 33 32 2c 32 35 29  0a 32 38 20 20 20 20 20  |e(32,25).28     |
00000b00  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000b10  20 20 2c 77 72 69 74 65  28 33 33 2c 32 35 29 0a  |  ,write(33,25).|
00000b20  32 39 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |29              |
00000b30  20 20 20 20 20 20 20 20  20 2c 77 72 69 74 65 28  |         ,write(|
00000b40  33 34 2c 32 35 29 0a 33  30 20 20 20 20 20 20 20  |34,25).30       |
00000b50  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000b60  2c 77 72 69 74 65 28 33  35 2c 32 35 29 0a 33 31  |,write(35,25).31|
00000b70  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000b80  20 20 20 20 20 20 20 2c  77 72 69 74 65 28 33 36  |       ,write(36|
00000b90  2c 32 35 29 0a 33 32 20  20 20 20 20 20 20 20 20  |,25).32         |
00000ba0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2c 77  |              ,w|
00000bb0  72 69 74 65 28 33 37 2c  32 35 29 0a 62 65 67 69  |rite(37,25).begi|
00000bc0  6e 6d 65 6e 75 20 20 20  20 20 20 20 20 20 20 20  |nmenu           |
00000bd0  20 52 45 4d 20 6d 65 6e  75 20 31 35 20 2d 20 42  | REM menu 15 - B|
00000be0  61 73 73 20 76 6f 69 63  65 0a 56 4f 49 43 45 53  |ass voice.VOICES|
00000bf0  0a 31 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.1              |
00000c00  20 20 20 20 20 20 20 20  20 20 2c 77 72 69 74 65  |          ,write|
00000c10  28 33 38 2c 32 35 29 2c  74 69 63 6b 0a 32 20 20  |(38,25),tick.2  |
00000c20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000c30  20 20 20 20 20 20 2c 77  72 69 74 65 28 33 39 2c  |      ,write(39,|
00000c40  32 35 29 0a 33 20 20 20  20 20 20 20 20 20 20 20  |25).3           |
00000c50  20 20 20 20 20 20 20 20  20 20 20 20 20 2c 77 72  |             ,wr|
00000c60  69 74 65 28 34 30 2c 32  35 29 0a 34 20 20 20 20  |ite(40,25).4    |
00000c70  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000c80  20 20 20 20 2c 77 72 69  74 65 28 34 31 2c 32 35  |    ,write(41,25|
00000c90  29 0a 35 20 20 20 20 20  20 20 20 20 20 20 20 20  |).5             |
00000ca0  20 20 20 20 20 20 20 20  20 20 20 2c 77 72 69 74  |           ,writ|
00000cb0  65 28 34 32 2c 32 35 29  0a 36 20 20 20 20 20 20  |e(42,25).6      |
00000cc0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000cd0  20 20 2c 77 72 69 74 65  28 34 33 2c 32 35 29 0a  |  ,write(43,25).|
00000ce0  37 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |7               |
00000cf0  20 20 20 20 20 20 20 20  20 2c 77 72 69 74 65 28  |         ,write(|
00000d00  34 34 2c 32 35 29 0a 38  20 20 20 20 20 20 20 20  |44,25).8        |
00000d10  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000d20  2c 77 72 69 74 65 28 34  35 2c 32 35 29 0a 39 20  |,write(45,25).9 |
00000d30  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000d40  20 20 20 20 20 20 20 2c  77 72 69 74 65 28 34 36  |       ,write(46|
00000d50  2c 32 35 29 0a 31 30 20  20 20 20 20 20 20 20 20  |,25).10         |
00000d60  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2c 77  |              ,w|
00000d70  72 69 74 65 28 34 37 2c  32 35 29 0a 31 31 20 20  |rite(47,25).11  |
00000d80  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000d90  20 20 20 20 20 2c 77 72  69 74 65 28 34 38 2c 32  |     ,write(48,2|
00000da0  35 29 0a 31 32 20 20 20  20 20 20 20 20 20 20 20  |5).12           |
00000db0  20 20 20 20 20 20 20 20  20 20 20 20 2c 77 72 69  |            ,wri|
00000dc0  74 65 28 34 39 2c 32 35  29 0a 31 33 20 20 20 20  |te(49,25).13    |
00000dd0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000de0  20 20 20 2c 77 72 69 74  65 28 35 30 2c 32 35 29  |   ,write(50,25)|
00000df0  0a 31 34 20 20 20 20 20  20 20 20 20 20 20 20 20  |.14             |
00000e00  20 20 20 20 20 20 20 20  20 20 2c 77 72 69 74 65  |          ,write|
00000e10  28 35 31 2c 32 35 29 0a  31 35 20 20 20 20 20 20  |(51,25).15      |
00000e20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000e30  20 2c 77 72 69 74 65 28  35 32 2c 32 35 29 0a 31  | ,write(52,25).1|
00000e40  36 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |6               |
00000e50  20 20 20 20 20 20 20 20  2c 77 72 69 74 65 28 35  |        ,write(5|
00000e60  33 2c 32 35 29 0a 31 37  20 20 20 20 20 20 20 20  |3,25).17        |
00000e70  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2c  |               ,|
00000e80  77 72 69 74 65 28 35 34  2c 32 35 29 0a 31 38 20  |write(54,25).18 |
00000e90  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000ea0  20 20 20 20 20 20 2c 77  72 69 74 65 28 35 35 2c  |      ,write(55,|
00000eb0  32 35 29 0a 31 39 20 20  20 20 20 20 20 20 20 20  |25).19          |
00000ec0  20 20 20 20 20 20 20 20  20 20 20 20 20 2c 77 72  |             ,wr|
00000ed0  69 74 65 28 35 36 2c 32  35 29 0a 32 30 20 20 20  |ite(56,25).20   |
00000ee0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000ef0  20 20 20 20 2c 77 72 69  74 65 28 35 37 2c 32 35  |    ,write(57,25|
00000f00  29 0a 32 31 20 20 20 20  20 20 20 20 20 20 20 20  |).21            |
00000f10  20 20 20 20 20 20 20 20  20 20 20 2c 77 72 69 74  |           ,writ|
00000f20  65 28 35 38 2c 32 35 29  0a 32 32 20 20 20 20 20  |e(58,25).22     |
00000f30  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000f40  20 20 2c 77 72 69 74 65  28 35 39 2c 32 35 29 0a  |  ,write(59,25).|
00000f50  32 33 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |23              |
00000f60  20 20 20 20 20 20 20 20  20 2c 77 72 69 74 65 28  |         ,write(|
00000f70  36 30 2c 32 35 29 0a 32  34 20 20 20 20 20 20 20  |60,25).24       |
00000f80  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000f90  2c 77 72 69 74 65 28 36  31 2c 32 35 29 0a 32 35  |,write(61,25).25|
00000fa0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000fb0  20 20 20 20 20 20 20 2c  77 72 69 74 65 28 36 32  |       ,write(62|
00000fc0  2c 32 35 29 0a 32 36 20  20 20 20 20 20 20 20 20  |,25).26         |
00000fd0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2c 77  |              ,w|
00000fe0  72 69 74 65 28 36 33 2c  32 35 29 0a 32 37 20 20  |rite(63,25).27  |
00000ff0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001000  20 20 20 20 20 2c 77 72  69 74 65 28 36 34 2c 32  |     ,write(64,2|
00001010  35 29 0a 32 38 20 20 20  20 20 20 20 20 20 20 20  |5).28           |
00001020  20 20 20 20 20 20 20 20  20 20 20 20 2c 77 72 69  |            ,wri|
00001030  74 65 28 36 35 2c 32 35  29 0a 32 39 20 20 20 20  |te(65,25).29    |
00001040  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001050  20 20 20 2c 77 72 69 74  65 28 36 36 2c 32 35 29  |   ,write(66,25)|
00001060  0a 33 30 20 20 20 20 20  20 20 20 20 20 20 20 20  |.30             |
00001070  20 20 20 20 20 20 20 20  20 20 2c 77 72 69 74 65  |          ,write|
00001080  28 36 37 2c 32 35 29 0a  33 31 20 20 20 20 20 20  |(67,25).31      |
00001090  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000010a0  20 2c 77 72 69 74 65 28  36 38 2c 32 35 29 0a 33  | ,write(68,25).3|
000010b0  32 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |2               |
000010c0  20 20 20 20 20 20 20 20  2c 77 72 69 74 65 28 36  |        ,write(6|
000010d0  39 2c 32 35 29 0a 62 65  67 69 6e 6d 65 6e 75 20  |9,25).beginmenu |
000010e0  20 20 20 20 20 20 20 20  20 20 20 52 45 4d 20 6d  |           REM m|
000010f0  65 6e 75 20 31 36 20 2d  20 4b 65 79 62 6f 61 72  |enu 16 - Keyboar|
00001100  64 20 76 6f 69 63 65 0a  56 4f 49 43 45 53 0a 31  |d voice.VOICES.1|
00001110  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001120  20 20 20 20 20 20 20 20  2c 77 72 69 74 65 28 37  |        ,write(7|
00001130  30 2c 32 35 29 0a 32 20  20 20 20 20 20 20 20 20  |0,25).2         |
00001140  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2c  |               ,|
00001150  77 72 69 74 65 28 37 31  2c 32 35 29 0a 33 20 20  |write(71,25).3  |
00001160  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001170  20 20 20 20 20 20 2c 77  72 69 74 65 28 37 32 2c  |      ,write(72,|
00001180  32 35 29 2c 74 69 63 6b  0a 34 20 20 20 20 20 20  |25),tick.4      |
00001190  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000011a0  20 20 2c 77 72 69 74 65  28 37 33 2c 32 35 29 0a  |  ,write(73,25).|
000011b0  35 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |5               |
000011c0  20 20 20 20 20 20 20 20  20 2c 77 72 69 74 65 28  |         ,write(|
000011d0  37 34 2c 32 35 29 0a 36  20 20 20 20 20 20 20 20  |74,25).6        |
000011e0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000011f0  2c 77 72 69 74 65 28 37  35 2c 32 35 29 0a 37 20  |,write(75,25).7 |
00001200  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001210  20 20 20 20 20 20 20 2c  77 72 69 74 65 28 37 36  |       ,write(76|
00001220  2c 32 35 29 0a 38 20 20  20 20 20 20 20 20 20 20  |,25).8          |
00001230  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2c 77  |              ,w|
00001240  72 69 74 65 28 37 37 2c  32 35 29 0a 39 20 20 20  |rite(77,25).9   |
00001250  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001260  20 20 20 20 20 2c 77 72  69 74 65 28 37 38 2c 32  |     ,write(78,2|
00001270  35 29 0a 31 30 20 20 20  20 20 20 20 20 20 20 20  |5).10           |
00001280  20 20 20 20 20 20 20 20  20 20 20 20 2c 77 72 69  |            ,wri|
00001290  74 65 28 37 39 2c 32 35  29 0a 31 31 20 20 20 20  |te(79,25).11    |
000012a0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000012b0  20 20 20 2c 77 72 69 74  65 28 38 30 2c 32 35 29  |   ,write(80,25)|
000012c0  0a 31 32 20 20 20 20 20  20 20 20 20 20 20 20 20  |.12             |
000012d0  20 20 20 20 20 20 20 20  20 20 2c 77 72 69 74 65  |          ,write|
000012e0  28 38 31 2c 32 35 29 0a  31 33 20 20 20 20 20 20  |(81,25).13      |
000012f0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001300  20 2c 77 72 69 74 65 28  38 32 2c 32 35 29 0a 31  | ,write(82,25).1|
00001310  34 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |4               |
00001320  20 20 20 20 20 20 20 20  2c 77 72 69 74 65 28 38  |        ,write(8|
00001330  33 2c 32 35 29 0a 31 35  20 20 20 20 20 20 20 20  |3,25).15        |
00001340  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2c  |               ,|
00001350  77 72 69 74 65 28 38 34  2c 32 35 29 0a 31 36 20  |write(84,25).16 |
00001360  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001370  20 20 20 20 20 20 2c 77  72 69 74 65 28 38 35 2c  |      ,write(85,|
00001380  32 35 29 0a 31 37 20 20  20 20 20 20 20 20 20 20  |25).17          |
00001390  20 20 20 20 20 20 20 20  20 20 20 20 20 2c 77 72  |             ,wr|
000013a0  69 74 65 28 38 36 2c 32  35 29 0a 31 38 20 20 20  |ite(86,25).18   |
000013b0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000013c0  20 20 20 20 2c 77 72 69  74 65 28 38 37 2c 32 35  |    ,write(87,25|
000013d0  29 0a 31 39 20 20 20 20  20 20 20 20 20 20 20 20  |).19            |
000013e0  20 20 20 20 20 20 20 20  20 20 20 2c 77 72 69 74  |           ,writ|
000013f0  65 28 38 38 2c 32 35 29  0a 32 30 20 20 20 20 20  |e(88,25).20     |
00001400  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001410  20 20 2c 77 72 69 74 65  28 38 39 2c 32 35 29 0a  |  ,write(89,25).|
00001420  32 31 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |21              |
00001430  20 20 20 20 20 20 20 20  20 2c 77 72 69 74 65 28  |         ,write(|
00001440  39 30 2c 32 35 29 0a 32  32 20 20 20 20 20 20 20  |90,25).22       |
00001450  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001460  2c 77 72 69 74 65 28 39  31 2c 32 35 29 0a 32 33  |,write(91,25).23|
00001470  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001480  20 20 20 20 20 20 20 2c  77 72 69 74 65 28 39 32  |       ,write(92|
00001490  2c 32 35 29 0a 32 34 20  20 20 20 20 20 20 20 20  |,25).24         |
000014a0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2c 77  |              ,w|
000014b0  72 69 74 65 28 39 33 2c  32 35 29 0a 32 35 20 20  |rite(93,25).25  |
000014c0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000014d0  20 20 20 20 20 2c 77 72  69 74 65 28 39 34 2c 32  |     ,write(94,2|
000014e0  35 29 0a 32 36 20 20 20  20 20 20 20 20 20 20 20  |5).26           |
000014f0  20 20 20 20 20 20 20 20  20 20 20 20 2c 77 72 69  |            ,wri|
00001500  74 65 28 39 35 2c 32 35  29 0a 32 37 20 20 20 20  |te(95,25).27    |
00001510  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001520  20 20 20 2c 77 72 69 74  65 28 39 36 2c 32 35 29  |   ,write(96,25)|
00001530  0a 32 38 20 20 20 20 20  20 20 20 20 20 20 20 20  |.28             |
00001540  20 20 20 20 20 20 20 20  20 20 2c 77 72 69 74 65  |          ,write|
00001550  28 39 37 2c 32 35 29 0a  32 39 20 20 20 20 20 20  |(97,25).29      |
00001560  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001570  20 2c 77 72 69 74 65 28  39 38 2c 32 35 29 0a 33  | ,write(98,25).3|
00001580  30 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |0               |
00001590  20 20 20 20 20 20 20 20  2c 77 72 69 74 65 28 39  |        ,write(9|
000015a0  39 2c 32 35 29 0a 33 31  20 20 20 20 20 20 20 20  |9,25).31        |
000015b0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2c  |               ,|
000015c0  77 72 69 74 65 28 31 30  30 2c 32 35 29 0a 33 32  |write(100,25).32|
000015d0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000015e0  20 20 20 20 20 20 20 2c  77 72 69 74 65 28 31 30  |       ,write(10|
000015f0  31 2c 32 35 29 0a 62 65  67 69 6e 6d 65 6e 75 20  |1,25).beginmenu |
00001600  20 20 20 20 20 20 20 20  20 20 20 52 45 4d 20 6d  |           REM m|
00001610  65 6e 75 20 31 37 20 2d  20 46 58 20 76 6f 69 63  |enu 17 - FX voic|
00001620  65 73 0a 56 4f 49 43 45  53 0a 31 20 20 20 20 20  |es.VOICES.1     |
00001630  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001640  20 20 20 2c 77 72 69 74  65 28 31 30 32 2c 32 35  |   ,write(102,25|
00001650  29 0a 32 20 20 20 20 20  20 20 20 20 20 20 20 20  |).2             |
00001660  20 20 20 20 20 20 20 20  20 20 20 2c 77 72 69 74  |           ,writ|
00001670  65 28 31 30 33 2c 32 35  29 0a 33 20 20 20 20 20  |e(103,25).3     |
00001680  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001690  20 20 20 2c 77 72 69 74  65 28 31 30 34 2c 32 35  |   ,write(104,25|
000016a0  29 0a 34 20 20 20 20 20  20 20 20 20 20 20 20 20  |).4             |
000016b0  20 20 20 20 20 20 20 20  20 20 20 2c 77 72 69 74  |           ,writ|
000016c0  65 28 31 30 35 2c 32 35  29 0a 35 20 20 20 20 20  |e(105,25).5     |
000016d0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000016e0  20 20 20 2c 77 72 69 74  65 28 31 30 36 2c 32 35  |   ,write(106,25|
000016f0  29 0a 36 20 20 20 20 20  20 20 20 20 20 20 20 20  |).6             |
00001700  20 20 20 20 20 20 20 20  20 20 20 2c 77 72 69 74  |           ,writ|
00001710  65 28 31 30 37 2c 32 35  29 0a 37 20 20 20 20 20  |e(107,25).7     |
00001720  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001730  20 20 20 2c 77 72 69 74  65 28 31 30 38 2c 32 35  |   ,write(108,25|
00001740  29 0a 38 20 20 20 20 20  20 20 20 20 20 20 20 20  |).8             |
00001750  20 20 20 20 20 20 20 20  20 20 20 2c 77 72 69 74  |           ,writ|
00001760  65 28 31 30 39 2c 32 35  29 0a 39 20 20 20 20 20  |e(109,25).9     |
00001770  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001780  20 20 20 2c 77 72 69 74  65 28 31 31 30 2c 32 35  |   ,write(110,25|
00001790  29 0a 31 30 20 20 20 20  20 20 20 20 20 20 20 20  |).10            |
000017a0  20 20 20 20 20 20 20 20  20 20 20 2c 77 72 69 74  |           ,writ|
000017b0  65 28 31 31 31 2c 32 35  29 0a 31 31 20 20 20 20  |e(111,25).11    |
000017c0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000017d0  20 20 20 2c 77 72 69 74  65 28 31 31 32 2c 32 35  |   ,write(112,25|
000017e0  29 0a 31 32 20 20 20 20  20 20 20 20 20 20 20 20  |).12            |
000017f0  20 20 20 20 20 20 20 20  20 20 20 2c 77 72 69 74  |           ,writ|
00001800  65 28 31 31 33 2c 32 35  29 0a 31 33 20 20 20 20  |e(113,25).13    |
00001810  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001820  20 20 20 2c 77 72 69 74  65 28 31 31 34 2c 32 35  |   ,write(114,25|
00001830  29 0a 31 34 20 20 20 20  20 20 20 20 20 20 20 20  |).14            |
00001840  20 20 20 20 20 20 20 20  20 20 20 2c 77 72 69 74  |           ,writ|
00001850  65 28 31 31 35 2c 32 35  29 0a 31 35 20 20 20 20  |e(115,25).15    |
00001860  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001870  20 20 20 2c 77 72 69 74  65 28 31 31 36 2c 32 35  |   ,write(116,25|
00001880  29 0a 31 36 20 20 20 20  20 20 20 20 20 20 20 20  |).16            |
00001890  20 20 20 20 20 20 20 20  20 20 20 2c 77 72 69 74  |           ,writ|
000018a0  65 28 31 31 37 2c 32 35  29 0a 31 37 20 20 20 20  |e(117,25).17    |
000018b0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000018c0  20 20 20 2c 77 72 69 74  65 28 31 31 38 2c 32 35  |   ,write(118,25|
000018d0  29 0a 31 38 20 20 20 20  20 20 20 20 20 20 20 20  |).18            |
000018e0  20 20 20 20 20 20 20 20  20 20 20 2c 77 72 69 74  |           ,writ|
000018f0  65 28 31 31 39 2c 32 35  29 0a 31 39 20 20 20 20  |e(119,25).19    |
00001900  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001910  20 20 20 2c 77 72 69 74  65 28 31 32 30 2c 32 35  |   ,write(120,25|
00001920  29 0a 32 30 20 20 20 20  20 20 20 20 20 20 20 20  |).20            |
00001930  20 20 20 20 20 20 20 20  20 20 20 2c 77 72 69 74  |           ,writ|
00001940  65 28 31 32 31 2c 32 35  29 0a 32 31 20 20 20 20  |e(121,25).21    |
00001950  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001960  20 20 20 2c 77 72 69 74  65 28 31 32 32 2c 32 35  |   ,write(122,25|
00001970  29 0a 32 32 20 20 20 20  20 20 20 20 20 20 20 20  |).22            |
00001980  20 20 20 20 20 20 20 20  20 20 20 2c 77 72 69 74  |           ,writ|
00001990  65 28 31 32 33 2c 32 35  29 0a 32 33 20 20 20 20  |e(123,25).23    |
000019a0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000019b0  20 20 20 2c 77 72 69 74  65 28 31 32 34 2c 32 35  |   ,write(124,25|
000019c0  29 0a 32 34 20 20 20 20  20 20 20 20 20 20 20 20  |).24            |
000019d0  20 20 20 20 20 20 20 20  20 20 20 2c 77 72 69 74  |           ,writ|
000019e0  65 28 31 32 35 2c 32 35  29 0a 32 35 20 20 20 20  |e(125,25).25    |
000019f0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001a00  20 20 20 2c 77 72 69 74  65 28 31 32 36 2c 32 35  |   ,write(126,25|
00001a10  29 0a 32 36 20 20 20 20  20 20 20 20 20 20 20 20  |).26            |
00001a20  20 20 20 20 20 20 20 20  20 20 20 2c 77 72 69 74  |           ,writ|
00001a30  65 28 31 32 37 2c 32 35  29 0a 32 37 20 20 20 20  |e(127,25).27    |
00001a40  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001a50  20 20 20 2c 77 72 69 74  65 28 31 32 38 2c 32 35  |   ,write(128,25|
00001a60  29 0a 32 38 20 20 20 20  20 20 20 20 20 20 20 20  |).28            |
00001a70  20 20 20 20 20 20 20 20  20 20 20 2c 77 72 69 74  |           ,writ|
00001a80  65 28 31 32 39 2c 32 35  29 0a 32 39 20 20 20 20  |e(129,25).29    |
00001a90  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001aa0  20 20 20 2c 77 72 69 74  65 28 31 33 30 2c 32 35  |   ,write(130,25|
00001ab0  29 0a 33 30 20 20 20 20  20 20 20 20 20 20 20 20  |).30            |
00001ac0  20 20 20 20 20 20 20 20  20 20 20 2c 77 72 69 74  |           ,writ|
00001ad0  65 28 31 33 31 2c 32 35  29 0a 33 31 20 20 20 20  |e(131,25).31    |
00001ae0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001af0  20 20 20 2c 77 72 69 74  65 28 31 33 32 2c 32 35  |   ,write(132,25|
00001b00  29 0a 33 32 20 20 20 20  20 20 20 20 20 20 20 20  |).32            |
00001b10  20 20 20 20 20 20 20 20  20 20 20 2c 77 72 69 74  |           ,writ|
00001b20  65 28 31 33 33 2c 32 35  29 0a 62 65 67 69 6e 6d  |e(133,25).beginm|
00001b30  65 6e 75 20 20 20 20 20  20 20 20 20 20 20 20 52  |enu            R|
00001b40  45 4d 20 6d 65 6e 75 20  31 38 20 2d 20 46 58 20  |EM menu 18 - FX |
00001b50  63 68 61 6e 6e 65 6c 73  0a 0a 36 0a 35 0a 34 0a  |channels..6.5.4.|
00001b60  33 0a 32 0a 31 0a 62 65  67 69 6e 6d 65 6e 75 20  |3.2.1.beginmenu |
00001b70  20 20 20 20 20 20 20 20  20 20 20 52 45 4d 20 6d  |           REM m|
00001b80  65 6e 75 20 31 39 20 2d  20 4e 75 6d 62 65 72 20  |enu 19 - Number |
00001b90  6f 66 20 62 65 61 74 73  0a 0a 38 20 2c 77 72 69  |of beats..8 ,wri|
00001ba0  74 65 28 31 33 34 3a 32  29 0a 62 65 67 69 6e 6d  |te(134:2).beginm|
00001bb0  65 6e 75 20 20 20 20 20  20 20 20 20 20 20 20 52  |enu            R|
00001bc0  45 4d 20 6d 65 6e 75 20  32 30 20 2d 20 43 68 6f  |EM menu 20 - Cho|
00001bd0  72 64 20 76 6f 6c 75 6d  65 0a 0a 68 61 6c 66 2c  |rd volume..half,|
00001be0  74 69 63 6b 0a 66 75 6c  6c 0a 62 65 67 69 6e 6d  |tick.full.beginm|
00001bf0  65 6e 75 20 20 20 20 20  20 20 20 20 20 20 20 52  |enu            R|
00001c00  45 4d 20 6d 65 6e 75 20  32 31 20 2d 20 42 61 73  |EM menu 21 - Bas|
00001c10  73 20 76 6f 6c 75 6d 65  0a 0a 68 61 6c 66 0a 66  |s volume..half.f|
00001c20  75 6c 6c 2c 74 69 63 6b  0a 62 65 67 69 6e 6d 65  |ull,tick.beginme|
00001c30  6e 75 20 20 20 20 20 20  20 20 20 20 20 20 52 45  |nu            RE|
00001c40  4d 20 6d 65 6e 75 20 32  32 20 2d 20 46 58 20 76  |M menu 22 - FX v|
00001c50  6f 6c 75 6d 65 0a 0a 68  61 6c 66 2c 74 69 63 6b  |olume..half,tick|
00001c60  0a 66 75 6c 6c 0a 62 65  67 69 6e 6d 65 6e 75 20  |.full.beginmenu |
00001c70  20 20 20 20 20 20 20 20  20 20 20 52 45 4d 20 6d  |           REM m|
00001c80  65 6e 75 20 32 33 20 2d  20 4c 6f 61 64 20 72 68  |enu 23 - Load rh|
00001c90  79 74 68 6d 0a 0a 52 68  79 74 68 6d 20 20 20 20  |ythm..Rhythm    |
00001ca0  2c 77 72 69 74 65 28 31  33 35 3a 34 30 29        |,write(135:40)|
00001cae