Do you mean JianPu ?I came cross this before 
http://people.ds.cam.ac.uk/ssb22/mwrhome/jianpu-ly.html
ThanksJun
Date: Thu, 9 May 2013 15:43:43 -0700
From: [email protected]
Subject: Fw: numbered notes
To: [email protected]

Hi lily users:
Is it possible to adapt the following numbr (at end of this email) which 
display number notes to display additional info as to the following table?
Thanks in advance,Ming. 
Whole (semibreve):  1 - - -    Dotted whole:   1 - - - - -    Double dotted: 1 
- - - - - -
 
Half (minim):       1 -        Dotted half:    1 - -          Double dotted: 1 
- - ·
 
Quarter (crotchet): 1          Dotted quarter: 1·             Double dotted: 1··
 
Eighth (quaver):    1          Dotted eighth:  1·             Double dotted: 1··
 
16th (semiquaver):  1
                    =
     ----- Forwarded Message -----
   From: MING TSANG <[email protected]>
 To: "[email protected]" <[email protected]> 
 Sent: Wednesday, May 1, 2013 10:17:42 PM
 Subject: numbered notes
   
Hi lily user:
  Is it possible to modify the following code. I like to display notes in 
numbered equivalent. eg. key c\majorf   =     4 - if possible there is a "." 
below the number e.g. *f'  =     4 - e.g. 4      f'' =   4 - if possible to 
display a "." on top of the number e.g.$      Thanks,Ming.


\version "2.17.0"
\include "english.ly"
numbr = #(make-engraver (acknowledgers
 ((note-head-interface engraver grob source)
    (let* (
      (context (ly:translator-context engraver))
      (tonic-pitch (ly:context-property context 'tonic))
      (tonic-index (ly:pitch-notename tonic-pitch))
      (event (ly:grob-property grob 'cause))
      (grob-pitch (ly:event-property event 'pitch))
      (grob-index (ly:pitch-notename grob-pitch))
      (delta (modulo (- grob-index tonic-index) 7))
      (name (list-ref '("1" "2" "3" "4" "5" "6" "7") delta))
      (newgrob (ly:engraver-make-grob engraver 'TextScript event)))
   (set! (ly:grob-property newgrob 'text) name)))))

musicI= \relative c {\key c\major c4 d e f g a b2  |\break }
musicII= \relative c' {\key c\major c4 d e f g a b2  |\break }
musicIII = \relative c'' { \key c\major c4 d e f g a b2  |\break }

\score{
   \new Staff \with {\consists #numbr }
  {\musicI \musicII  \musicIII}
   \layout {}
}

      
_______________________________________________
lilypond-user mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/lilypond-user                            
          
_______________________________________________
lilypond-user mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to