[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: How to produce this articulation mark?
From: |
Thomas Morley |
Subject: |
Re: How to produce this articulation mark? |
Date: |
Mon, 5 Mar 2012 22:34:51 +0100 |
Hi Jonas,
2012/3/3 Thomas Morley <address@hidden>:
> Hi Jonas,
>
> 2012/3/2 Jonas Olson <address@hidden>:
>> Hi,
>>
>> I've come a cross an articulation mark that I don't find a way to
>> produce with Lilypond. In the attached image, they occur on "me" and
>> "long". It can be heard 13 seconds into
>> <http://manhattantransfer.net/wp-content/uploads/2011/02/03-Operator.mp3>.
>>
>> How do I do it?
>>
>> Regards
>> Jonas
>
> some possibilities:
>
> \version "2.14.2"
>
> rotSc = #(define-music-function (parser location arg) (ly:music?)
> (set! (ly:music-property arg 'tweaks)
> (acons 'rotation '(25 0 0)
> (ly:music-property arg 'tweaks)))
> arg)
>
> rotTen = #(let ((m (make-music 'ArticulationEvent
> 'articulation-type "tenuto")))
> (set! (ly:music-property m 'tweaks)
> (acons 'rotation '(25 0 0)
> (ly:music-property m 'tweaks)))
> m)
>
> rot = \once \override Script #'rotation = #'(25 0 0)
>
> %---Test
>
> upper = \relative c' {
> \key ees\major
>
> <ees g>
> <g bes>
> \breathe
> <g bes>
> <g bes>\rotTen |
> <f bes>8-\rotSc --
> \rot
> <f bes>--
> <ees aes>4\fermata
> s
> }
>
> lower = \relative c {
> \key ees\major
> \clef bass
>
> <bes bes'>4
> <c ees'>\fermata
> \breathe
> <ees ees'>
delete the following line!
> \xy
> <ees ees'>\tenuto |
> <aes, c'>2.\fermata
> }
>
>
> \score {
> \new PianoStaff <<
> \new Staff \upper
> \new Staff \lower
> >>
> }
>
> HTH,
> Harm
sorry, forgot to delete \xy.
Cheers,
Harm