2 filename = "praeludium-fuga-E.ly";
3 title = "praeludium and fuga in E-major";
5 composer = "Johann Sebastian Bach (1685-1750)";
7 copyright = "public domain";
12 Praeludium 3 bar excerpt,
13 2nd fuga transposed subject -- 4 bar excerpt.
14 We try to imitate the Griepenkerl/Keller edition which
15 gives the best approximation to Bach's original layout
20 purpose of this file is testing:
21 * real-life collisions
22 * multi-voice input --- splitting?
30 praeludium_commands = \notes {
35 praeludium_right = \notes {
39 % 13 -- how to type -- where to split -- this more neatly?
41 \context Voice = I \relative c'' { \stemup r4 dis4 e4. e8 ~ |
42 \shifton e4 [d8 fis8] \shiftoff gis4 ~ [gis8 fis16 e ] |
43 fis4 ~ [fis8 e16 dis] e4 r8 e8 }
44 \context Voice = III \relative c'' { \stemup \shifton r4 bis cis \shiftoff cis |
45 a' ~ [a16 gis a b] \shifton dis,4 cis ~ |
46 [cis8 dis16 ais] bis4 cis r8 b }
47 \context Voice = IV \relative c'' {
51 this is a diversion from the Griepenkerl/Keller
52 edition; a hack to avoid collisions
57 \context Voice = II \relative c' { \stemdown
60 r4 fis \shiftoff gis gis |
67 praeludium_left = \notes \relative c {
73 \context VoiceTwo { r4 }
74 \context VoiceOne { \stemup s4 dis' cis cis ~ |
75 [cis8 a d cis] [bis gis] cis4 |
77 \context VoiceOne { \stemup bis2 }
78 \context VoiceThree { \stemup \shifton r4 gis ~ [gis8 gis] ~ \stemdown \shiftoff gis4 |
81 % { \stemup \shifton s4 fis4 e}
82 % a quick hack to avoid some collisons
83 \context VoiceFour { \stemdown \shifton s4 fis4 e}
84 \context VoiceTwo { \stemdown s4 dis4 cis4 }
89 praeludium_pedal = \notes \relative c{
94 r4 fis,4-\ltoe e4.-\lheel e'8-\rheel |
95 fis4.-\rtoe fis8-\rtoe fis4-\rtoe [e8-\ltoe a-\rtoe] |
96 dis,4-\ltoe gis-\rtoe [cis,8-\ltoe b!-\lheel ais-\rtoe gis-\ltoe] |
101 fugaII_commands = \notes{
106 fugaII_right = \notes \relative c'' {
112 \context Voice = VA { \stemup [b8 fis8] b4 }
113 \context Voice = VB { \stemdown fis2 }
115 %{ this chord is usually set like this:
124 { \stemup \shiftoff e4 }
125 { \stemup \shifton cis }
126 { \stemup \shifton ais }
131 \context VoiceOne { dis2 dis4 |
134 \context VoiceThree { \stemup \shifton [b8 fis] b2 ~ |
137 \context VoiceTwo { \stemdown fis2. ~ |
144 fugaII_left = \notes {
150 \context VoiceTwo { \stemdown b2 \stemup ais4 |
152 \context VoiceTwo { \stemdown s2 e4 |
160 fugaII_pedal = \notes \relative c {
165 dis4.-\ltoe e8-\rtoe cis4 |
166 b4.-\lheel [cis8-\ltoe dis8-\rtoe e8-\rheel] |
167 fis4.-\rtoe [e8-\rheel dis8-\rtoe cis8-\ltoe] |
168 dis4-\rtoe e4-\rheel e,4-\ltoe |
172 breakmusic = \notes {
178 % these should be two separate scores...
181 \context PianoStaff <
182 \context Staff = treble {
183 \praeludium_right \breakmusic \fugaII_right }
184 \context Staff = bass {
185 \praeludium_left \breakmusic \fugaII_left }
187 \context Staff = pedal {
188 \praeludium_pedal \breakmusic \fugaII_pedal }
222 \translator { \OrchestralScoreContext }