[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
page de couverture
From: |
Christian LE BARS |
Subject: |
page de couverture |
Date: |
Thu, 31 Aug 2017 08:44:20 +0200 |
User-agent: |
Mozilla/5.0 (X11; Linux x86_64; rv:52.0) Gecko/20100101 Thunderbird/52.2.1 |
bonjour,
ci dessous un code pour écrire une page de couverture, qui me convient
presque!
j'aimerai l' écrire en musejazz est-ce possible?
Par avance merci
christian
\version "2.19.27"
\include "lilyjazz.ily"
Compositeur = "Johannes Brahms"
Dates = "1833-1897"
Titre = "Serenade Nr. 1"
FromRecueil = ""
InfoRecueil = "Op. 11"
DateRecueil = "1857"
SousTitre = "Conservatoire Eaubonne"
%%% Commandes markup pour la page de couverture
% Titre du recueil
#(define-markup-command (couv_recueil_settings layout props name) (string?)
(interpret-markup layout props (markup #:abs-fontsize 36
#:medium name)))
% Info supplémentaire sur le recueil
#(define-markup-command (couv_infoRecueil_settings layout props name)
(string?)
(interpret-markup layout props (markup #:abs-fontsize 16
#:medium name)))
% Date du recueil
#(define-markup-command (couv_dateRecueil_settings layout props name)
(string?)
(interpret-markup layout props (markup #:abs-fontsize 16
#:medium name)))
% From recueil
#(define-markup-command (couv_fromRecueil_settings layout props name)
(string?)
(interpret-markup layout props (markup #:abs-fontsize 20
#:medium name)))
% Titre du morceau
#(define-markup-command (couv_title_settings layout props name) (string?)
(interpret-markup layout props (markup #:abs-fontsize 36
#:medium #:caps name)))
% Sous-titre du morceauhttp://lsr.di.unimi.it/LSR/Item?id=368
#(define-markup-command (couv_subtitle_settings layout props name) (string?)
(interpret-markup layout props (markup #:abs-fontsize 16
#:italic #:medium name)))
% Compositeur
#(define-markup-command (couv_compositeur_settings layout props name)
(string?)
(interpret-markup layout props (markup #:abs-fontsize 28 name)))
% Dates du compositeur
#(define-markup-command (couv_datesCompositeur_settings layout props
name) (string?)
(interpret-markup layout props (markup #:abs-fontsize 20 name)))
%-------------------------------------------------------
couvfromRecueil = \markup \couv_fromRecueil_settings #FromRecueil
couvinfoRecueil = \markup \couv_infoRecueil_settings #InfoRecueil
couvdateRecueil = \markup \couv_dateRecueil_settings #DateRecueil
couvTitre = \markup \couv_title_settings #Titre
couvSoustitre = \markup \couv_subtitle_settings #SousTitre
couvCompositeur = \markup \couv_compositeur_settings #Compositeur
couvDates = \markup \couv_datesCompositeur_settings #Dates
%-----------------------------------------------------------------
CouvSettings =
\paper
{
bookTitleMarkup =
\markup
{
\column
{
\fill-line { \lower #25 \couvCompositeur }
\fill-line { \lower #6 \couvDates }
\fill-line { \lower #11 \draw-line #'(30 . 0) }
\fill-line { \lower #18 \couvTitre }
\fill-line { \lower #10 \couvfromRecueil }
\fill-line { \lower #4 \couvinfoRecueil }
\fill-line { \lower #3 \draw-line #'(5 . 0) }
\fill-line { \lower #5 \couvdateRecueil }
\fill-line { \lower #14 \draw-line #'(30 . 0) }
\fill-line { \lower #20 \couvSoustitre }
}
}
}
%------------------------------------------------------------------------
\book
{
\markup { \null }
\paper { \CouvSettings } \pageBreak
\score
{ c'' }}
- page de couverture,
Christian LE BARS <=