Clojure 我怎样才能让t-ugen产生任何声音呢？

我在玩泛音，我已经可以用振荡器、信封、LFO和样本发出一些噪音

我的问题是我听不到t-ugen的声音

这是我的密码。这是超级准直仪的一个例子的直接翻译（它是有效的）

---

你能修改我的代码，或者给我一个t-grains ugen的工作示例吗？

至于它的价值，我也没有听到任何关于t-grains的消息。但是，我不能让TGrain示例在超级对撞机中工作。在我的例子中，它肯定在SC中工作。当我对泛音和SC有更多的经验时，我会回到这个问题。

(ns tutorial.core
  (:use overtone.live))

(definst grainy [b 0] (let [
                         trate (mouse-y:kr 1 30)
                         dur (/ 2 trate)]

                        (t-grains 1 (impulse:ar trate) b 1 (mouse-x:kr 0 (buf-dur:kr b)) dur 0 0.8 2)))

(def organ-sample (load-sample "~/samples/organ.wav"))
(grainy organ-sample)