[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