Jump to content

JulioHerrlein

Members
  • Posts

    828
  • Joined

  • Last visited

Everything posted by JulioHerrlein

  1. Here is a good idea, Based in Babbitt´s "Semi Simple Variations" Babbit Semi simple ;; 16th notes (progn (setf 16th-rhy (length-legato (binary-map (combination2 4 '(0 1)) 1/16))) (setf rhy-count (gen-integer (1- (get-count (get-count 16th-rhy))))) (setf rhy-order '(1 0 1 1 2 3 4 6 7 5 5 5 5 4 4 7 7 7 1 1 1 1)) (setf len1 (substitute-map 16th-rhy rhy-count rhy-order)) ;; triplets (binary-map (combination2 3 '(0 1)) 1/12) ) Another good thing is to transform pitch classes in rhythms with the pcs-rhythm function. You can benefit from set theory organization.
  2. wow !! Beautiful feedback ! Yes, Stephane ! This idea is inspiring ! Nice quartet ! Thank you all !! Best ! Julio
  3. Thanks a lot !! No problem ! This is cool and generate some kind of diatonic version for Hauer stuff This was my inspiration to this Idea... barak schmool (@schmeinstein) • Instagram reel WWW.INSTAGRAM.COM 171 likes, 9 comments - schmeinstein on May 31, 2024: "all the notes of C major, once each. you can play these phrases forwards or backwards, even reflect them about the note D, and they still...". VERY COOL ! Thanks ! (setf diat-permute (loop for i in (combination2 7 '(1 2 3 4 5 6 7)) when (and (equal 1 (first i)) (equal 7 (length (find-unique i)))) collect i)) (setf diatonic-tropes (substitute-map '(c4 d4 e4 f4 g4 a4 b4) '(1 2 3 4 5 6 7) diat-permute)) (circle-pitch-plot (flatten (list (rnd-pick diatonic-tropes ))) :sort nil ;:remove-duplicates t :join-first nil :point-radius 6)
  4. YES !!! This is the solution I was searching ! Best ! (loop for i in (combination2 7 '(1 2 3 4 5 6 7)) when (and (equal 1 (first i)) (equal 7 (length (find-unique i)))) collect i)
  5. Thanks a lot for your time and patience, my dear friends ! But, actually, I need to remove the redundant permutations, not to generate. I just wanted to make sure I have all the prime permutations. Here is the result of the first 720 permutations of the diatonic scale. looks like the algorithm of the function start with all notes begining in C , then in D, then in E. I hope that the batch that starts all on C (the example below), contains all the permutations (the prime ones), but I´m not sure, I would need to check it manually... Is it rigth ? The algorithm is doing like this (starting in every note at each 720 permutations) ? Best ! Julio Dear Janusz I need the reverse of what you did From this set of combinations ((1 2 3 4) (1 3 2 4) (1 2 4 3) (1 4 2 3) (1 3 4 2) (1 4 3 2)) filter to get only the generator (1 2 3 4) Best
  6. Dear Janusz and friends, I´m back to the subject of permutations. The expression below brings all the permutations for a diatonic scale (or any other set you might want to do). (setf diat-permute (permute '(1 2 3 4 5 6 7))) (substitute-map '(c4 d4 e4 f4 g4 a4 b4) '(1 2 3 4 5 6 7) diat-permute) But the list is too long and redundant (I got also a stack overflow when trying to make a snippet out of it (but this is another problem...) The question I´d like to ask is for a function for filtering the rotational variations of a set, to exclude a large number of unnecessary permutations. For Example: (1 3 4 2) is rotationally the same as (3 4 2 1 ), (4 2 1 3) and (2 1 3 4), so there is no need of the 4 permutations, since musically you can just use the rotations. The same goes for other cardinalities (2 4 3 1 5 6 7) is the rotationally the same that (4 3 1 5 6 7 2) (3 1 5 6 7 2 4) (1 5 6 7 2 4 3) (5 6 7 2 4 3 1) (6 7 2 4 3 1 5) and (7 2 4 3 1 5 6), there is no need for 7 versions of it. I´d like to have a function to get only the "parent" of each rotational set, a kind of rotate-permute function. It´s a very musical way to think about it. Can someone help ? All the best ! Thanks
  7. I noticed that dark mode have its settings, but how to enter in dark mode in windows ? There is a toggle ? Best, Julio
  8. Yes, everything is ok. I detected that what was messing the enharmonics was the ambitus function I put in my processing, not the make-omn or the PS. Best ! Julio
  9. Hi, I´m searching for an option in PS score to bypass the rewriting the accidentals. My scale lists are carefully ordered in terms of enharmonics. I think that what mess it all is the make-omn expression I use before the PS. Is there some way of bypass reordering accidentals in the make-omn expression and also in the PS ? Thanks ! Julio
  10. Dear All, just a little help, please ! Here´s a list of scales... ((fs4 gs4 a4 b4 cs5 eb5 e5) (db5 eb5 f5 g5 ab5 bb5 c6) (cs5 eb5 e5 fs5 gs5 bb5 b5) (bb4 c5 d5 e5 f5 g5 a5) (d4 e4 f4 g4 a4 b4 c5) (gb4 ab4 bb4 c5 db5 eb5 f5) (g4 a4 b4 cs5 d5 e5 fs5) (f4 g4 a4 b4 c5 d5 e5) (c5 d5 e5 fs5 g5 a5 b5) (cb5 db5 eb5 f5 gb5 ab5 bb5) (g4 a4 b4 cs5 d5 e5 fs5) (f4 g4 a4 b4 c5 d5 e5) (a4 b4 c5 d5 e5 fs5 g5) (c5 d5 e5 fs5 g5 a5 b5) (cs5 eb5 e5 fs5 gs5 bb5 b5) (e4 fs4 g4 a4 b4 cs5 d5) (gb4 ab4 bb4 c5 db5 eb5 f5) (db5 eb5 f5 g5 ab5 bb5 c6) (bb4 c5 d5 e5 f5 g5 a5) (eb4 f4 fs4 gs4 bb4 c5 cs5) (c5 d5 e5 fs5 g5 a5 b5) (a4 b4 c5 d5 e5 fs5 g5) (db5 eb5 f5 g5 ab5 bb5 c6) (g4 a4 b4 cs5 d5 e5 fs5)) I just want to pick the same elements of all the sublists. I don´t remember how to do it... For example (0 2 1) of all the sublists would return this: ((fs4 a4 gs4) (db5 f5 eb5) (cs5 e5 eb5) etc etc Please, some help ? Thanks a lot ! Best, Julio
  11. Dear All, I don´t know what happens in Mac, but in Windows, sometimes the code color highligth is changing. I have to press enter to get the code colors again... Maybe a bug ?
  12. Thank you, Jesele and Janusz ! Janusz, puting the [ ] creates a bug in the notation engine... Don´t know why... Best, Julio ((w a2g3c4e4 am7) (w c3a3e4g4 cadd6) (w e3gs3d4f4 e7b9) (w gs2f3b3d4 gsdim7) (w g2f3b3e4 g7-13) (w cs3f3b3e4 cs7s9) (w b2f3a3d4 bhd) (w d3a3c4f4 dm7) (w f3c4e4a4 fmaj7)) OM 3 > audition-musicxml-omn-snippet Error: OMN Parse Error: fail 1 (abort) Return to top loop level 0. Type for backtrace or :c <option number> to proceed. Type :bug-form "<subject>" for a bug report template or :? for other options. OM 4 : 1 >
  13. CHORD SYMBLOS BEFORE Looks good ! Any Help ?
  14. Hello, I did some text attributes for displaying chord symbols but when I use the make-omn, I don´t know how to retrieve the chord symbols. I´d like to use this for a a lesson. The display of chords is good, but I need also to chaneg the chord lengths to create some examples. The ideia is to create automatic harmonizations using pre-defined voicings. I know that I filtered out the attributes in the make-omn expression below, but how can I retrieve the chord symbols and change the lengths ? Thanks for the help ! Best, Julio Here is the code (add-text-attributes '(Am7 "Am7") '(C6 "C6") '(E7b9 "E7b9") '(Gsdim7 "G#o") '(G7 "G7") '(G7-13 "G7(13)") '(Cs7s9 "C#7(#9)") '(Bhd "Bm7b5") '(Dm7 "Dm7") '(Fmaj7 "Fmaj7") '(G74b9 "G7,4(b9)") ) (setf C-chords '((w a2g3c4e4 am7) (w c3a3e4g4 c6) (w e3gs3d4f4 e7b9) (w gs2f3b3d4 gsdim7) (w g2f3b3e4 g7-13) (w cs3f3b3e4 cs7s9) (w b2f3a3d4 bhd) (w d3a3c4f4 dm7) (w f3c4e4a4 fmaj7))) ;; I know that I filtered out the attributes in the expression below, but how can I retrieve the chord symbols and change the lengths ? (make-omn :pitch (omn :pitch C-chords) :length '((e e e eh) (h w)) :span :length ) CHORD SYMBLOS BEFORE Looks good !
  15. Yes, you can make some code from that one and customizing the rhythms and harmony. Best !
  16. Very beautiful sound, expression and articulation, Janusz. The sound reminds me a bit of George Coleman, with some alternate fingerings. Happy to hear this side of your musicality. All the best ! Julio
  17. Really cool, Stephane ! Any chance to get the opmo files ? All the best !
  18. Dear Friends, This feature was implemented ? All the best ! Julio
  19. Dear All, One interesting conversion would be the one for transforming the get-time-signature result to length-span time signature format. This would be useful to rephrase rhythmically one rhythm with another´s rhythm time-signature structure. For example: ; Take this rhythm (setf ritmos (gen-repeat 4 (gen-length '((1 2 1 2 1 1) (1 1 1 1 1 2 1) (1 -3 1 -3 2 -2 4) (-3 1 -1 1 1 1)) '(16)))) Here is the bar structure for this (get-time-signature ritmos) This is the output ((2 4 2) (4 4 1) (2 4 3) (4 4 1) (2 4 3) (4 4 1) (2 4 3) (4 4 1) (2 4 1)) If I want to use this result as a time signature template in the length-span I have to convert it to (2/4 2/4 1 2/4 2/4 2/4 1 2/4 2/4 2/4 1 2/4 2/4 2/4 1 2/4) in order to use the time-signature order it in the length-span function Is there some function that performs this ? Best ! Julio I did this extravagant coding , but I need it with the slashes ( " / " ) and the repetitions, like converting (2 4 3) into (2/4 2/4 2/4)... (setf timesig-to-length-span (flatten (matrix-transpose (list (lake-everyother (get-count (get-count (get-time-signature ritmos))) ; how many 0 3 (flatten (get-time-signature ritmos))) (lake-everyother (get-count (get-count (get-time-signature ritmos))) ; how many 1 3 (flatten (get-time-signature ritmos))) ) )) ) ;;(2 4 4 4 2 4) I love lake-everyother
×
×
  • Create New...

Important Information

Terms of Use Privacy Policy