input/regression/bar-extent.ly

   1 \header {
   2    texidoc = "Bar line extent can be customised and the customised value
   3    must be respected when staff symbol is changed temporarily (e.g. to
   4    simulate ledger lines of renaissance prints and manuscripts);
   5    moreover, span bars should not enter the staves."
   6 }
   7
   8
   9 \version "2.13.48"
  10
  11 ledgerUp =
  12 {
  13   s2
  14   \stopStaff
  15   \override Staff.StaffSymbol #'line-positions = #'(-4 -2 0 2 4 6)
  16   \startStaff
  17   s2
  18   \noBreak
  19   s2
  20   \stopStaff
  21   \revert Staff.StaffSymbol #'line-positions
  22   \startStaff
  23   s2
  24 }
  25
  26 ledgerDown =
  27 {
  28   s2
  29   \stopStaff
  30   \override Staff.StaffSymbol #'line-positions = #'(-6 -4 -2 0 2 4)
  31   \startStaff
  32   s1
  33   \stopStaff
  34   \revert Staff.StaffSymbol #'line-positions
  35   \startStaff
  36   s2
  37 }
  38
  39 \new StaffGroup
  40 <<
  41   \new Staff \with
  42   {
  43     \override BarLine #'bar-extent = #'(-1 . 1.5)
  44   }
  45   {
  46     \ledgerUp \ledgerDown
  47     s1*4
  48     s1*4
  49     \ledgerUp \ledgerDown
  50     \ledgerUp \ledgerDown
  51     \ledgerUp \ledgerDown
  52     \ledgerUp \ledgerDown
  53     s1*4
  54     s1*4
  55   }
  56
  57   \new Staff \with
  58   {
  59     \override BarLine #'bar-extent = #'(0 . 0)
  60   }
  61   {
  62     s1*4
  63     s1*4
  64     \ledgerUp \ledgerDown
  65     \ledgerUp \ledgerDown
  66     \ledgerDown \ledgerUp
  67     s1*4
  68     s1*4
  69     \ledgerUp \ledgerDown
  70     \ledgerUp \ledgerDown
  71   }
  72
  73   \new Staff \with
  74   {
  75     \override BarLine #'bar-extent = #'(-2 . 0)
  76   }
  77   {
  78     s1*4
  79     \ledgerUp \ledgerDown
  80     s1*4
  81     s1*4
  82     s1*4
  83     \ledgerUp \ledgerDown
  84     \ledgerDown \ledgerUp
  85     \ledgerUp \ledgerDown
  86     \ledgerDown \ledgerUp
  87   }
  88 >>