]> git.donarmstrong.com Git - lilypond.git/blobdiff - ly/engraver.ly
release: 1.3.57
[lilypond.git] / ly / engraver.ly
index c60ee1a5104525f7cbfbf417e214b1aa81398948..ba8064a1040050db5a6067b634a0c9e5a5e7f62d 100644 (file)
@@ -23,52 +23,28 @@ StaffContext=\translator {
 
        \consists "Repeat_engraver";
 
-       staffSymbolBasicProperties = #'(
-        (staff-space . 1.0 )
-        (line-count . 5 )
-        )
-        basicTimeSignatureProperties = #`(
-         (break-align-symbol . Time_signature)
-         (visibility-lambda . ,all-visible)
-         (breakable . #t)
-        )
-        basicBarlineProperties = #`(
-          (break-align-symbol . Staff_bar)
-          (visibility-lambda . `begin-of-line-invisible)
-          (breakable . #t)
-          )
-
-        basicKeyProperties = #`(
-         (break-align-symbol . Key_item)
-         (visibility-lambda . ,begin-of-line-visible)
-         (breakable . #t)
-         )      
-        basicClefItemProperties = #`(
-          (breakable . #t)
-          (break-align-symbol . Clef_item)
-          (visibility-lambda . ,begin-of-line-visible) 
-        )
 
        %  name, glyph id, c0 position
        supportedClefTypes = #'(
-         ("treble" . ("G" -2))
-         ("violin" . ("G" -2))
-         ("G" . ("G" -2))
-         ("G2" . ("G" -2))
-         ("french" . ("G" -4 ))
-         ("soprano" . ("C" -4 ))
-         ("mezzosoprano" . ("C" -2 ))
-         ("alto" . ("C" 0 ))
-         ("tenor" . ("C" 2 ))
-         ("baritone" . ("C" 4 ))
-         ("varbaritone"  . ("F" 0))
-         ("bass" . ("F" 2 ))
-         ("F" . ( "F" 2))
-         ("subbass" . ("F" 4))
-       )
-       clefPitches = #'(("G" . -4)
-         ("C" . 0)
-         ("F" . 4))
+         ("treble" . ("clefs-G" -2))
+         ("violin" . ("clefs-G" -2))
+         ("G" . ("clefs-G" -2))
+         ("G2" . ("clefs-G" -2))
+         ("french" . ("clefs-G" -4 ))
+         ("soprano" . ("clefs-C" -4 ))
+         ("mezzosoprano" . ("clefs-C" -2 ))
+         ("alto" . ("clefs-C" 0 ))
+         ("tenor" . ("clefs-C" 2 ))
+         ("baritone" . ("clefs-C" 4 ))
+         ("varbaritone"  . ("clefs-F" 0))
+         ("bass" . ("clefs-F" 2 ))
+         ("F" . ( "clefs-F" 2))
+         ("subbass" . ("clefs-F" 4))
+       )
+       % where is c0 in this clef?
+       clefPitches = #'(("clefs-G" . -4)
+         ("clefs-C" . 0)
+         ("clefs-F" . 4))
          
        \consists "Clef_engraver";
        \consists "Key_engraver";
@@ -170,6 +146,7 @@ VoiceContext = \translator {
        textScriptPadding = #3.0
        \consists "Text_engraver";
 
+
        startSustain = #"Ped."
        stopSustain = #"*"
        stopStartSustain = #"*Ped."
@@ -403,6 +380,184 @@ ScoreContext = \translator {
        defaultBarType = #"|"
        systemStartDelimiterGlyph = #'bar-line
 
+       %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+       % default settings, mainly for breakable items
+       % in alphabetical order
+       %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+       basicBarlineProperties = #`(
+               (break-align-symbol . Staff_bar)
+               (molecule-callback . ,Bar::scheme_molecule)        
+               (visibility-lambda . ,begin-of-line-invisible)
+               (breakable . #t)
+       )
+
+       basicBarNumberProperties = #`(
+               (molecule-callback . ,Text_item::scheme_molecule)
+               (breakable . #t)
+               (visibility-lambda . ,begin-of-line-visible)
+       )
+
+       basicBeamProperties = #`(
+               (molecule-callback . ,Beam::scheme_molecule)
+               (beam-thickness . 0.42) ; interline!
+       )
+
+       basicBreakAlignProperties = #`(
+               (breakable . #t)
+       )
+
+       
+       basicBreathingSignProperties = #`(
+               (break-align-symbol . Breathing_sign)
+               (breakable . #t )
+               (molecule-callback . ,Breathing_sign::scheme_molecule)
+               (visibility-lambda . ,begin-of-line-invisible)
+       )
+        basicClefItemProperties = #`(
+          (molecule-callback . ,Score_element::scheme_molecule)
+          (breakable . #t)
+          (break-align-symbol . Clef_item)
+          (visibility-lambda . ,begin-of-line-visible) 
+        )
+       basicSlurProperties = #`(
+               (molecule-callback . ,Slur::scheme_molecule)
+       )
+       basicChordNameProperties = #`(
+               (molecule-callback . ,Chord_name::scheme_molecule)
+       )
+       basicCollisionProperties = #`(
+               (axes 0 1)
+       )
+       basicCrescendoProperties = #`(
+               (molecule-callback . ,Crescendo::scheme_molecule)
+       )
+       basicDotsProperties = #`(
+               (molecule-callback . ,Dots::scheme_molecule)
+       )
+       basicDynamicLineSpannerProperties = #`(
+
+       )
+       basicDynamicTextProperties       = # `(
+               (style . "dynamic")
+               (molecule-callback . ,Text_item::scheme_molecule)
+               (script-priority . 100)
+               (self-alignment-Y . 0)
+       )
+       leftEdgeBasicProperties = #`(
+         (break-align-symbol . Left_edge_item)
+         (breakable . #t)
+       )
+       basicHyphenSpannerProperties = #`(
+               (molecule-callback . ,Hyphen_spanner::scheme_molecule)
+       )
+       basicKeyProperties = #`(
+         (molecule-callback . ,Key_item::scheme_molecule)
+         (break-align-symbol . Key_item)
+         (visibility-lambda . ,begin-of-line-visible)
+         (breakable . #t)
+         )     
+       basicLocalKeyProperties = #`(
+               (molecule-callback . ,Local_key_item::scheme_molecule)
+               (left-padding . 0.2)
+               (right-padding . 0.4)
+       )
+       basicLyricExtenderProperties = #`(
+               (molecule-callback . ,Lyric_extender::scheme_molecule)
+       )
+       basicLyricTextProperties = #`(
+               (molecule-callback . ,Text_item::scheme_molecule)
+               (non-rhythmic . #t)
+       )
+       basicMarkProperties = #`(
+         (molecule-callback . ,Text_item::scheme_molecule)     
+         (breakable . #t)
+         (visibility-lambda . ,end-of-line-invisible)
+       )
+       basicMultiMeasureRestProperties = #`(
+               (molecule-callback . ,Multi_measure_rest::scheme_molecule)
+               (staff-position . 0)
+       )
+       basicNoteColumnProperties = #`(
+               (axes 0 1)
+       )
+       basicNoteHeadProperties = #`(
+               (molecule-callback . ,Note_head::scheme_molecule)
+       )
+       basicOctavateEightProperties  = #`(
+               (self-alignment-X . 0)
+               (text . "8")
+               (visibility-lambda . ,begin-of-line-visible) 
+               (molecule-callback . ,Text_item::scheme_molecule)
+               (style . "italic")
+       )
+       basicTextProperties = #`( )
+       basicRestProperties = #`( 
+               (molecule-callback . ,Rest::scheme_molecule)
+       )
+       
+       basicRestCollisionProperties = #`(
+       )
+       basicScriptProperties    = #`(
+               (molecule-callback . ,Script::scheme_molecule)
+       )
+               
+       basicSlurProperties = #`(
+               (molecule-callback . ,Slur::scheme_molecule)
+       )
+
+       basicSystemStartDelimiterProperties = #`(
+               (molecule-callback . ,System_start_delimiter::scheme_molecule)
+               (collapse-height . 1.0)
+       )
+       basicStemProperties = #`(
+               (molecule-callback . ,Stem::scheme_molecule)
+       )
+       staffSymbolBasicProperties = #`(
+               (molecule-callback . ,Staff_symbol::scheme_molecule)
+               (staff-space . 1.0 )
+               (line-count . 5 )
+       )
+       basicTextScriptProperties = #`(
+               (molecule-callback . ,Text_item::scheme_molecule)
+               (no-spacing-rods . #t)
+       )
+       basicTimeSignatureProperties = #`(
+               (molecule-callback . ,Time_signature::scheme_molecule)
+               (break-align-symbol . Time_signature)
+               (visibility-lambda . ,all-visible)
+               (breakable . #t)
+       )
+       basicTieProperties = #`(
+               (molecule-callback . ,Tie::scheme_molecule)
+       )
+       basicTieColumnProperties = #`(
+               
+       )
+       basicTupletSpannerProperties = #`(
+               (molecule-callback . ,Tuplet_spanner::scheme_molecule)
+       )       
+       basicStemTremoloProperties = #`(
+               (molecule-callback . ,Stem_tremolo::scheme_molecule)
+               (beam-width . 4.0) ; interline!
+               (beam-thickness . 0.42) ; interline!            
+       )
+
+       basicSingleMaltGroupingItemProperties = #`(
+
+       )
+       basicInstrumentNameProperties = #`(
+               (breakable . #t)
+               (molecule-callback . ,Text_item::scheme_molecule)               
+               (break-align-symbol . Instrument_name)
+               (visibility-lambda . ,begin-of-line-visible)
+       )
+       basicVerticalAxisGroupProperties = #`(
+               (axes 1)
+       )
+       basicVoltaSpannerProperties = #`(
+               (molecule-callback . ,Volta_spanner::scheme_molecule)
+       )
+       
        \accepts "Staff";
        \accepts "StaffGroup";
        \accepts "RhythmicStaff";       
@@ -415,7 +570,6 @@ ScoreContext = \translator {
 
 
        markVisibilityFunction = #end-of-line-invisible
-       barNumberVisibilityFunction = #begin-of-line-visible
 };
 
 \translator { \ScoreContext }