Re: XML anatomy

[Richard Shann]

On Sun, 2020-01-12 at 18:15 +0000, Richard Shann wrote:
> On Fri, 2020-01-10 at 09:08 +0000, Richard Shann wrote:
> > I'm guessing it means
> > lengthening (some?) some notes and shortening others in pairs? 
> 
> I had a power cut which corrupted my file system, but having got
> things
> working again I find an email from Bric has gotten nuked. I don't see
> it in the denemo-devel archive either ... however it occurred to me
> that there is a problem with the play back in Denemo that affects me
> when I'm checking that the music is correct - namely grace notes
> aren't
> played.
> And it occurred to be that it is possible to fix this reasonably
> easily. For your case of making 8th note pairs unequal for example
> the
> following Scheme script does the trick:
> 
> 8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><
> 
> (let ()
>     (define (swing)
>        (if (and    (equal? (d-GetNoteDuration) "8")
>                 (d-MoveCursorRight)
>                 (equal? (d-GetNoteDuration) "8"))
>         (begin
>             (d-SetDurationInTicks 256)
>             (d-DirectivePut-note-postfix "Swung" "8")
>             (d-MoveCursorLeft)
>             (d-SetDurationInTicks 128)
>             (d-DirectivePut-note-postfix "Swung" "8")
>             )))
> (d-MoveToBeginning)
> (swing)
> (while (d-NextNote)
>     (swing))
>      (d-CreateTimebase)      
>     (d-SetSaved~f))

Sorry - there was a typo:

 (d-SetSaved #f))

is the correct syntax for the last line - not (d-SetSaved~f))

this script doesn't cover quite a few cases - apply it to the attached
score to hear the effect.

Richard









> 
> 8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><
> 
> If you paste that script into the Scheme Window and click "Execute"
> then it will change the sounding durations of pairs of 8th notes to
> 1/3
> 2/3.
> The display is a bit wild ... but it's a start.
> 
> Richard
> 
> 
>

junk.denemo
Description: XML document