Path: titcca!ccut!tansei!d33507
From: d33507@tansei.cc.u-tokyo.JUNET (KCN)
Newsgroups: fj.sources
Subject: ETC. (MML data) (1/1)
Message-ID: <4340@tansei.cc.u-tokyo.JUNET>
Date: 27 Oct 89 14:35:52 GMT
Reply-To: d33507@tansei.cc.u-tokyo.JUNET (KCN)
Distribution: fj
Organization: Computer Center, University of Tokyo, Japan.
Lines: 843

もう一つおまけに、いくつかの小品をつけておきます。

			藤井＠久米研．東大（ＫＣＮ）

# This is a shell archive.  Remove anything before this line
# then unpack it by saving it in a file and typing "sh file"
# (Files unpacked will be owned by you and have default permissions).
# This archive contains the following files:
#	./50th
#	./gavotte
#	./menuett1
#	./menuett2
#	./minuetto
#	./romance
#	./serenade
#	./test
#
if `test ! -s ./50th`
then
echo "writing ./50th"
cat > ./50th << '¥Rogue¥Monster¥'
'	Ｌａ　Ｃｉｎｑｕａｎｔａｉｎｅ
'		金婚式
'	Gabriel Marie
' Andantino
'
MF
¥2300,1400,1400,1300
"R16","R16","R16","R16"
"@25","T176@13","@13","@13"
"O4L4V13","O2L4V13Q6","O4L4V13Q6","O4L4V8Q6"
,>,>,>
"E","R","R","R"
'loop0
"Q8AQ7>EQ4EQ2E","A>>C<C>C","RARA","RERE"
"Q8E16F16Q7E8D8E8F2","<<B>>D<DB","RARA","RFRF"
"Q8<AQ7>EQ4EQ2E","<A>>C<C>C","RARA","RERE"
"Q8E16F16Q7E8D8E8Q8F2","<<B>>D<DB","RARA","RFRF"
"Q7A8R8G8F8ED","C>C<DB","RARA","RERF"
"C<B8A8Q6BQ4>C","E>C<E>C","RARA","RERE"
"Q8L16C<B>C<B>C<B>C<B>C<B>C<B>C<BQ7A8","<<E>BEA","RG+RF+","RERE"
"B2.L4E","<E>BE>D","RG+RG+","RERE"
"Q8AQ7>EQ4EQ2E","<<A>>C<C>C","RARA","RERE"
"Q8E16F16Q7E8D8E8F2","<<B>>D<DB","RARA","RFRF"
"Q8<AQ7>EQ4EQ2E","<A>>C<C>C","RARA","RERE"
"Q8E16F16Q7E8D8E8Q8F2","<<B>>D<DB","RARA","RFRF"
"Q7A8R8G8F8ED","C>C<DB","RARA","RERF"
"C<B8A8Q6BQ4>C","E>C<E>C","RARA","RERE"
"Q8L16C<B>C<B>C<B>C<B>C<B>C<B>C<BQ7A8","<<E>BE>D","RG+RG+","RERE"
"A2.L4R","<AE<AR","RAR2","RER2"
'loop1
"Q8AQ7>GGG",">C+A<A>A","RGRG","RERE"
"GF8G8AE","C+A<A>A","RGRG","RERE"
"Q8F.Q7G8A8G8F8E8","DA<A>A","RFRE","RDRC+"
"D2.R","DADC","RFRF","RDRD"
"Q8<GQ7>FFF","<B>G<G>G","RFRF","RDRD"
"FE8F8GD","<B>G<G>G","RFRF","RDRD"
"Q8E.Q7F8G8F8E8D8","CG<G>G","RERF","RCR<B"
"C1","CG<BA","RER2","R>CR2"
"Q8<BQ7>EE<B","G+>B<G+>B","RERE","RDRD"
"Q8>C8Q7D8C8<B8A>C","<A>A<A>F+","RERD+","RCRC"
"Q8<BQ7>EE<B","<E>G+EG+","RERE","R<BRB"
"Q8>C8Q7D8C8<B8A>C","<A>A<A>F+","RERD+","R>CRC"
"Q8<BQ7>E2C","<E>G+<A2","RERE","R<B>RC"
"Q8<BQ7>E2C","E>G+<A2","RERE","R<B>RC"
"<BRE^1","E>G+DE","<E>ERE","R<BRG+"
"E","CF+<B>G","RERE","RAR>D"
"Q8AQ7>EQ4EQ2E","<A>ACA","RERA","RCRE"
"Q8E16F16Q7E8D8E8F2","<B>>D<DB","RARA","RFRF"
"Q8<AQ7>EQ4EQ2E","<A>>C<C>C","RARA","RERE"
"Q8E16F16Q7E8D8E8Q8F2","<<B>>D<DB","RARA","RFRF"
"Q7A8R8G8F8ED","C>C<DB","RARA","RERF"
"C<B8A8Q6BQ4>C","E>C<E>C","RARA","RERE"
"Q8L16C<B>C<B>C<B>C<B>C<B>C<B>C<BQ7A8","<<E>BE>D","RG+RG+","RERE"
"A2R2L4","<A<E<AR>","A2<<AR>>","E2R2"
'loop1
"Q8AQ7>GGG",">C+A<A>A","RGRG","RERE"
"GF8G8AE","C+A<A>A","RGRG","RERE"
"Q8F.Q7G8A8G8F8E8","DA<A>A","RFRE","RDRC+"
"D2.R","DADC","RFRF","RDRD"
"Q8<GQ7>FFF","<B>G<G>G","RFRF","RDRD"
"FE8F8GD","<B>G<G>G","RFRF","RDRD"
"Q8E.Q7F8G8F8E8D8","CG<G>G","RERF","RCR<B"
"C1","CG<BA","RER2","R>CR2"
"Q8<BQ7>EE<B","G+>B<G+>B","RERE","RDRD"
"Q8>C8Q7D8C8<B8A>C","<A>A<A>F+","RERD+","RCRC"
"Q8<BQ7>EE<B","<E>G+EG+","RERE","R<BRB"
"Q8>C8Q7D8C8<B8A>C","<A>A<A>F+","RERD+","R>CRC"
"Q8<BQ7>E2C","<E>G+<A2","RERE","R<B>RC"
"Q8<BQ7>E2C","E>G+<A2","RERE","R<B>RC"
"<BRE^1","E>G+DE","<E>ERE","R<BRG+"
"E","CF+<B>G","RERE","RAR>D"
"Q8AQ7>EQ4EQ2E","<A>ACA","RERA","RCRE"
"Q8E16F16Q7E8D8E8F2","<B>>D<DB","RARA","RFRF"
"Q8<AQ7>EQ4EQ2E","<A>>C<C>C","RARA","RERE"
"Q8E16F16Q7E8D8E8Q8F2","<<B>>D<DB","RARA","RFRF"
"Q7A8R8G8F8ED","C>C<DB","RARA","RERF"
"C<B8A8Q6BQ4>C","E>C<E>C","RARA","RERE"
"Q8L16C<B>C<B>C<B>C<B>C<B>C<B>C<BQ7A8","<<E>BE>D","RG+RG+","RERE"
"A2R2L4","<A<E<AR>","A2<<AR>>","E2R2"
'loop2
">C+2E2","Q7ARG+R","Q7ARBR","Q7ERER"
"<A2>C+2","F+RC+R","ARAR","F+RER"
"<F+B8>C+8Q8D8Q7C+8<B8A8","DR<BR","ARAR","F+RF+R"
"G+2.Q8E",">E2Q4>DE","G+2RQ4G+","E2RQ4E"
"Q6AQ4AG+G+","C+E<B>E","RARG+","RERD"
"F+8G+8F+8G+8Q7EQ8E","<A>E<G+>E","RF+RE","RC+R<B"
"Q6AQ4AG+G+","C+E<B>E","RARG+","R>ERD"
"F+8G+8F+8G+8Q7EQ8E","<A>E<G+>E","RF+RE","RC+R<B"
"Q6>C+Q4C+<BB","Q7<A>>C+<<G+>B","RQ7ERE","R1"
"Q8A8Q7B8>C+8D+8Q8E8Q7<B8G+8E8","<F+>A<G+>B","RERE","R1"
">C+2<D+2","<<A2B2","E2D+2","Q7>C+2<B2"
"E.E8F+8G+8A8B8",">E2R2","E2R2","B2R2>"
'loop2
">C+2E2","Q7ARG+R","Q7ARBR","Q7ERER"
"<A2>C+2","F+RC+R","ARAR","F+RER"
"<F+B8>C+8Q8D8Q7C+8<B8A8","DR<BR","ARAR","F+RF+R"
"G+2.Q8E",">E2Q4>DE","G+2RQ4G+","E2RQ4E"
"Q6AQ4AG+G+","C+E<B>E","RARG+","RERD"
"F+8G+8F+8G+8Q7EQ8E","<A>E<G+>E","RF+RE","RC+R<B"
"Q6AQ4AG+G+","C+E<B>E","RARG+","R>ERD"
"F+8G+8F+8G+8Q7EQ8E","<A>E<G+>E","RF+RE","RC+R<B"
"Q6>C+Q4C+<BB","Q7<A>>C+<<G+>B","RQ7ERE","R1"
"Q8A8Q7B8>C+8D+8Q8E8Q7<B8G+8E8","<F+>A<G+>B","RERE","R1"
">C+2<D+2","<<A2B2","E2D+2","Q7>C+2<B2"
"E2.F+",">E2>EA+","E2RF+","B2R>C+"
'loop3
"BB>C+C+","DBC+A+","RF+RF+","R2.E"
"Q8D.Q7E8Q8F+8Q7E8D8C+8","<<B>>BF+B","<<B>>F+RF+","RDRD"
"Q8<B8Q7>C+8<B8>C+8Q8D8Q7C+8<B8A8","<<B>>B<B>B","<<B>>F+RA","RDRF+"
"Q8G+8Q7A8B8A8G+8E8F+8G+8","<E>BDB","<E>G+RG+","RERE"
"Q6AQ4AG+G+","Q4C+E<B>E","RQ4ARG+","RQ4ERD"
"F+8G+8F+8G+8Q7EQ8E","<A>E<G+>E","RF+RE","RC+R<B"
"Q6AQ4AG+G+","C+E<B>E","RARG+","R>ERD"
"F+8G+8F+8G+8Q7EQ8E","<A>E<G+>E","RF+RE","RC+R<B"
"Q6>C+Q4C+<BB","Q7<A>>C+<<G+>B","RQ7ERE","R1"
"Q8A8Q7B8>C+8D+8Q8E8Q7C+8<A8E8","<F+>A<C+>A","RA<C+>A","RQ7>C+RE"
"F+>D8C+8Q8L16<B>C+<B>C+<B>C+<BQ6A","<DT174<BT172Q8>>ET170Q7<E","AAG+2","F+F+Q8<BQ7>D"
"Q7A2L4RF+","T168>AT166E<T164AT162R>T176","A2.R","E2.R"
'loop3
"BB>C+C+","DBC+A+","RF+RF+","R2.E"
"Q8D.Q7E8Q8F+8Q7E8D8C+8","<<B>>BF+B","<<B>>F+RF+","RDRD"
"Q8<B8Q7>C+8<B8>C+8Q8D8Q7C+8<B8A8","<<B>>B<B>B","<<B>>F+RA","RDRF+"
"Q8G+8Q7A8B8A8G+8E8F+8G+8","<E>BDB","<E>G+RG+","RERE"
"Q6AQ4AG+G+","Q4C+E<B>E","RQ4ARG+","RQ4ERD"
"F+8G+8F+8G+8Q7EQ8E","<A>E<G+>E","RF+RE","RC+R<B"
"Q6AQ4AG+G+","C+E<B>E","RARG+","R>ERD"
"F+8G+8F+8G+8Q7EQ8E","<A>E<G+>E","RF+RE","RC+R<B"
"Q6>C+Q4C+<BB","Q7<A>>C+<<G+>B","RQ7ERE","R1"
"Q8A8Q7B8>C+8D+8Q8E8Q7C+8<A8E8","<F+>A<C+>A","RA<C+>A","RQ7>C+RE"
"F+>D8C+8Q8L16<B>C+<B>C+<B>C+<BQ6A","<DT172<BT168Q8>>ET164Q7<E","AAG+2","F+F+Q8<BQ7>D"
"Q7A2.L4E","T160>AT156ET152<AT148RT176Q6","A2.RQ6","E2.RQ6"
'loop0
"Q8AQ7>EQ4EQ2E","A>>C<C>C","RARA","RERE"
"Q8E16F16Q7E8D8E8F2","<<B>>D<DB","RARA","RFRF"
"Q8<AQ7>EQ4EQ2E","<A>>C<C>C","RARA","RERE"
"Q8E16F16Q7E8D8E8Q8F2","<<B>>D<DB","RARA","RFRF"
"Q7A8R8G8F8ED","C>C<DB","RARA","RERF"
"C<B8A8Q6BQ4>C","E>C<E>C","RARA","RERE"
"Q8L16C<B>C<B>C<B>C<B>C<B>C<B>C<BQ7A8","<<E>BEA","RG+RF+","RERE"
"B2.L4E","<E>BE>D","RG+RG+","RERE"
"Q8AQ7>EQ4EQ2E","<<A>>C<C>C","RARA","RERE"
"Q8E16F16Q7E8D8E8F2","<<B>>D<DB","RARA","RFRF"
"Q8<AQ7>EQ4EQ2E","<A>>C<C>C","RARA","RERE"
"Q8E16F16Q7E8D8E8Q8F2","<<B>>D<DB","RARA","RFRF"
"Q7A8R8G8F8ED","C>C<DB","RARA","RERF"
"C<B8A8Q6BQ4>C","E>C<E>C","RARA","RERE"
"Q8L16C<B>C<B>C<B>C<B>C<B>C<B>C<BQ7A8","<<E>BE>D","RG+RG+","RERE"
"A2.L4R","<AE<AR","RAR2","RER2"
'loop1
"Q8AQ7>GGG",">C+A<A>A","RGRG","RERE"
"GF8G8AE","C+A<A>A","RGRG","RERE"
"Q8F.Q7G8A8G8F8E8","DA<A>A","RFRE","RDRC+"
"D2.R","DADC","RFRF","RDRD"
"Q8<GQ7>FFF","<B>G<G>G","RFRF","RDRD"
"FE8F8GD","<B>G<G>G","RFRF","RDRD"
"Q8E.Q7F8G8F8E8D8","CG<G>G","RERF","RCR<B"
"C1","CG<BA","RER2","R>CR2"
"Q8<BQ7>EE<B","G+>B<G+>B","RERE","RDRD"
"Q8>C8Q7D8C8<B8A>C","<A>A<A>F+","RERD+","RCRC"
"Q8<BQ7>EE<B","<E>G+EG+","RERE","R<BRB"
"Q8>C8Q7D8C8<B8A>C","<A>A<A>F+","RERD+","R>CRC"
"Q8<BQ7>E2C","<E>G+<A2","RERE","R<B>RC"
"Q8<BQ7>E2C","E>G+<A2","RERE","R<B>RC"
"<BRE^1","E>G+DE","<E>ERE","R<BRG+"
"E","CF+<B>G","RERE","RAR>D"
"Q8AQ7>EQ4EQ2E","<A>ACA","RERA","RCRE"
"Q8E16F16Q7E8D8E8F2","<B>>D<DB","RARA","RFRF"
"Q8<AQ7>EQ4EQ2E","<A>>C<C>C","RARA","RERE"
"Q8E16F16Q7E8D8E8Q8F2","<<B>>D<DB","RARA","RFRF"
"Q7A8R8G8F8ED","CT174>CT172<DT170B","RARA","RERF"
"C<B8A8Q6BQ4>C","T168ET166>CT164<ET162>C","RARA","RERE"
"Q8L16C<B>C<B>C<B>C<B>C<B>C<B>C<BQ7A8","T160<<ET158>BT156ET154>D","RG+RG+","RERE"
"A2R2L4","T152<AT150<ET148<AT144R>","A2<<AR>>","E2R2"
"R1R1","R1R1","R1R1","R1R1"
¥Rogue¥Monster¥
else
  echo "will not over write ./50th"
fi
if `test ! -s ./gavotte`
then
echo "writing ./gavotte"
cat > ./gavotte << '¥Rogue¥Monster¥'
'	Ｇａｖｏｔｔｅ	Francois Joseph Gossec
' Allegretto molto grazioso
'
MF
¥1400,700,800,600,300
"R16","R16","R16","R16","R16"
"@25","T132@13","@13","@13","@25"
"O5L8V13","O2L4V12","O3L4V12","O4L4V8","O5L1V12"
,>,>,>,
'loop1
"Q4ABAF+GAGE","D>A<E>A","D>F+<E>G","RDRC+","R"
"D4Q8>C+32Q4D..Q8<D4R4","<F+>A<D>A","<F+>F+<D>F+","RDRD","R"
"Q4GAGEF+GF+D","<E>A<D>A","<E>G<D>F+","RC+RD","R"
"E4Q8G+32Q4A..Q8<A4R4","<<A>>A<<A>>A","<<A>>A<<A>>A","RERE","R"
"Q4>ABAF+GAGE","<D>A<E>A","<D>F+<E>G","RDRC+","R"
"D4Q8>C+32Q4D..Q8<D4R4","<F+>A<D>A","<F+>F+<D>F+","RDRD","R"
"F+4Q6DQ4<BQ8>D4Q6<BQ4G+","<<B>>B<E>B","<<B>>F+<E>G+","RDRD","R"
"Q8A4>G+32A..<A4R4>","<<A>>A<<A>>A<","<<A>>A<<A>>G<","RC+RC+","R"
'loop1
"Q4ABAF+GAGE","D>A<E>A","D>F+<E>G","RDRC+","R"
"D4Q8>C+32Q4D..Q8<D4R4","<F+>A<D>A","<F+>F+<D>F+","RDRD","R"
"Q4GAGEF+GF+D","<E>A<D>A","<E>G<D>F+","RC+RD","R"
"E4Q8G+32Q4A..Q8<A4R4","<<A>>A<<A>>A","<<A>>A<<A>>A","RERE","R"
"Q4>ABAF+GAGE","<D>A<E>A","<D>F+<E>G","RDRC+","R"
"D4Q8>C+32Q4D..Q8<D4R4","<F+>A<D>A","<F+>F+<D>F+","RDRD","R"
"F+4Q6DQ4<BQ8>D4Q6<BQ4G+","<<B>>B<E>B","<<B>>F+<E>G+","RDRD","R"
"Q8A4>G+32A..<A4R4>","<<A>>A<<A>>A<","<<A>>A<<A>>G<","RC+RC+","R"
'
"Q4EGF+AGQ6F+EQ4D","<A>>A<C+>A","<A>>G<C+>G","RC+RE","R"
"Q8C+4E4G4R4","<E>A<<A>>A","<E>G<<A>>G","RC+RC+","R"
"Q4F+AGBAQ6GF+Q4E","<D>A<F+>A","<D>F+<F+>F+","RDRD","R"
"Q8D4F+4A4R4","<D>A<A>A","<D>F+RF+","RDRD","R"
"Q6BQ4AQ6AGGF+F+Q4E","<G>B<B>B","RGRG","RERE","R"
"Q8E4G4B4R4","T120ET108BT96<GT84>B","RGRG","RERE","R"
"Q4AF+C+DGE<B>C+","T132<A>A<<A>>A","RF+<<A>>G","RDRC+","R"
"Q7D4Q8>C+32D..<D4R4","<D>F+<DR","<D>DF+R<","R<A>DR","R"
'loop3
"F+4F+4G4G4","D2E2","L8RQ8A>F+Q7ARQ8<A>GQ7A","RQ8D8R.C+8R8","Q8L4DDEE"
"Q8AQ7>DC+DQ8<A4R4","D2.R","RQ8<A>F+DAF+DQ7<A","R1","F+8R.F+R"
"D4D4E4E4","D2<A2","RQ8A>F+Q7ARQ8<A>GQ7A","RD8R.C+8R8","<F+F+AA"
"L16F+AG+ABAGF+Q7L8EQ6<A>C+Q4<A",">D>D<<AR","F+4D4C+4R4","D<AAR",">D16R..Q7C+8R."
"Q7B4Q6>DQ4<B>B4<B4",">G>B8R8<G>B8R8","RDGDRDGD","R1","R1"
"Q7A4Q6>DQ4<A>A4<A4","<F+>>D8R8<<D>>F+8R8","R<A>A<ARA>A<A","R1","R1"
"Q8>G4<A4>F+4<A4","<<C+>A<D>A","L4C+>G<D>F+","R>ERD","Q8ERDR"
">E4Q6E16F+16G16Q4F+16Q7ER4.","<AAAR","<E>AAR<","REER","C+Q6L16C+DEQ4DQ7C+8R4."
'loop3
"F+4F+4G4G4","D2E2","L8RQ8A>F+Q7ARQ8<A>GQ7A","RQ8D8R.C+8R8","Q8L4DDEE"
"Q8AQ7>DC+DQ8<A4R4","D2.R","RQ8<A>F+DAF+DQ7<A","R1","F+8R.F+R"
"D4D4E4E4","D2<A2","RQ8A>F+Q7ARQ8<A>GQ7A","RD8R.C+8R8","<F+F+AA"
"L16F+AG+ABAGF+Q7L8EQ6<A>C+Q4<A",">D>D<<AR","F+4D4C+4R4","D<AAR",">D16R..Q7C+8R."
"Q7B4Q6>DQ4<B>B4<B4",">G>B8R8<G>B8R8","RDGDRDGD","R1","R1"
"Q7A4Q6>DQ4<A>A4<A4","<F+>>D8R8<<D>>F+8R8","R<A>A<ARA>A<A","R1","R1"
"Q8>G4<A4>F+4<A4","<<C+>A<D>A","L4C+>G<D>F+","R>ERD","Q8ERDR"
">E4Q6E16F+16G16Q4F+16Q7ER4.","<AAAR","<E>AAR<","REER","C+Q6L16C+DEQ4DQ7C+8R4."
'loop4
"Q8G4Q6G16F+16E16Q4D16C+R>C+R",">C+A<A>A","R>GRG","RERC+","L1R"
"DR<<ARQ8>D4R4","Q8D2Q7<D>A","RF+AF+","RDF+D","R"
"G4Q6G16F+16E16Q4D16C+R>C+R","<E>A<A>A","<E>GRG","RERC+","R"
"DR<<ARQ8>D4R4","Q8D2Q7<D>A","RF+AF+","RDF+D","R"
"<B4Q6>D16C+16<B16Q4A16GR>BR","<G>B8R8<<G>>B8R8","L8RDGDRDGD","R1","R"
"Q8<A4Q6A16B16A16Q4G16F+R>AR","<D>A8R8<D>A8R8","RDF+DRDF+D","R1","R"
"Q8G4Q6B16A16G16Q4F+16ER>C+R","<G>B<A>A","L4<G>E<A>G","RDRC+","R"
"DR<DR<D4R4>","<D>A<DR","<D>F+F+R<","RDDR","R"
'loop4
"Q8G4Q6G16F+16E16Q4D16C+R>C+R",">C+A<A>A","R>GRG","RERC+","L1R"
"DR<<ARQ8>D4R4","Q8D2Q7<D>A","RF+AF+","RDF+D","R"
"G4Q6G16F+16E16Q4D16C+R>C+R","<E>A<A>A","<E>GRG","RERC+","R"
"DR<<ARQ8>D4R4","Q8D2Q7<D>A","RF+AF+","RDF+D","R"
"<B4Q6>D16C+16<B16Q4A16GR>BR","<G>B8R8<<G>>B8R8","L8RDGDRDGD","R1","R"
"Q8<A4Q6A16B16A16Q4G16F+R>AR","<D>A8R8<D>A8R8","RDF+DRDF+D","R1","R"
"Q8G4Q6B16A16G16Q4F+16ER>C+R","<G>B<A>A","L4<G>E<A>G","RDRC+","R"
"DR<DR<D4R4>","<D>A<DR","<D>F+F+R<","RDDR","R"
'loop1
"Q4ABAF+GAGE","D>A<E>A","D>F+<E>G","RDRC+","R"
"D4Q8>C+32Q4D..Q8<D4R4","<F+>A<D>A","<F+>F+<D>F+","RDRD","R"
"Q4GAGEF+GF+D","<E>A<D>A","<E>G<D>F+","RC+RD","R"
"E4Q8G+32Q4A..Q8<A4R4","<<A>>A<<A>>A","<<A>>A<<A>>A","RERE","R"
"Q4>ABAF+GAGE","<D>A<E>A","<D>F+<E>G","RDRC+","R"
"D4Q8>C+32Q4D..Q8<D4R4","<F+>A<D>A","<F+>F+<D>F+","RDRD","R"
"F+4Q6DQ4<BQ8>D4Q6<BQ4G+","<<B>>B<E>B","<<B>>F+<E>G+","RDRD","R"
"Q8A4>G+32A..<A4R4>","<<A>>A<<A>>A<","<<A>>A<<A>>G<","RC+RC+","R"
'
"Q4EGF+AGQ6F+EQ4D","<A>>A<C+>A","<A>>G<C+>G","RC+RE","R"
"Q8C+4E4G4R4","<E>A<<A>>A","<E>G<<A>>G","RC+RC+","R"
"Q4F+AGBAQ6GF+Q4E","<D>A<F+>A","<D>F+<F+>F+","RDRD","R"
"Q8D4F+4A4R4","<D>A<A>A","<D>F+RF+","RDRD","R"
"Q6BQ4AQ6AGGF+F+Q4E","<G>B<B>B","RGRG","RERE","R"
"Q8E4G4B4R4","T120ET108BT96<GT84>B","RGRG","RERE","R"
"Q4AF+C+DGE<B>C+","T132<A>A<<A>>A","RF+<<A>>G","RDRC+","R"
"Q7D4Q8>C+32D..<D4R4","<D>F+<DR","<D>DF+R<","R<A>DR","R"
'
"R1R1","R1R1","R1R1","R1R1","R1R1"
¥Rogue¥Monster¥
else
  echo "will not over write ./gavotte"
fi
if `test ! -s ./menuett1`
then
echo "writing ./menuett1"
cat > ./menuett1 << '¥Rogue¥Monster¥'
'	ＭＥＮＵＥＴＴ
'		J.S.Bach
' Allegretto
MF
¥700,500,200,200
"R16","R16","R16","R16"
"T198@0","@0","@0","@0"
"O5L8V13","O3L2.V13","O4L2.V13","O3L2.V8"
>,>,>,>
'loop1
"Q8D4<GAB>C","G2A4","D2R4","B2R4"
"Q4D4<G4G4","B","R","R"
"Q8>E4CDEF+",">C","R","R"
"Q4G4<G4G4","<B","R","R"
"Q8>C4DC<BA","A","R","R"
"B4>C<BAG","G","R","R"
"F+4GABG","L4>D<BG","R","R"
"B8Q7A^2",">D<D8>C8<B8A8","R","R"
"Q8>D4<GAB>C","B2A","R","R"
"Q4D4<G4G4","GBG","R","R"
"Q8>E4CDEF+",">C2.","R","R"
"Q4G4<G4G4","<B>C8<B8A8G8","R","R"
"Q8>C4DC<BA","A2F+","R","R"
"B4>C<BAG","G2B","R","R"
"A4BAGF+",">CD<D","R","R"
"Q7G2.>","G2<G>L2.","R","R"
'loop1
"Q8D4<GAB>C","G2A4","D2R4","B2R4"
"Q4D4<G4G4","B","R","R"
"Q8>E4CDEF+",">C","R","R"
"Q4G4<G4G4","<B","R","R"
"Q8>C4DC<BA","A","R","R"
"B4>C<BAG","G","R","R"
"F+4GABG","L4>D<BG","R","R"
"B16A.^2",">D<D8>C8<B8A8","R","R"
">D4<GAB>C","B2A","R","R"
"Q4D4<G4G4","GBG","R","R"
"Q8>E4CDEF+",">C2.","R","R"
"Q4G4<G4G4","<B>C8<B8A8G8","R","R"
"Q8>C4DC<BA","A2F+","R","R"
"B4>C<BAG","G2B","R","R"
"A4BAGF+",">CD<D","R","R"
"Q7G2.>","G2<G>L2.","R","R"
'loop2
"Q8B4GABG","G","R","R"
"A4DEF+D","F+","R","R"
"G4EF+GD","L4EGE","R","R"
"C+4<B>C+Q7<A4","A2<A","R","R"
"Q8AB>C+DEF+",">A2.","R","R"
"Q4G4F+4E4","Q4B>DC+","R","R"
"F+4<A4>C+4","D<F+A","R","R"
"Q7D2.","Q8>D<DQ7>C","R","R"
"Q8D4<GF+Q7G4","<B2B","R4D2","R"
"Q8>E4<GF+Q7G4",">C2C","R4E2","R"
"Q8>D4C4<B4","<BAG","R","R"
"AGF+GQ7A4",">D2R","R","R"
"Q8DEF+GAB","<D2.","R2<F+4","R"
"Q4>C4<B4A4","Q4EGF+","R","R"
"Q8B>DQ4<G4F+4","Q8GQ4<B>D","R","R"
"Q7G2.>","GDQ7<G>L2.",">D","B"
'loop2
"Q8B4GABG","G","R","R"
"A4DEF+D","F+","R","R"
"G4EF+GD","L4EGE","R","R"
"C+4<B>C+Q7<A4","A2<A","R","R"
"Q8AB>C+DEF+",">A2.","R","R"
"Q4G4F+4E4","Q4B>DC+","R","R"
"F+4<A4>C+4","D<F+A","R","R"
"Q7D2.","Q8>D<DQ7>C","R","R"
"Q8D4<GF+Q7G4","<B2B","R4D2","R"
"Q8>E4<GF+Q7G4",">C2C","R4E2","R"
"Q8>D4C4<B4","<BAG","R","R"
"AGF+GQ7A4",">D2R","R","R"
"Q8DEF+GAB","<D2.","R2<F+4","R"
"Q4>C4<B4A4","Q4EGF+","R","R"
"Q8B>DQ4<G4F+4","Q8GQ4<B>D","R","R"
"Q7G2.>","GDQ7<G>L2.",">D","B"
"R1R1R1","R1R1R1","R1R1R1","R1R1R1"
¥Rogue¥Monster¥
else
  echo "will not over write ./menuett1"
fi
if `test ! -s ./menuett2`
then
echo "writing ./menuett2"
cat > ./menuett2 << '¥Rogue¥Monster¥'
'	ＭＥＮＵＥＴＴ
'		J.S.Bach
' Allegretto
MF
¥700,500,200,200
"R16","R16","R16","R16"
"T189@0","@0","@0","@0"
"O5L8V13","O3L4V13","O3L2.V13","O4L2.V8"
>,>,>,>
'loop1
"Q8B-4A4G4","G2.","R","R"
"Q4A4D4D4","F2.","R","R"
"Q8G4<GAB->C","E-2.","R","R"
"Q7D2.","D>D8C8<B-8A8","R","R"
"Q8E-4FE-DC","G2A","B-2R4","R"
"D4E-DC<B-","B-2G","R","R"
">C4DC<B->C","AF+G","R","R"
"Q7<A2.","D>D8C8<B-8A8","R","R"
"Q8>B-4A4G4","G2.","R","R"
"Q4A4D4D4","F2.","R","R"
"Q8G4<GAB->C","E-2.","R","R"
"Q7D2.","D>D8C8<B8A8","R","R"
"Q8F4GFE-D","B2G",">D","R"
"E-4FE-DC",">C<AF","R","R"
"Q4D4G4C4","Q4B-E-F","R2Q4<A4","R"
"Q7<B-2.>","Q7B-<B-2>","Q7>F<","D"
'loop1
"Q8B-4A4G4","G2.","R","R"
"Q4A4D4D4","F2.","R","R"
"Q8G4<GAB->C","E-2.","R","R"
"Q7D2.","D>D8C8<B-8A8","R","R"
"Q8E-4FE-DC","G2A","B-2R4","R"
"D4E-DC<B-","B-2G","R","R"
">C4DC<B->C","AF+G","R","R"
"Q7<A2.","D>D8C8<B-8A8","R","R"
"Q8>B-4A4G4","G2.","R","R"
"Q4A4D4D4","F2.","R","R"
"Q8G4<GAB->C","E-2.","R","R"
"Q7D2.","D>D8C8<B8A8","R","R"
"Q8F4GFE-D","B2G",">D","R"
"E-4FE-DC",">C<AF","R","R"
"Q4D4G4C4","Q4B-E-F","R2Q4<A4","R"
"Q7<B-2.>","Q7B-<B-2>","Q7>F<","D"
'loop2
"Q8D4<B->CDE","B-2.","R","R"
"F4G4A4","AGF","R","R"
"B-4GAB-G","GEC","R","R"
"A4GAQ7F4","F2R","R","R"
"Q8<FGAB->CD","Q8AGF","R","R"
"Q4E-4D4C4","Q4GFE-","R","R"
"F4<B-4A4","DE-F","R","R"
"Q7B-2.","<B-Q7>>DC","R","R"
"Q8G4>DCQ7D4","<B2.",">D","R"
"Q8<G4>E-DQ7E-4",">C2.","R","R"
"Q8<G>D<F+>C<GB-","Q8<B-AG","R","R"
"Q7A2.","Q7>D<A8G8F+8E8","R","R"
"Q8DEF+GAB-","D2R","R","R"
"Q4>C4<B-4A4","Q4E-DC","R","R"
"Q8B->C16D16Q4<G4F+4","Q8<B-Q4>CD","R","R"
"Q7G2.>","Q7G<G2>","D<","<B->"
'loop2
"Q8D4<B->CDE","B-2.","R","R"
"F4G4A4","AGF","R","R"
"B-4GAB-G","GEC","R","R"
"A4GAQ7F4","F2R","R","R"
"Q8<FGAB->CD","Q8AGF","R","R"
"Q4E-4D4C4","Q4GFE-","R","R"
"F4<B-4A4","DE-F","R","R"
"Q7B-2.","<B-Q7>>DC","R","R"
"Q8G4>DCQ7D4","<B2.",">D","R"
"Q8<G4>E-DQ7E-4",">C2.","R","R"
"Q8<G>D<F+>C<GB-","Q8<B-AG","R","R"
"Q7A2.","Q7>D<A8G8F+8E8","R","R"
"Q8DEF+GAB-","D2R","R","R"
"Q4>C4<B-4A4","Q4E-DC","R","R"
"Q8B->C16D16Q4<G4F+4","Q8<B-Q4>CD","R","R"
"Q7G2.>","Q7G<G2>","D<","<B->"
"R1R1R1","R1R1R1","R1R1R1","R1R1R1"
¥Rogue¥Monster¥
else
  echo "will not over write ./menuett2"
fi
if `test ! -s ./minuetto`
then
echo "writing ./minuetto"
cat > ./minuetto << '¥Rogue¥Monster¥'
'	ボッケリーニのメヌエット
' Moderato e grazioso
'
MF
¥2300,1300,2600,1100
"R16","R16","R16","R16"
"@25","T92@13","@13","@13"
"O5L8V13","O2L8V12Q4","O4L16V12","O3L8V8"
,>,>,>
'loop1
"Q8A48B48A48G+16A16Q6B16","R4","R4","R4"
"Q7A<A4Q8>C+4Q7E","A>A>C+<A<A>A","Q8AE>C+<EAEC+EAE>C+Q6<E","Q4ER4.ER"
"Q8EQ7DD4Q8D48E48D48C+16D16Q6E16","EG+EG+EG+","Q8G+EBEG+EBEG+EBQ6E","BRBRBR"
"Q7D<E4Q8B4Q7>D","<E>EEG+EG+","Q8G+EBEG+EBEG+EBQ6E","R4BRBR"
"Q8DQ7C+C+4Q8A.Q6F+16","<A>EAE<AR","Q8AE>C+<EAE>C+<EA<A>C+Q6<A","R2."
"Q8EQ7D+Q4D+D+Q8A.Q6F+16","B>A<B>A<B>A","Q8>A<B>F+<B>A<B>F+<B>D+<B>F+Q6<B","F+RF+RF+R"
"Q8EQ7D+Q4D+D+Q8A.Q6F+16","<B>A<B>A<B>A","Q8>A<B>F+<B>A<B>F+<B>D+<B>F+Q6<B","F+RF+RF+R"
"Q8G+Q7EQ4C+AQ8L32G+G+F+G+F+G+F+E","ER<ARBR","Q8>E<B>G+<B>C+<A>A<A>A<B>AQ6<B","G+R4.F+R"
"Q7E4L8<ER>",">ER<ER","Q8>G+<B>G+<BQ7>E8R8","R2"
'loop1
"Q8A48B48A48G+16A16Q6B16","R4","R4","R4"
"Q7A<A4Q8>C+4Q7E","A>A>C+<A<A>A","Q8AE>C+<EAEC+EAE>C+Q6<E","Q4ER4.ER"
"Q8EQ7DD4Q8D48E48D48C+16D16Q6E16","EG+EG+EG+","Q8G+EBEG+EBEG+EBQ6E","BRBRBR"
"Q7D<E4Q8B4Q7>D","<E>EEG+EG+","Q8G+EBEG+EBEG+EBQ6E","R4BRBR"
"Q8DQ7C+C+4Q8A.Q6F+16","<A>EAE<AR","Q8AE>C+<EAE>C+<EA<A>C+Q6<A","R2."
"Q8EQ7D+Q4D+D+Q8A.Q6F+16","B>A<B>A<B>A","Q8>A<B>F+<B>A<B>F+<B>D+<B>F+Q6<B","F+RF+RF+R"
"Q8EQ7D+Q4D+D+Q8A.Q6F+16","<B>A<B>A<B>A","Q8>A<B>F+<B>A<B>F+<B>D+<B>F+Q6<B","F+RF+RF+R"
"Q8G+Q7EQ4C+AQ8L32G+G+F+G+F+G+F+E","ER<ARBR","Q8>E<B>G+<B>C+<A>A<A>A<B>AQ6<B","G+R4.F+R"
"Q7E4L8<ER>",">ER<ER","Q8>G+<B>G+<BQ7>E8R8","R2"
'loop2
"Q8C.Q6<E16",">E>C","Q8>E<E>EQ6<E","R4"
"Q8BQ7EQ4EEQ8A.Q6E16","<E>D<E>D<E>C","Q8>E<E>E<E>E<E>E<E>E<E>E<E","R4G+RAR"
"Q8G+Q7EQ4EEQ8>C.Q6<E16","<EBEBE>C",">E<E>E<E>E<E>E<E>E<E>EQ6<E","G+RG+R4."
"Q8BQ7EQ4EEQ8A.Q6E16","<E>D<E>D<E>C","Q8>E<E>E<E>E<E>E<E>E<E>E<E","R4G+RAR"
"Q8G+Q7EQ4EEQ8>A48B48A48G+16A16Q6B16","<EB<ER4.",">E<E>E<E>E<E>EQ6<EQ8>C+<EC+E","G+R^2"
"Q7A<A4Q8>C+4Q7E","A>A>C+<A<A>A","AE>C+<EAEC+EAE>C+Q6<E","ER4.ER"
"Q8EQ7DD4Q8D48E48D48C+16D16Q6E16","EG+EG+EG+","Q8G+EBEG+EBEG+EBQ6E","BRBRBR"
"Q7D<E4Q8B4Q7>D","<E>EEG+EG+","Q8G+EBEG+EBEG+EBQ6E","R4BRBR"
"Q8DQ7C+C+4Q8D.Q6<B16","<A>EAE<D>D","Q8AE>C+<EAE>C+<EF+DF+Q6D","R2."
"Q8AQ7G+Q4G+G+Q8>D.Q6<B16","<E>E<E>E<E>E","Q8<B>EDE<B>EDE<G+>E<BQ6>E","R2."
"Q8AQ7G+Q4G+G+Q8>D.Q6<B16","<E>E<E>E<E>E","Q8<B>EDE<B>EDE<G+>E<BQ6>E","R2."
"Q8>C+Q7<AQ4F+>DQ8L32C+C+<B>C+<B>C+<BA","<A>ADBEB","Q8<A>EC+EDF+DF+DEG+Q6E","R4F+RG+R"
"Q7A4L8<AR>>","AR<AR","Q8C+EAEQ7C+8R8","R2"
'loop2
"Q8C.Q6<E16",">E>C","Q8>E<E>EQ6<E","R4"
"Q8BQ7EQ4EEQ8A.Q6E16","<E>D<E>D<E>C","Q8>E<E>E<E>E<E>E<E>E<E>E<E","R4G+RAR"
"Q8G+Q7EQ4EEQ8>C.Q6<E16","<EBEBE>C",">E<E>E<E>E<E>E<E>E<E>EQ6<E","G+RG+R4."
"Q8BQ7EQ4EEQ8A.Q6E16","<E>D<E>D<E>C","Q8>E<E>E<E>E<E>E<E>E<E>E<E","R4G+RAR"
"Q8G+Q7EQ4EEQ8>A48B48A48G+16A16Q6B16","<EB<ER4.",">E<E>E<E>E<E>EQ6<EQ8>C+<EC+E","G+R^2"
"Q7A<A4Q8>C+4Q7E","A>A>C+<A<A>A","AE>C+<EAEC+EAE>C+Q6<E","ER4.ER"
"Q8EQ7DD4Q8D48E48D48C+16D16Q6E16","EG+EG+EG+","Q8G+EBEG+EBEG+EBQ6E","BRBRBR"
"Q7D<E4Q8B4Q7>D","<E>EEG+EG+","Q8G+EBEG+EBEG+EBQ6E","R4BRBR"
"Q8DQ7C+C+4Q8D.Q6<B16","<A>EAE<D>D","Q8AE>C+<EAE>C+<EF+DF+Q6D","R2."
"Q8AQ7G+Q4G+G+Q8>D.Q6<B16","<E>E<E>E<E>E","Q8<B>EDE<B>EDE<G+>E<BQ6>E","R2."
"Q8AQ7G+Q4G+G+Q8>D.Q6<B16","<E>E<E>E<E>E","Q8<B>EDE<B>EDE<G+>E<BQ6>E","R2."
"Q8>C+Q7<AQ4F+>DQ8L32C+C+<B>C+<B>C+<BA","<A>ADBEB","Q8<A>EC+EDF+DF+DEG+Q6E","R4F+RG+R"
"Q7A4L8<AR>>","AR<AR","Q8C+EAEQ7C+8R8","R2"
'Trio
'loop3
"R4",">F+G","Q4L8DE","R4"
"R2.","AB>C+DEF+","F+GAB>C+D","R2."
"RQ8G16Q6F+16Q4EQ8E16Q6D16Q4C+Q8C+16Q6<B16","L4<<A>AA","EQ8E16Q6D16Q4C+Q8<G16Q6F+16Q4EQ8E16Q6D16",">GR^2"
"Q4AQ8B16>C+16D16E16F+16Q6G16Q4A<A","<A8>A8Q7<A2","Q4C+Q7G4G4G","RQ7E4E4E"
">F+Q8<A16Q6G16Q4F+Q8F+16Q6E16Q4DR","Q4>D<DD","Q4F+Q8F+16Q6E16Q4DQ8<A16Q6G16Q4F+R","Q4DR^2"
"R2.","L8>>>DC+<BAG+F+",">>F+EDC+<BA","R2."
"Q7B2.","Q8L4<D>DQ7<D","Q7G+G+4G+4G+","Q7EE4E4E"
"Q8>C+Q7EQ8EDC+Q7<B","Q4C+DE","Q8AQ7>C+Q8C+<BAQ7G+","Q8ER^2"
"Q4AE<AR>>","<A>AL8<","Q4AC+R4","R2Q4<"
'loop3
"R4",">F+G","Q4L8DE","R4"
"R2.","AB>C+DEF+","F+GAB>C+D","R2."
"RQ8G16Q6F+16Q4EQ8E16Q6D16Q4C+Q8C+16Q6<B16","L4<<A>AA","EQ8E16Q6D16Q4C+Q8<G16Q6F+16Q4EQ8E16Q6D16",">GR^2"
"Q4AQ8B16>C+16D16E16F+16Q6G16Q4A<A","<A8>A8Q7<A2","Q4C+Q7G4G4G","RQ7E4E4E"
">F+Q8<A16Q6G16Q4F+Q8F+16Q6E16Q4DR","Q4>D<DD","Q4F+Q8F+16Q6E16Q4DQ8<A16Q6G16Q4F+R","Q4DR^2"
"R2.","L8>>>DC+<BAG+F+",">>F+EDC+<BA","R2."
"Q7B2.","Q8L4<D>DQ7<D","Q7G+G+4G+4G+","Q7EE4E4E"
"Q8>C+Q7EQ8EDC+Q7<B","Q4C+DE","Q8AQ7>C+Q8C+<BAQ7G+","Q8ER^2"
"Q4AE<AR>>","<A>AL8<","Q4AC+R4","R2Q4<"
'loop4
"R4",">AB","C+D","R4"
"RQ8<AQ7>AQ6AQ4AR","A4<A4>AB","EQ8E4Q7F+Q4C+D",">C+Q8C+4Q7DR4"
"RQ8<AQ7>AQ6AQ4AR","A4<A4>AB","EQ8E4Q7F+Q4C+D","Q4C+Q8C+4Q7DR4"
"RQ8<AQ4>AQ6AAA","A4A4A4","EF+GF+ED","Q4C+DEDC+<B"
"Q4AQ7<A4Q6AQ4AR","A4<A4>AB","Q8L16EDEF+Q7L8EQ4AC+D","Q8L16>C+<B>C+DQ7L8C+R4."
"RQ8AQ7>AQ6AQ4AR","A4<A4>AB","EQ8E4Q7F+Q4C+D","Q4C+Q8C+4Q7DR4"
"RQ8AQ7>AQ6AQ4AR","A4<A4>AB","EQ8E4Q7F+Q4C+D","Q4C+Q8C+4Q7DR4"
"RQ8<<AQ4>AQ6AAA","A4A4<A4","EF+GF+Q8L16AGF+Q6E","Q4C+DEDQ8L16F+EDQ6C+"
"Q4AR^2",">D4<D4>F+G","Q8F+48G48F+48EF+GQ7L8ARQ4DE","Q8D8.EQ7L8F+R4."
"R2.","AB>C+DEF+","F+GAB>C+D","R2."
"RQ8G16Q6F+16Q4EQ8E16Q6D16Q4C+Q8C+16Q6<B16","<<A4>A4A4","EQ8E16Q6D16Q4C+Q8<G16Q6F+16Q4EQ8E16Q6D16","Q4GR^2"
"Q4AQ8B16>C+16D16E16F+16Q6G16Q4A<A","Q7A<AAAAA","Q7C+G4G4G","RQ7E4E4E"
">F+Q8F+16G16Q6AGF+E","Q4>D4<D4R4","F+Q8>D16E16Q7F+Q4EDC+","DR^2"
"DC+<BAGQ4F+","R2.","<BAGF+ED","R2."
"Q7EE4E4E","G>GGGGG","Q7C+C+4C+4C+","<AA4A4A"
"Q8F+Q7AQ8AGF+Q7E","F+<F+G4A4","Q8DQ7F+Q8F+EDQ7C+","Q8AR^2"
"Q4D<A>DR>",">D4<D4","Q4DF+DR","RQ4AF+R"
'loop4
"R4",">AB","C+D","R4"
"RQ8<AQ7>AQ6AQ4AR","A4<A4>AB","EQ8E4Q7F+Q4C+D",">C+Q8C+4Q7DR4"
"RQ8<AQ7>AQ6AQ4AR","A4<A4>AB","EQ8E4Q7F+Q4C+D","Q4C+Q8C+4Q7DR4"
"RQ8<AQ4>AQ6AAA","A4A4A4","EF+GF+ED","Q4C+DEDC+<B"
"Q4AQ7<A4Q6AQ4AR","A4<A4>AB","Q8L16EDEF+Q7L8EQ4AC+D","Q8L16>C+<B>C+DQ7L8C+R4."
"RQ8AQ7>AQ6AQ4AR","A4<A4>AB","EQ8E4Q7F+Q4C+D","Q4C+Q8C+4Q7DR4"
"RQ8AQ7>AQ6AQ4AR","A4<A4>AB","EQ8E4Q7F+Q4C+D","Q4C+Q8C+4Q7DR4"
"RQ8<<AQ4>AQ6AAA","A4A4<A4","EF+GF+Q8L16AGF+Q6E","Q4C+DEDQ8L16F+EDQ6C+"
"Q4AR^2",">D4<D4>F+G","Q8F+48G48F+48EF+GQ7L8ARQ4DE","Q8D8.EQ7L8F+R4."
"R2.","AB>C+DEF+","F+GAB>C+D","R2."
"RQ8G16Q6F+16Q4EQ8E16Q6D16Q4C+Q8C+16Q6<B16","<<A4>A4A4","EQ8E16Q6D16Q4C+Q8<G16Q6F+16Q4EQ8E16Q6D16","Q4GR^2"
"Q4AQ8B16>C+16D16E16F+16Q6G16Q4A<A","Q7A<AAAAA","Q7C+G4G4G","RQ7E4E4E"
">F+Q8F+16G16Q6AGF+E","Q4>D4<D4R4","F+Q8>D16E16Q7F+Q4EDC+","DR^2"
"DC+<BAGQ4F+","R2.","<BAGF+ED","R2."
"Q7EE4E4E","G>GGGGG","Q7C+C+4C+4C+","<AA4A4A"
"Q8F+Q7AQ8AGF+Q7E","F+<F+G4A4","Q8DQ7F+Q8F+EDQ7C+","Q8AR^2"
"Q4D<A>DR>",">D4<D4","Q4DF+DR","RQ4AF+R"
'loop1
"Q8A48B48A48G+16A16Q6B16","R4","R4","R4"
"Q7A<A4Q8>C+4Q7E","A>A>C+<A<A>A","Q8L16AE>C+<EAEC+EAE>C+Q6<E","Q4ER4.ER"
"Q8EQ7DD4Q8D48E48D48C+16D16Q6E16","EG+EG+EG+","Q8G+EBEG+EBEG+EBQ6E","BRBRBR"
"Q7D<E4Q8B4Q7>D","<E>EEG+EG+","Q8G+EBEG+EBEG+EBQ6E","R4BRBR"
"Q8DQ7C+C+4Q8A.Q6F+16","<A>EAE<AR","Q8AE>C+<EAE>C+<EA<A>C+Q6<A","R2."
"Q8EQ7D+Q4D+D+Q8A.Q6F+16","B>A<B>A<B>A","Q8>A<B>F+<B>A<B>F+<B>D+<B>F+Q6<B","F+RF+RF+R"
"Q8EQ7D+Q4D+D+Q8A.Q6F+16","<B>A<B>A<B>A","Q8>A<B>F+<B>A<B>F+<B>D+<B>F+Q6<B","F+RF+RF+R"
"Q8G+Q7EQ4C+AQ8L32G+G+F+G+F+G+F+E","ER<ARBR","Q8>E<B>G+<B>C+<A>A<A>A<B>AQ6<B","G+R4.F+R"
"Q7E4L8<ER>",">ER<ER","Q8>G+<B>G+<BQ7>E8R8","R2"
'loop2
"Q8C.Q6<E16",">E>C","Q8>E<E>EQ6<E","R4"
"Q8BQ7EQ4EEQ8A.Q6E16","<E>D<E>D<E>C","Q8>E<E>E<E>E<E>E<E>E<E>E<E","R4G+RAR"
"Q8G+Q7EQ4EEQ8>C.Q6<E16","<EBEBE>C",">E<E>E<E>E<E>E<E>E<E>EQ6<E","G+RG+R4."
"Q8BQ7EQ4EEQ8A.Q6E16","<E>D<E>D<E>C","Q8>E<E>E<E>E<E>E<E>E<E>E<E","R4G+RAR"
"Q8G+Q7EQ4EEQ8>A48B48A48G+16A16Q6B16","<EB<ER4.",">E<E>E<E>E<E>EQ6<EQ8>C+<EC+E","G+R^2"
"Q7A<A4Q8>C+4Q7E","A>A>C+<A<A>A","AE>C+<EAEC+EAE>C+Q6<E","ER4.ER"
"Q8EQ7DD4Q8D48E48D48C+16D16Q6E16","EG+EG+EG+","Q8G+EBEG+EBEG+EBQ6E","BRBRBR"
"Q7D<E4Q8B4Q7>D","<E>EEG+EG+","Q8G+EBEG+EBEG+EBQ6E","R4BRBR"
"Q8DQ7C+C+4Q8D.Q6<B16","<A>EAE<D>D","Q8AE>C+<EAE>C+<EF+DF+Q6D","R2."
"Q8AQ7G+Q4G+G+Q8>D.Q6<B16","<E>E<E>E<E>E","Q8<B>EDE<B>EDE<G+>E<BQ6>E","R2."
"Q8AQ7G+Q4G+G+Q8>D.Q6<B16","<E>E<E>E<E>E","Q8<B>EDE<B>EDE<G+>E<BQ6>E","R2."
"Q8>C+Q7<AQ4F+>DQ8L32C+C+<B>C+<B>C+<BA","<A>ADBEB","Q8<A>EC+EDF+DF+DEG+Q6E","R4F+RG+R"
"Q7A4L8<AR>>","AR<AR","Q8C+EAEQ7C+8R8","R2"
"R1R2","R1R2","R1R2","R1R2"
¥Rogue¥Monster¥
else
  echo "will not over write ./minuetto"
fi
if `test ! -s ./romance`
then
echo "writing ./romance"
cat > ./romance << '¥Rogue¥Monster¥'
'	愛のロマンス
¥600,1500,300
"R16","R16","R16"
"T96@44","@44","@44"
'"T96@63","@63","@63"
"O5L4V13Q8","O4L12V12Q8","O3L2.V13Q8"
"BBB","RBGRBGRBG","E"
"BAG","RBGRBGRBG","E"
"GF+E","RBGRBGRBG","E"
"EGB","RBGRBGRBG","E"
">EEE","RBGRBGRBG","E"
"EDC","RBGRBGR>EC","E"
"C<BA","RECRECREC","A"
"AB>C","RECRECREC","A"
"<B>C<B","RF+D+RF+D+RF+D+","B"
">E-C<B","RF+D+RF+D+RF+D+","B"
"BAG","R<BGRBGRBG","E"
"GF+E","RBGRBGRBG","E"
"F+F+F+","RBARBARBA","B"
"F+GF+","RBARBARBA",">D+"
"EEE","RBGRBGRBG","E4<B4G4"
"R24<G12>E8^2","R12B24^8^2","E"
"BBB","RBGRBGRBG","E"
"BAG","RBGRBGRBG","E"
"GF+E","RBGRBGRBG","E"
"EGB","RBGRBGRBG","E"
">EEE","RBGRBGRBG","E"
"EDC","RBGRBGR>EC","E"
"C<BA","RECRECREC","A"
"AB>C","RECRECREC","A"
"<B>C<B","RF+D+RF+D+RF+D+","B"
">E-C<B","RF+D+RF+D+RF+D+","B"
"BAG","R<BGRBGRBG","E"
"GF+E","RBGRBGRBG","E"
"F+F+F+","RBARBARBA","B"
"F+GF+","RBARBARBA",">D+"
"EEE","RBGRBGRBG","E4<B4G4"
"R24<G12>E8^2","R12B24^8^2","E"
"G+G+G+","RBG+RBG+RBG+","E"
"G+F+E","RBG+RBG+RBG+","E"
"ED+D+","RAF+RAF+RAF+","B"
"D+DD+","RAF+RAF+RAF+","B"
">C+C+C+","R>F+D+RF+D+RF+D+","B"
"C+D+C+","RF+D+RF+D+RF+D+","B"
"C+<BB","RG+ERG+ERG+E","E"
"B>C+D+","RG+ERG+ERG+E","E"
"EEE","RG+ERG+ERG+E","E"
"ED+D","RG+ERG+ERG+E","E"
"C+C+C+","REC+REC+REC+","A"
"C+<BA","REC+REC+REC+","A"
"G+G+G+","RD+<AR>D+<AR>D+<A","B"
"G+AF+","R>D+<AR>D+<AR>D+<A","B"
"EEE","RBG+RBG+RBG+",">E4<B4G+4"
"R24<G+12>E8^2","R12B24^8^2","E"
"G+G+G+","RBG+RBG+RBG+","E"
"G+F+E","RBG+RBG+RBG+","E"
"ED+D+","RAF+RAF+RAF+","B"
"D+DD+","RAF+RAF+RAF+","B"
">C+C+C+","R>F+D+RF+D+RF+D+","B"
"C+D+C+","RF+D+RF+D+RF+D+","B"
"C+<BB","RG+ERG+ERG+E","E"
"B>C+D+","RG+ERG+ERG+E","E"
"EEE","RG+ERG+ERG+E","E"
"ED+D","RG+ERG+ERG+E","E"
"C+C+C+","REC+REC+REC+","A"
"C+<BA","REC+REC+REC+","A"
"G+G+G+","RD+<AR>D+<AR>D+<A","B"
"G+AF+","R>D+<AR>D+<AR>D+<A","B"
"EEE","RBG+RBG+RBG+",">E4<B4G+4"
"R24<G+12>E8^2","R12B24^8^2","E"
"BBB","RBGRBGRBG","E"
"BAG","RBGRBGRBG","E"
"GF+E","RBGRBGRBG","E"
"EGB","RBGRBGRBG","E"
">EEE","RBGRBGRBG","E"
"EDC","RBGRBGR>EC","E"
"C<BA","RECRECREC","A"
"AB>C","RECRECREC","A"
"<B>C<B","RF+D+RF+D+RF+D+","B"
">E-C<B","RF+D+RF+D+RF+D+","B"
"BAG","R<BGRBGRBG","E"
"GF+E","RBGRBGRBG","E"
"F+F+F+","RBARBARBA","B"
"F+GF+","RBARBARBA",">D+"
"EEE","RBGRBGRBG","E4<B4G4"
"R24<G12>E8^2","R12B24^8^2","E"
¥Rogue¥Monster¥
else
  echo "will not over write ./romance"
fi
if `test ! -s ./serenade`
then
echo "writing ./serenade"
cat > ./serenade << '¥Rogue¥Monster¥'
'	ハイドンのセレナーデ
'	Ｓｅｒｅｎａｄｅ	Roman Hoffstetter
' Andante cantabile
'
MF
¥1600,900,1400,900
"R16","R16","R16","R16"
"@25","T88@13","@13","@13"
"O5L8V13","O4L4V12","O4L8V12","O4L8V8"
,>,>,>
"Q8E.Q6F16","R","R4","R4"
"Q8GQ7EC2Q8GQ7E","T112Q4CR<CR","Q4EGEGEGEG","R2Q4CR4."
"Q8AQ7FC2Q8FQ7A",">CR<CR","FAFAFAFA","R2CR4."
"Q8AGFQ7EQ8EDCQ7<B",">CR<GR","EGEGDFDF","R1"
"Q8B>CQ7<G2Q6>G.Q4G16","CRBG","EGEGFGFG","<GR4.>DRDR"
"Q8GA16G16FQ7EQ8EDCQ7<B",">CR<G<G","EGEGDFDF","R1"
"Q8B4Q7>C4R4Q8E.Q6F16",">CR<CR","EGEGEGEG","<GR4.GR4."
"Q8GQ7EC2Q8GQ7E",">>CR<CR","EGEGEGEG","R2Q4>CR4."
"Q8AQ7FC2Q8FQ7A",">CR<CR","FAFAFAFA","R2CR4."
"Q8AGFQ7EQ8EDC<B",">CR<GR","EGEGDFDF","R1"
"Q8>D16C16<B16>C16Q7<G2Q6>G.Q4G16","CRBG","EGEGFGFG","<GR4.>DRDR"
"Q8GA16G16FQ7EQ8EDCQ7<B",">CR<G<G","EGEGDFDF","R1"
"Q8B4Q7>C4R4Q8C.Q6D16",">CCEG","EGEGEGEG","<GR2.."
"Q8ECGQ7ED2",">CR<BB","EGEGDGDG","R1"
"Q8DCEQ7CQ8<A4.Q7>C","ARDF+","EGEGDF+<A>D",">CRCR^2"
"Q8<BQ7>>DQ8D2CQ7<B","GR<BR","<B>D<B>D<G>GDG","R1"
"Q8BQ7AQ8A2BQ7G",">CRCC+","EGEG<A>GEG","R1"
"Q8D16Q6>D4..Q8C<B-AQ7G","DR2E-","F+AF+AG>C+<G>C+","<AR4.>E-R4."
"Q8F+16>D16^4Q7<AQ8>C<B-AQ7G","DR2E-","<F+AF+AG>C+<G>C+","R2E-R4."
"Q8G4Q7F+4R4D4","DF+8A8>DR","R<AF+AF+AF+A","R4DRCR4."
"Q8D32>D..Q6D.D16Q8EQ7DC<B","<GR<GR","DGDGDGDG","<BRBRBRBR"
"Q8B32>C..Q6C.C16Q7C2",">DR>D<D","DF+DF+RF+DF+","ARAR^2"
"<B4ABQ8>C<BAQ7G","GRQ6<G8B8>D8Q4G8","<B>D<B>D<B>D<B>D","R1"
"Q8F+32A..D.Q4D16Q7D4Q8B.Q6>C16","DRQ6D8C8<B8Q4A8","<A>D<A>D<F+AD>D","F+4R2."
"Q7D4Q6D.D16Q8EQ7DC<B","GR>GR","DGDGDGDG","BRBRBRBR"
"Q8B32>C..Q6C.C16Q7C2","DR>D<D","DF+DF+RF+DF+","ARAR^2"
"Q8<B.>C32<B32Q7ABQ8>C<AGQ7F+","GRDD","DGDGDADA","BRBR>CRCR"
"Q8F+4Q7G4R4Q8<B.Q6>C16","GD<GR","Q6<BQ4>DGBGBGB","R4<B>D<B>D<B>D"
"Q8D4CQ7<BQ8>DC<BQ7A","GR>DR","GBGBQ6<AQ4>F+Q6DQ4A","<B>D<B>DR2"
"Q8BQ7>GQ8G2<BQ7>C","GR<GR","GBGBGBGB","<B>D<B>D<B>D<B>D"
"Q8EDCQ7<BQ8>C<AGQ7F+","GR>DD","GBGBCACA","<B>D<B>DR2"
"Q8G4.Q7BQ8>DC<AQ7F+","GRD<D","DGDGDADA","<BRBR>CRCR"
"Q8G4.B16Q6>D16Q8C<AGQ7F+","T108GT104RT100>DT96D","DGDGDADA","<BRBR>CRCR"
"Q8F+4Q7G4R4","T92GT88DT84<G","Q6<BQ4>DGBG4","R4<B>D<B4"
'
"Q8B.Q6>C16","T112R","R4","R4"
"Q8DQ7<BG2Q8>DQ7<B",">GR<GR","<B>D<B>D<B>D<B>D","R2GR4."
"Q8>EQ7C<G2Q8>EQ7C",">GR<GR","CECECECE","R2GR4."
"Q8GQ7FEDQ8FQ7EDC","BR>CR","DGDG<G>GEG","R2.>CR"
"Q8DQ7<BG4R4Q8>G.Q6A16","GR<GG","DGDGBGAF+","<BRBR>DRCR"
"Q8BQ7G<G2Q8>BQ7G",">GR<GR","DGDGDGDG","<BRBRBRBR"
"Q8>CQ7<G<G2Q8>>CQ7<G",">GR<GR","EGEGEGEG",">CRCRCRCR"
"Q8G32F16.DRQ7FQ8F32E16.CRQ7E","BR>CR","DGDGCGCG","<GR4.GR4."
"Q8E32D16.C<BQ7AG4Q8>E.Q6F16","GR<GR","DGDG<BQ6>FEQ4D","BRBR4Q6>DCQ4<B"
"Q8GQ7EC2Q8GQ7E",">CR<CR","EGEGEGEG",">CRCRCRCR"
"Q8AQ7FC2Q8>CQ7<A",">>CR<CR","FAFAFAFA","R2CR4."
"Q8AGFQ7EQ8EDCQ7<B",">CR<GR","EGEGDGDG","R1"
"Q8>D16C16<B16>C16Q7<G2Q6>G.Q4G16","CRBG","EGEGFGFG","<GR4.>DRDR"
"Q8GA16G16FQ7EQ8EDCQ7<B",">CR<G<G","EGEGDFDF","R1"
">C2R4Q8G.Q4G16",">CR>CR","EGEGEGEG","<GR2.."
"Q8G4.A16Q6B-16Q8B-Q7AQ8AQ7G","C+R<AR","EAEAEAEA","R2>C+RC+R"
"Q8GQ7FQ8FQ7EF4Q8F.Q4F16","DR>DC","FAFAFAFA","<GR2.."
"Q8F4.G16Q6A16Q8AQ7GQ8GQ7F","<BRGB","DGDGDGDG","R2BR4."
"Q8FQ7EQ8EQ7DE4Q8>C.Q6<G16",">CR<CR","EGEGQ6EQ4GQ6GQ4>C","R2Q6GR>ER"
"Q8G4Q7F4Q8E4>C.Q6<G16","G<G>CR","<GBGBQ6CGEQ4>C","Q4DRDR^2"
"Q8G4F16L32GFGFEFE4L8>C.Q6<G16","G<G>CR","<GBGBQ6CGEQ4>C","DRDR^2"
"Q8GF4Q7DQ8FE4C","<BR>CR","<DGDGCGEG","R1"
"Q7G2D4Q8E-Q7C","GQ2<GRQ6>A-","DGDGDGCF+","<BRBRBR4."
"G2D4Q8E-Q7C","Q4GQ2<GRQ6>A-","DGDGDGCF+","BRBRBR4."
"G4G4G4Q8E-.Q6C16","T110Q4GT108Q2<GT106RT104Q6>A-","DGFGE-GCF+","BR>DRCR4."
"Q7<G2R4G4","T102Q4GT100Q2<GT98GT112R","DGDGDBGB","<BRBR4.>FR"
">G4Q6G.G16Q8AQ7GFE","Q4>>CR<CR","G>C<G>C<G>C<G>C","ERERERER"
"Q8E32F..Q6F.F16Q7F2","GRG<G","<GBGBGBGB","DRDRDRDR"
"Q8F32E..Q7DEQ8FEDQ7C",">CR>CR","EGEGEGEG","<GR2.."
"D4Q8<G.Q4G16Q7G4Q8>E.Q6F16","<G<GQ6>G8F8E8Q4D8","DGDG<B>D<G>G","BRBR^2"
"Q7G4Q6G.G16Q8AQ7GFE","CR>CR","G>C<G>C<G>C<G>C",">ERERERER"
"Q8E32F..Q6F.F16Q7F2","<GR<GG","<GBGBGBGD","DRDRDR4."
"Q8E.F32E32Q7DEQ8FDCQ7<B",">CRG<G","EGEGDFDF","CRCR^2"
">C2R4Q8E.Q6F16",">C<GCR","EGEGEGEG","<GRGRGRGR"
"Q7G4FEQ8GFEQ7D",">CR<GR","EGEGDGDG","GRGRGRGR"
"Q8EQ7>CQ8C2<EQ7F",">CRCR","EGEGEGEG","GRGRGRGR"
"Q8AGFQ7EQ8FDCQ7<B","CRG<G","EGEGFGFG","GRGR>DRDR"
"Q8>C4.Q7EQ8GFDQ7<B",">CR2<G","EGEGFGFG","<GRGR>DRDR"
"Q8>C4.E16Q6G16Q8FDCQ7<B","T108>CT104RT100GT96<G","EGEGFGFG","<GRGR>DRDR"
"Q8B2Q7>C4","T92>CT88<GT84Q7C","FGFQ6GQ7E4","D<G>DQ6<GQ7G4"
"R1R2","R1R2","R1R2","R1R2"
¥Rogue¥Monster¥
else
  echo "will not over write ./serenade"
fi
if `test ! -s ./test`
then
echo "writing ./test"
cat > ./test << '¥Rogue¥Monster¥'
'	テスト放送
'
¥500
"R16"
"T96@9"
"O5L4V13"
>
'loop1
"A2>F2"
"E2CA"
"GFED"
"C+<AA2"
">FDE<A"
"GFED"
"A>D<B>C+"
"Q8D2.RQ7<"
'loop1
"A2>F2"
"E2CA"
"GFED"
"C+<AA2"
">FDE<A"
"GFED"
"A>D<B>C+"
"Q8D16C+16D8^2R"
"R1"
¥Rogue¥Monster¥
else
  echo "will not over write ./test"
fi
echo "Finished archive 1 of 1"
# if you want to concatenate archives, remove anything after this line
exit