more blabla again

code/midibeep.ck

@@ -7,7 +7,7 @@ if (!input.open(port)) {
         <<< "erreur open MIDI" >>>;    me.exit();
         }
 
-while (1)       {
+while (1) {
         input => now;
         while ( input.recv(msg) ) {
                 <<< msg.data1, msg.data2, msg.data3 >>>;

code/playsample.ck

@@ -0,0 +1,14 @@
+SndBuf buf => dac;
+"sample.wav" => buf.read;
+
+float	srate, duration;
+1 => buf.gain;
+
+for ( 0.7=>srate; srate<1.8; 0.1 +=> srate) {
+	900 / srate => duration;
+	<<< "loop...", srate, duration >>>;
+	0 => buf.pos;
+	srate => buf.rate;
+	(duration)::ms => now;
+}
+