Hello,
I'm trying to rewrite a code I have created to make marks to write
markups... I.e: I want to print generate the texts and symbols above each
staff, and not only above the entire system...
But I didn't managed to make define-music function to write markups.
So, while this prints marks without problem:
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
myMark = #(define-music-function (parser location musicI temp) (ly:music?
string?)
          #{
          \mark \markup
          { \line {\vcenter { \huge $temp "..."
      \score {                 % 4th column in line
                \new Staff \with {
                  fontSize = #rhythmMarkCStaffReduce
                  \override VerticalAxisGroup #'Y-extent = #'(0 . 0)  % td
                }
                \relative c' {
                  \stemUp $musicI
                }
                \layout {
                  ragged-right= ##t
                  indent = 0
                  \context {
                    \Staff
            \override TupletNumber #'text =
#tuplet-number::calc-fraction-text
            \override TupletBracket #'bracket-visibility = ##t
                    \remove "Clef_engraver"
            \remove "Staff_symbol_engraver"
                    \remove "Time_signature_engraver"
            \remove "Ledger_line_engraver" }
                }}
}}}
#}
)
<<
\new Staff {
\relative c' {
  \time 5/8
  c8 d e f g
}}
\new Staff {
\relative c' {
  \time 5/8
\myMark {g'4} "60"
  c'8 d e f g
}}
>>
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
If I try to change the myMark code removing  "/mark" I get errors... Is
there a way to create this kind of markup wrapper?
Thanks.
josé henrique


-----------------------------------------------------------------------------------------------------------------------
Send big files for free. Simple steps. No registration.
Visit now http://www.nawelny.com
_______________________________________________
lilypond-user mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to