Csound.Air.Fx

Effects

Reverbs

reverbsc1 :: Sig -> Feedback -> ToneSig -> Sig

Mono version of the cool reverberation opcode reverbsc.

reverbsc1 asig feedbackLevel cutOffFreq

rever1 :: Feedback -> Sig -> (Sig, Sig)

Mono reverb (based on reverbsc)

rever1 feedback asig

rever2 :: Feedback -> Sig2 -> Sig2

Mono reverb (based on reverbsc)

rever2 feedback (asigLeft, asigRight)

reverTime :: DelayTime -> Sig -> Sig

Reverb with given time.

smallRoom :: Sig -> (Sig, Sig)

Mono reverb for small room.

smallHall :: Sig -> (Sig, Sig)

Mono reverb for small hall.

largeHall :: Sig -> (Sig, Sig)

Mono reverb for large hall.

magicCave :: Sig -> (Sig, Sig)

The magic cave reverb (mono).

smallRoom2 :: Sig2 -> Sig2

Stereo reverb for small room.

smallHall2 :: Sig2 -> Sig2

Stereo reverb for small hall.

largeHall2 :: Sig2 -> Sig2

Stereo reverb for large hall.

magicCave2 :: Sig2 -> Sig2

The magic cave reverb (stereo).

Delays

type MaxDelayTime = D

The maximum delay time.

type DelayTime = Sig

The delaya time

type Feedback = Sig

Feedback for delay

type Balance = Sig

Dry/Wet mix value (ranges from 0 to 1). The 0 is all dry. The 1 is all wet.

echo :: MaxDelayTime -> Feedback -> Sig -> SE Sig

The simplest delay with feedback. Arguments are: delay length and decay ratio.

echo delayLength ratio

fdelay :: MaxDelayTime -> Feedback -> Balance -> Sig -> SE Sig

Delay with feedback.

fdelay delayLength decayRatio balance

fvdelay :: MaxDelayTime -> DelayTime -> Feedback -> Balance -> Sig -> SE Sig

Delay with feedback.

fdelay maxDelayLength delayLength feedback balance

fvdelays :: MaxDelayTime -> [(DelayTime, Feedback)] -> Balance -> Sig -> SE Sig

Multitap delay. Arguments are: max delay length, list of pairs (delayLength, decayRatio), balance of mixed signal with processed signal.

fdelay maxDelayLength  delays balance asig

funDelays :: MaxDelayTime -> [(DelayTime, Sig -> Sig)] -> Balance -> Sig -> SE Sig

Generic multitap delay. It's just like fvdelays but instead of constant feedbackLevel it expects a function for processing a delayed signal on the tap.

fdelay maxDelayLength  delays balance asig

tabDelay :: (Tab -> Sig -> SE Sig) -> MaxDelayTime -> DelayTime -> Feedback -> Balance -> Sig -> SE Sig

Delay for functions that use some table (as a buffer). As granular synth or mincer.

tabDelay fn maxDelayTime delayTime feedback balance asig

data PingPongSpec

Aux parameters for ping pong delay. They are maximum delay time, low pass filter center frequency and Pan width. The defaults are (5 sec, 3500, 0.3).

Constructors

PingPongSpec

Fields

pingPongMaxTime :: MaxDelayTime

pingPongDamp :: Sig

pingPongWidth :: Sig

Instances

Default PingPongSpec

pingPong :: DelayTime -> Feedback -> Balance -> Sig2 -> SE Sig2

Ping-pong delay.

pingPong delayTime feedback mixLevel

pingPong' :: PingPongSpec -> DelayTime -> Feedback -> Balance -> Sig2 -> SE Sig2

Ping-pong delay with miscellaneous arguments.

pingPong' spec delayTime feedback mixLevel

csdPingPong :: MaxDelayTime -> DelayTime -> Sig -> Feedback -> Sig -> Balance -> Sig2 -> SE Sig2

Ping-pong delay defined in csound style. All arguments are present (nothing is hidden).

csdPingPong maxTime delTime damp feedback width mixLevel (ainL, ainR)

Distortion

distortion :: Sig -> Sig -> Sig

Distortion.

distort distLevel asig

Chorus

type DepthSig = Sig

type RateSig = Sig

type WidthSig = Sig

type ToneSig = Sig

chorus :: DepthSig -> RateSig -> Balance -> Sig -> SE Sig

Chorus.

chorus depth rate balance asig

Flanger

flange :: Lfo -> Feedback -> Balance -> Sig -> Sig

Flanger. Lfo depth ranges in 0 to 1.

flanger lfo feedback balance asig

Phase

phase1 :: Sig -> Lfo -> Feedback -> Balance -> Sig -> Sig

First order phaser.

harmPhase :: Sig -> Lfo -> Sig -> Sig -> Feedback -> Balance -> Sig -> Sig

Second order phaser. Sweeping gaps in the timbre are placed harmonicaly

powerPhase :: Sig -> Lfo -> Sig -> Sig -> Feedback -> Balance -> Sig -> Sig

Second order phaser. Sweeping gaps in the timbre are placed by powers of the base frequency.

Effects with unit parameters

fxDistort :: Feedback -> Sig -> ToneSig -> Sig -> Sig

Distortion

fxDistort level drive tone sigIn

fxDistort2 :: Feedback -> Sig -> ToneSig -> Sig2 -> Sig2

Stereo distortion.

stChorus2 :: Balance -> RateSig -> DepthSig -> WidthSig -> Sig2 -> Sig2

Stereo chorus.

stChorus2 mix rate depth width sigIn

fxPhaser :: Balance -> Feedback -> RateSig -> DepthSig -> Sig -> Sig -> Sig

Phaser

fxPhaser mix rate depth freq feedback sigIn

fxPhaser2 :: Balance -> Feedback -> RateSig -> DepthSig -> Sig -> Sig2 -> Sig2

Stereo phaser.

fxFlanger :: Balance -> Feedback -> RateSig -> DepthSig -> DelayTime -> Sig -> Sig

Flanger

fxFlanger mix feedback rate depth delay sigIn

fxFlanger2 :: Balance -> Feedback -> RateSig -> DepthSig -> DelayTime -> Sig2 -> Sig2

Stereo flanger

analogDelay :: Balance -> Feedback -> DelayTime -> ToneSig -> Sig -> SE Sig

Analog delay.

analogDelay mix feedback time tone sigIn

analogDelay2 :: Balance -> Feedback -> DelayTime -> ToneSig -> Sig2 -> SE Sig2

Stereo analog delay.

fxEcho :: D -> Sig -> Sig -> Sig -> SE Sig

Simplified delay

fxEcho maxDelayLength delTime feedback sigIn

fxEcho2 :: D -> Sig -> Sig -> Sig2 -> SE Sig2

Simplified stereo delay.

fxFilter :: Sig -> Sig -> Sig -> Sig -> Sig

Filter effect (a pair of butterworth low and high pass filters).

fxFilter lowPassfFreq highPassFreq gain 

fxFilter2 :: Sig -> Sig -> Sig -> Sig2 -> Sig2

Stereo filter effect (a pair of butterworth low and high pass filters).

fxWhite :: Sig -> Sig -> Sig -> SE Sig

Adds filtered white noize to the signal

fxWhite lfoFreq depth sigIn

fxWhite2 :: Sig -> Sig -> Sig2 -> SE Sig2

Adds filtered white noize to the stereo signal

fxPink :: Sig -> Sig -> Sig -> SE Sig

Adds filtered pink noize to the signal

fxWhite lfoFreq depth sigIn

fxPink2 :: Sig -> Sig -> Sig2 -> SE Sig2

Adds filtered pink noize to the stereo signal

equalizer :: [(Sig, Sig)] -> Sig -> Sig -> Sig

Equalizer

equalizer gainsAndFrequencies gain sigIn

equalizer2 :: [(Sig, Sig)] -> Sig -> Sig2 -> Sig2

Stereo equalizer.

eq4 :: [Sig] -> Sig -> Sig2 -> Sig2

Equalizer with frequencies: 100, 400, 1600, 6400

eq7 :: [Sig] -> Sig -> Sig2 -> Sig2

Equalizer with frequencies: 100, 200, 400, 800, 1600, 3200, 6400

fxGain :: Sig -> Sig2 -> Sig2

Gain

fxGain gain sigIn

Misc

trackerSplice :: D -> Sig -> Sig -> Sig -> SE Sig

Instrument plays an input signal in different modes. The segments of signal can be played back and forth.

trackerSplice maxLength segLength mode

• maxLength -- the maximum length of the played segment (in seconds)
• segLength -- the segment length in seconds
• mode -- mode of the playing. If it's 1 - only a part of the sample is plyaed and it's played forward. The portion of the signal starts from the current playback point. It lasts for segLength. If it's 2 - the segment is played in reverse. Other values produce the normal input signal.

Original author: Rory Walsh

Example:

main = dac $ do    
   let ev ch1 ch2 dt = fmap (\x -> (x, dt)) $ mconcat [
         fmap (const 1.5) $ charOn ch1 
       , fmap (const 2.5) $ charOn ch2 
       , fmap (const 0) $ charOff ch1 <> charOff ch2]

   (k, dt) <- stepper (0, 0.1) $ ev 'q' 'w' 0.1 <> ev 'a' 's' 0.2 <> ev 'z' 'x' 0.4
   mul 1.3 $ trackerSplice 0.8 dt (int' k) $ fst $ loopWav 1 "drumLoop.wav"