input/test/coriolan-margin.ly

   1
   2
   3 % Ugh, we need to override some LaTeX titling stuff
   4 \header {
   5   title =       "Ouvertüre\\vrule width0pt height 0pt depth 1ex";
   6   subtitle =    "\\normalsize Zu Heinrich Joseph v. Collins Trauerspiel\\vrule width0pt height 0pt depth 1ex";
   7   subsubtitle = "\\Large\\bf Coriolan";
   8   opus =  "Op. 62";
   9   piece = "\\hspace*{30mm}\\normalfont\\large Allegro con brio";
  10   composer =     "Ludwig van Beethoven (1770-1827)";
  11   enteredby =    "JCN";
  12 }
  13 #(define raisedflat '((raise . 0.4) (music (named "accidentals--1"))))
  14
  15 flauti = \notes \relative c' {
  16   \property Staff.instrument    = #"2 Flauti"
  17   \property Staff.instr         = #"Fl."
  18   \time 4/4;
  19   c1
  20   \break c
  21 %  \break c
  22 %  \break c
  23   \bar"|.";
  24 }
  25
  26 oboi = \notes \relative c' {
  27   \property Staff.instrument    = #"2 Oboi"
  28   \property Staff.instr         = #"Ob."
  29   c1 c
  30 }
  31
  32 clarinetti = \notes \relative c' {
  33 %   \property Staff.instrument = #`("Clarinetti in B" ,text-flat)
  34   \property Staff.instrument    = #`(lines "2 Clarinetti" (rows "(B" ,raisedflat ")"))
  35   \property Staff.instr         = #`(lines "Cl." (rows "(B" ,raisedflat ")"))
  36
  37   c1 c
  38 }
  39
  40 fagotti = \notes \relative c' {
  41   \property Staff.instrument    = #"2 Fagotti"
  42   \property Staff.instr         = #"Fg."
  43   c1 c
  44 }
  45
  46 corni = \notes \relative c' {
  47   \property Staff.instrument    = #`(lines "2 Corni" (rows "(E" ,raisedflat ")"))
  48   \property Staff.instr         = #`(lines "Cor." (rows "(E" ,raisedflat ")"))
  49
  50   c1 c
  51 }
  52
  53 trombe = \notes \relative c' {
  54   \property Staff.instrument    = #'(lines "2 Trombe" "(C)")
  55   \property Staff.instr         = #'(lines "Tbe." "(C)")
  56
  57   c1 c
  58 }
  59
  60 timpani = \notes \relative c' {
  61   \property Staff.instrument    = #'(lines "Timpani" "(C-G)")
  62   \property Staff.instr         = #"Timp."
  63
  64   c1 c
  65 }
  66
  67 violinoI = \notes \relative c' {
  68   \property Staff.instrument    = #"Violino I  "
  69   \property Staff.instr         = #"Vl. I  "
  70   c1 c
  71 }
  72
  73 violinoII = \notes \relative c' {
  74   \property Staff.instrument    = #"Violino II  "
  75   \property Staff.instr         = #"Vl. II  "
  76   c1 c
  77 }
  78
  79 viola = \notes \relative c' {
  80   \property Staff.instrument    = #"Viola"
  81   \property Staff.instr         = #"Vla."
  82   c1 c
  83   %c
  84 }
  85
  86 violoncello = \notes \relative c' {
  87   \property Staff.instrument    = #'(lines "Violoncello" "e" "Contrabasso")
  88   \property Staff.instr         = #'(lines "Vc." "Cb.")
  89   c1 c
  90 }
  91
  92 \include "paper16.ly"
  93
  94 \score {
  95   <
  96     \context StaffGroup ="legni" <
  97       \context Staff ="flauti" \flauti
  98       \context Staff ="oboi" \oboi
  99       \context Staff ="clarinetti" \clarinetti
 100       \context Staff ="fagotti" \fagotti
 101     >
 102     \context StaffGroup ="ottoni" <
 103       \context Staff ="corni" \corni
 104       \context Staff ="trombe" \trombe
 105     >
 106     \context StaffGroup ="timpani" <
 107       \context Staff ="timpani" \timpani
 108      {
 109        \skip 1;
 110        % Hmm: this forces a staff-bracket, that's good!
 111        % However, I can't find where is decided on staff-bracket yes/no
 112      }
 113     >
 114     \context StaffGroup ="archi" <
 115       \context GrandStaff ="violini" <
 116         \context Staff ="violinoI" \violinoI
 117         \context Staff ="violinoII" \violinoII
 118       >
 119       \context Staff ="viola" \viola
 120       \context Staff ="violoncello" \violoncello
 121     >
 122   >
 123   \paper {
 124         \paperSixteen
 125         indent=100.0\mm;
 126         linewidth=150.0\mm;
 127     \translator {
 128       \HaraKiriStaffContext
 129     }
 130     \translator {
 131       \OrchestralScoreContext
 132       TimeSignature \override #'style = #'C
 133     }
 134   }
 135 }
 136