<html><head></head><body><div style="color:#000; background-color:#fff; font-family:times new roman, new york, times, serif;font-size:10px"><div dir="ltr" id="yui_3_16_0_1_1455899519988_8851"><font size="3"><br><font id="yui_3_16_0_1_1455899519988_12209">Hi there, <br></font></font></div><div id="yui_3_16_0_1_1455899519988_10486" dir="ltr"><font size="3"><br></font></div><div id="yui_3_16_0_1_1455899519988_10550" dir="ltr"><font id="yui_3_16_0_1_1455899519988_12210" size="3">> (define one (new midi :time 0 <br>> :keynum 60 :duration 2))</font></div><div id="yui_3_16_0_1_1455899519988_10614" dir="ltr"><font size="3"><br></font></div><div id="yui_3_16_0_1_1455899519988_10615" dir="ltr"><font id="yui_3_16_0_1_1455899519988_11712" size="3">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"><font size="3">If this is the case, <br></font></div><div id="yui_3_16_0_1_1455899519988_10821" dir="ltr"><font id="yui_3_16_0_1_1455899519988_11517" size="3">first define it as follows:</font></div><div id="yui_3_16_0_1_1455899519988_11370" dir="ltr"><font size="3"><br></font></div><div id="yui_3_16_0_1_1455899519988_10822" dir="ltr"><font id="yui_3_16_0_1_1455899519988_11511" size="3">(define (one ) (send "mp:midi" :time 0 :key 60 :dur 1)</font></div><div id="yui_3_16_0_1_1455899519988_11166" dir="ltr"><font size="3"><br></font></div><div id="yui_3_16_0_1_1455899519988_11237" dir="ltr"><font size="3">;and fire ;</font></div><div id="yui_3_16_0_1_1455899519988_11508" dir="ltr"><font size="3"><br></font></div><div id="yui_3_16_0_1_1455899519988_11238" dir="ltr"><font id="yui_3_16_0_1_1455899519988_12011" size="3">(one )</font></div><div id="yui_3_16_0_1_1455899519988_11797" dir="ltr"><font size="3"><br></font></div><div id="yui_3_16_0_1_1455899519988_11801" dir="ltr"><font id="yui_3_16_0_1_1455899519988_12057" size="3">Sincerely,</font></div><div id="yui_3_16_0_1_1455899519988_11806" dir="ltr"><font id="yui_3_16_0_1_1455899519988_12058" size="3">Ike</font></div><div id="yui_3_16_0_1_1455899519988_12059" dir="ltr"><font size="3"><br></font></div><div id="yui_3_16_0_1_1455899519988_12077" dir="ltr"><font id="yui_3_16_0_1_1455899519988_12284" size="3">PS: I tested it on Grace 3.8, I doubt it if it works with older cm-emacs environment</font><br></div></div></body></html>