input/test/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 "1.0.3";
   9
  10 shortlong = \notes{
  11         c4()c( c c  |
  12         c c c c |
  13         c c c c |
  14         \break
  15         c c c )c |
  16 }
  17
  18 dirs = \notes\transpose c' {
  19
  20         c'1() g' () c () g () c |
  21 }
  22
  23 complex = \notes{
  24 \transpose c'{
  25         c,16( e,( g,( b,( d( f( a( c'())))))))c4 c4 |}
  26 \transpose c'''{
  27         c,16( a( f( d( b,( g,( e,( c,())))))))c4 c4 |}
  28 }
  29
  30 over = \notes\transpose c'{
  31
  32
  33         e( g' g' )e
  34         e( a' a' )e
  35         e( b' b' )e
  36         e( c'' c'' )e
  37         \stemup
  38         e( c' c' )e
  39         e( d' d' )e
  40         e( e' e' )e
  41         e( c'' c'' )e
  42         \stemboth
  43         e( f' b' )e
  44         e( b' f' )e
  45         e( e'' g' )e
  46         e( g' e'' )e
  47         \stemup
  48         e( d' b )e
  49         e( b d' )e
  50         e( f' c'' )e
  51         e( c'' f )e
  52 }
  53
  54 under = \notes\transpose c'{
  55
  56         \stemdown
  57         f'( \stemboth d d \stemdown )f'
  58         f'( \stemboth c c \stemdown )f'
  59         f'( \stemboth b, b, \stemdown )f'
  60         f'( \stemboth a, a, \stemdown )f'
  61         \stemdown
  62         f'( a a )f'
  63         f'( g g )f'
  64         f'( f f )f'
  65         f'( a, a, )f'
  66
  67         \stemdown
  68         f'( \stemboth d b, \stemdown )f'
  69         f'( \stemboth b, d \stemdown )f'
  70         f'( \stemboth d, b, \stemdown )f'
  71         f'( \stemboth b, d, \stemdown )f'
  72         \stemdown
  73         f'( f a )f'
  74         f'( a f )f'
  75         f'( f e, )f'
  76         f'( e, f )f'
  77 }
  78
  79 eccentric = \notes\transpose c'{
  80
  81         \stemup
  82         \[4/7 f( a' f f f f )f \] |
  83         \[4/7 f( f f f f a' )f \] |
  84         \stemdown
  85         \[4/7 e'( c e' e' e' e' )e' \] |
  86         \[4/7 e'( e' e' e' e' c )e' \] |
  87 }
  88
  89 tiltup = \notes\transpose c'{
  90         e( c'' c'' )e'
  91         \stemup
  92         e( c'' c'' )e'
  93         \stemboth
  94         e( g' e'' )e'
  95         \stemup
  96         e( c'' f )e'
  97         \stemdown
  98         f'( \stemboth a, a, \stemdown )f''
  99         \stemdown
 100         f'( a, a, )f''
 101 }
 102
 103 tiltdown = \notes\transpose c'{
 104         e'( c'' c'' )e
 105         \stemup
 106         e'( c'' c'' )e
 107         \stemboth
 108         e'( g' e'' )e
 109         \stemup
 110         e'( c'' f )e
 111         \stemdown
 112         f''( \stemboth a, a, \stemdown )f'
 113         \stemdown
 114         f''( a, a, )f'
 115 }
 116
 117 broken = \notes\transpose c''{
 118       c c c c()
 119       c c c c(
 120       c )c c c(
 121       c c )c c(
 122       )a' a' a' a'()
 123       a' a' a' a'()
 124       c( c c )c
 125       c( c c )f,
 126       f,( c c )c
 127       f,( c c )f,
 128 }
 129
 130 blend = \notes\transpose c'{
 131         e( c'' c'' )e
 132         \stemup
 133         f'( c'' c'' )f'
 134         e( c'' c'' )e
 135         \stemdown
 136         f'( \stemboth a, a, \stemdown )f'
 137         f'( a, a, )f'
 138
 139         \stemboth
 140         e( c'' c'' )e'
 141         e'( c'' c'' )e
 142         d( d d )d
 143
 144         \stemdown
 145         e( c'' c'' )e'
 146         e'( c'' c'' )e
 147         d( d d )d
 148 }
 149
 150
 151 bug = \notes\transpose c'{
 152
 153         a()g( f )e
 154         b'()a'( g' )f'
 155         g( f' e' )d'
 156         f f( g )a
 157         c' () b () c' c'
 158 }
 159
 160 clipping = \notes\transpose c'{
 161         \stemboth
 162         c( c''' c''')c
 163         c( c''' c )c''
 164         c''( c c''' )c
 165         \stemdown
 166         c( \stemup c,,, c,,, \stemdown )c
 167         c( \stemup c,,, c \stemdown )c,,
 168         c,,( \stemup c c,,, \stemdown )c
 169 }
 170
 171 \score{
 172         \notes{
 173                 % use blend for fast check
 174                 \blend
 175 % {
 176                 \shortlong
 177                 \dirs
 178                 \complex
 179                 \over
 180                 \under
 181                 \eccentric
 182                 \tiltup
 183                 \tiltdown
 184                 \bug
 185 % }
 186                 \clipping
 187                 % use broken with small linewidth
 188                 %\broken
 189         }
 190         \paper{
 191               indent = 0.0\pt;
 192                 %for broken!
 193                 % linewidth= 30.\mm;
 194                 castingalgorithm = \Wordwrap;
 195         }
 196 }
 197