input/sleur.ly

   1 \header{
   2 enteredby =      "jcn";
   3 copyright =      "PD";
   4 TestedFeatures =         "This file tests Feta embedded slurs"
   5          "(Feta definitively is not an abbreviation of Font-En-TjA)";
   6 }
   7
   8 \version "0.1.9";
   9
  10 shortlong = \melodic{
  11         c4()c( c c  |
  12         c c c c |
  13         c c c c |
  14         c c c )c |
  15 }
  16
  17 dirs = \melodic {
  18         \octave c';
  19         c'1() g' () c () g () c |
  20 }
  21
  22 complex = \melodic{
  23         \octave c';
  24         'c16( 'e( 'g( 'b( d( f( a( c'~ )))))))c4 c4 |
  25         \octave c''';
  26         'c16( a( f( d( 'b( 'g( 'e( 'c~ )))))))c4 c4 |
  27 }
  28
  29 beum = \melodic{
  30         \octave c';
  31         [c8 c] c4 c4 c4 |
  32 }
  33
  34 extend = \melodic{
  35         \octave c;
  36         c8(( c c )c c c c )c |
  37         \[4/5c8( c c' c )c\]1/1 c c c c |
  38         \[4/5c8( c c c c'\]1/1 c c c )c |
  39         \[4/5c8( c c c c''\]1/1 c c c )c' |
  40         \[4/5c8( c c c c'\]1/1 c c c )'c |
  41         \[4/5c8( c c' c c\]1/1 c c c )c |
  42         \[4/5c8( c c c ''c\]1/1 c c c )c |
  43         \[4/5c8( c ''c c c\]1/1 c c c )c |
  44 }
  45
  46 extendbug = \melodic{
  47         \octave c';
  48         c4( c' c' )c
  49         \stemup c'4( \stemdown e e \stemboth )c'
  50         [c'8( b g a] [c' d' e' c'] [c' d' e' )c']
  51         c( c' c' )c
  52         e( g' g' )e
  53
  54 }
  55
  56 blend = \melodic{
  57         \octave c;
  58         \stemdown;
  59 %%          \[4/5c8( c ''c c c\]1/1 c c c )c |
  60         \[4/5c8( c ''f c c\]1/1 c c c )c |
  61
  62         \[4/5c8( c \stemup ''f \stemdown c c\]1/1 c c c )c |
  63         \stemup;
  64         \octave c'';
  65         \[4/5c8( c f'' c c\]1/1 c c c )c |
  66         \[4/5c8( c \stemdown f'' \stemup c c\]1/1 c c c )c |
  67         \stemboth;
  68         c4( 'c16 'e 'g 'b d f a )'c16 c4 |
  69         c4( 'c16 'e 'g 'b d f f )'c16 c4 |
  70         \octave c';
  71         \stemdown;
  72         c( c'' c'' )c
  73         \stemboth;
  74         e( g' g' )e
  75         e( g' g' )e
  76         e( g' g' )e
  77         e( g' g' )e
  78 }
  79
  80 \score{
  81         \melodic{
  82                 \blend
  83                 \shortlong
  84                 \dirs
  85                 \complex
  86                 \beum
  87                 \octave c';
  88                 \stemup;
  89                 \extend
  90                 \octave c'';
  91                 \stemdown;
  92                 \extend
  93                 \stemboth;
  94                 \extendbug
  95         }
  96         \paper{
  97 %               castingalgorithm = \Wordwrap;
  98         }
  99 }
 100