Rietveld Code Review Tool
Help | Bug tracker | Discussion group | Source code | Sign in
(227)

Delta Between Two Patch Sets: ly/property-init.ly

Issue 565750043: Added vowel transitions for lyrics
Left Patch Set: Created 5 years, 1 month ago
Right Patch Set: Apologies for the noise for the last two patch sets. Created 5 years ago
Left:
Right:
Use n/p to move between diff chunks; N/P to move between comments. Please Sign in to add in-line comments.
Jump to:
Right: Side by side diff | Download
« no previous file with change/comment | « lily/vowel-transition.cc ('k') | scm/define-event-classes.scm » ('j') | no next file with change/comment »
Toggle Intra-line Diffs ('i') | Expand Comments ('e') | Collapse Comments ('c') | Show Comments Hide Comments ('s')
LEFTRIGHT
(no file at all)
1 % property-init.ly 1 % property-init.ly
2 2
3 \version "2.21.0" 3 \version "2.21.0"
4 4
5 %% for dashed slurs, phrasing slurs, and ties 5 %% for dashed slurs, phrasing slurs, and ties
6 #(define (make-simple-dash-definition dash-fraction dash-period) 6 #(define (make-simple-dash-definition dash-fraction dash-period)
7 (list (list 0 1 dash-fraction dash-period))) 7 (list (list 0 1 dash-fraction dash-period)))
8 8
9 %% common definition for all note head styles reverting 9 %% common definition for all note head styles reverting
10 %% (palm mute, harmonics, dead notes, ...) 10 %% (palm mute, harmonics, dead notes, ...)
(...skipping 737 matching lines...) Expand 10 before | Expand all | Expand 10 after
748 } 748 }
749 749
750 750
751 %% volta brackets 751 %% volta brackets
752 752
753 allowVoltaHook = 753 allowVoltaHook =
754 #(define-void-function (bar) (string?) 754 #(define-void-function (bar) (string?)
755 (_i "Allow the volta bracket hook being drawn over bar line @var{bar}.") 755 (_i "Allow the volta bracket hook being drawn over bar line @var{bar}.")
756 (allow-volta-hook bar)) 756 (allow-volta-hook bar))
757 757
758
759 %% vowel transitions
760
761 vowelTransition = #(make-music 'VowelTransitionEvent)
762
763
758 %% x notes 764 %% x notes
759 765
760 #(define (cross-style grob) 766 #(define (cross-style grob)
761 ;; Returns the symbol 'cross to set the 'style-property for (Tab-)NoteHead. 767 ;; Returns the symbol 'cross to set the 'style-property for (Tab-)NoteHead.
762 ;; If the current text-font doesn't contain the glyph set 'font-name to '() 768 ;; If the current text-font doesn't contain the glyph set 'font-name to '()
763 ;; and 'font-family to 'feta. 769 ;; and 'font-family to 'feta.
764 ;; If 'feta is replaced by another music-font without cross-style-glyphs 770 ;; If 'feta is replaced by another music-font without cross-style-glyphs
765 ;; note-head.cc throws a warning and no visual output happens. 771 ;; note-head.cc throws a warning and no visual output happens.
766 (let* ((layout (ly:grob-layout grob)) 772 (let* ((layout (ly:grob-layout grob))
767 (props (ly:grob-alist-chain grob)) 773 (props (ly:grob-alist-chain grob))
(...skipping 19 matching lines...) Expand all
787 (if (eq? (ly:music-property note 'name) 'NoteEvent) 793 (if (eq? (ly:music-property note 'name) 'NoteEvent)
788 #{ \tweak style #cross-style $note #} 794 #{ \tweak style #cross-style $note #}
789 #{ \xNotesOn $note \xNotesOff #})) 795 #{ \xNotesOn $note \xNotesOff #}))
790 796
791 %% dead notes (these need to come after "x notes") 797 %% dead notes (these need to come after "x notes")
792 798
793 % Define aliases of cross-head notes for specific purposes 799 % Define aliases of cross-head notes for specific purposes
794 deadNotesOn = \xNotesOn 800 deadNotesOn = \xNotesOn
795 deadNotesOff = \xNotesOff 801 deadNotesOff = \xNotesOff
796 deadNote = #xNote 802 deadNote = #xNote
LEFTRIGHT

Powered by Google App Engine
RSS Feeds Recent Issues | This issue
This is Rietveld f62528b