[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Notation ancienne ?
|
From: |
joel . gauvrit |
|
Subject: |
Re: Notation ancienne ? |
|
Date: |
Sat, 2 Feb 2019 14:56:18 +0100 (CET) |
Bonjour à Monteverdi et bonjour à tous,
Voilà ma bidouille :
\version "2.18.2"
#(set-global-staff-size 19)
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
floatMarkup = #(define-music-function (parser location posx posy) (number?
number?)
#{
%% Usage: \floatMarkup #'1 #'4 c1^\markup_perso (par exemple)
%% On règle la propriété outside-staff-priority sur FAUX.
C'est cette propriété
%% qui empêche d'écrire dans la portée si elle est règlée
sur VRAI
\once \override TextScript.outside-staff-priority = ##f
%% On règle la position sur l'axe horizontal. On peut donner
un nombre réel aussi 3.265 p.e :
\once \override TextScript.X-offset = $posx
%% On règle l'axe vertical de la même façon :
\once \override TextScript.Y-offset = $posy
#})
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\header {
tagline = ##f
}
%%%% PAPER
\paper {
ragged-last-bottom = ##f
ragged-bottom = ##f
system-count = 1
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\score {
<<
\new ChoirStaff \with {
\accepts MensuralStaff
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
{
<<
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\new MensuralStaff = "Clarino"
\with {
\override Custos.neutral-position = #8
\override StaffSymbol.staff-space = #1.2
\override Custos #'style = #'mensural }
%===========================================
{\new MensuralVoice = "Clarino"
{ \hide Score.BarNumber
\clef "mensural-g"
\omit Staff.TimeSignature
\override NoteHead #'style = #'petrucci
\set Timing.measureLength = #(ly:make-moment 2/1 )
\relative c''
{
\once \textLengthOn \floatMarkup #'-2.5 #'0
b2\rest^\markup { \fontsize #1 \musicglyph #"timesig.mensural44" }
b4\rest c16 d e f g8.^\markup \center-align "Clarino." g16 f8. f16
e8. e16 d8. d16
c2 b2\rest b4\rest c16 d e f g2
s4^\markup \bold "." e8 f g4 e8 f g4 e8 f g4 e8 f
g4 g g2. f16 e f e f e f e d8 c
}
}
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\new MensuralStaff = "Quinta"
\with {
\override Custos.neutral-position = #8
\override StaffSymbol.staff-space = #1.2
\override Custos #'style = #'mensural }
%===========================================
{\new MensuralVoice = "Quinta"
{ \hide Score.BarNumber
\clef "mensural-c1"
\omit Staff.TimeSignature
\override NoteHead #'style = #'petrucci
\set Timing.measureLength = #(ly:make-moment 2/1 )
\relative c''
{
\once\textLengthOn \floatMarkup #'-2.5 #'0
b2\rest^\markup { \fontsize #1 \musicglyph #"timesig.mensural44" }
b4\rest c8 c g1^\markup \center-align "Quinta."
e4 c g'2\rest g8 g g4 e8 e e4
g8 g g4 e8 e e4 c'8 c c4 g8 g g4
e4 c e2\rest g16 g g g g4 e16 e e e e4
}
}
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\new MensuralStaff = "Alto & basso"
\with {
\override Custos.neutral-position = #8
\override StaffSymbol.staff-space = #1.2
\override Custos #'style = #'mensural }
%===========================================
{\new MensuralVoice = "Alto & basso"
{ \hide Score.BarNumber
\clef "mensural-c2"
\omit Staff.TimeSignature
\override NoteHead #'style = #'petrucci
\set Timing.measureLength = #(ly:make-moment 2/1 )
\relative c'
{
\once\textLengthOn \floatMarkup #'-2.5 #'0
e2\rest^\markup { \fontsize #1 \musicglyph #"timesig.mensural44" }
e4\rest e c16^\markup \center-align "Alto & basso." c c c g4 c16
c c c g4
c16 c c c g4 c16 c c c c4 g c c g c c g c c g c2
e4\rest e c16 c c c g4 c16 c c c g4 c16 c c c c4
}
}
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\new MensuralStaff = "Vulgano"
\with {
\override Custos.neutral-position = #8
\override StaffSymbol.staff-space = #1.2
\override Custos #'style = #'mensural }
%===========================================
{\new MensuralVoice = "Vulgano"
{ \hide Score.BarNumber
\clef "mensural-c3"
\omit Staff.TimeSignature
\override NoteHead #'style = #'petrucci
\set Timing.measureLength = #(ly:make-moment 2/1 )
\relative c'
{
\once\textLengthOn \floatMarkup #'-2.5 #'0
g1^\markup { \fontsize #1 \musicglyph #"timesig.mensural44" }
g^\markup \center-align "Vulgano."
g g
g g
g g
}
}
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\new MensuralStaff = "Basso"
\with {
\override Custos.neutral-position = #8
\override StaffSymbol.staff-space = #1.2
\override Custos #'style = #'mensural }
%===========================================
{\new MensuralVoice = "Basso"
{ \hide Score.BarNumber
\clef "mensural-c4"
\omit Staff.TimeSignature
\override NoteHead #'style = #'petrucci
\set Timing.measureLength = #(ly:make-moment 2/1 )
\relative c
{
\once\textLengthOn \floatMarkup #'-2.5 #'0
c1^\markup { \fontsize #1 \musicglyph #"timesig.mensural44" }
c^\markup \center-align "Basso."
c c
c c
c c
}
}
}
>>
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
>>
\layout {
indent = #0
ragged-last = ##f
\override Staff.BarLine.transparent = ##f
\override Staff.Slur.transparent = ##f
\set Timing.defaultBarType = "|"
\context {
\Score
\override Rest.font-size = 1.5
}
\context {
\Staff
\override Staff.Custos.neutral-position = #8
}
}
}
----- Mail original -----
De: "Monteverdi" <address@hidden>
À: address@hidden
Envoyé: Vendredi 1 Février 2019 23:35:54
Objet: Notation ancienne ?
Bonjour,
Y a-t-il moyen de reproduire la notation du début du XVIIe siècle, comme
p.ex. sur la partition ci-jointe (toccata de l'Orfeo de Monteverdi) ?
• têtes de notes en forme de losange, avec les queues qui partent du milieu
de la note et pas du côté (ça, la fonte "Petrucci" le fait à peu près, mais
les têtes n'ont pas tout à fait la bonne forme)
• croches avec des crochets fermés
• doubles croches comme les croches avec une petite queue en plus (on ne
rigole pas !) sur le crochet
• blanche pointée à cheval sur la barre de mesure (blanche d'un côté, point
de l'autre) plutôt que blanche liée à une noire ; on retrouve aussi une
blanche coupée au milieu par la barre de mesure chez Rameau plutôt que 2
noires liées de part et d'autre de la barre
• mesure en C comportant 8 temps
<http://lilypond-french-users.1298960.n2.nabble.com/file/t395719/Monteverdi_-_Orfeo_Toccata.jpg>
Merci.
--
Sent from: http://lilypond-french-users.1298960.n2.nabble.com/
_______________________________________________
liste de diffusion lilypond-user-fr
address@hidden
https://lists.gnu.org/mailman/listinfo/lilypond-user-fr