Playing C-major scale with a task

2015-12-30 14:52:42 -05:00 · 2015-12-30 14:52:42 -05:00 · 5d507f94a7
commit 5d507f94a7
parent 3ec940da72
1 changed files with 26 additions and 0 deletions
--- a/sclang-play/tutorial.sc
+++ b/sclang-play/tutorial.sc
@ -859,3 +859,29 @@
  r.stop;
 )
 // }-------------------------------------------------------------------------
+
+
+// {-------------------------------------------------------------------------
+(
+  t = Task({
+    loop {
+      [60, 62, 64, 65, 67, 69, 71, 72].do({
+        |midi|
+        Synth(
+          \singrain,
+          [
+            freq: midi.midicps,
+            amp: 0.2,
+            sustain: 0.2
+          ]
+        );
+        0.125.wait;
+      });
+    }
+  }).play;
+)
+
+(
+  t.stop;
+)
+// }-------------------------------------------------------------------------