; Select audio/midi flags here according to platform
; Audio out Audio in
-odac ;;;RT audio out
; For Non-realtime ouput leave only the line below:
; -o wgpluck.wav -W ;;; for file output any platform
; by Menno Knevel 2021
sr = 44100
ksmps = 32
nchnls = 2
0dbfs = 1
instr 1
icps = 220
iamp = 1
kpick = 0.5
iplk = 0
idamp = p4
ifilt = p5
ichoice = p6
if ichoice == 1 then
axcite = 0 ; no exciter signal
else
axcite diskin2 "fox.wav", 1 ; use the fox as exciter
axcite *= .15 ; but lower amplitude
endif
apluck wgpluck icps, iamp, kpick, iplk, idamp, ifilt, axcite
apluck dcblock2 apluck ; gets rid of DC offset
outs apluck, apluck
endin
f 1 0 16384 10 1 ; sine wave.
s
; damp filter choice
i 1 0 8 10 1000 1
i 1 + 8 30 10 1
s
i 1 0 8 10 1000 2
i 1 + 8 30 10 2
e