2 \layout { ragged-right= ##t }
4 lsrtags = "paper-and-layout" % a new tag like "Mixing text and music" or
5 % "Special output" might be more adequate -jm
7 This code shows how to clip (extract) snippets from a full score.
9 This file needs to be run separately with @code{-dclip-systems}; the
10 snippets page may not adequately show the results.
12 The result will be files named
13 @file{@var{base}-from-@var{start}-to-@var{end}[-@var{count}].eps}.
16 @item If system starts and ends are included, they include extents of the System grob, e.g., instrument names.
17 @item Grace notes at the end point of the region are not included.
18 @item Regions can span multiple systems. In this case, multiple EPS files are generated.
21 doctitle = "Clip systems"
24 #(ly:set-option 'clip-systems)
25 #(set! output-count 1)
29 \set Staff.instrumentName = #"bla"
45 % Each clip-region is a (START . END) pair
46 % where both are rhythmic-locations.
48 % (make-rhythmic-locations BAR-NUMBER NUM DEN)
49 % means NUM/DEN whole-notes into bar numbered BAR-NUMBER
53 (make-rhythmic-location 2 0 1)
54 (make-rhythmic-location 4 0 1))
57 (make-rhythmic-location 0 0 1)
58 (make-rhythmic-location 4 0 1))
61 (make-rhythmic-location 0 0 1)
62 (make-rhythmic-location 6 0 1))
68 #(set! output-count 0)
69 #(ly:set-option 'clip-systems #f)
73 \markup { \bold \fontsize #6 clips }
76 \markup { from-2.0.1-to-4.0.1-clip.eps }
77 \markup { \epsfile #X #30.0 #(format #f "~a-1-from-2.0.1-to-4.0.1-clip.eps" (ly:parser-output-name parser)) }