Re: Request for contribution: font demonstration examples

[Malte Meyn]

Am 31.01.19 um 09:47 schrieb Urs Liska:
>   * Classical "score" (e.g. an initial system of a Haydn symphony)

Some measures of the 1st movement of Dvořák’s 9th symphony (copied from 
http://hz.imslp.info/files/imglnks/usimg/5/51/IMSLP54080-PMLP08710-Dvorak_op.095_Sinfonie_Nr.9_1.Adagio_Allegro_molto_fs_SNKLHU_3_9.pdf):

\version "2.21.0"
\language "deutsch"

\new Score \with {
  \remove Metronome_mark_engraver
} <<
  \new StaffGroup \with {
    \consists Metronome_mark_engraver
  } <<
    \new Staff \with {
      instrumentName = "Cl. I. II. A"
    } \transpose a c' \partCombine \relative {
      \tempo "Allegro molto" 4 = 136
      \key e \minor
      \time 2/4
      \bar ".|:"
      R2*3
      r4 r8 g'\p
      g8.-> h16-. h8-. fis-.
      g8.-> h16-. h8-. fis-.
      g8.-> h16-. h8-. fis-.
      g8 r r4
    }
    \relative {
      R2*3
      r4 r8 e'\p
      e8.-> g16-. g8-. dis-.
      e8.-> g16-. g8-. dis-.
      e8.-> g16-. g8-. dis-.
      e8 r r4
    }
    \new Staff \with {
      instrumentName = "Fag. I. II."
    } \partCombine \relative {
      \clef bass
      \key e \minor
      R2*3
      r4 r8 g\p
      g8.-> h16-. h8-. fis-.
      g8.-> h16-. h8-. fis-.
      g8.-> h16-. h8-. fis-.
      g2
    }
    \relative {
      R2*3
      r4 r8 e\p
      e8.-> g16-. g8-. dis-.
      e8.-> g16-. g8-. dis-.
      e8.-> g16-. g8-. dis-.
      e2
    }
  >>
  \new StaffGroup \with {
    \override SystemStartBracket.collapse-height = 0
  } \new Staff \with {
    instrumentName = "Cor. III. IV. C"
  } \transpose c c' \partCombine \relative {
    e4.\mf g8\< h e4.->\!
    g4->\f e8 c h\> e,4.
    R2*4\!
  }
  \relative {
    e4.\mf g8\< h e4.->\!
    g4->\f e8 c h\> e,4.
    R2*4\!
  }
  \new StaffGroup \with {
    \consists Metronome_mark_engraver
  } <<
    \new GrandStaff \with {
      instrumentName = "Viol."
    } <<
      \new Staff \with {
        instrumentName = "I."
      } \relative {
        \tempo "Allegro molto" 4 = 136
        \key e \minor
        h''2:32\pp
        h2:
        c:
        h8:[ g: e: h:]
        h2:
        h:
        h:
        h16(\< g e g h\> e g fis) <>\!
      }
      \new Staff \with {
        instrumentName = "II."
      } \relative {
        \key e \minor
        g''2:32\pp
        g:
        g:
        g8:[ e: h: g:]
        g([ e h' h,)]
        g'([ e h' h,)]
        g'([ e h' h,)]
        e4 r
      }
    >>
    \new Staff \with {
      instrumentName = "Vle."
    } \relative {
      \clef alto
      \key e \minor
      e''2:32\pp
      e:
      e:
      e8:[ h: g: e:]
      h2:
      h:
      h:
      <h g>:
    }
    \new Staff \with {
      instrumentName = "Vcl."
    } \relative {
      \clef bass
      \key e \minor
      e4^"pizz."\pp r
      R2
      c4 r
      e r
      e8([^"arco"\pp g h h,)]
      e([ g h h,)]
      e([ g h h,)]
      e2
    }
    \new Staff \with {
      instrumentName = "Cb."
    } \relative {
      \clef bass
      \key e \minor
      e4^"pizz."\pp r
      R2
      c4 r
      e r
      e r8 h
      e4 r8 h
      e4 r8 h
      e4 r
    }
  >>
>>