[ << Paper and layout ]	[Top][Contents]	[ Titles >> ]
[ < Modificar el tamaño de la pauta ]	[ Up : Paper and layout ]	[ Crear pentagramas en blanco > ]

---

Recorte de sistemas

Este código muestra cómo recortar (extraer) fragmentos a partir de una partitura completa.

Este archivo tiene que procesarse de forma separada con la opción -dclip-systems; la página de fragmentos de código podría no mostrar el resultado adecuadamente.

La salida consiste en archivos con los nombres ‘base-from-inicio-to-final[-número].eps’.

Si se incluyen los comienzos y finales de los sistemas, incluyen las dimensiones del grob del sistema, por ejemplo los nombres de instrumento.

Las notas de adorno en el punto final de la región no se incluyen.

Las regiones pueden abarcar varios sistemas. En este caso, se generan varios archivos EPS.

#(ly:set-option 'clip-systems)
#(ly:set-option 'separate-page-formats "ps")
#(define output-suffix "1")

origScore = \score {
  \relative c' {
    \new Staff \with { instrumentName = "Instrument" }
    c1
    d1
    \grace c16 e1
    \key d \major
    f1 \break
    \clef bass
    g,1
    fis1
  }
}

\book {
  \score {
    \origScore
    \layout {
      % Each clip-region is a (START . END) pair
      % where both are rhythmic-locations.

      % (make-rhythmic-locations BAR-NUMBER NUM DEN)
      % means NUM/DEN whole-notes into bar numbered BAR-NUMBER

      clip-regions = #(list
      (cons
       (make-rhythmic-location 2 0 1)
       (make-rhythmic-location 4 0 1))

      (cons
       (make-rhythmic-location 0 0 1)
       (make-rhythmic-location 4 0 1))

      (cons
       (make-rhythmic-location 0 0 1)
       (make-rhythmic-location 6 0 1))
      )
    }
  }
}

#(ly:set-option 'clip-systems #f)
#(ly:set-option 'separate-page-formats #f)
#(define output-suffix #f)

\book {
  \score { \origScore }
  \markup { \bold \fontsize #6 clips }
  \score {
    \lyrics {
      \markup { from-2.0.1-to-4.0.1-clip.eps }
      \markup {
        \epsfile #X #30.0 #(format #f "~a-1-from-2.0.1-to-4.0.1-clip.eps"
                            (ly:parser-output-name)) }
    }
  }
}