]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/lsr/dodecaphonic-style-accidentals-for-each-note-including-naturals.ly
Imported Upstream version 2.12.3
[lilypond.git] / input / lsr / dodecaphonic-style-accidentals-for-each-note-including-naturals.ly
index 95481995d58acafaa341ace432a9c1eba66f22a5..cea81a132b2e509e501f04d2960c70b9acf8512f 100644 (file)
@@ -1,6 +1,6 @@
 %% Do not edit this file; it is auto-generated from LSR http://lsr.dsi.unimi.it
 %% This file is in the public domain.
-\version "2.11.49"
+\version "2.12.3"
 
 \header {
   lsrtags = "pitches"
@@ -16,8 +16,21 @@ para enfatizar su nuevo enfoque de la teoría y el lenguaje musicales.
 
 Este fragmento de código muestra cómo conseguir dichas reglas de
 notación.
+
 "
 
+ texidocde = "
+ In Werken des fürhen 20. Jahrhundert, angefangen mit Schönberg, Berg
+ und Webern (die zweite Wiener Schule), wird jeder Ton der 
+ Zwölftonleiter als gleichwertig erachtet, ohne hierarchische
+ Ordnung.  Deshalb wird in dieser Musik für jede Note ein Versetzungszeichen
+ ausgegeben, auch für unalterierte Tonhöhen, um das neue Verständnis
+ der Musiktheorie und Musiksprache zu verdeutlichen.
+ Dieser Schnipsel zeigt, wie derartige Notationsregeln zu erstellen sind.
+ "
+doctitlede = "Versetzungszeichen für jede Note im Stil der Zwölftonmusik"
 
   texidoc = "
 In early 20th century works, starting with Schoenberg, Berg and Webern
@@ -32,25 +45,19 @@ This snippet shows how to achieve such notation rules.
 "
   doctitle = "Dodecaphonic-style accidentals for each note including naturals"
 } % begin verbatim
-webernAccidentals = {
-  % the 5s are just "a value different from any accidental"
-  \set Staff.keySignature = #'((0 . 5) (1 . 5) (2 . 5) (3 . 5)
-                               (4 . 5) (5 . 5) (6 . 5))
-  \set Staff.extraNatural = ##f
-  #(set-accidental-style 'forget)
-}
 
 \score {
-  {
-    \webernAccidentals
+  \new Staff {
+    #(set-accidental-style 'dodecaphonic)
     c'4 dis' cis' cis'
     c'4 dis' cis' cis'
     c'4 c' dis' des'
   }
   \layout {
     \context {
-    \Staff
-    \remove "Key_engraver"
+      \Staff
+      \remove "Key_engraver"
     }
   }
 }
+