4 texidoc = "Postfix functions for custom crescendo text spanners. The spanners
5 should start on the first note of the measure. One has to use -\mycresc,
6 otherwise the spanner start will rather be assigned to the next note."
9 % Two functions for (de)crescendo spanners where you can explicitly give the
11 mycresc = #(define-music-function (mymarkup) (string?)
12 (make-music 'CrescendoEvent 'span-direction START
13 'span-type 'text 'span-text mymarkup))
14 mydecresc = #(define-music-function (mymarkup) (string?)
15 (make-music 'DecrescendoEvent 'span-direction START
16 'span-type 'text 'span-text mymarkup))
19 c'4-\mycresc "custom cresc" c4 c4 c4 |
21 c4-\mydecresc "custom decresc" c4 c4 c4 |