input/lsr/vertical-line-as-a-baroque-articulation-mark.ly

   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.
   3 \version "2.12.3"
   4
   5 \header {
   6   lsrtags = "expressive-marks, ancient-notation"
   7
   8   texidoc = "
   9 This short vertical line placed above the note is commonly used in
  10 baroque music.  Its meaning can vary, but generally indicates notes
  11 that should be played with more \"weight\".  The following example
  12 demonstrates how to achieve such a notation.
  13
  14 "
  15   doctitle = "Vertical line as a baroque articulation mark"
  16 } % begin verbatim
  17
  18 upline =
  19 #(let* ((m (make-music 'ArticulationEvent
  20                        'articulation-type "stopped"
  21                        'direction 1)))
  22    (ly:music-set-property! m 'tweaks
  23      (acons 'font-size 3
  24        (acons 'text (markup
  25                    #:postscript "
  26                         .15 setlinewidth
  27                         0 -1 0 1.5 lineto
  28                         stroke")
  29          (acons 'stencil ly:text-interface::print
  30            (ly:music-property m 'tweaks)))))
  31    m)
  32
  33
  34 \relative c' {
  35   a'^\upline a( c a)
  36 }