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