<lilypond version="2.24">
\language "english"
%---------------------------------------------------
separ=\markup { \center-align _ }
demimk =\markup \with-dimensions#'(0 . 0) #'(0 . 0) {
\translate #'(-0.8 . -0.3) {
\stencil #(make-circle-stencil 0.5 0 #f)
\translate #'(-0.9 . -0.8) /
}
}
%point black white
pointb = \markup { \stencil #(make-circle-stencil 0.5 0 #t) }
pointw = \markup { \stencil #(make-circle-stencil 0.5 0 #f) }
%thumb wite black demi
thmbw=\markup{ \translate #'(-0.8 . -0.1) \pointw }
thmbb=\markup{ \translate #'(-0.8 . -0.1) \pointb }
thmbd=\markup{ \translate #'(-0.8 . -0.0) \demimk }
%make double-point
dblptbmk=\markup\center-align{ \stencil #(make-circle-stencil 0.35 0 #t) \stencil #(make-circle-stencil 0.35 0 #t) }
dblptwmk=\markup{ \stencil #(make-circle-stencil 0.35 0 #f) \stencil #(make-circle-stencil 0.35 0 #f) }
dblptdmk=\markup{ \stencil #(make-circle-stencil 0.35 0 #t) \stencil #(make-circle-stencil 0.35 0 #f) }
%double point black white demi
dblptb=\markup\center-align{ \dblptbmk }
dblptw=\markup\center-align{ \dblptwmk }
dblptd=\markup\center-align{ \dblptdmk }
%bell pavillon
bell =\markup\with-dimensions#'(0 . 0) #'(0 . 0) {
\scale #'(1.8 . 1.8) \arrow-head #Y #UP ##t
}
libelle=\markup{
\override #'(baseline-skip . 1.80)
\fontsize #-6
\center-column{
\vspace #0.5
"Thumb"
"1"
"2"
"3"
"-"
"4"
"5"
"6"
"7"
}
}
libelleBell=\markup{
\override #'(baseline-skip . 1.80)
\fontsize #-6
\center-column{
\vspace #0.5
"Thumb"
"1"
"2"
"3"
"-"
"4"
"5"
"6"
"7"
"Bell"
}
}
diese=\markup{ \hspace #0.3 \raise #0.5 \sharp }
bemol=\markup{ \hspace #0.3 \raise #0.5 \flat }
%------------------------------------------------
%F / fa
CI=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align\concat { "C" }
\thmbb
\pointb \pointb \pointb
\separ
\pointb \pointb \dblptb \dblptb
\vspace #0.5
}
%F sharp / Fa diese
CsI=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align\concat { "C" \diese }
\thmbb
\pointb \pointb \pointb
\separ
\pointb \pointb \dblptb \dblptd
}
%G / Sol
DI=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align\concat{ "D" }
\thmbb
\pointb \pointb \pointb
\separ
\pointb \pointb \dblptb \dblptw
}
%G sharp / Sol diese
EfI=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align\concat{ "E" \bemol }
\thmbb
\pointb \pointb \pointb
\separ
\pointb \pointb \dblptd \dblptw
}
EI=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align
\concat{ "E" }
\thmbb
\pointb \pointb \pointb
\separ
\pointb \pointb \dblptw \dblptw
}
FI=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "F" }
\thmbb
\pointb \pointb \pointb
\separ
\pointb \pointw \dblptb \dblptb
}
FsI=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "F" \diese }
\thmbb
\pointb \pointb \pointb
\separ
\pointw \pointb \dblptb \dblptw
}
GI=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "G" }
\thmbb
\pointb \pointb \pointb
\separ
\pointw \pointw \dblptw \dblptw
}
GsI=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "G" \diese }
\thmbb
\pointb \pointb \pointw
\separ
\pointb \pointb \dblptd \dblptw
}
AI=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "A" }
\thmbb
\pointb \pointb \pointw
\separ
\pointw \pointw \dblptw \dblptw
}
BfI=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "B" \bemol }
\thmbb
\pointb \pointb \pointw
\separ
\pointw \pointb \dblptb \dblptw
}
BI=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "B" }
\thmbb
\pointb \pointw \pointw
\separ
\pointw \pointw \dblptw \dblptw
}
%----------------
CII=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "C"\super"2" }
\thmbb
\pointw \pointb \pointw
\separ
\pointw \pointw \dblptw \dblptw
}
CsII=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "C"\super"2" \diese }
\thmbw
\pointb \pointb \pointw
\separ
\pointw \pointw \dblptw \dblptw
}
DII=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "D"\super"2" }
\thmbw
\pointw \pointb \pointw
\separ
\pointw \pointw \dblptw \dblptw
}
EfII=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "E"\super"2" \bemol }
\thmbw
\pointw \pointb \pointb
\separ
\pointb \pointb \dblptb \dblptw
}
EII=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "E"\super"2" }
\thmbd
\pointb \pointb \pointb
\separ
\pointb \pointb \dblptw \dblptw
}
FII=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "F"\super"2" }
\thmbd
\pointb \pointb \pointb
\separ
\pointb \pointw \dblptb \dblptw
}
FsII=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "F"\super"2" \diese }
\thmbd
\pointb \pointb \pointb
\separ
\pointw \pointb \dblptw \dblptw
}
GII=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "G"\super"2" }
\thmbd
\pointb \pointb \pointb
\separ
\pointw \pointw \dblptw \dblptw
}
GsII=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "G"\super"2" \diese }
\thmbd
\pointb \pointb \pointw
\separ
\pointb \pointw \dblptw \dblptw
}
AII=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "A"\super"2" }
\thmbd
\pointb \pointb \pointw
\separ
\pointw \pointw \dblptw \dblptw
}
BfII=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "B"\super"2" \bemol }
\thmbd
\pointb \pointb \pointw
\separ
\pointb \pointb \dblptb \dblptw
}
BII=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "B"\super"2" }
\thmbd
\pointb \pointb \pointw
\separ
\pointb \pointb \dblptb \dblptw
}
EII=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "E"\super"2" }
\thmbd
\pointb \pointb \pointw
\separ
\pointb \pointb \dblptw \dblptw
}
%-----------------------------------------
CIII=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "C"\super"3" }
\thmbd
\pointb \pointw \pointw
\separ
\pointb \pointb \dblptw \dblptw
}
CsIII=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "C"\super"3" \diese }
\thmbd
\pointb \pointw \pointb
\separ
\pointb \pointw \dblptb \dblptb \bell
}
DIII=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "D"\super"3" }
\thmbd
\pointb \pointw \pointb
\separ
\pointb \pointw \dblptb \dblptb
}
EfIII=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "E"\super"3" \bemol }
\thmbd
\pointw \pointb \pointb
\separ
\pointw \pointb \dblptb \dblptw
}
EIII=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "E"\super"3" }
\thmbd
\pointw \pointb \pointb
\separ
\pointw \pointb \dblptb \dblptw \bell
}
FIII=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "F"\super"3" }
\thmbd
\pointb \pointb \pointw
\separ
\pointb \pointb \dblptw \dblptw \bell
}
FsIII=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "F"\super"3" \diese }
\thmbd
\pointb \pointb \pointw
\separ
\pointb \pointb \dblptw \dblptw
}
GIII=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "G"\super"3" }
\thmbd
\pointb \pointw \pointw
\separ
\pointb \pointw \dblptw \dblptw
}
GsIII=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "G"\super"3" \diese }
\thmbd
\pointb \pointw \pointw
\separ
\pointb \pointw \dblptw \dblptw \bell
}
AIII=\markup \override #'(baseline-skip . 1.25)
\scale #'(0.8 . 0.8)
\column {
\center-align \concat{ "A"\super"3" }
\thmbd
\pointb \pointw \pointb
\separ
\pointb \pointb \dblptd \dblptw
}
%-========================================
% cut cut cut
% sample for recorder in C
#(set-global-staff-size 28)
\paper {
indent = 0
top-margin = #20
left-margin = 15\mm
system-system-spacing.basic-distance = #25
}
\header {
subsubtitle ="Baroque Recorder in C finguerings "
tagline = ##f
}
\markup \vspace #2
\relative c' {
\cadenzaOn
\override TextScript.padding = #2
<>\tweak X-offset #-8 ^\libelle
c2^\CI cs^\CsI d^\DI ef^\EfI e^\EI f^\FI fs^\FsI g^\GI gs^\GsI a^\AI bf^\BfI b^\BI
\break
\override TextScript.padding = #5
<>\tweak X-offset #-8 ^\libelle
c2^\CII cs^\CsII d^\DII ef^\EfII e^\EII f^\FII fs^\FsII g^\GII gs^\GsII a^\AII bf^\BfII b^\BII
\break
\override TextScript.padding = #7
<>\tweak X-offset #-8
\tweak extra-offset #'(0 . -0.8)
^\libelleBell
\ottava #1
c2^\CIII cs^\CsIII d^\DIII ef^\EfIII e^\EIII f^\FIII fs^\FsIII g^\GIII gs^\GsIII a^\AIII
}
%End sample for recorder in C
</lilypond>
