define-music-function... want to create markups instea of marks

[ze patavinas]

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

________________________________

Free POP3 Email from www.gawab.com

Sign up NOW and get your account @gawab.com!!