input/test/embedded-postscript.ly

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