10.04.2013 Views

in Snippets - LilyPond

in Snippets - LilyPond

in Snippets - LilyPond

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

Chords 232<br />

#{<br />

(cons (make-music 'TextSpanEvent 'span-direction -1)<br />

(ly:music-property first-element 'articulations)))<br />

(set! (ly:music-property last-element 'articulations)<br />

(cons (make-music 'TextSpanEvent 'span-direction 1)<br />

(ly:music-property last-element 'articulations))))))<br />

\once \override TextSpanner #'font-size = #-2<br />

\once \override TextSpanner #'font-shape = #'upright<br />

\once \override TextSpanner #'staff-padd<strong>in</strong>g = #3<br />

\once \override TextSpanner #'style = #'l<strong>in</strong>e<br />

\once \override TextSpanner #'to-barl<strong>in</strong>e = ##f<br />

\once \override TextSpanner #'bound-details =<br />

#`((left<br />

(text . ,#{ \markup { \draw-l<strong>in</strong>e #'( 0 . -.5) } #})<br />

(Y . 0)<br />

(padd<strong>in</strong>g . 0.25)<br />

(attach-dir . -2))<br />

(right<br />

(text . ,#{ \markup { \cWithSlash #str } #})<br />

(Y . 0)<br />

(padd<strong>in</strong>g . 0.25)<br />

(attach-dir . 2)))<br />

%% uncomment this l<strong>in</strong>e for make full barred<br />

% \once \override TextSpanner #'bound-details #'left #'text = \markup { "B" #str }<br />

$music<br />

#})<br />

%% %%%%%%% Cut here ----- End 'bbarred.ly'<br />

%% Copy and change the last l<strong>in</strong>e for full barred. Rename <strong>in</strong> 'fbarred.ly'<br />

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%<br />

%% Syntaxe: \bbarre #"text" { notes } - text = any number of box<br />

\relative c'{ \clef "G_8" \stemUp \bbarre #"III" {

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!