Jump to content
Sign in to follow this  
Jorvd

Different Voice for one note in a Chord

Recommended Posts

Hi everyone, this one should be pretty simple but I can't seem to figure it out yet.
I am trying to notate this (see attachment) first bar in OM.
So far I have this:

(h e3c4g4e5 f3f4a4d5 z^q g4 f4 h g3d4b4 c3c4e4c5 )

Which doesn't work yet, although it's close.
Additionally, I would love to use the same figured bass notation (with the brackets and everything).
I know how to use the text attribute for Instruments but it seems to map everything based on white-space between the text, maybe I'm missing something?

Thanks!
- Jor
 

Screen Shot 2019-02-13 at 11.34.28.png

Share this post


Link to post
Share on other sites

Example:

 

(setf v1 '(h e5 d5 b4 c5))
(setf v2 '(h g4 a4 q g4 f4 h e4))
(setf v3 '(h c4 f4 d4 c4))
(setf v4 '(h e3 f3 g3 c3))

(def-score Cade
           (:key-signature 'chromatic
            :time-signature '(4 2)
            :tempo 80
            :ignore-time-signature t
            :ignore-tempo t
            :layout (piano-layout '(v1 v2) '(v3 v4)))
  
  (v1
   :omn v1
   :channel 1
   :sound 'gm
   :program 0)
  
  (v2 :omn v2)
  (v3 :omn v3)
  (v4 :omn v4)
  )

Screenshot 2019-02-13 at 12.52.15.png

 

Share this post


Link to post
Share on other sites

Dear Jorvd,

 

Maybe this post can be useful.

Best,

Julio

 

 

Or maybe this. I did it for composing a String Quartet from a piano reduction.

It brings some ideas to work with harmony.

Best,

Julio

 


;;;HARMONY METHOD 2 ////////////////////////////////////////SEV CHORDS Basic Functions SETS///

;;SETS 7-35 - Major Scale

(setf Srm7 (pcs-transpose 9 (pcs '4-26) :pitch))
(setf S7M (pcs-transpose 4 (pcs '4-20) :pitch))
(setf Trm7 (pcs-transpose 4 (pcs '4-26) :pitch))
(setf T7M (pcs-transpose -1 (pcs '4-20) :pitch))
(setf Tam7 (pcs-transpose 11 (pcs '4-26) :pitch))
(setf D7 (pcs-transpose 11 (pcs '4-27b) :pitch))
(setf hd (pcs-transpose 9 (pcs '4-27) :pitch))
(setf F7M#11-5 (gen-rotate 2 (pcs-transpose -1 (pcs '4-8) :pitch)))


;;;Establishing a Progression

(setf chordprog (chordize (list Srm7 S7M Trm7 T7M Tam7 S7M)))

;; Some repetitions and transpositions from Harmonic functions

(setf chordtrp-rpt 
(pitch-transpose-repeat '((0) (1 2 3) (0 -1)) 
(chordize (list T7M S7M Trm7 T7M T7M T7M T7M T7M T7M T7M T7M T7M T7M T7M))))

;;; DEFINE DROP TYPES Position of chords

(setf 
csd '(0 0 0 0)
dp2 '(0 -12 0 0)
dp3 '(0 0 -12 0)
dp2-4 '(0 -12 0 -12)
dp2-3 '(0 -12 -12 0)
ddp2-3 '(0 -24 0 -12)
dp-24 '(-24 -24 -24 -24)
dp-ligeti '(-24 -24 24 24))

;;;DROP ORDER - Order of Positions

(setf droplist (flatten 
(list dp2-4 dp2 dp2-4 dp3 dp2)))

;;;MAKING THE Actual Voicings

(setf chordprogdrop (chordize-list
             (pitch-transpose-n 
              droplist
              (sort-desc (pitch-melodize chordtrp-rpt)))))


;;;Using the voicings for the final result

(setf chordprgtrp chordprogdrop)




;;; Choose how many repeats of the rhythm

(setf times 1)

;;;Transform the chords into separate voices

(setf voz1 (flatten (pitch-demix 1 chordprgtrp)))
(setf voz2 (flatten (pitch-demix 2 chordprgtrp)))
(setf voz3 (flatten (pitch-demix 3 chordprgtrp)))
(setf voz4 (flatten (pitch-demix 4 chordprgtrp)))



;;; (OPTIONAL) Process AMBITUS Instrumental ou vocal////////////////////////////////////////

;(setf vozamb1 (ambitus '(c4 c5) voz1) vozamb2 (ambitus '(f3 c5) voz2) vozamb3 (ambitus '(g3 g4) voz3) vozamb4 (ambitus '(c2 e3) voz4))

;(setf vozamb1 (ambitus (ambitus-instrument 'flute) voz1)vozamb2 (ambitus (ambitus-instrument 'oboe) voz2) vozamb3 (ambitus (ambitus-instrument 'clarinet) voz3) vozamb4 (ambitus (ambitus-instrument 'bassoon) voz4))

(setf vozamb1 voz1 vozamb2 voz2 vozamb3 voz3 vozamb4 voz4)


;;;HOMORHYTHM

(setf homorhy (gen-repeat times '(q stacc -q e stacc q e stacc h h -s s pizz s pizz s pizz)) r1 homorhy r2 homorhy r3 homorhy r4 homorhy)(setf arthomo '(stacc stacc ord stacc ord ord leg leg ord))

(setf dynhomo '(f f mf mf p< f mp< < <))

;; THE DYNAMICS are a little crazy, but this is only to show the stuff

;;;outra possibilidade para homorritmo
;;;lista do ritmo e articulação basica

(setf ritrepeat '(-s s s s s -s s s e stacc e stacc -s s ord s s -s s s s e stacc e stacc h ord -s s s s -s s s s e stacc e stacc -e q. ord e stacc e stacc e -s s ord s s -s s -h -q s s -s s h -h))

;;;repetições

(setf homorhy (gen-repeat times ritrepeat) r1 homorhy r2 homorhy r3 homorhy r4 homorhy)


;;;OMN ASSEMBLAGE da LINHA (for poliphony)


(setf vozomn1
(make-omn
 :length r1
 :pitch vozamb1
 :articulation arthomo
 :velocity dynhomo))

(setf vozomn2
(make-omn
 :length r2
 :pitch vozamb2
 :articulation arthomo
 :velocity dynhomo))

(setf vozomn3
(make-omn
 :length r3
 :pitch vozamb3
 :articulation arthomo
 :velocity dynhomo))

(setf vozomn4
(make-omn
 :length r4
 :pitch vozamb4
 :articulation arthomo
 :velocity dynhomo))

;;;---------------------------------------------------------
;;; SCORE
;;;----------------------------------------------------------

;;;

;;; (OPTIONAL) Time Signature Sequences

(setf time-signatures '((2 4 1) (3 4 2) (4 4 1)))

;;;ONLY ONE TIME SIGNATURE

;(setf time-signatures '((4 4)))

(def-score voices
           (:title "Piano-Red-4-Voices"
            :subtitle "Estudos Polifônicos"
            :composer "Julio-Herrlein"
            :key-signature 'atonal
            :time-signature time-signatures
            :tempo '("Meditativo" q 60)
            :layout (piano-solo-layout '(pno-rh1 pno-rh2) '(pno-lh pno-lh2))) 
  (pno-rh1 :omn vozomn1 
:channel 1 :sound 'gm :program 'Violin :volume 100)
  (pno-rh2 :omn vozomn2 
:channel 2 :sound 'gm :program 'Violin :volume 70)
  (pno-lh :omn vozomn3 
:channel 3 :sound 'gm :program 'Viola :volume 80)
  (pno-lh2 :omn vozomn4 
:channel 4 :sound 'gm :program 'Cello :volume 80))

 

Share this post


Link to post
Share on other sites

Thanks Janusz for the very straightforward example!

 

@Julio, looks like I'm in for an educational weekend! It seems like there's a lot of useful ideas in there.
I am currently building a library of functional progressions, I think the ideas you're showing will be incredibly valuable for that, thanks a lot!

Share this post


Link to post
Share on other sites

Very nice, Jordv !

I'm very interested in Harmony. Let me know about your progress in this matter.

I did a book about set theory and harmony. If you play guitar, you gonna like it.

It have all the possible voicings with diagrams for guitarand much more, like

 hexatonics, voice leading, functional harmony, etc.

Here's the link

 

https://www.melbay.com/Products/30042BCD/combinatorial-harmony-concepts-and-techniques-for-composing-and-improvising.aspx

 

And another post related to it

 

 

 

All the Best,

Julio

Share this post


Link to post
Share on other sites

Wow that is some stellar work, I do play guitar but I mainly compose on piano will send this along to my guitar playing friends, seems like a very valuable source.
I already had some new things to learn in the first few lines of your provided example so I had a productive day yesterday.
I have no doubt that you're familiar with these, but for others that might be interested, I found some useful tools for PCS analysis as well as a nice explanation on the subject.
 

https://www.fransabsil.nl/htm/toneset.htm#toneset_userguidelines

 

https://www.mta.ca/pc-set/pc-set_new/pages/introduction/toc.html

Share this post


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.

Sign in to follow this  

  • Similar Topics

    • By Jorvd
      Hi Everyone,

      This should be an easy one, yet I can't seem to figure it out: How do I remove double notes from a chord?
      I'm starting with this:
      (setf chords '(gs3gs4ds5ds5 ab3ab3ab3gs4)) And I would like the output to be this:
      '(gs3gs4ds5 ab3gs4)  
      Thanks!
    • By opmo
      I am working on a new omn symbol VOICES and wonder which way is more natural to write.
      I would like to hear your comments and ideas on this.
       
      Here are the two examples.
       
      With symbol :vx

      1) Each voice after each event, next to each other (1 bar 4/4):
      symbol option :vx (:v1 q cs5 ff :v2 q gs4 ff :v3 q f4 ff :v4 q f3 ff :v1 q eb5 ff :v2 q gs4 ff :v3 q c4 ff :v4 q gs3 ff :v1 q cs5 ff :v2 q gs4 ff :v3 q f4 ff :v4 q cs3 ff :v1 q f5 ff :v2 q cs5 ff :v3 q gs4 ff :v4 q cs3 ff) symbol option :x (:1 q cs5 ff :2 q gs4 ff :3 q f4 ff :4 q f3 ff :1 q eb5 ff :2 q gs4 ff :3 q c4 ff :4 q gs3 ff :1 q cs5 ff :2 q gs4 ff :3 q f4 ff :4 q cs3 ff :1 q f5 ff :2 q cs5 ff :3 q gs4 ff :4 q cs3 ff)  
      2) Each voice in a separate bar (1 bar 4/4):
      symbol option :vx (:v1 (q bb4 ff g4 gs4 e g4 f4)  :v2 (q cs5 ff b4 gs4 fs4)  :v3 (q f4 ff bb3 gs3 e bb3 gs3)  :v3 (q d3 ff e eb3 d3 q c3 bb2)) symbol option :x (:1 (q e4 ff h f4 q c5) :2 (e fs4 ff gs4 bb4 gs4 q fs4 f4)  :3 (s g3 ff gs3 q bb3 s gs3 g3 q gs3 f4)  :4 (q c3 ff h f2 q f3))  
      The symbol option :1 :2 :3 :4
      (:1 (q e4 ff h f4 q c5)  :2 (e fs4 ff gs4 bb4 gs4 q fs4 f4)  :3 (s g3 ff gs3 q bb3 s gs3 g3 q gs3 f4)  :4 (q c3 ff h f2 q f3))  
      will print in the Listener:
      (:|1| (q e4 ff h f4 q c5)  :|2| (e fs4 ff gs4 bb4 gs4 q fs4 f4)  :|3| (s g3 ff gs3 q bb3 s gs3 g3 q gs3 f4)  :|4| (q c3 ff h f2 q f3))  
      I personally think the second option is better to control.
       
      Best wishes,
      JP
    • By JulioHerrlein
      Dear Friends,
       
      When evaluating this (cmd+1)
      '(h (g3f4b4db5) (c4 maj7))  
      as snippet, I get this:
       

      Why is that c4 alone there in the beginning of snippet ?
      Best,
      Julio
×
×
  • Create New...