From: fred <fred>
Date: Tue, 5 Nov 1996 19:10:32 +0000 (+0000)
Subject: lilypond-0.0.8
X-Git-Tag: release/1.5.59~6892
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=e2b4cd321331698fbd2985de476fe90b6b33ec18;p=lilypond.git

lilypond-0.0.8
---

diff --git a/lilyponddefs.tex b/lilyponddefs.tex
index 45152140cb..41748636de 100644
--- a/lilyponddefs.tex
+++ b/lilyponddefs.tex
@@ -70,18 +70,26 @@
 \vskip 40pt\par\vbox{\hbox to 0pt{\vrule width30pt height1pt\hss}}\par\vskip 40pt
 }
 \def\interscoreline{\beauty}
-%
-% a staffsymbol with #1 lines, width #2
-% bottom at baseline
-\def\linestafsym#1#2{\vbox to 0pt{\hbox to 0pt%
-  {\vbox to 0pt{\vss%
-	\kern-\interstaffrule
+
+
+\def\lines#1#2{%
+ \vbox{\kern-\interstaffrule
 	\n=0\nointerlineskip%
 	\loop\ifnum\n<#1\advance\n by1%
-		\kern\interstaffrule \hrule height \staffrulethickness	width#2
+		\kern\interstaffrule
+		\hrule height \staffrulethickness width#2
 		\repeat
-	}%
-\hss}}}
+	}}
+
+\def\toplines#1{ % why space needed here?
+	\vbox to 0pt{\hbox{\kern-6pt\lines{#1}{12pt}}\vss}}
+\def\botlines#1{ % idem ditto
+	\vbox to 0pt{\vss\hbox{\kern-6pt\lines{#1}{12pt}}}}
+
+%
+% a staffsymbol with #1 lines, width #2
+% bottom at baseline
+\def\linestafsym#1#2{\hbox to 0pt{\vbox to 0pt{\vss\lines{#1}{#2}}\hss}}
 
 \def\vcenter#1{\vbox to 0pt{\vss #1\vss}}
 \def\topalign#1{\vbox to 0pt{#1\vss}}
diff --git a/request.cc b/request.cc
index fd032fcfd8..35a9ae9718 100644
--- a/request.cc
+++ b/request.cc
@@ -41,13 +41,13 @@ Note_req::height() const
     return  s + octave*7;
 }
 
-/****************************************************************/
 Rhythmic_req::Rhythmic_req(Voice_element*v)
      :Request(v)
 {
     balltype = 1;
     dots = 0;
 }
+
 void
 Rhythmic_req::print() const
 {
@@ -57,6 +57,7 @@ Rhythmic_req::print() const
 	mtor << '.';
     mtor<<"\n";
 }
+
 void
 Note_req::print() const
 {
diff --git a/symbol.ini b/symbol.ini
index 39553133ec..ea303b04f1 100644
--- a/symbol.ini
+++ b/symbol.ini
@@ -13,6 +13,11 @@ table balls
 	4	\quartball	0pt	6pt	-2.5pt	2.5pt
 end
 
+table streepjes
+	toplines	\toplines{%}	-6pt	6pt 0pt	0pt
+	botlines	\botlines{%}	-6pt	6pt 0pt	0pt
+end
+
 table bars
 	empty	\emptybar	0pt	0pt	0pt	0pt
 	|	\maatstreep	0pt	1pt 	-12pt	12pt