ly- -> ly:

[lilypond.git] / ly / params-init.ly

diff --git a/ly/params-init.ly b/ly/params-init.ly
index 64fe88deee89605bde5e3865b0b2eccb52c6882b..8e144cc9a762f6ca62ebb3a95511c9ae7efd061b 100644 (file)
--- a/ly/params-init.ly
+++ b/ly/params-init.ly
@@ -1,14 +1,14 @@
-\version "1.3.146"
+\version "1.5.68"
 % JUNKME.
 
 %% deprecated
 papersizename = \papersize 
 
-% ly2dvi now uses `papersize' internally (and on cmd line)
+% DO NOT change this without fixing -f ps output
 papersize = \papersize
 
 % FIXME
-% direct PostScript line height for single line staffs
+% direct PostScript line height for single line staves
 lineheight = 14
 
 paperfile = \papersize + "-init.ly"
@@ -18,9 +18,18 @@ paperfile = \papersize + "-init.ly"
 \include \paperfile
 \include "paper-init.ly"
 
-staffspace = \staffheight / 4.0
-stafflinethickness = \staffspace / 10.0
-outputscale = \staffheight / 4.0
+unit = "mm"
+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 }
@@ -39,8 +48,57 @@ outputscale = \staffheight / 4.0
 \translator { \PianoStaffContext}
 \translator { \LyricsVoiceContext }
 \translator { \StaffContainerContext }
+\translator { \FiguredBassContext }
+\translator { \TabStaffContext }
+\translator { \TabVoiceContext }
+
 
 
+#(define font-defaults
+      '((font-family . music)
+       (font-relative-size . 0)
+       (font-shape . upright)
+       (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)))
+       )
+     )