holst-marte-timbales.ly

   1 \version "2.13.18"
   2
   3            timpaniI = \relative g, { \clef bass
   4                          \key c \major
   5    \times 2/3 { g8\p ^\markup { "wooden sticks" } g g }  g4 g g8 g g4
   6    \times 2/3 { g8 g g } g4 g g8 g g4
   7    \times 2/3 { g8 g g } g4 g g8 g g4
   8    \times 2/3 { g8 \< g g } g4 g g8 g g4\!
   9    \times 2/3 { g8 \> g g } g4 g g8 g g4\! }
  10
  11            timpaniII = { \clef bass
  12                          \key c \major
  13            R1*5/4 R1*5/4 R1*5/4 R1*5/4 R1*5/4 }
  14
  15         gong = { g2.:32 \pp  g2:32 g2.:32 g2:32 g2.:32 g2:32 g2.\< :32 g2\!:32 g2.\>:32 g2:32 \! }
  16
  17
  18 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  19
  20 incipitTimpaniGroup = \markup {
  21         \score{
  22                  \new PianoStaff << \set PianoStaff.instrumentName= \markup {
  23                                 \center-column {"6 Timpani" "(two players)"}
  24                         }
  25                         \new Staff { \set Staff.instrumentName = "I"
  26                                 \clef bass
  27                                 \time 3/2
  28                                 \cadenzaOn g,2 d2 bes,2
  29                         }
  30                         \new Staff { \set Staff.instrumentName = "II"
  31                                 \clef bass
  32                                 \time 3/2
  33                                 \cadenzaOn c2 es2 a,2
  34                         }
  35                 >>
  36
  37         \layout {
  38                 \context {
  39                         \Staff \remove "Time_signature_engraver"
  40                 }
  41                 line-width=2.5\cm indent=1\cm
  42                 margin-left=0\cm
  43         } %layout
  44   } %score
  45 } %markup
  46
  47 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  48
  49         #(set-global-staff-size 15.5)
  50         % #(set-default-paper-size "a3")
  51
  52    \paper {  % ragged-right=##f
  53         %       ragged-last-bottom=##f
  54         %   page-count=2
  55            system-count=1
  56         }
  57
  58    \layout { indent=4\cm
  59            \context { \Staff
  60 %               \override VerticalAxisGroup #'minimum-Y-extent = #'(-3 . 3)
  61 %              \override instrumentName #'font-size = #8.0
  62            }
  63    }
  64
  65 \header {
  66         title = \markup { \fontsize #6 { \smallCaps {  "I. Mars, " } "the Bringer of War" } }
  67         %       copyright = "Francisco Vila, sobre un trabajo de Guadalupe Cuevas Piñero"
  68 }
  69
  70
  71 \score {
  72     \new StaffGroup <<   \tempo "Allegro"       % main
  73         \time 5/4
  74
  75     \new PianoStaff  <<  %timpani
  76         \set PianoStaff.instrumentName =
  77                 \markup {
  78                         \incipitTimpaniGroup
  79                 }
  80             \new Staff  {  \timpaniI }
  81             \new Staff  { \timpaniII } >>
  82
  83     \new RhythmicStaff          %gong
  84 %       \with { \override VerticalAxisGroup #'minimum-Y-extent = #'(0 . 0)}
  85         { \set Staff.instrumentName = "Gong"
  86         \gong }
  87
  88 >> %main
  89 } %score