1\version "2.19.22" 2 3\header { 4texidoc = "Postfix functions for custom crescendo text spanners. The spanners 5should start on the first note of the measure. One has to use -\mycresc, 6otherwise the spanner start will rather be assigned to the next note." 7} 8 9% Two functions for (de)crescendo spanners where you can explicitly give the 10% spanner text. 11mycresc = #(define-music-function (mymarkup) (string?) 12 (make-music 'CrescendoEvent 'span-direction START 13 'span-type 'text 'span-text mymarkup)) 14mydecresc = #(define-music-function (mymarkup) (string?) 15 (make-music 'DecrescendoEvent 'span-direction START 16 'span-type 'text 'span-text mymarkup)) 17 18\relative { 19 c'4-\mycresc "custom cresc" c4 c4 c4 | 20 c4 c4 c4 c4 | 21 c4-\mydecresc "custom decresc" c4 c4 c4 | 22 c4 c4\! c4 c4 23} 24 25 26 27