%! PostScript set of library objects for XCircuit
%  Version: 3.2
%  Library name is: mymusiclib
%  Author: R. Timothy Edwards <tim@opencircuitdesign.com>
%

% Depend qn hd
% Depend qnd qn
% Depend qstem1 qn lnt
% Depend qstem2 qn lnt
% Depend qstem3 qn lnt
% Depend qstem4 qn lnt
% Depend hn hhd
% Depend hnd hn
% Depend hnd2 lnt hn
% Depend hnd3 lnt hn
% Depend hnt lnt hn
% Depend hnt2 hn lnt
% Depend wnt lnt wn
% Depend en qn flg
% Depend en2 qn flg
% Depend ent en2 lnt
% Depend ent2 en lnt
% Depend ent3 en lnt
% Depend ent4 en2 lnt
% Depend sn qn flg
% Depend sn2 qn
% Depend sr er
% Depend keyEf flt
% Depend keyBf flt
% Depend cuttime common
% Depend pedalstop ppin
% Depend rept ddot
% Depend gliss blip
% Depend staff lines br1 bar tclef bclef

% XCircuitLib library objects
/lnt {
begingate
1 1.75 -4 0 60 0 2 polygon
endgate
} def

/hd {
begingate
6 9 beginpath
-2 25 -38 9 -30 -9 curveto
-22 -25 14 -9 6 9 curveto
241 1.00 endpath
endgate
} def

/qn {
begingate
1.00 0 -7 16 hd
1 1.00 0 18 0 128 2 polygon
endgate
} def

/qnd {
begingate
1.00 180 -40 32 qn
endgate
} def

/qstem1 {
begingate
1.00 180 -40 32 qn
1.00 0 -48 16 lnt
endgate
} def

/qstem2 {
begingate
1.00 180 -40 32 qn
1.00 0 -52 0 lnt
endgate
} def

/qstem3 {
begingate
1.00 0 0 0 qn
1.00 0 -48 16 lnt
endgate
} def

/qstem4 {
begingate
1.00 0 0 0 qn
1.00 0 -45 32 lnt
endgate
} def

/hhd {
begingate
6 28 beginpath
16 12 -20 -12 -30 4 curveto
-24 -6 12 20 6 28 curveto
-4 44 -40 20 -30 4 curveto
-36 12 0 
38 6 28 curveto
241 1.00 endpath
endgate
} def

/hn {
begingate
1 1.00 0 23 0 128 2 polygon
1.00 0 -8 0 hhd
endgate
} def

/hnd {
begingate
1.00 180 -40 32 hn
endgate
} def

/hnd2 {
begingate
1.00 0 -48 0 lnt
1.00 180 -40 32 hn
endgate
} def

/hnd3 {
begingate
1.00 0 -48 16 lnt
1.00 180 -40 32 hn
endgate
} def

/hnt {
begingate
1.00 0 -48 16 lnt
1.00 0 0 0 hn
endgate
} def

/hnt2 {
begingate
1.00 0 0 0 hn
1.00 0 -44 32 lnt
endgate
} def

/wn {
begingate
-28 32 beginpath
-48 32 -28 0 -12 0 curveto
-52 0 -52 32 -28 32 curveto
12 32 12 0 -12 0 curveto
8 0 -12 
32 -28 32 curveto
241 1.00 endpath
endgate
} def

/wnt {
begingate
1.00 0 -49 16 lnt
1.00 0 0 0 wn
endgate
} def

/flg {
begingate
0 76 beginpath
0 32 68 8 28 -52 curveto
64 0 0 32 0 32 curveto
240 1.00 endpath
endgate
} def

/en {
begingate
1.00 0 0 0 qn
1.00 0 0 78 flg
endgate
} def

/en2 {
begingate
1.00 180 -40 32 qn
-1.00 180 -40 -54 flg
endgate
} def

/ent {
begingate
1.00 0 0 0 en2
1.00 0 -48 16 lnt
endgate
} def

/ent2 {
begingate
1.00 0 0 0 en
1.00 0 -44 16 lnt
endgate
} def

/ent3 {
begingate
1.00 0 0 0 en
1.00 0 -44 32 lnt
endgate
} def

/ent4 {
begingate
1.00 0 0 0 en2
1.00 0 -52 0 lnt
endgate
} def

/sn {
begingate
1.00 0 0 0 qn
0 188 beginpath
0 144 56 120 36 72 curveto
52 104 0 144 0 144 curveto
240 1.00 endpath
1.00 0 0 72 flg
endgate
} def

/sn2 {
begingate
1.00 180 -40 32 qn
-40 -136 beginpath
-40 -92 16 -68 -4 -20 curveto
12 -52 -40 -92 -40 -92 curveto
240 1.00 endpath
-40 -96 beginpath
-40 -52 12 -36 -4 4 curveto
8 -24 -40 -52 -40 -52 curveto
240 1.00 endpath
endgate
} def

/flt {
begingate
1 1.00 -8 71 -8 -1 2 polygon
-8 -2 beginpath
32 22 12 46 -8 30 curveto
2 40 20 22 -8 -2 curveto
241 1.00 endpath
endgate
} def

/shp {
begingate
240 1.00 -16 24 16 32 16 40 -16 32 4 polygon
240 1.00 -16 -8 16 0 16 8 -16 0 4 polygon
1 1.00 -8 56 -8 -28 2 polygon
1 1.00 8 -24 8 60 2 polygon
endgate
} def

/nat {
begingate
240 1.00 -14 -8 8 0 8 8 -14 0 4 polygon
240 1.00 -14 24 8 32 8 40 -14 32 4 polygon
1 1.00 -14 62 -14 -8 2 polygon
1 1.00 8 -32 8 40 2 polygon
endgate
} def

/hr {
begingate
240 1.00 -24 0 -24 16 20 16 20 0 4 polygon
endgate
} def

/qr {
begingate
1 1.00 3 41 -1 49 2 polygon
1 1.00 14 -34 -14 6 2 polygon
8 -26 beginpath
-2 -12 -30 -22 -6 -50 curveto
-20 -36 -4 -24 14 -34 curveto
241 1.00 endpath
-14 6 beginpath
-10 30 6 34 -2 50 curveto
10 26 1 polyc
-2 14 -6 -6 0 -14 curveto
241 1.00 endpath
endgate
} def

/er {
begingate
1 1.30 -3 39 -20 -8 2 polygon
241 1.00 -24 36 6 0.00 360.00 xcarc
1 1.00 -18 44 16 237.00 337.00 xcarc
endgate
} def

/sr {
begingate
241 1.00 -34 12 6 0.00 360.00 xcarc
1 1.00 -28 20 16 237.00 337.00 xcarc
1.00 0 -3 -6 er
endgate
} def

/fermata {
begingate
241 1.00 0 -12 4 0.00 360.00 xcarc
-32 -12 beginpath
-24 28 24 28 32 -12 curveto
28 16 -28 16 -32 -12 curveto
241 1.00 endpath
endgate
} def

/br1 {
begingate
0 96 beginpath
-76 52 60 -100 -32 -160 curveto
44 -116 -92 36 0 96 curveto
241 1.00 endpath
endgate
} def

/tclef {
begingate
1 1.00 -2 -26 16 180.00 360.00 xcarc
241 1.00 -8 -26 10 0.00 360.00 xcarc
1 1.00 14 -26 -4 112 2 polygon
-4 12 beginpath
-20 20 -16 50 12 50 curveto
42 50 36 0 4 0 curveto
48 0 52 64 12 64 curveto
-20 64 -28 
20 -4 12 curveto
241 1.00 endpath
4 0 beginpath
-24 0 -32 16 -32 32 curveto
-32 80 30 84 30 140 curveto
30 170 -10 140 -4 112 curveto
-10 
156 12 164 22 168 curveto
28 158 30 152 30 140 curveto
30 108 -44 92 -44 40 curveto
-44 8 -16 0 4 0 curveto
241 
1.00 endpath
endgate
} def

/bclef {
begingate
1 1.00 0 5 27 90.00 192.00 xcarc
241 1.00 48 16 3 0.00 360.00 xcarc
241 1.00 48 -15 3 0.00 360.00 xcarc
241 1.00 -17 3 10 0.00 360.00 xcarc
36 -4 beginpath
36 -44 8 -60 -28 -68 curveto
40 -52 32 32 0 32 curveto
28 32 36 12 36 -4 curveto
241 
1.00 endpath
endgate
} def

/keyEf {
begingate
1.00 0 -18 -17 flt
1.00 0 14 31 flt
1.00 0 46 -33 flt
endgate
} def

/keyBf {
begingate
1.00 0 -18 -17 flt
1.00 0 14 31 flt
endgate
} def

/dot {
begingate
248 1.00 0 0 6 0.00 360.00 xcarc
endgate
} def

/ddot {
begingate
241 1.00 0 16 5 0.00 360.00 xcarc
241 1.00 0 -16 5 0.00 360.00 xcarc
endgate
} def

/common {
begingate
241 1.00 14 18 8 8 -180.00 180.00 ellipse
1 1.00 18 30 20 26 22 20 8 32 spline
1 1.00 18 -26 22 -20 24 -14 14 -28 spline
-24 0 beginpath
-24 16 -16 36 8 32 curveto
-20 38 -18 -48 14 -28 curveto
4 -36 -24 -32 -24 0 curveto
241 
1.00 endpath
endgate
} def

/cuttime {
begingate
1.00 0 0 0 common
1 1.00 2 46 2 -46 2 polygon
endgate
} def

/two {
begingate
241 1.00 -10 18 8 0.00 360.00 xcarc
1 1.00 -14 30 -16 26 -18 20 -4 32 spline
1 1.00 -18 -20 -18 -16 2 -6 -24 -32 spline
26 -12 beginpath
26 -50 -14 -20 -24 -32 curveto
-8 0 26 -34 26 -12 curveto
241 1.00 endpath
-4 32 beginpath
16 34 22 4 2 -6 curveto
24 2 26 8 26 18 curveto
26 24 20 36 -4 32 curveto
241 1.00 endpath
endgate
} def

/three {
begingate
241 1.00 -14 -18 8 0.00 360.00 xcarc
1 1.00 -18 -30 -20 -26 -22 -20 -8 -32 spline
241 1.00 -14 18 8 0.00 360.00 xcarc
1 1.00 -18 30 -20 26 -22 20 -8 32 spline
-6 0 beginpath
16 0 22 6 22 18 curveto
22 24 16 36 -8 32 curveto
12 34 18 0 -6 0 curveto
16 0 22 -6 22 
-18 curveto
22 -24 16 -34 -8 -32 curveto
12 -34 18 0 -6 0 curveto
241 1.00 endpath
endgate
} def

/four {
begingate
1 1.00 -24 -10 24 -10 2 polygon
12 -24 beginpath
20 -24 8 180.00 270.00  arc
-10 -32 1 polyc
-10 -24 8 -90.00 0.00  arc
12 
-24 12 18 -2 2 3 polyc
241 1.00 endpath
-24 -10 beginpath
-16 0 -6 20 -6 28 curveto
-22 -10 14 32 2 polyc
241 1.00 endpath
endgate
} def

/six {
begingate
241 1.00 12 20 8 0.00 360.00 xcarc
1 1.00 16 30 18 26 20 20 6 32 spline
1 1.00 -6 4 -12 -4 -10 -14 0 4 spline
0 4 beginpath
14 5 12 -34 0 -32 curveto
-26 -32 -24 -4 -24 0 curveto
-24 8 -20 36 6 32 curveto
-14 34 
-16 -32 0 -32 curveto
20 -32 22 -20 22 -12 curveto
22 2 8 6 0 4 curveto
241 1.00 endpath
endgate
} def

/eight {
begingate
1 1.00 -6 -34 8 -34 14 -30 -12 -30 spline
-10 30 beginpath
-22 24 -30 4 0 -6 curveto
20 -14 22 -24 14 -30 curveto
26 -24 34 0 4 10 curveto
-14 16 
-18 24 -10 30 curveto
241 1.00 endpath
-12 -30 beginpath
-18 -26 -22 -14 -14 0 curveto
-24 -6 -28 -22 -12 -30 curveto
241 1.00 endpath
14 30 beginpath
22 22 20 10 16 4 curveto
22 8 30 22 14 30 curveto
241 1.00 endpath
1 1.00 -4 34 8 34 14 30 -10 30 spline
endgate
} def

/nine {
begingate
241 1.00 -16 -18 8 0.00 360.00 xcarc
1 1.00 -20 -30 -22 -26 -24 -20 -10 -32 spline
1 1.00 4 -4 8 0 9 10 -4 -4 spline
-4 -4 beginpath
-18 -5 -16 34 -4 32 curveto
15 32 16 -39 -10 -32 curveto
26 -34 24 -6 24 0 curveto
24 4 
26 32 -4 32 curveto
-24 32 -26 20 -26 12 curveto
-26 -2 -13 -4 -4 -4 curveto
241 1.00 endpath
endgate
} def

/pedal {
begingate
1 1.00 -22 34 -32 32 -36 30 -12 30 spline
4 -28 beginpath
-8 -18 -30 -34 -32 -32 curveto
-34 -30 -18 -24 -4 -32 curveto
4 -28 1 polyc
241 
1.00 endpath
-20 -28 beginpath
-6 0 -32 12 -26 32 curveto
-40 4 -14 -8 -20 -28 curveto
241 1.00 endpath
-18 18 beginpath
-6 2 4 22 -12 30 curveto
18 18 -8 -12 -18 18 curveto
241 1.00 endpath
-36 30 beginpath
-60 18 -52 -10 -34 6 curveto
-50 -4 -48 24 -36 30 curveto
241 1.00 endpath
1 1.00 22 -18 20 0 12 0 4 -28 spline
44 -30 beginpath
30 -36 24 -4 32 0 curveto
20 -6 20 -40 44 -30 curveto
62 -20 42 22 12 16 curveto
36 24 
52 -24 44 -30 curveto
241 1.00 endpath
12 0 beginpath
-2 0 0 -44 26 -28 curveto
8 -40 4 0 12 0 curveto
241 1.00 endpath
241 1.00 58 -30 2 0.00 360.00 xcarc
endgate
} def

/ppin {
% hidden
begingate
3 -12 beginpath
3 -9 1 polyc
-1 -8 0 1 2 2 curveto
0 8 6 -63.43 243.43  arc
0 1 1 -8 -3 -9 curveto
-3 
-12 1 polyc
0 -15 4 135.00 45.00  arcn
241 1.00 endpath
endgate
} def

/blip {
% hidden
begingate
0 -16 beginpath
-24 8 12 4 0 16 curveto
24 -8 -12 -4 0 -16 curveto
241 1.00 endpath
endgate
} def

/pedalstop {
begingate
-1.00 45 11 11 ppin
1.00 0 0 15 ppin
1.00 90 15 0 ppin
-1.00 225 -11 -11 ppin
-1.00 315 -11 11 ppin
-1.00 270 -15 0 ppin
-1.00 180 0 -15 ppin
-1.00 135 11 -11 ppin
endgate
} def

/rept {
begingate
240 1.00 -32 -256 -32 256 -16 256 -16 -256 4 polygon
1 1.00 0 256 0 -256 2 polygon
1.00 0 16 192 ddot
1.00 0 16 -192 ddot
endgate
} def

/gliss {
begingate
1.00 0 0 80 blip
1.00 0 0 16 blip
1.00 0 0 48 blip
1.00 0 0 -16 blip
1.00 0 0 -80 blip
1.00 0 0 -48 blip
endgate
} def

/bar {
begingate
1 1.50 0 256 0 -256 2 polygon
endgate
} def

/lines {
begingate
1 1.00 0 -32 3552 -32 2 polygon
1 1.00 0 64 3552 64 2 polygon
1 1.00 0 0 3552 0 2 polygon
1 1.00 0 32 3552 32 2 polygon
1 1.00 0 -64 3552 -64 2 polygon
endgate
} def

/staff {
begingate
1.00 0 64 -192 lines
1.00 0 64 192 lines
-1.00 180 48 -160 br1
1.00 0 48 160 br1
1.00 0 64 0 bar
1.00 0 3616 0 bar
1.00 0 144 128 tclef
1.00 0 128 -160 bclef
endgate
} def


% EndLib