X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Ftest%2Ftitle-markup.ly;h=ea38f9e9b15956842cf5261b5ee57ec2598ceb08;hb=fdf32024a6ab7ec992490ed567f9cd3edeff21ff;hp=08122870c05a76b327dcbed2e9b111b6616c2ad1;hpb=77a46f6837481b568a0942e6e9ba26787900ed84;p=lilypond.git

diff --git a/input/test/title-markup.ly b/input/test/title-markup.ly
index 08122870c0..ea38f9e9b1 100644
--- a/input/test/title-markup.ly
+++ b/input/test/title-markup.ly
@@ -1,69 +1,88 @@
-\version "2.1.28"
+\version "2.1.30"
 %{
-   \markup in titles is WIP, only available in direct PostScript output
-   process and view this file doing:
+   Experimental markup titles are available in direct PostScript output:
 
-     lilypond-bin -fps title-markup.ly
-     export GS_LIB=$(pwd)/mf/out:/usr/share/texmf/fonts/type1/bluesky/cm
-     gs title-markup.ps
+   export GS_LIB=$(pwd)/mf/out:/usr/share/texmf/fonts/type1/bluesky/cm
+   lilypond-bin -fps input/title/title-markup.ly
 
+%}
 
-FIXME: use conditionals in  \makeTitle:
-
-#(define (my-ly-version)
-    (list-head (ly:version) 3))
-
-#(if (not (defined? 'pieceTagLine))
-    (define pieceTagLine (string-append "Jeremie " (numbers->string (my-ly-version)) " was here")))
-
-\header{
-tagline = \pieceTagLine
-texidoc = "
+\paper{
+	#(define page-breaking ly:optimal-page-breaks)
+}
 
-%}
+latinTest = \markup { \latin-i "Hellö" }
+    
+sizeTest = \markup {
+	\column <
+            { \normalsize "normalsize"
+              \hspace #5
+              \smaller "smaller"
+              \hspace #5
+              \smaller \smaller "smaller"
+              \hspace #5
+              \smaller \smaller \smaller "smaller"
+            }
+            " " 
+            { \normalsize "normalsize"
+              \hspace #5
+              \bigger "bigger"
+              \hspace #5
+              \bigger \bigger "bigger"
+              \hspace #5
+              \bigger \bigger \bigger "bigger"
+            }
+       >
+}
 
+spaceTest = \markup { "two space chars" }
 \header {
-    texidoc = "Make titles using markup (WIP)."
+    texidoc = "Make titles using markup.  Only in direct PostScript output."
 
-
-    % FIXME
-    fonts = #'((font-family . roman)
- 		  (word-space . 1)
- 		  (baseline-skip . 2)
- 		  (font-series . medium)
- 		  (font-style . roman)
- 		  (font-shape . upright)
- 		  (font-size . 0))
+    ##tagline = "my tagline for v \version"
+    copyright = "Copyright by /me"
     
-    title = "Title String"
+    %dedication = "För my dør Lily"
+    % ugh: encoding char-size
+    %dedication = "For my öòóôõø so dear Lily"
+    dedication = \markup { "For my "
+			   \latin-i { "öòóôõø" }
+			   " so dear Lily" }
+    title = "Title"
     subtitle = "(and (the) subtitle)"
-    poet = "poetstring"
-    composer = "compozeur"
-    instrument = "instrum"
-    piece = "stukkie"
+    subsubtitle = "Sub sub title"
+    poet = "Poet"
+    composer = "Composer"
+    texttranslator = "Text Translator"
+    opus = "opus 0"
+    meter = "Meter (huh?)"
+    arranger = "Arranger"
+    instrument = "Instrument"
+    piece = "Piece"
 
-    makeTitle = \markup {
-	\column <
-	    { "<-LEFT" \hspace #30 "centre" \hspace #30 "RIGHT->" }
-            " "
-	    \center < { \huge \bigger \bold \title } >
-            " "
-            \center <
-                \center < { \normalsize \bold \subtitle } >
-            >
-            " "
-            " "
-	    { \left-align { \smaller \upright \instrument }
-              \right-align { \upright \composer } }
-            " "
-	    { \left-align { \smaller \caps \piece }
-              \right-align { \upright \poet } }
-	 >
+    %% Override automatic book title
+    %% bookTitle = \markup { \fill-line < \huge\bold \title > > }
+}
+
+\score {
+    \context Staff \notes \relative c' {
+	c2-\sizeTest c2-\spaceTest
     }
+    \paper {
+%	#(paper-set-staff-size (* 11.0 pt)) 
+	}
+}
+
+\header {
+    %% Override automatic score title
+    %% scoreTitle = \markup { "Tweetje" }
+    opus = "opus 1"
+    piece = "Second"
 }
 
 \score {
     \context Staff \notes \relative c' {
-	c-\markup { \center < \roman \caps "foe" > }
+	\repeat unfold 135 { a b c d \break }
+	c1
     }
 }