1 % DO NOT EDIT this file manually; it is automatically
2 % generated from Documentation/snippets/new
3 % Make any changes in Documentation/snippets/new/
4 % and then run scripts/auxiliar/makelsr.py
6 % This file is in the public domain.
7 %% Note: this file works from version 2.14.0
8 % #!lilypond lcp-extract.ly -*- coding: utf-8; -*-
12 %%% extract for the lilypond documentaton project
15 %% Title: Les cinq pieds
16 %% Composer: David Séverin
18 %% Instrument: Violon Solo
19 %% Dedication: A mon épouse Lívia De Souza Vidal
20 %% Additional: avec l'aide de Krzysztof Wagenaar
24 %% Here by, I, the composer, agree that this extract of my composition
25 %% be in the public domain and can be part of, used and presented in
26 %% the LilyPond Documention Project.
28 %% Statement Date: Octber the 9th, 2008
40 #(set-global-staff-size 15)
46 db = \markup { \musicglyph #"scripts.downbow" }
47 dub = \markup { \line { \musicglyph #"scripts.downbow" " " \musicglyph #"scripts.upbow" } }
48 dubetc = \markup { \line { \musicglyph #"scripts.downbow" " " \musicglyph #"scripts.upbow" "..." } }
50 ub = \markup { \musicglyph #"scripts.upbow" }
51 udb = \markup { \line { \musicglyph #"scripts.upbow" " " \musicglyph #"scripts.downbow" } }
52 udbetc = \markup { \line { \musicglyph #"scripts.upbow" " " \musicglyph #"scripts.downbow" "..." } }
54 fermaTa = \markup \musicglyph #"scripts.ufermata"
56 accel = \markup \tiny \italic \bold "accel..."
57 ritar = \markup \tiny \italic \bold "ritar..."
59 ignore = \override NoteColumn #'ignore-collision = ##t
66 svib = \markup \small "s. vib."
67 pvib = \markup \small "p. vib."
68 mvib = \markup \small "m. vib."
69 sulp = \markup \small "s.p."
70 norm = \markup \small "n."
72 quatre = \markup \teeny "IV"
79 shift = \once \override NoteColumn #'force-hshift = #0.9
80 shifta = \once \override NoteColumn #'force-hshift = #1.2
81 shiftb = \once \override NoteColumn #'force-hshift = #1.4
88 % aniente = "a niente"
89 aniente = \once \override Hairpin #'circled-tip = ##t
96 tupletbp = \once \override Staff.TupletBracket #'padding = #2.25
100 %% Flag [Note Head - Stem]
103 noflag = \once \override Stem #'flag-style = #'no-flag
109 #(define-markup-command (colmark layout props args)
111 (let ((entries (cons (list '(baseline-skip . 2.3)) props)
113 (interpret-markup layout entries
124 ViolinSolo = \relative c' {
128 \set Score.markFormatter = #format-mark-box-numbers
129 \override Score.VoltaBracket #'font-name = #"sans"
130 \override Score.VoltaBracket #'extra-offset = #'(0 . 1)
131 \override SpacingSpanner #'uniform-stretching = ##t
137 r2 ^\markup \colmark { \italic "fatigué" " " \bold "lentement"} r4 r r8
139 { \shift d2 \glissando ^\markup \colmark { \quatre \dubetc \svib } \shifta e1 } \\
140 { d2 \open \mf \< ~ \aniente d1 \! \> r4 r ^\markup \colmark { " " \fermaTa } \! }
146 \set Score.repeatCommands = #'((volta "1) n. 2) s.p."))
148 { \shift d2 \glissando ^\markup \colmark { \quatre \udbetc } \shifta e1 } \\
149 { d2 \open \mf \< ~ d1 \! \> ~ d4 ^\markup \colmark { " " \fermaTa } \! }
151 \set Score.repeatCommands = #'((volta #f))
157 { \shift d2 \glissando ^\markup \colmark { \quatre \dubetc \pvib \norm } \shifta e1 \glissando d2 } \\
158 { d2 \open \mf \< ~ d1 ~ d2 \ff ~ d1 \> ~ d2 ^\markup \colmark { " " " " \svib } ~ d4 \pp}
166 \times 2/3 { d4 ^\markup \colmark { \quatre \db \accel } d d }
167 \times 2/3 { d4 ^\markup \colmark { " " \db " " \sulp } d d }
173 \tupletbp \times 2/3 { d8 \mf \< ^\markup \colmark { \quatre \db \norm } d _\open d }
174 \tupletbp \times 2/3 { d8 ^\markup \colmark { " " \db \sulp } d _\open d }
175 \tupletbp \times 2/3 { d16 ^\markup \colmark { " " \db \norm } d _\open d d d _\open d }
176 d2 \ff ^\markup \colmark { " " \pvib } \>
181 \once \override Beam #'grow-direction = #RIGHT % \featherDurations #(ly:make-moment 2 3)
183 [ d \staccato d \staccato d \staccato d \staccato d \staccato d \staccato d \staccato d \staccato d \staccato]
190 \tupletbp \times 2/3 { d16 ^\markup \colmark { \quatre } d _\open d d d _\open d }
191 \tupletbp \times 2/3 { d8 ^\markup \colmark { " " \db } d _\open d }
192 \tupletbp \times 2/3 { d8 ^\markup \colmark { " " \db " " \sulp } d _\open d }
193 \times 2/3 { d4 ^\markup \colmark { \quatre \db \ritar \norm } d d }
194 \times 2/3 { d4 ^\markup \colmark { " " \db " " \sulp } d d \ppp ~ }
198 d4 ^\markup \colmark { " " " " \pvib \norm }
204 { \shift d2 \glissando ^\markup \colmark { \quatre } \shifta e1 } \\
205 { d2 \open ~ d1 ^\markup \colmark { " " " " \mvib } }
220 \new Staff \ViolinSolo
223 \override Score.Rest #'transparent = ##t
224 \set Score.defaultBarType = "empty"
231 \remove "Time_signature_engraver"
235 \remove "Bar_number_engraver"