Re: B.A.C.H. motif

[Raphael Mankin]

That is so silly that I love it.

On 19/03/2024 13:27, Xavier Scheuer wrote:
On Tue, 19 Mar 2024 at 13:57, Peter Mayes <mailto:pe...@petermayes.org>> wrote:

 >
 > Being relatively new to this forum, I suspect I am not the first person
 > to ask this.
 >
 > And it is more out of curiosity than necessity.
 >
 > But does anybody have lilypond code to engrave the famous B.A.C.H. motif
 > in the attached image?

Hello,

Years ago, Pierre Perol-Schneider had contributed the following code on 
the French-speaking mailing list.
https://lilypond.community/t/est-ce-possible/3672/2 
<https://lilypond.community/t/est-ce-possible/3672/2>


\version "2.18.2"

\markup {
   \combine
   \score {
     {
   \key f\major
   \tweak extra-offset #'(-2 . 0) bes'1
   \clef C
   \override Staff.Clef.stencil =
     #(lambda (grob) (grob-interpret-markup grob
   #{ \markup\rotate #180 \musicglyph 
#"clefs.C" #}))

   \bar ""
     }
     \layout {
   \context {
     \Staff
     \hide TimeSignature
   }
     }
   }
   \rotate #90
   \translate #'(1 . 0)
   \score {
     {
   \key f\major
   \hide bes'1
   \clef mezzosoprano
   \override Staff.Clef.stencil =
     #(lambda (grob) (grob-interpret-markup grob
   #{ \markup\rotate #180 \musicglyph 
#"clefs.C" #}))

   \bar ""
     }
     \layout {
   \context {
     \Staff
     \hide TimeSignature
     \override KeySignature.stencil =
     #(lambda (grob) (grob-interpret-markup grob
   #{ \markup\musicglyph 
#"accidentals.natural" #}))

   }
     }
   }
}

Kind regards,
Xavier



--
https://saturday-october-seven.com/

Re: B.A.C.H. motif

[Aaron Hill]

On 2024-03-19 5:55 am, Peter Mayes wrote:
Being relatively new to this forum, I suspect I am not the first person 
to ask this.


And it is more out of curiosity than necessity.

But does anybody have lilypond code to engrave the famous B.A.C.H. 
motif in the attached image?


I did not check for prior work, so here is what I just put together:


\version "2.22.0"
\language deutsch

\layout { \context { \Score
  \omit SystemStartBar
  \omit TimeSignature
  \omit BarLine
} }

%% Offsets
#(define x1 -0.88)
#(define y1 0.062)
#(define x2 0.438)
#(define y2 0.88)
#(define x3 -0.15)
#(define y3 0.03)

accLeft = \once \override
  Accidental.extra-offset = #'(-1 . 0)
noNH = \once \hide NoteHead

\markup \overlay {

  \translate #(cons (+ x1 x3) (+ y1 y3))
  \general-align #X #CENTER \vcenter
  \score { { \clef treble \accLeft b'1 } }

  \translate #(cons (- x2 x3) (- y2 y3))
  \general-align #X #CENTER \vcenter
  \rotate #-90
  \score { { \clef tenorvarC \noNH a1 } }

  \translate #(cons (- x3 x1) (- y3 y1))
  \general-align #X #CENTER \vcenter
  \rotate #180
  \score { { \clef altovarC \noNH c'1 } }

  \translate #(cons (- 0 x2 x3) (- 0 y2 y3))
  \general-align #X #CENTER \vcenter
  \rotate #90
  \score { { \clef treble \accLeft \noNH h'! 1 } }

}



-- Aaron Hill

B.A.C.H. motif

[Jean Louis Thiry]

Here: https://lilypond.community/t/est-ce-possible/3672

-- 

Jean Louis Thiry
thir...@ramierou.eu

390A rue du Ramiérou à Montauban

Re: B.A.C.H. motif

[Xavier Scheuer]

On Tue, 19 Mar 2024 at 13:57, Peter Mayes  wrote:
>
> Being relatively new to this forum, I suspect I am not the first person
> to ask this.
>
> And it is more out of curiosity than necessity.
>
> But does anybody have lilypond code to engrave the famous B.A.C.H. motif
> in the attached image?

Hello,

Years ago, Pierre Perol-Schneider had contributed the following code on the
French-speaking mailing list.
https://lilypond.community/t/est-ce-possible/3672/2

\version "2.18.2"

\markup {
  \combine
  \score {
{
  \key f\major
  \tweak extra-offset #'(-2 . 0) bes'1
  \clef C
  \override Staff.Clef.stencil =
#(lambda (grob) (grob-interpret-markup grob
  #{ \markup\rotate #180 \musicglyph #"clefs.C"
#}))
  \bar ""
}
\layout {
  \context {
\Staff
\hide TimeSignature
  }
}
  }
  \rotate #90
  \translate #'(1 . 0)
  \score {
{
  \key f\major
  \hide bes'1
  \clef mezzosoprano
  \override Staff.Clef.stencil =
#(lambda (grob) (grob-interpret-markup grob
  #{ \markup\rotate #180 \musicglyph #"clefs.C"
#}))
  \bar ""
}
\layout {
  \context {
\Staff
\hide TimeSignature
\override KeySignature.stencil =
#(lambda (grob) (grob-interpret-markup grob
  #{ \markup\musicglyph #"accidentals.natural"
#}))
  }
}
  }
}

Kind regards,
Xavier

B.A.C.H. motif

[Peter Mayes]

Being relatively new to this forum, I suspect I am not the first person 
to ask this.


And it is more out of curiosity than necessity.

But does anybody have lilypond code to engrave the famous B.A.C.H. motif 
in the attached image?


Thanks in advance.

--
Best wishes -- Peter
--
Peter Mayes
07460 890503