* Documentation/user/refman.itely: Compile fix for \mark #'(music ...).

[lilypond.git] / ly / engraver-init.ly

diff --git a/ly/engraver-init.ly b/ly/engraver-init.ly
index d6a478164c81979fc77aa308f9d9ad475bfc4279..d46715e8b5e22d31233b80ec635aba6e8927a53a 100644 (file)
--- a/ly/engraver-init.ly
+++ b/ly/engraver-init.ly
@@ -1,4 +1,4 @@
-\version "1.5.33"
+\version "1.5.49"
 
 %
 % setup for Request->Element conversion. Guru-only
@@ -8,7 +8,6 @@ StaffContext=\translator {
        \type "Engraver_group_engraver"
        \name Staff 
        \consists "Output_property_engraver"    
-       Generic_property_list = #generic-staff-properties
        
        \consists "Bar_engraver"
  % Bar_engraver must be first so default bars aren't overwritten
@@ -32,13 +31,13 @@ StaffContext=\translator {
        \consists "Piano_pedal_engraver"
        \consists "Instrument_name_engraver"
        \consists "Grob_pq_engraver"
-
+       \consists "Forbid_line_break_engraver"
        \consistsend "Axis_group_engraver"
 
 
-       MinimumVerticalExtent = #'(-6 . 6)
-       ExtraVerticalExtent = ##f
-       VerticalExtent = ##f 
+       minimumVerticalExtent = #'(-6 . 6)
+       extraVerticalExtent = ##f
+       verticalExtent = ##f 
        localKeySignature = #'()
 
        % explicitly set instrument, so we don't get 
@@ -55,9 +54,9 @@ StaffContext=\translator {
 StaffContainerContext = \translator {
        \type Engraver_group_engraver
        \consists "Axis_group_engraver"
-       MinimumVerticalExtent = ##f
-       ExtraVerticalExtent = ##f
-       VerticalExtent = ##f 
+       minimumVerticalExtent = ##f
+       extraVerticalExtent = ##f
+       verticalExtent = ##f 
        localKeySignature = #'()
 
        \accepts Staff
@@ -92,10 +91,10 @@ RhythmicStaffContext=\translator{
        
        \consists "Output_property_engraver"    
 
-       Generic_property_list = #generic-staff-properties
-       MinimumVerticalExtent = ##f
-       ExtraVerticalExtent = ##f
-       VerticalExtent = ##f 
+
+       minimumVerticalExtent = ##f
+       extraVerticalExtent = ##f
+       verticalExtent = ##f 
        localKeySignature = #'()
 
        \consists "Pitch_squash_engraver"
@@ -103,16 +102,20 @@ RhythmicStaffContext=\translator{
        \name RhythmicStaff
        \alias "Staff"
        
-       Bar \override #'bar-size = #4
+       BarLine \override #'bar-size = #4
        VoltaBracket \override #'minimum-space =  #15  % urg, in \pt
        VoltaBracket \override #'padding =  #5  % urg, in \pt
        StaffSymbol \override #'line-count = #1 
 
+       Stem \override #'neutral-direction = #1
+       Beam \override #'neutral-direction = #1         
 %      \consists "Repeat_engraver"
+       \consists "Dot_column_engraver"
        \consists "Volta_engraver"
        \consists "Bar_engraver"
        \consists "Time_signature_engraver"
        \consists "Staff_symbol_engraver"
+       \consists "Instrument_name_engraver"
        \consistsend "Axis_group_engraver"
        \accepts "Voice"
 }
@@ -122,7 +125,7 @@ VoiceContext = \translator {
        \type "Engraver_group_engraver"
        \name Voice
 
-       Generic_property_list = #generic-voice-properties
+
        localKeySignature = #'()
        \consists "Font_size_engraver"
        
@@ -132,11 +135,13 @@ VoiceContext = \translator {
        \consists "Arpeggio_engraver"
        \consists "Multi_measure_rest_engraver"
        \consists "Text_spanner_engraver"
-       
+
+       \consists "Ligature_bracket_engraver"
        \consists "Breathing_sign_engraver"
        % \consists "Rest_engraver"
        \consists "Stem_engraver"
        \consists "Beam_engraver"
+       \consists "Grace_beam_engraver"
        \consists "Auto_beam_engraver"
 
        \consists "Chord_tremolo_engraver"
@@ -176,7 +181,7 @@ ThreadContext = \translator{
        \consists "Rest_engraver"
        \consists "Note_head_line_engraver"
        \consists "Output_property_engraver"    
-       Generic_property_list = #generic-thread-properties
+
 }
 
 GrandStaffContext=\translator{
@@ -187,7 +192,7 @@ GrandStaffContext=\translator{
        \consists "Span_arpeggio_engraver"
        \consists "System_start_delimiter_engraver"
        systemStartDelimiter = #'SystemStartBrace
-       Generic_property_list = #generic-grand-staff-properties
+
        \accepts "Staff"
 }
 
@@ -196,15 +201,16 @@ PianoStaffContext = \translator{
        \name "PianoStaff"
        \alias "GrandStaff"
 
+       verticalAlignmentChildCallback = #Align_interface::fixed_distance_alignment_callback
+       VerticalAlignment \override #'forced-distance = #12
+       VerticalAlignment \override #'self-alignment-Y = #0
+
        \consists "Vertical_align_engraver"
        \consists "Instrument_name_engraver"
        
        instrument = #'()
        instr = #'()
        
-       verticalAlignmentChildCallback = #Align_interface::fixed_distance_alignment_callback
-       VerticalAlignment \override #'forced-distance = #12
-       VerticalAlignment \override #'self-alignment-Y = #0
 %      \consistsend "Axis_group_engraver"
 }
 
@@ -223,7 +229,7 @@ InnerStaffGroupContext= \translator {
        \accepts "RhythmicStaff"
        \accepts "GrandStaff"
        \accepts "PianoStaff"
-       
+       \accepts "TabStaff"     
        \accepts "Lyrics"
        \accepts "ChordNames"
 }
@@ -241,9 +247,9 @@ StaffGroupContext = \translator {
 LyricsVoiceContext= \translator{
        \type "Engraver_group_engraver"
        \consistsend "Axis_group_engraver"
-       MinimumVerticalExtent = #(cons -1.2 1.2)
-       ExtraVerticalExtent = ##f
-       VerticalExtent = ##f 
+       minimumVerticalExtent = #(cons -1.2 1.2)
+       extraVerticalExtent = ##f
+       verticalExtent = ##f 
        \name LyricsVoice 
        \consists "Separating_line_group_engraver"
        \consists "Lyric_engraver"
@@ -259,9 +265,9 @@ NoteNamesContext = \translator {
        \name NoteNames
        \consistsend "Axis_group_engraver"
 
-       MinimumVerticalExtent = ##f
-       ExtraVerticalExtent = ##f
-       VerticalExtent = ##f 
+       minimumVerticalExtent = ##f
+       extraVerticalExtent = ##f
+       verticalExtent = ##f 
 
        
        \consists "Note_name_engraver"
@@ -272,12 +278,12 @@ LyricsContext = \translator {
        \type "Engraver_group_engraver"
        \name Lyrics
        \consists Vertical_align_engraver %need this for getting folded repeats right.
-       Generic_property_list = #generic-lyrics-properties
+
 
        \consistsend "Axis_group_engraver"
-       MinimumVerticalExtent = ##f
-       ExtraVerticalExtent = ##f
-       VerticalExtent = ##f 
+       minimumVerticalExtent = ##f
+       extraVerticalExtent = ##f
+       verticalExtent = ##f 
        
        \accepts "LyricsVoice"
 }
@@ -287,7 +293,7 @@ ChordNamesContext = \translator {
        \type "Engraver_group_engraver"
        \name ChordNames
 
-       Generic_property_list = #generic-chord-staff-properties
+
 
 
        \consists "Output_property_engraver"    
@@ -295,11 +301,9 @@ ChordNamesContext = \translator {
        \consists "Chord_name_engraver"
        \consists "Skip_req_swallow_translator"
        \consistsend "Axis_group_engraver"
-       MinimumVerticalExtent = ##f
-       ExtraVerticalExtent = ##f
-       VerticalExtent = ##f 
-
-       VerticalAxisGroup \override #'invisible-staff = ##t
+       minimumVerticalExtent = ##f
+       extraVerticalExtent = ##f
+       verticalExtent = ##f 
        }
 
 
@@ -349,6 +353,7 @@ ScoreContext = \translator {
        \consists "Span_arpeggio_engraver"
 
        \accepts "Staff"
+       \accepts "TabStaff"
        \accepts "StaffContainer"
        \accepts "StaffGroup"
        \accepts "RhythmicStaff"        
@@ -377,13 +382,14 @@ ScoreContext = \translator {
        centralCPosition = #-6
        
         automaticPhrasing = ##t
-
+       automaticMelismata = ##t
+       
        defaultBarType = #"|"
 
        explicitClefVisibility = #all-visible
        explicitKeySignatureVisibility = #all-visible
        autoBeamSettings = #auto-beam-settings
-
+       autoBeaming = ##t
        scriptDefinitions = #default-script-alist
 
        verticalAlignmentChildCallback = #Align_interface::alignment_callback
@@ -412,6 +418,7 @@ ScoreContext = \translator {
        breakAlignOrder = #'(
          instrument-name
          left-edge
+         ambitus
          span-bar
          breathing-sign
          clef
@@ -420,7 +427,7 @@ ScoreContext = \translator {
          time-signature
          custos
        )
-
+       barCheckSynchronize = ##t
 
        \grobdescriptions #all-grob-descriptions
 }
@@ -444,3 +451,50 @@ FiguredBassContext = \translator {
        \consists "Figured_bass_engraver"       
        \consistsend "Axis_group_engraver"
 }
+
+
+TabVoiceContext =   \translator {
+      \VoiceContext
+      \name "TabVoice"
+      \denies "Thread"
+      \consists "Tab_note_heads_engraver"
+
+      % Draws all stems/beams out of the staff (and not in the middle of the staff !)
+      Beam \override #'damping = #100000
+      Stem \override #'up-to-staff = ##t
+
+      % No accidental in tablature !
+      \remove Accidental_engraver
+      Accidental  = \turnOff 
+}
+
+TabStaffContext = \translator {
+      \StaffContext
+      \alias "Staff"
+      \name "TabStaff"
+      \denies "Voice"
+      \accepts "TabVoice"
+      
+      % 6 strings
+      StaffSymbol \override #'line-count  = #6
+      StaffSymbol \override #'staff-space = #1.5
+      
+      % One may change the strings tuning as following :
+      % The lenght of the list must be equal to the number of string
+      %TabNoteHead \override #'string-tunings = #'(10 10 10 10 10 10)
+      
+      % Special "TAB" clef
+      clefGlyph = #"clefs-tab"
+      clefPosition = #0
+      
+      % Don't draw stems over the tabature figures !
+      Stem \override #'avoid-note-head = ##t
+      
+      % No accidental in tablature !
+      \remove Accidental_engraver
+      Accidental  = \turnOff 
+      
+      stringTunings   = #'(-20 -15 -10 -5 -1 4)
+      tablatureFormat = #fret-number-tablature-format
+}
+