From 35ec5fdb595b7635a0d54a81abbbb96a6c6e82f7 Mon Sep 17 00:00:00 2001
From: Dennis Ranke <dennis.ranke@gmail.com>
Date: Wed, 2 Mar 2022 22:42:23 +0100
Subject: [PATCH] add simple bytebeat example to test first implementation with

---
 examples/curlywas/bytebeat.cwa | 10 ++++++++++
 1 file changed, 10 insertions(+)
 create mode 100644 examples/curlywas/bytebeat.cwa

diff --git a/examples/curlywas/bytebeat.cwa b/examples/curlywas/bytebeat.cwa
new file mode 100644
index 0000000..8bc5b1e
--- /dev/null
+++ b/examples/curlywas/bytebeat.cwa
@@ -0,0 +1,10 @@
+include "../include/microw8-api.cwa"
+
+export fn upd() {}
+
+export fn snd(index: i32) -> f32 {
+    let inline saw = index & 255;
+    let inline env = (-index #>> 9) & 255;
+    let inline sample = saw & env;
+    sample as f32 / 255 as f32 - 0.5
+}
\ No newline at end of file