input/regression/dynamics-custom-text-spanner-postfix.ly

   1 \version "2.19.22"
   2
   3 \header {
   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."
   7 }
   8
   9 % Two functions for (de)crescendo spanners where you can explicitly give the
  10 % spanner text.
  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))
  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