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 > [email protected] > (864) 833-8324 > ------------------------------------------------------- > ------------------------------------------------------ Dr. Rob Howiler Academic Computing Services Coordinator Assisstant Professor of Music [email protected] (864) 833-8324 ------------------------------------------------------- -- ------------------------------ <http://www.presby.edu> _______________________________________________ Cmdist mailing list [email protected] https://cm-mail.stanford.edu/mailman/listinfo/cmdist
