2 script.cc -- implement Script
4 source file of the LilyPond music typesetter
6 (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
9 #include "musical-request.hh"
10 #include "paper-def.hh"
13 #include "molecule.hh"
19 Script::set_stem(Stem*st_l)
26 Script::Script(Script_req* rq)
29 specs_l_ = rq->scriptdef_p_;
30 inside_staff_b_ = specs_l_->inside_staff_b_;
40 if (specs_l_->invertsym_b_)
41 symdir_i_ = (dir_i_ < 0) ? -1:1;
45 Script::set_default_dir()
47 int s_i=specs_l_->rel_stem_dir_i_;
49 dir_i_ = stem_l_->dir_i_ * s_i;
51 dir_i_ =specs_l_->staff_dir_i_;
56 Script::set_default_index()
58 pos_i_ = get_position_i();
62 Script::do_width() const
64 return symbol().dim.x;
70 String preidx_str = (symdir_i_ < 0) ?"-" :"";
71 return paper()->lookup_l()->script(preidx_str + specs_l_->symidx);
75 Script::do_pre_processing()
82 Script::do_post_processing()
88 Script::brew_molecule_p() const
90 Real dy = paper()->internote();
92 Molecule*out = new Molecule(Atom(symbol()));
93 out->translate(Offset(0,dy * pos_i_));
96 IMPLEMENT_STATIC_NAME(Script);
99 Script::compare(Script *const&l1, Script *const&l2)
101 return l1->specs_l_->priority_i_ - l2->specs_l_->priority_i_;