song2: keys: Print note names.
authorrekado <rekado@elephly.net>
Thu, 17 Nov 2016 11:08:39 +0000 (12:08 +0100)
committerrekado <rekado@elephly.net>
Thu, 17 Nov 2016 11:08:39 +0000 (12:08 +0100)
02-song2/02-song2.ly
02-song2/parts/keys.ly

index 28f9db7..e8c2327 100644 (file)
 }
 
 AllMusic = <<
-  \new Staff = "keyboard"
+  \new PianoStaff = "keyboard"
   \with {
     instrumentName = #"Synthesizer"
     shortInstrumentName = #"Synth"
     pedalSustainStyle = #'bracket
-  } { \keyboard }
+  } {
+    <<
+      \new Staff {
+        \clef treble
+        \keyboard
+      }
+    >>
+  }
   \new StaffGroup = "bass"
   \with {
     instrumentName = #"Bass"
index 7fbecc4..c966ef8 100644 (file)
 \include "../music/keys.ly"
 
 \score {
-  \new Staff \with {
+  \new PianoStaff = "keyboard" \with {
     pedalSustainStyle = #'bracket
   } {
-    \tempo 4 = 90
-    \compressMMRests { \keyboard }
+    <<
+      \new Staff {
+        <<
+          \tempo 4 = 90
+          \clef treble
+          \compressMMRests \keyboard
+          \context NoteNames = "upper" {
+            \set printOctaveNames = ##f
+            \compressMMRests \keyboard
+          }
+        >>
+      }
+    >>
   }
   \layout {
     indent = #0