%% Generated by lilypond-book.py %% Options: [alt=[image of music],printfilename,indent=0\mm,texidoc,line-width=160\mm] \include "lilypond-book-preamble.ly" % **************************************************************** % Start cut-&-pastable-section % **************************************************************** \paper { #(define dump-extents #t) indent = 0\mm line-width = 160\mm force-assignment = #"" line-width = #(- line-width (* mm 3.000000)) } \layout { } % **************************************************************** % ly snippet: % **************************************************************** \sourcefilename "/home/lilydev/vc/gub/target/linux-x86/src/lilypond-localhost--home-lilydev-vc-lilypond-master/input/regression/apply-output.ly" \sourcefileline 0 \version "2.12.0" \header { texidoc = "The @code{\applyOutput} expression is the most flexible way to tune properties for individual grobs. Here, the layout of a note head is changed depending on its vertical position. " } #(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 (grob-interpret-markup gr (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")) )))) )))) \new Voice \relative c' { \set autoBeaming = ##f <d f g b>8 \applyOutput #'Voice #mc-squared <d f g b>8 } % **************************************************************** % end ly snippet % ****************************************************************