Update of /project/gsharp/cvsroot/gsharp/Scores
In directory clnet:/tmp/cvs-serv11794/Scores
Modified Files:
dots.gsh
Log Message:
MORE DOTS
Well, actually, fix the dots that we already have. Rests have dots too,
but fortunately the computation for their dot's offset is slightly
easier.
--- /project/gsharp/cvsroot/gsharp/Scores/dots.gsh 2006/06/21 16:31:54 1.1
+++ /project/gsharp/cvsroot/gsharp/Scores/dots.gsh 2006/06/26 16:37:43 1.2
@@ -56,6 +56,14 @@
:head :FILLED
:accidentals :NATURAL
:dots 0 ]) ]
+ [GSHARP-BUFFER:REST
+ :xoffset 0
+ :notehead :FILLED
+ :rbeams 0
+ :lbeams 0
+ :dots 1
+ :staff #1#
+ :staff-pos 4 ]
[GSHARP-BUFFER:CLUSTER
:xoffset 0
:notehead :FILLED
@@ -81,6 +89,14 @@
:head :FILLED
:accidentals :NATURAL
:dots 0 ]) ]
+ [GSHARP-BUFFER:REST
+ :xoffset 0
+ :notehead :FILLED
+ :rbeams 1
+ :lbeams 0
+ :dots 1
+ :staff #1#
+ :staff-pos 4 ]
[GSHARP-BUFFER:CLUSTER
:xoffset 0
:notehead :FILLED
@@ -106,6 +122,14 @@
:head :FILLED
:accidentals :NATURAL
:dots 0 ]) ]
+ [GSHARP-BUFFER:REST
+ :xoffset 0
+ :notehead :HALF
+ :rbeams 0
+ :lbeams 0
+ :dots 1
+ :staff #1#
+ :staff-pos 4 ]
[GSHARP-BUFFER:CLUSTER
:xoffset 0
:notehead :FILLED
@@ -493,7 +517,16 @@
:staff #1#
:head :FILLED
:accidentals :NATURAL
- :dots 0 ]) ]) ]) ]
+ :dots 0 ]) ]) ]
+ [GSHARP-BUFFER:MELODY-BAR
+ :elements ([GSHARP-BUFFER:REST
+ :xoffset 0
+ :notehead :WHOLE
+ :rbeams 0
+ :lbeams 0
+ :dots 3
+ :staff #1#
+ :staff-pos 4 ]) ]) ]
:tail [GSHARP-BUFFER:SLICE
:bars ([GSHARP-BUFFER:MELODY-BAR
:elements COMMON-LISP:NIL ]) ] ])