~ubuntu-branches/ubuntu/precise/csound/precise

« back to all changes in this revision

Viewing changes to examples/CsoundAC.csd

  • Committer: Package Import Robot
  • Author(s): Felipe Sateler
  • Date: 2012-04-19 09:26:46 UTC
  • mfrom: (3.2.19 sid)
  • Revision ID: package-import@ubuntu.com-20120419092646-96xbj1n6atuqosk2
Tags: 1:5.17.6~dfsg-1
* New upstream release
 - Do not build the wiimote opcodes (we need wiiuse).
* Add new API function to symbols file
* Disable lua opcodes, they were broken. Requires OpenMP to be enabled.
* Backport fixes from upstream:
  - Link dssi4cs with dl. Backport
  - Fix building of CsoundAC

Show diffs side-by-side

added added

removed removed

Lines of Context:
167
167
                        ; Table for Reed Physical Model
168
168
gireedtable             ftgen                   0, 0, 256,       7,     1, 80, 1, 156, -1, 40, -1
169
169
                        ; Tables for simple granular synthesis
170
 
gigrtab                 ftgen                   0, 0, 65537,    10,     1, 0.3, .1 0, .2, .02, 0, .1, .04
 
170
gigrtab                 ftgen                   0, 0, 65537,    10,     1, .3, .1, 0, .2, .02, 0, .1, .04
171
171
giwintab                ftgen                   0, 0, 65537,    10,     1, 0, .5, 0, .33, 0, .25, 0, .2, 0, .167
172
172
                        ; Tables for waveshaping drone
173
173
giharmonics             ftgen                   0, 0, 65537,    10,     1,   0,   2,   0,   0,   1 
541
541
aamp3                   linseg                  0,.001,3000,.001,1000,.0017,12000,.0013,3700,.001,12500,.0018,3000,.0012,1200,.001,1400,.0017,6000,.0023,200,.001,3000,.001,1200,.0015,8000,.001,1800,.0015,6000,.08,1200,.2,200,.2,40,.2,10,.4,0,1,0
542
542
adevamp3                linseg                  0, .02, .8, idur - .02, 0
543
543
adev3                   poscil                  adevamp3, 70, gisine ,0
544
 
amp3                    =                       aamp3 * (1 + adev3),
 
544
amp3                    =                       aamp3 * (1 + adev3)
545
545
awt1                    poscil                  amp1, kfreq, gisine
546
546
awt2                    poscil                  amp2, 2.7 * kfreq, gisine
547
547
awt3                    poscil                  amp3, 4.95 * kfreq, gisine
1027
1027
asignal1                butterhp                asignal, 32.0
1028
1028
asignal2                balance                 asignal1, asignal
1029
1029
aleft, aright               Pan                             p7, asignal2 * iamplitude
1030
 
p3, aleft, aright           Declick                             0       .006, p3, 0.06, aleft, aright
 
1030
p3, aleft, aright           Declick                             0.006, p3, 0.06, aleft, aright
1031
1031
                        AssignSend                      p1, 0.0, 0.0, 0.2, 1
1032
1032
                        SendOut                         p1, aleft, aright
1033
1033
                        endin
1903
1903
                        ; Low level implementation
1904
1904
                        ; of the classic Karplus-Strong algorithm
1905
1905
                        ; fixed pitches : no vibratos or glissandi !
1906
 
                        ; implemented by Josep M Comajuncosas / Aug�98
 
1906
                        ; implemented by Josep M Comajuncosas / Aug\B498
1907
1907
                        ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1908
1908
                        ; Initialised with a wide pulse (buzz)
1909
1909
                        ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;