1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
|
/*
* This file is part of abc2ps,
* Copyright (C) 1996,1997,1998 Michael Methfessel
* See file abc2ps.c for details.
*/
/* Global style parameters for the note spacing and Knuthian glue. */
/* Parameters here are used to set spaces around notes.
Names ending in p: prefered natural spacings
Names ending in x: expanded spacings
Units: everything is based on a staff which is 24 points high
(ie. 6 pt between two staff lines). */
/* name for this set of parameters */
#define STYLE "std"
/* ----- set_style_pars: set the parameters which control note spacing ---- */
void set_style_pars (strictness)
float strictness;
{
float y;
f0p=0.10; f0x=0.15;
f5p=0.60; f5x=0.7;
f1p=1.0; f1x=1.0;
lnnp=40; lnnx=90;
bnnp=1.0; bnnx=1.0;
fnnp=1.0; fnnx=1.0;
lbnp=30; lbnx=50;
bbnp=0.2; bbnx=0.2;
rbnp=0.12; rbnx=0.10;
lnbp=30; lnbx=55;
bnbp=0.9; bnbx=0.9;
rnbp=0.10; rnbx=0.1;
/* set parameters f0p,f1p according to strictness */
/* the y*y makes the scale a bit more intuitive .. */
y=1-strictness;
f0p=y*y*0.40;
f0x=y*y*0.60;
if (verbose>3)
printf ("Set style parameters, strictness %.2f (f0p=%.3f, f0x=%.3f)\n",
strictness,f0p,f0x);
}
/* ----- Function of the spacing parameters ----- */
/* Parameters for the length-to-width mapping:
f0p, f5p, f1p are the return values for notes of zero duration,
half notes, and whole notes. A parabolic interpolation is
used for other note durations. The purpose is to allow a non-linear
relation between the note duration and the spacing on the paper.
Parameters for the note-note spacing:
(the internote spacing between two notes that follow
each other without a bar in between.)
- lnn is an overall multiplier, i.e. the final note width in points
is the return value of function nwid times lnn.
- bnn determines how strongly the first note enters into the spacing.
For bnn=1, the spacing is calculated using the first note.
For bnn=0, the spacing is the average for the two notes.
- fnn multiplies the spacing under a beam, to compress the notes a bit
Parameters for the bar-note spacing:
(the spacing between a bar and note at the measure start.)
- lbn is the overall multiplier for the return values from nwid.
- rbn is the note duration which defines the default spacing.
- bbn determines how strongly the note duration enters into the spacing.
For bbn=1, the spacing is lbn times the return value of nwid.
For bbn=0, the spacing is lbn times the width of rbn times timesig.
Parameters for the note-bar spacing:
(the spacing between a note at the measure end and the bar.)
- lnb is the overall multiplier for the return values from nwid.
- rnb is the note duration which defines the default spacing.
- bnb determines how strongly the note duration enters into the spacing.
For bnb=1, the spacing is lnb times the return value of nwid.
For bnb=0, the spacing is lnb times the width of rbn times timesig. */
|
