From 735a1712ea313646b33dcbab957cc5be787482c2 Mon Sep 17 00:00:00 2001
From: Mike Lynch <mike@mikelynch.org>
Date: Sun, 9 Apr 2023 12:31:39 +1000
Subject: [PATCH] spare parts

---
 monitor.scd | 36 ++++++++++++++++++++++++++++++++++++
 1 file changed, 36 insertions(+)
 create mode 100644 monitor.scd

diff --git a/monitor.scd b/monitor.scd
new file mode 100644
index 0000000..4cac1fe
--- /dev/null
+++ b/monitor.scd
@@ -0,0 +1,36 @@
+~frippbuffers[~currentfripp].write("/Users/mike/Music/SuperCollider Recordings/test.aiff");
+
+~frippbuffer.write("/Users/mike/Music/SuperCollider Recordings/slow.aiff");
+~frippbuffer.isNil;
+
+
+(
+~monitor = SynthDef(
+	\monitor_synth,
+	{
+		arg in=2, out=0;
+		Out.ar(out, In.ar(in, 2))
+	}
+).play(s, [\in, ~fxb, \out, 0 ], \addToTail);
+
+)
+
+~monitor.set(\in, ~reverbb)
+
+~monitor.free
+
+~pitchb.scope()
+
+~frippbuffers.plot;
+
+~bufrecorder.set(\buffer, ~frippbuffers[1]);
+
+
+~granulators[0].get(\buffer, {|v| v.postln});
+
+(
+~frippbuffers.do({
+	|b, i|
+	b.write("/Users/mike/Music/SuperCollider Recordings/buffer" ++ i.asString ++ ".aiff");
+});
+)