X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Fscript-init.ly;h=1b84be5a37299d17578d29f8c7cbdc530636c50c;hb=13798e90e8ae32bf341b21440f2687442274759f;hp=3b3e39ed31d11b1ca86e8d5f7a80e0f214070023;hpb=058370efc7e9710f149d0f444328bb1fcd7bdec1;p=lilypond.git diff --git a/ly/script-init.ly b/ly/script-init.ly index 3b3e39ed31..1b84be5a37 100644 --- a/ly/script-init.ly +++ b/ly/script-init.ly @@ -5,7 +5,7 @@ harmonic = #(make-music 'HarmonicEvent) accent = #(make-articulation "accent" - 'midi-extra-velocity 20) + 'midi-extra-velocity 20) coda = #(make-articulation "coda") downbow = #(make-articulation "downbow") downmordent = #(make-articulation "downmordent") @@ -19,14 +19,14 @@ lineprall = #(make-articulation "lineprall") longfermata = #(make-articulation "longfermata") ltoe = #(make-articulation "ltoe") marcato = #(make-articulation "marcato" - 'midi-extra-velocity 40) + 'midi-extra-velocity 40) mordent = #(make-articulation "mordent") open = #(make-articulation "open") portato = #(make-articulation "portato" - 'midi-length - (lambda (len context) - (ly:moment-mul len (ly:make-moment 3/4)))) + 'midi-length + (lambda (len context) + (ly:moment-mul len (ly:make-moment 3/4)))) prall = #(make-articulation "prall") pralldown = #(make-articulation "pralldown") prallmordent = #(make-articulation "prallmordent") @@ -40,16 +40,16 @@ shortfermata = #(make-articulation "shortfermata") signumcongruentiae = #(make-articulation "signumcongruentiae") snappizzicato = #(make-articulation "snappizzicato") staccatissimo = #(make-articulation "staccatissimo" - 'midi-length - (lambda (len context) - (seconds->moment 1/8 context)) - 'midi-extra-velocity 6) + 'midi-length + (lambda (len context) + (seconds->moment 1/8 context)) + 'midi-extra-velocity 6) staccato = #(make-articulation "staccato" - 'midi-length - (lambda (len context) - (moment-min (ly:moment-mul len (ly:make-moment 1/2)) - (seconds->moment 1/2 context))) - 'midi-extra-velocity 4) + 'midi-length + (lambda (len context) + (moment-min (ly:moment-mul len (ly:make-moment 1/2)) + (seconds->moment 1/2 context))) + 'midi-extra-velocity 4) stopped = #(make-articulation "stopped") tenuto = #(make-articulation "tenuto") thumb = \finger \markup \scale #(cons (magstep 5) (magstep 5))