]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/lsr/using-postscript-to-generate-special-note-head-shapes.ly
Imported Upstream version 2.14.2
[lilypond.git] / input / lsr / using-postscript-to-generate-special-note-head-shapes.ly
diff --git a/input/lsr/using-postscript-to-generate-special-note-head-shapes.ly b/input/lsr/using-postscript-to-generate-special-note-head-shapes.ly
deleted file mode 100644 (file)
index e02b27e..0000000
+++ /dev/null
@@ -1,51 +0,0 @@
-%% 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.12.3"
-
-\header {
-  lsrtags = "editorial-annotations, tweaks-and-overrides"
-
-  texidocfr = "
-Lorsqu'il est impossible d'obtenir facilement une allure particulière
-pour les têtes de note en recourant à la technique du @code{\\markup}, un
-code Postscript peut vous tirer d'embarras.  Voici comment générer des
-têtes ressemblant à des parallélogrammes.
-
-"
-  doctitlefr = "Utilisation de Postscript pour générer des têtes de note à l'allure particulière"
-
-  texidoc = "
-When a note head with a special shape cannot easily be generated with
-graphic markup, PostScript code can be used to generate the shape. 
-This example shows how a parallelogram-shaped note head is generated. 
-
-"
-  doctitle = "Using PostScript to generate special note head shapes"
-} % begin verbatim
-
-parallelogram =
-  #(ly:make-stencil (list 'embedded-ps
-    "gsave
-      currentpoint translate
-      newpath
-      0 0.25 moveto
-      1.3125 0.75 lineto
-      1.3125 -0.25 lineto
-      0 -0.75 lineto
-      closepath
-      fill
-      grestore" )
-    (cons 0 1.3125)
-    (cons 0 0))
-
-myNoteHeads = \override NoteHead #'stencil = \parallelogram
-normalNoteHeads = \revert NoteHead #'stencil
-
-\relative c'' {
-  \myNoteHeads
-  g4 d'
-  \normalNoteHeads
-  <f, \tweak #'stencil \parallelogram b e>4 d
-}
-
-