Jump to content


  • Posts

  • Joined

  • Last visited

Everything posted by o_e

  1. Thanks! Very strange, because there is no 'list' in the video, just doublechecked it..
  2. Hi, For training purposes I'am rebuilding the examples that Stéphane demonstrates in the Karajan Music Tech Conference Video, but the second example throws me an error and I can't find out what I'am missing..thanks for assistance.. (setf thema '(s c4 leg d4 leg e4 leg f4 q g4 ff stacc)) (setf thema.repeat (gen-repeat 24 thema)) (setf scales '((c4 d4 e4 fs4 gs4 a4 b4)(c4 d4 eb4 f4 g4 ab4 bb4))) (setf path (tonality-series (chordize scales) :closest '(down))) (setf thema.harm (tonality-map path thema.repeat)) > Error: Incorrect keyword arguments in (:scale ((c4d4e4fs4gs4a4b4) :closest down :ambitus piano) ((c4d4eb4f4g4ab4bb4) :closest down :ambitus piano)) . > While executing: (:internal scale-map-l tonality-map), in process Listener-1(7). > Type cmd-. to abort, cmd-\ for a list of available restarts. > Type :? for other options. Maybe it has to do that I'am still on 1.3??
  3. o_e

    Default Sound

    Thanks for the quick reply!!
  4. Hi, By default all the audition (audition snippet etc.) is playing with General Midi, is it possible to change that somehow? Thanks!
  5. Hi, I have a simple question, is it possible to display multiple scores in the workspace. Now, the old score gets overwritten with the new one which make things difficult to compare (I always make a screenshot as a workaround)? thanks! ole
  6. Just tried your code, it does not compile, I had to change some 'chord-closest-path' into 'closest-path' and add some setf's, then it worked. Maybe you want to correct it..? best ole
  7. Thanks for the answers! My starting point was the video from Jorvd and he don't uses the :time parameter at all, that was confusing me. @Julio: thanks for the example, I will look into that!
  8. Hi, I'am examine 'harmonic-path more closly and have some hard time to understand, if someone could please explain some things to me.. (setf chord '(c3 g3 c4 e4 f3 c4 f4 a4)) (setf melodytest '( c4 cs4 d4 e4 f4 fs4 g4 gs4)) (harmonic-path chordtest2 melodytest :octave 'path ) ==>(c3 g3 c4 e4 f3 f4 a4 c3) in the example above harmonic-path is obviously swallowing the recurring notes (and is looping the path although the doc says the default is looping nil), why, I don't get the logic behind it? And can I change this? In the example below there is no difference in the output between :loop t or :loop nil, I assumed that the looping parameter concerns both, the path and the sequence..? What am I missing? Thanks! (setf chord '(c3 g3 c4 e4 f3 c4 f4 a4)) (setf melody '(c4 cs4 d4 e4)) (harmonic-path chord melody :octave 'path :loop t ) ==>(c3 g3 c4 e4) (setf melody '(c4 cs4 d4 e4)) (harmonic-path chord melody :octave 'path :loop nil ) ==>(c3 g3 c4 e4)
  9. Hi, I solved this problem by pasting the text from the website (or email) into a plain text editor (in my case BB-Edit (I think they have a free basic version, www.barebones.com), make sure you ticked 'Show invisible characters' in Preferences/Editor Defaults, then you'll see a lot of strange signs that causes errors and you can clean your text up.. hth ole
  10. Dear Stéphane, Thank you! That helped a little, still not sure what is the difference between partials and frames. I saw that it is possible the resynthesize a sound with CLM, an example would be very helpful. Also I would like to know if its only possible to get tempered pitches out of spectral data, don't know if OM is capable of microtonal MIDI generally (which is a very tricky special beast I think)..? Thanks anyway& all the best ole
  11. To bump my own request, am I the only one who whishes some more simple examples, to understand the 'spectral data '-thing better?
  12. Can you give a small example of how to use the spectral data, how to rebuild a certain sound like the trombone with a piano sound? Thanks!
  13. (chord-pitch-unique chords) => (gs3gs4ds5 ab3gs4) hth!
  14. how did you found it, it's not documented..? And it works only for binary lists, right?
  15. Hi André Just investigating your function.. Then I've tried a little cosmetic hack to make it more readable, but it did not work out and I don't understand why. What did I overlook? Thanks! ole ;;; the orginal function (defun binary-filter (alist bin-list) (let ((event-list (cond ((omn-formp alist) (single-events alist)) (t alist)))) (flatten (loop for i in event-list for j in bin-list when (= j 1) collect i else append (cond ((omn-formp i) (list (length-invert (car i)))) ((lengthp i) (neg! (omn :length (list i))))))))) (binary-filter '(q c4 mf d4 e4 e f4 ppp g4 a4 b4) '(1 0 1 1 0 1 1)) => (q c4 mf -1/4 q e4 mf e f4 ppp -1/8 e a4 ppp e b4 ppp) ;;;Why is it not working?? (defun foo-rep (n sequence &key omn) (maybe-omn-decode omn (binary-filter n sequence))) (foo-rep '(q c4 mf d4 e4 e f4 ppp g4 a4 b4) '(1 0 1 1 0 1 1) :omn t) -->(q c4 mf -1/4 q e4 mf e f4 ppp -1/8 e a4 ppp e b4 ppp);??
  16. Hi, When I write a file to disk with the plot functions (e.g. pitch-list-plot), and I print out that plot in DIN A4 Landscape size the resolution is poor. Is there a way to change the resolution/size of the .png that is written? Thanks! ole
  17. You are welcome! Maybe Janusz can chime in and tell us something about how to handle tied notes in functions like this. I really would like to know that!
  18. Hi Julio, I've found two problems. The weird one you had I think I could find and solve, but the function also does not handle tied notes properly and I have no idea how to remedy that. That goes waay above my hacking abilities :-) (length-staccato 1/16 '((e. c4 eb4 fs4 a4 tie) (s a4 e. cs4 e4 g4 e bb4 tie) (e bb4 e. d4 f4 gs4 s b4))) -->((s c4 -e s eb4 -e s fs4 -e s a4 -e) (s a4 cs4 -e s e4 -e s g4 -e s bb4 -) (s bb4 - d4 -e s f4 -e s gs4 -e s b4)) Nevertheless the code with the one correction, so it's not perfect but maybe somehow useful for you.. best ole (defun length-staccato (n alist) (let ((newlengths (loop for i in (omn :length (flatten alist)) when (> i n) append (list n (* -1 (abs (- i n)))) else collect i))) (if (omn-formp alist) (omn-to-time-signature (make-omn :length newlengths :pitch (omn :pitch alist) :velocity (omn :velocity alist) :articulation (omn :articulation alist)) (get-time-signature alist)) newlengths)))
  19. Did you see my workaround in the post mentioned by André (to lock the smpte of the track and then change the overall tempo in Logic)? Now I'am working with Reaper (https://www.reaper.fm/ ) which is worth to checkout, very cheap and unbelievable powerful (a bit of a learning curve I admit), no problem to change the tempo of every midi file seperatly.. best ole
  20. Hi, Just a minor improvement, the function is now also working with sublists :-) best ole (defun length-staccato-lists (n alist) (let ((newlengths (loop for i in (omn :length (flatten alist)) when (> i 0) append (list n (* -1 (abs (- i n)))) else collect i))) (if (omn-formp alist) (omn-to-time-signature (make-omn :length newlengths :pitch (omn :pitch alist) :velocity (omn :velocity alist) :articulation (omn :articulation alist)) (get-time-signature alist)) newlengths))) (length-staccato-lists 1/16 '((q e4 mp q tasto q -q q q)(q e4 mp q tasto q -q q q))) -->((s e4 mp -e. s e4 tasto -e. s e4 -e. -q s e4 -e. s e4 -e.) (s e4 -e. s e4 tasto -e. s e4 -e. -q s e4 -e. s e4 -e.))
  • Create New...

Important Information

Terms of Use Privacy Policy