\version "2.19.5" \language "english" #(define solfege (circular-list "d" "r" "m" "f" "s" "l" "t")) #(define numbers (circular-list "1" "2" "3" "4" "5" "6" "7")) #(define (Ez_noteheads-engraver lst ) (list (cons 'acknowledgers (list (cons 'note-head-interface (lambda (engraver grob source-engraver) (let* ((context (ly:translator-context engraver)) (tonic-pitch (ly:context-property context 'tonic)) (tonic-name (ly:pitch-notename tonic-pitch)) (delta (- 7 tonic-name)) (solfege-base lst) (solfege (take (drop solfege-base delta) 7)) (note-names (apply vector solfege))) ; (display solfege)(newline) (ly:grob-set-property! grob 'note-names note-names)))))))) EzON = { \easyHeadsOn \override Staff.StaffSymbol.staff-space = #1.25 \override Staff.StaffSymbol.line-thickness = #1.25 \override Staff.NoteHead.font-size = #+3.25 \override Staff.Clef.font-size = #+1.35 \override Staff.TimeSignature.font-size = #+1.35 %\override Staff.Accidental.font-size = #+1.35 \override Staff.NoteHead.font-size = #-5.0 } % if needded : EzOFF = { \easyHeadsOff \revert Staff.StaffSymbol.staff-space \revert Staff.StaffSymbol.line-thickness \revert Staff.NoteHead.font-size \revert Staff.Clef.font-size \revert Staff.TimeSignature.font-size %\revert Staff.Accidental.font-size \revert Staff.NoteHead.font-size } EzNum = \with { \consists #( Ez_noteheads-engraver numbers ) } #(define eznum #( Ez_noteheads-engraver numbers )) EzSol = \with { \consists #( Ez_noteheads-engraver solfege ) } ezsol = #( Ez_noteheads-engraver solfege ) % { #(set-global-staff-size 26) globalii = { \key c \major \numericTimeSignature \time 3/4 } SA = { \globalii %% uncomment below for easy reading : %\EzON | % mes.27 << { \voiceOne c''4. b'8 } \new Voice { %% uncomment below for easy reading : %\EzON \voiceTwo d'4 c'4 } >> \oneVoice 4 | % mes.28 4 r4 q4 | % mes.29 4 4 4 | % mes.30 4 4 4 | % mes.31-32 << { \voiceOne e'2.^~ | % mes.32 e'4 } \new Voice { \voiceTwo %% uncomment below for easy reading : %\EzON d'4( c'2~ | % mes.32 c'4) } >> \oneVoice r4 g'4 | % mes.3... } TB = { \globalii %% comment-on below for standart reading : \EzON | % mes.27 4 q4 4 | % mes.28 4 r4 q4 | % mes.29 4 q4 << { \voiceOne a8( g8) } \new Voice{ \voiceTwo %% comment-on below for standart reading : \EzON d4 } >> | % mes.30 \oneVoice 4 q4 q4 | % mes.31 2.~ | % mes.32 q4 r4 g4 | % mes.3...... } \score { \new ChoirStaff << \new Staff \EzNum { << \new Voice = "female" \SA >> } \new Staff \EzSol { \set Staff.instrumentName = \markup \center-column { "T." "B." } \set Staff.shortInstrumentName = \markup \center-column { "T." "B." } << \clef bass \new Voice = "male" \voiceOne \TB >> } >> \layout { } } %{ convert-ly.py (GNU LilyPond) 2.19.5 convert-ly.py: Processing `'... Applying conversion: 2.19.2 %}