ly/spanners-init.ly

   1 \version "2.19.29"
   2
   3 "\\=" =
   4 #(define-event-function (id event) (key? ly:event?)
   5   (_i "This sets the @code{spanner-id} property of the following
   6 @var{event} to the given @var{id} (non-negative integer or symbol).
   7 This can be used to tell LilyPond how to connect overlapping
   8 or parallel slurs or phrasing slurs within a single @code{Voice}.
   9 @lilypond[quote,verbatim]
  10 \\fixed c' { c\\=1( d\\=2( e\\=1) f\\=2) }
  11 @end lilypond\n")
  12   (set! (ly:music-property event 'spanner-id) id)
  13   event)
  14
  15 startGroup = #(make-span-event 'NoteGroupingEvent START)
  16 stopGroup = #(make-span-event 'NoteGroupingEvent STOP)
  17
  18
  19 cr = #(make-span-event 'CrescendoEvent START)
  20 decr = #(make-span-event 'DecrescendoEvent START)
  21 enddecr = #(make-span-event 'DecrescendoEvent STOP)
  22 endcr = #(make-span-event 'CrescendoEvent STOP)
  23
  24
  25 startMeasureCount = #(make-span-event 'MeasureCounterEvent START)
  26 stopMeasureCount = #(make-span-event 'MeasureCounterEvent STOP)
  27
  28
  29 startTextSpan = #(make-span-event 'TextSpanEvent START)
  30 stopTextSpan = #(make-span-event 'TextSpanEvent STOP)
  31
  32
  33 startTrillSpan = #(make-span-event 'TrillSpanEvent START)
  34 stopTrillSpan = #(make-span-event 'TrillSpanEvent STOP)
  35
  36
  37 episemInitium = #(make-span-event 'EpisemaEvent START)
  38 episemFinis = #(make-span-event 'EpisemaEvent STOP)
  39
  40
  41 cresc = #(make-music 'CrescendoEvent 'span-direction START 'span-type 'text 'span-text "cresc.")
  42 endcresc =  #(make-span-event 'CrescendoEvent STOP)
  43 dim = #(make-music 'DecrescendoEvent 'span-direction START 'span-type 'text 'span-text "dim.")
  44 enddim =  #(make-span-event 'DecrescendoEvent STOP)
  45 decresc = #(make-music 'DecrescendoEvent 'span-direction START 'span-type 'text 'span-text "decresc.")
  46 enddecresc =  #(make-span-event 'DecrescendoEvent STOP)
  47
  48 % Deprecated functions:
  49 % TODO: DEPRECATED_2_13_19
  50 deprecatedcresc =  {
  51   $(make-event-chord (list cr))
  52   \once \set crescendoText = \markup { \italic "cresc." }
  53   \once \set crescendoSpanner = #'text
  54 }
  55
  56
  57 deprecateddim =  {
  58   $(make-event-chord (list decr))
  59   \once \set decrescendoText = \markup { \italic "dim." }
  60   \once \set decrescendoSpanner = #'text
  61 }
  62
  63 deprecatedenddim =  {
  64   $(make-event-chord (list enddecr))
  65 %  \unset decrescendoText
  66 %  \unset decrescendoSpanner
  67 }
  68
  69 deprecatedendcresc =  {
  70   $(make-event-chord (list endcr))
  71 %  \unset crescendoText
  72 %  \unset crescendoSpanner
  73 }
  74
  75
  76 %%%%%%%%%%%%%%%%
  77
  78 crescTextCresc = {
  79     \set crescendoText = \markup { \italic "cresc." }
  80     \set crescendoSpanner = #'text
  81 }
  82
  83 dimTextDecresc = {
  84     \set decrescendoText = \markup { \italic "decresc." }
  85     \set decrescendoSpanner = #'text
  86 }
  87
  88 dimTextDecr = {
  89     \set decrescendoText = \markup { \italic "decr." }
  90     \set decrescendoSpanner = #'text
  91 }
  92
  93 dimTextDim = {
  94     \set decrescendoText = \markup { \italic "dim." }
  95     \set decrescendoSpanner = #'text
  96 }
  97
  98 crescHairpin = {
  99     \unset crescendoText
 100     \unset crescendoSpanner
 101 }
 102
 103 dimHairpin = {
 104     \unset decrescendoText
 105     \unset decrescendoSpanner
 106 }
 107
 108
 109 sustainOff = #(make-span-event 'SustainEvent STOP)
 110 sustainOn = #(make-span-event 'SustainEvent START)
 111
 112 unaCorda = #(make-span-event 'UnaCordaEvent START)
 113 treCorde = #(make-span-event 'UnaCordaEvent STOP)
 114
 115 sostenutoOn = #(make-span-event 'SostenutoEvent START)
 116 sostenutoOff = #(make-span-event 'SostenutoEvent STOP)
 117
 118 %crescpoco = \set crescendoText = "cresc. poco a poco"
 119 %decresc = \set crescendoText = "decr."
 120 %dim = \set crescendoText = "dim."
 121
 122 newSpacingSection = #(make-event-chord (list (make-music 'SpacingSectionEvent)))
 123
 124 breakDynamicSpan = #(make-music 'BreakDynamicSpanEvent)