input/lsr/expressive/tempo-mark-scheme-function.ly

   1 %%  Do not edit this file; it is auto-generated from LSR!
   2 \version "2.10.12"
   3
   4 \header { texidoc = "
   5 This is a Scheme function which prints a tempo mark such as
   6     Fast (♩= 222)
   7 " }
   8
   9 tempoMark =
  10     #(define-music-function (parser location prependText notevalue appendText) (string? string? string?)
  11         #{
  12             \mark \markup
  13             { \line { $prependText " (" \fontsize #-2 \general-align #Y #DOWN \note #$notevalue #1 $appendText ) } }
  14         #})
  15
  16 theMusic =
  17 {
  18     \once \override Score.RehearsalMark #'self-alignment-X = #-1
  19     \time 4/4 \tempoMark "Fast" "4" "= 220-222" s1
  20 }
  21
  22 \score
  23 {
  24     \theMusic
  25 }