%!PS-Adobe-3.0
%%Title: GIS_5T_D_W_CspEn.utf8.abc
%%Creator: jcabc2ps jc.1.1.1
%%CreationDate: Nov 30 18:59 2007
%%LanguageLevel: 2
%%EndComments

%%BeginSetup

/AvantGarde-Demi findfont
dup length dict begin
   {1 index /FID ne {def} {pop pop} ifelse} forall
   /Encoding ISOLatin1Encoding def
   currentdict
end
/AvantGarde-Demi-ISO exch definefont pop
/F0 { 1 eq {/bx true def} { /bx false def} ifelse
  dup 0.72 mul  /fh exch def
  /AvantGarde-Demi-ISO exch selectfont } bind def

/Bookman-Demi findfont
dup length dict begin
   {1 index /FID ne {def} {pop pop} ifelse} forall
   /Encoding ISOLatin1Encoding def
   currentdict
end
/Bookman-Demi-ISO exch definefont pop
/F1 { 1 eq {/bx true def} { /bx false def} ifelse
  dup 0.72 mul  /fh exch def
  /Bookman-Demi-ISO exch selectfont } bind def

/Courier findfont
dup length dict begin
   {1 index /FID ne {def} {pop pop} ifelse} forall
   /Encoding ISOLatin1Encoding def
   currentdict
end
/Courier-ISO exch definefont pop
/F2 { 1 eq {/bx true def} { /bx false def} ifelse
  dup 0.72 mul  /fh exch def
  /Courier-ISO exch selectfont } bind def

/Gothic findfont
dup length dict begin
   {1 index /FID ne {def} {pop pop} ifelse} forall
   /Encoding ISOLatin1Encoding def
   currentdict
end
/Gothic-ISO exch definefont pop
/F3 { 1 eq {/bx true def} { /bx false def} ifelse
  dup 0.72 mul  /fh exch def
  /Gothic-ISO exch selectfont } bind def

/Helvetica findfont
dup length dict begin
   {1 index /FID ne {def} {pop pop} ifelse} forall
   /Encoding ISOLatin1Encoding def
   currentdict
end
/Helvetica-ISO exch definefont pop
/F4 { 1 eq {/bx true def} { /bx false def} ifelse
  dup 0.72 mul  /fh exch def
  /Helvetica-ISO exch selectfont } bind def

/Helvetica-Narrow findfont
dup length dict begin
   {1 index /FID ne {def} {pop pop} ifelse} forall
   /Encoding ISOLatin1Encoding def
   currentdict
end
/Helvetica-Narrow-ISO exch definefont pop
/F5 { 1 eq {/bx true def} { /bx false def} ifelse
  dup 0.72 mul  /fh exch def
  /Helvetica-Narrow-ISO exch selectfont } bind def

/Palatino findfont
dup length dict begin
   {1 index /FID ne {def} {pop pop} ifelse} forall
   /Encoding ISOLatin1Encoding def
   currentdict
end
/Palatino-ISO exch definefont pop
/F6 { 1 eq {/bx true def} { /bx false def} ifelse
  dup 0.72 mul  /fh exch def
  /Palatino-ISO exch selectfont } bind def

/Times findfont
dup length dict begin
   {1 index /FID ne {def} {pop pop} ifelse} forall
   /Encoding ISOLatin1Encoding def
   currentdict
end
/Times-ISO exch definefont pop
/F7 { 1 eq {/bx true def} { /bx false def} ifelse
  dup 0.72 mul  /fh exch def
  /Times-ISO exch selectfont } bind def

/Times-Narrow findfont
dup length dict begin
   {1 index /FID ne {def} {pop pop} ifelse} forall
   /Encoding ISOLatin1Encoding def
   currentdict
end
/Times-Narrow-ISO exch definefont pop
/F8 { 1 eq {/bx true def} { /bx false def} ifelse
  dup 0.72 mul  /fh exch def
  /Times-Narrow-ISO exch selectfont } bind def

/Times-Courier findfont
dup length dict begin
   {1 index /FID ne {def} {pop pop} ifelse} forall
   /Encoding ISOLatin1Encoding def
   currentdict
end
/Times-Courier-ISO exch definefont pop
/F9 { 1 eq {/bx true def} { /bx false def} ifelse
  dup 0.72 mul  /fh exch def
  /Times-Courier-ISO exch selectfont } bind def

/Times-New-Roman findfont
dup length dict begin
   {1 index /FID ne {def} {pop pop} ifelse} forall
   /Encoding ISOLatin1Encoding def
   currentdict
end
/Times-New-Roman-ISO exch definefont pop
/F10 { 1 eq {/bx true def} { /bx false def} ifelse
  dup 0.72 mul  /fh exch def
  /Times-New-Roman-ISO exch selectfont } bind def

/Times-Roman findfont
dup length dict begin
   {1 index /FID ne {def} {pop pop} ifelse} forall
   /Encoding ISOLatin1Encoding def
   currentdict
end
/Times-Roman-ISO exch definefont pop
/F11 { 1 eq {/bx true def} { /bx false def} ifelse
  dup 0.72 mul  /fh exch def
  /Times-Roman-ISO exch selectfont } bind def

/Helvetica-Bold findfont
dup length dict begin
   {1 index /FID ne {def} {pop pop} ifelse} forall
   /Encoding ISOLatin1Encoding def
   currentdict
end
/Helvetica-Bold-ISO exch definefont pop
/F12 { 1 eq {/bx true def} { /bx false def} ifelse
  dup 0.72 mul  /fh exch def
  /Helvetica-Bold-ISO exch selectfont } bind def

/Times-Italic findfont
dup length dict begin
   {1 index /FID ne {def} {pop pop} ifelse} forall
   /Encoding ISOLatin1Encoding def
   currentdict
end
/Times-Italic-ISO exch definefont pop
/F13 { 1 eq {/bx true def} { /bx false def} ifelse
  dup 0.72 mul  /fh exch def
  /Times-Italic-ISO exch selectfont } bind def

/Helvetica-Narrow-Bold findfont
dup length dict begin
   {1 index /FID ne {def} {pop pop} ifelse} forall
   /Encoding ISOLatin1Encoding def
   currentdict
end
/Helvetica-Narrow-Bold-ISO exch definefont pop
/F14 { 1 eq {/bx true def} { /bx false def} ifelse
  dup 0.72 mul  /fh exch def
  /Helvetica-Narrow-Bold-ISO exch selectfont } bind def

/accdraw 0 def

/Accent {
   accbasec glyphshow
   gsave 
   accbasew dup neg 0 rmoveto
   accwidth sub 2 div 2.7 currentfont /ScaleMatrix get 0 get mul 12 div rmoveto
   accchar glyphshow
   grestore
} bind  def

/accent {
   accbasec glyphshow
   gsave
   accbasew dup neg 0 rmoveto
   accwidth sub 2 div 0 rmoveto
   accchar glyphshow
   grestore
} bind  def

/laccent {
   accbasec glyphshow
   gsave 
   accbasew dup neg 0 rmoveto
   accwidth sub 2 div -2.4 currentfont /ScaleMatrix get 0 get mul 12 div rmoveto
   accchar glyphshow
   grestore
} bind  def

/testacc {
   pop 		% drop height
   1 index dup	% get encoding integer
   145 ge exch 159 le and {	% it's an accent (145-159)
     /accdraw 1 def
     /accwidth exch def
     ISOLatin1Encoding exch get /accchar exch def
   } { 				% or something else
     accdraw 1 eq { 						% we have to draw it with accent
       /accbasew exch def					% save  base char's width
       dup ISOLatin1Encoding exch get /accbasec exch def	% and the char
       accchar dup /cedilla eq exch /ogonek eq or {  		% the accent goes below the char (cedilla or ogonek)
         accbasec /g eq		% check for underlength: g
	 accbasec /j eq or	% j
	 accbasec /p eq or	% p
	 accbasec /q eq or	% q
	 accbasec /y eq or	% y
	 { 
	   laccent				% then place it somewhat lower
	 } {
	   accent
	 } ifelse
       } {					% accent goes above
         dup dup 65 ge exch 90 le and	 	% a capital letter
       	 exch dup 48 ge exch 57 le and or	% or a number
	 accbasec /b eq or			% or a b
	 accbasec /d eq or			% d
	 accbasec /f eq or			% f
	 accbasec /h eq or			% h
	 accbasec /k eq or			% k
	 accbasec /l eq or			% l
	 accbasec /t eq or			% or t
         {
	   Accent				% then place it somewhat higher
         } {
           accbasec /i eq			% replace i by dotless i
             { /accbasec /dotlessi def } if
	   accent
	 } ifelse
       } ifelse
     } {
       pop dup 1 eq {
         gsave /dcroat glyphshow grestore 
       } {
       dup 2 eq
       {
         gsave /Dcroat glyphshow grestore 
       } {
         ISOLatin1Encoding exch get glyphshow
       } ifelse } ifelse
     } ifelse
     /accdraw 0 def
   } ifelse
} bind def

/stringwidth { 
  0 exch 0 exch 
  { dup dup dup dup 145 ge exch 159 le and exch 1 eq or exch 2 eq or { 
    pop 
  }{
    /st ( ) def st exch 0 exch put st stringwidth 3 -1 roll add 3 1 roll add exch
  } ifelse
  } forall } bind def

/show { /testacc load cshow } bind def

/cshow { % usage: string cshow  - center at current pt
   dup stringwidth pop 2 div neg 0 rmoveto
   bx {box} if show
} bind def

/lshow { % usage: string lshow - show left-aligned
   dup stringwidth pop neg 0 rmoveto bx {box} if show
} bind def

/rshow { % usage: string rshow - show right-aligned
   bx {box} if show
} bind def

/box {  % usage: str box  - draw box around string
  gsave 1.5 setlinewidth dup stringwidth pop
  -2 -2 rmoveto 4 add fh 4 add 2 copy
  0 exch rlineto 0 rlineto neg 0 exch rlineto neg 0 rlineto
  closepath stroke grestore
} bind def

/wd { moveto bx {box} if show } bind def
/wln {
dup 3 1 roll moveto gsave 0.6 setlinewidth lineto stroke grestore
} bind def
/whf {moveto gsave 0.5 1.2 scale (-) show grestore} bind def

/nclef {  % usage:  x nclef  - no clef 
  0 moveto
   
} bind def

/tclef {  % usage:  x tclef  - treble clef 
  0 moveto
  -2.22 5.91 rmoveto
  -0.74 -1.11 rlineto
  -2.22 2.22 -0.74 8.12 3.69 8.12 rcurveto
  2.22 0.74 7.02 -1.85 7.02 -6.65 rcurveto
  0.00 -4.43 -4.06 -6.65 -7.75 -6.65 rcurveto
  -4.43 0.00 -8.49 2.22 -8.49 8.49 rcurveto
  0.00 2.58 0.37 5.54 5.91 9.97 rcurveto
  6.28 4.43 6.28 7.02 6.28 8.86 rcurveto
  0.00 1.85 -0.37 3.32 -1.11 3.32 rcurveto
  -1.85 -1.48 -3.32 -5.17 -3.32 -7.38 rcurveto
  0.00 -13.66 4.43 -16.25 4.80 -25.85 rcurveto
  0.00 -3.69 -2.22 -5.54 -5.54 -5.54 rcurveto
  -2.22 0.00 -4.06 1.85 -4.06 3.69 rcurveto
  0.00 1.85 1.11 3.32 2.95 3.32 rcurveto
  3.69 0.00 3.69 -5.91 0.37 -4.80 rcurveto
  0.37 -2.22 5.54 -1.11 5.54 2.95 rcurveto
  -0.74 12.18 -5.17 14.40 -5.17 28.06 rcurveto
  0.00 4.06 1.11 7.38 4.43 8.86 rcurveto
  2.22 -1.48 4.06 -4.06 3.69 -6.65 rcurveto
  0.00 -4.06 -2.58 -7.02 -5.91 -10.34 rcurveto
  -2.22 -2.58 -5.91 -4.43 -5.91 -9.60 rcurveto
  0.00 -4.43 2.58 -6.65 5.54 -6.65 rcurveto
  2.95 0.00 5.54 1.85 5.54 4.80 rcurveto
  0.00 3.32 -2.95 4.43 -4.80 4.43 rcurveto
  -2.58 0.00 -4.06 -1.85 -2.95 -3.69 rcurveto
   fill
} bind def

/stclef {
  0.85 div gsave 0.85 0.85 scale tclef grestore
} bind def

/td8clef {  % usage:  x td8clef  - treble-8va clef
  dup tclef
  /Times-Roman findfont 12 scalefont setfont
  -20 moveto (8) cshow
} bind def

/std8clef {
  0.85 div gsave 0.85 0.85 scale td8clef grestore
} bind def

/tu8clef {  % usage:  x tu8clef  - treble+8va clef
  dup tclef
  /Times-Roman findfont 12 scalefont setfont
  +35 moveto ( 8) cshow
} bind def

/stu8clef {
  0.85 div gsave 0.85 0.85 scale tu8clef grestore
} bind def

/bclef {  % usage:  x bclef  - bass clef 
  0 moveto
  -9.80 2.50 rmoveto
  8.30 4.00 12.80 9.00 12.80 13.00 rcurveto
  0.00 4.50 -2.00 7.50 -4.30 7.30 rcurveto
  -1.00 0.20 -4.20 0.20 -5.70 -3.80 rcurveto
  1.50 0.50 3.50 0.00 3.50 -1.50 rcurveto
  0.00 -1.00 -0.50 -2.00 -2.00 -2.00 rcurveto
  -1.00 0.00 -2.00 0.90 -2.00 2.50 rcurveto
  0.00 2.50 2.10 5.50 6.00 5.50 rcurveto
  4.00 0.00 7.50 -2.50 7.50 -7.50 rcurveto
  0.00 -5.50 -6.50 -11.00 -15.50 -13.70 rcurveto
  8.30 4.00 12.80 9.00 12.80 13.00 rcurveto
  0.00 4.50 -2.00 7.50 -4.30 7.30 rcurveto
  -1.00 0.20 -4.20 0.20 -5.70 -3.80 rcurveto
  1.50 0.50 3.50 0.00 3.50 -1.50 rcurveto
  0.00 -1.00 -0.50 -2.00 -2.00 -2.00 rcurveto
  -1.00 0.00 -2.00 0.90 -2.00 2.50 rcurveto
  0.00 2.50 2.10 5.50 6.00 5.50 rcurveto
  4.00 0.00 7.50 -2.50 7.50 -7.50 rcurveto
  0.00 -5.50 -6.50 -11.00 -15.50 -13.70 rcurveto
  16.90 18.20 rmoveto
  0.00 1.50 2.00 1.50 2.00 0.00 rcurveto
  0.00 -1.50 -2.00 -1.50 -2.00 0.00 rcurveto
  0.00 -5.50 rmoveto
  0.00 1.50 2.00 1.50 2.00 0.00 rcurveto
  0.00 -1.50 -2.00 -1.50 -2.00 0.00 rcurveto
fill
} bind def

/sbclef {
  0.85 div gsave 0.85 0.85 scale 0 4 translate bclef grestore
} bind def

/bd8clef {  % usage:  x bd8clef  - bass-8va clef
  dup bclef
  /Times-Roman findfont 12 scalefont setfont
  -10 moveto (8) cshow
} bind def

/sbd8clef {
  0.85 div gsave 0.85 0.85 scale bd8clef grestore
} bind def

/bu8clef {  % usage:  x bu8clef  - bass+8va clef
  dup bclef
  /Times-Roman findfont 12 scalefont setfont
  +25 moveto (8) cshow
} bind def

/sbu8clef {
  0.85 div gsave 0.85 0.85 scale bu8clef grestore
} bind def

/cchalf {
  0 moveto
  0.00 12.00 rmoveto
  1.20 2.75 rlineto
  4.20 -0.50 6.00 2.25 6.00 5.00 rcurveto
  0.00 2.00 -0.60 3.90 -3.30 4.00 rcurveto
  -0.78 0.00 -2.70 0.00 -3.60 -2.00 rcurveto
  0.90 0.25 2.10 0.00 2.10 -0.75 rcurveto
  0.00 -0.50 -0.30 -1.00 -1.20 -1.00 rcurveto
  -0.60 0.00 -1.20 0.45 -1.20 1.25 rcurveto
  0.00 1.25 1.26 2.75 3.60 2.75 rcurveto
  3.60 0.00 5.40 -1.25 5.40 -3.75 rcurveto
  0.00 -3.25 -3.00 -6.00 -6.60 -5.75 rcurveto
  -0.60 -2.50 rlineto
fill
} bind def

/cclef {   % usage: x cclef
   dup dup dup
   cchalf gsave 0 24 translate 1 -1 scale cchalf
   6.5 sub 0 moveto 0 24 rlineto 3 0 rlineto 0 -24 rlineto fill
   1.8 sub 0 moveto 0 24 rlineto 0.8 setlinewidth stroke grestore 
} bind def

/scclef { cclef } bind def

/cd8clef {  % usage:  x cd8clef  - alto-8va clef
  dup cclef
  /Times-Roman findfont 12 scalefont setfont
  -10 moveto (8) cshow
} bind def

/scd8clef {
  0.85 div gsave 0.85 0.85 scale cd8clef grestore
} bind def

/cu8clef {  % usage:  x cu8clef  - alto+8va clef
  dup cclef
  /Times-Roman findfont 12 scalefont setfont
  +25 moveto (8) cshow
} bind def

/scu8clef {
  0.85 div gsave 0.85 0.85 scale cu8clef grestore
} bind def

/hd {  % usage: x y hd  - full head
  dup /y exch def exch dup /x exch def exch moveto
  3.30 2.26 rmoveto
  -2.26 3.30 -8.86 -1.22 -6.60 -4.52 rcurveto
  2.26 -3.30 8.86 1.22 6.60 4.52 rcurveto
   fill
} bind def

/Hd {  % usage: x y Hd  - open head for half
  dup /y exch def exch dup /x exch def exch moveto
  3.51 1.92 rmoveto
  -2.04 3.73 -9.06 -0.10 -7.02 -3.83 rcurveto
  2.04 -3.73 9.06 0.10 7.02 3.83 rcurveto
  -0.44 -0.24 rmoveto
  0.96 -1.76 -5.19 -5.11 -6.15 -3.35 rcurveto
  -0.96 1.76 5.19 5.11 6.15 3.35 rcurveto
   fill
} bind def

/HD { % usage: x y HD  - open head for whole
  dup /y exch def exch dup /x exch def exch moveto
  5.96 0.00 rmoveto
  0.00 1.08 -2.71 3.52 -5.96 3.52 rcurveto
  -3.25 0.00 -5.96 -2.44 -5.96 -3.52 rcurveto
  0.00 -1.08 2.71 -3.52 5.96 -3.52 rcurveto
  3.25 0.00 5.96 2.44 5.96 3.52 rcurveto
  -8.13 1.62 rmoveto
  1.62 2.17 5.96 -1.07 4.34 -3.24 rcurveto
  -1.62 -2.17 -5.96 1.07 -4.34 3.24 rcurveto
   fill
} bind def

/su {  % usage: len su   - up stem
  x y moveto 3.5 1.0 rmoveto 1.0 sub 0 exch rlineto stroke
} bind def

/sd {  % usage: len td   - down stem
  x y moveto -3.5 -1.0 rmoveto neg 1.0 add 0 exch rlineto stroke
} bind def

/bm {  % usage: x1 y1 x2 y2 t bm  - beam, depth t
  3 1 roll moveto dup 0 exch neg rlineto
  dup 4 1 roll sub lineto 0 exch rlineto fill
} bind def

/bnum {  % usage: x y (str) bnum  - number on beam
  3 1 roll moveto gsave /Times-Italic 12 selectfont
  /bx false def cshow grestore
} bind def

/hbr {  % usage: x1 y1 x2 y2 hbr  - half bracket
  moveto lineto 0 -3 rlineto stroke
} bind def

/SL {  % usage: pp2x pp1x p1 pp1 pp2 p2 p1 sl
  moveto curveto rlineto curveto fill
} bind def

/dt {  % usage: dx dy dt  - dot shifted by dx,dy
  y add exch x add exch 1.2 0 360 arc fill
} bind def

/grm {  % usage:  y grm  - gracing mark
  x exch moveto
  -5.00 -1.00 rmoveto
  5.00 8.50 5.50 -4.50 10.00 2.00 rcurveto
  -5.00 -8.50 -5.50 4.50 -10.00 -2.00 rcurveto
   fill
} bind def

/stc {  % usage:  y stc  - staccato mark
  x exch 1.2 0 360 arc fill } bind def

/hat {  % usage:  y hat
  x exch moveto
  -4 -2 rmoveto 4 6 rlineto currentpoint stroke moveto
  4 -6 rlineto -2 0 rlineto -3 4.5 rlineto fill
 } bind def

/att {  % usage:  y att
  x exch moveto
  -4 -3 rmoveto 8 3 rlineto -8 3 rlineto stroke
 } bind def

/cpu {  % usage:  y cpu  - roll sign above head
  x exch moveto
  -5.85 0.00 rmoveto
  0.45 7.29 11.25 7.29 11.70 0.00 rcurveto
  -1.35 5.99 -10.35 5.99 -11.70 0.00 rcurveto
   fill
} bind def

/cpd {  % usage:  y cpd  - roll sign below head
  x exch moveto
  -5.85 -0.00 rmoveto
  0.45 -7.29 11.25 -7.29 11.70 0.00 rcurveto
  -1.35 -5.99 -10.35 -5.99 -11.70 0.00 rcurveto
   fill
} bind def

/sld {  % usage:  y dx sld  - slide
  x exch sub exch moveto
  -7.20 -4.80 rmoveto
  1.80 -0.70 4.50 0.20 7.20 4.80 rcurveto
  -2.07 -5.00 -5.40 -6.80 -7.65 -6.00 rcurveto
   fill
} bind def

/emb {  % usage:  y emb  - empahsis bar
  gsave 1.4 setlinewidth 1 setlinecap x exch moveto 
 -3.5 0 rmoveto 7 0 rlineto stroke grestore
} bind def

/trl {  % usage:  y trl  - trill sign
  gsave /Times-Roman-Bold-Italic 14 selectfont
  x 4 sub exch moveto (tr) show grestore
} bind def

/hld {  % usage:  y hld  - hold sign
  x exch 2 copy 1.5 add 1.3 0 360 arc moveto
  -7.50 0.00 rmoveto
  0.00 11.50 15.00 11.50 15.00 0.00 rcurveto
  -0.25 0.00 rlineto
  -1.25 9.00 -13.25 9.00 -14.50 0.00 rcurveto
   fill
} bind def
/segno { % segno symbol usage: y segno
  x 3.75 sub exch
  gsave translate
  5.82 0.84 moveto
  4.62 1.15   5.04 3.20   4.6 3.64 curveto
  4.17 4.08   3.19 2.75   3.9 1.51 curveto
  4.62 0.27   7.45 0.0    8.03 1.82 curveto
  8.61 3.64   5.06 7.81   3.38 9.67 curveto
  1.69 11.53  1.59 14.46  2.79 14.16 curveto
  3.99 13.85  3.55 11.80  4.00 11.36 curveto
  4.44 10.92  5.33 12.25  4.66 13.49 curveto
  3.99 14.73  1.15 15.0   0.57 13.18 curveto
  0.0  11.36  3.50 7.19   5.21 5.32  curveto
  6.92 3.46   7.01 0.53   5.82 0.84 curveto
  closepath fill
  -0.43 2.93 moveto
  8.79 12.25 lineto 9.32 11.72 lineto -0.09 2.40 lineto
  closepath fill
  0.71 7.50 1.0 0 360 arc
  closepath fill
  7.85 7.50 1.0 0 360 arc
  closepath fill
  grestore
} bind def

/coda { % coda : usage y coda
  x 7.5 sub exch
  gsave
  translate
  1.0 setlinewidth
  0.0 7.5 moveto 15.0 7.5 lineto stroke
  7.5 0.0 moveto 7.5 15.0 lineto stroke
  7.5 7.5 5.0 0 360 arc stroke
  grestore
} bind def


/dnb {  % usage:  y dnb  - down bow
  x exch moveto
  -3.20 0.00 rmoveto
  0.00 7.20 rlineto
  6.40 0.00 rlineto
  0.00 -7.20 rlineto
   currentpoint stroke moveto
  -6.40 4.80 rmoveto
  0.00 2.40 rlineto
  6.40 0.00 rlineto
  0.00 -2.40 rlineto
   fill
} bind def

/upb {  % usage:  y upb  - up bow
  x exch moveto
  -2.56 8.80 rmoveto
  2.56 -8.80 rlineto
  2.56 8.80 rlineto
   stroke
} bind def

/hl {  % usage: y hl  - helper line at height y
   gsave 1 setlinewidth x exch moveto 
   -5.0 0 rmoveto 10 0 rlineto stroke grestore
} bind def

/hl1 {  % usage: y hl1  - longer helper line
   gsave 1 setlinewidth x exch moveto 
   -6 0 rmoveto 12 0 rlineto stroke grestore
} bind def

/f1u {  % usage:  len f1u  - single flag up
  y add x 3.5 add exch moveto
  0.00 0.00 rmoveto
  1.00 -2.00 0.67 -1.67 2.67 -4.00 rcurveto
  3.33 -2.67 3.33 -6.67 2.67 -9.33 rcurveto
  -0.67 -2.67 -2.67 -4.00 -1.00 -1.00 rcurveto
  1.67 4.33 -1.67 8.33 -4.33 9.00 rcurveto
   fill
} bind def

/f1d {  % usage:  len f1d  - single flag down
  neg y add x 3.5 sub exch moveto
  0.00 -0.00 rmoveto
  1.20 2.00 0.80 1.67 3.20 4.00 rcurveto
  4.00 2.67 4.00 6.67 3.20 9.33 rcurveto
  -0.80 2.67 -3.20 4.00 -1.20 1.00 rcurveto
  2.00 -4.33 -2.00 -8.33 -5.20 -9.00 rcurveto
   fill
} bind def

/f2u {  % usage:  len f2u  - double flag up
  y add x 3.5 add exch moveto
  0.00 0.00 rmoveto
  1.33 -3.33 6.00 -4.00 5.00 -12.00 rcurveto
  0.00 6.00 -4.00 7.67 -5.00 7.67 rcurveto
  1.33 -5.00 6.00 -5.00 5.00 -13.00 rcurveto
  0.00 6.00 -4.00 7.67 -5.00 8.00 rcurveto
   fill
} bind def

/f2d {  % usage:  len f2d  - double flag down
  neg y add x 3.5 sub exch moveto
  0.00 -0.00 rmoveto
  1.60 3.33 7.20 4.00 6.00 12.00 rcurveto
  0.00 -6.00 -4.80 -7.67 -6.00 -7.67 rcurveto
  1.60 5.00 7.20 5.00 6.00 13.00 rcurveto
  0.00 -6.00 -4.80 -7.67 -6.00 -8.00 rcurveto
   fill
} bind def

/xfu {  % usage:  len xfu  - extra flag up
  y add x 3.5 add exch moveto
  0.00 0.00 rmoveto
  1.33 -5.00 6.00 -5.00 5.00 -13.00 rcurveto
  0.00 6.00 -4.00 7.67 -5.00 8.00 rcurveto
   fill
} bind def

/xfd {  % usage:  len xfd  - extra flag down
  neg y add x 3.5 sub exch moveto
  0.00 -0.00 rmoveto
  1.60 5.00 7.20 5.00 6.00 13.00 rcurveto
  0.00 -6.00 -4.80 -7.67 -6.00 -8.00 rcurveto
   fill
} bind def

/f3d {dup f2d 9.5 sub xfd} bind def

/f4d {dup dup f2d 9.5 sub xfd 14.7 sub xfd} bind def

/f3u {dup f2u 9.5 sub xfu} bind def

/f4u {dup dup f2u 9.5 sub xfu 14.7 sub xfu} bind def

/ft0 { % usage:  x y ft0  - flat sign
  moveto
  -1.60 2.67 rmoveto
  6.40 3.11 6.40 -3.56 0.00 -6.67 rcurveto
  4.80 4.00 4.80 7.56 0.00 5.78 rcurveto
  currentpoint fill moveto
  0.00 7.11 rmoveto
  0.00 -12.44 rlineto
  stroke
 } bind def

/hft0 { % usage:  x y hft0  - half flat sign
 2 copy ft0 moveto
    -4.0 2.5 rmoveto
8.00 6.00 rlineto
  stroke
 } bind def
/ft { % usage: dx ft  - flat relative to head
 neg x add y ft0 } bind def
/hft { % usage: dx ft  - half flat relative to head
 neg x add y hft0 } bind def

/ftx { % usage:  x y ftx  - narrow flat sign
  moveto
  -1.42 2.67 rmoveto
  5.69 3.11 5.69 -3.56 0.00 -6.67 rcurveto
  4.27 4.00 4.27 7.56 0.00 5.78 rcurveto
  currentpoint fill moveto
  0.00 7.11 rmoveto
  0.00 -12.44 rlineto
  stroke
 } bind def
/dft0 { % usage: x y dft0 ft  - double flat sign
  2 copy exch 2.5 sub exch ftx exch 1.5 add exch ftx } bind def
/dft { % usage: dx dft  - double flat relative to head
  neg x add y dft0 } bind def

/hsh0 {  % usage:  x y hsh0  - half sharp sign
  moveto
  2.60 2.89 rmoveto
  0.00 2.17 rlineto
  -5.20 -1.44 rlineto
  0.00 -2.17 rlineto
  5.20 1.44 rlineto
  0.00 -6.50 rmoveto
  0.00 2.17 rlineto
  -5.20 -1.44 rlineto
  0.00 -2.17 rlineto
  5.20 1.44 rlineto
  currentpoint fill moveto
  -1.30 -3.61 rmoveto
  0.00 15.53 rlineto
  stroke
 } bind def

/sh0 {  % usage:  x y sh0  - sharp sign
 2 copy hsh0 moveto
  -1.30 -8.31 rmoveto
  0.00 15.53 rlineto
  stroke
 } bind def
/sh { % usage: dx sh  - sharp relative to head
 neg x add y sh0 } bind def
/hsh { % usage: dx sh  - half sharp relative to head
 neg x add y hsh0 } bind def

/nt0 {  % usage:  x y nt0  - neutral sign
  moveto
  -1.62 -4.33 rmoveto
  3.25 0.72 rlineto
  0.00 2.17 rlineto
  -3.25 -0.72 rlineto
  0.00 6.50 rlineto
  0.00 -2.89 rmoveto
  3.25 0.72 rlineto
  0.00 2.17 rlineto
  -3.25 -0.72 rlineto
  0.00 -2.17 rlineto
  currentpoint fill moveto
  0.00 6.50 rmoveto
  0.00 -11.92 rlineto
  currentpoint stroke moveto
  3.25 7.94 rmoveto
  0.00 -11.92 rlineto
  stroke
 } bind def
/nt { % usage: dx nt  - neutral relative to head
 neg x add y nt0 } bind def

/dsh0 {  % usage:  x y dsh0  - double sharp 
  moveto
  0.39 0.00 rmoveto
  1.78 1.67 rlineto
  1.17 0.00 rlineto
  0.11 1.78 rlineto
  -1.78 -0.11 rlineto
  0.00 -1.17 rlineto
  -1.67 -1.78 rlineto
  -1.67 1.78 rlineto
  0.00 1.17 rlineto
  -1.78 0.11 rlineto
  0.11 -1.78 rlineto
  1.17 0.00 rlineto
  1.78 -1.67 rlineto
  -1.78 -1.67 rlineto
  -1.17 0.00 rlineto
  -0.11 -1.78 rlineto
  1.78 0.11 rlineto
  0.00 1.17 rlineto
  1.67 1.78 rlineto
  1.67 -1.78 rlineto
  0.00 -1.17 rlineto
  1.78 -0.11 rlineto
  -0.11 1.78 rlineto
  -1.17 0.00 rlineto
  -1.78 1.67 rlineto
  fill
 } bind def
/dsh { % usage: dx dsh  - double sharp relative to head
 neg x add y dsh0 } bind def

/ach { % usage: x y (str) ach  -- draw accomp chord string
  3 1 roll moveto rshow
} bind def

/ann { % usage: x y (str) ach  -- draw annotation text string
  3 1 roll moveto rshow
} bind def

/r4 {  % usage:  x y r4  -  quarter rest
   dup /y exch def exch dup /x exch def exch moveto
  -0.52 8.87 rmoveto
  8.35 -6.78 -2.61 -4.70 3.91 -11.48 rcurveto
  -4.43 1.57 -6.00 -3.13 -2.87 -5.22 rcurveto
  -5.22 2.09 -3.65 7.83 0.00 7.30 rcurveto
  -5.22 4.17 3.13 3.13 -1.04 9.39 rcurveto
  fill
 } bind def

/r8 {  % usage:  x y r8  -  eighth rest
   dup /y exch def exch dup /x exch def exch moveto
  3.11 5.44 rmoveto
  -1.17 -1.94 -1.94 -3.50 -3.69 -3.89 rcurveto
  2.14 2.72 -2.92 3.89 -2.92 1.17 rcurveto
  0.00 -1.17 1.17 -1.94 2.33 -1.94 rcurveto
  2.72 0.00 3.11 1.94 3.89 3.50 rcurveto
  -3.42 -12.06 rlineto
  0.51 0.00 rlineto
  3.50 13.22 rlineto
  fill
 } bind def

/r16 {  % usage:  x y r16  -  16th rest
   dup /y exch def exch dup /x exch def exch moveto
  3.11 5.44 rmoveto
  -1.17 -1.94 -1.94 -3.50 -3.69 -3.89 rcurveto
  2.14 2.72 -2.92 3.89 -2.92 1.17 rcurveto
  0.00 -1.17 1.17 -1.94 2.33 -1.94 rcurveto
  2.72 0.00 3.11 1.94 3.89 3.50 rcurveto
  -1.24 -4.28 rlineto
  -1.17 -1.94 -1.94 -3.50 -3.69 -3.89 rcurveto
  2.14 2.72 -2.92 3.89 -2.92 1.17 rcurveto
  0.00 -1.17 1.17 -1.94 2.33 -1.94 rcurveto
  2.72 0.00 3.11 1.94 4.01 3.50 rcurveto
  -1.91 -7.00 rlineto
  0.51 0.00 rlineto
  3.50 13.61 rlineto
  fill
 } bind def

/r1 {  % usage:  x y r1  -  whole rest
  dup /y exch def exch dup /x exch def exch moveto
  -3 6 rmoveto 0 -3 rlineto 6 0 rlineto 0 3 rlineto fill
} bind def

/r2 {  % usage:  x y r2  -  half rest
  dup /y exch def exch dup /x exch def exch moveto
  -3 0 rmoveto 0 3 rlineto 6 0 rlineto 0 -3 rlineto fill
} bind def

/r32 {
2 copy r16 5.5 add exch 1.6 add exch r8
} bind def

/r64 {
2 copy 5.5 add exch 1.6 add exch r16
5.5 sub exch 1.5 sub exch r16
} bind def

/bar {  % usage: x bar  - single bar
  0 moveto  0 24 rlineto stroke
} bind def

/dbar {  % usage: x dbar  - thin double bar
   0 moveto 0 24 rlineto -3 -24 rmoveto
   0 24 rlineto stroke
} bind def

/fbar1 {  % usage: x fbar1  - thick+thin double bar at start
  0 moveto  0 24 rlineto 3 0 rlineto 0 -24 rlineto 
  currentpoint fill moveto
  3 0 rmoveto 0 24 rlineto stroke
} bind def

/fbar2 {  % usage: x fbar2  - thin+thick double bar at end
  0 moveto  0 24 rlineto -3 0 rlineto 0 -24 rlineto 
  currentpoint fill moveto
  -3 0 rmoveto 0 24 rlineto stroke
} bind def

/fbar3 {  % usage: x fbar3  - thin+thick+thin bar in middle
  0 moveto 0 24 rlineto -3 0 rlineto 0 -24 rlineto 
  currentpoint fill moveto
 -3 0 rmoveto 0  24 rlineto currentpoint moveto
  9 0 rmoveto 0 -24 rlineto currentpoint moveto stroke
} bind def

/rdots {  % usage: x rdots  - repeat dots 
  0 moveto 0 9 rmoveto currentpoint 2 copy 1.2 0 360 arc 
  moveto 0 6 rmoveto  currentpoint 1.2 0 360 arc fill
} bind def

/end1 {  % usage: x1 x2 (str) end1  - mark first ending
  3 1 roll 38 moveto 0 12 rlineto dup 50 lineto 0 -12 rlineto stroke
  1 add 42 moveto gsave /Times-Roman 10 selectfont 1.2 0.95 scale
  show grestore
} bind def

/end2 {  % usage: x1 x2 (str) end2  - mark second ending
  3 1 roll 50 moveto dup 50 lineto 0 -12 rlineto stroke
  1 add 42 moveto gsave /Times-Roman 10 selectfont 1.2 0.95 scale
  show grestore
} bind def

/gn1 {  % usage: x y l gnt  - grace note w. tail
  3 1 roll 2 copy moveto
  -1.29 1.53 rmoveto
  2.45 2.06 5.02 -1.00 2.58 -3.06 rcurveto
  -2.45 -2.06 -5.02 1.00 -2.58 3.06 rcurveto
  fill moveto 2.00 0 rmoveto 0 exch rlineto
3 -4 4 -5 2 -8 rcurveto -5 2 rmoveto 7 4 rlineto   
stroke
} bind def

/gnt {  % usage: x y l gnt  - grace note
  3 1 roll 2 copy moveto
  -1.29 1.53 rmoveto
  2.45 2.06 5.02 -1.00 2.58 -3.06 rcurveto
  -2.45 -2.06 -5.02 1.00 -2.58 3.06 rcurveto
  fill moveto 2.00 0 rmoveto 0 exch rlineto stroke
} bind def

/gbm2 {  % usage: x1 y1 x2 y2 gbm2  - double note beam
  gsave 1.4 setlinewidth
  4 copy 0.5 sub moveto 0.5 sub lineto stroke
  3.4 sub moveto 3.4 sub lineto stroke grestore
} bind def

/gbm3 {  % usage: x1 y1 x2 y2 gbm3  - triple gnote beam
  gsave 1.2 setlinewidth
  4 copy 0.3 sub moveto 0.3 sub lineto stroke
  4 copy 2.5 sub moveto 2.5 sub lineto stroke
  4.7 sub moveto 4.7 sub lineto stroke grestore
} bind def

/ghl {  % usage: x y ghl  - grace note helper line
   gsave 0.7 setlinewidth moveto 
   -3 0 rmoveto 6 0 rlineto stroke grestore
} bind def

/gsl {  % usage: x1 y2 x2 y2 x3 y3 x0 y0 gsl
  moveto curveto stroke
} bind def

/gsh0 {  % usage: x y gsh0
gsave translate 0.7 0.7 scale 0 0 sh0 grestore
} bind def

/ghsh0 {  % usage: x y gsh0
gsave translate 0.7 0.7 scale 0 0 hsh0 grestore
} bind def

/gft0 {  % usage: x y gft0
gsave translate 0.7 0.7 scale 0 0 ft0 grestore
} bind def

/ghft0 {  % usage: x y ghft0
gsave translate 0.7 0.7 scale 0 0 hft0 grestore
} bind def

/gnt0 {  % usage: x y gnt0
gsave translate 0.7 0.7 scale 0 0 nt0 grestore
} bind def

/gdf0 {  % usage: x y gdf0
gsave translate 0.7 0.6 scale 0 0 dft0 grestore
} bind def

/gds0 {  % usage: x y gds0
gsave translate 0.7 0.7 scale 0 0 dsh0 grestore
} bind def

/csig {  % usage:  x csig  - C timesig 
  0 moveto
  1.00 17.25 rmoveto
  1.00 0.00 2.75 -0.75 2.75 -3.00 rcurveto
  0.00 1.50 -1.50 1.25 -1.50 0.00 rcurveto
  0.00 -1.25 1.75 -1.25 1.75 0.25 rcurveto
  0.00 2.50 -1.50 3.25 -3.00 3.25 rcurveto
  -3.75 0.00 -6.25 -2.75 -6.25 -6.50 rcurveto
  0.00 -3.00 3.75 -7.50 9.00 -2.50 rcurveto
  -4.25 -3.00 -7.25 -0.75 -7.25 2.50 rcurveto
  0.00 3.00 1.00 6.00 4.50 6.00 rcurveto
   fill
} bind def

/ctsig {  % usage:  x ctsig  - C| timesig 
  dup csig 4 moveto 0 16 rlineto stroke
} bind def

/nsig {  % usage:  x nsig  - no timesig 
  0 moveto
   
} bind def

/sep0 { % usage: x1 x2 sep0  - hline separator 
   0 moveto 0 lineto stroke
} bind def

/tsig { % usage: x (top) (bot) tsig -- draw time signature
   3 -1 roll 0 moveto /bx false def
   gsave /Times-Courier 16 selectfont 1.2 1 scale
   0 1.0 rmoveto currentpoint 3 -1 roll cshow
   moveto 0 12 rmoveto cshow grestore
} bind def

/staff {  % usage: l staff  - draw staff
  gsave 0.6 setlinewidth 0 0 moveto
  dup 0 rlineto dup neg 6 rmoveto
  dup 0 rlineto dup neg 6 rmoveto
  dup 0 rlineto dup neg 6 rmoveto
  dup 0 rlineto dup neg 6 rmoveto
  dup 0 rlineto dup neg 6 rmoveto
  pop stroke grestore
} bind def

/bracehalf {
  6.48 60.00 rmoveto
  -12.78 -21.00 8.82 -43.00 -7.38 -60.00 rcurveto
  -0.36 0.00 rlineto
  12.96 13.00 -8.64 39.00 7.56 60.00 rcurveto
  fill
} bind def

/brace {   % usage: scale x0 y0 brace
   3 copy moveto gsave 1 exch scale bracehalf grestore
   moveto gsave neg 1 exch scale bracehalf grestore
} bind def

/brackhead {
  -3.00 0.00 rmoveto
  5.00 0.00 7.00 1.00 8.50 5.00 rcurveto
  0.40 -0.30 rlineto
  -1.20 -3.50 -2.70 -5.10 -6.90 -5.90 rcurveto
  fill
} bind def

/bracket {   % usage: h x0 y0 bracket
   3 copy moveto 0 exch rmoveto brackhead
   3 copy moveto pop gsave 1 -1 scale brackhead grestore 
   moveto -3 0 rlineto 0 exch rlineto 3 0 rlineto fill
} bind def 

/WS {   %usage:  w nspaces str WS
   dup stringwidth pop 4 -1 roll
   sub neg 3 -1 roll div 0 8#040 4 -1 roll
   widthshow
} bind def

/W1 { show pop pop } bind def

/str 50 string def
/W0 {
   dup stringwidth pop str cvs exch show (  ) show show pop pop
} bind def

/WC { counttomark 1 sub dup 0 eq { 0 }
  {  ( ) stringwidth pop neg 0 3 -1 roll
  {  dup 3 add index stringwidth pop ( ) stringwidth pop add
  dup 3 index add 4 index lt 2 index 1 lt or
  {3 -1 roll add exch 1 add} {pop exit} ifelse
  } repeat } ifelse
} bind def

/P1 {
  {  WC dup 0 le {exit} if
      exch pop gsave { exch show ( ) show } repeat grestore LF
   } loop pop pop pop pop
} bind def

/P2 {
   {  WC dup 0 le {exit} if
      dup 1 sub dup 0 eq
      { pop exch pop 0.0 }
      { 3 2 roll 3 index exch sub exch div } ifelse
      counttomark 3 sub 2 index eq { pop 0 } if exch gsave
      {  3 2 roll show ( ) show dup 0 rmoveto } repeat
      grestore LF pop
   } loop pop pop pop pop
} bind def

0 setlinecap 0 setlinejoin 0.8 setlinewidth

/T {translate} bind def
/M {moveto} bind def
%%EndSetup

% --- page 1
%%Page: 1 1
%%BeginPageSetup
gsave 42.53 783.59 translate
%%EndPageSetup


% --- tune 1 Green Island Serenade
0 -16.00 T
16.0 0 F12 (Green Island Serenade) 266.5 0 M cshow
0 -12.00 T
12.0 0 F11 (绿岛小夜曲) 266.5 0 M cshow
0 -12.00 T
12.0 0 F11 (Lǜ Dǎo Xiǎoyèqǔ) 266.5 0 M cshow
0 -12.00 T
12.0 0 F11 (Зелёный Остров) 266.5 0 M cshow
0 -12.00 T
12.0 0 F11 (جزيرة اخضرة) 266.5 0 M cshow
11.0 0 F13 0 -11.00 T
533.0 0 M (Chen Chang-shou) lshow

% --- ln 1 vc 1 
0 -29.05 T
gsave 0.700 0.700 scale 0.80 setlinewidth
 0.00 0 T 761.40 staff
7.0 tclef
22.5 24 sh0 29.5 15 sh0 41.5 (4) (4) tsig
56.6 -12 hd 20.0 su -6 hl -12 hl
67.7 bar
/x 67.70 def
81.4 9 hd 8.0 0.0 dt 20.0 su
101.9 12 hd 20.0 su 20.0 f1u
119.7 9 hd 20.0 su
133.7 3 hd 20.0 su
144.7 bar
/x 144.73 def
157.6 0 hd 20.0 su
171.7 3.0 10.0 gnt 178.8 0.0 10.0 gnt 173.7 13.0 180.8 10.0 gbm2 187.9 -3 hd 20.5 su
201.2 0 hd 19.5 su
191.4 17.5 204.7 19.5 2.6 bm
214.8 3 hd 8.0 0.0 dt 20.0 su
236.1 0 hd 20.0 su 20.0 f1u
251.1 bar
/x 251.15 def
263.7 -3 hd 20.0 su 20.0 f1u
282.7 -3 hd 20.0 su
297.6 -9 hd 20.0 su 20.0 f1u -6 hl
316.4 -12 hd 8.0 3.0 dt 20.0 su -6 hl -12 hl
336.8 -9 hd 20.0 su 20.0 f1u -6 hl
351.9 bar
/x 351.88 def
364.9 -12 Hd 20.0 su -6 hl -12 hl
389.07 12 r2
414.6 bar
/x 414.59 def
428.2 -9 hd 8.0 0.0 dt 20.0 su -6 hl
448.9 -12 hd 20.0 su 20.0 f1u -6 hl -12 hl
466.6 -9 hd 20.0 su -6 hl
481.0 -3 hd 20.0 su
491.6 bar
/x 491.63 def
504.3 0 hd 20.0 su
518.6 3.0 10.0 gnt 525.7 0.0 10.0 gnt 520.6 13.0 527.7 10.0 gbm2 534.9 -3 hd 20.4 su
549.2 0 hd 19.6 su
538.4 17.4 552.7 19.6 2.6 bm
562.6 3 hd 8.0 0.0 dt 20.0 su
581.7 9 hd 20.0 su 20.0 f1u
597.9 bar
/x 597.93 def
610.8 0 hd 20.0 su 20.0 f1u
630.1 0 hd 20.0 su
643.5 3 hd 20.0 su 20.0 f1u
662.7 9 hd 8.0 0.0 dt 20.0 su
682.4 12 hd 20.0 su 20.0 f1u
698.7 bar
/x 698.69 def
712.3 9 Hd 20.0 su
736.32 12 r2
761.4 bar
/x 761.40 def

14.0 0 F12 77.4 33.0 (D) ach 115.7 33.0 (\(F#m\)) ach 153.6 31.0 (A7) ach 210.8 31.0 (Bm) ach 259.7 31.0 (G) ach 312.4 31.0 (D) ach 360.9 31.0 (D) ach 385.1 31.0 (\(A7\)) ach 424.2 31.0 (G) ach 500.3 31.0 (A7) ach 558.6 31.0 (D) ach 606.8 31.0 (Em) ach 658.7 33.0 (A7) ach 708.3 33.0 (D) ach 732.3 31.0 (\(A7\)) ach 12.0 0 F11 grestore
0 -12.25 T

% --- ln 2 vc 1 
0 -29.05 T
gsave 0.700 0.700 scale 0.80 setlinewidth
761.40 staff
7.0 tclef
22.5 24 sh0 29.5 15 sh0 41.9 bar
/x 41.89 def
55.1 12 hd 20.0 sd 20.0 f1d
67.9 12 hd 20.0 sd
82.2 9 hd 20.0 su 20.0 f1u
100.2 3 hd 20.0 su
114.7 3 hd 19.5 su
127.0 0 hd 20.5 su
118.2 22.5 130.5 20.5 2.6 bm
137.3 bar
/x 137.35 def
150.1 -3 hd 20.5 su
163.7 0 hd 19.5 su
153.6 17.5 167.2 19.5 2.6 bm
176.7 3 hd 21.4 su
189.8 9 hd 189.8 -3 hd 30.6 su
180.2 24.4 193.3 27.6 2.6 bm
202.7 3 Hd 20.0 su
226.1 bar
/x 226.05 def
238.6 0 hd 20.0 su 20.0 f1u
258.0 0 hd 20.0 su
271.1 -3 hd 20.0 su 20.0 f1u
289.7 -9 hd 19.5 su -6 hl
302.8 -12 hd 20.5 su -6 hl -12 hl
293.2 10.5 306.3 8.5 2.6 bm
316.9 -9 hd 21.6 su -6 hl
329.3 -3 hd 18.6 su
320.4 12.6 332.8 15.6 2.6 bm
339.4 bar
/x 339.44 def
352.7 0 Hd 20.0 su
375.69 12 r2
394.1 bar
/x 394.12 def
406.7 3 hd 20.0 su 20.0 f1u
426.1 3 hd 20.0 su
440.1 0 hd 20.0 su 20.0 f1u
458.4 3 hd 21.6 su
470.7 9 hd 18.6 su
461.9 24.6 474.2 27.6 2.6 bm
484.2 3 hd 20.0 su
494.8 bar
/x 494.85 def
508.3 0 hd 20.5 su
520.7 3 hd 19.5 su
511.8 20.5 524.2 22.5 2.6 bm
533.8 0 hd 19.5 su
547.7 -3 hd 20.5 su
537.3 19.5 551.2 17.5 2.6 bm
559.6 -9 Hd 20.0 su -6 hl
579.0 bar
/x 578.98 def
591.2 -12 hd 34.6 su -6 hl -12 hl
604.4 9 hd 18.6 su
594.7 22.6 607.9 27.6 2.6 bm
617.3 3 hd 19.5 su
631.0 0 hd 20.5 su
620.8 22.5 634.5 20.5 2.6 bm
643.8 9 hd 20.5 su
657.4 12 hd 19.5 su
647.3 29.5 660.9 31.5 2.6 bm
670.5 3 hd 19.5 su
682.7 0 hd 20.5 su
674.0 22.5 686.2 20.5 2.6 bm
693.2 bar
/x 693.25 def
705.1 0.0 10.0 gn1 714.7 -3 Hd 20.0 su
735.93 12 r2
761.4 fbar2
/x 761.40 def

14.0 0 F12 51.1 31.0 (G) ach 96.2 31.0 (D) ach 146.1 31.0 (Bm) ach 198.7 31.0 (F#m) ach 234.6 31.0 (Em) ach 285.7 31.0 (G) ach 348.7 31.0 (A7) ach 402.7 31.0 (D) ach 454.4 31.0 (Bm) ach 504.3 31.0 (Em) ach 555.6 31.0 (G) ach 587.2 31.0 (D) ach 639.8 33.5 (A7) ach 710.7 31.0 (D) ach 12.0 0 F11 grestore
0 -12.25 T

% --- ln 3 vc 1 
0 -29.05 T
gsave 0.700 0.700 scale 0.80 setlinewidth
761.40 staff
7.0 tclef
22.5 24 sh0 29.5 15 sh0 43.3 fbar1
/x 43.34 def
64.3 12 hd 8.0 3.0 dt 19.6 sd
87.5 12 hd 19.6 sd
60.8 -7.7 84.0 -7.7 -2.6 bm
78.0 -2.3 84.0 -2.3 -2.6 bm
102.9 12 hd 19.6 su
119.8 9 hd 20.4 su
106.4 31.6 123.3 29.4 2.6 bm
137.3 3 hd 20.0 su 20.0 f1u
158.5 3 hd 8.0 0.0 dt 20.0 su
180.8 bar
/x 180.78 def
196.8 0 hd 20.0 su 20.0 f1u
219.0 0 hd 20.0 su
239.0 -3 hd 20.0 su 20.0 f1u
259.7 -9 hd 19.6 su -6 hl
277.5 -12 hd 20.4 su -6 hl -12 hl
263.2 10.6 281.0 8.4 2.6 bm
294.0 -9 hd 21.3 su -6 hl
310.7 -3 hd 18.7 su
297.5 12.3 314.2 15.7 2.6 bm
325.1 bar
/x 325.11 def
342.0 0 Hd 20.0 su
375.42 12 r2
400.7 bar
/x 400.73 def
416.3 9 hd 8.0 0.0 dt 20.5 su
440.5 12 hd 19.9 su
419.8 29.5 444.0 31.9 2.6 bm
438.0 26.0 444.0 26.6 2.6 bm
456.2 9 hd 18.6 su
473.0 0 hd 23.3 su
459.7 27.6 476.5 23.3 2.6 bm
489.0 3 hd 20.0 su 20.0 f1u
511.8 3 hd 20.0 su
531.3 3 hd 20.0 su 20.0 f1u
549.8 bar
/x 549.82 def
565.2 0 hd 20.0 su 20.0 f1u
588.4 0 hd 20.0 su
608.4 -3 hd 20.0 su 20.0 f1u
629.4 -9 hd 20.0 su -6 hl
648.0 -3 hd 20.0 su
664.8 bar
/x 664.78 def
681.5 9 Hd 20.0 su
714.93 12 r4 6.5 3.0 dt
743.5 9 hd 20.0 su 20.0 f1u
761.4 bar
/x 761.40 def

14.0 0 F12 60.3 31.0 (G) ach 133.3 31.0 (D) ach 192.8 31.0 (Em) ach 255.7 31.0 (G) ach 338.0 31.0 (A7) ach 412.3 33.5 (D) ach 485.0 31.0 (F#m) ach 561.2 31.0 (Em) ach 625.4 31.0 (G) ach 677.5 33.0 (D) ach 710.9 31.0 (A7) ach 12.0 0 F11 grestore
0 -12.25 T

% --- ln 4 vc 1 
0 -29.05 T
gsave 0.700 0.700 scale 0.80 setlinewidth
761.40 staff
7.0 tclef
22.5 24 sh0 29.5 15 sh0 43.8 bar
/x 43.79 def
61.9 9 hd 20.0 su
76.7 12.0 10.0 gnt 84.0 9.0 10.0 gnt 78.7 22.0 86.0 19.0 gbm2 93.4 3 hd 21.2 su
112.2 9 hd 18.8 su
96.9 24.2 115.7 27.8 2.6 bm
130.8 12 hd 8.0 3.0 dt 20.0 su
160.9 18 hd 20.0 sd 20.0 f1d
175.8 bar
/x 175.77 def
193.4 9 hd 20.4 su
211.9 12 hd 19.6 su
196.9 29.4 215.4 31.6 2.6 bm
230.2 9 hd 18.8 su
248.4 3 hd 21.2 su
233.7 27.8 251.9 24.2 2.6 bm
266.2 0 Hd 20.0 su
294.2 bar
/x 294.24 def
311.2 3 hd 20.0 su
334.4 0 hd 19.6 su
351.7 -3 hd 20.4 su
337.9 19.6 355.2 17.4 2.6 bm
370.0 -9 hd 8.0 0.0 dt 20.0 su -6 hl
399.5 -3 hd 20.0 su 20.0 f1u
418.6 bar
/x 418.64 def
435.4 0 hd 20.0 su
452.2 3.0 10.0 gnt 459.9 0.0 10.0 gnt 454.2 13.0 461.9 10.0 gbm2 469.9 -3 hd 20.4 su
487.4 0 hd 19.6 su
473.4 17.4 490.9 19.6 2.6 bm
506.1 3 hd 8.0 0.0 dt 20.0 su
534.9 9 hd 20.0 su 20.0 f1u
554.5 bar
/x 554.51 def
573.5 12 hd 8.0 3.0 dt 20.0 sd
600.5 3 hd 20.0 su 20.0 f1u
623.0 0 hd 8.0 3.0 dt 20.0 su
652.5 3 hd 19.9 su
669.8 0 hd 20.7 su
656.0 22.9 673.3 20.7 2.6 bm
656.0 17.6 673.3 15.4 2.6 bm
683.5 bar
/x 683.52 def
702.6 -3 Hd 20.0 su
737.98 12 r4
761.4 fbar2
/x 761.40 def

14.0 0 F12 57.9 33.0 (D) ach 126.8 36.0 (G) ach 189.4 33.4 (D) ach 262.2 31.0 (Em) ach 307.2 31.0 (Bm) ach 366.0 31.0 (G) ach 431.4 31.0 (A7) ach 502.1 31.0 (D) ach 569.5 31.0 (G) ach 619.0 31.0 (A7) ach 698.6 31.0 (D) ach 12.0 0 F11 grestore
0 -12.25 T
12.0 0 F14 0 -13.20 T
50 0 M ( 这绿岛像一隻船     在月夜里摇呀摇) rshow
0 -13.20 T
50 0 M ( 姑娘哟妳也在我     的心海裡飘呀飘) rshow
0 -13.20 T
50 0 M ( 让我的歌声随那微风 吹開了妳的窗簾) rshow
0 -13.20 T
50 0 M ( 让我的衷情随那流水 不断的向妳倾诉) rshow
0 -13.20 T
50 0 M ( 椰子树的长影  掩不住我的情意) rshow
0 -13.20 T
50 0 M ( 明媚的月光    更照亮了我的心) rshow
0 -13.20 T
50 0 M ( 这绿岛的夜已经这样沉静) rshow
0 -13.20 T
50 0 M ( 姑娘哟妳为什么还是默默无语) rshow
0 -13.20 T
0 -13.20 T
50 0 M ( zhè lǜ dǎo xiàng yī zhī chuàn,         zài yué yè lǐ yáo ya yáo.) rshow
0 -13.20 T
50 0 M ( gū niang yo, nǐ ye zài wǒ              de xīn hǎi lǐ piao ya piao.) rshow
0 -13.20 T
50 0 M ( ràng wǒde ge sheng sui na wei feng,   chui kai le nǐ de chuang lian.) rshow
0 -13.20 T
50 0 M ( ràng wǒde zhong qing sui na liu shui, bu duan de xiang nǐ qing su.) rshow
0 -13.20 T
0 -13.20 T
50 0 M ( ye zi shu de chang ying     yan bu zhu wǒde qing yi;) rshow
0 -13.20 T
50 0 M ( mìng mèi de yuè guang       geng zhao liang le wǒde xīn.) rshow
0 -13.20 T
50 0 M ( zhe lǜ dao de ye yi jing zhe yang de chen jing) rshow
0 -13.20 T
50 0 M ( gū niang ya, nǐ wei shen ma hai shì muò muò wú yǚ?) rshow
0 -13.20 T
0 -13.20 T
50 0 M ( This Green Island is like a boat, floating in the moonlight,) rshow
0 -13.20 T
50 0 M ( My darling, you too are floating in the sea of my heart,) rshow
0 -13.20 T
50 0 M ( Let the sound of my song follow the breeze, blowing open the curtain of your window,) rshow
0 -13.20 T
50 0 M ( Let my love follow the flowing water, endlessly pouring out its feelings for you.) rshow
0 -13.20 T
0 -13.20 T
50 0 M ( The long shadows of the palm trees cannot conceal my love,) rshow
0 -13.20 T
50 0 M ( The bright beauty of the moonlight casts its brilliance into my heart.) rshow
0 -13.20 T
50 0 M ( This Green Island night is so calm and serene,) rshow
0 -13.20 T
50 0 M ( My darling, why are you silent, saying nothing?) rshow

%%PageTrailer
grestore
showpage
%EOF