Oups, you're right Andrew, I think I missplaced the arrow, silly me !!
So here again :
\version "2.18.2"
zzTail = {
<>
-\tweak extra-offset #'(-0.5 . 3)
-\markup {
\with-dimensions #'(0 . 4.5) #'(0 . 0)
\path #0.2 #'(
(moveto -0.5 -1.5)
(lineto 0.5 0.5)
(lineto 1.5 -1.5)
(lineto 2.5 0.5)
(lineto 3.5 -1.5)
(lineto 4.5 0.5))
}
}
hArrowTempo =
#(define-music-function
(parser location noteVal tempoVal)
(string? string?)
#{
\tempo
\markup {
\raise #0.5 \note $noteVal #UP \normal-text { "=" $tempoVal }
\raise #0.7
\concat {
\override #'(thickness . 1.4)
\draw-line #'(2.5 . 0)
\hspace #-.6
\arrow-head #X #RIGHT ##f
}
}
#})
\relative g' {
\key g\minor
\omit Stem
\hArrowTempo "4" "60"
\set Score.tempoWholesPerMinute = #(ly:make-moment 60/4)
g g g g
\zzTail
s
}
Cheers,
Pierre
2015-03-19 11:02 GMT+01:00 Andrew Bernard <andrew.bern...@gmail.com>:
> For the tempo marking with an arrow, a possibility is:
>
> \version "2.19.17"
>
> \relative c'' {
> c^\markup {
> \note #"4" #UP = 60
> \override #'(thickness . 3)
> \override #'(line-join-style . bevel)
> \raise #1
> \path #0.3 #'((moveto 0 0) (lineto 4 0) (closepath))
> \hspace #-1
> \raise #1
> \arrow-head #X #RIGHT ##t
> }
> b a g
> }
>
> This avoids postscript and uses the native lilypond markup graphics
> commands. Hopefully self-explanatory.
>
>
> Andrew
>
>
> _______________________________________________
> lilypond-user mailing list
> lilypond-user@gnu.org
> https://lists.gnu.org/mailman/listinfo/lilypond-user
>
>
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
