mutopia/gnossienne-4.ly

   1 \header {
   2   filename =    "gnossienne-4.ly";
   3   title =       "Gnossienne";
   4   subtitle =    "4";
   5   source =      "";
   6   composer =    "Erik Satie (1866-1925)";
   7   enteredby =   "jcn";
   8   copyright =   "Public Domain";
   9 }
  10
  11 %{
  12  Tested Features: cross staff beams and slurs
  13 %}
  14
  15 \version "1.0.14";
  16
  17 \include "nederlands.ly"
  18
  19 global = \notes {
  20   \key a \minor;
  21   \time 6/4;
  22 %  \cadenza 1;
  23   \skip 1.*34;
  24   \bar ".|";
  25 }
  26
  27 upper = \type Voice=one \notes \relative c''{
  28   \clef violin;
  29   \stemup
  30   r2 r r
  31   r2 r r
  32   r4 [a'8--(\< a--] [a-- a-- c-- \!b--] [a--\> fis g \!e]
  33   % grace hack
  34   % urg, how to get grace in different voice, thus in different beam??
  35 %  [es8 { \type Voice=urgnobeam \tiny b8*1/2 ~ \normalsize } )c*1/2] r4 r2 r
  36   [es8 \type Voice=x \tiny b8*1/2 ~ \normalsize \type Voice=one )c*1/2] r4 r2 r
  37   r2 r r
  38   r4 [a'8--(\< a--] [a-- a-- c-- \!b--] [a--\> fis g \!e]
  39   [es8 { \type Voice=urgnobeam \tiny b8*1/2 ~ \normalsize } )c*1/2] r4 r2 r
  40   r4 [g16( a bes a] [g a bes a g a bes a] [g a bes a g fis es fis]
  41   )d4 \tiny fis8*1/2 ~ \normalsize gis4*3/4 ~ gis8 r r4 r2
  42   r4 [g16( a bes a] [g a bes a g a bes a] [g a bes a g fis es fis]
  43   )d4 \tiny fis8*1/2 ~ \normalsize gis4*3/4 ~ gis8 r r4 r2
  44   \tiny a8*1/2 ~ \normalsize f4*3/4 ~ f8 r r2 r
  45   r2 r4 [a8( b][c d c b] \tiny b8*1/2 ~ \normalsize [e8*1/2
  46   { \type Voice=urgnobeam \tiny a,8*1/2 ~ \normalsize } )g8*1/2] r4 r2 r
  47   r2 r4 [a8( b][c d c b] [a b c d][c b a b][c d c b]
  48   \tiny b8*1/2 ~ \normalsize [e8*1/2
  49   { \type Voice=urgnobeam \tiny a,8*1/2 ~ \normalsize } )g8*1/2] r4 r2 r
  50   a2( \tiny e'8*1/2 ~ \normalsize f4*3/4 ~ )f8 r r2
  51   r2 r r
  52   fis,4( \tiny dis8*1/2 \normalsize <)cis4*3/4 ais> r2 r
  53   \tiny b'8*1/2 ~ \normalsize [a8*1/2
  54   { \type Voice=urgnobeam \tiny b8*1/2 ~ \normalsize } a8*1/2] r4 r2 r
  55   r4 [a'8--(\< a--] [a-- a-- c-- \!b--] [a--\> fis g \!e]
  56   [es8 { \type Voice=urgnobeam \tiny b8*1/2 ~ \normalsize } )c*1/2] r4 r2 r
  57   d,4( \tiny fis8*1/2 ~ \normalsize gis4*3/4 ~ )gis8 r r4 r2
  58   f4 ~ f8 r r2 r
  59   [f'8( g a b][a g f g][a b a g]
  60   \tiny f8*1/2 ~ \normalsize [g8*1/2
  61   { \type Voice=urgnobeam \tiny d8*1/2 ~ \normalsize } )e8*1/2] r4 r2 r
  62   [f8( g a b][a g f g][a b a g]
  63   \tiny f8*1/2 ~ \normalsize [g8*1/2
  64   { \type Voice=urgnobeam \tiny d8*1/2 ~ \normalsize } )e8*1/2] r4 r2 r
  65   a,2( \tiny e'8*1/2 ~ \normalsize f4*3/4 ~ )f8 r r2
  66   r2 r r
  67   fis,4( \tiny dis8*1/2 \normalsize <)cis4*3/4 ais> r2 r
  68   <e1 g b e> ~ <e g b e>
  69 }
  70
  71 basloopje = \notes\relative c{
  72   d,8( a' d f a d f d a f d )a
  73 }
  74
  75 bassbeam = \notes{
  76   [s2] [s8 \translator Staff=treble s s s] [\translator Staff=bass s2]
  77 %   [s2] [s2] [s2]
  78 }
  79
  80 lower = \type Voice=two \notes \relative c{
  81   \stemdown
  82   \property Staff.slurydirection = 1
  83
  84   % snapnie, hoevaak relative c heeft ze nodig?
  85   < \notes\relative c \basloopje \bassbeam >
  86   < \notes\relative c \basloopje \bassbeam >
  87   < \notes\relative c \basloopje \bassbeam >
  88   < \transpose bes \notes\relative c{ \basloopje } \bassbeam >
  89   < \transpose bes \notes\relative c{ \basloopje } \bassbeam >
  90   < \notes\relative c \basloopje \bassbeam >
  91   < \transpose bes \notes\relative c{ \basloopje } \bassbeam >
  92   < \transpose bes \notes\relative c{ \basloopje } \bassbeam >
  93   < \transpose a \notes\relative c{ \basloopje } \bassbeam >
  94   < \transpose bes \notes\relative c{ \basloopje } \bassbeam >
  95   < \transpose a \notes\relative c{ \basloopje } \bassbeam >
  96   < \notes\relative c \basloopje \bassbeam >
  97   < \notes\relative c \basloopje \bassbeam >
  98   % huh? d'
  99   < \transpose d' \notes\relative c{ \basloopje } \bassbeam >
 100   < \notes\relative c \basloopje \bassbeam >
 101   < \notes\relative c \basloopje \bassbeam >
 102   < \transpose d' \notes\relative c{ \basloopje } \bassbeam >
 103   < \notes\relative c \basloopje \bassbeam >
 104   < \notes\relative c \basloopje \bassbeam >
 105   < \transpose e' \notes\relative c{ \basloopje } \bassbeam >
 106   < \notes\relative c \basloopje \bassbeam >
 107   < \notes\relative c \basloopje \bassbeam >
 108   < \transpose bes \notes\relative c{ \basloopje } \bassbeam >
 109   < \transpose a \notes\relative c{ \basloopje } \bassbeam >
 110   < \notes\relative c \basloopje \bassbeam >
 111   < \notes\relative c \basloopje \bassbeam >
 112   < \transpose d' \notes\relative c{ \basloopje } \bassbeam >
 113   < \notes\relative c \basloopje \bassbeam >
 114   < \transpose d' \notes\relative c{ \basloopje } \bassbeam >
 115   < \notes\relative c \basloopje \bassbeam >
 116   < \notes\relative c \basloopje \bassbeam >
 117   < \transpose e' \notes\relative c{ \basloopje } \bassbeam >
 118   < e1 b' e> ~ < e b' e>
 119 }
 120
 121 \score {
 122     \type GrandStaff <
 123       \type Staff = treble <
 124         \global
 125         \upper
 126       >
 127       \type Staff = bass <
 128         \global
 129         \clef bass;
 130         \lower
 131       >
 132     >
 133
 134   \paper {
 135     gourlay_maxmeasures = 4.;
 136     indent = 8.\mm;
 137     textheight = 295.\mm;
 138
 139     % no slur damping
 140     slur_slope_damping = 100.0;
 141
 142     %hmm
 143 %    \translator { \BarNumberingScoreContext }
 144 %    \translator { \BarNumberingStaffContext }
 145 %  \translator{ \OrchestralScoreContext }
 146     \translator{ \OrchestralScoreContext }
 147     \translator{
 148       \GrandStaffContext
 149       minVerticalAlign = 3.0*\staffheight;
 150       maxVerticalAlign = 3.0*\staffheight;
 151       % don't display bars?
 152       % hmm, this switches something else...
 153   %    barAlways = 0.;
 154     }
 155     \translator{
 156       \StaffContext
 157 % hmm, i don't want bars
 158 % but i do want the staffs to be connected
 159 %      \remove "Bar_engraver";
 160       \remove "Time_signature_engraver";
 161     }
 162   }
 163 %  \header{
 164 %         opus = "BWV 847";
 165 %  }
 166
 167   \midi {
 168     \tempo 4 = 54;
 169   }
 170 }
 171
 172 % EOF