lilypond-0.0.13

diff --git a/dimen.tex b/dimen.tex
index f0198c6c75ded6346ae631ac720b26c08911a47c..f1c9bad68672f9b4c6569d3524cd9d1a0f838e6d 100644 (file)
--- a/dimen.tex
+++ b/dimen.tex
@@ -1,7 +1,9 @@
 \font\musicfnt=musix20
-%\def\mb#1{{\musicfnt\musicfnt\char#1}}
-\font\slurfont=xslhz20
-\def\mb#1{{\musicfnt\slurfont\char#1}}
+\font\slurfont=xslhu20
+\def\thefont{\musicfnt}
+
+\def\mb#1{{\thefont\char#1}}
+
 \newdimen\wid
 \newdimen\inc
 \newdimen\here

diff --git a/kortjakje.ly b/kortjakje.ly
index c4c20cf1b7307cbb27a0d4af4010b30679690734..86835bf3b55bb7fda17b11603b1ae238fe4caa12 100644 (file)
--- a/kortjakje.ly
+++ b/kortjakje.ly
@@ -2,46 +2,46 @@
 % 
 % bare bones version. (written down from memory :-)
 
-melodie = voice {
-       $ \octave c
+melodie = $ \octave {c}
        %%% theme
-         c c   g g     a a     g2      f f     e e     d d  c2
+         c c g g       a a     g2      f f     e e     d d  c2
          g g   f f     e e     d d     g g     f f     e e     d d
        %%% var 1
          c r8 c8 (     ) g r8 g8 (     ) a r8 a8 (     ) g r4 
          f r8 f8 (     ) e4 r8 e8 (    ) d4 r8 d8 (    ) c4 r4
-       $
-}
+$
 
-begeleiding = voice {
-       $ \octave `c
+begeleiding = $
+       \octave {`c}
        %%% theme
        `c c    e c     f c     e c     d `b    c `a    `f `g   `c2
-       \octave `c
+       \octave {`c}
        e `g    d `g    c `g    `b `g   e `g    d `g    c `g    `b `g
        %%%% var 1
        r8 e8() c       r8 e8() c       r8 f8()c        r8 e8()c
        r8 d8()`b       r8 c8()`a       r8 `a8()`f      r8 `e8()`c
-       $
-}
+$
 
 
-score {
-       melodicstaff {
-               voice { melodie }
+bstaf = melodicstaff {
+               voices { begeleiding }
+               commands {
+                       clef bass
+               }
        }
-       melodicstaff {
-               voice { begeleiding }
+vstaf = melodicstaff {
+               voices { melodie }
        }
+
+
+score {
+       staff { vstaf }
+       staff { bstaf }
        paper {
-               unitspace 2.5cm
+%              unitspace 2.5cm
        }
        commands {
-               meter 2 4
-               clef bass
-               skip 2:0
-               clef violin
-%              skip 2:0
+               meter 2 4 
                skip 32:0
        }
 }