diff options
Diffstat (limited to 'BUG5/BUG5.csd')
-rw-r--r-- | BUG5/BUG5.csd | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/BUG5/BUG5.csd b/BUG5/BUG5.csd index e240fcf..7d45739 100644 --- a/BUG5/BUG5.csd +++ b/BUG5/BUG5.csd @@ -1,6 +1,7 @@ <CsoundSynthesizer> <CsOptions> -odac +-m0 </CsOptions> <CsInstruments> /* @@ -67,6 +68,14 @@ endin instr global_master igain = 1 aL, aR bus_read "master" + itime6 = tab_i(1, gibid_sectionlengths)*gibid_beattime + if (gksection == 6) then + khpf linseg 5, itime6*0.5, 10, itime6*0.3, 100, itime6*0.2, 500 + klpf linseg 22050, itime6*0.5, 22050, itime6*0.3, 10000, itime6*0.2, 1000 + aL butterhp butterlp(aL, klpf), khpf + aR butterhp butterlp(aR, klpf), khpf + endif + aL limit aL*0.5, -1, 1 aR limit aR*0.5, -1, 1 outs aL*gkmastergain*igain, aR*gkmastergain*igain @@ -95,6 +104,7 @@ endin instr sequencer isection = 1 + event_i "i", "bid_setcurrentchord", 0, 1, isection, 0 event_i "i", "global_delay1", 0, p3 event_i "i", "global_reverb", 0, p3 @@ -122,6 +132,7 @@ instr sequencer bid_seq "bass", kpos, ksection bid_seq "clap", kpos, ksection bid_seq "303", kpos, ksection + bid_seq "303b", kpos, ksection kpos = (kpos < 31) ? kpos + 1 : 0 |