input/scsii-menuetto.ly

   1 \header{
   2 filename =       "scsii-menuetto.ly";
   3 title =  "Cello Suite II";
   4 subtitle = "Part V";
   5 instrument = "Menuetto I";              % duh
   6 description =    "Cello suite transcribed for Viola";
   7 source =         "?";
   8 opus =   "BWV 1008 no. 5";
   9 composer =       "Johann Sebastian Bach (1685-1750)";
  10 enteredby =      "JCN";
  11 copyright =      "public domain";
  12 }
  13
  14 %{
  15  Tested Features:breaking algorithm, chords, multivoice, accents
  16 %}
  17
  18 \version "0.1.7";
  19
  20 %% Stuff from MPP version
  21 % \lefttitle{Menuetto}
  22 % \tempo{Moderato}
  23 % \metron{4=120}
  24 %
  25 % \key\F                % \key is F ( f-major )
  26 %
  27 % \slope{30}            % Fool MusiXTeX into 30 / 10 steeper beam
  28 %               % because piece is set very tightly
  29
  30 IImenuetto = \melodic{
  31         \property Voice.beamslopedamping = \infinity
  32         \clef"alto";
  33         \property Staff.instrument = cello
  34         \meter 3/4;
  35         \key bes;
  36         \octave c';
  37
  38         \duration 8;
  39                 < a2 f2 d2 \f > bes4-.  |
  40 %%2
  41         \textstyle "finger";            % ugh.
  42
  43         < [ bes8^"1"( e8 c8_"2"_"4" >
  44                 )a8 bes8-. g8-. ] a4-.^"4" |
  45
  46 %%3
  47         \property Voice.beamslopedamping = \normal
  48         < d4 'bes4-. > g4-. [ f8-. e8-. ] |
  49         \property Voice.beamslopedamping = \infinity
  50 %%4
  51         < [ f8( 'a > e8 )d8 cis8-. 'b8-. 'a8-. ]
  52 %%5
  53         < a2 f2 d2 > bes!4-. |
  54 %%6
  55         < [ bes8 e8 > a8 bes8-. g8-. ]
  56         c'!4-. |
  57 %%7
  58         < a4-. f4>
  59         < d'4-.-\upbow f4 'bes4 >
  60         < e'4-.-\downbow g4 'g4 > |
  61 %%8
  62         < cis'2.-\upbow e2. 'a2. >
  63                 \bar ":|:";
  64 %%9
  65         \clef "violin";
  66         < e'2 a2 \f >
  67         \property Voice.beamslopedamping = \normal
  68         [ d'8( e'16 )f'16 ] |
  69         \property Voice.beamslopedamping = \infinity
  70 %%10
  71         < [ e'8( g8 > d' cis'_"2" )e' a ()  g8 ] |
  72 %%11
  73         \multi 2 <
  74                 {\stemup a4()  d'4 cis'4-. }
  75                 { \stemdown f2 e4 } > |
  76         \stemboth
  77 %%12
  78         % oeps: slur gets attached at d8 iso g'8!
  79 %       < [ g'8^"4"( d8 > f' e' )f' d'^"3"()   c' ] |
  80         % wrong still...
  81         < { [ g'8^"4"( f' e' )f' d'^"3"()   c' ] } { [ d8 ] } > |
  82 %%13
  83         \clef "alto";
  84         \multi 2 <
  85                  { \stemup bes2 c'4 }
  86                  { \stemdown g4()  f4 e4 }% ugh
  87         > |
  88         \stemboth
  89 %%14
  90         < [ a8 f8 > g8 a8 f8 ] < d'4-\upbow e4 'bes4 > |
  91 %%15
  92         < c'4-\downbow f4 'a4 > [ bes8()  a8 g8 a8 ] |
  93 %%16
  94         [ f( e8 )f a8-. g8-. bes8-. ] |
  95 %%17
  96         < a2^"0"^\trill fis2_"3" > bes4 |
  97 %%18
  98         < { [ c'8 ()  bes8 c' a8 ] } es8 > fis4^\trill |
  99 %%19
 100         < d'4-\downbow g4 'bes4 > < c'4-\upbow g4 c4 > < [ bes8 d8 > a8 ] |
 101 %%20
 102         < { [ c'8 ( bes8 a8 )bes g()  bes8 ] }  d8  g8  > |
 103 %%21
 104         \multi 2 <
 105                 {\stemup  d'4( \stemup )cis'4 d'4 }
 106                 { \stemdown g2 f4 }
 107         > |
 108         \stemboth
 109 %%22
 110         < { [ g8 ()  f8 g8 e8 ] }  cis8  > < f4 d4 > |
 111 %%23
 112         \property Voice.beamslopedamping = \normal
 113         [ 'g8 g8 ] < e4.^\trill 'a4. > d8-\upbow |
 114         \property Voice.beamslopedamping = \infinity
 115 %%24
 116         \textstyle "roman";             % ugh
 117         < d2.^"fine" 'a2. 'd2._"3 mins.">
 118         \bar ":|";
 119 }
 120
 121 \score{
 122         \melodic{
 123                 \IImenuetto
 124         }
 125         \paper{
 126                 linewidth= 150.0\mm;
 127                 \output "scsii-menuetto.out";
 128         }
 129         \midi{
 130                 \tempo 4 = 120;
 131                 \output "scsii-menuetto.midi";
 132         }
 133 }