<html><head><meta http-equiv="Content-Type" content="text/html charset=utf-8"></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;" class="">Thanks. &nbsp;That worked like a charm.<div class=""><br class=""></div><div class="">Is there any documentation for the “mp:midi” syntax? &nbsp;I imagine there is more that are more parameters I could control….?</div><div class=""><br class=""></div><div class="">I don’t want to keep posting newbie questions to the list, but I want to get started on making some real music. &nbsp;I’m still learning the language of Lisp/Common Music, but I feel like I’m ready to start making some music.&nbsp;</div><div class=""><br class=""></div><div class="">Also, I’ve found an example to write a midi file that seems to work great, but again I’d like to know some more about the with-midi and mp:midi “commands”. &nbsp;</div><div class=""><br class=""></div><div class=""><span class="Apple-tab-span" style="white-space:pre">        </span>(with-midi (“test.mid”)</div><div class=""><span class="Apple-tab-span" style="white-space:pre">                </span>(loop for t to 4 by .25</div><div class=""><span class="Apple-tab-span" style="white-space:pre">                        </span>do (mp:midi t 5 (between 48 84) .1)))</div><div class=""><br class=""></div><div class="">Thanks a whole bunch for getting me this far.</div><div class="">Rob</div><div class=""><br class=""><div><blockquote type="cite" class=""><div class="">On Feb 19, 2016, at 12:19 PM, Aykut Caglayan &lt;<a href="mailto:aykut_caglayan@yahoo.com" class="">aykut_caglayan@yahoo.com</a>&gt; wrote:</div><br class="Apple-interchange-newline"><div class=""><div class=""><div style="background-color: rgb(255, 255, 255); font-family: 'times new roman', 'new york', times, serif; font-size: 10px;" class=""><div dir="ltr" id="yui_3_16_0_1_1455899519988_8851" class=""><font size="3" class=""><br class=""><font id="yui_3_16_0_1_1455899519988_12209" class="">Hi there, <br class=""></font></font></div><div id="yui_3_16_0_1_1455899519988_10486" dir="ltr" class=""><font size="3" class=""><br class=""></font></div><div id="yui_3_16_0_1_1455899519988_10550" dir="ltr" class=""><font id="yui_3_16_0_1_1455899519988_12210" size="3" class="">&gt; (define one (new midi :time 0 <br class="">&gt;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; :keynum 60 :duration 2))</font></div><div id="yui_3_16_0_1_1455899519988_10614" dir="ltr" class=""><font size="3" class=""><br class=""></font></div><div id="yui_3_16_0_1_1455899519988_10615" dir="ltr" class=""><font id="yui_3_16_0_1_1455899519988_11712" size="3" class="">I assume you are trying to define a function which sends a midi note out.</font></div><div id="yui_3_16_0_1_1455899519988_10616" dir="ltr" class=""><font size="3" class="">If this is the case, <br class=""></font></div><div id="yui_3_16_0_1_1455899519988_10821" dir="ltr" class=""><font id="yui_3_16_0_1_1455899519988_11517" size="3" class="">first define it as follows:</font></div><div id="yui_3_16_0_1_1455899519988_11370" dir="ltr" class=""><font size="3" class=""><br class=""></font></div><div id="yui_3_16_0_1_1455899519988_10822" dir="ltr" class=""><font id="yui_3_16_0_1_1455899519988_11511" size="3" class="">(define (one ) (send "mp:midi" :time 0 :key 60 :dur 1)</font></div><div id="yui_3_16_0_1_1455899519988_11166" dir="ltr" class=""><font size="3" class=""><br class=""></font></div><div id="yui_3_16_0_1_1455899519988_11237" dir="ltr" class=""><font size="3" class="">;and fire ;</font></div><div id="yui_3_16_0_1_1455899519988_11508" dir="ltr" class=""><font size="3" class=""><br class=""></font></div><div id="yui_3_16_0_1_1455899519988_11238" dir="ltr" class=""><font id="yui_3_16_0_1_1455899519988_12011" size="3" class="">(one )</font></div><div id="yui_3_16_0_1_1455899519988_11797" dir="ltr" class=""><font size="3" class=""><br class=""></font></div><div id="yui_3_16_0_1_1455899519988_11801" dir="ltr" class=""><font id="yui_3_16_0_1_1455899519988_12057" size="3" class="">Sincerely,</font></div><div id="yui_3_16_0_1_1455899519988_11806" dir="ltr" class=""><font id="yui_3_16_0_1_1455899519988_12058" size="3" class="">Ike</font></div><div id="yui_3_16_0_1_1455899519988_12059" dir="ltr" class=""><font size="3" class=""><br class=""></font></div><div id="yui_3_16_0_1_1455899519988_12077" dir="ltr" class=""><font id="yui_3_16_0_1_1455899519988_12284" size="3" class="">PS: I tested it on Grace 3.8, I doubt it if it works with older cm-emacs environment</font><br class=""></div></div></div></div></blockquote></div><br class=""><div apple-content-edited="true" class="">
<div style="color: rgb(0, 0, 0); font-family: Helvetica;  font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: 2; text-align: -webkit-auto; text-indent: 0px; text-transform: none; white-space: normal; widows: 2; word-spacing: 0px; -webkit-text-stroke-width: 0px; word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;" class=""><span class="Apple-style-span" style="border-collapse: separate; line-height: normal; border-spacing: 0px;"><div style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;" class=""><span class="Apple-style-span" style="border-collapse: separate; color: rgb(0, 0, 0); font-family: Helvetica; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: 2; text-indent: 0px; text-transform: none; white-space: normal; widows: 2; word-spacing: 0px; border-spacing: 0px; -webkit-text-decorations-in-effect: none; -webkit-text-stroke-width: 0px;"><div style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;" class=""><br class="">------------------------------------------------------<br class="">Dr. Rob Howiler<br class="">Academic Computing Services Coordinator</div><div style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;" class="">Assisstant Professor of Music<br class=""><a href="mailto:rhowiler@presby.edu" class="">rhowiler@presby.edu</a><br class="">(864) 833-8324<br class="">-------------------------------------------------------<br class=""></div></span></div></span></div>
</div>
<br class=""></div></body></html>
<br>
<hr><a href="http://www.presby.edu" target="_blank"><img src="http://www.presby.edu/misc/logo-sig.png"></a>