% have a look at the following score 
% containing lines for kb, tb (in C) and sax (in B)
% see set chordChanges 

\version "2.10.33"

% A4-Papier, oberen Rand verringern
\paper {
        #(set-paper-size "a4")
        top-margin = -0.5\cm
}

% angenehme Höhe der Notenzeilen
#(set-global-staff-size 21)

% Titel, Fußzeile
\header {
        title = "Scheiß Technik"
        composer = "Alex Tantscher"
        arranger = \markup \fontsize #-2 "πQ"
 
% Fußzeile
        tagline = \markup \fontsize #-2 
"Notensatz mit dem freien Programm LilyPond (www.lilypond.org)"
% leere Fußzeile
%       tagline = ##f
}

% Noten der ersten Stimme (Sopran) (eingeschlossen von Schweifklammern)
% \relative c' heißt, der erste Ton ist derjenige, der am nächsten 
% am c' (Mitte der Klaviatur, Violinschlüssel erste untere Hilfslinie) liegt
% \relative heißt, dass ansonsten immer den nächstliegende Ton gemeint ist, 
% mit ' (Apostroph) geht's auch eine Oktave höher (mit zweimal ' zwei) und 
% mit , (Komma) runter
Erste = \relative c' {
% Violinschlüssel
        \clef G
%  
        \key es
% Dur
    \major
% Viervierteltakt
        \time 4/4 
%Noten etwas kleiner machen, damit sie nicht so "fett" sind (in jeder Stimme)
        \set fontSize = #-1
% "normale" Wiederholung (Schweifklammern)
        \repeat "volta" 2 {
        c8 es f g( g) g f es | c' c bes4 r2 | 
        c,8 es f g g( g) f es | f f es4 r2 | 
        c8 es f g( g) g f es | c' c bes4 r2 |
        \break
        es8 c es c r4 bes8 g | bes g r bes b c r4 |  
        }
                \alternative {
                        {r r8 es, d c( c4) }  {r r8 es d c( c4) }
                }
        s1 | s1 | 
}

Harmonien = { 
        \repeat "volta" 2 {
        \chordmode {c1:m7 c:m7 c:m7 c:m7 c:m7 c:m7 c:m7 c:m7}
        } 
        \alternative {
        {\chordmode {
        c:m7} }
        {\chordmode {
        c2:m7( c8:m7) as4.:7}}
        }
        \chordmode {
        as2:7 bes:6 | c1:m7 | 
        }
}

Zweite = \relative c' {
% Violinschlüssel
        \clef G
%  
        \key es
% Dur
    \major
% Viervierteltakt
        \time 4/4 
%Noten etwas kleiner machen, damit sie nicht so "fett" sind (in jeder Stimme)
        \set fontSize = #-1
% "normale" Wiederholung (Schweifklammern)
        \repeat "volta" 2 {
        r1 |
        c8 es f g( g) g f es | c' c bes4 r2 | 
        c,8 es f g g( g) f es | f f es4 r2 | 
        r1 |
        \break
        g8 as g as r4 d8 es | d es r es d c r4 |  
        }
                \alternative {
                        {r r8 c, d es( es4) }  {r r8 c d es( es4) }
                }
        s1 | s1 | 
}

Vierte = \relative c' {
% Violinschlüssel
        \clef G
%  
        \key es
% Dur
    \major
% Viervierteltakt
        \time 4/4 
%Noten etwas kleiner machen, damit sie nicht so "fett" sind (in jeder Stimme)
        \set fontSize = #-1
% "normale" Wiederholung (Schweifklammern)
        \repeat "volta" 2 {
        r1 |
        c8 es f g( g) g f es | c' c bes4 r2 | 
        c,8 es f g g( g) f es | f f es4 r2 | 
        r1 |
        \break
        bes'8 g bes g r4 f8 d | f d r f fis g r4 |  
        }
                \alternative {
                        {r r8 bes, b c( c4) }  {r r8 bes a as( as4) }
                }
        s1 | s1 | 
}


% Partitur, die ausgedruckt (bzw. als pdf ausgegeben) wird
\score {
        \new StaffGroup
        <<
% % % % Liedtext ‒ hier über den Noten, siehe auch noch unten
% % %           \context Lyrics = TextErsteZeileErsteStimme {
% % %           }
                
                \new ChordNames \Harmonien
                \new Staff \Erste
                \set chordChanges = ##t
                \new Staff \Zweite      
%               \new Staff \Dritte      
                \set chordChanges = ##t         
                \new ChordNames  \transpose c d \Harmonien
                
                \new Staff \transpose c d \Vierte       

% if put chordChanges above ChordNames, symbols are printed below staff 
% and in every bar (also if there is no change) ‒ strange
% second chordChanges doesn't work at all

        >>
\layout {
  %keine Einrückung
    indent = #0
  %keine Taktzahlen
    \context { \Score \remove "Bar_number_engraver" }
}
% Ende der Partitur
}



_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to