From 3b6c4cfc13ae5528d8d9e5f550b4a6e6c206512c Mon Sep 17 00:00:00 2001
From: Robin Haberkorn <robin.haberkorn@googlemail.com>
Date: Mon, 25 Jun 2012 17:08:07 +0200
Subject: add LiSaX class: extension of LiSa that allows loading of audio files

---
 lib.ck       |  1 +
 lib/LiSaX.ck | 16 ++++++++++++++++
 2 files changed, 17 insertions(+)
 create mode 100644 lib/LiSaX.ck

diff --git a/lib.ck b/lib.ck
index 8da23c9..e3c19c8 100644
--- a/lib.ck
+++ b/lib.ck
@@ -1,4 +1,5 @@
 /* Includes */
+Machine.add("lib/LiSaX.ck");
 Machine.add("lib/SampOsc.ck");
 Machine.add("lib/Clipper.ck");
 Machine.add("lib/Element.ck");
diff --git a/lib/LiSaX.ck b/lib/LiSaX.ck
new file mode 100644
index 0000000..7881c78
--- /dev/null
+++ b/lib/LiSaX.ck
@@ -0,0 +1,16 @@
+/*
+ * Version of LiSa that supports reading in files (like a SndBuf)
+ */
+public class LiSaX extends LiSa {
+	fun void
+	read(string file)
+	{
+		SndBuf buf;
+
+		file => buf.read;
+		buf.samples()::samp => duration;
+
+		for (0 => int i; i < buf.samples(); i++)
+			valueAt(i => buf.valueAt, i::samp);
+	}
+}
-- 
cgit v1.2.3