lilypond-user
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Circular staves


From: Andrew Bernard
Subject: Re: Circular staves
Date: Mon, 24 Apr 2023 00:53:47 +1000

Well I am amazed. Thanks Paul!

The example from 2010 of course does not compile. Here's the code update for 2.25.3. This may make a tasty Lilypond snippet.

It's not ridiculous. There are interesting canons done in circular from by composers such as John Bull and others. Not just 'eye music'. And the person who asked about this over on the Dorico forum says his appliucation is mbira music which apparently has no fixed or definite starting note, hence the circular nature.


Andrew


======

\version "2.25.3"

\score {

  \relative c' {
    \override Staff.StaffSymbol.transparent = ##t
    \override Staff.KeySignature.transparent = ##t
    \override Staff.TimeSignature.transparent = ##t
    \override Staff.BarLine.transparent = ##t
    \override Staff.Clef.transparent = ##t

    % The clef
    \once \override Voice.TextScript.extra-offset = #'(-10.6 . -11.8 )
    s1^\markup { \rotate #90 \musicglyph #"clefs.G" }

    \once \override Voice.TextScript,extra-offset = #'(-17.1 . -8.0 )
    s1^\markup { \rotate #85 \note {4} #UP }

    \once \override Voice.TextScript.extra-offset = #'(-22.7 . -5.0 )
    s1^\markup { \rotate #60 \note {4} #UP }

    \once \override Voice.TextScript.extra-offset = #'(-27.9 . -2.8 )
    s1^\markup { \rotate #45 \note {4} #UP }

    \once \override Voice.TextScript.extra-offset = #'(-33.3 . -1.0 )
    s1^\markup { \rotate #30 \note {4} #UP }

    \once \override Voice.TextScript.extra-offset = #'(-43.1 . 0.2 )
    s1^\markup { \rotate #40 \beam #3.2 #0 #0.5 }

    \once \override Voice.TextScript.extra-offset = #'(-44.2 . 0.8 )
    s1^\markup { \rotate #0 \note {4} #UP }
  }
}


staffcircleps = #"
0.15 setlinewidth
30 0 moveto
20 0 10 0 361 arc
31 0 moveto
20 0 11 0 361 arc
32 0 moveto
20 0 12 0 361 arc
33 0 moveto
20 0 13 0 361 arc
34 0 moveto
20 0 14 0 361 arc
35 0 moveto
20 0 15 0 361 arc
stroke
"

staffcircle =  \markup { \postscript #staffcircleps }

\staffcircle

======


On 23/4/23 22:14, Paul Hodges wrote:
How about this:

https://lists.gnu.org/archive/html/lilypond-user/2010-02/msg00150.html




reply via email to

[Prev in Thread] Current Thread [Next in Thread]