[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
pb de grid
From: |
Daniel Cartron |
Subject: |
pb de grid |
Date: |
Sun, 12 Oct 2008 15:28:09 +0200 |
User-agent: |
KMail/1.9.9 |
J'ai voulu essayer ce truc pour noter la pulsation des morceaux que mon fiston
travaille mais ça n'est pas facile au niveau mise en page. Après des jours de
tâtonnement je soumet le pb à votre sagacité. Comment faire pour que le
fichier joint sorte sur une seule page ?
Merci d'avance pour Mathurin (mon fiston)...
\include "italiano.ly"
\header
{
title = "Yankee Doodle"
subtitle = ""
% meter = ""
composer = "Traditionnel"
% arranger = ""
tagline = " "
}
\layout {
\context {
\Staff
\consists "Grid_point_engraver"
gridInterval = #(ly:make-moment 1 4)
%% lines length
\override GridPoint #'Y-extent = #'(7 . 0)
}
\context {
\StaffGroup
\remove "System_start_delimiter_engraver"
}
}
\layout {
}
\new Score
\with {
\consists "Grid_line_span_engraver"
%% centers grid lines horizontally below noteheads
\override NoteColumn #'X-offset = #-0.5
}
\new ChoirStaff <<
\new Staff
\relative sol'
{
\clef treble
\key sol \major
\set Staff.explicitKeySignatureVisibility = #end-of-line-invisible
\time 4/4
%\tempo 4=100
\partial 4
r4
\bar "||"
sol\segno sol re fad
sol re fad r
sol sol re sol
sol si re,2\break
sol4 sol fad fa
mi sol do,2
re1
sol2 sol^Fin\break
\bar "||"
mi'4 fad mi re
mi fad sol2
re4 mi re do
si do re2\break
mi4 fad mi re
mi fad sol fad
re sol fad la
sol r sol8 r r4\segno
\bar "|."
}
\new Staff
{
%% making sure the lines will be placed outside the Staff
\override Score.GridLine #'extra-offset = #'( 0.0 . -4.0 )
%% hides staff and notes so that only the grid lines are visible
\override NoteHead #'transparent = ##t
\override NoteHead #'no-ledgers = ##t
\override Stem #'transparent = ##t
\override Beam #'transparent = ##t
\override Staff.BarLine #'transparent = ##t
\override Staff.StaffSymbol #'line-count = #0
\override Staff.TimeSignature #'transparent = ##t
\override Staff.Clef #'transparent = ##t
% you have to put 'dummy' notes here to force regular grid spacing...
\partial 4
do4
\repeat unfold 16
{
% \once \override Score.GridLine #'thickness = #3.0
do4 do do do
% \once \override Score.GridLine #'thickness = #0.0
% shdo4 do4
}
}
>>
#(define myStaffSize 14) % changez cette valeur à votre convenance
#(set-global-staff-size myStaffSize)
\paper {
paper-width = 171\mm
paper-height = 95\mm
line-width = 160\mm
#(define fonts
(make-pango-font-tree "Liberation Sans"
"Liberation Sans"
"Liberation Mono"
(/ myStaffSize 20)
)
)
}
\version "2.11.59"
--
Cordialement, Daniel Cartron
« Le public, c'est les autres. »
François Cavanna - 4 rue Choron
- pb de grid,
Daniel Cartron <=