mutopia/los-toros-oboe.ly

   1 \header{
   2 filename =       "los-toros-oboe.ly";
   3 title =          "La Feria";
   4 subtitle = "Los Toros";
   5 opus =           "";
   6 composer =       "Paul Lac\\^ome dEstalenx (1838-1920)";
   7 enteredby =      "jcn";
   8 copyright =      "public domain";
   9 latexheaders=    "headers";
  10 }
  11 \version "1.0.6";
  12
  13 %{
  14 Silly latex file dropped; use ly2dvi
  15
  16 Converted to relative octave from los-toros-oboe.ly:
  17     :s/[^\\]'/'x/g
  18     :s/'x//g
  19     (511 substitutions on 155 lines)
  20
  21     lilypond -f los-toros-oboe 2> bla
  22     wc -l bla
  23     138
  24     138 / 3 =  46 octave quotes of 511 remain!
  25
  26 %}
  27
  28 \include "paper16.ly"
  29
  30 hoboonestart = \notes
  31   \relative c'{
  32 % ugh: cant copy: allegro/primo tempo
  33         \property Voice . textstyle =  "large"
  34         [es''16-.^"Allegro" es-. es-. es-.] [es8-. d-.] |
  35         \property Voice . textstyle =  "italic"
  36 }
  37
  38 hobooneintro = \notes  \relative c'{
  39
  40 %       \property Voice . textstyle =  "roman"
  41 %       [es''16-.-"Allegro" es-. es-. es-.] [es8-. d-.] |
  42 %       \property Voice . textstyle =  "italic"
  43         [f''8.-> es16(] [)d8 c-.] |
  44         [bes16( c d es] [)d8 c-.] |
  45         [bes-. as->~] [as16( g f g] |
  46         [as bes c d] [)es8 c-.] |
  47         [d8-. c16( bes] )as4 ~ |
  48         [as16 g( f g] [as c bes as] |
  49 %       [)g8 as16 g(] [)f8 g16( f] |
  50         [)g8 as16 g(] [)f8 g16( f] |
  51         [)es8 f16-. g-.] [as-. bes-. c-. d-.] |
  52         [es-. es-. es-. es-.] [es8-. d-.] |
  53         [f8.-> es16(] [)d8 c-.] |
  54         [bes16( c d es] [)d8 c-.] |
  55         [bes8 a->~] [a16 g( fis g] |
  56         [a bes c d] [)es8 d16()c] |
  57         [bes-. g-. bes-. d-.] g4-> ~ |
  58         [g16 f( es d] [c es  d c] |
  59         [)bes8 c16( bes] [)a8 bes16( a] |
  60         [)g8  r d'] r |
  61 }
  62
  63 hoboonemid = \notes     \relative c'{
  64
  65         [g'16-. g-. g-. g-.] [g8-. f-.] |
  66         as2-> |
  67         [as16-. as-. as-. as-.] [as8-. g-.] |
  68         bes2-> |
  69         [bes16-. bes-. bes-. bes-.] [bes8-. c] |
  70
  71         r-"cresc." [d8-. r c-.] |
  72         r\f [d-. es-. f-.] |
  73         [g8.-> es16] [bes8 g] |
  74
  75         % four measures copied from 8 measures back...
  76         [g16-.\p g-. g-. g-.] [g8-. f-.] |
  77         as2-> |
  78         [as16-. as-. as-. as-.] [as8-. g-.] |
  79         bes2-> |
  80         [b16-. b-. b-. b-.] [b8-. c-.] |
  81
  82         % same measure
  83         [b16-. b-. b-. b-.] [b8-. c-.] |
  84
  85         [b8-.-"cresc." c-. b-. c-.] |
  86         [d-. es-. d-. es-.] |
  87         [f\f-. g-. f-. g-.] |
  88         [as-.\< g-. as-. bes-.] |
  89         [\!g16\ff-. g-. g-. g-.] [g8-. g-.] |
  90         [g8.-> g16] [g8 g] |
  91         [g8.-> g16] [g8 g] |
  92         [f8.-> f16] [f8 f] |
  93         [f8.-> f16] [f8 f] |
  94         [bes8-. as16( g] )f4 ~ |
  95         [f16 es( d es] [f as g )f] |
  96         [es( g f es] [d f es d] |
  97         [c es d c] [b d c b] |
  98         [a c bes a] [g bes a g] |
  99         [fis a g fis] [e g fis )e] |
 100         % `a deux
 101         [d8 d'] [es8.-> c16] |
 102         [a8 bes g es] |
 103         [c' d es8. bes16] |
 104         [g8 es bes' c,] |
 105         [d16-. d-. d-. d-.] [d8.-. es16->] |
 106         [d'16-.-"cresc." d-. d-. d-.] [d8.-. es16->] |
 107         [d16-. d-. d-. d-.] [d8.-. es16->] |
 108         [d16 d d d] [d8 es16-.] r16-\fermata^"court"^"tr\\`es" |
 109         % Un peu plus lent.
 110         \property Voice . textstyle =  "bold"
 111
 112 % ugh
 113 %       d4(\<^"Un peu plus lent" \property Voice . textstyle =  "italic _"tr\\`es \\'el\\'egant"
 114 %       d4(\^"Un peu plus lent et \\'el\\'egant"<
 115         \property Voice . textstyle =  "italic"
 116         d4(\<
 117         [e8 \!fis8] |
 118 %       [)b-. a-.] [g16( fis e )d] |
 119         \property Voice . textstyle =  "bold"
 120         [)b-.^"Un peu plus lent et \\'el\\'egant" a-.] [g,,16( fis' e )d] |
 121         \property Voice . textstyle =  "italic"
 122         [d( c b\< c] [)\!fis'8-. e-.] |
 123         d,,4-> ~ [d16 e( fis g] |
 124         [a b\< d fis] [)\!a8-. g-.] |
 125         [fis16( e a, )c] e4 ~ |
 126         [e16 d( e, c'] [)b8-. a-.] |
 127         g2 ~ |
 128         [g8 \[/3 d16( e fis ]1/1 [)g8 d'-.] |
 129         b2-> ~ |
 130         [b8 \[/3 d,16( e fis ]1/1 [)g8-"cresc. poco" e'-.] |
 131         e2-> ~ |
 132         [e8 \[/3 d,,16( e fis ]1/1 [)g8\f d'-.] |
 133         [d8.-> b'16-.] [g16-. d-. b-. c-.] |
 134         [d-. e-. fis-. a-.] [g8-. e-.] |
 135         fis2-> ~ |
 136         [fis16 g-.\< a-. b-.] [\!c8-. c,-.] |
 137         [es8.->(-"espress.") d16] d4 ~ |
 138         [d16 e( fis a] [)g8 b,-.] |
 139         [b8.->( )c16] c4 ~ |
 140         [c16\< cis( d \!dis] [)e8-.-"dim." fis,-.] |
 141         [fis8.->( g16] )g4 ~ |
 142
 143         % (only notes! of) five measures copied from 14 measures above
 144         [g8 \[/3 d16( e fis ]1/1 [)g8 d'-.] |
 145         b2->-"cresc." ~ |
 146         [b8 \[/3 d,16( e fis ]1/1 [)g8 e'-.] |
 147         e2-> ~ |
 148         [e8 \[/3 d,,16(_"h\\^atez" e fis ]1/1 [)g8\f d'-.] |
 149         [d8.-> b16-.] [g16-.-"cresc." d'-. b-. c-.] |
 150         [d16\f\< e-. fis-. g-.] [a-. b,-. c-. \!d-.]
 151 }
 152
 153
 154 hoboonesecondstart = \notes   \relative c'{
 155
 156 % ugh: cant copy: allegro/primo tempo
 157         \property Voice . textstyle =  "large"
 158         [es''16-.\ff^"Tempo 1$^o$" es-. es-. es-.] [es8-. d-.] |
 159         \property Voice . textstyle =  "italic"
 160
 161 }
 162
 163 hoboonelast = \notes   \relative c'{
 164         % could transpose/copy from measure 19...
 165         [d''16-.\p  d-. d-. d-.] [d8-. c-.] |
 166         es2-> |
 167         [es16-. es-. es-. es-.] [es8-. d-.] |
 168         f2-> |
 169         [f16-. f-. f-. f-.] [f8-. g-.] |
 170         r8 [a-.-"cresc." r g-.] |
 171         r [a-.\f bes-.\< \!c-.] |
 172         [d8.->\> \!bes16] [f8 d] |
 173
 174         % four measures copied from 8 measures back...
 175         [d16-.\p  d-. d-. d-.] [d8-. c-.] |
 176         es2-> |
 177         [es16-. es-. es-. es-.] [es8-. d-.-"cresc."] |
 178         f2-> |
 179         [fis16-.\p  fis-. fis-. fis-.] [fis8-. g-.] |
 180         % same measure
 181         [fis16-.\p  fis-. fis-. fis-.] [fis8-. g-.] |
 182         [fis8-. g-. fis-. g-.] |
 183         [a-. bes-. a-. bes-. ] |
 184         [a-.\f bes-. a-. bes-. ] |
 185         [c-.-"cresc." f,-. g-. a-.] |
 186         [bes-. bes-. ces8.-> as16] |
 187         [f8-. ges-. es-. ces-.] |
 188         % `a deux
 189         [as-. bes-. ces8.-> ges16] |
 190         [es8-. ces'-. ges-. as-.] |
 191         bes\p r r4 |
 192         [bes16-.-"cresc." bes-. bes-. bes-.] [bes8-. ces->] |
 193         % same measure
 194         [bes16-. bes-. bes-. bes-.] [bes8-. ces->] |
 195         [bes'16-.\ff bes-. bes-. bes-.] [bes8-. ces16->] r16^"court"-\fermata |
 196         % ugh: eight measures rest (ugh: r1 -> four beats...)
 197         % eiht measures rest..
 198         \property Voice . textstyle =  "bold"
 199 %       r2^"Un peu plus lent et \\'el\\'egant"
 200         R2*8
 201 %       r4 r8\p bes |
 202         r4^"Un peu plus lent et \\'el\\'egant"
 203         r8\p bes,, |
 204 %       g2->^"Un peu plus lent et \\'el\\'egant" ~ |
 205         g2-> ~ |
 206         \property Voice . textstyle =  "italic"
 207         g8 r r c |
 208         c2-> ~ |
 209         c8 r r bes'\f |
 210         [bes8.->\f g16-.] [es16-. bes-. g-. as-.] |
 211         [bes-.-"dim." c-. d-. f-.] [es8-. c-.] |
 212         d2-> ~ |
 213         [d16-"dim."( es f g] [)as,8 as-.] |
 214         [ces8.->\p( )bes16-.] bes4 ~ |
 215         [bes16( c! d f] [)es8 g,-.] |
 216         [g8.->( )as16] as4 ~ |
 217         [as16( a bes b] [)c8-. d,-.] |
 218         % a deux
 219         [d8.->( ) es16] es4 ~ |
 220         es4 r8 bes'-. |
 221         g2-> ~ |
 222         g8 r r c |
 223         c2 ~ |
 224         c8  r r bes' |
 225         [bes8.-> g16-.] [es16-. bes-. g-. as-.] |
 226         [bes-. c-. d-. es-.] [f-. g-. as-. bes-.] |
 227         d8-. r c4-> ~ |
 228         [c16 f,-. g-. a-.] [bes-. c,-. d-. es-.] |
 229         g8-. r f4-> ~ |
 230         [f16 bes,-. c-. d-.] [es-. f-. g-. as-.] |
 231         c8 r bes4 ~ |
 232         [bes8 as-. g8.-. e16-.] |
 233         g8-. r f4-> ~ |
 234         [f8 es-. ces8.-. as16-.] |
 235         % `a deux
 236         \property Voice . textstyle =  "large"
 237         [ces8.->^"Plus vite" bes16-.(] [a bes es d] |
 238         \property Voice . textstyle =  "italic"
 239         [)c!8.-> bes16] [a( bes es )d] |
 240         [c->( bes es )d] [c->( bes es )d] |
 241         % same measure
 242         [c->( bes es )d] [c->( bes es )d] |
 243         [c( bes a bes] [c d es e] |
 244         [g )f d( es] [f g as a] |
 245         [c )bes bes,( c] [d es f g] |
 246         [as g f g] [as bes c d] |
 247         \property Voice . textstyle =  "large"
 248         [)es-.^"Tempo 1$^o$" g,-. g-. g-.] [g8-. g-.] |
 249         \property Voice . textstyle =  "italic"
 250         bes4.-> g8-. |
 251         gis2->( |
 252         )as! |
 253         [g16-. g-. g-. g-.] [g8-. g-.] |
 254         bes4.-> g8-. |
 255         gis2->( |
 256 %       )as! |
 257         )as |
 258         [bes16-. bes-. bes-. bes-.] [bes8-. bes-.] |
 259         bes4.-> g8-. |
 260         [g16-._"h\\^atez" g-. g-. g-.] [g8-. g-.] |
 261         g4.-> g8-. |
 262         es4.-> es8-. |
 263         bes4.-> bes8-. |
 264         \property Voice . textstyle =  "large"
 265         g'4.->^"Presto" g8-. |
 266         \property Voice . textstyle =  "italic"
 267         es4.-> es8-. |
 268         [bes-. bes-. es-. g-.] |
 269         [bes-. bes,-. es-. g-.] |
 270         bes-. r r4 |
 271         g8-. r r4 |
 272         g8-. r r4 |
 273 }
 274
 275 hoboone = \notes {
 276         \hoboonestart
 277         \hobooneintro
 278         \hoboonemid
 279         \hoboonesecondstart
 280         \hobooneintro
 281         \hoboonelast
 282 }
 283
 284 global = \notes{
 285         \key es;
 286         \time 2/4;
 287         \skip 4*110;
 288         \key g; |
 289         \bar "||";
 290         \skip 4*58;
 291         \key es; |
 292         \bar "||";
 293         \skip 4*220;
 294         \bar "|.";
 295 }
 296
 297
 298 $staff_hoboone = \type Staff = hoboonestaff <
 299         \global
 300         \property Staff.instrument = "oboe"
 301         % don't expand multi-bar rest
 302         \property Score.SkipBars = 1
 303         \hoboone
 304 >
 305
 306 a4 = \paper{
 307         \translator{ \BarNumberingStaffContext }
 308 }
 309
 310 a4sixteen = \paper{
 311         \paper_sixteen
 312         linewidth= 193.\mm;
 313         \translator { \BarNumberingStaffContext }
 314 }
 315
 316 \score{
 317         \$staff_hoboone
 318         \paper{ \a4 }
 319         \midi{
 320                 \tempo 4 = 80;
 321         }
 322 %       \paper{ \a4sixteen }
 323 }
 324