input/lsr/percussion-beaters.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 \version "2.13.1"
   4
   5 \header {
   6   lsrtags = "percussion"
   7
   8   texidoc = "
   9 Graphic symbols for percussion instruments are not natively supported;
  10 however it is possible to include such symbols, either as an external
  11 EPS file or as embedded PostScript code inside a markup, as
  12 demonstrated in this example.
  13
  14 "
  15   doctitle = "Percussion beaters"
  16 } % begin verbatim
  17
  18 stick = \markup {
  19   \with-dimensions #'(0 . 5) #'(0 . 5)
  20   \postscript #"
  21     0 6 translate
  22     0.8 -0.8 scale
  23     0 0 0 setrgbcolor
  24     [] 0 setdash
  25     1 setlinewidth
  26     0 setlinejoin
  27     0 setlinecap
  28     gsave [1 0 0 1 0 0] concat
  29     gsave [1 0 0 1 -3.5406095 -199.29342] concat
  30     gsave
  31     0 0 0 setrgbcolor
  32     newpath
  33     7.1434065 200.94354 moveto
  34     7.2109628 200.90454 7.2785188 200.86554 7.3460747 200.82654 curveto
  35     8.2056347 202.31535 9.0651946 203.80414 9.9247546 205.29295 curveto
  36     9.8571989 205.33195 9.7896429 205.37095 9.7220864 205.40996 curveto
  37     8.8625264 203.92115 8.0029664 202.43233 7.1434065 200.94354 curveto
  38     closepath
  39     eofill
  40     grestore
  41     gsave
  42     0 0 0 setrgbcolor
  43     newpath
  44     4.9646672 203.10444 moveto
  45     5.0036707 203.03688 5.0426744 202.96933 5.0816777 202.90176 curveto
  46     6.5704792 203.76133 8.0592809 204.6209 9.5480824 205.48045 curveto
  47     9.5090791 205.54801 9.4700754 205.61556 9.4310717 205.68311 curveto
  48     7.94227 204.82356 6.4534687 203.96399 4.9646672 203.10444 curveto
  49     closepath
  50     eofill
  51     grestore
  52     gsave
  53     <<
  54     /ShadingType 3
  55     /ColorSpace /DeviceRGB
  56     /Coords [113.13708 207.87465 0 113.13708 207.87465 16.162441]
  57     /Extend [true true]
  58     /Domain [0 1]
  59     /Function <<
  60     /FunctionType 3
  61     /Functions
  62     [
  63     <<
  64     /FunctionType 2
  65     /Domain [0 1]
  66     /C0 [1 1 1]
  67     /C1 [0.72941178 0.72941178 0.72941178]
  68     /N 1
  69     >>
  70     ]
  71     /Domain [0 1]
  72     /Bounds [ ]
  73     /Encode [ 0 1 ]
  74     >>
  75     >>
  76     newpath
  77     7.6422017 200.76488 moveto
  78     7.6505696 201.02554 7.3905363 201.24867 7.1341335 201.20075 curveto
  79     6.8759501 201.16916 6.6949602 200.87978 6.7801462 200.63381 curveto
  80     6.8480773 200.39155 7.1438307 200.25377 7.3728389 200.35861 curveto
  81     7.5332399 200.42458 7.6444521 200.59122 7.6422017 200.76488 curveto
  82     closepath
  83     clip
  84     gsave [0.052859054 0.063089841 -0.020912282 0.017521108 5.7334261 189.76443] concat
  85     shfill
  86     grestore
  87     grestore
  88     0 0 0 setrgbcolor
  89     [] 0 setdash
  90     0.027282091 setlinewidth
  91     0 setlinejoin
  92     0 setlinecap
  93     newpath
  94     7.6422017 200.76488 moveto
  95     7.6505696 201.02554 7.3905363 201.24867 7.1341335 201.20075 curveto
  96     6.8759501 201.16916 6.6949602 200.87978 6.7801462 200.63381 curveto
  97     6.8480773 200.39155 7.1438307 200.25377 7.3728389 200.35861 curveto
  98     7.5332399 200.42458 7.6444521 200.59122 7.6422017 200.76488 curveto
  99     closepath
 100     stroke
 101     gsave
 102     <<
 103     /ShadingType 3
 104     /ColorSpace /DeviceRGB
 105     /Coords [113.13708 207.87465 0 113.13708 207.87465 16.162441]
 106     /Extend [true true]
 107     /Domain [0 1]
 108     /Function <<
 109     /FunctionType 3
 110     /Functions
 111     [
 112     <<
 113     /FunctionType 2
 114     /Domain [0 1]
 115     /C0 [1 1 1]
 116     /C1 [0.72941178 0.72941178 0.72941178]
 117     /N 1
 118     >>
 119     ]
 120     /Domain [0 1]
 121     /Bounds [ ]
 122     /Encode [ 0 1 ]
 123     >>
 124     >>
 125     newpath
 126     5.2721217 202.83181 moveto
 127     5.2804896 203.09247 5.0204563 203.3156 4.7640539 203.26768 curveto
 128     4.5058701 203.23609 4.3248803 202.94671 4.4100662 202.70074 curveto
 129     4.4779975 202.45848 4.7737511 202.3207 5.0027593 202.42554 curveto
 130     5.1631598 202.49149 5.2743721 202.65813 5.2721217 202.83181 curveto
 131     closepath
 132     clip
 133     gsave [0.052859054 0.063089841 -0.020912282 0.017521108 3.363346 191.83136] concat
 134     shfill
 135     grestore
 136     grestore
 137     0 0 0 setrgbcolor
 138     [] 0 setdash
 139     0.027282091 setlinewidth
 140     0 setlinejoin
 141     0 setlinecap
 142     newpath
 143     5.2721217 202.83181 moveto
 144     5.2804896 203.09247 5.0204563 203.3156 4.7640539 203.26768 curveto
 145     4.5058701 203.23609 4.3248803 202.94671 4.4100662 202.70074 curveto
 146     4.4779975 202.45848 4.7737511 202.3207 5.0027593 202.42554 curveto
 147     5.1631598 202.49149 5.2743721 202.65813 5.2721217 202.83181 curveto
 148     closepath
 149     stroke
 150     grestore
 151     grestore
 152   "
 153 }
 154
 155 \score {
 156   b1^\stick
 157 }
 158