]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/trip.ly
release: 1.3.133
[lilypond.git] / input / trip.ly
index 2e0f75403b60d81c7bfa7c2b7dcb44606e2b6bc0..53b5cb9cded928c3cb5c7224c7c3f1b3a2fac9b3 100644 (file)
@@ -11,71 +11,73 @@ basic faults in lily, this file will not run correctly.
 
 TODO:
 
-* repeats.
+* autochange.
 
 * tremolo
 
+* lyrics.
+
 %}
 
-\version "1.3.59";
-praeludiumRight =  \notes {
+\version "1.3.117";
+praeludiumRight =   \notes {
    \key e \major;
   \clef violin;
 
   % 13 -- how to type -- where to split -- this more neatly?
   \context Staff <
-    \context Voice = I \relative c'' { \stemup r4 dis4 e4. e8 ~ |
-      \shifton e4-.-^^\f [d8 fis8] \shiftoff gis4 ~ [gis8 fis16 e ] |
+    \context Voice = I \relative c'' { \stemUp r4 dis4 e4. e8 ~ |
+      \shiftOn e4-.-^^\f [d8 fis8] \shiftOff gis4 ~ [gis8 fis16 e ] |
       fis4 ~ [fis8 e16 dis] e4 r8 e8 }
-    \context Voice = III \relative c'' { \stemup \shifton r4 bis cis \shiftoff cis |
-      a' ~ [a16 gis a b] \shifton dis,4 cis ~ |
+    \context Voice = III \relative c'' { \stemUp \shiftOn r4 bis cis \shiftOff cis |
+      a' ~ [a16 gis a b] \shiftOn dis,4 cis ~ |
       [cis8 dis16 ais] bis4 cis r8 b }
     \context Voice = IV \relative c'' {
-      \stemdown
-      \shifton s4 gis }
+      \stemDown
+      \shiftOn s4 gis }
       
-    \context Voice =  II \relative c' { \stemdown
-%      \shifton       % idem
+    \context Voice =  II \relative c' { \stemDown
+%      \shiftOn       % idem
 
-      r4 fis \shiftoff gis gis |
+      r4 fis \shiftOff gis gis |
       a4. cis8 gis2 |
       fis4 gis gis r8 e8 }
   > |
   % 16
 }
 
-praeludiumLeft = \notes \relative c {
+praeludiumLeft =  \notes \relative c {
    \key e \major;
   \clef bass;
 
   % 13
   \context Staff <
     \context Voice = two { r4 }
-    \context Voice = one { \stemup s4 dis' cis cis ~ |
+    \context Voice = one { \stemUp s4 dis' cis cis ~ |
     \times 4/5
       {  [cis8 ( cis
 
-      a \translator Staff = treble  \stemdown \shifton d
+      a \translator Staff = treble  \stemDown \shiftOn d
          )
 
       cis] }
       \translator Staff = bass 
-      \shiftoff
+      \shiftOff
       [bis gis] cis4 |
       dis2 cis4 r8 cis }
-    \context Voice = one { \stemup bis2 }
+    \context Voice = one { \stemUp bis2 }
     \context Voice = three {
-    \property Voice.dynamicDirection  = \down
-    \stemup \shifton r4 gis ~ [gis8
+    \property Voice.DynamicLineSpanner \override #'direction  = #-1
+    \stemUp \shiftOn r4 gis ~ [gis8
       \<
 
-     gis] ~ \stemdown \shiftoff gis4 |
+     gis] ~ \stemDown \shiftOff gis4 |
      a4. fis8
        \!
      gis4. a8 ~ |
      a4 gis4 gis r8 gis }
-    \context Voice = four { \stemdown \shifton s4 fis4 e}
-    \context Voice = two { \stemdown s4 dis4 cis4 }
+    \context Voice = four { \stemDown \shiftOn s4 fis4 e}
+    \context Voice = two { \stemDown s4 dis4 cis4 }
   > |
   %16
 }
@@ -83,37 +85,37 @@ praeludiumLeft = \notes \relative c {
 
 
 
-fugaIIRight = \notes   \relative c''   {
+fugaIIRight =  \notes   \relative c''   {
   \key e \major;              % E-major
   \clef violin;
   \time3/4;
 
   %15
   \context Staff <
-    \context Voice = VA { \stemup [b8 fis8] b4 }
-    \context Voice = VB {  \stemdown fis2 }
+    \context Voice = VA { \stemUp [b8 fis8] b4 }
+    \context Voice = VB {  \stemDown fis2 }
   >
 
   \context Staff \notes\relative c''<
        \context Voice=one {
-         \property Voice.horizontalNoteShift=0
-         \property Voice.verticalDirection=1 
-         e4 
+       \shiftOff
+       \stemUp
+         e4 -5
        }
        \context Voice=two {
-         \property Voice.verticalDirection=1 
-         \property Voice.horizontalNoteShift=1
-         cis
+         \shiftOn
+         \stemUp
+         cis-4
        }
        \context Voice=three {
-         \property Voice.horizontalNoteShift=2
-         \property Voice.verticalDirection=1 
-         ais
+         \shiftOnn
+         \stemUp
+         ais-3 
        }
        \context Voice=four {
-         \property Voice.verticalDirection=-1 
-         \property Voice.horizontalNoteShift=-1
-         fis
+         \shiftOnnn
+         \stemUp
+         fis-2
        }
   >
 
@@ -122,44 +124,40 @@ fugaIIRight = \notes   \relative c''   {
       \context Voice = one {  dis2 dis4 |
       cis2 cis4 |
       b4. [cis8 dis e] }
-    \context Voice = three {  \stemup \shifton [b8 fis] b2 ~ |
+    \context Voice = three {  \stemUp \shiftOn [b8 fis] b2 ~ |
       [b8 a!16 gis] a2 ~ |
       a4 gis2 }
-    \context Voice = two {  \stemdown fis2. ~ |
+    \context Voice = two {  \stemDown fis2. ~ |
       fis ~ |
       fis4 e2 }
   > |
   %19
 }
 
-gracetest = \notes \grace { [c16 ( cis dis] }
+gracetest =  \notes \grace { [c16 ( cis dis] }
 
-fugaIILeft = \notes {
+fugaIILeft =  \notes {
   \key e \major;
   \clef bass;
 
   %15
   \context Staff < 
-    \context Voice = one { \stemdown
+    \context Voice = one { \stemDown
     \gracetest
-    \relative b, < )b2 dis fis a b cis dis> \stemup ais4 |
+    \relative b, < )b2 dis fis a b cis dis> \stemUp ais4 |
       b2 b4 }
-    \context Voice = two { \stemdown s2 e4 |
+    \context Voice = two { \stemDown s2 e4 |
       fis2 fis4 }
   >
-  \stemboth cis2 [e16( fis a \clef "treble"; b] |
+  \stemBoth cis2 [e16( fis a \clef "treble"; b] |
   d'4 ) b8 b8 b4 |
   %19
 }
 
-fugaIIPedal = \notes \relative c {
+fugaIIPedal =  \notes \relative c {
   \key e \major;
   \clef bass;
 
-  %15
-  %
-  % TODO: the volta typesetting should spread over the complete score.
-  %
   \repeat "volta" 2 { dis4.-\ltoe } \alternative { e8-\rtoe cis4 } |
   b4.-\lheel [cis8-\ltoe dis8-\rtoe e8-\rheel] |
   fis4.-\rtoe [e8-\rheel dis8-\rtoe cis8-\ltoe] |
@@ -180,7 +178,7 @@ fugaIIPedal = \notes \relative c {
 
        \property Score.midiInstrument = "church organ"
         \praeludiumRight 
-        r1 \mark "B";
+        \times 4/3 {  c4 c4 c4 }  \mark "B";
           \fugaIIRight }
       \context Staff = bass {
        \property Staff.instrument = #"left"
@@ -198,16 +196,21 @@ fugaIIPedal = \notes \relative c {
 
   %13
   r4 fis,4-\ltoe e4.-\lheel e'8-\rheel | 
-  fis4.-\rtoe fis8-\rtoe fis4-\rtoe [e8-\ltoe a-\rtoe] | 
+% tie accs: 2nd should get no acc
+f4-\rtoe~ f8
+fis8-\rtoe fis4-\rtoe [e8-\ltoe a-\rtoe] | 
   dis,4-\ltoe gis-\rtoe [cis,8-\ltoe
     (
-     b!-\lheel ais-\rtoe gis-\ltoe ~ ] |
-      gis8  r4.
+     b!-\lheel ais-\rtoe g-\ltoe ~ ] |
+
+% tie should generate acc.
+\break
+      g  r4.
     )
       c2^^^-^\f 
  \time 3/4;
 
-  \fugaIIPedal }
+  \fugaIIPedal \bar "|." ; }
       
     >
   >