%% Do not edit this file; it is auto-generated from LSR http://lsr.dsi.unimi.it
%% This file is in the public domain.
-\version "2.11.38"
+\version "2.12.3"
\header {
lsrtags = "tweaks-and-overrides"
- texidoc = "
-The @code{\\applyOutput} command gives you the ability to tune any
-layout object, in any context. It requires a Scheme function with three
-arguments; advanced users can write it quite easily, whereas new users
-may want to use pre-defined functions such as this snippet, or the
-example in the manual.
-" }
-% begin verbatim
-% ****************************************************************
-% ly snippet:
-% ****************************************************************
-\layout {
- ragged-right = ##t
-}
-
-#(define (mc-squared gr org cur)
- (let*
- (
- (ifs (ly:grob-interfaces gr))
- (sp (ly:grob-property gr 'staff-position))
- )
- (if (memq 'note-head-interface ifs)
- (begin
- (ly:grob-set-property! gr 'stencil ly:text-interface::print)
- (ly:grob-set-property! gr 'font-family 'roman)
- (ly:grob-set-property! gr 'text
- (make-raise-markup -0.5
- (case sp
- ((-5) (make-simple-markup "m"))
- ((-3) (make-simple-markup "c "))
- ((-2) (make-smaller-markup (make-bold-markup "2")))
- (else (make-simple-markup "bla"))
- ))))
- )))
+ texidoc = "
+The @code{\\applyOutput} command allows the tuning of any layout
+object, in any context. It requires a Scheme function with three
+arguments.
-\context Voice \relative c' {
- \stemUp
- \set autoBeaming = ##f
+"
+ doctitle = "Changing properties for individual grobs"
+} % begin verbatim
- { <d f g b>8
+#(define (mc-squared grob grob-origin context)
+ (let ((sp (ly:grob-property grob 'staff-position)))
+ (if (grob::has-interface grob 'note-head-interface)
+ (begin
+ (ly:grob-set-property! grob 'stencil
+ (grob-interpret-markup grob
+ (make-lower-markup 0.5
+ (case sp
+ ((-5) "m")
+ ((-3) "c ")
+ ((-2) (make-smaller-markup (make-bold-markup "2")))
+ (else "bla")))))))))
- \applyOutput #'Voice #mc-squared
- <d f g b>
- }
+\relative c' {
+ <d f g b>2
+ \applyOutput #'Voice #mc-squared
+ <d f g b>2
}
-
-% ****************************************************************
-% end ly snippet
-% ****************************************************************