Deutschsprachiges LilyPond Forum

Vielen Dank, ich werde es ausprobieren.

Grüße Elke

Harm, vielen vielen Dank. Wenn es ein Smiley für eine ganz tiefe Verbeugung gäbe, würde ich es jetzt einfügen.

\version "2.25.80"

mus = \relative {
  c''4 c c c
}

meintext = "Hier ein beliebiger Text"

\paper {
  tagline = ##f
}

meinscore =
%Musikfunktion für transponierbaren Score
#(define-music-function (m p)
   (ly:music? ly:pitch?)
   #{
     <<
       \new PianoStaff
       <<
         \new Staff="up"
         <<
           \new Voice
           {
             \voiceOne
             \key $p \major
             \transpose c $p $m
           }
           \new Voice
           {
             \voiceTwo
             \transpose c' $p $m
           }
         >>
         \new Staff="down"
         <<
           \new Voice
           {
             \clef bass
             \voiceOne
             \key $p \major
             \transpose c' $p $m
           }
           \new Voice
           {
             \voiceTwo
             \transpose c'' $p $m
           }
         >>
       >>
     >>
   #}
   )

\bookpart {
  #(for-each
    (lambda (p)
      (add-score
        (scorify-music (meinscore mus p)))
      (when (and (defined? 'meintext) (markup? meintext))
        (add-text meintext)))
    (music-pitches #{ { c f e } #}))
}

HTH,
  Harm

Ich habe ab und zu den Fall, dass ich nach jedem Score einen Text einfügen möchte. Mit scorify-music geht das natürlich nicht, weil das \markup kein musikalischer Ausdruck ist.

Gibt es eine elegante Möglichkeit? Der Text ist im Code auskommentiert, weil er einen Fehler verursacht.

\version "2.25.80"

mus = \relative {
  c''4 c c c
}

meintext = "Hier ein beliebiger Text"

\paper {

  tagline = ##f
}

meinscore =
%Musikfunktion für transponierbaren Score
#(define-music-function (m p)
   (ly:music? ly:pitch?)
   #{
     <<
       \new PianoStaff
       <<
         \new Staff="up"
         <<
           \new Voice
           {
             \voiceOne
             \key $p \major
             \transpose c $p $m
           }
           \new Voice
           {
             \voiceTwo
             \transpose c' $p $m
           }
         >>
         \new Staff="down"
         <<
           \new Voice
           {
             \clef bass
             \voiceOne
             \key $p \major
             \transpose c' $p $m
           }
           \new Voice
           {
             \voiceTwo
             \transpose c'' $p $m
           }
         >>
       >>
     >>
   #}
   )

\bookpart {
  #(for-each
    (lambda (p)
      (add-score
       (scorify-music #{
         {
           \meinscore \mus
           $p
         }
         %\markup \meintext
                      #} )))
    (music-pitches #{
      {
        c f e
                   } #}
                   ))
}

\version"2.24.2" \language"deutsch" global={}
sopr=\relative{a''b c d e f g h}
alto=\relative{a' b c d e f g h}
teno=\relative{a, b c d e f g h}
bass=\relative{a,,b c d e f g h}
\book{\paper{output-filename="elkeSopr"}\score{ % Midi Sopr
  \unfoldRepeats{
    <<
     \new Voice= "Sopr" {\global\set Staff.midiPanPosition =# 1.00 \sopr}
     \new Voice= "Alto" {\global\set Staff.midiPanPosition =#-1.00 \alto}
     \new Voice= "Teno" {\global\set Staff.midiPanPosition =#-1.00 \teno}
     \new Voice= "Bass" {\global\set Staff.midiPanPosition =#-1.00 \bass}
    >>
    }%\unfold
  \midi{}
  }%\score{ %Midi Sopr
} %book
\book{\paper{output-filename="elkeAlto"}\score{ % Midi Alto
  \unfoldRepeats{
    <<
     \new Voice= "Sopr" {\global\set Staff.midiPanPosition =#-1.00 \sopr}
     \new Voice= "Alto" {\global\set Staff.midiPanPosition =# 1.00 \alto}
     \new Voice= "Teno" {\global\set Staff.midiPanPosition =#-1.00 \teno}
     \new Voice= "Bass" {\global\set Staff.midiPanPosition =#-1.00 \bass}
    >>
    }%\unfold
  \midi{}
  }%\score{ %Midi Alto
} %book
\book{\paper{output-filename="elkeTeno"}\score{ % Midi Teno
  \unfoldRepeats{
    <<
     \new Voice= "Sopr" {\global\set Staff.midiPanPosition =#-1.00 \sopr}
     \new Voice= "Alto" {\global\set Staff.midiPanPosition =#-1.00 \alto}
     \new Voice= "Teno" {\global\set Staff.midiPanPosition =# 1.00 \teno}
     \new Voice= "Bass" {\global\set Staff.midiPanPosition =#-1.00 \bass}
    >>
    }%\unfold
  \midi{}
  }%\score{ %Midi Teno
} %book
\book{\paper{output-filename="elkeBass"}\score{ % Midi Bass
  \unfoldRepeats{
    <<
     \new Voice= "Sopr" {\global\set Staff.midiPanPosition =#-1.00 \sopr}
     \new Voice= "Alto" {\global\set Staff.midiPanPosition =#-1.00 \alto}
     \new Voice= "Teno" {\global\set Staff.midiPanPosition =#-1.00 \teno}
     \new Voice= "Bass" {\global\set Staff.midiPanPosition =# 1.00 \bass}
    >>
    }%\unfold
  \midi{}
  }%\score{ %Midi Bass
} %book
Erzeugt vier midi-Files, bei denen jeweils eine Stimme rechts und alle anderen Stimmen links erklingen.
Natürlich kann man die anderen Stimmen auch weglassen.
Das explizite Anlegen von vier Books ist wegen der Dateinamen nötig (geht vielleicht auch anders), das kann man weglassen, dann werden die Dateien automatisch elke.mid, elke-1.mid, elke-2.mid, elke-3.mid genannt.

Hi,
ich möchte für unseren Chor die Lieder in ChoirStaff-Struktur mit SATB-Voices für jede Stimme setzen. Im Anschluß soll möglichst für jede Stimme eine midi-Datei generiert werden. Ich habe bisher nur gefunden, daß für jede Voice \midi { } in einen \score-Block gesetzt werden soll. So bekomme ich aber nicht unser Notenblatt nicht hin.
Wie kann ich das Problem lösen. Verwende Version 2.24.4
Vielen Dank schonmal für eure Hilfe
Elke

Vielen Dank, Harm, du bist der Beste!

2.24. verwendet guilev2, aktuelle devel-Versionen guilev3. In guilev3 hat der Tiefstrich eine bestimmte Funktion, sodass er nicht wie in 2.24. verwendet werden kann:
Ersetze:
(_ "symbol ~S redefined")durch
(G_ "symbol ~S redefined")
convert-ly hilft hier nicht.

HTH,
  Harm

Danke lieber Rudi. Ich habe bei den Änderungen nachgesehen, aber nix gefunden. Muss wohl nochmals lesen lernen 

Hallo,

die Änderung ist bei den Änderungen zu finden...

Die Funktion wurde umbenannt:
accidental->text-markup
Gruß
Rudi