901.orc · 1110 B · ext
.orc · seen 14× in SWHvia unique-primary
swh:1:cnt:eaf5836473c41331c732448204d2c36d99f576f5;origin=https://github.com/JoelNash-Xuuki/DAW;anchor=swh:1:rev:90abcd0c88a64d3b0dc33bdfd93aacd30c69b7c5;path=/src/901.orc
Show source
sr = 44100
kr = 4410
ksmps = 10
nchnls = 1
instr 901
inotedur = p3
imaxamp = ampdb(88)
icarrfreq = 80
imodfreq = 55
ilowndx = 0
indxdiff = 5-0
; PARAMETERS DEFINING THE ADSR AMPLITUDE ENVELOPE
; TIMES ARE A PERCENTAGE OF p3
; attack amp = p9 attack length = p14
; decay amp = p10 decay length = p15
; sustain amp = p11 sustain length = p16
; release amp = p12 release length = p17
; end amp = p13
; PARAMETERS DEFINING THE ADSR FREQ DEVIATION ENVELOPE
; TIMES ARE A PERCENTAGE OF p3
; attack amp = p18 attack length = p23
; decay amp = p19 decay length = p24
; sustain amp = p20 sustain length = p25
; release amp = p21 release length = p26
; end amp = p22
aampenv linseg .75, .125*p3, .8, .125*p3, 1.0, .25*p3, .15, .5*p3, .0
adevenv linseg 1.0, .125*p3, .0, .25*p3, .0, .25*p3, .0, .25*p3, .0
amodosc oscili (ilowndx+indxdiff*adevenv)*imodfreq, imodfreq, 1
acarosc oscili imaxamp*aampenv, icarrfreq+amodosc, 1
out acarosc
endin