input/test/embedded-postscript.ly

   1
   2 \version "2.1.30"
   3 \header {
   4   texidoc = "@cindex Embedded Postscript
   5 By inserting the @TeX{} command \embeddedps, you can
   6 insert postscript directly into the output.
   7
   8   "
   9 }
  10
  11
  12 %
  13 %TODO: make print-function to do this.
  14 %
  15
  16 \score {
  17   \notes \relative c'' {
  18     a-"\\embeddedps{3 4 moveto 5 3 rlineto stroke}"
  19     -"\\embeddedps{ [ 0 1 ] 0 setdash 3 5 moveto 5 -3 rlineto stroke}"
  20     b-"\\embeddedps{3 4 moveto 0 0 1 2 8 4 20 3.5 rcurveto stroke}"
  21     s2
  22     a'1
  23   }
  24   \paper { linewidth = 70 * \staffspace
  25 %       raggedright = ##t
  26         }
  27 }
  28