* Add scripts.lvide and scripts.rvide signs to the parmesan font

mf/feta-schrift.mf

Index: mf/feta-schrift.mf
diff --git a/mf/feta-schrift.mf b/mf/feta-schrift.mf
index 7fd09c134199d7cc69dd90e0279e9e16f12be6ea..69cd87c026eb249ba279b610cd9ba7243f2c3f23 100644
--- a/mf/feta-schrift.mf
+++ b/mf/feta-schrift.mf
@@ -1181,6 +1181,57 @@ fet_beginchar ("Varied Coda", "varcoda");
 fet_endchar;
 
 
+def draw_vide =
+	save videradius;
+
+	videradius# = staff_space#;
+	define_pixels (videradius);
+
+	set_char_box (videradius#, videradius#, videradius#, videradius#);
+
+	path p[];
+
+	x1 = -videradius;
+	y2 = videradius;
+	y1 = 0;
+	x2 = 0;
+	z3 = -z1;
+	z4 = -z2;
+	penlabels (1, 2, 3, 4);
+
+	x5 = x6 = x8 = x9 = videradius/8;
+	y5 = -y9 = videradius/4;
+	y6 = -y8 = -x7 = videradius*3/4;
+	y7 = 0;
+	p0 = z1{up} .. z2{right} .. z3{down} .. z4{left} .. cycle;
+	p1 = z5 .. (videradius, y5);
+	p2 = z9 .. (videradius, y9);
+	(t0, t1) = p0 intersectiontimes p1;
+	(t2, t3) = p0 intersectiontimes p2;
+	
+	draw subpath (0, t0) of p0 
+	     -- subpath (t1, 0) of p1
+	     -- z6
+	     -- z7
+	     -- z8 -- z9
+             -- subpath (0, t3) of p2
+	     -- subpath (t2, length(p0)) of p0 -- cycle
+enddef;
+
+
+fet_beginchar ("vide left", "rvide");
+	draw_vide;
+fet_endchar;
+
+
+fet_beginchar ("vide right", "lvide");
+	draw_vide;
+	xy_mirror_char;
+fet_endchar;
+
+
+
+
 def draw_comma =
 	save alpha, thick, thin, ht;