input/test/improv.ly

   1
   2 improOn = \notes {\translator Voice = impro }
   3 improOff = \notes {\translator SquashVoice = melo }
   4
   5 global = \notes { s1*3 \bar "|."; }
   6
   7 \score {
   8   <
   9     \context ChordNames \chords {e8:m7*7 a2.:m7 bes4:m7 b1:m7 e8:m }
  10     \context Staff \notes <
  11       \context SquashVoice = impro { \global }
  12       \context Voice = melo \transpose c'' {
  13         e8 e g a a16()bes()a8 g \improOn e8
  14         ~e2~e8 f4 fis8
  15         ~fis2 \improOff a16()bes a8 g e
  16       }
  17     >
  18   >
  19   \paper {
  20     \translator {
  21       \VoiceContext
  22       \name SquashVoice;
  23       \alias Voice;
  24       \consists Pitch_squash_engraver;
  25       \consists Local_key_engraver;
  26       squashedPosition = 6;
  27       NoteHead \override #'style = #'slash
  28       Accidentals \override #'transparent = ##t
  29     }
  30     \translator {
  31       \VoiceContext
  32       \alias SquashVoice;
  33       \consists Local_key_engraver;
  34     }
  35     \translator {
  36       \ScoreContext
  37       \accepts SquashVoice;
  38     }
  39     \translator {
  40       \StaffContext
  41       \remove Local_key_engraver;
  42       \accepts SquashVoice;
  43     }
  44     linewidth = -1;
  45   }
  46 }