input/test/improv.ly

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