X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=mf%2Fparmesan-timesig.mf;fp=mf%2Fparmesan-timesig.mf;h=a15d82b50c106fbd45ba00cfbd1795d7395071e9;hb=65c9f2edb8ae873e593687ad75e546820ed7647c;hp=cc7f939a0e27eda56f7c1de3ffc8233402211a10;hpb=2dc94fdd6a9a133cc3b490f121079d450f382069;p=lilypond.git diff --git a/mf/parmesan-timesig.mf b/mf/parmesan-timesig.mf index cc7f939a0e..a15d82b50c 100644 --- a/mf/parmesan-timesig.mf +++ b/mf/parmesan-timesig.mf @@ -57,10 +57,10 @@ def draw_nail (expr bottom_left, top_right) = enddef; -def mensural_timesig (expr verbose_name, internal_name, ly_name, +def mensural_timesig (expr verbose_name, internal_name, full_circle, reverse_circle, slashed, dotted) = - fet_beginchar(verbose_name, internal_name, ly_name) + fet_beginchar(verbose_name, internal_name) if slashed: set_char_box(0, mensural_Cdiameter# + mensural_Cthickness#, @@ -94,47 +94,47 @@ def mensural_timesig (expr verbose_name, internal_name, ly_name, enddef; %% tempus imperfectum cum prolatione imperfecta -mensural_timesig ("Mensural 4/4 meter", "mensural44", "mensuralfourfourmeter", +mensural_timesig ("Mensural 4/4 meter", "mensural44", false, false, false, false); %% tempus imperfectum cum prolatione imperfecta proportio dupla -mensural_timesig ("Mensural 2/2 meter", "mensural22", "mensuralallabreve", +mensural_timesig ("Mensural 2/2 meter", "mensural22", false, false, true, false); %% tempus perfectum cum prolatione imperfecta -mensural_timesig ("Mensural 3/2 meter", "mensural32", "mensuralthreetwometer", +mensural_timesig ("Mensural 3/2 meter", "mensural32", true, false, false, false); %% tempus imperfectum cum prolatione perfecta -mensural_timesig ("Mensural 6/4 meter", "mensural64", "mensuralsixfourmeter", +mensural_timesig ("Mensural 6/4 meter", "mensural64", false, false, false, true); %% tempus perfectum cum prolatione perfecta -mensural_timesig ("Mensural 9/4 meter", "mensural94", "mensuralninefourmeter", +mensural_timesig ("Mensural 9/4 meter", "mensural94", true, false, false, true); %% tempus perfectum cum prolatione imperfecta proportio dupla -mensural_timesig ("Mensural 3/4 meter", "mensural34", "mensuralthreefourmeter", +mensural_timesig ("Mensural 3/4 meter", "mensural34", true, false, true, false); %% tempus imperfectum cum prolatione perfecta proportio dupla -mensural_timesig ("Mensural 6/8 meter", "mensural68", "mensuralsixeightmeter", +mensural_timesig ("Mensural 6/8 meter", "mensural68", false, false, true, true); %% tempus perfectum cum prolatione perfecta proportio dupla -mensural_timesig ("Mensural 9/8 meter", "mensural98", "mensuralnineeight", +mensural_timesig ("Mensural 9/8 meter", "mensural98", true, false, true, true); %% tempus imperfectum cum prolatione imperfecta diminutio simplex -mensural_timesig ("Mensural 4/8 meter", "mensural48", "mensuralfoureightmeter", +mensural_timesig ("Mensural 4/8 meter", "mensural48", false, true, false, false); %% tempus imperfectum cum prolatione perfecta diminutio simplex -mensural_timesig ("Mensural 6/8 meter", "mensural68alt", "mensuralsixeightmeteralt", +mensural_timesig ("Mensural 6/8 meter", "mensural68alt", false, true, false, true); %% tempus imperfectum cum prolatione imperfecta diminutio duplex -mensural_timesig ("Mensural 2/4 meter", "mensural24", "mensuraltwofourmeter", +mensural_timesig ("Mensural 2/4 meter", "mensural24", false, true, true, false); %%%%%%%% @@ -151,10 +151,10 @@ neomensural_Cdiameter# := 3/2 staff_space#; neomensural_Cthickness# := 2 linethickness#; define_pixels(neomensural_Cdiameter, neomensural_Cthickness); -def neomensural_timesig (expr verbose_name, internal_name, ly_name, +def neomensural_timesig (expr verbose_name, internal_name, full_circle, reverse_circle, slashed, dotted) = - fet_beginchar(verbose_name, internal_name, ly_name) + fet_beginchar(verbose_name, internal_name) if slashed: set_char_box(0, neomensural_Cdiameter# + neomensural_Cthickness#, @@ -188,47 +188,47 @@ def neomensural_timesig (expr verbose_name, internal_name, ly_name, enddef; %% tempus imperfectum cum prolatione imperfecta -neomensural_timesig ("Mensural 4/4 meter", "neomensural44", "neomensuralfourfourmeter", +neomensural_timesig ("Mensural 4/4 meter", "neomensural44", false, false, false, false); %% tempus imperfectum cum prolatione imperfecta proportio dupla -neomensural_timesig ("Mensural 2/2 meter", "neomensural22", "neomensuralallabreve", +neomensural_timesig ("Mensural 2/2 meter", "neomensural22", false, false, true, false); %% tempus perfectum cum prolatione imperfecta -neomensural_timesig ("Mensural 3/2 meter", "neomensural32", "neomensuralthreetwometer", +neomensural_timesig ("Mensural 3/2 meter", "neomensural32", true, false, false, false); %% tempus imperfectum cum prolatione perfecta -neomensural_timesig ("Mensural 6/4 meter", "neomensural64", "neomensuralsixfourmeter", +neomensural_timesig ("Mensural 6/4 meter", "neomensural64", false, false, false, true); %% tempus perfectum cum prolatione perfecta -neomensural_timesig ("Mensural 9/4 meter", "neomensural94", "neomensuralninefourmeter", +neomensural_timesig ("Mensural 9/4 meter", "neomensural94", true, false, false, true); %% tempus perfectum cum prolatione imperfecta proportio dupla -neomensural_timesig ("Mensural 3/4 meter", "neomensural34", "neomensuralthreefourmeter", +neomensural_timesig ("Mensural 3/4 meter", "neomensural34", true, false, true, false); %% tempus imperfectum cum prolatione perfecta proportio dupla -neomensural_timesig ("Mensural 6/8 meter", "neomensural68", "neomensuralsixeightmeter", +neomensural_timesig ("Mensural 6/8 meter", "neomensural68", false, false, true, true); %% tempus perfectum cum prolatione perfecta proportio dupla -neomensural_timesig ("Mensural 9/8 meter", "neomensural98", "neomensuralnineeight", +neomensural_timesig ("Mensural 9/8 meter", "neomensural98", true, false, true, true); %% tempus imperfectum cum prolatione imperfecta diminutio simplex -neomensural_timesig ("Mensural 4/8 meter", "neomensural48", "neomensuralfoureightmeter", +neomensural_timesig ("Mensural 4/8 meter", "neomensural48", false, true, false, false); %% tempus imperfectum cum prolatione perfecta diminutio simplex -neomensural_timesig ("Mensural 6/8 meter", "neomensural68alt", "neomensuralsixeightmeteralt", +neomensural_timesig ("Mensural 6/8 meter", "neomensural68alt", false, true, false, true); %% tempus imperfectum cum prolatione imperfecta diminutio duplex -neomensural_timesig ("Mensural 2/4 meter", "neomensural24", "neomensuraltwofourmeter", +neomensural_timesig ("Mensural 2/4 meter", "neomensural24", false, true, true, false); fet_endgroup ("timesig")