0 ' MVOICE.BA - by Eiji Miura 
1 ' CLUB 100 LIBRARY - 415/939-1246 BBS,    937-5039 NEWSLETTER, 932-8856 VOICE
2 '  January 6H1985
3 ' Thanks to George Dunsey for his
4 ' multi-voice music tutorial,
5 ' MLTMU.TXT.
6 ' ---------------------------------
7 CLEAR:CLS:DIMS(21):E$=CHR$(27):R$=E$+"p":N$=E$+"q":PRINT@85,R$" Name that tune... "N$:PRINT@170,"...and become FAMOUS!":S(11)=1567:S(12)=1396:S(13)=1244:S(14)=2092:S(15)=1864:S(16)=2636:S(17)=3718:S(18)=3516:S(19)=5272:S(20)=6269:S(21)=4968
8 S(1)=2793:S(2)=2484:S(3)=4184:S(4)=3134:S(6)=3321:S(7)=1660:S(8)=2216:S(9)=2348:FORG=1TO134:READA,B,C:D=S(A):E=S(B):FORT=1TOC*2:SOUNDD,1:SOUNDE,1:NEXTT,G:MENU:DATA2,4,4,6,7,4,2,4,4,3,3,4,9,1,4,2,2,4,1,6,4,3,3,4,14,2,4,11,11,4,15,9,4,1,1,4
9 DATA2,3,4,14,14,4,1,6,4,9,9,4,2,4,4,6,7,4,2,4,4,3,3,4,8,4,4,15,15,4,8,12,4,11,11,4:DATA7,14,4,1,1,4,15,4,4,8,8,4,14,6,4,1,1,4,3,3,4,9,9,4,2,4,4,6,7,4,2,4,4,3,3,4:DATA9,1,4,2,2,4,1,6,4,3,3,4,14,3,4,11,11,4,15,9,4,1,1,4,2,3,4,14,14,4,1,18,4,9,9,4
10 DATA2,18,4,18,18,4,2,18,4,14,14,4,16,8,4,7,7,4,14,6,4,2,2,4,8,17,4,15,15,4,14,6,4,8,8,4:DATA2,3,4,6,6,4,21,21,4,14,14,4,9,1,4,2,2,4,9,3,4,1,1,4,2,4,4,14,14,4,11,2,4,13,13,4
11 DATA13,9,4,13,13,4,12,8,4,11,11,4,11,14,4,7,7,4,12,12,4,14,14,4,9,1,4,2,9,4,9,3,4,1,1,4:DATA2,4,4,14,14,4,11,2,4,7,7,4,7,9,4,15,15,4,14,17,4,9,9,4,2,3,4,14,14,4,1,6,4,16,16,4
12 DATA2,4,4,6,7,4,2,4,4,3,3,4,9,1,4,2,2,4,1,6,4,3,3,4,14,2,4,11,11,4,15,9,4,1,1,4:DATA2,3,4,14,14,4,1,6,4,9,9,4,2,4,4,6,6,4,2,4,4,14,14,4,9,17,4,2,2,4,1,1,4,16,16,4
13 DATA2,3,4,11,11,4,1,3,2,11,1,2,1,3,2,11,1,2,3,9,2,9,12,6,11,2,4,3,4,3,3,4,20,20,4,13,14,4,11,2,4,3,3,8:'       and Tassi Law