X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Documentation%2Fsnippets%2Fcreating-double-digit-fingerings.ly;h=7949e5aec4d4dba29ecc36053fd6478042b31cc3;hb=HEAD;hp=c1d0fb620fc3391b0f626b89591f590fa9c65b88;hpb=26a079ca2393d053315ef8dbef626c897dc9645a;p=lilypond.git diff --git a/Documentation/snippets/creating-double-digit-fingerings.ly b/Documentation/snippets/creating-double-digit-fingerings.ly index c1d0fb620f..7949e5aec4 100644 --- a/Documentation/snippets/creating-double-digit-fingerings.ly +++ b/Documentation/snippets/creating-double-digit-fingerings.ly @@ -1,48 +1,24 @@ %% DO NOT EDIT this file manually; it is automatically -%% generated from LSR http://lsr.dsi.unimi.it +%% generated from LSR http://lsr.di.unimi.it %% Make any changes in LSR itself, or in Documentation/snippets/new/ , %% and then run scripts/auxiliar/makelsr.py %% %% This file is in the public domain. -\version "2.16.0" +\version "2.18.0" \header { lsrtags = "editorial-annotations, expressive-marks, scheme-language, staff-notation, tweaks-and-overrides" texidoc = " -By default you cannot make double-digit fingering notation (i.e. -numbers larger than 9). This is a hard coded limitation. - -This snippet shows two methods of creating fingerings larger than 9. +Creating fingerings larger than 5 is possible. " doctitle = "Creating double-digit fingerings" } % begin verbatim - -ten = -#(make-music 'FingeringEvent - 'digit 10) - -fifty = -#(make-music 'FingeringEvent - 'digit 50) - -finger = -#(define-music-function (parser location digit) (integer?) - (make-music 'FingeringEvent - 'digit digit)) - -#(define (calc-finger-without-warning grob) - (let* ((event (event-cause grob)) - (digit (ly:event-property event 'digit))) - (number->string digit 10))) - \relative c' { - % optional override to remove warnings for fingerings larger than 5 - \override Fingering #'text = #calc-finger-without-warning - c1\ten - c1\fifty - c1-\finger #36 - c1-\finger #29 + c1-10 + c1-50 + c1-36 + c1-29 }