#!/usr/bin/env python # -*- coding: utf-8 -*- # (can be run with either Python 2 or Python 3) r""" # Jianpu (numbered musical notaion) for Lilypond # v1.865 (c) 2012-2025 Silas S. Brown # v1.826 (c) 2024 Unbored # Licensed under the Apache License, Version 2.0 (the "License"); # you may not use this file except in compliance with the License. # You may obtain a copy of the License at # # http://www.apache.org/licenses/LICENSE-2.0 # # Unless required by applicable law or agreed to in writing, software # distributed under the License is distributed on an "AS IS" BASIS, # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. # See the License for the specific language governing permissions and # limitations under the License. # Home: https://ssb22.user.srcf.net/mwrhome/jianpu-ly.html # Git repository: https://github.com/ssb22/jianpu-ly # and on GitLab: https://gitlab.com/ssb22/jianpu-ly # and on Bitbucket: https://bitbucket.org/ssb22/jianpu-ly # + at https://gitlab.developers.cam.ac.uk/ssb22/jianpu-ly # and in China: https://gitee.com/ssb22/jianpu-ly # The following docstring format is fixed, and is used by the options # --html (generates the HTML table for the website) # --html --chinese (generates a Chinese version of this table) # --markdown (generates the Markdown table for the Readme) # --markdown --chinese (generates the Markdown table for the Chinese Readme) # Currently, any non-ASCII character in a line indicates it's the Chinese version. Run jianpu-ly < text-file > ly-file (or jianpu-ly text-files > ly-file). There is experimental support for importing MusicXML via jianpu-ly piece.xml (or jianpu-ly piece.mxl > ly-file) but this does not work for all pieces. # (Currently, MusicXML import must use .mxl extension and not redirect) 运行 jianpu-ly < 文件名.txt > 文件名.ly（或 jianpu-ly 文件名.txt > 文件名.ly）。通过jianpu-ly piece.xml （或 jianpu-ly piece.mxl > 文件名.ly）可以导入MusicXML，但这是实验性质的，并不适合所有乐曲。 Normal text files are whitespace-separated and can contain words like the following. Usually the order of characters within a note does not matter, hence #1 is the same as 1# and '1 is the same as 1' and s1 is the same as 1s. 普通文本文件以空格分隔的，可以包含类似下面这样的字词。通常，音符中字符的顺序并不重要，因此 #1 与 1# 相同，'1 与 1' 相同，s1 与 1s 相同。 Scale going up: 1 2 3 4 5 6 7 1' 上行音阶： 1 2 3 4 5 6 7 1' Accidentals: 1 #1 2 b2 1 变音记号： 1 #1 2 b2 1 Octaves: 1,, 1, 1 1' 1'' 八度音阶： 1,, 1, 1 1' 1'' Shortcuts for 1' and 2': 8 9 1'和 2' 的快捷键： 8 9 Percussion beat: x 打击乐节拍： x Change base octave: < > 高低八度记号： < > Semiquaver, quaver, crotchet (16/8/4th notes): s1 q1 1 十六分音符、八分音符、四分音符： s1 q1 1 Alternate way to input semiquaver, quaver, crotchet: 1\\ 1\ 1 (any \ must go after the pitch not before) 十六分音符、八分音符、四分音符的替代方案： 1\\ 1\ 1 （任何\必须写在音高之后而不是之前） Sticky durations (4 semiquavers then crotchet): KeepLength s1 1 1 1 c1 保持不变的时值 （4个十六分音符+1个四分音符）： KeepLength s1 1 1 1 c1 Dotted versions of the above (50% longer): s1. q1. 1. 前文提到的音符的附点版本： s1. q1. 1. Alternate dotted versions: 1\\. 1\. 替代方案也可以附点： 1\\. 1\. Demisemiquaver, hemidemisemiquaver (32/64th notes): d1 h1 三十二分音符、六十四分音符： d1 h1 Minims (half notes) use dashes: 1 - 二分音符： 1 - Dotted minim: 1 - - 附点二分音符： 1 - - Semibreve (whole note): 1 - - - 全音符： 1 - - - Time signature: 4/4 拍号： 4/4 Time signature with quaver anacrusis (8th-note pickup): 4/4,8 以八分音符的时值弱起的拍号： 4/4,8 Key signature (major): 1=Bb 调号（大调）： 1=Bb Key signature (minor): 6=F# 调号（小调）： 6=F# Tempo: 4=85 速度： 4=85 Lyrics: L: here are the syl- la- bles (all on one line, or newline after the : and double newline to end) 歌词： L: here are the syl- la- bles （单独一行，或在:之后换行输入，并以2个空行结束） Lyrics (verse 1): L: 1. Here is verse one 歌词（第一节）： L: 1. Here is verse one Lyrics (verse 2): L: 2. Here is verse two 歌词（第二节）： L: 2. Here is verse two Hanzi lyrics (auto space): H: hanzi (with or without spaces) 汉字歌词： H: 汉字 （有无空格都可） Lilypond headers: title=the title (on a line of its own) Lilypond 页头： title=标题 （单独一行） Guitar chords: chords=c2. g:7 c (on own line, or newline after the = and double newline to end) 吉他和弦符号： chords=c2. g:7 c （单独一行，或在=之后换行输入，并以2个空行结束） Fret diagrams: frets=guitar (on own line) 和弦指板图： frets=guitar （单独一行） Change guitar chords into Roman numerals: ChordsRoman 变换吉他和弦为罗马数字: ChordsRoman Multiple parts: NextPart 多声部： NextPart Instrument of current part: instrument=Flute (on a line of its own) 当前分谱使用的乐器： instrument=Flute （单独一行） Multiple movements: NextScore 多个乐章： NextScore Prohibit page breaks until end of this movement: OnePage 在乐章结束前禁止换页： OnePage Suppress bar numbers: NoBarNums 禁止为小节编号： NoBarNums Suppress first-line indent: NoIndent 禁止首行缩进： NoIndent Ragged last line: RaggedLast 最后一行不规则对齐： RaggedLast Old-style time signature: SeparateTimesig 1=C 4/4 旧式拍号： SeparateTimesig 1=C 4/4 Indonesian 'not angka' style: angka 印尼 not angka 风格： angka Alternate Indonesian-style minim, dotted minim and semibreve: 1 . 1 . . 1 . . . (dot is treated as dash) 交替使用印尼风格的二分音符、附点二分音符和全音符： 1 . 1 . . 1 . . . （点被视为破折号） Add a Western staff doubling the tune: WithStaff 增加一个西方五线谱来显示双谱： WithStaff Tuplets: 3[ q1 q1 q1 ] 连音： 3[ q1 q1 q1 ] Grace notes before: g[#45] 1 前倚音： g[#45] 1 Grace notes after: 1 ['1]g 后倚音： 1 ['1]g Grace notes with durations: g[d4d5s6] 1 带时值的倚音： g[d4d5s6] 1 Simple chords: ,135' 1 1b3 1 简单和弦： ,135' 1 1b3 1 Da capo: 1 1 Fine 1 1 1 1 1 1 DC 从头反复： 1 1 Fine 1 1 1 1 1 1 DC Dal segno: 1 1 Segno 1 1 ToCoda 1 1 DS 1 1 从𝄋反复： 1 1 Segno 1 1 ToCoda 1 1 DS 1 1 Repeat (with alternate endings): R{ 1 1 1 } A{ 2 | 3 } 反复跳跃记号： R{ 1 1 1 } A{ 2 | 3 } Short repeats (percent): R4{ 1 2 } 小节反复（％）： R4{ 1 2 } Ties (like Lilypond's, if you don't want dashes): 1 ~ 1 延音线（同 Lilypond，如果你不想用短横线）： 1 ~ 1 Slurs (like Lilypond's): 1 ( 2 ) 圆滑线（同 Lilypond）： 1 ( 2 ) Erhu fingering (applies to previous note): Fr=0 Fr=4 二胡指法符号（适用于前一个音符）： Fr=0 Fr=4 Erhu symbol (applies to previous note): souyin harmonic up down bend tilde 二胡其它符号（适用于前一个音符）： souyin harmonic up down bend tilde Tremolo: 1/// - 1///5 - 震音： 1/// - 1///5 - Rehearsal letters: letterA letterB 排练记号： letterA letterB Multibar rest: R*8 多小节休止： R*8 Dynamics (applies to previous note): \p \mp \f 力度记号（适用于之前的音符）： \p \mp \f Other 1-word Lilypond \ commands: \fermata \> \! \( \) etc 其它一語 Lilypond \ 指令： \fermata \> \! \( \) 等等 Text: ^"above note" _"below note" 文字： ^"音符上方" _"音符下方" Harmonic symbols above main notes: Harm: (music) :Harm (main music) 主音符上的泛音符号： Harm: (音乐) :Harm （主音乐） Instrumental breaks in vocal music: 1 [( 2 3 )] 4 诗歌的器乐部分： 1 [( 2 3 )] 4 Other Lilypond code: LP: (block of code) :LP (each delimeter at start of its line) 其它 Lilypond 代码： LP: (代码块) :LP （每个分隔符必须位于各行行首） Unicode approximation instead of Lilypond: Unicode 用 Unicode 近似值代替 Lilypond 代码： Unicode Split MIDI files per part: PartMidi 按声部导出MIDI文件： PartMidi Ignored: % a comment 忽略： % 注释 """ import sys,os,re,shutil from fractions import Fraction as F # requires Python 2.6+ if type(u"")==type(""): # Python 3 unichr,xrange = chr,range from string import ascii_letters as letters else: from string import letters # Python 2 def asUnicode(l): if type(l)==type(u""): return l return l.decode('utf-8') try: from commands import getoutput except: from subprocess import getoutput def lilypond_minor_version(): global _lilypond_minor_version try: return _lilypond_minor_version except: pass cmd = lilypond_command() if cmd: m=re.match(r".*ond-2\.([1-9][0-9])\.",cmd) if m: _lilypond_minor_version = int(m.group(1)) else: _lilypond_minor_version = int(getoutput(cmd+" --version").split()[2].split('.')[1]) else: _lilypond_minor_version = 22 # assume 2.22 if we can't figure it out return _lilypond_minor_version def lilypond_command(): if hasattr(shutil,'which'): w = shutil.which('lilypond') if w: return 'lilypond' elif not sys.platform.startswith("win"): cmd = getoutput('which lilypond 2>/dev/null') if os.path.exists(cmd): return 'lilypond' placesToTry = ['/Applications/LilyPond.app/Contents/Resources/bin/lilypond'] # e.g. from Mac OS 10.4-10.14 Intel build https://web.archive.org/web/20221121202056/https://lilypond.org/download/binaries/darwin-x86/lilypond-2.22.2-1.darwin-x86.tar.bz2 (unpacked and moved to /Applications), or similarly 2.20 for macOS 10.15+ from https://gitlab.com/marnen/lilypond-mac-builder/-/package_files/9872804/download placesToTry = ['/Applications/LilyPond-2.22.2.app/Contents/Resources/bin/lilypond','/Applications/LilyPond-2.20.0.app/Contents/Resources/bin/lilypond'] + placesToTry # if renamed from the above (try specific versions 1st, in case default is older) placesToTry += ['lilypond-2.24.0/bin/lilypond','/opt/lilypond-2.24.0/bin/lilypond'] # if unpacked 2.24 (which drops the .app; in macOS 13, might need first to manually open at least lilypond and gs binaries for Gatekeeper approval if installing it this way) for t in placesToTry: if os.path.exists(t): return t staff_size = float(os.environ.get("j2ly_staff_size",20)) # Normal: j2ly_staff_size=20 # Large: j2ly_staff_size=25.2 # Small: j2ly_staff_size=17.82 # Tiny: j2ly_staff_size=15.87 lyric_size = float(os.environ.get("j2ly_lyric_size",staff_size)) three_dots = u"\u22EE" if not type(u"")==type(""): three_dots = three_dots.encode('utf-8') # Python 2 def find_grace_height(music): # Need 3.5 if there's demisemiquavers with 2 octaves below. # Can have 2.5 if there aren't any of those # (Probably looks better if height is the same throughout the score, # so we scan ahead to find what the most complex thing is. # Could also change height every time, but would need to # check if high-quality published music does that. # Change every time would require differently parameterised versions of jianpu-grace-curve-stencil though.) global grace_height grace_height = 2.5 for word in music.split(): if word.startswith("g[") or word.endswith("]g"): if "d" in word or ",," in word: grace_height = 3.5 ; break # TODO: more options, e.g. 3.0 if "d" but not ",," ? (will need to update grace_height dictionary in all_scores_start also) def all_scores_start(inDat): if lilypond_minor_version() < 20: errExit("Lilypond 2.18 and below is no longer supported") # 2.20 is in Ubuntu 20.04 LTS and 2.22 can be installed on a 2011 Mac; if you're stuck on an older EOL'd distro without Internet, use jianpu-ly 1.825 or earlier r = r"""\version "2.%d.0" #(set-global-staff-size %g)""" % (( 22 if "g[" in inDat or "]g" in inDat else 20),staff_size) r += r""" % un-comment the next line to remove Lilypond tagline: % \header { tagline="" } % comment out the next line if you're debugging jianpu-ly % (but best leave it un-commented in production, since % the point-and-click locations won't go to the user input) \pointAndClickOff \paper { print-all-headers = ##t %% allow per-score headers % un-comment the next line for A5: % #(set-default-paper-size "a5" ) % un-comment the next line for no page numbers: % print-page-number = ##f % un-comment the next 3 lines for a binding edge: % two-sided = ##t % inner-margin = 20\mm % outer-margin = 10\mm % un-comment the next line for a more space-saving header layout: % scoreTitleMarkup = \markup { \center-column { \fill-line { \magnify #1.5 { \bold { \fromproperty #'header:dedication } } \magnify #1.5 { \bold { \fromproperty #'header:title } } \fromproperty #'header:composer } \fill-line { \fromproperty #'header:instrument \fromproperty #'header:subtitle \smaller{\fromproperty #'header:subsubtitle } } } } """ if os.path.exists("/Library/Fonts/Arial Unicode.ttf"): r += r""" % As jianpu-ly was run on a Mac, we include a Mac fonts workaround. % The Mac version of Lilypond 2.18 used Arial Unicode MS as a % fallback even in the Serif font, but 2.20 drops this in Serif % (using it only in Sans), which means any Serif text (titles, % lyrics etc) that includes Chinese will likely fall back to % Japanese fonts which don't support all Simplified hanzi. % This brings back 2.18's behaviour on 2.20+: #(define fonts (set-global-fonts #:roman "Source Serif Pro,Source Han Serif SC,Times New Roman,Arial Unicode MS" #:factor (/ staff-height pt 20) )) """ if has_lyrics: r += r""" % Might need to enforce a minimum spacing between systems, especially if lyrics are below the last staff in a system and numbers are on the top of the next system-system-spacing = #'((basic-distance . 7) (padding . 5) (stretchability . 1e7)) score-markup-spacing = #'((basic-distance . 9) (padding . 5) (stretchability . 1e7)) score-system-spacing = #'((basic-distance . 9) (padding . 5) (stretchability . 1e7)) markup-system-spacing = #'((basic-distance . 2) (padding . 2) (stretchability . 0)) """ r += "}\n" # end of \paper block r += r""" %% 2-dot and 3-dot articulations #(append! default-script-alist (list `(two-dots . ( (stencil . ,ly:text-interface::print) (text . ,#{ \markup \override #'(font-encoding . latin1) \center-align \bold ":" #}) (padding . 0.20) (avoid-slur . inside) (direction . ,UP))))) #(append! default-script-alist (list `(three-dots . ( (stencil . ,ly:text-interface::print) (text . ,#{ \markup \override #'(font-encoding . latin1) \center-align \bold """+'"'+three_dots+'"'+r""" #}) (padding . 0.30) (avoid-slur . inside) (direction . ,UP))))) "two-dots" = #(make-articulation 'two-dots) "three-dots" = #(make-articulation 'three-dots) \layout { \context { \Score scriptDefinitions = #default-script-alist } } note-mod = #(define-music-function (text note) (markup? ly:music?) #{ \tweak NoteHead.stencil #ly:text-interface::print \tweak NoteHead.text \markup \lower #0.5 \sans \bold #text \tweak Rest.stencil #ly:text-interface::print \tweak Rest.text \markup \lower #0.5 \sans \bold #text #note #})""" if re.search(r"(\s|^)(angka|Indonesian)(\s|$)",inDat): r += r""" note-mod-angka = #(define-music-function (text note) (markup? ly:music?) #{ \tweak NoteHead.stencil #ly:text-interface::print \tweak NoteHead.text \markup \lower #0.5 \bold #text \tweak Rest.stencil #ly:text-interface::print \tweak Rest.text \markup \lower #0.5 \bold #text #note #}) """ if inner_beams_below: r += r""" #(define (flip-beams grob) (ly:grob-set-property! grob 'stencil (ly:stencil-translate (let* ((stl (ly:grob-property grob 'stencil)) (centered-stl (ly:stencil-aligned-to stl Y DOWN))) (ly:stencil-translate-axis (ly:stencil-scale centered-stl 1 -1) (* (- (car (ly:stencil-extent stl Y)) (car (ly:stencil-extent centered-stl Y))) 0) Y)) (cons 0 -0.8)))) """ # Draw grace curve according to start and end mark. # Modify from https://lists.gnu.org/archive/html/lilypond-user/2015-01/msg00142.html r += r""" %%======================================================= #(define-event-class 'jianpu-grace-curve-event 'span-event) #(define (add-grob-definition grob-name grob-entry) (set! all-grob-descriptions (cons ((@@ (lily) completize-grob-entry) (cons grob-name grob-entry)) all-grob-descriptions))) #(define (jianpu-grace-curve-stencil grob) (let* ((elts (ly:grob-object grob 'elements)) (refp-X (ly:grob-common-refpoint-of-array grob elts X)) (X-ext (ly:relative-group-extent elts refp-X X)) (refp-Y (ly:grob-common-refpoint-of-array grob elts Y)) (Y-ext (ly:relative-group-extent elts refp-Y Y)) (direction (ly:grob-property grob 'direction RIGHT)) (x-start (* 0.5 (+ (car X-ext) (cdr X-ext)))) (y-start (+ (car Y-ext) %g)) (x-start2 (if (eq? direction RIGHT)(+ x-start 0.5)(- x-start 0.5))) (x-end (if (eq? direction RIGHT)(+ (cdr X-ext) 0.2)(- (car X-ext) 0.2))) (y-end (- y-start 0.5)) (stil (ly:make-stencil `(path 0.1 (moveto ,x-start ,y-start curveto ,x-start ,y-end ,x-start ,y-end ,x-start2 ,y-end lineto ,x-end ,y-end)) X-ext Y-ext)) (offset (ly:grob-relative-coordinate grob refp-X X))) (ly:stencil-translate-axis stil (- offset) X))) #(add-grob-definition 'JianpuGraceCurve `( (stencil . ,jianpu-grace-curve-stencil) (meta . ((class . Spanner) (interfaces . ()))))) #(define jianpu-grace-curve-types '( (JianpuGraceCurveEvent . ((description . "Used to signal where curve encompassing music start and stop.") (types . (general-music jianpu-grace-curve-event span-event event)) )) )) #(set! jianpu-grace-curve-types (map (lambda (x) (set-object-property! (car x) 'music-description (cdr (assq 'description (cdr x)))) (let ((lst (cdr x))) (set! lst (assoc-set! lst 'name (car x))) (set! lst (assq-remove! lst 'description)) (hashq-set! music-name-to-property-table (car x) lst) (cons (car x) lst))) jianpu-grace-curve-types)) #(set! music-descriptions (append jianpu-grace-curve-types music-descriptions)) #(set! music-descriptions (sort music-descriptions alist>\n" if headers: # since about Lilypond 2.7, music must come # before the header block if it's per-score ret += r"\header{"+'\n' for k,v in headers.items(): ret+=k+'="'+v+'"\n' ret += "}\n" layoutExtra = "" if not lyric_size == staff_size: from math import log lSize = log(lyric_size/staff_size)*6/log(2) if lSize > 3: sys.stderr.write("WARNING: potential layout problems; consider increasing j2ly_staff_size to be closer to j2ly_lyric_size\n") # TODO: is 3 a good threshold for this warning? (need to check different Lilypond versions) layoutExtra=r" \override Lyrics.LyricText.font-size = #"+("+" if lSize>=0 else "")+str(lSize)+" " if notehead_markup.noIndent: layoutExtra += ' indent = 0.0 ' if notehead_markup.raggedLast: layoutExtra += ' ragged-last = ##t ' if notehead_markup.noBarNums: layoutExtra += r' \context { \Score \remove "Bar_number_engraver" } ' if notehead_markup.chordsRoman: layoutExtra += r"\context { \ChordNames \consists #(lambda (cx) (let ((tonic #{ c #})) (make-engraver ((initialize engraver) (set! (ly:context-property cx 'chordRootNamer) (lambda (pitch capitalized) (let ((degree (1+ (ly:pitch-notename (ly:pitch-diff pitch tonic)))) (style (if capitalized 'roman-lower 'roman-upper))) (number-format style degree))))) (listeners ((key-change-event engraver event) (set! tonic (ly:event-property event 'tonic))))))) } " # based on a lists.gnu.org snippet if midi: ret += r"\midi { \context { \Score tempoWholesPerMinute = #(ly:make-moment 84 4)}}" # will be overridden by any \tempo command used later else: ret += r"\layout{"+layoutExtra+r""" \context { \Global \grobdescriptions #all-grob-descriptions } """ + "}" return ret + " }" def uniqName(): global uniqCount r = str(uniqCount) ; uniqCount += 1 return r.translate((letters*5)[:256]) def jianpu_voice_start(isTemp=0): if not isTemp and maxBeams >= 2: stemLenFrac = "0.5" # sometimes needed if the semiquavers occur in isolation rather than in groups (TODO do we need to increase this for 3+ beams in some cases?) else: stemLenFrac = "0" voiceName = uniqName() r = (r"""\new Voice="%s" {"""%voiceName) r += r""" \override Beam #'transparent = ##f""" if not_angka: r +=r""" \override Stem #'direction = #UP \override Tie #'staff-position = #-2.5 \tupletDown""" stemLenFrac=str(0.4+0.2*max(0,maxBeams-1)) else: r += r""" \override Stem #'direction = #DOWN \override Tie #'staff-position = #2.5 \tupletUp \tieUp""" r += (r""" \override Stem #'length-fraction = #%s \override Beam #'beam-thickness = #0.1 \override Beam #'length-fraction = #0.5 %s \override Voice.Rest #'style = #'neomensural %% this size tends to line up better (we'll override the appearance anyway) \override Accidental #'font-size = #-4 \override TupletBracket #'bracket-visibility = ##t""" % (stemLenFrac, r"\override Beam.after-line-breaking = #flip-beams" if inner_beams_below else "" )) return r+"\n", voiceName def jianpu_staff_start(inst=None): # (we add "BEGIN JIANPU STAFF" and "END JIANPU STAFF" comments to make it easier to copy/paste into other Lilypond files) if notehead_markup.withStaff: inst = None # we'll put the label on the 5-line staff (TODO: use StaffGroup or something?) if not_angka: r=r""" %% === BEGIN NOT ANGKA STAFF === \new RhythmicStaff \with {""" else: r=r""" %% === BEGIN JIANPU STAFF === \new RhythmicStaff \with { \consists "Accidental_engraver" """ r += r""" \consists \jianpuGraceCurveEngraver""" if inst: r += '\ninstrumentName = "'+inst+'"' if notehead_markup.withStaff: r+=r""" %% Limit space between Jianpu and corresponding-Western staff \override VerticalAxisGroup.staff-staff-spacing = #'((minimum-distance . 7) (basic-distance . 7) (stretchability . 0)) """ # (whether this is needed or not depends on Lilypond version; 2.22 puts more space than 2.18,2.20. Must set higher than 5, which sometimes gets collisions between beams in 2.20) r+=r""" %% Get rid of the stave but not the barlines: \override StaffSymbol #'line-count = #0 %% tested in 2.15.40, 2.16.2, 2.18.0, 2.18.2, 2.20.0 and 2.22.2 \override BarLine #'bar-extent = #'(-2 . 2) %% LilyPond 2.18: please make barlines as high as the time signature even though we're on a RhythmicStaff (2.16 and 2.15 don't need this although its presence doesn't hurt; Issue 3685 seems to indicate they'll fix it post-2.18) $(add-grace-property 'Voice 'Stem 'direction DOWN) $(add-grace-property 'Voice 'Slur 'direction UP) $(add-grace-property 'Voice 'Stem 'length-fraction 0.5) $(add-grace-property 'Voice 'Beam 'beam-thickness 0.1) $(add-grace-property 'Voice 'Beam 'length-fraction 0.3) $(add-grace-property 'Voice 'Beam 'after-line-breaking flip-beams) $(add-grace-property 'Voice 'Beam 'Y-offset %.1f) $(add-grace-property 'Voice 'NoteHead 'Y-offset %.1f) } { """ % (grace_height, grace_height) j,voiceName = jianpu_voice_start() r += j+r""" \override Staff.TimeSignature #'style = #'numbered \override Staff.Stem #'transparent = ##t """ if notehead_markup.separateTimesig: r+=r"\override Staff.TimeSignature #'stencil = ##f"+"\n" return r, voiceName def jianpu_staff_end(): # \bar "|." is added separately if there's not a DC etc if not_angka: return "} }\n% === END NOT ANGKA STAFF ===\n" else: return "} }\n% === END JIANPU STAFF ===\n" def midi_staff_start(): return r""" %% === BEGIN MIDI STAFF === \new Staff { \new Voice="%s" {""" % (uniqName(),) def midi_staff_end(): return "} }\n% === END MIDI STAFF ===\n" def western_staff_start(inst=None): r = r""" %% === BEGIN 5-LINE STAFF === \new Staff """ if inst: r += r'\with { instrumentName = "'+inst+'" } ' voiceName = uniqName() return (r+r"""{ \override Score.SystemStartBar.collapse-height = #11 %% (needed on 2.22) \new Voice="%s" { #(set-accidental-style 'modern-cautionary) \override Staff.TimeSignature #'style = #'numbered """ % (voiceName,)), voiceName def western_staff_end(): return "} }\n% === END 5-LINE STAFF ===\n" def lyrics_start(voiceName): return r'\new Lyrics = "I%s" { \lyricsto "%s" { ' % (uniqName(),voiceName) def lyrics_end(): return "} }" inner_beams_below = True # Use stencil reflection to invert Lilypond's normal beam positioning (like in David Zhang's jianpu10a.ly) - more accurately reflects jianpu typography but can result in octave dots being too far down because beam spacing is done per system not per beam dashes_as_ties = True # Implement dash (-) continuations as invisible ties rather than rests; sometimes works better in awkward beaming situations use_rest_hack = True # Implement some short rests as notes (and if there are lyrics, creates temporary voices so the lyrics miss them); sometimes works better for beaming (at least in 2.15 through 2.24) sort_chords = True # Normally should be left as True. See comment on --nosort below if __name__=="__main__": if '--noRestHack' in sys.argv: # TODO: document (this is a debug option you might want to try if things are going wrong, but unlikely to still be needed) use_rest_hack=False ; sys.argv.remove('--noRestHack') if '--nosort' in sys.argv: # TODO: document (this is a hack for if someone's incorrectly coded 2-voice music as chords and they want to cross the parts) sort_chords=False ; sys.argv.remove('--nosort') assert not (use_rest_hack and not dashes_as_ties), "This combination has not been tested" def errExit(msg): if __name__=="__main__": sys.stderr.write("Error: "+msg+"\n") sys.exit(1) else: raise Exception(msg) def scoreError(msg,word,line): if len(word)>60: word=word[:50]+"..." msg += " %s in score %d" % (word,scoreNo) if len(line)>600: line=line[:500]+"..." if not word in line: pass # above truncations caused problems elif "xterm" in os.environ.get("TERM",""): # use xterm underline escapes msg += "\n"+re.sub(r"(\s|^)"+re.escape(word)+r"(?=\s|$)",lambda m:m.group(1)+"\x1b[4m"+word+"\x1b[m",line) elif re.match('[ -~]*$',line): # all ASCII: we can underline the word with ^^s msg += "\n"+line+"\n"+re.sub('[^^]',' ',re.sub(r"(\s|^)"+re.escape(word)+r"(?=\s|$)",lambda m:m.group(1)+'^'*(len(word)),line)) else: # don't try to underline the word (at least not without ANSI): don't know how the terminal will handle character widths msg += "\nin this line: "+line errExit(msg) placeholders = { # for accidentals and word-fitting to work # (we make them relative to the actual key later # so that MIDI pitches are correct) '0':'r', '1':'c', '2':'d', '3':'e', '4':'f', '5':'g', '6':'a', '7':'b', 'x':'c', '-':'r'} def addOctaves(octave1,octave2): octave2=octave2.replace(">","'").replace("<",",") # so it can be used with a base-octave change while octave1: if octave1[0] in "'>": # go up if ',' in octave2: octave2 = octave2[:-1] else: octave2 += "'" else: # , or < : go down if "'" in octave2: octave2 = octave2[:-1] else: octave2 += "," octave1=octave1[1:] return octave2 class NoteheadMarkup: def __init__(self,graceType=None): self.initOneScore() self.graceType = graceType self.separateTimesig = False def initOneScore(self): self.barLength = 64 ; self.beatLength = 16 # in 64th notes self.barPos = self.startBarPos = F(0) self.inBeamGroup = self.lastNBeams = self.onePage = self.noBarNums = self.chordsRoman = self.noIndent = self.raggedLast = self.withStaff = 0 self.keepLength = 0 self.octavesPosition = None # or "before" (only setting in v1.847 and below) or "after", affects chords and grace notes when an octave mark is between two figures: is it before or after the note it affects. Starting at None = no default, must specify if anything's ambiguous self.last_octave = self.base_octave = "" self.octavesSeen = [] self.current_accidentals = {} # used to predict whether Lilypond will draw the accidental or not, for beam spacing purposes self.barNo = 1 self.tuplet = (1,1) self.last_figures = None self.last_was_rest = False self.notesHad = [] self.unicode_approx = [] self.rplacNextIfStillInBeam = None self.graceType = None self.current_chord = None def endScore(self): if self.barPos == self.startBarPos: pass elif os.environ.get("j2ly_sloppy_bars",""): sys.stderr.write("Wrong bar length at end of score %d ignored (j2ly_sloppy_bars set)\n" % scoreNo) elif self.startBarPos and not self.barPos: errExit("Score %d should end with a %g-beat bar to make up for the %g-beat anacrusis bar. Set j2ly_sloppy_bars environment variable if you really want to break this rule." % (scoreNo,self.startBarPos/self.beatLength,(self.barLength-self.startBarPos)/self.beatLength)) # this is on the music theory syllabi at about Grade 3, but you can get up to Grade 5 practical without actually covering it, so we'd better not expect all users to understand "final bar does not make up for anacrusis bar" else: errExit("Incomplete bar at end of score %d (%g beats)" % (scoreNo,self.barPos*1.0/self.beatLength)) def setTime(self,num,denom): self.barLength = int(64*num/denom) if denom>4 and num%3==0: self.beatLength = 24 # compound time else: self.beatLength = 16 def setAnac(self,denom,dotted): self.barPos = F(self.barLength)-F(64)/denom if dotted: self.barPos -= F(64)/denom/2 if self.barPos<0: errExit("Anacrusis is longer than bar in score %d" % scoreNo) # but anacrusis being exactly equal to bar is OK: we'll just interpret that as no anacrusis self.startBarPos = self.barPos def wholeBarRestLen(self): return {96:"1.",48:"2.",32:"2",24:"4.",16:"4",12:"8.",8:"8"}.get(self.barLength,"1") # TODO: what if irregular? def baseOctaveChange(self,change): self.base_octave = addOctaves(change,self.base_octave) def __call__(self,figures,nBeams,dots,octave,accidental,tremolo,word,line): # figures is a chord string of '1'-'7', or 'x' or '0' or '-' # nBeams is 0, 1, 2 .. etc (number of beams for this note) # dots is "" or "." or ".." etc (extra length) # octave is "", "'", "''", "'''", ",", ",," or ",,," # accidental is "", "#", "b" # tremolo is "" or ":32" # word,line is for error handling if len(figures)>1: if accidental and not_angka: scoreError("Accidentals in chords not yet implemented in Indonesian not-angka mode:",word,line) if '0' in figures: scoreError("Can't have rest in chord:",word,line) if 'x' in figures: scoreError("Can't have percussion beat in chord:",word,line) self.notesHad.append(figures) isChord = len(figures)>1 if isChord: chord_ret,octave,placeholder_chord = chordNotes_markup(re.sub(r'[\\qsdh.]','',word),word,line) # word w/out durations if not midi and not western: placeholder_chord = "c" else: # not isChord placeholder_chord = placeholders[figures] invisTieLast = dashes_as_ties and self.last_figures and figures=="-" and not self.last_was_rest self.last_was_rest = (figures=='0' or (figures=='-' and self.last_was_rest)) aftrLastNonDash = tieEnd = "" add_cautionary_accidental = False if invisTieLast: # (so figures == "-") if self.barPos==0 and not midi and not western and not self.last_figures=="x": # dash over barline: write as new note figures = self.last_figures aftrLastNonDash = r'\=JianpuTie(' tieEnd = r'\=JianpuTie)' add_cautionary_accidental = self.last_accidental tremolo = self.last_tremolo else: if self.barPos==0 and not midi and not western and not self.last_figures=="x": sys.stderr.write("Warning: jianpu barline-crossing tie won't be done right because your Lilypond version is older than 2.20\n") if self.barPos==0: tremolo = self.last_tremolo if self.current_chord: # a chord is currently in progress, and we're extending it with a tie isChord = True chord_ret,octave,placeholder_chord = chordNotes_markup(re.sub(r'[\\qsdh.]','',self.current_chord),word,line) if not midi and not western: placeholder_chord = placeholder_chord[:-1].split()[-1] # just have one note of it for dashes else: # not a chord, so we can assume len(self.last_figures)==1 placeholder_chord = placeholders[self.last_figures] octave = self.last_octave # for MIDI or 5-line accidental = self.last_accidental # ditto else: # not invisTieLast if not isChord: octave=addOctaves(octave,self.base_octave) if not octave in [",,,",",,",",","","'","''","'''"]: scoreError("Can't handle octave "+octave+" in",word,line) self.last_octave = octave self.octavesSeen.append({",,,":-3,",,":-2,",":-1,"":0,"'":1,"''":2,"'''":3}[octave]) # for figuring out the best clef with WithStaff self.last_tremolo = tremolo if isChord: self.current_chord = word else: self.current_chord = None if not figures=="-": self.last_figures = figures if not isChord and not accidental in ["","#","b"]: scoreError("Can't handle accidental "+accidental+" in",word,line) self.last_accidental = accidental ret = "" if self.barPos==0 and self.barNo > 1: ret += "| " # barline if self.onePage and not midi: ret += r"\noPageBreak " ret += "%{ bar "+str(self.barNo)+": %} " self.notesHad.insert(-1,"|") if not octave in self.current_accidentals: self.current_accidentals[octave] = [""]*7 if nBeams==None: # unspecified if self.keepLength: nBeams = self.lastNBeams else: nBeams = 0 if figures=="-" or all('1'<=figure<='7' and not accidental==self.current_accidentals[octave][int(figure)-1] for figure in list(figures)) and nBeams > self.lastNBeams: leftBeams = nBeams # beam needs to fit under the new accidental (or the dash which might be slightly to the left of where digits are), but if it's no more than last note's beams then we'll hang it only if in same beat. (TODO: the current_accidentals logic may need revising if other accidental styles are used, e.g. modern-cautionary, although then would need to check anyway if our \consists "Accidental_engraver" is sufficient) # TODO: if figures=="0" then that might be typeset a bit to the left as well (because it's also a rest), however extending the line TOO far left in this case could be counterproductive elif self.inBeamGroup: if nBeams < self.lastNBeams: leftBeams = nBeams else: leftBeams = self.lastNBeams else: leftBeams = 0 if leftBeams: assert nBeams, "following logic assumes if (leftBeams or nBeams) == if nBeams" aftrlast0 = "" if not nBeams and self.inBeamGroup: if not self.inBeamGroup=="restHack": aftrlast0 = "] " self.inBeamGroup = 0 length = 4 ; b = 0 ; toAdd = F(16) # crotchet while b < nBeams: b,length,toAdd = b+1,length*2,toAdd/2 toAdd0 = toAdd for _ in dots: toAdd0 /= 2 ; toAdd += toAdd0 toAdd_preTuplet = toAdd if not self.tuplet[0]==self.tuplet[1]: toAdd = toAdd*self.tuplet[0]/self.tuplet[1] if nBeams and not midi and not western: # must set these unconditionally regardless of what we think their current values are (Lilypond's own beamer can change them from note to note) if not_angka: leftBeams=nBeams if (self.barPos+toAdd)%self.beatLength == 0: nBeams = 0 ret += (r"\set stemLeftBeamCount = #%d"+"\n") % leftBeams ret += (r"\set stemRightBeamCount = #%d"+"\n") % nBeams if not_angka: nBeams = leftBeams need_space_for_accidental = False for figure in list(figures): if '1'<=figure<='7': if not accidental==self.current_accidentals[octave][int(figure)-1]: need_space_for_accidental = True self.current_accidentals[octave][int(figure)-1] = accidental # TODO: not sensible (assumes accidental applies to EVERY note in the chord, see above) inRestHack = replaceLast = 0 if not midi and not western: if ret: ret = ret.rstrip()+"\n" # try to keep the .ly code vaguely readable if octave=="''" and not invisTieLast: ret += r" \once \override Score.TextScript.outside-staff-priority = 45" # inside bar numbers etc if isChord and not figures=="-": ret += chord_ret elif figures=="-": if not_angka: figureDash=u"." else: figureDash=u"\u2013" if not type(u"")==type(""): figureDash=figureDash.encode('utf-8') ret += (r' \note-mod-angka "' if not_angka else r' \note-mod "')+figureDash+'" ' else: # single, non-dash note s = str(figures) if not_angka and accidental: u338,u20e5=u"\u0338",u"\u20e5" # TODO: the \ looks better than the / in default font if not type("")==type(u""): u338,u20e5=u338.encode('utf-8'),u20e5.encode('utf-8') s += {'#':u338,'b':u20e5}[accidental] ret += (r' \note-mod-angka "' if not_angka else r' \note-mod "')+s+'" ' if self.rplacNextIfStillInBeam and leftBeams and nBeams: replaceLast = self.rplacNextIfStillInBeam # didn't need the rest-hack here after all self.rplacNextIfStillInBeam = None if placeholder_chord == "r" and use_rest_hack and nBeams and not (leftBeams and not not_angka): placeholder_chord = "c" # C to work around diagonal-tail problem with # some isolated quaver rests in some Lilypond # versions (usually at end of bar); new voice # so lyrics miss it as if it were a rest: if has_lyrics and not self.withStaff: # (OK if self.withStaff: lyrics will be attached to that instead) self.rplacNextIfStillInBeam = ret ret = jianpu_voice_start(1)[0]+ret inRestHack = 1 if self.inBeamGroup and not self.inBeamGroup=="restHack": aftrlast0 = "] " if placeholder_chord.startswith("<"): ret += placeholder_chord # chord in western or midi elif not isChord or figures.startswith("-"): # single note or rest if need_space_for_accidental and not not_angka and not (figures.startswith("-") or midi or western): ret += r"\once \tweak Accidental.extra-offset #'(0 . 0.7)" ret += placeholder_chord if midi or western or not not_angka: ret += {"":"", "#":"is", "b":"es"}[accidental] if (midi or western) and not placeholder_chord=="r": ret += {"":"'","'":"''","''":"'''","'''":"''''",",":"",",,":",",",,,":",,"}[octave] # so no-mark starts near middle C if add_cautionary_accidental: ret += "!" ret += ("%d" % length) + dots if self.rplacNextIfStillInBeam: self.rplacNextIfStillInBeam += ("r%d" % length) + dots + '[' if tremolo: if midi or western: if placeholder_chord.startswith("<") and len(placeholder_chord.split())==4: previous,n1,n2,gtLenDot = ret.rsplit(None,3) previous=previous[:-1] # drop < ret = r"%s\repeat tremolo %d { %s32 %s32 }" % (previous,int(toAdd_preTuplet/4),n1,n2) else: ret += tremolo elif lilypond_minor_version()>=22: if dots: ret += r"""_\tweak outside-staff-priority ##f ^\tweak avoid-slur #'inside _\markup {\with-dimensions #'(0 . 0) #'(2.8 . 2.1) \postscript "1.6 -0.2 moveto 2.6 0.8 lineto 1.8 -0.4 moveto 2.8 0.6 lineto 2.0 -0.6 moveto 3.0 0.4 lineto stroke" } %{ requires Lilypond 2.22+ %} """ else: ret += r"""_\tweak outside-staff-priority ##f ^\tweak avoid-slur #'inside _\markup {\with-dimensions #'(0 . 0) #'(2.5 . 2.1) \postscript "1.1 0.4 moveto 2.1 1.4 lineto 1.3 0.2 moveto 2.3 1.2 lineto 1.5 0.0 moveto 2.5 1.0 lineto stroke" } %{ requires Lilypond 2.22+ %} """ elif dots: ret += r"""_\tweak outside-staff-priority ##f ^\tweak avoid-slur #'inside _\markup {\with-dimensions #'(0 . 0) #'(2.8 . 2.6) \postscript "1.4 1.6 moveto 2.4 2.6 lineto 1.6 1.4 moveto 2.6 2.4 lineto 1.8 1.2 moveto 2.8 2.2 lineto stroke" } %{ requires Lilypond 2.20 %} """ else: ret += r"""_\tweak outside-staff-priority ##f ^\tweak avoid-slur #'inside _\markup {\with-dimensions #'(0 . 0) #'(2.5 . 2.6) \postscript "1.1 1.6 moveto 2.1 2.6 lineto 1.3 1.4 moveto 2.3 2.4 lineto 1.5 1.2 moveto 2.5 2.2 lineto stroke" } %{ requires Lilypond 2.20 %} """ # Octave dots: if not midi and not western and not '-' in figures: if not nBeams: oDict = {",":r"-\tweak #'Y-offset #-1.2 ", ",,":r"-\tweak #'Y-offset #-2 ", ",,,":r"-\tweak #'Y-offset #-2.7 ", } ret += oDict.get(octave,"") elif self.graceType: oDict = {",":r"-\tweak #'Y-offset #%.1f " % (grace_height-1-nBeams*0.3), ",,":r"-\tweak #'Y-offset #%.1f " % (grace_height-1.6-nBeams*0.3), ",,,":r"-\tweak #'Y-offset #%.1f " % (grace_height-2-nBeams*0.3), } ret += oDict.get(octave,"") # Ugly fix for grace dot positions x_offset=0.6 if self.graceType: x_offset=0.4 oDict = {"":"", "'":"^.", "''":r"-\tweak #'X-offset #%.1f ^\two-dots " % x_offset, "'''":r"-\tweak #'X-offset #%.1f ^\three-dots " % x_offset, ",":r"-\tweak #'X-offset #%.1f _. " % x_offset, ",,":r"-\tweak #'X-offset #%.1f _\two-dots " % x_offset, ",,,":r"-\tweak #'X-offset #%.1f _\three-dots " % x_offset} if not_angka: oDict.update({ "'":r"-\tweak #'extra-offset #'(0.4 . 2.7) -\markup{\bold .}", "''":r"-\tweak #'extra-offset #'(0.4 . 3.5) -\markup{\bold :}", "'''":r"-\tweak #'extra-offset #'(0.4 . 4.3) -\markup{\bold "+three_dots+"}", }) ret += oDict[octave] if nBeams and (not self.inBeamGroup or (self.inBeamGroup=="restHack" and not replaceLast) or inRestHack) and not midi and not western: # We need the above stemLeftBeamCount, stemRightBeamCount override logic to work even if we're an isolated quaver, so do this: ret += '[' self.inBeamGroup = 1 self.barPos += toAdd if self.graceType and self.barPos == self.barLength: is_isolated_note = ret.endswith("[") if is_isolated_note: # Lilypond doesn't like isolated beamed notes in \grace # so introduce a skip note for it to beam to. # Putting the skip note BEFORE the grace note or AFTER the afterGrace note # might help if aligning jianpu with 5-line staves. if self.graceType == "before": ret = r"s%d [ \jianpuGraceCurveEnd %s" % (length,ret.replace("[","")) else: ret += r" \jianpuGraceCurveEnd s%d" % length else: ret = r" \jianpuGraceCurveEnd " + ret # sys.stderr.write(accidental+figure+octave+dots+"/"+str(nBeams)+"->"+str(self.barPos)+" ") # if need to see where we are if self.barPos > self.barLength: errExit("(notesHad=%s) barcheck fail: note crosses barline at \"%s\" with %d beams (%d skipped from %d to %d, bypassing %d), scoreNo=%d barNo=%d (but the error could be earlier)" % (' '.join(self.notesHad),figures,nBeams,toAdd,self.barPos-toAdd,self.barPos,self.barLength,scoreNo,self.barNo)) if (self.barPos%self.beatLength == 0 or self.barPos==self.barLength) and self.inBeamGroup: # (or added for irregular time signatures; self.inBeamGroup is set only if not midi/western) # jianpu printouts tend to restart beams every beat # (but if there are no beams running anyway, it occasionally helps typesetting to keep the logical group running, e.g. to work around bugs involving beaming a dash-and-rest beat in 6/8) (TODO: what if there's a dash-and-rest BAR? [..]-notated beams don't usually work across barlines ret += ']' self.inBeamGroup = 0 # DON'T reset lastNBeams here (needed for start-of-group accidental logic) elif inRestHack and self.inBeamGroup: ret += ']' self.inBeamGroup = "restHack" self.lastNBeams = nBeams beamC = u'\u0333' if nBeams>=2 else u'\u0332' if nBeams==1 else u"" self.unicode_approx.append({'#':u"\u266f",'b':u"\u266d"}.get(0 if invisTieLast else accidental,u"")+(u"-" if invisTieLast else figures[-1:])+beamC+(u"" if invisTieLast else (u'\u0323' if "," in octave else u'\u0307' if "'" in octave else u""))+u''.join(c+beamC for c in dots)+(u"" if self.inBeamGroup else u" ")) # (NB inBeamGroup is correct only if not midi and not western) if self.barPos == self.barLength: self.unicode_approx[-1]=self.unicode_approx[-1].rstrip()+u'\u2502' self.barPos = 0 ; self.barNo += 1 self.current_accidentals = {} b4last,aftrlast = "","" if invisTieLast: if midi or western: if not (tremolo and placeholder_chord.startswith("<")): aftrlast = " ~" elif not tremolo: # For attaching lyrics to long notes: b4last,aftrlast = r"\once \override Tie #'transparent = ##t \once \override Tie #'staff-position = #0 "," ~" if figures=="x" and western: ret = r"\once \override NoteHead.style = #'cross \once \override NoteHead.no-ledgers = ##t " + ret if inRestHack: ret += " } " # end temporary voice for the "-" (non)-note elif tieEnd: ret += ' '+tieEnd # end of JianpuTie curve return aftrLastNonDash,figures=='-',b4last,replaceLast,aftrlast0+aftrlast,ret, need_space_for_accidental, nBeams,octave def parseNote(word,origWord,line): if word==".": word = "-" word = word.replace("8","1'").replace("9","2'") if type(u"")==type(""): word = word.replace(u"\u2019","'") else: word=word.replace(u"\u2019".encode('utf-8'),"'") if "///" in word: tremolo,word=":32",word.replace("///","",1) else: tremolo = "" if not re.match(note_regex+"$",word): # unrecognised stuff in it: flag as error, rather than ignoring and possibly getting a puzzling barsync fail scoreError("Unrecognised command",origWord,line) figures = ''.join(re.findall('[01234567x-]',word)) dots = "".join(c for c in word if c==".") nBeams = ''.join(re.findall(r'[cqsdh\\]',word)) if re.match(r"[\\]+$",nBeams): nBeams=len(nBeams) # requested by a user who found British note-length names hard to remember; won't work if the \ is placed at the start, as that'll be a Lilypond command elif nBeams: try: nBeams = list("cqsdh").index(nBeams) except ValueError: scoreError("Can't calculate number of beams from "+nBeams+" in",origWord,line) else: nBeams=None # unspecified octaves = re.findall("'+|,+",word) # chords of course accept multiple octaves if len(octaves)>1 and len(figures) == 1: scoreError("Multiple octaves should not applied to a single note:",origWord,line) if octaves: octave = octaves[0] else: octave = "" accidental = "".join(c for c in word if c in "#b") if len(figures) > 1: # octave + accidental dealt with separately BUT still need to keep one for the beaming and need_space_for_accidental logic (TODO actually current_accidentals needs rewriting for chords, but this works in most cases for now) accidental = accidental[:1] return figures,nBeams,dots,octave,accidental,tremolo def write_docs(): # Write an HTML or Markdown version of the doc string def htmlify(l): if "--html" in sys.argv: return re.sub('([hdDsS]emi)',r'\1­',l.replace("&","&").replace("<","<").replace(">",">")).replace("approximation","approx­imation").replace("instrument=Flute","instrument=Flute").replace("automatically","automat­ically").replace("SeparateTimesig","Separate­Timesig") # not sure about that last one because we don't want to hide that it's 1 word, but we do want Chrome on small devices in not-so-small print to fit it on a line rather than zoom out the whole page else: return l inTable = 0 ; justStarted=1 for line in __doc__.split("\n"): if line.startswith("#") or not line.strip(): continue hasNonAscii = any(ord(c)>127 for c in line) if hasNonAscii ^ ("--chinese" in sys.argv): continue splitOn = "：" if "：" in line else ":" if splitOn in line and line.split(splitOn,1)[1].strip(): toGet,shouldType = line.split(splitOn,1) if not inTable: if "--html" in sys.argv: print ("") # "" else: print ("") inTable = 1 if re.match(r".*[A-Za-z]\)$",shouldType): shouldType,note = shouldType.rsplit("(",1) note = " ("+note elif re.match(r".*）$",shouldType): shouldType,note = shouldType.rsplit("（",1) note = " （"+note else: note = "" if "--html" in sys.argv: print ("") else: print (toGet.strip()+splitOn+" `"+shouldType.strip()+"`"+note+"\n") else: if "--markdown" in sys.argv: print ("") elif inTable: print ("
To get:Type:
"+htmlify(toGet.strip())+""+htmlify(shouldType.strip())+""+htmlify(note)+"
") elif not justStarted: print ("
") inTable=justStarted=0 print (htmlify(line)) if inTable and "--html" in sys.argv: print ("") def getInput0(): inDat = [] for f in sys.argv[1:]: if f.endswith(".mxl"): import zipfile ; z=zipfile.ZipFile(f) for F in z.infolist(): if not F.filename in ["mimetype","META-INF/","META-INF/container.xml"]: b = z.read(F) if type("")==type(u""): b=b.decode('utf-8') inDat.append(b) else: try: try: inDat.append(open(f,encoding="utf-8").read()) # Python 3: try UTF-8 first except: inDat.append(open(f).read()) # Python 2, or Python 3 with locale-default encoding in case it's not UTF-8 except: errExit("Unable to read file "+f) if inDat: return inDat if not sys.stdin.isatty(): return [fix_utf8(sys.stdin,'r').read()] # They didn't give us any input. Try to use a # file chooser. If that fails, just print the # help text. if os.path.exists('/usr/bin/osascript'): f = os.popen("osascript -e $'tell application \"System Events\"\\nactivate\\nset f to choose file\\nend tell\\nPOSIX path of f'").read().rstrip() if f: try: return [open(f,encoding="utf-8").read()] except: return [open(f).read()] write_help() ; raise SystemExit def write_help(): write_version() sys.stderr.write("\n".join(l for l in __doc__.split("\n") if l.strip() and not l.startswith("#"))+"\n") def write_version(): versions = [] # output the biggest (might not be 1st listed) for l in __doc__.split("\n"): if l.startswith("# v"): versions.append((float(l[len("# v"):l.index(' ',len("# v"))]),l.replace("#","jianpu-ly",1)+"\n\n")) sys.stderr.write(max(versions)[1]) def get_input(): inDat = getInput0() for i in xrange(len(inDat)): if inDat[i].startswith('\xef\xbb\xbf'): inDat[i] = inDat[i][3:] if inDat[i].startswith(r'\version'): errExit("jianpu-ly does not READ Lilypond code.\nPlease see the instructions.") elif inDat[i].startswith(" elements that don't specify all parameters elif name=="step": note[0][0]=d0 elif name=="rest": note[0][0]="r" elif name=="octave": note[0][1]=int(d0) elif name=="accidental": note[0][2]=d0 elif name=="type": note[0][3]=d0 elif name=="dot": note[0][4]=1 elif name=="slur": note[0][5]+={"start":" (","stop":" )"}[dat[1].get("type","")] elif name=="tie": note[0][6]={"start":"~","stop":""}[dat[1].get("type","")] elif name=="actual-notes": note[0][7]=d0 elif name=="tuplet": note[0][8]=dat[1].get("type","") elif name=="chord": note[0][9]=True elif name=="grace": note[0][10]=True elif name=="fermata": note[0][5] += r" \fermata" elif name=="staccato": note[0][5] += r" \staccato" elif name=="tenuto": note[0][5] += r" \tenuto" elif name=="accent": note[0][5] += r" \accent" elif name=="trill-mark": note[0][5] += r" \trill" elif name=="mordent": note[0][5] += r" \mordent" elif name in "ppppp pppp ppp pp p mp mf f ff fff ffff fffff fp sf sfz n rfz".split(): note[0][5] += " \\"+name elif name=="words": toAdd = r' ^"'+dat[0].strip().replace('"',"'")+'"' if not toAdd in note[0][5]: note[0][5] += toAdd elif name=="note": # Try to find which voice it goes onto, if we're MuseScore # or similar and have parts as voices within a part. # TODO: sometimes the XML will give us a voice or staff number; for now we just find the first one to fit ourRet = ourI = None for i,p in enumerate(positionsInProgress): if p == mxlPosition[0]: # exact match ourRet,ourI = partsInProgress[i],i ; break if ourRet is None: for i,p in enumerate(positionsInProgress): if p < mxlPosition[0] and p in paddingRestDict: # match but need padding ourRet,ourI = partsInProgress[i],i ourRet.append(' '.join(paddingRestList[paddingRestDict[p]:paddingRestDict[mxlPosition[0]]])) # TODO: collapse to whole-bar rests when needed (low priority because this should not happen often) positionsInProgress[i] = mxlPosition[0] break if ourRet is None: # need new part partsInProgress.append(paddingRestList[:paddingRestDict[mxlPosition[0]]]) # TODO: collapse to whole-bar rests when needed (as above) positionsInProgress.append(mxlPosition[0]) ourRet,ourI = partsInProgress[-1],len(partsInProgress)-1 # Now OK to add the note to the part (voice) step,octave,acc,nType,dot,extras,tie,tuplet,tState,chord,grace = note[0] note[0]=[""]*11 if step=="r": r="0" else: dTone=ord(step[0])-ord(note1[0])+7*(octave-4) if step[0] < 'C': dTone += 7 r=str((dTone%7)+1) while dTone<0: # we use OctavesAfter r+="," ; dTone+=7 while dTone>6: r+="'" ; dTone-=7 acc=barSig[0][dTone%7]={"flat":"b","sharp":"#","natural":""}.get(acc,barSig[0][dTone%7]) barSig[1]=(dTone%7) if tie else None if keySig[0][dTone%7]=="#": acc="" if acc=="#" else "b" if keySig[0][dTone%7]=="b": acc="" if acc=="b" else "#" if chord: rr = prevChord[1][prevChord[0]] prevChord[1][prevChord[0]] = rr.split()[0]+r+''.join([' '+x for x in rr.split()[1:]]) return if tState=="start": ourRet.append(tuplet+"[") if ourI==0: paddingRestList.append(tuplet+"[") if not nType: # full-bar note wantQ = int(time[0])*8/int(time[1]) nn = [k for k,v in quavers.items() if v==wantQ] if nn: nType = nn[0] else: nn = [k for k,v in quavers.items() if v*1.5==wantQ] if nn: nType,dot = nn[0],1 else: # need to split notes, this could get tricky nList = [] if not tSig[0]==None and ourI==0: tSig[1] += wantQ # shouldn't be needed while wantQ: nn=[k for k,v in quavers.items() if v <= wantQ][-1] wantQ -= quavers[nn] nList.append(r+acc+types[nn]+' ') if ourI==0: paddingRestList.append("0"+types[nn]) prevChord[0],prevChord[1]=len(ourRet),ourRet # oh crumbs please don't combine chords with these things (TODO we'll have to go back and add the next chord note to all the notes) ourRet.append(('' if step=="r" else '~ ').join(nList)+' '+tie) mxlPosition[0] += mxlPosition[1] positionsInProgress[ourI] = mxlPosition[0] mxlPosition[1] = 0 if ourI==0: paddingRestDict[mxlPosition[0]] = len(paddingRestList) return if not tSig[0]==None and ourI==0: # we're counting the length of the first bar, for anacrusis tSig[1] += quavers[nType] if dot: tSig[1] += quavers[nType]/2.0 if dot: d=typesDot else: d = types r += acc+d[nType]+' ' if ourI==0: paddingRestList.append("0"+d[nType]) # we hope the subsequent voices are not cross-rhythm with the first voice, at least not at points where and occur prevChord[0],prevChord[1]=len(ourRet),ourRet w1,w2 = r[:r.index(' ')],r[r.index(' '):] if grace: w1="g["+w1+"]" ourRet.append(w1+extras+' '+w2+' '+tie) if tState=="stop": ourRet.append("]") if ourI==0: paddingRestList.append("]") mxlPosition[0] += mxlPosition[1] positionsInProgress[ourI] = mxlPosition[0] mxlPosition[1] = 0 if ourI==0: paddingRestDict[mxlPosition[0]] = len(paddingRestList) xmlparser.StartElementHandler = s xmlparser.CharacterDataHandler = c xmlparser.EndElementHandler = e xmlparser.Parse(x,True) ret = '\n'.join(ret) if not type("")==type(ret): ret=ret.encode('utf-8') # Python 2 return ret def fix_utf8(stream,mode): if type("")==type(u""): # Python 3: please use UTF-8 for Lilypond, even if the system locale says something else import codecs if mode=='r': return codecs.getreader("utf-8")(stream.buffer) else: return codecs.getwriter("utf-8")(stream.buffer) else: return stream def fix_fullwidth(t): if type(u"")==type(""): utext = t else: utext = t.decode('utf-8') r = [] for c in utext: if 0xff01<=ord(c)<=0xff5e: r.append(unichr(ord(c)-0xfee0)) elif c==u'\u201a': r.append(",") # sometimes used as comma (incorrectly) elif c==u'\uff61': r.append(".") else: r.append(c) utext = u"".join(r) if type(u"")==type(""): return utext else: return utext.encode('utf-8') def graceNotes_markup(notes,word,line,isAfter,harmonic=False): if lilypond_minor_version()<22: errExit("grace notes requires Lilypond 2.22+, we found 2."+str(lilypond_minor_version())) thinspace = u'\u2009' if not type("")==type(u""): thinspace = thinspace.encode('utf-8') notes = grace_octave_fix(notes,word,line) # ensures octaves come before notes notemark = NoteheadMarkup(graceType="after" if isAfter else "before") # Calculate length of grace section and tell # NoteheadMarkup that's the "bar length", so it # ends the beams at the end of it for us notemark.barLength = 0 curLen = 4 # default semiquaver, in 64th notes for n in notes: curLen = {'q':8,'s':4,'d':2,'h':1}.get(n,curLen) if '0'<=n<='9': notemark.barLength += curLen curLen = 4 # reset after each note notemark.beatLength = notemark.barLength accidental = "" beams = 2 # default semiquaver figure = "" octave = "" mr = [] if isAfter: mr.append(r"\once \override Score.JianpuGraceCurve.direction = #LEFT ") mr.append(r"\jianpuGraceCurveStart ") for i in xrange(len(notes)): n = notes[i] if n=='#': accidental = "#" elif n=='b': accidental = "b" elif n=="'": if i and notes[i-1]==notes[i]: continue if notes[i:i+3]=="'''": octave = "'''" elif notes[i:i+2]=="''": octave = "''" else: octave = "'" elif n==',': if i and notes[i-1]==notes[i]: continue if notes[i:i+3]==",,,": octave = ",,," elif notes[i:i+2]==",,": octave = ",," else: octave = "," elif n in 'qsdh': beams = '*qsdh'.index(n) else: # number should be the last char of a note figure = n mr.append(notemark(figure, beams, "", octave, accidental, "", "", "")[5]) if harmonic: mr[-1]+=r" \flageolet " # deal with harmonic articulations accidental = "" beams = 2 # reset after each note figure = "" octave = "" return ''.join(mr) def grace_octave_fix(notes,word,line): """Ensures octaves, durations and accidentals come before the main notes, not after. For octaves we check ambiguous cases and insist on OctavesBefore or OctavesAfter being set if so""" def gof_inner(notes): return re.sub( "^(.*)([1-9])([^1-9]+)$", lambda m:gof_inner(m.group(1))+chr(0)+m.group(3)+m.group(2),notes) # the chr(0) is a temporary marker for below n2 = gof_inner(notes) def find_ambiguous_octaves(n): return re.sub("^[^',1-9]*[',]+[^',1-9]*[1-9](.*)$",lambda m:find_ambiguous_octaves(m.group(1)),n) L=n2.split(chr(0)) ambiguous_part = find_ambiguous_octaves(L[0]) if re.search("[,']",ambiguous_part): if notehead_markup.octavesPosition=="after": ap2=re.sub(r"([1-9][^1-9,']*)([,']+)",r'\2\1',ambiguous_part) # after to before (no recursion needed) L[0]=L[0][:len(L[0])-len(ambiguous_part)]+ap2 n2="".join(L) elif not notehead_markup.octavesPosition: msg="Ambiguous octave marks (please set OctavesBefore or OctavesAfter if writing them in the middle)" if not ambiguous_part==notes: msg += " in the "+ambiguous_part+" part of" else: msg += ":" scoreError(msg,word,line) return n2.replace(chr(0),"").replace("8","'1").replace("9","'2") def gracenotes_western(notes,word,line): # for western and MIDI staffs notes = grace_octave_fix(notes,word,line) nextAcc = "" ; next8ve = "'" r = [] duration = 16 for i in xrange(len(notes)): n = notes[i] if n=='#': nextAcc = "is" elif n=='b': nextAcc = "es" elif n=="'": if i and notes[i-1]==notes[i]: continue if notes[i:i+3]=="'''": next8ve = "''''" elif notes[i:i+2]=="''": next8ve = "'''" else: next8ve = "''" elif n==',': if i and notes[i-1]==notes[i]: continue if notes[i:i+3]==",,,": next8ve = ",," elif notes[i:i+2]==",,": next8ve = "," else: next8ve = "" elif n in 'qsdh': duration = {'q':8, 's':16, 'd':32, 'h':64}[n] else: if not n in placeholders: continue # TODO: errExit ? r.append(placeholders[n]+nextAcc+next8ve+str(duration)) nextAcc = "" ; next8ve = "'" return ' '.join(r) def chordNotes_markup(notes,word,line): notes = grace_octave_fix(notes,word,line) # ensures octaves and accidentals come before notes accidental = "" figure = "" octave = "" sortKey = 0 dNotes = [] mr = [] for i in xrange(len(notes)): n = notes[i] if n=='#': accidental = "#" sortKey += 0.5 elif n=='b': accidental = "b" sortKey -= 0.5 elif n=="'": if i and notes[i-1]==notes[i]: continue if notes[i:i+3]=="'''": octave = "'''" sortKey += 22 elif notes[i:i+2]=="''": octave = "''" sortKey += 15 else: octave = "'" sortKey += 8 elif n==',': if i and notes[i-1]==notes[i]: continue if notes[i:i+3]==",,,": octave = ",,," sortKey -= 22 elif notes[i:i+2]==",,": octave = ",," sortKey -= 15 else: octave = "," sortKey -= 8 else: # number should be the last char of a note if n not in '01234567' : continue figure = n if int(n) == 0: sortKey = 0 else: sortKey += int(n) dNotes.append({ 'sortKey':sortKey, 'figure':figure, 'octave':octave, 'accidental':accidental}) accidental = "" figure = "" octave = "" sortKey = 0 if sort_chords: dNotes.sort(key=lambda element:element['sortKey']) placeholder_chord= "< " for f in dNotes: placeholder_chord += placeholders[f['figure']]+{"":"", "#":"is", "b":"es"}[f['accidental']] if "," in f['octave']: placeholder_chord += f['octave'][:-1]+" " else: placeholder_chord += f['octave']+"' " placeholder_chord += ">" # skip the bottom octave dots # as the they are dealed with markups outside. bottom_octave = top_octave = "" if "," in dNotes[0]['octave']: bottom_octave = dNotes[0]['octave'] dNotes[0]['octave'] = "" # let's put octaves inside chord offsets = {"'":1, "''":1.6, "'''":2.2, ",":1, ",,":1.6, ",,,":2.2} oDict = {"":"", "'":"^.", "''":r"-\tweak #'X-offset #0.6 ^\two-dots ", "'''":r"-\tweak #'X-offset #0.6 ^\three-dots ", ",":r"-\tweak #'X-offset #0.6 _. ", ",,":r"-\tweak #'X-offset #0.6 _\two-dots ", ",,,":r"-\tweak #'X-offset #0.6 _\three-dots "} ret = "< " baseline = 0 for f in dNotes: # octaves below rises the baseline if ',' in f['octave']: baseline += offsets[f['octave']] if baseline > 0: ret += r"\tweak #'Y-offset #%.1f " % baseline ret += (r'\note-mod-angka "' if not_angka else r'\note-mod "')+f['figure']+'" '+placeholders[f['figure']]+{"":"", "#":"is", "b":"es"}[f['accidental']] if "," in f['octave']: ret += f['octave'][:-1]+" " else: ret += f['octave']+"' " if "," in f['octave']: ret += r"\tweak #'Y-offset #%.1f " % (baseline -0.1 - 1.2 * offsets[f['octave']]) elif "'" in f['octave']: ret += r"\tweak #'Y-offset #%.1f " % (baseline + 1.6 + 0.02 * offsets[f['octave']]) ret += oDict[f['octave']]+" " baseline += 2 if "'" in f['octave']: baseline += offsets[f['octave']] ret += ">" return ret,bottom_octave,placeholder_chord note_regex = ( # Define a note regex as precisely as we can, as different from Lilypond commands etc. # Optionally before the figure: r"(?:[.,'cqsdh#b]" + # non-\ note attribute r"[.,'cqsdh\\#b]*)?" + # and possibly other note attributes that can include \ (just not as the first character). r"[0-9x-]" + # At least one figure (or rest or continuation) r"[0-9x.,'cqsdh\\#b-]*") # and other figures or attrs after def getLY(score,headers=None,have_final_barline=True): if not headers: headers = {} # Python 2 persists this dict if it's in the default args lyrics = [] notehead_markup.initOneScore() out = [] ; maxBeams = 0 need_final_barline = False repeatStack = [] ; lastPtr = 0 lastNonDashPtr = 0 rStartP = None escaping = inTranspose = 0 aftrnext = None aftrnext2 = None ; DS = "}" isInHarmonic = False out_of_line_LP = "" # Please be careful adding extra re.sub's here: they will apply # to the WHOLE SCORE, including Lilypond blocks, headers, etc. # See comment below for a place where you can add re.sub's that # apply just to the jianpu parts after we've already dealt with # Lilypond blocks, headers and lyrics. score = re.sub("(?s)(^|\n)(L:|H:|chords=)\n(.*?)(?=\n\n|$)",lambda m:"\n"+" ".join(m.group().split()),score) # this one DOES apply to lyrics etc: if newline immediately after, collapse until next double newline for line in score.split("\n"): line = fix_fullwidth(line).strip() line=re.sub(r"^%%\s*tempo:\s*(\S+)\s*$",r"\1",line) # to provide an upgrade path for jihuan-tian's fork if line.startswith("LP:"): # Escaped LilyPond block. Thanks to James Harkins for this suggestion. # (Our internal barcheck does not understand code in LP blocks, so keep it to complete bars.) escaping = 1+len(out) if len(line)>len("LP:"): out.append(line[3:]+"\n") # remainder of current line elif line.startswith(":LP"): if r"\paper {" in "".join(out[escaping-1:]): # if someone's trying to override \paper settings, we don't want this inline in the score out_of_line_LP += "".join(out[escaping-1:]) del out[escaping-1:] escaping = 0 if line.replace(":LP","").strip(): sys.stderr.write("Warning: current implementation ignores anything after :LP on same line\n") # TODO elif escaping: out.append(line+"\n") elif not line: pass elif line.startswith("L:") or line.startswith("H:"): # lyrics do_hanzi_spacing = line.startswith("H:") line = line[2:].strip() toAdd = "" if line and '1' <= line[0] <= '9' and (line[1]=='.' or asUnicode(line)[1]==u"\uff0e"): # a verse number toAdd = r'\set stanza = #"%s." ' % line[:1] if line[1]=='.': line=line[2:] elif not type(line)==type(u""): line=line[4:] # for utf-8 full-width dot in Python 2 else: line = line[2:] # for full-width dot in Python 3 line = line.strip() if do_hanzi_spacing: # this is not 100% perfect... l2 = [r"\override LyricText #'self-alignment-X = #LEFT "] # for overhanging commas etc to work if toAdd: l2.append(toAdd) ; toAdd = "" needSpace = 0 for c in list(asUnicode(line)): is_hanzi = (0x3400 <= ord(c) < 0xa700) # TODO: also cover those outside the BMP? but beware narrow Python builds is_openquote = c in u"\u2018\u201c\u300A" if needSpace and (is_hanzi or is_openquote): l2.append(' ') ; needSpace = 0 if is_openquote: # hang left l2.append(r"\once \override LyricText #'self-alignment-X = #CENTER ") # or RIGHT if there's no punctuation after if is_hanzi: needSpace=1 if c=="_": needSpace=0 # TODO: document this: separate hanzi with _ to put more than one on same note else: l2.append(c) line = u"".join(l2) if not type("")==type(u""): line = line.encode('utf-8') # Python 2 lyrics.append(toAdd+re.sub("(?<=[^- ])- "," -- ",line).replace(" -- "," --\n")) elif re.match(r"\s*[A-Za-z]+\s*=",line): # Lilypond header (or guitar chords) hName,hValue = line.split("=",1) hName,hValue = hName.strip().lower(),hValue.strip() if not headers.get(hName,hValue)==hValue: if hName=='instrument': missing='NextPart or NextScore' else: missing='NextScore' errExit("Changing header '%s' from '%s' to '%s' (is there a missing %s?)" % (hName,headers[hName],hValue,missing)) headers[hName] = hValue else: # If we get HERE, we know we're not in a Lilypond header, a # lyrics line, or Lilypond code. This is a good place to # put any regex replacements we want to apply only to the # jianpu parts of the input before we split into words. # First, merge multiple grace notes. This is needed for the # output of some MusicXML conversions, and might be useful to # have around anyway: line=re.sub(r"(?<=\s)(g\[[#b',1-9qsdh]+\]\s*)+g\[([#b',1-9qsdh]+)\](?=\s)",lambda m:re.sub(r"\]\s*g\[","",m.group()),line) # To support multi-word text above/below the stave, we'll # replace space with chr(0) inside quoted strings so they # end up being one word per item (we'll put it back to space # before giving it to Lilypond) line=re.sub('(?<= )[_^]"[^" ]* [^"]*"(?= |$)',lambda m:m.group().replace(' ',chr(0))," "+line)[1:] # and YesGH's suggestion: allow slurs and ties to be attached # to the right-hand side of the notes to which they apply # (i.e. auto insert the space if there's not one already). # Not yet doing this with \ Lilypond commands, because # currently \ can indicate a duration if used anywhere other # than the first character of a note, so it could be quite # tricky to identify exactly when we can definitely say it's # a Lilypond command and not a duration (but if your # particular input doesn't use \ for duration then you could # do the replacement in another tool before jianpu-ly). # So currently you still need a space before \command, but # don't need a space before ( or ) or ~ after the note # (and more than one of these can be added to the same note) line=re.sub(r"((?:^|\s)"+note_regex+r")([()~]+)(?=\s|$)", lambda m:" ".join([m.group(1)]+list(m.group(2))), line) for word in line.split(): word=word.replace(chr(0)," ") if word in ["souyin","harmonic","up","down","bend","tilde"]: word="Fr="+word # (Fr= before these is optional) if re.match("[16]=[#b][A-Ga-g]$",word): word=word[:2]+word[3]+word[2] # somebody wrote a key name backwards (bE instead of Eb), we can fix that here # ----------------------------------- # Start of main 'switch' on each word # ----------------------------------- if word.startswith('%'): break # a comment elif word == "Harm:": isInHarmonic = True elif word==":Harm": isInHarmonic = False elif re.match("[1-468]+[.]*=[1-9][0-9]*$",word): out.append(r'\tempo '+word) # TODO: reduce size a little? elif re.match("[16]=[A-Ga-g][#b]?$",word): #key # Must use \transpose because \transposition doesn't always work. # However, don't use \transpose if printing - it adds extra accidentals to the rhythm staff. # So we have to do separate runs of \layout and \midi (hence the outer loop). notehead_markup.unicode_approx.append(u''+re.sub('(?","|"] or word.startswith('^"') or word.startswith('_"'): # Lilypond command, \p, ^"text", barline check (undocumented, see above), etc if re.match(r"\\[.,'cqsdh\\#b]*[0-9x-][0-9x.,'cqsdh\\#b-]*$",word): sys.stderr.write("Warning: '"+word+"' is being interpreted as a Lilypond command.\nIf you meant it as a note, move the \\ away from the start.\n") if word=="~" and not midi and not western and lastNonDashPtr < lastPtr: # tie from the number, not the last dash out.insert(lastNonDashPtr+1,r'\=JianpuTie(') lastPtr += 1 aftrnext2 = r'\=JianpuTie)' elif out and "afterGrace" in out[lastPtr]: # apply to inside afterGrace in midi/western out[lastPtr] = out[lastPtr][:-1] + word + " }" else: out.append(word) if word=="~" and not midi and not western and lastNonDashPtr < lastPtr: sys.stderr.write("Warning: jianpu long-note tie won't be done right because your Lilypond version is older than 2.20\n") elif re.match(r"[1-9][0-9]*\[$",word): # tuplet start, e.g. 3[ fitIn = int(word[:-1]) i=2 while i=24: out.append(r'\volta 2 \fine \volta 1') else: out.append(r'''\once \override Score.RehearsalMark #'break-visibility = #begin-of-line-invisible \once \override Score.RehearsalMark #'self-alignment-X = #RIGHT \mark "Fine" \bar "|."''') elif word=="DC": need_final_barline = False if lilypond_minor_version()>=24: out.insert(0,r'\repeat segno 2 {') ; lastPtr += 1 out.append(DS) else: out.append(r'''\once \override Score.RehearsalMark #'break-visibility = #begin-of-line-invisible \once \override Score.RehearsalMark #'self-alignment-X = #RIGHT \mark "D.C. al Fine" \bar "||"''') elif word=="Segno": if lilypond_minor_version() < 24: errExit("Need at least Lilypond 24 for Segno") out.append(r'\repeat segno 2 {') elif word=="DS": out.append(DS) elif word=="ToCoda": if lilypond_minor_version() < 24: errExit("Need at least Lilypond 24 for coda") out.append(r'\alternative { \volta 1 {') DS=r'''} } \volta 2 \volta #'() { \section \sectionLabel "Coda" } }''' else: # note (or unrecognised) word0 = word baseOctaveChange = "".join(c for c in word if c in "<>") if baseOctaveChange: notehead_markup.baseOctaveChange(baseOctaveChange) word = "".join(c for c in word if not c in "<>") if not word: continue # allow just < and > by itself in a word figures,nBeams,dots,octave,accidental,tremolo = parseNote(word,word0,line) need_final_barline = True aftrLastNonDash,isDash,b4last,replaceLast,aftrlast,this,need_space_for_accidental,nBeams,octave = notehead_markup(figures,nBeams,dots,octave,accidental,tremolo,word0,line) if replaceLast: out[lastPtr]=replaceLast if b4last: out[lastPtr]=b4last+out[lastPtr] if aftrlast: out.insert(lastPtr+1,aftrlast) if aftrLastNonDash: out.insert(lastNonDashPtr+1,aftrLastNonDash) lastPtr = len(out) if not isDash: lastNonDashPtr = len(out) out.append(this) if aftrnext2: out.append(aftrnext2) aftrnext2 = None if aftrnext: if need_space_for_accidental: aftrnext = aftrnext.replace(r"\markup",r"\markup \halign #2 ",1) out.append(aftrnext) aftrnext = None if not_angka and "'" in octave: maxBeams=max(maxBeams,len(octave)*.8+nBeams) else: maxBeams=max(maxBeams,nBeams) if isInHarmonic and not midi and not western and not figures=='-': out[-1]+=r" \flageolet " if notehead_markup.barPos == 0 and notehead_markup.barNo == 1: errExit("No jianpu in score %d" % scoreNo) if notehead_markup.inBeamGroup and not midi and not western and not notehead_markup.inBeamGroup=="restHack": out[lastPtr] += ']' # needed if ending on an incomplete beat if inTranspose: out.append("}") if repeatStack: errExit("Unterminated repeat in score %d" % scoreNo) if escaping: errExit("Unterminated LP: in score %d" % scoreNo) notehead_markup.endScore() # perform checks if have_final_barline and need_final_barline and not midi: out.append(r'\bar "|."') # Merge \mark commands (at least Lilypond 2.20..2.24 can't take more than one in one place) i,needLeftAlign = 0, notehead_markup.noIndent and not midi and not western while i < len(out)-1: if out[i].startswith(r'\mark \markup{'): if needLeftAlign: out[i]=r"\once \override Score.RehearsalMark #'self-alignment-X = #LEFT "+out[i] j=i+1 while j60: out[i] += '\n' else: out[i]+=' ' out = ''.join(out) if midi or western: # collapse/combine tied notes into longer notes (even in MIDI, for 2-note tremolo extension) for numNotes,dot,result in [ (4,r"\.","1."), # in 12/8, 4 dotted crotchets = dotted semibreve (4,"","1"), # 4 crotchets = semibreve (3,"","2."), # 3 crotchets = dotted minim (2,r"\.","2."), # in 6/8, 2 dotted crotchets = dotted minim (2,"","2")]: # 2 crotchets = minim out = re.sub("(?P[^<][^ ]*|<[^>]*>)4"+dot+r'((?::32)?) +~(( \\[^ ]+| [_^]"[^"]*")*) '+" +~ ".join(["(?P=note)4"+dot]*(numNotes-1)),r"\g<1>"+result+r"\g<2>\g<3>",out) out = re.sub("r4"+dot+r'(( \\[^ ]+| [_^]"[^"]*")*) '+" ".join(["r4"+dot]*(numNotes-1)),"r"+result+r"\g<1>",out) if dot: chkLen=6 else: chkLen = 4 out = re.sub(r"\\repeat tremolo "+str(chkLen)+r" { (?P[^ ]+)32 (?P[^ ]+)32 } +~(( \\[^ ]+)*) "+" +~ ".join(["< (?P=note1) (?P=note2) >4"+dot]*(numNotes-1)),r"\\repeat tremolo "+str(chkLen*numNotes)+r" { \g<1>32 \g<2>32 }\g<3>",out) out = re.sub(r"(\\repeat tremolo [^{]+{ [^ ]+)( [^}]+ })(( +\\[pmf][^ ]*)+)",r"\g<1>\g<3>\g<2>",out) # dynamics need to attach inside the tremolo (but not other \ commands like \bar or \time or another tremolo \repeat) out = re.sub(r'(%\{ bar [0-9]*: %\} | \\major ) *r(?=[^ ]*(?: [_^]"[^"]*")?[| ]* (?:\\noPageBreak )?(?:%\{ bar|\\bar|\}$))',r"\g<1>R",out) out = out.replace(r"\new RhythmicStaff \with {",r"\new RhythmicStaff \with { \override VerticalAxisGroup.default-staff-staff-spacing = #'((basic-distance . 6) (minimum-distance . 6) (stretchability . 0)) ") # don't let it hang too far up in the air if not_angka: out=out.replace("make-bold-markup","make-simple-markup") return out,maxBeams,lyrics,headers,out_of_line_LP def process_input(inDat): global unicode_mode unicode_mode = not not re.search(r"\sUnicode\s"," "+inDat+" ") if unicode_mode: return get_unicode_approx(re.sub(r"\sUnicode\s"," "," "+inDat+" ").strip())+"\n" ret = [] global scoreNo, western, has_lyrics, midi, not_angka, maxBeams, uniqCount, notehead_markup uniqCount = 0 ; notehead_markup = NoteheadMarkup() scoreNo = 0 # incr'd to 1 below western = False find_grace_height(inDat) inDat = re.sub(r"(%.*Next)(?=(Part|Score)\s)",r"\1 ",inDat) # in case someone commented out NextScore or NextPart for score in re.split(r"\sNextScore\s"," "+inDat+" "): if not score.strip(): continue scoreNo += 1 has_lyrics = not not re.search("(^|\n)[LH]:",score) # The occasional false positive doesn't matter: has_lyrics==False is only an optimisation so we don't have to create use_rest_hack voices. It is however important to always detect lyrics if they are present. parts = [p for p in re.split(r"\sNextPart\s"," "+score+" ") if p.strip()] for midi in [False,True]: not_angka = False # may be set by getLY if scoreNo==1 and not midi: ret.append(all_scores_start(inDat)) # now we've established non-empty separate_score_per_part = midi and re.search(r"\sPartMidi\s"," "+score+" ") and len(parts)>1 # (results in 1st MIDI file containing all parts, then each MIDI file containing one part, if there's more than 1 part) for separate_scores in [False,True] if separate_score_per_part else [False]: headers = {} # will accumulate below notehead_markup.separateTimesig=False for partNo,part in enumerate(parts): if partNo==0 or separate_scores: ret.append(score_start()) out,maxBeams,lyrics,headers,out_of_line_LP = getLY(part,headers,partNo==0 or separate_scores) # assume 1st part doesn't have 'tacet al fine' ret[0] += out_of_line_LP if len(parts)>1 and "instrument" in headers: inst = headers["instrument"] del headers["instrument"] else: inst = None if "chords" in headers: if "frets" in headers: frets = headers["frets"] assert frets in ["guitar","ukulele","mandolin"] fretsInc = r'\include "predefined-'+frets+'-fretboards.ly"\n' if not fretsInc in ret: ret.insert(1,fretsInc) # after all-scores-start del headers["frets"] else: frets = None ret.append(r'\new ChordNames { \set chordChanges = ##t ') if notehead_markup.chordsRoman: ret.append(r'\set chordNameLowercaseMinor = ##t') ret.append(r'\chordmode { '+headers["chords"]+' } }') if frets: ret.append(r'\new FretBoards { '+('' if frets=='guitar' else r'\set Staff.stringTunings = #'+frets+'-tuning')+r' \chordmode { '+headers["chords"]+' } }') del headers["chords"] if midi: ret.append(midi_staff_start()+" "+out+" "+midi_staff_end()) else: staffStart,voiceName = jianpu_staff_start(inst) ret.append(staffStart+" "+out+" "+jianpu_staff_end()) if notehead_markup.withStaff: western=True staffStart,voiceName = western_staff_start(inst) average_octave = sum(notehead_markup.octavesSeen)*1.0/len(notehead_markup.octavesSeen) if average_octave < -0.5: staffStart += r" \clef bass" # might want to say <0 but being conservative for now ret.append(staffStart+" "+getLY(part,have_final_barline=False)[0]+" "+western_staff_end()) western = False if lyrics: ret.append("".join(lyrics_start(voiceName)+l+" "+lyrics_end()+" " for l in lyrics)) if partNo==len(parts)-1 or separate_scores: ret.append(score_end(**headers)) ret = "".join(r+"\n" for r in ret) if lilypond_minor_version() >= 24: ret=re.sub(r"(\\override [A-Z][^ ]*) #'",r"\1.",ret) # needed to avoid deprecation warnings on Lilypond 2.24 return ret def get_unicode_approx(inDat): if re.search(r"\sNextPart\s"," "+inDat+" "): errExit("multiple parts in Unicode mode not yet supported") if re.search(r"\sNextScore\s"," "+inDat+" "): errExit("multiple scores in Unicode mode not yet supported") # TODO: also pick up on other not-supported stuff e.g. grace notes (or check for unicode_mode when these are encountered) global notehead_markup, western, midi, uniqCount, scoreNo, has_lyrics, not_angka, maxBeams notehead_markup = NoteheadMarkup() western = midi = not_angka = False has_lyrics = True # doesn't matter for our purposes (see 'false positive' comment above) uniqCount = 0 ; scoreNo = 1 getLY(inDat,{}) u=u''.join(notehead_markup.unicode_approx) if u.endswith(u'\u2502'): u=u[:-1]+u'\u2551' return u try: from shlex import quote except: def quote(f): return "'"+f.replace("'","'\"'\"'")+"'" def write_output(outDat): if sys.stdout.isatty(): if unicode_mode: if sys.platform=='win32' and sys.version_info() < (3,6): # Unicode on this console could be a problem print (""" For Unicode approximation on this system, please do one of these things: (1) redirect output to a file, (2) upgrade to Python 3.6 or above, or (3) switch from Microsoft Windows to GNU/Linux""") return else: # normal Lilypond # They didn't redirect our output. # Try to be a little more 'user friendly' # and see if we can put it in a temporary # Lilypond file and run Lilypond for them. # New in jianpu-ly v1.61. if len(sys.argv)>1: fn=os.path.split(sys.argv[1])[1] else: fn = 'jianpu' if os.extsep in fn: fn=fn[:fn.rindex(os.extsep)] fn += ".ly" import tempfile cwd = os.getcwd() os.chdir(tempfile.gettempdir()) print("Outputting to "+os.getcwd()+"/"+fn) o = open(fn,'w') fix_utf8(o,'w').write(outDat) o.close() pdf = fn[:-3]+'.pdf' try: os.remove(pdf) # so won't show old one if lilypond fails except: pass cmd = lilypond_command() if cmd: cmd += ' -dstrokeadjust' # if will be viewed on-screen rather than printed, and it's not a Retina display os.system(cmd+" "+quote(fn)) if sys.platform=='darwin': os.system("open "+quote(pdf)) elif sys.platform.startswith('win'): import subprocess subprocess.Popen([quote(pdf)],shell=True) elif (shutil.which('evince') if hasattr(shutil,'which') else os.path.exists('/usr/bin/evince')): os.system("evince "+quote(pdf)) os.chdir(cwd) ; return fix_utf8(sys.stdout,'w').write(outDat) def main(): if "--html" in sys.argv or "--markdown" in sys.argv: return write_docs() if '--help' in sys.argv or '-h' in sys.argv or '/?' in sys.argv: return write_help() if '--version' in sys.argv or '-v' in sys.argv or '/v' in sys.argv: return write_version() inDat = get_input() out = process_input(inDat) # <-- you can also call this if importing as a module write_output(out) if __name__=="__main__": main()