X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Fperformer-init.ly;h=24f0da2b81b567496217cbce4f1b29c883a3bf0c;hb=ba3045ce76cd37a4e11fd775fa04ce4b7586ad77;hp=26796cbaa0178edb574047dfb060661810cfa7f4;hpb=ecaf73bb03e974018c17e3051b3ac3a805dd1653;p=lilypond.git

diff --git a/ly/performer-init.ly b/ly/performer-init.ly
index 26796cbaa0..24f0da2b81 100644
--- a/ly/performer-init.ly
+++ b/ly/performer-init.ly
@@ -1,98 +1,124 @@
-\version "2.1.28"
+\version "2.10.0"
 
-				%
-				% setup for Request->Element conversion. Guru-only
-				%
-\translator {
-    \type "Staff_performer"
+%%
+%% setup for Request->Element conversion. 
+%%
+\context {
+    \type "Performer_group"
     \name Staff
     \accepts Voice
-
+    \accepts CueVoice
+    \defaultchild Voice
+    
+    \consists "Staff_performer"
     \consists "Key_performer"
-    \consists "Tempo_performer"
-    \consists "Time_signature_performer"
 }
-\translator {
+\context {
     \name Global
     \accepts Score
 \description "Hard coded entry point for LilyPond. Cannot be tuned."
     }
-\translator {
-    \StaffContext
+
+\context {
+    \Staff
     \name DrumStaff
     midiInstrument = #"drums"
     \accepts DrumVoice
+    \defaultchild DrumVoice
 }
 
-\translator {
-    \type "Performer_group_performer"
+\context {
+    \type "Performer_group"
     \name Voice
-    \consists "Dynamic_performer"
+    % The order of the dynamic performers is significant: absolute dynamic events must override crescendo events in midi.
     \consists "Span_dynamic_performer"
+    \consists "Dynamic_performer"
     \consists "Tie_performer"
     \consists "Piano_pedal_performer"
+    \consists "Note_performer"
+    \consists "Beam_performer"
+    \consists "Slur_performer"
 }
 
-\translator {
-    \VoiceContext
+\context {
+  \Voice
+  \name CueVoice
+  \alias Voice
+}
+
+\context {
+  \Voice
+  \name VaticanaVoice
+  \alias Voice
+}
+
+\context {
+    \Voice
     \remove "Note_performer"
     \consists "Drum_note_performer" 
     \name DrumVoice
 }
 
-\translator {
-    \type "Performer_group_performer"
-    \name Voice
-    \consists "Note_performer"
-    \consists "Beam_performer"
-    \consists "Slur_performer"
-    \consists "Melisma_translator"
-}
-
-\translator {
-    \type "Performer_group_performer"
+\context {
+    \type "Performer_group"
     \name FiguredBass 
     \consists "Swallow_performer"
 }
 
-\translator {
-    \type "Performer_group_performer"
+\context {
+    \type "Performer_group"
     \name GrandStaff
     \accepts RhythmicStaff
     \accepts Staff
+    \defaultchild Staff
 }
 
-\translator {
-    \type "Performer_group_performer"
+\context {
+    \type "Performer_group"
     \name "PianoStaff"
     \accepts Staff
     \accepts DrumStaff
+    \defaultchild Staff
 }
 
-\translator {
-    \type "Performer_group_performer"
+\context {
+    \type "Performer_group"
     \name "TabVoice"
     \consists "Swallow_performer"
 }
 
-\translator {
-    \type "Performer_group_performer"
+\context {
+    \type "Performer_group"
     \name "Devnull"
     \consists "Swallow_performer"
 }
-\translator {
-    \type "Performer_group_performer"
+\context {
+    \type "Performer_group"
     \name "TabStaff"
     \accepts "TabVoice"
+    \defaultchild "TabVoice"
 }
 
-\translator {
+\context {
+    \type "Performer_group"
+    \name "VaticanaStaff"
+    \alias "Staff"
+    \denies "Voice"
+    \accepts "VaticanaVoice"
+    \defaultchild "VaticanaVoice"
+}
+
+\context {
     \type "Score_performer"
 
     \name Score
-    \alias Timing
+    
     melismaBusyProperties = #default-melisma-properties
-    instrument = #"bright acoustic"
+    instrumentName = #"bright acoustic"
+
+    %% quarter = 60
+    tempoWholesPerMinute = #(ly:make-moment 15 1)
+    
     \accepts Staff
     \accepts DrumStaff
     \accepts GrandStaff
@@ -106,52 +132,71 @@
     \accepts ChordNames
     \accepts FiguredBass
     \accepts Lyrics
-    \alias "Timing"
+    \accepts VaticanaStaff
+
+    \consists "Time_signature_performer"
+    \consists "Control_track_performer"
+    \consists "Tempo_performer"
     \consists "Timing_translator"
     \consists "Swallow_performer"
     
+    \defaultchild "Staff"
+    
     dynamicAbsoluteVolumeFunction = #default-dynamic-absolute-volume
     instrumentEqualizer = #default-instrument-equalizer
-    drumPitchTable = #(alist->hash-table midiDrumPitches) 
+    drumPitchTable = #(alist->hash-table midiDrumPitches)
+    timing = ##t 
 }
 
 
-\translator {
-    \type "Staff_performer" % Performer_group_performer ?
+\context {
+    \type "Performer_group"
+    \consists "Staff_performer" % Performer_group ?
     \consists "Lyric_performer"
     \name Lyrics
-    \consists "Time_signature_performer"
-    \consists "Tempo_performer"
 }
 
-\translator{
-    \type "Performer_group_performer"
+\context{
+    \type "Performer_group"
     \name ChoirStaff
     \accepts Staff
     \accepts DrumStaff
+    \defaultchild Staff
+
 }
 
 
-\translator {
-    \type "Staff_performer"
+
+\context {
+    \type "Performer_group"
+    \consists "Staff_performer"
     \accepts ChordNameVoice
     \name ChordNames
 }
 
-\translator {
-    \type "Performer_group_performer"
+\context {
+    \type "Performer_group"
     \consists "Note_performer"
     \name ChordNameVoice	
 }
 
-\translator {
-    \type "Performer_group_performer"
+\context {
+    \type "Performer_group"
 
     \name StaffGroup
     \accepts Staff
     \accepts DrumStaff
+    \accepts TabStaff
+    \accepts RhythmicStaff
+    \accepts GrandStaff
+    \accepts PianoStaff
+    \accepts Lyrics
+    \accepts ChordNames
+    \accepts FiguredBass
+
+    \defaultchild Staff
 }
 
-\translator { \StaffContext \name RhythmicStaff }
+\context { \Staff \name RhythmicStaff }