o fU@slddlmZddlZddlZddlZddlZddlZddlZddlZ da da da da ddZGdddZGd d d eZGd d d Zd dZddZddZddZddZddZddZddZddZdd Zd!d"Zd#d$Zd%d&Zd'd(Z d)d*Z!d+d,Z"d-d.Z#d/d0Z$d1d2Z%d3d4Z&d5d6Z'd7d8Z(d9d:Z)d;d<Z*ea+Gd=d>d>Z,Gd?d@d@Z-GdAdBdBe-Z.GdCdDdDe.Z/GdEdFdFe.Z0GdGdHdHe.Z1GdIdJdJe-Z2GdKdLdLe2Z3GdMdNdNZ4GdOdPdPZ5GdQdRdRZ6GdSdTdTZ7GdUdVdVZ8GdWdXdXe2Z9GdYdZdZe-Z:Gd[d\d\e-Z;Gd]d^d^e-ZGdcdddde<Z?Gdedfdfe=Z@Gdgdhdhe=ZAGdidjdje=ZBGdkdldle=ZCGdmdndne=ZDGdodpdpe=ZEGdqdrdre=ZFGdsdtdte=ZGGdudvdve<ZHGdwdxdxe<ZIGdydzdze=ZJGd{d|d|e<ZKGd}d~d~e<ZLGdddeLZMGddde<ZNGddde<ZOGdddeOZPGdddeOZQGdddePZRGdddeRZSGddde-ZTGddde2ZUGddde<ZVGdddeVZWGddde<ZXGddde<ZYGddde<ZZGdddZ[GdddZ\Gddde<Z]GdddeOZ^GdddeOZ_Gddde<Z`Gddde`ZaGddde`ZbGddde`ZcGddde-ZdGddde.ZeGddde-ZfGddde-ZgGddde-ZhGddde-ZiGddde-ZjGddde-ZkGddde-ZlGddde-ZmGdd„de2ZnGddĄde-ZoGddƄde-ZpGddȄdȃZqGddʄdeqZrGdd̄derZsGdd΄derZtGddЄderZuGdd҄d҃ZvddԄZwddքZxdd؄Zyezdkr4exeweyZ{e{|ede{}eeddڃZ~eddۃZe~efdd݄Zee{edSdS)FractionNFcCsf|dd}td|r+td}||}d}|D] }|d|d7}q|d7}|Sd|d}|S) N"z\"z .*[ ]+.*z[\n\r]+z\markup { \center-column { z\line {"z"} z} })replacerematchcompilesplit)Z input_stringZ retstringZrxstringssr ]/home/lily/lilypond-2.24.4/release/binaries/mingw/lilypond/lilypond-2.24.4/python/musicexp.pyescape_instrument_string(s     rc@eZdZddZddZdS)Output_stack_elementcCstd|_dS)N)rfactorselfr r r__init__7zOutput_stack_element.__init__cCst}|j|_|SN)rr)ror r rcopy:szOutput_stack_element.copyN)__name__ __module__ __qualname__rrr r r rr6s rc@seZdZdZddZddZddZdd Zd d Zd d Z ddZ ddZ ddZ ddZ ddZddZddZddZddZd d!Zd"d#Zd$S)%Output_printerzf A class that takes care of formatting (eg.: indenting) a Music expression as a .ly file. cCs:d|_d|_d|_tj|_d|_tg|_d|_ d|_ dS)NrrHF) _line_indent_nestingsysstdout_file _line_lenr_output_state_stack _skipspace_last_durationrr r rrFs  zOutput_printer.__init__cC ||_dSr)r&)rfiler r rset_fileP zOutput_printer.set_filecCs|d|d|dS)Nz \version "r)print_verbatimnewline)rversionr r r dump_versionSs zOutput_printer.dump_versioncCs |j|jSr)r#r"rr r r get_indentW zOutput_printer.get_indentcCs|jd}|j|dSN)r(appendr)rZlastr r roverrideZs zOutput_printer.overridecCs ||jdj|9_dSr5)r8r(r)rrr r r add_factor^szOutput_printer.add_factorcCs|jd=|js tddS)Nr6z empty stack)r( RuntimeErrorrr r rrevertbszOutput_printer.revertcCs |jdjSr5)r(rrr r rduration_factorgr4zOutput_printer.duration_factorcCs|j|7_dSr)r!rr r r rr/jzOutput_printer.print_verbatimcCs|j|d|d|d|d7_|j|d|d|d|d|d |d |d 8_||dS) N<\<<<{>\>>>z->z_>z^>})r#countr/r=r r runformatted_outputms""z!Output_printer.unformatted_outputcCs|j|krdS||dSr)r*rHr=r r rprint_duration_stringxs z$Output_printer.print_duration_stringcCsRt|dt|j|jkr|d|_|js|jd7_||d|_dS)NrT F)lenr!r'r0r)rHr=r r radd_words  zOutput_printer.add_wordcCs.|j|jdd|j|j|_d|_dS)N rJT)r&writer!r"r#r)rr r rr0s zOutput_printer.newlinecCs d|_dSNT)r)rr r r skipspacer.zOutput_printer.skipspacecCs||dSr)dump)rargr r r__call__rzOutput_printer.__call__cCs<|jr d|_||dSt|}|D]}||qdSNF)r)rH utilitiesZ1split_string_and_preserve_doublequoted_substringsrL)rr Zwordswr r rrQs zOutput_printer.dumpcCs||jd|_dSr)r0r&closerr r rrWs  zOutput_printer.closeN)rrr__doc__rr-r2r3r8r9r;r<r/rHrIrLr0rPrSrQrWr r r rr@s&    rc@sFeZdZddZddZdddZd d Zd d Zd dZddZ dS)DurationcCsd|_d|_td|_dSNrr) duration_logdotsrrrr r rrszDuration.__init__cCsd|j|j|jj|jjfS)Nz(ly:make-duration %d %d %d %d))r[r\r numerator denominatorrr r rlisp_expressions zDuration.lisp_expressionNFcCs|s|j}|jdkr|rddd}nddd}||jd}ndd |j>}|d |j7}|td d krK|jd krD|d |j|jf7}n|d |j7}|rSt|a |S) NrZbreveZlonga)r6z\brevez\longa1z%dr.z*%d/%dz*%d) rr[getr\rr^r]isdigitintly_dur)rrZ scheme_modeZ longer_dictdur_strr r r ly_expressions     zDuration.ly_expressioncCs"||j|}||dSr)rhrr<rI)r outputterrgr r rprint_lyszDuration.print_lycC|Srrhrr r r__repr__zDuration.__repr__cCs"t}|j|_|j|_|j|_|Sr)rYr\r[r)rdr r rrs z Duration.copycCs\tdd|j>dd|j>}t|j}d|>}|jdkr"t|}ntd|}|||jSNrr)rr\absr[r)rZdot_factlogdurbaser r r get_lengths    zDuration.get_lengthrT) rrrrr_rhrjrmrrur r r rrYs  rYcCs|adS)z Implement the midi command line option '-m' and '--midi'. If True, add midi-block to .ly file (see L{musicexp.Score.print_ly}). @param option: Indicates whether the midi-block has to be added or not. @type option: boolean N) midi_optionZoptionr r rset_create_midis rxcCsztWSty YdSw)zy Return, if exists the state of the midi-option. @return: The state of the midi-option. @rtype: boolean F)rv NameErrorr r r rget_create_midis  rzcC|adSr)transpose_optionrwr r r set_transpose r}cCsdz|dkr dtWS|dkrtt}|WSWdSty1|dkr'YdS|dkr.YdSYdSw)Nstringz\transpose c %sintegerrr)r|generic_tone_to_pitch semitones Exception)ZoptTypepr r r get_transposes   rcCr{r)tab_clef_optionrwr r r set_tab_clef r~rcC0z dtftdkp tdkWStyYdSw)NZtabZ moderntab)rryr r r r get_tab_clef%  rcCr{r)string_numbers_optionrwr r rset_string_numbers.r~rcCr)Ntf)rryr r r rget_string_numbers3rrcCsdddddddd}t}|}|d|d|_|dd dd }t|dtd d d |_||ddd|_ |S) Nrr6r`r)resr ZesesZsesisZisis',ra) PitchstriplowerrGoctaverordsteprc alteration)ZtoneZaccidentals_dictrZtone_r r rr:s rcCs||j}t|j}|dkr||d| 7}n |jdkr%||d|7}||jkr`d|ddvr;ttd|Sz||d|dd|j|7}W|Sty_ttdY|Sw|S)Nrrz;Language does not support microtones contained in the piecer)?)rrerlywarning_KeyError)pitchZ notenamesZ accidentalsr Z halftonesr r r pitch_genericOs0      rcCs4t|gdgd}d|vr|S|ddddS)Ncroergrbrehihrhaesaseesrrrrr r r r pitch_generalercCt|Sr)r)rr r rpitch_nederlandsmrnrcCs8t|gdgd}|ddddddddS) Ndormifasollasi)rZqbZqdroZbqtqZdqZbtrZdtrrr r r pitch_catalanq$rcCsLt|gdgd}|dkrdS|ddkr |ddddS|d dS) NrrorrrrrrhesrrrrZaaZeerrr r r pitch_deutschws   rcCs8t|gdgd}|d|ddddddS)Nr)rZqfZqsr rrZfqrZsqrrr r r pitch_englishrrcCs(t|gdgd}|ddddS)Nr)rcbZcsr ZbcZtcZscrrr r r pitch_espanolrcCt|gdgd}|S)N)rurérrrrrrZsbZsdrorrr r rpitch_francaisrcCr)Nrrrrr r rpitch_italianorrcCs t|gdgd}|ddS)NrZessrrZisshessrrrr r r pitch_norsks rcCs(t|gdgd}|ddddS)Nr)rZbqtZsqtr ZbbqZbtqZssqZstqrrr r rpitch_portuguesrrcC4t|gdgd}|dkrdS|ddddS) Nrrrrrrrrrrr r r pitch_suomirrcCr) Nrrrrrrrrrrr r r pitch_svenskarrcCr)Nr)rZhbZhkkrrr r r pitch_vlaamsrrc Cs.tttttttttt t t d }| |t adS)N) Z nederlandsucatalàZdeutschZenglishuespañolu françaisZitalianoZnorsku portuguêsZsuomiZsvenskaZvlaams)rrrrrrrrrrrrrcrpitch_generating_function)ZlanguageZ function_dictr r rset_pitch_languages rc@seZdZddZddZddZddZd d Zd d Zd dZ ddZ ddZ ddZ ddZ ddZddZddZddZdS) rcCsd|_d|_d|_d|_dSNrF)rrr_force_absolute_pitchrr r rr zPitch.__init__cCrkrrlrr r rrmrnzPitch.__repr__cCsj|}|j|j7_|j|j7_|j|j7_|||}|j||7_|Sr)rrrr normalizer)rZintervalrZ target_str r r transposedszPitch.transposedcCsT|jdkr|jd7_|jd8_|jdks|j|jd7_|jd|_dS)Nrrrrrrr r rrs  zPitch.normalizecCsd|j|j|jfS)Nz(ly:make-pitch %d %d %d)rrrrr r rr_szPitch.lisp_expressioncCs*t}|j|_|j|_|j|_|j|_|Sr)rrrrr)rrr r rrs z Pitch.copycCs|j|jdS)Nrrrr r rstepsz Pitch.stepscCs|jdgd|j|jS)N )rrrrr rrr r rrszPitch.semitonescCsv|jdkrgd|jr|jd7_|jd8_n|jdkr5gd|jr5|jd8_|jd7_|dS)Nr)TFFTFFFr)FFTFFFT)rrrrr r rnormalize_alterations zPitch.normalize_alterationcCs||j}d|_|dkrdSd|dk}|}t|||dkr;|j|7_|t|||dks$|j|||7_|dS)Nrrr6r)rrrqrrr)rnumberZsemiZsignprevr r r add_semitones s   zPitch.add_semitonescCrrrrr r rly_step_expressionrnzPitch.ly_step_expressioncCs6|jdkr d|jdS|jdkrd|j dSdS)Nrrrr6rr)rrr r rabsolute_pitchs  zPitch.absolute_pitchcCsrts|a|Stjdtj}|jd|j}||}|a|dkr*d|ddS|dkr7d| ddSdS)Nrrrrr)previous_pitchrrr)rZprevious_pitch_stepsZthis_pitch_stepsZ pitch_diffr r rrelative_pitch!szPitch.relative_pitchcCs2|}tr|js||7}|S||7}|Sr)rrelative_pitchesrrrr=r r rrh1s    zPitch.ly_expressioncC||dSrrl)rrir r rrj9rzPitch.print_lyN)rrrrrmrrr_rrrrrrrrrhrjr r r rrs     rc@sneZdZddZddZddZddZd d Zd d Zd dZ ddZ ddZ dddZ ddZ ddZdS)MusiccCs d|_td|_d|_d|_dS)Nrr)parentrstartcomment identifierrr r rr>s  zMusic.__init__cCstdSNrrrr r rruDrnzMusic.get_lengthcCdSNrr rr r rget_propertiesGzMusic.get_propertiescCrrTr rr r r has_childrenJrzMusic.has_childrencCs|jr |jj|SdSr)relementsindexrr r r get_indexMszMusic.get_indexcCs|jjSr) __class__rrr r rnameSrnz Music.namecCs|}|}d||fSNz(make-music '%s %s))rr)rrpropsr r rr_Vs zMusic.lisp_expressioncCr+r)r)rrr r r set_start]r.zMusic.set_startcCs||r|SdSrr r predicater r r find_first`szMusic.find_firstNcCsX|s|j}|s dS|dkr|dS|d}|D]}|r%|d||qdS)NrM% )rr0r rH)rprintertextlineslr r r print_commentes  zMusic.print_commentcCs&|jr |d|jdS||dSN\%s)rrjrr r r rprint_with_identifiervszMusic.print_with_identifiercCrrrlrr r rrj|rzMusic.print_lyr)rrrrrurrrrr_rr rrrjr r r rr=s  rc@r) MusicWrappercCt|d|_dSr)rrelementrr r rr  zMusicWrapper.__init__cC|j|dSr)rrjrfuncr r rrjrzMusicWrapper.print_lyNrrrrrjr r r rr rc@r)ModeChangingMusicWrappercCt|d|_dS)NZnotemode)rrmoderr r rrrz!ModeChangingMusicWrapper.__init__cCs|d|jt||dSr)r!rrjrr r rrjsz!ModeChangingMusicWrapper.print_lyNrr r r rrrrc@r) RelativeMusiccCrr)rr basepitchrr r rrrzRelativeMusic.__init__cCsDt}da|jats ta|dtttft|||adS)NTz\relative %s%s)rr#rrrrrrj)rrZprev_relative_pitchesr r rrjs  zRelativeMusic.print_lyNrr r r rr"rr"c@r)TimeScaledMusiccCsDt|d|_d|_d|_d|_d|_d|_d|_d|_ d|_ dS)Nractualbracket) rrr]r^display_number display_typedisplay_bracket actual_type normal_typedisplay_numeratordisplay_denominatorrr r rrs  zTimeScaledMusic.__init__cCs|jdur|d|n|jdkr"ttd|d|dddd|jd}|jd kr;|jr;d |j}n#|jd kr^|jsF|jr^|jrM|j}nd}|jrV|j}nd}d ||f}|j d krx|j rx|j }|d ||f|ni|j d kr|jdur|d|nV|jd kr|j }|j r|j }n|}|js|jr|d|j||j|f|n*|d||f|n|jdur|d|n|jd kr|d|||d|j |jf|t|j |jt|||dS)Nz\once \omit TupletBracketZcurvedz=Tuplet brackets of curved shape are not correctly implementedz7\once \override TupletBracket.stencil = #ly:slur::printz#fz$tuplet-number::calc-denominator-textz!tuplet-number::calc-fraction-text)Nr%bothr%z7(tuplet-number::non-default-tuplet-denominator-text %s)r.z7(tuplet-number::non-default-tuplet-fraction-text %s %s)zO\once \override TupletNumber.text = #(tuplet-number::append-note-wrapper %s %s)z\once \omit TupletNumberza\once \override TupletNumber.text = #(tuplet-number::non-default-fraction-with-notes %s %s %s %s)zO\once \override TupletNumber.text = #(tuplet-number::fraction-with-notes %s %s)z'\once \override TupletNumber.text = #%sz \times %d/%d )r)r0rrrrcr'r-r,r(r+r_r*r]r^r9rrrjr;)rrZbase_number_functionZnumZdenZ base_durationZ den_durationZ num_durationr r rrjs                     zTimeScaledMusic.print_lyNrr r r rr$s r$c@\eZdZddZddZddZddZd d Zd d Zd dZ ddZ ddZ ddZ dS) NestedMusiccCst|g|_dSr)rrrrr r rrrzNestedMusic.__init__cC|r |j|dSdSr)rr7)rZwhatr r rr7zNestedMusic.appendcCs|jSrrrr r rrszNestedMusic.has_childrencCs|jdusJ|dus||jvsJd}|r%|j|}|dkr$|d7}n|dkr,d}n |dkr5t|j}|j||||_dSrZ)rrrrKinsert)rZsucceltdiridxr r r insert_arounds   zNestedMusic.insert_aroundcCsdddd|jDS)N'elements (list %s)rJcSg|]}|qSr r_.0xr r r z.NestedMusic.get_properties..)joinrrr r rrszNestedMusic.get_propertiescCs$ddddtt||jDS)Nr9rJcSr:r r;r<r r rr?r@z5NestedMusic.get_subset_properties..)rAlistfilterrr r r rget_subset_propertiessz!NestedMusic.get_subset_propertiescCsJ|j|ksJ|j|}||7}t|t|jd}t|d}|j|Srp)rrrminrKmax)rmusicr6r7r r r get_neighbors    zNestedMusic.get_neighborcCs$||jvsJ|j|d|_dSr)rremoverrrr r rdelete_element(s  zNestedMusic.delete_elementcCs ||_|jD]}||qdSr)rrrrrrr r rr.s  zNestedMusic.set_startcCs:t||}|r |S|jD] }||}|r|Sq dSr)rr r)rr rrr r rr 3s   zNestedMusic.find_firstN) rrrrr7rr8rrDrHrKrr r r r rr0s  r0c@s.eZdZddZd ddZddZdd Zd S) SequentialMusiccCsd}t|jd}|dkr5t|j|ts5t|j|ts5|d8}|dkr5t|j|ts5t|j|tr|dkrFt|j|trF|j|}|Srp)rKr isinstance ChordEventBarLine)rvalueZatr r rget_last_event_chord@s  z$SequentialMusic.get_last_event_chordTcCsV|d|jr |||r||jD]}||q|d|r)|dSdS)NrBrF)rrr0rrj)rr r0rr r rrjLs    zSequentialMusic.print_lycCs|}||}d||fSr)rrD)rZpredrrr r rlisp_sub_expressionZs  z#SequentialMusic.lisp_sub_expressioncCs&|jD] }||||7}qdSr)rrrurLr r rras  zSequentialMusic.set_startN)T)rrrrSrjrTrr r r rrN?s   rNc@,eZdZddZddZddZddZd S) RepeatedMusiccCsd|_d|_g|_d|_dS)NZvoltar) repeat_type repeat_countendingsrGrr r rrhrzRepeatedMusic.__init__cCsNt|tr ||_dSt|trt|_||j_dSttd||ddS)Nz;unable to set the music %(music)s for the repeat %(repeat)s)rGrepeat) rOrrGrBrNrrrrrrGr r r set_musicns      zRepeatedMusic.set_musiccCrr)rYr7r[r r r add_endingxrzRepeatedMusic.add_endingcCsz|d|j|jf|jr|j|n ttd|d|jr;|d|jD]}||q,|ddSdS)Nz \repeat %s %szencountered repeat without body{}z\alternative {rF) rQrWrXrGrjrrrrY)rr rr r rrj{s    zRepeatedMusic.print_lyN)rrrrr\r]rjr r r rrVgs  rVc@$eZdZddZddZddZdS)LyricscCs g|_dSrZlyrics_syllablesrr r rrr.zLyrics.__init__cCs,||||d|dS)NrF)rQrhr0rr r rrjs  zLyrics.print_lycCsd}|jD]}||7}q|S)Nz&\lyricmode {\set ignoreMelismata = ##tra)rZlstrrr r rrhs  zLyrics.ly_expressionNrrrrrjrhr r r rr`s r`c@rU) HeadercC i|_dSr header_fieldsrr r rrr.zHeader.__init__cCs||j|<dSrre)rfieldrRr r r set_fieldrzHeader.set_fieldcCs||d|dkr;d|vr;|dd}|d|d}|D]}||d|dq!|d |n|||dS) Nz = ZtexidocrMrrz\markup \column {z \line { "z"}rF)rQrr r0)rkeyrRr Z substringsr r r rformat_header_stringss       zHeader.format_header_stringscCsZ|d|t|jD] \}}|r||||q|d||dS)Nz \header {rF)rQr0rBrfitemsrj)rr rvr r rrjs   zHeader.print_lyN)rrrrrhrjrjr r r rrcs  rcc@rU) PapercCsXd|_d|_d|_d|_d|_d|_d|_d|_d|_d|_ d|_ d|_ d|_ g|_ dS)Nr6r)global_staff_size page_width page_height top_margin bottom_margin left_margin right_marginZsystem_left_marginZsystem_right_marginsystem_distancetop_system_distanceindent short_indentinstrument_namesrr r rrs zPaper.__init__cCs*|dkr|d||f|dSdS)Nrz %s = %s\cm)rQr0)rr rgrRr r rprint_length_fields zPaper.print_length_fieldcCs<d}|jD]}|d}|D] }t|t|kr|}qq|S)NrrM)ryr rK)rresultrrliner r rget_longest_instrument_names  z!Paper.get_longest_instrument_namecCs$|jdkr|d|j||d||||d|j||d|j||d|j||d|j||d|j||d |j ||d |j ||d |j t | d |j}|jdkrx||d |j||jdkr||d|j||d|dS)Nrz#(set-global-staff-size %s)z\paper {z paper-widthz paper-heightz top-marginz bottom-marginz left-marginz right-marginzbetween-system-spacezpage-top-space rwz short-indentrF)rnrQr0rzrorprqrrrsrtrurvrKr}rwrx)rr Z char_per_cmr r rrjsB        zPaper.print_lyN)rrrrrzr}rjr r r rrms  rmc@rU) LayoutcCrdr context_dictrr r rr r.zLayout.__init__cCs||jvr g|j|<dSdSrr)rcontextr r r add_context  zLayout.add_contextcCs0||||j|vr|j||dSdSr)rrr7)rritemr r rset_context_items zLayout.set_context_itemcCst|jrI|d|t|jD]&\}}|d|||D] }|||q(|d|q|d|dSdS)Nz \layout {z\context { \%srF)rBrrkrQr0)rr rZdefsror r rrjs       zLayout.print_lyN)rrrrrrrjr r r rrs  rc@DeZdZddZddZddZddZd d Zd d Zd dZ dS)rPcC t|d|_d|_d|_dSr)r0rafter_grace_elementsgrace_elements grace_typerr r rr&  zChordEvent.__init__cC&|r|js t|_|j|dSdSr)rrNr7rJr r r append_grace, zChordEvent.append_gracecCrr)rrNr7rJr r rappend_after_grace2rzChordEvent.append_after_gracecCsdd|jDgkS)NcS$g|]}t|tst|tr|qSr rO NoteEvent RestEventr=rr r rr?9  z+ChordEvent.has_elements..r3rr r r has_elements8szChordEvent.has_elementscCs&td}|jD] }t||}q|Sr)rrrFru)rrrr r rru<s zChordEvent.get_lengthcCs"dd|jD}|r|djSdS)NcSrr rrr r rr?Crz+ChordEvent.get_duration..r)rduration)r note_eventsr r r get_durationBs zChordEvent.get_durationc Cs dd|jD}dd|jD}dd|jD}|jr|d|jr<|jr<|jr0|d|jn|d|j|dn'|jrcttd |j|jrT|d|jn|d|j|d|d |D] }t|d smqe| |qe|r}|d |nYt |d kr|d |nK|rg}d}d}|D] } | j r| j D] } t | t r| jr| }q|| |st}q|r|||dd||a|} | r| |n |D]}||q|D] }t|dsq||q|jr|d|j|d||dS)NcSg|] }t|tr|qSr )rOrrr r rr?K z'ChordEvent.print_ly..cSs$g|]}t|trt|ts|qSr )rO RhythmicEventrrr r rr?Ns  cSsg|] }t|ts|qSr )rOrrr r rr?Rrz \afterGrace {rz\graceFz&Grace note with no following music: %sr^print_before_noterr<%s>rJprint_after_noterF)rrrrrjrrrhasattrrrKassociated_eventsrO StemEventrRr7chord_element_lyrrhrArrr) rr rZ rest_eventsZ other_eventsrZpitchesr#Zstemr>Zaevrr r rrjJsx           zChordEvent.print_lyN) rrrrrrrrurrjr r r rrP%s rPc@r)PartialcCrr)rrpartialrr r rrrzPartial.__init__cCs"|jr|d|jdSdS)Nz \partial %s)rrQrhrr r rrjszPartial.print_lyNrr r r rrrrc@r_)rQcCst|d|_d|_dSr)rr bar_numbertyperr r rr  zBarLine.__init__c Csddddddddd d d d |jd}|dur|d |n|d |jdkr9|jddkr9|d|jn |jdkrF|d|j|dS)N!;rbz..z.|z|.z||r|rr) dasheddottedZheavyz heavy-heavyz heavy-lightz light-heavyz light-lightnoneZregularZshortZtickz \bar "%s"r z\barNumberCheck #%d z %% %d)rcrrQrr/r0)rr Z bar_symbolr r rrjs,     zBarLine.print_lycCr)Nz | r rr r rrhrzBarLine.ly_expressionNrbr r r rrQs rQcs,eZdZfddZddZddZZS)Eventcstt|d|_d|_dSr)superrr before_note after_noterrr rrs zEvent.__init__cC|jr ||jdSdSr)rrQrr r rrzEvent.print_before_notecCrr)rrQrr r rrrzEvent.print_after_note)rrrrrr __classcell__r r rrrs  rc@rU) SpanEventcCs&t|d|_d|_d|_d|_dS)NrZsolid)rrspan_direction line_type span_typesizerr r rrs  zSpanEvent.__init__cCrrOr rr r r wait_for_noterzSpanEvent.wait_for_notecCs d|jS)Nz'span-direction %d)rrr r rrr.zSpanEvent.get_propertiescCr+r)rrrr r r set_span_typer.zSpanEvent.set_span_typeN)rrrrrrrr r r rrs  rc$eZdZfddZddZZS) BreatheEventctd|_dS)Nz\breatherrrrrr rrrzBreatheEvent.__init__cCrrr rr r rrhrzBreatheEvent.ly_expressionrrrrrhrr r rrr rcr) CaesuraEventcr)Nz\caesurarrrr rrrzCaesuraEvent.__init__cCrrr rr r rrhrzCaesuraEvent.ly_expressionrr r rrrrrc@r_) SlurEventcCs8ddd|jd}|r|jdkr||dSdSdS)Nz \slurDottedz \slurDashedrrrr6rcrrrQrr commandr r rrs zSlurEvent.print_before_notecCs8ddd|jd}|r|jdkr||dSdSdS)Nz \slurSolidrrr6rrr r rrs zSlurEvent.print_after_notecCddd|jdS)N()r6rrrcrrr r rrh zSlurEvent.ly_expressionNrrrrrrhr r r rrs rc@eZdZddZdS) BeamEventcCr)N[]rrrrr r rrhrzBeamEvent.ly_expressionNrrrrhr r r rr rc@r) PedalEventcCdddd|jdS)Nz \sustainOnz\sustainOff\sustainOnz \sustainOffr6rrrrrr r rrh  zPedalEvent.ly_expressionNrr r r rrrrc@r_)TextSpannerEventcCsPt|dr|jdkr|dt|dr&dddd|jd }||dSdS) Nstylewavez+\once \override TextSpanner.style = #'trillforce_directionz\textSpannerDownz\textSpannerNeutralz\textSpannerUprr)rrrQrcr)rr r>r r rrs   z"TextSpannerEvent.print_before_notecCdSrr rr r rr%rz!TextSpannerEvent.print_after_notecCsht|dr |jdkr dStdkrddd|jdSt|dr*|jdkr*td kr*dSd d d|jdS) Nrignorerrz\startTextSpanz \stopTextSpanrstopZtrill\startTrillSpan\stopTrillSpan)rr whatOrnamentrcrrr r rrh(s  zTextSpannerEvent.ly_expressionNrr r r rrs rc@r_)BracketSpannerEventcCsF|jdkr!|jdkr|dn |jdkr|d|ddSdS)Nr6rz/\once \override LigatureBracket.direction = #UPz1\once \override LigatureBracket.direction = #DOWNz\[)rrrQrr r rr9s    z%BracketSpannerEvent.print_before_notecCs|jdkr |ddSdS)Nrz\])rrQrr r rrCrz$BracketSpannerEvent.print_after_notecCrrr rr r rrhHrz!BracketSpannerEvent.ly_expressionNrr r r rr7s rc@rU) OctaveShiftEventcCrrTr rr r rrMrzOctaveShiftEvent.wait_for_notecCsddd|d|_dS)Nrr6)Zupdownrrcrrr r rrPzOctaveShiftEvent.set_span_typecCsRz ddd|j}Wntyttd|jd}Ynw|d|j9}|S)Nrr)z4Invalid octave shift size found: %s. Using no shift.rr6)rrrrrr)rrRr r rly_octave_shift_indicatorSs  z*OctaveShiftEvent.ly_octave_shift_indicatorcCs,|}d}|r d|}|dd|jdS)Nrz \ottava #%sz \ottava #0r)rrcr)rr6rRr r rrh_s zOctaveShiftEvent.ly_expressionN)rrrrrrrhr r r rrLs  rc@r)TrillSpanEventcCsdddd|jdS)Nrrrrrrr r rrhjrzTrillSpanEvent.ly_expressionNrr r r rrirrc@r)GlissandoEventcCs>|jdkrdddd|jd}|r|d|dSdSdS)Nr6z dashed-linez dotted-lineZzigzag)rrZwavyz&\once \override Glissando.style = #'%s)rrcrrQ)rr rr r rrqs  z GlissandoEvent.print_before_notecCsddd|jdS)Nz \glissandorrrrr r rrh|s  zGlissandoEvent.ly_expressionN)rrrrrhr r r rrps rc@4eZdZddZddZddZddZd d Zd S) ArpeggioEventcCst|d|_d|_dSr)rr directionnon_arpeggiaterr r rrrzArpeggioEvent.__init__cCrrOr rr r rrrzArpeggioEvent.wait_for_notecCs>|jr |ddSddd|jd}|r||dSdS)Nz\arpeggioBracketz\arpeggioArrowDownz\arpeggioArrowUprr)rrQrcr)rr r6r r rrs zArpeggioEvent.print_before_notecCs|js|jr |ddSdS)Nz\arpeggioNormal)rrrQrr r rrs zArpeggioEvent.print_after_notecCr)Nz \arpeggior rr r rrhrzArpeggioEvent.ly_expressionN)rrrrrrrrhr r r rrs  rc@r)TieEventcCr)N~r rr r rrhrzTieEvent.ly_expressionNrr r r rrrrc@r) HairpinEventcCsdddd|d|_dS)Nrr6)Z crescendoZ decrescendoZ diminuendorrrr r rrs zHairpinEvent.set_span_typecCs"|jdkrdSddd|jdS)Nrz\!r@rDrr)rrcrrr r r hairpin_to_lys zHairpinEvent.hairpin_to_lycCdddd|jdSN^r-rr6rrcrrr r r direction_modzHairpinEvent.direction_modcCrkr)rrr r rrhrnzHairpinEvent.ly_expressioncCs*|}|r|d||fdSdS)N%s%s)rrQr)rr valr r rrjszHairpinEvent.print_lyN)rrrrrrrhrjr r r rrs  rc@r) DynamicsEventcCst|d|_d|_dSrrrrrrr r rrrzDynamicsEvent.__init__cCrrOr rr r rrrzDynamicsEvent.wait_for_notecCs|jrd|jSdSrrrr r rrh zDynamicsEvent.ly_expressioncCrrrrr r rrrzDynamicsEvent.direction_modcCs&|jr|d||jfdSdSNz%s\%s)rrQrrr r rrjszDynamicsEvent.print_lyN)rrrrrrhrrjr r r rrs  rc@s.eZdZd ddZddZddZdd Zd S) MarkEvent\defaultcCt|||_dSr)rrmarkrrr r rrrzMarkEvent.__init__cCrrTr rr r rrrzMarkEvent.wait_for_notecC|jrd|jSdS)N%sz"ERROR"r rr r r ly_contentsrzMarkEvent.ly_contentscCs d|S)Nz\mark %s)rrr r rrhr4zMarkEvent.ly_expressionN)r )rrrrrrrhr r r rr s   r c@r)MusicGlyphMarkEventcCr)Nz$\markup { \musicglyph "scripts.%s" }rrrr r rrrzMusicGlyphMarkEvent.ly_contentsN)rrrrr r r rrrrc@rU) TextEventcCs t|d|_d|_d|_dSr)rrZTextrmarkuprr r rrrzTextEvent.__init__cCr)a] This is problematic: the lilypond-markup ^"text" requires wait_for_note to be true. Otherwise the compilation will fail. So we are forced to set return to True. But in some cases this might lead to a wrong placement of the text. In case of words like Allegro the text should be put in a '\tempo'-command. In this case we don't want to wait for the next note. In some other cases the text is supposed to be used in a r'\mark\markup' construct. We would not want to wait for the next note either. There might be other problematic situations. In the long run we should differentiate between various contexts in MusicXML, e.g. the following markup should be interpreted as '\tempo "Allegretto"': Allegretto In the mean time arising problems have to be corrected manually after the conversion. Tr rr r rrszTextEvent.wait_for_notecCr)z 1: placement="above"; -1: placement="below"; 0: no placement attribute. see musicxml_direction_to_indicator in musicxml2ly_conversion.py rrrrrrr r rrszTextEvent.direction_modcCs*d}|jr d|jd}|||jfS)Nz%s "%s"z %s\markup{ z {%s} })rrr)rZ base_stringr r rrh szTextEvent.ly_expressionNrrrrrrrhr r r rrs  rc@rU) ArticulationEventcCst|d|_d|_dSrrrr r rrrzArticulationEvent.__init__cCrrOr rr r rrrzArticulationEvent.wait_for_notecCr)Nrrrrrrrr r rr rzArticulationEvent.direction_modcCsd||jfSr)rrrr r rrh#r>zArticulationEvent.ly_expressionNrr r r rrs  rc@r)ShortArticulationEventcCrrrrr r rr(sz$ShortArticulationEvent.direction_modcC|jr d||jfSdS)Nrr)rrrr r rrh,z$ShortArticulationEvent.ly_expressionN)rrrrrhr r r rr'rrc@r)NoDirectionArticulationEventcCrNrrrrr r rrh4rz*NoDirectionArticulationEvent.ly_expressionNrr r r rr3rrc@r) MarkupEventcCrr)rrcontentsrr r rr;rzMarkupEvent.__init__cCr)Nz%s\markup { %s }r)rrrr r rrh?rzMarkupEvent.ly_expressionNrrrrrhr r r rr:rrc@r) FretEventcCs,t|d|_d|_d|_d|_g|_dS)Nrr)rrrr fretsbarrerrr r rrG  zFretEvent.__init__c Csd}|jdkr|d|j7}|jdkr|d|j7}|jr:t|jdkr:|d|jd|jd |jd td f7}d }|jD]5}t|d kr`|d |d|d td dft|d tf7}t|d krpd}|d|d 7}|d7}q?|r{d|}|rd||fSdS)Nrr zw:%s;rzh:%s;rz c:%s-%s-%s;rrrrFz%s-%sT-%srzf:1;z!%s\markup { \fret-diagram #"%s" }) r r!r"rKrrrOstrr)rrZhave_fingeringir r rrhOs4       zFretEvent.ly_expressionNrr r r rrFs rc@r) FretBoardNotecCrr)rrrr fingeringrr r rrjrzFretBoardNote.__init__cCs6|j}|jr|d|j7}|jr|d|j7}|S)Nr$r)rrhr(rr=r r rrhps zFretBoardNote.ly_expressionNrr r r rr'is r'c@r)FretBoardEventcCrr)r0rrrr r rrzrzFretBoardEvent.__init__cCsTdd|jD}|r(g}|D] }||qd|}|d||jfdSdS)NcSrr )rOr')r=nr r rr?s  z+FretBoardEvent.print_ly..rJz<%s>%s)rr7rhrAr)rr Zfretboard_notesnotesr*rr r rrj~s zFretBoardEvent.print_lyNrr r r rr)yrr)c@s.eZdZd ddZddZddZdd ZdS) FunctionWrapperEventNcCr r)rr function_name)rr-r r rrrzFunctionWrapperEvent.__init__cCrrr-ris_chord_elementr r r pre_note_lyrz FunctionWrapperEvent.pre_note_lycCrrr rr r r pre_chord_lyrz!FunctionWrapperEvent.pre_chord_lycCrrr.rr r rrhrz"FunctionWrapperEvent.ly_expressionr)rrrrr1r2rhr r r rr,s   r,c@r)ParenthesizeEventcCst|ddS)NZ parenthesize)r,rrr r rrrzParenthesizeEvent.__init__Nrrrrr r r rr3rr3c@s0eZdZdZddZddZddZdd Zd S) rzG" A class to take care of stem values (up, down, double, none) cCrr)rrrRrr r rrrzStemEvent.__init__cCrr)rRrr r rr2rzStemEvent.pre_chord_lycCrrr r/r r rr1rzStemEvent.pre_note_lycCrkrr2rr r rrhrnzStemEvent.ly_expressionN)rrrrXrr2r1rhr r r rrs  rc@rU) NotestyleEventcCrr)rrrZfilledcolorrr r rrrzNotestyleEvent.__init__cCsFd}|jr |d|j7}|jr!|d|jd|jd|jdf7}|S)Nrz% \once \override NoteHead.style = #%sz7 \once \override NoteHead.color = #(rgb-color %s %s %s)rrr)rr7)rZ return_stringr r rr2szNotestyleEvent.pre_chord_lycCs|jr |r d|jSdS)Nz\tweak style #%sr)rr/r r rr1  zNotestyleEvent.pre_note_lycCrkrr5rr r rrhrnzNotestyleEvent.ly_expressionNrrrrr2r1rhr r r rr6s  r6c@rU) StemstyleEventcCrr)rrr7rr r rrrzStemstyleEvent.__init__cCs*|jrd|jd|jd|jdfSdS)Nz2\once \override Stem.color = #(rgb-color %s %s %s)rrrr)r7rr r rr2s zStemstyleEvent.pre_chord_lycCrrr r/r r rr1rzStemstyleEvent.pre_note_lycCrkrr5rr r rrhrnzStemstyleEvent.ly_expressionNr9r r r rr:s  r:c@r_) ChordPitchcCsd|_d|_dSr)rrrr r rrs zChordPitch.__init__cCrkrrlrr r rrmrnzChordPitch.__repr__cCrrrrr r rrhrnzChordPitch.ly_expressionN)rrrrrmrhr r r rr; r;c@r)ChordModificationcCsd|_d|_d|_dSr)rrrrr r rrs zChordModification.__init__cCsH|jr"ddd|jd}|d|j7}|ddd|jd7}|SdS)Nrbrrrr+r)rrcrr)rrr r rrhs zChordModification.ly_expressionNrr r r rr= r=c@r_)ChordNameEventcCs,t|d|_d|_d|_g|_d|_dSr)rrrootkindr modificationsbassrr r rrr#zChordNameEvent.__init__cCrr)rCr7)rmodr r radd_modification rzChordNameEvent.add_modificationcCs|jsdS|j}|jr||j7}|jr||j}|jD] }|jdkr,||7}q|jD] }|jdkr=||7}q0|jrJ|d|j7}|S)Nrrr6z/+%s)rArhrrBrCrrD)rrRmr r rrh s$        zChordNameEvent.ly_expressionN)rrrrrFrhr r r rr@s r@c@r) TremoloEventcCr r)rrstrokesrr r rr#rzTremoloEvent.__init__cCshd}|jr2t|jdkr2tdkr|dddt|j7}|S|ddtttdt|j7}|S)Nrrrz:%sr)rIrerfmathrr)rZly_strr r rrh'szTremoloEvent.ly_expressionNrr r r rrH"rrHc@r) BendEventcCrr)rralterrr r rrErzBendEvent.__init__cCs|jdur d|jSdS)Nz-\bendAfter #%sr)rLrr r rrhIr8zBendEvent.ly_expressionNrr r r rrKDrrKc@r)rcCst|t|_g|_dSr)rrrYrrrr r rrQs  zRhythmicEvent.__init__cCr1r)rr7)revr r radd_associated_eventVr2z"RhythmicEvent.add_associated_eventcCsdd|jDS)NcSr:r r5r=rMr r rr?[r@z.RhythmicEvent.pre_chord_ly..rrr r rr2ZrzRhythmicEvent.pre_chord_lycsfdd|jDS)Ncsg|]}|qSr )r1rOr0r rr?^z-RhythmicEvent.pre_note_ly..rPr/r rQrr1]rzRhythmicEvent.pre_note_lycCs$d||}|dkr|d}|S)NrJr)rAr1)rr0resr r rly_expression_pre_note`sz$RhythmicEvent.ly_expression_pre_notecCs |jSr)rrurr r rrufr.zRhythmicEvent.get_lengthcCd|jS)Nz 'duration %srr_rr r rriszRhythmicEvent.get_propertiesN) rrrrrNr2r1rTrurr r r rrPs rc@r_)rcCrr)rrrrr r rrorzRestEvent.__init__cCs:|d}|jr|d|j|jfSd|jS)NFz %s%s\restzr%s)rTrrhrrrSr r rrhss zRestEvent.ly_expressioncCsX|jD]}||q|jr |j||j||ddS|d|j|dS)Nz\restrM)rrjrrrr rMr r rrjzs     zRestEvent.print_lyN)rrrrrhrjr r r rrns rc@r) SkipEventcCrU)Nzs%srrhrr r rrhrzSkipEvent.ly_expressionNrr r r rrYrrYc@s<eZdZddZddZddZddZd d Zd d Zd S)rcCs"t|t|_d|_d|_dSrT)rrrr cautionaryforced_accidentalrr r rrs  zNoteEvent.__init__cCs"t|}|jr||j7}|Sr)rrrr_r=r r rrs zNoteEvent.get_propertiescCs$d}|jr |d7}|jr|d7}|S)Nr?r)r[r\)rZ excl_questionr r r pitch_modss zNoteEvent.pitch_modscCs6|d}|jr|d|j||jfSdS)NTz%s%s%s)rTrrhr^rrWr r rrhs  zNoteEvent.ly_expressioncCs.|d}|jr|d|j|fSdS)NTr)rTrrhr^rWr r rrs  zNoteEvent.chord_element_lycCs||jD]}||qt|dr%|d|j|d|j|d|jt|dr6|j||||j|dS)Nr7ZNoteHeadZStemZBeamr)rrjrZprint_note_colorr7rr^rrXr r rrjs      zNoteEvent.print_lyN) rrrrrr^rhrrjr r r rrs  rc@r_)KeySignatureChangecCs t|d|_d|_d|_dS)Nmajor)rrtonicr!non_standard_alterationsrr r rrrzKeySignatureChange.__init__c Csddddddddd d }z||d }Wnty)ttd |d Yd Swt|dkr8d|d|fSt|dkrId|d|d|fSd S)Nz ,DOUBLE-FLATz ,THREE-Q-FLATz,FLATz ,SEMI-FLATz,NATURALz ,SEMI-SHARPz,SHARPz,THREE-Q-SHARPz ,DOUBLE-SHARP) r`gr6rrrrg?rrz8Unable to convert alteration %s to a lilypond expressionrrz ( %s . %s )rrz(( %s . %s ) . %s ))rrrrrK)rrZ alter_dictZ accidentalr r rformat_non_standard_alterations.    z1KeySignatureChange.format_non_standard_alterationcsFjr djjfSjr!fddjD}dd|SdS)Nz \key %s \%scg|]}|qSr )rc)r=rrr rr?sz4KeySignatureChange.ly_expression..z"\set Staff.keyAlterations = #`(%s)rJr)rarr!rbrA)rZ alterationsr rrrhs  z KeySignatureChange.ly_expressionN)rrrrrcrhr r r rr_s r_c@r_)ShiftDurationscCst|ddg|_dSr)rrparamsrr r rrs zShiftDurations.__init__cCs||_dSr)get_shift_durations_parametersrf)rZ timeSigChanger r rset_shift_durations_parametersrz-ShiftDurations.set_shift_durations_parameterscCs"|dt|jt||dS)Nz \shiftDurations #%d #%d )tuplerfrrjrr r rrjszShiftDurations.print_lyN)rrrrrhrjr r r rrer<rec@r) TimeSignatureChangecCs.t|ddg|_d|_ddg|_d|_dS)NrT)rr fractionsroriginalFractionsvisiblerr r rrs    zTimeSignatureChange.__init__cCs0t|jd|jdt|jd|jdS)z Calculate the ratio between the original time fraction and the new one. Used for the "--time-signature" option. @return: The ratio between the two time fractions. @rtype: float rr)floatrlrkrr r rget_fractions_ratio s0z'TimeSignatureChange.get_fractions_ratiocCsLtt|d}d|td| }ttd|d}||gS)Nrrr)rJZceilrrropowre)rrsr\r r rrgsz2TimeSignatureChange.get_shift_durations_parameterscs6t|trfdd|D}dd|dSd|S)Ncrdr )format_fraction)r=rrr rr?rRz7TimeSignatureChange.format_fraction..rrJrr)rOrBrA)rZfracrr rrrqs z#TimeSignatureChange.format_fractioncCsd}|jddgddgddgfv}|jr2|jr2|jdkrd}n|jdkr)d|j}n |jdks0|r2d}|jr8d}nd }t|jdkrTt|jd trT|d t|j|S|jrc|d ||j|S|dS) Nrrrcommonz\defaultTimeSignaturez'()z0\once \override Staff.TimeSignature.style = #%s z\numericTimeSignaturez\omit Staff.TimeSignaturerz \time %d/%d z\compoundMeter #'%s)rkrrmrKrOrerirq)rstZis_common_signatureZomitr r rrh!s"    z!TimeSignatureChange.ly_expressionN)rrrrrorgrqrhr r r rrjs   rjc@s@eZdZddZddZddZddZd d d d Zd dZdS) ClefChangecCs t|d|_d|_d|_dS)NGrr)rrrpositionrrr r rr>rzClefChange.__init__cCsddddd|jdS)Nz^8z^15Z_8Z_15)rrr6r`r)rcrrr r roctave_modifierDrzClefChange.octave_modifiercCs2ddddddddd d d d td |j|jfdS) NtrebleZfrenchZsopranoZ mezzosopranoZaltoZtenorZbaritoneZ varbaritonerDZsubbass percussion) )rur)rur)Cr)rzr)rzr)rzr)rzr)Fr)r{r)r{r)ryr)ZPERCr)ZTABr)rrcrrvrr r r clef_nameGs  zClefChange.clef_namecCsd||fS)Nz \clef "%s%s")r|rwrr r rrhWrzClefChange.ly_expression)zclefs.Gr`i)zclefs.Crr)zclefs.Frr )rurzr{cCs>z |j|j\}}}Wn tyYdSwd|||f}|S)Nra (make-music 'SequentialMusic 'elements (list (context-spec-music (make-property-set 'clefGlyph "%s") 'Staff) (context-spec-music (make-property-set 'clefPosition %d) 'Staff) (context-spec-music (make-property-set 'middleCPosition %d) 'Staff))) ) clef_dictrr)rZglyphposZc0Z clefsettingr r rr_`s   zClefChange.lisp_expressionN) rrrrrwr|rhr}r_r r r rrt=s rtc@r) TranspositioncCrr)rrrrr r rrsrzTransposition.__init__cCsd|j_d|jS)NTz\transposition %s)rrrhrr r rrhwszTransposition.ly_expressionNrr r r rrrrrc@r) StaffChangecCr r)rrstaffrrr r rr}rzStaffChange.__init__cCr)Nz\change Staff="%s"r)rrr r rrhrzStaffChange.ly_expressionNrr r r rr|rrc@r)SetEventcCst|||_||_dSr)rr context_proprR)rZ contextproprRr r rrrzSetEvent.__init__cCs|jr d|j|jfSdS)Nz \set %s = %sr)rRrrr r rrhszSetEvent.ly_expressionNrr r r rrr?rc@r)StaffLinesEventcCr r)rrr)rrr r rrrzStaffLinesEvent.__init__cCs|jdkr d|jSdS)NrzC\stopStaff \override Staff.StaffSymbol.line-count = #%s \startStaffz;\stopStaff \revert Staff.StaffSymbol.line-count \startStaff)rrr r rrhr8zStaffLinesEvent.ly_expressionNrr r r rrrrc@r/) TempoMarkcCs,t|d|_d|_d|_d|_d|_dSrT)rr baseduration newdurationbeats parenthesesrrr r rrr#zTempoMark.__init__cCr+r)rrrsr r rset_base_durationr.zTempoMark.set_base_durationcCr+r)rrr r rset_new_durationr.zTempoMark.set_new_durationcCr+r)r)rrr r rset_beats_per_minuter.zTempoMark.set_beats_per_minutecCr+rr)rrr r rset_parenthesesr.zTempoMark.set_parenthesescCr+r)rr r r rset_textr.zTempoMark.set_textcCrrTr rr r rrrzTempoMark.wait_for_notecCs|rd|SdS)Nz/\general-align #Y #DOWN \smaller \note {%s} #UPrrlrr r rduration_to_markups zTempoMark.duration_to_markupcCr)Nz+\mark\markup { \fontsize #-2 \line { %s } }r rr r rtempo_markup_templaterzTempoMark.tempo_markup_templatecCsd}|js|S|jr0|js|jr"|d|jpd|j|jf7}|S|d|j|jf7}|S|jrY||j}||j}|jrId||f}nd||f}|||7}|SdS)Nrz\tempo "%s" %s=%sz \tempo %s=%sz"(" %s = %s ")"z %s = %s )rrrrrhrrr)rrSZdmZndmrr r rrhs,        zTempoMark.ly_expressionN) rrrrrrrrrrrrrhr r r rrs rc@r) FiguredBassNotecCs t|d|_d|_d|_dSr)rrrprefixsuffixrr r rrrzFiguredBassNote.__init__cCr+rr)rrr r r set_prefixr.zFiguredBassNote.set_prefixcCr+rr)rrr r r set_suffixr.zFiguredBassNote.set_suffixcCr+r)r)rrr r r set_numberr.zFiguredBassNote.set_numbercCsBd}|jr ||j7}n|d7}|jr||j7}|jr||j7}|S)Nrr)rrrrWr r rrhs   zFiguredBassNote.ly_expressionN)rrrrrrrrhr r r rrs  rc@r) FiguredBassEventcCs t|d|_d|_d|_dSr)r0rr real_durationrrr r rrs zFiguredBassEvent.__init__cCr+r)rrr r r set_duration r.zFiguredBassEvent.set_durationcCr+rr)rZparr r rr r.z FiguredBassEvent.set_parenthesescCr+r)rrr r rset_real_duration r.z"FiguredBassEvent.set_real_durationcCshdd|jD}|r2g}|D] }||qd|}|jr$d|}|d||j|dSdS)NcSrr )rOrrr r rr? rz-FiguredBassEvent.print_ly..rJz[%s]r)rr7rhrArrrj)rr Zfigured_bass_eventsr+r>rr r rrj s  zFiguredBassEvent.print_lyN)rrrrrrrrjr r r rrs  rc@r)MultiMeasureRestcCrU)Na< (make-music 'MultiMeasureRestMusicGroup 'elements (list (make-music (quote BarCheck)) (make-music 'ChordEvent 'elements (list (make-music 'MultiMeasureRestEvent 'duration %s))) (make-music (quote BarCheck)))) rVrr r rr_ s z MultiMeasureRest.lisp_expressioncCrU)NzR%srZrr r rrh, rzMultiMeasureRest.ly_expressionN)rrrr_rhr r r rr s rc@seZdZdddZddZdS)BreakbreakcCr r)rrr)rtpr r rr1 rzBreak.__init__cCs|jr |d|jdSdSr)rrQrr r rrj5 szBreak.print_lyN)rrr r r rr0 s  rc@sfeZdZdddZddZddZddZd d Zd d Zd dZ ddZ ddZ ddZ ddZ dS) StaffGroupcCsF||_d|_d|_d|_d|_d|_d|_g|_d|_g|_ d|_ dSrO) stafftypeidinstrument_namesoundshort_instrument_namesymbolspanbarchildrenis_groupcontext_modificationspart_informationrrr r rr; s zStaffGroup.__init__cCrr)rr7rr r r append_staffL rzStaffGroup.append_staffcCs:||jkr ||_dS|jD] }t|dr|||q dS)Nset_part_information)rrrrr)rZ part_name staves_inforr r rrO s     zStaffGroup.set_part_informationcCrr)rr7)rZ modificationr r radd_context_modificationW rz#StaffGroup.add_context_modificationcCs|jD] }|r ||qdSr)rrj)rr rr r rprint_ly_contentsZ s  zStaffGroup.print_ly_contentscCsJd}||jdkO}||jduO}||jduO}||jduo!|jdkO}|S)NFnor&)rrrr)r needs_withr r rrb s zStaffGroup.needs_withcCsZ|js|jr |d|jdkr|ddddd|jd}|r+|d|dSdS) Nz$\consists "Instrument_name_engraver"rz \hide SpanBarZSystemStartBraceZSystemStartBarZSystemStartSquare)Zbracerr|zsystemStartDelimiter = #'%s)rrrQrrcr)rr Zbrackr r rprint_ly_context_modsj s     z StaffGroup.print_ly_context_modscCs^|t|jdkB}|r-|d|||jD]}||q|d|dSdS)Nr\with {rF)rrKrrQrr0)rr rrGr r rprint_ly_overridesu s      zStaffGroup.print_ly_overridesc Csbz&|jD]\}}|D]\}}}}}|r"|d|td|f|q qWdSty0YdSw)Nz#\context ChordNames = "%s" {%s \%s}rrrr0 TypeError rr staff_idvoicesrllyrics figuredbass chordnames fretboardsr r r print_chords   zStaffGroup.print_chordsc Csbz&|jD]\}}|D]\}}}}}|r"|d|td|f|q qWdSty0YdSw)Nz#\context FretBoards = "%s" {%s \%s}rrrr r rprint_fretboards rzStaffGroup.print_fretboardscCs|||||jr|d|j||||jr*|d||jrA|jrA|d|jt|jf||jrX|jrX|d|jt|jf||j rj|d|j|j f|| |||jr|d|dSdS)Nz\new %srAz\set %s.instrumentName = %sz \set %s.shortInstrumentName = %sz\set %s.midiInstrument = "%s"rE) rrrrQrr0rrrrrrr r rrj s<            zStaffGroup.print_lyN)r)rrrrrrrrrrrrrrjr r r rr: s   rc@s6eZdZd ddZddZddZddZd d Zd S) StaffcCs.t||d|_d|_d|_d|_d|_dS)NFZVoice)rrrpart voice_command substafftyperrr r rr s  zStaff.__init__cCrrTr rr r rr rzStaff.needs_withcCrrr rr r rr szStaff.print_ly_context_modsc Cs2|jr|jsdS|j}|s|j}||jD]\}}|r&|d||fn|d|||d|d}t|}|D]P\}}} } } |d7}d} |dkr] ddd d |d } |d |j|t d | |f|d} |D]}|d|| |f| d7} |qs| r|d| | fqA|dqdS)Nz\context %s = "%s" << z\context %s << z2\mergeDifferentlyDottedOn\mergeDifferentlyHeadedOnrrrz \voiceOnez \voiceTwoz \voiceThree)rrrz \voiceFourz\context %s = "%s" {%s %s \%s }rz6\new Lyrics \lyricsto "%s" { \set stanza = "%s." \%s }z\context FiguredBass = "%s" \%srE) rrrrr0rQrKrcrr)rr Zsub_staff_typerrr*Z nr_voicesrlrrrrZvoice_count_textZ lyrics_idrr r rr sT     zStaff.print_ly_contentscCs0|jrt|jdkrd|_d|_t||dS)NrZ PianoStaffr)rrKrrrrjrr r rrj szStaff.print_lyN)r)rrrrrrrrjr r r rr s   .rc@eZdZdddZddZdS)TabStaffcCs"t||g|_d|_d|_dS)NZTabVoice)rrstring_tuningstablature_formatrrr r rr s  zTabStaff.__init__cCsv|js|jr9|d|jr'|d|jD] }|d|q|d|jr2|d|j|ddSdS)NrzstringTunings = #`(z,%srztablatureFormat = #%srF)rrrQr_)rr r&r r rr s     zTabStaff.print_ly_overridesN)rrrrrrr r r rr s  rc@r) DrumStaffcCst||d|_d|_dS)NZ DrumVoice)rrdrum_style_tablerrr r rr s  zDrumStaff.__init__cCs2|jr|d|d|j|ddSdS)NrzdrumStyleTable = #%srF)rrQrr r rr s  zDrumStaff.print_ly_overridesN)rrr r r rr s  rc@seZdZdddZdS) RhythmicStaffcCst||dSr)rrrr r rr! rzRhythmicStaff.__init__N)rr4r r r rr src@r) ScorecCsd|_d|_dS)z0 Constructs a new Score object. NF)r create_midirr r rr* s zScore.__init__cCr+r)r)rrr r r set_contents1 r.zScore.set_contentscCs|jr |j||dSdSr)rr)rZpart_idrr r rr4 szScore.set_part_informationcCs ||_dS)z Set the tempo attribute of the Score. This attribute can be used in L{print_ly} for the midi output (see L{musicxml.Sound}). @param tempo: The value of the tempo, in beats per minute. @type tempo: String N)tempo)rrr r r set_tempo8 s zScore.set_tempocCs t|_|d||d||jr|j||d||d||jr_|d||d||d||j||d|n|d||d|d |jd ||d|d S) z Print the content of the score to the printer, in lilypond format. @param printer: A printer given to display correctly the output. @type printer: L{Output_printer} z\score {rArEz \layout {}rFz\unfoldRepeats \articulate {z6% To create MIDI output, uncomment the following line:r z\midi {\tempo 4 = z }N)rzrrQr0rrjrrr r rrjE s<              zScore.print_lyN)rrrrrrrrjr r r rr) s  rcCst}d|_d|_d|_t}d|_t}d|_|t|t|||||t||||t|dt||t|||t||||dS)Nr6r rr)rrrrrprintrr)ZbflatZfifthrr r r test_pitchs s  rcsZddfdd}t}||||||t}|||dS)NcSst}t}|||Sr)rPrr7)evcr*r r r make_note s ztest_printer..make_notecsFt}|||t}d|_d|_||_|S)Nrr)rNr7r$r]r^r)rGrrr rmake_tup s   ztest_printer..make_tup)rNr7rrjr0)rrGr r rr test_printer s      rcCst}d}t}t}||j_d|j_|d|d|d|dt}t}||j_d|j_|d|d|d|dt}t}||j_d|j_|d|d|d|dt}d|_ |d|dt}t }d|_d|_ t }| |_gd|_|d|d|d|d|S)Nrrrrrxr`)rrr`rrr`r`)rNrPrrr[rrr8rtrrrr_rraZscale)rGrrr*rar r r test_expr sB  r__main__rrcCs |j|ko |j||k}|Sr)rru)r>rrokr r rsub sr)rkrinspectrJrr$rUwarningsZlilylibrrrrrfrrobjectrrYrxrzr}rrrrrrrrrrrrrrrrrrrrrrrrrrr"r$r0rNrVr`rcrmrrPrrQrrrrrrrrrrrrrrrrr rrrrrrrr'r)r,r3rr6r:r;r=r@rHrKrrrYrr_rerjrtrrrrrrrrrrrrrrrrrrrexprrrjrrrrrTr r r rs  mC   lC  SF("(Ev "  .  # !" ;* <5    = F  J *