starfighter/music/drums.csd

34 lines
733 B
Plaintext
Raw Normal View History

<CsoundSynthesizer>
<CsInstruments>
sr = 48000
ksmps = 32
nchnls = 2
0dbfs = 1
; Use Fluidsynth to render the score using soundfonts
gifluid fluidEngine; start fluidsynth engine
ifont fluidLoad "/usr/share/sounds/sf2/FluidR3_GM.sf2", gifluid, 1
fluidProgramSelect gifluid, 1, ifont, 0, 38 ;Synth bass 1
fluidProgramSelect gifluid, 2, ifont, 0, 2 ;Electric piano
fluidProgramSelect gifluid, 3, ifont, 8, 50 ;Synth strings
fluidProgramSelect gifluid, 10, ifont, 128, 25 ;TR-808 drums
instr 1, 2, 3, 10
ikey notnum
ivel ampmidi 127
fluidNote gifluid, p1, ikey, ivel
endin
instr 99
iamp init 5
al, ar fluidOut gifluid
outs al * iamp, ar * iamp
endin
</CsInstruments>
<CsScore>
i 99 0 3600
e 1
</CsScore>
</CsoundSynthesizer>