Csound Csound-dev Csound-tekno Search About

Guitar Sound FX orc, sco & ?i [part 2]

Date1997-07-30 10:41
Fromjames@maths.ex.ac.uk
SubjectGuitar Sound FX orc, sco & ?i [part 2]
;---------------------------------------------------------------------------
; A Multi-Effects System
;---------------------------------------------------------------------------
; 1. Simple Sine Wave
; 2. Pluck
; 3. Mono Sampler
; 4. Noise
; 10. Compressor
; 11. Tube Amp Distortion
; 15. Wah-Wah: This one sucks but the talk-box makes a pretty good Wah-Wah.
; 16. Talk-Box
; 20. Vibrato
; 21. Tremelo
; 22. Pitch Shifter
; 23. Panner
; 30. Stereo Flanger
; 31. Cross Feedback Flanger
; 35. Chorus
; 40. Delay
; 45. Reverb

;---------------------------------------------------------------------------
; Waveforms
;---------------------------------------------------------------------------
; Sine Wave
f1 0 8192 10 1
; Triangle Wave
f2 0 8192 7  -1  4096 1 4096 -1
; Sample
;f3 0 0 1 "harp.wav" 0 4 0
; Triangle Wave
f4 0 8192 7 0 4096 1 4096 0

; Distortion Tables
; Heavy Distortion
;f5 0 8192   8 -.8 336 -.76 3000 -.7 1520 .7 3000 .76 336 .8
; Slight Distortion
;f5 0 8192   8 -.8 336 -.78  800 -.7 5920 .7  800 .78 336 .8
; Tube Distortion
;f5 0 8192 7 -.8 834 -.79 834 -.77 834 -.64 834 -.48 1520 .47 2000 .48 1336 
.48
f5 0 8192 7 -.8 934 -.79 934 -.77 934 -.64 1034 -.48 520 .47 2300 .48 1536 
.48

; Wah-Wah
f7 0 1024 -7 100 512 10000 512 100

; Pitch Shift Window Shape (1/2 sine)
f8 0 16384 9 .5 1 0

; Formants
; Ahh/Oooh
f10 0 1024 -7 722  256 722  256 266  256 266  256 722
f11 0 1024 -7 1216 256 1216 256 1292 256 1292 256 1216
f12 0 1024 -7 2433 256 2433 256 2281 256 2281 256 2433
f13 0 1024 -7 3193 256 3193 256 3421 256 3421 256 3193

; Sample
;  Sta  Dur  Amp     Fqc  Table  Begin  End(n-1)  OutCh
;i3 0    21.6 10000   440  3      0      474670    1

; Sine Wave
;i1 0  1 10000 1000
;i1 1  1 10000 500

; Pitch Shifter This has not been tested.
;   Sta  Dur   Fqc  Wave  WinFun  OutCh
;i19 0    1.6  2    3     8       1

; Noise
;  Sta  Dur  Amp
;i4 0    4    5000

; Wah-Wah
;    Sta  Dur  Frqc  Table  InChL  InChR  OutChL  OutChR
;i15  0    1.6  2     7      2      2      3       3

; Vibrato
;  Sta  Dur  Amp  Fqc  Table  MaxDelay  InChL  InChR  OutChL  OutChR
;i20 0   2.5  1    5    1      3         1      1      2       2

; Tremelo
;   Sta  Dur  Amp  Fqc  Table  InChL  InChR  OutChL  OutChR
;i21 0    2.5  .5   5    1      1      1      2       2

;---------------------------------------------------------------------------
; Plain Pluck
;---------------------------------------------------------------------------
;   Sta  Dur  Amp   Fqc   Func  Meth  OutCh
i2  0.0  1.6  4000  7.00   0     1    1
i2  0.2  1.4  3000  7.05   .     .    .
i2  0.4  1.2  2600  8.00   .     .    .
i2  0.6  1.0  3000  8.05   .     .    .
i2  0.8  0.8  4000  7.00   .     .    .
i2  1.0  0.6  3000  7.05   .     .    .
i2  1.2  0.4  2600  8.00   .     .    .
i2  1.4  0.2  3000  8.05   .     .    .

; Mixer
;    Sta Dur  Ch1  Gain  Pan  Ch2  Gain  Pan  Ch3  Gain  Pan  Ch4  Gain  Pan
i100 0   2    1    4     1    1    4     0    3    2     1    4     2    0

;---------------------------------------------------------------------------
; Pluck with Heavy Distortion
;---------------------------------------------------------------------------
i2  2.0  1.6  4000  7.00   0     1    1
i2  2.2  1.4  3000  7.05   .     .    .
i2  2.4  1.2  2600  8.00   .     .    .
i2  2.6  1.0  3000  8.05   .     .    .
i2  2.8  0.8  4000  7.00   .     .    .
i2  3.0  0.6  3000  7.05   .     .    .
i2  3.2  0.4  2600  8.00   .     .    .
i2  3.4  0.2  3000  8.05   .     .    .

; Tube Amp
;   Sta  Dur  PreGain PostGain  DutyOffset  SlopeShift  InCh  OutCh
i11 2    1.6  2       1         1           1           1     2

; Mixer
;    Sta Dur  Ch1  Gain  Pan  Ch2  Gain  Pan  Ch3  Gain  Pan  Ch4  Gain  Pan
i100 2   2    2    1     1    2    1     0    3    2     1    4     2    0

;---------------------------------------------------------------------------
; Pluck with Distortion & Flanging
;---------------------------------------------------------------------------
i2  4.0  1.6  4000  7.00   0     1    1
i2  4.2  1.4  3000  7.05   .     .    .
i2  4.4  1.2  2600  8.00   .     .    .
i2  4.6  1.0  3000  8.05   .     .    .
i2  4.8  0.8  4000  7.00   .     .    .
i2  5.0  0.6  3000  7.05   .     .    .
i2  5.2  0.4  2600  8.00   .     .    .
i2  5.4  0.2  3000  8.05   .     .    .

; Tube Amp
;   Sta  Dur  PreGain PostGain  DutyOffset  SlopeShift  InCh  OutCh
i11 4    1.6  2       1         1           1           1     2

; Flanger
;   Sta  Dur  Rate   Depth   Wave  Feedbk  Mix  DelayOff  InCh  OutChL  
OutChR
;                   (1-40)
i30 4    1.61 .5     20      1     .8      1    10        2     3       4

; Mixer
;    Sta Dur  Ch1  Gain  Pan  Ch2  Gain  Pan  Ch3  Gain  Pan  Ch4  Gain  Pan
i100 4   2    3    .5    1    4    .5    0    3    0     1    4    0     0

;---------------------------------------------------------------------------
; Distortion & Chorus
;---------------------------------------------------------------------------
i2  6.0  1.6  4000  7.00   0     1    1
i2  6.2  1.4  3000  7.05   .     .    .
i2  6.4  1.2  2600  8.00   .     .    .
i2  6.6  1.0  3000  8.05   .     .    .
i2  6.8  0.8  4000  7.00   .     .    .
i2  7.0  0.6  3000  7.05   .     .    .
i2  7.2  0.4  2600  8.00   .     .    .
i2  7.4  0.2  3000  8.05   .     .    .

; Tube Amp
;   Sta  Dur  PreGain PostGain  DutyOffset  SlopeShift  InCh  OutCh
i11 6    1.6  2       1         1           1           1     2

; Chorus
;   Sta  Dur  Rate   Depth   Wave  Mix  DelayOff  InCh  OutChL  OutChR
;                   (.1-2)
i35 6    1.61 1      1       1     1    30        2     3       4

; Mixer
;    Sta Dur  Ch1  Gain  Pan  Ch2  Gain  Pan  Ch3  Gain  Pan  Ch4  Gain  Pan
i100 6   2    3    1     1    4    1     0    3    0     1    4    0     0

;---------------------------------------------------------------------------
; Distortion & Talk-Box
;---------------------------------------------------------------------------
i2  8.0  1.6  4000  7.07   0     1    1
i2  8.4  1.2  3000  7.00   .     .    .
i2  8.8   .8  2600  9.05   .     .    .
i2  9.2   .4  3000  9.00   .     .    .

; Tube Amp
;   Sta  Dur  PreGain PostGain  DutyOffset  SlopeShift  InCh  OutCh
i11 8    1.6  2       1         1           1           1     2

; Talk Box
;    Sta  Dur  InCh  OutCh
i16  8    1.6  2     3

; Mixer
;    Sta Dur  Ch1  Gain  Pan  Ch2  Gain  Pan  Ch3  Gain  Pan  Ch4  Gain  Pan
i100 8   2    3    1     1    3    1     0    3    0     1    4    0     0

;---------------------------------------------------------------------------
; Digital Delay with Moderate Distortion
;---------------------------------------------------------------------------
i2  10.0  1.6  4000  7.07   0     1    1
i2  10.4  1.2  3000  7.00   .     .    .
i2  10.8   .8  2600  9.05   .     .    .
i2  11.2   .4  3000  9.00   .     .    .

; Tube Distortion
f5 10 8192 7 -.8 834 -.79 834 -.77 834 -.64 834 -.48 1520 .47 2000 .48 1336 
.48

; Tube Amp
;   Sta  Dur  PreGain PostGain  DutyOffset  SlopeShift  InCh  OutCh
i11 10   1.6  2       1         .2          0           1     2

; Delay
;    Sta  Dur  Time  Feedbk  InChL  InChR  OutChL  OutChR
i40  10   3    .2    .5      2      2      3       3

; Mixer
;    Sta Dur  Ch1  Gain  Pan  Ch2  Gain  Pan  Ch3  Gain  Pan  Ch4  Gain  Pan
i100 10  3    2    1     1    2    1     0    3    1     1    3    1     0

;---------------------------------------------------------------------------
; Compression & Auto Pan
;---------------------------------------------------------------------------
i2  13.0  1.6  4000  7.07   0     1    1
i2  13.4  1.2  3000  7.00   .     .    .
i2  13.8   .8  2600  9.05   .     .    .
i2  14.2   .4  3000  9.00   .     .    .

; Compression Curve
f6 13 1025 7 1 256 1 256 .1 256 .1 257 .1

; Compressor
;    Sta  Dur  RespFrqc  Table  PreGain PostGain  InCh  OutCh
i10  13   1.6  100       6      1       20        1     2

; Tube Distortion
f5 13 8192 7 -.8 834 -.79 834 -.77 834 -.64 834 -.48 1520 .47 2000 .48 1336 
.48

; Tube Amp
;   Sta  Dur  PreGain PostGain  DutyOffset  SlopeShift  InCh  OutCh
i11 13   1.6  2       1         .2          0           2     3

; Panner
;   Sta  Dur  Amp  Fqc  Table  InCh  OutChL  OutChR
i23 13   1.6  1    5    1      3     4       5

; Reverb
;   Sta Dur  gain %orig inputdur atk  InCh1  InCh2  OutChL  OutChR
i45 13  3    1    .5    1.61     .2   4      5      6       7

; Mixer
;    Sta Dur  Ch1  Gain  Pan  Ch2  Gain  Pan  Ch3  Gain  Pan  Ch4  Gain  Pan
i100 13  3    4    1     1    5    1     0    6    1     1    7    1     0


|    |    |  \   |     /      Hans P. Mikelson
|  __     |  __/ |  \    |    hljmm@discover-net.net
|__  |__  |__    |__ \_  |__  http://discover-net.net/~hljmm/


-- 
James Andrews, maths CDO, ext.3977