X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Fperformer-init.ly;h=fdfa7add3c69ee58dc6c18b0a8ce47dfa447b5cf;hb=4476f6dd7300bb84f6eac756ebcd8c3a1c96125c;hp=9255018689bc8ab9e52083f997822e12fb66a842;hpb=5a37dd7a016f89d56495aeaf6e3a8889e3852584;p=lilypond.git diff --git a/ly/performer-init.ly b/ly/performer-init.ly index 9255018689..fdfa7add3c 100644 --- a/ly/performer-init.ly +++ b/ly/performer-init.ly @@ -1,149 +1,299 @@ -\version "2.1.19" - - % - % setup for Request->Element conversion. Guru-only - % -\translator { - \type "Staff_performer" - \name Staff - \accepts Voice +%%%% This file is part of LilyPond, the GNU music typesetter. +%%%% +%%%% Copyright (C) 1996--2012 Han-Wen Nienhuys +%%%% Jan Nieuwenhuizen +%%%% +%%%% LilyPond is free software: you can redistribute it and/or modify +%%%% it under the terms of the GNU General Public License as published by +%%%% the Free Software Foundation, either version 3 of the License, or +%%%% (at your option) any later version. +%%%% +%%%% LilyPond is distributed in the hope that it will be useful, +%%%% but WITHOUT ANY WARRANTY; without even the implied warranty of +%%%% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%%%% GNU General Public License for more details. +%%%% +%%%% You should have received a copy of the GNU General Public License +%%%% along with LilyPond. If not, see . - \consists "Key_performer" - \consists "Tempo_performer" - \consists "Time_signature_performer" - -} -\translator { - \StaffContext - \name DrumStaff - midiInstrument = #"drums" - \accepts DrumVoice -} - -\translator { - \type "Performer_group_performer" - \name Voice - \consists "Dynamic_performer" - \consists "Span_dynamic_performer" - \consists "Tie_performer" - \consists "Piano_pedal_performer" +\version "2.15.39" + +%% +%% setup for Request->Element conversion. +%% +\context { + \type "Performer_group" + \name Staff + \accepts Voice + \accepts CueVoice + \defaultchild Voice + + \consists "Staff_performer" + \consists "Key_performer" } -\translator { - \VoiceContext - \remove "Note_performer" - \consists "Drum_note_performer" - \name DrumVoice +\context { + \name Global + \accepts Score + \description "Hard coded entry point for LilyPond. Cannot be tuned." + EventClasses = #all-event-classes } -\translator { - \type "Performer_group_performer" - \name Voice - \consists "Note_performer" +\context { + \type "Performer_group" + \name KievanStaff + \denies Voice + \accepts KievanVoice + \defaultchild KievanVoice + \alias Staff + \consists "Staff_performer" + \consists "Key_performer" } -\translator { - \type "Performer_group_performer" - \name FiguredBass - \consists "Swallow_performer" +\context { + \type "Performer_group" + \name VaticanaStaff + \alias Staff + \denies Voice + \accepts VaticanaVoice + \defaultchild VaticanaVoice + \consists "Staff_performer" + \consists "Key_performer" } -\translator { - \type "Performer_group_performer" - \name GrandStaff - \accepts RhythmicStaff - \accepts Staff +\context { + \type "Performer_group" + \name MensuralStaff + \denies Voice + \accepts MensuralVoice + \defaultchild MensuralVoice + \alias Staff + \consists "Staff_performer" + \consists "Key_performer" } -\translator { - \type "Performer_group_performer" - \name "PianoStaff" - \accepts Staff - \accepts DrumStaff +\context { + \Staff + \name DrumStaff + midiInstrument = #"drums" + \accepts DrumVoice + \defaultchild DrumVoice } -\translator { - \type "Performer_group_performer" - \name "TabVoice" - \consists "Swallow_performer" +\context { + \type "Performer_group" + \name Voice + \consists "Dynamic_performer" + \consists "Tie_performer" + \consists "Piano_pedal_performer" + \consists "Note_performer" + \consists "Beam_performer" + \consists "Slur_performer" } -\translator { - \type "Performer_group_performer" - \name "Devnull" - \consists "Swallow_performer" +\context { + \Voice + \name CueVoice + \alias Voice } -\translator { - \type "Performer_group_performer" - \name "TabStaff" - \accepts "TabVoice" + +\context { + \type "Performer_group" + \name VaticanaVoice + \alias Voice + \consists "Dynamic_performer" + \consists "Tie_performer" + \consists "Note_performer" + \consists "Beam_performer" + \consists "Slur_performer" } -\translator { - \type "Score_performer" +\context { + \type "Performer_group" + \name KievanVoice + \alias Voice + \consists "Dynamic_performer" + \consists "Tie_performer" + \consists "Note_performer" + \consists "Beam_performer" + \consists "Slur_performer" +} - \name Score - \alias Timing - instrument = #"bright acoustic" - \accepts Staff - \accepts DrumStaff - \accepts GrandStaff - \accepts PianoStaff - \accepts TabStaff - \accepts Staff - \accepts StaffGroup - \accepts Devnull - \accepts ChoirStaff - \accepts RhythmicStaff - \accepts ChordNames - \accepts FiguredBass - \accepts LyricsVoice - \alias "Timing" - \consists "Timing_translator" - \consists "Swallow_performer" - - dynamicAbsoluteVolumeFunction = #default-dynamic-absolute-volume - instrumentEqualizer = #default-instrument-equalizer - drumPitchTable = #(alist->hash-table midiDrumPitches) +\context { + \type "Performer_group" + \name MensuralVoice + \alias Voice + \consists "Dynamic_performer" + \consists "Tie_performer" + \consists "Note_performer" + \consists "Beam_performer" + \consists "Slur_performer" } +\context { + \Voice + \remove "Note_performer" + \consists "Drum_note_performer" + \name DrumVoice +} -\translator { - \type "Staff_performer" % Performer_group_performer ? - \consists "Lyric_performer" - \name LyricsVoice - \consists "Time_signature_performer" - \consists "Tempo_performer" +\context { + \type "Performer_group" + \name FiguredBass } -\translator{ - \type "Performer_group_performer" - \name ChoirStaff - \accepts Staff - \accepts DrumStaff +\context { + \type "Performer_group" + \name FretBoards } +\context { + \type "Performer_group" + \name GrandStaff + \accepts RhythmicStaff + \accepts Staff + \accepts Dynamics + \defaultchild Staff +} -\translator { - \type "Staff_performer" - \accepts ChordNameVoice - \name ChordNames +\context { + \type "Performer_group" + \name "PianoStaff" + \accepts Staff + \accepts DrumStaff + \defaultchild Staff } -\translator { - \type "Performer_group_performer" - \consists "Note_performer" - \name ChordNameVoice +\context { + \Voice + \name TabVoice } -\translator { - \type "Performer_group_performer" +\context { + \type "Performer_group" + \name "Devnull" +} - \name StaffGroup - \accepts Staff - \accepts DrumStaff +\context { + \Staff + \name TabStaff + midiInstrument = #"acoustic guitar (nylon)" + \alias Staff + \accepts TabVoice + \defaultchild TabVoice } -\translator { \StaffContext \name RhythmicStaff } +\context { + \type "Score_performer" + + \name Score + + melismaBusyProperties = #default-melisma-properties + instrumentName = #"bright acoustic" + midiChannelMapping = #'staff + + %% quarter = 60 + tempoWholesPerMinute = #(ly:make-moment 15 1) + + \accepts Staff + \accepts DrumStaff + \accepts GrandStaff + \accepts PianoStaff + \accepts TabStaff + \accepts StaffGroup + \accepts Devnull + \accepts ChoirStaff + \accepts RhythmicStaff + \accepts ChordNames + \accepts FiguredBass + \accepts FretBoards + \accepts Lyrics + \accepts VaticanaStaff + \accepts KievanStaff + \accepts MensuralStaff + + \consists "Time_signature_performer" + \consists "Control_track_performer" + \consists "Tempo_performer" + + \alias "Timing" + + %% An alias for Timing is established by the Timing_translator in + %% whatever context it is initialized, and the timing variables are + %% then copied from wherever Timing had been previously established. + %% The alias at Score level provides a target for initializing + %% Timing variables in layout definitions before any + %% Timing_translator has been run. + + timeSignatureFraction = 4/4 + +%% These defaults should be the same as the rules established in +%% scm/time-signature-settings.scm for 4/4 time + measureLength = #(ly:make-moment 4 4) + baseMoment = #(ly:make-moment 1 4) + + \consists "Timing_translator" + \defaultchild "Staff" + dynamicAbsoluteVolumeFunction = #default-dynamic-absolute-volume + instrumentEqualizer = #default-instrument-equalizer + drumPitchTable = #(alist->hash-table midiDrumPitches) + timing = ##t +} + + +\context { + \type "Performer_group" + \consists "Staff_performer" % Performer_group ? + \consists "Lyric_performer" + \name Lyrics +} + +\context{ + \type "Performer_group" + \name ChoirStaff + \accepts Staff + \accepts DrumStaff + \defaultchild Staff +} + +\context { + \type "Performer_group" + \consists "Staff_performer" + \accepts ChordNameVoice + \name ChordNames +} + +\context { + \type "Performer_group" + \consists "Note_performer" + \name ChordNameVoice +} + +\context { + \type "Performer_group" + \name StaffGroup + \accepts Staff + \accepts DrumStaff + \accepts TabStaff + \accepts RhythmicStaff + \accepts GrandStaff + \accepts PianoStaff + \accepts Lyrics + \accepts ChordNames + \accepts FiguredBass + \accepts FretBoards + \defaultchild Staff +} + +\context { + \Staff + \name RhythmicStaff +} + +\context { + \type "Performer_group" + \name Dynamics + \consists "Piano_pedal_performer" +}