]> git.donarmstrong.com Git - lilypond.git/blob - input/lsr/dodecaphonic-style-accidentals-for-each-note-including-naturals.ly
Merge branch 'master' of ssh://jomand@git.sv.gnu.org/srv/git/lilypond
[lilypond.git] / input / lsr / dodecaphonic-style-accidentals-for-each-note-including-naturals.ly
1 %% Do not edit this file; it is auto-generated from LSR!
2 %% Tags: pitches
3 \version "2.11.35"
4
5 \header { texidoc = "
6 In early XXth century works, starting with Schönberg, Berg and Webern
7 (the \"second\" Viennese school), every pitch in the twelve- note scale
8 has to be regarded as equal, without any hierarchy such as the
9 classical (tonal) degrees. Therefore, these composers print one
10 accidental for each note, even at natural pitches, to emphasize their
11 new approach to music theory and language. This snippet shows how to
12 achieve such notation rules with LilyPond.
13 " }
14
15 % thanks to Rune Zedeler for this cool function :)
16
17 webernAccidentals = {
18     % the 5s are just "a value different from any accidental"
19     \set Staff.keySignature = #'((0 . 5) (1 . 5) (2 . 5) (3 . 5)
20                                  (4 . 5) (5 . 5) (6 . 5))
21     \set Staff.extraNatural = ##f
22     #(set-accidental-style 'forget)
23 }
24
25 \layout {
26   \context { \Staff \remove Key_engraver }
27 }
28 \score {
29   {
30     \webernAccidentals
31     c' dis' cis' cis'
32     c' dis' cis' cis'
33     c' c' dis' des'
34   }
35 }