ly/declarations-init.ly

   1 #(ly:set-option 'old-relative)
   2
   3 \version "1.9.8"
   4 breve = #(ly:make-duration -1 0)
   5 longa = #(ly:make-duration -2 0 )
   6 maxima = #(ly:make-duration -3 0)
   7
   8 \include "nederlands.ly"                % dutch
   9 \include "chord-modifiers-init.ly"
  10 \include "script-init.ly"
  11
  12 % declarations for standard directions
  13 left = -1
  14 right = 1
  15 up = 1
  16 down = -1
  17 start = -1
  18 stop = 1
  19 smaller = -1
  20 bigger = 1
  21 center=0
  22
  23 %{
  24
  25 should also set allowBeamBreak, but how to do it "portably"? (ie. also
  26 working with lyric sections)
  27
  28 %}
  29 break =#(make-event-chord (list (make-penalty-music -10001)))
  30 noBreak =  #(make-event-chord (list (make-penalty-music 10001)))
  31
  32 \include "scale-definitions-init.ly"
  33
  34 melisma = \property Staff.melismaBusy = ##t
  35 melismaEnd = \property Staff.melismaBusy = ##f
  36
  37
  38 \include "grace-init.ly"
  39
  40 % ugh
  41 \include "midi-init.ly"
  42
  43
  44 % Do units first; must be done before any units are specified.
  45 \paper {
  46     unit = "mm"
  47     mm = 1.0
  48     in = 25.4
  49     pt = #(/  in 72.27)
  50     cm = #(* 10 mm)
  51
  52     texsetting = ""
  53     pssetting = ""
  54     scmsetting = "(lilyponddefs.ps) findlibfile {exch pop //systemdict /run get exec} { /undefinedfilename signalerror } ifelse\n"% UGH.
  55
  56
  57     #(define font-defaults
  58       '((font-family . music)
  59         (font-shape . upright)
  60         (baseline-skip . 2)
  61         (word-space . 0.6)
  62         (font-series . medium)
  63     ))
  64
  65     \include "engraver-init.ly"
  66 }
  67
  68
  69 %{
  70
  71 ; note:
  72 ; you can add fonts manually  in the paper block by issuing
  73
  74 #(set! fonts (append ...myfonts... fonts))
  75
  76 for the format of myfonts, see font.scm
  77
  78 %}
  79
  80
  81 paperEleven = \paper {
  82     #(paper-set-staff-size (* 11.0 pt))
  83 }
  84
  85 paperThirteen = \paper {
  86     #(paper-set-staff-size (* 13.0 pt))
  87 }
  88
  89 paperSixteen = \paper {
  90     #(paper-set-staff-size (* 16.0 pt))
  91 }
  92
  93 paperEightteen = \paper {
  94     #(paper-set-staff-size (* 18.0 pt))
  95 }
  96
  97 paperTwenty = \paper {
  98     #(paper-set-staff-size (* 20.0 pt))
  99 }
 100
 101 paperTwentythree = \paper {
 102     #(paper-set-staff-size (* 23.0 pt))
 103 }
 104
 105 paperTwentysix = \paper {
 106     #(paper-set-staff-size (* 26.0 pt))
 107 }
 108
 109 \paper { \paperTwenty }
 110 #(set-paper-size "a4")
 111
 112 \include "dynamic-scripts-init.ly"
 113 \include "spanners-init.ly"
 114
 115 \include "property-init.ly"
 116
 117
 118
 119 % reset default duration
 120 unusedEntry = \notes { c4 }
 121
 122 % music = "\melodic\relative c"
 123