SimpleBass v1.0
Author: Atte André Jensen (atte.dk), 2007
Simple, round bass.
git_instr_bass_round_saw ftgen 0, 0, 1024, 7, 0, 512, 1, 0, -1, 512, 0
idur = p3
ifreq = p4; <20: pitch, >=20: frequency
; optional
ivol = p5; 0-1
ibright = p6; 0-1
ipoles = p7; integer, 1-7
; setup
igain = 1
; defaults
ifreq = (p4 >= 20) ? ifreq : cpspch(ifreq)
ivol = (ivol == 0) ? <volume> : ivol
ibright = (ibright == 0) ? <brightness> : ibright
ipoles = (ipoles == 0) ? <poles> : ipoles
; calculate iamp and ifilt
iamp = 5000 * ivol * igain
ifilt = ibright * .1
; generate sound
aampenv linseg 0, 0.001, 1, 0.01, .5, idur-0.03, .4, 0.01, 0
aosc1 oscil iamp, ifreq, git_instr_bass_round_saw
afilt lowresx aosc1, ifreq*ifilt, .4, ipoles
aout = afilt*aampenv
; output
blueMixerOut aout, aout
brightness
12
49
true
0.04
1.0
0.29961938
60
true
poles
82
101
6db/octave
1
12db/octave
2
18db/octave
3
24db/octave
4
30db/octave
5
36db/octave
6
2
true
97
125
13
125
volume
230
49
true
0.0
1.0
1.0
60
false
239
125
87
8
141
38
ver2:0.9682842493
3
ver2:1
ver2:0.2996193767
2
ver2:1