Re: Fragment with broken/torn/shredded staff lines

[Mark Polesky]

Piero,

This should be closer to what you want, but I need to emphasize that
it's not finished yet. It *is* possible to randomize the staff-line
tear-lengths; hopefully I'll have time to work on that a little 
later. But I figured I'd send off what I have so far. For now, only
the top 2 variables are modifiable:

rightTearWidth = #2
rightTearList = #'(1 3 2 2 0)

Hope this helps!
- Mark

_____________________________________________________________________


\version "2.12.0"

rightTearWidth = #2
rightTearList = #'(1 3 2 2 0) % (any 5 numbers from 0-4)

rTW = #rightTearWidth
qRTW = #(/ rTW 4)
rTL = #rightTearList
rTyE = #'(1.5 . 2.5)

rightTear = {
  \once \override Staff.BarLine #'stencil = #ly:text-interface::print
  \once \override Staff.BarLine #'text = \markup 
    \override #'(baseline-skip . 0) \with-color #white
    \column {
      \filled-box #`(,(* (list-ref rTL 0) qRTW) . ,rTW) \rTyE #0
      \filled-box #`(,(* (list-ref rTL 1) qRTW) . ,rTW) \rTyE #0
      \filled-box #`(,(* (list-ref rTL 2) qRTW) . ,rTW) \rTyE #0
      \filled-box #`(,(* (list-ref rTL 3) qRTW) . ,rTW) \rTyE #0
      \filled-box #`(,(* (list-ref rTL 4) qRTW) . ,rTW) \rTyE #0
    }
  \once \override Staff.BarLine #'X-extent = #`(0 . ,(- rTW 0.1))
  \break
}

\score {
  \relative {
    \repeat unfold 4 { g'4 d' b d } \break \rightTear
    \repeat unfold 4 { g,4 d' b d } \break \rightTear
  }
  \layout {
    ragged-right = ##t
  }
}