\version "1.9.0" % JUNKME. %% deprecated papersizename = \papersize % DO NOT change this without fixing -f ps output papersize = \papersize % FIXME % direct PostScript line height for single line staves lineheight = 14 paperfile = \papersize + "-init.ly" % paperfile = "a4-init.ly" \include \paperfile \include "paper-init.ly" staffspace = #(/ staffheight 4.0) linethickness = #(/ staffspace 10.0) outputscale = #(/ staffheight 4.0) ledgerlinethickness = #(* 2.0 linethickness) % blotdiameter = 0.4 \pt blotdiameter = 0.04 \pt interscoreline = 4. \mm \translator { \NoteNamesContext } \translator { \ScoreContext } \translator { \ChoirStaffContext} \translator { \InnerChoirStaffContext} \translator { \RhythmicStaffContext} \translator { \StaffContext } \translator { \VoiceContext} \translator { \StaffGroupContext } \translator { \InnerStaffGroupContext } \translator { \ChordNamesContext } \translator { \GrandStaffContext} \translator { \LyricsContext } \translator { \ThreadContext} \translator { \PianoStaffContext} \translator { \LyricsVoiceContext } \translator { \StaffContainerContext } \translator { \FiguredBassContext } \translator { \TabStaffContext } \translator { \TabVoiceContext } \translator { \VaticanaStaffContext } \translator { \VaticanaVoiceContext } \translator { \GregorianTranscriptionStaffContext } \translator { \GregorianTranscriptionVoiceContext } %% %% TODO: baseline-skip, word-space should come from the font. %% #(define font-defaults '((font-family . music) (font-relative-size . 0) (font-shape . upright) (baseline-skip . 2) (word-space . 0.6) (font-series . medium) )) #(define style-alist '((finger . ((font-family . number) (font-relative-size . -3))) (volta . ((font-family . number) (font-relative-size . -2))) (tuplet . ((font-family . roman) (font-shape . italic) (font-relative-size . -1))) (timesig . ((font-family . number) )) (timesig-symbol . ((font-family . music) )) (mmrest . ((font-family . number) )) (mmrest-symbol . ((font-family . music) )) (mark-number . ((font-family . number) (font-relative-size . 1))) (mark-letter . ((font-family . roman) (font-series . bold) (font-shape . upright) (font-relative-size . 2))) (script . ((font-family . roman) (font-relative-size . -1))) (large . ((font-family . roman) (font-relative-size . 1))) (Large . ((font-series . bold) (font-family . roman) (font-relative-size . 2))) (dynamic . ((font-family . dynamic) (font-relative-size . 0))) )) #(define properties-to-font Font_interface::properties_to_font_name) #(define markup-to-properties markup-to-properties) #(define abbreviation-alist '((columns . ((axis . 0))) (lines . ((axis . 1))) (roman . ((font-family . roman))) (music . ((font-family . music) (lookup . name))) (finger . ((font-style . finger))) (bold . ((font-series . bold))) (upright . ((font-shape . upright))) (italic . ((font-shape . italic))) (named . ((lookup . name))) (overstrike . ((extent . (0 . 0)))) (super . ((raise . 1) (font-relative-size . -1) (extent . (0 . 0)))) (sub . ((raise . -1) (font-relative-size . -1) (extent . (0 . 0)))) (text . ((lookup . value))) ) )