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           c8(( c c )c c c c )c |
  36           \[4/5c8( c c' c )c\]1/1 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 }
  44
  45 extendbug = \melodic{
  46         \octave c';
  47         c4( c' c' )c
  48         \stemup c'4( \stemdown e e \stemboth )c'
  49         [c'8( b g a] [c' d' e' c'] [c' d' e' )c']
  50         c( c' c' )c
  51         e( g' g' )e
  52 }
  53
  54 \score{
  55         \melodic{
  56                 \shortlong
  57                 \dirs
  58                 \complex
  59                 \beum
  60                 \octave c';
  61                 \stemup;
  62                 \extend
  63                 \octave c'';
  64                 \stemdown;
  65                 \extend
  66                 \stemboth;
  67                 \extendbug
  68         }
  69         \paper{
  70 %               castingalgorithm = \Wordwrap;
  71         }
  72 }
  73