[CM] Fwd: basic question (newbie still)
Rob Howiler
rhowiler at presby.edu
Tue Feb 23 08:37:57 PST 2016
I’ve worked out the problem a bit. Thanks. Like I said, I’m sort of flying my the seat of my pants here….
This:
————
> (define (strum3 key1 key2 beat dur amp)
> (let ((step (if (< key2 key1) -1 1))
> (diff (abs (- key2 key1))))
> (process repeat (+ diff 1)
> for key from key1 by step
> for beg = (now)
> do
> (mp:midi :key key)
> wait beat)))
> ;;;execute
> (sprout (strum3 60 63 10 10 .1))
should be this——with wait enclose like (wait)
————————
> (define (strum3 key1 key2 beat dur amp)
> (let ((step (if (< key2 key1) -1 1))
> (diff (abs (- key2 key1))))
> (process repeat (+ diff 1)
> for key from key1 by step
> for beg = (now)
> do
> (mp:midi :key key)
> (wait beat))))
> ;;;execute
> (sprout (strum3 60 63 10 10 .1))
That seems to do the trick to get playback as a “scale” & not a chord.
But this still gives no output:
——————————
> (define (strum3 key1 key2 beat dur amp)
> (let ((step (if (< key2 key1) -1 1))
> (diff (abs (- key2 key1))))
> (process repeat (+ diff 1)
> for key from key1 by step
> for beg = (now)
> do
> (mp:midi :key key)
> wait beat)))
> ;;;execute
> (sprout (strum3 60 63 10 10 .1))
>
>
> Any help would be appreciated. I’m going by an outdated example in the Notes From the Metalevel Book which suggests using the output (new midi :time (now) :duration….. etc. The "new midi" isn’t being recognized. I understand the language has changed since the book was written, so I’m trying to get my head around the way things work now.
>
> Thanks again in advance.
> Rob
>
>
>
> ------------------------------------------------------
> Dr. Rob Howiler
> Academic Computing Services Coordinator
> Assisstant Professor of Music
> rhowiler at presby.edu
> (864) 833-8324
> -------------------------------------------------------
>
------------------------------------------------------
Dr. Rob Howiler
Academic Computing Services Coordinator
Assisstant Professor of Music
rhowiler at presby.edu
(864) 833-8324
-------------------------------------------------------
--
------------------------------
<http://www.presby.edu>
More information about the Cmdist
mailing list