Search the Community
Showing results for tags 'layout'.
-
Four voices. (setf vox1 '(q d4 g4 a4 b4 a4 h. g4)) (setf vox2 '(q b3 e4 g4 g4 fs4 h. d4)) (setf vox3 '(q g3 b3 d4 d4 d4 h. b3)) (setf vox4 '(q g3 e3 d3 g3 d3 h. g2)) 1st layout: (def-score layout1 (:key-signature '(g maj) :time-signature '((1 1 1 1) 4) :tempo 85 :layout (list (treble-layout 'inst1) (treble-layout 'inst2) (treble-layout 'inst3) (treble-layout 'inst4))) (inst1 :omn vox1 :channel 1 :sound 'gm :program 0) (inst2 :omn vox2) (inst3 :omn vox3) (inst4 :omn vox4) ) 2nd layout: (def-score layout2 (:key-signature '(g maj) :time-signature '((1 1 1 1) 4) :tempo 85 :layout (list (treble-layout 'inst1) (treble-layout 'inst2) (tenor-layout 'inst3) (bass-layout 'inst4))) (inst1 :omn vox1 :channel 1 :sound 'gm :program 0) (inst2 :omn vox2) (inst3 :omn vox3) (inst4 :omn vox4) ) 3rd layout: (def-score layout3 (:key-signature '(g maj) :time-signature '((1 1 1 1) 4) :tempo 85 :layout (bracket-group (treble-layout 'inst1) (treble-layout 'inst2) (tenor-layout 'inst3) (bass-layout 'inst4))) (inst1 :omn vox1 :channel 1 :sound 'gm :program 0) (inst2 :omn vox2) (inst3 :omn vox3) (inst4 :omn vox4) ) 4th layout: (def-score layout4 (:key-signature '(g maj) :time-signature '((1 1 1 1) 4) :tempo 85 :layout (choir-satb-layout 'inst1 'inst2 'inst3 'inst4)) (inst1 :omn vox1 :channel 1 :sound 'gm :program 0) (inst2 :omn vox2) (inst3 :omn vox3) (inst4 :omn vox4) )