[gsharp-cvs] CVS gsharp/Scores
rstrandh
rstrandh at common-lisp.net
Wed Jun 14 05:01:32 UTC 2006
Update of /project/gsharp/cvsroot/gsharp/Scores
In directory clnet:/tmp/cvs-serv13018
Modified Files:
bach-suite-iv-prelude.gsh
Log Message:
Bug fixes and more bars.
--- /project/gsharp/cvsroot/gsharp/Scores/bach-suite-iv-prelude.gsh 2006/06/13 04:21:49 1.1
+++ /project/gsharp/cvsroot/gsharp/Scores/bach-suite-iv-prelude.gsh 2006/06/14 05:01:31 1.2
@@ -1,7 +1,7 @@
G#V4
[GSHARP-BUFFER:BUFFER
- :min-width 17
+ :min-width 12
:spacing-style 0.4
:right-edge 700
:left-offset 30
@@ -3149,6 +3149,14 @@
:head :FILLED
:accidentals :NATURAL
:dots 0 ]) ]
+ [GSHARP-BUFFER:REST
+ :xoffset 0
+ :notehead :FILLED
+ :rbeams 2
+ :lbeams 0
+ :dots 0
+ :staff #2#
+ :staff-pos 4 ]
[GSHARP-BUFFER:CLUSTER
:xoffset 0
:notehead :FILLED
@@ -3293,36 +3301,29 @@
:accidentals :NATURAL
:dots 0 ]) ]) ]
[GSHARP-BUFFER:MELODY-BAR
- :elements COMMON-LISP:NIL ]) ]
- :tail [GSHARP-BUFFER:SLICE
- :bars ([GSHARP-BUFFER:MELODY-BAR
- :elements COMMON-LISP:NIL ]) ] ]
- [GSHARP-BUFFER:MELODY-LAYER
- :name "treble"
- :staves (#1#)
- :head [GSHARP-BUFFER:SLICE
- :bars ([GSHARP-BUFFER:MELODY-BAR
- :elements COMMON-LISP:NIL ]) ]
- :body [GSHARP-BUFFER:SLICE
- :bars ([GSHARP-BUFFER:MELODY-BAR
- :elements ([GSHARP-BUFFER:REST
+ :elements ([GSHARP-BUFFER:CLUSTER
:xoffset 0
:notehead :FILLED
:rbeams 2
:lbeams 0
:dots 0
- :staff #1#
- :staff-pos 4 ]
+ :stem-direction :AUTO
+ :notes ([GSHARP-BUFFER:NOTE
+ :pitch 23
+ :staff #2#
+ :head :FILLED
+ :accidentals :NATURAL
+ :dots 0 ]) ]
[GSHARP-BUFFER:CLUSTER
:xoffset 0
:notehead :FILLED
:rbeams 2
- :lbeams 0
+ :lbeams 2
:dots 0
:stem-direction :AUTO
:notes ([GSHARP-BUFFER:NOTE
:pitch 28
- :staff #1#
+ :staff #2#
:head :FILLED
:accidentals :NATURAL
:dots 0 ]) ]
@@ -3334,8 +3335,8 @@
:dots 0
:stem-direction :AUTO
:notes ([GSHARP-BUFFER:NOTE
- :pitch 29
- :staff #1#
+ :pitch 24
+ :staff #2#
:head :FILLED
:accidentals :NATURAL
:dots 0 ]) ]
@@ -3347,8 +3348,8 @@
:dots 0
:stem-direction :AUTO
:notes ([GSHARP-BUFFER:NOTE
- :pitch 30
- :staff #1#
+ :pitch 28
+ :staff #2#
:head :FILLED
:accidentals :NATURAL
:dots 0 ]) ]
@@ -3360,8 +3361,8 @@
:dots 0
:stem-direction :AUTO
:notes ([GSHARP-BUFFER:NOTE
- :pitch 31
- :staff #1#
+ :pitch 23
+ :staff #2#
:head :FILLED
:accidentals :NATURAL
:dots 0 ]) ]
@@ -3373,8 +3374,8 @@
:dots 0
:stem-direction :AUTO
:notes ([GSHARP-BUFFER:NOTE
- :pitch 32
- :staff #1#
+ :pitch 28
+ :staff #2#
:head :FILLED
:accidentals :NATURAL
:dots 0 ]) ]
@@ -3386,8 +3387,8 @@
:dots 0
:stem-direction :AUTO
:notes ([GSHARP-BUFFER:NOTE
- :pitch 33
- :staff #1#
+ :pitch 22
+ :staff #2#
:head :FILLED
:accidentals :NATURAL
:dots 0 ]) ]
@@ -3399,8 +3400,8 @@
:dots 0
:stem-direction :AUTO
:notes ([GSHARP-BUFFER:NOTE
- :pitch 31
- :staff #1#
+ :pitch 28
+ :staff #2#
:head :FILLED
:accidentals :NATURAL
:dots 0 ]) ]
@@ -3410,12 +3411,12 @@
:rbeams 2
:lbeams 0
:dots 0
- :stem-direction :UP
+ :stem-direction :AUTO
:notes ([GSHARP-BUFFER:NOTE
- :pitch 34
- :staff #1#
+ :pitch 21
+ :staff #2#
:head :FILLED
- :accidentals :FLAT
+ :accidentals :NATURAL
:dots 0 ]) ]
[GSHARP-BUFFER:CLUSTER
:xoffset 0
@@ -3425,8 +3426,8 @@
:dots 0
:stem-direction :AUTO
:notes ([GSHARP-BUFFER:NOTE
- :pitch 35
- :staff #1#
+ :pitch 28
+ :staff #2#
:head :FILLED
:accidentals :NATURAL
:dots 0 ]) ]
@@ -3438,10 +3439,10 @@
:dots 0
:stem-direction :AUTO
:notes ([GSHARP-BUFFER:NOTE
- :pitch 34
- :staff #1#
+ :pitch 22
+ :staff #2#
:head :FILLED
- :accidentals :FLAT
+ :accidentals :NATURAL
:dots 0 ]) ]
[GSHARP-BUFFER:CLUSTER
:xoffset 0
@@ -3451,8 +3452,8 @@
:dots 0
:stem-direction :AUTO
:notes ([GSHARP-BUFFER:NOTE
- :pitch 33
- :staff #1#
+ :pitch 28
+ :staff #2#
:head :FILLED
:accidentals :NATURAL
:dots 0 ]) ]
@@ -3464,8 +3465,8 @@
:dots 0
:stem-direction :AUTO
:notes ([GSHARP-BUFFER:NOTE
- :pitch 32
- :staff #1#
+ :pitch 23
+ :staff #2#
:head :FILLED
:accidentals :NATURAL
:dots 0 ]) ]
@@ -3477,8 +3478,8 @@
:dots 0
:stem-direction :AUTO
:notes ([GSHARP-BUFFER:NOTE
- :pitch 35
- :staff #1#
+ :pitch 28
+ :staff #2#
:head :FILLED
:accidentals :NATURAL
:dots 0 ]) ]
@@ -3490,10 +3491,10 @@
:dots 0
:stem-direction :AUTO
:notes ([GSHARP-BUFFER:NOTE
- :pitch 34
- :staff #1#
+ :pitch 24
+ :staff #2#
:head :FILLED
- :accidentals :FLAT
+ :accidentals :NATURAL
:dots 0 ]) ]
[GSHARP-BUFFER:CLUSTER
:xoffset 0
@@ -3503,8 +3504,8 @@
:dots 0
:stem-direction :AUTO
:notes ([GSHARP-BUFFER:NOTE
- :pitch 35
- :staff #1#
+ :pitch 28
+ :staff #2#
:head :FILLED
:accidentals :NATURAL
:dots 0 ]) ]) ]
@@ -3512,131 +3513,150 @@
:elements ([GSHARP-BUFFER:CLUSTER
:xoffset 0
:notehead :FILLED
- :rbeams 1
+ :rbeams 2
:lbeams 0
:dots 0
:stem-direction :AUTO
:notes ([GSHARP-BUFFER:NOTE
- :pitch 33
- :staff #1#
+ :pitch 27
+ :staff #2#
:head :FILLED
:accidentals :NATURAL
:dots 0 ]) ]
- [GSHARP-BUFFER:CLUSTER
+ [GSHARP-BUFFER:REST
:xoffset 0
:notehead :FILLED
:rbeams 1
- :lbeams 1
+ :lbeams 0
+ :dots 0
+ :staff #2#
+ :staff-pos 4 ]
+ [GSHARP-BUFFER:REST
+ :xoffset 0
+ :notehead :FILLED
+ :rbeams 0
+ :lbeams 0
+ :dots 0
+ :staff #2#
+ :staff-pos 4 ]) ]
+ [GSHARP-BUFFER:MELODY-BAR
+ :elements ([GSHARP-BUFFER:REST
+ :xoffset 0
+ :notehead :FILLED
+ :rbeams 2
+ :lbeams 0
+ :dots 0
+ :staff #2#
+ :staff-pos 4 ]
+ [GSHARP-BUFFER:CLUSTER
+ :xoffset 0
+ :notehead :FILLED
+ :rbeams 2
+ :lbeams 0
:dots 0
:stem-direction :AUTO
:notes ([GSHARP-BUFFER:NOTE
- :pitch 31
- :staff #1#
+ :pitch 25
+ :staff #2#
:head :FILLED
:accidentals :NATURAL
:dots 0 ]) ]
[GSHARP-BUFFER:CLUSTER
:xoffset 0
:notehead :FILLED
- :rbeams 1
- :lbeams 0
- :dots 1
+ :rbeams 2
+ :lbeams 2
+ :dots 0
:stem-direction :AUTO
:notes ([GSHARP-BUFFER:NOTE
- :pitch 38
- :staff #1#
+ :pitch 27
+ :staff #2#
:head :FILLED
:accidentals :NATURAL
:dots 0 ]) ]
[GSHARP-BUFFER:CLUSTER
:xoffset 0
:notehead :FILLED
- :rbeams 1
+ :rbeams 2
:lbeams 2
:dots 0
:stem-direction :AUTO
:notes ([GSHARP-BUFFER:NOTE
- :pitch 38
- :staff #1#
+ :pitch 29
+ :staff #2#
:head :FILLED
:accidentals :NATURAL
:dots 0 ]) ]
[GSHARP-BUFFER:CLUSTER
:xoffset 0
:notehead :FILLED
- :rbeams 1
+ :rbeams 2
:lbeams 0
- :dots 1
+ :dots 0
:stem-direction :AUTO
:notes ([GSHARP-BUFFER:NOTE
- :pitch 38
- :staff #1#
+ :pitch 27
+ :staff #2#
:head :FILLED
- :accidentals :NATURAL
+ :accidentals :FLAT
:dots 0 ]) ]
[GSHARP-BUFFER:CLUSTER
:xoffset 0
:notehead :FILLED
- :rbeams 1
+ :rbeams 2
:lbeams 2
:dots 0
:stem-direction :AUTO
:notes ([GSHARP-BUFFER:NOTE
- :pitch 39
- :staff #1#
+ :pitch 25
+ :staff #2#
:head :FILLED
:accidentals :NATURAL
:dots 0 ]) ]
[GSHARP-BUFFER:CLUSTER
:xoffset 0
:notehead :FILLED
- :rbeams 1
- :lbeams 0
- :dots 1
+ :rbeams 2
+ :lbeams 2
+ :dots 0
:stem-direction :AUTO
:notes ([GSHARP-BUFFER:NOTE
- :pitch 37
- :staff #1#
+ :pitch 27
+ :staff #2#
:head :FILLED
- :accidentals :NATURAL
+ :accidentals :FLAT
:dots 0 ]) ]
[GSHARP-BUFFER:CLUSTER
:xoffset 0
:notehead :FILLED
- :rbeams 1
+ :rbeams 2
:lbeams 2
:dots 0
:stem-direction :AUTO
:notes ([GSHARP-BUFFER:NOTE
- :pitch 38
- :staff #1#
+ :pitch 29
+ :staff #2#
:head :FILLED
:accidentals :NATURAL
[6341 lines skipped]
More information about the Gsharp-cvs
mailing list