walkero
/
starfighter
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Add laser sound.

This commit is contained in:
Guus Sliepen 2012-03-06 21:04:54 +01:00
parent 2a3d03bea3
commit ebb5d197ac
1 changed files with 26 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
sound/laser.csd Normal file
View File

@ -0,0 +1,26 @@
<CsoundSynthesizer>
<CsInstruments>
sr = 48000
ksmps = 32
nchnls = 1
0dbfs = 1
; Laser shot:
; Basically a sine wave sweep from 5 kHz to 0.1 kHz in 0.1 s, decaying further to 0 Hz.
; White noise with an amplitude of 250 to 500 Hz is applied to the frequency.
instr 1
gisine ftgen 1, 0, 16384, 10, 1
k1 expon 5000, p3 * 0.2, 100
k2 linrand 500
k3 line 0.5, p3, 1
a1 poscil 0.3, k1 + k2 * k3, gisine
out a1
endin
</CsInstruments>
<CsScore>
i 1 0 0.5
e
</CsScore>
</CsoundSynthesizer>