mutopia/ltor.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
  12 %{
  13 Silly latex file dropped; use ly2dvi
  14
  15 Converted to relative octave from los-toros-oboe.ly:
  16     :s/[^\\]'/'x/g
  17     :s/'x//g
  18     (511 substitutions on 155 lines)
  19
  20     lilypond -f los-toros-oboe 2> bla
  21     wc -l bla
  22     138
  23     138 / 3 =  46 octave quotes of 511 remain!
  24
  25 %}
  26
  27 \include "paper16.ly"
  28
  29 hoboonestart = \melodic{
  30 % ugh: cant copy: allegro/primo tempo
  31         \octave relative;
  32         \textstyle "large";
  33         [es''16-.^"Allegro" es-. es-. es-.] [es8-. d-.] |
  34         \textstyle "italic";
  35 }
  36
  37 hobooneintro = \melodic{
  38         \octave relative;
  39 %       \textstyle "roman";
  40 %       [es''16-.-"Allegro" es-. es-. es-.] [es8-. d-.] |
  41 %       \textstyle "italic";
  42         [f''8.-> es16(] [)d8 c-.] |
  43         [bes16( c d es] [)d8 c-.] |
  44         [bes-. as->~] [as16( g f g] |
  45         [as bes c d] [)es8 c-.] |
  46         [d8-. c16( bes] )as4 ~ |
  47         [as16 g( f g] [as c bes as] |
  48 %       [)g8 as16 g(] [)f8 g16( f] |
  49         [)g8 as16 g(] [)f8 g16( f] |
  50         [)es8 f16-. g-.] [as-. bes-. c-. d-.] |
  51         [es-. es-. es-. es-.] [es8-. d-.] |
  52         [f8.-> es16(] [)d8 c-.] |
  53         [bes16( c d es] [)d8 c-.] |
  54         [bes8 a->~] [a16 g( fis g] |
  55         [a bes c d] [)es8 d16()c] |
  56         [bes-. g-. bes-. d-.] g4-> ~ |
  57         [g16 f( es d] [c es  d c] |
  58         [)bes8 c16( bes] [)a8 bes16( a] |
  59         [)g8  r d'] r |
  60 }
  61
  62 hoboonemid = \melodic{
  63         \octave relative;
  64         [g'16-. g-. g-. g-.] [g8-. f-.] |
  65         as2-> |
  66         [as16-. as-. as-. as-.] [as8-. g-.] |
  67         bes2-> |
  68         [bes16-. bes-. bes-. bes-.] [bes8-. c] |
  69
  70         r-"cresc." [d8-. r c-.] |
  71         r\f [d-. es-. f-.] |
  72         [g8.-> es16] [bes8 g] |
  73
  74         % four measures copied from 8 measures back...
  75         [g16-.\p g-. g-. g-.] [g8-. f-.] |
  76         as2-> |
  77         [as16-. as-. as-. as-.] [as8-. g-.] |
  78         bes2-> |
  79         [b16-. b-. b-. b-.] [b8-. c-.] |
  80
  81         % same measure
  82         [b16-. b-. b-. b-.] [b8-. c-.] |
  83
  84         [b8-.-"cresc." c-. b-. c-.] |
  85         [d-. es-. d-. es-.] |
  86         [f\f-. g-. f-. g-.] |
  87         [as-.\< g-. as-. bes-.] |
  88         [\!g16\ff-. g-. g-. g-.] [g8-. g-.] |
  89         [g8.-> g16] [g8 g] |
  90         [g8.-> g16] [g8 g] |
  91         [f8.-> f16] [f8 f] |
  92         [f8.-> f16] [f8 f] |
  93         [bes8-. as16( g] )f4 ~ |
  94         [f16 es( d es] [f as g )f] |
  95         [es( g f es] [d f es d] |
  96         [c es d c] [b d c b] |
  97         [a c bes a] [g bes a g] |
  98         [fis a g fis] [e g fis )e] |
  99         % `a deux
 100         [d8 d'] [es8.-> c16] |
 101         [a8 bes g es] |
 102         [c' d es8. bes16] |
 103         [g8 es bes' 'c] |
 104         [d16-. d-. d-. d-.] [d8.-. es16->] |
 105         [d'16-.-"cresc." d-. d-. d-.] [d8.-. es16->] |
 106         [d16-. d-. d-. d-.] [d8.-. es16->] |
 107         [d16 d d d] [d8 es16-.] r16-\fermata^"court"^"tr\\`es" |
 108         % Un peu plus lent.
 109         \textstyle "bold";
 110
 111 % ugh
 112 %       d4(\<^"Un peu plus lent" \textstyle "italic; _"tr\\`es \\'el\\'egant"
 113 %       d4(\^"Un peu plus lent et \\'el\\'egant"<
 114         \textstyle "italic";
 115         d4(\<
 116         [e8 \!fis8] |
 117 %       [)b-. a-.] [g16( fis e )d] |
 118         \textstyle "bold";
 119         [)b-.^"Un peu plus lent et \\'el\\'egant" a-.] [''g16( fis' e )d] |
 120         \textstyle "italic";
 121         [d( c b\< c] [)\!fis8-. e-.] |
 122         ''d4-> ~ [d16 e( fis g] |
 123         [a b\< d fis] [)\!a8-. g-.] |
 124         [fis16( e 'a )c] e4 ~ |
 125         [e16 d( 'e c'] [)b8-. a-.] |
 126         g2 ~ |
 127         [g8 \[/3 d16( e fis ]1/1 [)g8 d'-.] |
 128         b2-> ~ |
 129         [b8 \[/3 'd16( e fis ]1/1 [)g8-"cresc. poco" e'-.] |
 130         e2-> ~ |
 131         [e8 \[/3 ''d16( e fis ]1/1 [)g8\f d'-.] |
 132         [d8.-> b'16-.] [g16-. d-. b-. c-.] |
 133         [d-. e-. fis-. a-.] [g8-. e-.] |
 134         fis2-> ~ |
 135         [fis16 g-.\< a-. b-.] [\!c8-. 'c-.] |
 136         [es8.->(-"espress.") d16] d4 ~ |
 137         [d16 e( fis a] [)g8 'b-.] |
 138         [b8.->( )c16] c4 ~ |
 139         [c16\< cis( d \!dis] [)e8-.-"dim." 'fis-.] |
 140         [fis8.->( g16] )g4 ~ |
 141
 142         % (only notes! of) five measures copied from 14 measures above
 143         [g8 \[/3 d16( e fis ]1/1 [)g8 d'-.] |
 144         b2->-"cresc." ~ |
 145         [b8 \[/3 'd16( e fis ]1/1 [)g8 e'-.] |
 146         e2-> ~ |
 147         [e8 \[/3 ''d16(_"h\\^atez" e fis ]1/1 [)g8\f d'-.] |
 148         [d8.-> b16-.] [g16-.-"cresc." d'-. b-. c-.] |
 149         [d16\f\< e-. fis-. g-.] [a-. 'b-. c-. \!d-.]
 150 }
 151
 152
 153 hoboonesecondstart = \melodic{
 154         \octave relative;
 155 % ugh: cant copy: allegro/primo tempo
 156         \textstyle "large";
 157         [es''16-.\ff^"Tempo 1$^o$" es-. es-. es-.] [es8-. d-.] |
 158         \textstyle "italic";
 159
 160 }
 161
 162 hoboonelast = \melodic{
 163         \octave relative;
 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         \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         \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] [)'as8 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         \textstyle "large";
 237         [ces8.->^"Plus vite" bes16-.(] [a bes es d] |
 238         \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         \textstyle "large";
 248         [)es-.^"Tempo 1$^o$" 'g-. g-. g-.] [g8-. g-.] |
 249         \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         \textstyle "large";
 265         g'4.->^"Presto" g8-. |
 266         \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 = \melodic {
 276         \hoboonestart
 277         \hobooneintro
 278         \hoboonemid
 279         \hoboonesecondstart
 280         \hobooneintro
 281         \hoboonelast
 282 }
 283
 284 global = \melodic{
 285         \key bes es as;
 286         \meter 2/4;
 287         \skip 4*110;
 288         \key fis; |
 289         \bar "||";
 290         \skip 4*58;
 291         \key bes es as; |
 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         \hoboone
 302 >
 303
 304 a4 = \paper{
 305 %       \paper_twenty
 306         linewidth= 185.\mm;
 307         gourlay_maxmeasures = 10.0;
 308         Staff = \translator {
 309                 \type "Engraver_group_engraver";
 310                 defaultclef = violin;
 311
 312                 \consists "Bar_engraver";
 313                 \consists "Clef_engraver";
 314                 \consists "Key_engraver";
 315                 \consists "Meter_engraver";
 316                 \consists "Local_key_engraver";
 317                 \consists "Staff_sym_engraver";
 318                 \consists "Collision_engraver";
 319                 \consists "Rest_collision_engraver";
 320                 \consists "Bar_column_engraver";
 321                 \consists "Bar_number_engraver";
 322                 \consists "Separating_line_group_engraver";
 323                 \consists "Line_group_engraver";
 324
 325                 \accepts "Voice";
 326         }
 327 }
 328
 329 a4sixteen = \paper{
 330         \paper_sixteen
 331         linewidth= 193.\mm;
 332         Staff = \translator {
 333                 \type "Engraver_group_engraver";
 334                 defaultclef = violin;
 335
 336                 \consists "Bar_engraver";
 337                 \consists "Clef_engraver";
 338                 \consists "Key_engraver";
 339                 \consists "Meter_engraver";
 340                 \consists "Local_key_engraver";
 341                 \consists "Staff_sym_engraver";
 342                 \consists "Collision_engraver";
 343                 \consists "Rest_collision_engraver";
 344                 \consists "Bar_column_engraver";
 345                 \consists "Bar_number_engraver";
 346                 \consists "Separating_line_group_engraver";
 347                 \consists "Line_group_engraver";
 348
 349                 \accepts "Voice";
 350         }
 351 }
 352
 353 \score{
 354         \$staff_hoboone
 355         \paper{ \a4 }
 356         \midi{
 357                 \tempo 4 = 80;
 358         }
 359 %       \paper{ \a4sixteen }
 360 }
 361