[gsharp-cvs] CVS update: gsharp/Fonts/charmap.mf gsharp/Fonts/ties.mf

Robert Strandh rstrandh at common-lisp.net
Fri Mar 26 14:25:35 UTC 2004


Update of /project/gsharp/cvsroot/gsharp/Fonts
In directory common-lisp.net:/tmp/cvs-serv22368

Modified Files:
	charmap.mf ties.mf 
Log Message:
Added the rest of the tie glyphs. 

Date: Fri Mar 26 09:25:35 2004
Author: rstrandh

Index: gsharp/Fonts/charmap.mf
diff -u gsharp/Fonts/charmap.mf:1.3 gsharp/Fonts/charmap.mf:1.4
--- gsharp/Fonts/charmap.mf:1.3	Thu Mar 25 07:53:16 2004
+++ gsharp/Fonts/charmap.mf	Fri Mar 26 09:25:34 2004
@@ -120,3 +120,103 @@
 global_variable(numeric)(small_tie_eight_down)(160)
 global_variable(numeric)(small_tie_eight_down_light)(161)
 
+global_variable(numeric)(large_tie_line_one_up)(162)
+global_variable(numeric)(large_tie_line_one_up_light)(163)
+global_variable(numeric)(large_tie_line_two_up)(164)
+global_variable(numeric)(large_tie_line_two_up_light)(165)
+global_variable(numeric)(large_tie_line_three_up)(166)
+global_variable(numeric)(large_tie_line_three_up_light)(167)
+global_variable(numeric)(large_tie_line_four_up)(168)
+global_variable(numeric)(large_tie_line_four_up_light)(169)
+global_variable(numeric)(large_tie_line_five_up)(170)
+global_variable(numeric)(large_tie_line_five_up_light)(171)
+global_variable(numeric)(large_tie_line_six_up)(172)
+global_variable(numeric)(large_tie_line_six_up_light)(173)
+global_variable(numeric)(large_tie_line_seven_up)(174)
+global_variable(numeric)(large_tie_line_seven_up_light)(175)
+global_variable(numeric)(large_tie_line_eight_up)(176)
+global_variable(numeric)(large_tie_line_eight_up_light)(177)
+global_variable(numeric)(large_tie_line_nine_up)(178)
+global_variable(numeric)(large_tie_line_nine_up_light)(179)
+global_variable(numeric)(large_tie_line_ten_up)(180)
+global_variable(numeric)(large_tie_line_ten_up_light)(181)
+global_variable(numeric)(large_tie_line_left_up)(182)
+global_variable(numeric)(large_tie_line_left_up_light)(183)
+global_variable(numeric)(large_tie_line_right_up)(184)
+global_variable(numeric)(large_tie_line_right_up_light)(185)
+
+global_variable(numeric)(large_tie_space_one_up)(186)
+global_variable(numeric)(large_tie_space_one_up_light)(187)
+global_variable(numeric)(large_tie_space_two_up)(188)
+global_variable(numeric)(large_tie_space_two_up_light)(189)
+global_variable(numeric)(large_tie_space_three_up)(190)
+global_variable(numeric)(large_tie_space_three_up_light)(191)
+global_variable(numeric)(large_tie_space_four_up)(192)
+global_variable(numeric)(large_tie_space_four_up_light)(193)
+global_variable(numeric)(large_tie_space_five_up)(194)
+global_variable(numeric)(large_tie_space_five_up_light)(195)
+global_variable(numeric)(large_tie_space_six_up)(196)
+global_variable(numeric)(large_tie_space_six_up_light)(197)
+global_variable(numeric)(large_tie_space_seven_up)(198)
+global_variable(numeric)(large_tie_space_seven_up_light)(199)
+global_variable(numeric)(large_tie_space_eight_up)(200)
+global_variable(numeric)(large_tie_space_eight_up_light)(201)
+global_variable(numeric)(large_tie_space_nine_up)(202)
+global_variable(numeric)(large_tie_space_nine_up_light)(203)
+global_variable(numeric)(large_tie_space_ten_up)(204)
+global_variable(numeric)(large_tie_space_ten_up_light)(205)
+global_variable(numeric)(large_tie_space_left_up)(206)
+global_variable(numeric)(large_tie_space_left_up_light)(207)
+global_variable(numeric)(large_tie_space_right_up)(208)
+global_variable(numeric)(large_tie_space_right_up_light)(209)
+
+global_variable(numeric)(large_tie_line_one_down)(210)
+global_variable(numeric)(large_tie_line_one_down_light)(211)
+global_variable(numeric)(large_tie_line_two_down)(212)
+global_variable(numeric)(large_tie_line_two_down_light)(213)
+global_variable(numeric)(large_tie_line_three_down)(214)
+global_variable(numeric)(large_tie_line_three_down_light)(215)
+global_variable(numeric)(large_tie_line_four_down)(216)
+global_variable(numeric)(large_tie_line_four_down_light)(217)
+global_variable(numeric)(large_tie_line_five_down)(218)
+global_variable(numeric)(large_tie_line_five_down_light)(219)
+global_variable(numeric)(large_tie_line_six_down)(220)
+global_variable(numeric)(large_tie_line_six_down_light)(221)
+global_variable(numeric)(large_tie_line_seven_down)(222)
+global_variable(numeric)(large_tie_line_seven_down_light)(223)
+global_variable(numeric)(large_tie_line_eight_down)(224)
+global_variable(numeric)(large_tie_line_eight_down_light)(225)
+global_variable(numeric)(large_tie_line_nine_down)(226)
+global_variable(numeric)(large_tie_line_nine_down_light)(227)
+global_variable(numeric)(large_tie_line_ten_down)(228)
+global_variable(numeric)(large_tie_line_ten_down_light)(229)
+global_variable(numeric)(large_tie_line_left_down)(230)
+global_variable(numeric)(large_tie_line_left_down_light)(231)
+global_variable(numeric)(large_tie_line_right_down)(232)
+global_variable(numeric)(large_tie_line_right_down_light)(233)
+
+global_variable(numeric)(large_tie_space_one_down)(234)
+global_variable(numeric)(large_tie_space_one_down_light)(235)
+global_variable(numeric)(large_tie_space_two_down)(236)
+global_variable(numeric)(large_tie_space_two_down_light)(237)
+global_variable(numeric)(large_tie_space_three_down)(238)
+global_variable(numeric)(large_tie_space_three_down_light)(239)
+global_variable(numeric)(large_tie_space_four_down)(240)
+global_variable(numeric)(large_tie_space_four_down_light)(241)
+global_variable(numeric)(large_tie_space_five_down)(242)
+global_variable(numeric)(large_tie_space_five_down_light)(243)
+global_variable(numeric)(large_tie_space_six_down)(244)
+global_variable(numeric)(large_tie_space_six_down_light)(245)
+global_variable(numeric)(large_tie_space_seven_down)(246)
+global_variable(numeric)(large_tie_space_seven_down_light)(247)
+global_variable(numeric)(large_tie_space_eight_down)(248)
+global_variable(numeric)(large_tie_space_eight_down_light)(249)
+global_variable(numeric)(large_tie_space_nine_down)(250)
+global_variable(numeric)(large_tie_space_nine_down_light)(251)
+global_variable(numeric)(large_tie_space_ten_down)(252)
+global_variable(numeric)(large_tie_space_ten_down_light)(253)
+global_variable(numeric)(large_tie_space_left_down)(254)
+global_variable(numeric)(large_tie_space_left_down_light)(255)
+global_variable(numeric)(large_tie_space_right_down)(256)
+global_variable(numeric)(large_tie_space_right_down_light)(257)
+


Index: gsharp/Fonts/ties.mf
diff -u gsharp/Fonts/ties.mf:1.2 gsharp/Fonts/ties.mf:1.3
--- gsharp/Fonts/ties.mf:1.2	Thu Mar 25 07:53:16 2004
+++ gsharp/Fonts/ties.mf	Fri Mar 26 09:25:35 2004
@@ -2,15 +2,13 @@
 
   local_variable(numeric)(tie_thickness)
     (round(0.33 * staff_line_distance));
-  local_variable(numeric)(top)
-    (round(0.33 * staff_line_distance)-1);
-  local_variable(numeric)(bot)
-    (round(0.33 * staff_line_distance));
   local_variable(numeric)(small_tie_height)
     (round(0.5 * staff_line_distance));
 
   save small_tie_up;
   def small_tie_up(expr width) =
+    local_variable(numeric)(top)
+      (round(0.33 * staff_line_distance)-1);
     fill ((0, top){right} ..
 	  (width, top-small_tie_height) --
 	  (width-1, top-small_tie_height) ..
@@ -24,20 +22,14 @@
 
   save small_tie_up_light;
   def small_tie_up_light(expr width) =
-    fill ((0, top){right} ..
-	  (width, top-small_tie_height) --
-	  (width-1, top-small_tie_height) ..
-	  (0.5*width, top-tie_thickness) ..
-	  (0, top-tie_thickness) ..
-	  (-0.5*width, top-tie_thickness) ..
-	  (-(width-1), top-small_tie_height) --
-	  (-width, top-small_tie_height) .. cycle)
-    scaled magnification;
+    small_tie_up(width);
     stripes(width, 2*tie_thickness);
   enddef;
 
   save small_tie_down;
   def small_tie_down(expr width) =
+    local_variable(numeric)(bot)
+      (round(0.33 * staff_line_distance));
     fill ((0, -bot){right} ..
           (width, small_tie_height-bot) --
 	  (width-1, small_tie_height-bot) ..
@@ -51,15 +43,7 @@
 
   save small_tie_down_light;
   def small_tie_down_light(expr width) =
-    fill ((0, -bot){right} ..
-          (width, small_tie_height-bot) --
-	  (width-1, small_tie_height-bot) ..
-	  (0.5*width, tie_thickness-bot) ..
-	  (0, tie_thickness-bot) ..
-	  (-0.5*width, tie_thickness-bot) ..
-	  (-(width-1), small_tie_height-bot) --
-	  (-width, small_tie_height-bot) .. cycle)
-    scaled magnification;
+    small_tie_down(width);
     stripes(width, 2*tie_thickness)
   enddef;
 
@@ -190,5 +174,571 @@
   begin_character(small_tie_eight_down_light)
     small_tie_down_light(round(2.67 * staff_line_distance));
   end_character;
+
+  local_variable(numeric)(large_tie_line_height)
+    (round(0.5 * staff_line_distance));
+
+  local_variable(numeric)(large_tie_space_height)
+    (round(0.5 * staff_line_distance));
+
+  save large_tie_up;
+  def large_tie_up(expr width_multiplier, height) =
+    local_variable(numeric)(top)
+      (round(0.33 * staff_line_distance)-1);
+    local_variable(numeric)(width)
+      (round(width_multiplier * staff_line_distance));
+    fill ((0, top){right} ..
+	  (width, top-height) --
+	  (width-1, top-height) ..
+	  (0.3*width, top-tie_thickness) ..
+	  (0, top-tie_thickness) ..
+	  (-0.3*width, top-tie_thickness) ..
+	  (-(width-1), top-height) --
+	  (-width, top-height) .. cycle)
+    scaled magnification;
+  enddef;
+
+  save large_tie_up_light;
+  def large_tie_up_light(expr width, height) =
+    large_tie_up(width, height);
+    stripes(width, 2*height);
+  enddef;
+
+  save large_tie_line_up;
+  def large_tie_line_up(expr width_multiplier) =
+    large_tie_up(width_multiplier, round(1.0 * staff_line_distance));
+  enddef;
+
+  save large_tie_line_up_light;
+  def large_tie_line_up_light(expr width_multiplier) =
+    large_tie_up_light(width_multiplier, round(1.0 * staff_line_distance));
+  enddef;
+
+  begin_character(large_tie_line_one_up)
+    large_tie_line_up(2.0);
+  end_character;
+
+  begin_character(large_tie_line_one_up_light)
+    large_tie_line_up_light(2.0);
+  end_character;
+
+  begin_character(large_tie_line_two_up)
+    large_tie_line_up(2.33);
+  end_character;
+
+  begin_character(large_tie_line_two_up_light)
+    large_tie_line_up_light(2.33);
+  end_character;
+
+  begin_character(large_tie_line_three_up)
+    large_tie_line_up(2.67);
+  end_character;
+
+  begin_character(large_tie_line_three_up_light)
+    large_tie_line_up_light(2.67);
+  end_character;
+
+  begin_character(large_tie_line_four_up)
+    large_tie_line_up(3.0);
+  end_character;
+
+  begin_character(large_tie_line_four_up_light)
+    large_tie_line_up_light(3.0);
+  end_character;
+
+  begin_character(large_tie_line_five_up)
+    large_tie_line_up(3.33);
+  end_character;
+
+  begin_character(large_tie_line_five_up_light)
+    large_tie_line_up_light(3.33);
+  end_character;
+
+  begin_character(large_tie_line_six_up)
+    large_tie_line_up(3.67);
+  end_character;
+
+  begin_character(large_tie_line_six_up_light)
+    large_tie_line_up_light(3.67);
+  end_character;
+
+  begin_character(large_tie_line_seven_up)
+    large_tie_line_up(4.0);
+  end_character;
+
+  begin_character(large_tie_line_seven_up_light)
+    large_tie_line_up_light(4.0);
+  end_character;
+
+  begin_character(large_tie_line_eight_up)
+    large_tie_line_up(4.33);
+  end_character;
+
+  begin_character(large_tie_line_eight_up_light)
+    large_tie_line_up_light(4.33);
+  end_character;
+
+  begin_character(large_tie_line_nine_up)
+    large_tie_line_up(4.67);
+  end_character;
+
+  begin_character(large_tie_line_nine_up_light)
+    large_tie_line_up_light(4.67);
+  end_character;
+
+  begin_character(large_tie_line_ten_up)
+    large_tie_line_up(5.0);
+  end_character;
+
+  begin_character(large_tie_line_ten_up_light)
+    large_tie_line_up_light(5.0);
+  end_character;
+
+  begin_character(large_tie_line_left_up)
+    large_tie_line_up(5.0);
+    erase fill ((0, -2 * staff_line_distance) -- 
+                (6 * staff_line_distance, -2 * staff_line_distance) --
+                (6 * staff_line_distance, 2 * staff_line_distance) --
+		(0, 2 * staff_line_distance) -- cycle)
+	      scaled magnification;
+  end_character;	    
+
+  begin_character(large_tie_line_left_up_light)
+    large_tie_line_up(5.0);
+    erase fill ((0, -2 * staff_line_distance) -- 
+                (6 * staff_line_distance, -2 * staff_line_distance) --
+                (6 * staff_line_distance, 2 * staff_line_distance) --
+		(0, 2 * staff_line_distance) -- cycle)
+	      scaled magnification;
+    stripes(6 * staff_line_distance, 2 * staff_line_distance);
+  end_character;	    
+
+  begin_character(large_tie_line_right_up)
+    large_tie_line_up(5.0);
+    erase fill ((0, -2 * staff_line_distance) -- 
+                (-6 * staff_line_distance, -2 * staff_line_distance) --
+                (-6 * staff_line_distance, 2 * staff_line_distance) --
+		(0, 2 * staff_line_distance) -- cycle)
+	      scaled magnification;
+  end_character;	    
+
+  begin_character(large_tie_line_right_up_light)
+    large_tie_line_up(5.0);
+    erase fill ((0, -2 * staff_line_distance) -- 
+                (-6 * staff_line_distance, -2 * staff_line_distance) --
+                (-6 * staff_line_distance, 2 * staff_line_distance) --
+		(0, 2 * staff_line_distance) -- cycle)
+	      scaled magnification;
+    stripes(6 * staff_line_distance, 2 * staff_line_distance);
+  end_character;	    
+
+  save large_tie_space_up;
+  def large_tie_space_up(expr width_multiplier) =
+    large_tie_up(width_multiplier, round(1.33 * staff_line_distance));
+  enddef;
+
+  save large_tie_space_up_light;
+  def large_tie_space_up_light(expr width_multiplier) =
+    large_tie_up_light(width_multiplier, round(1.33 * staff_line_distance));
+  enddef;
+
+  begin_character(large_tie_space_one_up)
+    large_tie_space_up(2.0);
+  end_character;
+
+  begin_character(large_tie_space_one_up_light)
+    large_tie_space_up_light(2.0);
+  end_character;
+
+  begin_character(large_tie_space_two_up)
+    large_tie_space_up(2.33);
+  end_character;
+
+  begin_character(large_tie_space_two_up_light)
+    large_tie_space_up_light(2.33);
+  end_character;
+
+  begin_character(large_tie_space_three_up)
+    large_tie_space_up(2.67);
+  end_character;
+
+  begin_character(large_tie_space_three_up_light)
+    large_tie_space_up_light(2.67);
+  end_character;
+
+  begin_character(large_tie_space_four_up)
+    large_tie_space_up(3.0);
+  end_character;
+
+  begin_character(large_tie_space_four_up_light)
+    large_tie_space_up_light(3.0);
+  end_character;
+
+  begin_character(large_tie_space_five_up)
+    large_tie_space_up(3.33);
+  end_character;
+
+  begin_character(large_tie_space_five_up_light)
+    large_tie_space_up_light(3.33);
+  end_character;
+
+  begin_character(large_tie_space_six_up)
+    large_tie_space_up(3.67);
+  end_character;
+
+  begin_character(large_tie_space_six_up_light)
+    large_tie_space_up_light(3.67);
+  end_character;
+
+  begin_character(large_tie_space_seven_up)
+    large_tie_space_up(4.0);
+  end_character;
+
+  begin_character(large_tie_space_seven_up_light)
+    large_tie_space_up_light(4.0);
+  end_character;
+
+  begin_character(large_tie_space_eight_up)
+    large_tie_space_up(4.33);
+  end_character;
+
+  begin_character(large_tie_space_eight_up_light)
+    large_tie_space_up_light(4.33);
+  end_character;
+
+  begin_character(large_tie_space_nine_up)
+    large_tie_space_up(4.67);
+  end_character;
+
+  begin_character(large_tie_space_nine_up_light)
+    large_tie_space_up_light(4.67);
+  end_character;
+
+  begin_character(large_tie_space_ten_up)
+    large_tie_space_up(5.0);
+  end_character;
+
+  begin_character(large_tie_space_ten_up_light)
+    large_tie_space_up_light(5.0);
+  end_character;
+
+  begin_character(large_tie_space_left_up)
+    large_tie_space_up(5.0);
+    erase fill ((0, -2 * staff_line_distance) -- 
+                (6 * staff_line_distance, -2 * staff_line_distance) --
+                (6 * staff_line_distance, 2 * staff_line_distance) --
+		(0, 2 * staff_line_distance) -- cycle)
+	      scaled magnification;
+  end_character;	    
+
+  begin_character(large_tie_space_left_up_light)
+    large_tie_space_up(5.0);
+    erase fill ((0, -2 * staff_line_distance) -- 
+                (6 * staff_line_distance, -2 * staff_line_distance) --
+                (6 * staff_line_distance, 2 * staff_line_distance) --
+		(0, 2 * staff_line_distance) -- cycle)
+	      scaled magnification;
+    stripes(6 * staff_line_distance, 2 * staff_line_distance);
+  end_character;	    
+
+  begin_character(large_tie_space_right_up)
+    large_tie_space_up(5.0);
+    erase fill ((0, -2 * staff_line_distance) -- 
+                (-6 * staff_line_distance, -2 * staff_line_distance) --
+                (-6 * staff_line_distance, 2 * staff_line_distance) --
+		(0, 2 * staff_line_distance) -- cycle)
+	      scaled magnification;
+  end_character;	    
+
+  begin_character(large_tie_space_right_up_light)
+    large_tie_space_up(5.0);
+    erase fill ((0, -2 * staff_line_distance) -- 
+                (-6 * staff_line_distance, -2 * staff_line_distance) --
+                (-6 * staff_line_distance, 2 * staff_line_distance) --
+		(0, 2 * staff_line_distance) -- cycle)
+	      scaled magnification;
+    stripes(6 * staff_line_distance, 2 * staff_line_distance);
+  end_character;	    
+
+  save large_tie_down;
+  def large_tie_down(expr width_multiplier, height) =
+    local_variable(numeric)(bot)
+      (round(0.33 * staff_line_distance));
+    local_variable(numeric)(width)
+      (round(width_multiplier * staff_line_distance));
+    fill ((0, -bot){right} ..
+	  (width, height-bot) --
+	  (width-1, height-bot) ..
+	  (0.3*width, tie_thickness-bot) ..
+	  (0, tie_thickness-bot) ..
+	  (-0.3*width, tie_thickness-bot) ..
+	  (-(width-1), height-bot) --
+	  (-width, height-bot) .. cycle)
+    scaled magnification;
+  enddef;
+
+  save large_tie_down_light;
+  def large_tie_down_light(expr width, height) =
+    large_tie_down(width, height);
+    stripes(width, 2*height);
+  enddef;
+
+  save large_tie_line_down;
+  def large_tie_line_down(expr width_multiplier) =
+    large_tie_down(width_multiplier, round(1.0 * staff_line_distance));
+  enddef;
+
+  save large_tie_line_down_light;
+  def large_tie_line_down_light(expr width_multiplier) =
+    large_tie_down_light(width_multiplier, round(1.0 * staff_line_distance));
+  enddef;
+
+  begin_character(large_tie_line_one_down)
+    large_tie_line_down(2.0);
+  end_character;
+
+  begin_character(large_tie_line_one_down_light)
+    large_tie_line_down_light(2.0);
+  end_character;
+
+  begin_character(large_tie_line_two_down)
+    large_tie_line_down(2.33);
+  end_character;
+
+  begin_character(large_tie_line_two_down_light)
+    large_tie_line_down_light(2.33);
+  end_character;
+
+  begin_character(large_tie_line_three_down)
+    large_tie_line_down(2.67);
+  end_character;
+
+  begin_character(large_tie_line_three_down_light)
+    large_tie_line_down_light(2.67);
+  end_character;
+
+  begin_character(large_tie_line_four_down)
+    large_tie_line_down(3.0);
+  end_character;
+
+  begin_character(large_tie_line_four_down_light)
+    large_tie_line_down_light(3.0);
+  end_character;
+
+  begin_character(large_tie_line_five_down)
+    large_tie_line_down(3.33);
+  end_character;
+
+  begin_character(large_tie_line_five_down_light)
+    large_tie_line_down_light(3.33);
+  end_character;
+
+  begin_character(large_tie_line_six_down)
+    large_tie_line_down(3.67);
+  end_character;
+
+  begin_character(large_tie_line_six_down_light)
+    large_tie_line_down_light(3.67);
+  end_character;
+
+  begin_character(large_tie_line_seven_down)
+    large_tie_line_down(4.0);
+  end_character;
+
+  begin_character(large_tie_line_seven_down_light)
+    large_tie_line_down_light(4.0);
+  end_character;
+
+  begin_character(large_tie_line_eight_down)
+    large_tie_line_down(4.33);
+  end_character;
+
+  begin_character(large_tie_line_eight_down_light)
+    large_tie_line_down_light(4.33);
+  end_character;
+
+  begin_character(large_tie_line_nine_down)
+    large_tie_line_down(4.67);
+  end_character;
+
+  begin_character(large_tie_line_nine_down_light)
+    large_tie_line_down_light(4.67);
+  end_character;
+
+  begin_character(large_tie_line_ten_down)
+    large_tie_line_down(5.0);
+  end_character;
+
+  begin_character(large_tie_line_ten_down_light)
+    large_tie_line_down_light(5.0);
+  end_character;
+
+  begin_character(large_tie_line_left_down)
+    large_tie_line_down(5.0);
+    erase fill ((0, -2 * staff_line_distance) -- 
+                (6 * staff_line_distance, -2 * staff_line_distance) --
+                (6 * staff_line_distance, 2 * staff_line_distance) --
+		(0, 2 * staff_line_distance) -- cycle)
+	      scaled magnification;
+  end_character;	    
+
+  begin_character(large_tie_line_left_down_light)
+    large_tie_line_down(5.0);
+    erase fill ((0, -2 * staff_line_distance) -- 
+                (6 * staff_line_distance, -2 * staff_line_distance) --
+                (6 * staff_line_distance, 2 * staff_line_distance) --
+		(0, 2 * staff_line_distance) -- cycle)
+	      scaled magnification;
+    stripes(6 * staff_line_distance, 2 * staff_line_distance);
+  end_character;	    
+
+  begin_character(large_tie_line_right_down)
+    large_tie_line_down(5.0);
+    erase fill ((0, -2 * staff_line_distance) -- 
+                (-6 * staff_line_distance, -2 * staff_line_distance) --
+                (-6 * staff_line_distance, 2 * staff_line_distance) --
+		(0, 2 * staff_line_distance) -- cycle)
+	      scaled magnification;
+  end_character;	    
+
+  begin_character(large_tie_line_right_down_light)
+    large_tie_line_down(5.0);
+    erase fill ((0, -2 * staff_line_distance) -- 
+                (-6 * staff_line_distance, -2 * staff_line_distance) --
+                (-6 * staff_line_distance, 2 * staff_line_distance) --
+		(0, 2 * staff_line_distance) -- cycle)
+	      scaled magnification;
+    stripes(6 * staff_line_distance, 2 * staff_line_distance);
+  end_character;	    
+
+  save large_tie_space_down;
+  def large_tie_space_down(expr width_multiplier) =
+    large_tie_down(width_multiplier, round(1.33 * staff_line_distance));
+  enddef;
+
+  save large_tie_space_down_light;
+  def large_tie_space_down_light(expr width_multiplier) =
+    large_tie_down_light(width_multiplier, round(1.33 * staff_line_distance));
+  enddef;
+
+  begin_character(large_tie_space_one_down)
+    large_tie_space_down(2.0);
+  end_character;
+
+  begin_character(large_tie_space_one_down_light)
+    large_tie_space_down_light(2.0);
+  end_character;
+
+  begin_character(large_tie_space_two_down)
+    large_tie_space_down(2.33);
+  end_character;
+
+  begin_character(large_tie_space_two_down_light)
+    large_tie_space_down_light(2.33);
+  end_character;
+
+  begin_character(large_tie_space_three_down)
+    large_tie_space_down(2.67);
+  end_character;
+
+  begin_character(large_tie_space_three_down_light)
+    large_tie_space_down_light(2.67);
+  end_character;
+
+  begin_character(large_tie_space_four_down)
+    large_tie_space_down(3.0);
+  end_character;
+
+  begin_character(large_tie_space_four_down_light)
+    large_tie_space_down_light(3.0);
+  end_character;
+
+  begin_character(large_tie_space_five_down)
+    large_tie_space_down(3.33);
+  end_character;
+
+  begin_character(large_tie_space_five_down_light)
+    large_tie_space_down_light(3.33);
+  end_character;
+
+  begin_character(large_tie_space_six_down)
+    large_tie_space_down(3.67);
+  end_character;
+
+  begin_character(large_tie_space_six_down_light)
+    large_tie_space_down_light(3.67);
+  end_character;
+
+  begin_character(large_tie_space_seven_down)
+    large_tie_space_down(4.0);
+  end_character;
+
+  begin_character(large_tie_space_seven_down_light)
+    large_tie_space_down_light(4.0);
+  end_character;
+
+  begin_character(large_tie_space_eight_down)
+    large_tie_space_down(4.33);
+  end_character;
+
+  begin_character(large_tie_space_eight_down_light)
+    large_tie_space_down_light(4.33);
+  end_character;
+
+  begin_character(large_tie_space_nine_down)
+    large_tie_space_down(4.67);
+  end_character;
+
+  begin_character(large_tie_space_nine_down_light)
+    large_tie_space_down_light(4.67);
+  end_character;
+
+  begin_character(large_tie_space_ten_down)
+    large_tie_space_down(5.0);
+  end_character;
+
+  begin_character(large_tie_space_ten_down_light)
+    large_tie_space_down_light(5.0);
+  end_character;
+
+  begin_character(large_tie_space_left_down)
+    large_tie_space_down(5.0);
+    erase fill ((0, -2 * staff_line_distance) -- 
+                (6 * staff_line_distance, -2 * staff_line_distance) --
+                (6 * staff_line_distance, 2 * staff_line_distance) --
+		(0, 2 * staff_line_distance) -- cycle)
+	      scaled magnification;
+  end_character;	    
+
+  begin_character(large_tie_space_left_down_light)
+    large_tie_space_down(5.0);
+    erase fill ((0, -2 * staff_line_distance) -- 
+                (6 * staff_line_distance, -2 * staff_line_distance) --
+                (6 * staff_line_distance, 2 * staff_line_distance) --
+		(0, 2 * staff_line_distance) -- cycle)
+	      scaled magnification;
+    stripes(6 * staff_line_distance, 2 * staff_line_distance);
+  end_character;	    
+
+  begin_character(large_tie_space_right_down)
+    large_tie_space_down(5.0);
+    erase fill ((0, -2 * staff_line_distance) -- 
+                (-6 * staff_line_distance, -2 * staff_line_distance) --
+                (-6 * staff_line_distance, 2 * staff_line_distance) --
+		(0, 2 * staff_line_distance) -- cycle)
+	      scaled magnification;
+  end_character;	    
+
+  begin_character(large_tie_space_right_down_light)
+    large_tie_space_down(5.0);
+    erase fill ((0, -2 * staff_line_distance) -- 
+                (-6 * staff_line_distance, -2 * staff_line_distance) --
+                (-6 * staff_line_distance, 2 * staff_line_distance) --
+		(0, 2 * staff_line_distance) -- cycle)
+	      scaled magnification;
+    stripes(6 * staff_line_distance, 2 * staff_line_distance);
+  end_character;	    
+
+
 
 endgroup;





More information about the Gsharp-cvs mailing list