* ly/chord-modifiers-init.ly:

[lilypond.git] / input / praeludium-fuga-E.ly

diff --git a/input/praeludium-fuga-E.ly b/input/praeludium-fuga-E.ly
index ddab22209a186cd4fa47dddb80dc90a8277ccd27..315139f5d8da7715e4628126ed21479a45920a00 100644 (file)
--- a/input/praeludium-fuga-E.ly
+++ b/input/praeludium-fuga-E.ly
@@ -1,10 +1,11 @@
+\version "1.7.18"
 \header {
-  filename =    "praeludium-fuga-E.ly";
-  title =       "praeludium and fuga in E-major";
-  opus =        "BWV 566";
-  composer =    "Johann Sebastian Bach (1685-1750)";
-  enteredby =   "JCN";
-  copyright =   "public domain";
+  filename =    "praeludium-fuga-E.ly"
+  title =       "praeludium and fuga in E-major"
+  opus =        "BWV 566"
+  composer =    "Johann Sebastian Bach (1685-1750)"
+  enteredby =   "JCN"
+  copyright =   "public domain"
 }
 %{
   description
@@ -22,18 +23,18 @@
    * organ staff...
 %}
 
-\version "1.3.110";
 
 
 
-praeludium_commands = \notes {
-  \time 4/4;
-   \key e \major;
+
+praeludiumCommands =  \notes {
+  \time 4/4
+   \key e \major
 }
 
-praeludium_right =  \notes {
-  \$praeludium_commands
-  \clef violin;
+praeludiumRight =   \notes {
+  \praeludiumCommands
+  \clef violin
 
   % 13 -- how to type -- where to split -- this more neatly?
   \context Staff <
@@ -48,7 +49,7 @@ praeludium_right =  \notes {
       %\stemUp
       %{
       this is a diversion from the Griepenkerl/Keller
-       edition; a hack to avoid collisions
+       edition a hack to avoid collisions
       %}
       \stemDown
       \shiftOn s4 gis }
@@ -63,9 +64,9 @@ praeludium_right =  \notes {
   % 16
 }
 
-praeludium_left = \notes \relative c {
-  \$praeludium_commands
-  \clef bass;
+praeludiumLeft =  \notes \relative c {
+  \praeludiumCommands
+  \clef bass
 
   % 13
   \context Staff <
@@ -85,9 +86,9 @@ praeludium_left = \notes \relative c {
   %16
 }
 
-praeludium_pedal = \notes \relative c{
-  \$praeludium_commands  
-  \clef bass;
+praeludiumPedal =  \notes \relative c{
+  \praeludiumCommands  
+  \clef bass
 
   %13
   r4 fis,4-\ltoe e4.-\lheel e'8-\rheel | 
@@ -97,14 +98,14 @@ praeludium_pedal = \notes \relative c{
 }
 
 
-fugaII_commands = \notes{
-  \time3/4;
-  \key e \major;              % E-major
+fugaIICommands =  \notes{
+  \time3/4
+  \key e \major              % E-major
 }
 
-fugaII_right = \notes   \relative c''   {
-  \$fugaII_commands
-  \clef violin;
+fugaIIRight =  \notes   \relative c''   {
+  \fugaIICommands
+  \clef violin
 
   %15
   \context Staff <
@@ -114,23 +115,23 @@ fugaII_right = \notes   \relative c''   {
 
   \context Staff \notes\relative c''<
        \context Voice=one {
-         \property Voice.horizontalNoteShift=0
-         \property Voice.verticalDirection=1 
+         \property Voice.NoteColumn \override #'horizontal-shift = #0
+         \stemUp\slurUp\tieUp 
          e4 
        }
        \context Voice=two {
-         \property Voice.verticalDirection=1 
-         \property Voice.horizontalNoteShift=1
+         \stemUp\slurUp\tieUp 
+         \property Voice.NoteColumn \override #'horizontal-shift = #1
          cis
        }
        \context Voice=three {
-         \property Voice.horizontalNoteShift=2
-         \property Voice.verticalDirection=1 
+         \property Voice.NoteColumn \override #'horizontal-shift = #2
+         \stemUp\slurUp\tieUp 
          ais
        }
        \context Voice=four {
-         \property Voice.verticalDirection=-1 
-         \property Voice.horizontalNoteShift=-1
+         \stemDown\slurDown\tieDown 
+         \property Voice.NoteColumn \override #'horizontal-shift = #-1
          fis
        }
   >
@@ -150,9 +151,9 @@ fugaII_right = \notes   \relative c''   {
   %19
 }
 
-fugaII_left = \notes {
-  \$fugaII_commands  
-  \clef bass;
+fugaIILeft =  \notes {
+  \fugaIICommands  
+  \clef bass
 
   %15
   \context Staff < 
@@ -166,9 +167,9 @@ fugaII_left = \notes {
   %19
 }
 
-fugaII_pedal = \notes \relative c {
-  \$fugaII_commands  
-  \clef bass;
+fugaIIPedal =  \notes \relative c {
+  \fugaIICommands  
+  \clef bass
 
   %15
   dis4.-\ltoe e8-\rtoe cis4 |
@@ -178,8 +179,8 @@ fugaII_pedal = \notes \relative c {
   %19
 }
 
-breakmusic = \notes { 
-  %\time4/4;
+breakmusic =  \notes { 
+  %\time4/4
   r1
 }
 
@@ -190,12 +191,12 @@ breakmusic = \notes {
     \context PianoStaff <
       \context Staff = treble {
        \property Score.midiInstrument = "church organ"
-        \praeludium_right \breakmusic \fugaII_right }
+        \praeludiumRight \breakmusic \fugaIIRight }
       \context Staff = bass { 
-        \praeludium_left \breakmusic \fugaII_left }
+        \praeludiumLeft \breakmusic \fugaIILeft }
     > 
     \context Staff = pedal {
-      \praeludium_pedal \breakmusic \fugaII_pedal }
+      \praeludiumPedal \breakmusic \fugaIIPedal }
   >
 
   \paper {
@@ -204,5 +205,5 @@ breakmusic = \notes {
   }
 
   \midi {
-    \tempo 4 =96; }
+    \tempo 4 =96 }
 }