ResonantRhythm v1.1
Author: Atte André Jensen (atte.dk), 2007
Animated, resonant pad/drone/bass instrument with tempo sync.
Changelog:
1.1
* Syncs to tempo using miditempo
* Added more subdivisions
1.0
* Initial release
;git_sqr ftgen 0, 0, 8192, 7, 1, 4096, 1, 0, -1, 4096, -1
ifreq = p4
; optional
ivol = p5
kdetune = p6
kbright = p7
kres = p8
khpfreq = p9
; setup
iamp = 10000
; defaults
ifreq = (p4 >= 20) ? ifreq : cpspch(ifreq)
ivol = (ivol == 0) ? <volume> : ivol
kdetune = (kdetune == 0) ? <detune> : kdetune
kbright = (kbright == 0) ? <brightness> : kbright
kres = (kres == 0) ? <resonance> : kres
khpfreq = (khpfreq == 0) ? <hipassfreq> : khpfreq
; calculate iamp
iamp = iamp * ivol
; seed
seed 0
iseed random 0, 1
; envelope
aampenv linsegr 0, <attack>, 1, <release>, 0
; sqr random
kbpm miditempo
ksqrfreq = kbpm * <subdiv> / 240
kfreq randh .5, ksqrfreq, iseed
kfreq = (kfreq + .5) * kbright
; oscillators
aosc1 vco2 iamp, ifreq, <waveform>, <pulsewidth>
aosc2 vco2 iamp, ifreq * (1 + kdetune), <waveform>, <pulsewidth>
aosc3 vco2 iamp, ifreq * (1 - kdetune), <waveform>, <pulsewidth>
aosc4 vco2 iamp, ifreq * (1 + kdetune*.5), <waveform>, <pulsewidth>
aosc5 vco2 iamp, ifreq * (1 - kdetune*.5), <waveform>, <pulsewidth>
; mix
aoutl = (aosc1 + aosc2 + aosc5) * aampenv
aoutr = (aosc1 + aosc3 + aosc4) * aampenv
; filter
aoutl moogvcf2 aoutl, kfreq * ifreq, kres
aoutr moogvcf2 aoutr, kfreq * ifreq, kres
aoutl atone aoutl, khpfreq
aoutr atone aoutr, khpfreq
; output
blueMixerOut aoutl, aoutr
detune
262
171
true
0.0
0.05
0.016751744
60
true
subdiv
17
227
1/1
1
1/2
2
1/4
4
1/8
8
1/16
16
1/32
32
1/64
64
1/1T
1.5
1/2T
3
1/4T
6
1/8T
12
1/16T
24
1/32T
48
1/1.
.666666666666666666666666666666666666666666666666666
1/2.
1.3333333333333333333333333333333333333333333333333
1/4.
2.6666666666666666666666666666666666666666666666666666666
1/8.
5.333333333333333333333333333333333333333333333
1/16.
10.6666666666666666666666666666666666666666666666666666666666
1/32.
21.3333333333333333333333333333333333333333333333333
4
false
12
251
272
247
resonance
260
57
true
0.0
1.0
0.33874866
60
true
volume
352
171
true
0.0
1.0
1.0
60
false
361
247
259
133
brightness
195
57
true
1.0
20.0
6.3619614
60
true
195
133
hipassfreq
353
57
true
0.0
4000.0
798.64484
60
true
347
133
attack
110
171
true
0.0010
1.0
0.004351962
60
true
release
175
171
true
0.0010
1.0
0.023103733
60
true
123
247
183
247
113
6
pulsewidth
97
57
true
0.0010
0.5
0.0972609
60
true
95
133
waveform
11
109
Saw/Tri
4
Sqr/Pulse
2
1
true
23
133
198
35