Re: [Denemo-devel] New script

[Richard Shann]

I have committed scripts for controlling the beaming more closely, these
serve as a better model for such simple scripts as the Ficta one you
want. Here is an example:
8-<8-<8-<8-<8-<8-<8-<8-<8-<8-<8-<8-<8-<8-<8-<8-<8-<8-<8-<
;;; BeamRightOne
(let ((tag "BeamRight"))
(if (d-Directive-chord? tag)
        (d-DirectiveDelete-chord tag)
        (begin
        (d-DirectivePut-chord-prefix tag "\\set stemRightBeamCount = #1 ")
        (d-DirectivePut-chord-override tag DENEMO_OVERRIDE_AFFIX)
        (d-DirectivePut-chord-display tag  "[1")))
(d-RefreshDisplay)
(d-SetSaved #f))

8-<8-<8-<8-<8-<8-<8-<8-<8-<8-<8-<8-<8-<8-<8-<8-<8-<8-<8-<8-<8-<8-<8-<

The (let ((tag "BeamRight")) 
at the beginning defines the tag locally
and the (if ...
checks if the note already has been set, in which case it unsets it,
making the command a toggle.
Also - something I should have mentioned - it is important to put a
space at the end of these \\set things, else it can run into the next
note in the LilyPond.

HTH

Richard


On Mon, 2012-11-05 at 18:58 +0100, Andreas Schneider wrote:
> Because defining a global command makes everything more complex, I tried
> the simple solution first, i.e. to place a \once\override before the
> note. Following your example, I tried the following:
> 
> ;;;Ficta
> (d-DirectivePut-chord-display "Ficta"  "Ficta" )
> (d-DirectivePut-chord-prefix "Ficta"  "\\once \\set suggestAccidentals =
> ##t")
> (d-DirectivePut-chord-minpixels  "Ficta" 20)
> (d-SetSaved #f)
> (d-RefreshDisplay)
> 
> Unfortunately I must have understood something wrong because it does not
> work.
> 
> Andreas
> 
> Am 02.11.2012 10:34, schrieb Richard Shann:
> > I am still very pressed for time, but I remembered you were talking
> > about a \once \override which has to *precede* the chord, so either
> > d-DirectivePut-chord-prefix (with overrride DENEMO_OVERRIDE_AFFIX) would
> > be needed, or a standalone directive before the chord in question...
> > Richard