#(ly:set-option (quote no-point-and-click))

clefcs = { \clef treble }
clefca = { \clef treble }
clefct = { \clef "treble_8" }
clefcb = { \clef bass }

top = {
%  #(ly:set-option 'gs-font-load #f)
}

ts = {
  \overrideTimeSignatureSettings
  4/4        % timeSignatureFraction
  1/4        % baseMomentFraction
  #'(1 1 1 1) % beatStructure
  #'()       % beamExceptions
}

nh = {
% \override Accidental  #'cautionary-style = #'smaller %,parentheses
 \override NoteHead #'style = #'baroque
%  \set Staff.timeSignatureFraction = #'(2 . 2)
% \override Staff.Accidental  #'style = #'mensural
% \override NoteHead  #'style = #'mensural
% \override Rest  #'style = #'mensural
% \override Staff.TimeSignature  #'style = #'mensural
}

acc = {
  \textSpannerDown
  \override TextSpanner #'edge-text = #'("accel. " . "")
}

brcaesura = {
  \once\override BreathingSign #'text = #(make-musicglyph-markup "scripts.caesura")
  \breathe
}

Moff = { \set ignoreMelismata = ##t }
Mon  = { \set ignoreMelismata = ##f }

Dotted = { \slurDotted \tieDotted \set melismaBusyProperties = #'() }
Dashed = { \slurDashed \tieDashed \set melismaBusyProperties = #'() }
Solid  = { \slurSolid  \tieSolid  \set melismaBusyProperties = #default-melisma-properties }

dropLyrics = {
  \override LyricText #'extra-offset = #'(0 . -1.25)
  \override LyricHyphen #'extra-offset = #'(0 . -1.25)
  \override LyricExtender #'extra-offset = #'(0 . -1.25)
}
raiseLyrics = {
  \revert LyricText #'extra-offset
  \revert LyricHyphen #'extra-offset
  \revert LyricExtender #'extra-offset
}

ss = {
  \override Score.BarNumber #'break-visibility = #end-of-line-invisible
  \override Score.BarNumber #'padding = #2
  \override Score.BarNumber #'self-alignment-X = #-1
%  \override Score.BarNumber #'self-alignment-X = #left

  \override Score.RehearsalMark #'padding = #5
  \override Score.RehearsalMark #'self-alignment-X = #-1
%  \override Score.RehearsalMark #'self-alignment-X = #left

%  \set Score.defaultBarType = ":"
%  \override Score.RehearsalMark  #'print-function = #(make-stencil-boxer 0.15 0.3 0.3 Text_interface::print)
%  \set Score.markFormatter = #format-mark-letters
%  \set Score.markFormatter = #format-mark-numbers
%  \override Score.TimeSignature #'style = #'()
%  \set Score.skipBars = ##t
%  #(override-auto-beam-setting '(end * * 2 2) 1 4 'Score)
%  #(override-auto-beam-setting '(end * * 3 4) 1 4 'Score)
%  #(override-auto-beam-setting '(end * * 3 4) 2 4 'Score)
%  #(override-auto-beam-setting '(end * * 3 4) 3 4 'Score)
%  #(override-auto-beam-setting '(end * * 4 4) 1 4 'Score)
%  #(override-auto-beam-setting '(end * * 3 8) 3 8 'Score)

%  #(override-auto-beam-setting '(end * * 12 8) 3 8 'Score)

%  \set tupletSpannerDuration = #(ly:make-moment 1 4)
%  \override Script #'inside-slur = ##t

  \set Score.printKeyCancellation = ##f

%  \override Score.DynamicText #'inside-slur = ##f
%  \override Staff.DynamicText #'slur-padding = #10.0
%  \override Score.DynamicText #'self-alignment-Y = #1
  \override NoteHead #'style = #'baroque
}

so = {
  \override Score.BarNumber #'break-visibility = #all-invisible
%  \override Score.RehearsalMark #'self-alignment-X = #left
%  #(override-auto-beam-setting '(end * * 3 4) 1 4 'Score)
%  #(override-auto-beam-setting '(end * * 3 4) 2 4 'Score)
%  #(override-auto-beam-setting '(end * * 3 4) 3 4 'Score)

%  #(override-auto-beam-setting '(end * * 4 4) 1 4 'Score)
%  #(override-auto-beam-setting '(end * * 4 4) 2 4 'Score)
%  #(override-auto-beam-setting '(end * * 4 4) 3 4 'Score)
  \set Score.printKeyCancellation = ##f
}
zsf = \markup { \center-align { \line { \hspace #3 \bold\italic "sempre" \dynamic f } } }
#(use-modules (ice-9 optargs))
#(define* (ztt)  (ly:export #{ \once\override TextScript #'transparent = ##t #} ))
#(define* (zd )  (ly:export #{ \once\override DynamicText #'extra-offset = #'(0 . -0.5) #}))
#(define* (zd1)  (ly:export #{ \once\override DynamicText #'extra-offset = #'(0 . -1.0) #}))
#(define* (zd15) (ly:export #{ \once\override DynamicText #'extra-offset = #'(0 . -1.5) #}))
#(define* (zh05) (ly:export #{ \once\override Hairpin #'extra-offset = #'(0 . -0.5) #}))
#(define* (zh07) (ly:export #{ \once\override Hairpin #'extra-offset = #'(0 . -0.7) #}))
#(define* (zh1)  (ly:export #{ \once\override Hairpin #'extra-offset = #'(0 . -1.0) #}))
#(define* (zh13) (ly:export #{ \once\override Hairpin #'extra-offset = #'(0 . -1.3) #}))
#(define* (zh15) (ly:export #{ \once\override Hairpin #'extra-offset = #'(0 . -1.5) #}))
#(define* (zh2)  (ly:export #{ \once\override Hairpin #'extra-offset = #'(0 . -2.0) #}))
#(define* (zt )  (ly:export #{ \once\override TextScript #'padding = #0.5 #}))
#(define* (zt1)  (ly:export #{ \once\override TextScript #'padding = #1.0 #}))
#(define* (zt15) (ly:export #{ \once\override TextScript #'padding = #1.5 #}))
#(define* (zt3)  (ly:export #{ \once\override TextScript #'padding = #3.0 #}))

#(define* (zs+1)  (ly:export #{ \once\override Script #'extra-offset = #'(0 . 0.3) #}))
#(define* (zs-1)  (ly:export #{ \once\override Script #'extra-offset = #'(0 . -0.3) #}))

#(define* (zs+)  (ly:export #{ \override Script #'extra-offset = #'(0 . 0.3) #}))
#(define* (zs-)  (ly:export #{ \override Script #'extra-offset = #'(0 . -0.3) #}))
#(define* (zs0)  (ly:export #{ \revert Script #'extra-offset #}))

%{
#(define* (zg val)
  (define p (cons 0 val))
  ;(write p)
  (ly:export #{ \once\override DynamicText #'extra-offset = #p #}))

#(define* (zh)
  (make-music
   'ContextSpeccedMusic
   'property-operations
   '()
   'context-type
   'Bottom
   'element
   (make-music
    'OverrideProperty
    'once
    #t
    'pop-first
    #t
    'grob-property
    'extra-offset
    'grob-value
    (0 . -0.5)
    'symbol
    'DynamicText)))
%}