-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathsynthdef-shine.scd
40 lines (36 loc) · 1.03 KB
/
synthdef-shine.scd
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
(
SynthDef(\shine, {
var freq = \freq.kr(440);
var amp = \amp.kr(0.3);
var out = \out.kr(0);
var pan = \pan.kr(0);
var attackTime = \attackTime.kr(0.01);
var decayTime = \decayTime.kr(0.3);
var sustainLevel = \sustainLevel.kr(0.5);
var releaseTime = \releaseTime.kr(0.01);
var gate = \gate.kr(1);
var sig, env;
sig = Saw.ar(freq * [0.9, 1, 1.1]);
env = Env.adsr(attackTime, decayTime, sustainLevel, releaseTime).kr(2, gate);
sig = LPF.ar(sig, freq);
// sig = GVerb.ar(sig, roomsize: 10, revtime: 3, damping: 0.5, inputbw: 0.5, spread: 15, drylevel: 1, earlyreflevel: 0.7, taillevel: 0.5, mul: 0.5);
// sig = JPverb.ar(sig);
sig = FreeVerb.ar(sig, mix: 0.59, room: 0.8, damp: 0.1);
Out.ar(out, Pan2.ar(sig * env * amp, pan));
}).add
);
// Synth(\shine)
// (
// var synthname = \shine;
// Pdef((synthname++"pat").asSymbol,
// Pbind(\instrument, synthname,
// // \degree, 0,
// // \dur, 1,
// // \attackTime, 0.01,
// // \decayTime, 0.3,
// // \sustainLevel, 0.5,
// // \releaseTime, 1,
// // \amp, 0.3,
// )
// ).play
// )