1 %% Do not edit this file; it is auto-generated from LSR http://lsr.dsi.unimi.it
2 %% This file is in the public domain.
6 lsrtags = "tweaks-and-overrides"
8 The @code{\\applyOutput} command gives you the ability to tune any
9 layout object, in any context. It requires a Scheme function with three
10 arguments; advanced users can write it quite easily, whereas new users
11 may want to use pre-defined functions such as this snippet, or the
12 example in the manual.
15 % ****************************************************************
17 % ****************************************************************
23 #(define (mc-squared gr org cur)
26 (ifs (ly:grob-interfaces gr))
27 (sp (ly:grob-property gr 'staff-position))
29 (if (memq 'note-head-interface ifs)
31 (ly:grob-set-property! gr 'stencil ly:text-interface::print)
32 (ly:grob-set-property! gr 'font-family 'roman)
33 (ly:grob-set-property! gr 'text
34 (make-raise-markup -0.5
36 ((-5) (make-simple-markup "m"))
37 ((-3) (make-simple-markup "c "))
38 ((-2) (make-smaller-markup (make-bold-markup "2")))
39 (else (make-simple-markup "bla"))
43 \context Voice \relative c' {
45 \set autoBeaming = ##f
49 \applyOutput #'Voice #mc-squared
54 % ****************************************************************
56 % ****************************************************************