X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fbreathing-sign.cc;h=09fd1d7c516e7b35cd1ce85f1e944d7b9869ebd1;hb=90fcc649dc06ad006158945acc15a69e24e942cd;hp=fc873d567dcafec3b08e1fb7c57c68c68f9511ab;hpb=9106e3bd374198c5457c35181ae1d66b3ec95236;p=lilypond.git diff --git a/lily/breathing-sign.cc b/lily/breathing-sign.cc index fc873d567d..09fd1d7c51 100644 --- a/lily/breathing-sign.cc +++ b/lily/breathing-sign.cc @@ -1,13 +1,21 @@ /* - breathing_sign.cc -- implement Breathing_sign + This file is part of LilyPond, the GNU music typesetter. - (c) 1999--2005 Michael Krause + Copyright (C) 1999--2011 Michael Krause + Extensions for ancient notation (c) 2003--2011 by Juergen Reuter - written for the GNU LilyPond music typesetter + LilyPond is free software: you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation, either version 3 of the License, or + (at your option) any later version. - TODO: --> see breathing-sign-engraver.cc + LilyPond is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. - Extensions for ancient notation (c) 2003--2005 by Juergen Reuter + You should have received a copy of the GNU General Public License + along with LilyPond. If not, see . */ #include "breathing-sign.hh" @@ -20,6 +28,7 @@ #include "direction.hh" #include "text-interface.hh" #include "font-interface.hh" +#include "grob.hh" /* TODO: thickness should be a grob property (unit: linethickness) @@ -40,16 +49,11 @@ Breathing_sign::divisio_minima (SCM smob) { Grob *me = unsmob_grob (smob); Real staff_space = Staff_symbol_referencer::staff_space (me); - Real staff_size; Real thickness = Staff_symbol_referencer::line_thickness (me); thickness *= robust_scm2double (me->get_property ("thickness"), 1.0); - if (Staff_symbol_referencer::get_staff_symbol (me)) - staff_size = (Staff_symbol_referencer::line_count (me) - 1) * staff_space; - else - staff_size = 0.0; - Real blotdiameter = me->get_layout ()->get_dimension (ly_symbol2scm ("blotdiameter")); + Real blotdiameter = me->layout ()->get_dimension (ly_symbol2scm ("blot-diameter")); /* * Draw a small vertical line through the uppermost (or, depending @@ -80,7 +84,7 @@ Breathing_sign::divisio_maior (SCM smob) else staff_size = 0.0; - Real blotdiameter = me->get_layout ()->get_dimension (ly_symbol2scm ("blotdiameter")); + Real blotdiameter = me->layout ()->get_dimension (ly_symbol2scm ("blot-diameter")); /* * Draw a vertical line that is vertically centered in the staff @@ -118,7 +122,7 @@ Breathing_sign::divisio_maxima (SCM smob) else staff_size = 0.0; - Real blotdiameter = me->get_layout ()->get_dimension (ly_symbol2scm ("blotdiameter")); + Real blotdiameter = me->layout ()->get_dimension (ly_symbol2scm ("blot-diameter")); // like a "|" type bar Interval xdim (0, thickness); @@ -146,7 +150,7 @@ Breathing_sign::finalis (SCM smob) else staff_size = 0.0; - Real blotdiameter = me->get_layout ()->get_dimension (ly_symbol2scm ("blotdiameter")); + Real blotdiameter = me->layout ()->get_dimension (ly_symbol2scm ("blot-diameter")); // like a "||" type bar Interval xdim (0, thickness); @@ -173,11 +177,14 @@ Breathing_sign::offset_callback (SCM smob) set_grob_direction (me, d); } - Real inter_f = Staff_symbol_referencer::staff_space (me) / 2; + Real inter = Staff_symbol_referencer::staff_space (me) / 2; int sz = Staff_symbol_referencer::line_count (me) - 1; - return scm_from_double (inter_f * sz * d); + return scm_from_double (inter * sz * d); } -ADD_INTERFACE (Breathing_sign, "breathing-sign-interface", +ADD_INTERFACE (Breathing_sign, "A breathing sign.", - "direction"); + + /* properties */ + "direction " + );