RE: Font size of pedal marks

2016-02-19 Thread Joseph N. Srednicki 
Simon and Kieran:

Thanks for your useful suggestions. 

Joe Srednicki

-Original Message-
From: Kieren MacMillan [mailto:kieren_macmil...@sympatico.ca] 
Sent: Friday, February 19, 2016 1:40 PM
To: Simon Albrecht <simon.albre...@mail.de>
Cc: Joseph N. Srednicki <jnsredni...@verizon.net>; Lilypond-User Mailing List 
<lilypond-user@gnu.org>
Subject: Re: Font size of pedal marks

Hi Simon (et al.),

> However this will also change numerous other objects like 
> articulations and fermatas

+1

> so I’d globally redefine them like
> rheel = -\tweak font-size -3 \rheel

If you have more than one tweak, you can also pack them into a single/general 
setting, without redefining them individually:

  SNIPPET BEGINS
\version "2.19.36"

#(define ((custom-script-tweaks ls) grob)
  (let* ((type (ly:prob-property (assoc-ref (ly:grob-properties grob)
'cause) 'articulation-type))
 (tweaks (assoc-ref ls type)))
(if tweaks
(for-each (lambda (x) (ly:grob-set-property! grob (car x) (cdr x))) 
tweaks)
'(

#(define my-script-settings '(
   ("rheel" . ((font-size . -3)))
   ("lheel" . ((font-size . 4)))
   ("staccato" . ((padding . 12)))
   ("tenuto" . ((X-offset . -2)))
   ))

\score {
  \new Staff { c''4\rheel 4\lheel 4\staccato 4\tenuto }
  \layout {
\context {
  \Score
  \override Script.before-line-breaking =
  #(custom-script-tweaks my-script-settings)
}
  }
}
  SNIPPET ENDS

Hope this helps!
Kieren.


Kieren MacMillan, composer
‣ website: www.kierenmacmillan.info
‣ email: i...@kierenmacmillan.info


___
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user

Re: Font size of pedal marks

2016-02-19 Thread tisimst 
On Fri, Feb 19, 2016 at 11:40 AM, Kieren MacMillan [via Lilypond] <
ml-node+s1069038n187467...@n5.nabble.com> wrote:

> If you have more than one tweak, you can also pack them into a
> single/general setting, without redefining them individually:
>
>   SNIPPET BEGINS
> \version "2.19.36"
>
> #(define ((custom-script-tweaks ls) grob)
>   (let* ((type (ly:prob-property (assoc-ref (ly:grob-properties grob)
> 'cause) 'articulation-type))
>  (tweaks (assoc-ref ls type)))
> (if tweaks
> (for-each (lambda (x) (ly:grob-set-property! grob (car x)
> (cdr x))) tweaks)
> '(
>
> #(define my-script-settings '(
>("rheel" . ((font-size . -3)))
>("lheel" . ((font-size . 4)))
>("staccato" . ((padding . 12)))
>("tenuto" . ((X-offset . -2)))
>))
>
> \score {
>   \new Staff { c''4\rheel 4\lheel 4\staccato 4\tenuto }
>   \layout {
> \context {
>   \Score
>   \override Script.before-line-breaking =
>   #(custom-script-tweaks my-script-settings)
> }
>   }
> }
>   SNIPPET ENDS
>

Nice, Kieren! That's a great way to consolidate specifics tweaks! Thanks
for sharing!

- Abraham




--
View this message in context: 
http://lilypond.1069038.n5.nabble.com/Font-size-of-pedal-marks-tp187464p187468.html
Sent from the User mailing list archive at Nabble.com.___
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user

Re: Font size of pedal marks

2016-02-19 Thread Kieren MacMillan 
Hi Simon (et al.),

> However this will also change numerous other objects like articulations and 
> fermatas

+1

> so I’d globally redefine them like
> rheel = -\tweak font-size -3 \rheel

If you have more than one tweak, you can also pack them into a single/general 
setting, without redefining them individually:

  SNIPPET BEGINS
\version "2.19.36"

#(define ((custom-script-tweaks ls) grob)
  (let* ((type (ly:prob-property (assoc-ref (ly:grob-properties grob)
'cause) 'articulation-type))
 (tweaks (assoc-ref ls type)))
(if tweaks
(for-each (lambda (x) (ly:grob-set-property! grob (car x)
(cdr x))) tweaks)
'(

#(define my-script-settings '(
   ("rheel" . ((font-size . -3)))
   ("lheel" . ((font-size . 4)))
   ("staccato" . ((padding . 12)))
   ("tenuto" . ((X-offset . -2)))
   ))

\score {
  \new Staff { c''4\rheel 4\lheel 4\staccato 4\tenuto }
  \layout {
\context {
  \Score
  \override Script.before-line-breaking =
  #(custom-script-tweaks my-script-settings)
}
  }
}
  SNIPPET ENDS

Hope this helps!
Kieren.


Kieren MacMillan, composer
‣ website: www.kierenmacmillan.info
‣ email: i...@kierenmacmillan.info


___
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user

Re: Font size of pedal marks

2016-02-19 Thread Simon Albrecht 

On 19.02.2016 19:18, Joseph N. Srednicki wrote:


Is there a command to adjust the size of the pedal marks \rheel, 
\lheel, \rtoe, \ltoe?




They produce Script grobs, so you’d need (in a \layout block)
\override Script.font-size = -10 % dummy value
However this will also change numerous other objects like articulations 
and fermatas, so I’d globally redefine them like

rheel = -\tweak font-size -3 \rheel

HTH, Simon

___
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user