[gsharp-cvs] CVS gsharp/Scores

crhodes crhodes at common-lisp.net
Wed Aug 8 10:52:55 UTC 2007


Update of /project/gsharp/cvsroot/gsharp/Scores
In directory clnet:/tmp/cvs-serv26788

Modified Files:
	humoresque.gsh 
Log Message:
Alter the ending of the humoresque slightly.


--- /project/gsharp/cvsroot/gsharp/Scores/humoresque.gsh	2006/05/28 21:38:21	1.1
+++ /project/gsharp/cvsroot/gsharp/Scores/humoresque.gsh	2007/08/08 10:52:55	1.2
@@ -7,16 +7,15 @@
    :left-offset 30
    :left-margin 20
    :staves (#1=[GSHARP-BUFFER:FIVELINE-STAFF
-                  :name "default staff"
-                  :clef [GSHARP-BUFFER:CLEF :name :TREBLE :lineno 2 ]
+                  :clef [GSHARP-BUFFER:CLEF :lineno 2 :name :TREBLE ]
                   :keysig [GSHARP-BUFFER:KEY-SIGNATURE
-                             :xoffset 0
                              :staff #1#
                              :alterations #(:SHARP :NATURAL :NATURAL :SHARP
-                                            :NATURAL :NATURAL :NATURAL) ] ])
+                                            :NATURAL :NATURAL :NATURAL)
+                             :xoffset 0 ]
+                  :name "default staff" ])
    :segments ([GSHARP-BUFFER:SEGMENT
                  :layers ([GSHARP-BUFFER:MELODY-LAYER
-                             :name "default layer"
                              :staves (#1#)
                              :head [GSHARP-BUFFER:SLICE
                                       :bars ([GSHARP-BUFFER:MELODY-BAR
@@ -24,1962 +23,2011 @@
                              :body [GSHARP-BUFFER:SLICE
                                       :bars ([GSHARP-BUFFER:MELODY-BAR
                                                 :elements ([GSHARP-BUFFER:CLUSTER
-                                                              :xoffset 0
+                                                              :stem-direction :AUTO
+                                                              :notes ([GSHARP-BUFFER:NOTE
+                                                                         :pitch 29
+                                                                         :staff #1#
+                                                                         :head :FILLED
+                                                                         :accidentals :NATURAL
+                                                                         :dots 0 ])
                                                               :notehead :FILLED
                                                               :rbeams 1
                                                               :lbeams 0
                                                               :dots 1
+                                                              :xoffset 0 ]
+                                                           [GSHARP-BUFFER:CLUSTER
                                                               :stem-direction :AUTO
                                                               :notes ([GSHARP-BUFFER:NOTE
-                                                                         :pitch 29
+                                                                         :pitch 30
                                                                          :staff #1#
                                                                          :head :FILLED
                                                                          :accidentals :NATURAL
-                                                                         :dots 0 ]) ]
-                                                           [GSHARP-BUFFER:CLUSTER
-                                                              :xoffset 0
+                                                                         :dots 0 ])
                                                               :notehead :FILLED
                                                               :rbeams 0
                                                               :lbeams 2
                                                               :dots 0
+                                                              :xoffset 0 ]
+                                                           [GSHARP-BUFFER:CLUSTER
                                                               :stem-direction :AUTO
                                                               :notes ([GSHARP-BUFFER:NOTE
-                                                                         :pitch 30
+                                                                         :pitch 29
                                                                          :staff #1#
                                                                          :head :FILLED
                                                                          :accidentals :NATURAL
-                                                                         :dots 0 ]) ]
-                                                           [GSHARP-BUFFER:CLUSTER
-                                                              :xoffset 0
+                                                                         :dots 0 ])
                                                               :notehead :FILLED
                                                               :rbeams 1
                                                               :lbeams 0
                                                               :dots 1
+                                                              :xoffset 0 ]
+                                                           [GSHARP-BUFFER:CLUSTER
                                                               :stem-direction :AUTO
                                                               :notes ([GSHARP-BUFFER:NOTE
-                                                                         :pitch 29
+                                                                         :pitch 30
                                                                          :staff #1#
                                                                          :head :FILLED
                                                                          :accidentals :NATURAL
-                                                                         :dots 0 ]) ]
-                                                           [GSHARP-BUFFER:CLUSTER
-                                                              :xoffset 0
+                                                                         :dots 0 ])
                                                               :notehead :FILLED
                                                               :rbeams 0
                                                               :lbeams 2
                                                               :dots 0
+                                                              :xoffset 0 ]
+                                                           [GSHARP-BUFFER:CLUSTER
                                                               :stem-direction :AUTO
                                                               :notes ([GSHARP-BUFFER:NOTE
-                                                                         :pitch 30
+                                                                         :pitch 31
                                                                          :staff #1#
                                                                          :head :FILLED
-                                                                         :accidentals :NATURAL
-                                                                         :dots 0 ]) ]
-                                                           [GSHARP-BUFFER:CLUSTER
-                                                              :xoffset 0
+                                                                         :accidentals :SHARP
+                                                                         :dots 0 ])
                                                               :notehead :FILLED
                                                               :rbeams 1
                                                               :lbeams 0
                                                               :dots 1
+                                                              :xoffset 0 ]
+                                                           [GSHARP-BUFFER:CLUSTER
                                                               :stem-direction :AUTO
                                                               :notes ([GSHARP-BUFFER:NOTE
-                                                                         :pitch 31
+                                                                         :pitch 33
                                                                          :staff #1#
                                                                          :head :FILLED
-                                                                         :accidentals :SHARP
-                                                                         :dots 0 ]) ]
-                                                           [GSHARP-BUFFER:CLUSTER
-                                                              :xoffset 0
+                                                                         :accidentals :NATURAL
+                                                                         :dots 0 ])
                                                               :notehead :FILLED
                                                               :rbeams 0
                                                               :lbeams 2
                                                               :dots 0
+                                                              :xoffset 0 ]
+                                                           [GSHARP-BUFFER:CLUSTER
                                                               :stem-direction :AUTO
                                                               :notes ([GSHARP-BUFFER:NOTE
-                                                                         :pitch 33
+                                                                         :pitch 34
                                                                          :staff #1#
                                                                          :head :FILLED
                                                                          :accidentals :NATURAL
-                                                                         :dots 0 ]) ]
-                                                           [GSHARP-BUFFER:CLUSTER
-                                                              :xoffset 0
+                                                                         :dots 0 ])
                                                               :notehead :FILLED
                                                               :rbeams 1
                                                               :lbeams 0
                                                               :dots 1
+                                                              :xoffset 0 ]
+                                                           [GSHARP-BUFFER:CLUSTER
                                                               :stem-direction :AUTO
                                                               :notes ([GSHARP-BUFFER:NOTE
-                                                                         :pitch 34
+                                                                         :pitch 33
                                                                          :staff #1#
                                                                          :head :FILLED
                                                                          :accidentals :NATURAL
-                                                                         :dots 0 ]) ]
-                                                           [GSHARP-BUFFER:CLUSTER
-                                                              :xoffset 0
+                                                                         :dots 0 ])
                                                               :notehead :FILLED
                                                               :rbeams 0
                                                               :lbeams 2
                                                               :dots 0
+                                                              :xoffset 0 ]) ]
+                                             [GSHARP-BUFFER:MELODY-BAR
+                                                :elements ([GSHARP-BUFFER:CLUSTER
                                                               :stem-direction :AUTO
                                                               :notes ([GSHARP-BUFFER:NOTE
-                                                                         :pitch 33
+                                                                         :pitch 36
                                                                          :staff #1#
                                                                          :head :FILLED
                                                                          :accidentals :NATURAL
-                                                                         :dots 0 ]) ]) ]
-                                             [GSHARP-BUFFER:MELODY-BAR
-                                                :elements ([GSHARP-BUFFER:CLUSTER
-                                                              :xoffset 0
+                                                                         :dots 0 ])
                                                               :notehead :FILLED
                                                               :rbeams 1
                                                               :lbeams 0
                                                               :dots 1
+                                                              :xoffset 0 ]
+                                                           [GSHARP-BUFFER:CLUSTER
                                                               :stem-direction :AUTO
                                                               :notes ([GSHARP-BUFFER:NOTE
-                                                                         :pitch 36
+                                                                         :pitch 35
                                                                          :staff #1#
                                                                          :head :FILLED
-                                                                         :accidentals :NATURAL
-                                                                         :dots 0 ]) ]
-                                                           [GSHARP-BUFFER:CLUSTER
-                                                              :xoffset 0
+                                                                         :accidentals :SHARP
+                                                                         :dots 0 ])
                                                               :notehead :FILLED
                                                               :rbeams 0
                                                               :lbeams 2
                                                               :dots 0
+                                                              :xoffset 0 ]
+                                                           [GSHARP-BUFFER:CLUSTER
                                                               :stem-direction :AUTO
                                                               :notes ([GSHARP-BUFFER:NOTE
-                                                                         :pitch 35
+                                                                         :pitch 37
                                                                          :staff #1#
                                                                          :head :FILLED
-                                                                         :accidentals :SHARP
-                                                                         :dots 0 ]) ]
-                                                           [GSHARP-BUFFER:CLUSTER
-                                                              :xoffset 0
+                                                                         :accidentals :NATURAL
+                                                                         :dots 0 ])
                                                               :notehead :FILLED
                                                               :rbeams 1
                                                               :lbeams 0
                                                               :dots 1
+                                                              :xoffset 0 ]
+                                                           [GSHARP-BUFFER:CLUSTER
                                                               :stem-direction :AUTO
                                                               :notes ([GSHARP-BUFFER:NOTE
-                                                                         :pitch 37
+                                                                         :pitch 36
                                                                          :staff #1#
                                                                          :head :FILLED
                                                                          :accidentals :NATURAL
-                                                                         :dots 0 ]) ]
-                                                           [GSHARP-BUFFER:CLUSTER
-                                                              :xoffset 0
+                                                                         :dots 0 ])
                                                               :notehead :FILLED
                                                               :rbeams 0
                                                               :lbeams 2
                                                               :dots 0
+                                                              :xoffset 0 ]
+                                                           [GSHARP-BUFFER:CLUSTER
                                                               :stem-direction :AUTO
                                                               :notes ([GSHARP-BUFFER:NOTE
-                                                                         :pitch 36
+                                                                         :pitch 35
                                                                          :staff #1#
                                                                          :head :FILLED
-                                                                         :accidentals :NATURAL
-                                                                         :dots 0 ]) ]
-                                                           [GSHARP-BUFFER:CLUSTER
-                                                              :xoffset 0
+                                                                         :accidentals :SHARP
+                                                                         :dots 0 ])
                                                               :notehead :FILLED
                                                               :rbeams 1
                                                               :lbeams 0
                                                               :dots 1
+                                                              :xoffset 0 ]
+                                                           [GSHARP-BUFFER:CLUSTER
                                                               :stem-direction :AUTO
                                                               :notes ([GSHARP-BUFFER:NOTE
-                                                                         :pitch 35
+                                                                         :pitch 37
                                                                          :staff #1#
                                                                          :head :FILLED
-                                                                         :accidentals :SHARP
-                                                                         :dots 0 ]) ]
-                                                           [GSHARP-BUFFER:CLUSTER
-                                                              :xoffset 0
+                                                                         :accidentals :NATURAL
+                                                                         :dots 0 ])
                                                               :notehead :FILLED
                                                               :rbeams 0
                                                               :lbeams 2
                                                               :dots 0
+                                                              :xoffset 0 ]
+                                                           [GSHARP-BUFFER:CLUSTER
                                                               :stem-direction :AUTO
                                                               :notes ([GSHARP-BUFFER:NOTE
-                                                                         :pitch 37
+                                                                         :pitch 36
                                                                          :staff #1#
                                                                          :head :FILLED
                                                                          :accidentals :NATURAL
-                                                                         :dots 0 ]) ]
-                                                           [GSHARP-BUFFER:CLUSTER
-                                                              :xoffset 0
+                                                                         :dots 0 ])
                                                               :notehead :FILLED
                                                               :rbeams 1
                                                               :lbeams 0
                                                               :dots 1
+                                                              :xoffset 0 ]
+                                                           [GSHARP-BUFFER:CLUSTER
                                                               :stem-direction :AUTO
                                                               :notes ([GSHARP-BUFFER:NOTE
-                                                                         :pitch 36
+                                                                         :pitch 34
                                                                          :staff #1#
                                                                          :head :FILLED
                                                                          :accidentals :NATURAL
-                                                                         :dots 0 ]) ]
-                                                           [GSHARP-BUFFER:CLUSTER
-                                                              :xoffset 0
+                                                                         :dots 0 ])
                                                               :notehead :FILLED
                                                               :rbeams 0
                                                               :lbeams 2
                                                               :dots 0
+                                                              :xoffset 0 ]) ]
+                                             [GSHARP-BUFFER:MELODY-BAR
+                                                :elements ([GSHARP-BUFFER:CLUSTER
                                                               :stem-direction :AUTO
                                                               :notes ([GSHARP-BUFFER:NOTE
-                                                                         :pitch 34
+                                                                         :pitch 33
                                                                          :staff #1#
                                                                          :head :FILLED
                                                                          :accidentals :NATURAL
-                                                                         :dots 0 ]) ]) ]
-                                             [GSHARP-BUFFER:MELODY-BAR
-                                                :elements ([GSHARP-BUFFER:CLUSTER
-                                                              :xoffset 0
+                                                                         :dots 0 ])
                                                               :notehead :FILLED
                                                               :rbeams 1
                                                               :lbeams 0
                                                               :dots 1
+                                                              :xoffset 0 ]
+                                                           [GSHARP-BUFFER:CLUSTER
                                                               :stem-direction :AUTO
                                                               :notes ([GSHARP-BUFFER:NOTE
                                                                          :pitch 33
                                                                          :staff #1#
                                                                          :head :FILLED
                                                                          :accidentals :NATURAL
-                                                                         :dots 0 ]) ]
-                                                           [GSHARP-BUFFER:CLUSTER
-                                                              :xoffset 0
+                                                                         :dots 0 ])
                                                               :notehead :FILLED
                                                               :rbeams 0
                                                               :lbeams 2
                                                               :dots 0
+                                                              :xoffset 0 ]
+                                                           [GSHARP-BUFFER:CLUSTER
                                                               :stem-direction :AUTO
                                                               :notes ([GSHARP-BUFFER:NOTE
-                                                                         :pitch 33
+                                                                         :pitch 34
                                                                          :staff #1#
                                                                          :head :FILLED
                                                                          :accidentals :NATURAL
-                                                                         :dots 0 ]) ]
-                                                           [GSHARP-BUFFER:CLUSTER
-                                                              :xoffset 0
+                                                                         :dots 0 ])
                                                               :notehead :FILLED
                                                               :rbeams 1
                                                               :lbeams 0
                                                               :dots 1
+                                                              :xoffset 0 ]
+                                                           [GSHARP-BUFFER:CLUSTER
                                                               :stem-direction :AUTO
                                                               :notes ([GSHARP-BUFFER:NOTE
-                                                                         :pitch 34
+                                                                         :pitch 33
                                                                          :staff #1#
                                                                          :head :FILLED
                                                                          :accidentals :NATURAL
-                                                                         :dots 0 ]) ]
-                                                           [GSHARP-BUFFER:CLUSTER
-                                                              :xoffset 0
+                                                                         :dots 0 ])
                                                               :notehead :FILLED
                                                               :rbeams 0
                                                               :lbeams 2
                                                               :dots 0
+                                                              :xoffset 0 ]
+                                                           [GSHARP-BUFFER:CLUSTER
                                                               :stem-direction :AUTO
                                                               :notes ([GSHARP-BUFFER:NOTE
-                                                                         :pitch 33
+                                                                         :pitch 36
                                                                          :staff #1#
                                                                          :head :FILLED
                                                                          :accidentals :NATURAL
-                                                                         :dots 0 ]) ]
-                                                           [GSHARP-BUFFER:CLUSTER
-                                                              :xoffset 0
+                                                                         :dots 0 ])
                                                               :notehead :FILLED
                                                               :rbeams 1
                                                               :lbeams 0
                                                               :dots 1
+                                                              :xoffset 0 ]
+                                                           [GSHARP-BUFFER:CLUSTER
                                                               :stem-direction :AUTO
                                                               :notes ([GSHARP-BUFFER:NOTE
-                                                                         :pitch 36
+                                                                         :pitch 34
                                                                          :staff #1#
                                                                          :head :FILLED
                                                                          :accidentals :NATURAL
-                                                                         :dots 0 ]) ]
-                                                           [GSHARP-BUFFER:CLUSTER
-                                                              :xoffset 0

[2300 lines skipped]




More information about the Gsharp-cvs mailing list