input/lsr/dodecaphonic-style-accidentals-for-each-note-including-naturals.ly

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