\version "2.18.2"
%\pointAndClickOff

%% Works with other sizes:
%#(set-global-staff-size 25)

\paper { 
  indent = 0
  top-margin = 15
  left-margin = 20
  right-margin = 20
  tagline = ##f
}

\header {
  title = \markup { \bold "4b." \normal-text "XV. zsoltár" }
}
\markup\vspace #2 % <= put some vertical space here

%%%% Defining new grobs:

%% quater note head:
o = \markup\concat { \hspace #-.1 \musicglyph #"noteheads.s2" }

%% quater note head with ledger line:
ol = \markup\concat { \hspace #-.1 { \musicglyph #"noteheads.s2" \hspace #-1.65 \override #'(thickness . 2.25)\draw-line #'(1.75 . 0) } }

%% strait stem:
st = \markup\concat { \hspace #-.1 \draw-line #'(0 . -3.5) \hspace #-.01 }

%% short curved stem:
svOne = \markup\lower #.7 \fontsize #2 \concat { \hspace #-.85 \scale #'(1 . .5)\char ##x23B1 \hspace #-.7 }

%% medium curved stem:
svTwo = \markup\lower #1.1 \fontsize #2 \concat { \hspace #-.8 \scale #'(1 . .75)\char ##x23B1 \hspace #-.7 }

%% long curved stem:
svThree = \markup\lower #1.55 \fontsize #2 \concat { \hspace #-.8 \scale #'(1 . .9)\char ##x23B1 \hspace #-.7 }

%% ornament:
gr = \markup\concat { \hspace #.4 \lower #1.5 \fontsize #8 \char ##x1D19F }

%% Left aligning lyric :
lal = \once\override LyricText.self-alignment-X = #LEFT

%%%%%%%%%%% Example %%%%%%%%%%%%%%

myMelody = \transpose c c' {
  \clef G
  \cadenzaOn
  d 
  d d 
  \once\override NoteHead.stencil = #(lambda (grob)
         (grob-interpret-markup grob 
           #{
             \markup\concat {
               \o % resp. f
               \raise #0.5 \o  % resp. g
               \raise #1 { \st\o } % resp. stem / a
             }
           #}))
  f
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o\gr % resp. g / ornament
           }
         #}))
  g 
  g 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o % resp. g
             \raise #.5 \o  % resp. a
             \raise #1.5 { \st\o } % resp. stem / c'
           }
         #}))
  g 
  a 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \st\o\svOne % resp. stem / a / short curved stem
             \lower #.5 \o % resp. g
             \o % resp. a
             \raise #1 { \st\o\svThree } % resp. stem / c' / long curved stem
             \lower #.5 \o % etc.
             \st\o\svOne
             \lower #.5 { \o\svOne }
             \lower #1 \o
           }
         #}))
  a 
  \bar "'"
  a c' 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \st\o\svOne
             \lower #.5 { \o\svOne }
             \lower #1 \o
           }
         #}))
  c'
  \bar ""\break
  \once\override NoteHead.stencil = #(lambda (grob)
         (grob-interpret-markup grob 
           #{
             \markup\concat {
               \o 
               \raise #0.5 \o 
               \raise #1 { \st\o\svOne }
               \raise #0.5 { \o\svTwo  }
               \lower #0.5 \o
               \lower #0.5 \o
               \o
               \raise #0.5 { \o\svOne }
               \o\svOne
               \lower #0.5 \o
             }
           #}))
  b 
  \once\override NoteHead.stencil = #(lambda (grob)
         (grob-interpret-markup grob 
           #{
             \markup\concat {
               \o 
               \raise #0.5 \o 
               \raise #1.5 { \st\o\svTwo }
               \raise #0.5 \o
               \o
               \raise #0.5 { \st\o }
             }
           #}))
  g 
  \once\override NoteHead.stencil = #(lambda (grob)
         (grob-interpret-markup grob 
           #{
             \markup\concat {
               \o 
               \raise #0.5 \o 
               \raise #1.5 { \st\o\svTwo }
               \raise #0.5 \o
             }
           #}))
  g 
  \bar "|"
  f 
  \once\override NoteHead.stencil = #(lambda (grob)
         (grob-interpret-markup grob 
           #{
             \markup\concat {
               \o 
               \raise #1 { \st\o }
             }
           #}))
  a 
  \once\override NoteHead.stencil = #(lambda (grob)
         (grob-interpret-markup grob 
           #{
             \markup\concat {
               \o 
               \raise #.5 { \st\o\svOne }
               \o \hspace #-0.9 \gr
             }
           #}))
  c' 
  c' 
  \once\override NoteHead.stencil = #(lambda (grob)
         (grob-interpret-markup grob 
           #{
             \markup\concat {
               \o 
               \raise #.5 { \st\o\svTwo }
               \lower #.5 \o
             }
           #}))
  c'
  \once\override NoteHead.stencil = #(lambda (grob)
         (grob-interpret-markup grob 
           #{
             \markup\concat {
               \o 
               \raise #.5 { \st\o }
             }
           #}))
  c' 
  \once\override NoteHead.stencil = #(lambda (grob)
         (grob-interpret-markup grob 
           #{
             \markup\concat {
               \o\svTwo 
               \lower #1 \o
               \lower #0.5 \o
               \st\o
             }
           #}))
  d' 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o % a
             \raise #0.5 \o % b
             \raise #1 { \st\o\svOne } % c'
             \raise #0.5 { \o\svOne } % b
             \o\svOne % a
             \lower #0.5 \o % g
             \st\o % a
           }
         #}))
  a 
  \bar "" \break
  \once\override NoteHead.stencil = #(lambda (grob)
         (grob-interpret-markup grob 
           #{
             \markup\concat {
               \st\o\svOne
               \lower #0.5 \o
             }
           #}))
  a 
  \bar "'"
  a 
  \once\override NoteHead.stencil = #(lambda (grob)
         (grob-interpret-markup grob 
           #{
             \markup\concat {
               \o
               \raise #1 { \st\o\svOne }
               \raise #0.5 { \o\svTwo }
               \lower #0.5 \o
             }
           #}))
  a 
  \once\override NoteHead.stencil = #(lambda (grob)
         (grob-interpret-markup grob 
           #{
             \markup\concat {
               \o\o
             }
           #}))
  c' 
  \once\override NoteHead.stencil = #(lambda (grob)
         (grob-interpret-markup grob 
           #{
             \markup\concat {
               \st\o\svOne
               \lower #0.5 { \o\svOne }
               \lower #1 \o
               \lower #0.5 { \st\o\svTwo }
               \lower #1.5 { \o\svOne }
               \lower #2 \o
             }
           #}))
  d' 
  \once\override NoteHead.stencil = #(lambda (grob)
         (grob-interpret-markup grob 
           #{
             \markup\concat {
               \st\o\svOne
               \lower #0.5 \o
               \st\o\svOne
               \lower #0.5 { \o\svOne }
               \lower #1 \o
               \lower #0.5 { \st\o }
             }
           #}))
  a 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \st\o\svOne
             \lower #0.5 \o
           }
         #}))
  g 
  \bar "|"
  f g a 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o
             \raise #0.5 { \st\o }
           }
         #}))
  g 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o\gr
           }
         #}))
  g 
  g
  \bar "" \break
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o
             \raise #0.5 { \st\o }
           }
         #}))
  g 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \st\o\svOne
             \lower #0.5 \o
           }
         #}))
  f 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o
             \raise #1.5 { \st\o }
           }
         #}))
  d 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o
             \raise #0.5 { \st\o\svTwo }
             \lower #0.5 { \o\svOne }
             \lower #1 { \o\svOne }
             \lower #1.5 \o
           }
         #}))
  g 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o
             \raise #1 { \st\o\svTwo }
             \o\svOne
             \lower #0.5 \ol
             \hspace #0.8
             \o
             \raise #1 { \st\o\svTwo }
             \o
           }
         #}))
  d \bar "'" 
  g 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o
             \raise #0.5 { \st\o\svOne }
             \o\svOne
             \lower #0.5 \o
             \o
             \raise #0.5 { \st\o }
           }
         #}))
  g 
  g
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o
             \raise #0.5 \o
             \raise #1.5 { \st\o\svTwo }
             \raise #0.5 { \o\o }
             \raise #1 \o
             \raise #1.5 { \st\o\svOne }
             \raise #1 { \o\svOne }
             \raise #0.5 \o
           }
         #}))
  g 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o
             \raise #0.5 \o
             \raise #1.5 { \st\o\svTwo }
             \raise #0.5 { \o\svOne }
             \o
             \raise #.5 { \st\o }
           }
         #}))
  g 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \st\o\svOne
             \lower #0.5 \o
           }
         #}))
  a 
  \bar "|." \break
  c' c' c'
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o
             \raise #0.5 { \st\o\svOne }
             \o\st\o\svTwo
             \lower #1 { \o\svOne }
             \lower #1.5 \o
           }
         #}))
  c' 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o 
             \raise #1 { \st\o }
           }
         #}))
  a c' \bar "'" c' c' 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
            \o\o
           }
         #}))
  c' 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o 
             \raise #1 { \st\o }
           }
         #}))
  a 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o 
             \raise #0.5 \o
             \raise #1.5 { \st\o\svTwo }
             \raise #0.5 \o
           }
         #}))
  g 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \st\o\svOne
             \lower #0.5 \o 
           }
         #}))
  a 
  \bar "|" 
  g 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o 
             \raise #0.5 { \st\o }
           }
         #}))
  f
  \bar "" \break
  g 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o
             \raise #0.5 { \st\o }
           }
         #}))
  g 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o \hspace #.8 \gr
           }
         #}))
  g g 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o
             \raise #1 { \st\o\svTwo }
             \o\svOne
             \lower #0.5 \o
             \o
             \raise #1 { \st\o\svTwo }
             \o
           }
         #}))
  a 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o
             \raise #0.5 { \st\o\svTwo }
             \lower #0.5 \o
           }
         #}))
  g 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o
             \raise #0.5 { \st\o }
           }
         #}))
  g 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o
             \raise #0.5 \o
             \raise #1 \o
             \raise #1.5 { \st\o }
             \raise #1 { \o\st\o\svOne }
             \raise #0.5 { \o\svOne }
             \o
           }
         #}))
  a 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o
             \raise #1 { \st\o\svTwo }
             \o\svOne
             \lower #0.5 \o
             \hspace #1
             \st\o\svOne
             \lower #0.5 \o
           }
         #}))
  a 
  \bar "|." 
  \once\override NoteHead.stencil = #(lambda (grob)
       (grob-interpret-markup grob 
         #{
           \markup\concat {
             \o \hspace #2 
             \raise #1 \o
             \raise #2 { \st\o \hspace #2 \o }
           }
         #}))
  f 
  \bar "|."
}

myLyrics = \lyricmode {
  \set stanza = \markup\box\pad-markup #.5 \bold "4b"
  Meg- is- mer- tet- ted
  % or:
  % Meg -- is -- mer -- tet -- ted
  ve- lem,
  U- \lal ram az é- let
  \lal út- \lal ja- \lal it,
  \set stanza = #"*" 
  \lal be-  töl- tesz
  vi- gas- sá- gal \lal en- 
  gem a te szí- \lal ned \lal e- lőtt
  gyö- nyö- rű- ség- gel a
  te job- bod \lal fe- \lal lől
  ö- \lal rök- kön \lal ö- \lal rök- ké.
  \set stanza = #"V)"
  Tarts meg en- \lal gem,
  U- ram, mert te- ben- ned \lal bíz- tam,
  mon- dám az Úr- nak: 
  én Is- te- \lal nem \lal vagy \lal te.
  \set stanza = #"*"
  \lal
  Betöltesz.
}

\score {
  <<
    \new Voice = MyMelody \myMelody
    \new Lyrics \lyricsto MyMelody \myLyrics
  >>
  \layout {
    \context {
      \Score
      \omit TimeSignature
    }
    \context {
      \Staff
      \omit Stem
    }
    \context {
      \Lyrics
      \override VerticalAxisGroup.staff-affinity = ##f
    }
  }
}