input/test/coriolan-margin.ly

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