%---------------------------------------------------------------- % _ _ _ _ % | | (_) |_ _ _ __ ___ _ __ __| | % | | | | | | | | '_ \ / _ \| '_ \ / _` | % | |___| | | |_| | |_) | (_) | | | | (_| | % |_____|_|_\\__, | .__/ \___/|_| |_|\__,_| % |___/|_| % % This is a Lilypond source code file. For more information % about the Lilypond music typesetting program, visit % % http://lilypond.org % % The code in this source file is released under % a GPLv3 license. For licensing information visit % % http://www.gnu.org/licenses/quick-guide-gplv3 % %---------------------------------------------------------------- \version "2.18.0" \header { tagline = "" % removed } \paper { #(set-paper-size "letter") ragged-last-bottom = ##t } #(ly:set-option 'point-and-click #f) #(set-global-staff-size 32) nct = \finger \markup \teeny {\fontsize #-3 "x"} Prefix = \markup { %% uncomment/comment these lines for C, C slashed, B or B slashed prefix : %\roman C \combine \roman C \translate #'(0.65 . -0.25) \override #'(thickness . 1.2) \draw-line #'(0 . 1.8) %\roman B %\combine \roman B \translate #'(0.65 . -0.25) \override #'(thickness . 1.2) \draw-line #'(0 . 1.8) %%%%%%%%%%%% \hspace #0.2 } startBarre = #(define-event-function (parser location str) (string?) (let* ((mrkp (markup #:upright #:concat (str " ")))) (define (width grob text-string) (let* ((layout (ly:grob-layout grob)) (props (ly:grob-alist-chain grob (ly:output-def-lookup layout 'text-font-defaults)))) (interval-length (ly:stencil-extent (interpret-markup layout props (markup text-string)) X)))) #{ \tweak TextSpanner.after-line-breaking #(lambda (grob) (let* ((mrkp-width (width grob mrkp)) (line-thickness (ly:staff-symbol-line-thickness grob))) (ly:grob-set-nested-property! grob '(bound-details left padding) (+ (/ mrkp-width -4) (* line-thickness 2))))) \tweak TextSpanner.font-size -2 \tweak TextSpanner.style #'line \tweak TextSpanner.bound-details.left.text #mrkp \tweak TextSpanner.bound-details.left.padding 0.25 \tweak TextSpanner.bound-details.left.attach-dir -1 \tweak TextSpanner.bound-details.left-broken.text ##f \tweak TextSpanner.bound-details.left-broken.attach-dir -1 %% adjust the numeric values to fit your needs: \tweak TextSpanner.bound-details.left-broken.padding 1.5 \tweak TextSpanner.bound-details.right-broken.padding 0 \tweak TextSpanner.bound-details.right.padding 0.25 \tweak TextSpanner.bound-details.right.attach-dir 2 \tweak TextSpanner.bound-details.right-broken.text ##f \tweak TextSpanner.bound-details.right.text \markup \draw-line #'(0 . 0) \startTextSpan #})) stopBarre = \stopTextSpan %% Syntax: note \startBarre #'fret_number' note(s) \stopBarre global = { \time 3/4 % \numericTimeSignature \key c \major \set Staff.midiInstrument = "piano" %\override Score.MetronomeMark #'padding = #3.8 \override Staff.TimeSignature #'stencil = ##f \override TextSpanner.bound-details.left.stencil-align-dir-y = #CENTER %\set Timing.beamExceptions = #'() %\set Timing.baseMoment = #(ly:make-moment 1/4) %\set Timing.beatStructure = #'(1 1 1 1) \override HorizontalBracket.thickness = #2 \override HorizontalBracket #'direction = #UP } melody = \relative c'' { \global \voiceOne e16( g f e d c b c a cis d e) \override Slur.extra-offset = #'(0.0 . 1.6) \override TextScript.extra-offset = #'(1.0 . -1.6) f16(^\markup \tiny {"Sequence."} a g f e d c d b d e f g) c,(^\markup \tiny {"Seq."} d e f) a,(^\markup \tiny {"Seq."} b c d) e f g e a,(^\markup \tiny {"Seq."} b c d fis,\nct gis a b c d e) c e,(^\markup \tiny {"Seq."} fis g! a b c d b) d g f! e f e d c2 \bar "||" } middle = { } bass = \relative c' { \voiceTwo c4 e \once \override TextScript.extra-offset = #'(1.0 . 2.0) f_\markup \tiny {"Ex. 95 (6)"} d f g e d b \once \override TextScript.extra-offset = #'(2.2 . 2.0) c_\markup \tiny {"A minor."} b gis a_\markup \tiny {"G major."} fis g8 b c2. } %%%%%%%%%%%%%%%%%%%%%%%%%% SCORE BLOCK %%%%%%%%%%%%%%%%%%%%%% \score { \context Staff = "guitar" \with { \consists "Span_arpeggio_engraver" } << \set Staff.midiInstrument = "piano" \set Staff.connectArpeggios = ##t \numericTimeSignature \set Staff.instrumentName = \markup \center-column { Ex. "98." } \context Voice = "melody" \with { \consists "Horizontal_bracket_engraver" } \melody %\context Voice = "middle" \middle \context Voice = "bass" \with { \consists "Horizontal_bracket_engraver" } \bass >> \layout { \context { \Score \remove "Bar_number_engraver" } } \midi { \tempo 4 = 50 } }