So here you go.
Cheers,
Pierre
(typos possible)
Le jeu. 21 mai 2020 à 19:09, Pierre Perol-Schneider <
pierre.schneider.pa...@gmail.com> a écrit :
> Right, I did that quickly without checking the whole score.
> Also, as I use \fixed, I found it faster to type.
> But again, you're right, it's a single voice.
> Cheers,
> Pierre
>
> Le jeu. 21 mai 2020 à 18:29, Lukas-Fabian Moser <l...@gmx.de> a écrit :
>
>> Hi Pierre,
>>
>> Am 21.05.20 um 15:53 schrieb Pierre Perol-Schneider:
>> >
>> > Here's a template, made as clear as possible, in a fixed mode (no
>> > relative).
>> > (First measures taken from:
>> >
>> https://imslp.simssa.ca/files/imglnks/usimg/9/9b/IMSLP411479-PMLP05948-bach-wtk-ur-1.pdf
>> )
>> >
>> But what's the point in using _both_
>>
>> - \change Staff (which is needed anyway for the cross-staff stem
>> situations)
>>
>> and
>>
>> - two separate voices for the alto voice, which is in reality (so to
>> speak) one single straying voice in search for a staff with a clef
>> suitable for its pitches?
>>
>> Best
>> Lukas
>>
>>
\version "2.20.0"
%\pointAndClickOff <= at the end
#(set-global-staff-size 18.5) % <= maybe a better size ?
rhSoprano = \fixed c' {
| % mes.1
R1
| % mes.2
d'4\rest d'8\rest b cis'4 d'16\rest fis gis ais
| % mes.3
b16 ais b cis' dis' e' fis' dis' b a b cis' b a b cis'
| % mes.4
a16 gis a b a gis a b gis fis gis ais b4~
| % mes.5
4 ais b8 b' dis' fis'
| % mes.6
\shape #'((0 . 0.5) (0 . 1.5) (0 . 1.5) (0 . 0)) Tie
b2~ 8 a? gis e'
| % mes.7
fis'4 d'16\rest b cis' dis' e' dis' e' fis' gis' a' b' gis'
| % mes.8
e'16 dis' e' fis' e' dis' e' fis' dis' cis' dis' e' fis' gis' a'!8~
| % mes.9
1
| % mes.10
s1
| % mes.11
s1
| % mes.12
s1
| % mes.13
s1
| % mes.14
s1
| % mes.15
s1
| % mes.16
s1
| % mes.17
s1
| % mes.18
s1
| % mes.19
s1
| % mes.20
s1
| % mes.21
s1
| % mes.22
s1
| % mes.23
s1
| % mes.24
s1
| % mes.25
s1
| % mes.26
s1
| % mes.27
s1
| % mes.28
s1
| % mes.29
s1
\bar "|."
}
rhAlto = \fixed c' {
| % mes.1
e4\rest e8\rest e fis4 e16\rest b, cis dis
| % mes.2
e16 dis e fis gis a b gis e dis e fis e dis e fis
| % mes.3
dis16 cis dis e fis gis a fis gis8 \change Staff = "LH" \stemUp\tieUp b, e4~
| % mes.4
8 dis
\change Staff = "RH" \stemDown\tieDown
fis4~ 8 b, e dis
| % mes.5
dis2 b,8 e\rest e4\rest
| % mes.6
e8\rest e' gis b e fis4
\change Staff = "LH" \stemUp\tieUp
e8
| % mes.7
e4 dis8
\change Staff = "RH" \stemDown\tieDown
fis
\change Staff = "LH" \stemUp\tieUp
b,4 c'8\rest
\change Staff = "RH" \stemDown\tieDown
b
| % mes.8
cis'4 g16\rest fis gis ais b ais b cis' dis' e' fis' dis'
| % mes.9
s1
| % mes.10
s1
| % mes.11
s1
| % mes.12
s1
| % mes.13
s1
| % mes.14
s1
| % mes.15
s1
| % mes.16
s1
| % mes.17
s1
| % mes.18
s1
| % mes.19
s1
| % mes.20
s1
| % mes.21
s1
| % mes.22
s1
| % mes.23
s1
| % mes.24
s1
| % mes.25
s1
| % mes.26
s1
| % mes.27
s1
| % mes.28
s1
| % mes.29
s1
\bar "|."
}
lhBasse = {
| % mes.1
s1
| % mes.2
s1
| % mes.3
d2\rest b,4\rest b,8\rest e
| % mes.4
fis4 c16\rest b, cis dis e dis e fis gis a! b gis
| % mes.5
e16 dis e fis e dis e fis dis cis dis e fis gis a fis
| % mes.6
gis16 fis gis a b cis' d' b cis' b cis' dis' e' dis' cis' b
| % mes.7
a16 gis a b a gis a b gis8 fis e dis
| % mes.8
cis8 b ais fis b d\rest d4\rest
| % mes.9
s1
| % mes.10
s1
| % mes.11
s1
| % mes.12
s1
| % mes.13
s1
| % mes.14
s1
| % mes.15
s1
| % mes.16
s1
| % mes.17
s1
| % mes.18
s1
| % mes.19
s1
| % mes.20
s1
| % mes.21
s1
| % mes.22
s1
| % mes.23
s1
| % mes.24
s1
| % mes.25
s1
| % mes.26
s1
| % mes.27
s1
| % mes.28
s1
| % mes.29
s1
\bar "|."
}
\paper {
page-count = 2
ragged-last-bottom = ##f
}
\header {
title = "Das wohltemperierte Klavier I"
composer = "Johann Sebastian Bach"
piece = "Fuga IX"
opus = "BWV 854"
instrument = "Piano"
}
\score {
\new PianoStaff <<
\new Staff = RH \with {
%% Possibly:
\override VerticalAxisGroup.staff-staff-spacing.basic-distance = 10
}
<<
\new Voice { \key e\major \voiceOne \rhSoprano }
\new Voice { \key e\major \voiceTwo \rhAlto }
>>
\new Staff = LH { \clef F \key e\major \voiceTwo \lhBasse }
>>
\layout {
indent = 10
system-count = 12
}
\midi {
\tempo 4 = 72
}
}
