Jump to content

reduce note lengths in a list programmatically?


Recommended Posts

Is there a way to reduce all of the note lengths equally, without editing each one individually in this snippet?  I suppose I could change the audition tempo to make it play faster, but I would really like to reduce the note lengths programmatically, if that's possible.

 

(rnd-sample-seq 4 '(    

                   (h. b4 tie) (q b4 h a4 tie) (q a4 e b4 a4 q g4 tie)
                   (h g4 e fs4 e4) (h fs4 -q) (-q h g4 tie)
                   (q g4 e fs4 g4 q a4 tie) (h a4 e c5 b4) (h_e c5 e b4)
                   (e c5 a4 h b4 tie) (q. b4 -e q g4 tie) (h. g4) (h. fs4)
                   (e g4 a4 h b4 tie) (e b4 a4 b4 g4 q a4 tie) (h a4 q a4)
                   (h. g4) (q g4 h fs4 tie) (q fs4 b4 e e4 fs4) (h. g4)
                   (h. fs4 tie) (q fs4 h b4 tie) (h b4 q a4 tie)
                   (h a4 e b4 a4) (h. g4) (e fs4 e4 h fs4) (-h q g4 tie)
                   (h g4 e fs4 g4) (h. a4) (e c5 b4 h c5 tie)
                   (e c5 b4 c5 a4 q b4 tie) (he b4 -e) (h. g4 tie)

))

 

Link to post
Share on other sites

you could use LENGTH-MODIFY

 

"LENGTH-MODIFY will modify a series of lengths by adding, subtracting, multiplying or dividing them with a list of duration values. If the count argument is not given to LENGTH-MODIFY then the count is chosen at random."

Link to post
Share on other sites

This is fun!  Is there a function for adding length where none exists, for example in this snippet?

(setf scale '(c4 d4 e4 f4 g4 a4))
(harmonic-progression (rnd-number 8 0 7) scale)

 

Link to post
Share on other sites
(setf scale '(c4 d4 e4 f4 g4 a4))
(setf scale (omn-replace :length 'e scale))

;; or

(make-omn :pitch '(c4 d4 e4 f4 g4 a4)
          :length '(e q e e s t))

 

Link to post
Share on other sites
8 hours ago, Stephane Boussuge said:

You can also try this for fun:

 


(setf scale '(c4 d4 e4 f4 g4 a4))
(gen-euclidean-omn 24 16 1 16 scale 's '(mf))

SB.

 

This is incredible!  I love these fun, playful little snippets!

Link to post
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...

Important Information

Terms of Use Privacy Policy