why does the trumpet and the piano part both "sended" and displayed as "trumpet", played only on channel 1 ?

i do not understand what's my mistake...

 

thanx for some help

 

(def-instrument-set group1
                    :instruments
  (:group group1
          :trumpet
          (:layout trumpet-layout
                   :port 0
                   :channel 1
                   :sound 'gm-trumpet
                   :pan (pan 0)
                   :volume 92)

          :piano          
          (:layout piano-layout
                   :port 0
                   :channel 2
                   :sound 'gm-piano
                   :pan (pan 10)
                   :volume 92)


          :sine
          (:layout treble-layout
                   :port 0
                   :channel 2
                   :sound 'gm
                   :controllers nil
                   :pan (pan -10)
                   :volume 92)

          :noise
          (:layout treble-layout
                   :port 0
                   :channel 2
                   :sound 'gm
                   :controllers nil
                   :pan (pan -5)
                   :volume 92)))

(midi-destinations)


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(setf
 p1 '(q d4 pp s eb4 < leg g4 < leg bb4 < leg a4 q. cs5 mf -e
      3q gs5 > leg fs5 > leg c5 > b4 > leg f4 leg e4))

 (ps 'group1 
     :trumpet p1
     :piano (gen-retrograde p1)
   
     :output :midi
     :tempo '((88 1) (89 1) (100 1))
     :time-signature '(1 4 10))

 

 

Piano needs two voices 🙂

For example:

 (ps 'group1 
     :trumpet (list p1)
     :piano (list (gen-retrograde p1) (pitch-variant p1 :variant 'i))
     :tempo '((88 1) (89 1) (100 1))
     :time-signature '(1 4 10))

 

Andre, you can set a custom instrument, using piano grand-layout (this layout don´t need two lists).

 

thanx to all, but the problem is not solved, try?!

 

(def-instrument-set group1
                    :instruments
  (:group group1
          :trumpet
          (:layout trumpet-layout
                   :port 0
                   :channel 1
                   :pan (pan 0)
                   :volume 92)

          :piano          
          (:layout piano-grand-layout
                   :port 0
                   :channel 2
                   :pan (pan 10)
                   :volume 92)


          :sine
          (:layout treble-layout
                   :port 0
                   :channel 3
                   :pan (pan -10)
                   :volume 92)

          :noise
          (:layout treble-layout
                   :port 0
                   :channel 4
                   :pan (pan -5)
                   :volume 92)))



;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(setf
 p1 '(q d4 pp s eb4 < leg g4 < leg bb4 < leg a4 q. cs5 mf -e
      3q gs5 > leg fs5 > leg c5 > b4 > leg f4 leg e4))

 (ps 'group1 
     :trumpet p1
     :piano  (list (gen-retrograde p1) (gen-retrograde p1))
     :tempo '((88 1) (89 1) (100 1))
     :time-signature '(1 4 10))


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

 

 

list is missing 🙂

 

:trumpet (list p1)

halleluja!!! 😄 thanks!!!!