3 %% < 1.8 compatibility switch
4 #(ly:set-option 'old-relative)
7 breve = #(ly:make-duration -1 0)
8 longa = #(ly:make-duration -2 0 )
9 maxima = #(ly:make-duration -3 0)
11 \include "music-functions-init.ly"
13 %% default note names are dutch
14 \include "nederlands.ly"
16 \include "drumpitch-init.ly"
17 \include "chord-modifiers-init.ly"
18 \include "script-init.ly"
20 % declarations for standard directions
32 %% should also set allowBeamBreak, but how to do it "portably"? (ie. also
33 %% working with lyric sections)
35 %% try \once \set Score.allowBeamBreak = ##t
37 %% rather name \newline, \pageBreak ?
38 break = #(make-event-chord (list (make-penalty-music -10001 0)))
39 noBreak = #(make-event-chord (list (make-penalty-music 10001 0)))
40 pageBreak = #(make-event-chord (list (make-penalty-music -10001 -10001)))
41 noPageBreak = #(make-event-chord (list (make-penalty-music 0 10001)))
43 noBeam = #(make-music 'BeamForbidEvent)
44 pipeSymbol = #(make-music 'BarCheck)
48 \include "scale-definitions-init.ly"
50 melisma = #(make-span-event 'ManualMelismaEvent START)
51 melismaEnd = #(make-span-event 'ManualMelismaEvent STOP)
53 \include "grace-init.ly"
54 \include "midi-init.ly"
55 \include "book-paper-defaults.ly"
58 mm = #(ly:output-def-lookup $defaultbookpaper 'mm)
59 unit = #(ly:output-def-lookup $defaultbookpaper 'unit)
65 \include "engraver-init.ly"
69 #(set-default-paper-size "a4")
72 partCombineListener = \paper {
75 \consists Note_heads_engraver
76 \consists Rest_engraver
77 \type "Recording_group_engraver"
78 recordEventSequence = #notice-the-events-for-pc
86 #(set-part-combine-listener partCombineListener)
88 \include "dynamic-scripts-init.ly"
89 \include "spanners-init.ly"
90 \include "property-init.ly"
92 setDefaultDurationToQuarter = { c4 }
94 %% MAKE-HASH-TABLE in GUILE 1.6 takes mandatory size parameter.
95 #(define musicQuotes (make-hash-table 29))
97 #(define toplevel-book-handler ly:parser-print-book)
98 #(define toplevel-music-handler collect-music-for-book)
99 #(define toplevel-score-handler collect-scores-for-book)