]> git.donarmstrong.com Git - lilypond.git/blobdiff - mutopia/E.Satie/gnossienne-4.ly
patch::: 1.3.140.jcn7
[lilypond.git] / mutopia / E.Satie / gnossienne-4.ly
index f3a510c59be7ff9e7eedd142b939f618222d7f27..e69de29bb2d1d6434b8b29ae775ad8c2e48c5391 100644 (file)
@@ -1,143 +0,0 @@
-\header {
-  filename =    "gnossienne-4.ly";
-  title =       "Gnossienne";
-  subtitle =   "4";
-  composer =    "Erik Satie (1866-1925)";
-  enteredby =   "jcn";
-  copyright =   "Public Domain";
-}
-
-%{
- Tested Features: cross staff auto beams and slurs, grace notes, no bars
-%}
-
-\version "1.3.59";
-
-global = \notes {
-       \key a \minor;
-       \time 6/4;
-       \skip 1.*34;
-       \bar "|.";
-}
-
-melody = \notes\relative c''{
-  \clef violin;
-  \property Voice.verticalDirection = #1
-  \property Voice.graceFraction = #(make-moment 1 4)
-  r2 r r 
-  r2 r r
-  r4 a'8--(\< a--  a-- a-- c-- \!b-- a--\> gis f \!e 
-  es8 \grace b( ))c r4 r2 r
-  r2 r r
-  r4 a'8--(\< a--  a-- a-- c-- \!b-- a--\> gis f \!e 
-  es8 \grace b( ))c r4 r2 r
-  r4 g16( a bes a  g a bes a g a bes a g a bes a g fis es fis 
-  )d4 \grace fis8()gis4 ~ gis8 r r4 r2
-  r4 g16( a bes a  g a bes a g a bes a g a bes a g fis es fis 
-  )d4 \grace fis8()gis4 ~ gis8 r r4 r2
-  \grace a8()f4 ~ f8 r r2 r
-  r2 r4 a8( b c d c b \grace b8()e \grace a,())g r4 r2 r
-  r2 r4 a8( b c d c b  a b c d c b a b c d c b 
-  \grace b8()e \grace a,())g r4 r2 r
-  a2( \grace e'8()f4 ~ )f8 r r2
-  r2 r r
-  fis,4( \grace dis8<)cis4 ais> r2 r
-  \grace b'8()a \grace b()a r4 r2 r
-  r4 a'8--(\< a--  a-- a-- c-- \!b--  a--\> gis f \!e 
-  es8 \grace b())c r4 r2 r
-  d,4( \grace fis8()gis4 ~ )gis8 r r4 r2
-  f4 ~ f8 r r2 r
-  f'8( g a b a g f g a b a g 
-  \grace f8()g \grace d)e r4 r2 r
-  f8( g a b a g f g a b a g 
-  \grace f8()g8 \grace d())e r4 r2 r
-  a,2( \grace e'8() f4 ~ )f8 r r2
-  r2 r r
-  fis,4( \grace dis8<)cis4 ais> r2 r
-  <e1*6/4 g b e> ~ <e g b e>
-}
-
-basloopje = \notes\relative c{
-  d,8( a' d f a d f d a f d )a
-}
-
-accompany = \notes \relative c{
-  % snapnie, hoevaak relative c heeft ze nodig?
-  \notes\relative c \basloopje
-  \notes\relative c \basloopje
-  \notes\relative c \basloopje
-  \transpose bes \notes\relative c{ \basloopje }
-  \transpose bes \notes\relative c{ \basloopje }
-  \notes\relative c \basloopje
-  \transpose bes \notes\relative c{ \basloopje }
-  \transpose bes \notes\relative c{ \basloopje }
-  \transpose a \notes\relative c{ \basloopje }
-  \transpose bes \notes\relative c{ \basloopje }
-  \transpose a \notes\relative c{ \basloopje }
-  \notes\relative c \basloopje
-  \notes\relative c \basloopje
-  % huh? d'
-  \transpose d' \notes\relative c{ \basloopje }
-  \notes\relative c \basloopje
-  \notes\relative c \basloopje
-  \transpose d' \notes\relative c{ \basloopje }
-  \notes\relative c \basloopje
-  \notes\relative c \basloopje
-  \transpose e' \notes\relative c{ \basloopje }
-  \notes\relative c \basloopje
-  \notes\relative c \basloopje
-  \transpose bes \notes\relative c{ \basloopje }
-  \transpose a \notes\relative c{ \basloopje }
-  \notes\relative c \basloopje
-  \notes\relative c \basloopje
-  \transpose d' \notes\relative c{ \basloopje }
-  \notes\relative c \basloopje
-  \transpose d' \notes\relative c{ \basloopje }
-  \notes\relative c \basloopje
-  \notes\relative c \basloopje
-  \transpose e' \notes\relative c{ \basloopje }
-  < e1*6/4 b' e> ~ < e b' e> 
-}
-
-\score{
-       \notes \context PianoStaff <
-               \context Staff=up < 
-                       \global
-                       \context Voice=foo {
-                       \property Voice.verticalDirection = #1
-                       \property Voice.scriptVerticalDirection = #1
-                       \melody 
-                       }
-               >
-               \context Staff=down <
-                       \global
-                       \clef bass;
-                       \autochange Staff \accompany
-               >
-       >
-
-       \paper {
-               gourlay_maxmeasures = 4.;
-               indent = 8.\mm;
-               textheight = 295.\mm;
-
-               % ugly is beautiful
-               slur_beautiful = 5.0;
-
-               \translator{ 
-                       \StaffContext
-                       % don't auto-generate bars: not a good idea: -> no breakpoints
-                       % barAuto = #f
-                       defaultBarType = #""
-                       \remove "Time_signature_engraver";
-
-                       slurVerticalDirection = #1
-                       verticalDirection = #-1
-                       beamAutoEnd = #(make-moment 1 2)
-               }
-       }
-       \midi {
-               \tempo 4 = 54;
-       }
-}
-