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 \type 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 \type 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 \type Voice = IV \relative c'' {
51 this is a diversion from the Griepenkerl/Keller
52 edition; a hack to avoid collisions
57 \type Voice = II \relative c' { \stemdown
60 r4 fis \shiftoff gis gis |
67 praeludium_left = \notes \relative c {
73 \type VoiceOne { \stemup r4 dis' cis cis ~ |
74 [cis8 a d cis] [bis gis] cis4 |
76 \type VoiceOne { \stemup bis2 }
77 \type VoiceThree { \stemup \shifton r4 gis ~ [gis8 gis] ~ \stemdown \shiftoff gis4 |
80 % { \stemup \shifton s4 fis4 e}
81 % a quick hack to avoid some collisons
82 \type VoiceFour { \stemdown \shifton s4 fis4 e}
83 \type VoiceTwo { \stemdown s4 dis4 cis4 }
88 praeludium_pedal = \notes \relative c{
93 r4 fis,4-\ltoe e4.-\lheel e'8-\rheel |
94 fis4.-\rtoe fis8-\rtoe fis4-\rtoe [e8-\ltoe a-\rtoe] |
95 dis,4-\ltoe gis-\rtoe [cis,8-\ltoe b!-\lheel ais-\rtoe gis-\ltoe] |
100 fugaII_commands = \notes{
105 fugaII_right = \notes \relative c'' {
111 { \stemup [b8 fis8] b4 }
114 %{ this chord is usually set like this:
123 { \stemup \shiftoff e4 }
124 { \stemup \shifton cis }
125 { \stemup \shifton ais }
130 \type VoiceOne { dis2 dis4 |
133 \type VoiceThree { \stemup \shifton [b8 fis] b2 ~ |
136 \type VoiceTwo { \stemdown fis2. ~ |
143 fugaII_left = \notes {
149 \type VoiceTwo { \stemdown b2 \stemup ais4 |
151 \type VoiceTwo { \stemdown s2 e4 |
159 fugaII_pedal = \notes \relative c {
164 dis4.-\ltoe e8-\rtoe cis4 |
165 b4.-\lheel [cis8-\ltoe dis8-\rtoe e8-\rheel] |
166 fis4.-\rtoe [e8-\rheel dis8-\rtoe cis8-\ltoe] |
167 dis4-\rtoe e4-\rheel e,4-\ltoe |
171 breakmusic = \notes {
177 % these should be two separate scores...
181 \type Staff = treble {
182 \praeludium_right \breakmusic \fugaII_right }
184 \praeludium_left \breakmusic \fugaII_left }
186 \type Staff = pedal {
187 \praeludium_pedal \breakmusic \fugaII_pedal }