o_e Posted February 27, 2015 Share Posted February 27, 2015 Hi,Is there a way to fill in distances between 'time-points' like in the example? Thanks for help!bestole(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)) Quote Link to comment Share on other sites More sharing options...
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.