Jump to content

Featured Replies

Posted

Hi,

Is there a way to fill in distances between 'time-points' like in the example? Thanks for help!

best

ole

(setf time-points '(e b5 f - - -  b5 - -  b5 - - - - b5 -  b5 - - b5 - - - 
                      b5 - - - - a5 - - - - - a5 - - - a5 - - - -
                      a5 - - -  a5 - - - a5 - - - - a5 - - - a5 - - - - a5))

(omn :length time-points)

;is there a way to achive this:
(setf filled '(4/8 3/8 5/8 2/8 3/8 4/8 5/8 6/8 4/8 5/8 4/8 4/8 5/8 4/8 5/8 1/8))

(setf time-points-filled (make-omn :length filled
          :pitch (pitch-transpose -12 (omn :pitch time-points))
          :velocity (omn :velocity time-points)))

(def-score tp
            (:key-signature '(c maj)
             :time-signature '(4 4)  
             :tempo 50)             
            
  (voice1 :omn time-points :channel 1 :sound 'gm :program 0)
  (voice2 :omn time-points-filled :channel 2 :sound 'gm :program 0))

post-116-0-96589600-1425066532_thumb.jpg

Hi Ole,

 

may be something like this:

(setf time-points '(e b5 f - - -  b5 - -  b5 - - - - b5 -  b5 - - b5 - - -
                      b5 - - - - a5 - - - - - a5 - - -  a5 - - - - a5 - - -
                      a5 - - - a5 - - - - a5 - - - a5 - - - - a5))

(setf len (omn :length time-points))
(setf map (gen-binary-length len))
(setf result (binary-length-map map 'e :omn nil))

SB.

  • Author

Thank you Stephane!

Only problem is that  if my 'timepoints' list is starting with rests than they will be swallowed. But I think I can handle this somehow.

ole

  • 5 years later...

Now we have

length-legato

Just revisiting the forum...

In the search of length-delta-map examples.

Best !

Create an account or sign in to comment


Copyright © 2014-2025 Opusmodus™ Ltd. All rights reserved.
Product features, specifications, system requirements and availability are subject to change without notice.
Opusmodus, the Opusmodus logo, and other Opusmodus trademarks are either registered trademarks or trademarks of Opusmodus Ltd.
All other trademarks contained herein are the property of their respective owners.

Powered by Invision Community

Important Information

Terms of Use Privacy Policy