de7c009e4d 2010-11-30 spiffytech@gm: sr=44100
de7c009e4d 2010-11-30 spiffytech@gm: ksmps=20
de7c009e4d 2010-11-30 spiffytech@gm: nchnls=1
de7c009e4d 2010-11-30 spiffytech@gm: 
eb81d5f9fd 2011-11-01         brian: instr 3
eb81d5f9fd 2011-11-01         brian:     inum = p5*100
c9abf46a9f 2011-11-01         brian:     if inum=105 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/1.05.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=106 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/1.06.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=107 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/1.07.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=108 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/1.08.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=108 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/1.09.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=110 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/1.10.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=111 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/1.11.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=200 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/2.00.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=201 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/2.01.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=202 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/2.02.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=203 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/2.03.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=204 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/2.04.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=205 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/2.05.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=206 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/2.06.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=207 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/2.07.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=208 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/2.08.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=209 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/2.09.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=210 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/2.10.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=211 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/2.11.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=300 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/3.00.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=301 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/3.01.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=302 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/3.02.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=303 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/3.03.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=304 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/3.04.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=305 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/3.05.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=306 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/3.06.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=307 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/3.07.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=308 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/3.08.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=309 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/3.09.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=310 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/3.10.wav", 1
c9abf46a9f 2011-11-01         brian:     elseif inum=311 then
c9abf46a9f 2011-11-01         brian:         asig diskin2 "samples/bass/3.11.wav", 1
c9abf46a9f 2011-11-01         brian:     endif
eb81d5f9fd 2011-11-01         brian:     outs asig
eb81d5f9fd 2011-11-01         brian: endin
eb81d5f9fd 2011-11-01         brian: 
de7c009e4d 2010-11-30 spiffytech@gm: instr 1
de7c009e4d 2010-11-30 spiffytech@gm:     asound pluck   p4, cpspch(p5), cpspch(p6), p7, p8 p9 p10
de7c009e4d 2010-11-30 spiffytech@gm:     out asound
de7c009e4d 2010-11-30 spiffytech@gm: endin
de7c009e4d 2010-11-30 spiffytech@gm: 
de7c009e4d 2010-11-30 spiffytech@gm: instr 2
de7c009e4d 2010-11-30 spiffytech@gm:     kenv linen p4, .1, p3, .2; envelope
de7c009e4d 2010-11-30 spiffytech@gm:     asound oscili kenv, cpspch(p5), p6; oscillator
de7c009e4d 2010-11-30 spiffytech@gm:     out asound
de7c009e4d 2010-11-30 spiffytech@gm: endin
de7c009e4d 2010-11-30 spiffytech@gm: 
29231e328a 2011-10-11         brian: instr 4
29231e328a 2011-10-11         brian:     aFMinst foscili p4, cpspch(p5), p6, p7, p8, p9
de7c009e4d 2010-11-30 spiffytech@gm: endin