[CM] Enabling Common Music in S7

[Taube, Heinrich K]

> On Apr 13, 2020, at 1:31 PM, Juan I Reyes <juanig at ccrma.Stanford.EDU> wrote:
> 
> 
> Thanks Rick.
> 
> I'll look into it. Checked on CM-3.10.2 'ports.scm', and 'Csound
> scorefile only' section looks similar to what I want in order to
> get note-lists into Snd.
> 
>  — Juan

Here is a simple example of writing a note list to a file using s7 and grace

(let ((out (open-output-file "/Users/taube/aaaa.scm")))
  (let ((cycl (make-cycle '(100 200 300 400 500)))
        (time 0.0))
    (loop repeat 20
          do
          (format out "(frobber :start ~S :freq ~S)~%"
                  time (next cycl))
          (set! time (+ time (between .1 .5))))

  (close-output-port out))
  )

;------------------------------------------------------------------------------------

(frobber :start 0.0 :freq 100)
(frobber :start 0.29972316066265614 :freq 200)
(frobber :start 0.41734896938052835 :freq 300)
(frobber :start 0.7418096269063896 :freq 400)
(frobber :start 0.9555721817253592 :freq 500)
(frobber :start 1.2632302658589594 :freq 100)
(frobber :start 1.6171133577145071 :freq 200)
(frobber :start 1.7517172525929892 :freq 300)
(frobber :start 2.0873367070787747 :freq 400)
(frobber :start 2.433905572809035 :freq 500)
(frobber :start 2.7486108390787396 :freq 100)
(frobber :start 3.15146102575253 :freq 200)
(frobber :start 3.466651400908205 :freq 300)
(frobber :start 3.5819506900247595 :freq 400)
(frobber :start 4.005385637586632 :freq 500)
(frobber :start 4.206394486537482 :freq 100)
(frobber :start 4.620506133304502 :freq 200)
(frobber :start 4.767807968224842 :freq 300)
(frobber :start 4.971262815032534 :freq 400)
(frobber :start 5.0903310715209615 :freq 500)


> On Apr 13, 2020, at 1:31 PM, Juan I Reyes <juanig at ccrma.Stanford.EDU> wrote:
> 
> 
> Thanks Rick.
> 
> I'll look into it. Checked on CM-3.10.2 'ports.scm', and 'Csound
> scorefile only' section looks similar to what I want in order to
> get note-lists into Snd.
> 
>  -- Juan
> 
> 
>> scheme has support for writing expressions to files so you can
>> generate note lists to a file in grace.
> 
> 
> 
> _______________________________________________
> Cmdist mailing list
> Cmdist at ccrma.stanford.edu
> https://cm-mail.stanford.edu/mailman/listinfo/cmdist
>