microtherion/VocalEasel
1
0
Fork 0
mirror of https://github.com/microtherion/VocalEasel.git synced 2024-12-22 11:14:00 +00:00
Code Issues Packages Projects Releases Wiki Activity

Add Lilypond 2.14 spacing model

Browse Source
This commit is contained in:
Matthias Neeracher 2011-07-24 03:32:43 +00:00
parent d55ba65c0c
commit b054c8f82d
5 changed files with 1936 additions and 632 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2505
English.lproj/VLDocument.xib
View File

File diff suppressed because it is too large Load Diff

17
Resources/Templates/default.lyt
View File

@ -1,4 +1,4 @@
\version "2.8.0" \version "2.14.0"
\header { \header {
title = "<{TITLE}>" title = "<{TITLE}>"
@ -12,10 +12,23 @@
#(set-paper-size <{PAPERSIZE}>) #(set-paper-size <{PAPERSIZE}>)
indent = 0.0\cm indent = 0.0\cm
pagenumber = no pagenumber = no
page-top-space = #.1 top-markup-spacing #'padding = #<{TOPPADDING}>
markup-system-spacing #'padding = #<{TITLEPADDING}>
system-system-spacing #'padding = #<{STAFFPADDING}>
<{FORMATTING}> <{FORMATTING}>
} }
\layout {
\context {
\ChordNames
\override VerticalAxisGroup #'nonstaff-relatedstaff-spacing #'padding = #<{CHORDPADDING}>
}
\context {
\Lyrics
\override VerticalAxisGroup #'nonstaff-relatedstaff-spacing #'padding = #<{LYRICPADDING}>
}
}
#(set-global-staff-size <{STAFFSIZE}>) #(set-global-staff-size <{STAFFSIZE}>)
% %
% Rather than write a principled formatting procedure, we just define special cases for % Rather than write a principled formatting procedure, we just define special cases for

5
Sources/VLDocument.h
View File

@ -48,6 +48,11 @@ enum {
float chordSize; float chordSize;
float lyricSize; float lyricSize;
float staffSize; float staffSize;
float topPadding;
float titlePadding;
float staffPadding;
float chordPadding;
float lyricPadding;
int playElements; int playElements;
NSString * tmpPath; NSString * tmpPath;
NSFileWrapper * vcsWrapper; NSFileWrapper * vcsWrapper;

5
Sources/VLDocument.mm
View File

@ -84,6 +84,11 @@
chordSize = 6.0f; chordSize = 6.0f;
lyricSize = 0.0f; lyricSize = 0.0f;
staffSize = 20.0f; staffSize = 20.0f;
topPadding = 2.0f;
titlePadding = 4.0f;
staffPadding = 3.0f;
chordPadding = 1.5f;
lyricPadding = 1.0f;
playElements = kVLPlayAccompaniment|kVLPlayMelody|kVLPlayCountIn; playElements = kVLPlayAccompaniment|kVLPlayMelody|kVLPlayCountIn;
sheetWin = nil; sheetWin = nil;
pdfWin = nil; pdfWin = nil;

10
Sources/VLLilypondDocument.mm
View File

@ -165,6 +165,16 @@ static const char * sPaperNames[] = {
[NSString stringWithFormat:@"%f", lyricSize]]; [NSString stringWithFormat:@"%f", lyricSize]];
[ly substituteMacro:@"STAFFSIZE" withValue: [ly substituteMacro:@"STAFFSIZE" withValue:
[NSString stringWithFormat:@"%f", staffSize*scaling]]; [NSString stringWithFormat:@"%f", staffSize*scaling]];
[ly substituteMacro:@"TOPPADDING" withValue:
[NSString stringWithFormat:@"%f", topPadding]];
[ly substituteMacro:@"TITLEPADDING" withValue:
[NSString stringWithFormat:@"%f", titlePadding]];
[ly substituteMacro:@"STAFFPADDING" withValue:
[NSString stringWithFormat:@"%f", staffPadding]];
[ly substituteMacro:@"CHORDPADDING" withValue:
[NSString stringWithFormat:@"%f", chordPadding]];
[ly substituteMacro:@"LYRICPADDING" withValue:
[NSString stringWithFormat:@"%f", lyricPadding]];
[ly substituteMacro:@"CHORDS" withValue: [ly substituteMacro:@"CHORDS" withValue:
[NSString stringWithUTF8String:writer.Chords().c_str()]]; [NSString stringWithUTF8String:writer.Chords().c_str()]];
[ly substituteMacro:@"NOTES" withValue: [ly substituteMacro:@"NOTES" withValue: